diff --git a/amazonka-cloudsearch-domains.cabal b/amazonka-cloudsearch-domains.cabal
--- a/amazonka-cloudsearch-domains.cabal
+++ b/amazonka-cloudsearch-domains.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-cloudsearch-domains
-version:               0.0.6
+version:               0.0.7
 synopsis:              Amazon CloudSearch Domain SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -41,5 +41,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/CloudSearchDomains/Search.hs b/gen/Network/AWS/CloudSearchDomains/Search.hs
--- a/gen/Network/AWS/CloudSearchDomains/Search.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Search.hs
@@ -438,6 +438,6 @@
 
 instance FromJSON SearchResponse where
     parseJSON = withObject "SearchResponse" $ \o -> SearchResponse
-        <$> o .:  "facets"
+        <$> o .:? "facets" .!= mempty
         <*> o .:? "hits"
         <*> o .:? "status"
diff --git a/gen/Network/AWS/CloudSearchDomains/Types.hs b/gen/Network/AWS/CloudSearchDomains/Types.hs
--- a/gen/Network/AWS/CloudSearchDomains/Types.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Types.hs
@@ -226,8 +226,8 @@
 
 instance FromJSON Hit where
     parseJSON = withObject "Hit" $ \o -> Hit
-        <$> o .:  "fields"
-        <*> o .:  "highlights"
+        <$> o .:? "fields" .!= mempty
+        <*> o .:? "highlights" .!= mempty
         <*> o .:? "id"
 
 instance ToJSON Hit where
@@ -388,7 +388,7 @@
 
 instance FromJSON BucketInfo where
     parseJSON = withObject "BucketInfo" $ \o -> BucketInfo
-        <$> o .:  "buckets"
+        <$> o .:? "buckets" .!= mempty
 
 instance ToJSON BucketInfo where
     toJSON BucketInfo{..} = object
@@ -462,7 +462,7 @@
     parseJSON = withObject "SuggestModel" $ \o -> SuggestModel
         <$> o .:? "found"
         <*> o .:? "query"
-        <*> o .:  "suggestions"
+        <*> o .:? "suggestions" .!= mempty
 
 instance ToJSON SuggestModel where
     toJSON SuggestModel{..} = object
@@ -519,7 +519,7 @@
     parseJSON = withObject "Hits" $ \o -> Hits
         <$> o .:? "cursor"
         <*> o .:? "found"
-        <*> o .:  "hit"
+        <*> o .:? "hit" .!= mempty
         <*> o .:? "start"
 
 instance ToJSON Hits where
diff --git a/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs b/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
--- a/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
+++ b/gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs
@@ -173,4 +173,4 @@
         <$> o .:? "adds"
         <*> o .:? "deletes"
         <*> o .:? "status"
-        <*> o .:  "warnings"
+        <*> o .:? "warnings" .!= mempty