amazonka-sqs 1.4.0 → 1.4.1

raw patch · 22 files changed

+98/−6 lines, 22 filesdep ~amazonka-coredep ~amazonka-sqsdep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core, amazonka-sqs, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-sqs.cabal +5/−5
• gen/Network/AWS/SQS/AddPermission.hs +4/−0
• gen/Network/AWS/SQS/ChangeMessageVisibility.hs +4/−0
• gen/Network/AWS/SQS/ChangeMessageVisibilityBatch.hs +4/−0
• gen/Network/AWS/SQS/CreateQueue.hs +4/−0
• gen/Network/AWS/SQS/DeleteMessage.hs +4/−0
• gen/Network/AWS/SQS/DeleteMessageBatch.hs +4/−0
• gen/Network/AWS/SQS/DeleteQueue.hs +4/−0
• gen/Network/AWS/SQS/GetQueueAttributes.hs +4/−0
• gen/Network/AWS/SQS/GetQueueURL.hs +4/−0
• gen/Network/AWS/SQS/ListDeadLetterSourceQueues.hs +4/−0
• gen/Network/AWS/SQS/ListQueues.hs +4/−0
• gen/Network/AWS/SQS/PurgeQueue.hs +4/−0
• gen/Network/AWS/SQS/ReceiveMessage.hs +4/−0
• gen/Network/AWS/SQS/RemovePermission.hs +4/−0
• gen/Network/AWS/SQS/SendMessage.hs +4/−0
• gen/Network/AWS/SQS/SendMessageBatch.hs +4/−0
• gen/Network/AWS/SQS/SetQueueAttributes.hs +4/−0
• gen/Network/AWS/SQS/Types.hs +2/−0
• gen/Network/AWS/SQS/Types/Product.hs +20/−0
• gen/Network/AWS/SQS/Types/Sum.hs +2/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.0`+`1.4.1`   ## Description

@@ -1,5 +1,5 @@ name:                  amazonka-sqs-version:               1.4.0+version:               1.4.1 synopsis:              Amazon Simple Queue Service SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -94,7 +94,7 @@         , Network.AWS.SQS.Types.Sum      build-depends:-          amazonka-core == 1.4.0.*+          amazonka-core == 1.4.1.*         , base          >= 4.7     && < 5  test-suite amazonka-sqs-test@@ -114,9 +114,9 @@         , Test.AWS.SQS.Internal      build-depends:-          amazonka-core == 1.4.0.*-        , amazonka-test == 1.4.0.*-        , amazonka-sqs == 1.4.0.*+          amazonka-core == 1.4.1.*+        , amazonka-test == 1.4.1.*+        , amazonka-sqs == 1.4.1.*         , base         , bytestring         , tasty

@@ -136,6 +136,8 @@  instance Hashable AddPermission +instance NFData AddPermission+ instance ToHeaders AddPermission where         toHeaders = const mempty @@ -161,3 +163,5 @@ addPermissionResponse     :: AddPermissionResponse addPermissionResponse = AddPermissionResponse'++instance NFData AddPermissionResponse

@@ -128,6 +128,8 @@  instance Hashable ChangeMessageVisibility +instance NFData ChangeMessageVisibility+ instance ToHeaders ChangeMessageVisibility where         toHeaders = const mempty @@ -154,3 +156,5 @@ changeMessageVisibilityResponse     :: ChangeMessageVisibilityResponse changeMessageVisibilityResponse = ChangeMessageVisibilityResponse'++instance NFData ChangeMessageVisibilityResponse

@@ -109,6 +109,8 @@  instance Hashable ChangeMessageVisibilityBatch +instance NFData ChangeMessageVisibilityBatch+ instance ToHeaders ChangeMessageVisibilityBatch where         toHeaders = const mempty @@ -167,3 +169,5 @@ -- | A list of < BatchResultErrorEntry> items. cmvbrsFailed :: Lens' ChangeMessageVisibilityBatchResponse [BatchResultErrorEntry] cmvbrsFailed = lens _cmvbrsFailed (\ s a -> s{_cmvbrsFailed = a}) . _Coerce;++instance NFData ChangeMessageVisibilityBatchResponse

@@ -139,6 +139,8 @@  instance Hashable CreateQueue +instance NFData CreateQueue+ instance ToHeaders CreateQueue where         toHeaders = const mempty @@ -186,3 +188,5 @@ -- | The response status code. cqrsResponseStatus :: Lens' CreateQueueResponse Int cqrsResponseStatus = lens _cqrsResponseStatus (\ s a -> s{_cqrsResponseStatus = a});++instance NFData CreateQueueResponse

@@ -99,6 +99,8 @@  instance Hashable DeleteMessage +instance NFData DeleteMessage+ instance ToHeaders DeleteMessage where         toHeaders = const mempty @@ -123,3 +125,5 @@ deleteMessageResponse     :: DeleteMessageResponse deleteMessageResponse = DeleteMessageResponse'++instance NFData DeleteMessageResponse

@@ -102,6 +102,8 @@  instance Hashable DeleteMessageBatch +instance NFData DeleteMessageBatch+ instance ToHeaders DeleteMessageBatch where         toHeaders = const mempty @@ -158,3 +160,5 @@ -- | A list of < BatchResultErrorEntry> items. dmbrsFailed :: Lens' DeleteMessageBatchResponse [BatchResultErrorEntry] dmbrsFailed = lens _dmbrsFailed (\ s a -> s{_dmbrsFailed = a}) . _Coerce;++instance NFData DeleteMessageBatchResponse

@@ -85,6 +85,8 @@  instance Hashable DeleteQueue +instance NFData DeleteQueue+ instance ToHeaders DeleteQueue where         toHeaders = const mempty @@ -108,3 +110,5 @@ deleteQueueResponse     :: DeleteQueueResponse deleteQueueResponse = DeleteQueueResponse'++instance NFData DeleteQueueResponse

@@ -134,6 +134,8 @@  instance Hashable GetQueueAttributes +instance NFData GetQueueAttributes+ instance ToHeaders GetQueueAttributes where         toHeaders = const mempty @@ -180,3 +182,5 @@ -- | The response status code. gqarsResponseStatus :: Lens' GetQueueAttributesResponse Int gqarsResponseStatus = lens _gqarsResponseStatus (\ s a -> s{_gqarsResponseStatus = a});++instance NFData GetQueueAttributesResponse

@@ -94,6 +94,8 @@  instance Hashable GetQueueURL +instance NFData GetQueueURL+ instance ToHeaders GetQueueURL where         toHeaders = const mempty @@ -143,3 +145,5 @@ -- | The URL for the queue. gqursQueueURL :: Lens' GetQueueURLResponse Text gqursQueueURL = lens _gqursQueueURL (\ s a -> s{_gqursQueueURL = a});++instance NFData GetQueueURLResponse

@@ -81,6 +81,8 @@  instance Hashable ListDeadLetterSourceQueues +instance NFData ListDeadLetterSourceQueues+ instance ToHeaders ListDeadLetterSourceQueues where         toHeaders = const mempty @@ -127,3 +129,5 @@ -- configured with a dead letter queue. ldlsqrsQueueURLs :: Lens' ListDeadLetterSourceQueuesResponse [Text] ldlsqrsQueueURLs = lens _ldlsqrsQueueURLs (\ s a -> s{_ldlsqrsQueueURLs = a}) . _Coerce;++instance NFData ListDeadLetterSourceQueuesResponse

@@ -79,6 +79,8 @@  instance Hashable ListQueues +instance NFData ListQueues+ instance ToHeaders ListQueues where         toHeaders = const mempty @@ -123,3 +125,5 @@ -- | The response status code. lqrsResponseStatus :: Lens' ListQueuesResponse Int lqrsResponseStatus = lens _lqrsResponseStatus (\ s a -> s{_lqrsResponseStatus = a});++instance NFData ListQueuesResponse

@@ -79,6 +79,8 @@  instance Hashable PurgeQueue +instance NFData PurgeQueue+ instance ToHeaders PurgeQueue where         toHeaders = const mempty @@ -102,3 +104,5 @@ purgeQueueResponse     :: PurgeQueueResponse purgeQueueResponse = PurgeQueueResponse'++instance NFData PurgeQueueResponse

@@ -199,6 +199,8 @@  instance Hashable ReceiveMessage +instance NFData ReceiveMessage+ instance ToHeaders ReceiveMessage where         toHeaders = const mempty @@ -251,3 +253,5 @@ -- | The response status code. rmrsResponseStatus :: Lens' ReceiveMessageResponse Int rmrsResponseStatus = lens _rmrsResponseStatus (\ s a -> s{_rmrsResponseStatus = a});++instance NFData ReceiveMessageResponse

@@ -80,6 +80,8 @@  instance Hashable RemovePermission +instance NFData RemovePermission+ instance ToHeaders RemovePermission where         toHeaders = const mempty @@ -103,3 +105,5 @@ removePermissionResponse     :: RemovePermissionResponse removePermissionResponse = RemovePermissionResponse'++instance NFData RemovePermissionResponse

@@ -125,6 +125,8 @@  instance Hashable SendMessage +instance NFData SendMessage+ instance ToHeaders SendMessage where         toHeaders = const mempty @@ -199,3 +201,5 @@ -- | The response status code. smrsResponseStatus :: Lens' SendMessageResponse Int smrsResponseStatus = lens _smrsResponseStatus (\ s a -> s{_smrsResponseStatus = a});++instance NFData SendMessageResponse

@@ -117,6 +117,8 @@  instance Hashable SendMessageBatch +instance NFData SendMessageBatch+ instance ToHeaders SendMessageBatch where         toHeaders = const mempty @@ -174,3 +176,5 @@ -- each message that could not be enqueued. smbrsFailed :: Lens' SendMessageBatchResponse [BatchResultErrorEntry] smbrsFailed = lens _smbrsFailed (\ s a -> s{_smbrsFailed = a}) . _Coerce;++instance NFData SendMessageBatchResponse

@@ -115,6 +115,8 @@  instance Hashable SetQueueAttributes +instance NFData SetQueueAttributes+ instance ToHeaders SetQueueAttributes where         toHeaders = const mempty @@ -139,3 +141,5 @@ setQueueAttributesResponse     :: SetQueueAttributesResponse setQueueAttributesResponse = SetQueueAttributesResponse'++instance NFData SetQueueAttributesResponse

@@ -142,6 +142,8 @@       | has (hasCode "ThrottlingException" . hasStatus 400) e =           Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"+      | has (hasStatus 504) e = Just "gateway_timeout"+      | has (hasStatus 502) e = Just "bad_gateway"       | has (hasStatus 503) e = Just "service_unavailable"       | has (hasStatus 500) e = Just "general_server_error"       | has (hasStatus 509) e = Just "limit_exceeded"

@@ -81,6 +81,8 @@  instance Hashable BatchResultErrorEntry +instance NFData BatchResultErrorEntry+ -- | Encloses a receipt handle and an entry id for each message in -- < ChangeMessageVisibilityBatch>. --@@ -139,6 +141,9 @@ instance Hashable          ChangeMessageVisibilityBatchRequestEntry +instance NFData+         ChangeMessageVisibilityBatchRequestEntry+ instance ToQuery          ChangeMessageVisibilityBatchRequestEntry where         toQuery ChangeMessageVisibilityBatchRequestEntry'{..}@@ -180,6 +185,9 @@ instance Hashable          ChangeMessageVisibilityBatchResultEntry +instance NFData+         ChangeMessageVisibilityBatchResultEntry+ -- | Encloses a receipt handle and an identifier for it. -- -- /See:/ 'deleteMessageBatchRequestEntry' smart constructor.@@ -217,6 +225,8 @@  instance Hashable DeleteMessageBatchRequestEntry +instance NFData DeleteMessageBatchRequestEntry+ instance ToQuery DeleteMessageBatchRequestEntry where         toQuery DeleteMessageBatchRequestEntry'{..}           = mconcat@@ -253,6 +263,8 @@  instance Hashable DeleteMessageBatchResultEntry +instance NFData DeleteMessageBatchResultEntry+ -- | An Amazon SQS message. -- -- /See:/ 'message' smart constructor.@@ -351,6 +363,8 @@  instance Hashable Message +instance NFData Message+ -- | The user-specified message attribute value. For string data types, the -- value attribute has the same restrictions on the content as the message -- body. For more information, see@@ -441,6 +455,8 @@  instance Hashable MessageAttributeValue +instance NFData MessageAttributeValue+ instance ToQuery MessageAttributeValue where         toQuery MessageAttributeValue'{..}           = mconcat@@ -511,6 +527,8 @@  instance Hashable SendMessageBatchRequestEntry +instance NFData SendMessageBatchRequestEntry+ instance ToQuery SendMessageBatchRequestEntry where         toQuery SendMessageBatchRequestEntry'{..}           = mconcat@@ -586,3 +604,5 @@                 <*> (x .@ "MD5OfMessageBody")  instance Hashable SendMessageBatchResultEntry++instance NFData SendMessageBatchResultEntry

@@ -46,6 +46,7 @@         SentTimestamp -> "SentTimestamp"  instance Hashable     MessageAttribute+instance NFData       MessageAttribute instance ToByteString MessageAttribute instance ToQuery      MessageAttribute instance ToHeader     MessageAttribute@@ -104,6 +105,7 @@         VisibilityTimeout -> "VisibilityTimeout"  instance Hashable     QueueAttributeName+instance NFData       QueueAttributeName instance ToByteString QueueAttributeName instance ToQuery      QueueAttributeName instance ToHeader     QueueAttributeName