amazonka-codedeploy 0.2.1 → 0.2.2

raw patch · 27 files changed

+83/−83 lines, 27 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-codedeploy.cabal +2/−2
• gen/Network/AWS/CodeDeploy/BatchGetApplications.hs +2/−2
• gen/Network/AWS/CodeDeploy/BatchGetDeployments.hs +2/−2
• gen/Network/AWS/CodeDeploy/CreateApplication.hs +2/−2
• gen/Network/AWS/CodeDeploy/CreateDeployment.hs +2/−2
• gen/Network/AWS/CodeDeploy/CreateDeploymentConfig.hs +2/−2
• gen/Network/AWS/CodeDeploy/CreateDeploymentGroup.hs +2/−2
• gen/Network/AWS/CodeDeploy/DeleteApplication.hs +2/−2
• gen/Network/AWS/CodeDeploy/DeleteDeploymentConfig.hs +2/−2
• gen/Network/AWS/CodeDeploy/DeleteDeploymentGroup.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetApplication.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetApplicationRevision.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetDeployment.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetDeploymentConfig.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetDeploymentGroup.hs +2/−2
• gen/Network/AWS/CodeDeploy/GetDeploymentInstance.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListApplicationRevisions.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListApplications.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListDeploymentConfigs.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListDeploymentGroups.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListDeploymentInstances.hs +2/−2
• gen/Network/AWS/CodeDeploy/ListDeployments.hs +2/−2
• gen/Network/AWS/CodeDeploy/RegisterApplicationRevision.hs +2/−2
• gen/Network/AWS/CodeDeploy/StopDeployment.hs +2/−2
• gen/Network/AWS/CodeDeploy/Types.hs +31/−31
• gen/Network/AWS/CodeDeploy/UpdateApplication.hs +2/−2
• gen/Network/AWS/CodeDeploy/UpdateDeploymentGroup.hs +2/−2

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

