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/TiledAbstract.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/TiledAbstract.hs')
-rw-r--r-- | lib/TiledAbstract.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/TiledAbstract.hs b/lib/TiledAbstract.hs index 948a91a..6d58f46 100644 --- a/lib/TiledAbstract.hs +++ b/lib/TiledAbstract.hs @@ -6,8 +6,9 @@ import Data.Maybe (fromMaybe) import Data.Proxy (Proxy) import Data.Text (Text) import qualified Data.Vector as V -import Tiled (Layer (..), Property (..), PropertyValue (..), - Tile (..), Tiledmap (..), Tileset (..), Object(..)) +import Tiled (Layer (..), Object (..), Property (..), + PropertyValue (..), Tile (..), Tiledmap (..), + Tileset (..)) class HasProperties a where getProperties :: a -> [Property] |