diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.3.3.1`
+`1.3.4`
 
 
 ## Description
diff --git a/amazonka-s3.cabal b/amazonka-s3.cabal
--- a/amazonka-s3.cabal
+++ b/amazonka-s3.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-s3
-version:               1.3.3.1
+version:               1.3.4
 synopsis:              Amazon Simple Storage Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -108,7 +108,7 @@
         , Network.AWS.S3.Types.Sum
 
     build-depends:
-          amazonka-core == 1.3.3.*
+          amazonka-core == 1.3.4.*
         , base          >= 4.7     && < 5
         , lens >= 4.4
         , text >= 1.1
@@ -130,9 +130,9 @@
         , Test.AWS.S3.Internal
 
     build-depends:
-          amazonka-core == 1.3.3.*
-        , amazonka-test == 1.3.3.*
-        , amazonka-s3 == 1.3.3.*
+          amazonka-core == 1.3.4.*
+        , amazonka-test == 1.3.4.*
+        , amazonka-s3 == 1.3.4.*
         , base
         , bytestring
         , lens
diff --git a/gen/Network/AWS/S3.hs b/gen/Network/AWS/S3.hs
--- a/gen/Network/AWS/S3.hs
+++ b/gen/Network/AWS/S3.hs
@@ -297,6 +297,9 @@
     -- ** Type
     , Type (..)
 
+    -- ** UploadPartRequestServerSideEncryption
+    , UploadPartRequestServerSideEncryption (..)
+
     -- ** AccessControlPolicy
     , AccessControlPolicy
     , accessControlPolicy
diff --git a/gen/Network/AWS/S3/CopyObject.hs b/gen/Network/AWS/S3/CopyObject.hs
--- a/gen/Network/AWS/S3/CopyObject.hs
+++ b/gen/Network/AWS/S3/CopyObject.hs
@@ -64,6 +64,7 @@
     , CopyObjectResponse
     -- * Response Lenses
     , corsRequestCharged
+    , corsVersionId
     , corsExpiration
     , corsSSECustomerAlgorithm
     , corsCopySourceVersionId
@@ -377,7 +378,8 @@
               (\ s h x ->
                  CopyObjectResponse' <$>
                    (h .#? "x-amz-request-charged") <*>
-                     (h .#? "x-amz-expiration")
+                     (h .#? "x-amz-version-id")
+                     <*> (h .#? "x-amz-expiration")
                      <*>
                      (h .#?
                         "x-amz-server-side-encryption-customer-algorithm")
@@ -446,6 +448,7 @@
 -- | /See:/ 'copyObjectResponse' smart constructor.
 data CopyObjectResponse = CopyObjectResponse'
     { _corsRequestCharged       :: !(Maybe RequestCharged)
+    , _corsVersionId            :: !(Maybe ObjectVersionId)
     , _corsExpiration           :: !(Maybe Text)
     , _corsSSECustomerAlgorithm :: !(Maybe Text)
     , _corsCopySourceVersionId  :: !(Maybe Text)
@@ -462,6 +465,8 @@
 --
 -- * 'corsRequestCharged'
 --
+-- * 'corsVersionId'
+--
 -- * 'corsExpiration'
 --
 -- * 'corsSSECustomerAlgorithm'
@@ -483,6 +488,7 @@
 copyObjectResponse pResponseStatus_ =
     CopyObjectResponse'
     { _corsRequestCharged = Nothing
+    , _corsVersionId = Nothing
     , _corsExpiration = Nothing
     , _corsSSECustomerAlgorithm = Nothing
     , _corsCopySourceVersionId = Nothing
@@ -496,6 +502,10 @@
 -- | Undocumented member.
 corsRequestCharged :: Lens' CopyObjectResponse (Maybe RequestCharged)
 corsRequestCharged = lens _corsRequestCharged (\ s a -> s{_corsRequestCharged = a});
+
+-- | Version ID of the newly created copy.
+corsVersionId :: Lens' CopyObjectResponse (Maybe ObjectVersionId)
+corsVersionId = lens _corsVersionId (\ s a -> s{_corsVersionId = a});
 
 -- | If the object expiration is configured, the response includes this
 -- header.
diff --git a/gen/Network/AWS/S3/Types.hs b/gen/Network/AWS/S3/Types.hs
--- a/gen/Network/AWS/S3/Types.hs
+++ b/gen/Network/AWS/S3/Types.hs
@@ -98,6 +98,9 @@
     -- * Type
     , Type (..)
 
+    -- * UploadPartRequestServerSideEncryption
+    , UploadPartRequestServerSideEncryption (..)
+
     -- * AccessControlPolicy
     , AccessControlPolicy
     , accessControlPolicy
diff --git a/gen/Network/AWS/S3/Types/Sum.hs b/gen/Network/AWS/S3/Types/Sum.hs
--- a/gen/Network/AWS/S3/Types/Sum.hs
+++ b/gen/Network/AWS/S3/Types/Sum.hs
@@ -732,3 +732,27 @@
 
 instance ToXML Type where
     toXML = toXMLText
+
+-- | The Server-side encryption algorithm used when storing this object in S3
+-- (e.g., AES256).
+data UploadPartRequestServerSideEncryption =
+    UPRSSEAES256
+    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+
+instance FromText UploadPartRequestServerSideEncryption where
+    parser = takeLowerText >>= \case
+        "aes256" -> pure UPRSSEAES256
+        e -> fromTextError $ "Failure parsing UploadPartRequestServerSideEncryption from value: '" <> e
+           <> "'. Accepted values: AES256"
+
+instance ToText UploadPartRequestServerSideEncryption where
+    toText = \case
+        UPRSSEAES256 -> "AES256"
+
+instance Hashable     UploadPartRequestServerSideEncryption
+instance ToByteString UploadPartRequestServerSideEncryption
+instance ToQuery      UploadPartRequestServerSideEncryption
+instance ToHeader     UploadPartRequestServerSideEncryption
+
+instance ToXML UploadPartRequestServerSideEncryption where
+    toXML = toXMLText
diff --git a/gen/Network/AWS/S3/UploadPart.hs b/gen/Network/AWS/S3/UploadPart.hs
--- a/gen/Network/AWS/S3/UploadPart.hs
+++ b/gen/Network/AWS/S3/UploadPart.hs
@@ -39,6 +39,7 @@
     , upRequestPayer
     , upSSECustomerKeyMD5
     , upContentMD5
+    , upServerSideEncryption
     , upBucket
     , upKey
     , upPartNumber
@@ -72,6 +73,7 @@
     , _upRequestPayer         :: !(Maybe RequestPayer)
     , _upSSECustomerKeyMD5    :: !(Maybe Text)
     , _upContentMD5           :: !(Maybe Text)
+    , _upServerSideEncryption :: !(Maybe UploadPartRequestServerSideEncryption)
     , _upBucket               :: !BucketName
     , _upKey                  :: !ObjectKey
     , _upPartNumber           :: !Int
@@ -95,6 +97,8 @@
 --
 -- * 'upContentMD5'
 --
+-- * 'upServerSideEncryption'
+--
 -- * 'upBucket'
 --
 -- * 'upKey'
@@ -119,6 +123,7 @@
     , _upRequestPayer = Nothing
     , _upSSECustomerKeyMD5 = Nothing
     , _upContentMD5 = Nothing
+    , _upServerSideEncryption = Nothing
     , _upBucket = pBucket_
     , _upKey = pKey_
     , _upPartNumber = pPartNumber_
@@ -161,6 +166,10 @@
 upContentMD5 = lens _upContentMD5 (\ s a -> s{_upContentMD5 = a});
 
 -- | Undocumented member.
+upServerSideEncryption :: Lens' UploadPart (Maybe UploadPartRequestServerSideEncryption)
+upServerSideEncryption = lens _upServerSideEncryption (\ s a -> s{_upServerSideEncryption = a});
+
+-- | Undocumented member.
 upBucket :: Lens' UploadPart BucketName
 upBucket = lens _upBucket (\ s a -> s{_upBucket = a});
 
@@ -214,7 +223,9 @@
                "x-amz-request-payer" =# _upRequestPayer,
                "x-amz-server-side-encryption-customer-key-MD5" =#
                  _upSSECustomerKeyMD5,
-               "Content-MD5" =# _upContentMD5]
+               "Content-MD5" =# _upContentMD5,
+               "x-amz-server-side-encryption" =#
+                 _upServerSideEncryption]
 
 instance ToPath UploadPart where
         toPath UploadPart'{..}