diff --git a/Foundation.hs b/Foundation.hs
index 67f2865..9746a8d 100644
--- a/Foundation.hs
+++ b/Foundation.hs
@@ -139,6 +139,7 @@ instance Yesod App where
 
     -- What messages should be logged. The following includes all messages when
     -- in development, and warnings and errors in production.
+    shouldLog _ "CLEANUP" _ = False
     shouldLog _ source level =
         development || level == LevelWarn || level == LevelError || source == "CLEANUP"