backend/feat/#354/adding-orderBy-in-findAllWithKVAndConditionalDBInte…

…rnal
nammayatri · Dec 22, 2023 · 2673278 · 2673278
1 parent c2c9c8d
commit 2673278
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 6 deletions.
diff --git a/flake.lock b/flake.lock
diff --git a/lib/mobility-core/src/Kernel/Beam/Functions.hs b/lib/mobility-core/src/Kernel/Beam/Functions.hs
@@ -263,12 +263,13 @@ findAllWithKVAndConditionalDB ::
     FromTType' (table Identity) a
   ) =>
   Where Postgres table ->
+  Maybe (OrderBy table) ->
   m [a]
-findAllWithKVAndConditionalDB where' = do
+findAllWithKVAndConditionalDB where' orderBy = do
   updatedMeshConfig <- setMeshConfig (modelTableName @table) (modelSchemaName @table) meshConfig
   inReplica <- L.getOptionLocal ReplicaEnabled
   dbConf' <- maybe getMasterDBConfig (\inReplica' -> if inReplica' then getReplicaDbConfig else getMasterDBConfig) inReplica
-  result <- KV.findAllWithKVAndConditionalDBInternal dbConf' updatedMeshConfig where'
+  result <- KV.findAllWithKVAndConditionalDBInternal dbConf' updatedMeshConfig where' orderBy
   case result of
     Right res -> do
       res' <- mapM fromTType' res