diff --git a/amazonka-storagegateway.cabal b/amazonka-storagegateway.cabal
--- a/amazonka-storagegateway.cabal
+++ b/amazonka-storagegateway.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-storagegateway
-version:               0.2.2
+version:               0.2.3
 synopsis:              Amazon Storage Gateway SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -89,5 +89,5 @@
     other-modules:
 
     build-depends:
-          amazonka-core == 0.2.2.*
+          amazonka-core == 0.2.3.*
         , base          >= 4.7     && < 5
diff --git a/gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs b/gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs
--- a/gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs
+++ b/gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs
@@ -157,6 +157,6 @@
 
 instance AWSPager DescribeTapeArchives where
     page rq rs
-        | stop (rq ^. dtaMarker) = Nothing
+        | stop (rs ^. dtarMarker) = Nothing
         | otherwise = (\x -> rq & dtaMarker ?~ x)
             <$> (rs ^. dtarMarker)
diff --git a/gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs b/gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs
--- a/gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs
+++ b/gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs
@@ -166,6 +166,6 @@
 
 instance AWSPager DescribeTapeRecoveryPoints where
     page rq rs
-        | stop (rq ^. dtrpMarker) = Nothing
+        | stop (rs ^. dtrprMarker) = Nothing
         | otherwise = (\x -> rq & dtrpMarker ?~ x)
             <$> (rs ^. dtrprMarker)
diff --git a/gen/Network/AWS/StorageGateway/DescribeTapes.hs b/gen/Network/AWS/StorageGateway/DescribeTapes.hs
--- a/gen/Network/AWS/StorageGateway/DescribeTapes.hs
+++ b/gen/Network/AWS/StorageGateway/DescribeTapes.hs
@@ -166,6 +166,6 @@
 
 instance AWSPager DescribeTapes where
     page rq rs
-        | stop (rq ^. dtMarker) = Nothing
+        | stop (rs ^. dtrMarker) = Nothing
         | otherwise = (\x -> rq & dtMarker ?~ x)
             <$> (rs ^. dtrMarker)
diff --git a/gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs b/gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs
--- a/gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs
+++ b/gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs
@@ -176,6 +176,6 @@
 
 instance AWSPager DescribeVTLDevices where
     page rq rs
-        | stop (rq ^. dvtldMarker) = Nothing
+        | stop (rs ^. dvtldrMarker) = Nothing
         | otherwise = (\x -> rq & dvtldMarker ?~ x)
             <$> (rs ^. dvtldrMarker)
diff --git a/gen/Network/AWS/StorageGateway/ListGateways.hs b/gen/Network/AWS/StorageGateway/ListGateways.hs
--- a/gen/Network/AWS/StorageGateway/ListGateways.hs
+++ b/gen/Network/AWS/StorageGateway/ListGateways.hs
@@ -142,6 +142,6 @@
 
 instance AWSPager ListGateways where
     page rq rs
-        | stop (rq ^. lgMarker) = Nothing
+        | stop (rs ^. lgrMarker) = Nothing
         | otherwise = (\x -> rq & lgMarker ?~ x)
             <$> (rs ^. lgrMarker)
diff --git a/gen/Network/AWS/StorageGateway/ListVolumes.hs b/gen/Network/AWS/StorageGateway/ListVolumes.hs
--- a/gen/Network/AWS/StorageGateway/ListVolumes.hs
+++ b/gen/Network/AWS/StorageGateway/ListVolumes.hs
@@ -160,6 +160,6 @@
 
 instance AWSPager ListVolumes where
     page rq rs
-        | stop (rq ^. lvMarker) = Nothing
+        | stop (rs ^. lvrMarker) = Nothing
         | otherwise = (\x -> rq & lvMarker ?~ x)
             <$> (rs ^. lvrMarker)