From 5b3cb907078b6f628a6d07189d39634f0cdfd15d Mon Sep 17 00:00:00 2001
From: stuebinm <stuebinm@disroot.org>
Date: Thu, 16 Dec 2021 01:04:43 +0100
Subject: [PATCH] print list of maps in output json
---
lib/CheckDir.hs | 1 +
1 file changed, 1 insertion(+)
diff --git a/lib/CheckDir.hs b/lib/CheckDir.hs
index 1cfd753..f21fe9c 100644
--- a/lib/CheckDir.hs
+++ b/lib/CheckDir.hs
@@ -103,6 +103,7 @@ instance ToJSON DirResult where
, "resultText" .= prettyprint (Suggestion, res)
, "severity" .= maximumLintLevel res
, "badges" .= annotatedBadges
+ , "maps" .= M.keys (dirresultMaps res)
]
where annotatedBadges = concat
. M.elems
--
GitLab