disable strange logging

2018-03-19 21:57:42 +01:00 · 2018-03-19 21:57:42 +01:00 · 923b3cdd82
commit 923b3cdd82
parent c4b39076b8
1 changed files with 4 additions and 4 deletions
--- 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