use setLogger

This commit is contained in:
gregwebs 2012-03-30 09:12:27 -07:00
parent 65b085e568
commit 0c6a319ae6

View File

@ -34,7 +34,7 @@ mkYesodDispatch "~sitearg~" resources~sitearg~
-- migrations handled by Yesod.
makeApplication :: AppConfig DefaultEnv Extra -> Logger -> IO Application
makeApplication conf logger = do
foundation <- makeFoundation conf logger
foundation <- makeFoundation conf setLogger
app <- toWaiAppPlain foundation
return $ logWare app
where