From 5d8cbd7c9975ca1fb95fb332f7e27357cc18e982 Mon Sep 17 00:00:00 2001
From: stuebinm
Date: Sun, 6 Mar 2022 16:28:05 +0100
Subject: make tiled stricter (and organise some imports)

---
 lib/Properties.hs | 62 +++++++++++++++++++++++++++----------------------------
 1 file changed, 31 insertions(+), 31 deletions(-)

(limited to 'lib/Properties.hs')

diff --git a/lib/Properties.hs b/lib/Properties.hs
index 846430b..3100b3a 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -13,37 +13,37 @@
 -- | Contains checks for custom ties of the map json
 module Properties (checkMap, checkTileset, checkLayer) where
 
-import           Universum         hiding (intercalate, isPrefixOf)
-
-import           Data.Text         (intercalate, isInfixOf, isPrefixOf)
-import qualified Data.Text         as T
-import qualified Data.Vector       as V
-import           Data.Tiled             (Layer (..), Object (..), Property (..),
-                                    PropertyValue (..), Tile (..),
-                                    Tiledmap (..), Tileset (..))
-import           Data.Tiled.Abstract     (HasName (..), HasProperties (..),
-                                    HasTypeName (..), IsProperty (..), HasData (..))
-import           Util              (layerIsEmpty, mkProxy, naiveEscapeHTML,
-                                    prettyprint)
-
-import           Badges            (Badge (Badge),
-                                    BadgeArea (BadgePoint, BadgeRect),
-                                    BadgeToken, parseToken)
-import           Data.List         ((\\))
-import qualified Data.Set          as S
-import           Data.Text.Metrics (damerauLevenshtein)
-import           GHC.TypeLits      (KnownSymbol)
-import           LayerData         (Collision, layerOverlaps)
-import           LintConfig        (LintConfig (..))
-import           LintWriter        (LintWriter, adjust, askContext,
-                                    askFileDepth, complain, dependsOn, forbid,
-                                    lintConfig, offersBadge, offersEntrypoint,
-                                    suggest, warn, zoom)
-import           Paths             (PathResult (..), RelPath (..), getExtension,
-                                    isOldStyle, parsePath)
-import           Types             (Dep (Link, Local, LocalMap, MapLink))
-import           Uris              (SubstError (..), applySubsts, extractDomain,
-                                    parseUri)
+import           Universum           hiding (intercalate, isPrefixOf)
+
+import           Data.Text           (intercalate, isInfixOf, isPrefixOf)
+import qualified Data.Text           as T
+import           Data.Tiled          (Layer (..), Object (..), Property (..),
+                                      PropertyValue (..), Tile (..),
+                                      Tiledmap (..), Tileset (..))
+import           Data.Tiled.Abstract (HasName (..), HasProperties (..),
+                                      HasTypeName (..), IsProperty (..))
+import qualified Data.Vector         as V
+import           Util                (layerIsEmpty, mkProxy, naiveEscapeHTML,
+                                      prettyprint)
+
+import           Badges              (Badge (Badge),
+                                      BadgeArea (BadgePoint, BadgeRect),
+                                      BadgeToken, parseToken)
+import           Data.List           ((\\))
+import qualified Data.Set            as S
+import           Data.Text.Metrics   (damerauLevenshtein)
+import           GHC.TypeLits        (KnownSymbol)
+import           LayerData           (Collision, layerOverlaps)
+import           LintConfig          (LintConfig (..))
+import           LintWriter          (LintWriter, adjust, askContext,
+                                      askFileDepth, complain, dependsOn, forbid,
+                                      lintConfig, offersBadge, offersEntrypoint,
+                                      suggest, warn, zoom)
+import           Paths               (PathResult (..), RelPath (..),
+                                      getExtension, isOldStyle, parsePath)
+import           Types               (Dep (Link, Local, LocalMap, MapLink))
+import           Uris                (SubstError (..), applySubsts,
+                                      extractDomain, parseUri)
 
 
 
-- 
cgit v1.2.3