diff --git a/lib/CheckDir.hs b/lib/CheckDir.hs
index 61ac81cf659300b4caacb8e0b5b416f8415ece69..39013368322b293942503bd810dcf4c5e7db3e4a 100644
--- a/lib/CheckDir.hs
+++ b/lib/CheckDir.hs
@@ -72,7 +72,7 @@ resultIsFatal config res =
 -- note that it really does go through all lints, so don't
 -- call it too often
 maximumLintLevel :: DirResult -> Level
-maximumLintLevel = maximum
+maximumLintLevel = (\t -> if null t then Info else maximum t)
   . map hintLevel
   . concatMap (keys . mapresultLayer)
   . elems