Allow created_at field to be null

toddmohney · phadej · commit e870a84ea439 · 2019-05-30T21:38:46.000+03:00
diff --git a/src/GitHub/Data/PublicSSHKeys.hs b/src/GitHub/Data/PublicSSHKeys.hs
@@ -27,7 +27,7 @@ data PublicSSHKey = PublicSSHKey
     , publicSSHKeyUrl       :: !URL
     , publicSSHKeyTitle     :: !Text
     , publicSSHKeyVerified  :: !Bool
-    , publicSSHKeyCreatedAt :: !UTCTime
+    , publicSSHKeyCreatedAt :: !(Maybe UTCTime)
     , publicSSHKeyReadOnly  :: !Bool
     }
   deriving (Show, Data, Typeable, Eq, Ord, Generic)
@@ -39,7 +39,7 @@ instance FromJSON PublicSSHKey where
         <*> o .: "url"
         <*> o .: "title"
         <*> o .: "verified"
-        <*> o .: "created_at"
+        <*> o .:? "created_at"
         <*> o .: "read_only"
 
 data NewPublicSSHKey = NewPublicSSHKey
