[scaffold] fix typo in setLogger definition

This commit is contained in:
Patrick Palka 2012-04-09 11:13:28 -04:00
parent 78be263e02
commit 7ce991d9cb

View File

@ -35,7 +35,7 @@ makeApplication conf logger = do
where
(logWare, setLogger)
| development = (logCallbackDev (logBS setLogger), logger)
| production = (logCallback (logBS setLogger), logger)
| production = (logCallback (logBS setLogger), toProduction logger)
makeFoundation :: AppConfig DefaultEnv Extra -> Logger -> IO ~sitearg~
makeFoundation conf setLogger = do