From 8bd6cef9e3c77f6e2ffcba6c1a4be04f12a6e81a Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Thu, 23 Dec 2021 18:34:54 +0100
Subject: limit output for frequent lints

it's now limited to just the first ten contexts, then an ellipsis
---
 lib/CheckDir.hs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'lib/CheckDir.hs')

diff --git a/lib/CheckDir.hs b/lib/CheckDir.hs
index f296ff3..21e51ea 100644
--- a/lib/CheckDir.hs
+++ b/lib/CheckDir.hs
@@ -99,7 +99,6 @@ instance ToJSON DirResult where
       , "mapLints" .= dirresultMaps res
       , "exitGraph" .= showDot (dirresultGraph res)
       ]
-    , "resultText" .= prettyprint (Suggestion, res)
     , "severity" .= maximumLintLevel res
     , "mapInfo" .= fmap (\tm -> A.object [ "badges" .= mapresultBadges tm ])
                         (dirresultMaps res)
-- 
cgit v1.2.3