amazonka-storagegateway 0.0.6 → 0.0.7

raw patch · 18 files changed

+19/−19 lines, 18 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-storagegateway.cabal +2/−2
• gen/Network/AWS/StorageGateway/CreateTapes.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeCache.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeCachediSCSIVolumes.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeChapCredentials.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeGatewayInformation.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeStorediSCSIVolumes.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeTapes.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeUploadBuffer.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs +1/−1
• gen/Network/AWS/StorageGateway/DescribeWorkingStorage.hs +1/−1
• gen/Network/AWS/StorageGateway/ListGateways.hs +1/−1
• gen/Network/AWS/StorageGateway/ListLocalDisks.hs +1/−1
• gen/Network/AWS/StorageGateway/ListVolumeRecoveryPoints.hs +1/−1
• gen/Network/AWS/StorageGateway/ListVolumes.hs +1/−1
• gen/Network/AWS/StorageGateway/Types.hs +1/−1

@@ -1,5 +1,5 @@ name:                  amazonka-storagegateway-version:               0.0.6+version:               0.0.7 synopsis:              Amazon Storage Gateway SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -87,5 +87,5 @@     other-modules:      build-depends:-          amazonka-core == 0.0.6.*+          amazonka-core == 0.0.7.*         , base          >= 4.7     && < 5

@@ -169,4 +169,4 @@  instance FromJSON CreateTapesResponse where     parseJSON = withObject "CreateTapesResponse" $ \o -> CreateTapesResponse-        <$> o .:  "TapeARNs"+        <$> o .:? "TapeARNs" .!= mempty

@@ -169,5 +169,5 @@         <*> o .:? "CacheHitPercentage"         <*> o .:? "CacheMissPercentage"         <*> o .:? "CacheUsedPercentage"-        <*> o .:  "DiskIds"+        <*> o .:? "DiskIds" .!= mempty         <*> o .:? "GatewayARN"

@@ -130,4 +130,4 @@  instance FromJSON DescribeCachediSCSIVolumesResponse where     parseJSON = withObject "DescribeCachediSCSIVolumesResponse" $ \o -> DescribeCachediSCSIVolumesResponse-        <$> o .:  "CachediSCSIVolumes"+        <$> o .:? "CachediSCSIVolumes" .!= mempty

@@ -133,4 +133,4 @@  instance FromJSON DescribeChapCredentialsResponse where     parseJSON = withObject "DescribeChapCredentialsResponse" $ \o -> DescribeChapCredentialsResponse-        <$> o .:  "ChapCredentials"+        <$> o .:? "ChapCredentials" .!= mempty

@@ -174,7 +174,7 @@     parseJSON = withObject "DescribeGatewayInformationResponse" $ \o -> DescribeGatewayInformationResponse         <$> o .:? "GatewayARN"         <*> o .:? "GatewayId"-        <*> o .:  "GatewayNetworkInterfaces"+        <*> o .:? "GatewayNetworkInterfaces" .!= mempty         <*> o .:? "GatewayState"         <*> o .:? "GatewayTimezone"         <*> o .:? "GatewayType"

@@ -128,4 +128,4 @@  instance FromJSON DescribeStorediSCSIVolumesResponse where     parseJSON = withObject "DescribeStorediSCSIVolumesResponse" $ \o -> DescribeStorediSCSIVolumesResponse-        <$> o .:  "StorediSCSIVolumes"+        <$> o .:? "StorediSCSIVolumes" .!= mempty

@@ -153,7 +153,7 @@ instance FromJSON DescribeTapeArchivesResponse where     parseJSON = withObject "DescribeTapeArchivesResponse" $ \o -> DescribeTapeArchivesResponse         <$> o .:? "Marker"-        <*> o .:  "TapeArchives"+        <*> o .:? "TapeArchives" .!= mempty  instance AWSPager DescribeTapeArchives where     page rq rs

