diff --git a/amazonka-opsworks.cabal b/amazonka-opsworks.cabal
--- a/amazonka-opsworks.cabal
+++ b/amazonka-opsworks.cabal
@@ -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
diff --git a/gen/Network/AWS/OpsWorks/DescribeApps.hs b/gen/Network/AWS/OpsWorks/DescribeApps.hs
--- a/gen/Network/AWS/OpsWorks/DescribeApps.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeApps.hs
@@ -129,4 +129,4 @@
 
 instance FromJSON DescribeAppsResponse where
     parseJSON = withObject "DescribeAppsResponse" $ \o -> DescribeAppsResponse
-        <$> o .:  "Apps"
+        <$> o .:? "Apps" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeCommands.hs b/gen/Network/AWS/OpsWorks/DescribeCommands.hs
--- a/gen/Network/AWS/OpsWorks/DescribeCommands.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeCommands.hs
@@ -141,4 +141,4 @@
 
 instance FromJSON DescribeCommandsResponse where
     parseJSON = withObject "DescribeCommandsResponse" $ \o -> DescribeCommandsResponse
-        <$> o .:  "Commands"
+        <$> o .:? "Commands" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeDeployments.hs b/gen/Network/AWS/OpsWorks/DescribeDeployments.hs
--- a/gen/Network/AWS/OpsWorks/DescribeDeployments.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeDeployments.hs
@@ -140,4 +140,4 @@
 
 instance FromJSON DescribeDeploymentsResponse where
     parseJSON = withObject "DescribeDeploymentsResponse" $ \o -> DescribeDeploymentsResponse
-        <$> o .:  "Deployments"
+        <$> o .:? "Deployments" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeElasticIps.hs b/gen/Network/AWS/OpsWorks/DescribeElasticIps.hs
--- a/gen/Network/AWS/OpsWorks/DescribeElasticIps.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeElasticIps.hs
@@ -143,4 +143,4 @@
 
 instance FromJSON DescribeElasticIpsResponse where
     parseJSON = withObject "DescribeElasticIpsResponse" $ \o -> DescribeElasticIpsResponse
-        <$> o .:  "ElasticIps"
+        <$> o .:? "ElasticIps" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeElasticLoadBalancers.hs b/gen/Network/AWS/OpsWorks/DescribeElasticLoadBalancers.hs
--- a/gen/Network/AWS/OpsWorks/DescribeElasticLoadBalancers.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeElasticLoadBalancers.hs
@@ -132,4 +132,4 @@
 
 instance FromJSON DescribeElasticLoadBalancersResponse where
     parseJSON = withObject "DescribeElasticLoadBalancersResponse" $ \o -> DescribeElasticLoadBalancersResponse
-        <$> o .:  "ElasticLoadBalancers"
+        <$> o .:? "ElasticLoadBalancers" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeInstances.hs b/gen/Network/AWS/OpsWorks/DescribeInstances.hs
--- a/gen/Network/AWS/OpsWorks/DescribeInstances.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeInstances.hs
@@ -140,4 +140,4 @@
 
 instance FromJSON DescribeInstancesResponse where
     parseJSON = withObject "DescribeInstancesResponse" $ \o -> DescribeInstancesResponse
-        <$> o .:  "Instances"
+        <$> o .:? "Instances" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeLayers.hs b/gen/Network/AWS/OpsWorks/DescribeLayers.hs
--- a/gen/Network/AWS/OpsWorks/DescribeLayers.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeLayers.hs
@@ -129,4 +129,4 @@
 
 instance FromJSON DescribeLayersResponse where
     parseJSON = withObject "DescribeLayersResponse" $ \o -> DescribeLayersResponse
-        <$> o .:  "Layers"
+        <$> o .:? "Layers" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeLoadBasedAutoScaling.hs b/gen/Network/AWS/OpsWorks/DescribeLoadBasedAutoScaling.hs
--- a/gen/Network/AWS/OpsWorks/DescribeLoadBasedAutoScaling.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeLoadBasedAutoScaling.hs
@@ -127,4 +127,4 @@
 
 instance FromJSON DescribeLoadBasedAutoScalingResponse where
     parseJSON = withObject "DescribeLoadBasedAutoScalingResponse" $ \o -> DescribeLoadBasedAutoScalingResponse
