diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,38 +8,20 @@ ## Version -`1.4.2` +`1.4.3` ## Description Amazon Redshift __Overview__ -This is an interface reference for Amazon Redshift. It contains -documentation for one of the programming or command line interfaces you -can use to manage Amazon Redshift clusters. Note that Amazon Redshift is -asynchronous, which means that some interfaces may require techniques, -such as polling or asynchronous callback handlers, to determine when a -command has been applied. In this reference, the parameter descriptions -indicate whether a change is applied immediately, on the next instance -reboot, or during the next maintenance window. For a summary of the -Amazon Redshift cluster management interfaces, go to -. +This is an interface reference for Amazon Redshift. It contains documentation for one of the programming or command line interfaces you can use to manage Amazon Redshift clusters. Note that Amazon Redshift is asynchronous, which means that some interfaces may require techniques, such as polling or asynchronous callback handlers, to determine when a command has been applied. In this reference, the parameter descriptions indicate whether a change is applied immediately, on the next instance reboot, or during the next maintenance window. For a summary of the Amazon Redshift cluster management interfaces, go to . -Amazon Redshift manages all the work of setting up, operating, and -scaling a data warehouse: provisioning capacity, monitoring and backing -up the cluster, and applying patches and upgrades to the Amazon Redshift -engine. You can focus on using your data to acquire new insights for -your business and customers. +Amazon Redshift manages all the work of setting up, operating, and scaling a data warehouse: provisioning capacity, monitoring and backing up the cluster, and applying patches and upgrades to the Amazon Redshift engine. You can focus on using your data to acquire new insights for your business and customers. -If you are a first-time user of Amazon Redshift, we recommend that you -begin by reading the The - +If you are a first-time user of Amazon Redshift, we recommend that you begin by reading the The -If you are a database developer, the - -explains how to design, build, query, and maintain the databases that -make up your data warehouse. +If you are a database developer, the explains how to design, build, query, and maintain the databases that make up your data warehouse. Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-redshift) and the [AWS API Reference](https://aws.amazon.com/documentation/). diff --git a/amazonka-redshift.cabal b/amazonka-redshift.cabal --- a/amazonka-redshift.cabal +++ b/amazonka-redshift.cabal @@ -1,5 +1,5 @@ name: amazonka-redshift -version: 1.4.2 +version: 1.4.3 synopsis: Amazon Redshift SDK. homepage: https://github.com/brendanhay/amazonka bug-reports: https://github.com/brendanhay/amazonka/issues @@ -15,31 +15,13 @@ description: Amazon Redshift __Overview__ - This is an interface reference for Amazon Redshift. It contains - documentation for one of the programming or command line interfaces you - can use to manage Amazon Redshift clusters. Note that Amazon Redshift is - asynchronous, which means that some interfaces may require techniques, - such as polling or asynchronous callback handlers, to determine when a - command has been applied. In this reference, the parameter descriptions - indicate whether a change is applied immediately, on the next instance - reboot, or during the next maintenance window. For a summary of the - Amazon Redshift cluster management interfaces, go to - . + This is an interface reference for Amazon Redshift. It contains documentation for one of the programming or command line interfaces you can use to manage Amazon Redshift clusters. Note that Amazon Redshift is asynchronous, which means that some interfaces may require techniques, such as polling or asynchronous callback handlers, to determine when a command has been applied. In this reference, the parameter descriptions indicate whether a change is applied immediately, on the next instance reboot, or during the next maintenance window. For a summary of the Amazon Redshift cluster management interfaces, go to . - Amazon Redshift manages all the work of setting up, operating, and - scaling a data warehouse: provisioning capacity, monitoring and backing - up the cluster, and applying patches and upgrades to the Amazon Redshift - engine. You can focus on using your data to acquire new insights for - your business and customers. + Amazon Redshift manages all the work of setting up, operating, and scaling a data warehouse: provisioning capacity, monitoring and backing up the cluster, and applying patches and upgrades to the Amazon Redshift engine. You can focus on using your data to acquire new insights for your business and customers. - If you are a first-time user of Amazon Redshift, we recommend that you - begin by reading the The - + If you are a first-time user of Amazon Redshift, we recommend that you begin by reading the The - If you are a database developer, the - - explains how to design, build, query, and maintain the databases that - make up your data warehouse. + If you are a database developer, the explains how to design, build, query, and maintain the databases that make up your data warehouse. . The types from this library are intended to be used with , which provides @@ -137,7 +119,7 @@ , Network.AWS.Redshift.Types.Sum build-depends: - amazonka-core == 1.4.2.* + amazonka-core == 1.4.3.* , base >= 4.7 && < 5 test-suite amazonka-redshift-test @@ -157,9 +139,9 @@ , Test.AWS.Redshift.Internal build-depends: - amazonka-core == 1.4.2.* - , amazonka-test == 1.4.2.* - , amazonka-redshift == 1.4.2.* + amazonka-core == 1.4.3.* + , amazonka-test == 1.4.3.* + , amazonka-redshift == 1.4.3.* , base , bytestring , tasty diff --git a/gen/Network/AWS/Redshift.hs b/gen/Network/AWS/Redshift.hs --- a/gen/Network/AWS/Redshift.hs +++ b/gen/Network/AWS/Redshift.hs @@ -13,31 +13,13 @@ -- -- Amazon Redshift __Overview__ -- --- This is an interface reference for Amazon Redshift. It contains --- documentation for one of the programming or command line interfaces you --- can use to manage Amazon Redshift clusters. Note that Amazon Redshift is --- asynchronous, which means that some interfaces may require techniques, --- such as polling or asynchronous callback handlers, to determine when a --- command has been applied. In this reference, the parameter descriptions --- indicate whether a change is applied immediately, on the next instance --- reboot, or during the next maintenance window. For a summary of the --- Amazon Redshift cluster management interfaces, go to --- . +-- This is an interface reference for Amazon Redshift. It contains documentation for one of the programming or command line interfaces you can use to manage Amazon Redshift clusters. Note that Amazon Redshift is asynchronous, which means that some interfaces may require techniques, such as polling or asynchronous callback handlers, to determine when a command has been applied. In this reference, the parameter descriptions indicate whether a change is applied immediately, on the next instance reboot, or during the next maintenance window. For a summary of the Amazon Redshift cluster management interfaces, go to . -- --- Amazon Redshift manages all the work of setting up, operating, and --- scaling a data warehouse: provisioning capacity, monitoring and backing --- up the cluster, and applying patches and upgrades to the Amazon Redshift --- engine. You can focus on using your data to acquire new insights for --- your business and customers. +-- Amazon Redshift manages all the work of setting up, operating, and scaling a data warehouse: provisioning capacity, monitoring and backing up the cluster, and applying patches and upgrades to the Amazon Redshift engine. You can focus on using your data to acquire new insights for your business and customers. -- --- If you are a first-time user of Amazon Redshift, we recommend that you --- begin by reading the The --- +-- If you are a first-time user of Amazon Redshift, we recommend that you begin by reading the The -- --- If you are a database developer, the --- --- explains how to design, build, query, and maintain the databases that --- make up your data warehouse. +-- If you are a database developer, the explains how to design, build, query, and maintain the databases that make up your data warehouse. module Network.AWS.Redshift ( -- * Service Configuration diff --git a/gen/Network/AWS/Redshift/AuthorizeClusterSecurityGroupIngress.hs b/gen/Network/AWS/Redshift/AuthorizeClusterSecurityGroupIngress.hs --- a/gen/Network/AWS/Redshift/AuthorizeClusterSecurityGroupIngress.hs +++ b/gen/Network/AWS/Redshift/AuthorizeClusterSecurityGroupIngress.hs @@ -18,28 +18,13 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Adds an inbound (ingress) rule to an Amazon Redshift security group. --- Depending on whether the application accessing your cluster is running --- on the Internet or an Amazon EC2 instance, you can authorize inbound --- access to either a Classless Interdomain Routing (CIDR)\/Internet --- Protocol (IP) range or to an Amazon EC2 security group. You can add as --- many as 20 ingress rules to an Amazon Redshift security group. +-- Adds an inbound (ingress) rule to an Amazon Redshift security group. Depending on whether the application accessing your cluster is running on the Internet or an Amazon EC2 instance, you can authorize inbound access to either a Classless Interdomain Routing (CIDR)\/Internet Protocol (IP) range or to an Amazon EC2 security group. You can add as many as 20 ingress rules to an Amazon Redshift security group. -- --- If you authorize access to an Amazon EC2 security group, specify --- /EC2SecurityGroupName/ and /EC2SecurityGroupOwnerId/. The Amazon EC2 --- security group and Amazon Redshift cluster must be in the same AWS --- region. +-- If you authorize access to an Amazon EC2 security group, specify /EC2SecurityGroupName/ and /EC2SecurityGroupOwnerId/. The Amazon EC2 security group and Amazon Redshift cluster must be in the same AWS region. -- --- If you authorize access to a CIDR\/IP address range, specify /CIDRIP/. --- For an overview of CIDR blocks, see the Wikipedia article on --- . +-- If you authorize access to a CIDR\/IP address range, specify /CIDRIP/. For an overview of CIDR blocks, see the Wikipedia article on . -- --- You must also associate the security group with a cluster so that --- clients running on these IP addresses or the EC2 instance are authorized --- to connect to the cluster. For information about managing security --- groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- You must also associate the security group with a cluster so that clients running on these IP addresses or the EC2 instance are authorized to connect to the cluster. For information about managing security groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.AuthorizeClusterSecurityGroupIngress ( -- * Creating a Request @@ -98,9 +83,7 @@ , _acsgiClusterSecurityGroupName = pClusterSecurityGroupName_ } --- | The AWS account number of the owner of the security group specified by --- the /EC2SecurityGroupName/ parameter. The AWS Access Key ID is not an --- acceptable value. +-- | The AWS account number of the owner of the security group specified by the /EC2SecurityGroupName/ parameter. The AWS Access Key ID is not an acceptable value. -- -- Example: '111122223333' acsgiEC2SecurityGroupOwnerId :: Lens' AuthorizeClusterSecurityGroupIngress (Maybe Text) diff --git a/gen/Network/AWS/Redshift/AuthorizeSnapshotAccess.hs b/gen/Network/AWS/Redshift/AuthorizeSnapshotAccess.hs --- a/gen/Network/AWS/Redshift/AuthorizeSnapshotAccess.hs +++ b/gen/Network/AWS/Redshift/AuthorizeSnapshotAccess.hs @@ -18,12 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Authorizes the specified AWS customer account to restore the specified --- snapshot. +-- Authorizes the specified AWS customer account to restore the specified snapshot. -- --- For more information about working with snapshots, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about working with snapshots, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.AuthorizeSnapshotAccess ( -- * Creating a Request @@ -78,10 +75,7 @@ , _asaAccountWithRestoreAccess = pAccountWithRestoreAccess_ } --- | The identifier of the cluster the snapshot was created from. This --- parameter is required if your IAM user has a policy containing a --- snapshot resource element that specifies anything other than * for the --- cluster name. +-- | The identifier of the cluster the snapshot was created from. This parameter is required if your IAM user has a policy containing a snapshot resource element that specifies anything other than * for the cluster name. asaSnapshotClusterIdentifier :: Lens' AuthorizeSnapshotAccess (Maybe Text) asaSnapshotClusterIdentifier = lens _asaSnapshotClusterIdentifier (\ s a -> s{_asaSnapshotClusterIdentifier = a}); @@ -89,8 +83,7 @@ asaSnapshotIdentifier :: Lens' AuthorizeSnapshotAccess Text asaSnapshotIdentifier = lens _asaSnapshotIdentifier (\ s a -> s{_asaSnapshotIdentifier = a}); --- | The identifier of the AWS customer account authorized to restore the --- specified snapshot. +-- | The identifier of the AWS customer account authorized to restore the specified snapshot. asaAccountWithRestoreAccess :: Lens' AuthorizeSnapshotAccess Text asaAccountWithRestoreAccess = lens _asaAccountWithRestoreAccess (\ s a -> s{_asaAccountWithRestoreAccess = a}); diff --git a/gen/Network/AWS/Redshift/CopyClusterSnapshot.hs b/gen/Network/AWS/Redshift/CopyClusterSnapshot.hs --- a/gen/Network/AWS/Redshift/CopyClusterSnapshot.hs +++ b/gen/Network/AWS/Redshift/CopyClusterSnapshot.hs @@ -18,20 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Copies the specified automated cluster snapshot to a new manual cluster --- snapshot. The source must be an automated snapshot and it must be in the --- available state. +-- Copies the specified automated cluster snapshot to a new manual cluster snapshot. The source must be an automated snapshot and it must be in the available state. -- --- When you delete a cluster, Amazon Redshift deletes any automated --- snapshots of the cluster. Also, when the retention period of the --- snapshot expires, Amazon Redshift automatically deletes it. If you want --- to keep an automated snapshot for a longer period, you can make a manual --- copy of the snapshot. Manual snapshots are retained until you delete --- them. +-- When you delete a cluster, Amazon Redshift deletes any automated snapshots of the cluster. Also, when the retention period of the snapshot expires, Amazon Redshift automatically deletes it. If you want to keep an automated snapshot for a longer period, you can make a manual copy of the snapshot. Manual snapshots are retained until you delete them. -- --- For more information about working with snapshots, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about working with snapshots, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CopyClusterSnapshot ( -- * Creating a Request @@ -86,10 +77,7 @@ , _ccsTargetSnapshotIdentifier = pTargetSnapshotIdentifier_ } --- | The identifier of the cluster the source snapshot was created from. This --- parameter is required if your IAM user has a policy containing a --- snapshot resource element that specifies anything other than * for the --- cluster name. +-- | The identifier of the cluster the source snapshot was created from. This parameter is required if your IAM user has a policy containing a snapshot resource element that specifies anything other than * for the cluster name. -- -- Constraints: -- @@ -101,8 +89,7 @@ -- -- Constraints: -- --- - Must be the identifier for a valid automated snapshot whose state is --- 'available'. +-- - Must be the identifier for a valid automated snapshot whose state is 'available'. ccsSourceSnapshotIdentifier :: Lens' CopyClusterSnapshot Text ccsSourceSnapshotIdentifier = lens _ccsSourceSnapshotIdentifier (\ s a -> s{_ccsSourceSnapshotIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/CreateCluster.hs b/gen/Network/AWS/Redshift/CreateCluster.hs --- a/gen/Network/AWS/Redshift/CreateCluster.hs +++ b/gen/Network/AWS/Redshift/CreateCluster.hs @@ -18,14 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a new cluster. To create the cluster in virtual private cloud --- (VPC), you must provide cluster subnet group name. If you don\'t provide --- a cluster subnet group name or the cluster security group parameter, --- Amazon Redshift creates a non-VPC cluster, it associates the default --- cluster security group with the cluster. For more information about --- managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ . +-- Creates a new cluster. To create the cluster in virtual private cloud (VPC), you must provide cluster subnet group name. If you don\'t provide a cluster subnet group name or the cluster security group parameter, Amazon Redshift creates a non-VPC cluster, it associates the default cluster security group with the cluster. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ . module Network.AWS.Redshift.CreateCluster ( -- * Creating a Request @@ -205,9 +198,7 @@ ccPubliclyAccessible :: Lens' CreateCluster (Maybe Bool) ccPubliclyAccessible = lens _ccPubliclyAccessible (\ s a -> s{_ccPubliclyAccessible = a}); --- | Specifies the name of the HSM configuration that contains the --- information the Amazon Redshift cluster can use to retrieve and store --- keys in an HSM. +-- | Specifies the name of the HSM configuration that contains the information the Amazon Redshift cluster can use to retrieve and store keys in an HSM. ccHSMConfigurationIdentifier :: Lens' CreateCluster (Maybe Text) ccHSMConfigurationIdentifier = lens _ccHSMConfigurationIdentifier (\ s a -> s{_ccHSMConfigurationIdentifier = a}); @@ -217,10 +208,7 @@ ccClusterSecurityGroups :: Lens' CreateCluster [Text] ccClusterSecurityGroups = lens _ccClusterSecurityGroups (\ s a -> s{_ccClusterSecurityGroups = a}) . _Default . _Coerce; --- | The number of days that automated snapshots are retained. If the value --- is 0, automated snapshots are disabled. Even if automated snapshots are --- disabled, you can still create manual snapshots when you want with --- < CreateClusterSnapshot>. +-- | The number of days that automated snapshots are retained. If the value is 0, automated snapshots are disabled. Even if automated snapshots are disabled, you can still create manual snapshots when you want with < CreateClusterSnapshot>. -- -- Default: '1' -- @@ -236,26 +224,19 @@ -- | The name of a cluster subnet group to be associated with this cluster. -- --- If this parameter is not provided the resulting cluster will be deployed --- outside virtual private cloud (VPC). +-- If this parameter is not provided the resulting cluster will be deployed outside virtual private cloud (VPC). ccClusterSubnetGroupName :: Lens' CreateCluster (Maybe Text) ccClusterSubnetGroupName = lens _ccClusterSubnetGroupName (\ s a -> s{_ccClusterSubnetGroupName = a}); --- | Specifies the name of the HSM client certificate the Amazon Redshift --- cluster uses to retrieve the data encryption keys stored in an HSM. +-- | Specifies the name of the HSM client certificate the Amazon Redshift cluster uses to retrieve the data encryption keys stored in an HSM. ccHSMClientCertificateIdentifier :: Lens' CreateCluster (Maybe Text) ccHSMClientCertificateIdentifier = lens _ccHSMClientCertificateIdentifier (\ s a -> s{_ccHSMClientCertificateIdentifier = a}); --- | The number of compute nodes in the cluster. This parameter is required --- when the __ClusterType__ parameter is specified as 'multi-node'. +-- | The number of compute nodes in the cluster. This parameter is required when the __ClusterType__ parameter is specified as 'multi-node'. -- --- For information about determining how many nodes you need, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For information about determining how many nodes you need, go to in the /Amazon Redshift Cluster Management Guide/. -- --- If you don\'t specify this parameter, you get a single-node cluster. --- When requesting a multi-node cluster, you must specify the number of --- nodes that you want in the cluster. +-- If you don\'t specify this parameter, you get a single-node cluster. When requesting a multi-node cluster, you must specify the number of nodes that you want in the cluster. -- -- Default: '1' -- @@ -265,24 +246,15 @@ -- | The Elastic IP (EIP) address for the cluster. -- --- Constraints: The cluster must be provisioned in EC2-VPC and --- publicly-accessible through an Internet gateway. For more information --- about provisioning clusters in EC2-VPC, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- Constraints: The cluster must be provisioned in EC2-VPC and publicly-accessible through an Internet gateway. For more information about provisioning clusters in EC2-VPC, go to in the Amazon Redshift Cluster Management Guide. ccElasticIP :: Lens' CreateCluster (Maybe Text) ccElasticIP = lens _ccElasticIP (\ s a -> s{_ccElasticIP = a}); --- | The weekly time range (in UTC) during which automated cluster --- maintenance can occur. +-- | The weekly time range (in UTC) during which automated cluster maintenance can occur. -- -- Format: 'ddd:hh24:mi-ddd:hh24:mi' -- --- Default: A 30-minute window selected at random from an 8-hour block of --- time per region, occurring on a random day of the week. For more --- information about the time blocks for each region, see --- --- in Amazon Redshift Cluster Management Guide. +-- Default: A 30-minute window selected at random from an 8-hour block of time per region, occurring on a random day of the week. For more information about the time blocks for each region, see in Amazon Redshift Cluster Management Guide. -- -- Valid Days: Mon | Tue | Wed | Thu | Fri | Sat | Sun -- @@ -290,37 +262,27 @@ ccPreferredMaintenanceWindow :: Lens' CreateCluster (Maybe Text) ccPreferredMaintenanceWindow = lens _ccPreferredMaintenanceWindow (\ s a -> s{_ccPreferredMaintenanceWindow = a}); --- | The AWS Key Management Service (KMS) key ID of the encryption key that --- you want to use to encrypt data in the cluster. +-- | The AWS Key Management Service (KMS) key ID of the encryption key that you want to use to encrypt data in the cluster. ccKMSKeyId :: Lens' CreateCluster (Maybe Text) ccKMSKeyId = lens _ccKMSKeyId (\ s a -> s{_ccKMSKeyId = a}); --- | The EC2 Availability Zone (AZ) in which you want Amazon Redshift to --- provision the cluster. For example, if you have several EC2 instances --- running in a specific Availability Zone, then you might want the cluster --- to be provisioned in the same zone in order to decrease network latency. +-- | The EC2 Availability Zone (AZ) in which you want Amazon Redshift to provision the cluster. For example, if you have several EC2 instances running in a specific Availability Zone, then you might want the cluster to be provisioned in the same zone in order to decrease network latency. -- --- Default: A random, system-chosen Availability Zone in the region that is --- specified by the endpoint. +-- Default: A random, system-chosen Availability Zone in the region that is specified by the endpoint. -- -- Example: 'us-east-1d' -- --- Constraint: The specified Availability Zone must be in the same region --- as the current endpoint. +-- Constraint: The specified Availability Zone must be in the same region as the current endpoint. ccAvailabilityZone :: Lens' CreateCluster (Maybe Text) ccAvailabilityZone = lens _ccAvailabilityZone (\ s a -> s{_ccAvailabilityZone = a}); --- | A list of Virtual Private Cloud (VPC) security groups to be associated --- with the cluster. +-- | A list of Virtual Private Cloud (VPC) security groups to be associated with the cluster. -- -- Default: The default VPC security group is associated with the cluster. ccVPCSecurityGroupIds :: Lens' CreateCluster [Text] ccVPCSecurityGroupIds = lens _ccVPCSecurityGroupIds (\ s a -> s{_ccVPCSecurityGroupIds = a}) . _Default . _Coerce; --- | A list of AWS Identity and Access Management (IAM) roles that can be --- used by the cluster to access other AWS services. You must supply the --- IAM roles in their Amazon Resource Name (ARN) format. You can supply up --- to 10 IAM roles in a single request. +-- | A list of AWS Identity and Access Management (IAM) roles that can be used by the cluster to access other AWS services. You must supply the IAM roles in their Amazon Resource Name (ARN) format. You can supply up to 10 IAM roles in a single request. -- -- A cluster can have up to 10 IAM roles associated at any time. ccIAMRoles :: Lens' CreateCluster [Text] @@ -337,8 +299,7 @@ ccClusterType :: Lens' CreateCluster (Maybe Text) ccClusterType = lens _ccClusterType (\ s a -> s{_ccClusterType = a}); --- | The version of the Amazon Redshift engine software that you want to --- deploy on the cluster. +-- | The version of the Amazon Redshift engine software that you want to deploy on the cluster. -- -- The version selected runs on all the nodes in the cluster. -- @@ -348,13 +309,9 @@ ccClusterVersion :: Lens' CreateCluster (Maybe Text) ccClusterVersion = lens _ccClusterVersion (\ s a -> s{_ccClusterVersion = a}); --- | If 'true', major version upgrades can be applied during the maintenance --- window to the Amazon Redshift engine that is running on the cluster. +-- | If 'true', major version upgrades can be applied during the maintenance window to the Amazon Redshift engine that is running on the cluster. -- --- When a new major version of the Amazon Redshift engine is released, you --- can request that the service automatically apply upgrades during the --- maintenance window to the Amazon Redshift engine that is running on your --- cluster. +-- When a new major version of the Amazon Redshift engine is released, you can request that the service automatically apply upgrades during the maintenance window to the Amazon Redshift engine that is running on your cluster. -- -- Default: 'true' ccAllowVersionUpgrade :: Lens' CreateCluster (Maybe Bool) @@ -362,9 +319,7 @@ -- | The name of the parameter group to be associated with this cluster. -- --- Default: The default Amazon Redshift cluster parameter group. For --- information about the default parameter group, go to --- +-- Default: The default Amazon Redshift cluster parameter group. For information about the default parameter group, go to -- -- Constraints: -- @@ -380,9 +335,7 @@ -- | The port number on which the cluster accepts incoming connections. -- --- The cluster is accessible only via the JDBC and ODBC connection strings. --- Part of the connection string requires the port on which the cluster --- will listen for incoming connections. +-- The cluster is accessible only via the JDBC and ODBC connection strings. Part of the connection string requires the port on which the cluster will listen for incoming connections. -- -- Default: '5439' -- @@ -390,14 +343,9 @@ ccPort :: Lens' CreateCluster (Maybe Int) ccPort = lens _ccPort (\ s a -> s{_ccPort = a}); --- | The name of the first database to be created when the cluster is --- created. +-- | The name of the first database to be created when the cluster is created. -- --- To create additional databases after the cluster is created, connect to --- the cluster with a SQL client and use SQL commands to create a database. --- For more information, go to --- --- in the Amazon Redshift Database Developer Guide. +-- To create additional databases after the cluster is created, connect to the cluster with a SQL client and use SQL commands to create a database. For more information, go to in the Amazon Redshift Database Developer Guide. -- -- Default: 'dev' -- @@ -405,16 +353,11 @@ -- -- - Must contain 1 to 64 alphanumeric characters. -- - Must contain only lowercase letters. --- - Cannot be a word that is reserved by the service. A list of reserved --- words can be found in --- --- in the Amazon Redshift Database Developer Guide. +-- - Cannot be a word that is reserved by the service. A list of reserved words can be found in in the Amazon Redshift Database Developer Guide. ccDBName :: Lens' CreateCluster (Maybe Text) ccDBName = lens _ccDBName (\ s a -> s{_ccDBName = a}); --- | A unique identifier for the cluster. You use this identifier to refer to --- the cluster for any subsequent cluster operations such as deleting or --- modifying. The identifier also appears in the Amazon Redshift console. +-- | A unique identifier for the cluster. You use this identifier to refer to the cluster for any subsequent cluster operations such as deleting or modifying. The identifier also appears in the Amazon Redshift console. -- -- Constraints: -- @@ -428,31 +371,23 @@ ccClusterIdentifier :: Lens' CreateCluster Text ccClusterIdentifier = lens _ccClusterIdentifier (\ s a -> s{_ccClusterIdentifier = a}); --- | The node type to be provisioned for the cluster. For information about --- node types, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The node type to be provisioned for the cluster. For information about node types, go to in the /Amazon Redshift Cluster Management Guide/. -- --- Valid Values: 'ds1.xlarge' | 'ds1.8xlarge' | 'ds2.xlarge' | --- 'ds2.8xlarge' | 'dc1.large' | 'dc1.8xlarge'. +-- Valid Values: 'ds1.xlarge' | 'ds1.8xlarge' | 'ds2.xlarge' | 'ds2.8xlarge' | 'dc1.large' | 'dc1.8xlarge'. ccNodeType :: Lens' CreateCluster Text ccNodeType = lens _ccNodeType (\ s a -> s{_ccNodeType = a}); --- | The user name associated with the master user account for the cluster --- that is being created. +-- | The user name associated with the master user account for the cluster that is being created. -- -- Constraints: -- -- - Must be 1 - 128 alphanumeric characters. -- - First character must be a letter. --- - Cannot be a reserved word. A list of reserved words can be found in --- --- in the Amazon Redshift Database Developer Guide. +-- - Cannot be a reserved word. A list of reserved words can be found in in the Amazon Redshift Database Developer Guide. ccMasterUsername :: Lens' CreateCluster Text ccMasterUsername = lens _ccMasterUsername (\ s a -> s{_ccMasterUsername = a}); --- | The password associated with the master user account for the cluster --- that is being created. +-- | The password associated with the master user account for the cluster that is being created. -- -- Constraints: -- @@ -460,8 +395,7 @@ -- - Must contain at least one uppercase letter. -- - Must contain at least one lowercase letter. -- - Must contain one number. --- - Can be any printable ASCII character (ASCII code 33 to 126) except --- \' (single quote), \" (double quote), \\, \/, \', or space. +-- - Can be any printable ASCII character (ASCII code 33 to 126) except \' (single quote), \" (double quote), \\, \/, \', or space. ccMasterUserPassword :: Lens' CreateCluster Text ccMasterUserPassword = lens _ccMasterUserPassword (\ s a -> s{_ccMasterUserPassword = a}); diff --git a/gen/Network/AWS/Redshift/CreateClusterParameterGroup.hs b/gen/Network/AWS/Redshift/CreateClusterParameterGroup.hs --- a/gen/Network/AWS/Redshift/CreateClusterParameterGroup.hs +++ b/gen/Network/AWS/Redshift/CreateClusterParameterGroup.hs @@ -20,16 +20,9 @@ -- -- Creates an Amazon Redshift parameter group. -- --- Creating parameter groups is independent of creating clusters. You can --- associate a cluster with a parameter group when you create the cluster. --- You can also associate an existing cluster with a parameter group after --- the cluster is created by using < ModifyCluster>. +-- Creating parameter groups is independent of creating clusters. You can associate a cluster with a parameter group when you create the cluster. You can also associate an existing cluster with a parameter group after the cluster is created by using < ModifyCluster>. -- --- Parameters in the parameter group define specific behavior that applies --- to the databases you create on the cluster. For more information about --- parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- Parameters in the parameter group define specific behavior that applies to the databases you create on the cluster. For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CreateClusterParameterGroup ( -- * Creating a Request @@ -107,16 +100,9 @@ ccpgParameterGroupName :: Lens' CreateClusterParameterGroup Text ccpgParameterGroupName = lens _ccpgParameterGroupName (\ s a -> s{_ccpgParameterGroupName = a}); --- | The Amazon Redshift engine version to which the cluster parameter group --- applies. The cluster engine version determines the set of parameters. +-- | The Amazon Redshift engine version to which the cluster parameter group applies. The cluster engine version determines the set of parameters. -- --- To get a list of valid parameter group family names, you can call --- < DescribeClusterParameterGroups>. By default, Amazon Redshift returns a --- list of all the parameter groups that are owned by your AWS account, --- including the default parameter groups for each Amazon Redshift engine --- version. The parameter group family names associated with the default --- parameter groups provide you the valid values. For example, a valid --- family name is \"redshift-1.0\". +-- To get a list of valid parameter group family names, you can call < DescribeClusterParameterGroups>. By default, Amazon Redshift returns a list of all the parameter groups that are owned by your AWS account, including the default parameter groups for each Amazon Redshift engine version. The parameter group family names associated with the default parameter groups provide you the valid values. For example, a valid family name is \"redshift-1.0\". ccpgParameterGroupFamily :: Lens' CreateClusterParameterGroup Text ccpgParameterGroupFamily = lens _ccpgParameterGroupFamily (\ s a -> s{_ccpgParameterGroupFamily = a}); diff --git a/gen/Network/AWS/Redshift/CreateClusterSecurityGroup.hs b/gen/Network/AWS/Redshift/CreateClusterSecurityGroup.hs --- a/gen/Network/AWS/Redshift/CreateClusterSecurityGroup.hs +++ b/gen/Network/AWS/Redshift/CreateClusterSecurityGroup.hs @@ -18,12 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a new Amazon Redshift security group. You use security groups to --- control access to non-VPC clusters. +-- Creates a new Amazon Redshift security group. You use security groups to control access to non-VPC clusters. -- --- For information about managing security groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For information about managing security groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CreateClusterSecurityGroup ( -- * Creating a Request @@ -82,15 +79,13 @@ creTags :: Lens' CreateClusterSecurityGroup [Tag] creTags = lens _creTags (\ s a -> s{_creTags = a}) . _Default . _Coerce; --- | The name for the security group. Amazon Redshift stores the value as a --- lowercase string. +-- | The name for the security group. Amazon Redshift stores the value as a lowercase string. -- -- Constraints: -- -- - Must contain no more than 255 alphanumeric characters or hyphens. -- - Must not be \"Default\". --- - Must be unique for all security groups that are created by your AWS --- account. +-- - Must be unique for all security groups that are created by your AWS account. -- -- Example: 'examplesecuritygroup' creClusterSecurityGroupName :: Lens' CreateClusterSecurityGroup Text diff --git a/gen/Network/AWS/Redshift/CreateClusterSnapshot.hs b/gen/Network/AWS/Redshift/CreateClusterSnapshot.hs --- a/gen/Network/AWS/Redshift/CreateClusterSnapshot.hs +++ b/gen/Network/AWS/Redshift/CreateClusterSnapshot.hs @@ -18,12 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a manual snapshot of the specified cluster. The cluster must be --- in the 'available' state. +-- Creates a manual snapshot of the specified cluster. The cluster must be in the 'available' state. -- --- For more information about working with snapshots, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about working with snapshots, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CreateClusterSnapshot ( -- * Creating a Request @@ -82,8 +79,7 @@ ccsTags :: Lens' CreateClusterSnapshot [Tag] ccsTags = lens _ccsTags (\ s a -> s{_ccsTags = a}) . _Default . _Coerce; --- | A unique identifier for the snapshot that you are requesting. This --- identifier must be unique for all snapshots within the AWS account. +-- | A unique identifier for the snapshot that you are requesting. This identifier must be unique for all snapshots within the AWS account. -- -- Constraints: -- diff --git a/gen/Network/AWS/Redshift/CreateClusterSubnetGroup.hs b/gen/Network/AWS/Redshift/CreateClusterSubnetGroup.hs --- a/gen/Network/AWS/Redshift/CreateClusterSubnetGroup.hs +++ b/gen/Network/AWS/Redshift/CreateClusterSubnetGroup.hs @@ -18,13 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a new Amazon Redshift subnet group. You must provide a list of --- one or more subnets in your existing Amazon Virtual Private Cloud --- (Amazon VPC) when creating Amazon Redshift subnet group. +-- Creates a new Amazon Redshift subnet group. You must provide a list of one or more subnets in your existing Amazon Virtual Private Cloud (Amazon VPC) when creating Amazon Redshift subnet group. -- --- For information about subnet groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For information about subnet groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CreateClusterSubnetGroup ( -- * Creating a Request @@ -88,15 +84,13 @@ ccsgTags :: Lens' CreateClusterSubnetGroup [Tag] ccsgTags = lens _ccsgTags (\ s a -> s{_ccsgTags = a}) . _Default . _Coerce; --- | The name for the subnet group. Amazon Redshift stores the value as a --- lowercase string. +-- | The name for the subnet group. Amazon Redshift stores the value as a lowercase string. -- -- Constraints: -- -- - Must contain no more than 255 alphanumeric characters or hyphens. -- - Must not be \"Default\". --- - Must be unique for all subnet groups that are created by your AWS --- account. +-- - Must be unique for all subnet groups that are created by your AWS account. -- -- Example: 'examplesubnetgroup' ccsgClusterSubnetGroupName :: Lens' CreateClusterSubnetGroup Text @@ -106,8 +100,7 @@ ccsgDescription :: Lens' CreateClusterSubnetGroup Text ccsgDescription = lens _ccsgDescription (\ s a -> s{_ccsgDescription = a}); --- | An array of VPC subnet IDs. A maximum of 20 subnets can be modified in a --- single request. +-- | An array of VPC subnet IDs. A maximum of 20 subnets can be modified in a single request. ccsgSubnetIds :: Lens' CreateClusterSubnetGroup [Text] ccsgSubnetIds = lens _ccsgSubnetIds (\ s a -> s{_ccsgSubnetIds = a}) . _Coerce; diff --git a/gen/Network/AWS/Redshift/CreateEventSubscription.hs b/gen/Network/AWS/Redshift/CreateEventSubscription.hs --- a/gen/Network/AWS/Redshift/CreateEventSubscription.hs +++ b/gen/Network/AWS/Redshift/CreateEventSubscription.hs @@ -18,30 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates an Amazon Redshift event notification subscription. This action --- requires an ARN (Amazon Resource Name) of an Amazon SNS topic created by --- either the Amazon Redshift console, the Amazon SNS console, or the --- Amazon SNS API. To obtain an ARN with Amazon SNS, you must create a --- topic in Amazon SNS and subscribe to the topic. The ARN is displayed in --- the SNS console. +-- Creates an Amazon Redshift event notification subscription. This action requires an ARN (Amazon Resource Name) of an Amazon SNS topic created by either the Amazon Redshift console, the Amazon SNS console, or the Amazon SNS API. To obtain an ARN with Amazon SNS, you must create a topic in Amazon SNS and subscribe to the topic. The ARN is displayed in the SNS console. -- --- You can specify the source type, and lists of Amazon Redshift source --- IDs, event categories, and event severities. Notifications will be sent --- for all events you want that match those criteria. For example, you can --- specify source type = cluster, source ID = my-cluster-1 and mycluster2, --- event categories = Availability, Backup, and severity = ERROR. The --- subscription will only send notifications for those ERROR events in the --- Availability and Backup categories for the specified clusters. +-- You can specify the source type, and lists of Amazon Redshift source IDs, event categories, and event severities. Notifications will be sent for all events you want that match those criteria. For example, you can specify source type = cluster, source ID = my-cluster-1 and mycluster2, event categories = Availability, Backup, and severity = ERROR. The subscription will only send notifications for those ERROR events in the Availability and Backup categories for the specified clusters. -- --- If you specify both the source type and source IDs, such as source type --- = cluster and source identifier = my-cluster-1, notifications will be --- sent for all the cluster events for my-cluster-1. If you specify a --- source type but do not specify a source identifier, you will receive --- notice of the events for the objects of that type in your AWS account. --- If you do not specify either the SourceType nor the SourceIdentifier, --- you will be notified of events generated from all Amazon Redshift --- sources belonging to your AWS account. You must specify a source type if --- you specify a source ID. +-- If you specify both the source type and source IDs, such as source type = cluster and source identifier = my-cluster-1, notifications will be sent for all the cluster events for my-cluster-1. If you specify a source type but do not specify a source identifier, you will receive notice of the events for the objects of that type in your AWS account. If you do not specify either the SourceType nor the SourceIdentifier, you will be notified of events generated from all Amazon Redshift sources belonging to your AWS account. You must specify a source type if you specify a source ID. module Network.AWS.Redshift.CreateEventSubscription ( -- * Creating a Request @@ -121,41 +102,29 @@ , _cesSNSTopicARN = pSNSTopicARN_ } --- | A Boolean value; set to 'true' to activate the subscription, set to --- 'false' to create the subscription but not active it. +-- | A Boolean value; set to 'true' to activate the subscription, set to 'false' to create the subscription but not active it. cesEnabled :: Lens' CreateEventSubscription (Maybe Bool) cesEnabled = lens _cesEnabled (\ s a -> s{_cesEnabled = a}); --- | The type of source that will be generating the events. For example, if --- you want to be notified of events generated by a cluster, you would set --- this parameter to cluster. If this value is not specified, events are --- returned for all Amazon Redshift objects in your AWS account. You must --- specify a source type in order to specify source IDs. +-- | The type of source that will be generating the events. For example, if you want to be notified of events generated by a cluster, you would set this parameter to cluster. If this value is not specified, events are returned for all Amazon Redshift objects in your AWS account. You must specify a source type in order to specify source IDs. -- --- Valid values: cluster, cluster-parameter-group, cluster-security-group, --- and cluster-snapshot. +-- Valid values: cluster, cluster-parameter-group, cluster-security-group, and cluster-snapshot. cesSourceType :: Lens' CreateEventSubscription (Maybe Text) cesSourceType = lens _cesSourceType (\ s a -> s{_cesSourceType = a}); --- | Specifies the Amazon Redshift event severity to be published by the --- event notification subscription. +-- | Specifies the Amazon Redshift event severity to be published by the event notification subscription. -- -- Values: ERROR, INFO cesSeverity :: Lens' CreateEventSubscription (Maybe Text) cesSeverity = lens _cesSeverity (\ s a -> s{_cesSeverity = a}); --- | Specifies the Amazon Redshift event categories to be published by the --- event notification subscription. +-- | Specifies the Amazon Redshift event categories to be published by the event notification subscription. -- -- Values: Configuration, Management, Monitoring, Security cesEventCategories :: Lens' CreateEventSubscription [Text] cesEventCategories = lens _cesEventCategories (\ s a -> s{_cesEventCategories = a}) . _Default . _Coerce; --- | A list of one or more identifiers of Amazon Redshift source objects. All --- of the objects must be of the same type as was specified in the source --- type parameter. The event subscription will return only events generated --- by the specified objects. If not specified, then events are returned for --- all objects within the source type specified. +-- | A list of one or more identifiers of Amazon Redshift source objects. All of the objects must be of the same type as was specified in the source type parameter. The event subscription will return only events generated by the specified objects. If not specified, then events are returned for all objects within the source type specified. -- -- Example: my-cluster-1, my-cluster-2 -- @@ -178,9 +147,7 @@ cesSubscriptionName :: Lens' CreateEventSubscription Text cesSubscriptionName = lens _cesSubscriptionName (\ s a -> s{_cesSubscriptionName = a}); --- | The Amazon Resource Name (ARN) of the Amazon SNS topic used to transmit --- the event notifications. The ARN is created by Amazon SNS when you --- create a topic and subscribe to it. +-- | The Amazon Resource Name (ARN) of the Amazon SNS topic used to transmit the event notifications. The ARN is created by Amazon SNS when you create a topic and subscribe to it. cesSNSTopicARN :: Lens' CreateEventSubscription Text cesSNSTopicARN = lens _cesSNSTopicARN (\ s a -> s{_cesSNSTopicARN = a}); diff --git a/gen/Network/AWS/Redshift/CreateHSMClientCertificate.hs b/gen/Network/AWS/Redshift/CreateHSMClientCertificate.hs --- a/gen/Network/AWS/Redshift/CreateHSMClientCertificate.hs +++ b/gen/Network/AWS/Redshift/CreateHSMClientCertificate.hs @@ -18,17 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates an HSM client certificate that an Amazon Redshift cluster will --- use to connect to the client\'s HSM in order to store and retrieve the --- keys used to encrypt the cluster databases. +-- Creates an HSM client certificate that an Amazon Redshift cluster will use to connect to the client\'s HSM in order to store and retrieve the keys used to encrypt the cluster databases. -- --- The command returns a public key, which you must store in the HSM. In --- addition to creating the HSM certificate, you must create an Amazon --- Redshift HSM configuration that provides a cluster the information --- needed to store and use encryption keys in the HSM. For more --- information, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- The command returns a public key, which you must store in the HSM. In addition to creating the HSM certificate, you must create an Amazon Redshift HSM configuration that provides a cluster the information needed to store and use encryption keys in the HSM. For more information, go to in the Amazon Redshift Cluster Management Guide. module Network.AWS.Redshift.CreateHSMClientCertificate ( -- * Creating a Request @@ -81,9 +73,7 @@ chccTags :: Lens' CreateHSMClientCertificate [Tag] chccTags = lens _chccTags (\ s a -> s{_chccTags = a}) . _Default . _Coerce; --- | The identifier to be assigned to the new HSM client certificate that the --- cluster will use to connect to the HSM to use the database encryption --- keys. +-- | The identifier to be assigned to the new HSM client certificate that the cluster will use to connect to the HSM to use the database encryption keys. chccHSMClientCertificateIdentifier :: Lens' CreateHSMClientCertificate Text chccHSMClientCertificateIdentifier = lens _chccHSMClientCertificateIdentifier (\ s a -> s{_chccHSMClientCertificateIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/CreateHSMConfiguration.hs b/gen/Network/AWS/Redshift/CreateHSMConfiguration.hs --- a/gen/Network/AWS/Redshift/CreateHSMConfiguration.hs +++ b/gen/Network/AWS/Redshift/CreateHSMConfiguration.hs @@ -18,16 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates an HSM configuration that contains the information required by --- an Amazon Redshift cluster to store and use database encryption keys in --- a Hardware Security Module (HSM). After creating the HSM configuration, --- you can specify it as a parameter when creating a cluster. The cluster --- will then store its encryption keys in the HSM. +-- Creates an HSM configuration that contains the information required by an Amazon Redshift cluster to store and use database encryption keys in a Hardware Security Module (HSM). After creating the HSM configuration, you can specify it as a parameter when creating a cluster. The cluster will then store its encryption keys in the HSM. -- --- In addition to creating an HSM configuration, you must also create an --- HSM client certificate. For more information, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- In addition to creating an HSM configuration, you must also create an HSM client certificate. For more information, go to in the Amazon Redshift Cluster Management Guide. module Network.AWS.Redshift.CreateHSMConfiguration ( -- * Creating a Request @@ -110,8 +103,7 @@ chcTags :: Lens' CreateHSMConfiguration [Tag] chcTags = lens _chcTags (\ s a -> s{_chcTags = a}) . _Default . _Coerce; --- | The identifier to be assigned to the new Amazon Redshift HSM --- configuration. +-- | The identifier to be assigned to the new Amazon Redshift HSM configuration. chcHSMConfigurationIdentifier :: Lens' CreateHSMConfiguration Text chcHSMConfigurationIdentifier = lens _chcHSMConfigurationIdentifier (\ s a -> s{_chcHSMConfigurationIdentifier = a}); @@ -119,13 +111,11 @@ chcDescription :: Lens' CreateHSMConfiguration Text chcDescription = lens _chcDescription (\ s a -> s{_chcDescription = a}); --- | The IP address that the Amazon Redshift cluster must use to access the --- HSM. +-- | The IP address that the Amazon Redshift cluster must use to access the HSM. chcHSMIPAddress :: Lens' CreateHSMConfiguration Text chcHSMIPAddress = lens _chcHSMIPAddress (\ s a -> s{_chcHSMIPAddress = a}); --- | The name of the partition in the HSM where the Amazon Redshift clusters --- will store their database encryption keys. +-- | The name of the partition in the HSM where the Amazon Redshift clusters will store their database encryption keys. chcHSMPartitionName :: Lens' CreateHSMConfiguration Text chcHSMPartitionName = lens _chcHSMPartitionName (\ s a -> s{_chcHSMPartitionName = a}); @@ -133,8 +123,7 @@ chcHSMPartitionPassword :: Lens' CreateHSMConfiguration Text chcHSMPartitionPassword = lens _chcHSMPartitionPassword (\ s a -> s{_chcHSMPartitionPassword = a}); --- | The HSMs public certificate file. When using Cloud HSM, the file name is --- server.pem. +-- | The HSMs public certificate file. When using Cloud HSM, the file name is server.pem. chcHSMServerPublicCertificate :: Lens' CreateHSMConfiguration Text chcHSMServerPublicCertificate = lens _chcHSMServerPublicCertificate (\ s a -> s{_chcHSMServerPublicCertificate = a}); diff --git a/gen/Network/AWS/Redshift/CreateSnapshotCopyGrant.hs b/gen/Network/AWS/Redshift/CreateSnapshotCopyGrant.hs --- a/gen/Network/AWS/Redshift/CreateSnapshotCopyGrant.hs +++ b/gen/Network/AWS/Redshift/CreateSnapshotCopyGrant.hs @@ -18,13 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a snapshot copy grant that permits Amazon Redshift to use a --- customer master key (CMK) from AWS Key Management Service (AWS KMS) to --- encrypt copied snapshots in a destination region. +-- Creates a snapshot copy grant that permits Amazon Redshift to use a customer master key (CMK) from AWS Key Management Service (AWS KMS) to encrypt copied snapshots in a destination region. -- --- For more information about managing snapshot copy grants, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about managing snapshot copy grants, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.CreateSnapshotCopyGrant ( -- * Creating a Request @@ -78,9 +74,7 @@ , _cscgSnapshotCopyGrantName = pSnapshotCopyGrantName_ } --- | The unique identifier of the customer master key (CMK) to which to grant --- Amazon Redshift permission. If no key is specified, the default key is --- used. +-- | The unique identifier of the customer master key (CMK) to which to grant Amazon Redshift permission. If no key is specified, the default key is used. cscgKMSKeyId :: Lens' CreateSnapshotCopyGrant (Maybe Text) cscgKMSKeyId = lens _cscgKMSKeyId (\ s a -> s{_cscgKMSKeyId = a}); @@ -88,8 +82,7 @@ cscgTags :: Lens' CreateSnapshotCopyGrant [Tag] cscgTags = lens _cscgTags (\ s a -> s{_cscgTags = a}) . _Default . _Coerce; --- | The name of the snapshot copy grant. This name must be unique in the --- region for the AWS account. +-- | The name of the snapshot copy grant. This name must be unique in the region for the AWS account. -- -- Constraints: -- diff --git a/gen/Network/AWS/Redshift/CreateTags.hs b/gen/Network/AWS/Redshift/CreateTags.hs --- a/gen/Network/AWS/Redshift/CreateTags.hs +++ b/gen/Network/AWS/Redshift/CreateTags.hs @@ -20,12 +20,9 @@ -- -- Adds one or more tags to a specified resource. -- --- A resource can have up to 10 tags. If you try to create more than 10 --- tags for a resource, you will receive an error and the attempt will --- fail. +-- A resource can have up to 10 tags. If you try to create more than 10 tags for a resource, you will receive an error and the attempt will fail. -- --- If you specify a key that already exists for the resource, the value for --- that key will be updated with the new value. +-- If you specify a key that already exists for the resource, the value for that key will be updated with the new value. module Network.AWS.Redshift.CreateTags ( -- * Creating a Request @@ -71,17 +68,11 @@ , _ctTags = mempty } --- | The Amazon Resource Name (ARN) to which you want to add the tag or tags. --- For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. +-- | The Amazon Resource Name (ARN) to which you want to add the tag or tags. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. ctResourceName :: Lens' CreateTags Text ctResourceName = lens _ctResourceName (\ s a -> s{_ctResourceName = a}); --- | One or more name\/value pairs to add as tags to the specified resource. --- Each tag name is passed in with the parameter 'Key' and the --- corresponding value is passed in with the parameter 'Value'. The 'Key' --- and 'Value' parameters are separated by a comma (,). Separate multiple --- tags with a space. For example, --- '--tags \"Key\"=\"owner\",\"Value\"=\"admin\" \"Key\"=\"environment\",\"Value\"=\"test\" \"Key\"=\"version\",\"Value\"=\"1.0\"'. +-- | One or more name\/value pairs to add as tags to the specified resource. Each tag name is passed in with the parameter 'Key' and the corresponding value is passed in with the parameter 'Value'. The 'Key' and 'Value' parameters are separated by a comma (,). Separate multiple tags with a space. For example, '--tags \"Key\"=\"owner\",\"Value\"=\"admin\" \"Key\"=\"environment\",\"Value\"=\"test\" \"Key\"=\"version\",\"Value\"=\"1.0\"'. ctTags :: Lens' CreateTags [Tag] ctTags = lens _ctTags (\ s a -> s{_ctTags = a}) . _Coerce; diff --git a/gen/Network/AWS/Redshift/DeleteCluster.hs b/gen/Network/AWS/Redshift/DeleteCluster.hs --- a/gen/Network/AWS/Redshift/DeleteCluster.hs +++ b/gen/Network/AWS/Redshift/DeleteCluster.hs @@ -18,25 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Deletes a previously provisioned cluster. A successful response from the --- web service indicates that the request was received correctly. Use --- < DescribeClusters> to monitor the status of the deletion. The delete --- operation cannot be canceled or reverted once submitted. For more --- information about managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ . +-- Deletes a previously provisioned cluster. A successful response from the web service indicates that the request was received correctly. Use < DescribeClusters> to monitor the status of the deletion. The delete operation cannot be canceled or reverted once submitted. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ . -- --- If you want to shut down the cluster and retain it for future use, set --- /SkipFinalClusterSnapshot/ to 'false' and specify a name for --- /FinalClusterSnapshotIdentifier/. You can later restore this snapshot to --- resume using the cluster. If a final cluster snapshot is requested, the --- status of the cluster will be \"final-snapshot\" while the snapshot is --- being taken, then it\'s \"deleting\" once Amazon Redshift begins --- deleting the cluster. +-- If you want to shut down the cluster and retain it for future use, set /SkipFinalClusterSnapshot/ to 'false' and specify a name for /FinalClusterSnapshotIdentifier/. You can later restore this snapshot to resume using the cluster. If a final cluster snapshot is requested, the status of the cluster will be \"final-snapshot\" while the snapshot is being taken, then it\'s \"deleting\" once Amazon Redshift begins deleting the cluster. -- --- For more information about managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ . +-- For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ . module Network.AWS.Redshift.DeleteCluster ( -- * Creating a Request @@ -90,21 +76,15 @@ , _delClusterIdentifier = pClusterIdentifier_ } --- | Determines whether a final snapshot of the cluster is created before --- Amazon Redshift deletes the cluster. If 'true', a final cluster snapshot --- is not created. If 'false', a final cluster snapshot is created before --- the cluster is deleted. +-- | Determines whether a final snapshot of the cluster is created before Amazon Redshift deletes the cluster. If 'true', a final cluster snapshot is not created. If 'false', a final cluster snapshot is created before the cluster is deleted. -- --- The /FinalClusterSnapshotIdentifier/ parameter must be specified if --- /SkipFinalClusterSnapshot/ is 'false'. +-- The /FinalClusterSnapshotIdentifier/ parameter must be specified if /SkipFinalClusterSnapshot/ is 'false'. -- -- Default: 'false' delSkipFinalClusterSnapshot :: Lens' DeleteCluster (Maybe Bool) delSkipFinalClusterSnapshot = lens _delSkipFinalClusterSnapshot (\ s a -> s{_delSkipFinalClusterSnapshot = a}); --- | The identifier of the final snapshot that is to be created immediately --- before deleting the cluster. If this parameter is provided, --- /SkipFinalClusterSnapshot/ must be 'false'. +-- | The identifier of the final snapshot that is to be created immediately before deleting the cluster. If this parameter is provided, /SkipFinalClusterSnapshot/ must be 'false'. -- -- Constraints: -- diff --git a/gen/Network/AWS/Redshift/DeleteClusterSecurityGroup.hs b/gen/Network/AWS/Redshift/DeleteClusterSecurityGroup.hs --- a/gen/Network/AWS/Redshift/DeleteClusterSecurityGroup.hs +++ b/gen/Network/AWS/Redshift/DeleteClusterSecurityGroup.hs @@ -20,12 +20,9 @@ -- -- Deletes an Amazon Redshift security group. -- --- You cannot delete a security group that is associated with any clusters. --- You cannot delete the default security group. +-- You cannot delete a security group that is associated with any clusters. You cannot delete the default security group. -- --- For information about managing security groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For information about managing security groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.DeleteClusterSecurityGroup ( -- * Creating a Request diff --git a/gen/Network/AWS/Redshift/DeleteClusterSnapshot.hs b/gen/Network/AWS/Redshift/DeleteClusterSnapshot.hs --- a/gen/Network/AWS/Redshift/DeleteClusterSnapshot.hs +++ b/gen/Network/AWS/Redshift/DeleteClusterSnapshot.hs @@ -18,16 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Deletes the specified manual snapshot. The snapshot must be in the --- 'available' state, with no other users authorized to access the --- snapshot. +-- Deletes the specified manual snapshot. The snapshot must be in the 'available' state, with no other users authorized to access the snapshot. -- --- Unlike automated snapshots, manual snapshots are retained even after you --- delete your cluster. Amazon Redshift does not delete your manual --- snapshots. You must delete manual snapshot explicitly to avoid getting --- charged. If other accounts are authorized to access the snapshot, you --- must revoke all of the authorizations before you can delete the --- snapshot. +-- Unlike automated snapshots, manual snapshots are retained even after you delete your cluster. Amazon Redshift does not delete your manual snapshots. You must delete manual snapshot explicitly to avoid getting charged. If other accounts are authorized to access the snapshot, you must revoke all of the authorizations before you can delete the snapshot. module Network.AWS.Redshift.DeleteClusterSnapshot ( -- * Creating a Request @@ -76,10 +69,7 @@ , _dcsSnapshotIdentifier = pSnapshotIdentifier_ } --- | The unique identifier of the cluster the snapshot was created from. This --- parameter is required if your IAM user has a policy containing a --- snapshot resource element that specifies anything other than * for the --- cluster name. +-- | The unique identifier of the cluster the snapshot was created from. This parameter is required if your IAM user has a policy containing a snapshot resource element that specifies anything other than * for the cluster name. -- -- Constraints: Must be the name of valid cluster. dcsSnapshotClusterIdentifier :: Lens' DeleteClusterSnapshot (Maybe Text) @@ -87,8 +77,7 @@ -- | The unique identifier of the manual snapshot to be deleted. -- --- Constraints: Must be the name of an existing snapshot that is in the --- 'available' state. +-- Constraints: Must be the name of an existing snapshot that is in the 'available' state. dcsSnapshotIdentifier :: Lens' DeleteClusterSnapshot Text dcsSnapshotIdentifier = lens _dcsSnapshotIdentifier (\ s a -> s{_dcsSnapshotIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/DeleteEventSubscription.hs b/gen/Network/AWS/Redshift/DeleteEventSubscription.hs --- a/gen/Network/AWS/Redshift/DeleteEventSubscription.hs +++ b/gen/Network/AWS/Redshift/DeleteEventSubscription.hs @@ -59,8 +59,7 @@ { _desSubscriptionName = pSubscriptionName_ } --- | The name of the Amazon Redshift event notification subscription to be --- deleted. +-- | The name of the Amazon Redshift event notification subscription to be deleted. desSubscriptionName :: Lens' DeleteEventSubscription Text desSubscriptionName = lens _desSubscriptionName (\ s a -> s{_desSubscriptionName = a}); diff --git a/gen/Network/AWS/Redshift/DeleteTags.hs b/gen/Network/AWS/Redshift/DeleteTags.hs --- a/gen/Network/AWS/Redshift/DeleteTags.hs +++ b/gen/Network/AWS/Redshift/DeleteTags.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Deletes a tag or tags from a resource. You must provide the ARN of the --- resource from which you want to delete the tag or tags. +-- Deletes a tag or tags from a resource. You must provide the ARN of the resource from which you want to delete the tag or tags. module Network.AWS.Redshift.DeleteTags ( -- * Creating a Request @@ -65,8 +64,7 @@ , _dtsTagKeys = mempty } --- | The Amazon Resource Name (ARN) from which you want to remove the tag or --- tags. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. +-- | The Amazon Resource Name (ARN) from which you want to remove the tag or tags. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. dtsResourceName :: Lens' DeleteTags Text dtsResourceName = lens _dtsResourceName (\ s a -> s{_dtsResourceName = a}); diff --git a/gen/Network/AWS/Redshift/DescribeClusterParameterGroups.hs b/gen/Network/AWS/Redshift/DescribeClusterParameterGroups.hs --- a/gen/Network/AWS/Redshift/DescribeClusterParameterGroups.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterParameterGroups.hs @@ -18,25 +18,13 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of Amazon Redshift parameter groups, including parameter --- groups you created and the default parameter group. For each parameter --- group, the response includes the parameter group name, description, and --- parameter group family name. You can optionally specify a name to --- retrieve the description of a specific parameter group. +-- Returns a list of Amazon Redshift parameter groups, including parameter groups you created and the default parameter group. For each parameter group, the response includes the parameter group name, description, and parameter group family name. You can optionally specify a name to retrieve the description of a specific parameter group. -- --- For more information about parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all parameter groups that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- parameter groups that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all parameter groups that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all parameter groups that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, parameter --- groups are returned regardless of whether they have tag keys or values --- associated with them. +-- If both tag keys and values are omitted from the request, parameter groups are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterParameterGroups @@ -103,41 +91,19 @@ , _dcpgParameterGroupName = Nothing } --- | A tag value or values for which you want to return all matching cluster --- parameter groups that are associated with the specified tag value or --- values. For example, suppose that you have parameter groups that are --- tagged with values called 'admin' and 'test'. If you specify both of --- these tag values in the request, Amazon Redshift returns a response with --- the parameter groups that have either or both of these tag values --- associated with them. +-- | A tag value or values for which you want to return all matching cluster parameter groups that are associated with the specified tag value or values. For example, suppose that you have parameter groups that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the parameter groups that have either or both of these tag values associated with them. dcpgTagValues :: Lens' DescribeClusterParameterGroups [Text] dcpgTagValues = lens _dcpgTagValues (\ s a -> s{_dcpgTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching cluster --- parameter groups that are associated with the specified key or keys. For --- example, suppose that you have parameter groups that are tagged with --- keys called 'owner' and 'environment'. If you specify both of these tag --- keys in the request, Amazon Redshift returns a response with the --- parameter groups that have either or both of these tag keys associated --- with them. +-- | A tag key or keys for which you want to return all matching cluster parameter groups that are associated with the specified key or keys. For example, suppose that you have parameter groups that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the parameter groups that have either or both of these tag keys associated with them. dcpgTagKeys :: Lens' DescribeClusterParameterGroups [Text] dcpgTagKeys = lens _dcpgTagKeys (\ s a -> s{_dcpgTagKeys = a}) . _Default . _Coerce; --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeClusterParameterGroups> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterParameterGroups> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dcpgMarker :: Lens' DescribeClusterParameterGroups (Maybe Text) dcpgMarker = lens _dcpgMarker (\ s a -> s{_dcpgMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -145,9 +111,7 @@ dcpgMaxRecords :: Lens' DescribeClusterParameterGroups (Maybe Int) dcpgMaxRecords = lens _dcpgMaxRecords (\ s a -> s{_dcpgMaxRecords = a}); --- | The name of a specific parameter group for which to return details. By --- default, details about all parameter groups and the default parameter --- group are returned. +-- | The name of a specific parameter group for which to return details. By default, details about all parameter groups and the default parameter group are returned. dcpgParameterGroupName :: Lens' DescribeClusterParameterGroups (Maybe Text) dcpgParameterGroupName = lens _dcpgParameterGroupName (\ s a -> s{_dcpgParameterGroupName = a}); @@ -227,17 +191,11 @@ , _dcpgrsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcpgrsMarker :: Lens' DescribeClusterParameterGroupsResponse (Maybe Text) dcpgrsMarker = lens _dcpgrsMarker (\ s a -> s{_dcpgrsMarker = a}); --- | A list of < ClusterParameterGroup> instances. Each instance describes --- one cluster parameter group. +-- | A list of < ClusterParameterGroup> instances. Each instance describes one cluster parameter group. dcpgrsParameterGroups :: Lens' DescribeClusterParameterGroupsResponse [ClusterParameterGroup] dcpgrsParameterGroups = lens _dcpgrsParameterGroups (\ s a -> s{_dcpgrsParameterGroups = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/Redshift/DescribeClusterParameters.hs b/gen/Network/AWS/Redshift/DescribeClusterParameters.hs --- a/gen/Network/AWS/Redshift/DescribeClusterParameters.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterParameters.hs @@ -18,19 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a detailed list of parameters contained within the specified --- Amazon Redshift parameter group. For each parameter the response --- includes information such as parameter name, description, data type, --- value, whether the parameter value is modifiable, and so on. +-- Returns a detailed list of parameters contained within the specified Amazon Redshift parameter group. For each parameter the response includes information such as parameter name, description, data type, value, whether the parameter value is modifiable, and so on. -- --- You can specify /source/ filter to retrieve parameters of only specific --- type. For example, to retrieve parameters that were modified by a user --- action such as from < ModifyClusterParameterGroup>, you can specify --- /source/ equal to /user/. +-- You can specify /source/ filter to retrieve parameters of only specific type. For example, to retrieve parameters that were modified by a user action such as from < ModifyClusterParameterGroup>, you can specify /source/ equal to /user/. -- --- For more information about parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterParameters @@ -91,20 +83,11 @@ , _dcpsParameterGroupName = pParameterGroupName_ } --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeClusterParameters> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterParameters> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dcpsMarker :: Lens' DescribeClusterParameters (Maybe Text) dcpsMarker = lens _dcpsMarker (\ s a -> s{_dcpsMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -112,9 +95,7 @@ dcpsMaxRecords :: Lens' DescribeClusterParameters (Maybe Int) dcpsMaxRecords = lens _dcpsMaxRecords (\ s a -> s{_dcpsMaxRecords = a}); --- | The parameter types to return. Specify 'user' to show parameters that --- are different form the default. Similarly, specify 'engine-default' to --- show parameters that are the same as the default parameter group. +-- | The parameter types to return. Specify 'user' to show parameters that are different form the default. Similarly, specify 'engine-default' to show parameters that are the same as the default parameter group. -- -- Default: All parameter types returned. -- @@ -195,17 +176,11 @@ , _dcprsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcprsMarker :: Lens' DescribeClusterParametersResponse (Maybe Text) dcprsMarker = lens _dcprsMarker (\ s a -> s{_dcprsMarker = a}); --- | A list of < Parameter> instances. Each instance lists the parameters of --- one cluster parameter group. +-- | A list of < Parameter> instances. Each instance lists the parameters of one cluster parameter group. dcprsParameters :: Lens' DescribeClusterParametersResponse [Parameter] dcprsParameters = lens _dcprsParameters (\ s a -> s{_dcprsParameters = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/Redshift/DescribeClusterSecurityGroups.hs b/gen/Network/AWS/Redshift/DescribeClusterSecurityGroups.hs --- a/gen/Network/AWS/Redshift/DescribeClusterSecurityGroups.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterSecurityGroups.hs @@ -18,23 +18,13 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns information about Amazon Redshift security groups. If the name --- of a security group is specified, the response will contain only --- information about only that security group. +-- Returns information about Amazon Redshift security groups. If the name of a security group is specified, the response will contain only information about only that security group. -- --- For information about managing security groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For information about managing security groups, go to in the /Amazon Redshift Cluster Management Guide/. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all security groups that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- security groups that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all security groups that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all security groups that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, security --- groups are returned regardless of whether they have tag keys or values --- associated with them. +-- If both tag keys and values are omitted from the request, security groups are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterSecurityGroups @@ -101,51 +91,27 @@ , _dcsgMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching cluster --- security groups that are associated with the specified tag value or --- values. For example, suppose that you have security groups that are --- tagged with values called 'admin' and 'test'. If you specify both of --- these tag values in the request, Amazon Redshift returns a response with --- the security groups that have either or both of these tag values --- associated with them. +-- | A tag value or values for which you want to return all matching cluster security groups that are associated with the specified tag value or values. For example, suppose that you have security groups that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the security groups that have either or both of these tag values associated with them. dcsgTagValues :: Lens' DescribeClusterSecurityGroups [Text] dcsgTagValues = lens _dcsgTagValues (\ s a -> s{_dcsgTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching cluster --- security groups that are associated with the specified key or keys. For --- example, suppose that you have security groups that are tagged with keys --- called 'owner' and 'environment'. If you specify both of these tag keys --- in the request, Amazon Redshift returns a response with the security --- groups that have either or both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching cluster security groups that are associated with the specified key or keys. For example, suppose that you have security groups that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the security groups that have either or both of these tag keys associated with them. dcsgTagKeys :: Lens' DescribeClusterSecurityGroups [Text] dcsgTagKeys = lens _dcsgTagKeys (\ s a -> s{_dcsgTagKeys = a}) . _Default . _Coerce; --- | The name of a cluster security group for which you are requesting --- details. You can specify either the __Marker__ parameter or a --- __ClusterSecurityGroupName__ parameter, but not both. +-- | The name of a cluster security group for which you are requesting details. You can specify either the __Marker__ parameter or a __ClusterSecurityGroupName__ parameter, but not both. -- -- Example: 'securitygroup1' dcsgClusterSecurityGroupName :: Lens' DescribeClusterSecurityGroups (Maybe Text) dcsgClusterSecurityGroupName = lens _dcsgClusterSecurityGroupName (\ s a -> s{_dcsgClusterSecurityGroupName = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeClusterSecurityGroups> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterSecurityGroups> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. -- --- Constraints: You can specify either the __ClusterSecurityGroupName__ --- parameter or the __Marker__ parameter, but not both. +-- Constraints: You can specify either the __ClusterSecurityGroupName__ parameter or the __Marker__ parameter, but not both. dcsgMarker :: Lens' DescribeClusterSecurityGroups (Maybe Text) dcsgMarker = lens _dcsgMarker (\ s a -> s{_dcsgMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -233,12 +199,7 @@ dcsgsrsClusterSecurityGroups :: Lens' DescribeClusterSecurityGroupsResponse [ClusterSecurityGroup] dcsgsrsClusterSecurityGroups = lens _dcsgsrsClusterSecurityGroups (\ s a -> s{_dcsgsrsClusterSecurityGroups = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcsgsrsMarker :: Lens' DescribeClusterSecurityGroupsResponse (Maybe Text) dcsgsrsMarker = lens _dcsgsrsMarker (\ s a -> s{_dcsgsrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeClusterSnapshots.hs b/gen/Network/AWS/Redshift/DescribeClusterSnapshots.hs --- a/gen/Network/AWS/Redshift/DescribeClusterSnapshots.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterSnapshots.hs @@ -18,23 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns one or more snapshot objects, which contain metadata about your --- cluster snapshots. By default, this operation returns information about --- all snapshots of all clusters that are owned by you AWS customer --- account. No information is returned for snapshots owned by inactive AWS --- customer accounts. +-- Returns one or more snapshot objects, which contain metadata about your cluster snapshots. By default, this operation returns information about all snapshots of all clusters that are owned by you AWS customer account. No information is returned for snapshots owned by inactive AWS customer accounts. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all snapshots that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- snapshots that have any combination of those values are returned. Only --- snapshots that you own are returned in the response; shared snapshots --- are not returned with the tag key and tag value request parameters. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all snapshots that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all snapshots that have any combination of those values are returned. Only snapshots that you own are returned in the response; shared snapshots are not returned with the tag key and tag value request parameters. -- --- If both tag keys and values are omitted from the request, snapshots are --- returned regardless of whether they have tag keys or values associated --- with them. +-- If both tag keys and values are omitted from the request, snapshots are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterSnapshots @@ -126,64 +114,39 @@ , _dOwnerAccount = Nothing } --- | The snapshot identifier of the snapshot about which to return --- information. +-- | The snapshot identifier of the snapshot about which to return information. dSnapshotIdentifier :: Lens' DescribeClusterSnapshots (Maybe Text) dSnapshotIdentifier = lens _dSnapshotIdentifier (\ s a -> s{_dSnapshotIdentifier = a}); --- | A tag value or values for which you want to return all matching cluster --- snapshots that are associated with the specified tag value or values. --- For example, suppose that you have snapshots that are tagged with values --- called 'admin' and 'test'. If you specify both of these tag values in --- the request, Amazon Redshift returns a response with the snapshots that --- have either or both of these tag values associated with them. +-- | A tag value or values for which you want to return all matching cluster snapshots that are associated with the specified tag value or values. For example, suppose that you have snapshots that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the snapshots that have either or both of these tag values associated with them. dTagValues :: Lens' DescribeClusterSnapshots [Text] dTagValues = lens _dTagValues (\ s a -> s{_dTagValues = a}) . _Default . _Coerce; --- | A value that requests only snapshots created at or after the specified --- time. The time value is specified in ISO 8601 format. For more --- information about ISO 8601, go to the --- +-- | A value that requests only snapshots created at or after the specified time. The time value is specified in ISO 8601 format. For more information about ISO 8601, go to the -- -- Example: '2012-07-16T18:00:00Z' dStartTime :: Lens' DescribeClusterSnapshots (Maybe UTCTime) dStartTime = lens _dStartTime (\ s a -> s{_dStartTime = a}) . mapping _Time; --- | A tag key or keys for which you want to return all matching cluster --- snapshots that are associated with the specified key or keys. For --- example, suppose that you have snapshots that are tagged with keys --- called 'owner' and 'environment'. If you specify both of these tag keys --- in the request, Amazon Redshift returns a response with the snapshots --- that have either or both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching cluster snapshots that are associated with the specified key or keys. For example, suppose that you have snapshots that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the snapshots that have either or both of these tag keys associated with them. dTagKeys :: Lens' DescribeClusterSnapshots [Text] dTagKeys = lens _dTagKeys (\ s a -> s{_dTagKeys = a}) . _Default . _Coerce; --- | The identifier of the cluster for which information about snapshots is --- requested. +-- | The identifier of the cluster for which information about snapshots is requested. dClusterIdentifier :: Lens' DescribeClusterSnapshots (Maybe Text) dClusterIdentifier = lens _dClusterIdentifier (\ s a -> s{_dClusterIdentifier = a}); --- | The type of snapshots for which you are requesting information. By --- default, snapshots of all types are returned. +-- | The type of snapshots for which you are requesting information. By default, snapshots of all types are returned. -- -- Valid Values: 'automated' | 'manual' dSnapshotType :: Lens' DescribeClusterSnapshots (Maybe Text) dSnapshotType = lens _dSnapshotType (\ s a -> s{_dSnapshotType = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeClusterSnapshots> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterSnapshots> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dMarker :: Lens' DescribeClusterSnapshots (Maybe Text) dMarker = lens _dMarker (\ s a -> s{_dMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -191,19 +154,13 @@ dMaxRecords :: Lens' DescribeClusterSnapshots (Maybe Int) dMaxRecords = lens _dMaxRecords (\ s a -> s{_dMaxRecords = a}); --- | A time value that requests only snapshots created at or before the --- specified time. The time value is specified in ISO 8601 format. For more --- information about ISO 8601, go to the --- +-- | A time value that requests only snapshots created at or before the specified time. The time value is specified in ISO 8601 format. For more information about ISO 8601, go to the -- -- Example: '2012-07-16T18:00:00Z' dEndTime :: Lens' DescribeClusterSnapshots (Maybe UTCTime) dEndTime = lens _dEndTime (\ s a -> s{_dEndTime = a}) . mapping _Time; --- | The AWS customer account used to create or copy the snapshot. Use this --- field to filter the results to snapshots owned by a particular account. --- To describe snapshots you own, either specify your AWS customer account, --- or do not specify the parameter. +-- | The AWS customer account used to create or copy the snapshot. Use this field to filter the results to snapshots owned by a particular account. To describe snapshots you own, either specify your AWS customer account, or do not specify the parameter. dOwnerAccount :: Lens' DescribeClusterSnapshots (Maybe Text) dOwnerAccount = lens _dOwnerAccount (\ s a -> s{_dOwnerAccount = a}); @@ -287,12 +244,7 @@ dcssrsSnapshots :: Lens' DescribeClusterSnapshotsResponse [Snapshot] dcssrsSnapshots = lens _dcssrsSnapshots (\ s a -> s{_dcssrsSnapshots = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcssrsMarker :: Lens' DescribeClusterSnapshotsResponse (Maybe Text) dcssrsMarker = lens _dcssrsMarker (\ s a -> s{_dcssrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeClusterSubnetGroups.hs b/gen/Network/AWS/Redshift/DescribeClusterSubnetGroups.hs --- a/gen/Network/AWS/Redshift/DescribeClusterSubnetGroups.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterSubnetGroups.hs @@ -18,20 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns one or more cluster subnet group objects, which contain metadata --- about your cluster subnet groups. By default, this operation returns --- information about all cluster subnet groups that are defined in you AWS --- account. +-- Returns one or more cluster subnet group objects, which contain metadata about your cluster subnet groups. By default, this operation returns information about all cluster subnet groups that are defined in you AWS account. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all subnet groups that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- subnet groups that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all subnet groups that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all subnet groups that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, subnet groups --- are returned regardless of whether they have tag keys or values --- associated with them. +-- If both tag keys and values are omitted from the request, subnet groups are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterSubnetGroups @@ -98,22 +89,11 @@ , _dcsgsMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching cluster --- subnet groups that are associated with the specified tag value or --- values. For example, suppose that you have subnet groups that are tagged --- with values called 'admin' and 'test'. If you specify both of these tag --- values in the request, Amazon Redshift returns a response with the --- subnet groups that have either or both of these tag values associated --- with them. +-- | A tag value or values for which you want to return all matching cluster subnet groups that are associated with the specified tag value or values. For example, suppose that you have subnet groups that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the subnet groups that have either or both of these tag values associated with them. dcsgsTagValues :: Lens' DescribeClusterSubnetGroups [Text] dcsgsTagValues = lens _dcsgsTagValues (\ s a -> s{_dcsgsTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching cluster --- subnet groups that are associated with the specified key or keys. For --- example, suppose that you have subnet groups that are tagged with keys --- called 'owner' and 'environment'. If you specify both of these tag keys --- in the request, Amazon Redshift returns a response with the subnet --- groups that have either or both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching cluster subnet groups that are associated with the specified key or keys. For example, suppose that you have subnet groups that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the subnet groups that have either or both of these tag keys associated with them. dcsgsTagKeys :: Lens' DescribeClusterSubnetGroups [Text] dcsgsTagKeys = lens _dcsgsTagKeys (\ s a -> s{_dcsgsTagKeys = a}) . _Default . _Coerce; @@ -121,21 +101,11 @@ dcsgsClusterSubnetGroupName :: Lens' DescribeClusterSubnetGroups (Maybe Text) dcsgsClusterSubnetGroupName = lens _dcsgsClusterSubnetGroupName (\ s a -> s{_dcsgsClusterSubnetGroupName = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeClusterSubnetGroups> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterSubnetGroups> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dcsgsMarker :: Lens' DescribeClusterSubnetGroups (Maybe Text) dcsgsMarker = lens _dcsgsMarker (\ s a -> s{_dcsgsMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -221,12 +191,7 @@ dcsgrsClusterSubnetGroups :: Lens' DescribeClusterSubnetGroupsResponse [ClusterSubnetGroup] dcsgrsClusterSubnetGroups = lens _dcsgrsClusterSubnetGroups (\ s a -> s{_dcsgrsClusterSubnetGroups = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcsgrsMarker :: Lens' DescribeClusterSubnetGroupsResponse (Maybe Text) dcsgrsMarker = lens _dcsgrsMarker (\ s a -> s{_dcsgrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeClusterVersions.hs b/gen/Network/AWS/Redshift/DescribeClusterVersions.hs --- a/gen/Network/AWS/Redshift/DescribeClusterVersions.hs +++ b/gen/Network/AWS/Redshift/DescribeClusterVersions.hs @@ -18,12 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns descriptions of the available Amazon Redshift cluster versions. --- You can call this operation even before creating any clusters to learn --- more about the Amazon Redshift versions. For more information about --- managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ +-- Returns descriptions of the available Amazon Redshift cluster versions. You can call this operation even before creating any clusters to learn more about the Amazon Redshift versions. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusterVersions @@ -85,8 +80,7 @@ , _dcvClusterVersion = Nothing } --- | The name of a specific cluster parameter group family to return details --- for. +-- | The name of a specific cluster parameter group family to return details for. -- -- Constraints: -- @@ -96,20 +90,11 @@ dcvClusterParameterGroupFamily :: Lens' DescribeClusterVersions (Maybe Text) dcvClusterParameterGroupFamily = lens _dcvClusterParameterGroupFamily (\ s a -> s{_dcvClusterParameterGroupFamily = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeClusterVersions> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusterVersions> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dcvMarker :: Lens' DescribeClusterVersions (Maybe Text) dcvMarker = lens _dcvMarker (\ s a -> s{_dcvMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -197,12 +182,7 @@ dcvrsClusterVersions :: Lens' DescribeClusterVersionsResponse [ClusterVersion] dcvrsClusterVersions = lens _dcvrsClusterVersions (\ s a -> s{_dcvrsClusterVersions = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcvrsMarker :: Lens' DescribeClusterVersionsResponse (Maybe Text) dcvrsMarker = lens _dcvrsMarker (\ s a -> s{_dcvrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeClusters.hs b/gen/Network/AWS/Redshift/DescribeClusters.hs --- a/gen/Network/AWS/Redshift/DescribeClusters.hs +++ b/gen/Network/AWS/Redshift/DescribeClusters.hs @@ -18,22 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns properties of provisioned clusters including general cluster --- properties, cluster database properties, maintenance and backup --- properties, and security and access properties. This operation supports --- pagination. For more information about managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ . +-- Returns properties of provisioned clusters including general cluster properties, cluster database properties, maintenance and backup properties, and security and access properties. This operation supports pagination. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ . -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all clusters that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- clusters that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all clusters that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all clusters that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, clusters are --- returned regardless of whether they have tag keys or values associated --- with them. +-- If both tag keys and values are omitted from the request, clusters are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeClusters @@ -100,48 +89,27 @@ , _dcMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching clusters --- that are associated with the specified tag value or values. For example, --- suppose that you have clusters that are tagged with values called --- 'admin' and 'test'. If you specify both of these tag values in the --- request, Amazon Redshift returns a response with the clusters that have --- either or both of these tag values associated with them. +-- | A tag value or values for which you want to return all matching clusters that are associated with the specified tag value or values. For example, suppose that you have clusters that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the clusters that have either or both of these tag values associated with them. dcTagValues :: Lens' DescribeClusters [Text] dcTagValues = lens _dcTagValues (\ s a -> s{_dcTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching clusters --- that are associated with the specified key or keys. For example, suppose --- that you have clusters that are tagged with keys called 'owner' and --- 'environment'. If you specify both of these tag keys in the request, --- Amazon Redshift returns a response with the clusters that have either or --- both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching clusters that are associated with the specified key or keys. For example, suppose that you have clusters that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the clusters that have either or both of these tag keys associated with them. dcTagKeys :: Lens' DescribeClusters [Text] dcTagKeys = lens _dcTagKeys (\ s a -> s{_dcTagKeys = a}) . _Default . _Coerce; --- | The unique identifier of a cluster whose properties you are requesting. --- This parameter is case sensitive. +-- | The unique identifier of a cluster whose properties you are requesting. This parameter is case sensitive. -- -- The default is that all clusters defined for an account are returned. dcClusterIdentifier :: Lens' DescribeClusters (Maybe Text) dcClusterIdentifier = lens _dcClusterIdentifier (\ s a -> s{_dcClusterIdentifier = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeClusters> request --- exceed the value specified in 'MaxRecords', AWS returns a value in the --- 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeClusters> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. -- --- Constraints: You can specify either the __ClusterIdentifier__ parameter --- or the __Marker__ parameter, but not both. +-- Constraints: You can specify either the __ClusterIdentifier__ parameter or the __Marker__ parameter, but not both. dcMarker :: Lens' DescribeClusters (Maybe Text) dcMarker = lens _dcMarker (\ s a -> s{_dcMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -218,12 +186,7 @@ , _dcrsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcrsMarker :: Lens' DescribeClustersResponse (Maybe Text) dcrsMarker = lens _dcrsMarker (\ s a -> s{_dcrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeDefaultClusterParameters.hs b/gen/Network/AWS/Redshift/DescribeDefaultClusterParameters.hs --- a/gen/Network/AWS/Redshift/DescribeDefaultClusterParameters.hs +++ b/gen/Network/AWS/Redshift/DescribeDefaultClusterParameters.hs @@ -18,12 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of parameter settings for the specified parameter group --- family. +-- Returns a list of parameter settings for the specified parameter group family. -- --- For more information about parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeDefaultClusterParameters @@ -80,21 +77,11 @@ , _ddcpParameterGroupFamily = pParameterGroupFamily_ } --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeDefaultClusterParameters> request exceed the value specified --- in 'MaxRecords', AWS returns a value in the 'Marker' field of the --- response. You can retrieve the next set of response records by providing --- the returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeDefaultClusterParameters> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. ddcpMarker :: Lens' DescribeDefaultClusterParameters (Maybe Text) ddcpMarker = lens _ddcpMarker (\ s a -> s{_ddcpMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- diff --git a/gen/Network/AWS/Redshift/DescribeEventCategories.hs b/gen/Network/AWS/Redshift/DescribeEventCategories.hs --- a/gen/Network/AWS/Redshift/DescribeEventCategories.hs +++ b/gen/Network/AWS/Redshift/DescribeEventCategories.hs @@ -18,10 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Displays a list of event categories for all event source types, or for a --- specified source type. For a list of the event categories and source --- types, go to --- . +-- Displays a list of event categories for all event source types, or for a specified source type. For a list of the event categories and source types, go to . module Network.AWS.Redshift.DescribeEventCategories ( -- * Creating a Request @@ -64,11 +61,9 @@ { _decSourceType = Nothing } --- | The source type, such as cluster or parameter group, to which the --- described event categories apply. +-- | The source type, such as cluster or parameter group, to which the described event categories apply. -- --- Valid values: cluster, cluster-snapshot, cluster-parameter-group, and --- cluster-security-group. +-- Valid values: cluster, cluster-snapshot, cluster-parameter-group, and cluster-security-group. decSourceType :: Lens' DescribeEventCategories (Maybe Text) decSourceType = lens _decSourceType (\ s a -> s{_decSourceType = a}); diff --git a/gen/Network/AWS/Redshift/DescribeEventSubscriptions.hs b/gen/Network/AWS/Redshift/DescribeEventSubscriptions.hs --- a/gen/Network/AWS/Redshift/DescribeEventSubscriptions.hs +++ b/gen/Network/AWS/Redshift/DescribeEventSubscriptions.hs @@ -18,9 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Lists descriptions of all the Amazon Redshift event notifications --- subscription for a customer account. If you specify a subscription name, --- lists the description for that subscription. +-- Lists descriptions of all the Amazon Redshift event notifications subscription for a customer account. If you specify a subscription name, lists the description for that subscription. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeEventSubscriptions @@ -77,25 +75,15 @@ , _dessMaxRecords = Nothing } --- | The name of the Amazon Redshift event notification subscription to be --- described. +-- | The name of the Amazon Redshift event notification subscription to be described. dessSubscriptionName :: Lens' DescribeEventSubscriptions (Maybe Text) dessSubscriptionName = lens _dessSubscriptionName (\ s a -> s{_dessSubscriptionName = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeEventSubscriptions> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeEventSubscriptions> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dessMarker :: Lens' DescribeEventSubscriptions (Maybe Text) dessMarker = lens _dessMarker (\ s a -> s{_dessMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -176,12 +164,7 @@ desrsEventSubscriptionsList :: Lens' DescribeEventSubscriptionsResponse [EventSubscription] desrsEventSubscriptionsList = lens _desrsEventSubscriptionsList (\ s a -> s{_desrsEventSubscriptionsList = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. desrsMarker :: Lens' DescribeEventSubscriptionsResponse (Maybe Text) desrsMarker = lens _desrsMarker (\ s a -> s{_desrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeEvents.hs b/gen/Network/AWS/Redshift/DescribeEvents.hs --- a/gen/Network/AWS/Redshift/DescribeEvents.hs +++ b/gen/Network/AWS/Redshift/DescribeEvents.hs @@ -18,11 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns events related to clusters, security groups, snapshots, and --- parameter groups for the past 14 days. Events specific to a particular --- cluster, security group, snapshot or parameter group can be obtained by --- providing the name as a parameter. By default, the past hour of events --- are returned. +-- Returns events related to clusters, security groups, snapshots, and parameter groups for the past 14 days. Events specific to a particular cluster, security group, snapshot or parameter group can be obtained by providing the name as a parameter. By default, the past hour of events are returned. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeEvents @@ -99,63 +95,43 @@ , _deDuration = Nothing } --- | The beginning of the time interval to retrieve events for, specified in --- ISO 8601 format. For more information about ISO 8601, go to the --- +-- | The beginning of the time interval to retrieve events for, specified in ISO 8601 format. For more information about ISO 8601, go to the -- -- Example: '2009-07-08T18:00Z' deStartTime :: Lens' DescribeEvents (Maybe UTCTime) deStartTime = lens _deStartTime (\ s a -> s{_deStartTime = a}) . mapping _Time; --- | The event source to retrieve events for. If no value is specified, all --- events are returned. +-- | The event source to retrieve events for. If no value is specified, all events are returned. -- -- Constraints: -- -- If /SourceType/ is supplied, /SourceIdentifier/ must also be provided. -- -- - Specify 'cluster' when /SourceIdentifier/ is a cluster identifier. --- - Specify 'cluster-security-group' when /SourceIdentifier/ is a --- cluster security group name. --- - Specify 'cluster-parameter-group' when /SourceIdentifier/ is a --- cluster parameter group name. --- - Specify 'cluster-snapshot' when /SourceIdentifier/ is a cluster --- snapshot identifier. +-- - Specify 'cluster-security-group' when /SourceIdentifier/ is a cluster security group name. +-- - Specify 'cluster-parameter-group' when /SourceIdentifier/ is a cluster parameter group name. +-- - Specify 'cluster-snapshot' when /SourceIdentifier/ is a cluster snapshot identifier. deSourceType :: Lens' DescribeEvents (Maybe SourceType) deSourceType = lens _deSourceType (\ s a -> s{_deSourceType = a}); --- | The identifier of the event source for which events will be returned. If --- this parameter is not specified, then all sources are included in the --- response. +-- | The identifier of the event source for which events will be returned. If this parameter is not specified, then all sources are included in the response. -- -- Constraints: -- -- If /SourceIdentifier/ is supplied, /SourceType/ must also be provided. -- -- - Specify a cluster identifier when /SourceType/ is 'cluster'. --- - Specify a cluster security group name when /SourceType/ is --- 'cluster-security-group'. --- - Specify a cluster parameter group name when /SourceType/ is --- 'cluster-parameter-group'. --- - Specify a cluster snapshot identifier when /SourceType/ is --- 'cluster-snapshot'. +-- - Specify a cluster security group name when /SourceType/ is 'cluster-security-group'. +-- - Specify a cluster parameter group name when /SourceType/ is 'cluster-parameter-group'. +-- - Specify a cluster snapshot identifier when /SourceType/ is 'cluster-snapshot'. deSourceIdentifier :: Lens' DescribeEvents (Maybe Text) deSourceIdentifier = lens _deSourceIdentifier (\ s a -> s{_deSourceIdentifier = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeEvents> request --- exceed the value specified in 'MaxRecords', AWS returns a value in the --- 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeEvents> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. deMarker :: Lens' DescribeEvents (Maybe Text) deMarker = lens _deMarker (\ s a -> s{_deMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -163,18 +139,13 @@ deMaxRecords :: Lens' DescribeEvents (Maybe Int) deMaxRecords = lens _deMaxRecords (\ s a -> s{_deMaxRecords = a}); --- | The end of the time interval for which to retrieve events, specified in --- ISO 8601 format. For more information about ISO 8601, go to the --- +-- | The end of the time interval for which to retrieve events, specified in ISO 8601 format. For more information about ISO 8601, go to the -- -- Example: '2009-07-08T18:00Z' deEndTime :: Lens' DescribeEvents (Maybe UTCTime) deEndTime = lens _deEndTime (\ s a -> s{_deEndTime = a}) . mapping _Time; --- | The number of minutes prior to the time of the request for which to --- retrieve events. For example, if the request is sent at 18:00 and you --- specify a duration of 60, then only events which have occurred after --- 17:00 will be returned. +-- | The number of minutes prior to the time of the request for which to retrieve events. For example, if the request is sent at 18:00 and you specify a duration of 60, then only events which have occurred after 17:00 will be returned. -- -- Default: '60' deDuration :: Lens' DescribeEvents (Maybe Int) @@ -252,12 +223,7 @@ dersEvents :: Lens' DescribeEventsResponse [Event] dersEvents = lens _dersEvents (\ s a -> s{_dersEvents = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dersMarker :: Lens' DescribeEventsResponse (Maybe Text) dersMarker = lens _dersMarker (\ s a -> s{_dersMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeHSMClientCertificates.hs b/gen/Network/AWS/Redshift/DescribeHSMClientCertificates.hs --- a/gen/Network/AWS/Redshift/DescribeHSMClientCertificates.hs +++ b/gen/Network/AWS/Redshift/DescribeHSMClientCertificates.hs @@ -18,20 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns information about the specified HSM client certificate. If no --- certificate ID is specified, returns information about all the HSM --- certificates owned by your AWS customer account. +-- Returns information about the specified HSM client certificate. If no certificate ID is specified, returns information about all the HSM certificates owned by your AWS customer account. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all HSM client certificates that match any combination --- of the specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- HSM client certificates that have any combination of those values are --- returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all HSM client certificates that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all HSM client certificates that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, HSM client --- certificates are returned regardless of whether they have tag keys or --- values associated with them. +-- If both tag keys and values are omitted from the request, HSM client certificates are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeHSMClientCertificates @@ -98,47 +89,23 @@ , _dhccMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching HSM --- client certificates that are associated with the specified tag value or --- values. For example, suppose that you have HSM client certificates that --- are tagged with values called 'admin' and 'test'. If you specify both of --- these tag values in the request, Amazon Redshift returns a response with --- the HSM client certificates that have either or both of these tag values --- associated with them. +-- | A tag value or values for which you want to return all matching HSM client certificates that are associated with the specified tag value or values. For example, suppose that you have HSM client certificates that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the HSM client certificates that have either or both of these tag values associated with them. dhccTagValues :: Lens' DescribeHSMClientCertificates [Text] dhccTagValues = lens _dhccTagValues (\ s a -> s{_dhccTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching HSM client --- certificates that are associated with the specified key or keys. For --- example, suppose that you have HSM client certificates that are tagged --- with keys called 'owner' and 'environment'. If you specify both of these --- tag keys in the request, Amazon Redshift returns a response with the HSM --- client certificates that have either or both of these tag keys --- associated with them. +-- | A tag key or keys for which you want to return all matching HSM client certificates that are associated with the specified key or keys. For example, suppose that you have HSM client certificates that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the HSM client certificates that have either or both of these tag keys associated with them. dhccTagKeys :: Lens' DescribeHSMClientCertificates [Text] dhccTagKeys = lens _dhccTagKeys (\ s a -> s{_dhccTagKeys = a}) . _Default . _Coerce; --- | The identifier of a specific HSM client certificate for which you want --- information. If no identifier is specified, information is returned for --- all HSM client certificates owned by your AWS customer account. +-- | The identifier of a specific HSM client certificate for which you want information. If no identifier is specified, information is returned for all HSM client certificates owned by your AWS customer account. dhccHSMClientCertificateIdentifier :: Lens' DescribeHSMClientCertificates (Maybe Text) dhccHSMClientCertificateIdentifier = lens _dhccHSMClientCertificateIdentifier (\ s a -> s{_dhccHSMClientCertificateIdentifier = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeHsmClientCertificates> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeHsmClientCertificates> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dhccMarker :: Lens' DescribeHSMClientCertificates (Maybe Text) dhccMarker = lens _dhccMarker (\ s a -> s{_dhccMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -222,18 +189,11 @@ , _dhccrsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dhccrsMarker :: Lens' DescribeHSMClientCertificatesResponse (Maybe Text) dhccrsMarker = lens _dhccrsMarker (\ s a -> s{_dhccrsMarker = a}); --- | A list of the identifiers for one or more HSM client certificates used --- by Amazon Redshift clusters to store and retrieve database encryption --- keys in an HSM. +-- | A list of the identifiers for one or more HSM client certificates used by Amazon Redshift clusters to store and retrieve database encryption keys in an HSM. dhccrsHSMClientCertificates :: Lens' DescribeHSMClientCertificatesResponse [HSMClientCertificate] dhccrsHSMClientCertificates = lens _dhccrsHSMClientCertificates (\ s a -> s{_dhccrsHSMClientCertificates = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/Redshift/DescribeHSMConfigurations.hs b/gen/Network/AWS/Redshift/DescribeHSMConfigurations.hs --- a/gen/Network/AWS/Redshift/DescribeHSMConfigurations.hs +++ b/gen/Network/AWS/Redshift/DescribeHSMConfigurations.hs @@ -18,19 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns information about the specified Amazon Redshift HSM --- configuration. If no configuration ID is specified, returns information --- about all the HSM configurations owned by your AWS customer account. +-- Returns information about the specified Amazon Redshift HSM configuration. If no configuration ID is specified, returns information about all the HSM configurations owned by your AWS customer account. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all HSM connections that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- HSM connections that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all HSM connections that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all HSM connections that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, HSM --- connections are returned regardless of whether they have tag keys or --- values associated with them. +-- If both tag keys and values are omitted from the request, HSM connections are returned regardless of whether they have tag keys or values associated with them. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeHSMConfigurations @@ -97,46 +89,23 @@ , _dhsmcMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching HSM --- configurations that are associated with the specified tag value or --- values. For example, suppose that you have HSM configurations that are --- tagged with values called 'admin' and 'test'. If you specify both of --- these tag values in the request, Amazon Redshift returns a response with --- the HSM configurations that have either or both of these tag values --- associated with them. +-- | A tag value or values for which you want to return all matching HSM configurations that are associated with the specified tag value or values. For example, suppose that you have HSM configurations that are tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with the HSM configurations that have either or both of these tag values associated with them. dhsmcTagValues :: Lens' DescribeHSMConfigurations [Text] dhsmcTagValues = lens _dhsmcTagValues (\ s a -> s{_dhsmcTagValues = a}) . _Default . _Coerce; --- | The identifier of a specific Amazon Redshift HSM configuration to be --- described. If no identifier is specified, information is returned for --- all HSM configurations owned by your AWS customer account. +-- | The identifier of a specific Amazon Redshift HSM configuration to be described. If no identifier is specified, information is returned for all HSM configurations owned by your AWS customer account. dhsmcHSMConfigurationIdentifier :: Lens' DescribeHSMConfigurations (Maybe Text) dhsmcHSMConfigurationIdentifier = lens _dhsmcHSMConfigurationIdentifier (\ s a -> s{_dhsmcHSMConfigurationIdentifier = a}); --- | A tag key or keys for which you want to return all matching HSM --- configurations that are associated with the specified key or keys. For --- example, suppose that you have HSM configurations that are tagged with --- keys called 'owner' and 'environment'. If you specify both of these tag --- keys in the request, Amazon Redshift returns a response with the HSM --- configurations that have either or both of these tag keys associated --- with them. +-- | A tag key or keys for which you want to return all matching HSM configurations that are associated with the specified key or keys. For example, suppose that you have HSM configurations that are tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with the HSM configurations that have either or both of these tag keys associated with them. dhsmcTagKeys :: Lens' DescribeHSMConfigurations [Text] dhsmcTagKeys = lens _dhsmcTagKeys (\ s a -> s{_dhsmcTagKeys = a}) . _Default . _Coerce; --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeHsmConfigurations> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeHsmConfigurations> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. dhsmcMarker :: Lens' DescribeHSMConfigurations (Maybe Text) dhsmcMarker = lens _dhsmcMarker (\ s a -> s{_dhsmcMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -217,12 +186,7 @@ , _dhcrsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dhcrsMarker :: Lens' DescribeHSMConfigurationsResponse (Maybe Text) dhcrsMarker = lens _dhcrsMarker (\ s a -> s{_dhcrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeLoggingStatus.hs b/gen/Network/AWS/Redshift/DescribeLoggingStatus.hs --- a/gen/Network/AWS/Redshift/DescribeLoggingStatus.hs +++ b/gen/Network/AWS/Redshift/DescribeLoggingStatus.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Describes whether information, such as queries and connection attempts, --- is being logged for the specified Amazon Redshift cluster. +-- Describes whether information, such as queries and connection attempts, is being logged for the specified Amazon Redshift cluster. module Network.AWS.Redshift.DescribeLoggingStatus ( -- * Creating a Request diff --git a/gen/Network/AWS/Redshift/DescribeOrderableClusterOptions.hs b/gen/Network/AWS/Redshift/DescribeOrderableClusterOptions.hs --- a/gen/Network/AWS/Redshift/DescribeOrderableClusterOptions.hs +++ b/gen/Network/AWS/Redshift/DescribeOrderableClusterOptions.hs @@ -18,16 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of orderable cluster options. Before you create a new --- cluster you can use this operation to find what options are available, --- such as the EC2 Availability Zones (AZ) in the specific AWS region that --- you can specify, and the node types you can request. The node types --- differ by available storage, memory, CPU and price. With the cost --- involved you might want to obtain a list of cluster options in the --- specific region and specify values when creating a cluster. For more --- information about managing clusters, go to --- --- in the /Amazon Redshift Cluster Management Guide/ +-- Returns a list of orderable cluster options. Before you create a new cluster you can use this operation to find what options are available, such as the EC2 Availability Zones (AZ) in the specific AWS region that you can specify, and the node types you can request. The node types differ by available storage, memory, CPU and price. With the cost involved you might want to obtain a list of cluster options in the specific region and specify values when creating a cluster. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeOrderableClusterOptions @@ -89,21 +80,11 @@ , _docoNodeType = Nothing } --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeOrderableClusterOptions> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeOrderableClusterOptions> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. docoMarker :: Lens' DescribeOrderableClusterOptions (Maybe Text) docoMarker = lens _docoMarker (\ s a -> s{_docoMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -111,18 +92,15 @@ docoMaxRecords :: Lens' DescribeOrderableClusterOptions (Maybe Int) docoMaxRecords = lens _docoMaxRecords (\ s a -> s{_docoMaxRecords = a}); --- | The version filter value. Specify this parameter to show only the --- available offerings matching the specified version. +-- | The version filter value. Specify this parameter to show only the available offerings matching the specified version. -- -- Default: All versions. -- --- Constraints: Must be one of the version returned from --- < DescribeClusterVersions>. +-- Constraints: Must be one of the version returned from < DescribeClusterVersions>. docoClusterVersion :: Lens' DescribeOrderableClusterOptions (Maybe Text) docoClusterVersion = lens _docoClusterVersion (\ s a -> s{_docoClusterVersion = a}); --- | The node type filter value. Specify this parameter to show only the --- available offerings matching the specified node type. +-- | The node type filter value. Specify this parameter to show only the available offerings matching the specified node type. docoNodeType :: Lens' DescribeOrderableClusterOptions (Maybe Text) docoNodeType = lens _docoNodeType (\ s a -> s{_docoNodeType = a}); @@ -201,17 +179,11 @@ , _docorsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. docorsMarker :: Lens' DescribeOrderableClusterOptionsResponse (Maybe Text) docorsMarker = lens _docorsMarker (\ s a -> s{_docorsMarker = a}); --- | An 'OrderableClusterOption' structure containing information about --- orderable options for the cluster. +-- | An 'OrderableClusterOption' structure containing information about orderable options for the cluster. docorsOrderableClusterOptions :: Lens' DescribeOrderableClusterOptionsResponse [OrderableClusterOption] docorsOrderableClusterOptions = lens _docorsOrderableClusterOptions (\ s a -> s{_docorsOrderableClusterOptions = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/Redshift/DescribeReservedNodeOfferings.hs b/gen/Network/AWS/Redshift/DescribeReservedNodeOfferings.hs --- a/gen/Network/AWS/Redshift/DescribeReservedNodeOfferings.hs +++ b/gen/Network/AWS/Redshift/DescribeReservedNodeOfferings.hs @@ -18,17 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of the available reserved node offerings by Amazon --- Redshift with their descriptions including the node type, the fixed and --- recurring costs of reserving the node and duration the node will be --- reserved for you. These descriptions help you determine which reserve --- node offering you want to purchase. You then use the unique offering ID --- in you call to < PurchaseReservedNodeOffering> to reserve one or more --- nodes for your Amazon Redshift cluster. +-- Returns a list of the available reserved node offerings by Amazon Redshift with their descriptions including the node type, the fixed and recurring costs of reserving the node and duration the node will be reserved for you. These descriptions help you determine which reserve node offering you want to purchase. You then use the unique offering ID in you call to < PurchaseReservedNodeOffering> to reserve one or more nodes for your Amazon Redshift cluster. -- --- For more information about reserved node offerings, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about reserved node offerings, go to in the /Amazon Redshift Cluster Management Guide/. -- -- This operation returns paginated results. module Network.AWS.Redshift.DescribeReservedNodeOfferings @@ -89,21 +81,11 @@ drnoReservedNodeOfferingId :: Lens' DescribeReservedNodeOfferings (Maybe Text) drnoReservedNodeOfferingId = lens _drnoReservedNodeOfferingId (\ s a -> s{_drnoReservedNodeOfferingId = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a --- < DescribeReservedNodeOfferings> request exceed the value specified in --- 'MaxRecords', AWS returns a value in the 'Marker' field of the response. --- You can retrieve the next set of response records by providing the --- returned marker value in the 'Marker' parameter and retrying the --- request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeReservedNodeOfferings> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. drnoMarker :: Lens' DescribeReservedNodeOfferings (Maybe Text) drnoMarker = lens _drnoMarker (\ s a -> s{_drnoMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -187,12 +169,7 @@ drnorsReservedNodeOfferings :: Lens' DescribeReservedNodeOfferingsResponse [ReservedNodeOffering] drnorsReservedNodeOfferings = lens _drnorsReservedNodeOfferings (\ s a -> s{_drnorsReservedNodeOfferings = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. drnorsMarker :: Lens' DescribeReservedNodeOfferingsResponse (Maybe Text) drnorsMarker = lens _drnorsMarker (\ s a -> s{_drnorsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeReservedNodes.hs b/gen/Network/AWS/Redshift/DescribeReservedNodes.hs --- a/gen/Network/AWS/Redshift/DescribeReservedNodes.hs +++ b/gen/Network/AWS/Redshift/DescribeReservedNodes.hs @@ -79,20 +79,11 @@ drnReservedNodeId :: Lens' DescribeReservedNodes (Maybe Text) drnReservedNodeId = lens _drnReservedNodeId (\ s a -> s{_drnReservedNodeId = a}); --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a < DescribeReservedNodes> --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a < DescribeReservedNodes> request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. drnMarker :: Lens' DescribeReservedNodes (Maybe Text) drnMarker = lens _drnMarker (\ s a -> s{_drnMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -171,12 +162,7 @@ drnrsReservedNodes :: Lens' DescribeReservedNodesResponse [ReservedNode] drnrsReservedNodes = lens _drnrsReservedNodes (\ s a -> s{_drnrsReservedNodes = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. drnrsMarker :: Lens' DescribeReservedNodesResponse (Maybe Text) drnrsMarker = lens _drnrsMarker (\ s a -> s{_drnrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeResize.hs b/gen/Network/AWS/Redshift/DescribeResize.hs --- a/gen/Network/AWS/Redshift/DescribeResize.hs +++ b/gen/Network/AWS/Redshift/DescribeResize.hs @@ -18,14 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns information about the last resize operation for the specified --- cluster. If no resize operation has ever been initiated for the --- specified cluster, a 'HTTP 404' error is returned. If a resize operation --- was initiated and completed, the status of the resize remains as --- 'SUCCEEDED' until the next resize. +-- Returns information about the last resize operation for the specified cluster. If no resize operation has ever been initiated for the specified cluster, a 'HTTP 404' error is returned. If a resize operation was initiated and completed, the status of the resize remains as 'SUCCEEDED' until the next resize. -- --- A resize operation can be requested using < ModifyCluster> and --- specifying a different number or type of nodes for the cluster. +-- A resize operation can be requested using < ModifyCluster> and specifying a different number or type of nodes for the cluster. module Network.AWS.Redshift.DescribeResize ( -- * Creating a Request @@ -80,11 +75,9 @@ { _drClusterIdentifier = pClusterIdentifier_ } --- | The unique identifier of a cluster whose resize progress you are --- requesting. This parameter is case-sensitive. +-- | The unique identifier of a cluster whose resize progress you are requesting. This parameter is case-sensitive. -- --- By default, resize operations for all clusters defined for an AWS --- account are returned. +-- By default, resize operations for all clusters defined for an AWS account are returned. drClusterIdentifier :: Lens' DescribeResize Text drClusterIdentifier = lens _drClusterIdentifier (\ s a -> s{_drClusterIdentifier = a}); @@ -211,26 +204,19 @@ drrsStatus :: Lens' DescribeResizeResponse (Maybe Text) drrsStatus = lens _drrsStatus (\ s a -> s{_drrsStatus = a}); --- | The estimated time remaining, in seconds, until the resize operation is --- complete. This value is calculated based on the average resize rate and --- the estimated amount of data remaining to be processed. Once the resize --- operation is complete, this value will be 0. +-- | The estimated time remaining, in seconds, until the resize operation is complete. This value is calculated based on the average resize rate and the estimated amount of data remaining to be processed. Once the resize operation is complete, this value will be 0. drrsEstimatedTimeToCompletionInSeconds :: Lens' DescribeResizeResponse (Maybe Integer) drrsEstimatedTimeToCompletionInSeconds = lens _drrsEstimatedTimeToCompletionInSeconds (\ s a -> s{_drrsEstimatedTimeToCompletionInSeconds = a}); --- | The average rate of the resize operation over the last few minutes, --- measured in megabytes per second. After the resize operation completes, --- this value shows the average rate of the entire resize operation. +-- | The average rate of the resize operation over the last few minutes, measured in megabytes per second. After the resize operation completes, this value shows the average rate of the entire resize operation. drrsAvgResizeRateInMegaBytesPerSecond :: Lens' DescribeResizeResponse (Maybe Double) drrsAvgResizeRateInMegaBytesPerSecond = lens _drrsAvgResizeRateInMegaBytesPerSecond (\ s a -> s{_drrsAvgResizeRateInMegaBytesPerSecond = a}); --- | The number of nodes that the cluster will have after the resize --- operation is complete. +-- | The number of nodes that the cluster will have after the resize operation is complete. drrsTargetNumberOfNodes :: Lens' DescribeResizeResponse (Maybe Int) drrsTargetNumberOfNodes = lens _drrsTargetNumberOfNodes (\ s a -> s{_drrsTargetNumberOfNodes = a}); --- | The node type that the cluster will have after the resize operation is --- complete. +-- | The node type that the cluster will have after the resize operation is complete. drrsTargetNodeType :: Lens' DescribeResizeResponse (Maybe Text) drrsTargetNodeType = lens _drrsTargetNodeType (\ s a -> s{_drrsTargetNodeType = a}); @@ -246,17 +232,11 @@ drrsImportTablesCompleted :: Lens' DescribeResizeResponse [Text] drrsImportTablesCompleted = lens _drrsImportTablesCompleted (\ s a -> s{_drrsImportTablesCompleted = a}) . _Default . _Coerce; --- | While the resize operation is in progress, this value shows the current --- amount of data, in megabytes, that has been processed so far. When the --- resize operation is complete, this value shows the total amount of data, --- in megabytes, on the cluster, which may be more or less than --- TotalResizeDataInMegaBytes (the estimated total amount of data before --- resize). +-- | While the resize operation is in progress, this value shows the current amount of data, in megabytes, that has been processed so far. When the resize operation is complete, this value shows the total amount of data, in megabytes, on the cluster, which may be more or less than TotalResizeDataInMegaBytes (the estimated total amount of data before resize). drrsProgressInMegaBytes :: Lens' DescribeResizeResponse (Maybe Integer) drrsProgressInMegaBytes = lens _drrsProgressInMegaBytes (\ s a -> s{_drrsProgressInMegaBytes = a}); --- | The estimated total amount of data, in megabytes, on the cluster before --- the resize operation began. +-- | The estimated total amount of data, in megabytes, on the cluster before the resize operation began. drrsTotalResizeDataInMegaBytes :: Lens' DescribeResizeResponse (Maybe Integer) drrsTotalResizeDataInMegaBytes = lens _drrsTotalResizeDataInMegaBytes (\ s a -> s{_drrsTotalResizeDataInMegaBytes = a}); @@ -266,9 +246,7 @@ drrsTargetClusterType :: Lens' DescribeResizeResponse (Maybe Text) drrsTargetClusterType = lens _drrsTargetClusterType (\ s a -> s{_drrsTargetClusterType = a}); --- | The amount of seconds that have elapsed since the resize operation --- began. After the resize operation completes, this value shows the total --- actual time, in seconds, for the resize operation. +-- | The amount of seconds that have elapsed since the resize operation began. After the resize operation completes, this value shows the total actual time, in seconds, for the resize operation. drrsElapsedTimeInSeconds :: Lens' DescribeResizeResponse (Maybe Integer) drrsElapsedTimeInSeconds = lens _drrsElapsedTimeInSeconds (\ s a -> s{_drrsElapsedTimeInSeconds = a}); diff --git a/gen/Network/AWS/Redshift/DescribeSnapshotCopyGrants.hs b/gen/Network/AWS/Redshift/DescribeSnapshotCopyGrants.hs --- a/gen/Network/AWS/Redshift/DescribeSnapshotCopyGrants.hs +++ b/gen/Network/AWS/Redshift/DescribeSnapshotCopyGrants.hs @@ -18,12 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of snapshot copy grants owned by the AWS account in the --- destination region. +-- Returns a list of snapshot copy grants owned by the AWS account in the destination region. -- --- For more information about managing snapshot copy grants, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about managing snapshot copy grants, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.DescribeSnapshotCopyGrants ( -- * Creating a Request @@ -87,41 +84,21 @@ , _dscgsSnapshotCopyGrantName = Nothing } --- | A tag value or values for which you want to return all matching --- resources that are associated with the specified value or values. For --- example, suppose that you have resources tagged with values called --- 'admin' and 'test'. If you specify both of these tag values in the --- request, Amazon Redshift returns a response with all resources that have --- either or both of these tag values associated with them. +-- | A tag value or values for which you want to return all matching resources that are associated with the specified value or values. For example, suppose that you have resources tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with all resources that have either or both of these tag values associated with them. dscgsTagValues :: Lens' DescribeSnapshotCopyGrants [Text] dscgsTagValues = lens _dscgsTagValues (\ s a -> s{_dscgsTagValues = a}) . _Default . _Coerce; --- | A tag key or keys for which you want to return all matching resources --- that are associated with the specified key or keys. For example, suppose --- that you have resources tagged with keys called 'owner' and --- 'environment'. If you specify both of these tag keys in the request, --- Amazon Redshift returns a response with all resources that have either --- or both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching resources that are associated with the specified key or keys. For example, suppose that you have resources tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with all resources that have either or both of these tag keys associated with them. dscgsTagKeys :: Lens' DescribeSnapshotCopyGrants [Text] dscgsTagKeys = lens _dscgsTagKeys (\ s a -> s{_dscgsTagKeys = a}) . _Default . _Coerce; --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a 'DescribeSnapshotCopyGrant' --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a 'DescribeSnapshotCopyGrant' request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. -- --- Constraints: You can specify either the __SnapshotCopyGrantName__ --- parameter or the __Marker__ parameter, but not both. +-- Constraints: You can specify either the __SnapshotCopyGrantName__ parameter or the __Marker__ parameter, but not both. dscgsMarker :: Lens' DescribeSnapshotCopyGrants (Maybe Text) dscgsMarker = lens _dscgsMarker (\ s a -> s{_dscgsMarker = a}); --- | The maximum number of response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned marker value. +-- | The maximum number of response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned marker value. -- -- Default: '100' -- @@ -204,15 +181,9 @@ dscgrsSnapshotCopyGrants :: Lens' DescribeSnapshotCopyGrantsResponse [SnapshotCopyGrant] dscgrsSnapshotCopyGrants = lens _dscgrsSnapshotCopyGrants (\ s a -> s{_dscgrsSnapshotCopyGrants = a}) . _Default . _Coerce; --- | An optional parameter that specifies the starting point to return a set --- of response records. When the results of a 'DescribeSnapshotCopyGrant' --- request exceed the value specified in 'MaxRecords', AWS returns a value --- in the 'Marker' field of the response. You can retrieve the next set of --- response records by providing the returned marker value in the 'Marker' --- parameter and retrying the request. +-- | An optional parameter that specifies the starting point to return a set of response records. When the results of a 'DescribeSnapshotCopyGrant' request exceed the value specified in 'MaxRecords', AWS returns a value in the 'Marker' field of the response. You can retrieve the next set of response records by providing the returned marker value in the 'Marker' parameter and retrying the request. -- --- Constraints: You can specify either the __SnapshotCopyGrantName__ --- parameter or the __Marker__ parameter, but not both. +-- Constraints: You can specify either the __SnapshotCopyGrantName__ parameter or the __Marker__ parameter, but not both. dscgrsMarker :: Lens' DescribeSnapshotCopyGrantsResponse (Maybe Text) dscgrsMarker = lens _dscgrsMarker (\ s a -> s{_dscgrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeTableRestoreStatus.hs b/gen/Network/AWS/Redshift/DescribeTableRestoreStatus.hs --- a/gen/Network/AWS/Redshift/DescribeTableRestoreStatus.hs +++ b/gen/Network/AWS/Redshift/DescribeTableRestoreStatus.hs @@ -18,13 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Lists the status of one or more table restore requests made using the --- < RestoreTableFromClusterSnapshot> API action. If you don\'t specify a --- value for the 'TableRestoreRequestId' parameter, then --- 'DescribeTableRestoreStatus' returns the status of all table restore --- requests ordered by the date and time of the request in ascending order. --- Otherwise 'DescribeTableRestoreStatus' returns the status of the table --- specified by 'TableRestoreRequestId'. +-- Lists the status of one or more table restore requests made using the < RestoreTableFromClusterSnapshot> API action. If you don\'t specify a value for the 'TableRestoreRequestId' parameter, then 'DescribeTableRestoreStatus' returns the status of all table restore requests ordered by the date and time of the request in ascending order. Otherwise 'DescribeTableRestoreStatus' returns the status of the table specified by 'TableRestoreRequestId'. module Network.AWS.Redshift.DescribeTableRestoreStatus ( -- * Creating a Request @@ -81,10 +75,7 @@ , _dtrssMaxRecords = Nothing } --- | The identifier of the table restore request to return status for. If you --- don\'t specify a 'TableRestoreRequestId' value, then --- 'DescribeTableRestoreStatus' returns the status of all in-progress table --- restore requests. +-- | The identifier of the table restore request to return status for. If you don\'t specify a 'TableRestoreRequestId' value, then 'DescribeTableRestoreStatus' returns the status of all in-progress table restore requests. dtrssTableRestoreRequestId :: Lens' DescribeTableRestoreStatus (Maybe Text) dtrssTableRestoreRequestId = lens _dtrssTableRestoreRequestId (\ s a -> s{_dtrssTableRestoreRequestId = a}); @@ -92,17 +83,11 @@ dtrssClusterIdentifier :: Lens' DescribeTableRestoreStatus (Maybe Text) dtrssClusterIdentifier = lens _dtrssClusterIdentifier (\ s a -> s{_dtrssClusterIdentifier = a}); --- | An optional pagination token provided by a previous --- 'DescribeTableRestoreStatus' request. If this parameter is specified, --- the response includes only records beyond the marker, up to the value --- specified by the 'MaxRecords' parameter. +-- | An optional pagination token provided by a previous 'DescribeTableRestoreStatus' request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by the 'MaxRecords' parameter. dtrssMarker :: Lens' DescribeTableRestoreStatus (Maybe Text) dtrssMarker = lens _dtrssMarker (\ s a -> s{_dtrssMarker = a}); --- | The maximum number of records to include in the response. If more --- records exist than the specified 'MaxRecords' value, a pagination token --- called a marker is included in the response so that the remaining --- results can be retrieved. +-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. dtrssMaxRecords :: Lens' DescribeTableRestoreStatus (Maybe Int) dtrssMaxRecords = lens _dtrssMaxRecords (\ s a -> s{_dtrssMaxRecords = a}); @@ -168,8 +153,7 @@ , _dtrsrsResponseStatus = pResponseStatus_ } --- | A pagination token that can be used in a subsequent --- < DescribeTableRestoreStatus> request. +-- | A pagination token that can be used in a subsequent < DescribeTableRestoreStatus> request. dtrsrsMarker :: Lens' DescribeTableRestoreStatusResponse (Maybe Text) dtrsrsMarker = lens _dtrsrsMarker (\ s a -> s{_dtrsrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DescribeTags.hs b/gen/Network/AWS/Redshift/DescribeTags.hs --- a/gen/Network/AWS/Redshift/DescribeTags.hs +++ b/gen/Network/AWS/Redshift/DescribeTags.hs @@ -18,28 +18,17 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Returns a list of tags. You can return tags from a specific resource by --- specifying an ARN, or you can return all tags for a given type of --- resource, such as clusters, snapshots, and so on. +-- Returns a list of tags. You can return tags from a specific resource by specifying an ARN, or you can return all tags for a given type of resource, such as clusters, snapshots, and so on. -- -- The following are limitations for 'DescribeTags': -- --- - You cannot specify an ARN and a resource-type value together in the --- same request. --- - You cannot use the 'MaxRecords' and 'Marker' parameters together --- with the ARN parameter. --- - The 'MaxRecords' parameter can be a range from 10 to 50 results to --- return in a request. +-- - You cannot specify an ARN and a resource-type value together in the same request. +-- - You cannot use the 'MaxRecords' and 'Marker' parameters together with the ARN parameter. +-- - The 'MaxRecords' parameter can be a range from 10 to 50 results to return in a request. -- --- If you specify both tag keys and tag values in the same request, Amazon --- Redshift returns all resources that match any combination of the --- specified keys and values. For example, if you have 'owner' and --- 'environment' for tag keys, and 'admin' and 'test' for tag values, all --- resources that have any combination of those values are returned. +-- If you specify both tag keys and tag values in the same request, Amazon Redshift returns all resources that match any combination of the specified keys and values. For example, if you have 'owner' and 'environment' for tag keys, and 'admin' and 'test' for tag values, all resources that have any combination of those values are returned. -- --- If both tag keys and values are omitted from the request, resources are --- returned regardless of whether they have tag keys or values associated --- with them. +-- If both tag keys and values are omitted from the request, resources are returned regardless of whether they have tag keys or values associated with them. module Network.AWS.Redshift.DescribeTags ( -- * Creating a Request @@ -108,17 +97,11 @@ , _dtMaxRecords = Nothing } --- | A tag value or values for which you want to return all matching --- resources that are associated with the specified value or values. For --- example, suppose that you have resources tagged with values called --- 'admin' and 'test'. If you specify both of these tag values in the --- request, Amazon Redshift returns a response with all resources that have --- either or both of these tag values associated with them. +-- | A tag value or values for which you want to return all matching resources that are associated with the specified value or values. For example, suppose that you have resources tagged with values called 'admin' and 'test'. If you specify both of these tag values in the request, Amazon Redshift returns a response with all resources that have either or both of these tag values associated with them. dtTagValues :: Lens' DescribeTags [Text] dtTagValues = lens _dtTagValues (\ s a -> s{_dtTagValues = a}) . _Default . _Coerce; --- | The type of resource with which you want to view tags. Valid resource --- types are: +-- | The type of resource with which you want to view tags. Valid resource types are: -- -- - Cluster -- - CIDR\/IP @@ -131,41 +114,23 @@ -- - Parameter group -- - Snapshot copy grant -- --- For more information about Amazon Redshift resource types and --- constructing ARNs, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- For more information about Amazon Redshift resource types and constructing ARNs, go to in the Amazon Redshift Cluster Management Guide. dtResourceType :: Lens' DescribeTags (Maybe Text) dtResourceType = lens _dtResourceType (\ s a -> s{_dtResourceType = a}); --- | The Amazon Resource Name (ARN) for which you want to describe the tag or --- tags. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. +-- | The Amazon Resource Name (ARN) for which you want to describe the tag or tags. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. dtResourceName :: Lens' DescribeTags (Maybe Text) dtResourceName = lens _dtResourceName (\ s a -> s{_dtResourceName = a}); --- | A tag key or keys for which you want to return all matching resources --- that are associated with the specified key or keys. For example, suppose --- that you have resources tagged with keys called 'owner' and --- 'environment'. If you specify both of these tag keys in the request, --- Amazon Redshift returns a response with all resources that have either --- or both of these tag keys associated with them. +-- | A tag key or keys for which you want to return all matching resources that are associated with the specified key or keys. For example, suppose that you have resources tagged with keys called 'owner' and 'environment'. If you specify both of these tag keys in the request, Amazon Redshift returns a response with all resources that have either or both of these tag keys associated with them. dtTagKeys :: Lens' DescribeTags [Text] dtTagKeys = lens _dtTagKeys (\ s a -> s{_dtTagKeys = a}) . _Default . _Coerce; --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'marker' parameter and retrying the command. If the --- 'marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'marker' parameter and retrying the command. If the 'marker' field is empty, all response records have been retrieved for the request. dtMarker :: Lens' DescribeTags (Maybe Text) dtMarker = lens _dtMarker (\ s a -> s{_dtMarker = a}); --- | The maximum number or response records to return in each call. If the --- number of remaining response records exceeds the specified 'MaxRecords' --- value, a value is returned in a 'marker' field of the response. You can --- retrieve the next set of records by retrying the command with the --- returned 'marker' value. +-- | The maximum number or response records to return in each call. If the number of remaining response records exceeds the specified 'MaxRecords' value, a value is returned in a 'marker' field of the response. You can retrieve the next set of records by retrying the command with the returned 'marker' value. dtMaxRecords :: Lens' DescribeTags (Maybe Int) dtMaxRecords = lens _dtMaxRecords (\ s a -> s{_dtMaxRecords = a}); @@ -232,12 +197,7 @@ , _dtrsResponseStatus = pResponseStatus_ } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dtrsMarker :: Lens' DescribeTagsResponse (Maybe Text) dtrsMarker = lens _dtrsMarker (\ s a -> s{_dtrsMarker = a}); diff --git a/gen/Network/AWS/Redshift/DisableLogging.hs b/gen/Network/AWS/Redshift/DisableLogging.hs --- a/gen/Network/AWS/Redshift/DisableLogging.hs +++ b/gen/Network/AWS/Redshift/DisableLogging.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Stops logging information, such as queries and connection attempts, for --- the specified Amazon Redshift cluster. +-- Stops logging information, such as queries and connection attempts, for the specified Amazon Redshift cluster. module Network.AWS.Redshift.DisableLogging ( -- * Creating a Request diff --git a/gen/Network/AWS/Redshift/DisableSnapshotCopy.hs b/gen/Network/AWS/Redshift/DisableSnapshotCopy.hs --- a/gen/Network/AWS/Redshift/DisableSnapshotCopy.hs +++ b/gen/Network/AWS/Redshift/DisableSnapshotCopy.hs @@ -18,13 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Disables the automatic copying of snapshots from one region to another --- region for a specified cluster. +-- Disables the automatic copying of snapshots from one region to another region for a specified cluster. -- --- If your cluster and its snapshots are encrypted using a customer master --- key (CMK) from AWS KMS, use < DeleteSnapshotCopyGrant> to delete the --- grant that grants Amazon Redshift permission to the CMK in the --- destination region. +-- If your cluster and its snapshots are encrypted using a customer master key (CMK) from AWS KMS, use < DeleteSnapshotCopyGrant> to delete the grant that grants Amazon Redshift permission to the CMK in the destination region. module Network.AWS.Redshift.DisableSnapshotCopy ( -- * Creating a Request @@ -68,11 +64,9 @@ { _dscClusterIdentifier = pClusterIdentifier_ } --- | The unique identifier of the source cluster that you want to disable --- copying of snapshots to a destination region. +-- | The unique identifier of the source cluster that you want to disable copying of snapshots to a destination region. -- --- Constraints: Must be the valid name of an existing cluster that has --- cross-region snapshot copy enabled. +-- Constraints: Must be the valid name of an existing cluster that has cross-region snapshot copy enabled. dscClusterIdentifier :: Lens' DisableSnapshotCopy Text dscClusterIdentifier = lens _dscClusterIdentifier (\ s a -> s{_dscClusterIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/EnableLogging.hs b/gen/Network/AWS/Redshift/EnableLogging.hs --- a/gen/Network/AWS/Redshift/EnableLogging.hs +++ b/gen/Network/AWS/Redshift/EnableLogging.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Starts logging information, such as queries and connection attempts, for --- the specified Amazon Redshift cluster. +-- Starts logging information, such as queries and connection attempts, for the specified Amazon Redshift cluster. module Network.AWS.Redshift.EnableLogging ( -- * Creating a Request @@ -83,9 +82,7 @@ -- Constraints: -- -- - Cannot exceed 512 characters --- - Cannot contain spaces( ), double quotes (\"), single quotes (\'), a --- backslash (\\), or control characters. The hexadecimal codes for --- invalid characters are: +-- - Cannot contain spaces( ), double quotes (\"), single quotes (\'), a backslash (\\), or control characters. The hexadecimal codes for invalid characters are: -- - x00 to x20 -- - x22 -- - x27 diff --git a/gen/Network/AWS/Redshift/EnableSnapshotCopy.hs b/gen/Network/AWS/Redshift/EnableSnapshotCopy.hs --- a/gen/Network/AWS/Redshift/EnableSnapshotCopy.hs +++ b/gen/Network/AWS/Redshift/EnableSnapshotCopy.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Enables the automatic copy of snapshots from one region to another --- region for a specified cluster. +-- Enables the automatic copy of snapshots from one region to another region for a specified cluster. module Network.AWS.Redshift.EnableSnapshotCopy ( -- * Creating a Request @@ -79,8 +78,7 @@ , _escDestinationRegion = pDestinationRegion_ } --- | The number of days to retain automated snapshots in the destination --- region after they are copied from the source region. +-- | The number of days to retain automated snapshots in the destination region after they are copied from the source region. -- -- Default: 7. -- @@ -88,24 +86,19 @@ escRetentionPeriod :: Lens' EnableSnapshotCopy (Maybe Int) escRetentionPeriod = lens _escRetentionPeriod (\ s a -> s{_escRetentionPeriod = a}); --- | The name of the snapshot copy grant to use when snapshots of an AWS --- KMS-encrypted cluster are copied to the destination region. +-- | The name of the snapshot copy grant to use when snapshots of an AWS KMS-encrypted cluster are copied to the destination region. escSnapshotCopyGrantName :: Lens' EnableSnapshotCopy (Maybe Text) escSnapshotCopyGrantName = lens _escSnapshotCopyGrantName (\ s a -> s{_escSnapshotCopyGrantName = a}); -- | The unique identifier of the source cluster to copy snapshots from. -- --- Constraints: Must be the valid name of an existing cluster that does not --- already have cross-region snapshot copy enabled. +-- Constraints: Must be the valid name of an existing cluster that does not already have cross-region snapshot copy enabled. escClusterIdentifier :: Lens' EnableSnapshotCopy Text escClusterIdentifier = lens _escClusterIdentifier (\ s a -> s{_escClusterIdentifier = a}); -- | The destination region that you want to copy snapshots to. -- --- Constraints: Must be the name of a valid region. For more information, --- see --- --- in the Amazon Web Services General Reference. +-- Constraints: Must be the name of a valid region. For more information, see in the Amazon Web Services General Reference. escDestinationRegion :: Lens' EnableSnapshotCopy Text escDestinationRegion = lens _escDestinationRegion (\ s a -> s{_escDestinationRegion = a}); diff --git a/gen/Network/AWS/Redshift/ModifyCluster.hs b/gen/Network/AWS/Redshift/ModifyCluster.hs --- a/gen/Network/AWS/Redshift/ModifyCluster.hs +++ b/gen/Network/AWS/Redshift/ModifyCluster.hs @@ -18,20 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Modifies the settings for a cluster. For example, you can add another --- security or parameter group, update the preferred maintenance window, or --- change the master user password. Resetting a cluster password or --- modifying the security groups associated with a cluster do not need a --- reboot. However, modifying a parameter group requires a reboot for --- parameters to take effect. For more information about managing clusters, --- go to --- --- in the /Amazon Redshift Cluster Management Guide/ . +-- Modifies the settings for a cluster. For example, you can add another security or parameter group, update the preferred maintenance window, or change the master user password. Resetting a cluster password or modifying the security groups associated with a cluster do not need a reboot. However, modifying a parameter group requires a reboot for parameters to take effect. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ . -- --- You can also change node type and the number of nodes to scale up or --- down the cluster. When resizing a cluster, you must specify both the --- number of nodes and the node type even if one of the parameters does not --- change. +-- You can also change node type and the number of nodes to scale up or down the cluster. When resizing a cluster, you must specify both the number of nodes and the node type even if one of the parameters does not change. module Network.AWS.Redshift.ModifyCluster ( -- * Creating a Request @@ -155,15 +144,9 @@ , _mcClusterIdentifier = pClusterIdentifier_ } --- | The new password for the cluster master user. This change is --- asynchronously applied as soon as possible. Between the time of the --- request and the completion of the request, the 'MasterUserPassword' --- element exists in the 'PendingModifiedValues' element of the operation --- response. +-- | The new password for the cluster master user. This change is asynchronously applied as soon as possible. Between the time of the request and the completion of the request, the 'MasterUserPassword' element exists in the 'PendingModifiedValues' element of the operation response. -- --- Operations never return the password, so this operation provides a way --- to regain access to the master user account for a cluster if the --- password is lost. +-- Operations never return the password, so this operation provides a way to regain access to the master user account for a cluster if the password is lost. -- -- Default: Uses existing setting. -- @@ -173,27 +156,21 @@ -- - Must contain at least one uppercase letter. -- - Must contain at least one lowercase letter. -- - Must contain one number. --- - Can be any printable ASCII character (ASCII code 33 to 126) except --- \' (single quote), \" (double quote), \\, \/, \', or space. +-- - Can be any printable ASCII character (ASCII code 33 to 126) except \' (single quote), \" (double quote), \\, \/, \', or space. mcMasterUserPassword :: Lens' ModifyCluster (Maybe Text) mcMasterUserPassword = lens _mcMasterUserPassword (\ s a -> s{_mcMasterUserPassword = a}); --- | If 'true', the cluster can be accessed from a public network. Only --- clusters in VPCs can be set to be publicly available. +-- | If 'true', the cluster can be accessed from a public network. Only clusters in VPCs can be set to be publicly available. mcPubliclyAccessible :: Lens' ModifyCluster (Maybe Bool) mcPubliclyAccessible = lens _mcPubliclyAccessible (\ s a -> s{_mcPubliclyAccessible = a}); --- | Specifies the name of the HSM configuration that contains the --- information the Amazon Redshift cluster can use to retrieve and store --- keys in an HSM. +-- | Specifies the name of the HSM configuration that contains the information the Amazon Redshift cluster can use to retrieve and store keys in an HSM. mcHSMConfigurationIdentifier :: Lens' ModifyCluster (Maybe Text) mcHSMConfigurationIdentifier = lens _mcHSMConfigurationIdentifier (\ s a -> s{_mcHSMConfigurationIdentifier = a}); --- | A list of cluster security groups to be authorized on this cluster. This --- change is asynchronously applied as soon as possible. +-- | A list of cluster security groups to be authorized on this cluster. This change is asynchronously applied as soon as possible. -- --- Security groups currently associated with the cluster, and not in the --- list of groups to apply, will be revoked from the cluster. +-- Security groups currently associated with the cluster, and not in the list of groups to apply, will be revoked from the cluster. -- -- Constraints: -- @@ -203,14 +180,9 @@ mcClusterSecurityGroups :: Lens' ModifyCluster [Text] mcClusterSecurityGroups = lens _mcClusterSecurityGroups (\ s a -> s{_mcClusterSecurityGroups = a}) . _Default . _Coerce; --- | The number of days that automated snapshots are retained. If the value --- is 0, automated snapshots are disabled. Even if automated snapshots are --- disabled, you can still create manual snapshots when you want with --- < CreateClusterSnapshot>. +-- | The number of days that automated snapshots are retained. If the value is 0, automated snapshots are disabled. Even if automated snapshots are disabled, you can still create manual snapshots when you want with < CreateClusterSnapshot>. -- --- If you decrease the automated snapshot retention period from its current --- value, existing automated snapshots that fall outside of the new --- retention period will be immediately deleted. +-- If you decrease the automated snapshot retention period from its current value, existing automated snapshots that fall outside of the new retention period will be immediately deleted. -- -- Default: Uses existing setting. -- @@ -218,22 +190,13 @@ mcAutomatedSnapshotRetentionPeriod :: Lens' ModifyCluster (Maybe Int) mcAutomatedSnapshotRetentionPeriod = lens _mcAutomatedSnapshotRetentionPeriod (\ s a -> s{_mcAutomatedSnapshotRetentionPeriod = a}); --- | Specifies the name of the HSM client certificate the Amazon Redshift --- cluster uses to retrieve the data encryption keys stored in an HSM. +-- | Specifies the name of the HSM client certificate the Amazon Redshift cluster uses to retrieve the data encryption keys stored in an HSM. mcHSMClientCertificateIdentifier :: Lens' ModifyCluster (Maybe Text) mcHSMClientCertificateIdentifier = lens _mcHSMClientCertificateIdentifier (\ s a -> s{_mcHSMClientCertificateIdentifier = a}); --- | The new number of nodes of the cluster. If you specify a new number of --- nodes, you must also specify the node type parameter. +-- | The new number of nodes of the cluster. If you specify a new number of nodes, you must also specify the node type parameter. -- --- When you submit your request to resize a cluster, Amazon Redshift sets --- access permissions for the cluster to read-only. After Amazon Redshift --- provisions a new cluster according to your resize requirements, there --- will be a temporary outage while the old cluster is deleted and your --- connection is switched to the new cluster. When the new connection is --- complete, the original access permissions for the cluster are restored. --- You can use < DescribeResize> to track the progress of the resize --- request. +-- When you submit your request to resize a cluster, Amazon Redshift sets access permissions for the cluster to read-only. After Amazon Redshift provisions a new cluster according to your resize requirements, there will be a temporary outage while the old cluster is deleted and your connection is switched to the new cluster. When the new connection is complete, the original access permissions for the cluster are restored. You can use < DescribeResize> to track the progress of the resize request. -- -- Valid Values: Integer greater than '0'. mcNumberOfNodes :: Lens' ModifyCluster (Maybe Int) @@ -241,22 +204,13 @@ -- | The Elastic IP (EIP) address for the cluster. -- --- Constraints: The cluster must be provisioned in EC2-VPC and --- publicly-accessible through an Internet gateway. For more information --- about provisioning clusters in EC2-VPC, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- Constraints: The cluster must be provisioned in EC2-VPC and publicly-accessible through an Internet gateway. For more information about provisioning clusters in EC2-VPC, go to in the Amazon Redshift Cluster Management Guide. mcElasticIP :: Lens' ModifyCluster (Maybe Text) mcElasticIP = lens _mcElasticIP (\ s a -> s{_mcElasticIP = a}); --- | The weekly time range (in UTC) during which system maintenance can --- occur, if necessary. If system maintenance is necessary during the --- window, it may result in an outage. +-- | The weekly time range (in UTC) during which system maintenance can occur, if necessary. If system maintenance is necessary during the window, it may result in an outage. -- --- This maintenance window change is made immediately. If the new --- maintenance window indicates the current time, there must be at least --- 120 minutes between the current time and end of the window in order to --- ensure that pending changes are applied. +-- This maintenance window change is made immediately. If the new maintenance window indicates the current time, there must be at least 120 minutes between the current time and end of the window in order to ensure that pending changes are applied. -- -- Default: Uses existing setting. -- @@ -268,19 +222,13 @@ mcPreferredMaintenanceWindow :: Lens' ModifyCluster (Maybe Text) mcPreferredMaintenanceWindow = lens _mcPreferredMaintenanceWindow (\ s a -> s{_mcPreferredMaintenanceWindow = a}); --- | A list of virtual private cloud (VPC) security groups to be associated --- with the cluster. +-- | A list of virtual private cloud (VPC) security groups to be associated with the cluster. mcVPCSecurityGroupIds :: Lens' ModifyCluster [Text] mcVPCSecurityGroupIds = lens _mcVPCSecurityGroupIds (\ s a -> s{_mcVPCSecurityGroupIds = a}) . _Default . _Coerce; -- | The new cluster type. -- --- When you submit your cluster resize request, your existing cluster goes --- into a read-only mode. After Amazon Redshift provisions a new cluster --- based on your resize requirements, there will be outage for a period --- while the old cluster is deleted and your connection is switched to the --- new cluster. You can use < DescribeResize> to track the progress of the --- resize request. +-- When you submit your cluster resize request, your existing cluster goes into a read-only mode. After Amazon Redshift provisions a new cluster based on your resize requirements, there will be outage for a period while the old cluster is deleted and your connection is switched to the new cluster. You can use < DescribeResize> to track the progress of the resize request. -- -- Valid Values: ' multi-node | single-node ' mcClusterType :: Lens' ModifyCluster (Maybe Text) @@ -302,51 +250,31 @@ -- | The new version number of the Amazon Redshift engine to upgrade to. -- --- For major version upgrades, if a non-default cluster parameter group is --- currently in use, a new cluster parameter group in the cluster parameter --- group family for the new version must be specified. The new cluster --- parameter group can be the default for that cluster parameter group --- family. For more information about parameters and parameter groups, go --- to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For major version upgrades, if a non-default cluster parameter group is currently in use, a new cluster parameter group in the cluster parameter group family for the new version must be specified. The new cluster parameter group can be the default for that cluster parameter group family. For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. -- -- Example: '1.0' mcClusterVersion :: Lens' ModifyCluster (Maybe Text) mcClusterVersion = lens _mcClusterVersion (\ s a -> s{_mcClusterVersion = a}); --- | The new node type of the cluster. If you specify a new node type, you --- must also specify the number of nodes parameter. +-- | The new node type of the cluster. If you specify a new node type, you must also specify the number of nodes parameter. -- --- When you submit your request to resize a cluster, Amazon Redshift sets --- access permissions for the cluster to read-only. After Amazon Redshift --- provisions a new cluster according to your resize requirements, there --- will be a temporary outage while the old cluster is deleted and your --- connection is switched to the new cluster. When the new connection is --- complete, the original access permissions for the cluster are restored. --- You can use < DescribeResize> to track the progress of the resize --- request. +-- When you submit your request to resize a cluster, Amazon Redshift sets access permissions for the cluster to read-only. After Amazon Redshift provisions a new cluster according to your resize requirements, there will be a temporary outage while the old cluster is deleted and your connection is switched to the new cluster. When the new connection is complete, the original access permissions for the cluster are restored. You can use < DescribeResize> to track the progress of the resize request. -- --- Valid Values: ' ds1.xlarge' | 'ds1.8xlarge' | ' ds2.xlarge' | --- 'ds2.8xlarge' | 'dc1.large' | 'dc1.8xlarge'. +-- Valid Values: ' ds1.xlarge' | 'ds1.8xlarge' | ' ds2.xlarge' | 'ds2.8xlarge' | 'dc1.large' | 'dc1.8xlarge'. mcNodeType :: Lens' ModifyCluster (Maybe Text) mcNodeType = lens _mcNodeType (\ s a -> s{_mcNodeType = a}); --- | If 'true', major version upgrades will be applied automatically to the --- cluster during the maintenance window. +-- | If 'true', major version upgrades will be applied automatically to the cluster during the maintenance window. -- -- Default: 'false' mcAllowVersionUpgrade :: Lens' ModifyCluster (Maybe Bool) mcAllowVersionUpgrade = lens _mcAllowVersionUpgrade (\ s a -> s{_mcAllowVersionUpgrade = a}); --- | The name of the cluster parameter group to apply to this cluster. This --- change is applied only after the cluster is rebooted. To reboot a --- cluster use < RebootCluster>. +-- | The name of the cluster parameter group to apply to this cluster. This change is applied only after the cluster is rebooted. To reboot a cluster use < RebootCluster>. -- -- Default: Uses existing setting. -- --- Constraints: The cluster parameter group must be in the same parameter --- group family that matches the cluster version. +-- Constraints: The cluster parameter group must be in the same parameter group family that matches the cluster version. mcClusterParameterGroupName :: Lens' ModifyCluster (Maybe Text) mcClusterParameterGroupName = lens _mcClusterParameterGroupName (\ s a -> s{_mcClusterParameterGroupName = a}); diff --git a/gen/Network/AWS/Redshift/ModifyClusterIAMRoles.hs b/gen/Network/AWS/Redshift/ModifyClusterIAMRoles.hs --- a/gen/Network/AWS/Redshift/ModifyClusterIAMRoles.hs +++ b/gen/Network/AWS/Redshift/ModifyClusterIAMRoles.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Modifies the list of AWS Identity and Access Management (IAM) roles that --- can be used by the cluster to access other AWS services. +-- Modifies the list of AWS Identity and Access Management (IAM) roles that can be used by the cluster to access other AWS services. -- -- A cluster can have up to 10 IAM roles associated at any time. module Network.AWS.Redshift.ModifyClusterIAMRoles @@ -75,20 +74,15 @@ , _mcirClusterIdentifier = pClusterIdentifier_ } --- | Zero or more IAM roles (in their ARN format) to disassociate from the --- cluster. You can disassociate up to 10 IAM roles from a single cluster --- in a single request. +-- | Zero or more IAM roles (in their ARN format) to disassociate from the cluster. You can disassociate up to 10 IAM roles from a single cluster in a single request. mcirRemoveIAMRoles :: Lens' ModifyClusterIAMRoles [Text] mcirRemoveIAMRoles = lens _mcirRemoveIAMRoles (\ s a -> s{_mcirRemoveIAMRoles = a}) . _Default . _Coerce; --- | Zero or more IAM roles (in their ARN format) to associate with the --- cluster. You can associate up to 10 IAM roles with a single cluster in a --- single request. +-- | Zero or more IAM roles (in their ARN format) to associate with the cluster. You can associate up to 10 IAM roles with a single cluster in a single request. mcirAddIAMRoles :: Lens' ModifyClusterIAMRoles [Text] mcirAddIAMRoles = lens _mcirAddIAMRoles (\ s a -> s{_mcirAddIAMRoles = a}) . _Default . _Coerce; --- | The unique identifier of the cluster for which you want to associate or --- disassociate IAM roles. +-- | The unique identifier of the cluster for which you want to associate or disassociate IAM roles. mcirClusterIdentifier :: Lens' ModifyClusterIAMRoles Text mcirClusterIdentifier = lens _mcirClusterIdentifier (\ s a -> s{_mcirClusterIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/ModifyClusterParameterGroup.hs b/gen/Network/AWS/Redshift/ModifyClusterParameterGroup.hs --- a/gen/Network/AWS/Redshift/ModifyClusterParameterGroup.hs +++ b/gen/Network/AWS/Redshift/ModifyClusterParameterGroup.hs @@ -20,9 +20,7 @@ -- -- Modifies the parameters of a parameter group. -- --- For more information about parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.ModifyClusterParameterGroup ( -- * Creating a Request @@ -75,15 +73,11 @@ mcpgParameterGroupName :: Lens' ModifyClusterParameterGroup Text mcpgParameterGroupName = lens _mcpgParameterGroupName (\ s a -> s{_mcpgParameterGroupName = a}); --- | An array of parameters to be modified. A maximum of 20 parameters can be --- modified in a single request. +-- | An array of parameters to be modified. A maximum of 20 parameters can be modified in a single request. -- --- For each parameter to be modified, you must supply at least the --- parameter name and parameter value; other name-value pairs of the --- parameter are optional. +-- For each parameter to be modified, you must supply at least the parameter name and parameter value; other name-value pairs of the parameter are optional. -- --- For the workload management (WLM) configuration, you must supply all the --- name-value pairs in the wlm_json_configuration parameter. +-- For the workload management (WLM) configuration, you must supply all the name-value pairs in the wlm_json_configuration parameter. mcpgParameters :: Lens' ModifyClusterParameterGroup [Parameter] mcpgParameters = lens _mcpgParameters (\ s a -> s{_mcpgParameters = a}) . _Coerce; diff --git a/gen/Network/AWS/Redshift/ModifyClusterSubnetGroup.hs b/gen/Network/AWS/Redshift/ModifyClusterSubnetGroup.hs --- a/gen/Network/AWS/Redshift/ModifyClusterSubnetGroup.hs +++ b/gen/Network/AWS/Redshift/ModifyClusterSubnetGroup.hs @@ -18,9 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Modifies a cluster subnet group to include the specified list of VPC --- subnets. The operation replaces the existing list of subnets with the --- new list of subnets. +-- Modifies a cluster subnet group to include the specified list of VPC subnets. The operation replaces the existing list of subnets with the new list of subnets. module Network.AWS.Redshift.ModifyClusterSubnetGroup ( -- * Creating a Request @@ -82,8 +80,7 @@ mcsgClusterSubnetGroupName :: Lens' ModifyClusterSubnetGroup Text mcsgClusterSubnetGroupName = lens _mcsgClusterSubnetGroupName (\ s a -> s{_mcsgClusterSubnetGroupName = a}); --- | An array of VPC subnet IDs. A maximum of 20 subnets can be modified in a --- single request. +-- | An array of VPC subnet IDs. A maximum of 20 subnets can be modified in a single request. mcsgSubnetIds :: Lens' ModifyClusterSubnetGroup [Text] mcsgSubnetIds = lens _mcsgSubnetIds (\ s a -> s{_mcsgSubnetIds = a}) . _Coerce; diff --git a/gen/Network/AWS/Redshift/ModifyEventSubscription.hs b/gen/Network/AWS/Redshift/ModifyEventSubscription.hs --- a/gen/Network/AWS/Redshift/ModifyEventSubscription.hs +++ b/gen/Network/AWS/Redshift/ModifyEventSubscription.hs @@ -92,46 +92,33 @@ , _mesSubscriptionName = pSubscriptionName_ } --- | The Amazon Resource Name (ARN) of the SNS topic to be used by the event --- notification subscription. +-- | The Amazon Resource Name (ARN) of the SNS topic to be used by the event notification subscription. mesSNSTopicARN :: Lens' ModifyEventSubscription (Maybe Text) mesSNSTopicARN = lens _mesSNSTopicARN (\ s a -> s{_mesSNSTopicARN = a}); --- | A Boolean value indicating if the subscription is enabled. 'true' --- indicates the subscription is enabled +-- | A Boolean value indicating if the subscription is enabled. 'true' indicates the subscription is enabled mesEnabled :: Lens' ModifyEventSubscription (Maybe Bool) mesEnabled = lens _mesEnabled (\ s a -> s{_mesEnabled = a}); --- | The type of source that will be generating the events. For example, if --- you want to be notified of events generated by a cluster, you would set --- this parameter to cluster. If this value is not specified, events are --- returned for all Amazon Redshift objects in your AWS account. You must --- specify a source type in order to specify source IDs. +-- | The type of source that will be generating the events. For example, if you want to be notified of events generated by a cluster, you would set this parameter to cluster. If this value is not specified, events are returned for all Amazon Redshift objects in your AWS account. You must specify a source type in order to specify source IDs. -- --- Valid values: cluster, cluster-parameter-group, cluster-security-group, --- and cluster-snapshot. +-- Valid values: cluster, cluster-parameter-group, cluster-security-group, and cluster-snapshot. mesSourceType :: Lens' ModifyEventSubscription (Maybe Text) mesSourceType = lens _mesSourceType (\ s a -> s{_mesSourceType = a}); --- | Specifies the Amazon Redshift event severity to be published by the --- event notification subscription. +-- | Specifies the Amazon Redshift event severity to be published by the event notification subscription. -- -- Values: ERROR, INFO mesSeverity :: Lens' ModifyEventSubscription (Maybe Text) mesSeverity = lens _mesSeverity (\ s a -> s{_mesSeverity = a}); --- | Specifies the Amazon Redshift event categories to be published by the --- event notification subscription. +-- | Specifies the Amazon Redshift event categories to be published by the event notification subscription. -- -- Values: Configuration, Management, Monitoring, Security mesEventCategories :: Lens' ModifyEventSubscription [Text] mesEventCategories = lens _mesEventCategories (\ s a -> s{_mesEventCategories = a}) . _Default . _Coerce; --- | A list of one or more identifiers of Amazon Redshift source objects. All --- of the objects must be of the same type as was specified in the source --- type parameter. The event subscription will return only events generated --- by the specified objects. If not specified, then events are returned for --- all objects within the source type specified. +-- | A list of one or more identifiers of Amazon Redshift source objects. All of the objects must be of the same type as was specified in the source type parameter. The event subscription will return only events generated by the specified objects. If not specified, then events are returned for all objects within the source type specified. -- -- Example: my-cluster-1, my-cluster-2 -- @@ -139,8 +126,7 @@ mesSourceIds :: Lens' ModifyEventSubscription [Text] mesSourceIds = lens _mesSourceIds (\ s a -> s{_mesSourceIds = a}) . _Default . _Coerce; --- | The name of the modified Amazon Redshift event notification --- subscription. +-- | The name of the modified Amazon Redshift event notification subscription. mesSubscriptionName :: Lens' ModifyEventSubscription Text mesSubscriptionName = lens _mesSubscriptionName (\ s a -> s{_mesSubscriptionName = a}); diff --git a/gen/Network/AWS/Redshift/ModifySnapshotCopyRetentionPeriod.hs b/gen/Network/AWS/Redshift/ModifySnapshotCopyRetentionPeriod.hs --- a/gen/Network/AWS/Redshift/ModifySnapshotCopyRetentionPeriod.hs +++ b/gen/Network/AWS/Redshift/ModifySnapshotCopyRetentionPeriod.hs @@ -18,8 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Modifies the number of days to retain automated snapshots in the --- destination region after they are copied from the source region. +-- Modifies the number of days to retain automated snapshots in the destination region after they are copied from the source region. module Network.AWS.Redshift.ModifySnapshotCopyRetentionPeriod ( -- * Creating a Request @@ -69,22 +68,15 @@ , _mscrpRetentionPeriod = pRetentionPeriod_ } --- | The unique identifier of the cluster for which you want to change the --- retention period for automated snapshots that are copied to a --- destination region. +-- | The unique identifier of the cluster for which you want to change the retention period for automated snapshots that are copied to a destination region. -- --- Constraints: Must be the valid name of an existing cluster that has --- cross-region snapshot copy enabled. +-- Constraints: Must be the valid name of an existing cluster that has cross-region snapshot copy enabled. mscrpClusterIdentifier :: Lens' ModifySnapshotCopyRetentionPeriod Text mscrpClusterIdentifier = lens _mscrpClusterIdentifier (\ s a -> s{_mscrpClusterIdentifier = a}); --- | The number of days to retain automated snapshots in the destination --- region after they are copied from the source region. +-- | The number of days to retain automated snapshots in the destination region after they are copied from the source region. -- --- If you decrease the retention period for automated snapshots that are --- copied to a destination region, Amazon Redshift will delete any existing --- automated snapshots that were copied to the destination region and that --- fall outside of the new retention period. +-- If you decrease the retention period for automated snapshots that are copied to a destination region, Amazon Redshift will delete any existing automated snapshots that were copied to the destination region and that fall outside of the new retention period. -- -- Constraints: Must be at least 1 and no more than 35. mscrpRetentionPeriod :: Lens' ModifySnapshotCopyRetentionPeriod Int diff --git a/gen/Network/AWS/Redshift/PurchaseReservedNodeOffering.hs b/gen/Network/AWS/Redshift/PurchaseReservedNodeOffering.hs --- a/gen/Network/AWS/Redshift/PurchaseReservedNodeOffering.hs +++ b/gen/Network/AWS/Redshift/PurchaseReservedNodeOffering.hs @@ -18,16 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Allows you to purchase reserved nodes. Amazon Redshift offers a --- predefined set of reserved node offerings. You can purchase one or more --- of the offerings. You can call the < DescribeReservedNodeOfferings> API --- to obtain the available reserved node offerings. You can call this API --- by providing a specific reserved node offering and the number of nodes --- you want to reserve. +-- Allows you to purchase reserved nodes. Amazon Redshift offers a predefined set of reserved node offerings. You can purchase one or more of the offerings. You can call the < DescribeReservedNodeOfferings> API to obtain the available reserved node offerings. You can call this API by providing a specific reserved node offering and the number of nodes you want to reserve. -- --- For more information about reserved node offerings, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about reserved node offerings, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.PurchaseReservedNodeOffering ( -- * Creating a Request @@ -82,8 +75,7 @@ prnoNodeCount :: Lens' PurchaseReservedNodeOffering (Maybe Int) prnoNodeCount = lens _prnoNodeCount (\ s a -> s{_prnoNodeCount = a}); --- | The unique identifier of the reserved node offering you want to --- purchase. +-- | The unique identifier of the reserved node offering you want to purchase. prnoReservedNodeOfferingId :: Lens' PurchaseReservedNodeOffering Text prnoReservedNodeOfferingId = lens _prnoReservedNodeOfferingId (\ s a -> s{_prnoReservedNodeOfferingId = a}); diff --git a/gen/Network/AWS/Redshift/RebootCluster.hs b/gen/Network/AWS/Redshift/RebootCluster.hs --- a/gen/Network/AWS/Redshift/RebootCluster.hs +++ b/gen/Network/AWS/Redshift/RebootCluster.hs @@ -18,14 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Reboots a cluster. This action is taken as soon as possible. It results --- in a momentary outage to the cluster, during which the cluster status is --- set to 'rebooting'. A cluster event is created when the reboot is --- completed. Any pending cluster modifications (see < ModifyCluster>) are --- applied at this reboot. For more information about managing clusters, go --- to --- --- in the /Amazon Redshift Cluster Management Guide/ +-- Reboots a cluster. This action is taken as soon as possible. It results in a momentary outage to the cluster, during which the cluster status is set to 'rebooting'. A cluster event is created when the reboot is completed. Any pending cluster modifications (see < ModifyCluster>) are applied at this reboot. For more information about managing clusters, go to in the /Amazon Redshift Cluster Management Guide/ module Network.AWS.Redshift.RebootCluster ( -- * Creating a Request diff --git a/gen/Network/AWS/Redshift/ResetClusterParameterGroup.hs b/gen/Network/AWS/Redshift/ResetClusterParameterGroup.hs --- a/gen/Network/AWS/Redshift/ResetClusterParameterGroup.hs +++ b/gen/Network/AWS/Redshift/ResetClusterParameterGroup.hs @@ -18,11 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Sets one or more parameters of the specified parameter group to their --- default values and sets the source values of the parameters to --- \"engine-default\". To reset the entire parameter group specify the --- /ResetAllParameters/ parameter. For parameter changes to take effect you --- must reboot any associated clusters. +-- Sets one or more parameters of the specified parameter group to their default values and sets the source values of the parameters to \"engine-default\". To reset the entire parameter group specify the /ResetAllParameters/ parameter. For parameter changes to take effect you must reboot any associated clusters. module Network.AWS.Redshift.ResetClusterParameterGroup ( -- * Creating a Request @@ -76,18 +72,15 @@ , _rcpgParameterGroupName = pParameterGroupName_ } --- | If 'true', all parameters in the specified parameter group will be reset --- to their default values. +-- | If 'true', all parameters in the specified parameter group will be reset to their default values. -- -- Default: 'true' rcpgResetAllParameters :: Lens' ResetClusterParameterGroup (Maybe Bool) rcpgResetAllParameters = lens _rcpgResetAllParameters (\ s a -> s{_rcpgResetAllParameters = a}); --- | An array of names of parameters to be reset. If /ResetAllParameters/ --- option is not used, then at least one parameter name must be supplied. +-- | An array of names of parameters to be reset. If /ResetAllParameters/ option is not used, then at least one parameter name must be supplied. -- --- Constraints: A maximum of 20 parameters can be reset in a single --- request. +-- Constraints: A maximum of 20 parameters can be reset in a single request. rcpgParameters :: Lens' ResetClusterParameterGroup [Parameter] rcpgParameters = lens _rcpgParameters (\ s a -> s{_rcpgParameters = a}) . _Default . _Coerce; diff --git a/gen/Network/AWS/Redshift/RestoreFromClusterSnapshot.hs b/gen/Network/AWS/Redshift/RestoreFromClusterSnapshot.hs --- a/gen/Network/AWS/Redshift/RestoreFromClusterSnapshot.hs +++ b/gen/Network/AWS/Redshift/RestoreFromClusterSnapshot.hs @@ -18,22 +18,11 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a new cluster from a snapshot. By default, Amazon Redshift --- creates the resulting cluster with the same configuration as the --- original cluster from which the snapshot was created, except that the --- new cluster is created with the default cluster security and parameter --- groups. After Amazon Redshift creates the cluster, you can use the --- < ModifyCluster> API to associate a different security group and --- different parameter group with the restored cluster. If you are using a --- DS node type, you can also choose to change to another DS node type of --- the same size during restore. +-- Creates a new cluster from a snapshot. By default, Amazon Redshift creates the resulting cluster with the same configuration as the original cluster from which the snapshot was created, except that the new cluster is created with the default cluster security and parameter groups. After Amazon Redshift creates the cluster, you can use the < ModifyCluster> API to associate a different security group and different parameter group with the restored cluster. If you are using a DS node type, you can also choose to change to another DS node type of the same size during restore. -- --- If you restore a cluster into a VPC, you must provide a cluster subnet --- group where you want the cluster restored. +-- If you restore a cluster into a VPC, you must provide a cluster subnet group where you want the cluster restored. -- --- For more information about working with snapshots, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about working with snapshots, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.RestoreFromClusterSnapshot ( -- * Creating a Request @@ -186,16 +175,11 @@ rfcsPubliclyAccessible :: Lens' RestoreFromClusterSnapshot (Maybe Bool) rfcsPubliclyAccessible = lens _rfcsPubliclyAccessible (\ s a -> s{_rfcsPubliclyAccessible = a}); --- | The name of the cluster the source snapshot was created from. This --- parameter is required if your IAM user has a policy containing a --- snapshot resource element that specifies anything other than * for the --- cluster name. +-- | The name of the cluster the source snapshot was created from. This parameter is required if your IAM user has a policy containing a snapshot resource element that specifies anything other than * for the cluster name. rfcsSnapshotClusterIdentifier :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsSnapshotClusterIdentifier = lens _rfcsSnapshotClusterIdentifier (\ s a -> s{_rfcsSnapshotClusterIdentifier = a}); --- | Specifies the name of the HSM configuration that contains the --- information the Amazon Redshift cluster can use to retrieve and store --- keys in an HSM. +-- | Specifies the name of the HSM configuration that contains the information the Amazon Redshift cluster can use to retrieve and store keys in an HSM. rfcsHSMConfigurationIdentifier :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsHSMConfigurationIdentifier = lens _rfcsHSMConfigurationIdentifier (\ s a -> s{_rfcsHSMConfigurationIdentifier = a}); @@ -207,13 +191,9 @@ rfcsClusterSecurityGroups :: Lens' RestoreFromClusterSnapshot [Text] rfcsClusterSecurityGroups = lens _rfcsClusterSecurityGroups (\ s a -> s{_rfcsClusterSecurityGroups = a}) . _Default . _Coerce; --- | The number of days that automated snapshots are retained. If the value --- is 0, automated snapshots are disabled. Even if automated snapshots are --- disabled, you can still create manual snapshots when you want with --- < CreateClusterSnapshot>. +-- | The number of days that automated snapshots are retained. If the value is 0, automated snapshots are disabled. Even if automated snapshots are disabled, you can still create manual snapshots when you want with < CreateClusterSnapshot>. -- --- Default: The value selected for the cluster from which the snapshot was --- taken. +-- Default: The value selected for the cluster from which the snapshot was taken. -- -- Constraints: Must be a value from 0 to 35. rfcsAutomatedSnapshotRetentionPeriod :: Lens' RestoreFromClusterSnapshot (Maybe Int) @@ -221,13 +201,11 @@ -- | The name of the subnet group where you want to cluster restored. -- --- A snapshot of cluster in VPC can be restored only in VPC. Therefore, you --- must provide subnet group name where you want the cluster restored. +-- A snapshot of cluster in VPC can be restored only in VPC. Therefore, you must provide subnet group name where you want the cluster restored. rfcsClusterSubnetGroupName :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsClusterSubnetGroupName = lens _rfcsClusterSubnetGroupName (\ s a -> s{_rfcsClusterSubnetGroupName = a}); --- | Specifies the name of the HSM client certificate the Amazon Redshift --- cluster uses to retrieve the data encryption keys stored in an HSM. +-- | Specifies the name of the HSM client certificate the Amazon Redshift cluster uses to retrieve the data encryption keys stored in an HSM. rfcsHSMClientCertificateIdentifier :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsHSMClientCertificateIdentifier = lens _rfcsHSMClientCertificateIdentifier (\ s a -> s{_rfcsHSMClientCertificateIdentifier = a}); @@ -235,15 +213,11 @@ rfcsElasticIP :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsElasticIP = lens _rfcsElasticIP (\ s a -> s{_rfcsElasticIP = a}); --- | The weekly time range (in UTC) during which automated cluster --- maintenance can occur. +-- | The weekly time range (in UTC) during which automated cluster maintenance can occur. -- -- Format: 'ddd:hh24:mi-ddd:hh24:mi' -- --- Default: The value selected for the cluster from which the snapshot was --- taken. For more information about the time blocks for each region, see --- --- in Amazon Redshift Cluster Management Guide. +-- Default: The value selected for the cluster from which the snapshot was taken. For more information about the time blocks for each region, see in Amazon Redshift Cluster Management Guide. -- -- Valid Days: Mon | Tue | Wed | Thu | Fri | Sat | Sun -- @@ -251,9 +225,7 @@ rfcsPreferredMaintenanceWindow :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsPreferredMaintenanceWindow = lens _rfcsPreferredMaintenanceWindow (\ s a -> s{_rfcsPreferredMaintenanceWindow = a}); --- | The AWS Key Management Service (KMS) key ID of the encryption key that --- you want to use to encrypt data in the cluster that you restore from a --- shared snapshot. +-- | The AWS Key Management Service (KMS) key ID of the encryption key that you want to use to encrypt data in the cluster that you restore from a shared snapshot. rfcsKMSKeyId :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsKMSKeyId = lens _rfcsKMSKeyId (\ s a -> s{_rfcsKMSKeyId = a}); @@ -265,8 +237,7 @@ rfcsAvailabilityZone :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsAvailabilityZone = lens _rfcsAvailabilityZone (\ s a -> s{_rfcsAvailabilityZone = a}); --- | A list of Virtual Private Cloud (VPC) security groups to be associated --- with the cluster. +-- | A list of Virtual Private Cloud (VPC) security groups to be associated with the cluster. -- -- Default: The default VPC security group is associated with the cluster. -- @@ -274,38 +245,23 @@ rfcsVPCSecurityGroupIds :: Lens' RestoreFromClusterSnapshot [Text] rfcsVPCSecurityGroupIds = lens _rfcsVPCSecurityGroupIds (\ s a -> s{_rfcsVPCSecurityGroupIds = a}) . _Default . _Coerce; --- | A list of AWS Identity and Access Management (IAM) roles that can be --- used by the cluster to access other AWS services. You must supply the --- IAM roles in their Amazon Resource Name (ARN) format. You can supply up --- to 10 IAM roles in a single request. +-- | A list of AWS Identity and Access Management (IAM) roles that can be used by the cluster to access other AWS services. You must supply the IAM roles in their Amazon Resource Name (ARN) format. You can supply up to 10 IAM roles in a single request. -- -- A cluster can have up to 10 IAM roles associated at any time. rfcsIAMRoles :: Lens' RestoreFromClusterSnapshot [Text] rfcsIAMRoles = lens _rfcsIAMRoles (\ s a -> s{_rfcsIAMRoles = a}) . _Default . _Coerce; --- | The AWS customer account used to create or copy the snapshot. Required --- if you are restoring a snapshot you do not own, optional if you own the --- snapshot. +-- | The AWS customer account used to create or copy the snapshot. Required if you are restoring a snapshot you do not own, optional if you own the snapshot. rfcsOwnerAccount :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsOwnerAccount = lens _rfcsOwnerAccount (\ s a -> s{_rfcsOwnerAccount = a}); -- | The node type that the restored cluster will be provisioned with. -- --- Default: The node type of the cluster from which the snapshot was taken. --- You can modify this if you are using any DS node type. In that case, you --- can choose to restore into another DS node type of the same size. For --- example, you can restore ds1.8xlarge into ds2.8xlarge, or ds2.xlarge --- into ds1.xlarge. If you have a DC instance type, you must restore into --- that same instance type and size. In other words, you can only restore a --- dc1.large instance type into another dc1.large instance type. For more --- information about node types, see --- --- in the /Amazon Redshift Cluster Management Guide/ +-- Default: The node type of the cluster from which the snapshot was taken. You can modify this if you are using any DS node type. In that case, you can choose to restore into another DS node type of the same size. For example, you can restore ds1.8xlarge into ds2.8xlarge, or ds2.xlarge into ds1.xlarge. If you have a DC instance type, you must restore into that same instance type and size. In other words, you can only restore a dc1.large instance type into another dc1.large instance type. For more information about node types, see in the /Amazon Redshift Cluster Management Guide/ rfcsNodeType :: Lens' RestoreFromClusterSnapshot (Maybe Text) rfcsNodeType = lens _rfcsNodeType (\ s a -> s{_rfcsNodeType = a}); --- | If 'true', major version upgrades can be applied during the maintenance --- window to the Amazon Redshift engine that is running on the cluster. +-- | If 'true', major version upgrades can be applied during the maintenance window to the Amazon Redshift engine that is running on the cluster. -- -- Default: 'true' rfcsAllowVersionUpgrade :: Lens' RestoreFromClusterSnapshot (Maybe Bool) @@ -313,9 +269,7 @@ -- | The name of the parameter group to be associated with this cluster. -- --- Default: The default Amazon Redshift cluster parameter group. For --- information about the default parameter group, go to --- . +-- Default: The default Amazon Redshift cluster parameter group. For information about the default parameter group, go to . -- -- Constraints: -- @@ -333,8 +287,7 @@ rfcsPort :: Lens' RestoreFromClusterSnapshot (Maybe Int) rfcsPort = lens _rfcsPort (\ s a -> s{_rfcsPort = a}); --- | The identifier of the cluster that will be created from restoring the --- snapshot. +-- | The identifier of the cluster that will be created from restoring the snapshot. -- -- Constraints: -- @@ -346,8 +299,7 @@ rfcsClusterIdentifier :: Lens' RestoreFromClusterSnapshot Text rfcsClusterIdentifier = lens _rfcsClusterIdentifier (\ s a -> s{_rfcsClusterIdentifier = a}); --- | The name of the snapshot from which to create the new cluster. This --- parameter isn\'t case sensitive. +-- | The name of the snapshot from which to create the new cluster. This parameter isn\'t case sensitive. -- -- Example: 'my-snapshot-id' rfcsSnapshotIdentifier :: Lens' RestoreFromClusterSnapshot Text diff --git a/gen/Network/AWS/Redshift/RestoreTableFromClusterSnapshot.hs b/gen/Network/AWS/Redshift/RestoreTableFromClusterSnapshot.hs --- a/gen/Network/AWS/Redshift/RestoreTableFromClusterSnapshot.hs +++ b/gen/Network/AWS/Redshift/RestoreTableFromClusterSnapshot.hs @@ -18,20 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Creates a new table from a table in an Amazon Redshift cluster snapshot. --- You must create the new table within the Amazon Redshift cluster that --- the snapshot was taken from. +-- Creates a new table from a table in an Amazon Redshift cluster snapshot. You must create the new table within the Amazon Redshift cluster that the snapshot was taken from. -- --- You cannot use 'RestoreTableFromClusterSnapshot' to restore a table with --- the same name as an existing table in an Amazon Redshift cluster. That --- is, you cannot overwrite an existing table in a cluster with a restored --- table. If you want to replace your original table with a new, restored --- table, then rename or drop your original table before you call --- 'RestoreTableFromClusterSnapshot'. When you have renamed your original --- table, then you can pass the original name of the table as the --- 'NewTableName' parameter value in the call to --- 'RestoreTableFromClusterSnapshot'. This way, you can replace the --- original table with the table created from the snapshot. +-- You cannot use 'RestoreTableFromClusterSnapshot' to restore a table with the same name as an existing table in an Amazon Redshift cluster. That is, you cannot overwrite an existing table in a cluster with a restored table. If you want to replace your original table with a new, restored table, then rename or drop your original table before you call 'RestoreTableFromClusterSnapshot'. When you have renamed your original table, then you can pass the original name of the table as the 'NewTableName' parameter value in the call to 'RestoreTableFromClusterSnapshot'. This way, you can replace the original table with the table created from the snapshot. module Network.AWS.Redshift.RestoreTableFromClusterSnapshot ( -- * Creating a Request @@ -120,9 +109,7 @@ rtfcsTargetDatabaseName :: Lens' RestoreTableFromClusterSnapshot (Maybe Text) rtfcsTargetDatabaseName = lens _rtfcsTargetDatabaseName (\ s a -> s{_rtfcsTargetDatabaseName = a}); --- | The name of the source schema that contains the table to restore from. --- If you do not specify a 'SourceSchemaName' value, the default is --- 'public'. +-- | The name of the source schema that contains the table to restore from. If you do not specify a 'SourceSchemaName' value, the default is 'public'. rtfcsSourceSchemaName :: Lens' RestoreTableFromClusterSnapshot (Maybe Text) rtfcsSourceSchemaName = lens _rtfcsSourceSchemaName (\ s a -> s{_rtfcsSourceSchemaName = a}); @@ -130,9 +117,7 @@ rtfcsClusterIdentifier :: Lens' RestoreTableFromClusterSnapshot Text rtfcsClusterIdentifier = lens _rtfcsClusterIdentifier (\ s a -> s{_rtfcsClusterIdentifier = a}); --- | The identifier of the snapshot to restore the table from. This snapshot --- must have been created from the Amazon Redshift cluster specified by the --- 'ClusterIdentifier' parameter. +-- | The identifier of the snapshot to restore the table from. This snapshot must have been created from the Amazon Redshift cluster specified by the 'ClusterIdentifier' parameter. rtfcsSnapshotIdentifier :: Lens' RestoreTableFromClusterSnapshot Text rtfcsSnapshotIdentifier = lens _rtfcsSnapshotIdentifier (\ s a -> s{_rtfcsSnapshotIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/RevokeClusterSecurityGroupIngress.hs b/gen/Network/AWS/Redshift/RevokeClusterSecurityGroupIngress.hs --- a/gen/Network/AWS/Redshift/RevokeClusterSecurityGroupIngress.hs +++ b/gen/Network/AWS/Redshift/RevokeClusterSecurityGroupIngress.hs @@ -18,12 +18,7 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Revokes an ingress rule in an Amazon Redshift security group for a --- previously authorized IP range or Amazon EC2 security group. To add an --- ingress rule, see < AuthorizeClusterSecurityGroupIngress>. For --- information about managing security groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- Revokes an ingress rule in an Amazon Redshift security group for a previously authorized IP range or Amazon EC2 security group. To add an ingress rule, see < AuthorizeClusterSecurityGroupIngress>. For information about managing security groups, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.RevokeClusterSecurityGroupIngress ( -- * Creating a Request @@ -82,26 +77,17 @@ , _rcsgiClusterSecurityGroupName = pClusterSecurityGroupName_ } --- | The AWS account number of the owner of the security group specified in --- the 'EC2SecurityGroupName' parameter. The AWS access key ID is not an --- acceptable value. If 'EC2SecurityGroupOwnerId' is specified, --- 'EC2SecurityGroupName' must also be provided. and 'CIDRIP' cannot be --- provided. +-- | The AWS account number of the owner of the security group specified in the 'EC2SecurityGroupName' parameter. The AWS access key ID is not an acceptable value. If 'EC2SecurityGroupOwnerId' is specified, 'EC2SecurityGroupName' must also be provided. and 'CIDRIP' cannot be provided. -- -- Example: '111122223333' rcsgiEC2SecurityGroupOwnerId :: Lens' RevokeClusterSecurityGroupIngress (Maybe Text) rcsgiEC2SecurityGroupOwnerId = lens _rcsgiEC2SecurityGroupOwnerId (\ s a -> s{_rcsgiEC2SecurityGroupOwnerId = a}); --- | The name of the EC2 Security Group whose access is to be revoked. If --- 'EC2SecurityGroupName' is specified, 'EC2SecurityGroupOwnerId' must also --- be provided and 'CIDRIP' cannot be provided. +-- | The name of the EC2 Security Group whose access is to be revoked. If 'EC2SecurityGroupName' is specified, 'EC2SecurityGroupOwnerId' must also be provided and 'CIDRIP' cannot be provided. rcsgiEC2SecurityGroupName :: Lens' RevokeClusterSecurityGroupIngress (Maybe Text) rcsgiEC2SecurityGroupName = lens _rcsgiEC2SecurityGroupName (\ s a -> s{_rcsgiEC2SecurityGroupName = a}); --- | The IP range for which to revoke access. This range must be a valid --- Classless Inter-Domain Routing (CIDR) block of IP addresses. If 'CIDRIP' --- is specified, 'EC2SecurityGroupName' and 'EC2SecurityGroupOwnerId' --- cannot be provided. +-- | The IP range for which to revoke access. This range must be a valid Classless Inter-Domain Routing (CIDR) block of IP addresses. If 'CIDRIP' is specified, 'EC2SecurityGroupName' and 'EC2SecurityGroupOwnerId' cannot be provided. rcsgiCIdRIP :: Lens' RevokeClusterSecurityGroupIngress (Maybe Text) rcsgiCIdRIP = lens _rcsgiCIdRIP (\ s a -> s{_rcsgiCIdRIP = a}); diff --git a/gen/Network/AWS/Redshift/RevokeSnapshotAccess.hs b/gen/Network/AWS/Redshift/RevokeSnapshotAccess.hs --- a/gen/Network/AWS/Redshift/RevokeSnapshotAccess.hs +++ b/gen/Network/AWS/Redshift/RevokeSnapshotAccess.hs @@ -18,13 +18,9 @@ -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- --- Removes the ability of the specified AWS customer account to restore the --- specified snapshot. If the account is currently restoring the snapshot, --- the restore will run to completion. +-- Removes the ability of the specified AWS customer account to restore the specified snapshot. If the account is currently restoring the snapshot, the restore will run to completion. -- --- For more information about working with snapshots, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about working with snapshots, go to in the /Amazon Redshift Cluster Management Guide/. module Network.AWS.Redshift.RevokeSnapshotAccess ( -- * Creating a Request @@ -79,10 +75,7 @@ , _rsaAccountWithRestoreAccess = pAccountWithRestoreAccess_ } --- | The identifier of the cluster the snapshot was created from. This --- parameter is required if your IAM user has a policy containing a --- snapshot resource element that specifies anything other than * for the --- cluster name. +-- | The identifier of the cluster the snapshot was created from. This parameter is required if your IAM user has a policy containing a snapshot resource element that specifies anything other than * for the cluster name. rsaSnapshotClusterIdentifier :: Lens' RevokeSnapshotAccess (Maybe Text) rsaSnapshotClusterIdentifier = lens _rsaSnapshotClusterIdentifier (\ s a -> s{_rsaSnapshotClusterIdentifier = a}); @@ -90,8 +83,7 @@ rsaSnapshotIdentifier :: Lens' RevokeSnapshotAccess Text rsaSnapshotIdentifier = lens _rsaSnapshotIdentifier (\ s a -> s{_rsaSnapshotIdentifier = a}); --- | The identifier of the AWS customer account that can no longer restore --- the specified snapshot. +-- | The identifier of the AWS customer account that can no longer restore the specified snapshot. rsaAccountWithRestoreAccess :: Lens' RevokeSnapshotAccess Text rsaAccountWithRestoreAccess = lens _rsaAccountWithRestoreAccess (\ s a -> s{_rsaAccountWithRestoreAccess = a}); diff --git a/gen/Network/AWS/Redshift/RotateEncryptionKey.hs b/gen/Network/AWS/Redshift/RotateEncryptionKey.hs --- a/gen/Network/AWS/Redshift/RotateEncryptionKey.hs +++ b/gen/Network/AWS/Redshift/RotateEncryptionKey.hs @@ -62,11 +62,9 @@ { _rekClusterIdentifier = pClusterIdentifier_ } --- | The unique identifier of the cluster that you want to rotate the --- encryption keys for. +-- | The unique identifier of the cluster that you want to rotate the encryption keys for. -- --- Constraints: Must be the name of valid cluster that has encryption --- enabled. +-- Constraints: Must be the name of valid cluster that has encryption enabled. rekClusterIdentifier :: Lens' RotateEncryptionKey Text rekClusterIdentifier = lens _rekClusterIdentifier (\ s a -> s{_rekClusterIdentifier = a}); diff --git a/gen/Network/AWS/Redshift/Types.hs b/gen/Network/AWS/Redshift/Types.hs --- a/gen/Network/AWS/Redshift/Types.hs +++ b/gen/Network/AWS/Redshift/Types.hs @@ -543,18 +543,13 @@ | has (hasStatus 509) e = Just "limit_exceeded" | otherwise = Nothing --- | The request would result in the user exceeding the allowed number of --- cluster security groups. For information about increasing your quota, go --- to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would result in the user exceeding the allowed number of cluster security groups. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ClusterSecurityGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSecurityGroupQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "QuotaExceeded.ClusterSecurityGroup" --- | The string specified for the logging S3 key prefix does not comply with --- the documented constraints. +-- | The string specified for the logging S3 key prefix does not comply with the documented constraints. _InvalidS3KeyPrefixFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidS3KeyPrefixFault = _ServiceError . hasStatus 400 . hasCode "InvalidS3KeyPrefixFault" @@ -568,8 +563,7 @@ _AuthorizationQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "AuthorizationQuotaExceeded" --- | Cross-region snapshot copy was temporarily disabled. Try your request --- again. +-- | Cross-region snapshot copy was temporarily disabled. Try your request again. _CopyToRegionDisabledFault :: AsError a => Getting (First ServiceError) a ServiceError _CopyToRegionDisabledFault = _ServiceError . hasStatus 400 . hasCode "CopyToRegionDisabledFault" @@ -604,60 +598,47 @@ _TableRestoreNotFoundFault = _ServiceError . hasStatus 400 . hasCode "TableRestoreNotFoundFault" --- | There is no Amazon Redshift HSM configuration with the specified --- identifier. +-- | There is no Amazon Redshift HSM configuration with the specified identifier. _HSMConfigurationNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMConfigurationNotFoundFault = _ServiceError . hasStatus 400 . hasCode "HsmConfigurationNotFoundFault" --- | The specified CIDR block or EC2 security group is already authorized for --- the specified cluster security group. +-- | The specified CIDR block or EC2 security group is already authorized for the specified cluster security group. _AuthorizationAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _AuthorizationAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "AuthorizationAlreadyExists" --- | The value specified for the event category was not one of the allowed --- values, or it specified a category that does not apply to the specified --- source type. The allowed values are Configuration, Management, --- Monitoring, and Security. +-- | The value specified for the event category was not one of the allowed values, or it specified a category that does not apply to the specified source type. The allowed values are Configuration, Management, Monitoring, and Security. _SubscriptionCategoryNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _SubscriptionCategoryNotFoundFault = _ServiceError . hasStatus 404 . hasCode "SubscriptionCategoryNotFound" --- | There is already an existing Amazon Redshift HSM configuration with the --- specified identifier. +-- | There is already an existing Amazon Redshift HSM configuration with the specified identifier. _HSMConfigurationAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMConfigurationAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "HsmConfigurationAlreadyExistsFault" --- | An Amazon Redshift event notification subscription with the specified --- name does not exist. +-- | An Amazon Redshift event notification subscription with the specified name does not exist. _SubscriptionNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _SubscriptionNotFoundFault = _ServiceError . hasStatus 404 . hasCode "SubscriptionNotFound" --- | The S3 bucket name is invalid. For more information about naming rules, --- go to --- --- in the Amazon Simple Storage Service (S3) Developer Guide. +-- | The S3 bucket name is invalid. For more information about naming rules, go to in the Amazon Simple Storage Service (S3) Developer Guide. _InvalidS3BucketNameFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidS3BucketNameFault = _ServiceError . hasStatus 400 . hasCode "InvalidS3BucketNameFault" --- | The value specified as a snapshot identifier is already used by an --- existing snapshot. +-- | The value specified as a snapshot identifier is already used by an existing snapshot. _ClusterSnapshotAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSnapshotAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "ClusterSnapshotAlreadyExists" --- | The requested subnet is not valid, or not all of the subnets are in the --- same VPC. +-- | The requested subnet is not valid, or not all of the subnets are in the same VPC. _InvalidSubnet :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSubnet = _ServiceError . hasStatus 400 . hasCode "InvalidSubnet" --- | The specified HSM configuration is not in the 'available' state, or it --- is still in use by one or more Amazon Redshift clusters. +-- | The specified HSM configuration is not in the 'available' state, or it is still in use by one or more Amazon Redshift clusters. _InvalidHSMConfigurationStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidHSMConfigurationStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidHsmConfigurationStateFault" @@ -667,18 +648,12 @@ _SnapshotCopyAlreadyDisabledFault = _ServiceError . hasStatus 400 . hasCode "SnapshotCopyAlreadyDisabledFault" --- | The request would exceed the allowed number of cluster instances for --- this account. For information about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would exceed the allowed number of cluster instances for this account. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ClusterQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ClusterQuotaExceeded" --- | The quota for HSM client certificates has been reached. For information --- about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The quota for HSM client certificates has been reached. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _HSMClientCertificateQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMClientCertificateQuotaExceededFault = _ServiceError . @@ -689,8 +664,7 @@ _ClusterParameterGroupNotFoundFault = _ServiceError . hasStatus 404 . hasCode "ClusterParameterGroupNotFound" --- | The AWS account has exceeded the maximum number of snapshot copy grants --- in this region. +-- | The AWS account has exceeded the maximum number of snapshot copy grants in this region. _SnapshotCopyGrantQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _SnapshotCopyGrantQuotaExceededFault = _ServiceError . @@ -713,8 +687,7 @@ _ServiceError . hasStatus 400 . hasCode "ClusterParameterGroupAlreadyExists" --- | Cross-region snapshot copy was temporarily disabled. Try your request --- again. +-- | Cross-region snapshot copy was temporarily disabled. Try your request again. _SnapshotCopyDisabledFault :: AsError a => Getting (First ServiceError) a ServiceError _SnapshotCopyDisabledFault = _ServiceError . hasStatus 400 . hasCode "SnapshotCopyDisabledFault" @@ -723,14 +696,12 @@ _ResizeNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _ResizeNotFoundFault = _ServiceError . hasStatus 404 . hasCode "ResizeNotFound" --- | There is no Amazon Redshift HSM client certificate with the specified --- identifier. +-- | There is no Amazon Redshift HSM client certificate with the specified identifier. _HSMClientCertificateNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMClientCertificateNotFoundFault = _ServiceError . hasStatus 400 . hasCode "HsmClientCertificateNotFoundFault" --- | An Amazon SNS topic with the specified Amazon Resource Name (ARN) does --- not exist. +-- | An Amazon SNS topic with the specified Amazon Resource Name (ARN) does not exist. _SNSTopicARNNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _SNSTopicARNNotFoundFault = _ServiceError . hasStatus 404 . hasCode "SNSTopicArnNotFound" @@ -740,18 +711,13 @@ _ClusterNotFoundFault = _ServiceError . hasStatus 404 . hasCode "ClusterNotFound" --- | The request would result in the user exceeding the allowed number of --- cluster parameter groups. For information about increasing your quota, --- go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would result in the user exceeding the allowed number of cluster parameter groups. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ClusterParameterGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterParameterGroupQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ClusterParameterGroupQuotaExceeded" --- | The snapshot copy grant can\'t be created because a grant with the same --- name already exists. +-- | The snapshot copy grant can\'t be created because a grant with the same name already exists. _SnapshotCopyGrantAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _SnapshotCopyGrantAlreadyExistsFault = _ServiceError . @@ -767,43 +733,33 @@ _InvalidClusterStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidClusterState" --- | The value specified for the 'sourceDatabaseName', 'sourceSchemaName', or --- 'sourceTableName' parameter, or a combination of these, doesn\'t exist --- in the snapshot. +-- | The value specified for the 'sourceDatabaseName', 'sourceSchemaName', or 'sourceTableName' parameter, or a combination of these, doesn\'t exist in the snapshot. _InvalidTableRestoreArgumentFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidTableRestoreArgumentFault = _ServiceError . hasStatus 400 . hasCode "InvalidTableRestoreArgument" --- | The specified snapshot copy grant can\'t be found. Make sure that the --- name is typed correctly and that the grant exists in the destination --- region. +-- | The specified snapshot copy grant can\'t be found. Make sure that the name is typed correctly and that the grant exists in the destination region. _SnapshotCopyGrantNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _SnapshotCopyGrantNotFoundFault = _ServiceError . hasStatus 400 . hasCode "SnapshotCopyGrantNotFoundFault" --- | The quota for HSM configurations has been reached. For information about --- increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The quota for HSM configurations has been reached. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _HSMConfigurationQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMConfigurationQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "HsmConfigurationQuotaExceededFault" --- | The request would result in the user exceeding the allowed number of --- cluster snapshots. +-- | The request would result in the user exceeding the allowed number of cluster snapshots. _ClusterSnapshotQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSnapshotQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ClusterSnapshotQuotaExceeded" --- | The number of nodes specified exceeds the allotted capacity of the --- cluster. +-- | The number of nodes specified exceeds the allotted capacity of the cluster. _InsufficientClusterCapacityFault :: AsError a => Getting (First ServiceError) a ServiceError _InsufficientClusterCapacityFault = _ServiceError . hasStatus 400 . hasCode "InsufficientClusterCapacity" --- | Amazon SNS has responded that there is a problem with the specified --- Amazon SNS topic. +-- | Amazon SNS has responded that there is a problem with the specified Amazon SNS topic. _SNSInvalidTopicFault :: AsError a => Getting (First ServiceError) a ServiceError _SNSInvalidTopicFault = _ServiceError . hasStatus 400 . hasCode "SNSInvalidTopic" @@ -813,8 +769,7 @@ _UnsupportedOptionFault = _ServiceError . hasStatus 400 . hasCode "UnsupportedOptionFault" --- | There is already an existing event notification subscription with the --- specified name. +-- | There is already an existing event notification subscription with the specified name. _SubscriptionAlreadyExistFault :: AsError a => Getting (First ServiceError) a ServiceError _SubscriptionAlreadyExistFault = _ServiceError . hasStatus 400 . hasCode "SubscriptionAlreadyExist" @@ -824,8 +779,7 @@ _InvalidVPCNetworkStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidVPCNetworkStateFault" --- | The cluster subnet group name does not refer to an existing cluster --- subnet group. +-- | The cluster subnet group name does not refer to an existing cluster subnet group. _ClusterSubnetGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSubnetGroupNotFoundFault = _ServiceError . hasStatus 400 . hasCode "ClusterSubnetGroupNotFoundFault" @@ -835,22 +789,18 @@ _BucketNotFoundFault = _ServiceError . hasStatus 400 . hasCode "BucketNotFoundFault" --- | The subscription request is invalid because it is a duplicate request. --- This subscription request is already in progress. +-- | The subscription request is invalid because it is a duplicate request. This subscription request is already in progress. _InvalidSubscriptionStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSubscriptionStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidSubscriptionStateFault" --- | The request cannot be completed because a dependent service is --- throttling requests made by Amazon Redshift on your behalf. Wait and --- retry the request. +-- | The request cannot be completed because a dependent service is throttling requests made by Amazon Redshift on your behalf. Wait and retry the request. _DependentServiceRequestThrottlingFault :: AsError a => Getting (First ServiceError) a ServiceError _DependentServiceRequestThrottlingFault = _ServiceError . hasStatus 400 . hasCode "DependentServiceRequestThrottlingFault" --- | The specified CIDR IP range or EC2 security group is not authorized for --- the specified cluster security group. +-- | The specified CIDR IP range or EC2 security group is not authorized for the specified cluster security group. _AuthorizationNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _AuthorizationNotFoundFault = _ServiceError . hasStatus 404 . hasCode "AuthorizationNotFound" @@ -866,20 +816,17 @@ _UnsupportedOperationFault = _ServiceError . hasStatus 400 . hasCode "UnsupportedOperation" --- | A /ClusterSubnetGroupName/ is already used by an existing cluster subnet --- group. +-- | A /ClusterSubnetGroupName/ is already used by an existing cluster subnet group. _ClusterSubnetGroupAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSubnetGroupAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "ClusterSubnetGroupAlreadyExists" --- | The specified cluster snapshot is not in the 'available' state, or other --- accounts are authorized to access the snapshot. +-- | The specified cluster snapshot is not in the 'available' state, or other accounts are authorized to access the snapshot. _InvalidClusterSnapshotStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidClusterSnapshotStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidClusterSnapshotState" --- | The cluster security group name does not refer to an existing cluster --- security group. +-- | The cluster security group name does not refer to an existing cluster security group. _ClusterSecurityGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSecurityGroupNotFoundFault = _ServiceError . hasStatus 404 . hasCode "ClusterSecurityGroupNotFound" @@ -904,17 +851,12 @@ _IncompatibleOrderableOptions = _ServiceError . hasStatus 400 . hasCode "IncompatibleOrderableOptions" --- | The request would exceed the allowed number of event subscriptions for --- this account. For information about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would exceed the allowed number of event subscriptions for this account. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _EventSubscriptionQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _EventSubscriptionQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "EventSubscriptionQuotaExceeded" --- | The cluster parameter group action can not be completed because another --- task is in progress that involves the parameter group. Wait a few --- moments and try the operation again. +-- | The cluster parameter group action can not be completed because another task is in progress that involves the parameter group. Wait a few moments and try the operation again. _InvalidClusterParameterGroupStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidClusterParameterGroupStateFault = _ServiceError . hasStatus 400 . hasCode "InvalidClusterParameterGroupState" @@ -924,9 +866,7 @@ _ReservedNodeAlreadyExistsFault = _ServiceError . hasStatus 404 . hasCode "ReservedNodeAlreadyExists" --- | You have exceeded the allowed number of table restore requests. Wait for --- your current table restore requests to complete before making a new --- request. +-- | You have exceeded the allowed number of table restore requests. Wait for your current table restore requests to complete before making a new request. _InProgressTableRestoreQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _InProgressTableRestoreQuotaExceededFault = _ServiceError . @@ -946,8 +886,7 @@ _SubscriptionEventIdNotFoundFault = _ServiceError . hasStatus 404 . hasCode "SubscriptionEventIdNotFound" --- | The snapshot copy grant can\'t be deleted because it is used by one or --- more clusters. +-- | The snapshot copy grant can\'t be deleted because it is used by one or more clusters. _InvalidSnapshotCopyGrantStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidSnapshotCopyGrantStateFault = _ServiceError . @@ -958,19 +897,12 @@ _UnknownSnapshotCopyRegionFault = _ServiceError . hasStatus 404 . hasCode "UnknownSnapshotCopyRegionFault" --- | Request would exceed the user\'s compute node quota. For information --- about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | Request would exceed the user\'s compute node quota. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ReservedNodeQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ReservedNodeQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ReservedNodeQuotaExceeded" --- | The request would result in user exceeding the allowed number of subnets --- in a cluster subnet groups. For information about increasing your quota, --- go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would result in user exceeding the allowed number of subnets in a cluster subnet groups. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ClusterSubnetQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSubnetQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ClusterSubnetQuotaExceededFault" @@ -980,8 +912,7 @@ _ClusterAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "ClusterAlreadyExists" --- | The owner of the specified snapshot has not authorized your account to --- access the snapshot. +-- | The owner of the specified snapshot has not authorized your account to access the snapshot. _AccessToSnapshotDeniedFault :: AsError a => Getting (First ServiceError) a ServiceError _AccessToSnapshotDeniedFault = _ServiceError . hasStatus 400 . hasCode "AccessToSnapshotDenied" @@ -991,23 +922,18 @@ _TagLimitExceededFault = _ServiceError . hasStatus 400 . hasCode "TagLimitExceededFault" --- | The operation would exceed the number of nodes allotted to the account. --- For information about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The operation would exceed the number of nodes allotted to the account. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _NumberOfNodesQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _NumberOfNodesQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "NumberOfNodesQuotaExceeded" --- | There is already an existing Amazon Redshift HSM client certificate with --- the specified identifier. +-- | There is already an existing Amazon Redshift HSM client certificate with the specified identifier. _HSMClientCertificateAlreadyExistsFault :: AsError a => Getting (First ServiceError) a ServiceError _HSMClientCertificateAlreadyExistsFault = _ServiceError . hasStatus 400 . hasCode "HsmClientCertificateAlreadyExistsFault" --- | The specified HSM client certificate is not in the 'available' state, or --- it is still in use by one or more Amazon Redshift clusters. +-- | The specified HSM client certificate is not in the 'available' state, or it is still in use by one or more Amazon Redshift clusters. _InvalidHSMClientCertificateStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidHSMClientCertificateStateFault = _ServiceError . @@ -1018,9 +944,7 @@ _SubnetAlreadyInUse = _ServiceError . hasStatus 400 . hasCode "SubnetAlreadyInUse" --- | The value specified for the event severity was not one of the allowed --- values, or it specified a severity that does not apply to the specified --- source type. The allowed values are ERROR and INFO. +-- | The value specified for the event severity was not one of the allowed values, or it specified a severity that does not apply to the specified source type. The allowed values are ERROR and INFO. _SubscriptionSeverityNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError _SubscriptionSeverityNotFoundFault = _ServiceError . hasStatus 404 . hasCode "SubscriptionSeverityNotFound" @@ -1034,16 +958,12 @@ _InvalidTagFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidTagFault = _ServiceError . hasStatus 400 . hasCode "InvalidTagFault" --- | The cluster does not have read bucket or put object permissions on the --- S3 bucket specified when enabling logging. +-- | The cluster does not have read bucket or put object permissions on the S3 bucket specified when enabling logging. _InsufficientS3BucketPolicyFault :: AsError a => Getting (First ServiceError) a ServiceError _InsufficientS3BucketPolicyFault = _ServiceError . hasStatus 400 . hasCode "InsufficientS3BucketPolicyFault" --- | The request would result in user exceeding the allowed number of cluster --- subnet groups. For information about increasing your quota, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | The request would result in user exceeding the allowed number of cluster subnet groups. For information about increasing your quota, go to in the /Amazon Redshift Cluster Management Guide/. _ClusterSubnetGroupQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError _ClusterSubnetGroupQuotaExceededFault = _ServiceError . hasStatus 400 . hasCode "ClusterSubnetGroupQuotaExceeded" diff --git a/gen/Network/AWS/Redshift/Types/Product.hs b/gen/Network/AWS/Redshift/Types/Product.hs --- a/gen/Network/AWS/Redshift/Types/Product.hs +++ b/gen/Network/AWS/Redshift/Types/Product.hs @@ -40,8 +40,7 @@ { _awraAccountId = Nothing } --- | The identifier of an AWS customer account authorized to restore a --- snapshot. +-- | The identifier of an AWS customer account authorized to restore a snapshot. awraAccountId :: Lens' AccountWithRestoreAccess (Maybe Text) awraAccountId = lens _awraAccountId (\ s a -> s{_awraAccountId = a}); @@ -226,13 +225,11 @@ , _cDBName = Nothing } --- | Describes the status of a cluster restore action. Returns null if the --- cluster was not created by restoring a snapshot. +-- | Describes the status of a cluster restore action. Returns null if the cluster was not created by restoring a snapshot. cRestoreStatus :: Lens' Cluster (Maybe RestoreStatus) cRestoreStatus = lens _cRestoreStatus (\ s a -> s{_cRestoreStatus = a}); --- | Returns the destination region and retention period that are configured --- for cross-region snapshot copy. +-- | Returns the destination region and retention period that are configured for cross-region snapshot copy. cClusterSnapshotCopyStatus :: Lens' Cluster (Maybe ClusterSnapshotCopyStatus) cClusterSnapshotCopyStatus = lens _cClusterSnapshotCopyStatus (\ s a -> s{_cClusterSnapshotCopyStatus = a}); @@ -244,8 +241,7 @@ cPubliclyAccessible :: Lens' Cluster (Maybe Bool) cPubliclyAccessible = lens _cPubliclyAccessible (\ s a -> s{_cPubliclyAccessible = a}); --- | The master user name for the cluster. This name is used to connect to --- the database that is specified in __DBName__. +-- | The master user name for the cluster. This name is used to connect to the database that is specified in __DBName__. cMasterUsername :: Lens' Cluster (Maybe Text) cMasterUsername = lens _cMasterUsername (\ s a -> s{_cMasterUsername = a}); @@ -253,14 +249,9 @@ cVPCId :: Lens' Cluster (Maybe Text) cVPCId = lens _cVPCId (\ s a -> s{_cVPCId = a}); --- | A list of cluster security group that are associated with the cluster. --- Each security group is represented by an element that contains --- 'ClusterSecurityGroup.Name' and 'ClusterSecurityGroup.Status' --- subelements. +-- | A list of cluster security group that are associated with the cluster. Each security group is represented by an element that contains 'ClusterSecurityGroup.Name' and 'ClusterSecurityGroup.Status' subelements. -- --- Cluster security groups are used when the cluster is not created in a --- VPC. Clusters that are created in a VPC use VPC security groups, which --- are listed by the __VpcSecurityGroups__ parameter. +-- Cluster security groups are used when the cluster is not created in a VPC. Clusters that are created in a VPC use VPC security groups, which are listed by the __VpcSecurityGroups__ parameter. cClusterSecurityGroups :: Lens' Cluster [ClusterSecurityGroupMembership] cClusterSecurityGroups = lens _cClusterSecurityGroups (\ s a -> s{_cClusterSecurityGroups = a}) . _Default . _Coerce; @@ -272,8 +263,7 @@ cEncrypted :: Lens' Cluster (Maybe Bool) cEncrypted = lens _cEncrypted (\ s a -> s{_cEncrypted = a}); --- | The name of the subnet group that is associated with the cluster. This --- parameter is valid only when the cluster is in a VPC. +-- | The name of the subnet group that is associated with the cluster. This parameter is valid only when the cluster is in a VPC. cClusterSubnetGroupName :: Lens' Cluster (Maybe Text) cClusterSubnetGroupName = lens _cClusterSubnetGroupName (\ s a -> s{_cClusterSubnetGroupName = a}); @@ -289,8 +279,7 @@ cClusterPublicKey :: Lens' Cluster (Maybe Text) cClusterPublicKey = lens _cClusterPublicKey (\ s a -> s{_cClusterPublicKey = a}); --- | The weekly time range (in UTC) during which system maintenance can --- occur. +-- | The weekly time range (in UTC) during which system maintenance can occur. cPreferredMaintenanceWindow :: Lens' Cluster (Maybe Text) cPreferredMaintenanceWindow = lens _cPreferredMaintenanceWindow (\ s a -> s{_cPreferredMaintenanceWindow = a}); @@ -298,13 +287,11 @@ cModifyStatus :: Lens' Cluster (Maybe Text) cModifyStatus = lens _cModifyStatus (\ s a -> s{_cModifyStatus = a}); --- | The AWS Key Management Service (KMS) key ID of the encryption key used --- to encrypt data in the cluster. +-- | The AWS Key Management Service (KMS) key ID of the encryption key used to encrypt data in the cluster. cKMSKeyId :: Lens' Cluster (Maybe Text) cKMSKeyId = lens _cKMSKeyId (\ s a -> s{_cKMSKeyId = a}); --- | The list of cluster parameter groups that are associated with this --- cluster. Each parameter group in the list is returned with its status. +-- | The list of cluster parameter groups that are associated with this cluster. Each parameter group in the list is returned with its status. cClusterParameterGroups :: Lens' Cluster [ClusterParameterGroupStatus] cClusterParameterGroups = lens _cClusterParameterGroups (\ s a -> s{_cClusterParameterGroups = a}) . _Default . _Coerce; @@ -312,21 +299,17 @@ cAvailabilityZone :: Lens' Cluster (Maybe Text) cAvailabilityZone = lens _cAvailabilityZone (\ s a -> s{_cAvailabilityZone = a}); --- | A list of Virtual Private Cloud (VPC) security groups that are --- associated with the cluster. This parameter is returned only if the --- cluster is in a VPC. +-- | A list of Virtual Private Cloud (VPC) security groups that are associated with the cluster. This parameter is returned only if the cluster is in a VPC. cVPCSecurityGroups :: Lens' Cluster [VPCSecurityGroupMembership] cVPCSecurityGroups = lens _cVPCSecurityGroups (\ s a -> s{_cVPCSecurityGroups = a}) . _Default . _Coerce; --- | Reports whether the Amazon Redshift cluster has finished applying any --- HSM settings changes specified in a modify cluster command. +-- | Reports whether the Amazon Redshift cluster has finished applying any HSM settings changes specified in a modify cluster command. -- -- Values: active, applying cHSMStatus :: Lens' Cluster (Maybe HSMStatus) cHSMStatus = lens _cHSMStatus (\ s a -> s{_cHSMStatus = a}); --- | A list of AWS Identity and Access Management (IAM) roles that can be --- used by the cluster to access other AWS services. +-- | A list of AWS Identity and Access Management (IAM) roles that can be used by the cluster to access other AWS services. cIAMRoles :: Lens' Cluster [ClusterIAMRole] cIAMRoles = lens _cIAMRoles (\ s a -> s{_cIAMRoles = a}) . _Default . _Coerce; @@ -334,8 +317,7 @@ cElasticIPStatus :: Lens' Cluster (Maybe ElasticIPStatus) cElasticIPStatus = lens _cElasticIPStatus (\ s a -> s{_cElasticIPStatus = a}); --- | The version ID of the Amazon Redshift engine that is running on the --- cluster. +-- | The version ID of the Amazon Redshift engine that is running on the cluster. cClusterVersion :: Lens' Cluster (Maybe Text) cClusterVersion = lens _cClusterVersion (\ s a -> s{_cClusterVersion = a}); @@ -351,8 +333,7 @@ cEndpoint :: Lens' Cluster (Maybe Endpoint) cEndpoint = lens _cEndpoint (\ s a -> s{_cEndpoint = a}); --- | If 'true', major version upgrades will be applied automatically to the --- cluster during the maintenance window. +-- | If 'true', major version upgrades will be applied automatically to the cluster during the maintenance window. cAllowVersionUpgrade :: Lens' Cluster (Maybe Bool) cAllowVersionUpgrade = lens _cAllowVersionUpgrade (\ s a -> s{_cAllowVersionUpgrade = a}); @@ -377,8 +358,7 @@ cClusterStatus :: Lens' Cluster (Maybe Text) cClusterStatus = lens _cClusterStatus (\ s a -> s{_cClusterStatus = a}); --- | If present, changes to the cluster are pending. Specific pending changes --- are identified by subelements. +-- | If present, changes to the cluster are pending. Specific pending changes are identified by subelements. cPendingModifiedValues :: Lens' Cluster (Maybe PendingModifiedValues) cPendingModifiedValues = lens _cPendingModifiedValues (\ s a -> s{_cPendingModifiedValues = a}); @@ -390,10 +370,7 @@ cClusterNodes :: Lens' Cluster [ClusterNode] cClusterNodes = lens _cClusterNodes (\ s a -> s{_cClusterNodes = a}) . _Default . _Coerce; --- | The name of the initial database that was created when the cluster was --- created. This same name is returned for the life of the cluster. If an --- initial database was not specified, a database named \"dev\" was created --- by default. +-- | The name of the initial database that was created when the cluster was created. This same name is returned for the life of the cluster. If an initial database was not specified, a database named \"dev\" was created by default. cDBName :: Lens' Cluster (Maybe Text) cDBName = lens _cDBName (\ s a -> s{_cDBName = a}); @@ -449,8 +426,7 @@ instance NFData Cluster --- | An AWS Identity and Access Management (IAM) role that can be used by the --- associated Amazon Redshift cluster to access other AWS services. +-- | An AWS Identity and Access Management (IAM) role that can be used by the associated Amazon Redshift cluster to access other AWS services. -- -- /See:/ 'clusterIAMRole' smart constructor. data ClusterIAMRole = ClusterIAMRole' @@ -473,21 +449,17 @@ , _cirApplyStatus = Nothing } --- | The Amazon Resource Name (ARN) of the IAM role. For example, --- 'arn:aws:iam::123456789012:role\/RedshiftCopyUnload'. +-- | The Amazon Resource Name (ARN) of the IAM role. For example, 'arn:aws:iam::123456789012:role\/RedshiftCopyUnload'. cirIAMRoleARN :: Lens' ClusterIAMRole (Maybe Text) cirIAMRoleARN = lens _cirIAMRoleARN (\ s a -> s{_cirIAMRoleARN = a}); --- | Describes the status of the IAM role\'s association with an Amazon --- Redshift cluster. +-- | Describes the status of the IAM role\'s association with an Amazon Redshift cluster. -- -- The following are possible statuses and descriptions. -- -- - 'in-sync': The role is available for use by the cluster. --- - 'adding': The role is in the process of being associated with the --- cluster. --- - 'removing': The role is in the process of being disassociated with --- the cluster. +-- - 'adding': The role is in the process of being associated with the cluster. +-- - 'removing': The role is in the process of being disassociated with the cluster. cirApplyStatus :: Lens' ClusterIAMRole (Maybe Text) cirApplyStatus = lens _cirApplyStatus (\ s a -> s{_cirApplyStatus = a}); @@ -580,8 +552,7 @@ , _cpgParameterGroupName = Nothing } --- | The name of the cluster parameter group family that this cluster --- parameter group is compatible with. +-- | The name of the cluster parameter group family that this cluster parameter group is compatible with. cpgParameterGroupFamily :: Lens' ClusterParameterGroup (Maybe Text) cpgParameterGroupFamily = lens _cpgParameterGroupFamily (\ s a -> s{_cpgParameterGroupFamily = a}); @@ -634,9 +605,7 @@ , _cpgnmParameterGroupName = Nothing } --- | The status of the parameter group. For example, if you made a change to --- a parameter group name-value pair, then the change could be pending a --- reboot of an associated cluster. +-- | The status of the parameter group. For example, if you made a change to a parameter group name-value pair, then the change could be pending a reboot of an associated cluster. cpgnmParameterGroupStatus :: Lens' ClusterParameterGroupNameMessage (Maybe Text) cpgnmParameterGroupStatus = lens _cpgnmParameterGroupStatus (\ s a -> s{_cpgnmParameterGroupStatus = a}); @@ -684,9 +653,7 @@ -- | The list of parameter statuses. -- --- For more information about parameters and parameter groups, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. cpgsClusterParameterStatusList :: Lens' ClusterParameterGroupStatus [ClusterParameterStatus] cpgsClusterParameterStatusList = lens _cpgsClusterParameterStatusList (\ s a -> s{_cpgsClusterParameterStatusList = a}) . _Default . _Coerce; @@ -737,8 +704,7 @@ , _cpsParameterApplyStatus = Nothing } --- | The error that prevented the parameter from being applied to the --- database. +-- | The error that prevented the parameter from being applied to the database. cpsParameterApplyErrorDescription :: Lens' ClusterParameterStatus (Maybe Text) cpsParameterApplyErrorDescription = lens _cpsParameterApplyErrorDescription (\ s a -> s{_cpsParameterApplyErrorDescription = a}); @@ -746,24 +712,17 @@ cpsParameterName :: Lens' ClusterParameterStatus (Maybe Text) cpsParameterName = lens _cpsParameterName (\ s a -> s{_cpsParameterName = a}); --- | The status of the parameter that indicates whether the parameter is in --- sync with the database, waiting for a cluster reboot, or encountered an --- error when being applied. +-- | The status of the parameter that indicates whether the parameter is in sync with the database, waiting for a cluster reboot, or encountered an error when being applied. -- -- The following are possible statuses and descriptions. -- -- - 'in-sync': The parameter value is in sync with the database. --- - 'pending-reboot': The parameter value will be applied after the --- cluster reboots. +-- - 'pending-reboot': The parameter value will be applied after the cluster reboots. -- - 'applying': The parameter value is being applied to the database. --- - 'invalid-parameter': Cannot apply the parameter value because it has --- an invalid value or syntax. --- - 'apply-deferred': The parameter contains static property changes. --- The changes are deferred until the cluster reboots. --- - 'apply-error': Cannot connect to the cluster. The parameter change --- will be applied after the cluster reboots. --- - 'unknown-error': Cannot apply the parameter change right now. The --- change will be applied after the cluster reboots. +-- - 'invalid-parameter': Cannot apply the parameter value because it has an invalid value or syntax. +-- - 'apply-deferred': The parameter contains static property changes. The changes are deferred until the cluster reboots. +-- - 'apply-error': Cannot connect to the cluster. The parameter change will be applied after the cluster reboots. +-- - 'unknown-error': Cannot apply the parameter change right now. The change will be applied after the cluster reboots. cpsParameterApplyStatus :: Lens' ClusterParameterStatus (Maybe Text) cpsParameterApplyStatus = lens _cpsParameterApplyStatus (\ s a -> s{_cpsParameterApplyStatus = a}); @@ -813,18 +772,15 @@ , _cluTags = Nothing } --- | The name of the cluster security group to which the operation was --- applied. +-- | The name of the cluster security group to which the operation was applied. cluClusterSecurityGroupName :: Lens' ClusterSecurityGroup (Maybe Text) cluClusterSecurityGroupName = lens _cluClusterSecurityGroupName (\ s a -> s{_cluClusterSecurityGroupName = a}); --- | A list of IP ranges (CIDR blocks) that are permitted to access clusters --- associated with this cluster security group. +-- | A list of IP ranges (CIDR blocks) that are permitted to access clusters associated with this cluster security group. cluIPRanges :: Lens' ClusterSecurityGroup [IPRange] cluIPRanges = lens _cluIPRanges (\ s a -> s{_cluIPRanges = a}) . _Default . _Coerce; --- | A list of EC2 security groups that are permitted to access clusters --- associated with this cluster security group. +-- | A list of EC2 security groups that are permitted to access clusters associated with this cluster security group. cluEC2SecurityGroups :: Lens' ClusterSecurityGroup [EC2SecurityGroup] cluEC2SecurityGroups = lens _cluEC2SecurityGroups (\ s a -> s{_cluEC2SecurityGroups = a}) . _Default . _Coerce; @@ -895,8 +851,7 @@ instance NFData ClusterSecurityGroupMembership --- | Returns the destination region and retention period that are configured --- for cross-region snapshot copy. +-- | Returns the destination region and retention period that are configured for cross-region snapshot copy. -- -- /See:/ 'clusterSnapshotCopyStatus' smart constructor. data ClusterSnapshotCopyStatus = ClusterSnapshotCopyStatus' @@ -923,13 +878,11 @@ , _cscsSnapshotCopyGrantName = Nothing } --- | The number of days that automated snapshots are retained in the --- destination region after they are copied from a source region. +-- | The number of days that automated snapshots are retained in the destination region after they are copied from a source region. cscsRetentionPeriod :: Lens' ClusterSnapshotCopyStatus (Maybe Integer) cscsRetentionPeriod = lens _cscsRetentionPeriod (\ s a -> s{_cscsRetentionPeriod = a}); --- | The destination region that snapshots are automatically copied to when --- cross-region snapshot copy is enabled. +-- | The destination region that snapshots are automatically copied to when cross-region snapshot copy is enabled. cscsDestinationRegion :: Lens' ClusterSnapshotCopyStatus (Maybe Text) cscsDestinationRegion = lens _cscsDestinationRegion (\ s a -> s{_cscsDestinationRegion = a}); @@ -999,8 +952,7 @@ csgClusterSubnetGroupName :: Lens' ClusterSubnetGroup (Maybe Text) csgClusterSubnetGroupName = lens _csgClusterSubnetGroupName (\ s a -> s{_csgClusterSubnetGroupName = a}); --- | The status of the cluster subnet group. Possible values are 'Complete', --- 'Incomplete' and 'Invalid'. +-- | The status of the cluster subnet group. Possible values are 'Complete', 'Incomplete' and 'Invalid'. csgSubnetGroupStatus :: Lens' ClusterSubnetGroup (Maybe Text) csgSubnetGroupStatus = lens _csgSubnetGroupStatus (\ s a -> s{_csgSubnetGroupStatus = a}); @@ -1029,8 +981,7 @@ instance NFData ClusterSubnetGroup --- | Describes a cluster version, including the parameter group family and --- description of the version. +-- | Describes a cluster version, including the parameter group family and description of the version. -- -- /See:/ 'clusterVersion' smart constructor. data ClusterVersion = ClusterVersion' @@ -1107,12 +1058,7 @@ , _dcpParameterGroupFamily = Nothing } --- | A value that indicates the starting point for the next set of response --- records in a subsequent request. If a value is returned in a response, --- you can retrieve the next set of records by providing this returned --- marker value in the 'Marker' parameter and retrying the command. If the --- 'Marker' field is empty, all response records have been retrieved for --- the request. +-- | A value that indicates the starting point for the next set of response records in a subsequent request. If a value is returned in a response, you can retrieve the next set of records by providing this returned marker value in the 'Marker' parameter and retrying the command. If the 'Marker' field is empty, all response records have been retrieved for the request. dcpMarker :: Lens' DefaultClusterParameters (Maybe Text) dcpMarker = lens _dcpMarker (\ s a -> s{_dcpMarker = a}); @@ -1120,8 +1066,7 @@ dcpParameters :: Lens' DefaultClusterParameters [Parameter] dcpParameters = lens _dcpParameters (\ s a -> s{_dcpParameters = a}) . _Default . _Coerce; --- | The name of the cluster parameter group family to which the engine --- default parameters apply. +-- | The name of the cluster parameter group family to which the engine default parameters apply. dcpParameterGroupFamily :: Lens' DefaultClusterParameters (Maybe Text) dcpParameterGroupFamily = lens _dcpParameterGroupFamily (\ s a -> s{_dcpParameterGroupFamily = a}); @@ -1172,8 +1117,7 @@ esgStatus :: Lens' EC2SecurityGroup (Maybe Text) esgStatus = lens _esgStatus (\ s a -> s{_esgStatus = a}); --- | The AWS ID of the owner of the EC2 security group specified in the --- 'EC2SecurityGroupName' field. +-- | The AWS ID of the owner of the EC2 security group specified in the 'EC2SecurityGroupName' field. esgEC2SecurityGroupOwnerId :: Lens' EC2SecurityGroup (Maybe Text) esgEC2SecurityGroupOwnerId = lens _esgEC2SecurityGroupOwnerId (\ s a -> s{_esgEC2SecurityGroupOwnerId = a}); @@ -1392,8 +1336,7 @@ , _ecmEvents = Nothing } --- | The source type, such as cluster or cluster-snapshot, that the returned --- categories belong to. +-- | The source type, such as cluster or cluster-snapshot, that the returned categories belong to. ecmSourceType :: Lens' EventCategoriesMap (Maybe Text) ecmSourceType = lens _ecmSourceType (\ s a -> s{_ecmSourceType = a}); @@ -1536,17 +1479,12 @@ -- -- Constraints: -- --- - Can be one of the following: active | no-permission | --- topic-not-exist --- - The status \"no-permission\" indicates that Amazon Redshift no --- longer has permission to post to the Amazon SNS topic. The status --- \"topic-not-exist\" indicates that the topic was deleted after the --- subscription was created. +-- - Can be one of the following: active | no-permission | topic-not-exist +-- - The status \"no-permission\" indicates that Amazon Redshift no longer has permission to post to the Amazon SNS topic. The status \"topic-not-exist\" indicates that the topic was deleted after the subscription was created. esStatus :: Lens' EventSubscription (Maybe Text) esStatus = lens _esStatus (\ s a -> s{_esStatus = a}); --- | The AWS customer account associated with the Amazon Redshift event --- notification subscription. +-- | The AWS customer account associated with the Amazon Redshift event notification subscription. esCustomerAWSId :: Lens' EventSubscription (Maybe Text) esCustomerAWSId = lens _esCustomerAWSId (\ s a -> s{_esCustomerAWSId = a}); @@ -1554,35 +1492,29 @@ esCustSubscriptionId :: Lens' EventSubscription (Maybe Text) esCustSubscriptionId = lens _esCustSubscriptionId (\ s a -> s{_esCustSubscriptionId = a}); --- | The Amazon Resource Name (ARN) of the Amazon SNS topic used by the event --- notification subscription. +-- | The Amazon Resource Name (ARN) of the Amazon SNS topic used by the event notification subscription. esSNSTopicARN :: Lens' EventSubscription (Maybe Text) esSNSTopicARN = lens _esSNSTopicARN (\ s a -> s{_esSNSTopicARN = a}); --- | A Boolean value indicating whether the subscription is enabled. 'true' --- indicates the subscription is enabled. +-- | A Boolean value indicating whether the subscription is enabled. 'true' indicates the subscription is enabled. esEnabled :: Lens' EventSubscription (Maybe Bool) esEnabled = lens _esEnabled (\ s a -> s{_esEnabled = a}); --- | The source type of the events returned the Amazon Redshift event --- notification, such as cluster, or cluster-snapshot. +-- | The source type of the events returned the Amazon Redshift event notification, such as cluster, or cluster-snapshot. esSourceType :: Lens' EventSubscription (Maybe Text) esSourceType = lens _esSourceType (\ s a -> s{_esSourceType = a}); --- | The event severity specified in the Amazon Redshift event notification --- subscription. +-- | The event severity specified in the Amazon Redshift event notification subscription. -- -- Values: ERROR, INFO esSeverity :: Lens' EventSubscription (Maybe Text) esSeverity = lens _esSeverity (\ s a -> s{_esSeverity = a}); --- | The date and time the Amazon Redshift event notification subscription --- was created. +-- | The date and time the Amazon Redshift event notification subscription was created. esSubscriptionCreationTime :: Lens' EventSubscription (Maybe UTCTime) esSubscriptionCreationTime = lens _esSubscriptionCreationTime (\ s a -> s{_esSubscriptionCreationTime = a}) . mapping _Time; --- | The list of Amazon Redshift event categories specified in the event --- notification subscription. +-- | The list of Amazon Redshift event categories specified in the event notification subscription. -- -- Values: Configuration, Management, Monitoring, Security esEventCategoriesList :: Lens' EventSubscription [Text] @@ -1592,8 +1524,7 @@ esTags :: Lens' EventSubscription [Tag] esTags = lens _esTags (\ s a -> s{_esTags = a}) . _Default . _Coerce; --- | A list of the sources that publish events to the Amazon Redshift event --- notification subscription. +-- | A list of the sources that publish events to the Amazon Redshift event notification subscription. esSourceIdsList :: Lens' EventSubscription [Text] esSourceIdsList = lens _esSourceIdsList (\ s a -> s{_esSourceIdsList = a}) . _Default . _Coerce; @@ -1621,9 +1552,7 @@ instance NFData EventSubscription --- | Returns information about an HSM client certificate. The certificate is --- stored in a secure Hardware Storage Module (HSM), and used by the Amazon --- Redshift cluster to encrypt data files. +-- | Returns information about an HSM client certificate. The certificate is stored in a secure Hardware Storage Module (HSM), and used by the Amazon Redshift cluster to encrypt data files. -- -- /See:/ 'hsmClientCertificate' smart constructor. data HSMClientCertificate = HSMClientCertificate' @@ -1654,8 +1583,7 @@ hccHSMClientCertificateIdentifier :: Lens' HSMClientCertificate (Maybe Text) hccHSMClientCertificateIdentifier = lens _hccHSMClientCertificateIdentifier (\ s a -> s{_hccHSMClientCertificateIdentifier = a}); --- | The public key that the Amazon Redshift cluster will use to connect to --- the HSM. You must register the public key in the HSM. +-- | The public key that the Amazon Redshift cluster will use to connect to the HSM. You must register the public key in the HSM. hccHSMClientCertificatePublicKey :: Lens' HSMClientCertificate (Maybe Text) hccHSMClientCertificatePublicKey = lens _hccHSMClientCertificatePublicKey (\ s a -> s{_hccHSMClientCertificatePublicKey = a}); @@ -1676,9 +1604,7 @@ instance NFData HSMClientCertificate --- | Returns information about an HSM configuration, which is an object that --- describes to Amazon Redshift clusters the information they require to --- connect to an HSM where they can store database encryption keys. +-- | Returns information about an HSM configuration, which is an object that describes to Amazon Redshift clusters the information they require to connect to an HSM where they can store database encryption keys. -- -- /See:/ 'hsmConfiguration' smart constructor. data HSMConfiguration = HSMConfiguration' @@ -1717,8 +1643,7 @@ hcHSMConfigurationIdentifier :: Lens' HSMConfiguration (Maybe Text) hcHSMConfigurationIdentifier = lens _hcHSMConfigurationIdentifier (\ s a -> s{_hcHSMConfigurationIdentifier = a}); --- | The name of the partition in the HSM where the Amazon Redshift clusters --- will store their database encryption keys. +-- | The name of the partition in the HSM where the Amazon Redshift clusters will store their database encryption keys. hcHSMPartitionName :: Lens' HSMConfiguration (Maybe Text) hcHSMPartitionName = lens _hcHSMPartitionName (\ s a -> s{_hcHSMPartitionName = a}); @@ -1730,8 +1655,7 @@ hcTags :: Lens' HSMConfiguration [Tag] hcTags = lens _hcTags (\ s a -> s{_hcTags = a}) . _Default . _Coerce; --- | The IP address that the Amazon Redshift cluster must use to access the --- HSM. +-- | The IP address that the Amazon Redshift cluster must use to access the HSM. hcHSMIPAddress :: Lens' HSMConfiguration (Maybe Text) hcHSMIPAddress = lens _hcHSMIPAddress (\ s a -> s{_hcHSMIPAddress = a}); @@ -1777,21 +1701,17 @@ , _hsHSMClientCertificateIdentifier = Nothing } --- | Reports whether the Amazon Redshift cluster has finished applying any --- HSM settings changes specified in a modify cluster command. +-- | Reports whether the Amazon Redshift cluster has finished applying any HSM settings changes specified in a modify cluster command. -- -- Values: active, applying hsStatus :: Lens' HSMStatus (Maybe Text) hsStatus = lens _hsStatus (\ s a -> s{_hsStatus = a}); --- | Specifies the name of the HSM configuration that contains the --- information the Amazon Redshift cluster can use to retrieve and store --- keys in an HSM. +-- | Specifies the name of the HSM configuration that contains the information the Amazon Redshift cluster can use to retrieve and store keys in an HSM. hsHSMConfigurationIdentifier :: Lens' HSMStatus (Maybe Text) hsHSMConfigurationIdentifier = lens _hsHSMConfigurationIdentifier (\ s a -> s{_hsHSMConfigurationIdentifier = a}); --- | Specifies the name of the HSM client certificate the Amazon Redshift --- cluster uses to retrieve the data encryption keys stored in an HSM. +-- | Specifies the name of the HSM client certificate the Amazon Redshift cluster uses to retrieve the data encryption keys stored in an HSM. hsHSMClientCertificateIdentifier :: Lens' HSMStatus (Maybe Text) hsHSMClientCertificateIdentifier = lens _hsHSMClientCertificateIdentifier (\ s a -> s{_hsHSMClientCertificateIdentifier = a}); @@ -2044,13 +1964,7 @@ , _pDescription = Nothing } --- | Specifies how to apply the WLM configuration parameter. Some properties --- can be applied dynamically, while other properties require that any --- associated clusters be rebooted for the configuration changes to be --- applied. For more information about parameters and parameter groups, go --- to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- | Specifies how to apply the WLM configuration parameter. Some properties can be applied dynamically, while other properties require that any associated clusters be rebooted for the configuration changes to be applied. For more information about parameters and parameter groups, go to in the /Amazon Redshift Cluster Management Guide/. pApplyType :: Lens' Parameter (Maybe ParameterApplyType) pApplyType = lens _pApplyType (\ s a -> s{_pApplyType = a}); @@ -2062,13 +1976,11 @@ pMinimumEngineVersion :: Lens' Parameter (Maybe Text) pMinimumEngineVersion = lens _pMinimumEngineVersion (\ s a -> s{_pMinimumEngineVersion = a}); --- | The source of the parameter value, such as \"engine-default\" or --- \"user\". +-- | The source of the parameter value, such as \"engine-default\" or \"user\". pSource :: Lens' Parameter (Maybe Text) pSource = lens _pSource (\ s a -> s{_pSource = a}); --- | If 'true', the parameter can be modified. Some parameters have security --- or operational implications that prevent them from being changed. +-- | If 'true', the parameter can be modified. Some parameters have security or operational implications that prevent them from being changed. pIsModifiable :: Lens' Parameter (Maybe Bool) pIsModifiable = lens _pIsModifiable (\ s a -> s{_pIsModifiable = a}); @@ -2117,9 +2029,7 @@ "ParameterName" =: _pParameterName, "Description" =: _pDescription] --- | Describes cluster attributes that are in a pending state. A change to --- one or more the attributes was requested and is in progress or will be --- applied. +-- | Describes cluster attributes that are in a pending state. A change to one or more the attributes was requested and is in progress or will be applied. -- -- /See:/ 'pendingModifiedValues' smart constructor. data PendingModifiedValues = PendingModifiedValues' @@ -2166,18 +2076,15 @@ , _pmvNodeType = Nothing } --- | The pending or in-progress change of the master user password for the --- cluster. +-- | The pending or in-progress change of the master user password for the cluster. pmvMasterUserPassword :: Lens' PendingModifiedValues (Maybe Text) pmvMasterUserPassword = lens _pmvMasterUserPassword (\ s a -> s{_pmvMasterUserPassword = a}); --- | The pending or in-progress change of the ability to connect to the --- cluster from the public network. +-- | The pending or in-progress change of the ability to connect to the cluster from the public network. pmvPubliclyAccessible :: Lens' PendingModifiedValues (Maybe Bool) pmvPubliclyAccessible = lens _pmvPubliclyAccessible (\ s a -> s{_pmvPubliclyAccessible = a}); --- | The pending or in-progress change of the automated snapshot retention --- period. +-- | The pending or in-progress change of the automated snapshot retention period. pmvAutomatedSnapshotRetentionPeriod :: Lens' PendingModifiedValues (Maybe Int) pmvAutomatedSnapshotRetentionPeriod = lens _pmvAutomatedSnapshotRetentionPeriod (\ s a -> s{_pmvAutomatedSnapshotRetentionPeriod = a}); @@ -2244,8 +2151,7 @@ rcRecurringChargeFrequency :: Lens' RecurringCharge (Maybe Text) rcRecurringChargeFrequency = lens _rcRecurringChargeFrequency (\ s a -> s{_rcRecurringChargeFrequency = a}); --- | The amount charged per the period of time specified by the recurring --- charge frequency. +-- | The amount charged per the period of time specified by the recurring charge frequency. rcRecurringChargeAmount :: Lens' RecurringCharge (Maybe Double) rcRecurringChargeAmount = lens _rcRecurringChargeAmount (\ s a -> s{_rcRecurringChargeAmount = a}); @@ -2259,9 +2165,7 @@ instance NFData RecurringCharge --- | Describes a reserved node. You can call the --- < DescribeReservedNodeOfferings> API to obtain the available reserved --- node offerings. +-- | Describes a reserved node. You can call the < DescribeReservedNodeOfferings> API to obtain the available reserved node offerings. -- -- /See:/ 'reservedNode' smart constructor. data ReservedNode = ReservedNode' @@ -2328,10 +2232,8 @@ -- -- Possible Values: -- --- - pending-payment-This reserved node has recently been purchased, and --- the sale has been approved, but payment has not yet been confirmed. --- - active-This reserved node is owned by the caller and is available --- for use. +-- - pending-payment-This reserved node has recently been purchased, and the sale has been approved, but payment has not yet been confirmed. +-- - active-This reserved node is owned by the caller and is available for use. -- - payment-failed-Payment failed for the purchase attempt. rnState :: Lens' ReservedNode (Maybe Text) rnState = lens _rnState (\ s a -> s{_rnState = a}); @@ -2340,8 +2242,7 @@ rnCurrencyCode :: Lens' ReservedNode (Maybe Text) rnCurrencyCode = lens _rnCurrencyCode (\ s a -> s{_rnCurrencyCode = a}); --- | The time the reservation started. You purchase a reserved node offering --- for a duration. This is the start time of that duration. +-- | The time the reservation started. You purchase a reserved node offering for a duration. This is the start time of that duration. rnStartTime :: Lens' ReservedNode (Maybe UTCTime) rnStartTime = lens _rnStartTime (\ s a -> s{_rnStartTime = a}) . mapping _Time; @@ -2361,8 +2262,7 @@ rnRecurringCharges :: Lens' ReservedNode [RecurringCharge] rnRecurringCharges = lens _rnRecurringCharges (\ s a -> s{_rnRecurringCharges = a}) . _Default . _Coerce; --- | The anticipated utilization of the reserved node, as defined in the --- reserved node offering. +-- | The anticipated utilization of the reserved node, as defined in the reserved node offering. rnOfferingType :: Lens' ReservedNode (Maybe Text) rnOfferingType = lens _rnOfferingType (\ s a -> s{_rnOfferingType = a}); @@ -2458,19 +2358,15 @@ rnoReservedNodeOfferingId :: Lens' ReservedNodeOffering (Maybe Text) rnoReservedNodeOfferingId = lens _rnoReservedNodeOfferingId (\ s a -> s{_rnoReservedNodeOfferingId = a}); --- | The charge to your account regardless of whether you are creating any --- clusters using the node offering. Recurring charges are only in effect --- for heavy-utilization reserved nodes. +-- | The charge to your account regardless of whether you are creating any clusters using the node offering. Recurring charges are only in effect for heavy-utilization reserved nodes. rnoRecurringCharges :: Lens' ReservedNodeOffering [RecurringCharge] rnoRecurringCharges = lens _rnoRecurringCharges (\ s a -> s{_rnoRecurringCharges = a}) . _Default . _Coerce; --- | The anticipated utilization of the reserved node, as defined in the --- reserved node offering. +-- | The anticipated utilization of the reserved node, as defined in the reserved node offering. rnoOfferingType :: Lens' ReservedNodeOffering (Maybe Text) rnoOfferingType = lens _rnoOfferingType (\ s a -> s{_rnoOfferingType = a}); --- | The rate you are charged for each hour the cluster that is using the --- offering is running. +-- | The rate you are charged for each hour the cluster that is using the offering is running. rnoUsagePrice :: Lens' ReservedNodeOffering (Maybe Double) rnoUsagePrice = lens _rnoUsagePrice (\ s a -> s{_rnoUsagePrice = a}); @@ -2478,8 +2374,7 @@ rnoNodeType :: Lens' ReservedNodeOffering (Maybe Text) rnoNodeType = lens _rnoNodeType (\ s a -> s{_rnoNodeType = a}); --- | The upfront fixed charge you will pay to purchase the specific reserved --- node offering. +-- | The upfront fixed charge you will pay to purchase the specific reserved node offering. rnoFixedPrice :: Lens' ReservedNodeOffering (Maybe Double) rnoFixedPrice = lens _rnoFixedPrice (\ s a -> s{_rnoFixedPrice = a}); @@ -2505,8 +2400,7 @@ instance NFData ReservedNodeOffering --- | Describes the status of a cluster restore action. Returns null if the --- cluster was not created by restoring a snapshot. +-- | Describes the status of a cluster restore action. Returns null if the cluster was not created by restoring a snapshot. -- -- /See:/ 'restoreStatus' smart constructor. data RestoreStatus = RestoreStatus' @@ -2545,28 +2439,23 @@ , _rsSnapshotSizeInMegaBytes = Nothing } --- | The status of the restore action. Returns starting, restoring, --- completed, or failed. +-- | The status of the restore action. Returns starting, restoring, completed, or failed. rsStatus :: Lens' RestoreStatus (Maybe Text) rsStatus = lens _rsStatus (\ s a -> s{_rsStatus = a}); --- | The estimate of the time remaining before the restore will complete. --- Returns 0 for a completed restore. +-- | The estimate of the time remaining before the restore will complete. Returns 0 for a completed restore. rsEstimatedTimeToCompletionInSeconds :: Lens' RestoreStatus (Maybe Integer) rsEstimatedTimeToCompletionInSeconds = lens _rsEstimatedTimeToCompletionInSeconds (\ s a -> s{_rsEstimatedTimeToCompletionInSeconds = a}); --- | The number of megabytes per second being transferred from the backup --- storage. Returns the average rate for a completed backup. +-- | The number of megabytes per second being transferred from the backup storage. Returns the average rate for a completed backup. rsCurrentRestoreRateInMegaBytesPerSecond :: Lens' RestoreStatus (Maybe Double) rsCurrentRestoreRateInMegaBytesPerSecond = lens _rsCurrentRestoreRateInMegaBytesPerSecond (\ s a -> s{_rsCurrentRestoreRateInMegaBytesPerSecond = a}); --- | The number of megabytes that have been transferred from snapshot --- storage. +-- | The number of megabytes that have been transferred from snapshot storage. rsProgressInMegaBytes :: Lens' RestoreStatus (Maybe Integer) rsProgressInMegaBytes = lens _rsProgressInMegaBytes (\ s a -> s{_rsProgressInMegaBytes = a}); --- | The amount of time an in-progress restore has been running, or the --- amount of time it took a completed restore to finish. +-- | The amount of time an in-progress restore has been running, or the amount of time it took a completed restore to finish. rsElapsedTimeInSeconds :: Lens' RestoreStatus (Maybe Integer) rsElapsedTimeInSeconds = lens _rsElapsedTimeInSeconds (\ s a -> s{_rsElapsedTimeInSeconds = a}); @@ -2715,25 +2604,19 @@ , _sDBName = Nothing } --- | The snapshot status. The value of the status depends on the API --- operation used. +-- | The snapshot status. The value of the status depends on the API operation used. -- --- - < CreateClusterSnapshot> and < CopyClusterSnapshot> returns status --- as \"creating\". --- - < DescribeClusterSnapshots> returns status as \"creating\", --- \"available\", \"final snapshot\", or \"failed\". +-- - < CreateClusterSnapshot> and < CopyClusterSnapshot> returns status as \"creating\". +-- - < DescribeClusterSnapshots> returns status as \"creating\", \"available\", \"final snapshot\", or \"failed\". -- - < DeleteClusterSnapshot> returns status as \"deleted\". sStatus :: Lens' Snapshot (Maybe Text) sStatus = lens _sStatus (\ s a -> s{_sStatus = a}); --- | The list of node types that this cluster snapshot is able to restore --- into. +-- | The list of node types that this cluster snapshot is able to restore into. sRestorableNodeTypes :: Lens' Snapshot [Text] sRestorableNodeTypes = lens _sRestorableNodeTypes (\ s a -> s{_sRestorableNodeTypes = a}) . _Default . _Coerce; --- | A list of the AWS customer accounts authorized to restore the snapshot. --- Returns 'null' if no accounts are authorized. Visible only to the --- snapshot owner. +-- | A list of the AWS customer accounts authorized to restore the snapshot. Returns 'null' if no accounts are authorized. Visible only to the snapshot owner. sAccountsWithRestoreAccess :: Lens' Snapshot [AccountWithRestoreAccess] sAccountsWithRestoreAccess = lens _sAccountsWithRestoreAccess (\ s a -> s{_sAccountsWithRestoreAccess = a}) . _Default . _Coerce; @@ -2741,9 +2624,7 @@ sSnapshotIdentifier :: Lens' Snapshot (Maybe Text) sSnapshotIdentifier = lens _sSnapshotIdentifier (\ s a -> s{_sSnapshotIdentifier = a}); --- | A boolean that indicates whether the snapshot data is encrypted using --- the HSM keys of the source cluster. 'true' indicates that the data is --- encrypted using HSM keys. +-- | A boolean that indicates whether the snapshot data is encrypted using the HSM keys of the source cluster. 'true' indicates that the data is encrypted using HSM keys. sEncryptedWithHSM :: Lens' Snapshot (Maybe Bool) sEncryptedWithHSM = lens _sEncryptedWithHSM (\ s a -> s{_sEncryptedWithHSM = a}); @@ -2755,13 +2636,11 @@ sSourceRegion :: Lens' Snapshot (Maybe Text) sSourceRegion = lens _sSourceRegion (\ s a -> s{_sSourceRegion = a}); --- | The VPC identifier of the cluster if the snapshot is from a cluster in a --- VPC. Otherwise, this field is not in the output. +-- | The VPC identifier of the cluster if the snapshot is from a cluster in a VPC. Otherwise, this field is not in the output. sVPCId :: Lens' Snapshot (Maybe Text) sVPCId = lens _sVPCId (\ s a -> s{_sVPCId = a}); --- | The number of megabytes that have been transferred to the snapshot --- backup. +-- | The number of megabytes that have been transferred to the snapshot backup. sBackupProgressInMegaBytes :: Lens' Snapshot (Maybe Double) sBackupProgressInMegaBytes = lens _sBackupProgressInMegaBytes (\ s a -> s{_sBackupProgressInMegaBytes = a}); @@ -2777,14 +2656,11 @@ sNumberOfNodes :: Lens' Snapshot (Maybe Int) sNumberOfNodes = lens _sNumberOfNodes (\ s a -> s{_sNumberOfNodes = a}); --- | The snapshot type. Snapshots created using < CreateClusterSnapshot> and --- < CopyClusterSnapshot> will be of type \"manual\". +-- | The snapshot type. Snapshots created using < CreateClusterSnapshot> and < CopyClusterSnapshot> will be of type \"manual\". sSnapshotType :: Lens' Snapshot (Maybe Text) sSnapshotType = lens _sSnapshotType (\ s a -> s{_sSnapshotType = a}); --- | The AWS Key Management Service (KMS) key ID of the encryption key that --- was used to encrypt data in the cluster from which the snapshot was --- taken. +-- | The AWS Key Management Service (KMS) key ID of the encryption key that was used to encrypt data in the cluster from which the snapshot was taken. sKMSKeyId :: Lens' Snapshot (Maybe Text) sKMSKeyId = lens _sKMSKeyId (\ s a -> s{_sKMSKeyId = a}); @@ -2792,25 +2668,19 @@ sAvailabilityZone :: Lens' Snapshot (Maybe Text) sAvailabilityZone = lens _sAvailabilityZone (\ s a -> s{_sAvailabilityZone = a}); --- | The number of megabytes per second being transferred to the snapshot --- backup. Returns '0' for a completed backup. +-- | The number of megabytes per second being transferred to the snapshot backup. Returns '0' for a completed backup. sCurrentBackupRateInMegaBytesPerSecond :: Lens' Snapshot (Maybe Double) sCurrentBackupRateInMegaBytesPerSecond = lens _sCurrentBackupRateInMegaBytesPerSecond (\ s a -> s{_sCurrentBackupRateInMegaBytesPerSecond = a}); --- | The time (UTC) when Amazon Redshift began the snapshot. A snapshot --- contains a copy of the cluster data as of this exact time. +-- | The time (UTC) when Amazon Redshift began the snapshot. A snapshot contains a copy of the cluster data as of this exact time. sSnapshotCreateTime :: Lens' Snapshot (Maybe UTCTime) sSnapshotCreateTime = lens _sSnapshotCreateTime (\ s a -> s{_sSnapshotCreateTime = a}) . mapping _Time; --- | The version ID of the Amazon Redshift engine that is running on the --- cluster. +-- | The version ID of the Amazon Redshift engine that is running on the cluster. sClusterVersion :: Lens' Snapshot (Maybe Text) sClusterVersion = lens _sClusterVersion (\ s a -> s{_sClusterVersion = a}); --- | For manual snapshots, the AWS customer account used to create or copy --- the snapshot. For automatic snapshots, the owner of the cluster. The --- owner can perform all snapshot actions, such as sharing a manual --- snapshot. +-- | For manual snapshots, the AWS customer account used to create or copy the snapshot. For automatic snapshots, the owner of the cluster. The owner can perform all snapshot actions, such as sharing a manual snapshot. sOwnerAccount :: Lens' Snapshot (Maybe Text) sOwnerAccount = lens _sOwnerAccount (\ s a -> s{_sOwnerAccount = a}); @@ -2818,8 +2688,7 @@ sNodeType :: Lens' Snapshot (Maybe Text) sNodeType = lens _sNodeType (\ s a -> s{_sNodeType = a}); --- | The amount of time an in-progress snapshot backup has been running, or --- the amount of time it took a completed backup to finish. +-- | The amount of time an in-progress snapshot backup has been running, or the amount of time it took a completed backup to finish. sElapsedTimeInSeconds :: Lens' Snapshot (Maybe Integer) sElapsedTimeInSeconds = lens _sElapsedTimeInSeconds (\ s a -> s{_sElapsedTimeInSeconds = a}); @@ -2827,8 +2696,7 @@ sClusterCreateTime :: Lens' Snapshot (Maybe UTCTime) sClusterCreateTime = lens _sClusterCreateTime (\ s a -> s{_sClusterCreateTime = a}) . mapping _Time; --- | The estimate of the time remaining before the snapshot backup will --- complete. Returns '0' for a completed backup. +-- | The estimate of the time remaining before the snapshot backup will complete. Returns '0' for a completed backup. sEstimatedSecondsToCompletion :: Lens' Snapshot (Maybe Integer) sEstimatedSecondsToCompletion = lens _sEstimatedSecondsToCompletion (\ s a -> s{_sEstimatedSecondsToCompletion = a}); @@ -2844,8 +2712,7 @@ sPort :: Lens' Snapshot (Maybe Int) sPort = lens _sPort (\ s a -> s{_sPort = a}); --- | The size of the complete set of backup data that would be used to --- restore the cluster. +-- | The size of the complete set of backup data that would be used to restore the cluster. sTotalBackupSizeInMegaBytes :: Lens' Snapshot (Maybe Double) sTotalBackupSizeInMegaBytes = lens _sTotalBackupSizeInMegaBytes (\ s a -> s{_sTotalBackupSizeInMegaBytes = a}); @@ -2894,13 +2761,9 @@ instance NFData Snapshot --- | The snapshot copy grant that grants Amazon Redshift permission to --- encrypt copied snapshots with the specified customer master key (CMK) --- from AWS KMS in the destination region. +-- | The snapshot copy grant that grants Amazon Redshift permission to encrypt copied snapshots with the specified customer master key (CMK) from AWS KMS in the destination region. -- --- For more information about managing snapshot copy grants, go to --- --- in the /Amazon Redshift Cluster Management Guide/. +-- For more information about managing snapshot copy grants, go to in the /Amazon Redshift Cluster Management Guide/. -- -- /See:/ 'snapshotCopyGrant' smart constructor. data SnapshotCopyGrant = SnapshotCopyGrant' @@ -2927,8 +2790,7 @@ , _scgTags = Nothing } --- | The unique identifier of the customer master key (CMK) in AWS KMS to --- which Amazon Redshift is granted permission. +-- | The unique identifier of the customer master key (CMK) in AWS KMS to which Amazon Redshift is granted permission. scgKMSKeyId :: Lens' SnapshotCopyGrant (Maybe Text) scgKMSKeyId = lens _scgKMSKeyId (\ s a -> s{_scgKMSKeyId = a}); @@ -3075,8 +2937,7 @@ -- | A value that describes the current state of the table restore request. -- --- Valid Values: 'SUCCEEDED', 'FAILED', 'CANCELED', 'PENDING', --- 'IN_PROGRESS' +-- Valid Values: 'SUCCEEDED', 'FAILED', 'CANCELED', 'PENDING', 'IN_PROGRESS' trsStatus :: Lens' TableRestoreStatus (Maybe TableRestoreStatusType) trsStatus = lens _trsStatus (\ s a -> s{_trsStatus = a}); @@ -3096,8 +2957,7 @@ trsTableRestoreRequestId :: Lens' TableRestoreStatus (Maybe Text) trsTableRestoreRequestId = lens _trsTableRestoreRequestId (\ s a -> s{_trsTableRestoreRequestId = a}); --- | The name of the table to create as a result of the table restore --- request. +-- | The name of the table to create as a result of the table restore request. trsNewTableName :: Lens' TableRestoreStatus (Maybe Text) trsNewTableName = lens _trsNewTableName (\ s a -> s{_trsNewTableName = a}); @@ -3109,13 +2969,11 @@ trsSourceSchemaName :: Lens' TableRestoreStatus (Maybe Text) trsSourceSchemaName = lens _trsSourceSchemaName (\ s a -> s{_trsSourceSchemaName = a}); --- | The identifier of the Amazon Redshift cluster that the table is being --- restored to. +-- | The identifier of the Amazon Redshift cluster that the table is being restored to. trsClusterIdentifier :: Lens' TableRestoreStatus (Maybe Text) trsClusterIdentifier = lens _trsClusterIdentifier (\ s a -> s{_trsClusterIdentifier = a}); --- | The time that the table restore request was made, in Universal --- Coordinated Time (UTC). +-- | The time that the table restore request was made, in Universal Coordinated Time (UTC). trsRequestTime :: Lens' TableRestoreStatus (Maybe UTCTime) trsRequestTime = lens _trsRequestTime (\ s a -> s{_trsRequestTime = a}) . mapping _Time; @@ -3131,8 +2989,7 @@ trsProgressInMegaBytes :: Lens' TableRestoreStatus (Maybe Integer) trsProgressInMegaBytes = lens _trsProgressInMegaBytes (\ s a -> s{_trsProgressInMegaBytes = a}); --- | A description of the status of the table restore request. Status values --- include 'SUCCEEDED', 'FAILED', 'CANCELED', 'PENDING', 'IN_PROGRESS'. +-- | A description of the status of the table restore request. Status values include 'SUCCEEDED', 'FAILED', 'CANCELED', 'PENDING', 'IN_PROGRESS'. trsMessage :: Lens' TableRestoreStatus (Maybe Text) trsMessage = lens _trsMessage (\ s a -> s{_trsMessage = a}); @@ -3231,8 +3088,7 @@ trTag :: Lens' TaggedResource (Maybe Tag) trTag = lens _trTag (\ s a -> s{_trTag = a}); --- | The type of resource with which the tag is associated. Valid resource --- types are: +-- | The type of resource with which the tag is associated. Valid resource types are: -- -- - Cluster -- - CIDR\/IP @@ -3244,15 +3100,11 @@ -- - HSM certificate -- - Parameter group -- --- For more information about Amazon Redshift resource types and --- constructing ARNs, go to --- --- in the Amazon Redshift Cluster Management Guide. +-- For more information about Amazon Redshift resource types and constructing ARNs, go to in the Amazon Redshift Cluster Management Guide. trResourceType :: Lens' TaggedResource (Maybe Text) trResourceType = lens _trResourceType (\ s a -> s{_trResourceType = a}); --- | The Amazon Resource Name (ARN) with which the tag is associated. For --- example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. +-- | The Amazon Resource Name (ARN) with which the tag is associated. For example, 'arn:aws:redshift:us-east-1:123456789:cluster:t1'. trResourceName :: Lens' TaggedResource (Maybe Text) trResourceName = lens _trResourceName (\ s a -> s{_trResourceName = a}); diff --git a/test/Test/AWS/Gen/Redshift.hs b/test/Test/AWS/Gen/Redshift.hs --- a/test/Test/AWS/Gen/Redshift.hs +++ b/test/Test/AWS/Gen/Redshift.hs @@ -28,379 +28,379 @@ -- fixtures :: TestTree -- fixtures = -- [ testGroup "request" --- [ testDescribeClusters $ +-- [ requestDescribeClusters $ -- describeClusters -- --- , testDescribeTags $ +-- , requestDescribeTags $ -- describeTags -- --- , testDeleteClusterSubnetGroup $ +-- , requestDeleteClusterSubnetGroup $ -- deleteClusterSubnetGroup -- --- , testDisableLogging $ +-- , requestDisableLogging $ -- disableLogging -- --- , testModifyEventSubscription $ +-- , requestModifyEventSubscription $ -- modifyEventSubscription -- --- , testDeleteClusterSnapshot $ +-- , requestDeleteClusterSnapshot $ -- deleteClusterSnapshot -- --- , testPurchaseReservedNodeOffering $ +-- , requestPurchaseReservedNodeOffering $ -- purchaseReservedNodeOffering -- --- , testDescribeReservedNodeOfferings $ +-- , requestDescribeReservedNodeOfferings $ -- describeReservedNodeOfferings -- --- , testDescribeEvents $ +-- , requestDescribeEvents $ -- describeEvents -- --- , testDescribeReservedNodes $ +-- , requestDescribeReservedNodes $ -- describeReservedNodes -- --- , testDescribeClusterParameterGroups $ +-- , requestDescribeClusterParameterGroups $ -- describeClusterParameterGroups -- --- , testEnableLogging $ +-- , requestEnableLogging $ -- enableLogging -- --- , testCreateClusterSubnetGroup $ +-- , requestCreateClusterSubnetGroup $ -- createClusterSubnetGroup -- --- , testDeleteClusterParameterGroup $ +-- , requestDeleteClusterParameterGroup $ -- deleteClusterParameterGroup -- --- , testDescribeClusterSecurityGroups $ +-- , requestDescribeClusterSecurityGroups $ -- describeClusterSecurityGroups -- --- , testCreateTags $ +-- , requestCreateTags $ -- createTags -- --- , testEnableSnapshotCopy $ +-- , requestEnableSnapshotCopy $ -- enableSnapshotCopy -- --- , testDescribeClusterSnapshots $ +-- , requestDescribeClusterSnapshots $ -- describeClusterSnapshots -- --- , testDeleteTags $ +-- , requestDeleteTags $ -- deleteTags -- --- , testDescribeClusterSubnetGroups $ +-- , requestDescribeClusterSubnetGroups $ -- describeClusterSubnetGroups -- --- , testModifySnapshotCopyRetentionPeriod $ +-- , requestModifySnapshotCopyRetentionPeriod $ -- modifySnapshotCopyRetentionPeriod -- --- , testModifyClusterIAMRoles $ +-- , requestModifyClusterIAMRoles $ -- modifyClusterIAMRoles -- --- , testAuthorizeSnapshotAccess $ +-- , requestAuthorizeSnapshotAccess $ -- authorizeSnapshotAccess -- --- , testRebootCluster $ +-- , requestRebootCluster $ -- rebootCluster -- --- , testDeleteCluster $ +-- , requestDeleteCluster $ -- deleteCluster -- --- , testCreateEventSubscription $ +-- , requestCreateEventSubscription $ -- createEventSubscription -- --- , testDescribeOrderableClusterOptions $ +-- , requestDescribeOrderableClusterOptions $ -- describeOrderableClusterOptions -- --- , testCreateCluster $ +-- , requestCreateCluster $ -- createCluster -- --- , testCreateHSMClientCertificate $ +-- , requestCreateHSMClientCertificate $ -- createHSMClientCertificate -- --- , testRestoreTableFromClusterSnapshot $ +-- , requestRestoreTableFromClusterSnapshot $ -- restoreTableFromClusterSnapshot -- --- , testDescribeDefaultClusterParameters $ +-- , requestDescribeDefaultClusterParameters $ -- describeDefaultClusterParameters -- --- , testDeleteEventSubscription $ +-- , requestDeleteEventSubscription $ -- deleteEventSubscription -- --- , testResetClusterParameterGroup $ +-- , requestResetClusterParameterGroup $ -- resetClusterParameterGroup -- --- , testDescribeEventSubscriptions $ +-- , requestDescribeEventSubscriptions $ -- describeEventSubscriptions -- --- , testRevokeClusterSecurityGroupIngress $ +-- , requestRevokeClusterSecurityGroupIngress $ -- revokeClusterSecurityGroupIngress -- --- , testDescribeHSMClientCertificates $ +-- , requestDescribeHSMClientCertificates $ -- describeHSMClientCertificates -- --- , testModifyClusterParameterGroup $ +-- , requestModifyClusterParameterGroup $ -- modifyClusterParameterGroup -- --- , testCreateClusterSecurityGroup $ +-- , requestCreateClusterSecurityGroup $ -- createClusterSecurityGroup -- --- , testDescribeEventCategories $ +-- , requestDescribeEventCategories $ -- describeEventCategories -- --- , testDescribeResize $ +-- , requestDescribeResize $ -- describeResize -- --- , testDeleteHSMConfiguration $ +-- , requestDeleteHSMConfiguration $ -- deleteHSMConfiguration -- --- , testAuthorizeClusterSecurityGroupIngress $ +-- , requestAuthorizeClusterSecurityGroupIngress $ -- authorizeClusterSecurityGroupIngress -- --- , testDescribeTableRestoreStatus $ +-- , requestDescribeTableRestoreStatus $ -- describeTableRestoreStatus -- --- , testCreateClusterSnapshot $ +-- , requestCreateClusterSnapshot $ -- createClusterSnapshot -- --- , testCreateHSMConfiguration $ +-- , requestCreateHSMConfiguration $ -- createHSMConfiguration -- --- , testDescribeLoggingStatus $ +-- , requestDescribeLoggingStatus $ -- describeLoggingStatus -- --- , testModifyCluster $ +-- , requestModifyCluster $ -- modifyCluster -- --- , testDeleteClusterSecurityGroup $ +-- , requestDeleteClusterSecurityGroup $ -- deleteClusterSecurityGroup -- --- , testDisableSnapshotCopy $ +-- , requestDisableSnapshotCopy $ -- disableSnapshotCopy -- --- , testDescribeClusterParameters $ +-- , requestDescribeClusterParameters $ -- describeClusterParameters -- --- , testRestoreFromClusterSnapshot $ +-- , requestRestoreFromClusterSnapshot $ -- restoreFromClusterSnapshot -- --- , testCreateClusterParameterGroup $ +-- , requestCreateClusterParameterGroup $ -- createClusterParameterGroup -- --- , testRevokeSnapshotAccess $ +-- , requestRevokeSnapshotAccess $ -- revokeSnapshotAccess -- --- , testDescribeHSMConfigurations $ +-- , requestDescribeHSMConfigurations $ -- describeHSMConfigurations -- --- , testCreateSnapshotCopyGrant $ +-- , requestCreateSnapshotCopyGrant $ -- createSnapshotCopyGrant -- --- , testCopyClusterSnapshot $ +-- , requestCopyClusterSnapshot $ -- copyClusterSnapshot -- --- , testDeleteHSMClientCertificate $ +-- , requestDeleteHSMClientCertificate $ -- deleteHSMClientCertificate -- --- , testDeleteSnapshotCopyGrant $ +-- , requestDeleteSnapshotCopyGrant $ -- deleteSnapshotCopyGrant -- --- , testDescribeClusterVersions $ +-- , requestDescribeClusterVersions $ -- describeClusterVersions -- --- , testModifyClusterSubnetGroup $ +-- , requestModifyClusterSubnetGroup $ -- modifyClusterSubnetGroup -- --- , testRotateEncryptionKey $ +-- , requestRotateEncryptionKey $ -- rotateEncryptionKey -- --- , testDescribeSnapshotCopyGrants $ +-- , requestDescribeSnapshotCopyGrants $ -- describeSnapshotCopyGrants -- -- ] -- , testGroup "response" --- [ testDescribeClustersResponse $ +-- [ responseDescribeClusters $ -- describeClustersResponse -- --- , testDescribeTagsResponse $ +-- , responseDescribeTags $ -- describeTagsResponse -- --- , testDeleteClusterSubnetGroupResponse $ +-- , responseDeleteClusterSubnetGroup $ -- deleteClusterSubnetGroupResponse -- --- , testDisableLoggingResponse $ +-- , responseDisableLogging $ -- loggingStatus -- --- , testModifyEventSubscriptionResponse $ +-- , responseModifyEventSubscription $ -- modifyEventSubscriptionResponse -- --- , testDeleteClusterSnapshotResponse $ +-- , responseDeleteClusterSnapshot $ -- deleteClusterSnapshotResponse -- --- , testPurchaseReservedNodeOfferingResponse $ +-- , responsePurchaseReservedNodeOffering $ -- purchaseReservedNodeOfferingResponse -- --- , testDescribeReservedNodeOfferingsResponse $ +-- , responseDescribeReservedNodeOfferings $ -- describeReservedNodeOfferingsResponse -- --- , testDescribeEventsResponse $ +-- , responseDescribeEvents $ -- describeEventsResponse -- --- , testDescribeReservedNodesResponse $ +-- , responseDescribeReservedNodes $ -- describeReservedNodesResponse -- --- , testDescribeClusterParameterGroupsResponse $ +-- , responseDescribeClusterParameterGroups $ -- describeClusterParameterGroupsResponse -- --- , testEnableLoggingResponse $ +-- , responseEnableLogging $ -- loggingStatus -- --- , testCreateClusterSubnetGroupResponse $ +-- , responseCreateClusterSubnetGroup $ -- createClusterSubnetGroupResponse -- --- , testDeleteClusterParameterGroupResponse $ +-- , responseDeleteClusterParameterGroup $ -- deleteClusterParameterGroupResponse -- --- , testDescribeClusterSecurityGroupsResponse $ +-- , responseDescribeClusterSecurityGroups $ -- describeClusterSecurityGroupsResponse -- --- , testCreateTagsResponse $ +-- , responseCreateTags $ -- createTagsResponse -- --- , testEnableSnapshotCopyResponse $ +-- , responseEnableSnapshotCopy $ -- enableSnapshotCopyResponse -- --- , testDescribeClusterSnapshotsResponse $ +-- , responseDescribeClusterSnapshots $ -- describeClusterSnapshotsResponse -- --- , testDeleteTagsResponse $ +-- , responseDeleteTags $ -- deleteTagsResponse -- --- , testDescribeClusterSubnetGroupsResponse $ +-- , responseDescribeClusterSubnetGroups $ -- describeClusterSubnetGroupsResponse -- --- , testModifySnapshotCopyRetentionPeriodResponse $ +-- , responseModifySnapshotCopyRetentionPeriod $ -- modifySnapshotCopyRetentionPeriodResponse -- --- , testModifyClusterIAMRolesResponse $ +-- , responseModifyClusterIAMRoles $ -- modifyClusterIAMRolesResponse -- --- , testAuthorizeSnapshotAccessResponse $ +-- , responseAuthorizeSnapshotAccess $ -- authorizeSnapshotAccessResponse -- --- , testRebootClusterResponse $ +-- , responseRebootCluster $ -- rebootClusterResponse -- --- , testDeleteClusterResponse $ +-- , responseDeleteCluster $ -- deleteClusterResponse -- --- , testCreateEventSubscriptionResponse $ +-- , responseCreateEventSubscription $ -- createEventSubscriptionResponse -- --- , testDescribeOrderableClusterOptionsResponse $ +-- , responseDescribeOrderableClusterOptions $ -- describeOrderableClusterOptionsResponse -- --- , testCreateClusterResponse $ +-- , responseCreateCluster $ -- createClusterResponse -- --- , testCreateHSMClientCertificateResponse $ +-- , responseCreateHSMClientCertificate $ -- createHSMClientCertificateResponse -- --- , testRestoreTableFromClusterSnapshotResponse $ +-- , responseRestoreTableFromClusterSnapshot $ -- restoreTableFromClusterSnapshotResponse -- --- , testDescribeDefaultClusterParametersResponse $ +-- , responseDescribeDefaultClusterParameters $ -- describeDefaultClusterParametersResponse -- --- , testDeleteEventSubscriptionResponse $ +-- , responseDeleteEventSubscription $ -- deleteEventSubscriptionResponse -- --- , testResetClusterParameterGroupResponse $ +-- , responseResetClusterParameterGroup $ -- clusterParameterGroupNameMessage -- --- , testDescribeEventSubscriptionsResponse $ +-- , responseDescribeEventSubscriptions $ -- describeEventSubscriptionsResponse -- --- , testRevokeClusterSecurityGroupIngressResponse $ +-- , responseRevokeClusterSecurityGroupIngress $ -- revokeClusterSecurityGroupIngressResponse -- --- , testDescribeHSMClientCertificatesResponse $ +-- , responseDescribeHSMClientCertificates $ -- describeHSMClientCertificatesResponse -- --- , testModifyClusterParameterGroupResponse $ +-- , responseModifyClusterParameterGroup $ -- clusterParameterGroupNameMessage -- --- , testCreateClusterSecurityGroupResponse $ +-- , responseCreateClusterSecurityGroup $ -- createClusterSecurityGroupResponse -- --- , testDescribeEventCategoriesResponse $ +-- , responseDescribeEventCategories $ -- describeEventCategoriesResponse -- --- , testDescribeResizeResponse $ +-- , responseDescribeResize $ -- describeResizeResponse -- --- , testDeleteHSMConfigurationResponse $ +-- , responseDeleteHSMConfiguration $ -- deleteHSMConfigurationResponse -- --- , testAuthorizeClusterSecurityGroupIngressResponse $ +-- , responseAuthorizeClusterSecurityGroupIngress $ -- authorizeClusterSecurityGroupIngressResponse -- --- , testDescribeTableRestoreStatusResponse $ +-- , responseDescribeTableRestoreStatus $ -- describeTableRestoreStatusResponse -- --- , testCreateClusterSnapshotResponse $ +-- , responseCreateClusterSnapshot $ -- createClusterSnapshotResponse -- --- , testCreateHSMConfigurationResponse $ +-- , responseCreateHSMConfiguration $ -- createHSMConfigurationResponse -- --- , testDescribeLoggingStatusResponse $ +-- , responseDescribeLoggingStatus $ -- loggingStatus -- --- , testModifyClusterResponse $ +-- , responseModifyCluster $ -- modifyClusterResponse -- --- , testDeleteClusterSecurityGroupResponse $ +-- , responseDeleteClusterSecurityGroup $ -- deleteClusterSecurityGroupResponse -- --- , testDisableSnapshotCopyResponse $ +-- , responseDisableSnapshotCopy $ -- disableSnapshotCopyResponse -- --- , testDescribeClusterParametersResponse $ +-- , responseDescribeClusterParameters $ -- describeClusterParametersResponse -- --- , testRestoreFromClusterSnapshotResponse $ +-- , responseRestoreFromClusterSnapshot $ -- restoreFromClusterSnapshotResponse -- --- , testCreateClusterParameterGroupResponse $ +-- , responseCreateClusterParameterGroup $ -- createClusterParameterGroupResponse -- --- , testRevokeSnapshotAccessResponse $ +-- , responseRevokeSnapshotAccess $ -- revokeSnapshotAccessResponse -- --- , testDescribeHSMConfigurationsResponse $ +-- , responseDescribeHSMConfigurations $ -- describeHSMConfigurationsResponse -- --- , testCreateSnapshotCopyGrantResponse $ +-- , responseCreateSnapshotCopyGrant $ -- createSnapshotCopyGrantResponse -- --- , testCopyClusterSnapshotResponse $ +-- , responseCopyClusterSnapshot $ -- copyClusterSnapshotResponse -- --- , testDeleteHSMClientCertificateResponse $ +-- , responseDeleteHSMClientCertificate $ -- deleteHSMClientCertificateResponse -- --- , testDeleteSnapshotCopyGrantResponse $ +-- , responseDeleteSnapshotCopyGrant $ -- deleteSnapshotCopyGrantResponse -- --- , testDescribeClusterVersionsResponse $ +-- , responseDescribeClusterVersions $ -- describeClusterVersionsResponse -- --- , testModifyClusterSubnetGroupResponse $ +-- , responseModifyClusterSubnetGroup $ -- modifyClusterSubnetGroupResponse -- --- , testRotateEncryptionKeyResponse $ +-- , responseRotateEncryptionKey $ -- rotateEncryptionKeyResponse -- --- , testDescribeSnapshotCopyGrantsResponse $ +-- , responseDescribeSnapshotCopyGrants $ -- describeSnapshotCopyGrantsResponse -- -- ] @@ -408,747 +408,747 @@ -- Requests -testDescribeClusters :: DescribeClusters -> TestTree -testDescribeClusters = req +requestDescribeClusters :: DescribeClusters -> TestTree +requestDescribeClusters = req "DescribeClusters" "fixture/DescribeClusters.yaml" -testDescribeTags :: DescribeTags -> TestTree -testDescribeTags = req +requestDescribeTags :: DescribeTags -> TestTree +requestDescribeTags = req "DescribeTags" "fixture/DescribeTags.yaml" -testDeleteClusterSubnetGroup :: DeleteClusterSubnetGroup -> TestTree -testDeleteClusterSubnetGroup = req +requestDeleteClusterSubnetGroup :: DeleteClusterSubnetGroup -> TestTree +requestDeleteClusterSubnetGroup = req "DeleteClusterSubnetGroup" "fixture/DeleteClusterSubnetGroup.yaml" -testDisableLogging :: DisableLogging -> TestTree -testDisableLogging = req +requestDisableLogging :: DisableLogging -> TestTree +requestDisableLogging = req "DisableLogging" "fixture/DisableLogging.yaml" -testModifyEventSubscription :: ModifyEventSubscription -> TestTree -testModifyEventSubscription = req +requestModifyEventSubscription :: ModifyEventSubscription -> TestTree +requestModifyEventSubscription = req "ModifyEventSubscription" "fixture/ModifyEventSubscription.yaml" -testDeleteClusterSnapshot :: DeleteClusterSnapshot -> TestTree -testDeleteClusterSnapshot = req +requestDeleteClusterSnapshot :: DeleteClusterSnapshot -> TestTree +requestDeleteClusterSnapshot = req "DeleteClusterSnapshot" "fixture/DeleteClusterSnapshot.yaml" -testPurchaseReservedNodeOffering :: PurchaseReservedNodeOffering -> TestTree -testPurchaseReservedNodeOffering = req +requestPurchaseReservedNodeOffering :: PurchaseReservedNodeOffering -> TestTree +requestPurchaseReservedNodeOffering = req "PurchaseReservedNodeOffering" "fixture/PurchaseReservedNodeOffering.yaml" -testDescribeReservedNodeOfferings :: DescribeReservedNodeOfferings -> TestTree -testDescribeReservedNodeOfferings = req +requestDescribeReservedNodeOfferings :: DescribeReservedNodeOfferings -> TestTree +requestDescribeReservedNodeOfferings = req "DescribeReservedNodeOfferings" "fixture/DescribeReservedNodeOfferings.yaml" -testDescribeEvents :: DescribeEvents -> TestTree -testDescribeEvents = req +requestDescribeEvents :: DescribeEvents -> TestTree +requestDescribeEvents = req "DescribeEvents" "fixture/DescribeEvents.yaml" -testDescribeReservedNodes :: DescribeReservedNodes -> TestTree -testDescribeReservedNodes = req +requestDescribeReservedNodes :: DescribeReservedNodes -> TestTree +requestDescribeReservedNodes = req "DescribeReservedNodes" "fixture/DescribeReservedNodes.yaml" -testDescribeClusterParameterGroups :: DescribeClusterParameterGroups -> TestTree -testDescribeClusterParameterGroups = req +requestDescribeClusterParameterGroups :: DescribeClusterParameterGroups -> TestTree +requestDescribeClusterParameterGroups = req "DescribeClusterParameterGroups" "fixture/DescribeClusterParameterGroups.yaml" -testEnableLogging :: EnableLogging -> TestTree -testEnableLogging = req +requestEnableLogging :: EnableLogging -> TestTree +requestEnableLogging = req "EnableLogging" "fixture/EnableLogging.yaml" -testCreateClusterSubnetGroup :: CreateClusterSubnetGroup -> TestTree -testCreateClusterSubnetGroup = req +requestCreateClusterSubnetGroup :: CreateClusterSubnetGroup -> TestTree +requestCreateClusterSubnetGroup = req "CreateClusterSubnetGroup" "fixture/CreateClusterSubnetGroup.yaml" -testDeleteClusterParameterGroup :: DeleteClusterParameterGroup -> TestTree -testDeleteClusterParameterGroup = req +requestDeleteClusterParameterGroup :: DeleteClusterParameterGroup -> TestTree +requestDeleteClusterParameterGroup = req "DeleteClusterParameterGroup" "fixture/DeleteClusterParameterGroup.yaml" -testDescribeClusterSecurityGroups :: DescribeClusterSecurityGroups -> TestTree -testDescribeClusterSecurityGroups = req +requestDescribeClusterSecurityGroups :: DescribeClusterSecurityGroups -> TestTree +requestDescribeClusterSecurityGroups = req "DescribeClusterSecurityGroups" "fixture/DescribeClusterSecurityGroups.yaml" -testCreateTags :: CreateTags -> TestTree -testCreateTags = req +requestCreateTags :: CreateTags -> TestTree +requestCreateTags = req "CreateTags" "fixture/CreateTags.yaml" -testEnableSnapshotCopy :: EnableSnapshotCopy -> TestTree -testEnableSnapshotCopy = req +requestEnableSnapshotCopy :: EnableSnapshotCopy -> TestTree +requestEnableSnapshotCopy = req "EnableSnapshotCopy" "fixture/EnableSnapshotCopy.yaml" -testDescribeClusterSnapshots :: DescribeClusterSnapshots -> TestTree -testDescribeClusterSnapshots = req +requestDescribeClusterSnapshots :: DescribeClusterSnapshots -> TestTree +requestDescribeClusterSnapshots = req "DescribeClusterSnapshots" "fixture/DescribeClusterSnapshots.yaml" -testDeleteTags :: DeleteTags -> TestTree -testDeleteTags = req +requestDeleteTags :: DeleteTags -> TestTree +requestDeleteTags = req "DeleteTags" "fixture/DeleteTags.yaml" -testDescribeClusterSubnetGroups :: DescribeClusterSubnetGroups -> TestTree -testDescribeClusterSubnetGroups = req +requestDescribeClusterSubnetGroups :: DescribeClusterSubnetGroups -> TestTree +requestDescribeClusterSubnetGroups = req "DescribeClusterSubnetGroups" "fixture/DescribeClusterSubnetGroups.yaml" -testModifySnapshotCopyRetentionPeriod :: ModifySnapshotCopyRetentionPeriod -> TestTree -testModifySnapshotCopyRetentionPeriod = req +requestModifySnapshotCopyRetentionPeriod :: ModifySnapshotCopyRetentionPeriod -> TestTree +requestModifySnapshotCopyRetentionPeriod = req "ModifySnapshotCopyRetentionPeriod" "fixture/ModifySnapshotCopyRetentionPeriod.yaml" -testModifyClusterIAMRoles :: ModifyClusterIAMRoles -> TestTree -testModifyClusterIAMRoles = req +requestModifyClusterIAMRoles :: ModifyClusterIAMRoles -> TestTree +requestModifyClusterIAMRoles = req "ModifyClusterIAMRoles" "fixture/ModifyClusterIAMRoles.yaml" -testAuthorizeSnapshotAccess :: AuthorizeSnapshotAccess -> TestTree -testAuthorizeSnapshotAccess = req +requestAuthorizeSnapshotAccess :: AuthorizeSnapshotAccess -> TestTree +requestAuthorizeSnapshotAccess = req "AuthorizeSnapshotAccess" "fixture/AuthorizeSnapshotAccess.yaml" -testRebootCluster :: RebootCluster -> TestTree -testRebootCluster = req +requestRebootCluster :: RebootCluster -> TestTree +requestRebootCluster = req "RebootCluster" "fixture/RebootCluster.yaml" -testDeleteCluster :: DeleteCluster -> TestTree -testDeleteCluster = req +requestDeleteCluster :: DeleteCluster -> TestTree +requestDeleteCluster = req "DeleteCluster" "fixture/DeleteCluster.yaml" -testCreateEventSubscription :: CreateEventSubscription -> TestTree -testCreateEventSubscription = req +requestCreateEventSubscription :: CreateEventSubscription -> TestTree +requestCreateEventSubscription = req "CreateEventSubscription" "fixture/CreateEventSubscription.yaml" -testDescribeOrderableClusterOptions :: DescribeOrderableClusterOptions -> TestTree -testDescribeOrderableClusterOptions = req +requestDescribeOrderableClusterOptions :: DescribeOrderableClusterOptions -> TestTree +requestDescribeOrderableClusterOptions = req "DescribeOrderableClusterOptions" "fixture/DescribeOrderableClusterOptions.yaml" -testCreateCluster :: CreateCluster -> TestTree -testCreateCluster = req +requestCreateCluster :: CreateCluster -> TestTree +requestCreateCluster = req "CreateCluster" "fixture/CreateCluster.yaml" -testCreateHSMClientCertificate :: CreateHSMClientCertificate -> TestTree -testCreateHSMClientCertificate = req +requestCreateHSMClientCertificate :: CreateHSMClientCertificate -> TestTree +requestCreateHSMClientCertificate = req "CreateHSMClientCertificate" "fixture/CreateHSMClientCertificate.yaml" -testRestoreTableFromClusterSnapshot :: RestoreTableFromClusterSnapshot -> TestTree -testRestoreTableFromClusterSnapshot = req +requestRestoreTableFromClusterSnapshot :: RestoreTableFromClusterSnapshot -> TestTree +requestRestoreTableFromClusterSnapshot = req "RestoreTableFromClusterSnapshot" "fixture/RestoreTableFromClusterSnapshot.yaml" -testDescribeDefaultClusterParameters :: DescribeDefaultClusterParameters -> TestTree -testDescribeDefaultClusterParameters = req +requestDescribeDefaultClusterParameters :: DescribeDefaultClusterParameters -> TestTree +requestDescribeDefaultClusterParameters = req "DescribeDefaultClusterParameters" "fixture/DescribeDefaultClusterParameters.yaml" -testDeleteEventSubscription :: DeleteEventSubscription -> TestTree -testDeleteEventSubscription = req +requestDeleteEventSubscription :: DeleteEventSubscription -> TestTree +requestDeleteEventSubscription = req "DeleteEventSubscription" "fixture/DeleteEventSubscription.yaml" -testResetClusterParameterGroup :: ResetClusterParameterGroup -> TestTree -testResetClusterParameterGroup = req +requestResetClusterParameterGroup :: ResetClusterParameterGroup -> TestTree +requestResetClusterParameterGroup = req "ResetClusterParameterGroup" "fixture/ResetClusterParameterGroup.yaml" -testDescribeEventSubscriptions :: DescribeEventSubscriptions -> TestTree -testDescribeEventSubscriptions = req +requestDescribeEventSubscriptions :: DescribeEventSubscriptions -> TestTree +requestDescribeEventSubscriptions = req "DescribeEventSubscriptions" "fixture/DescribeEventSubscriptions.yaml" -testRevokeClusterSecurityGroupIngress :: RevokeClusterSecurityGroupIngress -> TestTree -testRevokeClusterSecurityGroupIngress = req +requestRevokeClusterSecurityGroupIngress :: RevokeClusterSecurityGroupIngress -> TestTree +requestRevokeClusterSecurityGroupIngress = req "RevokeClusterSecurityGroupIngress" "fixture/RevokeClusterSecurityGroupIngress.yaml" -testDescribeHSMClientCertificates :: DescribeHSMClientCertificates -> TestTree -testDescribeHSMClientCertificates = req +requestDescribeHSMClientCertificates :: DescribeHSMClientCertificates -> TestTree +requestDescribeHSMClientCertificates = req "DescribeHSMClientCertificates" "fixture/DescribeHSMClientCertificates.yaml" -testModifyClusterParameterGroup :: ModifyClusterParameterGroup -> TestTree -testModifyClusterParameterGroup = req +requestModifyClusterParameterGroup :: ModifyClusterParameterGroup -> TestTree +requestModifyClusterParameterGroup = req "ModifyClusterParameterGroup" "fixture/ModifyClusterParameterGroup.yaml" -testCreateClusterSecurityGroup :: CreateClusterSecurityGroup -> TestTree -testCreateClusterSecurityGroup = req +requestCreateClusterSecurityGroup :: CreateClusterSecurityGroup -> TestTree +requestCreateClusterSecurityGroup = req "CreateClusterSecurityGroup" "fixture/CreateClusterSecurityGroup.yaml" -testDescribeEventCategories :: DescribeEventCategories -> TestTree -testDescribeEventCategories = req +requestDescribeEventCategories :: DescribeEventCategories -> TestTree +requestDescribeEventCategories = req "DescribeEventCategories" "fixture/DescribeEventCategories.yaml" -testDescribeResize :: DescribeResize -> TestTree -testDescribeResize = req +requestDescribeResize :: DescribeResize -> TestTree +requestDescribeResize = req "DescribeResize" "fixture/DescribeResize.yaml" -testDeleteHSMConfiguration :: DeleteHSMConfiguration -> TestTree -testDeleteHSMConfiguration = req +requestDeleteHSMConfiguration :: DeleteHSMConfiguration -> TestTree +requestDeleteHSMConfiguration = req "DeleteHSMConfiguration" "fixture/DeleteHSMConfiguration.yaml" -testAuthorizeClusterSecurityGroupIngress :: AuthorizeClusterSecurityGroupIngress -> TestTree -testAuthorizeClusterSecurityGroupIngress = req +requestAuthorizeClusterSecurityGroupIngress :: AuthorizeClusterSecurityGroupIngress -> TestTree +requestAuthorizeClusterSecurityGroupIngress = req "AuthorizeClusterSecurityGroupIngress" "fixture/AuthorizeClusterSecurityGroupIngress.yaml" -testDescribeTableRestoreStatus :: DescribeTableRestoreStatus -> TestTree -testDescribeTableRestoreStatus = req +requestDescribeTableRestoreStatus :: DescribeTableRestoreStatus -> TestTree +requestDescribeTableRestoreStatus = req "DescribeTableRestoreStatus" "fixture/DescribeTableRestoreStatus.yaml" -testCreateClusterSnapshot :: CreateClusterSnapshot -> TestTree -testCreateClusterSnapshot = req +requestCreateClusterSnapshot :: CreateClusterSnapshot -> TestTree +requestCreateClusterSnapshot = req "CreateClusterSnapshot" "fixture/CreateClusterSnapshot.yaml" -testCreateHSMConfiguration :: CreateHSMConfiguration -> TestTree -testCreateHSMConfiguration = req +requestCreateHSMConfiguration :: CreateHSMConfiguration -> TestTree +requestCreateHSMConfiguration = req "CreateHSMConfiguration" "fixture/CreateHSMConfiguration.yaml" -testDescribeLoggingStatus :: DescribeLoggingStatus -> TestTree -testDescribeLoggingStatus = req +requestDescribeLoggingStatus :: DescribeLoggingStatus -> TestTree +requestDescribeLoggingStatus = req "DescribeLoggingStatus" "fixture/DescribeLoggingStatus.yaml" -testModifyCluster :: ModifyCluster -> TestTree -testModifyCluster = req +requestModifyCluster :: ModifyCluster -> TestTree +requestModifyCluster = req "ModifyCluster" "fixture/ModifyCluster.yaml" -testDeleteClusterSecurityGroup :: DeleteClusterSecurityGroup -> TestTree -testDeleteClusterSecurityGroup = req +requestDeleteClusterSecurityGroup :: DeleteClusterSecurityGroup -> TestTree +requestDeleteClusterSecurityGroup = req "DeleteClusterSecurityGroup" "fixture/DeleteClusterSecurityGroup.yaml" -testDisableSnapshotCopy :: DisableSnapshotCopy -> TestTree -testDisableSnapshotCopy = req +requestDisableSnapshotCopy :: DisableSnapshotCopy -> TestTree +requestDisableSnapshotCopy = req "DisableSnapshotCopy" "fixture/DisableSnapshotCopy.yaml" -testDescribeClusterParameters :: DescribeClusterParameters -> TestTree -testDescribeClusterParameters = req +requestDescribeClusterParameters :: DescribeClusterParameters -> TestTree +requestDescribeClusterParameters = req "DescribeClusterParameters" "fixture/DescribeClusterParameters.yaml" -testRestoreFromClusterSnapshot :: RestoreFromClusterSnapshot -> TestTree -testRestoreFromClusterSnapshot = req +requestRestoreFromClusterSnapshot :: RestoreFromClusterSnapshot -> TestTree +requestRestoreFromClusterSnapshot = req "RestoreFromClusterSnapshot" "fixture/RestoreFromClusterSnapshot.yaml" -testCreateClusterParameterGroup :: CreateClusterParameterGroup -> TestTree -testCreateClusterParameterGroup = req +requestCreateClusterParameterGroup :: CreateClusterParameterGroup -> TestTree +requestCreateClusterParameterGroup = req "CreateClusterParameterGroup" "fixture/CreateClusterParameterGroup.yaml" -testRevokeSnapshotAccess :: RevokeSnapshotAccess -> TestTree -testRevokeSnapshotAccess = req +requestRevokeSnapshotAccess :: RevokeSnapshotAccess -> TestTree +requestRevokeSnapshotAccess = req "RevokeSnapshotAccess" "fixture/RevokeSnapshotAccess.yaml" -testDescribeHSMConfigurations :: DescribeHSMConfigurations -> TestTree -testDescribeHSMConfigurations = req +requestDescribeHSMConfigurations :: DescribeHSMConfigurations -> TestTree +requestDescribeHSMConfigurations = req "DescribeHSMConfigurations" "fixture/DescribeHSMConfigurations.yaml" -testCreateSnapshotCopyGrant :: CreateSnapshotCopyGrant -> TestTree -testCreateSnapshotCopyGrant = req +requestCreateSnapshotCopyGrant :: CreateSnapshotCopyGrant -> TestTree +requestCreateSnapshotCopyGrant = req "CreateSnapshotCopyGrant" "fixture/CreateSnapshotCopyGrant.yaml" -testCopyClusterSnapshot :: CopyClusterSnapshot -> TestTree -testCopyClusterSnapshot = req +requestCopyClusterSnapshot :: CopyClusterSnapshot -> TestTree +requestCopyClusterSnapshot = req "CopyClusterSnapshot" "fixture/CopyClusterSnapshot.yaml" -testDeleteHSMClientCertificate :: DeleteHSMClientCertificate -> TestTree -testDeleteHSMClientCertificate = req +requestDeleteHSMClientCertificate :: DeleteHSMClientCertificate -> TestTree +requestDeleteHSMClientCertificate = req "DeleteHSMClientCertificate" "fixture/DeleteHSMClientCertificate.yaml" -testDeleteSnapshotCopyGrant :: DeleteSnapshotCopyGrant -> TestTree -testDeleteSnapshotCopyGrant = req +requestDeleteSnapshotCopyGrant :: DeleteSnapshotCopyGrant -> TestTree +requestDeleteSnapshotCopyGrant = req "DeleteSnapshotCopyGrant" "fixture/DeleteSnapshotCopyGrant.yaml" -testDescribeClusterVersions :: DescribeClusterVersions -> TestTree -testDescribeClusterVersions = req +requestDescribeClusterVersions :: DescribeClusterVersions -> TestTree +requestDescribeClusterVersions = req "DescribeClusterVersions" "fixture/DescribeClusterVersions.yaml" -testModifyClusterSubnetGroup :: ModifyClusterSubnetGroup -> TestTree -testModifyClusterSubnetGroup = req +requestModifyClusterSubnetGroup :: ModifyClusterSubnetGroup -> TestTree +requestModifyClusterSubnetGroup = req "ModifyClusterSubnetGroup" "fixture/ModifyClusterSubnetGroup.yaml" -testRotateEncryptionKey :: RotateEncryptionKey -> TestTree -testRotateEncryptionKey = req +requestRotateEncryptionKey :: RotateEncryptionKey -> TestTree +requestRotateEncryptionKey = req "RotateEncryptionKey" "fixture/RotateEncryptionKey.yaml" -testDescribeSnapshotCopyGrants :: DescribeSnapshotCopyGrants -> TestTree -testDescribeSnapshotCopyGrants = req +requestDescribeSnapshotCopyGrants :: DescribeSnapshotCopyGrants -> TestTree +requestDescribeSnapshotCopyGrants = req "DescribeSnapshotCopyGrants" "fixture/DescribeSnapshotCopyGrants.yaml" -- Responses -testDescribeClustersResponse :: DescribeClustersResponse -> TestTree -testDescribeClustersResponse = res +responseDescribeClusters :: DescribeClustersResponse -> TestTree +responseDescribeClusters = res "DescribeClustersResponse" "fixture/DescribeClustersResponse.proto" redshift (Proxy :: Proxy DescribeClusters) -testDescribeTagsResponse :: DescribeTagsResponse -> TestTree -testDescribeTagsResponse = res +responseDescribeTags :: DescribeTagsResponse -> TestTree +responseDescribeTags = res "DescribeTagsResponse" "fixture/DescribeTagsResponse.proto" redshift (Proxy :: Proxy DescribeTags) -testDeleteClusterSubnetGroupResponse :: DeleteClusterSubnetGroupResponse -> TestTree -testDeleteClusterSubnetGroupResponse = res +responseDeleteClusterSubnetGroup :: DeleteClusterSubnetGroupResponse -> TestTree +responseDeleteClusterSubnetGroup = res "DeleteClusterSubnetGroupResponse" "fixture/DeleteClusterSubnetGroupResponse.proto" redshift (Proxy :: Proxy DeleteClusterSubnetGroup) -testDisableLoggingResponse :: LoggingStatus -> TestTree -testDisableLoggingResponse = res +responseDisableLogging :: LoggingStatus -> TestTree +responseDisableLogging = res "DisableLoggingResponse" "fixture/DisableLoggingResponse.proto" redshift (Proxy :: Proxy DisableLogging) -testModifyEventSubscriptionResponse :: ModifyEventSubscriptionResponse -> TestTree -testModifyEventSubscriptionResponse = res +responseModifyEventSubscription :: ModifyEventSubscriptionResponse -> TestTree +responseModifyEventSubscription = res "ModifyEventSubscriptionResponse" "fixture/ModifyEventSubscriptionResponse.proto" redshift (Proxy :: Proxy ModifyEventSubscription) -testDeleteClusterSnapshotResponse :: DeleteClusterSnapshotResponse -> TestTree -testDeleteClusterSnapshotResponse = res +responseDeleteClusterSnapshot :: DeleteClusterSnapshotResponse -> TestTree +responseDeleteClusterSnapshot = res "DeleteClusterSnapshotResponse" "fixture/DeleteClusterSnapshotResponse.proto" redshift (Proxy :: Proxy DeleteClusterSnapshot) -testPurchaseReservedNodeOfferingResponse :: PurchaseReservedNodeOfferingResponse -> TestTree -testPurchaseReservedNodeOfferingResponse = res +responsePurchaseReservedNodeOffering :: PurchaseReservedNodeOfferingResponse -> TestTree +responsePurchaseReservedNodeOffering = res "PurchaseReservedNodeOfferingResponse" "fixture/PurchaseReservedNodeOfferingResponse.proto" redshift (Proxy :: Proxy PurchaseReservedNodeOffering) -testDescribeReservedNodeOfferingsResponse :: DescribeReservedNodeOfferingsResponse -> TestTree -testDescribeReservedNodeOfferingsResponse = res +responseDescribeReservedNodeOfferings :: DescribeReservedNodeOfferingsResponse -> TestTree +responseDescribeReservedNodeOfferings = res "DescribeReservedNodeOfferingsResponse" "fixture/DescribeReservedNodeOfferingsResponse.proto" redshift (Proxy :: Proxy DescribeReservedNodeOfferings) -testDescribeEventsResponse :: DescribeEventsResponse -> TestTree -testDescribeEventsResponse = res +responseDescribeEvents :: DescribeEventsResponse -> TestTree +responseDescribeEvents = res "DescribeEventsResponse" "fixture/DescribeEventsResponse.proto" redshift (Proxy :: Proxy DescribeEvents) -testDescribeReservedNodesResponse :: DescribeReservedNodesResponse -> TestTree -testDescribeReservedNodesResponse = res +responseDescribeReservedNodes :: DescribeReservedNodesResponse -> TestTree +responseDescribeReservedNodes = res "DescribeReservedNodesResponse" "fixture/DescribeReservedNodesResponse.proto" redshift (Proxy :: Proxy DescribeReservedNodes) -testDescribeClusterParameterGroupsResponse :: DescribeClusterParameterGroupsResponse -> TestTree -testDescribeClusterParameterGroupsResponse = res +responseDescribeClusterParameterGroups :: DescribeClusterParameterGroupsResponse -> TestTree +responseDescribeClusterParameterGroups = res "DescribeClusterParameterGroupsResponse" "fixture/DescribeClusterParameterGroupsResponse.proto" redshift (Proxy :: Proxy DescribeClusterParameterGroups) -testEnableLoggingResponse :: LoggingStatus -> TestTree -testEnableLoggingResponse = res +responseEnableLogging :: LoggingStatus -> TestTree +responseEnableLogging = res "EnableLoggingResponse" "fixture/EnableLoggingResponse.proto" redshift (Proxy :: Proxy EnableLogging) -testCreateClusterSubnetGroupResponse :: CreateClusterSubnetGroupResponse -> TestTree -testCreateClusterSubnetGroupResponse = res +responseCreateClusterSubnetGroup :: CreateClusterSubnetGroupResponse -> TestTree +responseCreateClusterSubnetGroup = res "CreateClusterSubnetGroupResponse" "fixture/CreateClusterSubnetGroupResponse.proto" redshift (Proxy :: Proxy CreateClusterSubnetGroup) -testDeleteClusterParameterGroupResponse :: DeleteClusterParameterGroupResponse -> TestTree -testDeleteClusterParameterGroupResponse = res +responseDeleteClusterParameterGroup :: DeleteClusterParameterGroupResponse -> TestTree +responseDeleteClusterParameterGroup = res "DeleteClusterParameterGroupResponse" "fixture/DeleteClusterParameterGroupResponse.proto" redshift (Proxy :: Proxy DeleteClusterParameterGroup) -testDescribeClusterSecurityGroupsResponse :: DescribeClusterSecurityGroupsResponse -> TestTree -testDescribeClusterSecurityGroupsResponse = res +responseDescribeClusterSecurityGroups :: DescribeClusterSecurityGroupsResponse -> TestTree +responseDescribeClusterSecurityGroups = res "DescribeClusterSecurityGroupsResponse" "fixture/DescribeClusterSecurityGroupsResponse.proto" redshift (Proxy :: Proxy DescribeClusterSecurityGroups) -testCreateTagsResponse :: CreateTagsResponse -> TestTree -testCreateTagsResponse = res +responseCreateTags :: CreateTagsResponse -> TestTree +responseCreateTags = res "CreateTagsResponse" "fixture/CreateTagsResponse.proto" redshift (Proxy :: Proxy CreateTags) -testEnableSnapshotCopyResponse :: EnableSnapshotCopyResponse -> TestTree -testEnableSnapshotCopyResponse = res +responseEnableSnapshotCopy :: EnableSnapshotCopyResponse -> TestTree +responseEnableSnapshotCopy = res "EnableSnapshotCopyResponse" "fixture/EnableSnapshotCopyResponse.proto" redshift (Proxy :: Proxy EnableSnapshotCopy) -testDescribeClusterSnapshotsResponse :: DescribeClusterSnapshotsResponse -> TestTree -testDescribeClusterSnapshotsResponse = res +responseDescribeClusterSnapshots :: DescribeClusterSnapshotsResponse -> TestTree +responseDescribeClusterSnapshots = res "DescribeClusterSnapshotsResponse" "fixture/DescribeClusterSnapshotsResponse.proto" redshift (Proxy :: Proxy DescribeClusterSnapshots) -testDeleteTagsResponse :: DeleteTagsResponse -> TestTree -testDeleteTagsResponse = res +responseDeleteTags :: DeleteTagsResponse -> TestTree +responseDeleteTags = res "DeleteTagsResponse" "fixture/DeleteTagsResponse.proto" redshift (Proxy :: Proxy DeleteTags) -testDescribeClusterSubnetGroupsResponse :: DescribeClusterSubnetGroupsResponse -> TestTree -testDescribeClusterSubnetGroupsResponse = res +responseDescribeClusterSubnetGroups :: DescribeClusterSubnetGroupsResponse -> TestTree +responseDescribeClusterSubnetGroups = res "DescribeClusterSubnetGroupsResponse" "fixture/DescribeClusterSubnetGroupsResponse.proto" redshift (Proxy :: Proxy DescribeClusterSubnetGroups) -testModifySnapshotCopyRetentionPeriodResponse :: ModifySnapshotCopyRetentionPeriodResponse -> TestTree -testModifySnapshotCopyRetentionPeriodResponse = res +responseModifySnapshotCopyRetentionPeriod :: ModifySnapshotCopyRetentionPeriodResponse -> TestTree +responseModifySnapshotCopyRetentionPeriod = res "ModifySnapshotCopyRetentionPeriodResponse" "fixture/ModifySnapshotCopyRetentionPeriodResponse.proto" redshift (Proxy :: Proxy ModifySnapshotCopyRetentionPeriod) -testModifyClusterIAMRolesResponse :: ModifyClusterIAMRolesResponse -> TestTree -testModifyClusterIAMRolesResponse = res +responseModifyClusterIAMRoles :: ModifyClusterIAMRolesResponse -> TestTree +responseModifyClusterIAMRoles = res "ModifyClusterIAMRolesResponse" "fixture/ModifyClusterIAMRolesResponse.proto" redshift (Proxy :: Proxy ModifyClusterIAMRoles) -testAuthorizeSnapshotAccessResponse :: AuthorizeSnapshotAccessResponse -> TestTree -testAuthorizeSnapshotAccessResponse = res +responseAuthorizeSnapshotAccess :: AuthorizeSnapshotAccessResponse -> TestTree +responseAuthorizeSnapshotAccess = res "AuthorizeSnapshotAccessResponse" "fixture/AuthorizeSnapshotAccessResponse.proto" redshift (Proxy :: Proxy AuthorizeSnapshotAccess) -testRebootClusterResponse :: RebootClusterResponse -> TestTree -testRebootClusterResponse = res +responseRebootCluster :: RebootClusterResponse -> TestTree +responseRebootCluster = res "RebootClusterResponse" "fixture/RebootClusterResponse.proto" redshift (Proxy :: Proxy RebootCluster) -testDeleteClusterResponse :: DeleteClusterResponse -> TestTree -testDeleteClusterResponse = res +responseDeleteCluster :: DeleteClusterResponse -> TestTree +responseDeleteCluster = res "DeleteClusterResponse" "fixture/DeleteClusterResponse.proto" redshift (Proxy :: Proxy DeleteCluster) -testCreateEventSubscriptionResponse :: CreateEventSubscriptionResponse -> TestTree -testCreateEventSubscriptionResponse = res +responseCreateEventSubscription :: CreateEventSubscriptionResponse -> TestTree +responseCreateEventSubscription = res "CreateEventSubscriptionResponse" "fixture/CreateEventSubscriptionResponse.proto" redshift (Proxy :: Proxy CreateEventSubscription) -testDescribeOrderableClusterOptionsResponse :: DescribeOrderableClusterOptionsResponse -> TestTree -testDescribeOrderableClusterOptionsResponse = res +responseDescribeOrderableClusterOptions :: DescribeOrderableClusterOptionsResponse -> TestTree +responseDescribeOrderableClusterOptions = res "DescribeOrderableClusterOptionsResponse" "fixture/DescribeOrderableClusterOptionsResponse.proto" redshift (Proxy :: Proxy DescribeOrderableClusterOptions) -testCreateClusterResponse :: CreateClusterResponse -> TestTree -testCreateClusterResponse = res +responseCreateCluster :: CreateClusterResponse -> TestTree +responseCreateCluster = res "CreateClusterResponse" "fixture/CreateClusterResponse.proto" redshift (Proxy :: Proxy CreateCluster) -testCreateHSMClientCertificateResponse :: CreateHSMClientCertificateResponse -> TestTree -testCreateHSMClientCertificateResponse = res +responseCreateHSMClientCertificate :: CreateHSMClientCertificateResponse -> TestTree +responseCreateHSMClientCertificate = res "CreateHSMClientCertificateResponse" "fixture/CreateHSMClientCertificateResponse.proto" redshift (Proxy :: Proxy CreateHSMClientCertificate) -testRestoreTableFromClusterSnapshotResponse :: RestoreTableFromClusterSnapshotResponse -> TestTree -testRestoreTableFromClusterSnapshotResponse = res +responseRestoreTableFromClusterSnapshot :: RestoreTableFromClusterSnapshotResponse -> TestTree +responseRestoreTableFromClusterSnapshot = res "RestoreTableFromClusterSnapshotResponse" "fixture/RestoreTableFromClusterSnapshotResponse.proto" redshift (Proxy :: Proxy RestoreTableFromClusterSnapshot) -testDescribeDefaultClusterParametersResponse :: DescribeDefaultClusterParametersResponse -> TestTree -testDescribeDefaultClusterParametersResponse = res +responseDescribeDefaultClusterParameters :: DescribeDefaultClusterParametersResponse -> TestTree +responseDescribeDefaultClusterParameters = res "DescribeDefaultClusterParametersResponse" "fixture/DescribeDefaultClusterParametersResponse.proto" redshift (Proxy :: Proxy DescribeDefaultClusterParameters) -testDeleteEventSubscriptionResponse :: DeleteEventSubscriptionResponse -> TestTree -testDeleteEventSubscriptionResponse = res +responseDeleteEventSubscription :: DeleteEventSubscriptionResponse -> TestTree +responseDeleteEventSubscription = res "DeleteEventSubscriptionResponse" "fixture/DeleteEventSubscriptionResponse.proto" redshift (Proxy :: Proxy DeleteEventSubscription) -testResetClusterParameterGroupResponse :: ClusterParameterGroupNameMessage -> TestTree -testResetClusterParameterGroupResponse = res +responseResetClusterParameterGroup :: ClusterParameterGroupNameMessage -> TestTree +responseResetClusterParameterGroup = res "ResetClusterParameterGroupResponse" "fixture/ResetClusterParameterGroupResponse.proto" redshift (Proxy :: Proxy ResetClusterParameterGroup) -testDescribeEventSubscriptionsResponse :: DescribeEventSubscriptionsResponse -> TestTree -testDescribeEventSubscriptionsResponse = res +responseDescribeEventSubscriptions :: DescribeEventSubscriptionsResponse -> TestTree +responseDescribeEventSubscriptions = res "DescribeEventSubscriptionsResponse" "fixture/DescribeEventSubscriptionsResponse.proto" redshift (Proxy :: Proxy DescribeEventSubscriptions) -testRevokeClusterSecurityGroupIngressResponse :: RevokeClusterSecurityGroupIngressResponse -> TestTree -testRevokeClusterSecurityGroupIngressResponse = res +responseRevokeClusterSecurityGroupIngress :: RevokeClusterSecurityGroupIngressResponse -> TestTree +responseRevokeClusterSecurityGroupIngress = res "RevokeClusterSecurityGroupIngressResponse" "fixture/RevokeClusterSecurityGroupIngressResponse.proto" redshift (Proxy :: Proxy RevokeClusterSecurityGroupIngress) -testDescribeHSMClientCertificatesResponse :: DescribeHSMClientCertificatesResponse -> TestTree -testDescribeHSMClientCertificatesResponse = res +responseDescribeHSMClientCertificates :: DescribeHSMClientCertificatesResponse -> TestTree +responseDescribeHSMClientCertificates = res "DescribeHSMClientCertificatesResponse" "fixture/DescribeHSMClientCertificatesResponse.proto" redshift (Proxy :: Proxy DescribeHSMClientCertificates) -testModifyClusterParameterGroupResponse :: ClusterParameterGroupNameMessage -> TestTree -testModifyClusterParameterGroupResponse = res +responseModifyClusterParameterGroup :: ClusterParameterGroupNameMessage -> TestTree +responseModifyClusterParameterGroup = res "ModifyClusterParameterGroupResponse" "fixture/ModifyClusterParameterGroupResponse.proto" redshift (Proxy :: Proxy ModifyClusterParameterGroup) -testCreateClusterSecurityGroupResponse :: CreateClusterSecurityGroupResponse -> TestTree -testCreateClusterSecurityGroupResponse = res +responseCreateClusterSecurityGroup :: CreateClusterSecurityGroupResponse -> TestTree +responseCreateClusterSecurityGroup = res "CreateClusterSecurityGroupResponse" "fixture/CreateClusterSecurityGroupResponse.proto" redshift (Proxy :: Proxy CreateClusterSecurityGroup) -testDescribeEventCategoriesResponse :: DescribeEventCategoriesResponse -> TestTree -testDescribeEventCategoriesResponse = res +responseDescribeEventCategories :: DescribeEventCategoriesResponse -> TestTree +responseDescribeEventCategories = res "DescribeEventCategoriesResponse" "fixture/DescribeEventCategoriesResponse.proto" redshift (Proxy :: Proxy DescribeEventCategories) -testDescribeResizeResponse :: DescribeResizeResponse -> TestTree -testDescribeResizeResponse = res +responseDescribeResize :: DescribeResizeResponse -> TestTree +responseDescribeResize = res "DescribeResizeResponse" "fixture/DescribeResizeResponse.proto" redshift (Proxy :: Proxy DescribeResize) -testDeleteHSMConfigurationResponse :: DeleteHSMConfigurationResponse -> TestTree -testDeleteHSMConfigurationResponse = res +responseDeleteHSMConfiguration :: DeleteHSMConfigurationResponse -> TestTree +responseDeleteHSMConfiguration = res "DeleteHSMConfigurationResponse" "fixture/DeleteHSMConfigurationResponse.proto" redshift (Proxy :: Proxy DeleteHSMConfiguration) -testAuthorizeClusterSecurityGroupIngressResponse :: AuthorizeClusterSecurityGroupIngressResponse -> TestTree -testAuthorizeClusterSecurityGroupIngressResponse = res +responseAuthorizeClusterSecurityGroupIngress :: AuthorizeClusterSecurityGroupIngressResponse -> TestTree +responseAuthorizeClusterSecurityGroupIngress = res "AuthorizeClusterSecurityGroupIngressResponse" "fixture/AuthorizeClusterSecurityGroupIngressResponse.proto" redshift (Proxy :: Proxy AuthorizeClusterSecurityGroupIngress) -testDescribeTableRestoreStatusResponse :: DescribeTableRestoreStatusResponse -> TestTree -testDescribeTableRestoreStatusResponse = res +responseDescribeTableRestoreStatus :: DescribeTableRestoreStatusResponse -> TestTree +responseDescribeTableRestoreStatus = res "DescribeTableRestoreStatusResponse" "fixture/DescribeTableRestoreStatusResponse.proto" redshift (Proxy :: Proxy DescribeTableRestoreStatus) -testCreateClusterSnapshotResponse :: CreateClusterSnapshotResponse -> TestTree -testCreateClusterSnapshotResponse = res +responseCreateClusterSnapshot :: CreateClusterSnapshotResponse -> TestTree +responseCreateClusterSnapshot = res "CreateClusterSnapshotResponse" "fixture/CreateClusterSnapshotResponse.proto" redshift (Proxy :: Proxy CreateClusterSnapshot) -testCreateHSMConfigurationResponse :: CreateHSMConfigurationResponse -> TestTree -testCreateHSMConfigurationResponse = res +responseCreateHSMConfiguration :: CreateHSMConfigurationResponse -> TestTree +responseCreateHSMConfiguration = res "CreateHSMConfigurationResponse" "fixture/CreateHSMConfigurationResponse.proto" redshift (Proxy :: Proxy CreateHSMConfiguration) -testDescribeLoggingStatusResponse :: LoggingStatus -> TestTree -testDescribeLoggingStatusResponse = res +responseDescribeLoggingStatus :: LoggingStatus -> TestTree +responseDescribeLoggingStatus = res "DescribeLoggingStatusResponse" "fixture/DescribeLoggingStatusResponse.proto" redshift (Proxy :: Proxy DescribeLoggingStatus) -testModifyClusterResponse :: ModifyClusterResponse -> TestTree -testModifyClusterResponse = res +responseModifyCluster :: ModifyClusterResponse -> TestTree +responseModifyCluster = res "ModifyClusterResponse" "fixture/ModifyClusterResponse.proto" redshift (Proxy :: Proxy ModifyCluster) -testDeleteClusterSecurityGroupResponse :: DeleteClusterSecurityGroupResponse -> TestTree -testDeleteClusterSecurityGroupResponse = res +responseDeleteClusterSecurityGroup :: DeleteClusterSecurityGroupResponse -> TestTree +responseDeleteClusterSecurityGroup = res "DeleteClusterSecurityGroupResponse" "fixture/DeleteClusterSecurityGroupResponse.proto" redshift (Proxy :: Proxy DeleteClusterSecurityGroup) -testDisableSnapshotCopyResponse :: DisableSnapshotCopyResponse -> TestTree -testDisableSnapshotCopyResponse = res +responseDisableSnapshotCopy :: DisableSnapshotCopyResponse -> TestTree +responseDisableSnapshotCopy = res "DisableSnapshotCopyResponse" "fixture/DisableSnapshotCopyResponse.proto" redshift (Proxy :: Proxy DisableSnapshotCopy) -testDescribeClusterParametersResponse :: DescribeClusterParametersResponse -> TestTree -testDescribeClusterParametersResponse = res +responseDescribeClusterParameters :: DescribeClusterParametersResponse -> TestTree +responseDescribeClusterParameters = res "DescribeClusterParametersResponse" "fixture/DescribeClusterParametersResponse.proto" redshift (Proxy :: Proxy DescribeClusterParameters) -testRestoreFromClusterSnapshotResponse :: RestoreFromClusterSnapshotResponse -> TestTree -testRestoreFromClusterSnapshotResponse = res +responseRestoreFromClusterSnapshot :: RestoreFromClusterSnapshotResponse -> TestTree +responseRestoreFromClusterSnapshot = res "RestoreFromClusterSnapshotResponse" "fixture/RestoreFromClusterSnapshotResponse.proto" redshift (Proxy :: Proxy RestoreFromClusterSnapshot) -testCreateClusterParameterGroupResponse :: CreateClusterParameterGroupResponse -> TestTree -testCreateClusterParameterGroupResponse = res +responseCreateClusterParameterGroup :: CreateClusterParameterGroupResponse -> TestTree +responseCreateClusterParameterGroup = res "CreateClusterParameterGroupResponse" "fixture/CreateClusterParameterGroupResponse.proto" redshift (Proxy :: Proxy CreateClusterParameterGroup) -testRevokeSnapshotAccessResponse :: RevokeSnapshotAccessResponse -> TestTree -testRevokeSnapshotAccessResponse = res +responseRevokeSnapshotAccess :: RevokeSnapshotAccessResponse -> TestTree +responseRevokeSnapshotAccess = res "RevokeSnapshotAccessResponse" "fixture/RevokeSnapshotAccessResponse.proto" redshift (Proxy :: Proxy RevokeSnapshotAccess) -testDescribeHSMConfigurationsResponse :: DescribeHSMConfigurationsResponse -> TestTree -testDescribeHSMConfigurationsResponse = res +responseDescribeHSMConfigurations :: DescribeHSMConfigurationsResponse -> TestTree +responseDescribeHSMConfigurations = res "DescribeHSMConfigurationsResponse" "fixture/DescribeHSMConfigurationsResponse.proto" redshift (Proxy :: Proxy DescribeHSMConfigurations) -testCreateSnapshotCopyGrantResponse :: CreateSnapshotCopyGrantResponse -> TestTree -testCreateSnapshotCopyGrantResponse = res +responseCreateSnapshotCopyGrant :: CreateSnapshotCopyGrantResponse -> TestTree +responseCreateSnapshotCopyGrant = res "CreateSnapshotCopyGrantResponse" "fixture/CreateSnapshotCopyGrantResponse.proto" redshift (Proxy :: Proxy CreateSnapshotCopyGrant) -testCopyClusterSnapshotResponse :: CopyClusterSnapshotResponse -> TestTree -testCopyClusterSnapshotResponse = res +responseCopyClusterSnapshot :: CopyClusterSnapshotResponse -> TestTree +responseCopyClusterSnapshot = res "CopyClusterSnapshotResponse" "fixture/CopyClusterSnapshotResponse.proto" redshift (Proxy :: Proxy CopyClusterSnapshot) -testDeleteHSMClientCertificateResponse :: DeleteHSMClientCertificateResponse -> TestTree -testDeleteHSMClientCertificateResponse = res +responseDeleteHSMClientCertificate :: DeleteHSMClientCertificateResponse -> TestTree +responseDeleteHSMClientCertificate = res "DeleteHSMClientCertificateResponse" "fixture/DeleteHSMClientCertificateResponse.proto" redshift (Proxy :: Proxy DeleteHSMClientCertificate) -testDeleteSnapshotCopyGrantResponse :: DeleteSnapshotCopyGrantResponse -> TestTree -testDeleteSnapshotCopyGrantResponse = res +responseDeleteSnapshotCopyGrant :: DeleteSnapshotCopyGrantResponse -> TestTree +responseDeleteSnapshotCopyGrant = res "DeleteSnapshotCopyGrantResponse" "fixture/DeleteSnapshotCopyGrantResponse.proto" redshift (Proxy :: Proxy DeleteSnapshotCopyGrant) -testDescribeClusterVersionsResponse :: DescribeClusterVersionsResponse -> TestTree -testDescribeClusterVersionsResponse = res +responseDescribeClusterVersions :: DescribeClusterVersionsResponse -> TestTree +responseDescribeClusterVersions = res "DescribeClusterVersionsResponse" "fixture/DescribeClusterVersionsResponse.proto" redshift (Proxy :: Proxy DescribeClusterVersions) -testModifyClusterSubnetGroupResponse :: ModifyClusterSubnetGroupResponse -> TestTree -testModifyClusterSubnetGroupResponse = res +responseModifyClusterSubnetGroup :: ModifyClusterSubnetGroupResponse -> TestTree +responseModifyClusterSubnetGroup = res "ModifyClusterSubnetGroupResponse" "fixture/ModifyClusterSubnetGroupResponse.proto" redshift (Proxy :: Proxy ModifyClusterSubnetGroup) -testRotateEncryptionKeyResponse :: RotateEncryptionKeyResponse -> TestTree -testRotateEncryptionKeyResponse = res +responseRotateEncryptionKey :: RotateEncryptionKeyResponse -> TestTree +responseRotateEncryptionKey = res "RotateEncryptionKeyResponse" "fixture/RotateEncryptionKeyResponse.proto" redshift (Proxy :: Proxy RotateEncryptionKey) -testDescribeSnapshotCopyGrantsResponse :: DescribeSnapshotCopyGrantsResponse -> TestTree -testDescribeSnapshotCopyGrantsResponse = res +responseDescribeSnapshotCopyGrants :: DescribeSnapshotCopyGrantsResponse -> TestTree +responseDescribeSnapshotCopyGrants = res "DescribeSnapshotCopyGrantsResponse" "fixture/DescribeSnapshotCopyGrantsResponse.proto" redshift