summaryrefslogtreecommitdiff
path: root/lib/LintWriter.hs
diff options
context:
space:
mode:
authorstuebinm2021-12-23 18:57:50 +0100
committerstuebinm2021-12-23 18:57:50 +0100
commitdcdbec32d495fa5252f2c8a949edca547310e2f4 (patch)
tree8fea2525c2f7d67e9a9c6c69d04824d930e6a9b3 /lib/LintWriter.hs
parent8bd6cef9e3c77f6e2ffcba6c1a4be04f12a6e81a (diff)
add suggestions for misspelled properties
(suggestions are shown only if they have a Damerau-Levenshtein distance <= 4, which seems to yield reasonably good results)
Diffstat (limited to 'lib/LintWriter.hs')
-rw-r--r--lib/LintWriter.hs4
1 files changed, 2 insertions, 2 deletions
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)