From dcdbec32d495fa5252f2c8a949edca547310e2f4 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Thu, 23 Dec 2021 18:57:50 +0100
Subject: add suggestions for misspelled properties

(suggestions are shown only if they have a Damerau-Levenshtein distance
<= 4, which seems to yield reasonably good results)
---
 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 bc2decf..fa8207b 100644
--- a/lib/LintWriter.hs
+++ b/lib/LintWriter.hs
@@ -44,9 +44,9 @@ module LintWriter
 import           Data.Text                  (Text)
 
 import           Badges                     (Badge)
-import           Control.Monad.State        (StateT, modify, MonadState (put))
+import           Control.Monad.State        (MonadState (put), StateT, modify)
 import           Control.Monad.Trans.Reader (Reader, asks, runReader)
-import           Control.Monad.Trans.State  (runStateT, get)
+import           Control.Monad.Trans.State  (get, runStateT)
 import           Control.Monad.Writer.Lazy  (lift)
 import           Data.Bifunctor             (Bifunctor (second))
 import           Data.Map                   (Map, fromListWith)
-- 
cgit v1.2.3