@@ -387,13 +387,3 @@ instance FromJSON MandrillDate where
387 case timeParse defaultTimeLocale "%Y-%m-%d %I:%M:%S%Q" (T.unpack t) of
387 case timeParse defaultTimeLocale "%Y-%m-%d %I:%M:%S%Q" (T.unpack t) of
388 Just d -> pure $ MandrillDate d
388 Just d -> pure $ MandrillDate d
389 _ -> fail "could not parse Mandrill date"
389 _ -> fail "could not parse Mandrill date"
392−instance ToJSON TEV.EmailAddress where
393− toJSON = String . TL.decodeUtf8 . TEV.toByteString
395−instance FromJSON TEV.EmailAddress where
396− parseJSON (String s) = case TEV.emailAddress (TL.encodeUtf8 s) of