amazonka-apigateway 1.4.5 → 1.5.0

raw patch · 145 files changed

+7947/−4963 lines, 145 filesdep ~amazonka-apigatewaydep ~amazonka-coredep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-apigateway, amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-apigateway.cabal +28/−11
• fixture/CreateRequestValidator.yaml +10/−0
• fixture/CreateRequestValidatorResponse.proto +0/−0
• fixture/DeleteGatewayResponse.yaml +10/−0
• fixture/DeleteGatewayResponseResponse.proto +0/−0
• fixture/DeleteRequestValidator.yaml +10/−0
• fixture/DeleteRequestValidatorResponse.proto +0/−0
• fixture/GetGatewayResponse.yaml +10/−0
• fixture/GetGatewayResponseResponse.proto +0/−0
• fixture/GetGatewayResponses.yaml +10/−0
• fixture/GetGatewayResponsesResponse.proto +0/−0
• fixture/GetRequestValidator.yaml +10/−0
• fixture/GetRequestValidatorResponse.proto +0/−0
• fixture/GetRequestValidators.yaml +10/−0
• fixture/GetRequestValidatorsResponse.proto +0/−0
• fixture/GetSDKType.yaml +10/−0
• fixture/GetSDKTypeResponse.proto +0/−0
• fixture/GetSDKTypes.yaml +10/−0
• fixture/GetSDKTypesResponse.proto +0/−0
• fixture/PutGatewayResponse.yaml +10/−0
• fixture/PutGatewayResponseResponse.proto +0/−0
• fixture/UpdateGatewayResponse.yaml +10/−0
• fixture/UpdateGatewayResponseResponse.proto +0/−0
• fixture/UpdateRequestValidator.yaml +10/−0
• fixture/UpdateRequestValidatorResponse.proto +0/−0
• gen/Network/AWS/APIGateway.hs +208/−107
• gen/Network/AWS/APIGateway/CreateAPIKey.hs +29/−27
• gen/Network/AWS/APIGateway/CreateAuthorizer.hs +61/−60
• gen/Network/AWS/APIGateway/CreateBasePathMapping.hs +25/−23
• gen/Network/AWS/APIGateway/CreateDeployment.hs +31/−29
• gen/Network/AWS/APIGateway/CreateDocumentationPart.hs +23/−21
• gen/Network/AWS/APIGateway/CreateDocumentationVersion.hs +25/−23
• gen/Network/AWS/APIGateway/CreateDomainName.hs +99/−54
• gen/Network/AWS/APIGateway/CreateModel.hs +27/−25
• gen/Network/AWS/APIGateway/CreateRequestValidator.hs +136/−0
• gen/Network/AWS/APIGateway/CreateResource.hs +23/−21
• gen/Network/AWS/APIGateway/CreateRestAPI.hs +37/−23
• gen/Network/AWS/APIGateway/CreateStage.hs +33/−31
• gen/Network/AWS/APIGateway/CreateUsagePlan.hs +25/−23
• gen/Network/AWS/APIGateway/CreateUsagePlanKey.hs +21/−19
• gen/Network/AWS/APIGateway/DeleteAPIKey.hs +20/−19
• gen/Network/AWS/APIGateway/DeleteAuthorizer.hs +24/−22
• gen/Network/AWS/APIGateway/DeleteBasePathMapping.hs +22/−20
• gen/Network/AWS/APIGateway/DeleteClientCertificate.hs +20/−18
• gen/Network/AWS/APIGateway/DeleteDeployment.hs +24/−22
• gen/Network/AWS/APIGateway/DeleteDocumentationPart.hs +24/−22
• gen/Network/AWS/APIGateway/DeleteDocumentationVersion.hs +26/−21
• gen/Network/AWS/APIGateway/DeleteDomainName.hs +20/−18
• gen/Network/AWS/APIGateway/DeleteGatewayResponse.hs +118/−0
• gen/Network/AWS/APIGateway/DeleteIntegration.hs +28/−24
• gen/Network/AWS/APIGateway/DeleteIntegrationResponse.hs +30/−25
• gen/Network/AWS/APIGateway/DeleteMethod.hs +28/−24
• gen/Network/AWS/APIGateway/DeleteMethodResponse.hs +30/−26
• gen/Network/AWS/APIGateway/DeleteModel.hs +23/−22
• gen/Network/AWS/APIGateway/DeleteRequestValidator.hs +119/−0
• gen/Network/AWS/APIGateway/DeleteResource.hs +23/−22
• gen/Network/AWS/APIGateway/DeleteRestAPI.hs +22/−21
• gen/Network/AWS/APIGateway/DeleteStage.hs +23/−22
• gen/Network/AWS/APIGateway/DeleteUsagePlan.hs +21/−19
• gen/Network/AWS/APIGateway/DeleteUsagePlanKey.hs +21/−20
• gen/Network/AWS/APIGateway/FlushStageAuthorizersCache.hs +24/−21
• gen/Network/AWS/APIGateway/FlushStageCache.hs +23/−22
• gen/Network/AWS/APIGateway/GenerateClientCertificate.hs +15/−15
• gen/Network/AWS/APIGateway/GetAPIKey.hs +16/−17
• gen/Network/AWS/APIGateway/GetAPIKeys.hs +46/−42
• gen/Network/AWS/APIGateway/GetAccount.hs +14/−12
• gen/Network/AWS/APIGateway/GetAuthorizer.hs +19/−19
• gen/Network/AWS/APIGateway/GetAuthorizers.hs +38/−37
• gen/Network/AWS/APIGateway/GetBasePathMapping.hs +17/−17
• gen/Network/AWS/APIGateway/GetBasePathMappings.hs +37/−36
• gen/Network/AWS/APIGateway/GetClientCertificate.hs +15/−15
• gen/Network/AWS/APIGateway/GetClientCertificates.hs +35/−34
• gen/Network/AWS/APIGateway/GetDeployment.hs +34/−20
• gen/Network/AWS/APIGateway/GetDeployments.hs +39/−38
• gen/Network/AWS/APIGateway/GetDocumentationPart.hs +21/−21
• gen/Network/AWS/APIGateway/GetDocumentationParts.hs +47/−43
• gen/Network/AWS/APIGateway/GetDocumentationVersion.hs +21/−19
• gen/Network/AWS/APIGateway/GetDocumentationVersions.hs +38/−36
• gen/Network/AWS/APIGateway/GetDomainName.hs +20/−16
• gen/Network/AWS/APIGateway/GetDomainNames.hs +35/−35
• gen/Network/AWS/APIGateway/GetExport.hs +41/−37
• gen/Network/AWS/APIGateway/GetGatewayResponse.hs +108/−0
• gen/Network/AWS/APIGateway/GetGatewayResponses.hs +179/−0
• gen/Network/AWS/APIGateway/GetIntegration.hs +23/−21
• gen/Network/AWS/APIGateway/GetIntegrationResponse.hs +25/−23
• gen/Network/AWS/APIGateway/GetMethod.hs +25/−21
• gen/Network/AWS/APIGateway/GetMethodResponse.hs +25/−23
• gen/Network/AWS/APIGateway/GetModel.hs +18/−19
• gen/Network/AWS/APIGateway/GetModelTemplate.hs +26/−27
• gen/Network/AWS/APIGateway/GetModels.hs +39/−38
• gen/Network/AWS/APIGateway/GetRequestValidator.hs +107/−0
• gen/Network/AWS/APIGateway/GetRequestValidators.hs +170/−0
• gen/Network/AWS/APIGateway/GetResource.hs +31/−20
• gen/Network/AWS/APIGateway/GetResources.hs +54/−39
• gen/Network/AWS/APIGateway/GetRestAPI.hs +16/−16
• gen/Network/AWS/APIGateway/GetRestAPIs.hs +35/−35
• gen/Network/AWS/APIGateway/GetSDK.hs +43/−39
• gen/Network/AWS/APIGateway/GetSDKType.hs +92/−0
• gen/Network/AWS/APIGateway/GetSDKTypes.hs +150/−0
• gen/Network/AWS/APIGateway/GetStage.hs +18/−19
• gen/Network/AWS/APIGateway/GetStages.hs +28/−29
• gen/Network/AWS/APIGateway/GetUsage.hs +41/−29
• gen/Network/AWS/APIGateway/GetUsagePlan.hs +15/−16
• gen/Network/AWS/APIGateway/GetUsagePlanKey.hs +16/−17
• gen/Network/AWS/APIGateway/GetUsagePlanKeys.hs +51/−37
• gen/Network/AWS/APIGateway/GetUsagePlans.hs +46/−35
• gen/Network/AWS/APIGateway/ImportAPIKeys.hs +30/−29
• gen/Network/AWS/APIGateway/ImportDocumentationParts.hs +37/−32
• gen/Network/AWS/APIGateway/ImportRestAPI.hs +23/−23
• gen/Network/AWS/APIGateway/PutGatewayResponse.hs +145/−0
• gen/Network/AWS/APIGateway/PutIntegration.hs +47/−45
• gen/Network/AWS/APIGateway/PutIntegrationResponse.hs +33/−31
• gen/Network/AWS/APIGateway/PutMethod.hs +59/−34
• gen/Network/AWS/APIGateway/PutMethodResponse.hs +29/−27
• gen/Network/AWS/APIGateway/PutRestAPI.hs +32/−29
• gen/Network/AWS/APIGateway/TestInvokeAuthorizer.hs +53/−49
• gen/Network/AWS/APIGateway/TestInvokeMethod.hs +51/−47
• gen/Network/AWS/APIGateway/Types.hs +116/−39
• gen/Network/AWS/APIGateway/Types/Product.hs +2602/−2171
• gen/Network/AWS/APIGateway/Types/Sum.hs +200/−69
• gen/Network/AWS/APIGateway/UpdateAPIKey.hs +16/−17
• gen/Network/AWS/APIGateway/UpdateAccount.hs +15/−16
• gen/Network/AWS/APIGateway/UpdateAuthorizer.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateBasePathMapping.hs +21/−19
• gen/Network/AWS/APIGateway/UpdateClientCertificate.hs +19/−17
• gen/Network/AWS/APIGateway/UpdateDeployment.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateDocumentationPart.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateDocumentationVersion.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateDomainName.hs +22/−17
• gen/Network/AWS/APIGateway/UpdateGatewayResponse.hs +125/−0
• gen/Network/AWS/APIGateway/UpdateIntegration.hs +25/−23
• gen/Network/AWS/APIGateway/UpdateIntegrationResponse.hs +27/−25
• gen/Network/AWS/APIGateway/UpdateMethod.hs +27/−23
• gen/Network/AWS/APIGateway/UpdateMethodResponse.hs +27/−25
• gen/Network/AWS/APIGateway/UpdateModel.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateRequestValidator.hs +124/−0
• gen/Network/AWS/APIGateway/UpdateResource.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateRestAPI.hs +19/−19
• gen/Network/AWS/APIGateway/UpdateStage.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateUsage.hs +23/−21
• gen/Network/AWS/APIGateway/UpdateUsagePlan.hs +17/−17
• gen/Network/AWS/APIGateway/Waiters.hs +6/−6
• test/Main.hs +2/−2
• test/Test/AWS/Gen/APIGateway.hs +220/−4

@@ -8,7 +8,7 @@  ## Version -`1.4.5`+`1.5.0`   ## Description

@@ -1,13 +1,13 @@ name:                  amazonka-apigateway-version:               1.4.5+version:               1.5.0 synopsis:              Amazon API Gateway SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues-license:               OtherLicense+license:               MPL-2.0 license-file:          LICENSE author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2013-2016 Brendan Hay+maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>+copyright:             Copyright (c) 2013-2017 Brendan Hay category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10@@ -29,14 +29,19 @@     to get started.  source-repository head-    type:     git-    location: git://github.com/brendanhay/amazonka.git+    type:              git+    location:          git://github.com/brendanhay/amazonka.git+    subdir:            amazonka-apigateway  library     default-language:  Haskell2010     hs-source-dirs:    src gen -    ghc-options:       -Wall+    ghc-options:+        -Wall+        -fwarn-incomplete-uni-patterns+        -fwarn-incomplete-record-updates+        -funbox-strict-fields      exposed-modules:           Network.AWS.APIGateway@@ -48,6 +53,7 @@         , Network.AWS.APIGateway.CreateDocumentationVersion         , Network.AWS.APIGateway.CreateDomainName         , Network.AWS.APIGateway.CreateModel+        , Network.AWS.APIGateway.CreateRequestValidator         , Network.AWS.APIGateway.CreateResource         , Network.AWS.APIGateway.CreateRestAPI         , Network.AWS.APIGateway.CreateStage@@ -61,11 +67,13 @@         , Network.AWS.APIGateway.DeleteDocumentationPart         , Network.AWS.APIGateway.DeleteDocumentationVersion         , Network.AWS.APIGateway.DeleteDomainName+        , Network.AWS.APIGateway.DeleteGatewayResponse         , Network.AWS.APIGateway.DeleteIntegration         , Network.AWS.APIGateway.DeleteIntegrationResponse         , Network.AWS.APIGateway.DeleteMethod         , Network.AWS.APIGateway.DeleteMethodResponse         , Network.AWS.APIGateway.DeleteModel+        , Network.AWS.APIGateway.DeleteRequestValidator         , Network.AWS.APIGateway.DeleteResource         , Network.AWS.APIGateway.DeleteRestAPI         , Network.AWS.APIGateway.DeleteStage@@ -92,6 +100,8 @@         , Network.AWS.APIGateway.GetDomainName         , Network.AWS.APIGateway.GetDomainNames         , Network.AWS.APIGateway.GetExport+        , Network.AWS.APIGateway.GetGatewayResponse+        , Network.AWS.APIGateway.GetGatewayResponses         , Network.AWS.APIGateway.GetIntegration         , Network.AWS.APIGateway.GetIntegrationResponse         , Network.AWS.APIGateway.GetMethod@@ -99,11 +109,15 @@         , Network.AWS.APIGateway.GetModel         , Network.AWS.APIGateway.GetModelTemplate         , Network.AWS.APIGateway.GetModels+        , Network.AWS.APIGateway.GetRequestValidator+        , Network.AWS.APIGateway.GetRequestValidators         , Network.AWS.APIGateway.GetResource         , Network.AWS.APIGateway.GetResources         , Network.AWS.APIGateway.GetRestAPI         , Network.AWS.APIGateway.GetRestAPIs         , Network.AWS.APIGateway.GetSDK+        , Network.AWS.APIGateway.GetSDKType+        , Network.AWS.APIGateway.GetSDKTypes         , Network.AWS.APIGateway.GetStage         , Network.AWS.APIGateway.GetStages         , Network.AWS.APIGateway.GetUsage@@ -114,6 +128,7 @@         , Network.AWS.APIGateway.ImportAPIKeys         , Network.AWS.APIGateway.ImportDocumentationParts         , Network.AWS.APIGateway.ImportRestAPI+        , Network.AWS.APIGateway.PutGatewayResponse         , Network.AWS.APIGateway.PutIntegration         , Network.AWS.APIGateway.PutIntegrationResponse         , Network.AWS.APIGateway.PutMethod@@ -131,11 +146,13 @@         , Network.AWS.APIGateway.UpdateDocumentationPart         , Network.AWS.APIGateway.UpdateDocumentationVersion         , Network.AWS.APIGateway.UpdateDomainName+        , Network.AWS.APIGateway.UpdateGatewayResponse         , Network.AWS.APIGateway.UpdateIntegration         , Network.AWS.APIGateway.UpdateIntegrationResponse         , Network.AWS.APIGateway.UpdateMethod         , Network.AWS.APIGateway.UpdateMethodResponse         , Network.AWS.APIGateway.UpdateModel+        , Network.AWS.APIGateway.UpdateRequestValidator         , Network.AWS.APIGateway.UpdateResource         , Network.AWS.APIGateway.UpdateRestAPI         , Network.AWS.APIGateway.UpdateStage@@ -148,7 +165,7 @@         , Network.AWS.APIGateway.Types.Sum      build-depends:-          amazonka-core == 1.4.5.*+          amazonka-core == 1.5.0.*         , base          >= 4.7     && < 5  test-suite amazonka-apigateway-test@@ -168,9 +185,9 @@         , Test.AWS.APIGateway.Internal      build-depends:-          amazonka-core == 1.4.5.*-        , amazonka-test == 1.4.5.*-        , amazonka-apigateway == 1.4.5.*+          amazonka-core == 1.5.0.*+        , amazonka-test == 1.5.0.*+        , amazonka-apigateway         , base         , bytestring         , tasty

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PATCH+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PATCH+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  apigateway.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -5,9 +5,9 @@  -- | -- Module      : Network.AWS.APIGateway--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -59,6 +59,12 @@     -- ** GetDeployment     , module Network.AWS.APIGateway.GetDeployment +    -- ** DeleteGatewayResponse+    , module Network.AWS.APIGateway.DeleteGatewayResponse++    -- ** UpdateGatewayResponse+    , module Network.AWS.APIGateway.UpdateGatewayResponse+     -- ** CreateUsagePlan     , module Network.AWS.APIGateway.CreateUsagePlan @@ -68,6 +74,12 @@     -- ** GetClientCertificate     , module Network.AWS.APIGateway.GetClientCertificate +    -- ** PutGatewayResponse+    , module Network.AWS.APIGateway.PutGatewayResponse++    -- ** GetSDKType+    , module Network.AWS.APIGateway.GetSDKType+     -- ** GetMethodResponse     , module Network.AWS.APIGateway.GetMethodResponse @@ -77,6 +89,9 @@     -- ** GetBasePathMapping     , module Network.AWS.APIGateway.GetBasePathMapping +    -- ** GetRequestValidators+    , module Network.AWS.APIGateway.GetRequestValidators+     -- ** PutMethodResponse     , module Network.AWS.APIGateway.PutMethodResponse @@ -134,10 +149,13 @@     -- ** UpdateResource     , module Network.AWS.APIGateway.UpdateResource +    -- ** CreateRequestValidator+    , module Network.AWS.APIGateway.CreateRequestValidator+     -- ** ImportDocumentationParts     , module Network.AWS.APIGateway.ImportDocumentationParts -    -- ** GetUsage+    -- ** GetUsage (Paginated)     , module Network.AWS.APIGateway.GetUsage      -- ** CreateModel@@ -152,6 +170,9 @@     -- ** FlushStageAuthorizersCache     , module Network.AWS.APIGateway.FlushStageAuthorizersCache +    -- ** GetGatewayResponses+    , module Network.AWS.APIGateway.GetGatewayResponses+     -- ** DeleteModel     , module Network.AWS.APIGateway.DeleteModel @@ -197,6 +218,9 @@     -- ** TestInvokeMethod     , module Network.AWS.APIGateway.TestInvokeMethod +    -- ** GetRequestValidator+    , module Network.AWS.APIGateway.GetRequestValidator+     -- ** GetDomainName     , module Network.AWS.APIGateway.GetDomainName @@ -215,7 +239,7 @@     -- ** PutIntegrationResponse     , module Network.AWS.APIGateway.PutIntegrationResponse -    -- ** GetUsagePlanKeys+    -- ** GetUsagePlanKeys (Paginated)     , module Network.AWS.APIGateway.GetUsagePlanKeys      -- ** FlushStageCache@@ -290,6 +314,9 @@     -- ** UpdateClientCertificate     , module Network.AWS.APIGateway.UpdateClientCertificate +    -- ** GetGatewayResponse+    , module Network.AWS.APIGateway.GetGatewayResponse+     -- ** CreateUsagePlanKey     , module Network.AWS.APIGateway.CreateUsagePlanKey @@ -311,7 +338,7 @@     -- ** CreateAPIKey     , module Network.AWS.APIGateway.CreateAPIKey -    -- ** GetUsagePlans+    -- ** GetUsagePlans (Paginated)     , module Network.AWS.APIGateway.GetUsagePlans      -- ** PutMethod@@ -332,6 +359,15 @@     -- ** UpdateMethod     , module Network.AWS.APIGateway.UpdateMethod +    -- ** UpdateRequestValidator+    , module Network.AWS.APIGateway.UpdateRequestValidator++    -- ** DeleteRequestValidator+    , module Network.AWS.APIGateway.DeleteRequestValidator++    -- ** GetSDKTypes+    , module Network.AWS.APIGateway.GetSDKTypes+     -- ** GetClientCertificates (Paginated)     , module Network.AWS.APIGateway.GetClientCertificates @@ -370,6 +406,12 @@     -- ** DocumentationPartType     , DocumentationPartType (..) +    -- ** EndpointType+    , EndpointType (..)++    -- ** GatewayResponseType+    , GatewayResponseType (..)+     -- ** IntegrationType     , IntegrationType (..) @@ -477,10 +519,29 @@     , DomainName     , domainName     , dnCertificateName+    , dnRegionalCertificateARN+    , dnCertificateARN     , dnDomainName+    , dnRegionalCertificateName+    , dnRegionalDomainName     , dnCertificateUploadDate     , dnDistributionDomainName+    , dnEndpointConfiguration +    -- ** EndpointConfiguration+    , EndpointConfiguration+    , endpointConfiguration+    , ecTypes++    -- ** GatewayResponse+    , GatewayResponse+    , gatewayResponse+    , gDefaultResponse+    , gResponseTemplates+    , gResponseType+    , gStatusCode+    , gResponseParameters+     -- ** Integration     , Integration     , integration@@ -510,9 +571,11 @@     , method     , mMethodResponses     , mHttpMethod+    , mRequestValidatorId     , mRequestModels     , mRequestParameters     , mAuthorizerId+    , mOperationName     , mAuthorizationType     , mApiKeyRequired     , mMethodIntegration@@ -568,6 +631,14 @@     , qsPeriod     , qsLimit +    -- ** RequestValidator+    , RequestValidator+    , requestValidator+    , rvValidateRequestParameters+    , rvName+    , rvValidateRequestBody+    , rvId+     -- ** Resource     , Resource     , resource@@ -586,8 +657,26 @@     , raName     , raVersion     , raId+    , raEndpointConfiguration     , raDescription +    -- ** SDKConfigurationProperty+    , SDKConfigurationProperty+    , sdkConfigurationProperty+    , scpFriendlyName+    , scpRequired+    , scpName+    , scpDefaultValue+    , scpDescription++    -- ** SDKType+    , SDKType+    , sdkType+    , stFriendlyName+    , stConfigurationProperties+    , stId+    , stDescription+     -- ** Stage     , Stage     , stage@@ -645,108 +734,120 @@     , upkType     ) where -import           Network.AWS.APIGateway.CreateAPIKey-import           Network.AWS.APIGateway.CreateAuthorizer-import           Network.AWS.APIGateway.CreateBasePathMapping-import           Network.AWS.APIGateway.CreateDeployment-import           Network.AWS.APIGateway.CreateDocumentationPart-import           Network.AWS.APIGateway.CreateDocumentationVersion-import           Network.AWS.APIGateway.CreateDomainName-import           Network.AWS.APIGateway.CreateModel-import           Network.AWS.APIGateway.CreateResource-import           Network.AWS.APIGateway.CreateRestAPI-import           Network.AWS.APIGateway.CreateStage-import           Network.AWS.APIGateway.CreateUsagePlan-import           Network.AWS.APIGateway.CreateUsagePlanKey-import           Network.AWS.APIGateway.DeleteAPIKey-import           Network.AWS.APIGateway.DeleteAuthorizer-import           Network.AWS.APIGateway.DeleteBasePathMapping-import           Network.AWS.APIGateway.DeleteClientCertificate-import           Network.AWS.APIGateway.DeleteDeployment-import           Network.AWS.APIGateway.DeleteDocumentationPart-import           Network.AWS.APIGateway.DeleteDocumentationVersion-import           Network.AWS.APIGateway.DeleteDomainName-import           Network.AWS.APIGateway.DeleteIntegration-import           Network.AWS.APIGateway.DeleteIntegrationResponse-import           Network.AWS.APIGateway.DeleteMethod-import           Network.AWS.APIGateway.DeleteMethodResponse-import           Network.AWS.APIGateway.DeleteModel-import           Network.AWS.APIGateway.DeleteResource-import           Network.AWS.APIGateway.DeleteRestAPI-import           Network.AWS.APIGateway.DeleteStage-import           Network.AWS.APIGateway.DeleteUsagePlan-import           Network.AWS.APIGateway.DeleteUsagePlanKey-import           Network.AWS.APIGateway.FlushStageAuthorizersCache-import           Network.AWS.APIGateway.FlushStageCache-import           Network.AWS.APIGateway.GenerateClientCertificate-import           Network.AWS.APIGateway.GetAccount-import           Network.AWS.APIGateway.GetAPIKey-import           Network.AWS.APIGateway.GetAPIKeys-import           Network.AWS.APIGateway.GetAuthorizer-import           Network.AWS.APIGateway.GetAuthorizers-import           Network.AWS.APIGateway.GetBasePathMapping-import           Network.AWS.APIGateway.GetBasePathMappings-import           Network.AWS.APIGateway.GetClientCertificate-import           Network.AWS.APIGateway.GetClientCertificates-import           Network.AWS.APIGateway.GetDeployment-import           Network.AWS.APIGateway.GetDeployments-import           Network.AWS.APIGateway.GetDocumentationPart-import           Network.AWS.APIGateway.GetDocumentationParts-import           Network.AWS.APIGateway.GetDocumentationVersion-import           Network.AWS.APIGateway.GetDocumentationVersions-import           Network.AWS.APIGateway.GetDomainName-import           Network.AWS.APIGateway.GetDomainNames-import           Network.AWS.APIGateway.GetExport-import           Network.AWS.APIGateway.GetIntegration-import           Network.AWS.APIGateway.GetIntegrationResponse-import           Network.AWS.APIGateway.GetMethod-import           Network.AWS.APIGateway.GetMethodResponse-import           Network.AWS.APIGateway.GetModel-import           Network.AWS.APIGateway.GetModels-import           Network.AWS.APIGateway.GetModelTemplate-import           Network.AWS.APIGateway.GetResource-import           Network.AWS.APIGateway.GetResources-import           Network.AWS.APIGateway.GetRestAPI-import           Network.AWS.APIGateway.GetRestAPIs-import           Network.AWS.APIGateway.GetSDK-import           Network.AWS.APIGateway.GetStage-import           Network.AWS.APIGateway.GetStages-import           Network.AWS.APIGateway.GetUsage-import           Network.AWS.APIGateway.GetUsagePlan-import           Network.AWS.APIGateway.GetUsagePlanKey-import           Network.AWS.APIGateway.GetUsagePlanKeys-import           Network.AWS.APIGateway.GetUsagePlans-import           Network.AWS.APIGateway.ImportAPIKeys-import           Network.AWS.APIGateway.ImportDocumentationParts-import           Network.AWS.APIGateway.ImportRestAPI-import           Network.AWS.APIGateway.PutIntegration-import           Network.AWS.APIGateway.PutIntegrationResponse-import           Network.AWS.APIGateway.PutMethod-import           Network.AWS.APIGateway.PutMethodResponse-import           Network.AWS.APIGateway.PutRestAPI-import           Network.AWS.APIGateway.TestInvokeAuthorizer-import           Network.AWS.APIGateway.TestInvokeMethod-import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.UpdateAccount-import           Network.AWS.APIGateway.UpdateAPIKey-import           Network.AWS.APIGateway.UpdateAuthorizer-import           Network.AWS.APIGateway.UpdateBasePathMapping-import           Network.AWS.APIGateway.UpdateClientCertificate-import           Network.AWS.APIGateway.UpdateDeployment-import           Network.AWS.APIGateway.UpdateDocumentationPart-import           Network.AWS.APIGateway.UpdateDocumentationVersion-import           Network.AWS.APIGateway.UpdateDomainName-import           Network.AWS.APIGateway.UpdateIntegration-import           Network.AWS.APIGateway.UpdateIntegrationResponse-import           Network.AWS.APIGateway.UpdateMethod-import           Network.AWS.APIGateway.UpdateMethodResponse-import           Network.AWS.APIGateway.UpdateModel-import           Network.AWS.APIGateway.UpdateResource-import           Network.AWS.APIGateway.UpdateRestAPI-import           Network.AWS.APIGateway.UpdateStage-import           Network.AWS.APIGateway.UpdateUsage-import           Network.AWS.APIGateway.UpdateUsagePlan-import           Network.AWS.APIGateway.Waiters+import Network.AWS.APIGateway.CreateAPIKey+import Network.AWS.APIGateway.CreateAuthorizer+import Network.AWS.APIGateway.CreateBasePathMapping+import Network.AWS.APIGateway.CreateDeployment+import Network.AWS.APIGateway.CreateDocumentationPart+import Network.AWS.APIGateway.CreateDocumentationVersion+import Network.AWS.APIGateway.CreateDomainName+import Network.AWS.APIGateway.CreateModel+import Network.AWS.APIGateway.CreateRequestValidator+import Network.AWS.APIGateway.CreateResource+import Network.AWS.APIGateway.CreateRestAPI+import Network.AWS.APIGateway.CreateStage+import Network.AWS.APIGateway.CreateUsagePlan+import Network.AWS.APIGateway.CreateUsagePlanKey+import Network.AWS.APIGateway.DeleteAPIKey+import Network.AWS.APIGateway.DeleteAuthorizer+import Network.AWS.APIGateway.DeleteBasePathMapping+import Network.AWS.APIGateway.DeleteClientCertificate+import Network.AWS.APIGateway.DeleteDeployment+import Network.AWS.APIGateway.DeleteDocumentationPart+import Network.AWS.APIGateway.DeleteDocumentationVersion+import Network.AWS.APIGateway.DeleteDomainName+import Network.AWS.APIGateway.DeleteGatewayResponse+import Network.AWS.APIGateway.DeleteIntegration+import Network.AWS.APIGateway.DeleteIntegrationResponse+import Network.AWS.APIGateway.DeleteMethod+import Network.AWS.APIGateway.DeleteMethodResponse+import Network.AWS.APIGateway.DeleteModel+import Network.AWS.APIGateway.DeleteRequestValidator+import Network.AWS.APIGateway.DeleteResource+import Network.AWS.APIGateway.DeleteRestAPI+import Network.AWS.APIGateway.DeleteStage+import Network.AWS.APIGateway.DeleteUsagePlan+import Network.AWS.APIGateway.DeleteUsagePlanKey+import Network.AWS.APIGateway.FlushStageAuthorizersCache+import Network.AWS.APIGateway.FlushStageCache+import Network.AWS.APIGateway.GenerateClientCertificate+import Network.AWS.APIGateway.GetAccount+import Network.AWS.APIGateway.GetAPIKey+import Network.AWS.APIGateway.GetAPIKeys+import Network.AWS.APIGateway.GetAuthorizer+import Network.AWS.APIGateway.GetAuthorizers+import Network.AWS.APIGateway.GetBasePathMapping+import Network.AWS.APIGateway.GetBasePathMappings+import Network.AWS.APIGateway.GetClientCertificate+import Network.AWS.APIGateway.GetClientCertificates+import Network.AWS.APIGateway.GetDeployment+import Network.AWS.APIGateway.GetDeployments+import Network.AWS.APIGateway.GetDocumentationPart+import Network.AWS.APIGateway.GetDocumentationParts+import Network.AWS.APIGateway.GetDocumentationVersion+import Network.AWS.APIGateway.GetDocumentationVersions+import Network.AWS.APIGateway.GetDomainName+import Network.AWS.APIGateway.GetDomainNames+import Network.AWS.APIGateway.GetExport+import Network.AWS.APIGateway.GetGatewayResponse+import Network.AWS.APIGateway.GetGatewayResponses+import Network.AWS.APIGateway.GetIntegration+import Network.AWS.APIGateway.GetIntegrationResponse+import Network.AWS.APIGateway.GetMethod+import Network.AWS.APIGateway.GetMethodResponse+import Network.AWS.APIGateway.GetModel+import Network.AWS.APIGateway.GetModels+import Network.AWS.APIGateway.GetModelTemplate+import Network.AWS.APIGateway.GetRequestValidator+import Network.AWS.APIGateway.GetRequestValidators+import Network.AWS.APIGateway.GetResource+import Network.AWS.APIGateway.GetResources+import Network.AWS.APIGateway.GetRestAPI+import Network.AWS.APIGateway.GetRestAPIs+import Network.AWS.APIGateway.GetSDK+import Network.AWS.APIGateway.GetSDKType+import Network.AWS.APIGateway.GetSDKTypes+import Network.AWS.APIGateway.GetStage+import Network.AWS.APIGateway.GetStages+import Network.AWS.APIGateway.GetUsage+import Network.AWS.APIGateway.GetUsagePlan+import Network.AWS.APIGateway.GetUsagePlanKey+import Network.AWS.APIGateway.GetUsagePlanKeys+import Network.AWS.APIGateway.GetUsagePlans+import Network.AWS.APIGateway.ImportAPIKeys+import Network.AWS.APIGateway.ImportDocumentationParts+import Network.AWS.APIGateway.ImportRestAPI+import Network.AWS.APIGateway.PutGatewayResponse+import Network.AWS.APIGateway.PutIntegration+import Network.AWS.APIGateway.PutIntegrationResponse+import Network.AWS.APIGateway.PutMethod+import Network.AWS.APIGateway.PutMethodResponse+import Network.AWS.APIGateway.PutRestAPI+import Network.AWS.APIGateway.TestInvokeAuthorizer+import Network.AWS.APIGateway.TestInvokeMethod+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.UpdateAccount+import Network.AWS.APIGateway.UpdateAPIKey+import Network.AWS.APIGateway.UpdateAuthorizer+import Network.AWS.APIGateway.UpdateBasePathMapping+import Network.AWS.APIGateway.UpdateClientCertificate+import Network.AWS.APIGateway.UpdateDeployment+import Network.AWS.APIGateway.UpdateDocumentationPart+import Network.AWS.APIGateway.UpdateDocumentationVersion+import Network.AWS.APIGateway.UpdateDomainName+import Network.AWS.APIGateway.UpdateGatewayResponse+import Network.AWS.APIGateway.UpdateIntegration+import Network.AWS.APIGateway.UpdateIntegrationResponse+import Network.AWS.APIGateway.UpdateMethod+import Network.AWS.APIGateway.UpdateMethodResponse+import Network.AWS.APIGateway.UpdateModel+import Network.AWS.APIGateway.UpdateRequestValidator+import Network.AWS.APIGateway.UpdateResource+import Network.AWS.APIGateway.UpdateRestAPI+import Network.AWS.APIGateway.UpdateStage+import Network.AWS.APIGateway.UpdateUsage+import Network.AWS.APIGateway.UpdateUsagePlan+import Network.AWS.APIGateway.Waiters  {- $errors Error matchers are designed for use with the functions provided by

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateAPIKey--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -51,12 +51,12 @@     , akDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to create an 'ApiKey' resource. --@@ -64,15 +64,16 @@ -- -- /See:/ 'createAPIKey' smart constructor. data CreateAPIKey = CreateAPIKey'-    { _cakEnabled            :: !(Maybe Bool)-    , _cakValue              :: !(Maybe Text)-    , _cakCustomerId         :: !(Maybe Text)-    , _cakGenerateDistinctId :: !(Maybe Bool)-    , _cakName               :: !(Maybe Text)-    , _cakStageKeys          :: !(Maybe [StageKey])-    , _cakDescription        :: !(Maybe Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cakEnabled            :: !(Maybe Bool)+  , _cakValue              :: !(Maybe Text)+  , _cakCustomerId         :: !(Maybe Text)+  , _cakGenerateDistinctId :: !(Maybe Bool)+  , _cakName               :: !(Maybe Text)+  , _cakStageKeys          :: !(Maybe [StageKey])+  , _cakDescription        :: !(Maybe Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateAPIKey' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -93,16 +94,17 @@ createAPIKey     :: CreateAPIKey createAPIKey =-    CreateAPIKey'-    { _cakEnabled = Nothing-    , _cakValue = Nothing-    , _cakCustomerId = Nothing-    , _cakGenerateDistinctId = Nothing-    , _cakName = Nothing-    , _cakStageKeys = Nothing-    , _cakDescription = Nothing-    }+  CreateAPIKey'+  { _cakEnabled = Nothing+  , _cakValue = Nothing+  , _cakCustomerId = Nothing+  , _cakGenerateDistinctId = Nothing+  , _cakName = Nothing+  , _cakStageKeys = Nothing+  , _cakDescription = Nothing+  } + -- | Specifies whether the 'ApiKey' can be used by callers. cakEnabled :: Lens' CreateAPIKey (Maybe Bool) cakEnabled = lens _cakEnabled (\ s a -> s{_cakEnabled = a});@@ -136,9 +138,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateAPIKey+instance Hashable CreateAPIKey where -instance NFData CreateAPIKey+instance NFData CreateAPIKey where  instance ToHeaders CreateAPIKey where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateAuthorizer--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -33,11 +33,11 @@     , caProviderARNs     , caAuthorizerResultTtlInSeconds     , caAuthType+    , caIdentitySource     , caAuthorizerCredentials     , caRestAPIId     , caName     , caType-    , caIdentitySource      -- * Destructuring the Response     , authorizer@@ -55,12 +55,12 @@     , aAuthorizerCredentials     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to add a new 'Authorizer' to an existing 'RestApi' resource. --@@ -68,86 +68,91 @@ -- -- /See:/ 'createAuthorizer' smart constructor. data CreateAuthorizer = CreateAuthorizer'-    { _caAuthorizerURI                :: !(Maybe Text)-    , _caIdentityValidationExpression :: !(Maybe Text)-    , _caProviderARNs                 :: !(Maybe [Text])-    , _caAuthorizerResultTtlInSeconds :: !(Maybe Int)-    , _caAuthType                     :: !(Maybe Text)-    , _caAuthorizerCredentials        :: !(Maybe Text)-    , _caRestAPIId                    :: !Text-    , _caName                         :: !Text-    , _caType                         :: !AuthorizerType-    , _caIdentitySource               :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _caAuthorizerURI                :: !(Maybe Text)+  , _caIdentityValidationExpression :: !(Maybe Text)+  , _caProviderARNs                 :: !(Maybe [Text])+  , _caAuthorizerResultTtlInSeconds :: !(Maybe Int)+  , _caAuthType                     :: !(Maybe Text)+  , _caIdentitySource               :: !(Maybe Text)+  , _caAuthorizerCredentials        :: !(Maybe Text)+  , _caRestAPIId                    :: !Text+  , _caName                         :: !Text+  , _caType                         :: !AuthorizerType+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateAuthorizer' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'caAuthorizerURI' - [Required] Specifies the authorizer's Uniform Resource Identifier (URI).+-- * 'caAuthorizerURI' - Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ . ----- * 'caIdentityValidationExpression' - A validation expression for the incoming identity.+-- * 'caIdentityValidationExpression' - A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer. ----- * 'caProviderARNs' - A list of the Cognito Your User Pool authorizer's provider ARNs.+-- * 'caProviderARNs' - A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined. ----- * 'caAuthorizerResultTtlInSeconds' - The TTL of cached authorizer results.+-- * 'caAuthorizerResultTtlInSeconds' - The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour. ----- * 'caAuthType' - Optional customer-defined field, used in Swagger imports/exports. Has no functional impact.+-- * 'caAuthType' - Optional customer-defined field, used in Swagger imports and exports without functional impact. ----- * 'caAuthorizerCredentials' - Specifies the credentials required for the authorizer, if any.+-- * 'caIdentitySource' - The identity source for which authorization is requested.     * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ .    * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional.    * For a @COGNITO_USER_POOLS@ authorizer, this property is not used. ----- * 'caRestAPIId' - The 'RestApi' identifier under which the 'Authorizer' will be created.+-- * 'caAuthorizerCredentials' - Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null. ----- * 'caName' - [Required] The name of the authorizer.+-- * 'caRestAPIId' - The string identifier of the associated 'RestApi' . ----- * 'caType' - [Required] The type of the authorizer.+-- * 'caName' - [Required] The name of the authorizer. ----- * 'caIdentitySource' - [Required] The source of the identity in an incoming request.+-- * 'caType' - [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool. createAuthorizer     :: Text -- ^ 'caRestAPIId'     -> Text -- ^ 'caName'     -> AuthorizerType -- ^ 'caType'-    -> Text -- ^ 'caIdentitySource'     -> CreateAuthorizer-createAuthorizer pRestAPIId_ pName_ pType_ pIdentitySource_ =-    CreateAuthorizer'-    { _caAuthorizerURI = Nothing-    , _caIdentityValidationExpression = Nothing-    , _caProviderARNs = Nothing-    , _caAuthorizerResultTtlInSeconds = Nothing-    , _caAuthType = Nothing-    , _caAuthorizerCredentials = Nothing-    , _caRestAPIId = pRestAPIId_-    , _caName = pName_-    , _caType = pType_-    , _caIdentitySource = pIdentitySource_-    }+createAuthorizer pRestAPIId_ pName_ pType_ =+  CreateAuthorizer'+  { _caAuthorizerURI = Nothing+  , _caIdentityValidationExpression = Nothing+  , _caProviderARNs = Nothing+  , _caAuthorizerResultTtlInSeconds = Nothing+  , _caAuthType = Nothing+  , _caIdentitySource = Nothing+  , _caAuthorizerCredentials = Nothing+  , _caRestAPIId = pRestAPIId_+  , _caName = pName_+  , _caType = pType_+  } --- | [Required] Specifies the authorizer's Uniform Resource Identifier (URI).++-- | Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ . caAuthorizerURI :: Lens' CreateAuthorizer (Maybe Text) caAuthorizerURI = lens _caAuthorizerURI (\ s a -> s{_caAuthorizerURI = a}); --- | A validation expression for the incoming identity.+-- | A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer. caIdentityValidationExpression :: Lens' CreateAuthorizer (Maybe Text) caIdentityValidationExpression = lens _caIdentityValidationExpression (\ s a -> s{_caIdentityValidationExpression = a}); --- | A list of the Cognito Your User Pool authorizer's provider ARNs.+-- | A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined. caProviderARNs :: Lens' CreateAuthorizer [Text] caProviderARNs = lens _caProviderARNs (\ s a -> s{_caProviderARNs = a}) . _Default . _Coerce; --- | The TTL of cached authorizer results.+-- | The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour. caAuthorizerResultTtlInSeconds :: Lens' CreateAuthorizer (Maybe Int) caAuthorizerResultTtlInSeconds = lens _caAuthorizerResultTtlInSeconds (\ s a -> s{_caAuthorizerResultTtlInSeconds = a}); --- | Optional customer-defined field, used in Swagger imports/exports. Has no functional impact.+-- | Optional customer-defined field, used in Swagger imports and exports without functional impact. caAuthType :: Lens' CreateAuthorizer (Maybe Text) caAuthType = lens _caAuthType (\ s a -> s{_caAuthType = a}); --- | Specifies the credentials required for the authorizer, if any.+-- | The identity source for which authorization is requested.     * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ .    * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional.    * For a @COGNITO_USER_POOLS@ authorizer, this property is not used.+caIdentitySource :: Lens' CreateAuthorizer (Maybe Text)+caIdentitySource = lens _caIdentitySource (\ s a -> s{_caIdentitySource = a});++-- | Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null. caAuthorizerCredentials :: Lens' CreateAuthorizer (Maybe Text) caAuthorizerCredentials = lens _caAuthorizerCredentials (\ s a -> s{_caAuthorizerCredentials = a}); --- | The 'RestApi' identifier under which the 'Authorizer' will be created.+-- | The string identifier of the associated 'RestApi' . caRestAPIId :: Lens' CreateAuthorizer Text caRestAPIId = lens _caRestAPIId (\ s a -> s{_caRestAPIId = a}); @@ -155,22 +160,18 @@ caName :: Lens' CreateAuthorizer Text caName = lens _caName (\ s a -> s{_caName = a}); --- | [Required] The type of the authorizer.+-- | [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool. caType :: Lens' CreateAuthorizer AuthorizerType caType = lens _caType (\ s a -> s{_caType = a}); --- | [Required] The source of the identity in an incoming request.-caIdentitySource :: Lens' CreateAuthorizer Text-caIdentitySource = lens _caIdentitySource (\ s a -> s{_caIdentitySource = a});- instance AWSRequest CreateAuthorizer where         type Rs CreateAuthorizer = Authorizer         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateAuthorizer+instance Hashable CreateAuthorizer where -instance NFData CreateAuthorizer+instance NFData CreateAuthorizer where  instance ToHeaders CreateAuthorizer where         toHeaders@@ -189,10 +190,10 @@                   ("authorizerResultTtlInSeconds" .=) <$>                     _caAuthorizerResultTtlInSeconds,                   ("authType" .=) <$> _caAuthType,+                  ("identitySource" .=) <$> _caIdentitySource,                   ("authorizerCredentials" .=) <$>                     _caAuthorizerCredentials,-                  Just ("name" .= _caName), Just ("type" .= _caType),-                  Just ("identitySource" .= _caIdentitySource)])+                  Just ("name" .= _caName), Just ("type" .= _caType)])  instance ToPath CreateAuthorizer where         toPath CreateAuthorizer'{..}

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateBasePathMapping--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,12 +41,12 @@     , bpmRestAPIId     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to create a new 'BasePathMapping' resource. --@@ -54,12 +54,13 @@ -- -- /See:/ 'createBasePathMapping' smart constructor. data CreateBasePathMapping = CreateBasePathMapping'-    { _cbpmStage      :: !(Maybe Text)-    , _cbpmBasePath   :: !(Maybe Text)-    , _cbpmDomainName :: !Text-    , _cbpmRestAPIId  :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cbpmStage      :: !(Maybe Text)+  , _cbpmBasePath   :: !(Maybe Text)+  , _cbpmDomainName :: !Text+  , _cbpmRestAPIId  :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateBasePathMapping' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -70,19 +71,20 @@ -- -- * 'cbpmDomainName' - The domain name of the 'BasePathMapping' resource to create. ----- * 'cbpmRestAPIId' - The name of the API that you want to apply this mapping to.+-- * 'cbpmRestAPIId' - The string identifier of the associated 'RestApi' . createBasePathMapping     :: Text -- ^ 'cbpmDomainName'     -> Text -- ^ 'cbpmRestAPIId'     -> CreateBasePathMapping createBasePathMapping pDomainName_ pRestAPIId_ =-    CreateBasePathMapping'-    { _cbpmStage = Nothing-    , _cbpmBasePath = Nothing-    , _cbpmDomainName = pDomainName_-    , _cbpmRestAPIId = pRestAPIId_-    }+  CreateBasePathMapping'+  { _cbpmStage = Nothing+  , _cbpmBasePath = Nothing+  , _cbpmDomainName = pDomainName_+  , _cbpmRestAPIId = pRestAPIId_+  } + -- | The name of the API's stage that you want to use for this mapping. Leave this blank if you do not want callers to explicitly specify the stage name after any base path name. cbpmStage :: Lens' CreateBasePathMapping (Maybe Text) cbpmStage = lens _cbpmStage (\ s a -> s{_cbpmStage = a});@@ -95,7 +97,7 @@ cbpmDomainName :: Lens' CreateBasePathMapping Text cbpmDomainName = lens _cbpmDomainName (\ s a -> s{_cbpmDomainName = a}); --- | The name of the API that you want to apply this mapping to.+-- | The string identifier of the associated 'RestApi' . cbpmRestAPIId :: Lens' CreateBasePathMapping Text cbpmRestAPIId = lens _cbpmRestAPIId (\ s a -> s{_cbpmRestAPIId = a}); @@ -104,9 +106,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateBasePathMapping+instance Hashable CreateBasePathMapping where -instance NFData CreateBasePathMapping+instance NFData CreateBasePathMapping where  instance ToHeaders CreateBasePathMapping where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateDeployment--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -45,12 +45,12 @@     , dDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to create a 'Deployment' resource. --@@ -58,15 +58,16 @@ -- -- /See:/ 'createDeployment' smart constructor. data CreateDeployment = CreateDeployment'-    { _cdStageDescription    :: !(Maybe Text)-    , _cdVariables           :: !(Maybe (Map Text Text))-    , _cdCacheClusterSize    :: !(Maybe CacheClusterSize)-    , _cdCacheClusterEnabled :: !(Maybe Bool)-    , _cdStageName           :: !(Maybe Text)-    , _cdDescription         :: !(Maybe Text)-    , _cdRestAPIId           :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cdStageDescription    :: !(Maybe Text)+  , _cdVariables           :: !(Maybe (Map Text Text))+  , _cdCacheClusterSize    :: !(Maybe CacheClusterSize)+  , _cdCacheClusterEnabled :: !(Maybe Bool)+  , _cdStageName           :: !(Maybe Text)+  , _cdDescription         :: !(Maybe Text)+  , _cdRestAPIId           :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateDeployment' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -83,21 +84,22 @@ -- -- * 'cdDescription' - The description for the 'Deployment' resource to create. ----- * 'cdRestAPIId' - The 'RestApi' resource identifier for the 'Deployment' resource to create.+-- * 'cdRestAPIId' - The string identifier of the associated 'RestApi' . createDeployment     :: Text -- ^ 'cdRestAPIId'     -> CreateDeployment createDeployment pRestAPIId_ =-    CreateDeployment'-    { _cdStageDescription = Nothing-    , _cdVariables = Nothing-    , _cdCacheClusterSize = Nothing-    , _cdCacheClusterEnabled = Nothing-    , _cdStageName = Nothing-    , _cdDescription = Nothing-    , _cdRestAPIId = pRestAPIId_-    }+  CreateDeployment'+  { _cdStageDescription = Nothing+  , _cdVariables = Nothing+  , _cdCacheClusterSize = Nothing+  , _cdCacheClusterEnabled = Nothing+  , _cdStageName = Nothing+  , _cdDescription = Nothing+  , _cdRestAPIId = pRestAPIId_+  } + -- | The description of the 'Stage' resource for the 'Deployment' resource to create. cdStageDescription :: Lens' CreateDeployment (Maybe Text) cdStageDescription = lens _cdStageDescription (\ s a -> s{_cdStageDescription = a});@@ -122,7 +124,7 @@ cdDescription :: Lens' CreateDeployment (Maybe Text) cdDescription = lens _cdDescription (\ s a -> s{_cdDescription = a}); --- | The 'RestApi' resource identifier for the 'Deployment' resource to create.+-- | The string identifier of the associated 'RestApi' . cdRestAPIId :: Lens' CreateDeployment Text cdRestAPIId = lens _cdRestAPIId (\ s a -> s{_cdRestAPIId = a}); @@ -131,9 +133,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateDeployment+instance Hashable CreateDeployment where -instance NFData CreateDeployment+instance NFData CreateDeployment where  instance ToHeaders CreateDeployment where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateDocumentationPart--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -38,12 +38,12 @@     , dpProperties     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Creates a new documentation part of a given API. --@@ -51,16 +51,17 @@ -- -- /See:/ 'createDocumentationPart' smart constructor. data CreateDocumentationPart = CreateDocumentationPart'-    { _cdpRestAPIId  :: !Text-    , _cdpLocation   :: !DocumentationPartLocation-    , _cdpProperties :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cdpRestAPIId  :: !Text+  , _cdpLocation   :: !DocumentationPartLocation+  , _cdpProperties :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateDocumentationPart' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cdpRestAPIId' - [Required] The identifier of an API of the to-be-created documentation part.+-- * 'cdpRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'cdpLocation' - [Required] The location of the targeted API entity of the to-be-created documentation part. --@@ -71,13 +72,14 @@     -> Text -- ^ 'cdpProperties'     -> CreateDocumentationPart createDocumentationPart pRestAPIId_ pLocation_ pProperties_ =-    CreateDocumentationPart'-    { _cdpRestAPIId = pRestAPIId_-    , _cdpLocation = pLocation_-    , _cdpProperties = pProperties_-    }+  CreateDocumentationPart'+  { _cdpRestAPIId = pRestAPIId_+  , _cdpLocation = pLocation_+  , _cdpProperties = pProperties_+  } --- | [Required] The identifier of an API of the to-be-created documentation part.++-- | [Required] The string identifier of the associated 'RestApi' . cdpRestAPIId :: Lens' CreateDocumentationPart Text cdpRestAPIId = lens _cdpRestAPIId (\ s a -> s{_cdpRestAPIId = a}); @@ -94,9 +96,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateDocumentationPart+instance Hashable CreateDocumentationPart where -instance NFData CreateDocumentationPart+instance NFData CreateDocumentationPart where  instance ToHeaders CreateDocumentationPart where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateDocumentationVersion--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -39,12 +39,12 @@     , dvDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Creates a new documentation version of a given API. --@@ -52,12 +52,13 @@ -- -- /See:/ 'createDocumentationVersion' smart constructor. data CreateDocumentationVersion = CreateDocumentationVersion'-    { _cdvStageName            :: !(Maybe Text)-    , _cdvDescription          :: !(Maybe Text)-    , _cdvRestAPIId            :: !Text-    , _cdvDocumentationVersion :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cdvStageName            :: !(Maybe Text)+  , _cdvDescription          :: !(Maybe Text)+  , _cdvRestAPIId            :: !Text+  , _cdvDocumentationVersion :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateDocumentationVersion' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -66,7 +67,7 @@ -- -- * 'cdvDescription' - A description about the new documentation snapshot. ----- * 'cdvRestAPIId' - [Required] Specifies the API identifier of the to-be-created documentation version.+-- * 'cdvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'cdvDocumentationVersion' - [Required] The version identifier of the new snapshot. createDocumentationVersion@@ -74,13 +75,14 @@     -> Text -- ^ 'cdvDocumentationVersion'     -> CreateDocumentationVersion createDocumentationVersion pRestAPIId_ pDocumentationVersion_ =-    CreateDocumentationVersion'-    { _cdvStageName = Nothing-    , _cdvDescription = Nothing-    , _cdvRestAPIId = pRestAPIId_-    , _cdvDocumentationVersion = pDocumentationVersion_-    }+  CreateDocumentationVersion'+  { _cdvStageName = Nothing+  , _cdvDescription = Nothing+  , _cdvRestAPIId = pRestAPIId_+  , _cdvDocumentationVersion = pDocumentationVersion_+  } + -- | The stage name to be associated with the new documentation snapshot. cdvStageName :: Lens' CreateDocumentationVersion (Maybe Text) cdvStageName = lens _cdvStageName (\ s a -> s{_cdvStageName = a});@@ -89,7 +91,7 @@ cdvDescription :: Lens' CreateDocumentationVersion (Maybe Text) cdvDescription = lens _cdvDescription (\ s a -> s{_cdvDescription = a}); --- | [Required] Specifies the API identifier of the to-be-created documentation version.+-- | [Required] The string identifier of the associated 'RestApi' . cdvRestAPIId :: Lens' CreateDocumentationVersion Text cdvRestAPIId = lens _cdvRestAPIId (\ s a -> s{_cdvRestAPIId = a}); @@ -103,9 +105,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateDocumentationVersion+instance Hashable CreateDocumentationVersion where -instance NFData CreateDocumentationVersion+instance NFData CreateDocumentationVersion where  instance ToHeaders CreateDocumentationVersion where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateDomainName--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -27,28 +27,37 @@       createDomainName     , CreateDomainName     -- * Request Lenses-    , cdnDomainName     , cdnCertificateName-    , cdnCertificateBody+    , cdnRegionalCertificateARN+    , cdnCertificateARN     , cdnCertificatePrivateKey+    , cdnRegionalCertificateName+    , cdnCertificateBody     , cdnCertificateChain+    , cdnEndpointConfiguration+    , cdnDomainName      -- * Destructuring the Response     , domainName     , DomainName     -- * Response Lenses     , dnCertificateName+    , dnRegionalCertificateARN+    , dnCertificateARN     , dnDomainName+    , dnRegionalCertificateName+    , dnRegionalDomainName     , dnCertificateUploadDate     , dnDistributionDomainName+    , dnEndpointConfiguration     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to create a new domain name. --@@ -56,70 +65,100 @@ -- -- /See:/ 'createDomainName' smart constructor. data CreateDomainName = CreateDomainName'-    { _cdnDomainName            :: !Text-    , _cdnCertificateName       :: !Text-    , _cdnCertificateBody       :: !Text-    , _cdnCertificatePrivateKey :: !Text-    , _cdnCertificateChain      :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cdnCertificateName         :: !(Maybe Text)+  , _cdnRegionalCertificateARN  :: !(Maybe Text)+  , _cdnCertificateARN          :: !(Maybe Text)+  , _cdnCertificatePrivateKey   :: !(Maybe Text)+  , _cdnRegionalCertificateName :: !(Maybe Text)+  , _cdnCertificateBody         :: !(Maybe Text)+  , _cdnCertificateChain        :: !(Maybe Text)+  , _cdnEndpointConfiguration   :: !(Maybe EndpointConfiguration)+  , _cdnDomainName              :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateDomainName' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cdnDomainName' - The name of the 'DomainName' resource.+-- * 'cdnCertificateName' - The user-friendly name of the certificate that will be used by edge-optimized endpoint for this domain name. ----- * 'cdnCertificateName' - The name of the certificate.+-- * 'cdnRegionalCertificateARN' - The reference to an AWS-managed certificate that will be used by regional endpoint for this domain name. AWS Certificate Manager is the only supported source. ----- * 'cdnCertificateBody' - The body of the server certificate provided by your certificate authority.+-- * 'cdnCertificateARN' - The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source. ----- * 'cdnCertificatePrivateKey' - Your certificate's private key.+-- * 'cdnCertificatePrivateKey' - [Deprecated] Your edge-optimized endpoint's domain name certificate's private key. ----- * 'cdnCertificateChain' - The intermediate certificates and optionally the root certificate, one after the other without any blank lines. If you include the root certificate, your certificate chain must start with intermediate certificates and end with the root certificate. Use the intermediate certificates that were provided by your certificate authority. Do not include any intermediaries that are not in the chain of trust path.+-- * 'cdnRegionalCertificateName' - The user-friendly name of the certificate that will be used by regional endpoint for this domain name.+--+-- * 'cdnCertificateBody' - [Deprecated] The body of the server certificate that will be used by edge-optimized endpoint for this domain name provided by your certificate authority.+--+-- * 'cdnCertificateChain' - [Deprecated] The intermediate certificates and optionally the root certificate, one after the other without any blank lines, used by an edge-optimized endpoint for this domain name. If you include the root certificate, your certificate chain must start with intermediate certificates and end with the root certificate. Use the intermediate certificates that were provided by your certificate authority. Do not include any intermediaries that are not in the chain of trust path.+--+-- * 'cdnEndpointConfiguration' - The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.+--+-- * 'cdnDomainName' - (Required) The name of the 'DomainName' resource. createDomainName     :: Text -- ^ 'cdnDomainName'-    -> Text -- ^ 'cdnCertificateName'-    -> Text -- ^ 'cdnCertificateBody'-    -> Text -- ^ 'cdnCertificatePrivateKey'-    -> Text -- ^ 'cdnCertificateChain'     -> CreateDomainName-createDomainName pDomainName_ pCertificateName_ pCertificateBody_ pCertificatePrivateKey_ pCertificateChain_ =-    CreateDomainName'-    { _cdnDomainName = pDomainName_-    , _cdnCertificateName = pCertificateName_-    , _cdnCertificateBody = pCertificateBody_-    , _cdnCertificatePrivateKey = pCertificatePrivateKey_-    , _cdnCertificateChain = pCertificateChain_-    }+createDomainName pDomainName_ =+  CreateDomainName'+  { _cdnCertificateName = Nothing+  , _cdnRegionalCertificateARN = Nothing+  , _cdnCertificateARN = Nothing+  , _cdnCertificatePrivateKey = Nothing+  , _cdnRegionalCertificateName = Nothing+  , _cdnCertificateBody = Nothing+  , _cdnCertificateChain = Nothing+  , _cdnEndpointConfiguration = Nothing+  , _cdnDomainName = pDomainName_+  } --- | The name of the 'DomainName' resource.-cdnDomainName :: Lens' CreateDomainName Text-cdnDomainName = lens _cdnDomainName (\ s a -> s{_cdnDomainName = a}); --- | The name of the certificate.-cdnCertificateName :: Lens' CreateDomainName Text+-- | The user-friendly name of the certificate that will be used by edge-optimized endpoint for this domain name.+cdnCertificateName :: Lens' CreateDomainName (Maybe Text) cdnCertificateName = lens _cdnCertificateName (\ s a -> s{_cdnCertificateName = a}); --- | The body of the server certificate provided by your certificate authority.-cdnCertificateBody :: Lens' CreateDomainName Text-cdnCertificateBody = lens _cdnCertificateBody (\ s a -> s{_cdnCertificateBody = a});+-- | The reference to an AWS-managed certificate that will be used by regional endpoint for this domain name. AWS Certificate Manager is the only supported source.+cdnRegionalCertificateARN :: Lens' CreateDomainName (Maybe Text)+cdnRegionalCertificateARN = lens _cdnRegionalCertificateARN (\ s a -> s{_cdnRegionalCertificateARN = a}); --- | Your certificate's private key.-cdnCertificatePrivateKey :: Lens' CreateDomainName Text+-- | The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source.+cdnCertificateARN :: Lens' CreateDomainName (Maybe Text)+cdnCertificateARN = lens _cdnCertificateARN (\ s a -> s{_cdnCertificateARN = a});++-- | [Deprecated] Your edge-optimized endpoint's domain name certificate's private key.+cdnCertificatePrivateKey :: Lens' CreateDomainName (Maybe Text) cdnCertificatePrivateKey = lens _cdnCertificatePrivateKey (\ s a -> s{_cdnCertificatePrivateKey = a}); --- | The intermediate certificates and optionally the root certificate, one after the other without any blank lines. If you include the root certificate, your certificate chain must start with intermediate certificates and end with the root certificate. Use the intermediate certificates that were provided by your certificate authority. Do not include any intermediaries that are not in the chain of trust path.-cdnCertificateChain :: Lens' CreateDomainName Text+-- | The user-friendly name of the certificate that will be used by regional endpoint for this domain name.+cdnRegionalCertificateName :: Lens' CreateDomainName (Maybe Text)+cdnRegionalCertificateName = lens _cdnRegionalCertificateName (\ s a -> s{_cdnRegionalCertificateName = a});++-- | [Deprecated] The body of the server certificate that will be used by edge-optimized endpoint for this domain name provided by your certificate authority.+cdnCertificateBody :: Lens' CreateDomainName (Maybe Text)+cdnCertificateBody = lens _cdnCertificateBody (\ s a -> s{_cdnCertificateBody = a});++-- | [Deprecated] The intermediate certificates and optionally the root certificate, one after the other without any blank lines, used by an edge-optimized endpoint for this domain name. If you include the root certificate, your certificate chain must start with intermediate certificates and end with the root certificate. Use the intermediate certificates that were provided by your certificate authority. Do not include any intermediaries that are not in the chain of trust path.+cdnCertificateChain :: Lens' CreateDomainName (Maybe Text) cdnCertificateChain = lens _cdnCertificateChain (\ s a -> s{_cdnCertificateChain = a}); +-- | The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.+cdnEndpointConfiguration :: Lens' CreateDomainName (Maybe EndpointConfiguration)+cdnEndpointConfiguration = lens _cdnEndpointConfiguration (\ s a -> s{_cdnEndpointConfiguration = a});++-- | (Required) The name of the 'DomainName' resource.+cdnDomainName :: Lens' CreateDomainName Text+cdnDomainName = lens _cdnDomainName (\ s a -> s{_cdnDomainName = a});+ instance AWSRequest CreateDomainName where         type Rs CreateDomainName = DomainName         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateDomainName+instance Hashable CreateDomainName where -instance NFData CreateDomainName+instance NFData CreateDomainName where  instance ToHeaders CreateDomainName where         toHeaders@@ -131,13 +170,19 @@         toJSON CreateDomainName'{..}           = object               (catMaybes-                 [Just ("domainName" .= _cdnDomainName),-                  Just ("certificateName" .= _cdnCertificateName),-                  Just ("certificateBody" .= _cdnCertificateBody),-                  Just-                    ("certificatePrivateKey" .=-                       _cdnCertificatePrivateKey),-                  Just ("certificateChain" .= _cdnCertificateChain)])+                 [("certificateName" .=) <$> _cdnCertificateName,+                  ("regionalCertificateArn" .=) <$>+                    _cdnRegionalCertificateARN,+                  ("certificateArn" .=) <$> _cdnCertificateARN,+                  ("certificatePrivateKey" .=) <$>+                    _cdnCertificatePrivateKey,+                  ("regionalCertificateName" .=) <$>+                    _cdnRegionalCertificateName,+                  ("certificateBody" .=) <$> _cdnCertificateBody,+                  ("certificateChain" .=) <$> _cdnCertificateChain,+                  ("endpointConfiguration" .=) <$>+                    _cdnEndpointConfiguration,+                  Just ("domainName" .= _cdnDomainName)])  instance ToPath CreateDomainName where         toPath = const "/domainnames"

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateModel--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -44,12 +44,12 @@     , mContentType     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to add a new 'Model' to an existing 'RestApi' resource. --@@ -57,13 +57,14 @@ -- -- /See:/ 'createModel' smart constructor. data CreateModel = CreateModel'-    { _cmSchema      :: !(Maybe Text)-    , _cmDescription :: !(Maybe Text)-    , _cmRestAPIId   :: !Text-    , _cmName        :: !Text-    , _cmContentType :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cmSchema      :: !(Maybe Text)+  , _cmDescription :: !(Maybe Text)+  , _cmRestAPIId   :: !Text+  , _cmName        :: !Text+  , _cmContentType :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateModel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -74,7 +75,7 @@ -- -- * 'cmRestAPIId' - The 'RestApi' identifier under which the 'Model' will be created. ----- * 'cmName' - The name of the model.+-- * 'cmName' - The name of the model. Must be alphanumeric. -- -- * 'cmContentType' - The content-type for the model. createModel@@ -83,14 +84,15 @@     -> Text -- ^ 'cmContentType'     -> CreateModel createModel pRestAPIId_ pName_ pContentType_ =-    CreateModel'-    { _cmSchema = Nothing-    , _cmDescription = Nothing-    , _cmRestAPIId = pRestAPIId_-    , _cmName = pName_-    , _cmContentType = pContentType_-    }+  CreateModel'+  { _cmSchema = Nothing+  , _cmDescription = Nothing+  , _cmRestAPIId = pRestAPIId_+  , _cmName = pName_+  , _cmContentType = pContentType_+  } + -- | The schema for the model. For @application/json@ models, this should be <http://json-schema.org/documentation.html JSON-schema draft v4> model. cmSchema :: Lens' CreateModel (Maybe Text) cmSchema = lens _cmSchema (\ s a -> s{_cmSchema = a});@@ -103,7 +105,7 @@ cmRestAPIId :: Lens' CreateModel Text cmRestAPIId = lens _cmRestAPIId (\ s a -> s{_cmRestAPIId = a}); --- | The name of the model.+-- | The name of the model. Must be alphanumeric. cmName :: Lens' CreateModel Text cmName = lens _cmName (\ s a -> s{_cmName = a}); @@ -116,9 +118,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateModel+instance Hashable CreateModel where -instance NFData CreateModel+instance NFData CreateModel where  instance ToHeaders CreateModel where         toHeaders

@@ -0,0 +1,136 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.APIGateway.CreateRequestValidator+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a 'ReqeustValidator' of a given 'RestApi' .+--+--+module Network.AWS.APIGateway.CreateRequestValidator+    (+    -- * Creating a Request+      createRequestValidator+    , CreateRequestValidator+    -- * Request Lenses+    , crvValidateRequestParameters+    , crvName+    , crvValidateRequestBody+    , crvRestAPIId++    -- * Destructuring the Response+    , requestValidator+    , RequestValidator+    -- * Response Lenses+    , rvValidateRequestParameters+    , rvName+    , rvValidateRequestBody+    , rvId+    ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Creates a 'RequestValidator' of a given 'RestApi' .+--+--+--+-- /See:/ 'createRequestValidator' smart constructor.+data CreateRequestValidator = CreateRequestValidator'+  { _crvValidateRequestParameters :: !(Maybe Bool)+  , _crvName                      :: !(Maybe Text)+  , _crvValidateRequestBody       :: !(Maybe Bool)+  , _crvRestAPIId                 :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'CreateRequestValidator' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'crvValidateRequestParameters' - A Boolean flag to indicate whether to validate request parameters, @true@ , or not @false@ .+--+-- * 'crvName' - The name of the to-be-created 'RequestValidator' .+--+-- * 'crvValidateRequestBody' - A Boolean flag to indicate whether to validate request body according to the configured model schema for the method (@true@ ) or not (@false@ ).+--+-- * 'crvRestAPIId' - The string identifier of the associated 'RestApi' .+createRequestValidator+    :: Text -- ^ 'crvRestAPIId'+    -> CreateRequestValidator+createRequestValidator pRestAPIId_ =+  CreateRequestValidator'+  { _crvValidateRequestParameters = Nothing+  , _crvName = Nothing+  , _crvValidateRequestBody = Nothing+  , _crvRestAPIId = pRestAPIId_+  }+++-- | A Boolean flag to indicate whether to validate request parameters, @true@ , or not @false@ .+crvValidateRequestParameters :: Lens' CreateRequestValidator (Maybe Bool)+crvValidateRequestParameters = lens _crvValidateRequestParameters (\ s a -> s{_crvValidateRequestParameters = a});++-- | The name of the to-be-created 'RequestValidator' .+crvName :: Lens' CreateRequestValidator (Maybe Text)+crvName = lens _crvName (\ s a -> s{_crvName = a});++-- | A Boolean flag to indicate whether to validate request body according to the configured model schema for the method (@true@ ) or not (@false@ ).+crvValidateRequestBody :: Lens' CreateRequestValidator (Maybe Bool)+crvValidateRequestBody = lens _crvValidateRequestBody (\ s a -> s{_crvValidateRequestBody = a});++-- | The string identifier of the associated 'RestApi' .+crvRestAPIId :: Lens' CreateRequestValidator Text+crvRestAPIId = lens _crvRestAPIId (\ s a -> s{_crvRestAPIId = a});++instance AWSRequest CreateRequestValidator where+        type Rs CreateRequestValidator = RequestValidator+        request = postJSON apiGateway+        response = receiveJSON (\ s h x -> eitherParseJSON x)++instance Hashable CreateRequestValidator where++instance NFData CreateRequestValidator where++instance ToHeaders CreateRequestValidator where+        toHeaders+          = const+              (mconcat+                 ["Accept" =# ("application/json" :: ByteString)])++instance ToJSON CreateRequestValidator where+        toJSON CreateRequestValidator'{..}+          = object+              (catMaybes+                 [("validateRequestParameters" .=) <$>+                    _crvValidateRequestParameters,+                  ("name" .=) <$> _crvName,+                  ("validateRequestBody" .=) <$>+                    _crvValidateRequestBody])++instance ToPath CreateRequestValidator where+        toPath CreateRequestValidator'{..}+          = mconcat+              ["/restapis/", toBS _crvRestAPIId,+               "/requestvalidators"]++instance ToQuery CreateRequestValidator where+        toQuery = const mempty

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateResource--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -42,12 +42,12 @@     , rParentId     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to create a 'Resource' resource. --@@ -55,16 +55,17 @@ -- -- /See:/ 'createResource' smart constructor. data CreateResource = CreateResource'-    { _crRestAPIId :: !Text-    , _crParentId  :: !Text-    , _crPathPart  :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _crRestAPIId :: !Text+  , _crParentId  :: !Text+  , _crPathPart  :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateResource' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'crRestAPIId' - The identifier of the 'RestApi' for the resource.+-- * 'crRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'crParentId' - The parent resource's identifier. --@@ -75,13 +76,14 @@     -> Text -- ^ 'crPathPart'     -> CreateResource createResource pRestAPIId_ pParentId_ pPathPart_ =-    CreateResource'-    { _crRestAPIId = pRestAPIId_-    , _crParentId = pParentId_-    , _crPathPart = pPathPart_-    }+  CreateResource'+  { _crRestAPIId = pRestAPIId_+  , _crParentId = pParentId_+  , _crPathPart = pPathPart_+  } --- | The identifier of the 'RestApi' for the resource.++-- | The string identifier of the associated 'RestApi' . crRestAPIId :: Lens' CreateResource Text crRestAPIId = lens _crRestAPIId (\ s a -> s{_crRestAPIId = a}); @@ -98,9 +100,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateResource+instance Hashable CreateResource where -instance NFData CreateResource+instance NFData CreateResource where  instance ToHeaders CreateResource where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateRestAPI--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -30,6 +30,7 @@     , craBinaryMediaTypes     , craVersion     , craCloneFrom+    , craEndpointConfiguration     , craDescription     , craName @@ -43,15 +44,16 @@     , raName     , raVersion     , raId+    , raEndpointConfiguration     , raDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | The POST Request to add a new 'RestApi' resource to your collection. --@@ -59,13 +61,15 @@ -- -- /See:/ 'createRestAPI' smart constructor. data CreateRestAPI = CreateRestAPI'-    { _craBinaryMediaTypes :: !(Maybe [Text])-    , _craVersion          :: !(Maybe Text)-    , _craCloneFrom        :: !(Maybe Text)-    , _craDescription      :: !(Maybe Text)-    , _craName             :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _craBinaryMediaTypes      :: !(Maybe [Text])+  , _craVersion               :: !(Maybe Text)+  , _craCloneFrom             :: !(Maybe Text)+  , _craEndpointConfiguration :: !(Maybe EndpointConfiguration)+  , _craDescription           :: !(Maybe Text)+  , _craName                  :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateRestAPI' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -76,6 +80,8 @@ -- -- * 'craCloneFrom' - The ID of the 'RestApi' that you want to clone from. --+-- * 'craEndpointConfiguration' - The endpoint configuration of this 'RestApi' showing the endpoint types of the API.+-- -- * 'craDescription' - The description of the 'RestApi' . -- -- * 'craName' - The name of the 'RestApi' .@@ -83,14 +89,16 @@     :: Text -- ^ 'craName'     -> CreateRestAPI createRestAPI pName_ =-    CreateRestAPI'-    { _craBinaryMediaTypes = Nothing-    , _craVersion = Nothing-    , _craCloneFrom = Nothing-    , _craDescription = Nothing-    , _craName = pName_-    }+  CreateRestAPI'+  { _craBinaryMediaTypes = Nothing+  , _craVersion = Nothing+  , _craCloneFrom = Nothing+  , _craEndpointConfiguration = Nothing+  , _craDescription = Nothing+  , _craName = pName_+  } + -- | The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads. craBinaryMediaTypes :: Lens' CreateRestAPI [Text] craBinaryMediaTypes = lens _craBinaryMediaTypes (\ s a -> s{_craBinaryMediaTypes = a}) . _Default . _Coerce;@@ -103,6 +111,10 @@ craCloneFrom :: Lens' CreateRestAPI (Maybe Text) craCloneFrom = lens _craCloneFrom (\ s a -> s{_craCloneFrom = a}); +-- | The endpoint configuration of this 'RestApi' showing the endpoint types of the API.+craEndpointConfiguration :: Lens' CreateRestAPI (Maybe EndpointConfiguration)+craEndpointConfiguration = lens _craEndpointConfiguration (\ s a -> s{_craEndpointConfiguration = a});+ -- | The description of the 'RestApi' . craDescription :: Lens' CreateRestAPI (Maybe Text) craDescription = lens _craDescription (\ s a -> s{_craDescription = a});@@ -116,9 +128,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateRestAPI+instance Hashable CreateRestAPI where -instance NFData CreateRestAPI+instance NFData CreateRestAPI where  instance ToHeaders CreateRestAPI where         toHeaders@@ -133,6 +145,8 @@                  [("binaryMediaTypes" .=) <$> _craBinaryMediaTypes,                   ("version" .=) <$> _craVersion,                   ("cloneFrom" .=) <$> _craCloneFrom,+                  ("endpointConfiguration" .=) <$>+                    _craEndpointConfiguration,                   ("description" .=) <$> _craDescription,                   Just ("name" .= _craName)]) 

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateStage--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -54,12 +54,12 @@     , sDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to create a 'Stage' resource. --@@ -67,16 +67,17 @@ -- -- /See:/ 'createStage' smart constructor. data CreateStage = CreateStage'-    { _csVariables            :: !(Maybe (Map Text Text))-    , _csDocumentationVersion :: !(Maybe Text)-    , _csCacheClusterSize     :: !(Maybe CacheClusterSize)-    , _csCacheClusterEnabled  :: !(Maybe Bool)-    , _csDescription          :: !(Maybe Text)-    , _csRestAPIId            :: !Text-    , _csStageName            :: !Text-    , _csDeploymentId         :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _csVariables            :: !(Maybe (Map Text Text))+  , _csDocumentationVersion :: !(Maybe Text)+  , _csCacheClusterSize     :: !(Maybe CacheClusterSize)+  , _csCacheClusterEnabled  :: !(Maybe Bool)+  , _csDescription          :: !(Maybe Text)+  , _csRestAPIId            :: !Text+  , _csStageName            :: !Text+  , _csDeploymentId         :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateStage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -91,7 +92,7 @@ -- -- * 'csDescription' - The description of the 'Stage' resource. ----- * 'csRestAPIId' - The identifier of the 'RestApi' resource for the 'Stage' resource to create.+-- * 'csRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'csStageName' - The name for the 'Stage' resource. --@@ -102,17 +103,18 @@     -> Text -- ^ 'csDeploymentId'     -> CreateStage createStage pRestAPIId_ pStageName_ pDeploymentId_ =-    CreateStage'-    { _csVariables = Nothing-    , _csDocumentationVersion = Nothing-    , _csCacheClusterSize = Nothing-    , _csCacheClusterEnabled = Nothing-    , _csDescription = Nothing-    , _csRestAPIId = pRestAPIId_-    , _csStageName = pStageName_-    , _csDeploymentId = pDeploymentId_-    }+  CreateStage'+  { _csVariables = Nothing+  , _csDocumentationVersion = Nothing+  , _csCacheClusterSize = Nothing+  , _csCacheClusterEnabled = Nothing+  , _csDescription = Nothing+  , _csRestAPIId = pRestAPIId_+  , _csStageName = pStageName_+  , _csDeploymentId = pDeploymentId_+  } + -- | A map that defines the stage variables for the new 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ . csVariables :: Lens' CreateStage (HashMap Text Text) csVariables = lens _csVariables (\ s a -> s{_csVariables = a}) . _Default . _Map;@@ -133,7 +135,7 @@ csDescription :: Lens' CreateStage (Maybe Text) csDescription = lens _csDescription (\ s a -> s{_csDescription = a}); --- | The identifier of the 'RestApi' resource for the 'Stage' resource to create.+-- | The string identifier of the associated 'RestApi' . csRestAPIId :: Lens' CreateStage Text csRestAPIId = lens _csRestAPIId (\ s a -> s{_csRestAPIId = a}); @@ -150,9 +152,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateStage+instance Hashable CreateStage where -instance NFData CreateStage+instance NFData CreateStage where  instance ToHeaders CreateStage where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateUsagePlan--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -46,12 +46,12 @@     , upProductCode     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | The POST request to create a usage plan with the name, description, throttle limits and quota limits, as well as the associated API stages, specified in the payload. --@@ -59,13 +59,14 @@ -- -- /See:/ 'createUsagePlan' smart constructor. data CreateUsagePlan = CreateUsagePlan'-    { _cupApiStages   :: !(Maybe [APIStage])-    , _cupThrottle    :: !(Maybe ThrottleSettings)-    , _cupQuota       :: !(Maybe QuotaSettings)-    , _cupDescription :: !(Maybe Text)-    , _cupName        :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cupApiStages   :: !(Maybe [APIStage])+  , _cupThrottle    :: !(Maybe ThrottleSettings)+  , _cupQuota       :: !(Maybe QuotaSettings)+  , _cupDescription :: !(Maybe Text)+  , _cupName        :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateUsagePlan' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -83,14 +84,15 @@     :: Text -- ^ 'cupName'     -> CreateUsagePlan createUsagePlan pName_ =-    CreateUsagePlan'-    { _cupApiStages = Nothing-    , _cupThrottle = Nothing-    , _cupQuota = Nothing-    , _cupDescription = Nothing-    , _cupName = pName_-    }+  CreateUsagePlan'+  { _cupApiStages = Nothing+  , _cupThrottle = Nothing+  , _cupQuota = Nothing+  , _cupDescription = Nothing+  , _cupName = pName_+  } + -- | The associated API stages of the usage plan. cupApiStages :: Lens' CreateUsagePlan [APIStage] cupApiStages = lens _cupApiStages (\ s a -> s{_cupApiStages = a}) . _Default . _Coerce;@@ -116,9 +118,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateUsagePlan+instance Hashable CreateUsagePlan where -instance NFData CreateUsagePlan+instance NFData CreateUsagePlan where  instance ToHeaders CreateUsagePlan where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.CreateUsagePlanKey--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,12 +41,12 @@     , upkType     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | The POST request to create a usage plan key for adding an existing API key to a usage plan. --@@ -54,11 +54,12 @@ -- -- /See:/ 'createUsagePlanKey' smart constructor. data CreateUsagePlanKey = CreateUsagePlanKey'-    { _cupkUsagePlanId :: !Text-    , _cupkKeyId       :: !Text-    , _cupkKeyType     :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cupkUsagePlanId :: !Text+  , _cupkKeyId       :: !Text+  , _cupkKeyType     :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateUsagePlanKey' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -74,12 +75,13 @@     -> Text -- ^ 'cupkKeyType'     -> CreateUsagePlanKey createUsagePlanKey pUsagePlanId_ pKeyId_ pKeyType_ =-    CreateUsagePlanKey'-    { _cupkUsagePlanId = pUsagePlanId_-    , _cupkKeyId = pKeyId_-    , _cupkKeyType = pKeyType_-    }+  CreateUsagePlanKey'+  { _cupkUsagePlanId = pUsagePlanId_+  , _cupkKeyId = pKeyId_+  , _cupkKeyType = pKeyType_+  } + -- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-created 'UsagePlanKey' resource representing a plan customer. cupkUsagePlanId :: Lens' CreateUsagePlanKey Text cupkUsagePlanId = lens _cupkUsagePlanId (\ s a -> s{_cupkUsagePlanId = a});@@ -97,9 +99,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable CreateUsagePlanKey+instance Hashable CreateUsagePlanKey where -instance NFData CreateUsagePlanKey+instance NFData CreateUsagePlanKey where  instance ToHeaders CreateUsagePlanKey where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteAPIKey--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,12 +34,12 @@     , DeleteAPIKeyResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to delete the 'ApiKey' resource. --@@ -47,9 +47,10 @@ -- -- /See:/ 'deleteAPIKey' smart constructor. newtype DeleteAPIKey = DeleteAPIKey'-    { _dakApiKey :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dakApiKey :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteAPIKey' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -58,11 +59,9 @@ deleteAPIKey     :: Text -- ^ 'dakApiKey'     -> DeleteAPIKey-deleteAPIKey pApiKey_ =-    DeleteAPIKey'-    { _dakApiKey = pApiKey_-    }+deleteAPIKey pApiKey_ = DeleteAPIKey' {_dakApiKey = pApiKey_} + -- | The identifier of the 'ApiKey' resource to be deleted. dakApiKey :: Lens' DeleteAPIKey Text dakApiKey = lens _dakApiKey (\ s a -> s{_dakApiKey = a});@@ -72,9 +71,9 @@         request = delete apiGateway         response = receiveNull DeleteAPIKeyResponse' -instance Hashable DeleteAPIKey+instance Hashable DeleteAPIKey where -instance NFData DeleteAPIKey+instance NFData DeleteAPIKey where  instance ToHeaders DeleteAPIKey where         toHeaders@@ -91,13 +90,15 @@  -- | /See:/ 'deleteAPIKeyResponse' smart constructor. data DeleteAPIKeyResponse =-    DeleteAPIKeyResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteAPIKeyResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteAPIKeyResponse' with the minimum fields required to make a request. -- deleteAPIKeyResponse     :: DeleteAPIKeyResponse deleteAPIKeyResponse = DeleteAPIKeyResponse' -instance NFData DeleteAPIKeyResponse++instance NFData DeleteAPIKeyResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteAuthorizer--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -36,12 +36,12 @@     , DeleteAuthorizerResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to delete an existing 'Authorizer' resource. --@@ -49,15 +49,16 @@ -- -- /See:/ 'deleteAuthorizer' smart constructor. data DeleteAuthorizer = DeleteAuthorizer'-    { _daRestAPIId    :: !Text-    , _daAuthorizerId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _daRestAPIId    :: !Text+  , _daAuthorizerId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteAuthorizer' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'daRestAPIId' - The 'RestApi' identifier for the 'Authorizer' resource.+-- * 'daRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'daAuthorizerId' - The identifier of the 'Authorizer' resource. deleteAuthorizer@@ -65,12 +66,11 @@     -> Text -- ^ 'daAuthorizerId'     -> DeleteAuthorizer deleteAuthorizer pRestAPIId_ pAuthorizerId_ =-    DeleteAuthorizer'-    { _daRestAPIId = pRestAPIId_-    , _daAuthorizerId = pAuthorizerId_-    }+  DeleteAuthorizer'+  {_daRestAPIId = pRestAPIId_, _daAuthorizerId = pAuthorizerId_} --- | The 'RestApi' identifier for the 'Authorizer' resource.++-- | The string identifier of the associated 'RestApi' . daRestAPIId :: Lens' DeleteAuthorizer Text daRestAPIId = lens _daRestAPIId (\ s a -> s{_daRestAPIId = a}); @@ -83,9 +83,9 @@         request = delete apiGateway         response = receiveNull DeleteAuthorizerResponse' -instance Hashable DeleteAuthorizer+instance Hashable DeleteAuthorizer where -instance NFData DeleteAuthorizer+instance NFData DeleteAuthorizer where  instance ToHeaders DeleteAuthorizer where         toHeaders@@ -104,13 +104,15 @@  -- | /See:/ 'deleteAuthorizerResponse' smart constructor. data DeleteAuthorizerResponse =-    DeleteAuthorizerResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteAuthorizerResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteAuthorizerResponse' with the minimum fields required to make a request. -- deleteAuthorizerResponse     :: DeleteAuthorizerResponse deleteAuthorizerResponse = DeleteAuthorizerResponse' -instance NFData DeleteAuthorizerResponse++instance NFData DeleteAuthorizerResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteBasePathMapping--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteBasePathMappingResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to delete the 'BasePathMapping' resource. --@@ -48,10 +48,11 @@ -- -- /See:/ 'deleteBasePathMapping' smart constructor. data DeleteBasePathMapping = DeleteBasePathMapping'-    { _dbpmDomainName :: !Text-    , _dbpmBasePath   :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dbpmDomainName :: !Text+  , _dbpmBasePath   :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteBasePathMapping' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,11 +65,10 @@     -> Text -- ^ 'dbpmBasePath'     -> DeleteBasePathMapping deleteBasePathMapping pDomainName_ pBasePath_ =-    DeleteBasePathMapping'-    { _dbpmDomainName = pDomainName_-    , _dbpmBasePath = pBasePath_-    }+  DeleteBasePathMapping'+  {_dbpmDomainName = pDomainName_, _dbpmBasePath = pBasePath_} + -- | The domain name of the 'BasePathMapping' resource to delete. dbpmDomainName :: Lens' DeleteBasePathMapping Text dbpmDomainName = lens _dbpmDomainName (\ s a -> s{_dbpmDomainName = a});@@ -83,9 +83,9 @@         request = delete apiGateway         response = receiveNull DeleteBasePathMappingResponse' -instance Hashable DeleteBasePathMapping+instance Hashable DeleteBasePathMapping where -instance NFData DeleteBasePathMapping+instance NFData DeleteBasePathMapping where  instance ToHeaders DeleteBasePathMapping where         toHeaders@@ -104,13 +104,15 @@  -- | /See:/ 'deleteBasePathMappingResponse' smart constructor. data DeleteBasePathMappingResponse =-    DeleteBasePathMappingResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteBasePathMappingResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteBasePathMappingResponse' with the minimum fields required to make a request. -- deleteBasePathMappingResponse     :: DeleteBasePathMappingResponse deleteBasePathMappingResponse = DeleteBasePathMappingResponse' -instance NFData DeleteBasePathMappingResponse++instance NFData DeleteBasePathMappingResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteClientCertificate--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,12 +34,12 @@     , DeleteClientCertificateResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to delete the 'ClientCertificate' resource. --@@ -47,9 +47,10 @@ -- -- /See:/ 'deleteClientCertificate' smart constructor. newtype DeleteClientCertificate = DeleteClientCertificate'-    { _dccClientCertificateId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dccClientCertificateId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteClientCertificate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -59,10 +60,9 @@     :: Text -- ^ 'dccClientCertificateId'     -> DeleteClientCertificate deleteClientCertificate pClientCertificateId_ =-    DeleteClientCertificate'-    { _dccClientCertificateId = pClientCertificateId_-    }+  DeleteClientCertificate' {_dccClientCertificateId = pClientCertificateId_} + -- | The identifier of the 'ClientCertificate' resource to be deleted. dccClientCertificateId :: Lens' DeleteClientCertificate Text dccClientCertificateId = lens _dccClientCertificateId (\ s a -> s{_dccClientCertificateId = a});@@ -74,9 +74,9 @@         response           = receiveNull DeleteClientCertificateResponse' -instance Hashable DeleteClientCertificate+instance Hashable DeleteClientCertificate where -instance NFData DeleteClientCertificate+instance NFData DeleteClientCertificate where  instance ToHeaders DeleteClientCertificate where         toHeaders@@ -95,13 +95,15 @@  -- | /See:/ 'deleteClientCertificateResponse' smart constructor. data DeleteClientCertificateResponse =-    DeleteClientCertificateResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteClientCertificateResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteClientCertificateResponse' with the minimum fields required to make a request. -- deleteClientCertificateResponse     :: DeleteClientCertificateResponse deleteClientCertificateResponse = DeleteClientCertificateResponse' -instance NFData DeleteClientCertificateResponse++instance NFData DeleteClientCertificateResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteDeployment--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteDeploymentResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to delete a 'Deployment' resource. --@@ -48,15 +48,16 @@ -- -- /See:/ 'deleteDeployment' smart constructor. data DeleteDeployment = DeleteDeployment'-    { _ddRestAPIId    :: !Text-    , _ddDeploymentId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ddRestAPIId    :: !Text+  , _ddDeploymentId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDeployment' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ddRestAPIId' - The identifier of the 'RestApi' resource for the 'Deployment' resource to delete.+-- * 'ddRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'ddDeploymentId' - The identifier of the 'Deployment' resource to delete. deleteDeployment@@ -64,12 +65,11 @@     -> Text -- ^ 'ddDeploymentId'     -> DeleteDeployment deleteDeployment pRestAPIId_ pDeploymentId_ =-    DeleteDeployment'-    { _ddRestAPIId = pRestAPIId_-    , _ddDeploymentId = pDeploymentId_-    }+  DeleteDeployment'+  {_ddRestAPIId = pRestAPIId_, _ddDeploymentId = pDeploymentId_} --- | The identifier of the 'RestApi' resource for the 'Deployment' resource to delete.++-- | The string identifier of the associated 'RestApi' . ddRestAPIId :: Lens' DeleteDeployment Text ddRestAPIId = lens _ddRestAPIId (\ s a -> s{_ddRestAPIId = a}); @@ -82,9 +82,9 @@         request = delete apiGateway         response = receiveNull DeleteDeploymentResponse' -instance Hashable DeleteDeployment+instance Hashable DeleteDeployment where -instance NFData DeleteDeployment+instance NFData DeleteDeployment where  instance ToHeaders DeleteDeployment where         toHeaders@@ -103,13 +103,15 @@  -- | /See:/ 'deleteDeploymentResponse' smart constructor. data DeleteDeploymentResponse =-    DeleteDeploymentResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteDeploymentResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDeploymentResponse' with the minimum fields required to make a request. -- deleteDeploymentResponse     :: DeleteDeploymentResponse deleteDeploymentResponse = DeleteDeploymentResponse' -instance NFData DeleteDeploymentResponse++instance NFData DeleteDeploymentResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteDocumentationPart--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -33,12 +33,12 @@     , DeleteDocumentationPartResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Deletes an existing documentation part of an API. --@@ -46,15 +46,16 @@ -- -- /See:/ 'deleteDocumentationPart' smart constructor. data DeleteDocumentationPart = DeleteDocumentationPart'-    { _ddpRestAPIId           :: !Text-    , _ddpDocumentationPartId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ddpRestAPIId           :: !Text+  , _ddpDocumentationPartId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDocumentationPart' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ddpRestAPIId' - [Required] Specifies the identifier of an API of the to-be-deleted documentation part.+-- * 'ddpRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'ddpDocumentationPartId' - [Required] The identifier of the to-be-deleted documentation part. deleteDocumentationPart@@ -62,12 +63,11 @@     -> Text -- ^ 'ddpDocumentationPartId'     -> DeleteDocumentationPart deleteDocumentationPart pRestAPIId_ pDocumentationPartId_ =-    DeleteDocumentationPart'-    { _ddpRestAPIId = pRestAPIId_-    , _ddpDocumentationPartId = pDocumentationPartId_-    }+  DeleteDocumentationPart'+  {_ddpRestAPIId = pRestAPIId_, _ddpDocumentationPartId = pDocumentationPartId_} --- | [Required] Specifies the identifier of an API of the to-be-deleted documentation part.++-- | [Required] The string identifier of the associated 'RestApi' . ddpRestAPIId :: Lens' DeleteDocumentationPart Text ddpRestAPIId = lens _ddpRestAPIId (\ s a -> s{_ddpRestAPIId = a}); @@ -82,9 +82,9 @@         response           = receiveNull DeleteDocumentationPartResponse' -instance Hashable DeleteDocumentationPart+instance Hashable DeleteDocumentationPart where -instance NFData DeleteDocumentationPart+instance NFData DeleteDocumentationPart where  instance ToHeaders DeleteDocumentationPart where         toHeaders@@ -104,13 +104,15 @@  -- | /See:/ 'deleteDocumentationPartResponse' smart constructor. data DeleteDocumentationPartResponse =-    DeleteDocumentationPartResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteDocumentationPartResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDocumentationPartResponse' with the minimum fields required to make a request. -- deleteDocumentationPartResponse     :: DeleteDocumentationPartResponse deleteDocumentationPartResponse = DeleteDocumentationPartResponse' -instance NFData DeleteDocumentationPartResponse++instance NFData DeleteDocumentationPartResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteDocumentationVersion--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -33,12 +33,12 @@     , DeleteDocumentationVersionResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Deletes an existing documentation version of an API. --@@ -46,15 +46,16 @@ -- -- /See:/ 'deleteDocumentationVersion' smart constructor. data DeleteDocumentationVersion = DeleteDocumentationVersion'-    { _ddvRestAPIId            :: !Text-    , _ddvDocumentationVersion :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ddvRestAPIId            :: !Text+  , _ddvDocumentationVersion :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDocumentationVersion' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ddvRestAPIId' - [Required] The identifier of an API of a to-be-deleted documentation snapshot.+-- * 'ddvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'ddvDocumentationVersion' - [Required] The version identifier of a to-be-deleted documentation snapshot. deleteDocumentationVersion@@ -62,12 +63,13 @@     -> Text -- ^ 'ddvDocumentationVersion'     -> DeleteDocumentationVersion deleteDocumentationVersion pRestAPIId_ pDocumentationVersion_ =-    DeleteDocumentationVersion'-    { _ddvRestAPIId = pRestAPIId_-    , _ddvDocumentationVersion = pDocumentationVersion_-    }+  DeleteDocumentationVersion'+  { _ddvRestAPIId = pRestAPIId_+  , _ddvDocumentationVersion = pDocumentationVersion_+  } --- | [Required] The identifier of an API of a to-be-deleted documentation snapshot.++-- | [Required] The string identifier of the associated 'RestApi' . ddvRestAPIId :: Lens' DeleteDocumentationVersion Text ddvRestAPIId = lens _ddvRestAPIId (\ s a -> s{_ddvRestAPIId = a}); @@ -82,9 +84,9 @@         response           = receiveNull DeleteDocumentationVersionResponse' -instance Hashable DeleteDocumentationVersion+instance Hashable DeleteDocumentationVersion where -instance NFData DeleteDocumentationVersion+instance NFData DeleteDocumentationVersion where  instance ToHeaders DeleteDocumentationVersion where         toHeaders@@ -104,13 +106,16 @@  -- | /See:/ 'deleteDocumentationVersionResponse' smart constructor. data DeleteDocumentationVersionResponse =-    DeleteDocumentationVersionResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteDocumentationVersionResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDocumentationVersionResponse' with the minimum fields required to make a request. -- deleteDocumentationVersionResponse     :: DeleteDocumentationVersionResponse deleteDocumentationVersionResponse = DeleteDocumentationVersionResponse' + instance NFData DeleteDocumentationVersionResponse+         where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteDomainName--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,12 +34,12 @@     , DeleteDomainNameResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to delete the 'DomainName' resource. --@@ -47,9 +47,10 @@ -- -- /See:/ 'deleteDomainName' smart constructor. newtype DeleteDomainName = DeleteDomainName'-    { _ddnDomainName :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ddnDomainName :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDomainName' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -59,10 +60,9 @@     :: Text -- ^ 'ddnDomainName'     -> DeleteDomainName deleteDomainName pDomainName_ =-    DeleteDomainName'-    { _ddnDomainName = pDomainName_-    }+  DeleteDomainName' {_ddnDomainName = pDomainName_} + -- | The name of the 'DomainName' resource to be deleted. ddnDomainName :: Lens' DeleteDomainName Text ddnDomainName = lens _ddnDomainName (\ s a -> s{_ddnDomainName = a});@@ -72,9 +72,9 @@         request = delete apiGateway         response = receiveNull DeleteDomainNameResponse' -instance Hashable DeleteDomainName+instance Hashable DeleteDomainName where -instance NFData DeleteDomainName+instance NFData DeleteDomainName where  instance ToHeaders DeleteDomainName where         toHeaders@@ -91,13 +91,15 @@  -- | /See:/ 'deleteDomainNameResponse' smart constructor. data DeleteDomainNameResponse =-    DeleteDomainNameResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteDomainNameResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteDomainNameResponse' with the minimum fields required to make a request. -- deleteDomainNameResponse     :: DeleteDomainNameResponse deleteDomainNameResponse = DeleteDomainNameResponse' -instance NFData DeleteDomainNameResponse++instance NFData DeleteDomainNameResponse where

@@ -0,0 +1,118 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.APIGateway.DeleteGatewayResponse+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Clears any customization of a 'GatewayResponse' of a specified response type on the given 'RestApi' and resets it with the default settings.+--+--+module Network.AWS.APIGateway.DeleteGatewayResponse+    (+    -- * Creating a Request+      deleteGatewayResponse+    , DeleteGatewayResponse+    -- * Request Lenses+    , dgRestAPIId+    , dgResponseType++    -- * Destructuring the Response+    , deleteGatewayResponseResponse+    , DeleteGatewayResponseResponse+    ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Clears any customization of a 'GatewayResponse' of a specified response type on the given 'RestApi' and resets it with the default settings.+--+--+--+-- /See:/ 'deleteGatewayResponse' smart constructor.+data DeleteGatewayResponse = DeleteGatewayResponse'+  { _dgRestAPIId    :: !Text+  , _dgResponseType :: !GatewayResponseType+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteGatewayResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dgRestAPIId' - The string identifier of the associated 'RestApi' .+--+-- * 'dgResponseType' - The response type of the associated 'GatewayResponse' . Valid values are     * ACCESS_DENIED    * API_CONFIGURATION_ERROR    * AUTHORIZER_FAILURE    * AUTHORIZER_CONFIGURATION_ERROR    * BAD_REQUEST_PARAMETERS    * BAD_REQUEST_BODY    * DEFAULT_4XX    * DEFAULT_5XX    * EXPIRED_TOKEN    * INVALID_SIGNATURE    * INTEGRATION_FAILURE    * INTEGRATION_TIMEOUT    * INVALID_API_KEY    * MISSING_AUTHENTICATION_TOKEN    * QUOTA_EXCEEDED    * REQUEST_TOO_LARGE    * RESOURCE_NOT_FOUND    * THROTTLED    * UNAUTHORIZED    * UNSUPPORTED_MEDIA_TYPES+deleteGatewayResponse+    :: Text -- ^ 'dgRestAPIId'+    -> GatewayResponseType -- ^ 'dgResponseType'+    -> DeleteGatewayResponse+deleteGatewayResponse pRestAPIId_ pResponseType_ =+  DeleteGatewayResponse'+  {_dgRestAPIId = pRestAPIId_, _dgResponseType = pResponseType_}+++-- | The string identifier of the associated 'RestApi' .+dgRestAPIId :: Lens' DeleteGatewayResponse Text+dgRestAPIId = lens _dgRestAPIId (\ s a -> s{_dgRestAPIId = a});++-- | The response type of the associated 'GatewayResponse' . Valid values are     * ACCESS_DENIED    * API_CONFIGURATION_ERROR    * AUTHORIZER_FAILURE    * AUTHORIZER_CONFIGURATION_ERROR    * BAD_REQUEST_PARAMETERS    * BAD_REQUEST_BODY    * DEFAULT_4XX    * DEFAULT_5XX    * EXPIRED_TOKEN    * INVALID_SIGNATURE    * INTEGRATION_FAILURE    * INTEGRATION_TIMEOUT    * INVALID_API_KEY    * MISSING_AUTHENTICATION_TOKEN    * QUOTA_EXCEEDED    * REQUEST_TOO_LARGE    * RESOURCE_NOT_FOUND    * THROTTLED    * UNAUTHORIZED    * UNSUPPORTED_MEDIA_TYPES+dgResponseType :: Lens' DeleteGatewayResponse GatewayResponseType+dgResponseType = lens _dgResponseType (\ s a -> s{_dgResponseType = a});++instance AWSRequest DeleteGatewayResponse where+        type Rs DeleteGatewayResponse =+             DeleteGatewayResponseResponse+        request = delete apiGateway+        response = receiveNull DeleteGatewayResponseResponse'++instance Hashable DeleteGatewayResponse where++instance NFData DeleteGatewayResponse where++instance ToHeaders DeleteGatewayResponse where+        toHeaders+          = const+              (mconcat+                 ["Accept" =# ("application/json" :: ByteString)])++instance ToPath DeleteGatewayResponse where+        toPath DeleteGatewayResponse'{..}+          = mconcat+              ["/restapis/", toBS _dgRestAPIId,+               "/gatewayresponses/", toBS _dgResponseType]++instance ToQuery DeleteGatewayResponse where+        toQuery = const mempty++-- | /See:/ 'deleteGatewayResponseResponse' smart constructor.+data DeleteGatewayResponseResponse =+  DeleteGatewayResponseResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteGatewayResponseResponse' with the minimum fields required to make a request.+--+deleteGatewayResponseResponse+    :: DeleteGatewayResponseResponse+deleteGatewayResponseResponse = DeleteGatewayResponseResponse'+++instance NFData DeleteGatewayResponseResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteIntegration--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -36,12 +36,12 @@     , DeleteIntegrationResponse'     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Represents a delete integration request. --@@ -49,16 +49,17 @@ -- -- /See:/ 'deleteIntegration' smart constructor. data DeleteIntegration = DeleteIntegration'-    { _delRestAPIId  :: !Text-    , _delResourceId :: !Text-    , _delHttpMethod :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _delRestAPIId  :: !Text+  , _delResourceId :: !Text+  , _delHttpMethod :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteIntegration' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'delRestAPIId' - Specifies a delete integration request's API identifier.+-- * 'delRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'delResourceId' - Specifies a delete integration request's resource identifier. --@@ -69,13 +70,14 @@     -> Text -- ^ 'delHttpMethod'     -> DeleteIntegration deleteIntegration pRestAPIId_ pResourceId_ pHttpMethod_ =-    DeleteIntegration'-    { _delRestAPIId = pRestAPIId_-    , _delResourceId = pResourceId_-    , _delHttpMethod = pHttpMethod_-    }+  DeleteIntegration'+  { _delRestAPIId = pRestAPIId_+  , _delResourceId = pResourceId_+  , _delHttpMethod = pHttpMethod_+  } --- | Specifies a delete integration request's API identifier.++-- | The string identifier of the associated 'RestApi' . delRestAPIId :: Lens' DeleteIntegration Text delRestAPIId = lens _delRestAPIId (\ s a -> s{_delRestAPIId = a}); @@ -93,9 +95,9 @@         request = delete apiGateway         response = receiveNull DeleteIntegrationResponse'' -instance Hashable DeleteIntegration+instance Hashable DeleteIntegration where -instance NFData DeleteIntegration+instance NFData DeleteIntegration where  instance ToHeaders DeleteIntegration where         toHeaders@@ -115,13 +117,15 @@  -- | /See:/ 'deleteIntegrationResponse'' smart constructor. data DeleteIntegrationResponse' =-    DeleteIntegrationResponse''-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteIntegrationResponse''+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteIntegrationResponse'' with the minimum fields required to make a request. -- deleteIntegrationResponse'     :: DeleteIntegrationResponse' deleteIntegrationResponse' = DeleteIntegrationResponse'' -instance NFData DeleteIntegrationResponse'++instance NFData DeleteIntegrationResponse' where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteIntegrationResponse--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -37,12 +37,12 @@     , DeleteIntegrationResponseResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Represents a delete integration response request. --@@ -50,17 +50,18 @@ -- -- /See:/ 'deleteIntegrationResponse' smart constructor. data DeleteIntegrationResponse = DeleteIntegrationResponse'-    { _diRestAPIId  :: !Text-    , _diResourceId :: !Text-    , _diHttpMethod :: !Text-    , _diStatusCode :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _diRestAPIId  :: !Text+  , _diResourceId :: !Text+  , _diHttpMethod :: !Text+  , _diStatusCode :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteIntegrationResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'diRestAPIId' - Specifies a delete integration response request's API identifier.+-- * 'diRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'diResourceId' - Specifies a delete integration response request's resource identifier. --@@ -74,14 +75,15 @@     -> Text -- ^ 'diStatusCode'     -> DeleteIntegrationResponse deleteIntegrationResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ =-    DeleteIntegrationResponse'-    { _diRestAPIId = pRestAPIId_-    , _diResourceId = pResourceId_-    , _diHttpMethod = pHttpMethod_-    , _diStatusCode = pStatusCode_-    }+  DeleteIntegrationResponse'+  { _diRestAPIId = pRestAPIId_+  , _diResourceId = pResourceId_+  , _diHttpMethod = pHttpMethod_+  , _diStatusCode = pStatusCode_+  } --- | Specifies a delete integration response request's API identifier.++-- | The string identifier of the associated 'RestApi' . diRestAPIId :: Lens' DeleteIntegrationResponse Text diRestAPIId = lens _diRestAPIId (\ s a -> s{_diRestAPIId = a}); @@ -104,9 +106,9 @@         response           = receiveNull DeleteIntegrationResponseResponse' -instance Hashable DeleteIntegrationResponse+instance Hashable DeleteIntegrationResponse where -instance NFData DeleteIntegrationResponse+instance NFData DeleteIntegrationResponse where  instance ToHeaders DeleteIntegrationResponse where         toHeaders@@ -126,13 +128,16 @@  -- | /See:/ 'deleteIntegrationResponseResponse' smart constructor. data DeleteIntegrationResponseResponse =-    DeleteIntegrationResponseResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteIntegrationResponseResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteIntegrationResponseResponse' with the minimum fields required to make a request. -- deleteIntegrationResponseResponse     :: DeleteIntegrationResponseResponse deleteIntegrationResponseResponse = DeleteIntegrationResponseResponse' + instance NFData DeleteIntegrationResponseResponse+         where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteMethod--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -36,12 +36,12 @@     , DeleteMethodResponse'     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to delete an existing 'Method' resource. --@@ -49,16 +49,17 @@ -- -- /See:/ 'deleteMethod' smart constructor. data DeleteMethod = DeleteMethod'-    { _dmmRestAPIId  :: !Text-    , _dmmResourceId :: !Text-    , _dmmHttpMethod :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmmRestAPIId  :: !Text+  , _dmmResourceId :: !Text+  , _dmmHttpMethod :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMethod' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmmRestAPIId' - The 'RestApi' identifier for the 'Method' resource.+-- * 'dmmRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'dmmResourceId' - The 'Resource' identifier for the 'Method' resource. --@@ -69,13 +70,14 @@     -> Text -- ^ 'dmmHttpMethod'     -> DeleteMethod deleteMethod pRestAPIId_ pResourceId_ pHttpMethod_ =-    DeleteMethod'-    { _dmmRestAPIId = pRestAPIId_-    , _dmmResourceId = pResourceId_-    , _dmmHttpMethod = pHttpMethod_-    }+  DeleteMethod'+  { _dmmRestAPIId = pRestAPIId_+  , _dmmResourceId = pResourceId_+  , _dmmHttpMethod = pHttpMethod_+  } --- | The 'RestApi' identifier for the 'Method' resource.++-- | The string identifier of the associated 'RestApi' . dmmRestAPIId :: Lens' DeleteMethod Text dmmRestAPIId = lens _dmmRestAPIId (\ s a -> s{_dmmRestAPIId = a}); @@ -92,9 +94,9 @@         request = delete apiGateway         response = receiveNull DeleteMethodResponse'' -instance Hashable DeleteMethod+instance Hashable DeleteMethod where -instance NFData DeleteMethod+instance NFData DeleteMethod where  instance ToHeaders DeleteMethod where         toHeaders@@ -114,13 +116,15 @@  -- | /See:/ 'deleteMethodResponse'' smart constructor. data DeleteMethodResponse' =-    DeleteMethodResponse''-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteMethodResponse''+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMethodResponse'' with the minimum fields required to make a request. -- deleteMethodResponse'     :: DeleteMethodResponse' deleteMethodResponse' = DeleteMethodResponse'' -instance NFData DeleteMethodResponse'++instance NFData DeleteMethodResponse' where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteMethodResponse--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -37,12 +37,12 @@     , DeleteMethodResponseResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to delete an existing 'MethodResponse' resource. --@@ -50,17 +50,18 @@ -- -- /See:/ 'deleteMethodResponse' smart constructor. data DeleteMethodResponse = DeleteMethodResponse'-    { _dmRestAPIId  :: !Text-    , _dmResourceId :: !Text-    , _dmHttpMethod :: !Text-    , _dmStatusCode :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmRestAPIId  :: !Text+  , _dmResourceId :: !Text+  , _dmHttpMethod :: !Text+  , _dmStatusCode :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMethodResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmRestAPIId' - The 'RestApi' identifier for the 'MethodResponse' resource.+-- * 'dmRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'dmResourceId' - The 'Resource' identifier for the 'MethodResponse' resource. --@@ -74,14 +75,15 @@     -> Text -- ^ 'dmStatusCode'     -> DeleteMethodResponse deleteMethodResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ =-    DeleteMethodResponse'-    { _dmRestAPIId = pRestAPIId_-    , _dmResourceId = pResourceId_-    , _dmHttpMethod = pHttpMethod_-    , _dmStatusCode = pStatusCode_-    }+  DeleteMethodResponse'+  { _dmRestAPIId = pRestAPIId_+  , _dmResourceId = pResourceId_+  , _dmHttpMethod = pHttpMethod_+  , _dmStatusCode = pStatusCode_+  } --- | The 'RestApi' identifier for the 'MethodResponse' resource.++-- | The string identifier of the associated 'RestApi' . dmRestAPIId :: Lens' DeleteMethodResponse Text dmRestAPIId = lens _dmRestAPIId (\ s a -> s{_dmRestAPIId = a}); @@ -103,9 +105,9 @@         request = delete apiGateway         response = receiveNull DeleteMethodResponseResponse' -instance Hashable DeleteMethodResponse+instance Hashable DeleteMethodResponse where -instance NFData DeleteMethodResponse+instance NFData DeleteMethodResponse where  instance ToHeaders DeleteMethodResponse where         toHeaders@@ -125,13 +127,15 @@  -- | /See:/ 'deleteMethodResponseResponse' smart constructor. data DeleteMethodResponseResponse =-    DeleteMethodResponseResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteMethodResponseResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMethodResponseResponse' with the minimum fields required to make a request. -- deleteMethodResponseResponse     :: DeleteMethodResponseResponse deleteMethodResponseResponse = DeleteMethodResponseResponse' -instance NFData DeleteMethodResponseResponse++instance NFData DeleteMethodResponseResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteModel--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteModelResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to delete an existing model in an existing 'RestApi' resource. --@@ -48,15 +48,16 @@ -- -- /See:/ 'deleteModel' smart constructor. data DeleteModel = DeleteModel'-    { _dRestAPIId :: !Text-    , _dModelName :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dRestAPIId :: !Text+  , _dModelName :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteModel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dRestAPIId' - The 'RestApi' under which the model will be deleted.+-- * 'dRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'dModelName' - The name of the model to delete. deleteModel@@ -64,12 +65,10 @@     -> Text -- ^ 'dModelName'     -> DeleteModel deleteModel pRestAPIId_ pModelName_ =-    DeleteModel'-    { _dRestAPIId = pRestAPIId_-    , _dModelName = pModelName_-    }+  DeleteModel' {_dRestAPIId = pRestAPIId_, _dModelName = pModelName_} --- | The 'RestApi' under which the model will be deleted.++-- | The string identifier of the associated 'RestApi' . dRestAPIId :: Lens' DeleteModel Text dRestAPIId = lens _dRestAPIId (\ s a -> s{_dRestAPIId = a}); @@ -82,9 +81,9 @@         request = delete apiGateway         response = receiveNull DeleteModelResponse' -instance Hashable DeleteModel+instance Hashable DeleteModel where -instance NFData DeleteModel+instance NFData DeleteModel where  instance ToHeaders DeleteModel where         toHeaders@@ -103,13 +102,15 @@  -- | /See:/ 'deleteModelResponse' smart constructor. data DeleteModelResponse =-    DeleteModelResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteModelResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteModelResponse' with the minimum fields required to make a request. -- deleteModelResponse     :: DeleteModelResponse deleteModelResponse = DeleteModelResponse' -instance NFData DeleteModelResponse++instance NFData DeleteModelResponse where

@@ -0,0 +1,119 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.APIGateway.DeleteRequestValidator+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a 'RequestValidator' of a given 'RestApi' .+--+--+module Network.AWS.APIGateway.DeleteRequestValidator+    (+    -- * Creating a Request+      deleteRequestValidator+    , DeleteRequestValidator+    -- * Request Lenses+    , drvRestAPIId+    , drvRequestValidatorId++    -- * Destructuring the Response+    , deleteRequestValidatorResponse+    , DeleteRequestValidatorResponse+    ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Deletes a specified 'RequestValidator' of a given 'RestApi' .+--+--+--+-- /See:/ 'deleteRequestValidator' smart constructor.+data DeleteRequestValidator = DeleteRequestValidator'+  { _drvRestAPIId          :: !Text+  , _drvRequestValidatorId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteRequestValidator' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'drvRestAPIId' - The string identifier of the associated 'RestApi' .+--+-- * 'drvRequestValidatorId' - [Required] The identifier of the 'RequestValidator' to be deleted.+deleteRequestValidator+    :: Text -- ^ 'drvRestAPIId'+    -> Text -- ^ 'drvRequestValidatorId'+    -> DeleteRequestValidator+deleteRequestValidator pRestAPIId_ pRequestValidatorId_ =+  DeleteRequestValidator'+  {_drvRestAPIId = pRestAPIId_, _drvRequestValidatorId = pRequestValidatorId_}+++-- | The string identifier of the associated 'RestApi' .+drvRestAPIId :: Lens' DeleteRequestValidator Text+drvRestAPIId = lens _drvRestAPIId (\ s a -> s{_drvRestAPIId = a});++-- | [Required] The identifier of the 'RequestValidator' to be deleted.+drvRequestValidatorId :: Lens' DeleteRequestValidator Text+drvRequestValidatorId = lens _drvRequestValidatorId (\ s a -> s{_drvRequestValidatorId = a});++instance AWSRequest DeleteRequestValidator where+        type Rs DeleteRequestValidator =+             DeleteRequestValidatorResponse+        request = delete apiGateway+        response+          = receiveNull DeleteRequestValidatorResponse'++instance Hashable DeleteRequestValidator where++instance NFData DeleteRequestValidator where++instance ToHeaders DeleteRequestValidator where+        toHeaders+          = const+              (mconcat+                 ["Accept" =# ("application/json" :: ByteString)])++instance ToPath DeleteRequestValidator where+        toPath DeleteRequestValidator'{..}+          = mconcat+              ["/restapis/", toBS _drvRestAPIId,+               "/requestvalidators/", toBS _drvRequestValidatorId]++instance ToQuery DeleteRequestValidator where+        toQuery = const mempty++-- | /See:/ 'deleteRequestValidatorResponse' smart constructor.+data DeleteRequestValidatorResponse =+  DeleteRequestValidatorResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteRequestValidatorResponse' with the minimum fields required to make a request.+--+deleteRequestValidatorResponse+    :: DeleteRequestValidatorResponse+deleteRequestValidatorResponse = DeleteRequestValidatorResponse'+++instance NFData DeleteRequestValidatorResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteResource--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteResourceResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to delete a 'Resource' . --@@ -48,15 +48,16 @@ -- -- /See:/ 'deleteResource' smart constructor. data DeleteResource = DeleteResource'-    { _drRestAPIId  :: !Text-    , _drResourceId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _drRestAPIId  :: !Text+  , _drResourceId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteResource' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'drRestAPIId' - The 'RestApi' identifier for the 'Resource' resource.+-- * 'drRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'drResourceId' - The identifier of the 'Resource' resource. deleteResource@@ -64,12 +65,10 @@     -> Text -- ^ 'drResourceId'     -> DeleteResource deleteResource pRestAPIId_ pResourceId_ =-    DeleteResource'-    { _drRestAPIId = pRestAPIId_-    , _drResourceId = pResourceId_-    }+  DeleteResource' {_drRestAPIId = pRestAPIId_, _drResourceId = pResourceId_} --- | The 'RestApi' identifier for the 'Resource' resource.++-- | The string identifier of the associated 'RestApi' . drRestAPIId :: Lens' DeleteResource Text drRestAPIId = lens _drRestAPIId (\ s a -> s{_drRestAPIId = a}); @@ -82,9 +81,9 @@         request = delete apiGateway         response = receiveNull DeleteResourceResponse' -instance Hashable DeleteResource+instance Hashable DeleteResource where -instance NFData DeleteResource+instance NFData DeleteResource where  instance ToHeaders DeleteResource where         toHeaders@@ -103,13 +102,15 @@  -- | /See:/ 'deleteResourceResponse' smart constructor. data DeleteResourceResponse =-    DeleteResourceResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteResourceResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteResourceResponse' with the minimum fields required to make a request. -- deleteResourceResponse     :: DeleteResourceResponse deleteResourceResponse = DeleteResourceResponse' -instance NFData DeleteResourceResponse++instance NFData DeleteResourceResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteRestAPI--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,12 +34,12 @@     , DeleteRestAPIResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to delete the specified API from your collection. --@@ -47,23 +47,22 @@ -- -- /See:/ 'deleteRestAPI' smart constructor. newtype DeleteRestAPI = DeleteRestAPI'-    { _draRestAPIId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _draRestAPIId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteRestAPI' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'draRestAPIId' - The ID of the 'RestApi' you want to delete.+-- * 'draRestAPIId' - The string identifier of the associated 'RestApi' . deleteRestAPI     :: Text -- ^ 'draRestAPIId'     -> DeleteRestAPI-deleteRestAPI pRestAPIId_ =-    DeleteRestAPI'-    { _draRestAPIId = pRestAPIId_-    }+deleteRestAPI pRestAPIId_ = DeleteRestAPI' {_draRestAPIId = pRestAPIId_} --- | The ID of the 'RestApi' you want to delete.++-- | The string identifier of the associated 'RestApi' . draRestAPIId :: Lens' DeleteRestAPI Text draRestAPIId = lens _draRestAPIId (\ s a -> s{_draRestAPIId = a}); @@ -72,9 +71,9 @@         request = delete apiGateway         response = receiveNull DeleteRestAPIResponse' -instance Hashable DeleteRestAPI+instance Hashable DeleteRestAPI where -instance NFData DeleteRestAPI+instance NFData DeleteRestAPI where  instance ToHeaders DeleteRestAPI where         toHeaders@@ -91,13 +90,15 @@  -- | /See:/ 'deleteRestAPIResponse' smart constructor. data DeleteRestAPIResponse =-    DeleteRestAPIResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteRestAPIResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteRestAPIResponse' with the minimum fields required to make a request. -- deleteRestAPIResponse     :: DeleteRestAPIResponse deleteRestAPIResponse = DeleteRestAPIResponse' -instance NFData DeleteRestAPIResponse++instance NFData DeleteRestAPIResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteStage--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteStageResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to delete a 'Stage' resource. --@@ -48,15 +48,16 @@ -- -- /See:/ 'deleteStage' smart constructor. data DeleteStage = DeleteStage'-    { _dsRestAPIId :: !Text-    , _dsStageName :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dsRestAPIId :: !Text+  , _dsStageName :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteStage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dsRestAPIId' - The identifier of the 'RestApi' resource for the 'Stage' resource to delete.+-- * 'dsRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'dsStageName' - The name of the 'Stage' resource to delete. deleteStage@@ -64,12 +65,10 @@     -> Text -- ^ 'dsStageName'     -> DeleteStage deleteStage pRestAPIId_ pStageName_ =-    DeleteStage'-    { _dsRestAPIId = pRestAPIId_-    , _dsStageName = pStageName_-    }+  DeleteStage' {_dsRestAPIId = pRestAPIId_, _dsStageName = pStageName_} --- | The identifier of the 'RestApi' resource for the 'Stage' resource to delete.++-- | The string identifier of the associated 'RestApi' . dsRestAPIId :: Lens' DeleteStage Text dsRestAPIId = lens _dsRestAPIId (\ s a -> s{_dsRestAPIId = a}); @@ -82,9 +81,9 @@         request = delete apiGateway         response = receiveNull DeleteStageResponse' -instance Hashable DeleteStage+instance Hashable DeleteStage where -instance NFData DeleteStage+instance NFData DeleteStage where  instance ToHeaders DeleteStage where         toHeaders@@ -103,13 +102,15 @@  -- | /See:/ 'deleteStageResponse' smart constructor. data DeleteStageResponse =-    DeleteStageResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteStageResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteStageResponse' with the minimum fields required to make a request. -- deleteStageResponse     :: DeleteStageResponse deleteStageResponse = DeleteStageResponse' -instance NFData DeleteStageResponse++instance NFData DeleteStageResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteUsagePlan--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,22 +34,23 @@     , DeleteUsagePlanResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response --- | The DELETE request to delete a uasge plan of a given plan Id.+-- | The DELETE request to delete a usage plan of a given plan Id. -- -- -- -- /See:/ 'deleteUsagePlan' smart constructor. newtype DeleteUsagePlan = DeleteUsagePlan'-    { _dupUsagePlanId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dupUsagePlanId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteUsagePlan' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -59,10 +60,9 @@     :: Text -- ^ 'dupUsagePlanId'     -> DeleteUsagePlan deleteUsagePlan pUsagePlanId_ =-    DeleteUsagePlan'-    { _dupUsagePlanId = pUsagePlanId_-    }+  DeleteUsagePlan' {_dupUsagePlanId = pUsagePlanId_} + -- | The Id of the to-be-deleted usage plan. dupUsagePlanId :: Lens' DeleteUsagePlan Text dupUsagePlanId = lens _dupUsagePlanId (\ s a -> s{_dupUsagePlanId = a});@@ -72,9 +72,9 @@         request = delete apiGateway         response = receiveNull DeleteUsagePlanResponse' -instance Hashable DeleteUsagePlan+instance Hashable DeleteUsagePlan where -instance NFData DeleteUsagePlan+instance NFData DeleteUsagePlan where  instance ToHeaders DeleteUsagePlan where         toHeaders@@ -91,13 +91,15 @@  -- | /See:/ 'deleteUsagePlanResponse' smart constructor. data DeleteUsagePlanResponse =-    DeleteUsagePlanResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteUsagePlanResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteUsagePlanResponse' with the minimum fields required to make a request. -- deleteUsagePlanResponse     :: DeleteUsagePlanResponse deleteUsagePlanResponse = DeleteUsagePlanResponse' -instance NFData DeleteUsagePlanResponse++instance NFData DeleteUsagePlanResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.DeleteUsagePlanKey--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , DeleteUsagePlanKeyResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | The DELETE request to delete a usage plan key and remove the underlying API key from the associated usage plan. --@@ -48,10 +48,11 @@ -- -- /See:/ 'deleteUsagePlanKey' smart constructor. data DeleteUsagePlanKey = DeleteUsagePlanKey'-    { _dupkUsagePlanId :: !Text-    , _dupkKeyId       :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dupkUsagePlanId :: !Text+  , _dupkKeyId       :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteUsagePlanKey' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,11 +65,9 @@     -> Text -- ^ 'dupkKeyId'     -> DeleteUsagePlanKey deleteUsagePlanKey pUsagePlanId_ pKeyId_ =-    DeleteUsagePlanKey'-    { _dupkUsagePlanId = pUsagePlanId_-    , _dupkKeyId = pKeyId_-    }+  DeleteUsagePlanKey' {_dupkUsagePlanId = pUsagePlanId_, _dupkKeyId = pKeyId_} + -- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-deleted 'UsagePlanKey' resource representing a plan customer. dupkUsagePlanId :: Lens' DeleteUsagePlanKey Text dupkUsagePlanId = lens _dupkUsagePlanId (\ s a -> s{_dupkUsagePlanId = a});@@ -83,9 +82,9 @@         request = delete apiGateway         response = receiveNull DeleteUsagePlanKeyResponse' -instance Hashable DeleteUsagePlanKey+instance Hashable DeleteUsagePlanKey where -instance NFData DeleteUsagePlanKey+instance NFData DeleteUsagePlanKey where  instance ToHeaders DeleteUsagePlanKey where         toHeaders@@ -104,13 +103,15 @@  -- | /See:/ 'deleteUsagePlanKeyResponse' smart constructor. data DeleteUsagePlanKeyResponse =-    DeleteUsagePlanKeyResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteUsagePlanKeyResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteUsagePlanKeyResponse' with the minimum fields required to make a request. -- deleteUsagePlanKeyResponse     :: DeleteUsagePlanKeyResponse deleteUsagePlanKeyResponse = DeleteUsagePlanKeyResponse' -instance NFData DeleteUsagePlanKeyResponse++instance NFData DeleteUsagePlanKeyResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.FlushStageAuthorizersCache--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , FlushStageAuthorizersCacheResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to flush authorizer cache entries on a specified stage. --@@ -48,15 +48,16 @@ -- -- /See:/ 'flushStageAuthorizersCache' smart constructor. data FlushStageAuthorizersCache = FlushStageAuthorizersCache'-    { _fsacRestAPIId :: !Text-    , _fsacStageName :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _fsacRestAPIId :: !Text+  , _fsacStageName :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'FlushStageAuthorizersCache' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'fsacRestAPIId' - The API identifier of the stage to flush.+-- * 'fsacRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'fsacStageName' - The name of the stage to flush. flushStageAuthorizersCache@@ -64,12 +65,11 @@     -> Text -- ^ 'fsacStageName'     -> FlushStageAuthorizersCache flushStageAuthorizersCache pRestAPIId_ pStageName_ =-    FlushStageAuthorizersCache'-    { _fsacRestAPIId = pRestAPIId_-    , _fsacStageName = pStageName_-    }+  FlushStageAuthorizersCache'+  {_fsacRestAPIId = pRestAPIId_, _fsacStageName = pStageName_} --- | The API identifier of the stage to flush.++-- | The string identifier of the associated 'RestApi' . fsacRestAPIId :: Lens' FlushStageAuthorizersCache Text fsacRestAPIId = lens _fsacRestAPIId (\ s a -> s{_fsacRestAPIId = a}); @@ -84,9 +84,9 @@         response           = receiveNull FlushStageAuthorizersCacheResponse' -instance Hashable FlushStageAuthorizersCache+instance Hashable FlushStageAuthorizersCache where -instance NFData FlushStageAuthorizersCache+instance NFData FlushStageAuthorizersCache where  instance ToHeaders FlushStageAuthorizersCache where         toHeaders@@ -105,13 +105,16 @@  -- | /See:/ 'flushStageAuthorizersCacheResponse' smart constructor. data FlushStageAuthorizersCacheResponse =-    FlushStageAuthorizersCacheResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  FlushStageAuthorizersCacheResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'FlushStageAuthorizersCacheResponse' with the minimum fields required to make a request. -- flushStageAuthorizersCacheResponse     :: FlushStageAuthorizersCacheResponse flushStageAuthorizersCacheResponse = FlushStageAuthorizersCacheResponse' + instance NFData FlushStageAuthorizersCacheResponse+         where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.FlushStageCache--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , FlushStageCacheResponse     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to flush a stage's cache. --@@ -48,15 +48,16 @@ -- -- /See:/ 'flushStageCache' smart constructor. data FlushStageCache = FlushStageCache'-    { _fscRestAPIId :: !Text-    , _fscStageName :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _fscRestAPIId :: !Text+  , _fscStageName :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'FlushStageCache' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'fscRestAPIId' - The API identifier of the stage to flush its cache.+-- * 'fscRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'fscStageName' - The name of the stage to flush its cache. flushStageCache@@ -64,12 +65,10 @@     -> Text -- ^ 'fscStageName'     -> FlushStageCache flushStageCache pRestAPIId_ pStageName_ =-    FlushStageCache'-    { _fscRestAPIId = pRestAPIId_-    , _fscStageName = pStageName_-    }+  FlushStageCache' {_fscRestAPIId = pRestAPIId_, _fscStageName = pStageName_} --- | The API identifier of the stage to flush its cache.++-- | The string identifier of the associated 'RestApi' . fscRestAPIId :: Lens' FlushStageCache Text fscRestAPIId = lens _fscRestAPIId (\ s a -> s{_fscRestAPIId = a}); @@ -82,9 +81,9 @@         request = delete apiGateway         response = receiveNull FlushStageCacheResponse' -instance Hashable FlushStageCache+instance Hashable FlushStageCache where -instance NFData FlushStageCache+instance NFData FlushStageCache where  instance ToHeaders FlushStageCache where         toHeaders@@ -103,13 +102,15 @@  -- | /See:/ 'flushStageCacheResponse' smart constructor. data FlushStageCacheResponse =-    FlushStageCacheResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  FlushStageCacheResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'FlushStageCacheResponse' with the minimum fields required to make a request. -- flushStageCacheResponse     :: FlushStageCacheResponse flushStageCacheResponse = FlushStageCacheResponse' -instance NFData FlushStageCacheResponse++instance NFData FlushStageCacheResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GenerateClientCertificate--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -40,12 +40,12 @@     , ccDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to generate a 'ClientCertificate' resource. --@@ -53,9 +53,10 @@ -- -- /See:/ 'generateClientCertificate' smart constructor. newtype GenerateClientCertificate = GenerateClientCertificate'-    { _gccDescription :: Maybe Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gccDescription :: Maybe Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GenerateClientCertificate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,10 +65,9 @@ generateClientCertificate     :: GenerateClientCertificate generateClientCertificate =-    GenerateClientCertificate'-    { _gccDescription = Nothing-    }+  GenerateClientCertificate' {_gccDescription = Nothing} + -- | The description of the 'ClientCertificate' . gccDescription :: Lens' GenerateClientCertificate (Maybe Text) gccDescription = lens _gccDescription (\ s a -> s{_gccDescription = a});@@ -77,9 +77,9 @@         request = postJSON apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GenerateClientCertificate+instance Hashable GenerateClientCertificate where -instance NFData GenerateClientCertificate+instance NFData GenerateClientCertificate where  instance ToHeaders GenerateClientCertificate where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetAPIKey--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -45,12 +45,12 @@     , akDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to get information about the current 'ApiKey' resource. --@@ -58,10 +58,11 @@ -- -- /See:/ 'getAPIKey' smart constructor. data GetAPIKey = GetAPIKey'-    { _gakIncludeValue :: !(Maybe Bool)-    , _gakApiKey       :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gakIncludeValue :: !(Maybe Bool)+  , _gakApiKey       :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAPIKey' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,11 +74,9 @@     :: Text -- ^ 'gakApiKey'     -> GetAPIKey getAPIKey pApiKey_ =-    GetAPIKey'-    { _gakIncludeValue = Nothing-    , _gakApiKey = pApiKey_-    }+  GetAPIKey' {_gakIncludeValue = Nothing, _gakApiKey = pApiKey_} + -- | A boolean flag to specify whether (@true@ ) or not (@false@ ) the result contains the key value. gakIncludeValue :: Lens' GetAPIKey (Maybe Bool) gakIncludeValue = lens _gakIncludeValue (\ s a -> s{_gakIncludeValue = a});@@ -91,9 +90,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetAPIKey+instance Hashable GetAPIKey where -instance NFData GetAPIKey+instance NFData GetAPIKey where  instance ToHeaders GetAPIKey where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetAPIKeys--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -45,13 +45,13 @@     , gakrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Pager-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to get information about the current 'ApiKeys' resource. --@@ -59,13 +59,14 @@ -- -- /See:/ 'getAPIKeys' smart constructor. data GetAPIKeys = GetAPIKeys'-    { _gakIncludeValues :: !(Maybe Bool)-    , _gakCustomerId    :: !(Maybe Text)-    , _gakNameQuery     :: !(Maybe Text)-    , _gakLimit         :: !(Maybe Int)-    , _gakPosition      :: !(Maybe Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gakIncludeValues :: !(Maybe Bool)+  , _gakCustomerId    :: !(Maybe Text)+  , _gakNameQuery     :: !(Maybe Text)+  , _gakLimit         :: !(Maybe Int)+  , _gakPosition      :: !(Maybe Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAPIKeys' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -76,20 +77,21 @@ -- -- * 'gakNameQuery' - The name of queried API keys. ----- * 'gakLimit' - The maximum number of 'ApiKeys' to get information about.+-- * 'gakLimit' - The maximum number of returned results per page. ----- * 'gakPosition' - The position of the current 'ApiKeys' resource to get information about.+-- * 'gakPosition' - The current pagination position in the paged result set. getAPIKeys     :: GetAPIKeys getAPIKeys =-    GetAPIKeys'-    { _gakIncludeValues = Nothing-    , _gakCustomerId = Nothing-    , _gakNameQuery = Nothing-    , _gakLimit = Nothing-    , _gakPosition = Nothing-    }+  GetAPIKeys'+  { _gakIncludeValues = Nothing+  , _gakCustomerId = Nothing+  , _gakNameQuery = Nothing+  , _gakLimit = Nothing+  , _gakPosition = Nothing+  } + -- | A boolean flag to specify whether (@true@ ) or not (@false@ ) the result contains key values. gakIncludeValues :: Lens' GetAPIKeys (Maybe Bool) gakIncludeValues = lens _gakIncludeValues (\ s a -> s{_gakIncludeValues = a});@@ -102,11 +104,11 @@ gakNameQuery :: Lens' GetAPIKeys (Maybe Text) gakNameQuery = lens _gakNameQuery (\ s a -> s{_gakNameQuery = a}); --- | The maximum number of 'ApiKeys' to get information about.+-- | The maximum number of returned results per page. gakLimit :: Lens' GetAPIKeys (Maybe Int) gakLimit = lens _gakLimit (\ s a -> s{_gakLimit = a}); --- | The position of the current 'ApiKeys' resource to get information about.+-- | The current pagination position in the paged result set. gakPosition :: Lens' GetAPIKeys (Maybe Text) gakPosition = lens _gakPosition (\ s a -> s{_gakPosition = a}); @@ -129,9 +131,9 @@                      <*> (x .?> "position")                      <*> (pure (fromEnum s))) -instance Hashable GetAPIKeys+instance Hashable GetAPIKeys where -instance NFData GetAPIKeys+instance NFData GetAPIKeys where  instance ToHeaders GetAPIKeys where         toHeaders@@ -157,17 +159,18 @@ -- -- /See:/ 'getAPIKeysResponse' smart constructor. data GetAPIKeysResponse = GetAPIKeysResponse'-    { _gakrsItems          :: !(Maybe [APIKey])-    , _gakrsWarnings       :: !(Maybe [Text])-    , _gakrsPosition       :: !(Maybe Text)-    , _gakrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gakrsItems          :: !(Maybe [APIKey])+  , _gakrsWarnings       :: !(Maybe [Text])+  , _gakrsPosition       :: !(Maybe Text)+  , _gakrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAPIKeysResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gakrsItems' - The current page of any 'ApiKey' resources in the collection of 'ApiKey' resources.+-- * 'gakrsItems' - The current page of elements from this collection. -- -- * 'gakrsWarnings' - A list of warning messages logged during the import of API keys when the @failOnWarnings@ option is set to true. --@@ -178,14 +181,15 @@     :: Int -- ^ 'gakrsResponseStatus'     -> GetAPIKeysResponse getAPIKeysResponse pResponseStatus_ =-    GetAPIKeysResponse'-    { _gakrsItems = Nothing-    , _gakrsWarnings = Nothing-    , _gakrsPosition = Nothing-    , _gakrsResponseStatus = pResponseStatus_-    }+  GetAPIKeysResponse'+  { _gakrsItems = Nothing+  , _gakrsWarnings = Nothing+  , _gakrsPosition = Nothing+  , _gakrsResponseStatus = pResponseStatus_+  } --- | The current page of any 'ApiKey' resources in the collection of 'ApiKey' resources.++-- | The current page of elements from this collection. gakrsItems :: Lens' GetAPIKeysResponse [APIKey] gakrsItems = lens _gakrsItems (\ s a -> s{_gakrsItems = a}) . _Default . _Coerce; @@ -201,4 +205,4 @@ gakrsResponseStatus :: Lens' GetAPIKeysResponse Int gakrsResponseStatus = lens _gakrsResponseStatus (\ s a -> s{_gakrsResponseStatus = a}); -instance NFData GetAPIKeysResponse+instance NFData GetAPIKeysResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetAccount--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -37,12 +37,12 @@     , aThrottleSettings     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to get information about the current 'Account' resource. --@@ -50,23 +50,25 @@ -- -- /See:/ 'getAccount' smart constructor. data GetAccount =-    GetAccount'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  GetAccount'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAccount' with the minimum fields required to make a request. -- getAccount     :: GetAccount getAccount = GetAccount' + instance AWSRequest GetAccount where         type Rs GetAccount = Account         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetAccount+instance Hashable GetAccount where -instance NFData GetAccount+instance NFData GetAccount where  instance ToHeaders GetAccount where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetAuthorizer--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -47,12 +47,12 @@     , aAuthorizerCredentials     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to describe an existing 'Authorizer' resource. --@@ -60,15 +60,16 @@ -- -- /See:/ 'getAuthorizer' smart constructor. data GetAuthorizer = GetAuthorizer'-    { _gaaRestAPIId    :: !Text-    , _gaaAuthorizerId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gaaRestAPIId    :: !Text+  , _gaaAuthorizerId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAuthorizer' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gaaRestAPIId' - The 'RestApi' identifier for the 'Authorizer' resource.+-- * 'gaaRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'gaaAuthorizerId' - The identifier of the 'Authorizer' resource. getAuthorizer@@ -76,12 +77,11 @@     -> Text -- ^ 'gaaAuthorizerId'     -> GetAuthorizer getAuthorizer pRestAPIId_ pAuthorizerId_ =-    GetAuthorizer'-    { _gaaRestAPIId = pRestAPIId_-    , _gaaAuthorizerId = pAuthorizerId_-    }+  GetAuthorizer'+  {_gaaRestAPIId = pRestAPIId_, _gaaAuthorizerId = pAuthorizerId_} --- | The 'RestApi' identifier for the 'Authorizer' resource.++-- | The string identifier of the associated 'RestApi' . gaaRestAPIId :: Lens' GetAuthorizer Text gaaRestAPIId = lens _gaaRestAPIId (\ s a -> s{_gaaRestAPIId = a}); @@ -94,9 +94,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetAuthorizer+instance Hashable GetAuthorizer where -instance NFData GetAuthorizer+instance NFData GetAuthorizer where  instance ToHeaders GetAuthorizer where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetAuthorizers--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,12 +41,12 @@     , garsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to describe an existing 'Authorizers' resource. --@@ -54,39 +54,38 @@ -- -- /See:/ 'getAuthorizers' smart constructor. data GetAuthorizers = GetAuthorizers'-    { _gaLimit     :: !(Maybe Int)-    , _gaPosition  :: !(Maybe Text)-    , _gaRestAPIId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gaLimit     :: !(Maybe Int)+  , _gaPosition  :: !(Maybe Text)+  , _gaRestAPIId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAuthorizers' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gaLimit' - Limit the number of 'Authorizer' resources in the response.+-- * 'gaLimit' - The maximum number of returned results per page. ----- * 'gaPosition' - If not all 'Authorizer' resources in the response were present, the position will specify where to start the next page of results.+-- * 'gaPosition' - The current pagination position in the paged result set. ----- * 'gaRestAPIId' - The 'RestApi' identifier for the 'Authorizers' resource.+-- * 'gaRestAPIId' - The string identifier of the associated 'RestApi' . getAuthorizers     :: Text -- ^ 'gaRestAPIId'     -> GetAuthorizers getAuthorizers pRestAPIId_ =-    GetAuthorizers'-    { _gaLimit = Nothing-    , _gaPosition = Nothing-    , _gaRestAPIId = pRestAPIId_-    }+  GetAuthorizers'+  {_gaLimit = Nothing, _gaPosition = Nothing, _gaRestAPIId = pRestAPIId_} --- | Limit the number of 'Authorizer' resources in the response.++-- | The maximum number of returned results per page. gaLimit :: Lens' GetAuthorizers (Maybe Int) gaLimit = lens _gaLimit (\ s a -> s{_gaLimit = a}); --- | If not all 'Authorizer' resources in the response were present, the position will specify where to start the next page of results.+-- | The current pagination position in the paged result set. gaPosition :: Lens' GetAuthorizers (Maybe Text) gaPosition = lens _gaPosition (\ s a -> s{_gaPosition = a}); --- | The 'RestApi' identifier for the 'Authorizers' resource.+-- | The string identifier of the associated 'RestApi' . gaRestAPIId :: Lens' GetAuthorizers Text gaRestAPIId = lens _gaRestAPIId (\ s a -> s{_gaRestAPIId = a}); @@ -100,9 +99,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetAuthorizers+instance Hashable GetAuthorizers where -instance NFData GetAuthorizers+instance NFData GetAuthorizers where  instance ToHeaders GetAuthorizers where         toHeaders@@ -127,16 +126,17 @@ -- -- /See:/ 'getAuthorizersResponse' smart constructor. data GetAuthorizersResponse = GetAuthorizersResponse'-    { _garsItems          :: !(Maybe [Authorizer])-    , _garsPosition       :: !(Maybe Text)-    , _garsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _garsItems          :: !(Maybe [Authorizer])+  , _garsPosition       :: !(Maybe Text)+  , _garsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetAuthorizersResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'garsItems' - Gets the current list of 'Authorizer' resources in the collection.+-- * 'garsItems' - The current page of elements from this collection. -- -- * 'garsPosition' - Undocumented member. --@@ -145,13 +145,14 @@     :: Int -- ^ 'garsResponseStatus'     -> GetAuthorizersResponse getAuthorizersResponse pResponseStatus_ =-    GetAuthorizersResponse'-    { _garsItems = Nothing-    , _garsPosition = Nothing-    , _garsResponseStatus = pResponseStatus_-    }+  GetAuthorizersResponse'+  { _garsItems = Nothing+  , _garsPosition = Nothing+  , _garsResponseStatus = pResponseStatus_+  } --- | Gets the current list of 'Authorizer' resources in the collection.++-- | The current page of elements from this collection. garsItems :: Lens' GetAuthorizersResponse [Authorizer] garsItems = lens _garsItems (\ s a -> s{_garsItems = a}) . _Default . _Coerce; @@ -163,4 +164,4 @@ garsResponseStatus :: Lens' GetAuthorizersResponse Int garsResponseStatus = lens _garsResponseStatus (\ s a -> s{_garsResponseStatus = a}); -instance NFData GetAuthorizersResponse+instance NFData GetAuthorizersResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetBasePathMapping--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -39,12 +39,12 @@     , bpmRestAPIId     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to describe a 'BasePathMapping' resource. --@@ -52,10 +52,11 @@ -- -- /See:/ 'getBasePathMapping' smart constructor. data GetBasePathMapping = GetBasePathMapping'-    { _gbpmDomainName :: !Text-    , _gbpmBasePath   :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gbpmDomainName :: !Text+  , _gbpmBasePath   :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetBasePathMapping' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -68,11 +69,10 @@     -> Text -- ^ 'gbpmBasePath'     -> GetBasePathMapping getBasePathMapping pDomainName_ pBasePath_ =-    GetBasePathMapping'-    { _gbpmDomainName = pDomainName_-    , _gbpmBasePath = pBasePath_-    }+  GetBasePathMapping'+  {_gbpmDomainName = pDomainName_, _gbpmBasePath = pBasePath_} + -- | The domain name of the 'BasePathMapping' resource to be described. gbpmDomainName :: Lens' GetBasePathMapping Text gbpmDomainName = lens _gbpmDomainName (\ s a -> s{_gbpmDomainName = a});@@ -86,9 +86,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetBasePathMapping+instance Hashable GetBasePathMapping where -instance NFData GetBasePathMapping+instance NFData GetBasePathMapping where  instance ToHeaders GetBasePathMapping where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetBasePathMappings--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -42,13 +42,13 @@     , gbpmrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Pager-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to get information about a collection of 'BasePathMapping' resources. --@@ -56,35 +56,34 @@ -- -- /See:/ 'getBasePathMappings' smart constructor. data GetBasePathMappings = GetBasePathMappings'-    { _gLimit      :: !(Maybe Int)-    , _gPosition   :: !(Maybe Text)-    , _gDomainName :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gLimit      :: !(Maybe Int)+  , _gPosition   :: !(Maybe Text)+  , _gDomainName :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetBasePathMappings' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gLimit' - The maximum number of 'BasePathMapping' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.+-- * 'gLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. ----- * 'gPosition' - The position of the current 'BasePathMapping' resource in the collection to get information about.+-- * 'gPosition' - The current pagination position in the paged result set. -- -- * 'gDomainName' - The domain name of a 'BasePathMapping' resource. getBasePathMappings     :: Text -- ^ 'gDomainName'     -> GetBasePathMappings getBasePathMappings pDomainName_ =-    GetBasePathMappings'-    { _gLimit = Nothing-    , _gPosition = Nothing-    , _gDomainName = pDomainName_-    }+  GetBasePathMappings'+  {_gLimit = Nothing, _gPosition = Nothing, _gDomainName = pDomainName_} --- | The maximum number of 'BasePathMapping' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.++-- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. gLimit :: Lens' GetBasePathMappings (Maybe Int) gLimit = lens _gLimit (\ s a -> s{_gLimit = a}); --- | The position of the current 'BasePathMapping' resource in the collection to get information about.+-- | The current pagination position in the paged result set. gPosition :: Lens' GetBasePathMappings (Maybe Text) gPosition = lens _gPosition (\ s a -> s{_gPosition = a}); @@ -110,9 +109,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetBasePathMappings+instance Hashable GetBasePathMappings where -instance NFData GetBasePathMappings+instance NFData GetBasePathMappings where  instance ToHeaders GetBasePathMappings where         toHeaders@@ -138,16 +137,17 @@ -- -- /See:/ 'getBasePathMappingsResponse' smart constructor. data GetBasePathMappingsResponse = GetBasePathMappingsResponse'-    { _gbpmrsItems          :: !(Maybe [BasePathMapping])-    , _gbpmrsPosition       :: !(Maybe Text)-    , _gbpmrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gbpmrsItems          :: !(Maybe [BasePathMapping])+  , _gbpmrsPosition       :: !(Maybe Text)+  , _gbpmrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetBasePathMappingsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gbpmrsItems' - The current page of any 'BasePathMapping' resources in the collection of base path mapping resources.+-- * 'gbpmrsItems' - The current page of elements from this collection. -- -- * 'gbpmrsPosition' - Undocumented member. --@@ -156,13 +156,14 @@     :: Int -- ^ 'gbpmrsResponseStatus'     -> GetBasePathMappingsResponse getBasePathMappingsResponse pResponseStatus_ =-    GetBasePathMappingsResponse'-    { _gbpmrsItems = Nothing-    , _gbpmrsPosition = Nothing-    , _gbpmrsResponseStatus = pResponseStatus_-    }+  GetBasePathMappingsResponse'+  { _gbpmrsItems = Nothing+  , _gbpmrsPosition = Nothing+  , _gbpmrsResponseStatus = pResponseStatus_+  } --- | The current page of any 'BasePathMapping' resources in the collection of base path mapping resources.++-- | The current page of elements from this collection. gbpmrsItems :: Lens' GetBasePathMappingsResponse [BasePathMapping] gbpmrsItems = lens _gbpmrsItems (\ s a -> s{_gbpmrsItems = a}) . _Default . _Coerce; @@ -174,4 +175,4 @@ gbpmrsResponseStatus :: Lens' GetBasePathMappingsResponse Int gbpmrsResponseStatus = lens _gbpmrsResponseStatus (\ s a -> s{_gbpmrsResponseStatus = a}); -instance NFData GetBasePathMappingsResponse+instance NFData GetBasePathMappingsResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetClientCertificate--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -40,12 +40,12 @@     , ccDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to get information about the current 'ClientCertificate' resource. --@@ -53,9 +53,10 @@ -- -- /See:/ 'getClientCertificate' smart constructor. newtype GetClientCertificate = GetClientCertificate'-    { _gccClientCertificateId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gccClientCertificateId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetClientCertificate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,10 +66,9 @@     :: Text -- ^ 'gccClientCertificateId'     -> GetClientCertificate getClientCertificate pClientCertificateId_ =-    GetClientCertificate'-    { _gccClientCertificateId = pClientCertificateId_-    }+  GetClientCertificate' {_gccClientCertificateId = pClientCertificateId_} + -- | The identifier of the 'ClientCertificate' resource to be described. gccClientCertificateId :: Lens' GetClientCertificate Text gccClientCertificateId = lens _gccClientCertificateId (\ s a -> s{_gccClientCertificateId = a});@@ -78,9 +78,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetClientCertificate+instance Hashable GetClientCertificate where -instance NFData GetClientCertificate+instance NFData GetClientCertificate where  instance ToHeaders GetClientCertificate where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetClientCertificates--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,13 +41,13 @@     , gccrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Pager-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | A request to get information about a collection of 'ClientCertificate' resources. --@@ -55,30 +55,29 @@ -- -- /See:/ 'getClientCertificates' smart constructor. data GetClientCertificates = GetClientCertificates'-    { _gccLimit    :: !(Maybe Int)-    , _gccPosition :: !(Maybe Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gccLimit    :: !(Maybe Int)+  , _gccPosition :: !(Maybe Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetClientCertificates' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gccLimit' - The maximum number of 'ClientCertificate' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.+-- * 'gccLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. ----- * 'gccPosition' - The position of the current 'ClientCertificate' resource in the collection to get information about.+-- * 'gccPosition' - The current pagination position in the paged result set. getClientCertificates     :: GetClientCertificates getClientCertificates =-    GetClientCertificates'-    { _gccLimit = Nothing-    , _gccPosition = Nothing-    }+  GetClientCertificates' {_gccLimit = Nothing, _gccPosition = Nothing} --- | The maximum number of 'ClientCertificate' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.++-- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. gccLimit :: Lens' GetClientCertificates (Maybe Int) gccLimit = lens _gccLimit (\ s a -> s{_gccLimit = a}); --- | The position of the current 'ClientCertificate' resource in the collection to get information about.+-- | The current pagination position in the paged result set. gccPosition :: Lens' GetClientCertificates (Maybe Text) gccPosition = lens _gccPosition (\ s a -> s{_gccPosition = a}); @@ -100,9 +99,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetClientCertificates+instance Hashable GetClientCertificates where -instance NFData GetClientCertificates+instance NFData GetClientCertificates where  instance ToHeaders GetClientCertificates where         toHeaders@@ -125,16 +124,17 @@ -- -- /See:/ 'getClientCertificatesResponse' smart constructor. data GetClientCertificatesResponse = GetClientCertificatesResponse'-    { _gccrsItems          :: !(Maybe [ClientCertificate])-    , _gccrsPosition       :: !(Maybe Text)-    , _gccrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gccrsItems          :: !(Maybe [ClientCertificate])+  , _gccrsPosition       :: !(Maybe Text)+  , _gccrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetClientCertificatesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gccrsItems' - The current page of any 'ClientCertificate' resources in the collection of 'ClientCertificate' resources.+-- * 'gccrsItems' - The current page of elements from this collection. -- -- * 'gccrsPosition' - Undocumented member. --@@ -143,13 +143,14 @@     :: Int -- ^ 'gccrsResponseStatus'     -> GetClientCertificatesResponse getClientCertificatesResponse pResponseStatus_ =-    GetClientCertificatesResponse'-    { _gccrsItems = Nothing-    , _gccrsPosition = Nothing-    , _gccrsResponseStatus = pResponseStatus_-    }+  GetClientCertificatesResponse'+  { _gccrsItems = Nothing+  , _gccrsPosition = Nothing+  , _gccrsResponseStatus = pResponseStatus_+  } --- | The current page of any 'ClientCertificate' resources in the collection of 'ClientCertificate' resources.++-- | The current page of elements from this collection. gccrsItems :: Lens' GetClientCertificatesResponse [ClientCertificate] gccrsItems = lens _gccrsItems (\ s a -> s{_gccrsItems = a}) . _Default . _Coerce; @@ -161,4 +162,4 @@ gccrsResponseStatus :: Lens' GetClientCertificatesResponse Int gccrsResponseStatus = lens _gccrsResponseStatus (\ s a -> s{_gccrsResponseStatus = a}); -instance NFData GetClientCertificatesResponse+instance NFData GetClientCertificatesResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDeployment--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -27,6 +27,7 @@       getDeployment     , GetDeployment     -- * Request Lenses+    , gEmbed     , gRestAPIId     , gDeploymentId @@ -40,12 +41,12 @@     , dDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to get information about a 'Deployment' resource. --@@ -53,28 +54,38 @@ -- -- /See:/ 'getDeployment' smart constructor. data GetDeployment = GetDeployment'-    { _gRestAPIId    :: !Text-    , _gDeploymentId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gEmbed        :: !(Maybe [Text])+  , _gRestAPIId    :: !Text+  , _gDeploymentId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDeployment' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gRestAPIId' - The identifier of the 'RestApi' resource for the 'Deployment' resource to get information about.+-- * 'gEmbed' - A query parameter to retrieve the specified embedded resources of the returned 'Deployment' resource in the response. In a REST API call, this @embed@ parameter value is a list of comma-separated strings, as in @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=var1,var2@ . The SDK and other platform-dependent libraries might use a different format for the list. Currently, this request supports only retrieval of the embedded API summary this way. Hence, the parameter value must be a single-valued list containing only the @"apisummary"@ string. For example, @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=apisummary@ . --+-- * 'gRestAPIId' - The string identifier of the associated 'RestApi' .+-- -- * 'gDeploymentId' - The identifier of the 'Deployment' resource to get information about. getDeployment     :: Text -- ^ 'gRestAPIId'     -> Text -- ^ 'gDeploymentId'     -> GetDeployment getDeployment pRestAPIId_ pDeploymentId_ =-    GetDeployment'-    { _gRestAPIId = pRestAPIId_-    , _gDeploymentId = pDeploymentId_-    }+  GetDeployment'+  { _gEmbed = Nothing+  , _gRestAPIId = pRestAPIId_+  , _gDeploymentId = pDeploymentId_+  } --- | The identifier of the 'RestApi' resource for the 'Deployment' resource to get information about.++-- | A query parameter to retrieve the specified embedded resources of the returned 'Deployment' resource in the response. In a REST API call, this @embed@ parameter value is a list of comma-separated strings, as in @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=var1,var2@ . The SDK and other platform-dependent libraries might use a different format for the list. Currently, this request supports only retrieval of the embedded API summary this way. Hence, the parameter value must be a single-valued list containing only the @"apisummary"@ string. For example, @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=apisummary@ .+gEmbed :: Lens' GetDeployment [Text]+gEmbed = lens _gEmbed (\ s a -> s{_gEmbed = a}) . _Default . _Coerce;++-- | The string identifier of the associated 'RestApi' . gRestAPIId :: Lens' GetDeployment Text gRestAPIId = lens _gRestAPIId (\ s a -> s{_gRestAPIId = a}); @@ -87,9 +98,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetDeployment+instance Hashable GetDeployment where -instance NFData GetDeployment+instance NFData GetDeployment where  instance ToHeaders GetDeployment where         toHeaders@@ -104,4 +115,7 @@                toBS _gDeploymentId]  instance ToQuery GetDeployment where-        toQuery = const mempty+        toQuery GetDeployment'{..}+          = mconcat+              ["embed" =:+                 toQuery (toQueryList "member" <$> _gEmbed)]

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDeployments--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -42,13 +42,13 @@     , gdrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Pager-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Requests Amazon API Gateway to get information about a 'Deployments' collection. --@@ -56,39 +56,38 @@ -- -- /See:/ 'getDeployments' smart constructor. data GetDeployments = GetDeployments'-    { _gdLimit     :: !(Maybe Int)-    , _gdPosition  :: !(Maybe Text)-    , _gdRestAPIId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdLimit     :: !(Maybe Int)+  , _gdPosition  :: !(Maybe Text)+  , _gdRestAPIId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDeployments' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdLimit' - The maximum number of 'Deployment' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.+-- * 'gdLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. ----- * 'gdPosition' - The position of the current 'Deployment' resource in the collection to get information about.+-- * 'gdPosition' - The current pagination position in the paged result set. ----- * 'gdRestAPIId' - The identifier of the 'RestApi' resource for the collection of 'Deployment' resources to get information about.+-- * 'gdRestAPIId' - The string identifier of the associated 'RestApi' . getDeployments     :: Text -- ^ 'gdRestAPIId'     -> GetDeployments getDeployments pRestAPIId_ =-    GetDeployments'-    { _gdLimit = Nothing-    , _gdPosition = Nothing-    , _gdRestAPIId = pRestAPIId_-    }+  GetDeployments'+  {_gdLimit = Nothing, _gdPosition = Nothing, _gdRestAPIId = pRestAPIId_} --- | The maximum number of 'Deployment' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.++-- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. gdLimit :: Lens' GetDeployments (Maybe Int) gdLimit = lens _gdLimit (\ s a -> s{_gdLimit = a}); --- | The position of the current 'Deployment' resource in the collection to get information about.+-- | The current pagination position in the paged result set. gdPosition :: Lens' GetDeployments (Maybe Text) gdPosition = lens _gdPosition (\ s a -> s{_gdPosition = a}); --- | The identifier of the 'RestApi' resource for the collection of 'Deployment' resources to get information about.+-- | The string identifier of the associated 'RestApi' . gdRestAPIId :: Lens' GetDeployments Text gdRestAPIId = lens _gdRestAPIId (\ s a -> s{_gdRestAPIId = a}); @@ -109,9 +108,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetDeployments+instance Hashable GetDeployments where -instance NFData GetDeployments+instance NFData GetDeployments where  instance ToHeaders GetDeployments where         toHeaders@@ -136,16 +135,17 @@ -- -- /See:/ 'getDeploymentsResponse' smart constructor. data GetDeploymentsResponse = GetDeploymentsResponse'-    { _gdrsItems          :: !(Maybe [Deployment])-    , _gdrsPosition       :: !(Maybe Text)-    , _gdrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdrsItems          :: !(Maybe [Deployment])+  , _gdrsPosition       :: !(Maybe Text)+  , _gdrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDeploymentsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdrsItems' - The current page of any 'Deployment' resources in the collection of deployment resources.+-- * 'gdrsItems' - The current page of elements from this collection. -- -- * 'gdrsPosition' - Undocumented member. --@@ -154,13 +154,14 @@     :: Int -- ^ 'gdrsResponseStatus'     -> GetDeploymentsResponse getDeploymentsResponse pResponseStatus_ =-    GetDeploymentsResponse'-    { _gdrsItems = Nothing-    , _gdrsPosition = Nothing-    , _gdrsResponseStatus = pResponseStatus_-    }+  GetDeploymentsResponse'+  { _gdrsItems = Nothing+  , _gdrsPosition = Nothing+  , _gdrsResponseStatus = pResponseStatus_+  } --- | The current page of any 'Deployment' resources in the collection of deployment resources.++-- | The current page of elements from this collection. gdrsItems :: Lens' GetDeploymentsResponse [Deployment] gdrsItems = lens _gdrsItems (\ s a -> s{_gdrsItems = a}) . _Default . _Coerce; @@ -172,4 +173,4 @@ gdrsResponseStatus :: Lens' GetDeploymentsResponse Int gdrsResponseStatus = lens _gdrsResponseStatus (\ s a -> s{_gdrsResponseStatus = a}); -instance NFData GetDeploymentsResponse+instance NFData GetDeploymentsResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDocumentationPart--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -37,12 +37,12 @@     , dpProperties     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Gets a specified documentation part of a given API. --@@ -50,32 +50,32 @@ -- -- /See:/ 'getDocumentationPart' smart constructor. data GetDocumentationPart = GetDocumentationPart'-    { _getRestAPIId           :: !Text-    , _getDocumentationPartId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _getRestAPIId           :: !Text+  , _getDocumentationPartId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationPart' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'getRestAPIId' - [Required] The identifier of an API of the to-be-retrieved documentation part.+-- * 'getRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'getDocumentationPartId' - [Required] The identifier of the to-be-retrieved documentation part.+-- * 'getDocumentationPartId' - [Required] The string identifier of the associated 'RestApi' . getDocumentationPart     :: Text -- ^ 'getRestAPIId'     -> Text -- ^ 'getDocumentationPartId'     -> GetDocumentationPart getDocumentationPart pRestAPIId_ pDocumentationPartId_ =-    GetDocumentationPart'-    { _getRestAPIId = pRestAPIId_-    , _getDocumentationPartId = pDocumentationPartId_-    }+  GetDocumentationPart'+  {_getRestAPIId = pRestAPIId_, _getDocumentationPartId = pDocumentationPartId_} --- | [Required] The identifier of an API of the to-be-retrieved documentation part.++-- | [Required] The string identifier of the associated 'RestApi' . getRestAPIId :: Lens' GetDocumentationPart Text getRestAPIId = lens _getRestAPIId (\ s a -> s{_getRestAPIId = a}); --- | [Required] The identifier of the to-be-retrieved documentation part.+-- | [Required] The string identifier of the associated 'RestApi' . getDocumentationPartId :: Lens' GetDocumentationPart Text getDocumentationPartId = lens _getDocumentationPartId (\ s a -> s{_getDocumentationPartId = a}); @@ -84,9 +84,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetDocumentationPart+instance Hashable GetDocumentationPart where -instance NFData GetDocumentationPart+instance NFData GetDocumentationPart where  instance ToHeaders GetDocumentationPart where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDocumentationParts--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,12 +41,12 @@     , gdprsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Gets the documentation parts of an API. The result may be filtered by the type, name, or path of API entities (targets). --@@ -54,14 +54,15 @@ -- -- /See:/ 'getDocumentationParts' smart constructor. data GetDocumentationParts = GetDocumentationParts'-    { _gdpPath      :: !(Maybe Text)-    , _gdpNameQuery :: !(Maybe Text)-    , _gdpLimit     :: !(Maybe Int)-    , _gdpType      :: !(Maybe DocumentationPartType)-    , _gdpPosition  :: !(Maybe Text)-    , _gdpRestAPIId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdpPath      :: !(Maybe Text)+  , _gdpNameQuery :: !(Maybe Text)+  , _gdpLimit     :: !(Maybe Int)+  , _gdpType      :: !(Maybe DocumentationPartType)+  , _gdpPosition  :: !(Maybe Text)+  , _gdpRestAPIId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationParts' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -70,26 +71,27 @@ -- -- * 'gdpNameQuery' - The name of API entities of the to-be-retrieved documentation parts. ----- * 'gdpLimit' - The size of the paged results.+-- * 'gdpLimit' - The maximum number of returned results per page. -- -- * 'gdpType' - The type of API entities of the to-be-retrieved documentation parts. ----- * 'gdpPosition' - The position of the to-be-retrieved documentation part in the 'DocumentationParts' collection.+-- * 'gdpPosition' - The current pagination position in the paged result set. ----- * 'gdpRestAPIId' - [Required] The identifier of the API of the to-be-retrieved documentation parts.+-- * 'gdpRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getDocumentationParts     :: Text -- ^ 'gdpRestAPIId'     -> GetDocumentationParts getDocumentationParts pRestAPIId_ =-    GetDocumentationParts'-    { _gdpPath = Nothing-    , _gdpNameQuery = Nothing-    , _gdpLimit = Nothing-    , _gdpType = Nothing-    , _gdpPosition = Nothing-    , _gdpRestAPIId = pRestAPIId_-    }+  GetDocumentationParts'+  { _gdpPath = Nothing+  , _gdpNameQuery = Nothing+  , _gdpLimit = Nothing+  , _gdpType = Nothing+  , _gdpPosition = Nothing+  , _gdpRestAPIId = pRestAPIId_+  } + -- | The path of API entities of the to-be-retrieved documentation parts. gdpPath :: Lens' GetDocumentationParts (Maybe Text) gdpPath = lens _gdpPath (\ s a -> s{_gdpPath = a});@@ -98,7 +100,7 @@ gdpNameQuery :: Lens' GetDocumentationParts (Maybe Text) gdpNameQuery = lens _gdpNameQuery (\ s a -> s{_gdpNameQuery = a}); --- | The size of the paged results.+-- | The maximum number of returned results per page. gdpLimit :: Lens' GetDocumentationParts (Maybe Int) gdpLimit = lens _gdpLimit (\ s a -> s{_gdpLimit = a}); @@ -106,11 +108,11 @@ gdpType :: Lens' GetDocumentationParts (Maybe DocumentationPartType) gdpType = lens _gdpType (\ s a -> s{_gdpType = a}); --- | The position of the to-be-retrieved documentation part in the 'DocumentationParts' collection.+-- | The current pagination position in the paged result set. gdpPosition :: Lens' GetDocumentationParts (Maybe Text) gdpPosition = lens _gdpPosition (\ s a -> s{_gdpPosition = a}); --- | [Required] The identifier of the API of the to-be-retrieved documentation parts.+-- | [Required] The string identifier of the associated 'RestApi' . gdpRestAPIId :: Lens' GetDocumentationParts Text gdpRestAPIId = lens _gdpRestAPIId (\ s a -> s{_gdpRestAPIId = a}); @@ -125,9 +127,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetDocumentationParts+instance Hashable GetDocumentationParts where -instance NFData GetDocumentationParts+instance NFData GetDocumentationParts where  instance ToHeaders GetDocumentationParts where         toHeaders@@ -155,16 +157,17 @@ -- -- /See:/ 'getDocumentationPartsResponse' smart constructor. data GetDocumentationPartsResponse = GetDocumentationPartsResponse'-    { _gdprsItems          :: !(Maybe [DocumentationPart])-    , _gdprsPosition       :: !(Maybe Text)-    , _gdprsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdprsItems          :: !(Maybe [DocumentationPart])+  , _gdprsPosition       :: !(Maybe Text)+  , _gdprsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationPartsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdprsItems' - The current page of 'DocumentationPart' resources in the 'DocumentationParts' collection.+-- * 'gdprsItems' - The current page of elements from this collection. -- -- * 'gdprsPosition' - Undocumented member. --@@ -173,13 +176,14 @@     :: Int -- ^ 'gdprsResponseStatus'     -> GetDocumentationPartsResponse getDocumentationPartsResponse pResponseStatus_ =-    GetDocumentationPartsResponse'-    { _gdprsItems = Nothing-    , _gdprsPosition = Nothing-    , _gdprsResponseStatus = pResponseStatus_-    }+  GetDocumentationPartsResponse'+  { _gdprsItems = Nothing+  , _gdprsPosition = Nothing+  , _gdprsResponseStatus = pResponseStatus_+  } --- | The current page of 'DocumentationPart' resources in the 'DocumentationParts' collection.++-- | The current page of elements from this collection. gdprsItems :: Lens' GetDocumentationPartsResponse [DocumentationPart] gdprsItems = lens _gdprsItems (\ s a -> s{_gdprsItems = a}) . _Default . _Coerce; @@ -191,4 +195,4 @@ gdprsResponseStatus :: Lens' GetDocumentationPartsResponse Int gdprsResponseStatus = lens _gdprsResponseStatus (\ s a -> s{_gdprsResponseStatus = a}); -instance NFData GetDocumentationPartsResponse+instance NFData GetDocumentationPartsResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDocumentationVersion--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -37,12 +37,12 @@     , dvDescription     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Gets a documentation snapshot of an API. --@@ -50,15 +50,16 @@ -- -- /See:/ 'getDocumentationVersion' smart constructor. data GetDocumentationVersion = GetDocumentationVersion'-    { _gdvdRestAPIId            :: !Text-    , _gdvdDocumentationVersion :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdvdRestAPIId            :: !Text+  , _gdvdDocumentationVersion :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationVersion' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdvdRestAPIId' - [Required] The identifier of the API of the to-be-retrieved documentation snapshot.+-- * 'gdvdRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'gdvdDocumentationVersion' - [Required] The version identifier of the to-be-retrieved documentation snapshot. getDocumentationVersion@@ -66,12 +67,13 @@     -> Text -- ^ 'gdvdDocumentationVersion'     -> GetDocumentationVersion getDocumentationVersion pRestAPIId_ pDocumentationVersion_ =-    GetDocumentationVersion'-    { _gdvdRestAPIId = pRestAPIId_-    , _gdvdDocumentationVersion = pDocumentationVersion_-    }+  GetDocumentationVersion'+  { _gdvdRestAPIId = pRestAPIId_+  , _gdvdDocumentationVersion = pDocumentationVersion_+  } --- | [Required] The identifier of the API of the to-be-retrieved documentation snapshot.++-- | [Required] The string identifier of the associated 'RestApi' . gdvdRestAPIId :: Lens' GetDocumentationVersion Text gdvdRestAPIId = lens _gdvdRestAPIId (\ s a -> s{_gdvdRestAPIId = a}); @@ -85,9 +87,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetDocumentationVersion+instance Hashable GetDocumentationVersion where -instance NFData GetDocumentationVersion+instance NFData GetDocumentationVersion where  instance ToHeaders GetDocumentationVersion where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDocumentationVersions--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -38,12 +38,12 @@     , gdvrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Gets the documentation versions of an API. --@@ -51,39 +51,38 @@ -- -- /See:/ 'getDocumentationVersions' smart constructor. data GetDocumentationVersions = GetDocumentationVersions'-    { _gdvLimit     :: !(Maybe Int)-    , _gdvPosition  :: !(Maybe Text)-    , _gdvRestAPIId :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdvLimit     :: !(Maybe Int)+  , _gdvPosition  :: !(Maybe Text)+  , _gdvRestAPIId :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationVersions' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdvLimit' - The page size of the returned documentation versions.+-- * 'gdvLimit' - The maximum number of returned results per page. ----- * 'gdvPosition' - The position of the returned @DocumentationVersion@ in the 'DocumentationVersions' collection.+-- * 'gdvPosition' - The current pagination position in the paged result set. ----- * 'gdvRestAPIId' - [Required] The identifier of an API of the to-be-retrieved documentation versions.+-- * 'gdvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getDocumentationVersions     :: Text -- ^ 'gdvRestAPIId'     -> GetDocumentationVersions getDocumentationVersions pRestAPIId_ =-    GetDocumentationVersions'-    { _gdvLimit = Nothing-    , _gdvPosition = Nothing-    , _gdvRestAPIId = pRestAPIId_-    }+  GetDocumentationVersions'+  {_gdvLimit = Nothing, _gdvPosition = Nothing, _gdvRestAPIId = pRestAPIId_} --- | The page size of the returned documentation versions.++-- | The maximum number of returned results per page. gdvLimit :: Lens' GetDocumentationVersions (Maybe Int) gdvLimit = lens _gdvLimit (\ s a -> s{_gdvLimit = a}); --- | The position of the returned @DocumentationVersion@ in the 'DocumentationVersions' collection.+-- | The current pagination position in the paged result set. gdvPosition :: Lens' GetDocumentationVersions (Maybe Text) gdvPosition = lens _gdvPosition (\ s a -> s{_gdvPosition = a}); --- | [Required] The identifier of an API of the to-be-retrieved documentation versions.+-- | [Required] The string identifier of the associated 'RestApi' . gdvRestAPIId :: Lens' GetDocumentationVersions Text gdvRestAPIId = lens _gdvRestAPIId (\ s a -> s{_gdvRestAPIId = a}); @@ -98,9 +97,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetDocumentationVersions+instance Hashable GetDocumentationVersions where -instance NFData GetDocumentationVersions+instance NFData GetDocumentationVersions where  instance ToHeaders GetDocumentationVersions where         toHeaders@@ -128,16 +127,17 @@ -- -- /See:/ 'getDocumentationVersionsResponse' smart constructor. data GetDocumentationVersionsResponse = GetDocumentationVersionsResponse'-    { _gdvrsItems          :: !(Maybe [DocumentationVersion])-    , _gdvrsPosition       :: !(Maybe Text)-    , _gdvrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdvrsItems          :: !(Maybe [DocumentationVersion])+  , _gdvrsPosition       :: !(Maybe Text)+  , _gdvrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDocumentationVersionsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdvrsItems' - The current page of 'DocumentationVersion' items from the 'DocumentationVersions' collection of an API.+-- * 'gdvrsItems' - The current page of elements from this collection. -- -- * 'gdvrsPosition' - Undocumented member. --@@ -146,13 +146,14 @@     :: Int -- ^ 'gdvrsResponseStatus'     -> GetDocumentationVersionsResponse getDocumentationVersionsResponse pResponseStatus_ =-    GetDocumentationVersionsResponse'-    { _gdvrsItems = Nothing-    , _gdvrsPosition = Nothing-    , _gdvrsResponseStatus = pResponseStatus_-    }+  GetDocumentationVersionsResponse'+  { _gdvrsItems = Nothing+  , _gdvrsPosition = Nothing+  , _gdvrsResponseStatus = pResponseStatus_+  } --- | The current page of 'DocumentationVersion' items from the 'DocumentationVersions' collection of an API.++-- | The current page of elements from this collection. gdvrsItems :: Lens' GetDocumentationVersionsResponse [DocumentationVersion] gdvrsItems = lens _gdvrsItems (\ s a -> s{_gdvrsItems = a}) . _Default . _Coerce; @@ -165,3 +166,4 @@ gdvrsResponseStatus = lens _gdvrsResponseStatus (\ s a -> s{_gdvrsResponseStatus = a});  instance NFData GetDocumentationVersionsResponse+         where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDomainName--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -34,17 +34,22 @@     , DomainName     -- * Response Lenses     , dnCertificateName+    , dnRegionalCertificateARN+    , dnCertificateARN     , dnDomainName+    , dnRegionalCertificateName+    , dnRegionalDomainName     , dnCertificateUploadDate     , dnDistributionDomainName+    , dnEndpointConfiguration     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to get the name of a 'DomainName' resource. --@@ -52,9 +57,10 @@ -- -- /See:/ 'getDomainName' smart constructor. newtype GetDomainName = GetDomainName'-    { _gdnDomainName :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdnDomainName :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDomainName' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -63,11 +69,9 @@ getDomainName     :: Text -- ^ 'gdnDomainName'     -> GetDomainName-getDomainName pDomainName_ =-    GetDomainName'-    { _gdnDomainName = pDomainName_-    }+getDomainName pDomainName_ = GetDomainName' {_gdnDomainName = pDomainName_} + -- | The name of the 'DomainName' resource. gdnDomainName :: Lens' GetDomainName Text gdnDomainName = lens _gdnDomainName (\ s a -> s{_gdnDomainName = a});@@ -77,9 +81,9 @@         request = get apiGateway         response = receiveJSON (\ s h x -> eitherParseJSON x) -instance Hashable GetDomainName+instance Hashable GetDomainName where -instance NFData GetDomainName+instance NFData GetDomainName where  instance ToHeaders GetDomainName where         toHeaders

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetDomainNames--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -41,13 +41,13 @@     , gdnrsResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Pager-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request to describe a collection of 'DomainName' resources. --@@ -55,30 +55,28 @@ -- -- /See:/ 'getDomainNames' smart constructor. data GetDomainNames = GetDomainNames'-    { _gdnLimit    :: !(Maybe Int)-    , _gdnPosition :: !(Maybe Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdnLimit    :: !(Maybe Int)+  , _gdnPosition :: !(Maybe Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDomainNames' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdnLimit' - The maximum number of 'DomainName' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.+-- * 'gdnLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. ----- * 'gdnPosition' - The position of the current domain names to get information about.+-- * 'gdnPosition' - The current pagination position in the paged result set. getDomainNames     :: GetDomainNames-getDomainNames =-    GetDomainNames'-    { _gdnLimit = Nothing-    , _gdnPosition = Nothing-    }+getDomainNames = GetDomainNames' {_gdnLimit = Nothing, _gdnPosition = Nothing} --- | The maximum number of 'DomainName' resources in the collection to get information about. The default limit is 25. It should be an integer between 1 - 500.++-- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500. gdnLimit :: Lens' GetDomainNames (Maybe Int) gdnLimit = lens _gdnLimit (\ s a -> s{_gdnLimit = a}); --- | The position of the current domain names to get information about.+-- | The current pagination position in the paged result set. gdnPosition :: Lens' GetDomainNames (Maybe Text) gdnPosition = lens _gdnPosition (\ s a -> s{_gdnPosition = a}); @@ -99,9 +97,9 @@                    (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>                      (pure (fromEnum s))) -instance Hashable GetDomainNames+instance Hashable GetDomainNames where -instance NFData GetDomainNames+instance NFData GetDomainNames where  instance ToHeaders GetDomainNames where         toHeaders@@ -124,16 +122,17 @@ -- -- /See:/ 'getDomainNamesResponse' smart constructor. data GetDomainNamesResponse = GetDomainNamesResponse'-    { _gdnrsItems          :: !(Maybe [DomainName])-    , _gdnrsPosition       :: !(Maybe Text)-    , _gdnrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gdnrsItems          :: !(Maybe [DomainName])+  , _gdnrsPosition       :: !(Maybe Text)+  , _gdnrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetDomainNamesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdnrsItems' - The current page of any 'DomainName' resources in the collection of 'DomainName' resources.+-- * 'gdnrsItems' - The current page of elements from this collection. -- -- * 'gdnrsPosition' - Undocumented member. --@@ -142,13 +141,14 @@     :: Int -- ^ 'gdnrsResponseStatus'     -> GetDomainNamesResponse getDomainNamesResponse pResponseStatus_ =-    GetDomainNamesResponse'-    { _gdnrsItems = Nothing-    , _gdnrsPosition = Nothing-    , _gdnrsResponseStatus = pResponseStatus_-    }+  GetDomainNamesResponse'+  { _gdnrsItems = Nothing+  , _gdnrsPosition = Nothing+  , _gdnrsResponseStatus = pResponseStatus_+  } --- | The current page of any 'DomainName' resources in the collection of 'DomainName' resources.++-- | The current page of elements from this collection. gdnrsItems :: Lens' GetDomainNamesResponse [DomainName] gdnrsItems = lens _gdnrsItems (\ s a -> s{_gdnrsItems = a}) . _Default . _Coerce; @@ -160,4 +160,4 @@ gdnrsResponseStatus :: Lens' GetDomainNamesResponse Int gdnrsResponseStatus = lens _gdnrsResponseStatus (\ s a -> s{_gdnrsResponseStatus = a}); -instance NFData GetDomainNamesResponse+instance NFData GetDomainNamesResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.APIGateway.GetExport--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -43,12 +43,12 @@     , gersResponseStatus     ) where -import           Network.AWS.APIGateway.Types-import           Network.AWS.APIGateway.Types.Product-import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response+import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response  -- | Request a new export of a 'RestApi' for a particular 'Stage' . --@@ -56,13 +56,14 @@ -- -- /See:/ 'getExport' smart constructor. data GetExport = GetExport'-    { _geParameters :: !(Maybe (Map Text Text))-    , _geAccepts    :: !(Maybe Text)-    , _geRestAPIId  :: !Text-    , _geStageName  :: !Text-    , _geExportType :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _geParameters :: !(Maybe (Map Text Text))+  , _geAccepts    :: !(Maybe Text)+  , _geRestAPIId  :: !Text+  , _geStageName  :: !Text+  , _geExportType :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetExport' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,7 +72,7 @@ -- -- * 'geAccepts' - The content-type of the export, for example @application/json@ . Currently @application/json@ and @application/yaml@ are supported for @exportType@ of @swagger@ . This should be specified in the @Accept@ header for direct API requests. ----- * 'geRestAPIId' - The identifier of the 'RestApi' to be exported.+-- * 'geRestAPIId' - The string identifier of the associated 'RestApi' . -- -- * 'geStageName' - The name of the 'Stage' that will be exported. --@@ -82,14 +83,15 @@     -> Text -- ^ 'geExportType'     -> GetExport getExport pRestAPIId_ pStageName_ pExportType_ =-    GetExport'-    { _geParameters = Nothing-    , _geAccepts = Nothing-    , _geRestAPIId = pRestAPIId_-    , _geStageName = pStageName_-    , _geExportType = pExportType_-    }+  GetExport'+  { _geParameters = Nothing+  , _geAccepts = Nothing+  , _geRestAPIId = pRestAPIId_+  , _geStageName = pStageName_+  , _geExportType = pExportType_+  } + -- | A key-value map of query string parameters that specify properties of the export, depending on the requested @exportType@ . For @exportType@ @swagger@ , any combination of the following parameters are supported: @integrations@ will export the API with x-amazon-apigateway-integration extensions. @authorizers@ will export the API with x-amazon-apigateway-authorizer extensions. @postman@ will export the API with Postman extensions, allowing for import to the Postman tool geParameters :: Lens' GetExport (HashMap Text Text) geParameters = lens _geParameters (\ s a -> s{_geParameters = a}) . _Default . _Map;@@ -98,7 +100,7 @@ geAccepts :: Lens' GetExport (Maybe Text) geAccepts = lens _geAccepts (\ s a -> s{_geAccepts = a}); --- | The identifier of the 'RestApi' to be exported.+-- | The string identifier of the associated 'RestApi' . geRestAPIId :: Lens' GetExport Text geRestAPIId = lens _geRestAPIId (\ s a -> s{_geRestAPIId = a}); @@ -121,9 +123,9 @@                      (h .#? "Content-Type")                      <*> (pure (fromEnum s))) -instance Hashable GetExport+instance Hashable GetExport where -instance NFData GetExport+instance NFData GetExport where  instance ToHeaders GetExport where         toHeaders GetExport'{..}@@ -150,12 +152,13 @@ -- -- /See:/ 'getExportResponse' smart constructor. data GetExportResponse = GetExportResponse'-    { _gersBody               :: !(Maybe (HashMap Text Value))-    , _gersContentDisposition :: !(Maybe Text)-    , _gersContentType        :: !(Maybe Text)-    , _gersResponseStatus     :: !Int-    } deriving (Eq,Show,Data,Typeable,Generic)+  { _gersBody               :: !(Maybe (HashMap Text Value))+  , _gersContentDisposition :: !(Maybe Text)+  , _gersContentType        :: !(Maybe Text)+  , _gersResponseStatus     :: !Int+  } deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetExportResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -171,13 +174,14 @@     :: Int -- ^ 'gersResponseStatus'     -> GetExportResponse getExportResponse pResponseStatus_ =-    GetExportResponse'-    { _gersBody = Nothing-    , _gersContentDisposition = Nothing-    , _gersContentType = Nothing-    , _gersResponseStatus = pResponseStatus_-    }+  GetExportResponse'+  { _gersBody = Nothing+  , _gersContentDisposition = Nothing+  , _gersContentType = Nothing+  , _gersResponseStatus = pResponseStatus_+  } + -- | The binary blob response to 'GetExport' , which contains the export. gersBody :: Lens' GetExportResponse (Maybe (HashMap Text Value)) gersBody = lens _gersBody (\ s a -> s{_gersBody = a});@@ -194,4 +198,4 @@ gersResponseStatus :: Lens' GetExportResponse Int gersResponseStatus = lens _gersResponseStatus (\ s a -> s{_gersResponseStatus = a}); -instance NFData GetExportResponse+instance NFData GetExportResponse where

@@ -0,0 +1,108 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.APIGateway.GetGatewayResponse+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a 'GatewayResponse' of a specified response type on the given 'RestApi' .+--+--+module Network.AWS.APIGateway.GetGatewayResponse+    (+    -- * Creating a Request+      getGatewayResponse+    , GetGatewayResponse+    -- * Request Lenses+    , gggRestAPIId+    , gggResponseType++    -- * Destructuring the Response+    , gatewayResponse+    , GatewayResponse+    -- * Response Lenses+    , gDefaultResponse+    , gResponseTemplates+    , gResponseType+    , gStatusCode+    , gResponseParameters+    ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Gets a 'GatewayResponse' of a specified response type on the given 'RestApi' .+--+--+--+-- /See:/ 'getGatewayResponse' smart constructor.+data GetGatewayResponse = GetGatewayResponse'+  { _gggRestAPIId    :: !Text+  , _gggResponseType :: !GatewayResponseType+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetGatewayResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gggRestAPIId' - The string identifier of the associated 'RestApi' .+--+-- * 'gggResponseType' - The response type of the associated 'GatewayResponse' . Valid values are     * ACCESS_DENIED    * API_CONFIGURATION_ERROR    * AUTHORIZER_FAILURE    * AUTHORIZER_CONFIGURATION_ERROR    * BAD_REQUEST_PARAMETERS    * BAD_REQUEST_BODY    * DEFAULT_4XX    * DEFAULT_5XX    * EXPIRED_TOKEN    * INVALID_SIGNATURE    * INTEGRATION_FAILURE    * INTEGRATION_TIMEOUT    * INVALID_API_KEY    * MISSING_AUTHENTICATION_TOKEN    * QUOTA_EXCEEDED    * REQUEST_TOO_LARGE    * RESOURCE_NOT_FOUND    * THROTTLED    * UNAUTHORIZED    * UNSUPPORTED_MEDIA_TYPES+getGatewayResponse+    :: Text -- ^ 'gggRestAPIId'+    -> GatewayResponseType -- ^ 'gggResponseType'+    -> GetGatewayResponse+getGatewayResponse pRestAPIId_ pResponseType_ =+  GetGatewayResponse'+  {_gggRestAPIId = pRestAPIId_, _gggResponseType = pResponseType_}+++-- | The string identifier of the associated 'RestApi' .+gggRestAPIId :: Lens' GetGatewayResponse Text+gggRestAPIId = lens _gggRestAPIId (\ s a -> s{_gggRestAPIId = a});++-- | The response type of the associated 'GatewayResponse' . Valid values are     * ACCESS_DENIED    * API_CONFIGURATION_ERROR    * AUTHORIZER_FAILURE    * AUTHORIZER_CONFIGURATION_ERROR    * BAD_REQUEST_PARAMETERS    * BAD_REQUEST_BODY    * DEFAULT_4XX    * DEFAULT_5XX    * EXPIRED_TOKEN    * INVALID_SIGNATURE    * INTEGRATION_FAILURE    * INTEGRATION_TIMEOUT    * INVALID_API_KEY    * MISSING_AUTHENTICATION_TOKEN    * QUOTA_EXCEEDED    * REQUEST_TOO_LARGE    * RESOURCE_NOT_FOUND    * THROTTLED    * UNAUTHORIZED    * UNSUPPORTED_MEDIA_TYPES+gggResponseType :: Lens' GetGatewayResponse GatewayResponseType+gggResponseType = lens _gggResponseType (\ s a -> s{_gggResponseType = a});++instance AWSRequest GetGatewayResponse where+        type Rs GetGatewayResponse = GatewayResponse+        request = get apiGateway+        response = receiveJSON (\ s h x -> eitherParseJSON x)++instance Hashable GetGatewayResponse where++instance NFData GetGatewayResponse where++instance ToHeaders GetGatewayResponse where+        toHeaders+          = const+              (mconcat+                 ["Accept" =# ("application/json" :: ByteString)])++instance ToPath GetGatewayResponse where+        toPath GetGatewayResponse'{..}+          = mconcat+              ["/restapis/", toBS _gggRestAPIId,+               "/gatewayresponses/", toBS _gggResponseType]++instance ToQuery GetGatewayResponse where+        toQuery = const mempty