hasql-optparse-applicative 0.3.0.9 → 0.4

raw patch · 2 files changed

+6/−13 lines, 2 filesdep ~hasql-poolPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: hasql-pool

API changes (from Hackage documentation)

Files

• hasql-optparse-applicative.cabal +2/−2
• library/Hasql/OptparseApplicative.hs +4/−11

@@ -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,     -- 

@@ -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'@.