amazonka-ec2 1.3.3.1 → 1.3.4
raw patch · 4 files changed
+17/−7 lines, 4 filesdep ~amazonka-coredep ~amazonka-ec2dep ~amazonka-testPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: amazonka-core, amazonka-ec2, amazonka-test
API changes (from Hackage documentation)
+ Network.AWS.EC2.DescribeVolumes: instance Network.AWS.Pager.AWSPager Network.AWS.EC2.DescribeVolumes.DescribeVolumes
Files
- README.md +1/−1
- amazonka-ec2.cabal +5/−5
- gen/Network/AWS/EC2.hs +1/−1
- gen/Network/AWS/EC2/DescribeVolumes.hs +10/−0
README.md view
@@ -8,7 +8,7 @@ ## Version -`1.3.3.1`+`1.3.4` ## Description
amazonka-ec2.cabal view
@@ -1,5 +1,5 @@ name: amazonka-ec2-version: 1.3.3.1+version: 1.3.4 synopsis: Amazon Elastic Compute Cloud SDK. homepage: https://github.com/brendanhay/amazonka bug-reports: https://github.com/brendanhay/amazonka/issues@@ -237,7 +237,7 @@ , Network.AWS.EC2.Types.Sum build-depends:- amazonka-core == 1.3.3.*+ amazonka-core == 1.3.4.* , base >= 4.7 && < 5 test-suite amazonka-ec2-test@@ -257,9 +257,9 @@ , Test.AWS.EC2.Internal build-depends:- amazonka-core == 1.3.3.*- , amazonka-test == 1.3.3.*- , amazonka-ec2 == 1.3.3.*+ amazonka-core == 1.3.4.*+ , amazonka-test == 1.3.4.*+ , amazonka-ec2 == 1.3.4.* , base , bytestring , lens
gen/Network/AWS/EC2.hs view
@@ -324,7 +324,7 @@ -- ** RequestSpotInstances , module Network.AWS.EC2.RequestSpotInstances - -- ** DescribeVolumes+ -- ** DescribeVolumes (Paginated) , module Network.AWS.EC2.DescribeVolumes -- ** RejectVPCPeeringConnection
gen/Network/AWS/EC2/DescribeVolumes.hs view
@@ -32,6 +32,8 @@ -- in the /Amazon Elastic Compute Cloud User Guide/. -- -- /See:/ <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeVolumes.html AWS API Reference> for DescribeVolumes.+--+-- This operation returns paginated results. module Network.AWS.EC2.DescribeVolumes ( -- * Creating a Request@@ -55,6 +57,7 @@ import Network.AWS.EC2.Types import Network.AWS.EC2.Types.Product+import Network.AWS.Pager import Network.AWS.Prelude import Network.AWS.Request import Network.AWS.Response@@ -177,6 +180,13 @@ -- same request. desMaxResults :: Lens' DescribeVolumes (Maybe Int) desMaxResults = lens _desMaxResults (\ s a -> s{_desMaxResults = a});++instance AWSPager DescribeVolumes where+ page rq rs+ | stop (rs ^. dvvrsNextToken) = Nothing+ | stop (rs ^. dvvrsVolumes) = Nothing+ | otherwise =+ Just $ rq & desNextToken .~ rs ^. dvvrsNextToken instance AWSRequest DescribeVolumes where type Rs DescribeVolumes = DescribeVolumesResponse