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/TiledAbstract.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/TiledAbstract.hs')

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]
-- 
cgit v1.2.3