From 1da26cac98455568a4cc6b505caee4d110682a1b Mon Sep 17 00:00:00 2001 From: Ruslan Talpa Date: Mon, 28 Sep 2015 16:54:34 +0300 Subject: [PATCH] trying to make it work with ghc 7.8 (3) --- src/PostgREST/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/PostgREST/Main.hs b/src/PostgREST/Main.hs index 7af30e22e..f4d5c4787 100644 --- a/src/PostgREST/Main.hs +++ b/src/PostgREST/Main.hs @@ -91,7 +91,7 @@ main = do -- read the structure of the database -- read the structure of the database - let txParam = (Just (H.ReadCommitted, Just True)) + let txParam = Just (H.ReadCommitted, Just True) tblsRes <- H.session pool $ H.tx txParam alltables let allTables = either (fail . show) id tblsRes