pg-harness-server 0.3.1 → 0.4.0

raw patch · 2 files changed

+8/−7 lines, 2 files

Files

• pg-harness-server.cabal +1/−1
• src/Main.hs +7/−6

@@ -1,5 +1,5 @@ Name:                pg-harness-server-Version:             0.3.1+Version:             0.4.0 Synopsis:            REST service for creating temporary PostgreSQL databases Description:   REST service for conveniently creating temporary PostgreSQL databases

@@ -140,12 +140,13 @@         -- Create the temporary database.         lift $ mutex $ createTemporaryDatabase configuration databaseId         -- Return a string with the username/password and database name.-        text $ TL.pack $-          cfgTestUser configuration ++ ":" ++ cfgTestPassword configuration ++-          "@" ++-          cfgHost configuration ++ ":" ++ (show $ cfgPort configuration) ++-          "/" ++-          (unquotedIdentifier databaseId)+        text $ TL.unlines+          [ TL.pack $ cfgTestUser configuration+          , TL.pack $ cfgTestPassword configuration+          , TL.pack $ cfgHost configuration+          , TL.pack $ show $ cfgPort configuration+          , TL.pack $ unquotedIdentifier databaseId+          ]  main :: IO () main = do