diff --git a/amazonka-sts.cabal b/amazonka-sts.cabal
--- a/amazonka-sts.cabal
+++ b/amazonka-sts.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-sts
-version:               0.2.1
+version:               0.2.2
 synopsis:              Amazon Security Token Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -46,5 +46,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/STS/AssumeRole.hs b/gen/Network/AWS/STS/AssumeRole.hs
--- a/gen/Network/AWS/STS/AssumeRole.hs
+++ b/gen/Network/AWS/STS/AssumeRole.hs
@@ -128,7 +128,7 @@
     , _arRoleSessionName :: Text
     , _arSerialNumber    :: Maybe Text
     , _arTokenCode       :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'AssumeRole' constructor.
 --
@@ -219,7 +219,7 @@
     { _arrAssumedRoleUser  :: Maybe AssumedRoleUser
     , _arrCredentials      :: Maybe Credentials
     , _arrPackedPolicySize :: Maybe Nat
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'AssumeRoleResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/AssumeRoleWithSAML.hs b/gen/Network/AWS/STS/AssumeRoleWithSAML.hs
--- a/gen/Network/AWS/STS/AssumeRoleWithSAML.hs
+++ b/gen/Network/AWS/STS/AssumeRoleWithSAML.hs
@@ -102,7 +102,7 @@
     , _arwsamlPrincipalArn    :: Text
     , _arwsamlRoleArn         :: Text
     , _arwsamlSAMLAssertion   :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'AssumeRoleWithSAML' constructor.
 --
@@ -180,7 +180,7 @@
     , _arwsamlrPackedPolicySize :: Maybe Nat
     , _arwsamlrSubject          :: Maybe Text
     , _arwsamlrSubjectType      :: Maybe Text
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'AssumeRoleWithSAMLResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/AssumeRoleWithWebIdentity.hs b/gen/Network/AWS/STS/AssumeRoleWithWebIdentity.hs
--- a/gen/Network/AWS/STS/AssumeRoleWithWebIdentity.hs
+++ b/gen/Network/AWS/STS/AssumeRoleWithWebIdentity.hs
@@ -113,7 +113,7 @@
     , _arwwiRoleArn          :: Text
     , _arwwiRoleSessionName  :: Text
     , _arwwiWebIdentityToken :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'AssumeRoleWithWebIdentity' constructor.
 --
@@ -199,7 +199,7 @@
     , _arwwirPackedPolicySize            :: Maybe Nat
     , _arwwirProvider                    :: Maybe Text
     , _arwwirSubjectFromWebIdentityToken :: Maybe Text
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'AssumeRoleWithWebIdentityResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/DecodeAuthorizationMessage.hs b/gen/Network/AWS/STS/DecodeAuthorizationMessage.hs
--- a/gen/Network/AWS/STS/DecodeAuthorizationMessage.hs
+++ b/gen/Network/AWS/STS/DecodeAuthorizationMessage.hs
@@ -67,7 +67,7 @@
 
 newtype DecodeAuthorizationMessage = DecodeAuthorizationMessage
     { _damEncodedMessage :: Text
-    } deriving (Eq, Ord, Show, Monoid, IsString)
+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)
 
 -- | 'DecodeAuthorizationMessage' constructor.
 --
@@ -88,7 +88,7 @@
 
 newtype DecodeAuthorizationMessageResponse = DecodeAuthorizationMessageResponse
     { _damrDecodedMessage :: Maybe Text
-    } deriving (Eq, Ord, Show, Monoid)
+    } deriving (Eq, Ord, Read, Show, Monoid)
 
 -- | 'DecodeAuthorizationMessageResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/GetFederationToken.hs b/gen/Network/AWS/STS/GetFederationToken.hs
--- a/gen/Network/AWS/STS/GetFederationToken.hs
+++ b/gen/Network/AWS/STS/GetFederationToken.hs
@@ -108,7 +108,7 @@
     { _gftDurationSeconds :: Maybe Nat
     , _gftName            :: Text
     , _gftPolicy          :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'GetFederationToken' constructor.
 --
@@ -169,7 +169,7 @@
     { _gftrCredentials      :: Maybe Credentials
     , _gftrFederatedUser    :: Maybe FederatedUser
     , _gftrPackedPolicySize :: Maybe Nat
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'GetFederationTokenResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/GetSessionToken.hs b/gen/Network/AWS/STS/GetSessionToken.hs
--- a/gen/Network/AWS/STS/GetSessionToken.hs
+++ b/gen/Network/AWS/STS/GetSessionToken.hs
@@ -79,7 +79,7 @@
     { _gstDurationSeconds :: Maybe Nat
     , _gstSerialNumber    :: Maybe Text
     , _gstTokenCode       :: Maybe Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'GetSessionToken' constructor.
 --
@@ -129,7 +129,7 @@
 
 newtype GetSessionTokenResponse = GetSessionTokenResponse
     { _gstrCredentials :: Maybe Credentials
-    } deriving (Eq, Show)
+    } deriving (Eq, Read, Show)
 
 -- | 'GetSessionTokenResponse' constructor.
 --
diff --git a/gen/Network/AWS/STS/Types.hs b/gen/Network/AWS/STS/Types.hs
--- a/gen/Network/AWS/STS/Types.hs
+++ b/gen/Network/AWS/STS/Types.hs
@@ -108,7 +108,7 @@
     , _cExpiration      :: ISO8601
     , _cSecretAccessKey :: Text
     , _cSessionToken    :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'Credentials' constructor.
 --
@@ -169,7 +169,7 @@
 data FederatedUser = FederatedUser
     { _fuArn             :: Text
     , _fuFederatedUserId :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'FederatedUser' constructor.
 --
@@ -213,7 +213,7 @@
 data AssumedRoleUser = AssumedRoleUser
     { _aruArn           :: Text
     , _aruAssumedRoleId :: Text
-    } deriving (Eq, Ord, Show)
+    } deriving (Eq, Ord, Read, Show)
 
 -- | 'AssumedRoleUser' constructor.
 --