diff --git a/hasql-optparse-applicative.cabal b/hasql-optparse-applicative.cabal
--- a/hasql-optparse-applicative.cabal
+++ b/hasql-optparse-applicative.cabal
@@ -1,7 +1,7 @@
 name:
   hasql-optparse-applicative
 version:
-  0.3.0.9
+  0.4
 synopsis:
   "optparse-applicative" parsers for "hasql"
 category:
@@ -45,7 +45,7 @@
     Hasql.OptparseApplicative
   build-depends:
     hasql >= 1.3 && < 1.6,
-    hasql-pool >= 0.5 && < 0.7,
+    hasql-pool >= 0.7 && < 0.8,
     -- 
     optparse-applicative >= 0.12 && < 0.18,
     -- 
diff --git a/library/Hasql/OptparseApplicative.hs b/library/Hasql/OptparseApplicative.hs
--- a/library/Hasql/OptparseApplicative.hs
+++ b/library/Hasql/OptparseApplicative.hs
@@ -5,14 +5,14 @@
 import qualified Hasql.Pool as B
 import Options.Applicative
 
--- | Given a function, which updates the long names produces a parser of
--- the @Hasql.Pool.'B.Settings'@.
+-- | Given a function, which updates the long names, produces a parser of
+-- the @Hasql.Pool.'acquire'@ operation.
 --
 -- You can use this function to prefix the name or you can just specify 'id',
 -- if you don't want it changed.
-poolSettings :: (String -> String) -> Parser B.Settings
+poolSettings :: (String -> String) -> Parser (IO B.Pool)
 poolSettings updatedName =
-  (,,) <$> size <*> timeout <*> connectionSettings updatedName
+  B.acquire <$> size <*> connectionSettings updatedName
   where
     size =
       option auto $
@@ -20,13 +20,6 @@
           <> value 1
           <> showDefault
           <> help "Amount of connections in the pool"
-    timeout =
-      fmap fromIntegral $
-        option auto $
-          long (updatedName "pool-timeout")
-            <> value 10
-            <> showDefault
-            <> help "Amount of seconds for which the unused connections are kept open"
 
 -- | Given a function, which updates the long names produces a parser
 -- of @Hasql.Connection.'A.Settings'@.