flip app args

This commit is contained in:
Adam C. Baker
2014-10-10 15:54:05 -07:00
parent 94e0a4b96a
commit 0879ed7110
3 changed files with 5 additions and 5 deletions
+1 -1
View File
@@ -41,7 +41,7 @@ main = do
Prelude.putStrLn $ "Listening on port " ++ (show $ configPort conf :: String)
conn <- connectPostgreSQL' dburi
runTLS tls settings $ gzip def $ cors corsPolicy $ reportPgErrors $ app conn (cs $ configAnonRole conf)
runTLS tls settings $ gzip def $ cors corsPolicy $ reportPgErrors $ app (cs $ configAnonRole conf) conn
where
describe = progDesc "create a REST API to an existing Postgres database"