github-types 0.1.0.4 → 0.1.0.5

raw patch · 3 files changed

+6/−7 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- GitHub.Types.Repository: deploymentName :: Deployment -> Text

- GitHub.Types.Repository: Deployment :: Int -> Text -> Text -> Text -> Text -> Text -> Value -> Text -> Deployment

+ GitHub.Types.Repository: Deployment :: Int -> Text -> Text -> Text -> Text -> Value -> Text -> Deployment

github-types.cabal view

@@ -1,5 +1,5 @@ name:                github-types-version:             0.1.0.4+version:             0.1.0.5 license:             OtherLicense license-file:        LICENSE author:              Tomas Carnecky

src/GitHub/Types/Events.hs view

@@ -8,6 +8,7 @@  import Data.Aeson import Data.Aeson.Types+import Data.Monoid import Data.Text  import GitHub.Types.Base@@ -33,7 +34,7 @@ eventParser "commit_comment"    x = CommitCommentEventType    <$> parseJSON x eventParser "deployment"        x = DeploymentEventType       <$> parseJSON x eventParser "deployment_status" x = DeploymentStatusEventType <$> parseJSON x-eventParser _                   _ = mzero+eventParser eventType           _ = fail $ "Unknown event type: " <> unpack eventType   @@ -48,7 +49,7 @@     parseJSON (Object x) = CommitCommentEvent         <$> x .: "repository" -    parseJSON _ = mzero+    parseJSON _ = fail "CommitCommentEvent"   ------------------------------------------------------------------------------@@ -66,7 +67,7 @@         <$> x .: "deployment"         <*> x .: "repository" -    parseJSON _ = mzero+    parseJSON _ = fail "DeploymentEvent"   ------------------------------------------------------------------------------@@ -87,4 +88,4 @@         <*> x .: "deployment"         <*> x .: "repository" -    parseJSON _ = mzero+    parseJSON _ = fail "DeploymentStatusEvent"

src/GitHub/Types/Repository.hs view

@@ -34,7 +34,6 @@     , deploymentSha         :: Text     , deploymentRef         :: Text     , deploymentTask        :: Text-    , deploymentName        :: Text     , deploymentEnvironment :: Text     , deploymentPayload     :: Value     , deploymentDescription :: Text@@ -46,7 +45,6 @@         <*> x .: "sha"         <*> x .: "ref"         <*> x .: "task"-        <*> x .: "name"         <*> x .: "environment"         <*> x .: "payload"         <*> x .: "description"