@@ -49,7 +49,7 @@  newtype BatchGetApplications = BatchGetApplications     { _bgaApplicationNames :: List "applicationNames" Text-    } deriving (Eq, Ord, Show, Monoid, Semigroup)+    } deriving (Eq, Ord, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList BatchGetApplications where     type Item BatchGetApplications = Text@@ -77,7 +77,7 @@  newtype BatchGetApplicationsResponse = BatchGetApplicationsResponse     { _bgarApplicationsInfo :: List "applicationsInfo" ApplicationInfo-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList BatchGetApplicationsResponse where     type Item BatchGetApplicationsResponse = ApplicationInfo

@@ -49,7 +49,7 @@  newtype BatchGetDeployments = BatchGetDeployments     { _bgdDeploymentIds :: List "deploymentIds" Text-    } deriving (Eq, Ord, Show, Monoid, Semigroup)+    } deriving (Eq, Ord, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList BatchGetDeployments where     type Item BatchGetDeployments = Text@@ -74,7 +74,7 @@  newtype BatchGetDeploymentsResponse = BatchGetDeploymentsResponse     { _bgdrDeploymentsInfo :: List "deploymentsInfo" DeploymentInfo-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList BatchGetDeploymentsResponse where     type Item BatchGetDeploymentsResponse = DeploymentInfo

@@ -49,7 +49,7 @@  newtype CreateApplication = CreateApplication     { _caApplicationName :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'CreateApplication' constructor. --@@ -71,7 +71,7 @@  newtype CreateApplicationResponse = CreateApplicationResponse     { _carApplicationId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateApplicationResponse' constructor. --

@@ -59,7 +59,7 @@     , _cdDescription                   :: Maybe Text     , _cdIgnoreApplicationStopFailures :: Maybe Bool     , _cdRevision                      :: Maybe RevisionLocation-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'CreateDeployment' constructor. --@@ -134,7 +134,7 @@  newtype CreateDeploymentResponse = CreateDeploymentResponse     { _cdrDeploymentId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateDeploymentResponse' constructor. --

@@ -51,7 +51,7 @@ data CreateDeploymentConfig = CreateDeploymentConfig     { _cdcDeploymentConfigName :: Text     , _cdcMinimumHealthyHosts  :: Maybe MinimumHealthyHosts-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'CreateDeploymentConfig' constructor. --@@ -95,7 +95,7 @@  newtype CreateDeploymentConfigResponse = CreateDeploymentConfigResponse     { _cdcrDeploymentConfigId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateDeploymentConfigResponse' constructor. --

@@ -59,7 +59,7 @@     , _cdgDeploymentGroupName  :: Text     , _cdgEc2TagFilters        :: List "ec2TagFilters" EC2TagFilter     , _cdgServiceRoleArn       :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'CreateDeploymentGroup' constructor. --@@ -151,7 +151,7 @@  newtype CreateDeploymentGroupResponse = CreateDeploymentGroupResponse     { _cdgrDeploymentGroupId :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateDeploymentGroupResponse' constructor. --

@@ -47,7 +47,7 @@  newtype DeleteApplication = DeleteApplication     { _daApplicationName :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteApplication' constructor. --@@ -68,7 +68,7 @@     lens _daApplicationName (\s a -> s { _daApplicationName = a })  data DeleteApplicationResponse = DeleteApplicationResponse-    deriving (Eq, Ord, Show, Generic)+    deriving (Eq, Ord, Read, Show, Generic)  -- | 'DeleteApplicationResponse' constructor. deleteApplicationResponse :: DeleteApplicationResponse

@@ -50,7 +50,7 @@  newtype DeleteDeploymentConfig = DeleteDeploymentConfig     { _ddcDeploymentConfigName :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteDeploymentConfig' constructor. --@@ -70,7 +70,7 @@     lens _ddcDeploymentConfigName (\s a -> s { _ddcDeploymentConfigName = a })  data DeleteDeploymentConfigResponse = DeleteDeploymentConfigResponse-    deriving (Eq, Ord, Show, Generic)+    deriving (Eq, Ord, Read, Show, Generic)  -- | 'DeleteDeploymentConfigResponse' constructor. deleteDeploymentConfigResponse :: DeleteDeploymentConfigResponse

@@ -51,7 +51,7 @@ data DeleteDeploymentGroup = DeleteDeploymentGroup     { _ddgApplicationName     :: Text     , _ddgDeploymentGroupName :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DeleteDeploymentGroup' constructor. --@@ -82,7 +82,7 @@  newtype DeleteDeploymentGroupResponse = DeleteDeploymentGroupResponse     { _ddgrHooksNotCleanedUp :: List "hooksNotCleanedUp" AutoScalingGroup-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList DeleteDeploymentGroupResponse where     type Item DeleteDeploymentGroupResponse = AutoScalingGroup

@@ -49,7 +49,7 @@  newtype GetApplication = GetApplication     { _gaApplicationName :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'GetApplication' constructor. --@@ -71,7 +71,7 @@  newtype GetApplicationResponse = GetApplicationResponse     { _garApplication :: Maybe ApplicationInfo-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetApplicationResponse' constructor. --

@@ -53,7 +53,7 @@ data GetApplicationRevision = GetApplicationRevision     { _garApplicationName :: Text     , _garRevision        :: RevisionLocation-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetApplicationRevision' constructor. --@@ -85,7 +85,7 @@     { _garrApplicationName :: Maybe Text     , _garrRevision        :: Maybe RevisionLocation     , _garrRevisionInfo    :: Maybe GenericRevisionInfo-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetApplicationRevisionResponse' constructor. --

@@ -49,7 +49,7 @@  newtype GetDeployment = GetDeployment     { _gdDeploymentId :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'GetDeployment' constructor. --@@ -69,7 +69,7 @@  newtype GetDeploymentResponse = GetDeploymentResponse     { _gdrDeploymentInfo :: Maybe DeploymentInfo-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetDeploymentResponse' constructor. --

@@ -49,7 +49,7 @@  newtype GetDeploymentConfig = GetDeploymentConfig     { _gdcDeploymentConfigName :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'GetDeploymentConfig' constructor. --@@ -70,7 +70,7 @@  newtype GetDeploymentConfigResponse = GetDeploymentConfigResponse     { _gdcrDeploymentConfigInfo :: Maybe DeploymentConfigInfo-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetDeploymentConfigResponse' constructor. --

@@ -51,7 +51,7 @@ data GetDeploymentGroup = GetDeploymentGroup     { _gdgApplicationName     :: Text     , _gdgDeploymentGroupName :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'GetDeploymentGroup' constructor. --@@ -82,7 +82,7 @@  newtype GetDeploymentGroupResponse = GetDeploymentGroupResponse     { _gdgrDeploymentGroupInfo :: Maybe DeploymentGroupInfo-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetDeploymentGroupResponse' constructor. --

@@ -51,7 +51,7 @@ data GetDeploymentInstance = GetDeploymentInstance     { _gdiDeploymentId :: Text     , _gdiInstanceId   :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'GetDeploymentInstance' constructor. --@@ -79,7 +79,7 @@  newtype GetDeploymentInstanceResponse = GetDeploymentInstanceResponse     { _gdirInstanceSummary :: Maybe InstanceSummary-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetDeploymentInstanceResponse' constructor. --

@@ -62,7 +62,7 @@     , _larS3KeyPrefix     :: Maybe Text     , _larSortBy          :: Maybe ApplicationRevisionSortBy     , _larSortOrder       :: Maybe SortOrder-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'ListApplicationRevisions' constructor. --@@ -148,7 +148,7 @@ data ListApplicationRevisionsResponse = ListApplicationRevisionsResponse     { _larrNextToken :: Maybe Text     , _larrRevisions :: List "revisions" RevisionLocation-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'ListApplicationRevisionsResponse' constructor. --

@@ -50,7 +50,7 @@  newtype ListApplications = ListApplications     { _laNextToken :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ListApplications' constructor. --@@ -71,7 +71,7 @@ data ListApplicationsResponse = ListApplicationsResponse     { _lar1Applications :: List "applications" Text     , _lar1NextToken    :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListApplicationsResponse' constructor. --

@@ -50,7 +50,7 @@  newtype ListDeploymentConfigs = ListDeploymentConfigs     { _ldcNextToken :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ListDeploymentConfigs' constructor. --@@ -72,7 +72,7 @@ data ListDeploymentConfigsResponse = ListDeploymentConfigsResponse     { _ldcrDeploymentConfigsList :: List "deploymentConfigsList" Text     , _ldcrNextToken             :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListDeploymentConfigsResponse' constructor. --

@@ -54,7 +54,7 @@ data ListDeploymentGroups = ListDeploymentGroups     { _ldgApplicationName :: Text     , _ldgNextToken       :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListDeploymentGroups' constructor. --@@ -87,7 +87,7 @@     { _ldgrApplicationName  :: Maybe Text     , _ldgrDeploymentGroups :: List "deploymentGroups" Text     , _ldgrNextToken        :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListDeploymentGroupsResponse' constructor. --

@@ -54,7 +54,7 @@     { _ldiDeploymentId         :: Text     , _ldiInstanceStatusFilter :: List "instanceStatusFilter" InstanceStatus     , _ldiNextToken            :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'ListDeploymentInstances' constructor. --@@ -101,7 +101,7 @@ data ListDeploymentInstancesResponse = ListDeploymentInstancesResponse     { _ldirInstancesList :: List "instancesList" Text     , _ldirNextToken     :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListDeploymentInstancesResponse' constructor. --

@@ -59,7 +59,7 @@     , _ldDeploymentGroupName :: Maybe Text     , _ldIncludeOnlyStatuses :: List "includeOnlyStatuses" DeploymentStatus     , _ldNextToken           :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'ListDeployments' constructor. --@@ -119,7 +119,7 @@ data ListDeploymentsResponse = ListDeploymentsResponse     { _ldrDeployments :: List "deployments" Text     , _ldrNextToken   :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListDeploymentsResponse' constructor. --

@@ -51,7 +51,7 @@     { _rarApplicationName :: Text     , _rarDescription     :: Maybe Text     , _rarRevision        :: RevisionLocation-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'RegisterApplicationRevision' constructor. --@@ -88,7 +88,7 @@ rarRevision = lens _rarRevision (\s a -> s { _rarRevision = a })  data RegisterApplicationRevisionResponse = RegisterApplicationRevisionResponse-    deriving (Eq, Ord, Show, Generic)+    deriving (Eq, Ord, Read, Show, Generic)  -- | 'RegisterApplicationRevisionResponse' constructor. registerApplicationRevisionResponse :: RegisterApplicationRevisionResponse

@@ -50,7 +50,7 @@  newtype StopDeployment = StopDeployment     { _sdDeploymentId :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'StopDeployment' constructor. --@@ -71,7 +71,7 @@ data StopDeploymentResponse = StopDeploymentResponse     { _sdrStatus        :: Maybe StopStatus     , _sdrStatusMessage :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'StopDeploymentResponse' constructor. --

@@ -267,7 +267,7 @@     , _griFirstUsedTime    :: Maybe POSIX     , _griLastUsedTime     :: Maybe POSIX     , _griRegisterTime     :: Maybe POSIX-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'GenericRevisionInfo' constructor. --@@ -336,7 +336,7 @@     , _aiApplicationName :: Maybe Text     , _aiCreateTime      :: Maybe POSIX     , _aiLinkedToGitHub  :: Maybe Bool-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ApplicationInfo' constructor. --@@ -395,7 +395,7 @@     = Tar -- ^ tar     | Tgz -- ^ tgz     | Zip -- ^ zip-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable BundleType @@ -426,7 +426,7 @@ data TimeRange = TimeRange     { _trEnd   :: Maybe POSIX     , _trStart :: Maybe POSIX-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'TimeRange' constructor. --@@ -468,7 +468,7 @@ data DeploymentCreator     = Autoscaling -- ^ autoscaling     | User        -- ^ user-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable DeploymentCreator @@ -500,7 +500,7 @@     , _isLastUpdatedAt   :: Maybe POSIX     , _isLifecycleEvents :: List "lifecycleEvents" LifecycleEvent     , _isStatus          :: Maybe InstanceStatus-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'InstanceSummary' constructor. --@@ -573,7 +573,7 @@ data AutoScalingGroup = AutoScalingGroup     { _asgHook :: Maybe Text     , _asgName :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'AutoScalingGroup' constructor. --@@ -617,7 +617,7 @@     , _dgiEc2TagFilters        :: List "ec2TagFilters" EC2TagFilter     , _dgiServiceRoleArn       :: Maybe Text     , _dgiTargetRevision       :: Maybe RevisionLocation-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DeploymentGroupInfo' constructor. --@@ -719,7 +719,7 @@     = FirstUsedTime -- ^ firstUsedTime     | LastUsedTime  -- ^ lastUsedTime     | RegisterTime  -- ^ registerTime-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable ApplicationRevisionSortBy @@ -750,7 +750,7 @@ data MinimumHealthyHosts = MinimumHealthyHosts     { _mhhType  :: Maybe MinimumHealthyHostsType     , _mhhValue :: Maybe Int-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'MinimumHealthyHosts' constructor. --@@ -803,7 +803,7 @@     = Exclude -- ^ exclude     | Ignore  -- ^ ignore     | Include -- ^ include-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable ListStateFilterAction @@ -838,7 +838,7 @@     | ScriptTimedOut      -- ^ ScriptTimedOut     | Success             -- ^ Success     | UnknownError        -- ^ UnknownError-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable LifecycleErrorCode @@ -876,7 +876,7 @@     { _rlGitHubLocation :: Maybe GitHubLocation     , _rlRevisionType   :: Maybe RevisionLocationType     , _rlS3Location     :: Maybe S3Location-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'RevisionLocation' constructor. --@@ -928,7 +928,7 @@     | Skipped    -- ^ Skipped     | Succeeded  -- ^ Succeeded     | Unknown    -- ^ Unknown-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable LifecycleEventStatus @@ -966,7 +966,7 @@     { _ectfKey   :: Maybe Text     , _ectfType  :: Maybe EC2TagFilterType     , _ectfValue :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'EC2TagFilter' constructor. --@@ -1017,7 +1017,7 @@     , _dLogTail    :: Maybe Text     , _dMessage    :: Maybe Text     , _dScriptName :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'Diagnostics' constructor. --@@ -1079,7 +1079,7 @@ data StopStatus     = SSPending   -- ^ Pending     | SSSucceeded -- ^ Succeeded-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable StopStatus @@ -1108,7 +1108,7 @@ data ErrorInformation = ErrorInformation     { _eiCode    :: Maybe ErrorCode     , _eiMessage :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'ErrorInformation' constructor. --@@ -1163,7 +1163,7 @@ data SortOrder     = Ascending  -- ^ ascending     | Descending -- ^ descending-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable SortOrder @@ -1204,7 +1204,7 @@     , _diRevision                      :: Maybe RevisionLocation     , _diStartTime                     :: Maybe POSIX     , _diStatus                        :: Maybe DeploymentStatus-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DeploymentInfo' constructor. --@@ -1377,7 +1377,7 @@     , _leLifecycleEventName :: Maybe Text     , _leStartTime          :: Maybe POSIX     , _leStatus             :: Maybe LifecycleEventStatus-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'LifecycleEvent' constructor. --@@ -1453,7 +1453,7 @@     , _doPending    :: Maybe Integer     , _doSkipped    :: Maybe Integer     , _doSucceeded  :: Maybe Integer-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DeploymentOverview' constructor. --@@ -1527,7 +1527,7 @@     | OverMaxInstances         -- ^ OVER_MAX_INSTANCES     | RevisionMissing          -- ^ REVISION_MISSING     | Timeout                  -- ^ TIMEOUT-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable ErrorCode @@ -1576,7 +1576,7 @@     , _dciDeploymentConfigId   :: Maybe Text     , _dciDeploymentConfigName :: Maybe Text     , _dciMinimumHealthyHosts  :: Maybe MinimumHealthyHosts-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DeploymentConfigInfo' constructor. --@@ -1639,7 +1639,7 @@     | ISSkipped    -- ^ Skipped     | ISSucceeded  -- ^ Succeeded     | ISUnknown    -- ^ Unknown-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable InstanceStatus @@ -1680,7 +1680,7 @@     | DSQueued     -- ^ Queued     | DSStopped    -- ^ Stopped     | DSSucceeded  -- ^ Succeeded-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable DeploymentStatus @@ -1720,7 +1720,7 @@     , _slETag       :: Maybe Text     , _slKey        :: Maybe Text     , _slVersion    :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'S3Location' constructor. --@@ -1797,7 +1797,7 @@ data MinimumHealthyHostsType     = FleetPercent -- ^ FLEET_PERCENT     | HostCount    -- ^ HOST_COUNT-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable MinimumHealthyHostsType @@ -1826,7 +1826,7 @@ data GitHubLocation = GitHubLocation     { _ghlCommitId   :: Maybe Text     , _ghlRepository :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'GitHubLocation' constructor. --@@ -1868,7 +1868,7 @@ data RevisionLocationType     = GitHub -- ^ GitHub     | S3     -- ^ S3-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable RevisionLocationType @@ -1898,7 +1898,7 @@     = KeyAndValue -- ^ KEY_AND_VALUE     | KeyOnly     -- ^ KEY_ONLY     | ValueOnly   -- ^ VALUE_ONLY-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable EC2TagFilterType 

@@ -49,7 +49,7 @@ data UpdateApplication = UpdateApplication     { _uaApplicationName    :: Maybe Text     , _uaNewApplicationName :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'UpdateApplication' constructor. --@@ -76,7 +76,7 @@     lens _uaNewApplicationName (\s a -> s { _uaNewApplicationName = a })  data UpdateApplicationResponse = UpdateApplicationResponse-    deriving (Eq, Ord, Show, Generic)+    deriving (Eq, Ord, Read, Show, Generic)  -- | 'UpdateApplicationResponse' constructor. updateApplicationResponse :: UpdateApplicationResponse

@@ -61,7 +61,7 @@     , _udgEc2TagFilters              :: List "ec2TagFilters" EC2TagFilter     , _udgNewDeploymentGroupName     :: Maybe Text     , _udgServiceRoleArn             :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'UpdateDeploymentGroup' constructor. --@@ -136,7 +136,7 @@  newtype UpdateDeploymentGroupResponse = UpdateDeploymentGroupResponse     { _udgrHooksNotCleanedUp :: List "hooksNotCleanedUp" AutoScalingGroup-    } deriving (Eq, Show, Monoid, Semigroup)+    } deriving (Eq, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList UpdateDeploymentGroupResponse where     type Item UpdateDeploymentGroupResponse = AutoScalingGroup