packages feed

amazonka-resourcegroupstagging 1.5.0 → 1.6.0

raw patch · 16 files changed

+96/−94 lines, 16 filesdep ~amazonka-coredep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`1.5.0`+`1.6.0`   ## Description
amazonka-resourcegroupstagging.cabal view
@@ -1,5 +1,5 @@ name:                  amazonka-resourcegroupstagging-version:               1.5.0+version:               1.6.0 synopsis:              Amazon Resource Groups Tagging API SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -7,7 +7,7 @@ license-file:          LICENSE author:                Brendan Hay maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright:             Copyright (c) 2013-2017 Brendan Hay+copyright:             Copyright (c) 2013-2018 Brendan Hay category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10@@ -58,7 +58,7 @@         , Network.AWS.ResourceGroupsTagging.Types.Sum      build-depends:-          amazonka-core == 1.5.0.*+          amazonka-core == 1.6.0.*         , base          >= 4.7     && < 5  test-suite amazonka-resourcegroupstagging-test@@ -78,8 +78,8 @@         , Test.AWS.ResourceGroupsTagging.Internal      build-depends:-          amazonka-core == 1.5.0.*-        , amazonka-test == 1.5.0.*+          amazonka-core == 1.6.0.*+        , amazonka-test == 1.6.0.*         , amazonka-resourcegroupstagging         , base         , bytestring
gen/Network/AWS/ResourceGroupsTagging.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
gen/Network/AWS/ResourceGroupsTagging/GetResources.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.GetResources--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -79,33 +79,33 @@     :: GetResources getResources =   GetResources'-  { _grPaginationToken = Nothing-  , _grResourcesPerPage = Nothing-  , _grResourceTypeFilters = Nothing-  , _grTagFilters = Nothing-  , _grTagsPerPage = Nothing-  }+    { _grPaginationToken = Nothing+    , _grResourcesPerPage = Nothing+    , _grResourceTypeFilters = Nothing+    , _grTagFilters = Nothing+    , _grTagsPerPage = Nothing+    }   -- | A string that indicates that additional data is available. Leave this value empty for your initial request. If the response includes a @PaginationToken@ , use that string for this value to request an additional page of data. grPaginationToken :: Lens' GetResources (Maybe Text)-grPaginationToken = lens _grPaginationToken (\ s a -> s{_grPaginationToken = a});+grPaginationToken = lens _grPaginationToken (\ s a -> s{_grPaginationToken = a})  -- | A limit that restricts the number of resources returned by GetResources in paginated output. You can set ResourcesPerPage to a minimum of 1 item and the maximum of 50 items. grResourcesPerPage :: Lens' GetResources (Maybe Int)-grResourcesPerPage = lens _grResourcesPerPage (\ s a -> s{_grResourcesPerPage = a});+grResourcesPerPage = lens _grResourcesPerPage (\ s a -> s{_grResourcesPerPage = a})  -- | The constraints on the resources that you want returned. The format of each resource type is @service[:resourceType]@ . For example, specifying a resource type of @ec2@ returns all tagged Amazon EC2 resources (which includes tagged EC2 instances). Specifying a resource type of @ec2:instance@ returns only EC2 instances.  The string for each service name and resource type is the same as that embedded in a resource's Amazon Resource Name (ARN). Consult the /AWS General Reference/ for the following:     * For a list of service name strings, see <http://docs.aws.amazon.com/general/latest/gr/aws-arns-and-namespaces.html#genref-aws-service-namespaces AWS Service Namespaces> .     * For resource type strings, see <http://docs.aws.amazon.com/general/latest/gr/aws-arns-and-namespaces.html#arns-syntax Example ARNs> .     * For more information about ARNs, see <http://docs.aws.amazon.com/general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces> . grResourceTypeFilters :: Lens' GetResources [Text]-grResourceTypeFilters = lens _grResourceTypeFilters (\ s a -> s{_grResourceTypeFilters = a}) . _Default . _Coerce;+grResourceTypeFilters = lens _grResourceTypeFilters (\ s a -> s{_grResourceTypeFilters = a}) . _Default . _Coerce  -- | A list of tags (keys and values). A request can include up to 50 keys, and each key can include up to 20 values. If you specify multiple filters connected by an AND operator in a single request, the response returns only those resources that are associated with every specified filter. If you specify multiple filters connected by an OR operator in a single request, the response returns all resources that are associated with at least one or possibly more of the specified filters. grTagFilters :: Lens' GetResources [TagFilter]-grTagFilters = lens _grTagFilters (\ s a -> s{_grTagFilters = a}) . _Default . _Coerce;+grTagFilters = lens _grTagFilters (\ s a -> s{_grTagFilters = a}) . _Default . _Coerce  -- | A limit that restricts the number of tags (key and value pairs) returned by GetResources in paginated output. A resource with no tags is counted as having one tag (one key and value pair). @GetResources@ does not split a resource and its associated tags across pages. If the specified @TagsPerPage@ would cause such a break, a @PaginationToken@ is returned in place of the affected resource and its tags. Use that token in another request to get the remaining data. For example, if you specify a @TagsPerPage@ of @100@ and the account has 22 resources with 10 tags each (meaning that each resource has 10 key and value pairs), the output will consist of 3 pages, with the first page displaying the first 10 resources, each with its 10 tags, the second page displaying the next 10 resources each with its 10 tags, and the third page displaying the remaining 2 resources, each with its 10 tags. You can set @TagsPerPage@ to a minimum of 100 items and the maximum of 500 items. grTagsPerPage :: Lens' GetResources (Maybe Int)-grTagsPerPage = lens _grTagsPerPage (\ s a -> s{_grTagsPerPage = a});+grTagsPerPage = lens _grTagsPerPage (\ s a -> s{_grTagsPerPage = a})  instance AWSPager GetResources where         page rq rs@@ -179,22 +179,22 @@     -> GetResourcesResponse getResourcesResponse pResponseStatus_ =   GetResourcesResponse'-  { _grrsPaginationToken = Nothing-  , _grrsResourceTagMappingList = Nothing-  , _grrsResponseStatus = pResponseStatus_-  }+    { _grrsPaginationToken = Nothing+    , _grrsResourceTagMappingList = Nothing+    , _grrsResponseStatus = pResponseStatus_+    }   -- | A string that indicates that the response contains more data than can be returned in a single response. To receive additional data, specify this string for the @PaginationToken@ value in a subsequent request. grrsPaginationToken :: Lens' GetResourcesResponse (Maybe Text)-grrsPaginationToken = lens _grrsPaginationToken (\ s a -> s{_grrsPaginationToken = a});+grrsPaginationToken = lens _grrsPaginationToken (\ s a -> s{_grrsPaginationToken = a})  -- | A list of resource ARNs and the tags (keys and values) associated with each. grrsResourceTagMappingList :: Lens' GetResourcesResponse [ResourceTagMapping]-grrsResourceTagMappingList = lens _grrsResourceTagMappingList (\ s a -> s{_grrsResourceTagMappingList = a}) . _Default . _Coerce;+grrsResourceTagMappingList = lens _grrsResourceTagMappingList (\ s a -> s{_grrsResourceTagMappingList = a}) . _Default . _Coerce  -- | -- | The response status code. grrsResponseStatus :: Lens' GetResourcesResponse Int-grrsResponseStatus = lens _grrsResponseStatus (\ s a -> s{_grrsResponseStatus = a});+grrsResponseStatus = lens _grrsResponseStatus (\ s a -> s{_grrsResponseStatus = a})  instance NFData GetResourcesResponse where
gen/Network/AWS/ResourceGroupsTagging/GetTagKeys.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.GetTagKeys--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -66,7 +66,7 @@  -- | A string that indicates that additional data is available. Leave this value empty for your initial request. If the response includes a PaginationToken, use that string for this value to request an additional page of data. gtkPaginationToken :: Lens' GetTagKeys (Maybe Text)-gtkPaginationToken = lens _gtkPaginationToken (\ s a -> s{_gtkPaginationToken = a});+gtkPaginationToken = lens _gtkPaginationToken (\ s a -> s{_gtkPaginationToken = a})  instance AWSPager GetTagKeys where         page rq rs@@ -135,22 +135,22 @@     -> GetTagKeysResponse getTagKeysResponse pResponseStatus_ =   GetTagKeysResponse'-  { _gtkrsPaginationToken = Nothing-  , _gtkrsTagKeys = Nothing-  , _gtkrsResponseStatus = pResponseStatus_-  }+    { _gtkrsPaginationToken = Nothing+    , _gtkrsTagKeys = Nothing+    , _gtkrsResponseStatus = pResponseStatus_+    }   -- | A string that indicates that the response contains more data than can be returned in a single response. To receive additional data, specify this string for the @PaginationToken@ value in a subsequent request. gtkrsPaginationToken :: Lens' GetTagKeysResponse (Maybe Text)-gtkrsPaginationToken = lens _gtkrsPaginationToken (\ s a -> s{_gtkrsPaginationToken = a});+gtkrsPaginationToken = lens _gtkrsPaginationToken (\ s a -> s{_gtkrsPaginationToken = a})  -- | A list of all tag keys in the AWS account. gtkrsTagKeys :: Lens' GetTagKeysResponse [Text]-gtkrsTagKeys = lens _gtkrsTagKeys (\ s a -> s{_gtkrsTagKeys = a}) . _Default . _Coerce;+gtkrsTagKeys = lens _gtkrsTagKeys (\ s a -> s{_gtkrsTagKeys = a}) . _Default . _Coerce  -- | -- | The response status code. gtkrsResponseStatus :: Lens' GetTagKeysResponse Int-gtkrsResponseStatus = lens _gtkrsResponseStatus (\ s a -> s{_gtkrsResponseStatus = a});+gtkrsResponseStatus = lens _gtkrsResponseStatus (\ s a -> s{_gtkrsResponseStatus = a})  instance NFData GetTagKeysResponse where
gen/Network/AWS/ResourceGroupsTagging/GetTagValues.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.GetTagValues--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -72,11 +72,11 @@  -- | A string that indicates that additional data is available. Leave this value empty for your initial request. If the response includes a PaginationToken, use that string for this value to request an additional page of data. gtvPaginationToken :: Lens' GetTagValues (Maybe Text)-gtvPaginationToken = lens _gtvPaginationToken (\ s a -> s{_gtvPaginationToken = a});+gtvPaginationToken = lens _gtvPaginationToken (\ s a -> s{_gtvPaginationToken = a})  -- | The key for which you want to list all existing values in the specified region for the AWS account. gtvKey :: Lens' GetTagValues Text-gtvKey = lens _gtvKey (\ s a -> s{_gtvKey = a});+gtvKey = lens _gtvKey (\ s a -> s{_gtvKey = a})  instance AWSPager GetTagValues where         page rq rs@@ -146,22 +146,22 @@     -> GetTagValuesResponse getTagValuesResponse pResponseStatus_ =   GetTagValuesResponse'-  { _gtvrsPaginationToken = Nothing-  , _gtvrsTagValues = Nothing-  , _gtvrsResponseStatus = pResponseStatus_-  }+    { _gtvrsPaginationToken = Nothing+    , _gtvrsTagValues = Nothing+    , _gtvrsResponseStatus = pResponseStatus_+    }   -- | A string that indicates that the response contains more data than can be returned in a single response. To receive additional data, specify this string for the @PaginationToken@ value in a subsequent request. gtvrsPaginationToken :: Lens' GetTagValuesResponse (Maybe Text)-gtvrsPaginationToken = lens _gtvrsPaginationToken (\ s a -> s{_gtvrsPaginationToken = a});+gtvrsPaginationToken = lens _gtvrsPaginationToken (\ s a -> s{_gtvrsPaginationToken = a})  -- | A list of all tag values for the specified key in the AWS account. gtvrsTagValues :: Lens' GetTagValuesResponse [Text]-gtvrsTagValues = lens _gtvrsTagValues (\ s a -> s{_gtvrsTagValues = a}) . _Default . _Coerce;+gtvrsTagValues = lens _gtvrsTagValues (\ s a -> s{_gtvrsTagValues = a}) . _Default . _Coerce  -- | -- | The response status code. gtvrsResponseStatus :: Lens' GetTagValuesResponse Int-gtvrsResponseStatus = lens _gtvrsResponseStatus (\ s a -> s{_gtvrsResponseStatus = a});+gtvrsResponseStatus = lens _gtvrsResponseStatus (\ s a -> s{_gtvrsResponseStatus = a})  instance NFData GetTagValuesResponse where
gen/Network/AWS/ResourceGroupsTagging/TagResources.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.TagResources--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -74,16 +74,16 @@     -> TagResources tagResources pResourceARNList_ =   TagResources'-  {_trResourceARNList = _List1 # pResourceARNList_, _trTags = mempty}+    {_trResourceARNList = _List1 # pResourceARNList_, _trTags = mempty}   -- | A list of ARNs. An ARN (Amazon Resource Name) uniquely identifies a resource. You can specify a minimum of 1 and a maximum of 20 ARNs (resources) to tag. An ARN can be set to a maximum of 1600 characters. For more information, see <http://docs.aws.amazon.com/general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces> in the /AWS General Reference/ . trResourceARNList :: Lens' TagResources (NonEmpty Text)-trResourceARNList = lens _trResourceARNList (\ s a -> s{_trResourceARNList = a}) . _List1;+trResourceARNList = lens _trResourceARNList (\ s a -> s{_trResourceARNList = a}) . _List1  -- | The tags that you want to add to the specified resources. A tag consists of a key and a value that you define. trTags :: Lens' TagResources (HashMap Text Text)-trTags = lens _trTags (\ s a -> s{_trTags = a}) . _Map;+trTags = lens _trTags (\ s a -> s{_trTags = a}) . _Map  instance AWSRequest TagResources where         type Rs TagResources = TagResourcesResponse@@ -141,15 +141,15 @@     -> TagResourcesResponse tagResourcesResponse pResponseStatus_ =   TagResourcesResponse'-  {_trrsFailedResourcesMap = Nothing, _trrsResponseStatus = pResponseStatus_}+    {_trrsFailedResourcesMap = Nothing, _trrsResponseStatus = pResponseStatus_}   -- | Details of resources that could not be tagged. An error code, status code, and error message are returned for each failed item. trrsFailedResourcesMap :: Lens' TagResourcesResponse (HashMap Text FailureInfo)-trrsFailedResourcesMap = lens _trrsFailedResourcesMap (\ s a -> s{_trrsFailedResourcesMap = a}) . _Default . _Map;+trrsFailedResourcesMap = lens _trrsFailedResourcesMap (\ s a -> s{_trrsFailedResourcesMap = a}) . _Default . _Map  -- | -- | The response status code. trrsResponseStatus :: Lens' TagResourcesResponse Int-trrsResponseStatus = lens _trrsResponseStatus (\ s a -> s{_trrsResponseStatus = a});+trrsResponseStatus = lens _trrsResponseStatus (\ s a -> s{_trrsResponseStatus = a})  instance NFData TagResourcesResponse where
gen/Network/AWS/ResourceGroupsTagging/Types.hs view
@@ -4,7 +4,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.Types--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -60,24 +60,24 @@ resourceGroupsTagging :: Service resourceGroupsTagging =   Service-  { _svcAbbrev = "ResourceGroupsTagging"-  , _svcSigner = v4-  , _svcPrefix = "tagging"-  , _svcVersion = "2017-01-26"-  , _svcEndpoint = defaultEndpoint resourceGroupsTagging-  , _svcTimeout = Just 70-  , _svcCheck = statusSuccess-  , _svcError = parseJSONError "ResourceGroupsTagging"-  , _svcRetry = retry-  }+    { _svcAbbrev = "ResourceGroupsTagging"+    , _svcSigner = v4+    , _svcPrefix = "tagging"+    , _svcVersion = "2017-01-26"+    , _svcEndpoint = defaultEndpoint resourceGroupsTagging+    , _svcTimeout = Just 70+    , _svcCheck = statusSuccess+    , _svcError = parseJSONError "ResourceGroupsTagging"+    , _svcRetry = retry+    }   where     retry =       Exponential-      { _retryBase = 5.0e-2-      , _retryGrowth = 2-      , _retryAttempts = 5-      , _retryCheck = check-      }+        { _retryBase = 5.0e-2+        , _retryGrowth = 2+        , _retryAttempts = 5+        , _retryCheck = check+        }     check e       | has (hasCode "ThrottledException" . hasStatus 400) e =         Just "throttled_exception"@@ -86,6 +86,8 @@         Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"       | has (hasStatus 504) e = Just "gateway_timeout"+      | has (hasCode "RequestThrottledException" . hasStatus 400) e =+        Just "request_throttled_exception"       | has (hasStatus 502) e = Just "bad_gateway"       | has (hasStatus 503) e = Just "service_unavailable"       | has (hasStatus 500) e = Just "general_server_error"
gen/Network/AWS/ResourceGroupsTagging/Types/Product.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.Types.Product--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -46,20 +46,20 @@     :: FailureInfo failureInfo =   FailureInfo'-  {_fiErrorCode = Nothing, _fiErrorMessage = Nothing, _fiStatusCode = Nothing}+    {_fiErrorCode = Nothing, _fiErrorMessage = Nothing, _fiStatusCode = Nothing}   -- | The code of the common error. Valid values include @InternalServiceException@ , @InvalidParameterException@ , and any valid error code returned by the AWS service that hosts the resource that you want to tag. fiErrorCode :: Lens' FailureInfo (Maybe ResourceErrorCode)-fiErrorCode = lens _fiErrorCode (\ s a -> s{_fiErrorCode = a});+fiErrorCode = lens _fiErrorCode (\ s a -> s{_fiErrorCode = a})  -- | The message of the common error. fiErrorMessage :: Lens' FailureInfo (Maybe Text)-fiErrorMessage = lens _fiErrorMessage (\ s a -> s{_fiErrorMessage = a});+fiErrorMessage = lens _fiErrorMessage (\ s a -> s{_fiErrorMessage = a})  -- | The HTTP status code of the common error. fiStatusCode :: Lens' FailureInfo (Maybe Int)-fiStatusCode = lens _fiStatusCode (\ s a -> s{_fiStatusCode = a});+fiStatusCode = lens _fiStatusCode (\ s a -> s{_fiStatusCode = a})  instance FromJSON FailureInfo where         parseJSON@@ -99,11 +99,11 @@  -- | An array of resource ARN(s). rtmResourceARN :: Lens' ResourceTagMapping (Maybe Text)-rtmResourceARN = lens _rtmResourceARN (\ s a -> s{_rtmResourceARN = a});+rtmResourceARN = lens _rtmResourceARN (\ s a -> s{_rtmResourceARN = a})  -- | The tags that have been applied to one or more AWS resources. rtmTags :: Lens' ResourceTagMapping [Tag]-rtmTags = lens _rtmTags (\ s a -> s{_rtmTags = a}) . _Default . _Coerce;+rtmTags = lens _rtmTags (\ s a -> s{_rtmTags = a}) . _Default . _Coerce  instance FromJSON ResourceTagMapping where         parseJSON@@ -143,11 +143,11 @@  -- | One part of a key-value pair that make up a tag. A key is a general label that acts like a category for more specific tag values. tagKey :: Lens' Tag Text-tagKey = lens _tagKey (\ s a -> s{_tagKey = a});+tagKey = lens _tagKey (\ s a -> s{_tagKey = a})  -- | The optional part of a key-value pair that make up a tag. A value acts as a descriptor within a tag category (key). tagValue :: Lens' Tag Text-tagValue = lens _tagValue (\ s a -> s{_tagValue = a});+tagValue = lens _tagValue (\ s a -> s{_tagValue = a})  instance FromJSON Tag where         parseJSON@@ -183,11 +183,11 @@  -- | The optional part of a key-value pair that make up a tag. A value acts as a descriptor within a tag category (key). tfValues :: Lens' TagFilter [Text]-tfValues = lens _tfValues (\ s a -> s{_tfValues = a}) . _Default . _Coerce;+tfValues = lens _tfValues (\ s a -> s{_tfValues = a}) . _Default . _Coerce  -- | One part of a key-value pair that make up a tag. A key is a general label that acts like a category for more specific tag values. tfKey :: Lens' TagFilter (Maybe Text)-tfKey = lens _tfKey (\ s a -> s{_tfKey = a});+tfKey = lens _tfKey (\ s a -> s{_tfKey = a})  instance Hashable TagFilter where
gen/Network/AWS/ResourceGroupsTagging/Types/Sum.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.Types.Sum--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
gen/Network/AWS/ResourceGroupsTagging/UntagResources.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.UntagResources--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -71,18 +71,18 @@     -> UntagResources untagResources pResourceARNList_ pTagKeys_ =   UntagResources'-  { _urResourceARNList = _List1 # pResourceARNList_-  , _urTagKeys = _List1 # pTagKeys_-  }+    { _urResourceARNList = _List1 # pResourceARNList_+    , _urTagKeys = _List1 # pTagKeys_+    }   -- | A list of ARNs. An ARN (Amazon Resource Name) uniquely identifies a resource. You can specify a minimum of 1 and a maximum of 20 ARNs (resources) to untag. An ARN can be set to a maximum of 1600 characters. For more information, see <http://docs.aws.amazon.com/general/latest/gr/aws-arns-and-namespaces.html Amazon Resource Names (ARNs) and AWS Service Namespaces> in the /AWS General Reference/ . urResourceARNList :: Lens' UntagResources (NonEmpty Text)-urResourceARNList = lens _urResourceARNList (\ s a -> s{_urResourceARNList = a}) . _List1;+urResourceARNList = lens _urResourceARNList (\ s a -> s{_urResourceARNList = a}) . _List1  -- | A list of the tag keys that you want to remove from the specified resources. urTagKeys :: Lens' UntagResources (NonEmpty Text)-urTagKeys = lens _urTagKeys (\ s a -> s{_urTagKeys = a}) . _List1;+urTagKeys = lens _urTagKeys (\ s a -> s{_urTagKeys = a}) . _List1  instance AWSRequest UntagResources where         type Rs UntagResources = UntagResourcesResponse@@ -140,15 +140,15 @@     -> UntagResourcesResponse untagResourcesResponse pResponseStatus_ =   UntagResourcesResponse'-  {_urrsFailedResourcesMap = Nothing, _urrsResponseStatus = pResponseStatus_}+    {_urrsFailedResourcesMap = Nothing, _urrsResponseStatus = pResponseStatus_}   -- | Details of resources that could not be untagged. An error code, status code, and error message are returned for each failed item. urrsFailedResourcesMap :: Lens' UntagResourcesResponse (HashMap Text FailureInfo)-urrsFailedResourcesMap = lens _urrsFailedResourcesMap (\ s a -> s{_urrsFailedResourcesMap = a}) . _Default . _Map;+urrsFailedResourcesMap = lens _urrsFailedResourcesMap (\ s a -> s{_urrsFailedResourcesMap = a}) . _Default . _Map  -- | -- | The response status code. urrsResponseStatus :: Lens' UntagResourcesResponse Int-urrsResponseStatus = lens _urrsResponseStatus (\ s a -> s{_urrsResponseStatus = a});+urrsResponseStatus = lens _urrsResponseStatus (\ s a -> s{_urrsResponseStatus = a})  instance NFData UntagResourcesResponse where
gen/Network/AWS/ResourceGroupsTagging/Waiters.hs view
@@ -7,7 +7,7 @@  -- | -- Module      : Network.AWS.ResourceGroupsTagging.Waiters--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Main.hs view
@@ -2,7 +2,7 @@  -- | -- Module      : Main--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Test/AWS/Gen/ResourceGroupsTagging.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Test.AWS.Gen.ResourceGroupsTagging--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Test/AWS/ResourceGroupsTagging.hs view
@@ -1,6 +1,6 @@ -- | -- Module      : Test.AWS.ResourceGroupsTagging--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated
test/Test/AWS/ResourceGroupsTagging/Internal.hs view
@@ -1,6 +1,6 @@ -- | -- Module      : Test.AWS.ResourceGroupsTagging.Internal--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated