@@ -55,14 +55,14 @@ _Default = iso f Just
5555 f (Just x) = x
5656 f Nothing = mempty
5757
58−data Time = Time Text
59− deriving (Eq, Ord, Show, Read, Generic, Data, Typeable, ToText, FromText)
58+newtype Time = Time Text
59+ deriving (Eq, Ord, Show, Read, Generic, Newtype, Typeable, ToText, FromText)
6060
61−data Date = Date Text
62− deriving (Eq, Ord, Show, Read, Generic, Data, Typeable, ToText, FromText)
61+newtype Date = Date Text
62+ deriving (Eq, Ord, Show, Read, Generic, Newtype, Typeable, ToText, FromText)
6363
64−data DateTime = DateTime Text
65− deriving (Eq, Ord, Show, Read, Generic, Data, Typeable, ToText, FromText)
64+newtype DateTime = DateTime Text
65+ deriving (Eq, Ord, Show, Read, Generic, Newtype, Typeable, ToText, FromText)
6666
6767data AltJSON = AltJSON
6868 deriving (Eq, Ord, Show, Read, Generic, Data, Typeable)