diff --git a/CHANGELOG.md b/CHANGELOG.md --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -1,5 +1,9 @@ # Change Log +## 0.4.2 + +* Update the resource specification document to version `1.2.1` + ## 0.4.1 * Manually write out all JSON instances to speed up compilation diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayApiKeyStageKey. See --- | 'apiGatewayApiKeyStageKey' for a more convenient constructor. +-- 'apiGatewayApiKeyStageKey' for a more convenient constructor. data ApiGatewayApiKeyStageKey = ApiGatewayApiKeyStageKey { _apiGatewayApiKeyStageKeyRestApiId :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayApiKeyStageKey' containing required fields as --- | arguments. +-- arguments. apiGatewayApiKeyStageKey :: ApiGatewayApiKeyStageKey apiGatewayApiKeyStageKey = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for ApiGatewayDeploymentMethodSetting. See --- | 'apiGatewayDeploymentMethodSetting' for a more convenient constructor. +-- 'apiGatewayDeploymentMethodSetting' for a more convenient constructor. data ApiGatewayDeploymentMethodSetting = ApiGatewayDeploymentMethodSetting { _apiGatewayDeploymentMethodSettingCacheDataEncrypted :: Maybe (Val Bool') @@ -62,7 +62,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayDeploymentMethodSetting' containing required --- | fields as arguments. +-- fields as arguments. apiGatewayDeploymentMethodSetting :: ApiGatewayDeploymentMethodSetting apiGatewayDeploymentMethodSetting = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ApiGatewayDeploymentMethodSetting -- | Full data type definition for ApiGatewayDeploymentStageDescription. See --- | 'apiGatewayDeploymentStageDescription' for a more convenient constructor. +-- 'apiGatewayDeploymentStageDescription' for a more convenient constructor. data ApiGatewayDeploymentStageDescription = ApiGatewayDeploymentStageDescription { _apiGatewayDeploymentStageDescriptionCacheClusterEnabled :: Maybe (Val Bool') @@ -78,7 +78,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayDeploymentStageDescription' containing --- | required fields as arguments. +-- required fields as arguments. apiGatewayDeploymentStageDescription :: ApiGatewayDeploymentStageDescription apiGatewayDeploymentStageDescription = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ApiGatewayMethodIntegrationResponse -- | Full data type definition for ApiGatewayMethodIntegration. See --- | 'apiGatewayMethodIntegration' for a more convenient constructor. +-- 'apiGatewayMethodIntegration' for a more convenient constructor. data ApiGatewayMethodIntegration = ApiGatewayMethodIntegration { _apiGatewayMethodIntegrationCacheKeyParameters :: Maybe [Val Text] @@ -63,7 +63,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayMethodIntegration' containing required fields --- | as arguments. +-- as arguments. apiGatewayMethodIntegration :: ApiGatewayMethodIntegration apiGatewayMethodIntegration = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayMethodIntegrationResponse. See --- | 'apiGatewayMethodIntegrationResponse' for a more convenient constructor. +-- 'apiGatewayMethodIntegrationResponse' for a more convenient constructor. data ApiGatewayMethodIntegrationResponse = ApiGatewayMethodIntegrationResponse { _apiGatewayMethodIntegrationResponseResponseParameters :: Maybe Object @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayMethodIntegrationResponse' containing required --- | fields as arguments. +-- fields as arguments. apiGatewayMethodIntegrationResponse :: ApiGatewayMethodIntegrationResponse apiGatewayMethodIntegrationResponse = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayMethodMethodResponse. See --- | 'apiGatewayMethodMethodResponse' for a more convenient constructor. +-- 'apiGatewayMethodMethodResponse' for a more convenient constructor. data ApiGatewayMethodMethodResponse = ApiGatewayMethodMethodResponse { _apiGatewayMethodMethodResponseResponseModels :: Maybe Object @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayMethodMethodResponse' containing required --- | fields as arguments. +-- fields as arguments. apiGatewayMethodMethodResponse :: ApiGatewayMethodMethodResponse apiGatewayMethodMethodResponse = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayRestApiS3Location. See --- | 'apiGatewayRestApiS3Location' for a more convenient constructor. +-- 'apiGatewayRestApiS3Location' for a more convenient constructor. data ApiGatewayRestApiS3Location = ApiGatewayRestApiS3Location { _apiGatewayRestApiS3LocationBucket :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayRestApiS3Location' containing required fields --- | as arguments. +-- as arguments. apiGatewayRestApiS3Location :: ApiGatewayRestApiS3Location apiGatewayRestApiS3Location = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for ApiGatewayStageMethodSetting. See --- | 'apiGatewayStageMethodSetting' for a more convenient constructor. +-- 'apiGatewayStageMethodSetting' for a more convenient constructor. data ApiGatewayStageMethodSetting = ApiGatewayStageMethodSetting { _apiGatewayStageMethodSettingCacheDataEncrypted :: Maybe (Val Bool') @@ -62,7 +62,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayStageMethodSetting' containing required fields --- | as arguments. +-- as arguments. apiGatewayStageMethodSetting :: ApiGatewayStageMethodSetting apiGatewayStageMethodSetting = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayUsagePlanApiStage. See --- | 'apiGatewayUsagePlanApiStage' for a more convenient constructor. +-- 'apiGatewayUsagePlanApiStage' for a more convenient constructor. data ApiGatewayUsagePlanApiStage = ApiGatewayUsagePlanApiStage { _apiGatewayUsagePlanApiStageApiId :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayUsagePlanApiStage' containing required fields --- | as arguments. +-- as arguments. apiGatewayUsagePlanApiStage :: ApiGatewayUsagePlanApiStage apiGatewayUsagePlanApiStage = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for ApiGatewayUsagePlanQuotaSettings. See --- | 'apiGatewayUsagePlanQuotaSettings' for a more convenient constructor. +-- 'apiGatewayUsagePlanQuotaSettings' for a more convenient constructor. data ApiGatewayUsagePlanQuotaSettings = ApiGatewayUsagePlanQuotaSettings { _apiGatewayUsagePlanQuotaSettingsLimit :: Maybe (Val Integer') @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayUsagePlanQuotaSettings' containing required --- | fields as arguments. +-- fields as arguments. apiGatewayUsagePlanQuotaSettings :: ApiGatewayUsagePlanQuotaSettings apiGatewayUsagePlanQuotaSettings = diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayUsagePlanThrottleSettings. See --- | 'apiGatewayUsagePlanThrottleSettings' for a more convenient constructor. +-- 'apiGatewayUsagePlanThrottleSettings' for a more convenient constructor. data ApiGatewayUsagePlanThrottleSettings = ApiGatewayUsagePlanThrottleSettings { _apiGatewayUsagePlanThrottleSettingsBurstLimit :: Maybe (Val Integer') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayUsagePlanThrottleSettings' containing required --- | fields as arguments. +-- fields as arguments. apiGatewayUsagePlanThrottleSettings :: ApiGatewayUsagePlanThrottleSettings apiGatewayUsagePlanThrottleSettings = diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs --- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ApplicationAutoScalingScalingPolicyStepAdjustment. See --- | 'applicationAutoScalingScalingPolicyStepAdjustment' for a more convenient --- | constructor. +-- ApplicationAutoScalingScalingPolicyStepAdjustment. See +-- 'applicationAutoScalingScalingPolicyStepAdjustment' for a more convenient +-- constructor. data ApplicationAutoScalingScalingPolicyStepAdjustment = ApplicationAutoScalingScalingPolicyStepAdjustment { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double') @@ -43,7 +43,7 @@ parseJSON _ = mempty -- | Constructor for 'ApplicationAutoScalingScalingPolicyStepAdjustment' --- | containing required fields as arguments. +-- containing required fields as arguments. applicationAutoScalingScalingPolicyStepAdjustment :: Val Integer' -- ^ 'aasspsaScalingAdjustment' -> ApplicationAutoScalingScalingPolicyStepAdjustment diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs @@ -15,9 +15,9 @@ import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepAdjustment -- | Full data type definition for --- | ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration. See --- | 'applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration' for a --- | more convenient constructor. +-- ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration. See +-- 'applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration' for a +-- more convenient constructor. data ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration = ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration { _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationAdjustmentType :: Maybe (Val Text) @@ -49,8 +49,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration' --- | containing required fields as arguments. +-- 'ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration' +-- containing required fields as arguments. applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration :: ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | AutoScalingAutoScalingGroupMetricsCollection. See --- | 'autoScalingAutoScalingGroupMetricsCollection' for a more convenient --- | constructor. +-- AutoScalingAutoScalingGroupMetricsCollection. See +-- 'autoScalingAutoScalingGroupMetricsCollection' for a more convenient +-- constructor. data AutoScalingAutoScalingGroupMetricsCollection = AutoScalingAutoScalingGroupMetricsCollection { _autoScalingAutoScalingGroupMetricsCollectionGranularity :: Val Text @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingAutoScalingGroupMetricsCollection' containing --- | required fields as arguments. +-- required fields as arguments. autoScalingAutoScalingGroupMetricsCollection :: Val Text -- ^ 'asasgmcGranularity' -> AutoScalingAutoScalingGroupMetricsCollection diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfigurations.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfigurations.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfigurations.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfigurations.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | AutoScalingAutoScalingGroupNotificationConfigurations. See --- | 'autoScalingAutoScalingGroupNotificationConfigurations' for a more --- | convenient constructor. +-- AutoScalingAutoScalingGroupNotificationConfigurations. See +-- 'autoScalingAutoScalingGroupNotificationConfigurations' for a more +-- convenient constructor. data AutoScalingAutoScalingGroupNotificationConfigurations = AutoScalingAutoScalingGroupNotificationConfigurations { _autoScalingAutoScalingGroupNotificationConfigurationsNotificationTypes :: Maybe [Val Text] @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingAutoScalingGroupNotificationConfigurations' --- | containing required fields as arguments. +-- containing required fields as arguments. autoScalingAutoScalingGroupNotificationConfigurations :: Val Text -- ^ 'asasgncTopicARN' -> AutoScalingAutoScalingGroupNotificationConfigurations diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs @@ -15,8 +15,8 @@ -- | Full data type definition for AutoScalingAutoScalingGroupTagProperty. See --- | 'autoScalingAutoScalingGroupTagProperty' for a more convenient --- | constructor. +-- 'autoScalingAutoScalingGroupTagProperty' for a more convenient +-- constructor. data AutoScalingAutoScalingGroupTagProperty = AutoScalingAutoScalingGroupTagProperty { _autoScalingAutoScalingGroupTagPropertyKey :: Val Text @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingAutoScalingGroupTagProperty' containing --- | required fields as arguments. +-- required fields as arguments. autoScalingAutoScalingGroupTagProperty :: Val Text -- ^ 'asasgtpKey' -> Val Bool' -- ^ 'asasgtpPropagateAtLaunch' diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs @@ -15,15 +15,15 @@ -- | Full data type definition for AutoScalingLaunchConfigurationBlockDevice. --- | See 'autoScalingLaunchConfigurationBlockDevice' for a more convenient --- | constructor. +-- See 'autoScalingLaunchConfigurationBlockDevice' for a more convenient +-- constructor. data AutoScalingLaunchConfigurationBlockDevice = AutoScalingLaunchConfigurationBlockDevice { _autoScalingLaunchConfigurationBlockDeviceDeleteOnTermination :: Maybe (Val Bool') , _autoScalingLaunchConfigurationBlockDeviceEncrypted :: Maybe (Val Bool') , _autoScalingLaunchConfigurationBlockDeviceIops :: Maybe (Val Integer') , _autoScalingLaunchConfigurationBlockDeviceSnapshotId :: Maybe (Val Text) - , _autoScalingLaunchConfigurationBlockDeviceVolumeSize :: Maybe (Val Text) + , _autoScalingLaunchConfigurationBlockDeviceVolumeSize :: Maybe (Val Integer') , _autoScalingLaunchConfigurationBlockDeviceVolumeType :: Maybe (Val Text) } deriving (Show, Eq) @@ -51,7 +51,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingLaunchConfigurationBlockDevice' containing --- | required fields as arguments. +-- required fields as arguments. autoScalingLaunchConfigurationBlockDevice :: AutoScalingLaunchConfigurationBlockDevice autoScalingLaunchConfigurationBlockDevice = @@ -81,7 +81,7 @@ aslcbdSnapshotId = lens _autoScalingLaunchConfigurationBlockDeviceSnapshotId (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceSnapshotId = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-volumesize -aslcbdVolumeSize :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Text)) +aslcbdVolumeSize :: Lens' AutoScalingLaunchConfigurationBlockDevice (Maybe (Val Integer')) aslcbdVolumeSize = lens _autoScalingLaunchConfigurationBlockDeviceVolumeSize (\s a -> s { _autoScalingLaunchConfigurationBlockDeviceVolumeSize = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-launchconfig-blockdev-template.html#cfn-as-launchconfig-blockdev-template-volumetype diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs @@ -15,9 +15,9 @@ import Stratosphere.ResourceProperties.AutoScalingLaunchConfigurationBlockDevice -- | Full data type definition for --- | AutoScalingLaunchConfigurationBlockDeviceMapping. See --- | 'autoScalingLaunchConfigurationBlockDeviceMapping' for a more convenient --- | constructor. +-- AutoScalingLaunchConfigurationBlockDeviceMapping. See +-- 'autoScalingLaunchConfigurationBlockDeviceMapping' for a more convenient +-- constructor. data AutoScalingLaunchConfigurationBlockDeviceMapping = AutoScalingLaunchConfigurationBlockDeviceMapping { _autoScalingLaunchConfigurationBlockDeviceMappingDeviceName :: Val Text @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingLaunchConfigurationBlockDeviceMapping' --- | containing required fields as arguments. +-- containing required fields as arguments. autoScalingLaunchConfigurationBlockDeviceMapping :: Val Text -- ^ 'aslcbdmDeviceName' -> AutoScalingLaunchConfigurationBlockDeviceMapping diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs --- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs +++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs @@ -15,8 +15,8 @@ -- | Full data type definition for AutoScalingScalingPolicyStepAdjustment. See --- | 'autoScalingScalingPolicyStepAdjustment' for a more convenient --- | constructor. +-- 'autoScalingScalingPolicyStepAdjustment' for a more convenient +-- constructor. data AutoScalingScalingPolicyStepAdjustment = AutoScalingScalingPolicyStepAdjustment { _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double') @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingScalingPolicyStepAdjustment' containing --- | required fields as arguments. +-- required fields as arguments. autoScalingScalingPolicyStepAdjustment :: Val Integer' -- ^ 'asspsaScalingAdjustment' -> AutoScalingScalingPolicyStepAdjustment diff --git a/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs b/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs --- a/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs +++ b/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | CertificateManagerCertificateDomainValidationOption. See --- | 'certificateManagerCertificateDomainValidationOption' for a more --- | convenient constructor. +-- CertificateManagerCertificateDomainValidationOption. See +-- 'certificateManagerCertificateDomainValidationOption' for a more +-- convenient constructor. data CertificateManagerCertificateDomainValidationOption = CertificateManagerCertificateDomainValidationOption { _certificateManagerCertificateDomainValidationOptionDomainName :: Val Text @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'CertificateManagerCertificateDomainValidationOption' --- | containing required fields as arguments. +-- containing required fields as arguments. certificateManagerCertificateDomainValidationOption :: Val Text -- ^ 'cmcdvoDomainName' -> Val Text -- ^ 'cmcdvoValidationDomain' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionForwardedValues -- | Full data type definition for CloudFrontDistributionCacheBehavior. See --- | 'cloudFrontDistributionCacheBehavior' for a more convenient constructor. +-- 'cloudFrontDistributionCacheBehavior' for a more convenient constructor. data CloudFrontDistributionCacheBehavior = CloudFrontDistributionCacheBehavior { _cloudFrontDistributionCacheBehaviorAllowedMethods :: Maybe [Val Text] @@ -68,7 +68,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionCacheBehavior' containing required --- | fields as arguments. +-- fields as arguments. cloudFrontDistributionCacheBehavior :: CloudFrontDistributionForwardedValues -- ^ 'cfdcbForwardedValues' -> Val Text -- ^ 'cfdcbPathPattern' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFrontDistributionCookies. See --- | 'cloudFrontDistributionCookies' for a more convenient constructor. +-- 'cloudFrontDistributionCookies' for a more convenient constructor. data CloudFrontDistributionCookies = CloudFrontDistributionCookies { _cloudFrontDistributionCookiesForward :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionCookies' containing required --- | fields as arguments. +-- fields as arguments. cloudFrontDistributionCookies :: Val Text -- ^ 'cfdcForward' -> CloudFrontDistributionCookies diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CloudFrontDistributionCustomErrorResponse. --- | See 'cloudFrontDistributionCustomErrorResponse' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionCustomErrorResponse' for a more convenient +-- constructor. data CloudFrontDistributionCustomErrorResponse = CloudFrontDistributionCustomErrorResponse { _cloudFrontDistributionCustomErrorResponseErrorCachingMinTTL :: Maybe (Val Integer') @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionCustomErrorResponse' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionCustomErrorResponse :: Val Integer' -- ^ 'cfdcerErrorCode' -> CloudFrontDistributionCustomErrorResponse diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CloudFrontDistributionCustomOriginConfig. --- | See 'cloudFrontDistributionCustomOriginConfig' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionCustomOriginConfig' for a more convenient +-- constructor. data CloudFrontDistributionCustomOriginConfig = CloudFrontDistributionCustomOriginConfig { _cloudFrontDistributionCustomOriginConfigHTTPPort :: Maybe (Val Integer') @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionCustomOriginConfig' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionCustomOriginConfig :: Val Text -- ^ 'cfdcocOriginProtocolPolicy' -> CloudFrontDistributionCustomOriginConfig diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionForwardedValues -- | Full data type definition for CloudFrontDistributionDefaultCacheBehavior. --- | See 'cloudFrontDistributionDefaultCacheBehavior' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionDefaultCacheBehavior' for a more convenient +-- constructor. data CloudFrontDistributionDefaultCacheBehavior = CloudFrontDistributionDefaultCacheBehavior { _cloudFrontDistributionDefaultCacheBehaviorAllowedMethods :: Maybe [Val Text] @@ -66,7 +66,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionDefaultCacheBehavior' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionDefaultCacheBehavior :: CloudFrontDistributionForwardedValues -- ^ 'cfddcbForwardedValues' -> Val Text -- ^ 'cfddcbTargetOriginId' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs @@ -21,8 +21,8 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionViewerCertificate -- | Full data type definition for CloudFrontDistributionDistributionConfig. --- | See 'cloudFrontDistributionDistributionConfig' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionDistributionConfig' for a more convenient +-- constructor. data CloudFrontDistributionDistributionConfig = CloudFrontDistributionDistributionConfig { _cloudFrontDistributionDistributionConfigAliases :: Maybe [Val Text] @@ -81,7 +81,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionDistributionConfig' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionDistributionConfig :: CloudFrontDistributionDefaultCacheBehavior -- ^ 'cfddcDefaultCacheBehavior' -> Val Bool' -- ^ 'cfddcEnabled' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionCookies -- | Full data type definition for CloudFrontDistributionForwardedValues. See --- | 'cloudFrontDistributionForwardedValues' for a more convenient --- | constructor. +-- 'cloudFrontDistributionForwardedValues' for a more convenient +-- constructor. data CloudFrontDistributionForwardedValues = CloudFrontDistributionForwardedValues { _cloudFrontDistributionForwardedValuesCookies :: Maybe CloudFrontDistributionCookies @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionForwardedValues' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionForwardedValues :: Val Bool' -- ^ 'cfdfvQueryString' -> CloudFrontDistributionForwardedValues diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFrontDistributionGeoRestriction. See --- | 'cloudFrontDistributionGeoRestriction' for a more convenient constructor. +-- 'cloudFrontDistributionGeoRestriction' for a more convenient constructor. data CloudFrontDistributionGeoRestriction = CloudFrontDistributionGeoRestriction { _cloudFrontDistributionGeoRestrictionLocations :: Maybe [Val Text] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionGeoRestriction' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionGeoRestriction :: Val Text -- ^ 'cfdgrRestrictionType' -> CloudFrontDistributionGeoRestriction diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFrontDistributionLogging. See --- | 'cloudFrontDistributionLogging' for a more convenient constructor. +-- 'cloudFrontDistributionLogging' for a more convenient constructor. data CloudFrontDistributionLogging = CloudFrontDistributionLogging { _cloudFrontDistributionLoggingBucket :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionLogging' containing required --- | fields as arguments. +-- fields as arguments. cloudFrontDistributionLogging :: Val Text -- ^ 'cfdlBucket' -> CloudFrontDistributionLogging diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionS3OriginConfig -- | Full data type definition for CloudFrontDistributionOrigin. See --- | 'cloudFrontDistributionOrigin' for a more convenient constructor. +-- 'cloudFrontDistributionOrigin' for a more convenient constructor. data CloudFrontDistributionOrigin = CloudFrontDistributionOrigin { _cloudFrontDistributionOriginCustomOriginConfig :: Maybe CloudFrontDistributionCustomOriginConfig @@ -52,7 +52,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionOrigin' containing required fields --- | as arguments. +-- as arguments. cloudFrontDistributionOrigin :: Val Text -- ^ 'cfdoDomainName' -> Val Text -- ^ 'cfdoId' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CloudFrontDistributionOriginCustomHeader. --- | See 'cloudFrontDistributionOriginCustomHeader' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionOriginCustomHeader' for a more convenient +-- constructor. data CloudFrontDistributionOriginCustomHeader = CloudFrontDistributionOriginCustomHeader { _cloudFrontDistributionOriginCustomHeaderHeaderName :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionOriginCustomHeader' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionOriginCustomHeader :: Val Text -- ^ 'cfdochHeaderName' -> Val Text -- ^ 'cfdochHeaderValue' diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionGeoRestriction -- | Full data type definition for CloudFrontDistributionRestrictions. See --- | 'cloudFrontDistributionRestrictions' for a more convenient constructor. +-- 'cloudFrontDistributionRestrictions' for a more convenient constructor. data CloudFrontDistributionRestrictions = CloudFrontDistributionRestrictions { _cloudFrontDistributionRestrictionsGeoRestriction :: CloudFrontDistributionGeoRestriction @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionRestrictions' containing required --- | fields as arguments. +-- fields as arguments. cloudFrontDistributionRestrictions :: CloudFrontDistributionGeoRestriction -- ^ 'cfdrGeoRestriction' -> CloudFrontDistributionRestrictions diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFrontDistributionS3OriginConfig. See --- | 'cloudFrontDistributionS3OriginConfig' for a more convenient constructor. +-- 'cloudFrontDistributionS3OriginConfig' for a more convenient constructor. data CloudFrontDistributionS3OriginConfig = CloudFrontDistributionS3OriginConfig { _cloudFrontDistributionS3OriginConfigOriginAccessIdentity :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionS3OriginConfig' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionS3OriginConfig :: CloudFrontDistributionS3OriginConfig cloudFrontDistributionS3OriginConfig = diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CloudFrontDistributionViewerCertificate. --- | See 'cloudFrontDistributionViewerCertificate' for a more convenient --- | constructor. +-- See 'cloudFrontDistributionViewerCertificate' for a more convenient +-- constructor. data CloudFrontDistributionViewerCertificate = CloudFrontDistributionViewerCertificate { _cloudFrontDistributionViewerCertificateAcmCertificateArn :: Maybe (Val Text) @@ -48,7 +48,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistributionViewerCertificate' containing --- | required fields as arguments. +-- required fields as arguments. cloudFrontDistributionViewerCertificate :: CloudFrontDistributionViewerCertificate cloudFrontDistributionViewerCertificate = diff --git a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs --- a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs +++ b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudWatchAlarmDimension. See --- | 'cloudWatchAlarmDimension' for a more convenient constructor. +-- 'cloudWatchAlarmDimension' for a more convenient constructor. data CloudWatchAlarmDimension = CloudWatchAlarmDimension { _cloudWatchAlarmDimensionName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudWatchAlarmDimension' containing required fields as --- | arguments. +-- arguments. cloudWatchAlarmDimension :: Val Text -- ^ 'cwadName' -> Val Text -- ^ 'cwadValue' diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodeBuildProjectArtifacts. See --- | 'codeBuildProjectArtifacts' for a more convenient constructor. +-- 'codeBuildProjectArtifacts' for a more convenient constructor. data CodeBuildProjectArtifacts = CodeBuildProjectArtifacts { _codeBuildProjectArtifactsLocation :: Maybe (Val Text) @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProjectArtifacts' containing required fields as --- | arguments. +-- arguments. codeBuildProjectArtifacts :: CodeBuildProjectArtifacts codeBuildProjectArtifacts = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CodeBuildProjectEnvironmentVariable -- | Full data type definition for CodeBuildProjectEnvironment. See --- | 'codeBuildProjectEnvironment' for a more convenient constructor. +-- 'codeBuildProjectEnvironment' for a more convenient constructor. data CodeBuildProjectEnvironment = CodeBuildProjectEnvironment { _codeBuildProjectEnvironmentComputeType :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProjectEnvironment' containing required fields --- | as arguments. +-- as arguments. codeBuildProjectEnvironment :: CodeBuildProjectEnvironment codeBuildProjectEnvironment = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodeBuildProjectEnvironmentVariable. See --- | 'codeBuildProjectEnvironmentVariable' for a more convenient constructor. +-- 'codeBuildProjectEnvironmentVariable' for a more convenient constructor. data CodeBuildProjectEnvironmentVariable = CodeBuildProjectEnvironmentVariable { _codeBuildProjectEnvironmentVariableName :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProjectEnvironmentVariable' containing required --- | fields as arguments. +-- fields as arguments. codeBuildProjectEnvironmentVariable :: CodeBuildProjectEnvironmentVariable codeBuildProjectEnvironmentVariable = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CodeBuildProjectSourceAuth -- | Full data type definition for CodeBuildProjectSource. See --- | 'codeBuildProjectSource' for a more convenient constructor. +-- 'codeBuildProjectSource' for a more convenient constructor. data CodeBuildProjectSource = CodeBuildProjectSource { _codeBuildProjectSourceAuth :: Maybe CodeBuildProjectSourceAuth @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProjectSource' containing required fields as --- | arguments. +-- arguments. codeBuildProjectSource :: CodeBuildProjectSource codeBuildProjectSource = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodeBuildProjectSourceAuth. See --- | 'codeBuildProjectSourceAuth' for a more convenient constructor. +-- 'codeBuildProjectSourceAuth' for a more convenient constructor. data CodeBuildProjectSourceAuth = CodeBuildProjectSourceAuth { _codeBuildProjectSourceAuthResource :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProjectSourceAuth' containing required fields --- | as arguments. +-- as arguments. codeBuildProjectSourceAuth :: CodeBuildProjectSourceAuth codeBuildProjectSourceAuth = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs b/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CodeCommitRepositoryRepositoryTrigger. See --- | 'codeCommitRepositoryRepositoryTrigger' for a more convenient --- | constructor. +-- 'codeCommitRepositoryRepositoryTrigger' for a more convenient +-- constructor. data CodeCommitRepositoryRepositoryTrigger = CodeCommitRepositoryRepositoryTrigger { _codeCommitRepositoryRepositoryTriggerBranches :: Maybe [Val Text] @@ -48,7 +48,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeCommitRepositoryRepositoryTrigger' containing --- | required fields as arguments. +-- required fields as arguments. codeCommitRepositoryRepositoryTrigger :: CodeCommitRepositoryRepositoryTrigger codeCommitRepositoryRepositoryTrigger = diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs @@ -15,44 +15,46 @@ -- | Full data type definition for --- | CodeDeployDeploymentConfigMinimumHealthyHosts. See --- | 'codeDeployDeploymentConfigMinimumHealthyHosts' for a more convenient --- | constructor. +-- CodeDeployDeploymentConfigMinimumHealthyHosts. See +-- 'codeDeployDeploymentConfigMinimumHealthyHosts' for a more convenient +-- constructor. data CodeDeployDeploymentConfigMinimumHealthyHosts = CodeDeployDeploymentConfigMinimumHealthyHosts - { _codeDeployDeploymentConfigMinimumHealthyHostsType :: Maybe (Val Text) - , _codeDeployDeploymentConfigMinimumHealthyHostsValue :: Maybe (Val Integer') + { _codeDeployDeploymentConfigMinimumHealthyHostsType :: Val Text + , _codeDeployDeploymentConfigMinimumHealthyHostsValue :: Val Integer' } deriving (Show, Eq) instance ToJSON CodeDeployDeploymentConfigMinimumHealthyHosts where toJSON CodeDeployDeploymentConfigMinimumHealthyHosts{..} = object $ catMaybes - [ ("Type" .=) <$> _codeDeployDeploymentConfigMinimumHealthyHostsType - , ("Value" .=) <$> _codeDeployDeploymentConfigMinimumHealthyHostsValue + [ Just ("Type" .= _codeDeployDeploymentConfigMinimumHealthyHostsType) + , Just ("Value" .= _codeDeployDeploymentConfigMinimumHealthyHostsValue) ] instance FromJSON CodeDeployDeploymentConfigMinimumHealthyHosts where parseJSON (Object obj) = CodeDeployDeploymentConfigMinimumHealthyHosts <$> - obj .:? "Type" <*> - obj .:? "Value" + obj .: "Type" <*> + obj .: "Value" parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentConfigMinimumHealthyHosts' --- | containing required fields as arguments. +-- containing required fields as arguments. codeDeployDeploymentConfigMinimumHealthyHosts - :: CodeDeployDeploymentConfigMinimumHealthyHosts -codeDeployDeploymentConfigMinimumHealthyHosts = + :: Val Text -- ^ 'cddcmhhType' + -> Val Integer' -- ^ 'cddcmhhValue' + -> CodeDeployDeploymentConfigMinimumHealthyHosts +codeDeployDeploymentConfigMinimumHealthyHosts typearg valuearg = CodeDeployDeploymentConfigMinimumHealthyHosts - { _codeDeployDeploymentConfigMinimumHealthyHostsType = Nothing - , _codeDeployDeploymentConfigMinimumHealthyHostsValue = Nothing + { _codeDeployDeploymentConfigMinimumHealthyHostsType = typearg + , _codeDeployDeploymentConfigMinimumHealthyHostsValue = valuearg } -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentconfig-minimumhealthyhosts.html#cfn-codedeploy-deploymentconfig-minimumhealthyhosts-type -cddcmhhType :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Maybe (Val Text)) +cddcmhhType :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Val Text) cddcmhhType = lens _codeDeployDeploymentConfigMinimumHealthyHostsType (\s a -> s { _codeDeployDeploymentConfigMinimumHealthyHostsType = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentconfig-minimumhealthyhosts.html#cfn-codedeploy-deploymentconfig-minimumhealthyhosts-value -cddcmhhValue :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Maybe (Val Integer')) +cddcmhhValue :: Lens' CodeDeployDeploymentConfigMinimumHealthyHosts (Val Integer') cddcmhhValue = lens _codeDeployDeploymentConfigMinimumHealthyHostsValue (\s a -> s { _codeDeployDeploymentConfigMinimumHealthyHostsValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs @@ -12,15 +12,15 @@ import Data.Text import Stratosphere.Values -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevision +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation -- | Full data type definition for CodeDeployDeploymentGroupDeployment. See --- | 'codeDeployDeploymentGroupDeployment' for a more convenient constructor. +-- 'codeDeployDeploymentGroupDeployment' for a more convenient constructor. data CodeDeployDeploymentGroupDeployment = CodeDeployDeploymentGroupDeployment { _codeDeployDeploymentGroupDeploymentDescription :: Maybe (Val Text) , _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures :: Maybe (Val Bool') - , _codeDeployDeploymentGroupDeploymentRevision :: CodeDeployDeploymentGroupRevision + , _codeDeployDeploymentGroupDeploymentRevision :: CodeDeployDeploymentGroupRevisionLocation } deriving (Show, Eq) instance ToJSON CodeDeployDeploymentGroupDeployment where @@ -41,9 +41,9 @@ parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentGroupDeployment' containing required --- | fields as arguments. +-- fields as arguments. codeDeployDeploymentGroupDeployment - :: CodeDeployDeploymentGroupRevision -- ^ 'cddgdRevision' + :: CodeDeployDeploymentGroupRevisionLocation -- ^ 'cddgdRevision' -> CodeDeployDeploymentGroupDeployment codeDeployDeploymentGroupDeployment revisionarg = CodeDeployDeploymentGroupDeployment @@ -61,5 +61,5 @@ cddgdIgnoreApplicationStopFailures = lens _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures (\s a -> s { _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision -cddgdRevision :: Lens' CodeDeployDeploymentGroupDeployment CodeDeployDeploymentGroupRevision +cddgdRevision :: Lens' CodeDeployDeploymentGroupDeployment CodeDeployDeploymentGroupRevisionLocation cddgdRevision = lens _codeDeployDeploymentGroupDeploymentRevision (\s a -> s { _codeDeployDeploymentGroupDeploymentRevision = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs new file mode 100644 --- /dev/null +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs @@ -0,0 +1,65 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html + +module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter where + +import Control.Lens hiding ((.=)) +import Data.Aeson +import Data.Maybe (catMaybes) +import Data.Monoid (mempty) +import Data.Text + +import Stratosphere.Values + + +-- | Full data type definition for CodeDeployDeploymentGroupEC2TagFilter. See +-- 'codeDeployDeploymentGroupEC2TagFilter' for a more convenient +-- constructor. +data CodeDeployDeploymentGroupEC2TagFilter = + CodeDeployDeploymentGroupEC2TagFilter + { _codeDeployDeploymentGroupEC2TagFilterKey :: Maybe (Val Text) + , _codeDeployDeploymentGroupEC2TagFilterType :: Maybe (Val Text) + , _codeDeployDeploymentGroupEC2TagFilterValue :: Maybe (Val Text) + } deriving (Show, Eq) + +instance ToJSON CodeDeployDeploymentGroupEC2TagFilter where + toJSON CodeDeployDeploymentGroupEC2TagFilter{..} = + object $ + catMaybes + [ ("Key" .=) <$> _codeDeployDeploymentGroupEC2TagFilterKey + , ("Type" .=) <$> _codeDeployDeploymentGroupEC2TagFilterType + , ("Value" .=) <$> _codeDeployDeploymentGroupEC2TagFilterValue + ] + +instance FromJSON CodeDeployDeploymentGroupEC2TagFilter where + parseJSON (Object obj) = + CodeDeployDeploymentGroupEC2TagFilter <$> + obj .:? "Key" <*> + obj .:? "Type" <*> + obj .:? "Value" + parseJSON _ = mempty + +-- | Constructor for 'CodeDeployDeploymentGroupEC2TagFilter' containing +-- required fields as arguments. +codeDeployDeploymentGroupEC2TagFilter + :: CodeDeployDeploymentGroupEC2TagFilter +codeDeployDeploymentGroupEC2TagFilter = + CodeDeployDeploymentGroupEC2TagFilter + { _codeDeployDeploymentGroupEC2TagFilterKey = Nothing + , _codeDeployDeploymentGroupEC2TagFilterType = Nothing + , _codeDeployDeploymentGroupEC2TagFilterValue = Nothing + } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-key +cddgectfKey :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text)) +cddgectfKey = lens _codeDeployDeploymentGroupEC2TagFilterKey (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterKey = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-type +cddgectfType :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text)) +cddgectfType = lens _codeDeployDeploymentGroupEC2TagFilterType (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterType = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-value +cddgectfValue :: Lens' CodeDeployDeploymentGroupEC2TagFilter (Maybe (Val Text)) +cddgectfValue = lens _codeDeployDeploymentGroupEC2TagFilterValue (\s a -> s { _codeDeployDeploymentGroupEC2TagFilterValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEc2TagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEc2TagFilter.hs deleted file mode 100644 --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEc2TagFilter.hs +++ /dev/null @@ -1,66 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html - -module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEc2TagFilter where - -import Control.Lens hiding ((.=)) -import Data.Aeson -import Data.Maybe (catMaybes) -import Data.Monoid (mempty) -import Data.Text - -import Stratosphere.Values - - --- | Full data type definition for CodeDeployDeploymentGroupEc2TagFilter. See --- | 'codeDeployDeploymentGroupEc2TagFilter' for a more convenient --- | constructor. -data CodeDeployDeploymentGroupEc2TagFilter = - CodeDeployDeploymentGroupEc2TagFilter - { _codeDeployDeploymentGroupEc2TagFilterKey :: Maybe (Val Text) - , _codeDeployDeploymentGroupEc2TagFilterType :: Val Text - , _codeDeployDeploymentGroupEc2TagFilterValue :: Maybe (Val Text) - } deriving (Show, Eq) - -instance ToJSON CodeDeployDeploymentGroupEc2TagFilter where - toJSON CodeDeployDeploymentGroupEc2TagFilter{..} = - object $ - catMaybes - [ ("Key" .=) <$> _codeDeployDeploymentGroupEc2TagFilterKey - , Just ("Type" .= _codeDeployDeploymentGroupEc2TagFilterType) - , ("Value" .=) <$> _codeDeployDeploymentGroupEc2TagFilterValue - ] - -instance FromJSON CodeDeployDeploymentGroupEc2TagFilter where - parseJSON (Object obj) = - CodeDeployDeploymentGroupEc2TagFilter <$> - obj .:? "Key" <*> - obj .: "Type" <*> - obj .:? "Value" - parseJSON _ = mempty - --- | Constructor for 'CodeDeployDeploymentGroupEc2TagFilter' containing --- | required fields as arguments. -codeDeployDeploymentGroupEc2TagFilter - :: Val Text -- ^ 'cddgetfType' - -> CodeDeployDeploymentGroupEc2TagFilter -codeDeployDeploymentGroupEc2TagFilter typearg = - CodeDeployDeploymentGroupEc2TagFilter - { _codeDeployDeploymentGroupEc2TagFilterKey = Nothing - , _codeDeployDeploymentGroupEc2TagFilterType = typearg - , _codeDeployDeploymentGroupEc2TagFilterValue = Nothing - } - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-key -cddgetfKey :: Lens' CodeDeployDeploymentGroupEc2TagFilter (Maybe (Val Text)) -cddgetfKey = lens _codeDeployDeploymentGroupEc2TagFilterKey (\s a -> s { _codeDeployDeploymentGroupEc2TagFilterKey = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-type -cddgetfType :: Lens' CodeDeployDeploymentGroupEc2TagFilter (Val Text) -cddgetfType = lens _codeDeployDeploymentGroupEc2TagFilterType (\s a -> s { _codeDeployDeploymentGroupEc2TagFilterType = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-ec2tagfilters.html#cfn-properties-codedeploy-deploymentgroup-ec2tagfilters-value -cddgetfValue :: Lens' CodeDeployDeploymentGroupEc2TagFilter (Maybe (Val Text)) -cddgetfValue = lens _codeDeployDeploymentGroupEc2TagFilterValue (\s a -> s { _codeDeployDeploymentGroupEc2TagFilterValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CodeDeployDeploymentGroupGitHubLocation. --- | See 'codeDeployDeploymentGroupGitHubLocation' for a more convenient --- | constructor. +-- See 'codeDeployDeploymentGroupGitHubLocation' for a more convenient +-- constructor. data CodeDeployDeploymentGroupGitHubLocation = CodeDeployDeploymentGroupGitHubLocation { _codeDeployDeploymentGroupGitHubLocationCommitId :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentGroupGitHubLocation' containing --- | required fields as arguments. +-- required fields as arguments. codeDeployDeploymentGroupGitHubLocation :: Val Text -- ^ 'cddgghlCommitId' -> Val Text -- ^ 'cddgghlRepository' diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesInstanceTagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesInstanceTagFilter.hs deleted file mode 100644 --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesInstanceTagFilter.hs +++ /dev/null @@ -1,66 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html - -module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesInstanceTagFilter where - -import Control.Lens hiding ((.=)) -import Data.Aeson -import Data.Maybe (catMaybes) -import Data.Monoid (mempty) -import Data.Text - -import Stratosphere.Values - - --- | Full data type definition for --- | CodeDeployDeploymentGroupOnPremisesInstanceTagFilter. See --- | 'codeDeployDeploymentGroupOnPremisesInstanceTagFilter' for a more --- | convenient constructor. -data CodeDeployDeploymentGroupOnPremisesInstanceTagFilter = - CodeDeployDeploymentGroupOnPremisesInstanceTagFilter - { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey :: Maybe (Val Text) - , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType :: Maybe (Val Text) - , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue :: Maybe (Val Text) - } deriving (Show, Eq) - -instance ToJSON CodeDeployDeploymentGroupOnPremisesInstanceTagFilter where - toJSON CodeDeployDeploymentGroupOnPremisesInstanceTagFilter{..} = - object $ - catMaybes - [ ("Key" .=) <$> _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey - , ("Type" .=) <$> _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType - , ("Value" .=) <$> _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue - ] - -instance FromJSON CodeDeployDeploymentGroupOnPremisesInstanceTagFilter where - parseJSON (Object obj) = - CodeDeployDeploymentGroupOnPremisesInstanceTagFilter <$> - obj .:? "Key" <*> - obj .:? "Type" <*> - obj .:? "Value" - parseJSON _ = mempty - --- | Constructor for 'CodeDeployDeploymentGroupOnPremisesInstanceTagFilter' --- | containing required fields as arguments. -codeDeployDeploymentGroupOnPremisesInstanceTagFilter - :: CodeDeployDeploymentGroupOnPremisesInstanceTagFilter -codeDeployDeploymentGroupOnPremisesInstanceTagFilter = - CodeDeployDeploymentGroupOnPremisesInstanceTagFilter - { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey = Nothing - , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType = Nothing - , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue = Nothing - } - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-key -cddgopitfKey :: Lens' CodeDeployDeploymentGroupOnPremisesInstanceTagFilter (Maybe (Val Text)) -cddgopitfKey = lens _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey (\s a -> s { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-type -cddgopitfType :: Lens' CodeDeployDeploymentGroupOnPremisesInstanceTagFilter (Maybe (Val Text)) -cddgopitfType = lens _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType (\s a -> s { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-value -cddgopitfValue :: Lens' CodeDeployDeploymentGroupOnPremisesInstanceTagFilter (Maybe (Val Text)) -cddgopitfValue = lens _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue (\s a -> s { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevision.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevision.hs deleted file mode 100644 --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevision.hs +++ /dev/null @@ -1,65 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE RecordWildCards #-} - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html - -module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevision where - -import Control.Lens hiding ((.=)) -import Data.Aeson -import Data.Maybe (catMaybes) -import Data.Monoid (mempty) -import Data.Text - -import Stratosphere.Values -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location - --- | Full data type definition for CodeDeployDeploymentGroupRevision. See --- | 'codeDeployDeploymentGroupRevision' for a more convenient constructor. -data CodeDeployDeploymentGroupRevision = - CodeDeployDeploymentGroupRevision - { _codeDeployDeploymentGroupRevisionGitHubLocation :: Maybe CodeDeployDeploymentGroupGitHubLocation - , _codeDeployDeploymentGroupRevisionRevisionType :: Maybe (Val Text) - , _codeDeployDeploymentGroupRevisionS3Location :: Maybe CodeDeployDeploymentGroupS3Location - } deriving (Show, Eq) - -instance ToJSON CodeDeployDeploymentGroupRevision where - toJSON CodeDeployDeploymentGroupRevision{..} = - object $ - catMaybes - [ ("GitHubLocation" .=) <$> _codeDeployDeploymentGroupRevisionGitHubLocation - , ("RevisionType" .=) <$> _codeDeployDeploymentGroupRevisionRevisionType - , ("S3Location" .=) <$> _codeDeployDeploymentGroupRevisionS3Location - ] - -instance FromJSON CodeDeployDeploymentGroupRevision where - parseJSON (Object obj) = - CodeDeployDeploymentGroupRevision <$> - obj .:? "GitHubLocation" <*> - obj .:? "RevisionType" <*> - obj .:? "S3Location" - parseJSON _ = mempty - --- | Constructor for 'CodeDeployDeploymentGroupRevision' containing required --- | fields as arguments. -codeDeployDeploymentGroupRevision - :: CodeDeployDeploymentGroupRevision -codeDeployDeploymentGroupRevision = - CodeDeployDeploymentGroupRevision - { _codeDeployDeploymentGroupRevisionGitHubLocation = Nothing - , _codeDeployDeploymentGroupRevisionRevisionType = Nothing - , _codeDeployDeploymentGroupRevisionS3Location = Nothing - } - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-githublocation -cddgrGitHubLocation :: Lens' CodeDeployDeploymentGroupRevision (Maybe CodeDeployDeploymentGroupGitHubLocation) -cddgrGitHubLocation = lens _codeDeployDeploymentGroupRevisionGitHubLocation (\s a -> s { _codeDeployDeploymentGroupRevisionGitHubLocation = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-revisiontype -cddgrRevisionType :: Lens' CodeDeployDeploymentGroupRevision (Maybe (Val Text)) -cddgrRevisionType = lens _codeDeployDeploymentGroupRevisionRevisionType (\s a -> s { _codeDeployDeploymentGroupRevisionRevisionType = a }) - --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location -cddgrS3Location :: Lens' CodeDeployDeploymentGroupRevision (Maybe CodeDeployDeploymentGroupS3Location) -cddgrS3Location = lens _codeDeployDeploymentGroupRevisionS3Location (\s a -> s { _codeDeployDeploymentGroupRevisionS3Location = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs new file mode 100644 --- /dev/null +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs @@ -0,0 +1,66 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html + +module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation where + +import Control.Lens hiding ((.=)) +import Data.Aeson +import Data.Maybe (catMaybes) +import Data.Monoid (mempty) +import Data.Text + +import Stratosphere.Values +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location + +-- | Full data type definition for CodeDeployDeploymentGroupRevisionLocation. +-- See 'codeDeployDeploymentGroupRevisionLocation' for a more convenient +-- constructor. +data CodeDeployDeploymentGroupRevisionLocation = + CodeDeployDeploymentGroupRevisionLocation + { _codeDeployDeploymentGroupRevisionLocationGitHubLocation :: Maybe CodeDeployDeploymentGroupGitHubLocation + , _codeDeployDeploymentGroupRevisionLocationRevisionType :: Maybe (Val Text) + , _codeDeployDeploymentGroupRevisionLocationS3Location :: Maybe CodeDeployDeploymentGroupS3Location + } deriving (Show, Eq) + +instance ToJSON CodeDeployDeploymentGroupRevisionLocation where + toJSON CodeDeployDeploymentGroupRevisionLocation{..} = + object $ + catMaybes + [ ("GitHubLocation" .=) <$> _codeDeployDeploymentGroupRevisionLocationGitHubLocation + , ("RevisionType" .=) <$> _codeDeployDeploymentGroupRevisionLocationRevisionType + , ("S3Location" .=) <$> _codeDeployDeploymentGroupRevisionLocationS3Location + ] + +instance FromJSON CodeDeployDeploymentGroupRevisionLocation where + parseJSON (Object obj) = + CodeDeployDeploymentGroupRevisionLocation <$> + obj .:? "GitHubLocation" <*> + obj .:? "RevisionType" <*> + obj .:? "S3Location" + parseJSON _ = mempty + +-- | Constructor for 'CodeDeployDeploymentGroupRevisionLocation' containing +-- required fields as arguments. +codeDeployDeploymentGroupRevisionLocation + :: CodeDeployDeploymentGroupRevisionLocation +codeDeployDeploymentGroupRevisionLocation = + CodeDeployDeploymentGroupRevisionLocation + { _codeDeployDeploymentGroupRevisionLocationGitHubLocation = Nothing + , _codeDeployDeploymentGroupRevisionLocationRevisionType = Nothing + , _codeDeployDeploymentGroupRevisionLocationS3Location = Nothing + } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-githublocation +cddgrlGitHubLocation :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe CodeDeployDeploymentGroupGitHubLocation) +cddgrlGitHubLocation = lens _codeDeployDeploymentGroupRevisionLocationGitHubLocation (\s a -> s { _codeDeployDeploymentGroupRevisionLocationGitHubLocation = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-revisiontype +cddgrlRevisionType :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe (Val Text)) +cddgrlRevisionType = lens _codeDeployDeploymentGroupRevisionLocationRevisionType (\s a -> s { _codeDeployDeploymentGroupRevisionLocationRevisionType = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location +cddgrlS3Location :: Lens' CodeDeployDeploymentGroupRevisionLocation (Maybe CodeDeployDeploymentGroupS3Location) +cddgrlS3Location = lens _codeDeployDeploymentGroupRevisionLocationS3Location (\s a -> s { _codeDeployDeploymentGroupRevisionLocationS3Location = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs --- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs @@ -15,11 +15,11 @@ -- | Full data type definition for CodeDeployDeploymentGroupS3Location. See --- | 'codeDeployDeploymentGroupS3Location' for a more convenient constructor. +-- 'codeDeployDeploymentGroupS3Location' for a more convenient constructor. data CodeDeployDeploymentGroupS3Location = CodeDeployDeploymentGroupS3Location { _codeDeployDeploymentGroupS3LocationBucket :: Val Text - , _codeDeployDeploymentGroupS3LocationBundleType :: Val Text + , _codeDeployDeploymentGroupS3LocationBundleType :: Maybe (Val Text) , _codeDeployDeploymentGroupS3LocationETag :: Maybe (Val Text) , _codeDeployDeploymentGroupS3LocationKey :: Val Text , _codeDeployDeploymentGroupS3LocationVersion :: Maybe (Val Text) @@ -30,7 +30,7 @@ object $ catMaybes [ Just ("Bucket" .= _codeDeployDeploymentGroupS3LocationBucket) - , Just ("BundleType" .= _codeDeployDeploymentGroupS3LocationBundleType) + , ("BundleType" .=) <$> _codeDeployDeploymentGroupS3LocationBundleType , ("ETag" .=) <$> _codeDeployDeploymentGroupS3LocationETag , Just ("Key" .= _codeDeployDeploymentGroupS3LocationKey) , ("Version" .=) <$> _codeDeployDeploymentGroupS3LocationVersion @@ -40,23 +40,22 @@ parseJSON (Object obj) = CodeDeployDeploymentGroupS3Location <$> obj .: "Bucket" <*> - obj .: "BundleType" <*> + obj .:? "BundleType" <*> obj .:? "ETag" <*> obj .: "Key" <*> obj .:? "Version" parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentGroupS3Location' containing required --- | fields as arguments. +-- fields as arguments. codeDeployDeploymentGroupS3Location :: Val Text -- ^ 'cddgslBucket' - -> Val Text -- ^ 'cddgslBundleType' -> Val Text -- ^ 'cddgslKey' -> CodeDeployDeploymentGroupS3Location -codeDeployDeploymentGroupS3Location bucketarg bundleTypearg keyarg = +codeDeployDeploymentGroupS3Location bucketarg keyarg = CodeDeployDeploymentGroupS3Location { _codeDeployDeploymentGroupS3LocationBucket = bucketarg - , _codeDeployDeploymentGroupS3LocationBundleType = bundleTypearg + , _codeDeployDeploymentGroupS3LocationBundleType = Nothing , _codeDeployDeploymentGroupS3LocationETag = Nothing , _codeDeployDeploymentGroupS3LocationKey = keyarg , _codeDeployDeploymentGroupS3LocationVersion = Nothing @@ -67,7 +66,7 @@ cddgslBucket = lens _codeDeployDeploymentGroupS3LocationBucket (\s a -> s { _codeDeployDeploymentGroupS3LocationBucket = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-bundletype -cddgslBundleType :: Lens' CodeDeployDeploymentGroupS3Location (Val Text) +cddgslBundleType :: Lens' CodeDeployDeploymentGroupS3Location (Maybe (Val Text)) cddgslBundleType = lens _codeDeployDeploymentGroupS3LocationBundleType (\s a -> s { _codeDeployDeploymentGroupS3LocationBundleType = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-deployment-revision-s3location.html#cfn-properties-codedeploy-deploymentgroup-deployment-revision-s3location-etag diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs new file mode 100644 --- /dev/null +++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs @@ -0,0 +1,64 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html + +module Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter where + +import Control.Lens hiding ((.=)) +import Data.Aeson +import Data.Maybe (catMaybes) +import Data.Monoid (mempty) +import Data.Text + +import Stratosphere.Values + + +-- | Full data type definition for CodeDeployDeploymentGroupTagFilter. See +-- 'codeDeployDeploymentGroupTagFilter' for a more convenient constructor. +data CodeDeployDeploymentGroupTagFilter = + CodeDeployDeploymentGroupTagFilter + { _codeDeployDeploymentGroupTagFilterKey :: Maybe (Val Text) + , _codeDeployDeploymentGroupTagFilterType :: Maybe (Val Text) + , _codeDeployDeploymentGroupTagFilterValue :: Maybe (Val Text) + } deriving (Show, Eq) + +instance ToJSON CodeDeployDeploymentGroupTagFilter where + toJSON CodeDeployDeploymentGroupTagFilter{..} = + object $ + catMaybes + [ ("Key" .=) <$> _codeDeployDeploymentGroupTagFilterKey + , ("Type" .=) <$> _codeDeployDeploymentGroupTagFilterType + , ("Value" .=) <$> _codeDeployDeploymentGroupTagFilterValue + ] + +instance FromJSON CodeDeployDeploymentGroupTagFilter where + parseJSON (Object obj) = + CodeDeployDeploymentGroupTagFilter <$> + obj .:? "Key" <*> + obj .:? "Type" <*> + obj .:? "Value" + parseJSON _ = mempty + +-- | Constructor for 'CodeDeployDeploymentGroupTagFilter' containing required +-- fields as arguments. +codeDeployDeploymentGroupTagFilter + :: CodeDeployDeploymentGroupTagFilter +codeDeployDeploymentGroupTagFilter = + CodeDeployDeploymentGroupTagFilter + { _codeDeployDeploymentGroupTagFilterKey = Nothing + , _codeDeployDeploymentGroupTagFilterType = Nothing + , _codeDeployDeploymentGroupTagFilterValue = Nothing + } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-key +cddgtfKey :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text)) +cddgtfKey = lens _codeDeployDeploymentGroupTagFilterKey (\s a -> s { _codeDeployDeploymentGroupTagFilterKey = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-type +cddgtfType :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text)) +cddgtfType = lens _codeDeployDeploymentGroupTagFilterType (\s a -> s { _codeDeployDeploymentGroupTagFilterType = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters.html#cfn-properties-codedeploy-deploymentgroup-onpremisesinstancetagfilters-value +cddgtfValue :: Lens' CodeDeployDeploymentGroupTagFilter (Maybe (Val Text)) +cddgtfValue = lens _codeDeployDeploymentGroupTagFilterValue (\s a -> s { _codeDeployDeploymentGroupTagFilterValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | CodePipelineCustomActionTypeArtifactDetails. See --- | 'codePipelineCustomActionTypeArtifactDetails' for a more convenient --- | constructor. +-- CodePipelineCustomActionTypeArtifactDetails. See +-- 'codePipelineCustomActionTypeArtifactDetails' for a more convenient +-- constructor. data CodePipelineCustomActionTypeArtifactDetails = CodePipelineCustomActionTypeArtifactDetails { _codePipelineCustomActionTypeArtifactDetailsMaximumCount :: Val Integer' @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelineCustomActionTypeArtifactDetails' containing --- | required fields as arguments. +-- required fields as arguments. codePipelineCustomActionTypeArtifactDetails :: Val Integer' -- ^ 'cpcatadMaximumCount' -> Val Integer' -- ^ 'cpcatadMinimumCount' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | CodePipelineCustomActionTypeConfigurationProperties. See --- | 'codePipelineCustomActionTypeConfigurationProperties' for a more --- | convenient constructor. +-- CodePipelineCustomActionTypeConfigurationProperties. See +-- 'codePipelineCustomActionTypeConfigurationProperties' for a more +-- convenient constructor. data CodePipelineCustomActionTypeConfigurationProperties = CodePipelineCustomActionTypeConfigurationProperties { _codePipelineCustomActionTypeConfigurationPropertiesDescription :: Maybe (Val Text) @@ -55,7 +55,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelineCustomActionTypeConfigurationProperties' --- | containing required fields as arguments. +-- containing required fields as arguments. codePipelineCustomActionTypeConfigurationProperties :: Val Bool' -- ^ 'cpcatcpKey' -> Val Text -- ^ 'cpcatcpName' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelineCustomActionTypeSettings. See --- | 'codePipelineCustomActionTypeSettings' for a more convenient constructor. +-- 'codePipelineCustomActionTypeSettings' for a more convenient constructor. data CodePipelineCustomActionTypeSettings = CodePipelineCustomActionTypeSettings { _codePipelineCustomActionTypeSettingsEntityUrlTemplate :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelineCustomActionTypeSettings' containing --- | required fields as arguments. +-- required fields as arguments. codePipelineCustomActionTypeSettings :: CodePipelineCustomActionTypeSettings codePipelineCustomActionTypeSettings = diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs @@ -17,8 +17,8 @@ import Stratosphere.ResourceProperties.CodePipelinePipelineOutputArtifact -- | Full data type definition for CodePipelinePipelineActionDeclaration. See --- | 'codePipelinePipelineActionDeclaration' for a more convenient --- | constructor. +-- 'codePipelinePipelineActionDeclaration' for a more convenient +-- constructor. data CodePipelinePipelineActionDeclaration = CodePipelinePipelineActionDeclaration { _codePipelinePipelineActionDeclarationActionTypeId :: CodePipelinePipelineActionTypeId @@ -56,7 +56,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineActionDeclaration' containing --- | required fields as arguments. +-- required fields as arguments. codePipelinePipelineActionDeclaration :: CodePipelinePipelineActionTypeId -- ^ 'cppadActionTypeId' -> Val Text -- ^ 'cppadName' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelinePipelineActionTypeId. See --- | 'codePipelinePipelineActionTypeId' for a more convenient constructor. +-- 'codePipelinePipelineActionTypeId' for a more convenient constructor. data CodePipelinePipelineActionTypeId = CodePipelinePipelineActionTypeId { _codePipelinePipelineActionTypeIdCategory :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineActionTypeId' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineActionTypeId :: Val Text -- ^ 'cppatiCategory' -> Val Text -- ^ 'cppatiOwner' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CodePipelinePipelineEncryptionKey -- | Full data type definition for CodePipelinePipelineArtifactStore. See --- | 'codePipelinePipelineArtifactStore' for a more convenient constructor. +-- 'codePipelinePipelineArtifactStore' for a more convenient constructor. data CodePipelinePipelineArtifactStore = CodePipelinePipelineArtifactStore { _codePipelinePipelineArtifactStoreEncryptionKey :: Maybe CodePipelinePipelineEncryptionKey @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineArtifactStore' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineArtifactStore :: Val Text -- ^ 'cppasLocation' -> Val Text -- ^ 'cppasType' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs @@ -15,8 +15,8 @@ -- | Full data type definition for CodePipelinePipelineBlockerDeclaration. See --- | 'codePipelinePipelineBlockerDeclaration' for a more convenient --- | constructor. +-- 'codePipelinePipelineBlockerDeclaration' for a more convenient +-- constructor. data CodePipelinePipelineBlockerDeclaration = CodePipelinePipelineBlockerDeclaration { _codePipelinePipelineBlockerDeclarationName :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineBlockerDeclaration' containing --- | required fields as arguments. +-- required fields as arguments. codePipelinePipelineBlockerDeclaration :: Val Text -- ^ 'cppbdName' -> Val Text -- ^ 'cppbdType' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelinePipelineEncryptionKey. See --- | 'codePipelinePipelineEncryptionKey' for a more convenient constructor. +-- 'codePipelinePipelineEncryptionKey' for a more convenient constructor. data CodePipelinePipelineEncryptionKey = CodePipelinePipelineEncryptionKey { _codePipelinePipelineEncryptionKeyId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineEncryptionKey' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineEncryptionKey :: Val Text -- ^ 'cppekId' -> Val Text -- ^ 'cppekType' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelinePipelineInputArtifact. See --- | 'codePipelinePipelineInputArtifact' for a more convenient constructor. +-- 'codePipelinePipelineInputArtifact' for a more convenient constructor. data CodePipelinePipelineInputArtifact = CodePipelinePipelineInputArtifact { _codePipelinePipelineInputArtifactName :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineInputArtifact' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineInputArtifact :: Val Text -- ^ 'cppiaName' -> CodePipelinePipelineInputArtifact diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelinePipelineOutputArtifact. See --- | 'codePipelinePipelineOutputArtifact' for a more convenient constructor. +-- 'codePipelinePipelineOutputArtifact' for a more convenient constructor. data CodePipelinePipelineOutputArtifact = CodePipelinePipelineOutputArtifact { _codePipelinePipelineOutputArtifactName :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineOutputArtifact' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineOutputArtifact :: Val Text -- ^ 'cppoaName' -> CodePipelinePipelineOutputArtifact diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.CodePipelinePipelineBlockerDeclaration -- | Full data type definition for CodePipelinePipelineStageDeclaration. See --- | 'codePipelinePipelineStageDeclaration' for a more convenient constructor. +-- 'codePipelinePipelineStageDeclaration' for a more convenient constructor. data CodePipelinePipelineStageDeclaration = CodePipelinePipelineStageDeclaration { _codePipelinePipelineStageDeclarationActions :: [CodePipelinePipelineActionDeclaration] @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineStageDeclaration' containing --- | required fields as arguments. +-- required fields as arguments. codePipelinePipelineStageDeclaration :: [CodePipelinePipelineActionDeclaration] -- ^ 'cppsdActions' -> Val Text -- ^ 'cppsdName' diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs --- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs +++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodePipelinePipelineStageTransition. See --- | 'codePipelinePipelineStageTransition' for a more convenient constructor. +-- 'codePipelinePipelineStageTransition' for a more convenient constructor. data CodePipelinePipelineStageTransition = CodePipelinePipelineStageTransition { _codePipelinePipelineStageTransitionReason :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipelineStageTransition' containing required --- | fields as arguments. +-- fields as arguments. codePipelinePipelineStageTransition :: Val Text -- ^ 'cppstReason' -> Val Text -- ^ 'cppstStageName' diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs --- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs +++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ConfigConfigRuleScope. See --- | 'configConfigRuleScope' for a more convenient constructor. +-- 'configConfigRuleScope' for a more convenient constructor. data ConfigConfigRuleScope = ConfigConfigRuleScope { _configConfigRuleScopeComplianceResourceId :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigRuleScope' containing required fields as --- | arguments. +-- arguments. configConfigRuleScope :: ConfigConfigRuleScope configConfigRuleScope = diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs --- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs +++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ConfigConfigRuleSourceDetail -- | Full data type definition for ConfigConfigRuleSource. See --- | 'configConfigRuleSource' for a more convenient constructor. +-- 'configConfigRuleSource' for a more convenient constructor. data ConfigConfigRuleSource = ConfigConfigRuleSource { _configConfigRuleSourceOwner :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigRuleSource' containing required fields as --- | arguments. +-- arguments. configConfigRuleSource :: Val Text -- ^ 'ccrsOwner' -> Val Text -- ^ 'ccrsSourceIdentifier' diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs --- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs +++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ConfigConfigRuleSourceDetail. See --- | 'configConfigRuleSourceDetail' for a more convenient constructor. +-- 'configConfigRuleSourceDetail' for a more convenient constructor. data ConfigConfigRuleSourceDetail = ConfigConfigRuleSourceDetail { _configConfigRuleSourceDetailEventSource :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigRuleSourceDetail' containing required fields --- | as arguments. +-- as arguments. configConfigRuleSourceDetail :: Val Text -- ^ 'ccrsdEventSource' -> Val Text -- ^ 'ccrsdMessageType' diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs --- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs +++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ConfigConfigurationRecorderRecordingGroup. --- | See 'configConfigurationRecorderRecordingGroup' for a more convenient --- | constructor. +-- See 'configConfigurationRecorderRecordingGroup' for a more convenient +-- constructor. data ConfigConfigurationRecorderRecordingGroup = ConfigConfigurationRecorderRecordingGroup { _configConfigurationRecorderRecordingGroupAllSupported :: Maybe (Val Bool') @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigurationRecorderRecordingGroup' containing --- | required fields as arguments. +-- required fields as arguments. configConfigurationRecorderRecordingGroup :: ConfigConfigurationRecorderRecordingGroup configConfigurationRecorderRecordingGroup = diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs b/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs --- a/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs +++ b/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ConfigDeliveryChannelConfigSnapshotDeliveryProperties. See --- | 'configDeliveryChannelConfigSnapshotDeliveryProperties' for a more --- | convenient constructor. +-- ConfigDeliveryChannelConfigSnapshotDeliveryProperties. See +-- 'configDeliveryChannelConfigSnapshotDeliveryProperties' for a more +-- convenient constructor. data ConfigDeliveryChannelConfigSnapshotDeliveryProperties = ConfigDeliveryChannelConfigSnapshotDeliveryProperties { _configDeliveryChannelConfigSnapshotDeliveryPropertiesDeliveryFrequency :: Maybe (Val Text) @@ -37,7 +37,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigDeliveryChannelConfigSnapshotDeliveryProperties' --- | containing required fields as arguments. +-- containing required fields as arguments. configDeliveryChannelConfigSnapshotDeliveryProperties :: ConfigDeliveryChannelConfigSnapshotDeliveryProperties configDeliveryChannelConfigSnapshotDeliveryProperties = diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs @@ -15,7 +15,7 @@ -- | Full data type definition for DataPipelinePipelineField. See --- | 'dataPipelinePipelineField' for a more convenient constructor. +-- 'dataPipelinePipelineField' for a more convenient constructor. data DataPipelinePipelineField = DataPipelinePipelineField { _dataPipelinePipelineFieldKey :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelineField' containing required fields as --- | arguments. +-- arguments. dataPipelinePipelineField :: Val Text -- ^ 'dppfKey' -> DataPipelinePipelineField diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs @@ -15,8 +15,8 @@ -- | Full data type definition for DataPipelinePipelineParameterAttribute. See --- | 'dataPipelinePipelineParameterAttribute' for a more convenient --- | constructor. +-- 'dataPipelinePipelineParameterAttribute' for a more convenient +-- constructor. data DataPipelinePipelineParameterAttribute = DataPipelinePipelineParameterAttribute { _dataPipelinePipelineParameterAttributeKey :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelineParameterAttribute' containing --- | required fields as arguments. +-- required fields as arguments. dataPipelinePipelineParameterAttribute :: Val Text -- ^ 'dpppaKey' -> Val Text -- ^ 'dpppaStringValue' diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.DataPipelinePipelineParameterAttribute -- | Full data type definition for DataPipelinePipelineParameterObject. See --- | 'dataPipelinePipelineParameterObject' for a more convenient constructor. +-- 'dataPipelinePipelineParameterObject' for a more convenient constructor. data DataPipelinePipelineParameterObject = DataPipelinePipelineParameterObject { _dataPipelinePipelineParameterObjectAttributes :: [DataPipelinePipelineParameterAttribute] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelineParameterObject' containing required --- | fields as arguments. +-- fields as arguments. dataPipelinePipelineParameterObject :: [DataPipelinePipelineParameterAttribute] -- ^ 'dpppaoAttributes' -> Val Text -- ^ 'dpppaoId' diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs @@ -15,7 +15,7 @@ -- | Full data type definition for DataPipelinePipelineParameterValue. See --- | 'dataPipelinePipelineParameterValue' for a more convenient constructor. +-- 'dataPipelinePipelineParameterValue' for a more convenient constructor. data DataPipelinePipelineParameterValue = DataPipelinePipelineParameterValue { _dataPipelinePipelineParameterValueId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelineParameterValue' containing required --- | fields as arguments. +-- fields as arguments. dataPipelinePipelineParameterValue :: Val Text -- ^ 'dpppvId' -> Val Text -- ^ 'dpppvStringValue' diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.DataPipelinePipelineField -- | Full data type definition for DataPipelinePipelinePipelineObject. See --- | 'dataPipelinePipelinePipelineObject' for a more convenient constructor. +-- 'dataPipelinePipelinePipelineObject' for a more convenient constructor. data DataPipelinePipelinePipelineObject = DataPipelinePipelinePipelineObject { _dataPipelinePipelinePipelineObjectFields :: [DataPipelinePipelineField] @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelinePipelineObject' containing required --- | fields as arguments. +-- fields as arguments. dataPipelinePipelinePipelineObject :: [DataPipelinePipelineField] -- ^ 'dpppioFields' -> Val Text -- ^ 'dpppioId' diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs --- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs +++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs @@ -15,7 +15,7 @@ -- | Full data type definition for DataPipelinePipelinePipelineTag. See --- | 'dataPipelinePipelinePipelineTag' for a more convenient constructor. +-- 'dataPipelinePipelinePipelineTag' for a more convenient constructor. data DataPipelinePipelinePipelineTag = DataPipelinePipelinePipelineTag { _dataPipelinePipelinePipelineTagKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipelinePipelineTag' containing required --- | fields as arguments. +-- fields as arguments. dataPipelinePipelinePipelineTag :: Val Text -- ^ 'dppptKey' -> Val Text -- ^ 'dppptValue' diff --git a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs @@ -15,8 +15,8 @@ -- | Full data type definition for DirectoryServiceMicrosoftADVpcSettings. See --- | 'directoryServiceMicrosoftADVpcSettings' for a more convenient --- | constructor. +-- 'directoryServiceMicrosoftADVpcSettings' for a more convenient +-- constructor. data DirectoryServiceMicrosoftADVpcSettings = DirectoryServiceMicrosoftADVpcSettings { _directoryServiceMicrosoftADVpcSettingsSubnetIds :: [Val Text] @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'DirectoryServiceMicrosoftADVpcSettings' containing --- | required fields as arguments. +-- required fields as arguments. directoryServiceMicrosoftADVpcSettings :: [Val Text] -- ^ 'dsmadvsSubnetIds' -> Val Text -- ^ 'dsmadvsVpcId' diff --git a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs @@ -15,7 +15,7 @@ -- | Full data type definition for DirectoryServiceSimpleADVpcSettings. See --- | 'directoryServiceSimpleADVpcSettings' for a more convenient constructor. +-- 'directoryServiceSimpleADVpcSettings' for a more convenient constructor. data DirectoryServiceSimpleADVpcSettings = DirectoryServiceSimpleADVpcSettings { _directoryServiceSimpleADVpcSettingsSubnetIds :: [Val Text] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DirectoryServiceSimpleADVpcSettings' containing required --- | fields as arguments. +-- fields as arguments. directoryServiceSimpleADVpcSettings :: [Val Text] -- ^ 'dssadvsSubnetIds' -> Val Text -- ^ 'dssadvsVpcId' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for DynamoDBTableAttributeDefinition. See --- | 'dynamoDBTableAttributeDefinition' for a more convenient constructor. +-- 'dynamoDBTableAttributeDefinition' for a more convenient constructor. data DynamoDBTableAttributeDefinition = DynamoDBTableAttributeDefinition { _dynamoDBTableAttributeDefinitionAttributeName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableAttributeDefinition' containing required --- | fields as arguments. +-- fields as arguments. dynamoDBTableAttributeDefinition :: Val Text -- ^ 'ddbtadAttributeName' -> Val AttributeType -- ^ 'ddbtadAttributeType' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.DynamoDBTableProvisionedThroughput -- | Full data type definition for DynamoDBTableGlobalSecondaryIndex. See --- | 'dynamoDBTableGlobalSecondaryIndex' for a more convenient constructor. +-- 'dynamoDBTableGlobalSecondaryIndex' for a more convenient constructor. data DynamoDBTableGlobalSecondaryIndex = DynamoDBTableGlobalSecondaryIndex { _dynamoDBTableGlobalSecondaryIndexIndexName :: Val Text @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableGlobalSecondaryIndex' containing required --- | fields as arguments. +-- fields as arguments. dynamoDBTableGlobalSecondaryIndex :: Val Text -- ^ 'ddbtgsiIndexName' -> [DynamoDBTableKeySchema] -- ^ 'ddbtgsiKeySchema' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for DynamoDBTableKeySchema. See --- | 'dynamoDBTableKeySchema' for a more convenient constructor. +-- 'dynamoDBTableKeySchema' for a more convenient constructor. data DynamoDBTableKeySchema = DynamoDBTableKeySchema { _dynamoDBTableKeySchemaAttributeName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableKeySchema' containing required fields as --- | arguments. +-- arguments. dynamoDBTableKeySchema :: Val Text -- ^ 'ddbtksAttributeName' -> Val KeyType -- ^ 'ddbtksKeyType' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.DynamoDBTableProjection -- | Full data type definition for DynamoDBTableLocalSecondaryIndex. See --- | 'dynamoDBTableLocalSecondaryIndex' for a more convenient constructor. +-- 'dynamoDBTableLocalSecondaryIndex' for a more convenient constructor. data DynamoDBTableLocalSecondaryIndex = DynamoDBTableLocalSecondaryIndex { _dynamoDBTableLocalSecondaryIndexIndexName :: Val Text @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableLocalSecondaryIndex' containing required --- | fields as arguments. +-- fields as arguments. dynamoDBTableLocalSecondaryIndex :: Val Text -- ^ 'ddbtlsiIndexName' -> [DynamoDBTableKeySchema] -- ^ 'ddbtlsiKeySchema' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for DynamoDBTableProjection. See --- | 'dynamoDBTableProjection' for a more convenient constructor. +-- 'dynamoDBTableProjection' for a more convenient constructor. data DynamoDBTableProjection = DynamoDBTableProjection { _dynamoDBTableProjectionNonKeyAttributes :: Maybe [Val Text] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableProjection' containing required fields as --- | arguments. +-- arguments. dynamoDBTableProjection :: DynamoDBTableProjection dynamoDBTableProjection = diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs @@ -15,7 +15,7 @@ -- | Full data type definition for DynamoDBTableProvisionedThroughput. See --- | 'dynamoDBTableProvisionedThroughput' for a more convenient constructor. +-- 'dynamoDBTableProvisionedThroughput' for a more convenient constructor. data DynamoDBTableProvisionedThroughput = DynamoDBTableProvisionedThroughput { _dynamoDBTableProvisionedThroughputReadCapacityUnits :: Val Integer' @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableProvisionedThroughput' containing required --- | fields as arguments. +-- fields as arguments. dynamoDBTableProvisionedThroughput :: Val Integer' -- ^ 'ddbtptReadCapacityUnits' -> Val Integer' -- ^ 'ddbtptWriteCapacityUnits' diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs --- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs +++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for DynamoDBTableStreamSpecification. See --- | 'dynamoDBTableStreamSpecification' for a more convenient constructor. +-- 'dynamoDBTableStreamSpecification' for a more convenient constructor. data DynamoDBTableStreamSpecification = DynamoDBTableStreamSpecification { _dynamoDBTableStreamSpecificationStreamViewType :: Val StreamViewType @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'DynamoDBTableStreamSpecification' containing required --- | fields as arguments. +-- fields as arguments. dynamoDBTableStreamSpecification :: Val StreamViewType -- ^ 'ddbtssStreamViewType' -> DynamoDBTableStreamSpecification diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2InstanceAssociationParameter. See --- | 'ec2InstanceAssociationParameter' for a more convenient constructor. +-- 'ec2InstanceAssociationParameter' for a more convenient constructor. data EC2InstanceAssociationParameter = EC2InstanceAssociationParameter { _eC2InstanceAssociationParameterKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceAssociationParameter' containing required --- | fields as arguments. +-- fields as arguments. ec2InstanceAssociationParameter :: Val Text -- ^ 'eciapKey' -> [Val Text] -- ^ 'eciapValue' diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EC2InstanceNoDevice -- | Full data type definition for EC2InstanceBlockDeviceMapping. See --- | 'ec2InstanceBlockDeviceMapping' for a more convenient constructor. +-- 'ec2InstanceBlockDeviceMapping' for a more convenient constructor. data EC2InstanceBlockDeviceMapping = EC2InstanceBlockDeviceMapping { _eC2InstanceBlockDeviceMappingDeviceName :: Val Text @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceBlockDeviceMapping' containing required --- | fields as arguments. +-- fields as arguments. ec2InstanceBlockDeviceMapping :: Val Text -- ^ 'ecibdmDeviceName' -> EC2InstanceBlockDeviceMapping diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2InstanceEbs. See 'ec2InstanceEbs' for a --- | more convenient constructor. +-- more convenient constructor. data EC2InstanceEbs = EC2InstanceEbs { _eC2InstanceEbsDeleteOnTermination :: Maybe (Val Bool') diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2InstanceInstanceIpv6Address. See --- | 'ec2InstanceInstanceIpv6Address' for a more convenient constructor. +-- 'ec2InstanceInstanceIpv6Address' for a more convenient constructor. data EC2InstanceInstanceIpv6Address = EC2InstanceInstanceIpv6Address { _eC2InstanceInstanceIpv6AddressIpv6Address :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceInstanceIpv6Address' containing required --- | fields as arguments. +-- fields as arguments. ec2InstanceInstanceIpv6Address :: Val Text -- ^ 'eciiiaIpv6Address' -> EC2InstanceInstanceIpv6Address diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EC2InstancePrivateIpAddressSpecification -- | Full data type definition for EC2InstanceNetworkInterface. See --- | 'ec2InstanceNetworkInterface' for a more convenient constructor. +-- 'ec2InstanceNetworkInterface' for a more convenient constructor. data EC2InstanceNetworkInterface = EC2InstanceNetworkInterface { _eC2InstanceNetworkInterfaceAssociatePublicIpAddress :: Maybe (Val Bool') @@ -69,7 +69,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceNetworkInterface' containing required fields --- | as arguments. +-- as arguments. ec2InstanceNetworkInterface :: Val Text -- ^ 'eciniDeviceIndex' -> EC2InstanceNetworkInterface diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2InstanceNoDevice. See --- | 'ec2InstanceNoDevice' for a more convenient constructor. +-- 'ec2InstanceNoDevice' for a more convenient constructor. data EC2InstanceNoDevice = EC2InstanceNoDevice { @@ -29,7 +29,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceNoDevice' containing required fields as --- | arguments. +-- arguments. ec2InstanceNoDevice :: EC2InstanceNoDevice ec2InstanceNoDevice = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs @@ -15,8 +15,8 @@ -- | Full data type definition for EC2InstancePrivateIpAddressSpecification. --- | See 'ec2InstancePrivateIpAddressSpecification' for a more convenient --- | constructor. +-- See 'ec2InstancePrivateIpAddressSpecification' for a more convenient +-- constructor. data EC2InstancePrivateIpAddressSpecification = EC2InstancePrivateIpAddressSpecification { _eC2InstancePrivateIpAddressSpecificationPrimary :: Val Bool' @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstancePrivateIpAddressSpecification' containing --- | required fields as arguments. +-- required fields as arguments. ec2InstancePrivateIpAddressSpecification :: Val Bool' -- ^ 'ecipiasPrimary' -> Val Text -- ^ 'ecipiasPrivateIpAddress' diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EC2InstanceAssociationParameter -- | Full data type definition for EC2InstanceSsmAssociation. See --- | 'ec2InstanceSsmAssociation' for a more convenient constructor. +-- 'ec2InstanceSsmAssociation' for a more convenient constructor. data EC2InstanceSsmAssociation = EC2InstanceSsmAssociation { _eC2InstanceSsmAssociationAssociationParameters :: Maybe [EC2InstanceAssociationParameter] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceSsmAssociation' containing required fields as --- | arguments. +-- arguments. ec2InstanceSsmAssociation :: Val Text -- ^ 'ecisaDocumentName' -> EC2InstanceSsmAssociation diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2InstanceVolume. See 'ec2InstanceVolume' --- | for a more convenient constructor. +-- for a more convenient constructor. data EC2InstanceVolume = EC2InstanceVolume { _eC2InstanceVolumeDevice :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InstanceVolume' containing required fields as --- | arguments. +-- arguments. ec2InstanceVolume :: Val Text -- ^ 'ecivDevice' -> Val Text -- ^ 'ecivVolumeId' diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2NetworkAclEntryIcmp. See --- | 'ec2NetworkAclEntryIcmp' for a more convenient constructor. +-- 'ec2NetworkAclEntryIcmp' for a more convenient constructor. data EC2NetworkAclEntryIcmp = EC2NetworkAclEntryIcmp { _eC2NetworkAclEntryIcmpCode :: Maybe (Val Integer') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkAclEntryIcmp' containing required fields as --- | arguments. +-- arguments. ec2NetworkAclEntryIcmp :: EC2NetworkAclEntryIcmp ec2NetworkAclEntryIcmp = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2NetworkAclEntryPortRange. See --- | 'ec2NetworkAclEntryPortRange' for a more convenient constructor. +-- 'ec2NetworkAclEntryPortRange' for a more convenient constructor. data EC2NetworkAclEntryPortRange = EC2NetworkAclEntryPortRange { _eC2NetworkAclEntryPortRangeFrom :: Maybe (Val Integer') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkAclEntryPortRange' containing required fields --- | as arguments. +-- as arguments. ec2NetworkAclEntryPortRange :: EC2NetworkAclEntryPortRange ec2NetworkAclEntryPortRange = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs @@ -15,8 +15,8 @@ -- | Full data type definition for EC2NetworkInterfaceInstanceIpv6Address. See --- | 'ec2NetworkInterfaceInstanceIpv6Address' for a more convenient --- | constructor. +-- 'ec2NetworkInterfaceInstanceIpv6Address' for a more convenient +-- constructor. data EC2NetworkInterfaceInstanceIpv6Address = EC2NetworkInterfaceInstanceIpv6Address { _eC2NetworkInterfaceInstanceIpv6AddressIpv6Address :: Val Text @@ -36,7 +36,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkInterfaceInstanceIpv6Address' containing --- | required fields as arguments. +-- required fields as arguments. ec2NetworkInterfaceInstanceIpv6Address :: Val Text -- ^ 'ecniiiaIpv6Address' -> EC2NetworkInterfaceInstanceIpv6Address diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | EC2NetworkInterfacePrivateIpAddressSpecification. See --- | 'ec2NetworkInterfacePrivateIpAddressSpecification' for a more convenient --- | constructor. +-- EC2NetworkInterfacePrivateIpAddressSpecification. See +-- 'ec2NetworkInterfacePrivateIpAddressSpecification' for a more convenient +-- constructor. data EC2NetworkInterfacePrivateIpAddressSpecification = EC2NetworkInterfacePrivateIpAddressSpecification { _eC2NetworkInterfacePrivateIpAddressSpecificationPrimary :: Val Bool' @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkInterfacePrivateIpAddressSpecification' --- | containing required fields as arguments. +-- containing required fields as arguments. ec2NetworkInterfacePrivateIpAddressSpecification :: Val Bool' -- ^ 'ecnipiasPrimary' -> Val Text -- ^ 'ecnipiasPrivateIpAddress' diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupRule.hs b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupRule.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupRule.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SecurityGroupRule. See --- | 'ec2SecurityGroupRule' for a more convenient constructor. +-- 'ec2SecurityGroupRule' for a more convenient constructor. data EC2SecurityGroupRule = EC2SecurityGroupRule { _eC2SecurityGroupRuleCidrIp :: Maybe (Val Text) @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SecurityGroupRule' containing required fields as --- | arguments. +-- arguments. ec2SecurityGroupRule :: Val Text -- ^ 'ecsgrIpProtocol' -> EC2SecurityGroupRule diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMappings.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMappings.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMappings.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMappings.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EC2SpotFleetEbs -- | Full data type definition for EC2SpotFleetBlockDeviceMappings. See --- | 'ec2SpotFleetBlockDeviceMappings' for a more convenient constructor. +-- 'ec2SpotFleetBlockDeviceMappings' for a more convenient constructor. data EC2SpotFleetBlockDeviceMappings = EC2SpotFleetBlockDeviceMappings { _eC2SpotFleetBlockDeviceMappingsDeviceName :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetBlockDeviceMappings' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetBlockDeviceMappings :: Val Text -- ^ 'ecsfbdmDeviceName' -> EC2SpotFleetBlockDeviceMappings diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbs.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbs.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbs.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbs.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetEbs. See 'ec2SpotFleetEbs' for --- | a more convenient constructor. +-- a more convenient constructor. data EC2SpotFleetEbs = EC2SpotFleetEbs { _eC2SpotFleetEbsDeleteOnTermination :: Maybe (Val Bool') @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetEbs' containing required fields as --- | arguments. +-- arguments. ec2SpotFleetEbs :: EC2SpotFleetEbs ec2SpotFleetEbs = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfile.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfile.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfile.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfile.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetIamInstanceProfile. See --- | 'ec2SpotFleetIamInstanceProfile' for a more convenient constructor. +-- 'ec2SpotFleetIamInstanceProfile' for a more convenient constructor. data EC2SpotFleetIamInstanceProfile = EC2SpotFleetIamInstanceProfile { _eC2SpotFleetIamInstanceProfileArn :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetIamInstanceProfile' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetIamInstanceProfile :: EC2SpotFleetIamInstanceProfile ec2SpotFleetIamInstanceProfile = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetInstanceIpv6Address. See --- | 'ec2SpotFleetInstanceIpv6Address' for a more convenient constructor. +-- 'ec2SpotFleetInstanceIpv6Address' for a more convenient constructor. data EC2SpotFleetInstanceIpv6Address = EC2SpotFleetInstanceIpv6Address { _eC2SpotFleetInstanceIpv6AddressIpv6Address :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetInstanceIpv6Address' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetInstanceIpv6Address :: Val Text -- ^ 'ecsfiiaIpv6Address' -> EC2SpotFleetInstanceIpv6Address diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchSpecifications.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchSpecifications.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchSpecifications.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchSpecifications.hs @@ -20,7 +20,7 @@ import Stratosphere.ResourceProperties.EC2SpotFleetSecurityGroups -- | Full data type definition for EC2SpotFleetLaunchSpecifications. See --- | 'ec2SpotFleetLaunchSpecifications' for a more convenient constructor. +-- 'ec2SpotFleetLaunchSpecifications' for a more convenient constructor. data EC2SpotFleetLaunchSpecifications = EC2SpotFleetLaunchSpecifications { _eC2SpotFleetLaunchSpecificationsBlockDeviceMappings :: Maybe [EC2SpotFleetBlockDeviceMappings] @@ -85,7 +85,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetLaunchSpecifications' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetLaunchSpecifications :: Val Text -- ^ 'ecsflsImageId' -> Val Text -- ^ 'ecsflsInstanceType' diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetMonitoring.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetMonitoring.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetMonitoring.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetMonitoring.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetMonitoring. See --- | 'ec2SpotFleetMonitoring' for a more convenient constructor. +-- 'ec2SpotFleetMonitoring' for a more convenient constructor. data EC2SpotFleetMonitoring = EC2SpotFleetMonitoring { _eC2SpotFleetMonitoringEnabled :: Maybe (Val Bool') @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetMonitoring' containing required fields as --- | arguments. +-- arguments. ec2SpotFleetMonitoring :: EC2SpotFleetMonitoring ec2SpotFleetMonitoring = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetNetworkInterfaces.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetNetworkInterfaces.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetNetworkInterfaces.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetNetworkInterfaces.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EC2SpotFleetPrivateIpAddresses -- | Full data type definition for EC2SpotFleetNetworkInterfaces. See --- | 'ec2SpotFleetNetworkInterfaces' for a more convenient constructor. +-- 'ec2SpotFleetNetworkInterfaces' for a more convenient constructor. data EC2SpotFleetNetworkInterfaces = EC2SpotFleetNetworkInterfaces { _eC2SpotFleetNetworkInterfacesAssociatePublicIpAddress :: Maybe (Val Bool') @@ -66,7 +66,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetNetworkInterfaces' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetNetworkInterfaces :: Val Integer' -- ^ 'ecsfniDeviceIndex' -> EC2SpotFleetNetworkInterfaces diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPlacement.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPlacement.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPlacement.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPlacement.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetPlacement. See --- | 'ec2SpotFleetPlacement' for a more convenient constructor. +-- 'ec2SpotFleetPlacement' for a more convenient constructor. data EC2SpotFleetPlacement = EC2SpotFleetPlacement { _eC2SpotFleetPlacementAvailabilityZone :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetPlacement' containing required fields as --- | arguments. +-- arguments. ec2SpotFleetPlacement :: EC2SpotFleetPlacement ec2SpotFleetPlacement = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddresses.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddresses.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddresses.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddresses.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetPrivateIpAddresses. See --- | 'ec2SpotFleetPrivateIpAddresses' for a more convenient constructor. +-- 'ec2SpotFleetPrivateIpAddresses' for a more convenient constructor. data EC2SpotFleetPrivateIpAddresses = EC2SpotFleetPrivateIpAddresses { _eC2SpotFleetPrivateIpAddressesPrimary :: Maybe (Val Bool') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetPrivateIpAddresses' containing required --- | fields as arguments. +-- fields as arguments. ec2SpotFleetPrivateIpAddresses :: Val Text -- ^ 'ecsfpiaPrivateIpAddress' -> EC2SpotFleetPrivateIpAddresses diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSecurityGroups.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSecurityGroups.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSecurityGroups.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSecurityGroups.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SpotFleetSecurityGroups. See --- | 'ec2SpotFleetSecurityGroups' for a more convenient constructor. +-- 'ec2SpotFleetSecurityGroups' for a more convenient constructor. data EC2SpotFleetSecurityGroups = EC2SpotFleetSecurityGroups { _eC2SpotFleetSecurityGroupsGroupId :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetSecurityGroups' containing required fields --- | as arguments. +-- as arguments. ec2SpotFleetSecurityGroups :: EC2SpotFleetSecurityGroups ec2SpotFleetSecurityGroups = diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs --- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs +++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.EC2SpotFleetLaunchSpecifications -- | Full data type definition for EC2SpotFleetSpotFleetRequestConfigData. See --- | 'ec2SpotFleetSpotFleetRequestConfigData' for a more convenient --- | constructor. +-- 'ec2SpotFleetSpotFleetRequestConfigData' for a more convenient +-- constructor. data EC2SpotFleetSpotFleetRequestConfigData = EC2SpotFleetSpotFleetRequestConfigData { _eC2SpotFleetSpotFleetRequestConfigDataAllocationStrategy :: Maybe (Val Text) @@ -60,7 +60,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SpotFleetSpotFleetRequestConfigData' containing --- | required fields as arguments. +-- required fields as arguments. ec2SpotFleetSpotFleetRequestConfigData :: Val Text -- ^ 'ecsfsfrcdIamFleetRole' -> [EC2SpotFleetLaunchSpecifications] -- ^ 'ecsfsfrcdLaunchSpecifications' diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSServiceDeploymentConfiguration. See --- | 'ecsServiceDeploymentConfiguration' for a more convenient constructor. +-- 'ecsServiceDeploymentConfiguration' for a more convenient constructor. data ECSServiceDeploymentConfiguration = ECSServiceDeploymentConfiguration { _eCSServiceDeploymentConfigurationMaximumPercent :: Maybe (Val Integer') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSServiceDeploymentConfiguration' containing required --- | fields as arguments. +-- fields as arguments. ecsServiceDeploymentConfiguration :: ECSServiceDeploymentConfiguration ecsServiceDeploymentConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSServiceLoadBalancer. See --- | 'ecsServiceLoadBalancer' for a more convenient constructor. +-- 'ecsServiceLoadBalancer' for a more convenient constructor. data ECSServiceLoadBalancer = ECSServiceLoadBalancer { _eCSServiceLoadBalancerContainerName :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSServiceLoadBalancer' containing required fields as --- | arguments. +-- arguments. ecsServiceLoadBalancer :: Val Integer' -- ^ 'ecsslbContainerPort' -> ECSServiceLoadBalancer diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs @@ -21,7 +21,7 @@ import Stratosphere.ResourceProperties.ECSTaskDefinitionVolumeFrom -- | Full data type definition for ECSTaskDefinitionContainerDefinition. See --- | 'ecsTaskDefinitionContainerDefinition' for a more convenient constructor. +-- 'ecsTaskDefinitionContainerDefinition' for a more convenient constructor. data ECSTaskDefinitionContainerDefinition = ECSTaskDefinitionContainerDefinition { _eCSTaskDefinitionContainerDefinitionCommand :: Maybe [Val Text] @@ -116,7 +116,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionContainerDefinition' containing --- | required fields as arguments. +-- required fields as arguments. ecsTaskDefinitionContainerDefinition :: Val Text -- ^ 'ecstdcdImage' -> Val Text -- ^ 'ecstdcdName' diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionHostEntry. See --- | 'ecsTaskDefinitionHostEntry' for a more convenient constructor. +-- 'ecsTaskDefinitionHostEntry' for a more convenient constructor. data ECSTaskDefinitionHostEntry = ECSTaskDefinitionHostEntry { _eCSTaskDefinitionHostEntryHostname :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionHostEntry' containing required fields --- | as arguments. +-- as arguments. ecsTaskDefinitionHostEntry :: Val Text -- ^ 'ecstdheHostname' -> Val Text -- ^ 'ecstdheIpAddress' diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ECSTaskDefinitionHostVolumeProperties. See --- | 'ecsTaskDefinitionHostVolumeProperties' for a more convenient --- | constructor. +-- 'ecsTaskDefinitionHostVolumeProperties' for a more convenient +-- constructor. data ECSTaskDefinitionHostVolumeProperties = ECSTaskDefinitionHostVolumeProperties { _eCSTaskDefinitionHostVolumePropertiesSourcePath :: Maybe (Val Text) @@ -36,7 +36,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionHostVolumeProperties' containing --- | required fields as arguments. +-- required fields as arguments. ecsTaskDefinitionHostVolumeProperties :: ECSTaskDefinitionHostVolumeProperties ecsTaskDefinitionHostVolumeProperties = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionKeyValuePair. See --- | 'ecsTaskDefinitionKeyValuePair' for a more convenient constructor. +-- 'ecsTaskDefinitionKeyValuePair' for a more convenient constructor. data ECSTaskDefinitionKeyValuePair = ECSTaskDefinitionKeyValuePair { _eCSTaskDefinitionKeyValuePairName :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionKeyValuePair' containing required --- | fields as arguments. +-- fields as arguments. ecsTaskDefinitionKeyValuePair :: ECSTaskDefinitionKeyValuePair ecsTaskDefinitionKeyValuePair = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionLogConfiguration. See --- | 'ecsTaskDefinitionLogConfiguration' for a more convenient constructor. +-- 'ecsTaskDefinitionLogConfiguration' for a more convenient constructor. data ECSTaskDefinitionLogConfiguration = ECSTaskDefinitionLogConfiguration { _eCSTaskDefinitionLogConfigurationLogDriver :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionLogConfiguration' containing required --- | fields as arguments. +-- fields as arguments. ecsTaskDefinitionLogConfiguration :: Val Text -- ^ 'ecstdlcLogDriver' -> ECSTaskDefinitionLogConfiguration diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionMountPoint. See --- | 'ecsTaskDefinitionMountPoint' for a more convenient constructor. +-- 'ecsTaskDefinitionMountPoint' for a more convenient constructor. data ECSTaskDefinitionMountPoint = ECSTaskDefinitionMountPoint { _eCSTaskDefinitionMountPointContainerPath :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionMountPoint' containing required fields --- | as arguments. +-- as arguments. ecsTaskDefinitionMountPoint :: ECSTaskDefinitionMountPoint ecsTaskDefinitionMountPoint = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionPortMapping. See --- | 'ecsTaskDefinitionPortMapping' for a more convenient constructor. +-- 'ecsTaskDefinitionPortMapping' for a more convenient constructor. data ECSTaskDefinitionPortMapping = ECSTaskDefinitionPortMapping { _eCSTaskDefinitionPortMappingContainerPort :: Maybe (Val Integer') @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionPortMapping' containing required fields --- | as arguments. +-- as arguments. ecsTaskDefinitionPortMapping :: ECSTaskDefinitionPortMapping ecsTaskDefinitionPortMapping = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionUlimit. See --- | 'ecsTaskDefinitionUlimit' for a more convenient constructor. +-- 'ecsTaskDefinitionUlimit' for a more convenient constructor. data ECSTaskDefinitionUlimit = ECSTaskDefinitionUlimit { _eCSTaskDefinitionUlimitHardLimit :: Val Integer' @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionUlimit' containing required fields as --- | arguments. +-- arguments. ecsTaskDefinitionUlimit :: Val Integer' -- ^ 'ecstduHardLimit' -> Val Text -- ^ 'ecstduName' diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ECSTaskDefinitionHostVolumeProperties -- | Full data type definition for ECSTaskDefinitionVolume. See --- | 'ecsTaskDefinitionVolume' for a more convenient constructor. +-- 'ecsTaskDefinitionVolume' for a more convenient constructor. data ECSTaskDefinitionVolume = ECSTaskDefinitionVolume { _eCSTaskDefinitionVolumeHost :: Maybe ECSTaskDefinitionHostVolumeProperties @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionVolume' containing required fields as --- | arguments. +-- arguments. ecsTaskDefinitionVolume :: ECSTaskDefinitionVolume ecsTaskDefinitionVolume = diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs --- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs +++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSTaskDefinitionVolumeFrom. See --- | 'ecsTaskDefinitionVolumeFrom' for a more convenient constructor. +-- 'ecsTaskDefinitionVolumeFrom' for a more convenient constructor. data ECSTaskDefinitionVolumeFrom = ECSTaskDefinitionVolumeFrom { _eCSTaskDefinitionVolumeFromReadOnly :: Maybe (Val Bool') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinitionVolumeFrom' containing required fields --- | as arguments. +-- as arguments. ecsTaskDefinitionVolumeFrom :: ECSTaskDefinitionVolumeFrom ecsTaskDefinitionVolumeFrom = diff --git a/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs b/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs --- a/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs +++ b/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EFSFileSystemElasticFileSystemTag. See --- | 'efsFileSystemElasticFileSystemTag' for a more convenient constructor. +-- 'efsFileSystemElasticFileSystemTag' for a more convenient constructor. data EFSFileSystemElasticFileSystemTag = EFSFileSystemElasticFileSystemTag { _eFSFileSystemElasticFileSystemTagKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EFSFileSystemElasticFileSystemTag' containing required --- | fields as arguments. +-- fields as arguments. efsFileSystemElasticFileSystemTag :: Val Text -- ^ 'efsfsefstKey' -> Val Text -- ^ 'efsfsefstValue' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRClusterApplication. See --- | 'emrClusterApplication' for a more convenient constructor. +-- 'emrClusterApplication' for a more convenient constructor. data EMRClusterApplication = EMRClusterApplication { _eMRClusterApplicationAdditionalInfo :: Maybe Object @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterApplication' containing required fields as --- | arguments. +-- arguments. emrClusterApplication :: EMRClusterApplication emrClusterApplication = diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EMRClusterScriptBootstrapActionConfig -- | Full data type definition for EMRClusterBootstrapActionConfig. See --- | 'emrClusterBootstrapActionConfig' for a more convenient constructor. +-- 'emrClusterBootstrapActionConfig' for a more convenient constructor. data EMRClusterBootstrapActionConfig = EMRClusterBootstrapActionConfig { _eMRClusterBootstrapActionConfigName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterBootstrapActionConfig' containing required --- | fields as arguments. +-- fields as arguments. emrClusterBootstrapActionConfig :: Val Text -- ^ 'emrcbacName' -> EMRClusterScriptBootstrapActionConfig -- ^ 'emrcbacScriptBootstrapAction' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRClusterConfiguration. See --- | 'emrClusterConfiguration' for a more convenient constructor. +-- 'emrClusterConfiguration' for a more convenient constructor. data EMRClusterConfiguration = EMRClusterConfiguration { _eMRClusterConfigurationClassification :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterConfiguration' containing required fields as --- | arguments. +-- arguments. emrClusterConfiguration :: EMRClusterConfiguration emrClusterConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EMRClusterVolumeSpecification -- | Full data type definition for EMRClusterEbsBlockDeviceConfig. See --- | 'emrClusterEbsBlockDeviceConfig' for a more convenient constructor. +-- 'emrClusterEbsBlockDeviceConfig' for a more convenient constructor. data EMRClusterEbsBlockDeviceConfig = EMRClusterEbsBlockDeviceConfig { _eMRClusterEbsBlockDeviceConfigVolumeSpecification :: EMRClusterVolumeSpecification @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterEbsBlockDeviceConfig' containing required --- | fields as arguments. +-- fields as arguments. emrClusterEbsBlockDeviceConfig :: EMRClusterVolumeSpecification -- ^ 'emrcebdcVolumeSpecification' -> EMRClusterEbsBlockDeviceConfig diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EMRClusterEbsBlockDeviceConfig -- | Full data type definition for EMRClusterEbsConfiguration. See --- | 'emrClusterEbsConfiguration' for a more convenient constructor. +-- 'emrClusterEbsConfiguration' for a more convenient constructor. data EMRClusterEbsConfiguration = EMRClusterEbsConfiguration { _eMRClusterEbsConfigurationEbsBlockDeviceConfigs :: Maybe [EMRClusterEbsBlockDeviceConfig] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterEbsConfiguration' containing required fields --- | as arguments. +-- as arguments. emrClusterEbsConfiguration :: EMRClusterEbsConfiguration emrClusterEbsConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EMRClusterEbsConfiguration -- | Full data type definition for EMRClusterInstanceGroupConfig. See --- | 'emrClusterInstanceGroupConfig' for a more convenient constructor. +-- 'emrClusterInstanceGroupConfig' for a more convenient constructor. data EMRClusterInstanceGroupConfig = EMRClusterInstanceGroupConfig { _eMRClusterInstanceGroupConfigBidPrice :: Maybe (Val Text) @@ -54,7 +54,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterInstanceGroupConfig' containing required --- | fields as arguments. +-- fields as arguments. emrClusterInstanceGroupConfig :: Val Integer' -- ^ 'emrcigcInstanceCount' -> Val Text -- ^ 'emrcigcInstanceType' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EMRClusterPlacementType -- | Full data type definition for EMRClusterJobFlowInstancesConfig. See --- | 'emrClusterJobFlowInstancesConfig' for a more convenient constructor. +-- 'emrClusterJobFlowInstancesConfig' for a more convenient constructor. data EMRClusterJobFlowInstancesConfig = EMRClusterJobFlowInstancesConfig { _eMRClusterJobFlowInstancesConfigAdditionalMasterSecurityGroups :: Maybe [Val Text] @@ -69,7 +69,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterJobFlowInstancesConfig' containing required --- | fields as arguments. +-- fields as arguments. emrClusterJobFlowInstancesConfig :: EMRClusterInstanceGroupConfig -- ^ 'emrcjficCoreInstanceGroup' -> EMRClusterInstanceGroupConfig -- ^ 'emrcjficMasterInstanceGroup' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRClusterPlacementType. See --- | 'emrClusterPlacementType' for a more convenient constructor. +-- 'emrClusterPlacementType' for a more convenient constructor. data EMRClusterPlacementType = EMRClusterPlacementType { _eMRClusterPlacementTypeAvailabilityZone :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterPlacementType' containing required fields as --- | arguments. +-- arguments. emrClusterPlacementType :: Val Text -- ^ 'emrcptAvailabilityZone' -> EMRClusterPlacementType diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs @@ -15,8 +15,8 @@ -- | Full data type definition for EMRClusterScriptBootstrapActionConfig. See --- | 'emrClusterScriptBootstrapActionConfig' for a more convenient --- | constructor. +-- 'emrClusterScriptBootstrapActionConfig' for a more convenient +-- constructor. data EMRClusterScriptBootstrapActionConfig = EMRClusterScriptBootstrapActionConfig { _eMRClusterScriptBootstrapActionConfigArgs :: Maybe [Val Text] @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterScriptBootstrapActionConfig' containing --- | required fields as arguments. +-- required fields as arguments. emrClusterScriptBootstrapActionConfig :: Val Text -- ^ 'emrcsbacPath' -> EMRClusterScriptBootstrapActionConfig diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRClusterVolumeSpecification. See --- | 'emrClusterVolumeSpecification' for a more convenient constructor. +-- 'emrClusterVolumeSpecification' for a more convenient constructor. data EMRClusterVolumeSpecification = EMRClusterVolumeSpecification { _eMRClusterVolumeSpecificationIops :: Maybe (Val Integer') @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRClusterVolumeSpecification' containing required --- | fields as arguments. +-- fields as arguments. emrClusterVolumeSpecification :: Val Integer' -- ^ 'emrcvsSizeInGB' -> Val Text -- ^ 'emrcvsVolumeType' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRInstanceGroupConfigConfiguration. See --- | 'emrInstanceGroupConfigConfiguration' for a more convenient constructor. +-- 'emrInstanceGroupConfigConfiguration' for a more convenient constructor. data EMRInstanceGroupConfigConfiguration = EMRInstanceGroupConfigConfiguration { _eMRInstanceGroupConfigConfigurationClassification :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRInstanceGroupConfigConfiguration' containing required --- | fields as arguments. +-- fields as arguments. emrInstanceGroupConfigConfiguration :: EMRInstanceGroupConfigConfiguration emrInstanceGroupConfigConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.EMRInstanceGroupConfigVolumeSpecification -- | Full data type definition for EMRInstanceGroupConfigEbsBlockDeviceConfig. --- | See 'emrInstanceGroupConfigEbsBlockDeviceConfig' for a more convenient --- | constructor. +-- See 'emrInstanceGroupConfigEbsBlockDeviceConfig' for a more convenient +-- constructor. data EMRInstanceGroupConfigEbsBlockDeviceConfig = EMRInstanceGroupConfigEbsBlockDeviceConfig { _eMRInstanceGroupConfigEbsBlockDeviceConfigVolumeSpecification :: EMRInstanceGroupConfigVolumeSpecification @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRInstanceGroupConfigEbsBlockDeviceConfig' containing --- | required fields as arguments. +-- required fields as arguments. emrInstanceGroupConfigEbsBlockDeviceConfig :: EMRInstanceGroupConfigVolumeSpecification -- ^ 'emrigcebdcVolumeSpecification' -> EMRInstanceGroupConfigEbsBlockDeviceConfig diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.EMRInstanceGroupConfigEbsBlockDeviceConfig -- | Full data type definition for EMRInstanceGroupConfigEbsConfiguration. See --- | 'emrInstanceGroupConfigEbsConfiguration' for a more convenient --- | constructor. +-- 'emrInstanceGroupConfigEbsConfiguration' for a more convenient +-- constructor. data EMRInstanceGroupConfigEbsConfiguration = EMRInstanceGroupConfigEbsConfiguration { _eMRInstanceGroupConfigEbsConfigurationEbsBlockDeviceConfigs :: Maybe [EMRInstanceGroupConfigEbsBlockDeviceConfig] @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRInstanceGroupConfigEbsConfiguration' containing --- | required fields as arguments. +-- required fields as arguments. emrInstanceGroupConfigEbsConfiguration :: EMRInstanceGroupConfigEbsConfiguration emrInstanceGroupConfigEbsConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs @@ -15,8 +15,8 @@ -- | Full data type definition for EMRInstanceGroupConfigVolumeSpecification. --- | See 'emrInstanceGroupConfigVolumeSpecification' for a more convenient --- | constructor. +-- See 'emrInstanceGroupConfigVolumeSpecification' for a more convenient +-- constructor. data EMRInstanceGroupConfigVolumeSpecification = EMRInstanceGroupConfigVolumeSpecification { _eMRInstanceGroupConfigVolumeSpecificationIops :: Maybe (Val Integer') @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRInstanceGroupConfigVolumeSpecification' containing --- | required fields as arguments. +-- required fields as arguments. emrInstanceGroupConfigVolumeSpecification :: Val Integer' -- ^ 'emrigcvsSizeInGB' -> Val Text -- ^ 'emrigcvsVolumeType' diff --git a/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EMRStepKeyValue -- | Full data type definition for EMRStepHadoopJarStepConfig. See --- | 'emrStepHadoopJarStepConfig' for a more convenient constructor. +-- 'emrStepHadoopJarStepConfig' for a more convenient constructor. data EMRStepHadoopJarStepConfig = EMRStepHadoopJarStepConfig { _eMRStepHadoopJarStepConfigArgs :: Maybe [Val Text] @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRStepHadoopJarStepConfig' containing required fields --- | as arguments. +-- as arguments. emrStepHadoopJarStepConfig :: Val Text -- ^ 'emrshjscJar' -> EMRStepHadoopJarStepConfig diff --git a/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs b/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs --- a/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs +++ b/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EMRStepKeyValue. See 'emrStepKeyValue' for --- | a more convenient constructor. +-- a more convenient constructor. data EMRStepKeyValue = EMRStepKeyValue { _eMRStepKeyValueKey :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRStepKeyValue' containing required fields as --- | arguments. +-- arguments. emrStepKeyValue :: EMRStepKeyValue emrStepKeyValue = diff --git a/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElastiCacheReplicationGroupNodeGroupConfiguration. See --- | 'elastiCacheReplicationGroupNodeGroupConfiguration' for a more convenient --- | constructor. +-- ElastiCacheReplicationGroupNodeGroupConfiguration. See +-- 'elastiCacheReplicationGroupNodeGroupConfiguration' for a more convenient +-- constructor. data ElastiCacheReplicationGroupNodeGroupConfiguration = ElastiCacheReplicationGroupNodeGroupConfiguration { _elastiCacheReplicationGroupNodeGroupConfigurationPrimaryAvailabilityZone :: Maybe (Val Text) @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheReplicationGroupNodeGroupConfiguration' --- | containing required fields as arguments. +-- containing required fields as arguments. elastiCacheReplicationGroupNodeGroupConfiguration :: ElastiCacheReplicationGroupNodeGroupConfiguration elastiCacheReplicationGroupNodeGroupConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticBeanstalkApplicationVersionSourceBundle. See --- | 'elasticBeanstalkApplicationVersionSourceBundle' for a more convenient --- | constructor. +-- ElasticBeanstalkApplicationVersionSourceBundle. See +-- 'elasticBeanstalkApplicationVersionSourceBundle' for a more convenient +-- constructor. data ElasticBeanstalkApplicationVersionSourceBundle = ElasticBeanstalkApplicationVersionSourceBundle { _elasticBeanstalkApplicationVersionSourceBundleS3Bucket :: Val Text @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkApplicationVersionSourceBundle' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticBeanstalkApplicationVersionSourceBundle :: Val Text -- ^ 'ebavsbS3Bucket' -> Val Text -- ^ 'ebavsbS3Key' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting. See --- | 'elasticBeanstalkConfigurationTemplateConfigurationOptionSetting' for a --- | more convenient constructor. +-- ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting. See +-- 'elasticBeanstalkConfigurationTemplateConfigurationOptionSetting' for a +-- more convenient constructor. data ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting = ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting { _elasticBeanstalkConfigurationTemplateConfigurationOptionSettingNamespace :: Val Text @@ -43,8 +43,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting' --- | containing required fields as arguments. +-- 'ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting' +-- containing required fields as arguments. elasticBeanstalkConfigurationTemplateConfigurationOptionSetting :: Val Text -- ^ 'ebctcosNamespace' -> Val Text -- ^ 'ebctcosOptionName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticBeanstalkConfigurationTemplateSourceConfiguration. See --- | 'elasticBeanstalkConfigurationTemplateSourceConfiguration' for a more --- | convenient constructor. +-- ElasticBeanstalkConfigurationTemplateSourceConfiguration. See +-- 'elasticBeanstalkConfigurationTemplateSourceConfiguration' for a more +-- convenient constructor. data ElasticBeanstalkConfigurationTemplateSourceConfiguration = ElasticBeanstalkConfigurationTemplateSourceConfiguration { _elasticBeanstalkConfigurationTemplateSourceConfigurationApplicationName :: Val Text @@ -40,8 +40,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ElasticBeanstalkConfigurationTemplateSourceConfiguration' containing --- | required fields as arguments. +-- 'ElasticBeanstalkConfigurationTemplateSourceConfiguration' containing +-- required fields as arguments. elasticBeanstalkConfigurationTemplateSourceConfiguration :: Val Text -- ^ 'ebctscApplicationName' -> Val Text -- ^ 'ebctscTemplateName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSettings.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSettings.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticBeanstalkEnvironmentOptionSettings. --- | See 'elasticBeanstalkEnvironmentOptionSettings' for a more convenient --- | constructor. +-- See 'elasticBeanstalkEnvironmentOptionSettings' for a more convenient +-- constructor. data ElasticBeanstalkEnvironmentOptionSettings = ElasticBeanstalkEnvironmentOptionSettings { _elasticBeanstalkEnvironmentOptionSettingsNamespace :: Val Text @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkEnvironmentOptionSettings' containing --- | required fields as arguments. +-- required fields as arguments. elasticBeanstalkEnvironmentOptionSettings :: Val Text -- ^ 'ebeosNamespace' -> Val Text -- ^ 'ebeosOptionName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElasticBeanstalkEnvironmentTier. See --- | 'elasticBeanstalkEnvironmentTier' for a more convenient constructor. +-- 'elasticBeanstalkEnvironmentTier' for a more convenient constructor. data ElasticBeanstalkEnvironmentTier = ElasticBeanstalkEnvironmentTier { _elasticBeanstalkEnvironmentTierName :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkEnvironmentTier' containing required --- | fields as arguments. +-- fields as arguments. elasticBeanstalkEnvironmentTier :: ElasticBeanstalkEnvironmentTier elasticBeanstalkEnvironmentTier = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerAccessLoggingPolicy. See --- | 'elasticLoadBalancingLoadBalancerAccessLoggingPolicy' for a more --- | convenient constructor. +-- ElasticLoadBalancingLoadBalancerAccessLoggingPolicy. See +-- 'elasticLoadBalancingLoadBalancerAccessLoggingPolicy' for a more +-- convenient constructor. data ElasticLoadBalancingLoadBalancerAccessLoggingPolicy = ElasticLoadBalancingLoadBalancerAccessLoggingPolicy { _elasticLoadBalancingLoadBalancerAccessLoggingPolicyEmitInterval :: Maybe (Val Integer') @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancerAccessLoggingPolicy' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingLoadBalancerAccessLoggingPolicy :: Val Bool' -- ^ 'elblbalpEnabled' -> Val Text -- ^ 'elblbalpS3BucketName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy. See --- | 'elasticLoadBalancingLoadBalancerAppCookieStickinessPolicy' for a more --- | convenient constructor. +-- ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy. See +-- 'elasticLoadBalancingLoadBalancerAppCookieStickinessPolicy' for a more +-- convenient constructor. data ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy = ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy { _elasticLoadBalancingLoadBalancerAppCookieStickinessPolicyCookieName :: Val Text @@ -40,8 +40,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy' containing --- | required fields as arguments. +-- 'ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy' containing +-- required fields as arguments. elasticLoadBalancingLoadBalancerAppCookieStickinessPolicy :: Val Text -- ^ 'elblbacspCookieName' -> Val Text -- ^ 'elblbacspPolicyName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy. See --- | 'elasticLoadBalancingLoadBalancerConnectionDrainingPolicy' for a more --- | convenient constructor. +-- ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy. See +-- 'elasticLoadBalancingLoadBalancerConnectionDrainingPolicy' for a more +-- convenient constructor. data ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy = ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy { _elasticLoadBalancingLoadBalancerConnectionDrainingPolicyEnabled :: Val Bool' @@ -40,8 +40,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy' containing --- | required fields as arguments. +-- 'ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy' containing +-- required fields as arguments. elasticLoadBalancingLoadBalancerConnectionDrainingPolicy :: Val Bool' -- ^ 'elblbcdpEnabled' -> ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerConnectionSettings. See --- | 'elasticLoadBalancingLoadBalancerConnectionSettings' for a more --- | convenient constructor. +-- ElasticLoadBalancingLoadBalancerConnectionSettings. See +-- 'elasticLoadBalancingLoadBalancerConnectionSettings' for a more +-- convenient constructor. data ElasticLoadBalancingLoadBalancerConnectionSettings = ElasticLoadBalancingLoadBalancerConnectionSettings { _elasticLoadBalancingLoadBalancerConnectionSettingsIdleTimeout :: Val Integer' @@ -37,7 +37,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancerConnectionSettings' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingLoadBalancerConnectionSettings :: Val Integer' -- ^ 'elblbcsIdleTimeout' -> ElasticLoadBalancingLoadBalancerConnectionSettings diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerHealthCheck. See --- | 'elasticLoadBalancingLoadBalancerHealthCheck' for a more convenient --- | constructor. +-- ElasticLoadBalancingLoadBalancerHealthCheck. See +-- 'elasticLoadBalancingLoadBalancerHealthCheck' for a more convenient +-- constructor. data ElasticLoadBalancingLoadBalancerHealthCheck = ElasticLoadBalancingLoadBalancerHealthCheck { _elasticLoadBalancingLoadBalancerHealthCheckHealthyThreshold :: Val Text @@ -49,7 +49,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancerHealthCheck' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingLoadBalancerHealthCheck :: Val Text -- ^ 'elblbhcHealthyThreshold' -> Val Text -- ^ 'elblbhcInterval' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy. See --- | 'elasticLoadBalancingLoadBalancerLBCookieStickinessPolicy' for a more --- | convenient constructor. +-- ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy. See +-- 'elasticLoadBalancingLoadBalancerLBCookieStickinessPolicy' for a more +-- convenient constructor. data ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy = ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy { _elasticLoadBalancingLoadBalancerLBCookieStickinessPolicyCookieExpirationPeriod :: Maybe (Val Text) @@ -40,8 +40,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy' containing --- | required fields as arguments. +-- 'ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy' containing +-- required fields as arguments. elasticLoadBalancingLoadBalancerLBCookieStickinessPolicy :: ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy elasticLoadBalancingLoadBalancerLBCookieStickinessPolicy = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticLoadBalancingLoadBalancerListeners. --- | See 'elasticLoadBalancingLoadBalancerListeners' for a more convenient --- | constructor. +-- See 'elasticLoadBalancingLoadBalancerListeners' for a more convenient +-- constructor. data ElasticLoadBalancingLoadBalancerListeners = ElasticLoadBalancingLoadBalancerListeners { _elasticLoadBalancingLoadBalancerListenersInstancePort :: Val Text @@ -51,7 +51,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancerListeners' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingLoadBalancerListeners :: Val Text -- ^ 'elblblInstancePort' -> Val Text -- ^ 'elblblLoadBalancerPort' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticLoadBalancingLoadBalancerPolicies. --- | See 'elasticLoadBalancingLoadBalancerPolicies' for a more convenient --- | constructor. +-- See 'elasticLoadBalancingLoadBalancerPolicies' for a more convenient +-- constructor. data ElasticLoadBalancingLoadBalancerPolicies = ElasticLoadBalancingLoadBalancerPolicies { _elasticLoadBalancingLoadBalancerPoliciesAttributes :: [Object] @@ -48,7 +48,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancerPolicies' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingLoadBalancerPolicies :: [Object] -- ^ 'elblbpAttributes' -> Val Text -- ^ 'elblbpPolicyName' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElasticLoadBalancingV2ListenerAction. See --- | 'elasticLoadBalancingV2ListenerAction' for a more convenient constructor. +-- 'elasticLoadBalancingV2ListenerAction' for a more convenient constructor. data ElasticLoadBalancingV2ListenerAction = ElasticLoadBalancingV2ListenerAction { _elasticLoadBalancingV2ListenerActionTargetGroupArn :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2ListenerAction' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingV2ListenerAction :: Val Text -- ^ 'elbvlaTargetGroupArn' -> Val Text -- ^ 'elbvlaType' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticLoadBalancingV2ListenerCertificate. --- | See 'elasticLoadBalancingV2ListenerCertificate' for a more convenient --- | constructor. +-- See 'elasticLoadBalancingV2ListenerCertificate' for a more convenient +-- constructor. data ElasticLoadBalancingV2ListenerCertificate = ElasticLoadBalancingV2ListenerCertificate { _elasticLoadBalancingV2ListenerCertificateCertificateArn :: Maybe (Val Text) @@ -36,7 +36,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2ListenerCertificate' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingV2ListenerCertificate :: ElasticLoadBalancingV2ListenerCertificate elasticLoadBalancingV2ListenerCertificate = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticLoadBalancingV2ListenerRuleAction. --- | See 'elasticLoadBalancingV2ListenerRuleAction' for a more convenient --- | constructor. +-- See 'elasticLoadBalancingV2ListenerRuleAction' for a more convenient +-- constructor. data ElasticLoadBalancingV2ListenerRuleAction = ElasticLoadBalancingV2ListenerRuleAction { _elasticLoadBalancingV2ListenerRuleActionTargetGroupArn :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleAction' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingV2ListenerRuleAction :: Val Text -- ^ 'elbvlraTargetGroupArn' -> Val Text -- ^ 'elbvlraType' diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingV2ListenerRuleRuleCondition. See --- | 'elasticLoadBalancingV2ListenerRuleRuleCondition' for a more convenient --- | constructor. +-- ElasticLoadBalancingV2ListenerRuleRuleCondition. See +-- 'elasticLoadBalancingV2ListenerRuleRuleCondition' for a more convenient +-- constructor. data ElasticLoadBalancingV2ListenerRuleRuleCondition = ElasticLoadBalancingV2ListenerRuleRuleCondition { _elasticLoadBalancingV2ListenerRuleRuleConditionField :: Maybe (Val Text) @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleRuleCondition' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingV2ListenerRuleRuleCondition :: ElasticLoadBalancingV2ListenerRuleRuleCondition elasticLoadBalancingV2ListenerRuleRuleCondition = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute. See --- | 'elasticLoadBalancingV2LoadBalancerLoadBalancerAttribute' for a more --- | convenient constructor. +-- ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute. See +-- 'elasticLoadBalancingV2LoadBalancerLoadBalancerAttribute' for a more +-- convenient constructor. data ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute = ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute { _elasticLoadBalancingV2LoadBalancerLoadBalancerAttributeKey :: Maybe (Val Text) @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingV2LoadBalancerLoadBalancerAttribute :: ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute elasticLoadBalancingV2LoadBalancerLoadBalancerAttribute = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs @@ -15,8 +15,8 @@ -- | Full data type definition for ElasticLoadBalancingV2TargetGroupMatcher. --- | See 'elasticLoadBalancingV2TargetGroupMatcher' for a more convenient --- | constructor. +-- See 'elasticLoadBalancingV2TargetGroupMatcher' for a more convenient +-- constructor. data ElasticLoadBalancingV2TargetGroupMatcher = ElasticLoadBalancingV2TargetGroupMatcher { _elasticLoadBalancingV2TargetGroupMatcherHttpCode :: Val Text @@ -36,7 +36,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2TargetGroupMatcher' containing --- | required fields as arguments. +-- required fields as arguments. elasticLoadBalancingV2TargetGroupMatcher :: Val Text -- ^ 'elbvtgmHttpCode' -> ElasticLoadBalancingV2TargetGroupMatcher diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingV2TargetGroupTargetDescription. See --- | 'elasticLoadBalancingV2TargetGroupTargetDescription' for a more --- | convenient constructor. +-- ElasticLoadBalancingV2TargetGroupTargetDescription. See +-- 'elasticLoadBalancingV2TargetGroupTargetDescription' for a more +-- convenient constructor. data ElasticLoadBalancingV2TargetGroupTargetDescription = ElasticLoadBalancingV2TargetGroupTargetDescription { _elasticLoadBalancingV2TargetGroupTargetDescriptionId :: Val Text @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2TargetGroupTargetDescription' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingV2TargetGroupTargetDescription :: Val Text -- ^ 'elbvtgtdId' -> ElasticLoadBalancingV2TargetGroupTargetDescription diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticLoadBalancingV2TargetGroupTargetGroupAttribute. See --- | 'elasticLoadBalancingV2TargetGroupTargetGroupAttribute' for a more --- | convenient constructor. +-- ElasticLoadBalancingV2TargetGroupTargetGroupAttribute. See +-- 'elasticLoadBalancingV2TargetGroupTargetGroupAttribute' for a more +-- convenient constructor. data ElasticLoadBalancingV2TargetGroupTargetGroupAttribute = ElasticLoadBalancingV2TargetGroupTargetGroupAttribute { _elasticLoadBalancingV2TargetGroupTargetGroupAttributeKey :: Maybe (Val Text) @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2TargetGroupTargetGroupAttribute' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticLoadBalancingV2TargetGroupTargetGroupAttribute :: ElasticLoadBalancingV2TargetGroupTargetGroupAttribute elasticLoadBalancingV2TargetGroupTargetGroupAttribute = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElasticsearchDomainEBSOptions. See --- | 'elasticsearchDomainEBSOptions' for a more convenient constructor. +-- 'elasticsearchDomainEBSOptions' for a more convenient constructor. data ElasticsearchDomainEBSOptions = ElasticsearchDomainEBSOptions { _elasticsearchDomainEBSOptionsEBSEnabled :: Maybe (Val Bool') @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticsearchDomainEBSOptions' containing required --- | fields as arguments. +-- fields as arguments. elasticsearchDomainEBSOptions :: ElasticsearchDomainEBSOptions elasticsearchDomainEBSOptions = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | ElasticsearchDomainElasticsearchClusterConfig. See --- | 'elasticsearchDomainElasticsearchClusterConfig' for a more convenient --- | constructor. +-- ElasticsearchDomainElasticsearchClusterConfig. See +-- 'elasticsearchDomainElasticsearchClusterConfig' for a more convenient +-- constructor. data ElasticsearchDomainElasticsearchClusterConfig = ElasticsearchDomainElasticsearchClusterConfig { _elasticsearchDomainElasticsearchClusterConfigDedicatedMasterCount :: Maybe (Val Integer') @@ -52,7 +52,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticsearchDomainElasticsearchClusterConfig' --- | containing required fields as arguments. +-- containing required fields as arguments. elasticsearchDomainElasticsearchClusterConfig :: ElasticsearchDomainElasticsearchClusterConfig elasticsearchDomainElasticsearchClusterConfig = diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs --- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs +++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElasticsearchDomainSnapshotOptions. See --- | 'elasticsearchDomainSnapshotOptions' for a more convenient constructor. +-- 'elasticsearchDomainSnapshotOptions' for a more convenient constructor. data ElasticsearchDomainSnapshotOptions = ElasticsearchDomainSnapshotOptions { _elasticsearchDomainSnapshotOptionsAutomatedSnapshotStartHour :: Maybe (Val Integer') @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticsearchDomainSnapshotOptions' containing required --- | fields as arguments. +-- fields as arguments. elasticsearchDomainSnapshotOptions :: ElasticsearchDomainSnapshotOptions elasticsearchDomainSnapshotOptions = diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs --- a/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs +++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EventsRuleTarget. See 'eventsRuleTarget' --- | for a more convenient constructor. +-- for a more convenient constructor. data EventsRuleTarget = EventsRuleTarget { _eventsRuleTargetArn :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EventsRuleTarget' containing required fields as --- | arguments. +-- arguments. eventsRuleTarget :: Val Text -- ^ 'ertArn' -> Val Text -- ^ 'ertId' diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs --- a/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs +++ b/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for GameLiftAliasRoutingStrategy. See --- | 'gameLiftAliasRoutingStrategy' for a more convenient constructor. +-- 'gameLiftAliasRoutingStrategy' for a more convenient constructor. data GameLiftAliasRoutingStrategy = GameLiftAliasRoutingStrategy { _gameLiftAliasRoutingStrategyFleetId :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'GameLiftAliasRoutingStrategy' containing required fields --- | as arguments. +-- as arguments. gameLiftAliasRoutingStrategy :: Val Text -- ^ 'glarsType' -> GameLiftAliasRoutingStrategy diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs --- a/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs +++ b/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs @@ -15,7 +15,7 @@ -- | Full data type definition for GameLiftBuildS3Location. See --- | 'gameLiftBuildS3Location' for a more convenient constructor. +-- 'gameLiftBuildS3Location' for a more convenient constructor. data GameLiftBuildS3Location = GameLiftBuildS3Location { _gameLiftBuildS3LocationBucket :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'GameLiftBuildS3Location' containing required fields as --- | arguments. +-- arguments. gameLiftBuildS3Location :: Val Text -- ^ 'glbslBucket' -> Val Text -- ^ 'glbslKey' diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs --- a/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs +++ b/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs @@ -15,7 +15,7 @@ -- | Full data type definition for GameLiftFleetIpPermission. See --- | 'gameLiftFleetIpPermission' for a more convenient constructor. +-- 'gameLiftFleetIpPermission' for a more convenient constructor. data GameLiftFleetIpPermission = GameLiftFleetIpPermission { _gameLiftFleetIpPermissionFromPort :: Val Integer' @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'GameLiftFleetIpPermission' containing required fields as --- | arguments. +-- arguments. gameLiftFleetIpPermission :: Val Integer' -- ^ 'glfipFromPort' -> Val Text -- ^ 'glfipIpRange' diff --git a/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMGroupPolicy. See 'iamGroupPolicy' for a --- | more convenient constructor. +-- more convenient constructor. data IAMGroupPolicy = IAMGroupPolicy { _iAMGroupPolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMRolePolicy. See 'iamRolePolicy' for a --- | more convenient constructor. +-- more convenient constructor. data IAMRolePolicy = IAMRolePolicy { _iAMRolePolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs b/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs --- a/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs +++ b/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMUserLoginProfile. See --- | 'iamUserLoginProfile' for a more convenient constructor. +-- 'iamUserLoginProfile' for a more convenient constructor. data IAMUserLoginProfile = IAMUserLoginProfile { _iAMUserLoginProfilePassword :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'IAMUserLoginProfile' containing required fields as --- | arguments. +-- arguments. iamUserLoginProfile :: Val Text -- ^ 'iamulpPassword' -> IAMUserLoginProfile diff --git a/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs --- a/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs +++ b/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMUserPolicy. See 'iamUserPolicy' for a --- | more convenient constructor. +-- more convenient constructor. data IAMUserPolicy = IAMUserPolicy { _iAMUserPolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs b/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTThingAttributePayload. See --- | 'ioTThingAttributePayload' for a more convenient constructor. +-- 'ioTThingAttributePayload' for a more convenient constructor. data IoTThingAttributePayload = IoTThingAttributePayload { _ioTThingAttributePayloadAttributes :: Maybe Object @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTThingAttributePayload' containing required fields as --- | arguments. +-- arguments. ioTThingAttributePayload :: IoTThingAttributePayload ioTThingAttributePayload = diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs @@ -25,7 +25,7 @@ import Stratosphere.ResourceProperties.IoTTopicRuleSqsAction -- | Full data type definition for IoTTopicRuleAction. See --- | 'ioTTopicRuleAction' for a more convenient constructor. +-- 'ioTTopicRuleAction' for a more convenient constructor. data IoTTopicRuleAction = IoTTopicRuleAction { _ioTTopicRuleActionCloudwatchAlarm :: Maybe IoTTopicRuleCloudwatchAlarmAction @@ -75,7 +75,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleAction' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleAction :: IoTTopicRuleAction ioTTopicRuleAction = diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleCloudwatchAlarmAction. See --- | 'ioTTopicRuleCloudwatchAlarmAction' for a more convenient constructor. +-- 'ioTTopicRuleCloudwatchAlarmAction' for a more convenient constructor. data IoTTopicRuleCloudwatchAlarmAction = IoTTopicRuleCloudwatchAlarmAction { _ioTTopicRuleCloudwatchAlarmActionAlarmName :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleCloudwatchAlarmAction' containing required --- | fields as arguments. +-- fields as arguments. ioTTopicRuleCloudwatchAlarmAction :: Val Text -- ^ 'ittrcaaAlarmName' -> Val Text -- ^ 'ittrcaaRoleArn' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleCloudwatchMetricAction. See --- | 'ioTTopicRuleCloudwatchMetricAction' for a more convenient constructor. +-- 'ioTTopicRuleCloudwatchMetricAction' for a more convenient constructor. data IoTTopicRuleCloudwatchMetricAction = IoTTopicRuleCloudwatchMetricAction { _ioTTopicRuleCloudwatchMetricActionMetricName :: Val Text @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleCloudwatchMetricAction' containing required --- | fields as arguments. +-- fields as arguments. ioTTopicRuleCloudwatchMetricAction :: Val Text -- ^ 'ittrcmaMetricName' -> Val Text -- ^ 'ittrcmaMetricNamespace' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleDynamoDBAction. See --- | 'ioTTopicRuleDynamoDBAction' for a more convenient constructor. +-- 'ioTTopicRuleDynamoDBAction' for a more convenient constructor. data IoTTopicRuleDynamoDBAction = IoTTopicRuleDynamoDBAction { _ioTTopicRuleDynamoDBActionHashKeyField :: Val Text @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleDynamoDBAction' containing required fields --- | as arguments. +-- as arguments. ioTTopicRuleDynamoDBAction :: Val Text -- ^ 'ittrddbaHashKeyField' -> Val Text -- ^ 'ittrddbaHashKeyValue' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleElasticsearchAction. See --- | 'ioTTopicRuleElasticsearchAction' for a more convenient constructor. +-- 'ioTTopicRuleElasticsearchAction' for a more convenient constructor. data IoTTopicRuleElasticsearchAction = IoTTopicRuleElasticsearchAction { _ioTTopicRuleElasticsearchActionEndpoint :: Val Text @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleElasticsearchAction' containing required --- | fields as arguments. +-- fields as arguments. ioTTopicRuleElasticsearchAction :: Val Text -- ^ 'ittreaEndpoint' -> Val Text -- ^ 'ittreaId' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleFirehoseAction. See --- | 'ioTTopicRuleFirehoseAction' for a more convenient constructor. +-- 'ioTTopicRuleFirehoseAction' for a more convenient constructor. data IoTTopicRuleFirehoseAction = IoTTopicRuleFirehoseAction { _ioTTopicRuleFirehoseActionDeliveryStreamName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleFirehoseAction' containing required fields --- | as arguments. +-- as arguments. ioTTopicRuleFirehoseAction :: Val Text -- ^ 'ittrfaDeliveryStreamName' -> Val Text -- ^ 'ittrfaRoleArn' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleKinesisAction. See --- | 'ioTTopicRuleKinesisAction' for a more convenient constructor. +-- 'ioTTopicRuleKinesisAction' for a more convenient constructor. data IoTTopicRuleKinesisAction = IoTTopicRuleKinesisAction { _ioTTopicRuleKinesisActionPartitionKey :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleKinesisAction' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleKinesisAction :: Val Text -- ^ 'ittrkaRoleArn' -> Val Text -- ^ 'ittrkaStreamName' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleLambdaAction. See --- | 'ioTTopicRuleLambdaAction' for a more convenient constructor. +-- 'ioTTopicRuleLambdaAction' for a more convenient constructor. data IoTTopicRuleLambdaAction = IoTTopicRuleLambdaAction { _ioTTopicRuleLambdaActionFunctionArn :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleLambdaAction' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleLambdaAction :: Val Text -- ^ 'ittrlaFunctionArn' -> IoTTopicRuleLambdaAction diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleRepublishAction. See --- | 'ioTTopicRuleRepublishAction' for a more convenient constructor. +-- 'ioTTopicRuleRepublishAction' for a more convenient constructor. data IoTTopicRuleRepublishAction = IoTTopicRuleRepublishAction { _ioTTopicRuleRepublishActionRoleArn :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleRepublishAction' containing required fields --- | as arguments. +-- as arguments. ioTTopicRuleRepublishAction :: Val Text -- ^ 'ittrraRoleArn' -> Val Text -- ^ 'ittrraTopic' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleS3Action. See --- | 'ioTTopicRuleS3Action' for a more convenient constructor. +-- 'ioTTopicRuleS3Action' for a more convenient constructor. data IoTTopicRuleS3Action = IoTTopicRuleS3Action { _ioTTopicRuleS3ActionBucketName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleS3Action' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleS3Action :: Val Text -- ^ 'ittrs3aBucketName' -> Val Text -- ^ 'ittrs3aKey' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleSnsAction. See --- | 'ioTTopicRuleSnsAction' for a more convenient constructor. +-- 'ioTTopicRuleSnsAction' for a more convenient constructor. data IoTTopicRuleSnsAction = IoTTopicRuleSnsAction { _ioTTopicRuleSnsActionMessageFormat :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleSnsAction' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleSnsAction :: Val Text -- ^ 'ittrsnaRoleArn' -> Val Text -- ^ 'ittrsnaTargetArn' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTTopicRuleSqsAction. See --- | 'ioTTopicRuleSqsAction' for a more convenient constructor. +-- 'ioTTopicRuleSqsAction' for a more convenient constructor. data IoTTopicRuleSqsAction = IoTTopicRuleSqsAction { _ioTTopicRuleSqsActionQueueUrl :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleSqsAction' containing required fields as --- | arguments. +-- arguments. ioTTopicRuleSqsAction :: Val Text -- ^ 'ittrsqaQueueUrl' -> Val Text -- ^ 'ittrsqaRoleArn' diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs --- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs +++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.IoTTopicRuleAction -- | Full data type definition for IoTTopicRuleTopicRulePayload. See --- | 'ioTTopicRuleTopicRulePayload' for a more convenient constructor. +-- 'ioTTopicRuleTopicRulePayload' for a more convenient constructor. data IoTTopicRuleTopicRulePayload = IoTTopicRuleTopicRulePayload { _ioTTopicRuleTopicRulePayloadActions :: [IoTTopicRuleAction] @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTTopicRuleTopicRulePayload' containing required fields --- | as arguments. +-- as arguments. ioTTopicRuleTopicRulePayload :: [IoTTopicRuleAction] -- ^ 'ittrtrpActions' -> Val Bool' -- ^ 'ittrtrpRuleDisabled' diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamBufferingHints. See --- | 'kinesisFirehoseDeliveryStreamBufferingHints' for a more convenient --- | constructor. +-- KinesisFirehoseDeliveryStreamBufferingHints. See +-- 'kinesisFirehoseDeliveryStreamBufferingHints' for a more convenient +-- constructor. data KinesisFirehoseDeliveryStreamBufferingHints = KinesisFirehoseDeliveryStreamBufferingHints { _kinesisFirehoseDeliveryStreamBufferingHintsIntervalInSeconds :: Val Integer' @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamBufferingHints' containing --- | required fields as arguments. +-- required fields as arguments. kinesisFirehoseDeliveryStreamBufferingHints :: Val Integer' -- ^ 'kfdsbhIntervalInSeconds' -> Val Integer' -- ^ 'kfdsbhSizeInMBs' diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions. See --- | 'kinesisFirehoseDeliveryStreamCloudWatchLoggingOptions' for a more --- | convenient constructor. +-- KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions. See +-- 'kinesisFirehoseDeliveryStreamCloudWatchLoggingOptions' for a more +-- convenient constructor. data KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions = KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions { _kinesisFirehoseDeliveryStreamCloudWatchLoggingOptionsEnabled :: Maybe (Val Bool') @@ -43,7 +43,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions' --- | containing required fields as arguments. +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamCloudWatchLoggingOptions :: KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions kinesisFirehoseDeliveryStreamCloudWatchLoggingOptions = diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs @@ -15,8 +15,8 @@ -- | Full data type definition for KinesisFirehoseDeliveryStreamCopyCommand. --- | See 'kinesisFirehoseDeliveryStreamCopyCommand' for a more convenient --- | constructor. +-- See 'kinesisFirehoseDeliveryStreamCopyCommand' for a more convenient +-- constructor. data KinesisFirehoseDeliveryStreamCopyCommand = KinesisFirehoseDeliveryStreamCopyCommand { _kinesisFirehoseDeliveryStreamCopyCommandCopyOptions :: Maybe (Val Text) @@ -42,7 +42,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamCopyCommand' containing --- | required fields as arguments. +-- required fields as arguments. kinesisFirehoseDeliveryStreamCopyCommand :: Val Text -- ^ 'kfdsccDataTableName' -> KinesisFirehoseDeliveryStreamCopyCommand diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamElasticsearchBufferingHints. See --- | 'kinesisFirehoseDeliveryStreamElasticsearchBufferingHints' for a more --- | convenient constructor. +-- KinesisFirehoseDeliveryStreamElasticsearchBufferingHints. See +-- 'kinesisFirehoseDeliveryStreamElasticsearchBufferingHints' for a more +-- convenient constructor. data KinesisFirehoseDeliveryStreamElasticsearchBufferingHints = KinesisFirehoseDeliveryStreamElasticsearchBufferingHints { _kinesisFirehoseDeliveryStreamElasticsearchBufferingHintsIntervalInSeconds :: Val Integer' @@ -40,8 +40,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'KinesisFirehoseDeliveryStreamElasticsearchBufferingHints' containing --- | required fields as arguments. +-- 'KinesisFirehoseDeliveryStreamElasticsearchBufferingHints' containing +-- required fields as arguments. kinesisFirehoseDeliveryStreamElasticsearchBufferingHints :: Val Integer' -- ^ 'kfdsebhIntervalInSeconds' -> Val Integer' -- ^ 'kfdsebhSizeInMBs' diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs @@ -19,9 +19,9 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamS3DestinationConfiguration -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration. See --- | 'kinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration' for --- | a more convenient constructor. +-- KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration. See +-- 'kinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration' for +-- a more convenient constructor. data KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration = KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration { _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfigurationBufferingHints :: KinesisFirehoseDeliveryStreamElasticsearchBufferingHints @@ -68,8 +68,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration' --- | containing required fields as arguments. +-- 'KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration' +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration :: KinesisFirehoseDeliveryStreamElasticsearchBufferingHints -- ^ 'kfdsedcBufferingHints' -> Val Text -- ^ 'kfdsedcDomainARN' diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamElasticsearchRetryOptions. See --- | 'kinesisFirehoseDeliveryStreamElasticsearchRetryOptions' for a more --- | convenient constructor. +-- KinesisFirehoseDeliveryStreamElasticsearchRetryOptions. See +-- 'kinesisFirehoseDeliveryStreamElasticsearchRetryOptions' for a more +-- convenient constructor. data KinesisFirehoseDeliveryStreamElasticsearchRetryOptions = KinesisFirehoseDeliveryStreamElasticsearchRetryOptions { _kinesisFirehoseDeliveryStreamElasticsearchRetryOptionsDurationInSeconds :: Val Integer' @@ -37,7 +37,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamElasticsearchRetryOptions' --- | containing required fields as arguments. +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamElasticsearchRetryOptions :: Val Integer' -- ^ 'kfdseroDurationInSeconds' -> KinesisFirehoseDeliveryStreamElasticsearchRetryOptions diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs @@ -16,9 +16,9 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamKMSEncryptionConfig -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamEncryptionConfiguration. See --- | 'kinesisFirehoseDeliveryStreamEncryptionConfiguration' for a more --- | convenient constructor. +-- KinesisFirehoseDeliveryStreamEncryptionConfiguration. See +-- 'kinesisFirehoseDeliveryStreamEncryptionConfiguration' for a more +-- convenient constructor. data KinesisFirehoseDeliveryStreamEncryptionConfiguration = KinesisFirehoseDeliveryStreamEncryptionConfiguration { _kinesisFirehoseDeliveryStreamEncryptionConfigurationKMSEncryptionConfig :: Maybe KinesisFirehoseDeliveryStreamKMSEncryptionConfig @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamEncryptionConfiguration' --- | containing required fields as arguments. +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamEncryptionConfiguration :: KinesisFirehoseDeliveryStreamEncryptionConfiguration kinesisFirehoseDeliveryStreamEncryptionConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs @@ -15,9 +15,9 @@ -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamKMSEncryptionConfig. See --- | 'kinesisFirehoseDeliveryStreamKMSEncryptionConfig' for a more convenient --- | constructor. +-- KinesisFirehoseDeliveryStreamKMSEncryptionConfig. See +-- 'kinesisFirehoseDeliveryStreamKMSEncryptionConfig' for a more convenient +-- constructor. data KinesisFirehoseDeliveryStreamKMSEncryptionConfig = KinesisFirehoseDeliveryStreamKMSEncryptionConfig { _kinesisFirehoseDeliveryStreamKMSEncryptionConfigAWSKMSKeyARN :: Val Text @@ -37,7 +37,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamKMSEncryptionConfig' --- | containing required fields as arguments. +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamKMSEncryptionConfig :: Val Text -- ^ 'kfdskmsecAWSKMSKeyARN' -> KinesisFirehoseDeliveryStreamKMSEncryptionConfig diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs @@ -17,9 +17,9 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamS3DestinationConfiguration -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration. See --- | 'kinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration' for a --- | more convenient constructor. +-- KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration. See +-- 'kinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration' for a +-- more convenient constructor. data KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration = KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration { _kinesisFirehoseDeliveryStreamRedshiftDestinationConfigurationCloudWatchLoggingOptions :: Maybe KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions @@ -57,8 +57,8 @@ parseJSON _ = mempty -- | Constructor for --- | 'KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration' --- | containing required fields as arguments. +-- 'KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration' +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration :: Val Text -- ^ 'kfdsrdcClusterJDBCURL' -> KinesisFirehoseDeliveryStreamCopyCommand -- ^ 'kfdsrdcCopyCommand' diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs @@ -18,9 +18,9 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamEncryptionConfiguration -- | Full data type definition for --- | KinesisFirehoseDeliveryStreamS3DestinationConfiguration. See --- | 'kinesisFirehoseDeliveryStreamS3DestinationConfiguration' for a more --- | convenient constructor. +-- KinesisFirehoseDeliveryStreamS3DestinationConfiguration. See +-- 'kinesisFirehoseDeliveryStreamS3DestinationConfiguration' for a more +-- convenient constructor. data KinesisFirehoseDeliveryStreamS3DestinationConfiguration = KinesisFirehoseDeliveryStreamS3DestinationConfiguration { _kinesisFirehoseDeliveryStreamS3DestinationConfigurationBucketARN :: Val Text @@ -58,7 +58,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStreamS3DestinationConfiguration' --- | containing required fields as arguments. +-- containing required fields as arguments. kinesisFirehoseDeliveryStreamS3DestinationConfiguration :: Val Text -- ^ 'kfdssdcBucketARN' -> KinesisFirehoseDeliveryStreamBufferingHints -- ^ 'kfdssdcBufferingHints' diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs --- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs +++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaFunctionCode. See --- | 'lambdaFunctionCode' for a more convenient constructor. +-- 'lambdaFunctionCode' for a more convenient constructor. data LambdaFunctionCode = LambdaFunctionCode { _lambdaFunctionCodeS3Bucket :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'LambdaFunctionCode' containing required fields as --- | arguments. +-- arguments. lambdaFunctionCode :: LambdaFunctionCode lambdaFunctionCode = diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs new file mode 100644 --- /dev/null +++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs @@ -0,0 +1,48 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lambda-function-deadletterconfig.html + +module Stratosphere.ResourceProperties.LambdaFunctionDeadLetterConfig where + +import Control.Lens hiding ((.=)) +import Data.Aeson +import Data.Maybe (catMaybes) +import Data.Monoid (mempty) +import Data.Text + +import Stratosphere.Values + + +-- | Full data type definition for LambdaFunctionDeadLetterConfig. See +-- 'lambdaFunctionDeadLetterConfig' for a more convenient constructor. +data LambdaFunctionDeadLetterConfig = + LambdaFunctionDeadLetterConfig + { _lambdaFunctionDeadLetterConfigTargetArn :: Maybe (Val Text) + } deriving (Show, Eq) + +instance ToJSON LambdaFunctionDeadLetterConfig where + toJSON LambdaFunctionDeadLetterConfig{..} = + object $ + catMaybes + [ ("TargetArn" .=) <$> _lambdaFunctionDeadLetterConfigTargetArn + ] + +instance FromJSON LambdaFunctionDeadLetterConfig where + parseJSON (Object obj) = + LambdaFunctionDeadLetterConfig <$> + obj .:? "TargetArn" + parseJSON _ = mempty + +-- | Constructor for 'LambdaFunctionDeadLetterConfig' containing required +-- fields as arguments. +lambdaFunctionDeadLetterConfig + :: LambdaFunctionDeadLetterConfig +lambdaFunctionDeadLetterConfig = + LambdaFunctionDeadLetterConfig + { _lambdaFunctionDeadLetterConfigTargetArn = Nothing + } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lambda-function-deadletterconfig.html#cfn-lambda-function-deadletterconfig-targetarn +lfdlcTargetArn :: Lens' LambdaFunctionDeadLetterConfig (Maybe (Val Text)) +lfdlcTargetArn = lens _lambdaFunctionDeadLetterConfigTargetArn (\s a -> s { _lambdaFunctionDeadLetterConfigTargetArn = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs --- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs +++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaFunctionEnvironment. See --- | 'lambdaFunctionEnvironment' for a more convenient constructor. +-- 'lambdaFunctionEnvironment' for a more convenient constructor. data LambdaFunctionEnvironment = LambdaFunctionEnvironment { _lambdaFunctionEnvironmentVariables :: Maybe Object @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'LambdaFunctionEnvironment' containing required fields as --- | arguments. +-- arguments. lambdaFunctionEnvironment :: LambdaFunctionEnvironment lambdaFunctionEnvironment = diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaFunctionVpcConfig. See --- | 'lambdaFunctionVpcConfig' for a more convenient constructor. +-- 'lambdaFunctionVpcConfig' for a more convenient constructor. data LambdaFunctionVpcConfig = LambdaFunctionVpcConfig { _lambdaFunctionVpcConfigSecurityGroupIds :: [Val Text] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'LambdaFunctionVpcConfig' containing required fields as --- | arguments. +-- arguments. lambdaFunctionVpcConfig :: [Val Text] -- ^ 'lfvcSecurityGroupIds' -> [Val Text] -- ^ 'lfvcSubnetIds' diff --git a/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs b/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs --- a/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs +++ b/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LogsMetricFilterMetricTransformation. See --- | 'logsMetricFilterMetricTransformation' for a more convenient constructor. +-- 'logsMetricFilterMetricTransformation' for a more convenient constructor. data LogsMetricFilterMetricTransformation = LogsMetricFilterMetricTransformation { _logsMetricFilterMetricTransformationMetricName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'LogsMetricFilterMetricTransformation' containing --- | required fields as arguments. +-- required fields as arguments. logsMetricFilterMetricTransformation :: Val Text -- ^ 'lmfmtMetricName' -> Val Text -- ^ 'lmfmtMetricNamespace' diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksAppDataSource. See --- | 'opsWorksAppDataSource' for a more convenient constructor. +-- 'opsWorksAppDataSource' for a more convenient constructor. data OpsWorksAppDataSource = OpsWorksAppDataSource { _opsWorksAppDataSourceArn :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksAppDataSource' containing required fields as --- | arguments. +-- arguments. opsWorksAppDataSource :: OpsWorksAppDataSource opsWorksAppDataSource = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksAppEnvironmentVariable. See --- | 'opsWorksAppEnvironmentVariable' for a more convenient constructor. +-- 'opsWorksAppEnvironmentVariable' for a more convenient constructor. data OpsWorksAppEnvironmentVariable = OpsWorksAppEnvironmentVariable { _opsWorksAppEnvironmentVariableKey :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksAppEnvironmentVariable' containing required --- | fields as arguments. +-- fields as arguments. opsWorksAppEnvironmentVariable :: Val Text -- ^ 'owaevKey' -> Val Text -- ^ 'owaevValue' diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksAppSource. See 'opsWorksAppSource' --- | for a more convenient constructor. +-- for a more convenient constructor. data OpsWorksAppSource = OpsWorksAppSource { _opsWorksAppSourcePassword :: Maybe (Val Text) @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksAppSource' containing required fields as --- | arguments. +-- arguments. opsWorksAppSource :: OpsWorksAppSource opsWorksAppSource = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksAppSslConfiguration. See --- | 'opsWorksAppSslConfiguration' for a more convenient constructor. +-- 'opsWorksAppSslConfiguration' for a more convenient constructor. data OpsWorksAppSslConfiguration = OpsWorksAppSslConfiguration { _opsWorksAppSslConfigurationCertificate :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksAppSslConfiguration' containing required fields --- | as arguments. +-- as arguments. opsWorksAppSslConfiguration :: OpsWorksAppSslConfiguration opsWorksAppSslConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.OpsWorksInstanceEbsBlockDevice -- | Full data type definition for OpsWorksInstanceBlockDeviceMapping. See --- | 'opsWorksInstanceBlockDeviceMapping' for a more convenient constructor. +-- 'opsWorksInstanceBlockDeviceMapping' for a more convenient constructor. data OpsWorksInstanceBlockDeviceMapping = OpsWorksInstanceBlockDeviceMapping { _opsWorksInstanceBlockDeviceMappingDeviceName :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksInstanceBlockDeviceMapping' containing required --- | fields as arguments. +-- fields as arguments. opsWorksInstanceBlockDeviceMapping :: OpsWorksInstanceBlockDeviceMapping opsWorksInstanceBlockDeviceMapping = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksInstanceEbsBlockDevice. See --- | 'opsWorksInstanceEbsBlockDevice' for a more convenient constructor. +-- 'opsWorksInstanceEbsBlockDevice' for a more convenient constructor. data OpsWorksInstanceEbsBlockDevice = OpsWorksInstanceEbsBlockDevice { _opsWorksInstanceEbsBlockDeviceDeleteOnTermination :: Maybe (Val Bool') @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksInstanceEbsBlockDevice' containing required --- | fields as arguments. +-- fields as arguments. opsWorksInstanceEbsBlockDevice :: OpsWorksInstanceEbsBlockDevice opsWorksInstanceEbsBlockDevice = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksInstanceTimeBasedAutoScaling. See --- | 'opsWorksInstanceTimeBasedAutoScaling' for a more convenient constructor. +-- 'opsWorksInstanceTimeBasedAutoScaling' for a more convenient constructor. data OpsWorksInstanceTimeBasedAutoScaling = OpsWorksInstanceTimeBasedAutoScaling { _opsWorksInstanceTimeBasedAutoScalingFriday :: Maybe Object @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksInstanceTimeBasedAutoScaling' containing --- | required fields as arguments. +-- required fields as arguments. opsWorksInstanceTimeBasedAutoScaling :: OpsWorksInstanceTimeBasedAutoScaling opsWorksInstanceTimeBasedAutoScaling = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksLayerAutoScalingThresholds. See --- | 'opsWorksLayerAutoScalingThresholds' for a more convenient constructor. +-- 'opsWorksLayerAutoScalingThresholds' for a more convenient constructor. data OpsWorksLayerAutoScalingThresholds = OpsWorksLayerAutoScalingThresholds { _opsWorksLayerAutoScalingThresholdsCpuThreshold :: Maybe (Val Double') @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerAutoScalingThresholds' containing required --- | fields as arguments. +-- fields as arguments. opsWorksLayerAutoScalingThresholds :: OpsWorksLayerAutoScalingThresholds opsWorksLayerAutoScalingThresholds = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs @@ -15,8 +15,8 @@ import Stratosphere.ResourceProperties.OpsWorksLayerShutdownEventConfiguration -- | Full data type definition for OpsWorksLayerLifecycleEventConfiguration. --- | See 'opsWorksLayerLifecycleEventConfiguration' for a more convenient --- | constructor. +-- See 'opsWorksLayerLifecycleEventConfiguration' for a more convenient +-- constructor. data OpsWorksLayerLifecycleEventConfiguration = OpsWorksLayerLifecycleEventConfiguration { _opsWorksLayerLifecycleEventConfigurationShutdownEventConfiguration :: Maybe OpsWorksLayerShutdownEventConfiguration @@ -36,7 +36,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerLifecycleEventConfiguration' containing --- | required fields as arguments. +-- required fields as arguments. opsWorksLayerLifecycleEventConfiguration :: OpsWorksLayerLifecycleEventConfiguration opsWorksLayerLifecycleEventConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.OpsWorksLayerAutoScalingThresholds -- | Full data type definition for OpsWorksLayerLoadBasedAutoScaling. See --- | 'opsWorksLayerLoadBasedAutoScaling' for a more convenient constructor. +-- 'opsWorksLayerLoadBasedAutoScaling' for a more convenient constructor. data OpsWorksLayerLoadBasedAutoScaling = OpsWorksLayerLoadBasedAutoScaling { _opsWorksLayerLoadBasedAutoScalingDownScaling :: Maybe OpsWorksLayerAutoScalingThresholds @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerLoadBasedAutoScaling' containing required --- | fields as arguments. +-- fields as arguments. opsWorksLayerLoadBasedAutoScaling :: OpsWorksLayerLoadBasedAutoScaling opsWorksLayerLoadBasedAutoScaling = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksLayerRecipes. See --- | 'opsWorksLayerRecipes' for a more convenient constructor. +-- 'opsWorksLayerRecipes' for a more convenient constructor. data OpsWorksLayerRecipes = OpsWorksLayerRecipes { _opsWorksLayerRecipesConfigure :: Maybe [Val Text] @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerRecipes' containing required fields as --- | arguments. +-- arguments. opsWorksLayerRecipes :: OpsWorksLayerRecipes opsWorksLayerRecipes = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs @@ -15,8 +15,8 @@ -- | Full data type definition for OpsWorksLayerShutdownEventConfiguration. --- | See 'opsWorksLayerShutdownEventConfiguration' for a more convenient --- | constructor. +-- See 'opsWorksLayerShutdownEventConfiguration' for a more convenient +-- constructor. data OpsWorksLayerShutdownEventConfiguration = OpsWorksLayerShutdownEventConfiguration { _opsWorksLayerShutdownEventConfigurationDelayUntilElbConnectionsDrained :: Maybe (Val Bool') @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerShutdownEventConfiguration' containing --- | required fields as arguments. +-- required fields as arguments. opsWorksLayerShutdownEventConfiguration :: OpsWorksLayerShutdownEventConfiguration opsWorksLayerShutdownEventConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksLayerVolumeConfiguration. See --- | 'opsWorksLayerVolumeConfiguration' for a more convenient constructor. +-- 'opsWorksLayerVolumeConfiguration' for a more convenient constructor. data OpsWorksLayerVolumeConfiguration = OpsWorksLayerVolumeConfiguration { _opsWorksLayerVolumeConfigurationIops :: Maybe (Val Integer') @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksLayerVolumeConfiguration' containing required --- | fields as arguments. +-- fields as arguments. opsWorksLayerVolumeConfiguration :: OpsWorksLayerVolumeConfiguration opsWorksLayerVolumeConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksStackChefConfiguration. See --- | 'opsWorksStackChefConfiguration' for a more convenient constructor. +-- 'opsWorksStackChefConfiguration' for a more convenient constructor. data OpsWorksStackChefConfiguration = OpsWorksStackChefConfiguration { _opsWorksStackChefConfigurationBerkshelfVersion :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksStackChefConfiguration' containing required --- | fields as arguments. +-- fields as arguments. opsWorksStackChefConfiguration :: OpsWorksStackChefConfiguration opsWorksStackChefConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksStackElasticIp. See --- | 'opsWorksStackElasticIp' for a more convenient constructor. +-- 'opsWorksStackElasticIp' for a more convenient constructor. data OpsWorksStackElasticIp = OpsWorksStackElasticIp { _opsWorksStackElasticIpIp :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksStackElasticIp' containing required fields as --- | arguments. +-- arguments. opsWorksStackElasticIp :: Val Text -- ^ 'owseiIp' -> OpsWorksStackElasticIp diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksStackRdsDbInstance. See --- | 'opsWorksStackRdsDbInstance' for a more convenient constructor. +-- 'opsWorksStackRdsDbInstance' for a more convenient constructor. data OpsWorksStackRdsDbInstance = OpsWorksStackRdsDbInstance { _opsWorksStackRdsDbInstanceDbPassword :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksStackRdsDbInstance' containing required fields --- | as arguments. +-- as arguments. opsWorksStackRdsDbInstance :: Val Text -- ^ 'owsrdiDbPassword' -> Val Text -- ^ 'owsrdiDbUser' diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksStackSource. See --- | 'opsWorksStackSource' for a more convenient constructor. +-- 'opsWorksStackSource' for a more convenient constructor. data OpsWorksStackSource = OpsWorksStackSource { _opsWorksStackSourcePassword :: Maybe (Val Text) @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksStackSource' containing required fields as --- | arguments. +-- arguments. opsWorksStackSource :: OpsWorksStackSource opsWorksStackSource = diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs --- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs +++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs @@ -15,8 +15,8 @@ -- | Full data type definition for OpsWorksStackStackConfigurationManager. See --- | 'opsWorksStackStackConfigurationManager' for a more convenient --- | constructor. +-- 'opsWorksStackStackConfigurationManager' for a more convenient +-- constructor. data OpsWorksStackStackConfigurationManager = OpsWorksStackStackConfigurationManager { _opsWorksStackStackConfigurationManagerName :: Maybe (Val Text) @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksStackStackConfigurationManager' containing --- | required fields as arguments. +-- required fields as arguments. opsWorksStackStackConfigurationManager :: OpsWorksStackStackConfigurationManager opsWorksStackStackConfigurationManager = diff --git a/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs b/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs --- a/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs +++ b/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RDSDBSecurityGroupIngressProperty. See --- | 'rdsdbSecurityGroupIngressProperty' for a more convenient constructor. +-- 'rdsdbSecurityGroupIngressProperty' for a more convenient constructor. data RDSDBSecurityGroupIngressProperty = RDSDBSecurityGroupIngressProperty { _rDSDBSecurityGroupIngressPropertyCDIRIP :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBSecurityGroupIngressProperty' containing required --- | fields as arguments. +-- fields as arguments. rdsdbSecurityGroupIngressProperty :: RDSDBSecurityGroupIngressProperty rdsdbSecurityGroupIngressProperty = diff --git a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.RDSOptionGroupOptionSetting -- | Full data type definition for RDSOptionGroupOptionConfiguration. See --- | 'rdsOptionGroupOptionConfiguration' for a more convenient constructor. +-- 'rdsOptionGroupOptionConfiguration' for a more convenient constructor. data RDSOptionGroupOptionConfiguration = RDSOptionGroupOptionConfiguration { _rDSOptionGroupOptionConfigurationDBSecurityGroupMemberships :: Maybe [Val Text] @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSOptionGroupOptionConfiguration' containing required --- | fields as arguments. +-- fields as arguments. rdsOptionGroupOptionConfiguration :: Val Text -- ^ 'rdsogocOptionName' -> RDSOptionGroupOptionConfiguration diff --git a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs --- a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs +++ b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RDSOptionGroupOptionSetting. See --- | 'rdsOptionGroupOptionSetting' for a more convenient constructor. +-- 'rdsOptionGroupOptionSetting' for a more convenient constructor. data RDSOptionGroupOptionSetting = RDSOptionGroupOptionSetting { _rDSOptionGroupOptionSettingName :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSOptionGroupOptionSetting' containing required fields --- | as arguments. +-- as arguments. rdsOptionGroupOptionSetting :: RDSOptionGroupOptionSetting rdsOptionGroupOptionSetting = diff --git a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs --- a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs +++ b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs @@ -15,8 +15,8 @@ -- | Full data type definition for RedshiftClusterParameterGroupParameter. See --- | 'redshiftClusterParameterGroupParameter' for a more convenient --- | constructor. +-- 'redshiftClusterParameterGroupParameter' for a more convenient +-- constructor. data RedshiftClusterParameterGroupParameter = RedshiftClusterParameterGroupParameter { _redshiftClusterParameterGroupParameterParameterName :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftClusterParameterGroupParameter' containing --- | required fields as arguments. +-- required fields as arguments. redshiftClusterParameterGroupParameter :: Val Text -- ^ 'rcpgpParameterName' -> Val Text -- ^ 'rcpgpParameterValue' diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs new file mode 100644 --- /dev/null +++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs @@ -0,0 +1,58 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RecordWildCards #-} + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-alarmidentifier.html + +module Stratosphere.ResourceProperties.Route53HealthCheckAlarmIdentifier where + +import Control.Lens hiding ((.=)) +import Data.Aeson +import Data.Maybe (catMaybes) +import Data.Monoid (mempty) +import Data.Text + +import Stratosphere.Values + + +-- | Full data type definition for Route53HealthCheckAlarmIdentifier. See +-- 'route53HealthCheckAlarmIdentifier' for a more convenient constructor. +data Route53HealthCheckAlarmIdentifier = + Route53HealthCheckAlarmIdentifier + { _route53HealthCheckAlarmIdentifierName :: Val Text + , _route53HealthCheckAlarmIdentifierRegion :: Val Text + } deriving (Show, Eq) + +instance ToJSON Route53HealthCheckAlarmIdentifier where + toJSON Route53HealthCheckAlarmIdentifier{..} = + object $ + catMaybes + [ Just ("Name" .= _route53HealthCheckAlarmIdentifierName) + , Just ("Region" .= _route53HealthCheckAlarmIdentifierRegion) + ] + +instance FromJSON Route53HealthCheckAlarmIdentifier where + parseJSON (Object obj) = + Route53HealthCheckAlarmIdentifier <$> + obj .: "Name" <*> + obj .: "Region" + parseJSON _ = mempty + +-- | Constructor for 'Route53HealthCheckAlarmIdentifier' containing required +-- fields as arguments. +route53HealthCheckAlarmIdentifier + :: Val Text -- ^ 'rhcaiName' + -> Val Text -- ^ 'rhcaiRegion' + -> Route53HealthCheckAlarmIdentifier +route53HealthCheckAlarmIdentifier namearg regionarg = + Route53HealthCheckAlarmIdentifier + { _route53HealthCheckAlarmIdentifierName = namearg + , _route53HealthCheckAlarmIdentifierRegion = regionarg + } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-alarmidentifier.html#cfn-route53-healthcheck-alarmidentifier-name +rhcaiName :: Lens' Route53HealthCheckAlarmIdentifier (Val Text) +rhcaiName = lens _route53HealthCheckAlarmIdentifierName (\s a -> s { _route53HealthCheckAlarmIdentifierName = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-alarmidentifier.html#cfn-route53-healthcheck-alarmidentifier-region +rhcaiRegion :: Lens' Route53HealthCheckAlarmIdentifier (Val Text) +rhcaiRegion = lens _route53HealthCheckAlarmIdentifierRegion (\s a -> s { _route53HealthCheckAlarmIdentifierRegion = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs @@ -12,15 +12,22 @@ import Data.Text import Stratosphere.Values - +import Stratosphere.ResourceProperties.Route53HealthCheckAlarmIdentifier -- | Full data type definition for Route53HealthCheckHealthCheckConfig. See --- | 'route53HealthCheckHealthCheckConfig' for a more convenient constructor. +-- 'route53HealthCheckHealthCheckConfig' for a more convenient constructor. data Route53HealthCheckHealthCheckConfig = Route53HealthCheckHealthCheckConfig - { _route53HealthCheckHealthCheckConfigFailureThreshold :: Maybe (Val Integer') + { _route53HealthCheckHealthCheckConfigAlarmIdentifier :: Maybe Route53HealthCheckAlarmIdentifier + , _route53HealthCheckHealthCheckConfigChildHealthChecks :: Maybe [Val Text] + , _route53HealthCheckHealthCheckConfigEnableSNI :: Maybe (Val Bool') + , _route53HealthCheckHealthCheckConfigFailureThreshold :: Maybe (Val Integer') , _route53HealthCheckHealthCheckConfigFullyQualifiedDomainName :: Maybe (Val Text) + , _route53HealthCheckHealthCheckConfigHealthThreshold :: Maybe (Val Integer') , _route53HealthCheckHealthCheckConfigIPAddress :: Maybe (Val Text) + , _route53HealthCheckHealthCheckConfigInsufficientDataHealthStatus :: Maybe (Val Text) + , _route53HealthCheckHealthCheckConfigInverted :: Maybe (Val Bool') + , _route53HealthCheckHealthCheckConfigMeasureLatency :: Maybe (Val Bool') , _route53HealthCheckHealthCheckConfigPort :: Maybe (Val Integer') , _route53HealthCheckHealthCheckConfigRequestInterval :: Maybe (Val Integer') , _route53HealthCheckHealthCheckConfigResourcePath :: Maybe (Val Text) @@ -32,9 +39,16 @@ toJSON Route53HealthCheckHealthCheckConfig{..} = object $ catMaybes - [ ("FailureThreshold" .=) <$> _route53HealthCheckHealthCheckConfigFailureThreshold + [ ("AlarmIdentifier" .=) <$> _route53HealthCheckHealthCheckConfigAlarmIdentifier + , ("ChildHealthChecks" .=) <$> _route53HealthCheckHealthCheckConfigChildHealthChecks + , ("EnableSNI" .=) <$> _route53HealthCheckHealthCheckConfigEnableSNI + , ("FailureThreshold" .=) <$> _route53HealthCheckHealthCheckConfigFailureThreshold , ("FullyQualifiedDomainName" .=) <$> _route53HealthCheckHealthCheckConfigFullyQualifiedDomainName + , ("HealthThreshold" .=) <$> _route53HealthCheckHealthCheckConfigHealthThreshold , ("IPAddress" .=) <$> _route53HealthCheckHealthCheckConfigIPAddress + , ("InsufficientDataHealthStatus" .=) <$> _route53HealthCheckHealthCheckConfigInsufficientDataHealthStatus + , ("Inverted" .=) <$> _route53HealthCheckHealthCheckConfigInverted + , ("MeasureLatency" .=) <$> _route53HealthCheckHealthCheckConfigMeasureLatency , ("Port" .=) <$> _route53HealthCheckHealthCheckConfigPort , ("RequestInterval" .=) <$> _route53HealthCheckHealthCheckConfigRequestInterval , ("ResourcePath" .=) <$> _route53HealthCheckHealthCheckConfigResourcePath @@ -45,9 +59,16 @@ instance FromJSON Route53HealthCheckHealthCheckConfig where parseJSON (Object obj) = Route53HealthCheckHealthCheckConfig <$> + obj .:? "AlarmIdentifier" <*> + obj .:? "ChildHealthChecks" <*> + obj .:? "EnableSNI" <*> obj .:? "FailureThreshold" <*> obj .:? "FullyQualifiedDomainName" <*> + obj .:? "HealthThreshold" <*> obj .:? "IPAddress" <*> + obj .:? "InsufficientDataHealthStatus" <*> + obj .:? "Inverted" <*> + obj .:? "MeasureLatency" <*> obj .:? "Port" <*> obj .:? "RequestInterval" <*> obj .:? "ResourcePath" <*> @@ -56,15 +77,22 @@ parseJSON _ = mempty -- | Constructor for 'Route53HealthCheckHealthCheckConfig' containing required --- | fields as arguments. +-- fields as arguments. route53HealthCheckHealthCheckConfig :: Val Text -- ^ 'rhchccType' -> Route53HealthCheckHealthCheckConfig route53HealthCheckHealthCheckConfig typearg = Route53HealthCheckHealthCheckConfig - { _route53HealthCheckHealthCheckConfigFailureThreshold = Nothing + { _route53HealthCheckHealthCheckConfigAlarmIdentifier = Nothing + , _route53HealthCheckHealthCheckConfigChildHealthChecks = Nothing + , _route53HealthCheckHealthCheckConfigEnableSNI = Nothing + , _route53HealthCheckHealthCheckConfigFailureThreshold = Nothing , _route53HealthCheckHealthCheckConfigFullyQualifiedDomainName = Nothing + , _route53HealthCheckHealthCheckConfigHealthThreshold = Nothing , _route53HealthCheckHealthCheckConfigIPAddress = Nothing + , _route53HealthCheckHealthCheckConfigInsufficientDataHealthStatus = Nothing + , _route53HealthCheckHealthCheckConfigInverted = Nothing + , _route53HealthCheckHealthCheckConfigMeasureLatency = Nothing , _route53HealthCheckHealthCheckConfigPort = Nothing , _route53HealthCheckHealthCheckConfigRequestInterval = Nothing , _route53HealthCheckHealthCheckConfigResourcePath = Nothing @@ -72,6 +100,18 @@ , _route53HealthCheckHealthCheckConfigType = typearg } +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-alarmidentifier +rhchccAlarmIdentifier :: Lens' Route53HealthCheckHealthCheckConfig (Maybe Route53HealthCheckAlarmIdentifier) +rhchccAlarmIdentifier = lens _route53HealthCheckHealthCheckConfigAlarmIdentifier (\s a -> s { _route53HealthCheckHealthCheckConfigAlarmIdentifier = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-childhealthchecks +rhchccChildHealthChecks :: Lens' Route53HealthCheckHealthCheckConfig (Maybe [Val Text]) +rhchccChildHealthChecks = lens _route53HealthCheckHealthCheckConfigChildHealthChecks (\s a -> s { _route53HealthCheckHealthCheckConfigChildHealthChecks = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-enablesni +rhchccEnableSNI :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Bool')) +rhchccEnableSNI = lens _route53HealthCheckHealthCheckConfigEnableSNI (\s a -> s { _route53HealthCheckHealthCheckConfigEnableSNI = a }) + -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-failurethreshold rhchccFailureThreshold :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Integer')) rhchccFailureThreshold = lens _route53HealthCheckHealthCheckConfigFailureThreshold (\s a -> s { _route53HealthCheckHealthCheckConfigFailureThreshold = a }) @@ -80,9 +120,25 @@ rhchccFullyQualifiedDomainName :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Text)) rhchccFullyQualifiedDomainName = lens _route53HealthCheckHealthCheckConfigFullyQualifiedDomainName (\s a -> s { _route53HealthCheckHealthCheckConfigFullyQualifiedDomainName = a }) +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-healththreshold +rhchccHealthThreshold :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Integer')) +rhchccHealthThreshold = lens _route53HealthCheckHealthCheckConfigHealthThreshold (\s a -> s { _route53HealthCheckHealthCheckConfigHealthThreshold = a }) + -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-ipaddress rhchccIPAddress :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Text)) rhchccIPAddress = lens _route53HealthCheckHealthCheckConfigIPAddress (\s a -> s { _route53HealthCheckHealthCheckConfigIPAddress = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-insufficientdatahealthstatus +rhchccInsufficientDataHealthStatus :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Text)) +rhchccInsufficientDataHealthStatus = lens _route53HealthCheckHealthCheckConfigInsufficientDataHealthStatus (\s a -> s { _route53HealthCheckHealthCheckConfigInsufficientDataHealthStatus = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-inverted +rhchccInverted :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Bool')) +rhchccInverted = lens _route53HealthCheckHealthCheckConfigInverted (\s a -> s { _route53HealthCheckHealthCheckConfigInverted = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-measurelatency +rhchccMeasureLatency :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Bool')) +rhchccMeasureLatency = lens _route53HealthCheckHealthCheckConfigMeasureLatency (\s a -> s { _route53HealthCheckHealthCheckConfigMeasureLatency = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthcheckconfig.html#cfn-route53-healthcheck-healthcheckconfig-port rhchccPort :: Lens' Route53HealthCheckHealthCheckConfig (Maybe (Val Integer')) diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs @@ -1,7 +1,7 @@ {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktags.html +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktag.html module Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckTag where @@ -15,7 +15,7 @@ -- | Full data type definition for Route53HealthCheckHealthCheckTag. See --- | 'route53HealthCheckHealthCheckTag' for a more convenient constructor. +-- 'route53HealthCheckHealthCheckTag' for a more convenient constructor. data Route53HealthCheckHealthCheckTag = Route53HealthCheckHealthCheckTag { _route53HealthCheckHealthCheckTagKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HealthCheckHealthCheckTag' containing required --- | fields as arguments. +-- fields as arguments. route53HealthCheckHealthCheckTag :: Val Text -- ^ 'rhchctKey' -> Val Text -- ^ 'rhchctValue' @@ -49,10 +49,10 @@ , _route53HealthCheckHealthCheckTagValue = valuearg } --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktags.html#cfn-route53-healthchecktags-key +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktag.html#cfn-route53-healthchecktags-key rhchctKey :: Lens' Route53HealthCheckHealthCheckTag (Val Text) rhchctKey = lens _route53HealthCheckHealthCheckTagKey (\s a -> s { _route53HealthCheckHealthCheckTagKey = a }) --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktags.html#cfn-route53-healthchecktags-value +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-route53-healthcheck-healthchecktag.html#cfn-route53-healthchecktags-value rhchctValue :: Lens' Route53HealthCheckHealthCheckTag (Val Text) rhchctValue = lens _route53HealthCheckHealthCheckTagValue (\s a -> s { _route53HealthCheckHealthCheckTagValue = a }) diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53HostedZoneHostedZoneConfig. See --- | 'route53HostedZoneHostedZoneConfig' for a more convenient constructor. +-- 'route53HostedZoneHostedZoneConfig' for a more convenient constructor. data Route53HostedZoneHostedZoneConfig = Route53HostedZoneHostedZoneConfig { _route53HostedZoneHostedZoneConfigComment :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HostedZoneHostedZoneConfig' containing required --- | fields as arguments. +-- fields as arguments. route53HostedZoneHostedZoneConfig :: Route53HostedZoneHostedZoneConfig route53HostedZoneHostedZoneConfig = diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53HostedZoneHostedZoneTag. See --- | 'route53HostedZoneHostedZoneTag' for a more convenient constructor. +-- 'route53HostedZoneHostedZoneTag' for a more convenient constructor. data Route53HostedZoneHostedZoneTag = Route53HostedZoneHostedZoneTag { _route53HostedZoneHostedZoneTagKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HostedZoneHostedZoneTag' containing required --- | fields as arguments. +-- fields as arguments. route53HostedZoneHostedZoneTag :: Val Text -- ^ 'rhzhztKey' -> Val Text -- ^ 'rhzhztValue' diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53HostedZoneVPC. See --- | 'route53HostedZoneVPC' for a more convenient constructor. +-- 'route53HostedZoneVPC' for a more convenient constructor. data Route53HostedZoneVPC = Route53HostedZoneVPC { _route53HostedZoneVPCVPCId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HostedZoneVPC' containing required fields as --- | arguments. +-- arguments. route53HostedZoneVPC :: Val Text -- ^ 'rhzvpcVPCId' -> Val Text -- ^ 'rhzvpcVPCRegion' diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53RecordSetAliasTarget. See --- | 'route53RecordSetAliasTarget' for a more convenient constructor. +-- 'route53RecordSetAliasTarget' for a more convenient constructor. data Route53RecordSetAliasTarget = Route53RecordSetAliasTarget { _route53RecordSetAliasTargetDNSName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetAliasTarget' containing required fields --- | as arguments. +-- as arguments. route53RecordSetAliasTarget :: Val Text -- ^ 'rrsatDNSName' -> Val Text -- ^ 'rrsatHostedZoneId' diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53RecordSetGeoLocation. See --- | 'route53RecordSetGeoLocation' for a more convenient constructor. +-- 'route53RecordSetGeoLocation' for a more convenient constructor. data Route53RecordSetGeoLocation = Route53RecordSetGeoLocation { _route53RecordSetGeoLocationContinentCode :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetGeoLocation' containing required fields --- | as arguments. +-- as arguments. route53RecordSetGeoLocation :: Route53RecordSetGeoLocation route53RecordSetGeoLocation = diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53RecordSetGroupAliasTarget. See --- | 'route53RecordSetGroupAliasTarget' for a more convenient constructor. +-- 'route53RecordSetGroupAliasTarget' for a more convenient constructor. data Route53RecordSetGroupAliasTarget = Route53RecordSetGroupAliasTarget { _route53RecordSetGroupAliasTargetDNSName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetGroupAliasTarget' containing required --- | fields as arguments. +-- fields as arguments. route53RecordSetGroupAliasTarget :: Val Text -- ^ 'rrsgatDNSName' -> Val Text -- ^ 'rrsgatHostedZoneId' diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Route53RecordSetGroupGeoLocation. See --- | 'route53RecordSetGroupGeoLocation' for a more convenient constructor. +-- 'route53RecordSetGroupGeoLocation' for a more convenient constructor. data Route53RecordSetGroupGeoLocation = Route53RecordSetGroupGeoLocation { _route53RecordSetGroupGeoLocationContinentCode :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetGroupGeoLocation' containing required --- | fields as arguments. +-- fields as arguments. route53RecordSetGroupGeoLocation :: Route53RecordSetGroupGeoLocation route53RecordSetGroupGeoLocation = diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs --- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs +++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Route53RecordSetGroupGeoLocation -- | Full data type definition for Route53RecordSetGroupRecordSet. See --- | 'route53RecordSetGroupRecordSet' for a more convenient constructor. +-- 'route53RecordSetGroupRecordSet' for a more convenient constructor. data Route53RecordSetGroupRecordSet = Route53RecordSetGroupRecordSet { _route53RecordSetGroupRecordSetAliasTarget :: Maybe Route53RecordSetGroupAliasTarget @@ -75,7 +75,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetGroupRecordSet' containing required --- | fields as arguments. +-- fields as arguments. route53RecordSetGroupRecordSet :: Val Text -- ^ 'rrsgrsName' -> Val Text -- ^ 'rrsgrsType' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketCorsRule -- | Full data type definition for S3BucketCorsConfiguration. See --- | 's3BucketCorsConfiguration' for a more convenient constructor. +-- 's3BucketCorsConfiguration' for a more convenient constructor. data S3BucketCorsConfiguration = S3BucketCorsConfiguration { _s3BucketCorsConfigurationCorsRules :: [S3BucketCorsRule] @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketCorsConfiguration' containing required fields as --- | arguments. +-- arguments. s3BucketCorsConfiguration :: [S3BucketCorsRule] -- ^ 'sbccCorsRules' -> S3BucketCorsConfiguration diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketCorsRule. See 's3BucketCorsRule' --- | for a more convenient constructor. +-- for a more convenient constructor. data S3BucketCorsRule = S3BucketCorsRule { _s3BucketCorsRuleAllowedHeaders :: Maybe [Val Text] @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketCorsRule' containing required fields as --- | arguments. +-- arguments. s3BucketCorsRule :: [Val Text] -- ^ 'sbcrAllowedMethods' -> [Val Text] -- ^ 'sbcrAllowedOrigins' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketFilterRule. See --- | 's3BucketFilterRule' for a more convenient constructor. +-- 's3BucketFilterRule' for a more convenient constructor. data S3BucketFilterRule = S3BucketFilterRule { _s3BucketFilterRuleName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketFilterRule' containing required fields as --- | arguments. +-- arguments. s3BucketFilterRule :: Val Text -- ^ 'sbfrName' -> Val Text -- ^ 'sbfrValue' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketNotificationFilter -- | Full data type definition for S3BucketLambdaConfiguration. See --- | 's3BucketLambdaConfiguration' for a more convenient constructor. +-- 's3BucketLambdaConfiguration' for a more convenient constructor. data S3BucketLambdaConfiguration = S3BucketLambdaConfiguration { _s3BucketLambdaConfigurationEvent :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketLambdaConfiguration' containing required fields --- | as arguments. +-- as arguments. s3BucketLambdaConfiguration :: Val Text -- ^ 'sblcEvent' -> Val Text -- ^ 'sblcFunction' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketRule -- | Full data type definition for S3BucketLifecycleConfiguration. See --- | 's3BucketLifecycleConfiguration' for a more convenient constructor. +-- 's3BucketLifecycleConfiguration' for a more convenient constructor. data S3BucketLifecycleConfiguration = S3BucketLifecycleConfiguration { _s3BucketLifecycleConfigurationRules :: [S3BucketRule] @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketLifecycleConfiguration' containing required --- | fields as arguments. +-- fields as arguments. s3BucketLifecycleConfiguration :: [S3BucketRule] -- ^ 'sblcRules' -> S3BucketLifecycleConfiguration diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketLoggingConfiguration. See --- | 's3BucketLoggingConfiguration' for a more convenient constructor. +-- 's3BucketLoggingConfiguration' for a more convenient constructor. data S3BucketLoggingConfiguration = S3BucketLoggingConfiguration { _s3BucketLoggingConfigurationDestinationBucketName :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketLoggingConfiguration' containing required fields --- | as arguments. +-- as arguments. s3BucketLoggingConfiguration :: S3BucketLoggingConfiguration s3BucketLoggingConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketNoncurrentVersionTransition. See --- | 's3BucketNoncurrentVersionTransition' for a more convenient constructor. +-- 's3BucketNoncurrentVersionTransition' for a more convenient constructor. data S3BucketNoncurrentVersionTransition = S3BucketNoncurrentVersionTransition { _s3BucketNoncurrentVersionTransitionStorageClass :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketNoncurrentVersionTransition' containing required --- | fields as arguments. +-- fields as arguments. s3BucketNoncurrentVersionTransition :: Val Text -- ^ 'sbnvtStorageClass' -> Val Integer' -- ^ 'sbnvtTransitionInDays' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.S3BucketTopicConfiguration -- | Full data type definition for S3BucketNotificationConfiguration. See --- | 's3BucketNotificationConfiguration' for a more convenient constructor. +-- 's3BucketNotificationConfiguration' for a more convenient constructor. data S3BucketNotificationConfiguration = S3BucketNotificationConfiguration { _s3BucketNotificationConfigurationLambdaConfigurations :: Maybe [S3BucketLambdaConfiguration] @@ -43,7 +43,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketNotificationConfiguration' containing required --- | fields as arguments. +-- fields as arguments. s3BucketNotificationConfiguration :: S3BucketNotificationConfiguration s3BucketNotificationConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketS3KeyFilter -- | Full data type definition for S3BucketNotificationFilter. See --- | 's3BucketNotificationFilter' for a more convenient constructor. +-- 's3BucketNotificationFilter' for a more convenient constructor. data S3BucketNotificationFilter = S3BucketNotificationFilter { _s3BucketNotificationFilterS3Key :: S3BucketS3KeyFilter @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketNotificationFilter' containing required fields --- | as arguments. +-- as arguments. s3BucketNotificationFilter :: S3BucketS3KeyFilter -- ^ 'sbnfS3Key' -> S3BucketNotificationFilter diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketNotificationFilter -- | Full data type definition for S3BucketQueueConfiguration. See --- | 's3BucketQueueConfiguration' for a more convenient constructor. +-- 's3BucketQueueConfiguration' for a more convenient constructor. data S3BucketQueueConfiguration = S3BucketQueueConfiguration { _s3BucketQueueConfigurationEvent :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketQueueConfiguration' containing required fields --- | as arguments. +-- as arguments. s3BucketQueueConfiguration :: Val Text -- ^ 'sbqcEvent' -> Val Text -- ^ 'sbqcQueue' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketRedirectAllRequestsTo. See --- | 's3BucketRedirectAllRequestsTo' for a more convenient constructor. +-- 's3BucketRedirectAllRequestsTo' for a more convenient constructor. data S3BucketRedirectAllRequestsTo = S3BucketRedirectAllRequestsTo { _s3BucketRedirectAllRequestsToHostName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketRedirectAllRequestsTo' containing required --- | fields as arguments. +-- fields as arguments. s3BucketRedirectAllRequestsTo :: Val Text -- ^ 'sbrartHostName' -> S3BucketRedirectAllRequestsTo diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketRedirectRule. See --- | 's3BucketRedirectRule' for a more convenient constructor. +-- 's3BucketRedirectRule' for a more convenient constructor. data S3BucketRedirectRule = S3BucketRedirectRule { _s3BucketRedirectRuleHostName :: Maybe (Val Text) @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketRedirectRule' containing required fields as --- | arguments. +-- arguments. s3BucketRedirectRule :: S3BucketRedirectRule s3BucketRedirectRule = diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketReplicationRule -- | Full data type definition for S3BucketReplicationConfiguration. See --- | 's3BucketReplicationConfiguration' for a more convenient constructor. +-- 's3BucketReplicationConfiguration' for a more convenient constructor. data S3BucketReplicationConfiguration = S3BucketReplicationConfiguration { _s3BucketReplicationConfigurationRole :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketReplicationConfiguration' containing required --- | fields as arguments. +-- fields as arguments. s3BucketReplicationConfiguration :: Val Text -- ^ 'sbrcRole' -> [S3BucketReplicationRule] -- ^ 'sbrcRules' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketReplicationDestination. See --- | 's3BucketReplicationDestination' for a more convenient constructor. +-- 's3BucketReplicationDestination' for a more convenient constructor. data S3BucketReplicationDestination = S3BucketReplicationDestination { _s3BucketReplicationDestinationBucket :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketReplicationDestination' containing required --- | fields as arguments. +-- fields as arguments. s3BucketReplicationDestination :: Val Text -- ^ 'sbrdBucket' -> S3BucketReplicationDestination diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketReplicationDestination -- | Full data type definition for S3BucketReplicationRule. See --- | 's3BucketReplicationRule' for a more convenient constructor. +-- 's3BucketReplicationRule' for a more convenient constructor. data S3BucketReplicationRule = S3BucketReplicationRule { _s3BucketReplicationRuleDestination :: S3BucketReplicationDestination @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketReplicationRule' containing required fields as --- | arguments. +-- arguments. s3BucketReplicationRule :: S3BucketReplicationDestination -- ^ 'sbrrDestination' -> Val Text -- ^ 'sbrrPrefix' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.S3BucketRoutingRuleCondition -- | Full data type definition for S3BucketRoutingRule. See --- | 's3BucketRoutingRule' for a more convenient constructor. +-- 's3BucketRoutingRule' for a more convenient constructor. data S3BucketRoutingRule = S3BucketRoutingRule { _s3BucketRoutingRuleRedirectRule :: S3BucketRedirectRule @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketRoutingRule' containing required fields as --- | arguments. +-- arguments. s3BucketRoutingRule :: S3BucketRedirectRule -- ^ 'sbrrRedirectRule' -> S3BucketRoutingRule diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketRoutingRuleCondition. See --- | 's3BucketRoutingRuleCondition' for a more convenient constructor. +-- 's3BucketRoutingRuleCondition' for a more convenient constructor. data S3BucketRoutingRuleCondition = S3BucketRoutingRuleCondition { _s3BucketRoutingRuleConditionHttpErrorCodeReturnedEquals :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketRoutingRuleCondition' containing required fields --- | as arguments. +-- as arguments. s3BucketRoutingRuleCondition :: S3BucketRoutingRuleCondition s3BucketRoutingRuleCondition = diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.S3BucketTransition -- | Full data type definition for S3BucketRule. See 's3BucketRule' for a more --- | convenient constructor. +-- convenient constructor. data S3BucketRule = S3BucketRule { _s3BucketRuleExpirationDate :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketFilterRule -- | Full data type definition for S3BucketS3KeyFilter. See --- | 's3BucketS3KeyFilter' for a more convenient constructor. +-- 's3BucketS3KeyFilter' for a more convenient constructor. data S3BucketS3KeyFilter = S3BucketS3KeyFilter { _s3BucketS3KeyFilterRules :: [S3BucketFilterRule] @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketS3KeyFilter' containing required fields as --- | arguments. +-- arguments. s3BucketS3KeyFilter :: [S3BucketFilterRule] -- ^ 'sbskfRules' -> S3BucketS3KeyFilter diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.S3BucketNotificationFilter -- | Full data type definition for S3BucketTopicConfiguration. See --- | 's3BucketTopicConfiguration' for a more convenient constructor. +-- 's3BucketTopicConfiguration' for a more convenient constructor. data S3BucketTopicConfiguration = S3BucketTopicConfiguration { _s3BucketTopicConfigurationEvent :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketTopicConfiguration' containing required fields --- | as arguments. +-- as arguments. s3BucketTopicConfiguration :: Val Text -- ^ 'sbtcEvent' -> Val Text -- ^ 'sbtcTopic' diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketTransition. See --- | 's3BucketTransition' for a more convenient constructor. +-- 's3BucketTransition' for a more convenient constructor. data S3BucketTransition = S3BucketTransition { _s3BucketTransitionStorageClass :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketTransition' containing required fields as --- | arguments. +-- arguments. s3BucketTransition :: Val Text -- ^ 'sbtStorageClass' -> S3BucketTransition diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketVersioningConfiguration. See --- | 's3BucketVersioningConfiguration' for a more convenient constructor. +-- 's3BucketVersioningConfiguration' for a more convenient constructor. data S3BucketVersioningConfiguration = S3BucketVersioningConfiguration { _s3BucketVersioningConfigurationStatus :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketVersioningConfiguration' containing required --- | fields as arguments. +-- fields as arguments. s3BucketVersioningConfiguration :: Val Text -- ^ 'sbvcStatus' -> S3BucketVersioningConfiguration diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs --- a/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs +++ b/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.S3BucketRoutingRule -- | Full data type definition for S3BucketWebsiteConfiguration. See --- | 's3BucketWebsiteConfiguration' for a more convenient constructor. +-- 's3BucketWebsiteConfiguration' for a more convenient constructor. data S3BucketWebsiteConfiguration = S3BucketWebsiteConfiguration { _s3BucketWebsiteConfigurationErrorDocument :: Maybe (Val Text) @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'S3BucketWebsiteConfiguration' containing required fields --- | as arguments. +-- as arguments. s3BucketWebsiteConfiguration :: S3BucketWebsiteConfiguration s3BucketWebsiteConfiguration = diff --git a/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs b/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs --- a/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs +++ b/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for SNSTopicSubscription. See --- | 'snsTopicSubscription' for a more convenient constructor. +-- 'snsTopicSubscription' for a more convenient constructor. data SNSTopicSubscription = SNSTopicSubscription { _sNSTopicSubscriptionEndpoint :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'SNSTopicSubscription' containing required fields as --- | arguments. +-- arguments. snsTopicSubscription :: Val Text -- ^ 'snstsEndpoint' -> Val SNSProtocol -- ^ 'snstsProtocol' diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs --- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs +++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SSMAssociationParameterValues. See --- | 'ssmAssociationParameterValues' for a more convenient constructor. +-- 'ssmAssociationParameterValues' for a more convenient constructor. data SSMAssociationParameterValues = SSMAssociationParameterValues { _sSMAssociationParameterValuesParameterValues :: [Val Text] @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'SSMAssociationParameterValues' containing required --- | fields as arguments. +-- fields as arguments. ssmAssociationParameterValues :: [Val Text] -- ^ 'ssmapvParameterValues' -> SSMAssociationParameterValues diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs --- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs +++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SSMAssociationTarget. See --- | 'ssmAssociationTarget' for a more convenient constructor. +-- 'ssmAssociationTarget' for a more convenient constructor. data SSMAssociationTarget = SSMAssociationTarget { _sSMAssociationTargetKey :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'SSMAssociationTarget' containing required fields as --- | arguments. +-- arguments. ssmAssociationTarget :: Val Text -- ^ 'ssmatKey' -> [Val Text] -- ^ 'ssmatValues' diff --git a/library-gen/Stratosphere/ResourceProperties/Tag.hs b/library-gen/Stratosphere/ResourceProperties/Tag.hs --- a/library-gen/Stratosphere/ResourceProperties/Tag.hs +++ b/library-gen/Stratosphere/ResourceProperties/Tag.hs @@ -15,7 +15,7 @@ -- | Full data type definition for Tag. See 'tag' for a more convenient --- | constructor. +-- constructor. data Tag = Tag { _tagKey :: Val Text diff --git a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFByteMatchSetFieldToMatch -- | Full data type definition for WAFByteMatchSetByteMatchTuple. See --- | 'wafByteMatchSetByteMatchTuple' for a more convenient constructor. +-- 'wafByteMatchSetByteMatchTuple' for a more convenient constructor. data WAFByteMatchSetByteMatchTuple = WAFByteMatchSetByteMatchTuple { _wAFByteMatchSetByteMatchTupleFieldToMatch :: WAFByteMatchSetFieldToMatch @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFByteMatchSetByteMatchTuple' containing required --- | fields as arguments. +-- fields as arguments. wafByteMatchSetByteMatchTuple :: WAFByteMatchSetFieldToMatch -- ^ 'wafbmsbmtFieldToMatch' -> Val Text -- ^ 'wafbmsbmtPositionalConstraint' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFByteMatchSetFieldToMatch. See --- | 'wafByteMatchSetFieldToMatch' for a more convenient constructor. +-- 'wafByteMatchSetFieldToMatch' for a more convenient constructor. data WAFByteMatchSetFieldToMatch = WAFByteMatchSetFieldToMatch { _wAFByteMatchSetFieldToMatchData :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFByteMatchSetFieldToMatch' containing required fields --- | as arguments. +-- as arguments. wafByteMatchSetFieldToMatch :: Val Text -- ^ 'wafbmsftmType' -> WAFByteMatchSetFieldToMatch diff --git a/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs b/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFIPSetIPSetDescriptor. See --- | 'wafipSetIPSetDescriptor' for a more convenient constructor. +-- 'wafipSetIPSetDescriptor' for a more convenient constructor. data WAFIPSetIPSetDescriptor = WAFIPSetIPSetDescriptor { _wAFIPSetIPSetDescriptorType :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFIPSetIPSetDescriptor' containing required fields as --- | arguments. +-- arguments. wafipSetIPSetDescriptor :: Val Text -- ^ 'wafipsipsdType' -> Val Text -- ^ 'wafipsipsdValue' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs b/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFRulePredicate. See 'wafRulePredicate' --- | for a more convenient constructor. +-- for a more convenient constructor. data WAFRulePredicate = WAFRulePredicate { _wAFRulePredicateDataId :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFRulePredicate' containing required fields as --- | arguments. +-- arguments. wafRulePredicate :: Val Text -- ^ 'wafrpDataId' -> Val Bool' -- ^ 'wafrpNegated' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFSizeConstraintSetFieldToMatch. See --- | 'wafSizeConstraintSetFieldToMatch' for a more convenient constructor. +-- 'wafSizeConstraintSetFieldToMatch' for a more convenient constructor. data WAFSizeConstraintSetFieldToMatch = WAFSizeConstraintSetFieldToMatch { _wAFSizeConstraintSetFieldToMatchData :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSizeConstraintSetFieldToMatch' containing required --- | fields as arguments. +-- fields as arguments. wafSizeConstraintSetFieldToMatch :: Val Text -- ^ 'wafscsftmType' -> WAFSizeConstraintSetFieldToMatch diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFSizeConstraintSetFieldToMatch -- | Full data type definition for WAFSizeConstraintSetSizeConstraint. See --- | 'wafSizeConstraintSetSizeConstraint' for a more convenient constructor. +-- 'wafSizeConstraintSetSizeConstraint' for a more convenient constructor. data WAFSizeConstraintSetSizeConstraint = WAFSizeConstraintSetSizeConstraint { _wAFSizeConstraintSetSizeConstraintComparisonOperator :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSizeConstraintSetSizeConstraint' containing required --- | fields as arguments. +-- fields as arguments. wafSizeConstraintSetSizeConstraint :: Val Text -- ^ 'wafscsscComparisonOperator' -> WAFSizeConstraintSetFieldToMatch -- ^ 'wafscsscFieldToMatch' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFSqlInjectionMatchSetFieldToMatch. See --- | 'wafSqlInjectionMatchSetFieldToMatch' for a more convenient constructor. +-- 'wafSqlInjectionMatchSetFieldToMatch' for a more convenient constructor. data WAFSqlInjectionMatchSetFieldToMatch = WAFSqlInjectionMatchSetFieldToMatch { _wAFSqlInjectionMatchSetFieldToMatchData :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSqlInjectionMatchSetFieldToMatch' containing required --- | fields as arguments. +-- fields as arguments. wafSqlInjectionMatchSetFieldToMatch :: Val Text -- ^ 'wafsimsftmType' -> WAFSqlInjectionMatchSetFieldToMatch diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs @@ -15,9 +15,9 @@ import Stratosphere.ResourceProperties.WAFSqlInjectionMatchSetFieldToMatch -- | Full data type definition for --- | WAFSqlInjectionMatchSetSqlInjectionMatchTuple. See --- | 'wafSqlInjectionMatchSetSqlInjectionMatchTuple' for a more convenient --- | constructor. +-- WAFSqlInjectionMatchSetSqlInjectionMatchTuple. See +-- 'wafSqlInjectionMatchSetSqlInjectionMatchTuple' for a more convenient +-- constructor. data WAFSqlInjectionMatchSetSqlInjectionMatchTuple = WAFSqlInjectionMatchSetSqlInjectionMatchTuple { _wAFSqlInjectionMatchSetSqlInjectionMatchTupleFieldToMatch :: WAFSqlInjectionMatchSetFieldToMatch @@ -40,7 +40,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSqlInjectionMatchSetSqlInjectionMatchTuple' --- | containing required fields as arguments. +-- containing required fields as arguments. wafSqlInjectionMatchSetSqlInjectionMatchTuple :: WAFSqlInjectionMatchSetFieldToMatch -- ^ 'wafsimssimtFieldToMatch' -> Val Text -- ^ 'wafsimssimtTextTransformation' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs b/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFWebACLWafAction -- | Full data type definition for WAFWebACLActivatedRule. See --- | 'wafWebACLActivatedRule' for a more convenient constructor. +-- 'wafWebACLActivatedRule' for a more convenient constructor. data WAFWebACLActivatedRule = WAFWebACLActivatedRule { _wAFWebACLActivatedRuleAction :: WAFWebACLWafAction @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFWebACLActivatedRule' containing required fields as --- | arguments. +-- arguments. wafWebACLActivatedRule :: WAFWebACLWafAction -- ^ 'wafwaclarAction' -> Val Integer' -- ^ 'wafwaclarPriority' diff --git a/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs b/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFWebACLWafAction. See --- | 'wafWebACLWafAction' for a more convenient constructor. +-- 'wafWebACLWafAction' for a more convenient constructor. data WAFWebACLWafAction = WAFWebACLWafAction { _wAFWebACLWafActionType :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFWebACLWafAction' containing required fields as --- | arguments. +-- arguments. wafWebACLWafAction :: Val Text -- ^ 'wafwaclwaType' -> WAFWebACLWafAction diff --git a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WAFXssMatchSetFieldToMatch. See --- | 'wafXssMatchSetFieldToMatch' for a more convenient constructor. +-- 'wafXssMatchSetFieldToMatch' for a more convenient constructor. data WAFXssMatchSetFieldToMatch = WAFXssMatchSetFieldToMatch { _wAFXssMatchSetFieldToMatchData :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFXssMatchSetFieldToMatch' containing required fields --- | as arguments. +-- as arguments. wafXssMatchSetFieldToMatch :: Val Text -- ^ 'wafxmsftmType' -> WAFXssMatchSetFieldToMatch diff --git a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs --- a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs +++ b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFXssMatchSetFieldToMatch -- | Full data type definition for WAFXssMatchSetXssMatchTuple. See --- | 'wafXssMatchSetXssMatchTuple' for a more convenient constructor. +-- 'wafXssMatchSetXssMatchTuple' for a more convenient constructor. data WAFXssMatchSetXssMatchTuple = WAFXssMatchSetXssMatchTuple { _wAFXssMatchSetXssMatchTupleFieldToMatch :: WAFXssMatchSetFieldToMatch @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFXssMatchSetXssMatchTuple' containing required fields --- | as arguments. +-- as arguments. wafXssMatchSetXssMatchTuple :: WAFXssMatchSetFieldToMatch -- ^ 'wafxmsxmtFieldToMatch' -> Val Text -- ^ 'wafxmsxmtTextTransformation' diff --git a/library-gen/Stratosphere/Resources.hs b/library-gen/Stratosphere/Resources.hs --- a/library-gen/Stratosphere/Resources.hs +++ b/library-gen/Stratosphere/Resources.hs @@ -265,11 +265,11 @@ import Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger as X import Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts as X import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupDeployment as X -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEc2TagFilter as X +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter as X import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation as X -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesInstanceTagFilter as X -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevision as X +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation as X import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location as X +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter as X import Stratosphere.ResourceProperties.CodePipelineCustomActionTypeArtifactDetails as X import Stratosphere.ResourceProperties.CodePipelineCustomActionTypeConfigurationProperties as X import Stratosphere.ResourceProperties.CodePipelineCustomActionTypeSettings as X @@ -414,6 +414,7 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration as X import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamS3DestinationConfiguration as X import Stratosphere.ResourceProperties.LambdaFunctionCode as X +import Stratosphere.ResourceProperties.LambdaFunctionDeadLetterConfig as X import Stratosphere.ResourceProperties.LambdaFunctionEnvironment as X import Stratosphere.ResourceProperties.LambdaFunctionVpcConfig as X import Stratosphere.ResourceProperties.LogsMetricFilterMetricTransformation as X @@ -439,6 +440,7 @@ import Stratosphere.ResourceProperties.RDSOptionGroupOptionConfiguration as X import Stratosphere.ResourceProperties.RDSOptionGroupOptionSetting as X import Stratosphere.ResourceProperties.RedshiftClusterParameterGroupParameter as X +import Stratosphere.ResourceProperties.Route53HealthCheckAlarmIdentifier as X import Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckConfig as X import Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckTag as X import Stratosphere.ResourceProperties.Route53HostedZoneHostedZoneConfig as X diff --git a/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs b/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayAccount. See 'apiGatewayAccount' --- | for a more convenient constructor. +-- for a more convenient constructor. data ApiGatewayAccount = ApiGatewayAccount { _apiGatewayAccountCloudWatchRoleArn :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayAccount' containing required fields as --- | arguments. +-- arguments. apiGatewayAccount :: ApiGatewayAccount apiGatewayAccount = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs b/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ApiGatewayApiKeyStageKey -- | Full data type definition for ApiGatewayApiKey. See 'apiGatewayApiKey' --- | for a more convenient constructor. +-- for a more convenient constructor. data ApiGatewayApiKey = ApiGatewayApiKey { _apiGatewayApiKeyDescription :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayApiKey' containing required fields as --- | arguments. +-- arguments. apiGatewayApiKey :: ApiGatewayApiKey apiGatewayApiKey = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs b/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for ApiGatewayAuthorizer. See --- | 'apiGatewayAuthorizer' for a more convenient constructor. +-- 'apiGatewayAuthorizer' for a more convenient constructor. data ApiGatewayAuthorizer = ApiGatewayAuthorizer { _apiGatewayAuthorizerAuthorizerCredentials :: Maybe (Val Text) @@ -59,7 +59,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayAuthorizer' containing required fields as --- | arguments. +-- arguments. apiGatewayAuthorizer :: ApiGatewayAuthorizer apiGatewayAuthorizer = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs b/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayBasePathMapping. See --- | 'apiGatewayBasePathMapping' for a more convenient constructor. +-- 'apiGatewayBasePathMapping' for a more convenient constructor. data ApiGatewayBasePathMapping = ApiGatewayBasePathMapping { _apiGatewayBasePathMappingBasePath :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayBasePathMapping' containing required fields as --- | arguments. +-- arguments. apiGatewayBasePathMapping :: ApiGatewayBasePathMapping apiGatewayBasePathMapping = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs b/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayClientCertificate. See --- | 'apiGatewayClientCertificate' for a more convenient constructor. +-- 'apiGatewayClientCertificate' for a more convenient constructor. data ApiGatewayClientCertificate = ApiGatewayClientCertificate { _apiGatewayClientCertificateDescription :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayClientCertificate' containing required fields --- | as arguments. +-- as arguments. apiGatewayClientCertificate :: ApiGatewayClientCertificate apiGatewayClientCertificate = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs b/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ApiGatewayDeploymentStageDescription -- | Full data type definition for ApiGatewayDeployment. See --- | 'apiGatewayDeployment' for a more convenient constructor. +-- 'apiGatewayDeployment' for a more convenient constructor. data ApiGatewayDeployment = ApiGatewayDeployment { _apiGatewayDeploymentDescription :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayDeployment' containing required fields as --- | arguments. +-- arguments. apiGatewayDeployment :: Val Text -- ^ 'agdRestApiId' -> ApiGatewayDeployment diff --git a/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs b/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.ApiGatewayMethodMethodResponse -- | Full data type definition for ApiGatewayMethod. See 'apiGatewayMethod' --- | for a more convenient constructor. +-- for a more convenient constructor. data ApiGatewayMethod = ApiGatewayMethod { _apiGatewayMethodApiKeyRequired :: Maybe (Val Bool') @@ -64,7 +64,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayMethod' containing required fields as --- | arguments. +-- arguments. apiGatewayMethod :: Val HttpMethod -- ^ 'agmeHttpMethod' -> ApiGatewayMethod diff --git a/library-gen/Stratosphere/Resources/ApiGatewayModel.hs b/library-gen/Stratosphere/Resources/ApiGatewayModel.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayModel.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayModel.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayModel. See 'apiGatewayModel' for --- | a more convenient constructor. +-- a more convenient constructor. data ApiGatewayModel = ApiGatewayModel { _apiGatewayModelContentType :: Maybe (Val Text) @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayModel' containing required fields as --- | arguments. +-- arguments. apiGatewayModel :: Val Text -- ^ 'agmoRestApiId' -> ApiGatewayModel diff --git a/library-gen/Stratosphere/Resources/ApiGatewayResource.hs b/library-gen/Stratosphere/Resources/ApiGatewayResource.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayResource.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayResource.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApiGatewayResource. See --- | 'apiGatewayResource' for a more convenient constructor. +-- 'apiGatewayResource' for a more convenient constructor. data ApiGatewayResource = ApiGatewayResource { _apiGatewayResourceParentId :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayResource' containing required fields as --- | arguments. +-- arguments. apiGatewayResource :: Val Text -- ^ 'agrParentId' -> Val Text -- ^ 'agrPathPart' diff --git a/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs b/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ApiGatewayRestApiS3Location -- | Full data type definition for ApiGatewayRestApi. See 'apiGatewayRestApi' --- | for a more convenient constructor. +-- for a more convenient constructor. data ApiGatewayRestApi = ApiGatewayRestApi { _apiGatewayRestApiBody :: Maybe Object @@ -56,7 +56,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayRestApi' containing required fields as --- | arguments. +-- arguments. apiGatewayRestApi :: ApiGatewayRestApi apiGatewayRestApi = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayStage.hs b/library-gen/Stratosphere/Resources/ApiGatewayStage.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayStage.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayStage.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ApiGatewayStageMethodSetting -- | Full data type definition for ApiGatewayStage. See 'apiGatewayStage' for --- | a more convenient constructor. +-- a more convenient constructor. data ApiGatewayStage = ApiGatewayStage { _apiGatewayStageCacheClusterEnabled :: Maybe (Val Bool') @@ -59,7 +59,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayStage' containing required fields as --- | arguments. +-- arguments. apiGatewayStage :: ApiGatewayStage apiGatewayStage = diff --git a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs --- a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs +++ b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.ApiGatewayUsagePlanThrottleSettings -- | Full data type definition for ApiGatewayUsagePlan. See --- | 'apiGatewayUsagePlan' for a more convenient constructor. +-- 'apiGatewayUsagePlan' for a more convenient constructor. data ApiGatewayUsagePlan = ApiGatewayUsagePlan { _apiGatewayUsagePlanApiStages :: Maybe [ApiGatewayUsagePlanApiStage] @@ -49,7 +49,7 @@ parseJSON _ = mempty -- | Constructor for 'ApiGatewayUsagePlan' containing required fields as --- | arguments. +-- arguments. apiGatewayUsagePlan :: ApiGatewayUsagePlan apiGatewayUsagePlan = diff --git a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs --- a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs +++ b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ApplicationAutoScalingScalableTarget. See --- | 'applicationAutoScalingScalableTarget' for a more convenient constructor. +-- 'applicationAutoScalingScalableTarget' for a more convenient constructor. data ApplicationAutoScalingScalableTarget = ApplicationAutoScalingScalableTarget { _applicationAutoScalingScalableTargetMaxCapacity :: Val Integer' @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'ApplicationAutoScalingScalableTarget' containing --- | required fields as arguments. +-- required fields as arguments. applicationAutoScalingScalableTarget :: Val Integer' -- ^ 'aasstMaxCapacity' -> Val Integer' -- ^ 'aasstMinCapacity' diff --git a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs --- a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs +++ b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration -- | Full data type definition for ApplicationAutoScalingScalingPolicy. See --- | 'applicationAutoScalingScalingPolicy' for a more convenient constructor. +-- 'applicationAutoScalingScalingPolicy' for a more convenient constructor. data ApplicationAutoScalingScalingPolicy = ApplicationAutoScalingScalingPolicy { _applicationAutoScalingScalingPolicyPolicyName :: Val Text @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'ApplicationAutoScalingScalingPolicy' containing required --- | fields as arguments. +-- fields as arguments. applicationAutoScalingScalingPolicy :: Val Text -- ^ 'aasspPolicyName' -> Val Text -- ^ 'aasspPolicyType' diff --git a/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs b/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs --- a/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs +++ b/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupTagProperty -- | Full data type definition for AutoScalingAutoScalingGroup. See --- | 'autoScalingAutoScalingGroup' for a more convenient constructor. +-- 'autoScalingAutoScalingGroup' for a more convenient constructor. data AutoScalingAutoScalingGroup = AutoScalingAutoScalingGroup { _autoScalingAutoScalingGroupAvailabilityZones :: Maybe [Val Text] @@ -85,7 +85,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingAutoScalingGroup' containing required fields --- | as arguments. +-- as arguments. autoScalingAutoScalingGroup :: Val Text -- ^ 'asasgMaxSize' -> Val Text -- ^ 'asasgMinSize' diff --git a/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs b/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs --- a/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs +++ b/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.AutoScalingLaunchConfigurationBlockDeviceMapping -- | Full data type definition for AutoScalingLaunchConfiguration. See --- | 'autoScalingLaunchConfiguration' for a more convenient constructor. +-- 'autoScalingLaunchConfiguration' for a more convenient constructor. data AutoScalingLaunchConfiguration = AutoScalingLaunchConfiguration { _autoScalingLaunchConfigurationAssociatePublicIpAddress :: Maybe (Val Bool') @@ -83,7 +83,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingLaunchConfiguration' containing required --- | fields as arguments. +-- fields as arguments. autoScalingLaunchConfiguration :: Val Text -- ^ 'aslcImageId' -> Val Text -- ^ 'aslcInstanceType' diff --git a/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs b/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs --- a/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs +++ b/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs @@ -15,7 +15,7 @@ -- | Full data type definition for AutoScalingLifecycleHook. See --- | 'autoScalingLifecycleHook' for a more convenient constructor. +-- 'autoScalingLifecycleHook' for a more convenient constructor. data AutoScalingLifecycleHook = AutoScalingLifecycleHook { _autoScalingLifecycleHookAutoScalingGroupName :: Val Text @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingLifecycleHook' containing required fields as --- | arguments. +-- arguments. autoScalingLifecycleHook :: Val Text -- ^ 'aslhAutoScalingGroupName' -> Val Text -- ^ 'aslhLifecycleTransition' diff --git a/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs b/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs --- a/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs +++ b/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.AutoScalingScalingPolicyStepAdjustment -- | Full data type definition for AutoScalingScalingPolicy. See --- | 'autoScalingScalingPolicy' for a more convenient constructor. +-- 'autoScalingScalingPolicy' for a more convenient constructor. data AutoScalingScalingPolicy = AutoScalingScalingPolicy { _autoScalingScalingPolicyAdjustmentType :: Val Text @@ -59,7 +59,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingScalingPolicy' containing required fields as --- | arguments. +-- arguments. autoScalingScalingPolicy :: Val Text -- ^ 'asspAdjustmentType' -> Val Text -- ^ 'asspAutoScalingGroupName' diff --git a/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs b/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs --- a/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs +++ b/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs @@ -15,7 +15,7 @@ -- | Full data type definition for AutoScalingScheduledAction. See --- | 'autoScalingScheduledAction' for a more convenient constructor. +-- 'autoScalingScheduledAction' for a more convenient constructor. data AutoScalingScheduledAction = AutoScalingScheduledAction { _autoScalingScheduledActionAutoScalingGroupName :: Val Text @@ -53,7 +53,7 @@ parseJSON _ = mempty -- | Constructor for 'AutoScalingScheduledAction' containing required fields --- | as arguments. +-- as arguments. autoScalingScheduledAction :: Val Text -- ^ 'assaAutoScalingGroupName' -> AutoScalingScheduledAction diff --git a/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs b/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs --- a/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs +++ b/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for CertificateManagerCertificate. See --- | 'certificateManagerCertificate' for a more convenient constructor. +-- 'certificateManagerCertificate' for a more convenient constructor. data CertificateManagerCertificate = CertificateManagerCertificate { _certificateManagerCertificateDomainName :: Val Text @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'CertificateManagerCertificate' containing required --- | fields as arguments. +-- fields as arguments. certificateManagerCertificate :: Val Text -- ^ 'cmcDomainName' -> CertificateManagerCertificate diff --git a/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs b/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs --- a/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs +++ b/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFormationCustomResource. See --- | 'cloudFormationCustomResource' for a more convenient constructor. +-- 'cloudFormationCustomResource' for a more convenient constructor. data CloudFormationCustomResource = CloudFormationCustomResource { _cloudFormationCustomResourceServiceToken :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFormationCustomResource' containing required fields --- | as arguments. +-- as arguments. cloudFormationCustomResource :: Val Text -- ^ 'cfcrServiceToken' -> CloudFormationCustomResource diff --git a/library-gen/Stratosphere/Resources/CloudFormationStack.hs b/library-gen/Stratosphere/Resources/CloudFormationStack.hs --- a/library-gen/Stratosphere/Resources/CloudFormationStack.hs +++ b/library-gen/Stratosphere/Resources/CloudFormationStack.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for CloudFormationStack. See --- | 'cloudFormationStack' for a more convenient constructor. +-- 'cloudFormationStack' for a more convenient constructor. data CloudFormationStack = CloudFormationStack { _cloudFormationStackNotificationARNs :: Maybe [Val Text] @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFormationStack' containing required fields as --- | arguments. +-- arguments. cloudFormationStack :: Val Text -- ^ 'cfsTemplateURL' -> CloudFormationStack diff --git a/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs b/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs --- a/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs +++ b/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFormationWaitCondition. See --- | 'cloudFormationWaitCondition' for a more convenient constructor. +-- 'cloudFormationWaitCondition' for a more convenient constructor. data CloudFormationWaitCondition = CloudFormationWaitCondition { _cloudFormationWaitConditionCount :: Maybe (Val Integer') @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFormationWaitCondition' containing required fields --- | as arguments. +-- as arguments. cloudFormationWaitCondition :: Val Text -- ^ 'cfwcHandle' -> Val Text -- ^ 'cfwcTimeout' diff --git a/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs b/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs --- a/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs +++ b/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudFormationWaitConditionHandle. See --- | 'cloudFormationWaitConditionHandle' for a more convenient constructor. +-- 'cloudFormationWaitConditionHandle' for a more convenient constructor. data CloudFormationWaitConditionHandle = CloudFormationWaitConditionHandle { @@ -29,7 +29,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFormationWaitConditionHandle' containing required --- | fields as arguments. +-- fields as arguments. cloudFormationWaitConditionHandle :: CloudFormationWaitConditionHandle cloudFormationWaitConditionHandle = diff --git a/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs b/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs --- a/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs +++ b/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CloudFrontDistributionDistributionConfig -- | Full data type definition for CloudFrontDistribution. See --- | 'cloudFrontDistribution' for a more convenient constructor. +-- 'cloudFrontDistribution' for a more convenient constructor. data CloudFrontDistribution = CloudFrontDistribution { _cloudFrontDistributionDistributionConfig :: CloudFrontDistributionDistributionConfig @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudFrontDistribution' containing required fields as --- | arguments. +-- arguments. cloudFrontDistribution :: CloudFrontDistributionDistributionConfig -- ^ 'cfdDistributionConfig' -> CloudFrontDistribution diff --git a/library-gen/Stratosphere/Resources/CloudTrailTrail.hs b/library-gen/Stratosphere/Resources/CloudTrailTrail.hs --- a/library-gen/Stratosphere/Resources/CloudTrailTrail.hs +++ b/library-gen/Stratosphere/Resources/CloudTrailTrail.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CloudTrailTrail. See 'cloudTrailTrail' for --- | a more convenient constructor. +-- a more convenient constructor. data CloudTrailTrail = CloudTrailTrail { _cloudTrailTrailCloudWatchLogsLogGroupArn :: Maybe (Val Text) @@ -62,7 +62,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudTrailTrail' containing required fields as --- | arguments. +-- arguments. cloudTrailTrail :: Val Bool' -- ^ 'cttIsLogging' -> Val Text -- ^ 'cttS3BucketName' diff --git a/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs b/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs --- a/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs +++ b/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CloudWatchAlarmDimension -- | Full data type definition for CloudWatchAlarm. See 'cloudWatchAlarm' for --- | a more convenient constructor. +-- a more convenient constructor. data CloudWatchAlarm = CloudWatchAlarm { _cloudWatchAlarmActionsEnabled :: Maybe (Val Bool') @@ -77,7 +77,7 @@ parseJSON _ = mempty -- | Constructor for 'CloudWatchAlarm' containing required fields as --- | arguments. +-- arguments. cloudWatchAlarm :: Val Text -- ^ 'cwaComparisonOperator' -> Val Integer' -- ^ 'cwaEvaluationPeriods' diff --git a/library-gen/Stratosphere/Resources/CodeBuildProject.hs b/library-gen/Stratosphere/Resources/CodeBuildProject.hs --- a/library-gen/Stratosphere/Resources/CodeBuildProject.hs +++ b/library-gen/Stratosphere/Resources/CodeBuildProject.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for CodeBuildProject. See 'codeBuildProject' --- | for a more convenient constructor. +-- for a more convenient constructor. data CodeBuildProject = CodeBuildProject { _codeBuildProjectArtifacts :: Maybe CodeBuildProjectArtifacts @@ -62,7 +62,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeBuildProject' containing required fields as --- | arguments. +-- arguments. codeBuildProject :: CodeBuildProject codeBuildProject = diff --git a/library-gen/Stratosphere/Resources/CodeCommitRepository.hs b/library-gen/Stratosphere/Resources/CodeCommitRepository.hs --- a/library-gen/Stratosphere/Resources/CodeCommitRepository.hs +++ b/library-gen/Stratosphere/Resources/CodeCommitRepository.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger -- | Full data type definition for CodeCommitRepository. See --- | 'codeCommitRepository' for a more convenient constructor. +-- 'codeCommitRepository' for a more convenient constructor. data CodeCommitRepository = CodeCommitRepository { _codeCommitRepositoryRepositoryDescription :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeCommitRepository' containing required fields as --- | arguments. +-- arguments. codeCommitRepository :: Val Text -- ^ 'ccrRepositoryName' -> CodeCommitRepository diff --git a/library-gen/Stratosphere/Resources/CodeDeployApplication.hs b/library-gen/Stratosphere/Resources/CodeDeployApplication.hs --- a/library-gen/Stratosphere/Resources/CodeDeployApplication.hs +++ b/library-gen/Stratosphere/Resources/CodeDeployApplication.hs @@ -15,7 +15,7 @@ -- | Full data type definition for CodeDeployApplication. See --- | 'codeDeployApplication' for a more convenient constructor. +-- 'codeDeployApplication' for a more convenient constructor. data CodeDeployApplication = CodeDeployApplication { _codeDeployApplicationApplicationName :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeDeployApplication' containing required fields as --- | arguments. +-- arguments. codeDeployApplication :: CodeDeployApplication codeDeployApplication = diff --git a/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs b/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs --- a/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs +++ b/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs @@ -12,14 +12,14 @@ import Data.Text import Stratosphere.Values - +import Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts -- | Full data type definition for CodeDeployDeploymentConfig. See --- | 'codeDeployDeploymentConfig' for a more convenient constructor. +-- 'codeDeployDeploymentConfig' for a more convenient constructor. data CodeDeployDeploymentConfig = CodeDeployDeploymentConfig { _codeDeployDeploymentConfigDeploymentConfigName :: Maybe (Val Text) - , _codeDeployDeploymentConfigMinimumHealthyHosts :: Maybe (Val Text) + , _codeDeployDeploymentConfigMinimumHealthyHosts :: Maybe CodeDeployDeploymentConfigMinimumHealthyHosts } deriving (Show, Eq) instance ToJSON CodeDeployDeploymentConfig where @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentConfig' containing required fields --- | as arguments. +-- as arguments. codeDeployDeploymentConfig :: CodeDeployDeploymentConfig codeDeployDeploymentConfig = @@ -52,5 +52,5 @@ cddcDeploymentConfigName = lens _codeDeployDeploymentConfigDeploymentConfigName (\s a -> s { _codeDeployDeploymentConfigDeploymentConfigName = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codedeploy-deploymentconfig.html#cfn-codedeploy-deploymentconfig-minimumhealthyhosts -cddcMinimumHealthyHosts :: Lens' CodeDeployDeploymentConfig (Maybe (Val Text)) +cddcMinimumHealthyHosts :: Lens' CodeDeployDeploymentConfig (Maybe CodeDeployDeploymentConfigMinimumHealthyHosts) cddcMinimumHealthyHosts = lens _codeDeployDeploymentConfigMinimumHealthyHosts (\s a -> s { _codeDeployDeploymentConfigMinimumHealthyHosts = a }) diff --git a/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs b/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs --- a/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs +++ b/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs @@ -13,11 +13,11 @@ import Stratosphere.Values import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupDeployment -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEc2TagFilter -import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesInstanceTagFilter +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter +import Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter -- | Full data type definition for CodeDeployDeploymentGroup. See --- | 'codeDeployDeploymentGroup' for a more convenient constructor. +-- 'codeDeployDeploymentGroup' for a more convenient constructor. data CodeDeployDeploymentGroup = CodeDeployDeploymentGroup { _codeDeployDeploymentGroupApplicationName :: Val Text @@ -25,8 +25,8 @@ , _codeDeployDeploymentGroupDeployment :: Maybe CodeDeployDeploymentGroupDeployment , _codeDeployDeploymentGroupDeploymentConfigName :: Maybe (Val Text) , _codeDeployDeploymentGroupDeploymentGroupName :: Maybe (Val Text) - , _codeDeployDeploymentGroupEc2TagFilters :: Maybe [CodeDeployDeploymentGroupEc2TagFilter] - , _codeDeployDeploymentGroupOnPremisesInstanceTagFilters :: Maybe [CodeDeployDeploymentGroupOnPremisesInstanceTagFilter] + , _codeDeployDeploymentGroupEc2TagFilters :: Maybe [CodeDeployDeploymentGroupEC2TagFilter] + , _codeDeployDeploymentGroupOnPremisesInstanceTagFilters :: Maybe [CodeDeployDeploymentGroupTagFilter] , _codeDeployDeploymentGroupServiceRoleArn :: Val Text } deriving (Show, Eq) @@ -58,7 +58,7 @@ parseJSON _ = mempty -- | Constructor for 'CodeDeployDeploymentGroup' containing required fields as --- | arguments. +-- arguments. codeDeployDeploymentGroup :: Val Text -- ^ 'cddgApplicationName' -> Val Text -- ^ 'cddgServiceRoleArn' @@ -96,11 +96,11 @@ cddgDeploymentGroupName = lens _codeDeployDeploymentGroupDeploymentGroupName (\s a -> s { _codeDeployDeploymentGroupDeploymentGroupName = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codedeploy-deploymentgroup.html#cfn-codedeploy-deploymentgroup-ec2tagfilters -cddgEc2TagFilters :: Lens' CodeDeployDeploymentGroup (Maybe [CodeDeployDeploymentGroupEc2TagFilter]) +cddgEc2TagFilters :: Lens' CodeDeployDeploymentGroup (Maybe [CodeDeployDeploymentGroupEC2TagFilter]) cddgEc2TagFilters = lens _codeDeployDeploymentGroupEc2TagFilters (\s a -> s { _codeDeployDeploymentGroupEc2TagFilters = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codedeploy-deploymentgroup.html#cfn-codedeploy-deploymentgroup-onpremisesinstancetagfilters -cddgOnPremisesInstanceTagFilters :: Lens' CodeDeployDeploymentGroup (Maybe [CodeDeployDeploymentGroupOnPremisesInstanceTagFilter]) +cddgOnPremisesInstanceTagFilters :: Lens' CodeDeployDeploymentGroup (Maybe [CodeDeployDeploymentGroupTagFilter]) cddgOnPremisesInstanceTagFilters = lens _codeDeployDeploymentGroupOnPremisesInstanceTagFilters (\s a -> s { _codeDeployDeploymentGroupOnPremisesInstanceTagFilters = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-codedeploy-deploymentgroup.html#cfn-codedeploy-deploymentgroup-servicerolearn diff --git a/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs b/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs --- a/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs +++ b/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.CodePipelineCustomActionTypeSettings -- | Full data type definition for CodePipelineCustomActionType. See --- | 'codePipelineCustomActionType' for a more convenient constructor. +-- 'codePipelineCustomActionType' for a more convenient constructor. data CodePipelineCustomActionType = CodePipelineCustomActionType { _codePipelineCustomActionTypeCategory :: Val Text @@ -55,7 +55,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelineCustomActionType' containing required fields --- | as arguments. +-- as arguments. codePipelineCustomActionType :: Val Text -- ^ 'cpcatCategory' -> CodePipelineCustomActionTypeArtifactDetails -- ^ 'cpcatInputArtifactDetails' diff --git a/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs b/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs --- a/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs +++ b/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.CodePipelinePipelineStageDeclaration -- | Full data type definition for CodePipelinePipeline. See --- | 'codePipelinePipeline' for a more convenient constructor. +-- 'codePipelinePipeline' for a more convenient constructor. data CodePipelinePipeline = CodePipelinePipeline { _codePipelinePipelineArtifactStore :: CodePipelinePipelineArtifactStore @@ -52,7 +52,7 @@ parseJSON _ = mempty -- | Constructor for 'CodePipelinePipeline' containing required fields as --- | arguments. +-- arguments. codePipelinePipeline :: CodePipelinePipelineArtifactStore -- ^ 'cppArtifactStore' -> Val Text -- ^ 'cppRoleArn' diff --git a/library-gen/Stratosphere/Resources/ConfigConfigRule.hs b/library-gen/Stratosphere/Resources/ConfigConfigRule.hs --- a/library-gen/Stratosphere/Resources/ConfigConfigRule.hs +++ b/library-gen/Stratosphere/Resources/ConfigConfigRule.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ConfigConfigRuleSource -- | Full data type definition for ConfigConfigRule. See 'configConfigRule' --- | for a more convenient constructor. +-- for a more convenient constructor. data ConfigConfigRule = ConfigConfigRule { _configConfigRuleConfigRuleName :: Maybe (Val Text) @@ -51,7 +51,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigRule' containing required fields as --- | arguments. +-- arguments. configConfigRule :: ConfigConfigRuleSource -- ^ 'ccrSource' -> ConfigConfigRule diff --git a/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs b/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs --- a/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs +++ b/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ConfigConfigurationRecorderRecordingGroup -- | Full data type definition for ConfigConfigurationRecorder. See --- | 'configConfigurationRecorder' for a more convenient constructor. +-- 'configConfigurationRecorder' for a more convenient constructor. data ConfigConfigurationRecorder = ConfigConfigurationRecorder { _configConfigurationRecorderName :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigConfigurationRecorder' containing required fields --- | as arguments. +-- as arguments. configConfigurationRecorder :: Val Text -- ^ 'ccrRoleArn' -> ConfigConfigurationRecorder diff --git a/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs b/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs --- a/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs +++ b/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ConfigDeliveryChannelConfigSnapshotDeliveryProperties -- | Full data type definition for ConfigDeliveryChannel. See --- | 'configDeliveryChannel' for a more convenient constructor. +-- 'configDeliveryChannel' for a more convenient constructor. data ConfigDeliveryChannel = ConfigDeliveryChannel { _configDeliveryChannelConfigSnapshotDeliveryProperties :: Maybe ConfigDeliveryChannelConfigSnapshotDeliveryProperties @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'ConfigDeliveryChannel' containing required fields as --- | arguments. +-- arguments. configDeliveryChannel :: Val Text -- ^ 'cdcS3BucketName' -> ConfigDeliveryChannel diff --git a/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs b/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs --- a/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs +++ b/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.DataPipelinePipelinePipelineTag -- | Full data type definition for DataPipelinePipeline. See --- | 'dataPipelinePipeline' for a more convenient constructor. +-- 'dataPipelinePipeline' for a more convenient constructor. data DataPipelinePipeline = DataPipelinePipeline { _dataPipelinePipelineActivate :: Maybe (Val Bool') @@ -56,7 +56,7 @@ parseJSON _ = mempty -- | Constructor for 'DataPipelinePipeline' containing required fields as --- | arguments. +-- arguments. dataPipelinePipeline :: Val Text -- ^ 'dppName' -> [DataPipelinePipelineParameterObject] -- ^ 'dppParameterObjects' diff --git a/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs b/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs --- a/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs +++ b/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.DirectoryServiceMicrosoftADVpcSettings -- | Full data type definition for DirectoryServiceMicrosoftAD. See --- | 'directoryServiceMicrosoftAD' for a more convenient constructor. +-- 'directoryServiceMicrosoftAD' for a more convenient constructor. data DirectoryServiceMicrosoftAD = DirectoryServiceMicrosoftAD { _directoryServiceMicrosoftADCreateAlias :: Maybe (Val Bool') @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'DirectoryServiceMicrosoftAD' containing required fields --- | as arguments. +-- as arguments. directoryServiceMicrosoftAD :: Val Text -- ^ 'dsmadName' -> Val Text -- ^ 'dsmadPassword' diff --git a/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs b/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs --- a/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs +++ b/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.DirectoryServiceSimpleADVpcSettings -- | Full data type definition for DirectoryServiceSimpleAD. See --- | 'directoryServiceSimpleAD' for a more convenient constructor. +-- 'directoryServiceSimpleAD' for a more convenient constructor. data DirectoryServiceSimpleAD = DirectoryServiceSimpleAD { _directoryServiceSimpleADCreateAlias :: Maybe (Val Bool') @@ -56,7 +56,7 @@ parseJSON _ = mempty -- | Constructor for 'DirectoryServiceSimpleAD' containing required fields as --- | arguments. +-- arguments. directoryServiceSimpleAD :: Val Text -- ^ 'dssadName' -> Val Text -- ^ 'dssadPassword' diff --git a/library-gen/Stratosphere/Resources/DynamoDBTable.hs b/library-gen/Stratosphere/Resources/DynamoDBTable.hs --- a/library-gen/Stratosphere/Resources/DynamoDBTable.hs +++ b/library-gen/Stratosphere/Resources/DynamoDBTable.hs @@ -20,7 +20,7 @@ import Stratosphere.ResourceProperties.DynamoDBTableStreamSpecification -- | Full data type definition for DynamoDBTable. See 'dynamoDBTable' for a --- | more convenient constructor. +-- more convenient constructor. data DynamoDBTable = DynamoDBTable { _dynamoDBTableAttributeDefinitions :: [DynamoDBTableAttributeDefinition] diff --git a/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs b/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs --- a/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs +++ b/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2CustomerGateway. See --- | 'ec2CustomerGateway' for a more convenient constructor. +-- 'ec2CustomerGateway' for a more convenient constructor. data EC2CustomerGateway = EC2CustomerGateway { _eC2CustomerGatewayBgpAsn :: Val Integer' @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2CustomerGateway' containing required fields as --- | arguments. +-- arguments. ec2CustomerGateway :: Val Integer' -- ^ 'eccgBgpAsn' -> Val Text -- ^ 'eccgIpAddress' diff --git a/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs b/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs --- a/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs +++ b/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2DHCPOptions. See 'ec2DHCPOptions' for a --- | more convenient constructor. +-- more convenient constructor. data EC2DHCPOptions = EC2DHCPOptions { _eC2DHCPOptionsDomainName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2EIP.hs b/library-gen/Stratosphere/Resources/EC2EIP.hs --- a/library-gen/Stratosphere/Resources/EC2EIP.hs +++ b/library-gen/Stratosphere/Resources/EC2EIP.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2EIP. See 'ec2EIP' for a more convenient --- | constructor. +-- constructor. data EC2EIP = EC2EIP { _eC2EIPDomain :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs b/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs --- a/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs +++ b/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2EIPAssociation. See 'ec2EIPAssociation' --- | for a more convenient constructor. +-- for a more convenient constructor. data EC2EIPAssociation = EC2EIPAssociation { _eC2EIPAssociationAllocationId :: Maybe (Val Text) @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2EIPAssociation' containing required fields as --- | arguments. +-- arguments. ec2EIPAssociation :: EC2EIPAssociation ec2EIPAssociation = diff --git a/library-gen/Stratosphere/Resources/EC2FlowLog.hs b/library-gen/Stratosphere/Resources/EC2FlowLog.hs --- a/library-gen/Stratosphere/Resources/EC2FlowLog.hs +++ b/library-gen/Stratosphere/Resources/EC2FlowLog.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2FlowLog. See 'ec2FlowLog' for a more --- | convenient constructor. +-- convenient constructor. data EC2FlowLog = EC2FlowLog { _eC2FlowLogDeliverLogsPermissionArn :: Val Text diff --git a/library-gen/Stratosphere/Resources/EC2Host.hs b/library-gen/Stratosphere/Resources/EC2Host.hs --- a/library-gen/Stratosphere/Resources/EC2Host.hs +++ b/library-gen/Stratosphere/Resources/EC2Host.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2Host. See 'ec2Host' for a more --- | convenient constructor. +-- convenient constructor. data EC2Host = EC2Host { _eC2HostAutoPlacement :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2Instance.hs b/library-gen/Stratosphere/Resources/EC2Instance.hs --- a/library-gen/Stratosphere/Resources/EC2Instance.hs +++ b/library-gen/Stratosphere/Resources/EC2Instance.hs @@ -20,7 +20,7 @@ import Stratosphere.ResourceProperties.EC2InstanceVolume -- | Full data type definition for EC2Instance. See 'ec2Instance' for a more --- | convenient constructor. +-- convenient constructor. data EC2Instance = EC2Instance { _eC2InstanceAdditionalInfo :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2InternetGateway.hs b/library-gen/Stratosphere/Resources/EC2InternetGateway.hs --- a/library-gen/Stratosphere/Resources/EC2InternetGateway.hs +++ b/library-gen/Stratosphere/Resources/EC2InternetGateway.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2InternetGateway. See --- | 'ec2InternetGateway' for a more convenient constructor. +-- 'ec2InternetGateway' for a more convenient constructor. data EC2InternetGateway = EC2InternetGateway { _eC2InternetGatewayTags :: Maybe [Tag] @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2InternetGateway' containing required fields as --- | arguments. +-- arguments. ec2InternetGateway :: EC2InternetGateway ec2InternetGateway = diff --git a/library-gen/Stratosphere/Resources/EC2NatGateway.hs b/library-gen/Stratosphere/Resources/EC2NatGateway.hs --- a/library-gen/Stratosphere/Resources/EC2NatGateway.hs +++ b/library-gen/Stratosphere/Resources/EC2NatGateway.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2NatGateway. See 'ec2NatGateway' for a --- | more convenient constructor. +-- more convenient constructor. data EC2NatGateway = EC2NatGateway { _eC2NatGatewayAllocationId :: Val Text diff --git a/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs b/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs --- a/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs +++ b/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2NetworkAcl. See 'ec2NetworkAcl' for a --- | more convenient constructor. +-- more convenient constructor. data EC2NetworkAcl = EC2NetworkAcl { _eC2NetworkAclTags :: Maybe [Tag] diff --git a/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs b/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs --- a/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs +++ b/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EC2NetworkAclEntryPortRange -- | Full data type definition for EC2NetworkAclEntry. See --- | 'ec2NetworkAclEntry' for a more convenient constructor. +-- 'ec2NetworkAclEntry' for a more convenient constructor. data EC2NetworkAclEntry = EC2NetworkAclEntry { _eC2NetworkAclEntryCidrBlock :: Val Text @@ -60,7 +60,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkAclEntry' containing required fields as --- | arguments. +-- arguments. ec2NetworkAclEntry :: Val Text -- ^ 'ecnaeCidrBlock' -> Val Text -- ^ 'ecnaeNetworkAclId' diff --git a/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs b/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs --- a/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs +++ b/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2NetworkInterface. See --- | 'ec2NetworkInterface' for a more convenient constructor. +-- 'ec2NetworkInterface' for a more convenient constructor. data EC2NetworkInterface = EC2NetworkInterface { _eC2NetworkInterfaceDescription :: Maybe (Val Text) @@ -64,7 +64,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkInterface' containing required fields as --- | arguments. +-- arguments. ec2NetworkInterface :: Val Text -- ^ 'ecniSubnetId' -> EC2NetworkInterface diff --git a/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs b/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs --- a/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs +++ b/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2NetworkInterfaceAttachment. See --- | 'ec2NetworkInterfaceAttachment' for a more convenient constructor. +-- 'ec2NetworkInterfaceAttachment' for a more convenient constructor. data EC2NetworkInterfaceAttachment = EC2NetworkInterfaceAttachment { _eC2NetworkInterfaceAttachmentDeleteOnTermination :: Maybe (Val Bool') @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2NetworkInterfaceAttachment' containing required --- | fields as arguments. +-- fields as arguments. ec2NetworkInterfaceAttachment :: Val Text -- ^ 'ecniaDeviceIndex' -> Val Text -- ^ 'ecniaInstanceId' diff --git a/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs b/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs --- a/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs +++ b/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2PlacementGroup. See 'ec2PlacementGroup' --- | for a more convenient constructor. +-- for a more convenient constructor. data EC2PlacementGroup = EC2PlacementGroup { _eC2PlacementGroupStrategy :: Maybe (Val Text) @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2PlacementGroup' containing required fields as --- | arguments. +-- arguments. ec2PlacementGroup :: EC2PlacementGroup ec2PlacementGroup = diff --git a/library-gen/Stratosphere/Resources/EC2Route.hs b/library-gen/Stratosphere/Resources/EC2Route.hs --- a/library-gen/Stratosphere/Resources/EC2Route.hs +++ b/library-gen/Stratosphere/Resources/EC2Route.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2Route. See 'ec2Route' for a more --- | convenient constructor. +-- convenient constructor. data EC2Route = EC2Route { _eC2RouteDestinationCidrBlock :: Val Text diff --git a/library-gen/Stratosphere/Resources/EC2RouteTable.hs b/library-gen/Stratosphere/Resources/EC2RouteTable.hs --- a/library-gen/Stratosphere/Resources/EC2RouteTable.hs +++ b/library-gen/Stratosphere/Resources/EC2RouteTable.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2RouteTable. See 'ec2RouteTable' for a --- | more convenient constructor. +-- more convenient constructor. data EC2RouteTable = EC2RouteTable { _eC2RouteTableTags :: Maybe [Tag] diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs --- a/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs +++ b/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2SecurityGroup. See 'ec2SecurityGroup' --- | for a more convenient constructor. +-- for a more convenient constructor. data EC2SecurityGroup = EC2SecurityGroup { _eC2SecurityGroupGroupDescription :: Val Text @@ -48,7 +48,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SecurityGroup' containing required fields as --- | arguments. +-- arguments. ec2SecurityGroup :: Val Text -- ^ 'ecsgGroupDescription' -> EC2SecurityGroup diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs --- a/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs +++ b/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SecurityGroupEgress. See --- | 'ec2SecurityGroupEgress' for a more convenient constructor. +-- 'ec2SecurityGroupEgress' for a more convenient constructor. data EC2SecurityGroupEgress = EC2SecurityGroupEgress { _eC2SecurityGroupEgressCidrIp :: Maybe (Val Text) @@ -56,7 +56,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SecurityGroupEgress' containing required fields as --- | arguments. +-- arguments. ec2SecurityGroupEgress :: Val Text -- ^ 'ecsgeGroupId' -> Val Text -- ^ 'ecsgeIpProtocol' diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs --- a/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs +++ b/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SecurityGroupIngress. See --- | 'ec2SecurityGroupIngress' for a more convenient constructor. +-- 'ec2SecurityGroupIngress' for a more convenient constructor. data EC2SecurityGroupIngress = EC2SecurityGroupIngress { _eC2SecurityGroupIngressCidrIp :: Maybe (Val Text) @@ -62,7 +62,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SecurityGroupIngress' containing required fields as --- | arguments. +-- arguments. ec2SecurityGroupIngress :: Val Text -- ^ 'ecsgiIpProtocol' -> EC2SecurityGroupIngress diff --git a/library-gen/Stratosphere/Resources/EC2SpotFleet.hs b/library-gen/Stratosphere/Resources/EC2SpotFleet.hs --- a/library-gen/Stratosphere/Resources/EC2SpotFleet.hs +++ b/library-gen/Stratosphere/Resources/EC2SpotFleet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EC2SpotFleetSpotFleetRequestConfigData -- | Full data type definition for EC2SpotFleet. See 'ec2SpotFleet' for a more --- | convenient constructor. +-- convenient constructor. data EC2SpotFleet = EC2SpotFleet { _eC2SpotFleetSpotFleetRequestConfigData :: EC2SpotFleetSpotFleetRequestConfigData diff --git a/library-gen/Stratosphere/Resources/EC2Subnet.hs b/library-gen/Stratosphere/Resources/EC2Subnet.hs --- a/library-gen/Stratosphere/Resources/EC2Subnet.hs +++ b/library-gen/Stratosphere/Resources/EC2Subnet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2Subnet. See 'ec2Subnet' for a more --- | convenient constructor. +-- convenient constructor. data EC2Subnet = EC2Subnet { _eC2SubnetAvailabilityZone :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs b/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs --- a/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs +++ b/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SubnetCidrBlock. See --- | 'ec2SubnetCidrBlock' for a more convenient constructor. +-- 'ec2SubnetCidrBlock' for a more convenient constructor. data EC2SubnetCidrBlock = EC2SubnetCidrBlock { _eC2SubnetCidrBlockIpv6CidrBlock :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SubnetCidrBlock' containing required fields as --- | arguments. +-- arguments. ec2SubnetCidrBlock :: Val Text -- ^ 'ecscbIpv6CidrBlock' -> Val Text -- ^ 'ecscbSubnetId' diff --git a/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs b/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs --- a/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs +++ b/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SubnetNetworkAclAssociation. See --- | 'ec2SubnetNetworkAclAssociation' for a more convenient constructor. +-- 'ec2SubnetNetworkAclAssociation' for a more convenient constructor. data EC2SubnetNetworkAclAssociation = EC2SubnetNetworkAclAssociation { _eC2SubnetNetworkAclAssociationNetworkAclId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SubnetNetworkAclAssociation' containing required --- | fields as arguments. +-- fields as arguments. ec2SubnetNetworkAclAssociation :: Val Text -- ^ 'ecsnaaNetworkAclId' -> Val Text -- ^ 'ecsnaaSubnetId' diff --git a/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs b/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs --- a/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs +++ b/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2SubnetRouteTableAssociation. See --- | 'ec2SubnetRouteTableAssociation' for a more convenient constructor. +-- 'ec2SubnetRouteTableAssociation' for a more convenient constructor. data EC2SubnetRouteTableAssociation = EC2SubnetRouteTableAssociation { _eC2SubnetRouteTableAssociationRouteTableId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2SubnetRouteTableAssociation' containing required --- | fields as arguments. +-- fields as arguments. ec2SubnetRouteTableAssociation :: Val Text -- ^ 'ecsrtaRouteTableId' -> Val Text -- ^ 'ecsrtaSubnetId' diff --git a/library-gen/Stratosphere/Resources/EC2VPC.hs b/library-gen/Stratosphere/Resources/EC2VPC.hs --- a/library-gen/Stratosphere/Resources/EC2VPC.hs +++ b/library-gen/Stratosphere/Resources/EC2VPC.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2VPC. See 'ec2VPC' for a more convenient --- | constructor. +-- constructor. data EC2VPC = EC2VPC { _eC2VPCCidrBlock :: Val Text diff --git a/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs b/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs --- a/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs +++ b/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPCCidrBlock. See 'ec2VPCCidrBlock' for --- | a more convenient constructor. +-- a more convenient constructor. data EC2VPCCidrBlock = EC2VPCCidrBlock { _eC2VPCCidrBlockAmazonProvidedIpv6CidrBlock :: Maybe (Val Bool') @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPCCidrBlock' containing required fields as --- | arguments. +-- arguments. ec2VPCCidrBlock :: Val Text -- ^ 'ecvpccbVpcId' -> EC2VPCCidrBlock diff --git a/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs b/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs --- a/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs +++ b/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPCDHCPOptionsAssociation. See --- | 'ec2VPCDHCPOptionsAssociation' for a more convenient constructor. +-- 'ec2VPCDHCPOptionsAssociation' for a more convenient constructor. data EC2VPCDHCPOptionsAssociation = EC2VPCDHCPOptionsAssociation { _eC2VPCDHCPOptionsAssociationDhcpOptionsId :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPCDHCPOptionsAssociation' containing required fields --- | as arguments. +-- as arguments. ec2VPCDHCPOptionsAssociation :: Val Text -- ^ 'ecvpcdhcpoaDhcpOptionsId' -> Val Text -- ^ 'ecvpcdhcpoaVpcId' diff --git a/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs b/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs --- a/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs +++ b/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPCEndpoint. See 'ec2VPCEndpoint' for a --- | more convenient constructor. +-- more convenient constructor. data EC2VPCEndpoint = EC2VPCEndpoint { _eC2VPCEndpointPolicyDocument :: Maybe Object diff --git a/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs b/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs --- a/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs +++ b/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPCGatewayAttachment. See --- | 'ec2VPCGatewayAttachment' for a more convenient constructor. +-- 'ec2VPCGatewayAttachment' for a more convenient constructor. data EC2VPCGatewayAttachment = EC2VPCGatewayAttachment { _eC2VPCGatewayAttachmentInternetGatewayId :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPCGatewayAttachment' containing required fields as --- | arguments. +-- arguments. ec2VPCGatewayAttachment :: Val Text -- ^ 'ecvpcgaVpcId' -> EC2VPCGatewayAttachment diff --git a/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs b/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs --- a/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs +++ b/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs @@ -15,10 +15,12 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2VPCPeeringConnection. See --- | 'ec2VPCPeeringConnection' for a more convenient constructor. +-- 'ec2VPCPeeringConnection' for a more convenient constructor. data EC2VPCPeeringConnection = EC2VPCPeeringConnection - { _eC2VPCPeeringConnectionPeerVpcId :: Val Text + { _eC2VPCPeeringConnectionPeerOwnerId :: Maybe (Val Text) + , _eC2VPCPeeringConnectionPeerRoleArn :: Maybe (Val Text) + , _eC2VPCPeeringConnectionPeerVpcId :: Val Text , _eC2VPCPeeringConnectionTags :: Maybe [Tag] , _eC2VPCPeeringConnectionVpcId :: Val Text } deriving (Show, Eq) @@ -27,7 +29,9 @@ toJSON EC2VPCPeeringConnection{..} = object $ catMaybes - [ Just ("PeerVpcId" .= _eC2VPCPeeringConnectionPeerVpcId) + [ ("PeerOwnerId" .=) <$> _eC2VPCPeeringConnectionPeerOwnerId + , ("PeerRoleArn" .=) <$> _eC2VPCPeeringConnectionPeerRoleArn + , Just ("PeerVpcId" .= _eC2VPCPeeringConnectionPeerVpcId) , ("Tags" .=) <$> _eC2VPCPeeringConnectionTags , Just ("VpcId" .= _eC2VPCPeeringConnectionVpcId) ] @@ -35,23 +39,35 @@ instance FromJSON EC2VPCPeeringConnection where parseJSON (Object obj) = EC2VPCPeeringConnection <$> + obj .:? "PeerOwnerId" <*> + obj .:? "PeerRoleArn" <*> obj .: "PeerVpcId" <*> obj .:? "Tags" <*> obj .: "VpcId" parseJSON _ = mempty -- | Constructor for 'EC2VPCPeeringConnection' containing required fields as --- | arguments. +-- arguments. ec2VPCPeeringConnection :: Val Text -- ^ 'ecvpcpcPeerVpcId' -> Val Text -- ^ 'ecvpcpcVpcId' -> EC2VPCPeeringConnection ec2VPCPeeringConnection peerVpcIdarg vpcIdarg = EC2VPCPeeringConnection - { _eC2VPCPeeringConnectionPeerVpcId = peerVpcIdarg + { _eC2VPCPeeringConnectionPeerOwnerId = Nothing + , _eC2VPCPeeringConnectionPeerRoleArn = Nothing + , _eC2VPCPeeringConnectionPeerVpcId = peerVpcIdarg , _eC2VPCPeeringConnectionTags = Nothing , _eC2VPCPeeringConnectionVpcId = vpcIdarg } + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpcpeeringconnection.html#cfn-ec2-vpcpeeringconnection-peerownerid +ecvpcpcPeerOwnerId :: Lens' EC2VPCPeeringConnection (Maybe (Val Text)) +ecvpcpcPeerOwnerId = lens _eC2VPCPeeringConnectionPeerOwnerId (\s a -> s { _eC2VPCPeeringConnectionPeerOwnerId = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpcpeeringconnection.html#cfn-ec2-vpcpeeringconnection-peerrolearn +ecvpcpcPeerRoleArn :: Lens' EC2VPCPeeringConnection (Maybe (Val Text)) +ecvpcpcPeerRoleArn = lens _eC2VPCPeeringConnectionPeerRoleArn (\s a -> s { _eC2VPCPeeringConnectionPeerRoleArn = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpcpeeringconnection.html#cfn-ec2-vpcpeeringconnection-peervpcid ecvpcpcPeerVpcId :: Lens' EC2VPCPeeringConnection (Val Text) diff --git a/library-gen/Stratosphere/Resources/EC2VPNConnection.hs b/library-gen/Stratosphere/Resources/EC2VPNConnection.hs --- a/library-gen/Stratosphere/Resources/EC2VPNConnection.hs +++ b/library-gen/Stratosphere/Resources/EC2VPNConnection.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2VPNConnection. See 'ec2VPNConnection' --- | for a more convenient constructor. +-- for a more convenient constructor. data EC2VPNConnection = EC2VPNConnection { _eC2VPNConnectionCustomerGatewayId :: Val Text @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPNConnection' containing required fields as --- | arguments. +-- arguments. ec2VPNConnection :: Val Text -- ^ 'ecvpncCustomerGatewayId' -> Val Text -- ^ 'ecvpncType' diff --git a/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs b/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs --- a/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs +++ b/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPNConnectionRoute. See --- | 'ec2VPNConnectionRoute' for a more convenient constructor. +-- 'ec2VPNConnectionRoute' for a more convenient constructor. data EC2VPNConnectionRoute = EC2VPNConnectionRoute { _eC2VPNConnectionRouteDestinationCidrBlock :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPNConnectionRoute' containing required fields as --- | arguments. +-- arguments. ec2VPNConnectionRoute :: Val Text -- ^ 'ecvpncrDestinationCidrBlock' -> Val Text -- ^ 'ecvpncrVpnConnectionId' diff --git a/library-gen/Stratosphere/Resources/EC2VPNGateway.hs b/library-gen/Stratosphere/Resources/EC2VPNGateway.hs --- a/library-gen/Stratosphere/Resources/EC2VPNGateway.hs +++ b/library-gen/Stratosphere/Resources/EC2VPNGateway.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2VPNGateway. See 'ec2VPNGateway' for a --- | more convenient constructor. +-- more convenient constructor. data EC2VPNGateway = EC2VPNGateway { _eC2VPNGatewayTags :: Maybe [Tag] diff --git a/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs b/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs --- a/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs +++ b/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VPNGatewayRoutePropagation. See --- | 'ec2VPNGatewayRoutePropagation' for a more convenient constructor. +-- 'ec2VPNGatewayRoutePropagation' for a more convenient constructor. data EC2VPNGatewayRoutePropagation = EC2VPNGatewayRoutePropagation { _eC2VPNGatewayRoutePropagationRouteTableIds :: [Val Text] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VPNGatewayRoutePropagation' containing required --- | fields as arguments. +-- fields as arguments. ec2VPNGatewayRoutePropagation :: [Val Text] -- ^ 'ecvpngrpRouteTableIds' -> Val Text -- ^ 'ecvpngrpVpnGatewayId' diff --git a/library-gen/Stratosphere/Resources/EC2Volume.hs b/library-gen/Stratosphere/Resources/EC2Volume.hs --- a/library-gen/Stratosphere/Resources/EC2Volume.hs +++ b/library-gen/Stratosphere/Resources/EC2Volume.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EC2Volume. See 'ec2Volume' for a more --- | convenient constructor. +-- convenient constructor. data EC2Volume = EC2Volume { _eC2VolumeAutoEnableIO :: Maybe (Val Bool') diff --git a/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs b/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs --- a/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs +++ b/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EC2VolumeAttachment. See --- | 'ec2VolumeAttachment' for a more convenient constructor. +-- 'ec2VolumeAttachment' for a more convenient constructor. data EC2VolumeAttachment = EC2VolumeAttachment { _eC2VolumeAttachmentDevice :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'EC2VolumeAttachment' containing required fields as --- | arguments. +-- arguments. ec2VolumeAttachment :: Val Text -- ^ 'ecvaDevice' -> Val Text -- ^ 'ecvaInstanceId' diff --git a/library-gen/Stratosphere/Resources/ECRRepository.hs b/library-gen/Stratosphere/Resources/ECRRepository.hs --- a/library-gen/Stratosphere/Resources/ECRRepository.hs +++ b/library-gen/Stratosphere/Resources/ECRRepository.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECRRepository. See 'ecrRepository' for a --- | more convenient constructor. +-- more convenient constructor. data ECRRepository = ECRRepository { _eCRRepositoryRepositoryName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/ECSCluster.hs b/library-gen/Stratosphere/Resources/ECSCluster.hs --- a/library-gen/Stratosphere/Resources/ECSCluster.hs +++ b/library-gen/Stratosphere/Resources/ECSCluster.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ECSCluster. See 'ecsCluster' for a more --- | convenient constructor. +-- convenient constructor. data ECSCluster = ECSCluster { _eCSClusterClusterName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/ECSService.hs b/library-gen/Stratosphere/Resources/ECSService.hs --- a/library-gen/Stratosphere/Resources/ECSService.hs +++ b/library-gen/Stratosphere/Resources/ECSService.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ECSServiceLoadBalancer -- | Full data type definition for ECSService. See 'ecsService' for a more --- | convenient constructor. +-- convenient constructor. data ECSService = ECSService { _eCSServiceCluster :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs b/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs --- a/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs +++ b/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ECSTaskDefinitionVolume -- | Full data type definition for ECSTaskDefinition. See 'ecsTaskDefinition' --- | for a more convenient constructor. +-- for a more convenient constructor. data ECSTaskDefinition = ECSTaskDefinition { _eCSTaskDefinitionContainerDefinitions :: Maybe [ECSTaskDefinitionContainerDefinition] @@ -48,7 +48,7 @@ parseJSON _ = mempty -- | Constructor for 'ECSTaskDefinition' containing required fields as --- | arguments. +-- arguments. ecsTaskDefinition :: ECSTaskDefinition ecsTaskDefinition = diff --git a/library-gen/Stratosphere/Resources/EFSFileSystem.hs b/library-gen/Stratosphere/Resources/EFSFileSystem.hs --- a/library-gen/Stratosphere/Resources/EFSFileSystem.hs +++ b/library-gen/Stratosphere/Resources/EFSFileSystem.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EFSFileSystemElasticFileSystemTag -- | Full data type definition for EFSFileSystem. See 'efsFileSystem' for a --- | more convenient constructor. +-- more convenient constructor. data EFSFileSystem = EFSFileSystem { _eFSFileSystemFileSystemTags :: Maybe [EFSFileSystemElasticFileSystemTag] diff --git a/library-gen/Stratosphere/Resources/EFSMountTarget.hs b/library-gen/Stratosphere/Resources/EFSMountTarget.hs --- a/library-gen/Stratosphere/Resources/EFSMountTarget.hs +++ b/library-gen/Stratosphere/Resources/EFSMountTarget.hs @@ -15,7 +15,7 @@ -- | Full data type definition for EFSMountTarget. See 'efsMountTarget' for a --- | more convenient constructor. +-- more convenient constructor. data EFSMountTarget = EFSMountTarget { _eFSMountTargetFileSystemId :: Val Text diff --git a/library-gen/Stratosphere/Resources/EMRCluster.hs b/library-gen/Stratosphere/Resources/EMRCluster.hs --- a/library-gen/Stratosphere/Resources/EMRCluster.hs +++ b/library-gen/Stratosphere/Resources/EMRCluster.hs @@ -19,7 +19,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for EMRCluster. See 'emrCluster' for a more --- | convenient constructor. +-- convenient constructor. data EMRCluster = EMRCluster { _eMRClusterAdditionalInfo :: Maybe Object diff --git a/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs b/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs --- a/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs +++ b/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EMRInstanceGroupConfigEbsConfiguration -- | Full data type definition for EMRInstanceGroupConfig. See --- | 'emrInstanceGroupConfig' for a more convenient constructor. +-- 'emrInstanceGroupConfig' for a more convenient constructor. data EMRInstanceGroupConfig = EMRInstanceGroupConfig { _eMRInstanceGroupConfigBidPrice :: Maybe (Val Text) @@ -60,7 +60,7 @@ parseJSON _ = mempty -- | Constructor for 'EMRInstanceGroupConfig' containing required fields as --- | arguments. +-- arguments. emrInstanceGroupConfig :: Val Integer' -- ^ 'emrigcInstanceCount' -> Val Text -- ^ 'emrigcInstanceRole' diff --git a/library-gen/Stratosphere/Resources/EMRStep.hs b/library-gen/Stratosphere/Resources/EMRStep.hs --- a/library-gen/Stratosphere/Resources/EMRStep.hs +++ b/library-gen/Stratosphere/Resources/EMRStep.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.EMRStepHadoopJarStepConfig -- | Full data type definition for EMRStep. See 'emrStep' for a more --- | convenient constructor. +-- convenient constructor. data EMRStep = EMRStep { _eMRStepActionOnFailure :: Val Text diff --git a/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs b/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for ElastiCacheCacheCluster. See --- | 'elastiCacheCacheCluster' for a more convenient constructor. +-- 'elastiCacheCacheCluster' for a more convenient constructor. data ElastiCacheCacheCluster = ElastiCacheCacheCluster { _elastiCacheCacheClusterAZMode :: Maybe (Val Text) @@ -95,7 +95,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheCacheCluster' containing required fields as --- | arguments. +-- arguments. elastiCacheCacheCluster :: Val Text -- ^ 'ecccCacheNodeType' -> Val Text -- ^ 'ecccEngine' diff --git a/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElastiCacheParameterGroup. See --- | 'elastiCacheParameterGroup' for a more convenient constructor. +-- 'elastiCacheParameterGroup' for a more convenient constructor. data ElastiCacheParameterGroup = ElastiCacheParameterGroup { _elastiCacheParameterGroupCacheParameterGroupFamily :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheParameterGroup' containing required fields as --- | arguments. +-- arguments. elastiCacheParameterGroup :: Val Text -- ^ 'ecpgCacheParameterGroupFamily' -> Val Text -- ^ 'ecpgDescription' diff --git a/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for ElastiCacheReplicationGroup. See --- | 'elastiCacheReplicationGroup' for a more convenient constructor. +-- 'elastiCacheReplicationGroup' for a more convenient constructor. data ElastiCacheReplicationGroup = ElastiCacheReplicationGroup { _elastiCacheReplicationGroupAutoMinorVersionUpgrade :: Maybe (Val Bool') @@ -111,7 +111,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheReplicationGroup' containing required fields --- | as arguments. +-- as arguments. elastiCacheReplicationGroup :: Val Text -- ^ 'ecrgReplicationGroupDescription' -> ElastiCacheReplicationGroup diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElastiCacheSecurityGroup. See --- | 'elastiCacheSecurityGroup' for a more convenient constructor. +-- 'elastiCacheSecurityGroup' for a more convenient constructor. data ElastiCacheSecurityGroup = ElastiCacheSecurityGroup { _elastiCacheSecurityGroupDescription :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheSecurityGroup' containing required fields as --- | arguments. +-- arguments. elastiCacheSecurityGroup :: Val Text -- ^ 'ecsegDescription' -> ElastiCacheSecurityGroup diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElastiCacheSecurityGroupIngress. See --- | 'elastiCacheSecurityGroupIngress' for a more convenient constructor. +-- 'elastiCacheSecurityGroupIngress' for a more convenient constructor. data ElastiCacheSecurityGroupIngress = ElastiCacheSecurityGroupIngress { _elastiCacheSecurityGroupIngressCacheSecurityGroupName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheSecurityGroupIngress' containing required --- | fields as arguments. +-- fields as arguments. elastiCacheSecurityGroupIngress :: Val Text -- ^ 'ecsgiCacheSecurityGroupName' -> Val Text -- ^ 'ecsgiEC2SecurityGroupName' diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs --- a/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs +++ b/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElastiCacheSubnetGroup. See --- | 'elastiCacheSubnetGroup' for a more convenient constructor. +-- 'elastiCacheSubnetGroup' for a more convenient constructor. data ElastiCacheSubnetGroup = ElastiCacheSubnetGroup { _elastiCacheSubnetGroupCacheSubnetGroupName :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ElastiCacheSubnetGroup' containing required fields as --- | arguments. +-- arguments. elastiCacheSubnetGroup :: Val Text -- ^ 'ecsugDescription' -> [Val Text] -- ^ 'ecsugSubnetIds' diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs --- a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs +++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs @@ -15,7 +15,7 @@ -- | Full data type definition for ElasticBeanstalkApplication. See --- | 'elasticBeanstalkApplication' for a more convenient constructor. +-- 'elasticBeanstalkApplication' for a more convenient constructor. data ElasticBeanstalkApplication = ElasticBeanstalkApplication { _elasticBeanstalkApplicationApplicationName :: Maybe (Val Text) @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkApplication' containing required fields --- | as arguments. +-- as arguments. elasticBeanstalkApplication :: ElasticBeanstalkApplication elasticBeanstalkApplication = diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs --- a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs +++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.ElasticBeanstalkApplicationVersionSourceBundle -- | Full data type definition for ElasticBeanstalkApplicationVersion. See --- | 'elasticBeanstalkApplicationVersion' for a more convenient constructor. +-- 'elasticBeanstalkApplicationVersion' for a more convenient constructor. data ElasticBeanstalkApplicationVersion = ElasticBeanstalkApplicationVersion { _elasticBeanstalkApplicationVersionApplicationName :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkApplicationVersion' containing required --- | fields as arguments. +-- fields as arguments. elasticBeanstalkApplicationVersion :: Val Text -- ^ 'ebavApplicationName' -> ElasticBeanstalkApplicationVersionSourceBundle -- ^ 'ebavSourceBundle' diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs --- a/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs +++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs @@ -16,8 +16,8 @@ import Stratosphere.ResourceProperties.ElasticBeanstalkConfigurationTemplateSourceConfiguration -- | Full data type definition for ElasticBeanstalkConfigurationTemplate. See --- | 'elasticBeanstalkConfigurationTemplate' for a more convenient --- | constructor. +-- 'elasticBeanstalkConfigurationTemplate' for a more convenient +-- constructor. data ElasticBeanstalkConfigurationTemplate = ElasticBeanstalkConfigurationTemplate { _elasticBeanstalkConfigurationTemplateApplicationName :: Val Text @@ -52,7 +52,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkConfigurationTemplate' containing --- | required fields as arguments. +-- required fields as arguments. elasticBeanstalkConfigurationTemplate :: Val Text -- ^ 'ebctApplicationName' -> ElasticBeanstalkConfigurationTemplate diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs --- a/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs +++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ElasticBeanstalkEnvironmentTier -- | Full data type definition for ElasticBeanstalkEnvironment. See --- | 'elasticBeanstalkEnvironment' for a more convenient constructor. +-- 'elasticBeanstalkEnvironment' for a more convenient constructor. data ElasticBeanstalkEnvironment = ElasticBeanstalkEnvironment { _elasticBeanstalkEnvironmentApplicationName :: Val Text @@ -60,7 +60,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticBeanstalkEnvironment' containing required fields --- | as arguments. +-- as arguments. elasticBeanstalkEnvironment :: Val Text -- ^ 'ebeApplicationName' -> ElasticBeanstalkEnvironment diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs --- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs +++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs @@ -23,7 +23,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for ElasticLoadBalancingLoadBalancer. See --- | 'elasticLoadBalancingLoadBalancer' for a more convenient constructor. +-- 'elasticLoadBalancingLoadBalancer' for a more convenient constructor. data ElasticLoadBalancingLoadBalancer = ElasticLoadBalancingLoadBalancer { _elasticLoadBalancingLoadBalancerAccessLoggingPolicy :: Maybe ElasticLoadBalancingLoadBalancerAccessLoggingPolicy @@ -88,7 +88,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingLoadBalancer' containing required --- | fields as arguments. +-- fields as arguments. elasticLoadBalancingLoadBalancer :: [ElasticLoadBalancingLoadBalancerListeners] -- ^ 'elblbListeners' -> ElasticLoadBalancingLoadBalancer diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs --- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs +++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ElasticLoadBalancingV2ListenerAction -- | Full data type definition for ElasticLoadBalancingV2Listener. See --- | 'elasticLoadBalancingV2Listener' for a more convenient constructor. +-- 'elasticLoadBalancingV2Listener' for a more convenient constructor. data ElasticLoadBalancingV2Listener = ElasticLoadBalancingV2Listener { _elasticLoadBalancingV2ListenerCertificates :: Maybe [ElasticLoadBalancingV2ListenerCertificate] @@ -51,7 +51,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2Listener' containing required --- | fields as arguments. +-- fields as arguments. elasticLoadBalancingV2Listener :: [ElasticLoadBalancingV2ListenerAction] -- ^ 'elbvlDefaultActions' -> Val Text -- ^ 'elbvlLoadBalancerArn' diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs --- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs +++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.ElasticLoadBalancingV2ListenerRuleRuleCondition -- | Full data type definition for ElasticLoadBalancingV2ListenerRule. See --- | 'elasticLoadBalancingV2ListenerRule' for a more convenient constructor. +-- 'elasticLoadBalancingV2ListenerRule' for a more convenient constructor. data ElasticLoadBalancingV2ListenerRule = ElasticLoadBalancingV2ListenerRule { _elasticLoadBalancingV2ListenerRuleActions :: [ElasticLoadBalancingV2ListenerRuleAction] @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2ListenerRule' containing required --- | fields as arguments. +-- fields as arguments. elasticLoadBalancingV2ListenerRule :: [ElasticLoadBalancingV2ListenerRuleAction] -- ^ 'elbvlrActions' -> [ElasticLoadBalancingV2ListenerRuleRuleCondition] -- ^ 'elbvlrConditions' diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs --- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs +++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for ElasticLoadBalancingV2LoadBalancer. See --- | 'elasticLoadBalancingV2LoadBalancer' for a more convenient constructor. +-- 'elasticLoadBalancingV2LoadBalancer' for a more convenient constructor. data ElasticLoadBalancingV2LoadBalancer = ElasticLoadBalancingV2LoadBalancer { _elasticLoadBalancingV2LoadBalancerIpAddressType :: Maybe (Val Text) @@ -54,7 +54,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2LoadBalancer' containing required --- | fields as arguments. +-- fields as arguments. elasticLoadBalancingV2LoadBalancer :: ElasticLoadBalancingV2LoadBalancer elasticLoadBalancingV2LoadBalancer = diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs --- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs +++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.ElasticLoadBalancingV2TargetGroupTargetDescription -- | Full data type definition for ElasticLoadBalancingV2TargetGroup. See --- | 'elasticLoadBalancingV2TargetGroup' for a more convenient constructor. +-- 'elasticLoadBalancingV2TargetGroup' for a more convenient constructor. data ElasticLoadBalancingV2TargetGroup = ElasticLoadBalancingV2TargetGroup { _elasticLoadBalancingV2TargetGroupHealthCheckIntervalSeconds :: Maybe (Val Integer') @@ -80,7 +80,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticLoadBalancingV2TargetGroup' containing required --- | fields as arguments. +-- fields as arguments. elasticLoadBalancingV2TargetGroup :: Val Integer' -- ^ 'elbvtgPort' -> Val Text -- ^ 'elbvtgProtocol' diff --git a/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs b/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs --- a/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs +++ b/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for ElasticsearchDomain. See --- | 'elasticsearchDomain' for a more convenient constructor. +-- 'elasticsearchDomain' for a more convenient constructor. data ElasticsearchDomain = ElasticsearchDomain { _elasticsearchDomainAccessPolicies :: Maybe Object @@ -59,7 +59,7 @@ parseJSON _ = mempty -- | Constructor for 'ElasticsearchDomain' containing required fields as --- | arguments. +-- arguments. elasticsearchDomain :: ElasticsearchDomain elasticsearchDomain = diff --git a/library-gen/Stratosphere/Resources/EventsRule.hs b/library-gen/Stratosphere/Resources/EventsRule.hs --- a/library-gen/Stratosphere/Resources/EventsRule.hs +++ b/library-gen/Stratosphere/Resources/EventsRule.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.EventsRuleTarget -- | Full data type definition for EventsRule. See 'eventsRule' for a more --- | convenient constructor. +-- convenient constructor. data EventsRule = EventsRule { _eventsRuleDescription :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/GameLiftAlias.hs b/library-gen/Stratosphere/Resources/GameLiftAlias.hs --- a/library-gen/Stratosphere/Resources/GameLiftAlias.hs +++ b/library-gen/Stratosphere/Resources/GameLiftAlias.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.GameLiftAliasRoutingStrategy -- | Full data type definition for GameLiftAlias. See 'gameLiftAlias' for a --- | more convenient constructor. +-- more convenient constructor. data GameLiftAlias = GameLiftAlias { _gameLiftAliasDescription :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/GameLiftBuild.hs b/library-gen/Stratosphere/Resources/GameLiftBuild.hs --- a/library-gen/Stratosphere/Resources/GameLiftBuild.hs +++ b/library-gen/Stratosphere/Resources/GameLiftBuild.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.GameLiftBuildS3Location -- | Full data type definition for GameLiftBuild. See 'gameLiftBuild' for a --- | more convenient constructor. +-- more convenient constructor. data GameLiftBuild = GameLiftBuild { _gameLiftBuildName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/GameLiftFleet.hs b/library-gen/Stratosphere/Resources/GameLiftFleet.hs --- a/library-gen/Stratosphere/Resources/GameLiftFleet.hs +++ b/library-gen/Stratosphere/Resources/GameLiftFleet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.GameLiftFleetIpPermission -- | Full data type definition for GameLiftFleet. See 'gameLiftFleet' for a --- | more convenient constructor. +-- more convenient constructor. data GameLiftFleet = GameLiftFleet { _gameLiftFleetBuildId :: Val Text diff --git a/library-gen/Stratosphere/Resources/IAMAccessKey.hs b/library-gen/Stratosphere/Resources/IAMAccessKey.hs --- a/library-gen/Stratosphere/Resources/IAMAccessKey.hs +++ b/library-gen/Stratosphere/Resources/IAMAccessKey.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMAccessKey. See 'iamAccessKey' for a more --- | convenient constructor. +-- convenient constructor. data IAMAccessKey = IAMAccessKey { _iAMAccessKeySerial :: Maybe (Val Integer') diff --git a/library-gen/Stratosphere/Resources/IAMGroup.hs b/library-gen/Stratosphere/Resources/IAMGroup.hs --- a/library-gen/Stratosphere/Resources/IAMGroup.hs +++ b/library-gen/Stratosphere/Resources/IAMGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.IAMGroupPolicy -- | Full data type definition for IAMGroup. See 'iamGroup' for a more --- | convenient constructor. +-- convenient constructor. data IAMGroup = IAMGroup { _iAMGroupGroupName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs b/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs --- a/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs +++ b/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs @@ -15,10 +15,11 @@ -- | Full data type definition for IAMInstanceProfile. See --- | 'iamInstanceProfile' for a more convenient constructor. +-- 'iamInstanceProfile' for a more convenient constructor. data IAMInstanceProfile = IAMInstanceProfile - { _iAMInstanceProfilePath :: Val Text + { _iAMInstanceProfileInstanceProfileName :: Maybe (Val Text) + , _iAMInstanceProfilePath :: Maybe (Val Text) , _iAMInstanceProfileRoles :: [Val Text] } deriving (Show, Eq) @@ -26,31 +27,37 @@ toJSON IAMInstanceProfile{..} = object $ catMaybes - [ Just ("Path" .= _iAMInstanceProfilePath) + [ ("InstanceProfileName" .=) <$> _iAMInstanceProfileInstanceProfileName + , ("Path" .=) <$> _iAMInstanceProfilePath , Just ("Roles" .= _iAMInstanceProfileRoles) ] instance FromJSON IAMInstanceProfile where parseJSON (Object obj) = IAMInstanceProfile <$> - obj .: "Path" <*> + obj .:? "InstanceProfileName" <*> + obj .:? "Path" <*> obj .: "Roles" parseJSON _ = mempty -- | Constructor for 'IAMInstanceProfile' containing required fields as --- | arguments. +-- arguments. iamInstanceProfile - :: Val Text -- ^ 'iamipPath' - -> [Val Text] -- ^ 'iamipRoles' + :: [Val Text] -- ^ 'iamipRoles' -> IAMInstanceProfile -iamInstanceProfile patharg rolesarg = +iamInstanceProfile rolesarg = IAMInstanceProfile - { _iAMInstanceProfilePath = patharg + { _iAMInstanceProfileInstanceProfileName = Nothing + , _iAMInstanceProfilePath = Nothing , _iAMInstanceProfileRoles = rolesarg } +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iam-instanceprofile.html#cfn-iam-instanceprofile-instanceprofilename +iamipInstanceProfileName :: Lens' IAMInstanceProfile (Maybe (Val Text)) +iamipInstanceProfileName = lens _iAMInstanceProfileInstanceProfileName (\s a -> s { _iAMInstanceProfileInstanceProfileName = a }) + -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iam-instanceprofile.html#cfn-iam-instanceprofile-path -iamipPath :: Lens' IAMInstanceProfile (Val Text) +iamipPath :: Lens' IAMInstanceProfile (Maybe (Val Text)) iamipPath = lens _iAMInstanceProfilePath (\s a -> s { _iAMInstanceProfilePath = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iam-instanceprofile.html#cfn-iam-instanceprofile-roles diff --git a/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs b/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs --- a/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs +++ b/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMManagedPolicy. See 'iamManagedPolicy' --- | for a more convenient constructor. +-- for a more convenient constructor. data IAMManagedPolicy = IAMManagedPolicy { _iAMManagedPolicyDescription :: Maybe (Val Text) @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'IAMManagedPolicy' containing required fields as --- | arguments. +-- arguments. iamManagedPolicy :: IAMManagedPolicy iamManagedPolicy = diff --git a/library-gen/Stratosphere/Resources/IAMPolicy.hs b/library-gen/Stratosphere/Resources/IAMPolicy.hs --- a/library-gen/Stratosphere/Resources/IAMPolicy.hs +++ b/library-gen/Stratosphere/Resources/IAMPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMPolicy. See 'iamPolicy' for a more --- | convenient constructor. +-- convenient constructor. data IAMPolicy = IAMPolicy { _iAMPolicyGroups :: Maybe [Val Text] diff --git a/library-gen/Stratosphere/Resources/IAMRole.hs b/library-gen/Stratosphere/Resources/IAMRole.hs --- a/library-gen/Stratosphere/Resources/IAMRole.hs +++ b/library-gen/Stratosphere/Resources/IAMRole.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.IAMRolePolicy -- | Full data type definition for IAMRole. See 'iamRole' for a more --- | convenient constructor. +-- convenient constructor. data IAMRole = IAMRole { _iAMRoleAssumeRolePolicyDocument :: Object diff --git a/library-gen/Stratosphere/Resources/IAMUser.hs b/library-gen/Stratosphere/Resources/IAMUser.hs --- a/library-gen/Stratosphere/Resources/IAMUser.hs +++ b/library-gen/Stratosphere/Resources/IAMUser.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.IAMUserPolicy -- | Full data type definition for IAMUser. See 'iamUser' for a more --- | convenient constructor. +-- convenient constructor. data IAMUser = IAMUser { _iAMUserGroups :: Maybe [Val Text] diff --git a/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs b/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs --- a/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs +++ b/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IAMUserToGroupAddition. See --- | 'iamUserToGroupAddition' for a more convenient constructor. +-- 'iamUserToGroupAddition' for a more convenient constructor. data IAMUserToGroupAddition = IAMUserToGroupAddition { _iAMUserToGroupAdditionGroupName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'IAMUserToGroupAddition' containing required fields as --- | arguments. +-- arguments. iamUserToGroupAddition :: Val Text -- ^ 'iamutgaGroupName' -> [Val Text] -- ^ 'iamutgaUsers' diff --git a/library-gen/Stratosphere/Resources/IoTCertificate.hs b/library-gen/Stratosphere/Resources/IoTCertificate.hs --- a/library-gen/Stratosphere/Resources/IoTCertificate.hs +++ b/library-gen/Stratosphere/Resources/IoTCertificate.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTCertificate. See 'ioTCertificate' for a --- | more convenient constructor. +-- more convenient constructor. data IoTCertificate = IoTCertificate { _ioTCertificateCertificateSigningRequest :: Val Text diff --git a/library-gen/Stratosphere/Resources/IoTPolicy.hs b/library-gen/Stratosphere/Resources/IoTPolicy.hs --- a/library-gen/Stratosphere/Resources/IoTPolicy.hs +++ b/library-gen/Stratosphere/Resources/IoTPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTPolicy. See 'ioTPolicy' for a more --- | convenient constructor. +-- convenient constructor. data IoTPolicy = IoTPolicy { _ioTPolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs b/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs --- a/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs +++ b/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTPolicyPrincipalAttachment. See --- | 'ioTPolicyPrincipalAttachment' for a more convenient constructor. +-- 'ioTPolicyPrincipalAttachment' for a more convenient constructor. data IoTPolicyPrincipalAttachment = IoTPolicyPrincipalAttachment { _ioTPolicyPrincipalAttachmentPolicyName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTPolicyPrincipalAttachment' containing required fields --- | as arguments. +-- as arguments. ioTPolicyPrincipalAttachment :: Val Text -- ^ 'itppaPolicyName' -> Val Text -- ^ 'itppaPrincipal' diff --git a/library-gen/Stratosphere/Resources/IoTThing.hs b/library-gen/Stratosphere/Resources/IoTThing.hs --- a/library-gen/Stratosphere/Resources/IoTThing.hs +++ b/library-gen/Stratosphere/Resources/IoTThing.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.IoTThingAttributePayload -- | Full data type definition for IoTThing. See 'ioTThing' for a more --- | convenient constructor. +-- convenient constructor. data IoTThing = IoTThing { _ioTThingAttributePayload :: Maybe IoTThingAttributePayload diff --git a/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs b/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs --- a/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs +++ b/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs @@ -15,7 +15,7 @@ -- | Full data type definition for IoTThingPrincipalAttachment. See --- | 'ioTThingPrincipalAttachment' for a more convenient constructor. +-- 'ioTThingPrincipalAttachment' for a more convenient constructor. data IoTThingPrincipalAttachment = IoTThingPrincipalAttachment { _ioTThingPrincipalAttachmentPrincipal :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'IoTThingPrincipalAttachment' containing required fields --- | as arguments. +-- as arguments. ioTThingPrincipalAttachment :: Val Text -- ^ 'ittpaPrincipal' -> Val Text -- ^ 'ittpaThingName' diff --git a/library-gen/Stratosphere/Resources/IoTTopicRule.hs b/library-gen/Stratosphere/Resources/IoTTopicRule.hs --- a/library-gen/Stratosphere/Resources/IoTTopicRule.hs +++ b/library-gen/Stratosphere/Resources/IoTTopicRule.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.IoTTopicRuleTopicRulePayload -- | Full data type definition for IoTTopicRule. See 'ioTTopicRule' for a more --- | convenient constructor. +-- convenient constructor. data IoTTopicRule = IoTTopicRule { _ioTTopicRuleRuleName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/KMSAlias.hs b/library-gen/Stratosphere/Resources/KMSAlias.hs --- a/library-gen/Stratosphere/Resources/KMSAlias.hs +++ b/library-gen/Stratosphere/Resources/KMSAlias.hs @@ -15,7 +15,7 @@ -- | Full data type definition for KMSAlias. See 'kmsAlias' for a more --- | convenient constructor. +-- convenient constructor. data KMSAlias = KMSAlias { _kMSAliasAliasName :: Val Text diff --git a/library-gen/Stratosphere/Resources/KMSKey.hs b/library-gen/Stratosphere/Resources/KMSKey.hs --- a/library-gen/Stratosphere/Resources/KMSKey.hs +++ b/library-gen/Stratosphere/Resources/KMSKey.hs @@ -15,7 +15,7 @@ -- | Full data type definition for KMSKey. See 'kmsKey' for a more convenient --- | constructor. +-- constructor. data KMSKey = KMSKey { _kMSKeyDescription :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs b/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs --- a/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs +++ b/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamS3DestinationConfiguration -- | Full data type definition for KinesisFirehoseDeliveryStream. See --- | 'kinesisFirehoseDeliveryStream' for a more convenient constructor. +-- 'kinesisFirehoseDeliveryStream' for a more convenient constructor. data KinesisFirehoseDeliveryStream = KinesisFirehoseDeliveryStream { _kinesisFirehoseDeliveryStreamDeliveryStreamName :: Maybe (Val Text) @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'KinesisFirehoseDeliveryStream' containing required --- | fields as arguments. +-- fields as arguments. kinesisFirehoseDeliveryStream :: KinesisFirehoseDeliveryStream kinesisFirehoseDeliveryStream = diff --git a/library-gen/Stratosphere/Resources/KinesisStream.hs b/library-gen/Stratosphere/Resources/KinesisStream.hs --- a/library-gen/Stratosphere/Resources/KinesisStream.hs +++ b/library-gen/Stratosphere/Resources/KinesisStream.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for KinesisStream. See 'kinesisStream' for a --- | more convenient constructor. +-- more convenient constructor. data KinesisStream = KinesisStream { _kinesisStreamName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/LambdaAlias.hs b/library-gen/Stratosphere/Resources/LambdaAlias.hs --- a/library-gen/Stratosphere/Resources/LambdaAlias.hs +++ b/library-gen/Stratosphere/Resources/LambdaAlias.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaAlias. See 'lambdaAlias' for a more --- | convenient constructor. +-- convenient constructor. data LambdaAlias = LambdaAlias { _lambdaAliasDescription :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs b/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs --- a/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs +++ b/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaEventSourceMapping. See --- | 'lambdaEventSourceMapping' for a more convenient constructor. +-- 'lambdaEventSourceMapping' for a more convenient constructor. data LambdaEventSourceMapping = LambdaEventSourceMapping { _lambdaEventSourceMappingBatchSize :: Maybe (Val Integer') @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'LambdaEventSourceMapping' containing required fields as --- | arguments. +-- arguments. lambdaEventSourceMapping :: Val Text -- ^ 'lesmEventSourceArn' -> Val Text -- ^ 'lesmFunctionName' diff --git a/library-gen/Stratosphere/Resources/LambdaFunction.hs b/library-gen/Stratosphere/Resources/LambdaFunction.hs --- a/library-gen/Stratosphere/Resources/LambdaFunction.hs +++ b/library-gen/Stratosphere/Resources/LambdaFunction.hs @@ -14,14 +14,16 @@ import Stratosphere.Values import Stratosphere.Types import Stratosphere.ResourceProperties.LambdaFunctionCode +import Stratosphere.ResourceProperties.LambdaFunctionDeadLetterConfig import Stratosphere.ResourceProperties.LambdaFunctionEnvironment import Stratosphere.ResourceProperties.LambdaFunctionVpcConfig -- | Full data type definition for LambdaFunction. See 'lambdaFunction' for a --- | more convenient constructor. +-- more convenient constructor. data LambdaFunction = LambdaFunction { _lambdaFunctionCode :: LambdaFunctionCode + , _lambdaFunctionDeadLetterConfig :: Maybe LambdaFunctionDeadLetterConfig , _lambdaFunctionDescription :: Maybe (Val Text) , _lambdaFunctionEnvironment :: Maybe LambdaFunctionEnvironment , _lambdaFunctionFunctionName :: Maybe (Val Text) @@ -39,6 +41,7 @@ object $ catMaybes [ Just ("Code" .= _lambdaFunctionCode) + , ("DeadLetterConfig" .=) <$> _lambdaFunctionDeadLetterConfig , ("Description" .=) <$> _lambdaFunctionDescription , ("Environment" .=) <$> _lambdaFunctionEnvironment , ("FunctionName" .=) <$> _lambdaFunctionFunctionName @@ -55,6 +58,7 @@ parseJSON (Object obj) = LambdaFunction <$> obj .: "Code" <*> + obj .:? "DeadLetterConfig" <*> obj .:? "Description" <*> obj .:? "Environment" <*> obj .:? "FunctionName" <*> @@ -77,6 +81,7 @@ lambdaFunction codearg handlerarg rolearg runtimearg = LambdaFunction { _lambdaFunctionCode = codearg + , _lambdaFunctionDeadLetterConfig = Nothing , _lambdaFunctionDescription = Nothing , _lambdaFunctionEnvironment = Nothing , _lambdaFunctionFunctionName = Nothing @@ -92,6 +97,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-function.html#cfn-lambda-function-code lfCode :: Lens' LambdaFunction LambdaFunctionCode lfCode = lens _lambdaFunctionCode (\s a -> s { _lambdaFunctionCode = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-function.html#cfn-lambda-function-deadletterconfig +lfDeadLetterConfig :: Lens' LambdaFunction (Maybe LambdaFunctionDeadLetterConfig) +lfDeadLetterConfig = lens _lambdaFunctionDeadLetterConfig (\s a -> s { _lambdaFunctionDeadLetterConfig = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-function.html#cfn-lambda-function-description lfDescription :: Lens' LambdaFunction (Maybe (Val Text)) diff --git a/library-gen/Stratosphere/Resources/LambdaPermission.hs b/library-gen/Stratosphere/Resources/LambdaPermission.hs --- a/library-gen/Stratosphere/Resources/LambdaPermission.hs +++ b/library-gen/Stratosphere/Resources/LambdaPermission.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaPermission. See 'lambdaPermission' --- | for a more convenient constructor. +-- for a more convenient constructor. data LambdaPermission = LambdaPermission { _lambdaPermissionAction :: Val Text @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'LambdaPermission' containing required fields as --- | arguments. +-- arguments. lambdaPermission :: Val Text -- ^ 'lpAction' -> Val Text -- ^ 'lpFunctionName' diff --git a/library-gen/Stratosphere/Resources/LambdaVersion.hs b/library-gen/Stratosphere/Resources/LambdaVersion.hs --- a/library-gen/Stratosphere/Resources/LambdaVersion.hs +++ b/library-gen/Stratosphere/Resources/LambdaVersion.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LambdaVersion. See 'lambdaVersion' for a --- | more convenient constructor. +-- more convenient constructor. data LambdaVersion = LambdaVersion { _lambdaVersionCodeSha256 :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/LogsDestination.hs b/library-gen/Stratosphere/Resources/LogsDestination.hs --- a/library-gen/Stratosphere/Resources/LogsDestination.hs +++ b/library-gen/Stratosphere/Resources/LogsDestination.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LogsDestination. See 'logsDestination' for --- | a more convenient constructor. +-- a more convenient constructor. data LogsDestination = LogsDestination { _logsDestinationDestinationName :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'LogsDestination' containing required fields as --- | arguments. +-- arguments. logsDestination :: Val Text -- ^ 'ldDestinationName' -> Val Text -- ^ 'ldDestinationPolicy' diff --git a/library-gen/Stratosphere/Resources/LogsLogGroup.hs b/library-gen/Stratosphere/Resources/LogsLogGroup.hs --- a/library-gen/Stratosphere/Resources/LogsLogGroup.hs +++ b/library-gen/Stratosphere/Resources/LogsLogGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LogsLogGroup. See 'logsLogGroup' for a more --- | convenient constructor. +-- convenient constructor. data LogsLogGroup = LogsLogGroup { _logsLogGroupLogGroupName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/LogsLogStream.hs b/library-gen/Stratosphere/Resources/LogsLogStream.hs --- a/library-gen/Stratosphere/Resources/LogsLogStream.hs +++ b/library-gen/Stratosphere/Resources/LogsLogStream.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LogsLogStream. See 'logsLogStream' for a --- | more convenient constructor. +-- more convenient constructor. data LogsLogStream = LogsLogStream { _logsLogStreamLogGroupName :: Val Text diff --git a/library-gen/Stratosphere/Resources/LogsMetricFilter.hs b/library-gen/Stratosphere/Resources/LogsMetricFilter.hs --- a/library-gen/Stratosphere/Resources/LogsMetricFilter.hs +++ b/library-gen/Stratosphere/Resources/LogsMetricFilter.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.LogsMetricFilterMetricTransformation -- | Full data type definition for LogsMetricFilter. See 'logsMetricFilter' --- | for a more convenient constructor. +-- for a more convenient constructor. data LogsMetricFilter = LogsMetricFilter { _logsMetricFilterFilterPattern :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'LogsMetricFilter' containing required fields as --- | arguments. +-- arguments. logsMetricFilter :: Val Text -- ^ 'lmfFilterPattern' -> Val Text -- ^ 'lmfLogGroupName' diff --git a/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs b/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs --- a/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs +++ b/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs @@ -15,7 +15,7 @@ -- | Full data type definition for LogsSubscriptionFilter. See --- | 'logsSubscriptionFilter' for a more convenient constructor. +-- 'logsSubscriptionFilter' for a more convenient constructor. data LogsSubscriptionFilter = LogsSubscriptionFilter { _logsSubscriptionFilterDestinationArn :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'LogsSubscriptionFilter' containing required fields as --- | arguments. +-- arguments. logsSubscriptionFilter :: Val Text -- ^ 'lsfDestinationArn' -> Val Text -- ^ 'lsfFilterPattern' diff --git a/library-gen/Stratosphere/Resources/OpsWorksApp.hs b/library-gen/Stratosphere/Resources/OpsWorksApp.hs --- a/library-gen/Stratosphere/Resources/OpsWorksApp.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksApp.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.OpsWorksAppSslConfiguration -- | Full data type definition for OpsWorksApp. See 'opsWorksApp' for a more --- | convenient constructor. +-- convenient constructor. data OpsWorksApp = OpsWorksApp { _opsWorksAppAppSource :: Maybe OpsWorksAppSource diff --git a/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs b/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs --- a/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs @@ -15,8 +15,8 @@ -- | Full data type definition for OpsWorksElasticLoadBalancerAttachment. See --- | 'opsWorksElasticLoadBalancerAttachment' for a more convenient --- | constructor. +-- 'opsWorksElasticLoadBalancerAttachment' for a more convenient +-- constructor. data OpsWorksElasticLoadBalancerAttachment = OpsWorksElasticLoadBalancerAttachment { _opsWorksElasticLoadBalancerAttachmentElasticLoadBalancerName :: Val Text @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksElasticLoadBalancerAttachment' containing --- | required fields as arguments. +-- required fields as arguments. opsWorksElasticLoadBalancerAttachment :: Val Text -- ^ 'owelbaElasticLoadBalancerName' -> Val Text -- ^ 'owelbaLayerId' diff --git a/library-gen/Stratosphere/Resources/OpsWorksInstance.hs b/library-gen/Stratosphere/Resources/OpsWorksInstance.hs --- a/library-gen/Stratosphere/Resources/OpsWorksInstance.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksInstance.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.OpsWorksInstanceTimeBasedAutoScaling -- | Full data type definition for OpsWorksInstance. See 'opsWorksInstance' --- | for a more convenient constructor. +-- for a more convenient constructor. data OpsWorksInstance = OpsWorksInstance { _opsWorksInstanceAgentVersion :: Maybe (Val Text) @@ -96,7 +96,7 @@ parseJSON _ = mempty -- | Constructor for 'OpsWorksInstance' containing required fields as --- | arguments. +-- arguments. opsWorksInstance :: Val Text -- ^ 'owiInstanceType' -> [Val Text] -- ^ 'owiLayerIds' diff --git a/library-gen/Stratosphere/Resources/OpsWorksLayer.hs b/library-gen/Stratosphere/Resources/OpsWorksLayer.hs --- a/library-gen/Stratosphere/Resources/OpsWorksLayer.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksLayer.hs @@ -18,7 +18,7 @@ import Stratosphere.ResourceProperties.OpsWorksLayerVolumeConfiguration -- | Full data type definition for OpsWorksLayer. See 'opsWorksLayer' for a --- | more convenient constructor. +-- more convenient constructor. data OpsWorksLayer = OpsWorksLayer { _opsWorksLayerAttributes :: Maybe Object diff --git a/library-gen/Stratosphere/Resources/OpsWorksStack.hs b/library-gen/Stratosphere/Resources/OpsWorksStack.hs --- a/library-gen/Stratosphere/Resources/OpsWorksStack.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksStack.hs @@ -19,7 +19,7 @@ import Stratosphere.ResourceProperties.OpsWorksStackRdsDbInstance -- | Full data type definition for OpsWorksStack. See 'opsWorksStack' for a --- | more convenient constructor. +-- more convenient constructor. data OpsWorksStack = OpsWorksStack { _opsWorksStackAgentVersion :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs b/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs --- a/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs @@ -15,12 +15,13 @@ -- | Full data type definition for OpsWorksUserProfile. See --- | 'opsWorksUserProfile' for a more convenient constructor. +-- 'opsWorksUserProfile' for a more convenient constructor. data OpsWorksUserProfile = OpsWorksUserProfile { _opsWorksUserProfileAllowSelfManagement :: Maybe (Val Bool') , _opsWorksUserProfileIamUserArn :: Val Text , _opsWorksUserProfileSshPublicKey :: Maybe (Val Text) + , _opsWorksUserProfileSshUsername :: Maybe (Val Text) } deriving (Show, Eq) instance ToJSON OpsWorksUserProfile where @@ -30,6 +31,7 @@ [ ("AllowSelfManagement" .=) <$> _opsWorksUserProfileAllowSelfManagement , Just ("IamUserArn" .= _opsWorksUserProfileIamUserArn) , ("SshPublicKey" .=) <$> _opsWorksUserProfileSshPublicKey + , ("SshUsername" .=) <$> _opsWorksUserProfileSshUsername ] instance FromJSON OpsWorksUserProfile where @@ -37,11 +39,12 @@ OpsWorksUserProfile <$> obj .:? "AllowSelfManagement" <*> obj .: "IamUserArn" <*> - obj .:? "SshPublicKey" + obj .:? "SshPublicKey" <*> + obj .:? "SshUsername" parseJSON _ = mempty -- | Constructor for 'OpsWorksUserProfile' containing required fields as --- | arguments. +-- arguments. opsWorksUserProfile :: Val Text -- ^ 'owupIamUserArn' -> OpsWorksUserProfile @@ -50,6 +53,7 @@ { _opsWorksUserProfileAllowSelfManagement = Nothing , _opsWorksUserProfileIamUserArn = iamUserArnarg , _opsWorksUserProfileSshPublicKey = Nothing + , _opsWorksUserProfileSshUsername = Nothing } -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-opsworks-userprofile.html#cfn-opsworks-userprofile-allowselfmanagement @@ -63,3 +67,7 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-opsworks-userprofile.html#cfn-opsworks-userprofile-sshpublickey owupSshPublicKey :: Lens' OpsWorksUserProfile (Maybe (Val Text)) owupSshPublicKey = lens _opsWorksUserProfileSshPublicKey (\s a -> s { _opsWorksUserProfileSshPublicKey = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-opsworks-userprofile.html#cfn-opsworks-userprofile-sshusername +owupSshUsername :: Lens' OpsWorksUserProfile (Maybe (Val Text)) +owupSshUsername = lens _opsWorksUserProfileSshUsername (\s a -> s { _opsWorksUserProfileSshUsername = a }) diff --git a/library-gen/Stratosphere/Resources/OpsWorksVolume.hs b/library-gen/Stratosphere/Resources/OpsWorksVolume.hs --- a/library-gen/Stratosphere/Resources/OpsWorksVolume.hs +++ b/library-gen/Stratosphere/Resources/OpsWorksVolume.hs @@ -15,7 +15,7 @@ -- | Full data type definition for OpsWorksVolume. See 'opsWorksVolume' for a --- | more convenient constructor. +-- more convenient constructor. data OpsWorksVolume = OpsWorksVolume { _opsWorksVolumeEc2VolumeId :: Val Text diff --git a/library-gen/Stratosphere/Resources/RDSDBCluster.hs b/library-gen/Stratosphere/Resources/RDSDBCluster.hs --- a/library-gen/Stratosphere/Resources/RDSDBCluster.hs +++ b/library-gen/Stratosphere/Resources/RDSDBCluster.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBCluster. See 'rdsdbCluster' for a more --- | convenient constructor. +-- convenient constructor. data RDSDBCluster = RDSDBCluster { _rDSDBClusterAvailabilityZones :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs --- a/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs +++ b/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBClusterParameterGroup. See --- | 'rdsdbClusterParameterGroup' for a more convenient constructor. +-- 'rdsdbClusterParameterGroup' for a more convenient constructor. data RDSDBClusterParameterGroup = RDSDBClusterParameterGroup { _rDSDBClusterParameterGroupDescription :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBClusterParameterGroup' containing required fields --- | as arguments. +-- as arguments. rdsdbClusterParameterGroup :: Val Text -- ^ 'rdsdbcpgDescription' -> Val Text -- ^ 'rdsdbcpgFamily' diff --git a/library-gen/Stratosphere/Resources/RDSDBInstance.hs b/library-gen/Stratosphere/Resources/RDSDBInstance.hs --- a/library-gen/Stratosphere/Resources/RDSDBInstance.hs +++ b/library-gen/Stratosphere/Resources/RDSDBInstance.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBInstance. See 'rdsdbInstance' for a --- | more convenient constructor. +-- more convenient constructor. data RDSDBInstance = RDSDBInstance { _rDSDBInstanceAllocatedStorage :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs b/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs --- a/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs +++ b/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBParameterGroup. See --- | 'rdsdbParameterGroup' for a more convenient constructor. +-- 'rdsdbParameterGroup' for a more convenient constructor. data RDSDBParameterGroup = RDSDBParameterGroup { _rDSDBParameterGroupDescription :: Val Text @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBParameterGroup' containing required fields as --- | arguments. +-- arguments. rdsdbParameterGroup :: Val Text -- ^ 'rdsdbpgDescription' -> Val Text -- ^ 'rdsdbpgFamily' diff --git a/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs b/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs --- a/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs +++ b/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBSecurityGroup. See --- | 'rdsdbSecurityGroup' for a more convenient constructor. +-- 'rdsdbSecurityGroup' for a more convenient constructor. data RDSDBSecurityGroup = RDSDBSecurityGroup { _rDSDBSecurityGroupDBSecurityGroupIngress :: [RDSDBSecurityGroupIngressProperty] @@ -45,7 +45,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBSecurityGroup' containing required fields as --- | arguments. +-- arguments. rdsdbSecurityGroup :: [RDSDBSecurityGroupIngressProperty] -- ^ 'rdsdbsegDBSecurityGroupIngress' -> Val Text -- ^ 'rdsdbsegGroupDescription' diff --git a/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs --- a/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs +++ b/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RDSDBSecurityGroupIngress. See --- | 'rdsdbSecurityGroupIngress' for a more convenient constructor. +-- 'rdsdbSecurityGroupIngress' for a more convenient constructor. data RDSDBSecurityGroupIngress = RDSDBSecurityGroupIngress { _rDSDBSecurityGroupIngressCIDRIP :: Maybe (Val Text) @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBSecurityGroupIngress' containing required fields as --- | arguments. +-- arguments. rdsdbSecurityGroupIngress :: Val Text -- ^ 'rdsdbsgiDBSecurityGroupName' -> RDSDBSecurityGroupIngress diff --git a/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs b/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs --- a/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs +++ b/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSDBSubnetGroup. See 'rdsdbSubnetGroup' --- | for a more convenient constructor. +-- for a more convenient constructor. data RDSDBSubnetGroup = RDSDBSubnetGroup { _rDSDBSubnetGroupDBSubnetGroupDescription :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSDBSubnetGroup' containing required fields as --- | arguments. +-- arguments. rdsdbSubnetGroup :: Val Text -- ^ 'rdsdbsugDBSubnetGroupDescription' -> [Val Text] -- ^ 'rdsdbsugSubnetIds' diff --git a/library-gen/Stratosphere/Resources/RDSEventSubscription.hs b/library-gen/Stratosphere/Resources/RDSEventSubscription.hs --- a/library-gen/Stratosphere/Resources/RDSEventSubscription.hs +++ b/library-gen/Stratosphere/Resources/RDSEventSubscription.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RDSEventSubscription. See --- | 'rdsEventSubscription' for a more convenient constructor. +-- 'rdsEventSubscription' for a more convenient constructor. data RDSEventSubscription = RDSEventSubscription { _rDSEventSubscriptionEnabled :: Maybe (Val Bool') @@ -47,7 +47,7 @@ parseJSON _ = mempty -- | Constructor for 'RDSEventSubscription' containing required fields as --- | arguments. +-- arguments. rdsEventSubscription :: Val Text -- ^ 'rdsesSnsTopicArn' -> RDSEventSubscription diff --git a/library-gen/Stratosphere/Resources/RDSOptionGroup.hs b/library-gen/Stratosphere/Resources/RDSOptionGroup.hs --- a/library-gen/Stratosphere/Resources/RDSOptionGroup.hs +++ b/library-gen/Stratosphere/Resources/RDSOptionGroup.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Tag -- | Full data type definition for RDSOptionGroup. See 'rdsOptionGroup' for a --- | more convenient constructor. +-- more convenient constructor. data RDSOptionGroup = RDSOptionGroup { _rDSOptionGroupEngineName :: Val Text diff --git a/library-gen/Stratosphere/Resources/RedshiftCluster.hs b/library-gen/Stratosphere/Resources/RedshiftCluster.hs --- a/library-gen/Stratosphere/Resources/RedshiftCluster.hs +++ b/library-gen/Stratosphere/Resources/RedshiftCluster.hs @@ -15,13 +15,13 @@ -- | Full data type definition for RedshiftCluster. See 'redshiftCluster' for --- | a more convenient constructor. +-- a more convenient constructor. data RedshiftCluster = RedshiftCluster { _redshiftClusterAllowVersionUpdate :: Maybe (Val Bool') , _redshiftClusterAutomatedSnapshotRetentionPeriod :: Maybe (Val Integer') , _redshiftClusterAvailabilityZone :: Maybe (Val Text) - , _redshiftClusterClusterParameterGroupName :: Maybe (Val Integer') + , _redshiftClusterClusterParameterGroupName :: Maybe (Val Text) , _redshiftClusterClusterSecurityGroups :: Maybe [Val Text] , _redshiftClusterClusterSubnetGroupName :: Maybe (Val Text) , _redshiftClusterClusterType :: Val Text @@ -104,7 +104,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftCluster' containing required fields as --- | arguments. +-- arguments. redshiftCluster :: Val Text -- ^ 'rcClusterType' -> Val Text -- ^ 'rcDBName' @@ -153,7 +153,7 @@ rcAvailabilityZone = lens _redshiftClusterAvailabilityZone (\s a -> s { _redshiftClusterAvailabilityZone = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-redshift-cluster.html#cfn-redshift-cluster-clusterparametergroupname -rcClusterParameterGroupName :: Lens' RedshiftCluster (Maybe (Val Integer')) +rcClusterParameterGroupName :: Lens' RedshiftCluster (Maybe (Val Text)) rcClusterParameterGroupName = lens _redshiftClusterClusterParameterGroupName (\s a -> s { _redshiftClusterClusterParameterGroupName = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-redshift-cluster.html#cfn-redshift-cluster-clustersecuritygroups diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs --- a/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs +++ b/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.RedshiftClusterParameterGroupParameter -- | Full data type definition for RedshiftClusterParameterGroup. See --- | 'redshiftClusterParameterGroup' for a more convenient constructor. +-- 'redshiftClusterParameterGroup' for a more convenient constructor. data RedshiftClusterParameterGroup = RedshiftClusterParameterGroup { _redshiftClusterParameterGroupDescription :: Val Text @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftClusterParameterGroup' containing required --- | fields as arguments. +-- fields as arguments. redshiftClusterParameterGroup :: Val Text -- ^ 'rcpgDescription' -> Val Text -- ^ 'rcpgParameterGroupFamily' diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs --- a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs +++ b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RedshiftClusterSecurityGroup. See --- | 'redshiftClusterSecurityGroup' for a more convenient constructor. +-- 'redshiftClusterSecurityGroup' for a more convenient constructor. data RedshiftClusterSecurityGroup = RedshiftClusterSecurityGroup { _redshiftClusterSecurityGroupDescription :: Val Text @@ -35,7 +35,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftClusterSecurityGroup' containing required fields --- | as arguments. +-- as arguments. redshiftClusterSecurityGroup :: Val Text -- ^ 'rcsegDescription' -> RedshiftClusterSecurityGroup diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs --- a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs +++ b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RedshiftClusterSecurityGroupIngress. See --- | 'redshiftClusterSecurityGroupIngress' for a more convenient constructor. +-- 'redshiftClusterSecurityGroupIngress' for a more convenient constructor. data RedshiftClusterSecurityGroupIngress = RedshiftClusterSecurityGroupIngress { _redshiftClusterSecurityGroupIngressCIDRIP :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftClusterSecurityGroupIngress' containing required --- | fields as arguments. +-- fields as arguments. redshiftClusterSecurityGroupIngress :: Val Text -- ^ 'rcsgiClusterSecurityGroupName' -> RedshiftClusterSecurityGroupIngress diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs --- a/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs +++ b/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs @@ -15,7 +15,7 @@ -- | Full data type definition for RedshiftClusterSubnetGroup. See --- | 'redshiftClusterSubnetGroup' for a more convenient constructor. +-- 'redshiftClusterSubnetGroup' for a more convenient constructor. data RedshiftClusterSubnetGroup = RedshiftClusterSubnetGroup { _redshiftClusterSubnetGroupDescription :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'RedshiftClusterSubnetGroup' containing required fields --- | as arguments. +-- as arguments. redshiftClusterSubnetGroup :: Val Text -- ^ 'rcsugDescription' -> [Val Text] -- ^ 'rcsugSubnetIds' diff --git a/library-gen/Stratosphere/Resources/Route53HealthCheck.hs b/library-gen/Stratosphere/Resources/Route53HealthCheck.hs --- a/library-gen/Stratosphere/Resources/Route53HealthCheck.hs +++ b/library-gen/Stratosphere/Resources/Route53HealthCheck.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckTag -- | Full data type definition for Route53HealthCheck. See --- | 'route53HealthCheck' for a more convenient constructor. +-- 'route53HealthCheck' for a more convenient constructor. data Route53HealthCheck = Route53HealthCheck { _route53HealthCheckHealthCheckConfig :: Route53HealthCheckHealthCheckConfig @@ -39,7 +39,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HealthCheck' containing required fields as --- | arguments. +-- arguments. route53HealthCheck :: Route53HealthCheckHealthCheckConfig -- ^ 'rhcHealthCheckConfig' -> Route53HealthCheck diff --git a/library-gen/Stratosphere/Resources/Route53HostedZone.hs b/library-gen/Stratosphere/Resources/Route53HostedZone.hs --- a/library-gen/Stratosphere/Resources/Route53HostedZone.hs +++ b/library-gen/Stratosphere/Resources/Route53HostedZone.hs @@ -17,7 +17,7 @@ import Stratosphere.ResourceProperties.Route53HostedZoneVPC -- | Full data type definition for Route53HostedZone. See 'route53HostedZone' --- | for a more convenient constructor. +-- for a more convenient constructor. data Route53HostedZone = Route53HostedZone { _route53HostedZoneHostedZoneConfig :: Maybe Route53HostedZoneHostedZoneConfig @@ -46,7 +46,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53HostedZone' containing required fields as --- | arguments. +-- arguments. route53HostedZone :: Val Text -- ^ 'rhzName' -> Route53HostedZone diff --git a/library-gen/Stratosphere/Resources/Route53RecordSet.hs b/library-gen/Stratosphere/Resources/Route53RecordSet.hs --- a/library-gen/Stratosphere/Resources/Route53RecordSet.hs +++ b/library-gen/Stratosphere/Resources/Route53RecordSet.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.Route53RecordSetGeoLocation -- | Full data type definition for Route53RecordSet. See 'route53RecordSet' --- | for a more convenient constructor. +-- for a more convenient constructor. data Route53RecordSet = Route53RecordSet { _route53RecordSetAliasTarget :: Maybe Route53RecordSetAliasTarget @@ -75,7 +75,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSet' containing required fields as --- | arguments. +-- arguments. route53RecordSet :: Val Text -- ^ 'rrsName' -> Val Text -- ^ 'rrsType' diff --git a/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs b/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs --- a/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs +++ b/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.Route53RecordSetGroupRecordSet -- | Full data type definition for Route53RecordSetGroup. See --- | 'route53RecordSetGroup' for a more convenient constructor. +-- 'route53RecordSetGroup' for a more convenient constructor. data Route53RecordSetGroup = Route53RecordSetGroup { _route53RecordSetGroupComment :: Maybe (Val Text) @@ -44,7 +44,7 @@ parseJSON _ = mempty -- | Constructor for 'Route53RecordSetGroup' containing required fields as --- | arguments. +-- arguments. route53RecordSetGroup :: Route53RecordSetGroup route53RecordSetGroup = diff --git a/library-gen/Stratosphere/Resources/S3Bucket.hs b/library-gen/Stratosphere/Resources/S3Bucket.hs --- a/library-gen/Stratosphere/Resources/S3Bucket.hs +++ b/library-gen/Stratosphere/Resources/S3Bucket.hs @@ -23,7 +23,7 @@ import Stratosphere.ResourceProperties.S3BucketWebsiteConfiguration -- | Full data type definition for S3Bucket. See 's3Bucket' for a more --- | convenient constructor. +-- convenient constructor. data S3Bucket = S3Bucket { _s3BucketAccessControl :: Maybe (Val CannedACL) diff --git a/library-gen/Stratosphere/Resources/S3BucketPolicy.hs b/library-gen/Stratosphere/Resources/S3BucketPolicy.hs --- a/library-gen/Stratosphere/Resources/S3BucketPolicy.hs +++ b/library-gen/Stratosphere/Resources/S3BucketPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for S3BucketPolicy. See 's3BucketPolicy' for a --- | more convenient constructor. +-- more convenient constructor. data S3BucketPolicy = S3BucketPolicy { _s3BucketPolicyBucket :: Val Text diff --git a/library-gen/Stratosphere/Resources/SDBDomain.hs b/library-gen/Stratosphere/Resources/SDBDomain.hs --- a/library-gen/Stratosphere/Resources/SDBDomain.hs +++ b/library-gen/Stratosphere/Resources/SDBDomain.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SDBDomain. See 'sdbDomain' for a more --- | convenient constructor. +-- convenient constructor. data SDBDomain = SDBDomain { _sDBDomainDescription :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/SNSSubscription.hs b/library-gen/Stratosphere/Resources/SNSSubscription.hs --- a/library-gen/Stratosphere/Resources/SNSSubscription.hs +++ b/library-gen/Stratosphere/Resources/SNSSubscription.hs @@ -15,7 +15,7 @@ import Stratosphere.Types -- | Full data type definition for SNSSubscription. See 'snsSubscription' for --- | a more convenient constructor. +-- a more convenient constructor. data SNSSubscription = SNSSubscription { _sNSSubscriptionEndpoint :: Maybe (Val Text) @@ -41,7 +41,7 @@ parseJSON _ = mempty -- | Constructor for 'SNSSubscription' containing required fields as --- | arguments. +-- arguments. snsSubscription :: SNSSubscription snsSubscription = diff --git a/library-gen/Stratosphere/Resources/SNSTopic.hs b/library-gen/Stratosphere/Resources/SNSTopic.hs --- a/library-gen/Stratosphere/Resources/SNSTopic.hs +++ b/library-gen/Stratosphere/Resources/SNSTopic.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.SNSTopicSubscription -- | Full data type definition for SNSTopic. See 'snsTopic' for a more --- | convenient constructor. +-- convenient constructor. data SNSTopic = SNSTopic { _sNSTopicDisplayName :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs b/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs --- a/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs +++ b/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SNSTopicPolicy. See 'snsTopicPolicy' for a --- | more convenient constructor. +-- more convenient constructor. data SNSTopicPolicy = SNSTopicPolicy { _sNSTopicPolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/Resources/SQSQueue.hs b/library-gen/Stratosphere/Resources/SQSQueue.hs --- a/library-gen/Stratosphere/Resources/SQSQueue.hs +++ b/library-gen/Stratosphere/Resources/SQSQueue.hs @@ -15,10 +15,12 @@ -- | Full data type definition for SQSQueue. See 'sqsQueue' for a more --- | convenient constructor. +-- convenient constructor. data SQSQueue = SQSQueue - { _sQSQueueDelaySeconds :: Maybe (Val Integer') + { _sQSQueueContentBasedDeduplication :: Maybe (Val Bool') + , _sQSQueueDelaySeconds :: Maybe (Val Integer') + , _sQSQueueFifoQueue :: Maybe (Val Bool') , _sQSQueueMaximumMessageSize :: Maybe (Val Integer') , _sQSQueueMessageRetentionPeriod :: Maybe (Val Integer') , _sQSQueueQueueName :: Maybe (Val Text) @@ -31,7 +33,9 @@ toJSON SQSQueue{..} = object $ catMaybes - [ ("DelaySeconds" .=) <$> _sQSQueueDelaySeconds + [ ("ContentBasedDeduplication" .=) <$> _sQSQueueContentBasedDeduplication + , ("DelaySeconds" .=) <$> _sQSQueueDelaySeconds + , ("FifoQueue" .=) <$> _sQSQueueFifoQueue , ("MaximumMessageSize" .=) <$> _sQSQueueMaximumMessageSize , ("MessageRetentionPeriod" .=) <$> _sQSQueueMessageRetentionPeriod , ("QueueName" .=) <$> _sQSQueueQueueName @@ -43,7 +47,9 @@ instance FromJSON SQSQueue where parseJSON (Object obj) = SQSQueue <$> + obj .:? "ContentBasedDeduplication" <*> obj .:? "DelaySeconds" <*> + obj .:? "FifoQueue" <*> obj .:? "MaximumMessageSize" <*> obj .:? "MessageRetentionPeriod" <*> obj .:? "QueueName" <*> @@ -57,7 +63,9 @@ :: SQSQueue sqsQueue = SQSQueue - { _sQSQueueDelaySeconds = Nothing + { _sQSQueueContentBasedDeduplication = Nothing + , _sQSQueueDelaySeconds = Nothing + , _sQSQueueFifoQueue = Nothing , _sQSQueueMaximumMessageSize = Nothing , _sQSQueueMessageRetentionPeriod = Nothing , _sQSQueueQueueName = Nothing @@ -66,9 +74,17 @@ , _sQSQueueVisibilityTimeout = Nothing } +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sqs-queues.html#aws-sqs-queue-contentbaseddeduplication +sqsqContentBasedDeduplication :: Lens' SQSQueue (Maybe (Val Bool')) +sqsqContentBasedDeduplication = lens _sQSQueueContentBasedDeduplication (\s a -> s { _sQSQueueContentBasedDeduplication = a }) + -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sqs-queues.html#aws-sqs-queue-delayseconds sqsqDelaySeconds :: Lens' SQSQueue (Maybe (Val Integer')) sqsqDelaySeconds = lens _sQSQueueDelaySeconds (\s a -> s { _sQSQueueDelaySeconds = a }) + +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sqs-queues.html#aws-sqs-queue-fifoqueue +sqsqFifoQueue :: Lens' SQSQueue (Maybe (Val Bool')) +sqsqFifoQueue = lens _sQSQueueFifoQueue (\s a -> s { _sQSQueueFifoQueue = a }) -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sqs-queues.html#aws-sqs-queue-maxmesgsize sqsqMaximumMessageSize :: Lens' SQSQueue (Maybe (Val Integer')) diff --git a/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs b/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs --- a/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs +++ b/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SQSQueuePolicy. See 'sqsQueuePolicy' for a --- | more convenient constructor. +-- more convenient constructor. data SQSQueuePolicy = SQSQueuePolicy { _sQSQueuePolicyPolicyDocument :: Object diff --git a/library-gen/Stratosphere/Resources/SSMAssociation.hs b/library-gen/Stratosphere/Resources/SSMAssociation.hs --- a/library-gen/Stratosphere/Resources/SSMAssociation.hs +++ b/library-gen/Stratosphere/Resources/SSMAssociation.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.SSMAssociationTarget -- | Full data type definition for SSMAssociation. See 'ssmAssociation' for a --- | more convenient constructor. +-- more convenient constructor. data SSMAssociation = SSMAssociation { _sSMAssociationDocumentVersion :: Maybe (Val Text) diff --git a/library-gen/Stratosphere/Resources/SSMDocument.hs b/library-gen/Stratosphere/Resources/SSMDocument.hs --- a/library-gen/Stratosphere/Resources/SSMDocument.hs +++ b/library-gen/Stratosphere/Resources/SSMDocument.hs @@ -15,7 +15,7 @@ -- | Full data type definition for SSMDocument. See 'ssmDocument' for a more --- | convenient constructor. +-- convenient constructor. data SSMDocument = SSMDocument { _sSMDocumentContent :: Object diff --git a/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs b/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs --- a/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs +++ b/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFByteMatchSetByteMatchTuple -- | Full data type definition for WAFByteMatchSet. See 'wafByteMatchSet' for --- | a more convenient constructor. +-- a more convenient constructor. data WAFByteMatchSet = WAFByteMatchSet { _wAFByteMatchSetByteMatchTuples :: Maybe [WAFByteMatchSetByteMatchTuple] @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFByteMatchSet' containing required fields as --- | arguments. +-- arguments. wafByteMatchSet :: Val Text -- ^ 'wafbmsName' -> WAFByteMatchSet diff --git a/library-gen/Stratosphere/Resources/WAFIPSet.hs b/library-gen/Stratosphere/Resources/WAFIPSet.hs --- a/library-gen/Stratosphere/Resources/WAFIPSet.hs +++ b/library-gen/Stratosphere/Resources/WAFIPSet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFIPSetIPSetDescriptor -- | Full data type definition for WAFIPSet. See 'wafipSet' for a more --- | convenient constructor. +-- convenient constructor. data WAFIPSet = WAFIPSet { _wAFIPSetIPSetDescriptors :: Maybe [WAFIPSetIPSetDescriptor] diff --git a/library-gen/Stratosphere/Resources/WAFRule.hs b/library-gen/Stratosphere/Resources/WAFRule.hs --- a/library-gen/Stratosphere/Resources/WAFRule.hs +++ b/library-gen/Stratosphere/Resources/WAFRule.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFRulePredicate -- | Full data type definition for WAFRule. See 'wafRule' for a more --- | convenient constructor. +-- convenient constructor. data WAFRule = WAFRule { _wAFRuleMetricName :: Val Text diff --git a/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs b/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs --- a/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs +++ b/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFSizeConstraintSetSizeConstraint -- | Full data type definition for WAFSizeConstraintSet. See --- | 'wafSizeConstraintSet' for a more convenient constructor. +-- 'wafSizeConstraintSet' for a more convenient constructor. data WAFSizeConstraintSet = WAFSizeConstraintSet { _wAFSizeConstraintSetName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSizeConstraintSet' containing required fields as --- | arguments. +-- arguments. wafSizeConstraintSet :: Val Text -- ^ 'wafscsName' -> [WAFSizeConstraintSetSizeConstraint] -- ^ 'wafscsSizeConstraints' diff --git a/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs b/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs --- a/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs +++ b/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFSqlInjectionMatchSetSqlInjectionMatchTuple -- | Full data type definition for WAFSqlInjectionMatchSet. See --- | 'wafSqlInjectionMatchSet' for a more convenient constructor. +-- 'wafSqlInjectionMatchSet' for a more convenient constructor. data WAFSqlInjectionMatchSet = WAFSqlInjectionMatchSet { _wAFSqlInjectionMatchSetName :: Val Text @@ -38,7 +38,7 @@ parseJSON _ = mempty -- | Constructor for 'WAFSqlInjectionMatchSet' containing required fields as --- | arguments. +-- arguments. wafSqlInjectionMatchSet :: Val Text -- ^ 'wafsimsName' -> WAFSqlInjectionMatchSet diff --git a/library-gen/Stratosphere/Resources/WAFWebACL.hs b/library-gen/Stratosphere/Resources/WAFWebACL.hs --- a/library-gen/Stratosphere/Resources/WAFWebACL.hs +++ b/library-gen/Stratosphere/Resources/WAFWebACL.hs @@ -16,7 +16,7 @@ import Stratosphere.ResourceProperties.WAFWebACLActivatedRule -- | Full data type definition for WAFWebACL. See 'wafWebACL' for a more --- | convenient constructor. +-- convenient constructor. data WAFWebACL = WAFWebACL { _wAFWebACLDefaultAction :: WAFWebACLWafAction diff --git a/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs b/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs --- a/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs +++ b/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs @@ -15,7 +15,7 @@ import Stratosphere.ResourceProperties.WAFXssMatchSetXssMatchTuple -- | Full data type definition for WAFXssMatchSet. See 'wafXssMatchSet' for a --- | more convenient constructor. +-- more convenient constructor. data WAFXssMatchSet = WAFXssMatchSet { _wAFXssMatchSetName :: Val Text diff --git a/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs b/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs --- a/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs +++ b/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs @@ -15,7 +15,7 @@ -- | Full data type definition for WorkSpacesWorkspace. See --- | 'workSpacesWorkspace' for a more convenient constructor. +-- 'workSpacesWorkspace' for a more convenient constructor. data WorkSpacesWorkspace = WorkSpacesWorkspace { _workSpacesWorkspaceBundleId :: Val Text @@ -50,7 +50,7 @@ parseJSON _ = mempty -- | Constructor for 'WorkSpacesWorkspace' containing required fields as --- | arguments. +-- arguments. workSpacesWorkspace :: Val Text -- ^ 'wswBundleId' -> Val Text -- ^ 'wswDirectoryId' diff --git a/stratosphere.cabal b/stratosphere.cabal --- a/stratosphere.cabal +++ b/stratosphere.cabal @@ -1,9 +1,9 @@ --- This file has been generated from package.yaml by hpack version 0.15.0. +-- This file has been generated from package.yaml by hpack version 0.17.0. -- -- see: https://github.com/sol/hpack name: stratosphere -version: 0.4.1 +version: 0.4.2 synopsis: EDSL for AWS CloudFormation description: EDSL for AWS CloudFormation category: AWS, Cloud @@ -33,7 +33,7 @@ library hs-source-dirs: library - , library-gen + library-gen ghc-options: -Wall build-depends: base >= 4.8 && < 5 @@ -103,11 +103,11 @@ Stratosphere.ResourceProperties.CodeCommitRepositoryRepositoryTrigger Stratosphere.ResourceProperties.CodeDeployDeploymentConfigMinimumHealthyHosts Stratosphere.ResourceProperties.CodeDeployDeploymentGroupDeployment - Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEc2TagFilter + Stratosphere.ResourceProperties.CodeDeployDeploymentGroupEC2TagFilter Stratosphere.ResourceProperties.CodeDeployDeploymentGroupGitHubLocation - Stratosphere.ResourceProperties.CodeDeployDeploymentGroupOnPremisesInstanceTagFilter - Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevision + Stratosphere.ResourceProperties.CodeDeployDeploymentGroupRevisionLocation Stratosphere.ResourceProperties.CodeDeployDeploymentGroupS3Location + Stratosphere.ResourceProperties.CodeDeployDeploymentGroupTagFilter Stratosphere.ResourceProperties.CodePipelineCustomActionTypeArtifactDetails Stratosphere.ResourceProperties.CodePipelineCustomActionTypeConfigurationProperties Stratosphere.ResourceProperties.CodePipelineCustomActionTypeSettings @@ -252,6 +252,7 @@ Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration Stratosphere.ResourceProperties.KinesisFirehoseDeliveryStreamS3DestinationConfiguration Stratosphere.ResourceProperties.LambdaFunctionCode + Stratosphere.ResourceProperties.LambdaFunctionDeadLetterConfig Stratosphere.ResourceProperties.LambdaFunctionEnvironment Stratosphere.ResourceProperties.LambdaFunctionVpcConfig Stratosphere.ResourceProperties.LogsMetricFilterMetricTransformation @@ -277,6 +278,7 @@ Stratosphere.ResourceProperties.RDSOptionGroupOptionConfiguration Stratosphere.ResourceProperties.RDSOptionGroupOptionSetting Stratosphere.ResourceProperties.RedshiftClusterParameterGroupParameter + Stratosphere.ResourceProperties.Route53HealthCheckAlarmIdentifier Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckConfig Stratosphere.ResourceProperties.Route53HealthCheckHealthCheckTag Stratosphere.ResourceProperties.Route53HostedZoneHostedZoneConfig