use setLogger
This commit is contained in:
parent
65b085e568
commit
0c6a319ae6
@ -34,7 +34,7 @@ mkYesodDispatch "~sitearg~" resources~sitearg~
|
|||||||
-- migrations handled by Yesod.
|
-- migrations handled by Yesod.
|
||||||
makeApplication :: AppConfig DefaultEnv Extra -> Logger -> IO Application
|
makeApplication :: AppConfig DefaultEnv Extra -> Logger -> IO Application
|
||||||
makeApplication conf logger = do
|
makeApplication conf logger = do
|
||||||
foundation <- makeFoundation conf logger
|
foundation <- makeFoundation conf setLogger
|
||||||
app <- toWaiAppPlain foundation
|
app <- toWaiAppPlain foundation
|
||||||
return $ logWare app
|
return $ logWare app
|
||||||
where
|
where
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user