summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/CheckDir.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/CheckDir.hs b/lib/CheckDir.hs
index 61ac81c..3901336 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