diff --git a/amazonka-cloudsearch.cabal b/amazonka-cloudsearch.cabal
--- a/amazonka-cloudsearch.cabal
+++ b/amazonka-cloudsearch.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-cloudsearch
-version:               0.0.6
+version:               0.0.7
 synopsis:              Amazon CloudSearch SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -66,5 +66,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/CloudSearch/BuildSuggesters.hs b/gen/Network/AWS/CloudSearch/BuildSuggesters.hs
--- a/gen/Network/AWS/CloudSearch/BuildSuggesters.hs
+++ b/gen/Network/AWS/CloudSearch/BuildSuggesters.hs
@@ -109,4 +109,4 @@
 
 instance FromXML BuildSuggestersResponse where
     parseXML = withElement "BuildSuggestersResult" $ \x -> BuildSuggestersResponse
-        <$> x .@  "FieldNames"
+        <$> x .@? "FieldNames" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/DescribeAnalysisSchemes.hs b/gen/Network/AWS/CloudSearch/DescribeAnalysisSchemes.hs
--- a/gen/Network/AWS/CloudSearch/DescribeAnalysisSchemes.hs
+++ b/gen/Network/AWS/CloudSearch/DescribeAnalysisSchemes.hs
@@ -140,4 +140,4 @@
 
 instance FromXML DescribeAnalysisSchemesResponse where
     parseXML = withElement "DescribeAnalysisSchemesResult" $ \x -> DescribeAnalysisSchemesResponse
-        <$> x .@  "AnalysisSchemes"
+        <$> x .@? "AnalysisSchemes" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/DescribeDomains.hs b/gen/Network/AWS/CloudSearch/DescribeDomains.hs
--- a/gen/Network/AWS/CloudSearch/DescribeDomains.hs
+++ b/gen/Network/AWS/CloudSearch/DescribeDomains.hs
@@ -120,4 +120,4 @@
 
 instance FromXML DescribeDomainsResponse where
     parseXML = withElement "DescribeDomainsResult" $ \x -> DescribeDomainsResponse
-        <$> x .@  "DomainStatusList"
+        <$> x .@? "DomainStatusList" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/DescribeExpressions.hs b/gen/Network/AWS/CloudSearch/DescribeExpressions.hs
--- a/gen/Network/AWS/CloudSearch/DescribeExpressions.hs
+++ b/gen/Network/AWS/CloudSearch/DescribeExpressions.hs
@@ -139,4 +139,4 @@
 
 instance FromXML DescribeExpressionsResponse where
     parseXML = withElement "DescribeExpressionsResult" $ \x -> DescribeExpressionsResponse
-        <$> x .@  "Expressions"
+        <$> x .@? "Expressions" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/DescribeIndexFields.hs b/gen/Network/AWS/CloudSearch/DescribeIndexFields.hs
--- a/gen/Network/AWS/CloudSearch/DescribeIndexFields.hs
+++ b/gen/Network/AWS/CloudSearch/DescribeIndexFields.hs
@@ -136,4 +136,4 @@
 
 instance FromXML DescribeIndexFieldsResponse where
     parseXML = withElement "DescribeIndexFieldsResult" $ \x -> DescribeIndexFieldsResponse
-        <$> x .@  "IndexFields"
+        <$> x .@? "IndexFields" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/DescribeSuggesters.hs b/gen/Network/AWS/CloudSearch/DescribeSuggesters.hs
--- a/gen/Network/AWS/CloudSearch/DescribeSuggesters.hs
+++ b/gen/Network/AWS/CloudSearch/DescribeSuggesters.hs
@@ -138,4 +138,4 @@
 
 instance FromXML DescribeSuggestersResponse where
     parseXML = withElement "DescribeSuggestersResult" $ \x -> DescribeSuggestersResponse
-        <$> x .@  "Suggesters"
+        <$> x .@? "Suggesters" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/IndexDocuments.hs b/gen/Network/AWS/CloudSearch/IndexDocuments.hs
--- a/gen/Network/AWS/CloudSearch/IndexDocuments.hs
+++ b/gen/Network/AWS/CloudSearch/IndexDocuments.hs
@@ -111,4 +111,4 @@
 
 instance FromXML IndexDocumentsResponse where
     parseXML = withElement "IndexDocumentsResult" $ \x -> IndexDocumentsResponse
-        <$> x .@  "FieldNames"
+        <$> x .@? "FieldNames" .!@ mempty
diff --git a/gen/Network/AWS/CloudSearch/ListDomainNames.hs b/gen/Network/AWS/CloudSearch/ListDomainNames.hs
--- a/gen/Network/AWS/CloudSearch/ListDomainNames.hs
+++ b/gen/Network/AWS/CloudSearch/ListDomainNames.hs
@@ -88,4 +88,4 @@
 
 instance FromXML ListDomainNamesResponse where
     parseXML = withElement "ListDomainNamesResult" $ \x -> ListDomainNamesResponse
-        <$> x .@  "DomainNames"
+        <$> x .@? "DomainNames" .!@ mempty