From e70ceee20ea8f064264f724e8390288ef2cb1017 Mon Sep 17 00:00:00 2001 From: stuebinm Date: Tue, 11 Oct 2022 13:41:30 +0200 Subject: code formatter --- tiled/Data/Tiled.hs | 8 ++++---- tiled/Data/Tiled/Abstract.hs | 6 +++--- tiled/Data/Tiled/TH.hs | 6 +++--- 3 files changed, 10 insertions(+), 10 deletions(-) (limited to 'tiled') diff --git a/tiled/Data/Tiled.hs b/tiled/Data/Tiled.hs index 4372a97..9256375 100644 --- a/tiled/Data/Tiled.hs +++ b/tiled/Data/Tiled.hs @@ -22,11 +22,11 @@ module Data.Tiled where import Universum -import Data.Aeson hiding (Object) -import qualified Data.Aeson as A -import Data.Aeson.Types (typeMismatch) -import Data.Aeson.TH (deriveJSON) import Control.Exception (IOException) +import Data.Aeson hiding (Object) +import qualified Data.Aeson as A +import Data.Aeson.TH (deriveJSON) +import Data.Aeson.Types (typeMismatch) import Data.Tiled.TH diff --git a/tiled/Data/Tiled/Abstract.hs b/tiled/Data/Tiled/Abstract.hs index 29e9022..2db749c 100644 --- a/tiled/Data/Tiled/Abstract.hs +++ b/tiled/Data/Tiled/Abstract.hs @@ -4,9 +4,9 @@ module Data.Tiled.Abstract where import Universum -import Data.Tiled (GlobalId (..), Layer (..), Object (..), Property (..), - PropertyValue (..), Tile (..), Tiledmap (..), - Tileset (..)) +import Data.Tiled (GlobalId (..), Layer (..), Object (..), + Property (..), PropertyValue (..), Tile (..), + Tiledmap (..), Tileset (..)) import qualified Data.Vector as V class HasProperties a where diff --git a/tiled/Data/Tiled/TH.hs b/tiled/Data/Tiled/TH.hs index e0ad0e8..c6b346c 100644 --- a/tiled/Data/Tiled/TH.hs +++ b/tiled/Data/Tiled/TH.hs @@ -1,9 +1,9 @@ module Data.Tiled.TH where -import Universum +import Universum -import qualified Data.Aeson.TH as TH -import Data.Char (toLower) +import qualified Data.Aeson.TH as TH +import Data.Char (toLower) aesonOptions :: Int -> TH.Options aesonOptions l = TH.defaultOptions -- cgit v1.2.3