disable strange logging

This commit is contained in:
nek0 2018-03-19 21:57:42 +01:00
parent c4b39076b8
commit 923b3cdd82
1 changed files with 4 additions and 4 deletions

View File

@ -210,10 +210,10 @@ instance Yesod App where
-- What messages should be logged. The following includes all messages when
-- in development, and warnings and errors in production.
shouldLog app _source level =
appShouldLogAll (appSettings app)
|| level == LevelWarn
|| level == LevelError
-- shouldLog app _source level =
-- appShouldLogAll (appSettings app)
-- || level == LevelWarn
-- || level == LevelError
makeLogger = return . appLogger