haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Removes use of deprecated logHandleDev.

Browse Source
This commit is contained in:
Bryan Richter 2012-01-26 21:40:31 -08:00
parent 60faea0aba
commit 9290a11ab2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod/scaffold/Application.hs.cg
View File

@ -13,7 +13,7 @@ import Yesod.Default.Main
import Yesod.Default.Handlers import Yesod.Default.Handlers
#if DEVELOPMENT #if DEVELOPMENT
import Yesod.Logger (Logger, logBS) import Yesod.Logger (Logger, logBS)
import Network.Wai.Middleware.RequestLogger (logHandleDev) import Network.Wai.Middleware.RequestLogger (logCallbackDev)
#else #else
import Yesod.Logger (Logger, logBS, toProduction) import Yesod.Logger (Logger, logBS, toProduction)
import Network.Wai.Middleware.RequestLogger (logHandle) import Network.Wai.Middleware.RequestLogger (logHandle)
@ -46,7 +46,7 @@ getApplication conf logger = do
return $ logWare app return $ logWare app
where where
#ifdef DEVELOPMENT #ifdef DEVELOPMENT
logWare = logHandleDev (logBS setLogger) logWare = logCallbackDev (logBS setLogger)
setLogger = logger setLogger = logger
#else #else
setLogger = toProduction logger -- by default the logger is set for development setLogger = toProduction logger -- by default the logger is set for development