Regenerating CodeDeploy from latest service definition

brendanhay · May 4, 2016 · ef50a4c · ef50a4c
1 parent 036c979
commit ef50a4c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/amazonka-codedeploy/gen/Network/AWS/CodeDeploy/ListDeployments.hs b/amazonka-codedeploy/gen/Network/AWS/CodeDeploy/ListDeployments.hs
@@ -100,7 +100,7 @@ ldNextToken = lens _ldNextToken (\ s a -> s{_ldNextToken = a});
 -- -   In Progress: Include in-progress deployments in the resulting list.
 -- -   Succeeded: Include successful deployments in the resulting list.
 -- -   Failed: Include failed deployments in the resulting list.
--- -   Aborted: Include aborted deployments in the resulting list.
+-- -   Stopped: Include stopped deployments in the resulting list.
 ldIncludeOnlyStatuses :: Lens' ListDeployments [DeploymentStatus]
 ldIncludeOnlyStatuses = lens _ldIncludeOnlyStatuses (\ s a -> s{_ldIncludeOnlyStatuses = a}) . _Default . _Coerce;
 

diff --git a/amazonka-codedeploy/gen/Network/AWS/CodeDeploy/Types.hs b/amazonka-codedeploy/gen/Network/AWS/CodeDeploy/Types.hs
@@ -344,6 +344,8 @@ codeDeploy =
       | has (hasCode "ThrottlingException" . hasStatus 400) e =
           Just "throttling_exception"
       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
+      | has (hasStatus 504) e = Just "gateway_timeout"
+      | has (hasStatus 502) e = Just "bad_gateway"
       | has (hasStatus 503) e = Just "service_unavailable"
       | has (hasStatus 500) e = Just "general_server_error"
       | has (hasStatus 509) e = Just "limit_exceeded"