Regenerating AWSPager instances for all services

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs

@@ -151,6 +151,6 @@ instance FromXML DescribeAutoScalingGroupsResponse where
 
 instance AWSPager DescribeAutoScalingGroups where
     page rq rs
-        | stop (rq ^. dasgNextToken) = Nothing
+        | stop (rs ^. dasgrNextToken) = Nothing
         | otherwise = (\x -> rq & dasgNextToken ?~ x)
             <$> (rs ^. dasgrNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs

@@ -151,6 +151,6 @@ instance FromXML DescribeAutoScalingInstancesResponse where
 
 instance AWSPager DescribeAutoScalingInstances where
     page rq rs
-        | stop (rq ^. dasiNextToken) = Nothing
+        | stop (rs ^. dasirNextToken) = Nothing
         | otherwise = (\x -> rq & dasiNextToken ?~ x)
             <$> (rs ^. dasirNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs

@@ -152,6 +152,6 @@ instance FromXML DescribeLaunchConfigurationsResponse where
 
 instance AWSPager DescribeLaunchConfigurations where
     page rq rs
-        | stop (rq ^. dlcNextToken) = Nothing
+        | stop (rs ^. dlcrNextToken) = Nothing
         | otherwise = (\x -> rq & dlcNextToken ?~ x)
             <$> (rs ^. dlcrNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs

@@ -147,6 +147,6 @@ instance FromXML DescribeNotificationConfigurationsResponse where
 
 instance AWSPager DescribeNotificationConfigurations where
     page rq rs
-        | stop (rq ^. dncNextToken) = Nothing
+        | stop (rs ^. dncrNextToken) = Nothing
         | otherwise = (\x -> rq & dncNextToken ?~ x)
             <$> (rs ^. dncrNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribePolicies.hs

@@ -161,6 +161,6 @@ instance FromXML DescribePoliciesResponse where
 
 instance AWSPager DescribePolicies where
     page rq rs
-        | stop (rq ^. dp1NextToken) = Nothing
+        | stop (rs ^. dprNextToken) = Nothing
         | otherwise = (\x -> rq & dp1NextToken ?~ x)
             <$> (rs ^. dprNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs

@@ -164,6 +164,6 @@ instance FromXML DescribeScalingActivitiesResponse where
 
 instance AWSPager DescribeScalingActivities where
     page rq rs
-        | stop (rq ^. dsa2NextToken) = Nothing
+        | stop (rs ^. dsar1NextToken) = Nothing
         | otherwise = (\x -> rq & dsa2NextToken ?~ x)
             <$> (rs ^. dsar1NextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs

@@ -187,6 +187,6 @@ instance FromXML DescribeScheduledActionsResponse where
 
 instance AWSPager DescribeScheduledActions where
     page rq rs
-        | stop (rq ^. dsa1NextToken) = Nothing
+        | stop (rs ^. dsarNextToken) = Nothing
         | otherwise = (\x -> rq & dsa1NextToken ?~ x)
             <$> (rs ^. dsarNextToken)

amazonka-autoscaling/gen/Network/AWS/AutoScaling/DescribeTags.hs

@@ -152,6 +152,6 @@ instance FromXML DescribeTagsResponse where
 
 instance AWSPager DescribeTags where
     page rq rs
-        | stop (rq ^. dtNextToken) = Nothing
+        | stop (rs ^. dtrNextToken) = Nothing
         | otherwise = (\x -> rq & dtNextToken ?~ x)
             <$> (rs ^. dtrNextToken)

amazonka-cloudformation/gen/Network/AWS/CloudFormation/DescribeStackEvents.hs

@@ -140,6 +140,6 @@ instance FromXML DescribeStackEventsResponse where
 
 instance AWSPager DescribeStackEvents where
     page rq rs
-        | stop (rq ^. dseNextToken) = Nothing
+        | stop (rs ^. dserNextToken) = Nothing
         | otherwise = (\x -> rq & dseNextToken ?~ x)
             <$> (rs ^. dserNextToken)

amazonka-cloudformation/gen/Network/AWS/CloudFormation/DescribeStacks.hs

@@ -134,6 +134,6 @@ instance FromXML DescribeStacksResponse where
 
 instance AWSPager DescribeStacks where
     page rq rs
-        | stop (rq ^. ds1NextToken) = Nothing
+        | stop (rs ^. dsrNextToken) = Nothing
         | otherwise = (\x -> rq & ds1NextToken ?~ x)
             <$> (rs ^. dsrNextToken)

amazonka-cloudformation/gen/Network/AWS/CloudFormation/ListStackResources.hs

@@ -144,6 +144,6 @@ instance FromXML ListStackResourcesResponse where
 
 instance AWSPager ListStackResources where
     page rq rs
-        | stop (rq ^. lsrNextToken) = Nothing
+        | stop (rs ^. lsrrNextToken) = Nothing
         | otherwise = (\x -> rq & lsrNextToken ?~ x)
             <$> (rs ^. lsrrNextToken)

amazonka-cloudformation/gen/Network/AWS/CloudFormation/ListStacks.hs

@@ -141,6 +141,6 @@ instance FromXML ListStacksResponse where
 
 instance AWSPager ListStacks where
     page rq rs
-        | stop (rq ^. lsNextToken) = Nothing
+        | stop (rs ^. lsr1NextToken) = Nothing
         | otherwise = (\x -> rq & lsNextToken ?~ x)
             <$> (rs ^. lsr1NextToken)

amazonka-cloudwatch/gen/Network/AWS/CloudWatch/DescribeAlarmHistory.hs

@@ -174,6 +174,6 @@ instance FromXML DescribeAlarmHistoryResponse where
 
 instance AWSPager DescribeAlarmHistory where
     page rq rs
-        | stop (rq ^. dahNextToken) = Nothing
+        | stop (rs ^. dahrNextToken) = Nothing
         | otherwise = (\x -> rq & dahNextToken ?~ x)
             <$> (rs ^. dahrNextToken)

amazonka-cloudwatch/gen/Network/AWS/CloudWatch/DescribeAlarms.hs

@@ -173,6 +173,6 @@ instance FromXML DescribeAlarmsResponse where
 
 instance AWSPager DescribeAlarms where
     page rq rs
-        | stop (rq ^. daNextToken) = Nothing
+        | stop (rs ^. darNextToken) = Nothing
         | otherwise = (\x -> rq & daNextToken ?~ x)
             <$> (rs ^. darNextToken)

amazonka-cloudwatch/gen/Network/AWS/CloudWatch/ListMetrics.hs

@@ -151,6 +151,6 @@ instance FromXML ListMetricsResponse where
 
 instance AWSPager ListMetrics where
     page rq rs
-        | stop (rq ^. lmNextToken) = Nothing
+        | stop (rs ^. lmrNextToken) = Nothing
         | otherwise = (\x -> rq & lmNextToken ?~ x)
             <$> (rs ^. lmrNextToken)

amazonka-dynamodb/gen/Network/AWS/DynamoDB/ListTables.hs

@@ -150,6 +150,6 @@ instance FromJSON ListTablesResponse where
 
 instance AWSPager ListTables where
     page rq rs
-        | stop (rq ^. ltExclusiveStartTableName) = Nothing
+        | stop (rs ^. ltrLastEvaluatedTableName) = Nothing
         | otherwise = (\x -> rq & ltExclusiveStartTableName ?~ x)
             <$> (rs ^. ltrLastEvaluatedTableName)

amazonka-dynamodb/gen/Network/AWS/DynamoDB/Query.hs

@@ -646,6 +646,6 @@ instance FromJSON QueryResponse where
 
 instance AWSPager Query where
     page rq rs
-        | stop (rq ^. qExclusiveStartKey) = Nothing
+        | stop (rs ^. qrLastEvaluatedKey) = Nothing
         | otherwise = Just $ rq
             & qExclusiveStartKey .~ rs ^. qrLastEvaluatedKey

amazonka-dynamodb/gen/Network/AWS/DynamoDB/Scan.hs

@@ -501,6 +501,6 @@ instance FromJSON ScanResponse where
 
 instance AWSPager Scan where
     page rq rs
-        | stop (rq ^. sExclusiveStartKey) = Nothing
+        | stop (rs ^. srLastEvaluatedKey) = Nothing
         | otherwise = Just $ rq
             & sExclusiveStartKey .~ rs ^. srLastEvaluatedKey

amazonka-ec2/gen/Network/AWS/EC2/DescribeInstanceStatus.hs

@@ -268,6 +268,6 @@ instance FromXML DescribeInstanceStatusResponse where
 
 instance AWSPager DescribeInstanceStatus where
     page rq rs
-        | stop (rq ^. disNextToken) = Nothing
+        | stop (rs ^. disrNextToken) = Nothing
         | otherwise = (\x -> rq & disNextToken ?~ x)
             <$> (rs ^. disrNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeInstances.hs

@@ -395,6 +395,6 @@ instance FromXML DescribeInstancesResponse where
 
 instance AWSPager DescribeInstances where
     page rq rs
-        | stop (rq ^. di1NextToken) = Nothing
+        | stop (rs ^. dirNextToken) = Nothing
         | otherwise = (\x -> rq & di1NextToken ?~ x)
             <$> (rs ^. dirNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeReservedInstancesModifications.hs

@@ -184,6 +184,6 @@ instance FromXML DescribeReservedInstancesModificationsResponse where
 
 instance AWSPager DescribeReservedInstancesModifications where
     page rq rs
-        | stop (rq ^. drimNextToken) = Nothing
+        | stop (rs ^. drimrNextToken) = Nothing
         | otherwise = (\x -> rq & drimNextToken ?~ x)
             <$> (rs ^. drimrNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeReservedInstancesOfferings.hs

@@ -304,6 +304,6 @@ instance FromXML DescribeReservedInstancesOfferingsResponse where
 
 instance AWSPager DescribeReservedInstancesOfferings where
     page rq rs
-        | stop (rq ^. drioNextToken) = Nothing
+        | stop (rs ^. driorNextToken) = Nothing
         | otherwise = (\x -> rq & drioNextToken ?~ x)
             <$> (rs ^. driorNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeSpotPriceHistory.hs

@@ -240,6 +240,6 @@ instance FromXML DescribeSpotPriceHistoryResponse where
 
 instance AWSPager DescribeSpotPriceHistory where
     page rq rs
-        | stop (rq ^. dsphNextToken) = Nothing
+        | stop (rs ^. dsphrNextToken) = Nothing
         | otherwise = (\x -> rq & dsphNextToken ?~ x)
             <$> (rs ^. dsphrNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeTags.hs

@@ -165,6 +165,6 @@ instance FromXML DescribeTagsResponse where
 
 instance AWSPager DescribeTags where
     page rq rs
-        | stop (rq ^. dtNextToken) = Nothing
+        | stop (rs ^. dtrNextToken) = Nothing
         | otherwise = (\x -> rq & dtNextToken ?~ x)
             <$> (rs ^. dtrNextToken)

amazonka-ec2/gen/Network/AWS/EC2/DescribeVolumeStatus.hs

@@ -226,6 +226,6 @@ instance FromXML DescribeVolumeStatusResponse where
 
 instance AWSPager DescribeVolumeStatus where
     page rq rs
-        | stop (rq ^. dvsNextToken) = Nothing
+        | stop (rs ^. dvsrNextToken) = Nothing
         | otherwise = (\x -> rq & dvsNextToken ?~ x)
             <$> (rs ^. dvsrNextToken)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheClusters.hs

@@ -185,6 +185,6 @@ instance FromXML DescribeCacheClustersResponse where
 
 instance AWSPager DescribeCacheClusters where
     page rq rs
-        | stop (rq ^. dcc1Marker) = Nothing
+        | stop (rs ^. dccrMarker) = Nothing
         | otherwise = (\x -> rq & dcc1Marker ?~ x)
             <$> (rs ^. dccrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheEngineVersions.hs

@@ -193,6 +193,6 @@ instance FromXML DescribeCacheEngineVersionsResponse where
 
 instance AWSPager DescribeCacheEngineVersions where
     page rq rs
-        | stop (rq ^. dcevMarker) = Nothing
+        | stop (rs ^. dcevrMarker) = Nothing
         | otherwise = (\x -> rq & dcevMarker ?~ x)
             <$> (rs ^. dcevrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheParameterGroups.hs

@@ -155,6 +155,6 @@ instance FromXML DescribeCacheParameterGroupsResponse where
 
 instance AWSPager DescribeCacheParameterGroups where
     page rq rs
-        | stop (rq ^. dcpgMarker) = Nothing
+        | stop (rs ^. dcpgrMarker) = Nothing
         | otherwise = (\x -> rq & dcpgMarker ?~ x)
             <$> (rs ^. dcpgrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheParameters.hs

@@ -177,6 +177,6 @@ instance FromXML DescribeCacheParametersResponse where
 
 instance AWSPager DescribeCacheParameters where
     page rq rs
-        | stop (rq ^. dcpMarker) = Nothing
+        | stop (rs ^. dcprMarker) = Nothing
         | otherwise = (\x -> rq & dcpMarker ?~ x)
             <$> (rs ^. dcprMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheSecurityGroups.hs

@@ -155,6 +155,6 @@ instance FromXML DescribeCacheSecurityGroupsResponse where
 
 instance AWSPager DescribeCacheSecurityGroups where
     page rq rs
-        | stop (rq ^. dcsg1Marker) = Nothing
+        | stop (rs ^. dcsgr1Marker) = Nothing
         | otherwise = (\x -> rq & dcsg1Marker ?~ x)
             <$> (rs ^. dcsgr1Marker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeCacheSubnetGroups.hs

@@ -154,6 +154,6 @@ instance FromXML DescribeCacheSubnetGroupsResponse where
 
 instance AWSPager DescribeCacheSubnetGroups where
     page rq rs
-        | stop (rq ^. dcsgMarker) = Nothing
+        | stop (rs ^. dcsgrMarker) = Nothing
         | otherwise = (\x -> rq & dcsgMarker ?~ x)
             <$> (rs ^. dcsgrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeEngineDefaultParameters.hs

@@ -143,6 +143,6 @@ instance FromXML DescribeEngineDefaultParametersResponse where
 
 instance AWSPager DescribeEngineDefaultParameters where
     page rq rs
-        | stop (rq ^. dedpMarker) = Nothing
+        | stop (rs ^. dedprEngineDefaults . edMarker) = Nothing
         | otherwise = (\x -> rq & dedpMarker ?~ x)
             <$> (rs ^. dedprEngineDefaults . edMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeEvents.hs

@@ -201,6 +201,6 @@ instance FromXML DescribeEventsResponse where
 
 instance AWSPager DescribeEvents where
     page rq rs
-        | stop (rq ^. deMarker) = Nothing
+        | stop (rs ^. derMarker) = Nothing
         | otherwise = (\x -> rq & deMarker ?~ x)
             <$> (rs ^. derMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeReplicationGroups.hs

@@ -156,6 +156,6 @@ instance FromXML DescribeReplicationGroupsResponse where
 
 instance AWSPager DescribeReplicationGroups where
     page rq rs
-        | stop (rq ^. drg1Marker) = Nothing
+        | stop (rs ^. drgrMarker) = Nothing
         | otherwise = (\x -> rq & drg1Marker ?~ x)
             <$> (rs ^. drgrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeReservedCacheNodes.hs

@@ -216,6 +216,6 @@ instance FromXML DescribeReservedCacheNodesResponse where
 
 instance AWSPager DescribeReservedCacheNodes where
     page rq rs
-        | stop (rq ^. drcnMarker) = Nothing
+        | stop (rs ^. drcnrMarker) = Nothing
         | otherwise = (\x -> rq & drcnMarker ?~ x)
             <$> (rs ^. drcnrMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeReservedCacheNodesOfferings.hs

@@ -208,6 +208,6 @@ instance FromXML DescribeReservedCacheNodesOfferingsResponse where
 
 instance AWSPager DescribeReservedCacheNodesOfferings where
     page rq rs
-        | stop (rq ^. drcnoMarker) = Nothing
+        | stop (rs ^. drcnorMarker) = Nothing
         | otherwise = (\x -> rq & drcnoMarker ?~ x)
             <$> (rs ^. drcnorMarker)

amazonka-elasticache/gen/Network/AWS/ElastiCache/DescribeSnapshots.hs

@@ -179,6 +179,6 @@ instance FromXML DescribeSnapshotsResponse where
 
 instance AWSPager DescribeSnapshots where
     page rq rs
-        | stop (rq ^. dsMarker) = Nothing
+        | stop (rs ^. dsrMarker) = Nothing
         | otherwise = (\x -> rq & dsMarker ?~ x)
             <$> (rs ^. dsrMarker)

amazonka-elasticbeanstalk/gen/Network/AWS/ElasticBeanstalk/DescribeEvents.hs

@@ -231,6 +231,6 @@ instance FromXML DescribeEventsResponse where
 
 instance AWSPager DescribeEvents where
     page rq rs
-        | stop (rq ^. deNextToken) = Nothing
+        | stop (rs ^. derNextToken) = Nothing
         | otherwise = (\x -> rq & deNextToken ?~ x)
             <$> (rs ^. derNextToken)

amazonka-elastictranscoder/gen/Network/AWS/ElasticTranscoder/ListJobsByPipeline.hs

@@ -154,6 +154,6 @@ instance FromJSON ListJobsByPipelineResponse where
 
 instance AWSPager ListJobsByPipeline where
     page rq rs
-        | stop (rq ^. ljbpPageToken) = Nothing
+        | stop (rs ^. ljbprNextPageToken) = Nothing
         | otherwise = (\x -> rq & ljbpPageToken ?~ x)
             <$> (rs ^. ljbprNextPageToken)

amazonka-elastictranscoder/gen/Network/AWS/ElasticTranscoder/ListJobsByStatus.hs

@@ -152,6 +152,6 @@ instance FromJSON ListJobsByStatusResponse where
 
 instance AWSPager ListJobsByStatus where
     page rq rs
-        | stop (rq ^. ljbsPageToken) = Nothing
+        | stop (rs ^. ljbsrNextPageToken) = Nothing
         | otherwise = (\x -> rq & ljbsPageToken ?~ x)
             <$> (rs ^. ljbsrNextPageToken)

amazonka-elastictranscoder/gen/Network/AWS/ElasticTranscoder/ListPipelines.hs

@@ -136,6 +136,6 @@ instance FromJSON ListPipelinesResponse where
 
 instance AWSPager ListPipelines where
     page rq rs
-        | stop (rq ^. lpPageToken) = Nothing
+        | stop (rs ^. lprNextPageToken) = Nothing
         | otherwise = (\x -> rq & lpPageToken ?~ x)
             <$> (rs ^. lprNextPageToken)

amazonka-elastictranscoder/gen/Network/AWS/ElasticTranscoder/ListPresets.hs

@@ -137,6 +137,6 @@ instance FromJSON ListPresetsResponse where
 
 instance AWSPager ListPresets where
     page rq rs
-        | stop (rq ^. lp1PageToken) = Nothing
+        | stop (rs ^. lpr1NextPageToken) = Nothing
         | otherwise = (\x -> rq & lp1PageToken ?~ x)
             <$> (rs ^. lpr1NextPageToken)

amazonka-elb/gen/Network/AWS/ELB/DescribeLoadBalancers.hs

@@ -151,6 +151,6 @@ instance FromXML DescribeLoadBalancersResponse where
 
 instance AWSPager DescribeLoadBalancers where
     page rq rs
-        | stop (rq ^. dlbMarker) = Nothing
+        | stop (rs ^. dlbrNextMarker) = Nothing
         | otherwise = (\x -> rq & dlbMarker ?~ x)
             <$> (rs ^. dlbrNextMarker)

amazonka-emr/gen/Network/AWS/EMR/ListBootstrapActions.hs

@@ -134,6 +134,6 @@ instance FromJSON ListBootstrapActionsResponse where
 
 instance AWSPager ListBootstrapActions where
     page rq rs
-        | stop (rq ^. lbaMarker) = Nothing
+        | stop (rs ^. lbarMarker) = Nothing
         | otherwise = (\x -> rq & lbaMarker ?~ x)
             <$> (rs ^. lbarMarker)

amazonka-emr/gen/Network/AWS/EMR/ListClusters.hs

@@ -155,6 +155,6 @@ instance FromJSON ListClustersResponse where
 
 instance AWSPager ListClusters where
     page rq rs
-        | stop (rq ^. lcMarker) = Nothing
+        | stop (rs ^. lcrMarker) = Nothing
         | otherwise = (\x -> rq & lcMarker ?~ x)
             <$> (rs ^. lcrMarker)

amazonka-emr/gen/Network/AWS/EMR/ListInstanceGroups.hs

@@ -134,6 +134,6 @@ instance FromJSON ListInstanceGroupsResponse where
 
 instance AWSPager ListInstanceGroups where
     page rq rs
-        | stop (rq ^. ligMarker) = Nothing
+        | stop (rs ^. ligrMarker) = Nothing
         | otherwise = (\x -> rq & ligMarker ?~ x)
             <$> (rs ^. ligrMarker)

amazonka-emr/gen/Network/AWS/EMR/ListInstances.hs

@@ -159,6 +159,6 @@ instance FromJSON ListInstancesResponse where
 
 instance AWSPager ListInstances where
     page rq rs
-        | stop (rq ^. liMarker) = Nothing
+        | stop (rs ^. lirMarker) = Nothing
         | otherwise = (\x -> rq & liMarker ?~ x)
             <$> (rs ^. lirMarker)

amazonka-emr/gen/Network/AWS/EMR/ListSteps.hs

@@ -152,6 +152,6 @@ instance FromJSON ListStepsResponse where
 
 instance AWSPager ListSteps where
     page rq rs
-        | stop (rq ^. lsMarker) = Nothing
+        | stop (rs ^. lsrMarker) = Nothing
         | otherwise = (\x -> rq & lsMarker ?~ x)
             <$> (rs ^. lsrMarker)

amazonka-rds/gen/Network/AWS/RDS/DescribeDBEngineVersions.hs

@@ -214,6 +214,6 @@ instance FromXML DescribeDBEngineVersionsResponse where
 
 instance AWSPager DescribeDBEngineVersions where
     page rq rs
-        | stop (rq ^. ddbevMarker) = Nothing
+        | stop (rs ^. ddbevrMarker) = Nothing
         | otherwise = (\x -> rq & ddbevMarker ?~ x)
             <$> (rs ^. ddbevrMarker)

amazonka-rds/gen/Network/AWS/RDS/DescribeDBInstances.hs

@@ -169,6 +169,6 @@ instance FromXML DescribeDBInstancesResponse where
 
 instance AWSPager DescribeDBInstances where
     page rq rs
-        | stop (rq ^. ddbi1Marker) = Nothing
+        | stop (rs ^. ddbirMarker) = Nothing
         | otherwise = (\x -> rq & ddbi1Marker ?~ x)
             <$> (rs ^. ddbirMarker)