amazonka-support 0.2.1 → 0.2.2

raw patch · 16 files changed

+46/−46 lines, 16 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/AddAttachmentsToSet.hs +2/−2
• gen/Network/AWS/Support/AddCommunicationToCase.hs +2/−2
• gen/Network/AWS/Support/CreateCase.hs +2/−2
• gen/Network/AWS/Support/DescribeAttachment.hs +2/−2
• gen/Network/AWS/Support/DescribeCases.hs +2/−2
• gen/Network/AWS/Support/DescribeCommunications.hs +2/−2
• gen/Network/AWS/Support/DescribeServices.hs +2/−2
• gen/Network/AWS/Support/DescribeSeverityLevels.hs +2/−2
• gen/Network/AWS/Support/DescribeTrustedAdvisorCheckRefreshStatuses.hs +2/−2
• gen/Network/AWS/Support/DescribeTrustedAdvisorCheckResult.hs +2/−2
• gen/Network/AWS/Support/DescribeTrustedAdvisorCheckSummaries.hs +2/−2
• gen/Network/AWS/Support/DescribeTrustedAdvisorChecks.hs +2/−2
• gen/Network/AWS/Support/RefreshTrustedAdvisorCheck.hs +2/−2
• gen/Network/AWS/Support/ResolveCase.hs +2/−2
• gen/Network/AWS/Support/Types.hs +16/−16

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

