[ debug ] remove max from log

Users should be allowed to de-escalate the level of detail they're
getting.
This commit is contained in:
Guillaume ALLAIS 2020-12-10 14:27:02 +00:00
parent 5de647cc3f
commit 0a685f8d2c

View File

@ -116,7 +116,7 @@ defaultLogLevel = singleton [] 0
export
insertLogLevel : LogLevel -> LogLevels -> LogLevels
insertLogLevel (MkLogLevel ps n) = insertWith ps (maybe n (max n))
insertLogLevel (MkLogLevel ps n) = insert ps n
----------------------------------------------------------------------------------
-- CHECKING WHETHER TO LOG