-        <$> o .:  "LoadBasedAutoScalingConfigurations"
+        <$> o .:? "LoadBasedAutoScalingConfigurations" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribePermissions.hs b/gen/Network/AWS/OpsWorks/DescribePermissions.hs
--- a/gen/Network/AWS/OpsWorks/DescribePermissions.hs
+++ b/gen/Network/AWS/OpsWorks/DescribePermissions.hs
@@ -134,4 +134,4 @@
 
 instance FromJSON DescribePermissionsResponse where
     parseJSON = withObject "DescribePermissionsResponse" $ \o -> DescribePermissionsResponse
-        <$> o .:  "Permissions"
+        <$> o .:? "Permissions" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeRaidArrays.hs b/gen/Network/AWS/OpsWorks/DescribeRaidArrays.hs
--- a/gen/Network/AWS/OpsWorks/DescribeRaidArrays.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeRaidArrays.hs
@@ -130,4 +130,4 @@
 
 instance FromJSON DescribeRaidArraysResponse where
     parseJSON = withObject "DescribeRaidArraysResponse" $ \o -> DescribeRaidArraysResponse
-        <$> o .:  "RaidArrays"
+        <$> o .:? "RaidArrays" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeRdsDbInstances.hs b/gen/Network/AWS/OpsWorks/DescribeRdsDbInstances.hs
--- a/gen/Network/AWS/OpsWorks/DescribeRdsDbInstances.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeRdsDbInstances.hs
@@ -129,4 +129,4 @@
 
 instance FromJSON DescribeRdsDbInstancesResponse where
     parseJSON = withObject "DescribeRdsDbInstancesResponse" $ \o -> DescribeRdsDbInstancesResponse
-        <$> o .:  "RdsDbInstances"
+        <$> o .:? "RdsDbInstances" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeServiceErrors.hs b/gen/Network/AWS/OpsWorks/DescribeServiceErrors.hs
--- a/gen/Network/AWS/OpsWorks/DescribeServiceErrors.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeServiceErrors.hs
@@ -144,4 +144,4 @@
 
 instance FromJSON DescribeServiceErrorsResponse where
     parseJSON = withObject "DescribeServiceErrorsResponse" $ \o -> DescribeServiceErrorsResponse
-        <$> o .:  "ServiceErrors"
+        <$> o .:? "ServiceErrors" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeStacks.hs b/gen/Network/AWS/OpsWorks/DescribeStacks.hs
--- a/gen/Network/AWS/OpsWorks/DescribeStacks.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeStacks.hs
@@ -124,4 +124,4 @@
 
 instance FromJSON DescribeStacksResponse where
     parseJSON = withObject "DescribeStacksResponse" $ \o -> DescribeStacksResponse
-        <$> o .:  "Stacks"
+        <$> o .:? "Stacks" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeTimeBasedAutoScaling.hs b/gen/Network/AWS/OpsWorks/DescribeTimeBasedAutoScaling.hs
--- a/gen/Network/AWS/OpsWorks/DescribeTimeBasedAutoScaling.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeTimeBasedAutoScaling.hs
@@ -127,4 +127,4 @@
 
 instance FromJSON DescribeTimeBasedAutoScalingResponse where
     parseJSON = withObject "DescribeTimeBasedAutoScalingResponse" $ \o -> DescribeTimeBasedAutoScalingResponse
-        <$> o .:  "TimeBasedAutoScalingConfigurations"
+        <$> o .:? "TimeBasedAutoScalingConfigurations" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeUserProfiles.hs b/gen/Network/AWS/OpsWorks/DescribeUserProfiles.hs
--- a/gen/Network/AWS/OpsWorks/DescribeUserProfiles.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeUserProfiles.hs
@@ -123,4 +123,4 @@
 
 instance FromJSON DescribeUserProfilesResponse where
     parseJSON = withObject "DescribeUserProfilesResponse" $ \o -> DescribeUserProfilesResponse
-        <$> o .:  "UserProfiles"
+        <$> o .:? "UserProfiles" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/DescribeVolumes.hs b/gen/Network/AWS/OpsWorks/DescribeVolumes.hs
--- a/gen/Network/AWS/OpsWorks/DescribeVolumes.hs
+++ b/gen/Network/AWS/OpsWorks/DescribeVolumes.hs
@@ -151,4 +151,4 @@
 
 instance FromJSON DescribeVolumesResponse where
     parseJSON = withObject "DescribeVolumesResponse" $ \o -> DescribeVolumesResponse
-        <$> o .:  "Volumes"
+        <$> o .:? "Volumes" .!= mempty
diff --git a/gen/Network/AWS/OpsWorks/Types.hs b/gen/Network/AWS/OpsWorks/Types.hs
--- a/gen/Network/AWS/OpsWorks/Types.hs
+++ b/gen/Network/AWS/OpsWorks/Types.hs
@@ -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"