@@ -61,7 +61,7 @@ data AddAttachmentsToSet = AddAttachmentsToSet     { _aatsAttachmentSetId :: Maybe Text     , _aatsAttachments     :: List "attachments" Attachment-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'AddAttachmentsToSet' constructor. --@@ -93,7 +93,7 @@ data AddAttachmentsToSetResponse = AddAttachmentsToSetResponse     { _aatsrAttachmentSetId :: Maybe Text     , _aatsrExpiryTime      :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'AddAttachmentsToSetResponse' constructor. --

@@ -61,7 +61,7 @@     , _actcCaseId            :: Maybe Text     , _actcCcEmailAddresses  :: List "ccEmailAddresses" Text     , _actcCommunicationBody :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'AddCommunicationToCase' constructor. --@@ -109,7 +109,7 @@  newtype AddCommunicationToCaseResponse = AddCommunicationToCaseResponse     { _actcrResult :: Maybe Bool-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'AddCommunicationToCaseResponse' constructor. --

@@ -92,7 +92,7 @@     , _ccServiceCode       :: Maybe Text     , _ccSeverityCode      :: Maybe Text     , _ccSubject           :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'CreateCase' constructor. --@@ -183,7 +183,7 @@  newtype CreateCaseResponse = CreateCaseResponse     { _ccrCaseId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateCaseResponse' constructor. --

@@ -52,7 +52,7 @@  newtype DescribeAttachment = DescribeAttachment     { _daAttachmentId :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DescribeAttachment' constructor. --@@ -72,7 +72,7 @@  newtype DescribeAttachmentResponse = DescribeAttachmentResponse     { _darAttachment :: Maybe Attachment-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeAttachmentResponse' constructor. --

@@ -78,7 +78,7 @@     , _dcLanguage              :: Maybe Text     , _dcMaxResults            :: Maybe Nat     , _dcNextToken             :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeCases' constructor. --@@ -162,7 +162,7 @@ data DescribeCasesResponse = DescribeCasesResponse     { _dcr1Cases     :: List "cases" CaseDetails     , _dcr1NextToken :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeCasesResponse' constructor. --

@@ -68,7 +68,7 @@     , _dc1CaseId     :: Text     , _dc1MaxResults :: Maybe Nat     , _dc1NextToken  :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeCommunications' constructor. --@@ -120,7 +120,7 @@ data DescribeCommunicationsResponse = DescribeCommunicationsResponse     { _dcrCommunications :: List "communications" Communication     , _dcrNextToken      :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeCommunicationsResponse' constructor. --

@@ -59,7 +59,7 @@ data DescribeServices = DescribeServices     { _dsLanguage        :: Maybe Text     , _dsServiceCodeList :: List "serviceCodeList" Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeServices' constructor. --@@ -89,7 +89,7 @@  newtype DescribeServicesResponse = DescribeServicesResponse     { _dsrServices :: List "services" SupportService-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeServicesResponse where     type Item DescribeServicesResponse = SupportService

@@ -51,7 +51,7 @@  newtype DescribeSeverityLevels = DescribeSeverityLevels     { _dslLanguage :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'DescribeSeverityLevels' constructor. --@@ -72,7 +72,7 @@  newtype DescribeSeverityLevelsResponse = DescribeSeverityLevelsResponse     { _dslrSeverityLevels :: List "severityLevels" SeverityLevel-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeSeverityLevelsResponse where     type Item DescribeSeverityLevelsResponse = SeverityLevel

@@ -50,7 +50,7 @@  newtype DescribeTrustedAdvisorCheckRefreshStatuses = DescribeTrustedAdvisorCheckRefreshStatuses     { _dtacrsCheckIds :: List "checkIds" Text-    } deriving (Eq, Ord, Show, Monoid, Semigroup)+    } deriving (Eq, Ord, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeTrustedAdvisorCheckRefreshStatuses where     type Item DescribeTrustedAdvisorCheckRefreshStatuses = Text@@ -75,7 +75,7 @@  newtype DescribeTrustedAdvisorCheckRefreshStatusesResponse = DescribeTrustedAdvisorCheckRefreshStatusesResponse     { _dtacrsrStatuses :: List "statuses" TrustedAdvisorCheckRefreshStatus-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeTrustedAdvisorCheckRefreshStatusesResponse where     type Item DescribeTrustedAdvisorCheckRefreshStatusesResponse = TrustedAdvisorCheckRefreshStatus

@@ -61,7 +61,7 @@ data DescribeTrustedAdvisorCheckResult = DescribeTrustedAdvisorCheckResult     { _dtacrCheckId  :: Text     , _dtacrLanguage :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeTrustedAdvisorCheckResult' constructor. --@@ -90,7 +90,7 @@  newtype DescribeTrustedAdvisorCheckResultResponse = DescribeTrustedAdvisorCheckResultResponse     { _dtacrrResult :: Maybe TrustedAdvisorCheckResult-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeTrustedAdvisorCheckResultResponse' constructor. --

@@ -52,7 +52,7 @@  newtype DescribeTrustedAdvisorCheckSummaries = DescribeTrustedAdvisorCheckSummaries     { _dtacsCheckIds :: List "checkIds" Text-    } deriving (Eq, Ord, Show, Monoid, Semigroup)+    } deriving (Eq, Ord, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeTrustedAdvisorCheckSummaries where     type Item DescribeTrustedAdvisorCheckSummaries = Text@@ -77,7 +77,7 @@  newtype DescribeTrustedAdvisorCheckSummariesResponse = DescribeTrustedAdvisorCheckSummariesResponse     { _dtacsrSummaries :: List "summaries" TrustedAdvisorCheckSummary-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeTrustedAdvisorCheckSummariesResponse where     type Item DescribeTrustedAdvisorCheckSummariesResponse = TrustedAdvisorCheckSummary

@@ -52,7 +52,7 @@  newtype DescribeTrustedAdvisorChecks = DescribeTrustedAdvisorChecks     { _dtacLanguage :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DescribeTrustedAdvisorChecks' constructor. --@@ -74,7 +74,7 @@  newtype DescribeTrustedAdvisorChecksResponse = DescribeTrustedAdvisorChecksResponse     { _dtacrChecks :: List "checks" TrustedAdvisorCheckDescription-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DescribeTrustedAdvisorChecksResponse where     type Item DescribeTrustedAdvisorChecksResponse = TrustedAdvisorCheckDescription

@@ -58,7 +58,7 @@  newtype RefreshTrustedAdvisorCheck = RefreshTrustedAdvisorCheck     { _rtacCheckId :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'RefreshTrustedAdvisorCheck' constructor. --@@ -78,7 +78,7 @@  newtype RefreshTrustedAdvisorCheckResponse = RefreshTrustedAdvisorCheckResponse     { _rtacrStatus :: TrustedAdvisorCheckRefreshStatus-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'RefreshTrustedAdvisorCheckResponse' constructor. --

@@ -51,7 +51,7 @@  newtype ResolveCase = ResolveCase     { _rcCaseId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ResolveCase' constructor. --@@ -72,7 +72,7 @@ data ResolveCaseResponse = ResolveCaseResponse     { _rcrFinalCaseStatus   :: Maybe Text     , _rcrInitialCaseStatus :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ResolveCaseResponse' constructor. --

@@ -207,7 +207,7 @@     , _tarsResourcesIgnored    :: Integer     , _tarsResourcesProcessed  :: Integer     , _tarsResourcesSuppressed :: Integer-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TrustedAdvisorResourcesSummary' constructor. --@@ -273,7 +273,7 @@  newtype TrustedAdvisorCategorySpecificSummary = TrustedAdvisorCategorySpecificSummary     { _tacssCostOptimizing :: Maybe TrustedAdvisorCostOptimizingSummary-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'TrustedAdvisorCategorySpecificSummary' constructor. --@@ -307,7 +307,7 @@     , _cCaseId        :: Maybe Text     , _cSubmittedBy   :: Maybe Text     , _cTimeCreated   :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'Communication' constructor. --@@ -373,7 +373,7 @@ data Category = Category     { _cCode :: Maybe Text     , _cName :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'Category' constructor. --@@ -415,7 +415,7 @@     , _tacsResourcesSummary        :: TrustedAdvisorResourcesSummary     , _tacsStatus                  :: Text     , _tacsTimestamp               :: Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'TrustedAdvisorCheckSummary' constructor. --@@ -499,7 +499,7 @@ data AttachmentDetails = AttachmentDetails     { _adAttachmentId :: Maybe Text     , _adFileName     :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'AttachmentDetails' constructor. --@@ -541,7 +541,7 @@     , _tacrResourcesSummary        :: TrustedAdvisorResourcesSummary     , _tacrStatus                  :: Text     , _tacrTimestamp               :: Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'TrustedAdvisorCheckResult' constructor. --@@ -629,7 +629,7 @@     , _tacdId          :: Text     , _tacdMetadata    :: List "metadata" Text     , _tacdName        :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TrustedAdvisorCheckDescription' constructor. --@@ -703,7 +703,7 @@ data Attachment = Attachment     { _aData     :: Maybe Base64     , _aFileName :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'Attachment' constructor. --@@ -741,7 +741,7 @@ data RecentCaseCommunications = RecentCaseCommunications     { _rccCommunications :: List "communications" Communication     , _rccNextToken      :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'RecentCaseCommunications' constructor. --@@ -782,7 +782,7 @@     { _ssCategories :: List "categories" Category     , _ssCode       :: Maybe Text     , _ssName       :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'SupportService' constructor. --@@ -835,7 +835,7 @@     , _tardRegion       :: Text     , _tardResourceId   :: Text     , _tardStatus       :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TrustedAdvisorResourceDetail' constructor. --@@ -908,7 +908,7 @@ data TrustedAdvisorCostOptimizingSummary = TrustedAdvisorCostOptimizingSummary     { _tacosEstimatedMonthlySavings        :: Double     , _tacosEstimatedPercentMonthlySavings :: Double-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TrustedAdvisorCostOptimizingSummary' constructor. --@@ -954,7 +954,7 @@ data SeverityLevel = SeverityLevel     { _slCode :: Maybe Text     , _slName :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'SeverityLevel' constructor. --@@ -1003,7 +1003,7 @@     , _cdSubject              :: Maybe Text     , _cdSubmittedBy          :: Maybe Text     , _cdTimeCreated          :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'CaseDetails' constructor. --@@ -1141,7 +1141,7 @@     { _tacrsCheckId                    :: Text     , _tacrsMillisUntilNextRefreshable :: Integer     , _tacrsStatus                     :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TrustedAdvisorCheckRefreshStatus' constructor. --