gargoyle-postgresql-connect 0.1.0.1 → 0.1.0.2

raw patch · 3 files changed

+13/−8 lines, 3 filesdep ~bytestringdep ~resource-pool

Dependency ranges changed: bytestring, resource-pool

Files

• ChangeLog.md +4/−0
• gargoyle-postgresql-connect.cabal +6/−6
• src/Gargoyle/PostgreSQL/Connect.hs +3/−2

@@ -1,5 +1,9 @@ # Revision history for gargoyle-postgresql-connect +## 0.1.0.2++* Require resource-pool 0.4.*+ ## 0.1.0.1  * Add support for ghc 9.0.2

@@ -1,5 +1,5 @@ name:               gargoyle-postgresql-connect-version:            0.1.0.1+version:            0.1.0.2 author:             Obsidian Systems LLC maintainer:         maintainer@obsidian.systems copyright:          Copyright (C) 2019 Obsidian Systems LLC@@ -11,21 +11,21 @@ extra-source-files: ChangeLog.md category:           System description:        A convenience utility for connecting to a postgresql instance managed by gargoyle.-tested-with:        GHC ==8.6.5 || ==8.8.4 || ==8.10.7 || ==9.0.2+tested-with:        GHC ==8.6.5 || ==8.8.4 || ==8.10.7 || ==9.0.2 || ==9.8.2  library   exposed-modules:  Gargoyle.PostgreSQL.Connect   ghc-options:      -Wall   ghc-prof-options: -fprof-auto-exported   build-depends:-      base                     >=4.12  && <4.17-    , bytestring               >=0.10  && <0.12+      base                     >=4.12  && <4.20+    , bytestring               >=0.10  && <0.13     , directory                >=1.3   && <1.4     , gargoyle                 >=0.1.1.0 && < 0.2     , gargoyle-postgresql      >=0.2.0.1 && < 0.3     , gargoyle-postgresql-nix  >=0.3.0.0 && < 0.4-    , postgresql-simple        >=0.5   && <0.7-    , resource-pool            >=0.2.3+    , postgresql-simple        >=0.5   && <0.8+    , resource-pool            >=0.4 && <0.5    hs-source-dirs:   src   default-language: Haskell2010

@@ -1,9 +1,10 @@+{-# LANGUAGE TypeApplications #-} module Gargoyle.PostgreSQL.Connect (withDb, withDb', openDb) where  import Control.Monad ((>=>)) import Data.ByteString (ByteString) import qualified Data.ByteString.Char8 as C8-import Data.Pool (Pool, createPool)+import Data.Pool (Pool, defaultPoolConfig, newPool, setNumStripes) import Database.PostgreSQL.Simple (Connection, close, connectPostgreSQL) import Gargoyle (withGargoyle) import Gargoyle.PostgreSQL.Nix (postgresNix)@@ -17,7 +18,7 @@  -- | Convert a connection string into a connection 'Pool'. openDb :: ByteString -> IO (Pool Connection)-openDb dbUri = createPool (connectPostgreSQL dbUri) close 1 5 20+openDb dbUri = newPool $ setNumStripes (Just 1) $ defaultPoolConfig (connectPostgreSQL dbUri) close (realToFrac @Int 5) 20  -- | Connects to a database using information at the given filepath. -- The given filepath can be either a folder (for a local db)