diff --git a/hasql-optparse-applicative.cabal b/hasql-optparse-applicative.cabal
--- a/hasql-optparse-applicative.cabal
+++ b/hasql-optparse-applicative.cabal
@@ -1,6 +1,6 @@
 cabal-version: 3.0
 name: hasql-optparse-applicative
-version: 0.9
+version: 0.9.1
 synopsis: "optparse-applicative" parsers for "hasql"
 category: Hasql, Database, PostgreSQL, Options
 homepage:
@@ -19,7 +19,7 @@
 source-repository head
   type: git
   location:
-    git://github.com/nikita-volkov/hasql-optparse-applicative.git
+    https://github.com/nikita-volkov/hasql-optparse-applicative
 
 library
   hs-source-dirs: library
@@ -69,8 +69,8 @@
     attoparsec-time >=1.0.3 && <1.1,
     base >=4.11 && <5,
     bytestring >=0.10 && <1,
-    hasql >=1.9 && <1.10,
-    hasql-pool >=1.3 && <1.4,
+    hasql >=1.10 && <1.11,
+    hasql-pool >=1.4.1 && <1.5,
     optparse-applicative >=0.18 && <1,
     text >=1.2 && <3,
     time >=1.10 && <2,
diff --git a/library/Hasql/OptparseApplicative.hs b/library/Hasql/OptparseApplicative.hs
--- a/library/Hasql/OptparseApplicative.hs
+++ b/library/Hasql/OptparseApplicative.hs
@@ -8,9 +8,7 @@
 import qualified Attoparsec.Time.Text as AttoparsecTime
 import qualified Data.Attoparsec.Text as Attoparsec
 import Data.Text (Text)
-import qualified Hasql.Connection.Setting as Connection.Setting
-import qualified Hasql.Connection.Setting.Connection as Connection.Setting.Connection
-import qualified Hasql.Connection.Setting.Connection.Param as Connection.Setting.Connection.Param
+import qualified Hasql.Connection.Settings as Connection.Settings
 import Hasql.OptparseApplicative.Prelude
 import qualified Hasql.Pool.Config as Pool.Config
 import qualified Hasql.Pool.Config.Defaults as Pool.Config.Defaults
@@ -98,20 +96,16 @@
   -- You can use this function to prefix the name or you can just specify 'id',
   -- if you don't want it changed.
   (String -> String) ->
-  Parser [Connection.Setting.Setting]
+  Parser Connection.Settings.Settings
 connectionSettings modifyName =
-  sequenceA
-    [ Connection.Setting.connection
-        . Connection.Setting.Connection.params
-        <$> sequenceA
-          [ Connection.Setting.Connection.Param.host <$> host modifyName,
-            Connection.Setting.Connection.Param.port <$> port modifyName,
-            Connection.Setting.Connection.Param.user <$> user modifyName,
-            Connection.Setting.Connection.Param.password <$> password modifyName,
-            Connection.Setting.Connection.Param.dbname <$> database modifyName
-          ],
-      Connection.Setting.usePreparedStatements <$> usePreparedStatements modifyName
-    ]
+  mconcat
+    <$> sequenceA
+      [ (\h p -> Connection.Settings.hostAndPort h p) <$> host modifyName <*> port modifyName,
+        Connection.Settings.user <$> user modifyName,
+        Connection.Settings.password <$> password modifyName,
+        Connection.Settings.dbname <$> database modifyName,
+        (\b -> if b then mempty else Connection.Settings.noPreparedStatements True) <$> usePreparedStatements modifyName
+      ]
 
 host :: (String -> String) -> Parser Text
 host modifyName =