Add db-prepared-statements config

2020-11-23 19:00:50 -05:00
parent 4bd5e6bd82
commit 787973f323
9 changed files with 55 additions and 40 deletions
@@ -200,4 +200,4 @@ main = do

  where
    setupDbStructure pool schemas extraSearchPath ver =
-      either (panic.show) id <$> P.use pool (HT.transaction HT.ReadCommitted HT.Read $ getDbStructure (toList schemas) extraSearchPath ver)
+      either (panic.show) id <$> P.use pool (HT.transaction HT.ReadCommitted HT.Read $ getDbStructure (toList schemas) extraSearchPath ver True)