@@ -162,7 +162,7 @@     parseJSON = withObject "DescribeTapeRecoveryPointsResponse" $ \o -> DescribeTapeRecoveryPointsResponse         <$> o .:? "GatewayARN"         <*> o .:? "Marker"-        <*> o .:  "TapeRecoveryPointInfos"+        <*> o .:? "TapeRecoveryPointInfos" .!= mempty  instance AWSPager DescribeTapeRecoveryPoints where     page rq rs

@@ -160,7 +160,7 @@ instance FromJSON DescribeTapesResponse where     parseJSON = withObject "DescribeTapesResponse" $ \o -> DescribeTapesResponse         <$> o .:? "Marker"-        <*> o .:  "Tapes"+        <*> o .:? "Tapes" .!= mempty  instance AWSPager DescribeTapes where     page rq rs

@@ -139,7 +139,7 @@  instance FromJSON DescribeUploadBufferResponse where     parseJSON = withObject "DescribeUploadBufferResponse" $ \o -> DescribeUploadBufferResponse-        <$> o .:  "DiskIds"+        <$> o .:? "DiskIds" .!= mempty         <*> o .:? "GatewayARN"         <*> o .:? "UploadBufferAllocatedInBytes"         <*> o .:? "UploadBufferUsedInBytes"

@@ -168,7 +168,7 @@     parseJSON = withObject "DescribeVTLDevicesResponse" $ \o -> DescribeVTLDevicesResponse         <$> o .:? "GatewayARN"         <*> o .:? "Marker"-        <*> o .:  "VTLDevices"+        <*> o .:? "VTLDevices" .!= mempty  instance AWSPager DescribeVTLDevices where     page rq rs

@@ -148,7 +148,7 @@  instance FromJSON DescribeWorkingStorageResponse where     parseJSON = withObject "DescribeWorkingStorageResponse" $ \o -> DescribeWorkingStorageResponse-        <$> o .:  "DiskIds"+        <$> o .:? "DiskIds" .!= mempty         <*> o .:? "GatewayARN"         <*> o .:? "WorkingStorageAllocatedInBytes"         <*> o .:? "WorkingStorageUsedInBytes"

@@ -137,7 +137,7 @@  instance FromJSON ListGatewaysResponse where     parseJSON = withObject "ListGatewaysResponse" $ \o -> ListGatewaysResponse-        <$> o .:  "Gateways"+        <$> o .:? "Gateways" .!= mempty         <*> o .:? "Marker"  instance AWSPager ListGateways where

@@ -119,5 +119,5 @@  instance FromJSON ListLocalDisksResponse where     parseJSON = withObject "ListLocalDisksResponse" $ \o -> ListLocalDisksResponse-        <$> o .:  "Disks"+        <$> o .:? "Disks" .!= mempty         <*> o .:? "GatewayARN"

@@ -124,4 +124,4 @@ instance FromJSON ListVolumeRecoveryPointsResponse where     parseJSON = withObject "ListVolumeRecoveryPointsResponse" $ \o -> ListVolumeRecoveryPointsResponse         <$> o .:? "GatewayARN"-        <*> o .:  "VolumeRecoveryPointInfos"+        <*> o .:? "VolumeRecoveryPointInfos" .!= mempty

@@ -156,7 +156,7 @@     parseJSON = withObject "ListVolumesResponse" $ \o -> ListVolumesResponse         <$> o .:? "GatewayARN"         <*> o .:? "Marker"-        <*> o .:  "VolumeInfos"+        <*> o .:? "VolumeInfos" .!= mempty  instance AWSPager ListVolumes where     page rq rs

@@ -422,7 +422,7 @@ instance FromJSON Error' where     parseJSON = withObject "Error'" $ \o -> Error'         <$> o .:? "errorCode"-        <*> o .:  "errorDetails"+        <*> o .:? "errorDetails" .!= mempty  instance ToJSON Error' where     toJSON Error'{..} = object