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