diff --git a/Foundation.hs b/Foundation.hs index 659308c..fe14658 100755 --- a/Foundation.hs +++ b/Foundation.hs @@ -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