summaryrefslogtreecommitdiff
path: root/tiled/Data/Tiled.hs
diff options
context:
space:
mode:
Diffstat (limited to 'tiled/Data/Tiled.hs')
-rw-r--r--tiled/Data/Tiled.hs10
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)