From cfe36707d9d022c2959940566cc03353ea7e3238 Mon Sep 17 00:00:00 2001 From: Adrien Duclos Date: Fri, 22 Jan 2021 13:04:50 +0100 Subject: Bump the LTS to 16.31 --- src/Squeal/PostgreSQL/Hspec.hs | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'src') diff --git a/src/Squeal/PostgreSQL/Hspec.hs b/src/Squeal/PostgreSQL/Hspec.hs index 32ab189..7e78fa7 100644 --- a/src/Squeal/PostgreSQL/Hspec.hs +++ b/src/Squeal/PostgreSQL/Hspec.hs @@ -24,8 +24,7 @@ import Control.Monad import Control.Monad.Base (liftBase) import Data.ByteString (ByteString) import qualified Data.ByteString.Char8 as BSC -import qualified Database.Postgres.Temp as Temp -import Generics.SOP (K) +import Database.Postgres.Temp as Temp import Squeal.PostgreSQL import System.Environment (lookupEnv) import Test.Hspec @@ -53,8 +52,8 @@ getOrCreateConnectionString = do createTempDB :: IO (ByteString, Maybe Temp.DB) createTempDB = do - tempDB <- either throwIO return =<< Temp.startAndLogToTmp [] - let connectionString = BSC.pack (Temp.connectionString tempDB) + tempDB <- either throwIO return =<< Temp.start + let connectionString = Temp.toConnectionString tempDB pure (connectionString, Just tempDB) -- | Start a temporary @postgres@ process and create a pool of connections to it -- cgit v1.2.3