summaryrefslogtreecommitdiff
path: root/lib/Properties.hs
diff options
context:
space:
mode:
authorstuebinm2022-03-06 16:28:05 +0100
committerstuebinm2022-03-19 20:00:02 +0100
commit5d8cbd7c9975ca1fb95fb332f7e27357cc18e982 (patch)
treee4a644a5fedf18fb418b58b8e1869416f2488298 /lib/Properties.hs
parent11417fc194673decbfcb6e8b7e3da0af203feff1 (diff)
make tiled stricter (and organise some imports)
Diffstat (limited to 'lib/Properties.hs')
-rw-r--r--lib/Properties.hs62
1 files changed, 31 insertions, 31 deletions
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)