amazonka-support 0.0.6 → 0.0.7

raw patch · 9 files changed

+16/−16 lines, 9 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-support.cabal +2/−2
• gen/Network/AWS/Support/DescribeCases.hs +1/−1
• gen/Network/AWS/Support/DescribeCommunications.hs +1/−1
• gen/Network/AWS/Support/DescribeServices.hs +1/−1
• gen/Network/AWS/Support/DescribeSeverityLevels.hs +1/−1
• gen/Network/AWS/Support/DescribeTrustedAdvisorCheckRefreshStatuses.hs +1/−1
• gen/Network/AWS/Support/DescribeTrustedAdvisorCheckSummaries.hs +1/−1
• gen/Network/AWS/Support/DescribeTrustedAdvisorChecks.hs +1/−1
• gen/Network/AWS/Support/Types.hs +7/−7

@@ -1,5 +1,5 @@ name:                  amazonka-support-version:               0.0.6+version:               0.0.7 synopsis:              Amazon Support SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -60,5 +60,5 @@     other-modules:      build-depends:-          amazonka-core == 0.0.6.*+          amazonka-core == 0.0.7.*         , base          >= 4.7     && < 5

@@ -215,7 +215,7 @@  instance FromJSON DescribeCasesResponse where     parseJSON = withObject "DescribeCasesResponse" $ \o -> DescribeCasesResponse-        <$> o .:  "cases"+        <$> o .:? "cases" .!= mempty         <*> o .:? "nextToken"  instance AWSPager DescribeCases where

@@ -172,7 +172,7 @@  instance FromJSON DescribeCommunicationsResponse where     parseJSON = withObject "DescribeCommunicationsResponse" $ \o -> DescribeCommunicationsResponse-        <$> o .:  "communications"+        <$> o .:? "communications" .!= mempty         <*> o .:? "nextToken"  instance AWSPager DescribeCommunications where

@@ -135,4 +135,4 @@  instance FromJSON DescribeServicesResponse where     parseJSON = withObject "DescribeServicesResponse" $ \o -> DescribeServicesResponse-        <$> o .:  "services"+        <$> o .:? "services" .!= mempty

@@ -120,4 +120,4 @@  instance FromJSON DescribeSeverityLevelsResponse where     parseJSON = withObject "DescribeSeverityLevelsResponse" $ \o -> DescribeSeverityLevelsResponse-        <$> o .:  "severityLevels"+        <$> o .:? "severityLevels" .!= mempty

@@ -120,4 +120,4 @@  instance FromJSON DescribeTrustedAdvisorCheckRefreshStatusesResponse where     parseJSON = withObject "DescribeTrustedAdvisorCheckRefreshStatusesResponse" $ \o -> DescribeTrustedAdvisorCheckRefreshStatusesResponse-        <$> o .:  "statuses"+        <$> o .:? "statuses" .!= mempty

@@ -122,4 +122,4 @@  instance FromJSON DescribeTrustedAdvisorCheckSummariesResponse where     parseJSON = withObject "DescribeTrustedAdvisorCheckSummariesResponse" $ \o -> DescribeTrustedAdvisorCheckSummariesResponse-        <$> o .:  "summaries"+        <$> o .:? "summaries" .!= mempty

@@ -119,4 +119,4 @@  instance FromJSON DescribeTrustedAdvisorChecksResponse where     parseJSON = withObject "DescribeTrustedAdvisorChecksResponse" $ \o -> DescribeTrustedAdvisorChecksResponse-        <$> o .:  "checks"+        <$> o .:? "checks" .!= mempty

@@ -332,7 +332,7 @@  instance FromJSON Communication where     parseJSON = withObject "Communication" $ \o -> Communication-        <$> o .:  "attachmentSet"+        <$> o .:? "attachmentSet" .!= mempty         <*> o .:? "body"         <*> o .:? "caseId"         <*> o .:? "submittedBy"@@ -585,7 +585,7 @@     parseJSON = withObject "TrustedAdvisorCheckResult" $ \o -> TrustedAdvisorCheckResult         <$> o .:  "categorySpecificSummary"         <*> o .:  "checkId"-        <*> o .:  "flaggedResources"+        <*> o .:? "flaggedResources" .!= mempty         <*> o .:  "resourcesSummary"         <*> o .:  "status"         <*> o .:  "timestamp"@@ -665,7 +665,7 @@         <$> o .:  "category"         <*> o .:  "description"         <*> o .:  "id"-        <*> o .:  "metadata"+        <*> o .:? "metadata" .!= mempty         <*> o .:  "name"  instance ToJSON TrustedAdvisorCheckDescription where@@ -746,7 +746,7 @@  instance FromJSON RecentCaseCommunications where     parseJSON = withObject "RecentCaseCommunications" $ \o -> RecentCaseCommunications-        <$> o .:  "communications"+        <$> o .:? "communications" .!= mempty         <*> o .:? "nextToken"  instance ToJSON RecentCaseCommunications where@@ -795,7 +795,7 @@  instance FromJSON SupportService where     parseJSON = withObject "SupportService" $ \o -> SupportService-        <$> o .:  "categories"+        <$> o .:? "categories" .!= mempty         <*> o .:? "code"         <*> o .:? "name" @@ -868,7 +868,7 @@ instance FromJSON TrustedAdvisorResourceDetail where     parseJSON = withObject "TrustedAdvisorResourceDetail" $ \o -> TrustedAdvisorResourceDetail         <$> o .:? "isSuppressed"-        <*> o .:  "metadata"+        <*> o .:? "metadata" .!= mempty         <*> o .:  "region"         <*> o .:  "resourceId"         <*> o .:  "status"@@ -1087,7 +1087,7 @@     parseJSON = withObject "CaseDetails" $ \o -> CaseDetails         <$> o .:? "caseId"         <*> o .:? "categoryCode"-        <*> o .:  "ccEmailAddresses"+        <*> o .:? "ccEmailAddresses" .!= mempty         <*> o .:? "displayId"         <*> o .:? "language"         <*> o .:? "recentCommunications"