From 77d1f4ce4eb3ba40d884cc4ed7fa693e16538c8d Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Sat, 18 Sep 2021 01:34:36 +0200
Subject: type check properties

/finally/ figured out that all properties just look like {name, value,
type} so now that's abstracted away and Properties.hs doesn't look like
javascript anymore
---
 lib/LintWriter.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/LintWriter.hs')

diff --git a/lib/LintWriter.hs b/lib/LintWriter.hs
index 10c727d..09a2297 100644
--- a/lib/LintWriter.hs
+++ b/lib/LintWriter.hs
@@ -23,8 +23,8 @@ data Level = Warning | Suggestion | Info | Forbidden | Error | Fatal
 -- | a hint comes with an explanation (and a level)
 data Hint = Hint
   { hintLevel :: Level
-  , hintMsg   :: Text }
-  deriving (Generic, ToJSON)
+  , hintMsg   :: Text
+  } deriving (Generic, ToJSON)
 
 instance PrettyPrint Hint where
   prettyprint Hint { hintMsg, hintLevel } =
-- 
cgit v1.2.3