From 9ccf7e2c02ad003c4a6907ee026304a936a956b3 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Thu, 16 Dec 2021 01:04:43 +0100
Subject: 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 5ad195f..3336ff9 100644
--- a/lib/CheckDir.hs
+++ b/lib/CheckDir.hs
@@ -96,6 +96,7 @@ instance ToJSON DirResult where
     , "resultText" .= prettyprint (Suggestion, res)
     , "severity" .= maximumLintLevel res
     , "badges" .= annotatedBadges
+    , "maps" .= M.keys (dirresultMaps res)
     ]
     where annotatedBadges = concat
             . M.elems
-- 
cgit v1.2.3