diff options
author | stuebinm | 2021-12-23 18:57:50 +0100 |
---|---|---|
committer | stuebinm | 2021-12-23 18:57:50 +0100 |
commit | dcdbec32d495fa5252f2c8a949edca547310e2f4 (patch) | |
tree | 8fea2525c2f7d67e9a9c6c69d04824d930e6a9b3 /lib/LintWriter.hs | |
parent | 8bd6cef9e3c77f6e2ffcba6c1a4be04f12a6e81a (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.hs | 4 |
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) |