diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.3.6`
+`1.3.7`
 
 
 ## Description
diff --git a/amazonka-glacier.cabal b/amazonka-glacier.cabal
--- a/amazonka-glacier.cabal
+++ b/amazonka-glacier.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-glacier
-version:               1.3.6
+version:               1.3.7
 synopsis:              Amazon Glacier SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -113,7 +113,7 @@
         , Network.AWS.Glacier.Types.Sum
 
     build-depends:
-          amazonka-core == 1.3.6.*
+          amazonka-core == 1.3.7.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-glacier-test
@@ -133,12 +133,11 @@
         , Test.AWS.Glacier.Internal
 
     build-depends:
-          amazonka-core == 1.3.6.*
-        , amazonka-test == 1.3.6.*
-        , amazonka-glacier == 1.3.6.*
+          amazonka-core == 1.3.7.*
+        , amazonka-test == 1.3.7.*
+        , amazonka-glacier == 1.3.7.*
         , base
         , bytestring
-        , lens
         , tasty
         , tasty-hunit
         , text
diff --git a/gen/Network/AWS/Glacier/AbortMultipartUpload.hs b/gen/Network/AWS/Glacier/AbortMultipartUpload.hs
--- a/gen/Network/AWS/Glacier/AbortMultipartUpload.hs
+++ b/gen/Network/AWS/Glacier/AbortMultipartUpload.hs
@@ -59,6 +59,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/AbortVaultLock.hs b/gen/Network/AWS/Glacier/AbortVaultLock.hs
--- a/gen/Network/AWS/Glacier/AbortVaultLock.hs
+++ b/gen/Network/AWS/Glacier/AbortVaultLock.hs
@@ -54,6 +54,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/AddTagsToVault.hs b/gen/Network/AWS/Glacier/AddTagsToVault.hs
--- a/gen/Network/AWS/Glacier/AddTagsToVault.hs
+++ b/gen/Network/AWS/Glacier/AddTagsToVault.hs
@@ -44,6 +44,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/CompleteMultipartUpload.hs b/gen/Network/AWS/Glacier/CompleteMultipartUpload.hs
--- a/gen/Network/AWS/Glacier/CompleteMultipartUpload.hs
+++ b/gen/Network/AWS/Glacier/CompleteMultipartUpload.hs
@@ -90,6 +90,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/CompleteVaultLock.hs b/gen/Network/AWS/Glacier/CompleteVaultLock.hs
--- a/gen/Network/AWS/Glacier/CompleteVaultLock.hs
+++ b/gen/Network/AWS/Glacier/CompleteVaultLock.hs
@@ -54,6 +54,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/CreateVault.hs b/gen/Network/AWS/Glacier/CreateVault.hs
--- a/gen/Network/AWS/Glacier/CreateVault.hs
+++ b/gen/Network/AWS/Glacier/CreateVault.hs
@@ -64,6 +64,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DeleteArchive.hs b/gen/Network/AWS/Glacier/DeleteArchive.hs
--- a/gen/Network/AWS/Glacier/DeleteArchive.hs
+++ b/gen/Network/AWS/Glacier/DeleteArchive.hs
@@ -63,6 +63,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DeleteVault.hs b/gen/Network/AWS/Glacier/DeleteVault.hs
--- a/gen/Network/AWS/Glacier/DeleteVault.hs
+++ b/gen/Network/AWS/Glacier/DeleteVault.hs
@@ -61,6 +61,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DeleteVaultAccessPolicy.hs b/gen/Network/AWS/Glacier/DeleteVaultAccessPolicy.hs
--- a/gen/Network/AWS/Glacier/DeleteVaultAccessPolicy.hs
+++ b/gen/Network/AWS/Glacier/DeleteVaultAccessPolicy.hs
@@ -46,6 +46,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DeleteVaultNotifications.hs b/gen/Network/AWS/Glacier/DeleteVaultNotifications.hs
--- a/gen/Network/AWS/Glacier/DeleteVaultNotifications.hs
+++ b/gen/Network/AWS/Glacier/DeleteVaultNotifications.hs
@@ -53,6 +53,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DescribeJob.hs b/gen/Network/AWS/Glacier/DescribeJob.hs
--- a/gen/Network/AWS/Glacier/DescribeJob.hs
+++ b/gen/Network/AWS/Glacier/DescribeJob.hs
@@ -78,6 +78,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/DescribeVault.hs b/gen/Network/AWS/Glacier/DescribeVault.hs
--- a/gen/Network/AWS/Glacier/DescribeVault.hs
+++ b/gen/Network/AWS/Glacier/DescribeVault.hs
@@ -65,6 +65,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/GetDataRetrievalPolicy.hs b/gen/Network/AWS/Glacier/GetDataRetrievalPolicy.hs
--- a/gen/Network/AWS/Glacier/GetDataRetrievalPolicy.hs
+++ b/gen/Network/AWS/Glacier/GetDataRetrievalPolicy.hs
@@ -42,6 +42,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/GetJobOutput.hs b/gen/Network/AWS/Glacier/GetJobOutput.hs
--- a/gen/Network/AWS/Glacier/GetJobOutput.hs
+++ b/gen/Network/AWS/Glacier/GetJobOutput.hs
@@ -93,6 +93,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/GetVaultAccessPolicy.hs b/gen/Network/AWS/Glacier/GetVaultAccessPolicy.hs
--- a/gen/Network/AWS/Glacier/GetVaultAccessPolicy.hs
+++ b/gen/Network/AWS/Glacier/GetVaultAccessPolicy.hs
@@ -46,6 +46,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/GetVaultLock.hs b/gen/Network/AWS/Glacier/GetVaultLock.hs
--- a/gen/Network/AWS/Glacier/GetVaultLock.hs
+++ b/gen/Network/AWS/Glacier/GetVaultLock.hs
@@ -66,6 +66,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/GetVaultNotifications.hs b/gen/Network/AWS/Glacier/GetVaultNotifications.hs
--- a/gen/Network/AWS/Glacier/GetVaultNotifications.hs
+++ b/gen/Network/AWS/Glacier/GetVaultNotifications.hs
@@ -59,6 +59,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/InitiateJob.hs b/gen/Network/AWS/Glacier/InitiateJob.hs
--- a/gen/Network/AWS/Glacier/InitiateJob.hs
+++ b/gen/Network/AWS/Glacier/InitiateJob.hs
@@ -169,6 +169,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/InitiateMultipartUpload.hs b/gen/Network/AWS/Glacier/InitiateMultipartUpload.hs
--- a/gen/Network/AWS/Glacier/InitiateMultipartUpload.hs
+++ b/gen/Network/AWS/Glacier/InitiateMultipartUpload.hs
@@ -79,6 +79,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/InitiateVaultLock.hs b/gen/Network/AWS/Glacier/InitiateVaultLock.hs
--- a/gen/Network/AWS/Glacier/InitiateVaultLock.hs
+++ b/gen/Network/AWS/Glacier/InitiateVaultLock.hs
@@ -73,6 +73,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/ListJobs.hs b/gen/Network/AWS/Glacier/ListJobs.hs
--- a/gen/Network/AWS/Glacier/ListJobs.hs
+++ b/gen/Network/AWS/Glacier/ListJobs.hs
@@ -90,6 +90,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Pager
 import           Network.AWS.Prelude
 import           Network.AWS.Request
diff --git a/gen/Network/AWS/Glacier/ListMultipartUploads.hs b/gen/Network/AWS/Glacier/ListMultipartUploads.hs
--- a/gen/Network/AWS/Glacier/ListMultipartUploads.hs
+++ b/gen/Network/AWS/Glacier/ListMultipartUploads.hs
@@ -77,6 +77,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Pager
 import           Network.AWS.Prelude
 import           Network.AWS.Request
diff --git a/gen/Network/AWS/Glacier/ListParts.hs b/gen/Network/AWS/Glacier/ListParts.hs
--- a/gen/Network/AWS/Glacier/ListParts.hs
+++ b/gen/Network/AWS/Glacier/ListParts.hs
@@ -77,6 +77,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Pager
 import           Network.AWS.Prelude
 import           Network.AWS.Request
diff --git a/gen/Network/AWS/Glacier/ListTagsForVault.hs b/gen/Network/AWS/Glacier/ListTagsForVault.hs
--- a/gen/Network/AWS/Glacier/ListTagsForVault.hs
+++ b/gen/Network/AWS/Glacier/ListTagsForVault.hs
@@ -43,6 +43,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/ListVaults.hs b/gen/Network/AWS/Glacier/ListVaults.hs
--- a/gen/Network/AWS/Glacier/ListVaults.hs
+++ b/gen/Network/AWS/Glacier/ListVaults.hs
@@ -66,6 +66,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Pager
 import           Network.AWS.Prelude
 import           Network.AWS.Request
diff --git a/gen/Network/AWS/Glacier/RemoveTagsFromVault.hs b/gen/Network/AWS/Glacier/RemoveTagsFromVault.hs
--- a/gen/Network/AWS/Glacier/RemoveTagsFromVault.hs
+++ b/gen/Network/AWS/Glacier/RemoveTagsFromVault.hs
@@ -42,6 +42,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/SetDataRetrievalPolicy.hs b/gen/Network/AWS/Glacier/SetDataRetrievalPolicy.hs
--- a/gen/Network/AWS/Glacier/SetDataRetrievalPolicy.hs
+++ b/gen/Network/AWS/Glacier/SetDataRetrievalPolicy.hs
@@ -45,6 +45,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/SetVaultAccessPolicy.hs b/gen/Network/AWS/Glacier/SetVaultAccessPolicy.hs
--- a/gen/Network/AWS/Glacier/SetVaultAccessPolicy.hs
+++ b/gen/Network/AWS/Glacier/SetVaultAccessPolicy.hs
@@ -44,6 +44,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/SetVaultNotifications.hs b/gen/Network/AWS/Glacier/SetVaultNotifications.hs
--- a/gen/Network/AWS/Glacier/SetVaultNotifications.hs
+++ b/gen/Network/AWS/Glacier/SetVaultNotifications.hs
@@ -72,6 +72,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/Types.hs b/gen/Network/AWS/Glacier/Types.hs
--- a/gen/Network/AWS/Glacier/Types.hs
+++ b/gen/Network/AWS/Glacier/Types.hs
@@ -141,6 +141,7 @@
 
 import           Network.AWS.Glacier.Types.Product
 import           Network.AWS.Glacier.Types.Sum
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Sign.V4
 
diff --git a/gen/Network/AWS/Glacier/Types/Product.hs b/gen/Network/AWS/Glacier/Types/Product.hs
--- a/gen/Network/AWS/Glacier/Types/Product.hs
+++ b/gen/Network/AWS/Glacier/Types/Product.hs
@@ -18,6 +18,7 @@
 module Network.AWS.Glacier.Types.Product where
 
 import           Network.AWS.Glacier.Types.Sum
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 
 -- | Contains the Amazon Glacier response to your request.
diff --git a/gen/Network/AWS/Glacier/Types/Sum.hs b/gen/Network/AWS/Glacier/Types/Sum.hs
--- a/gen/Network/AWS/Glacier/Types/Sum.hs
+++ b/gen/Network/AWS/Glacier/Types/Sum.hs
@@ -22,7 +22,7 @@
 data ActionCode
     = ArchiveRetrieval
     | InventoryRetrieval
-    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
 
 instance FromText ActionCode where
     parser = takeLowerText >>= \case
@@ -48,7 +48,7 @@
     = Failed
     | InProgress
     | Succeeded
-    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
 
 instance FromText StatusCode where
     parser = takeLowerText >>= \case
diff --git a/gen/Network/AWS/Glacier/UploadArchive.hs b/gen/Network/AWS/Glacier/UploadArchive.hs
--- a/gen/Network/AWS/Glacier/UploadArchive.hs
+++ b/gen/Network/AWS/Glacier/UploadArchive.hs
@@ -84,6 +84,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/UploadMultipartPart.hs b/gen/Network/AWS/Glacier/UploadMultipartPart.hs
--- a/gen/Network/AWS/Glacier/UploadMultipartPart.hs
+++ b/gen/Network/AWS/Glacier/UploadMultipartPart.hs
@@ -91,6 +91,7 @@
 
 import           Network.AWS.Glacier.Types
 import           Network.AWS.Glacier.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/Glacier/Waiters.hs b/gen/Network/AWS/Glacier/Waiters.hs
--- a/gen/Network/AWS/Glacier/Waiters.hs
+++ b/gen/Network/AWS/Glacier/Waiters.hs
@@ -16,5 +16,6 @@
 module Network.AWS.Glacier.Waiters where
 
 import           Network.AWS.Glacier.Types
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Waiter