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.2.1
+version:               0.2.2
 synopsis:              Amazon CloudSearch Domain SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -41,5 +41,5 @@
     other-modules:
 
     build-depends:
-          amazonka-core == 0.2.1.*
+          amazonka-core == 0.2.2.*
         , 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
@@ -93,7 +93,7 @@
     , _s1Size         :: Maybe Integer
     , _s1Sort         :: Maybe Text
     , _s1Start        :: Maybe Integer
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'Search' constructor.
 --
@@ -373,7 +373,7 @@
     { _sr1Facets :: Map Text BucketInfo
     , _sr1Hits   :: Maybe Hits
     , _sr1Status :: Maybe SearchStatus
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'SearchResponse' constructor.
 --
diff --git a/gen/Network/AWS/CloudSearchDomains/Suggest.hs b/gen/Network/AWS/CloudSearchDomains/Suggest.hs
--- a/gen/Network/AWS/CloudSearchDomains/Suggest.hs
+++ b/gen/Network/AWS/CloudSearchDomains/Suggest.hs
@@ -69,7 +69,7 @@
     { _sQuery     :: Text
     , _sSize      :: Maybe Integer
     , _sSuggester :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'Suggest' constructor.
 --
@@ -105,7 +105,7 @@
 data SuggestResponse = SuggestResponse
     { _srStatus  :: Maybe SuggestStatus
     , _srSuggest :: Maybe SuggestModel
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'SuggestResponse' constructor.
 --
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
@@ -142,7 +142,7 @@
 data SearchStatus = SearchStatus
     { _ssRid    :: Maybe Text
     , _ssTimems :: Maybe Integer
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'SearchStatus' constructor.
 --
@@ -182,7 +182,7 @@
     | Lucene     -- ^ lucene
     | Simple     -- ^ simple
     | Structured -- ^ structured
-      deriving (Eq, Ord, Show, Generic, Enum)
+      deriving (Eq, Ord, Read, Show, Generic, Enum)
 
 instance Hashable QueryParser
 
@@ -216,7 +216,7 @@
     { _hitFields     :: Map Text (List "fields" Text)
     , _hitHighlights :: Map Text Text
     , _hitId         :: Maybe Text
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'Hit' constructor.
 --
@@ -263,7 +263,7 @@
 data SuggestStatus = SuggestStatus
     { _ss1Rid    :: Maybe Text
     , _ss1Timems :: Maybe Integer
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'SuggestStatus' constructor.
 --
@@ -301,7 +301,7 @@
 data Bucket = Bucket
     { _bCount :: Maybe Integer
     , _bValue :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'Bucket' constructor.
 --
@@ -340,7 +340,7 @@
     { _smId         :: Maybe Text
     , _smScore      :: Maybe Integer
     , _smSuggestion :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'SuggestionMatch' constructor.
 --
@@ -386,7 +386,7 @@
 
 newtype BucketInfo = BucketInfo
     { _biBuckets :: List "buckets" Bucket
-    } deriving (Eq, Show, Monoid, Semigroup)
+    } deriving (Eq, Read, Show, Monoid, Semigroup)
 
 instance GHC.Exts.IsList BucketInfo where
     type Item BucketInfo = Bucket
@@ -420,7 +420,7 @@
 
 newtype DocumentServiceWarning = DocumentServiceWarning
     { _dswMessage :: Maybe Text
-    } deriving (Eq, Ord, Show, Monoid)
+    } deriving (Eq, Ord, Read, Show, Monoid)
 
 -- | 'DocumentServiceWarning' constructor.
 --
@@ -450,7 +450,7 @@
     { _smFound       :: Maybe Integer
     , _smQuery       :: Maybe Text
     , _smSuggestions :: List "suggestions" SuggestionMatch
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'SuggestModel' constructor.
 --
@@ -499,7 +499,7 @@
     , _hFound  :: Maybe Integer
     , _hHit    :: List "hit" Hit
     , _hStart  :: Maybe Integer
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'Hits' constructor.
 --
@@ -556,7 +556,7 @@
 data ContentType
     = ApplicationJson -- ^ application/json
     | ApplicationXml  -- ^ application/xml
-      deriving (Eq, Ord, Show, Generic, Enum)
+      deriving (Eq, Ord, Read, Show, Generic, Enum)
 
 instance Hashable ContentType
 
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
@@ -72,7 +72,7 @@
 data UploadDocuments = UploadDocuments
     { _udContentType :: ContentType
     , _udDocuments   :: Base64
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'UploadDocuments' constructor.
 --
@@ -106,7 +106,7 @@
     , _udrDeletes  :: Maybe Integer
     , _udrStatus   :: Maybe Text
     , _udrWarnings :: List "warnings" DocumentServiceWarning
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'UploadDocumentsResponse' constructor.
 --