瀏覽代碼

* ah… stupid PG connection string

Saurabh Nanda 9 年之前
父節點
當前提交
f042823247
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      frameworks/Haskell/yesod-postgres/bench/src/Main.hs

+ 1 - 1
frameworks/Haskell/yesod-postgres/bench/src/Main.hs

@@ -304,7 +304,7 @@ getPlaintextR = return "Hello, World!"
 main :: IO ()
 main = R.withSystemRandom $ \gen -> do
     [cores, host] <- getArgs
-    let connString = ("host=" ++ host ++ "port=5432 user=benchmarkdbuser password=benchmarkdbpass dbname=hello_world") 
+    let connString = ("host=" ++ host ++ " port=5432 user=benchmarkdbuser password=benchmarkdbpass dbname=hello_world") 
     dbPool <- runNoLoggingT $ Pg.createPostgresqlPool (C8.pack connString) 256
     app <- toWaiAppPlain App
         { appGen = gen