diff options
Diffstat (limited to 'tiled/Data/Tiled.hs')
-rw-r--r-- | tiled/Data/Tiled.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tiled/Data/Tiled.hs b/tiled/Data/Tiled.hs index 99c5c9d..0c95e62 100644 --- a/tiled/Data/Tiled.hs +++ b/tiled/Data/Tiled.hs @@ -111,7 +111,7 @@ data Object = ObjectRectangle , objectHeight :: Maybe Double , objectEllipse :: Maybe Bool , objectPoint :: Maybe Bool - , objectType :: Text + , objectType :: Maybe Text } | ObjectPolygon { objectId :: Int @@ -124,7 +124,7 @@ data Object = ObjectRectangle , objectGid :: Maybe GlobalId , objectWidth :: Maybe Double , objectHeight :: Maybe Double - , objectType :: Text + , objectType :: Maybe Text , objectPolygon :: Vector Point } | ObjectPolyline @@ -138,7 +138,7 @@ data Object = ObjectRectangle , objectGid :: Maybe GlobalId , objectWidth :: Maybe Double , objectHeight :: Maybe Double - , objectType :: Text + , objectType :: Maybe Text , objectPolyline :: Vector Point } | ObjectText @@ -150,11 +150,11 @@ data Object = ObjectRectangle , objectY :: Double , objectRotation :: Double , objectGid :: Maybe GlobalId - , objectText :: A.Value + , objectText :: Maybe A.Value , objectWidth :: Maybe Double , objectHeight :: Maybe Double , objectEllipse :: Maybe Bool - , objectType :: Text + , objectType :: Maybe Text } deriving (Eq, Generic, Show, NFData) |