packages feed

amazonka-opsworks 0.0.6 → 0.0.7

raw patch · 18 files changed

+46/−46 lines, 18 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

amazonka-opsworks.cabal view
@@ -1,5 +1,5 @@ name:                  amazonka-opsworks-version:               0.0.6+version:               0.0.7 synopsis:              Amazon OpsWorks SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -101,5 +101,5 @@     other-modules:      build-depends:-          amazonka-core == 0.0.6.*+          amazonka-core == 0.0.7.*         , base          >= 4.7     && < 5
gen/Network/AWS/OpsWorks/DescribeApps.hs view
@@ -129,4 +129,4 @@  instance FromJSON DescribeAppsResponse where     parseJSON = withObject "DescribeAppsResponse" $ \o -> DescribeAppsResponse-        <$> o .:  "Apps"+        <$> o .:? "Apps" .!= mempty
gen/Network/AWS/OpsWorks/DescribeCommands.hs view
@@ -141,4 +141,4 @@  instance FromJSON DescribeCommandsResponse where     parseJSON = withObject "DescribeCommandsResponse" $ \o -> DescribeCommandsResponse-        <$> o .:  "Commands"+        <$> o .:? "Commands" .!= mempty
gen/Network/AWS/OpsWorks/DescribeDeployments.hs view
@@ -140,4 +140,4 @@  instance FromJSON DescribeDeploymentsResponse where     parseJSON = withObject "DescribeDeploymentsResponse" $ \o -> DescribeDeploymentsResponse-        <$> o .:  "Deployments"+        <$> o .:? "Deployments" .!= mempty
gen/Network/AWS/OpsWorks/DescribeElasticIps.hs view
@@ -143,4 +143,4 @@  instance FromJSON DescribeElasticIpsResponse where     parseJSON = withObject "DescribeElasticIpsResponse" $ \o -> DescribeElasticIpsResponse-        <$> o .:  "ElasticIps"+        <$> o .:? "ElasticIps" .!= mempty
gen/Network/AWS/OpsWorks/DescribeElasticLoadBalancers.hs view
@@ -132,4 +132,4 @@  instance FromJSON DescribeElasticLoadBalancersResponse where     parseJSON = withObject "DescribeElasticLoadBalancersResponse" $ \o -> DescribeElasticLoadBalancersResponse-        <$> o .:  "ElasticLoadBalancers"+        <$> o .:? "ElasticLoadBalancers" .!= mempty
gen/Network/AWS/OpsWorks/DescribeInstances.hs view
@@ -140,4 +140,4 @@  instance FromJSON DescribeInstancesResponse where     parseJSON = withObject "DescribeInstancesResponse" $ \o -> DescribeInstancesResponse-        <$> o .:  "Instances"+        <$> o .:? "Instances" .!= mempty
gen/Network/AWS/OpsWorks/DescribeLayers.hs view
@@ -129,4 +129,4 @@  instance FromJSON DescribeLayersResponse where     parseJSON = withObject "DescribeLayersResponse" $ \o -> DescribeLayersResponse-        <$> o .:  "Layers"+        <$> o .:? "Layers" .!= mempty
gen/Network/AWS/OpsWorks/DescribeLoadBasedAutoScaling.hs view
@@ -127,4 +127,4 @@  instance FromJSON DescribeLoadBasedAutoScalingResponse where     parseJSON = withObject "DescribeLoadBasedAutoScalingResponse" $ \o -> DescribeLoadBasedAutoScalingResponse-        <$> o .:  "LoadBasedAutoScalingConfigurations"+        <$> o .:? "LoadBasedAutoScalingConfigurations" .!= mempty
gen/Network/AWS/OpsWorks/DescribePermissions.hs view
@@ -134,4 +134,4 @@  instance FromJSON DescribePermissionsResponse where     parseJSON = withObject "DescribePermissionsResponse" $ \o -> DescribePermissionsResponse-        <$> o .:  "Permissions"+        <$> o .:? "Permissions" .!= mempty
gen/Network/AWS/OpsWorks/DescribeRaidArrays.hs view
@@ -130,4 +130,4 @@  instance FromJSON DescribeRaidArraysResponse where     parseJSON = withObject "DescribeRaidArraysResponse" $ \o -> DescribeRaidArraysResponse-        <$> o .:  "RaidArrays"+        <$> o .:? "RaidArrays" .!= mempty
gen/Network/AWS/OpsWorks/DescribeRdsDbInstances.hs view
@@ -129,4 +129,4 @@  instance FromJSON DescribeRdsDbInstancesResponse where     parseJSON = withObject "DescribeRdsDbInstancesResponse" $ \o -> DescribeRdsDbInstancesResponse-        <$> o .:  "RdsDbInstances"+        <$> o .:? "RdsDbInstances" .!= mempty
gen/Network/AWS/OpsWorks/DescribeServiceErrors.hs view
@@ -144,4 +144,4 @@  instance FromJSON DescribeServiceErrorsResponse where     parseJSON = withObject "DescribeServiceErrorsResponse" $ \o -> DescribeServiceErrorsResponse-        <$> o .:  "ServiceErrors"+        <$> o .:? "ServiceErrors" .!= mempty
gen/Network/AWS/OpsWorks/DescribeStacks.hs view
@@ -124,4 +124,4 @@  instance FromJSON DescribeStacksResponse where     parseJSON = withObject "DescribeStacksResponse" $ \o -> DescribeStacksResponse-        <$> o .:  "Stacks"+        <$> o .:? "Stacks" .!= mempty
gen/Network/AWS/OpsWorks/DescribeTimeBasedAutoScaling.hs view
@@ -127,4 +127,4 @@  instance FromJSON DescribeTimeBasedAutoScalingResponse where     parseJSON = withObject "DescribeTimeBasedAutoScalingResponse" $ \o -> DescribeTimeBasedAutoScalingResponse-        <$> o .:  "TimeBasedAutoScalingConfigurations"+        <$> o .:? "TimeBasedAutoScalingConfigurations" .!= mempty
gen/Network/AWS/OpsWorks/DescribeUserProfiles.hs view
@@ -123,4 +123,4 @@  instance FromJSON DescribeUserProfilesResponse where     parseJSON = withObject "DescribeUserProfilesResponse" $ \o -> DescribeUserProfilesResponse-        <$> o .:  "UserProfiles"+        <$> o .:? "UserProfiles" .!= mempty
gen/Network/AWS/OpsWorks/DescribeVolumes.hs view
@@ -151,4 +151,4 @@  instance FromJSON DescribeVolumesResponse where     parseJSON = withObject "DescribeVolumesResponse" $ \o -> DescribeVolumesResponse-        <$> o .:  "Volumes"+        <$> o .:? "Volumes" .!= mempty
gen/Network/AWS/OpsWorks/Types.hs view
@@ -845,14 +845,14 @@  instance FromJSON ElasticLoadBalancer where     parseJSON = withObject "ElasticLoadBalancer" $ \o -> ElasticLoadBalancer-        <$> o .:  "AvailabilityZones"+        <$> o .:? "AvailabilityZones" .!= mempty         <*> o .:? "DnsName"-        <*> o .:  "Ec2InstanceIds"+        <*> o .:? "Ec2InstanceIds" .!= mempty         <*> o .:? "ElasticLoadBalancerName"         <*> o .:? "LayerId"         <*> o .:? "Region"         <*> o .:? "StackId"-        <*> o .:  "SubnetIds"+        <*> o .:? "SubnetIds" .!= mempty         <*> o .:? "VpcId"  instance ToJSON ElasticLoadBalancer where@@ -1741,11 +1741,11 @@     parseJSON = withObject "App" $ \o -> App         <$> o .:? "AppId"         <*> o .:? "AppSource"-        <*> o .:  "Attributes"+        <*> o .:? "Attributes" .!= mempty         <*> o .:? "CreatedAt"-        <*> o .:  "DataSources"+        <*> o .:? "DataSources" .!= mempty         <*> o .:? "Description"-        <*> o .:  "Domains"+        <*> o .:? "Domains" .!= mempty         <*> o .:? "EnableSsl"         <*> o .:? "Name"         <*> o .:? "Shortname"@@ -2578,25 +2578,25 @@  instance FromJSON Layer where     parseJSON = withObject "Layer" $ \o -> Layer-        <$> o .:  "Attributes"+        <$> o .:? "Attributes" .!= mempty         <*> o .:? "AutoAssignElasticIps"         <*> o .:? "AutoAssignPublicIps"         <*> o .:? "CreatedAt"         <*> o .:? "CustomInstanceProfileArn"         <*> o .:? "CustomRecipes"-        <*> o .:  "CustomSecurityGroupIds"+        <*> o .:? "CustomSecurityGroupIds" .!= mempty         <*> o .:? "DefaultRecipes"-        <*> o .:  "DefaultSecurityGroupNames"+        <*> o .:? "DefaultSecurityGroupNames" .!= mempty         <*> o .:? "EnableAutoHealing"         <*> o .:? "InstallUpdatesOnBoot"         <*> o .:? "LayerId"         <*> o .:? "Name"-        <*> o .:  "Packages"+        <*> o .:? "Packages" .!= mempty         <*> o .:? "Shortname"         <*> o .:? "StackId"         <*> o .:? "Type"         <*> o .:? "UseEbsOptimizedInstances"-        <*> o .:  "VolumeConfigurations"+        <*> o .:? "VolumeConfigurations" .!= mempty  instance ToJSON Layer where     toJSON Layer{..} = object@@ -2674,11 +2674,11 @@  instance FromJSON Recipes where     parseJSON = withObject "Recipes" $ \o -> Recipes-        <$> o .:  "Configure"-        <*> o .:  "Deploy"-        <*> o .:  "Setup"-        <*> o .:  "Shutdown"-        <*> o .:  "Undeploy"+        <$> o .:? "Configure" .!= mempty+        <*> o .:? "Deploy" .!= mempty+        <*> o .:? "Setup" .!= mempty+        <*> o .:? "Shutdown" .!= mempty+        <*> o .:? "Undeploy" .!= mempty  instance ToJSON Recipes where     toJSON Recipes{..} = object@@ -3022,7 +3022,7 @@ instance FromJSON Stack where     parseJSON = withObject "Stack" $ \o -> Stack         <$> o .:? "Arn"-        <*> o .:  "Attributes"+        <*> o .:? "Attributes" .!= mempty         <*> o .:? "ChefConfiguration"         <*> o .:? "ConfigurationManager"         <*> o .:? "CreatedAt"@@ -3115,7 +3115,7 @@  instance FromJSON DeploymentCommand where     parseJSON = withObject "DeploymentCommand" $ \o -> DeploymentCommand-        <$> o .:  "Args"+        <$> o .:? "Args" .!= mempty         <*> o .:  "Name"  instance ToJSON DeploymentCommand where@@ -3193,13 +3193,13 @@  instance FromJSON WeeklyAutoScalingSchedule where     parseJSON = withObject "WeeklyAutoScalingSchedule" $ \o -> WeeklyAutoScalingSchedule-        <$> o .:  "Friday"-        <*> o .:  "Monday"-        <*> o .:  "Saturday"-        <*> o .:  "Sunday"-        <*> o .:  "Thursday"-        <*> o .:  "Tuesday"-        <*> o .:  "Wednesday"+        <$> o .:? "Friday" .!= mempty+        <*> o .:? "Monday" .!= mempty+        <*> o .:? "Saturday" .!= mempty+        <*> o .:? "Sunday" .!= mempty+        <*> o .:? "Thursday" .!= mempty+        <*> o .:? "Tuesday" .!= mempty+        <*> o .:? "Wednesday" .!= mempty  instance ToJSON WeeklyAutoScalingSchedule where     toJSON WeeklyAutoScalingSchedule{..} = object@@ -3560,7 +3560,7 @@         <*> o .:? "InstanceProfileArn"         <*> o .:? "InstanceType"         <*> o .:? "LastServiceErrorId"-        <*> o .:  "LayerIds"+        <*> o .:? "LayerIds" .!= mempty         <*> o .:? "Os"         <*> o .:? "PrivateDns"         <*> o .:? "PrivateIp"@@ -3568,7 +3568,7 @@         <*> o .:? "PublicIp"         <*> o .:? "RootDeviceType"         <*> o .:? "RootDeviceVolumeId"-        <*> o .:  "SecurityGroupIds"+        <*> o .:? "SecurityGroupIds" .!= mempty         <*> o .:? "SshHostDsaKeyFingerprint"         <*> o .:? "SshHostRsaKeyFingerprint"         <*> o .:? "SshKeyName"@@ -3736,7 +3736,7 @@         <*> o .:? "DeploymentId"         <*> o .:? "Duration"         <*> o .:? "IamUserArn"-        <*> o .:  "InstanceIds"+        <*> o .:? "InstanceIds" .!= mempty         <*> o .:? "StackId"         <*> o .:? "Status"