From 95c8d40010214cdf4e56ef9b1af5d58b93cb54ed Mon Sep 17 00:00:00 2001
From: Yitzchak Gale <yitzg@suite-sol.com>
Date: Wed, 3 Jun 2015 11:45:29 +0300
Subject: [PATCH] Fix haddock about default log level.

---
 yesod-core/Yesod/Core/Class/Yesod.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/yesod-core/Yesod/Core/Class/Yesod.hs b/yesod-core/Yesod/Core/Class/Yesod.hs
index 5e097387..0f76fb82 100644
--- a/yesod-core/Yesod/Core/Class/Yesod.hs
+++ b/yesod-core/Yesod/Core/Class/Yesod.hs
@@ -322,7 +322,7 @@ defaultMessageLoggerSource ckLoggable logger loc source level msg = do
         loggerPutStr logger
 
 -- | Default implementation of 'shouldLog'. Logs everything at or
--- above 'logLevel'.
+-- above 'LevelInfo'.
 defaultShouldLog :: LogSource -> LogLevel -> Bool
 defaultShouldLog _ level = level >= LevelInfo