packages feed

amazonka-route53-domains 1.5.0 → 1.6.0

raw patch · 35 files changed

+460/−435 lines, 35 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)

+ Network.AWS.Route53Domains.ListOperations: loSubmittedSince :: Lens' ListOperations (Maybe UTCTime)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`1.5.0`+`1.6.0`   ## Description
amazonka-route53-domains.cabal view
@@ -1,5 +1,5 @@ name:                  amazonka-route53-domains-version:               1.5.0+version:               1.6.0 synopsis:              Amazon Route 53 Domains 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@@ -77,7 +77,7 @@         , Network.AWS.Route53Domains.Types.Sum      build-depends:-          amazonka-core == 1.5.0.*+          amazonka-core == 1.6.0.*         , base          >= 4.7     && < 5  test-suite amazonka-route53-domains-test@@ -97,8 +97,8 @@         , Test.AWS.Route53Domains.Internal      build-depends:-          amazonka-core == 1.5.0.*-        , amazonka-test == 1.5.0.*+          amazonka-core == 1.6.0.*+        , amazonka-test == 1.6.0.*         , amazonka-route53-domains         , base         , bytestring
gen/Network/AWS/Route53Domains.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Network.AWS.Route53Domains--- 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/Route53Domains/CheckDomainAvailability.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.CheckDomainAvailability--- 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@@ -68,16 +68,16 @@     -> CheckDomainAvailability checkDomainAvailability pDomainName_ =   CheckDomainAvailability'-  {_cdaIdNLangCode = Nothing, _cdaDomainName = pDomainName_}+    {_cdaIdNLangCode = Nothing, _cdaDomainName = pDomainName_}   -- | Reserved for future use. cdaIdNLangCode :: Lens' CheckDomainAvailability (Maybe Text)-cdaIdNLangCode = lens _cdaIdNLangCode (\ s a -> s{_cdaIdNLangCode = a});+cdaIdNLangCode = lens _cdaIdNLangCode (\ s a -> s{_cdaIdNLangCode = a})  -- | The name of the domain that you want to get availability for. Constraints: The domain name can contain only the letters a through z, the numbers 0 through 9, and hyphen (-). Internationalized Domain Names are not supported. cdaDomainName :: Lens' CheckDomainAvailability Text-cdaDomainName = lens _cdaDomainName (\ s a -> s{_cdaDomainName = a});+cdaDomainName = lens _cdaDomainName (\ s a -> s{_cdaDomainName = a})  instance AWSRequest CheckDomainAvailability where         type Rs CheckDomainAvailability =@@ -140,15 +140,17 @@     -> CheckDomainAvailabilityResponse checkDomainAvailabilityResponse pResponseStatus_ pAvailability_ =   CheckDomainAvailabilityResponse'-  {_cdarsResponseStatus = pResponseStatus_, _cdarsAvailability = pAvailability_}+    { _cdarsResponseStatus = pResponseStatus_+    , _cdarsAvailability = pAvailability_+    }   -- | -- | The response status code. cdarsResponseStatus :: Lens' CheckDomainAvailabilityResponse Int-cdarsResponseStatus = lens _cdarsResponseStatus (\ s a -> s{_cdarsResponseStatus = a});+cdarsResponseStatus = lens _cdarsResponseStatus (\ s a -> s{_cdarsResponseStatus = a})  -- | Whether the domain name is available for registering. Valid values:     * AVAILABLE    * The domain name is available.     * AVAILABLE_RESERVED    * The domain name is reserved under specific conditions.     * AVAILABLE_PREORDER    * The domain name is available and can be preordered.     * DONT_KNOW    * The TLD registry didn't reply with a definitive answer about whether the domain name is available. Amazon Route 53 can return this response for a variety of reasons, for example, the registry is performing maintenance. Try again later.     * PENDING    * The TLD registry didn't return a response in the expected amount of time. When the response is delayed, it usually takes just a few extra seconds. You can resubmit the request immediately.     * RESERVED    * The domain name has been reserved for another person or organization.     * UNAVAILABLE    * The domain name is not available.     * UNAVAILABLE_PREMIUM    * The domain name is not available.     * UNAVAILABLE_RESTRICTED    * The domain name is forbidden. cdarsAvailability :: Lens' CheckDomainAvailabilityResponse DomainAvailability-cdarsAvailability = lens _cdarsAvailability (\ s a -> s{_cdarsAvailability = a});+cdarsAvailability = lens _cdarsAvailability (\ s a -> s{_cdarsAvailability = a})  instance NFData CheckDomainAvailabilityResponse where
gen/Network/AWS/Route53Domains/CheckDomainTransferability.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.CheckDomainTransferability--- 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@@ -68,16 +68,16 @@     -> CheckDomainTransferability checkDomainTransferability pDomainName_ =   CheckDomainTransferability'-  {_cdtAuthCode = Nothing, _cdtDomainName = pDomainName_}+    {_cdtAuthCode = Nothing, _cdtDomainName = pDomainName_}   -- | If the registrar for the top-level domain (TLD) requires an authorization code to transfer the domain, the code that you got from the current registrar for the domain. cdtAuthCode :: Lens' CheckDomainTransferability (Maybe Text)-cdtAuthCode = lens _cdtAuthCode (\ s a -> s{_cdtAuthCode = a}) . mapping _Sensitive;+cdtAuthCode = lens _cdtAuthCode (\ s a -> s{_cdtAuthCode = a}) . mapping _Sensitive  -- | The name of the domain that you want to transfer to Amazon Route 53. Constraints: The domain name can contain only the letters a through z, the numbers 0 through 9, and hyphen (-). Internationalized Domain Names are not supported. cdtDomainName :: Lens' CheckDomainTransferability Text-cdtDomainName = lens _cdtDomainName (\ s a -> s{_cdtDomainName = a});+cdtDomainName = lens _cdtDomainName (\ s a -> s{_cdtDomainName = a})  instance AWSRequest CheckDomainTransferability where         type Rs CheckDomainTransferability =@@ -140,18 +140,18 @@     -> CheckDomainTransferabilityResponse checkDomainTransferabilityResponse pResponseStatus_ pTransferability_ =   CheckDomainTransferabilityResponse'-  { _cdtrsResponseStatus = pResponseStatus_-  , _cdtrsTransferability = pTransferability_-  }+    { _cdtrsResponseStatus = pResponseStatus_+    , _cdtrsTransferability = pTransferability_+    }   -- | -- | The response status code. cdtrsResponseStatus :: Lens' CheckDomainTransferabilityResponse Int-cdtrsResponseStatus = lens _cdtrsResponseStatus (\ s a -> s{_cdtrsResponseStatus = a});+cdtrsResponseStatus = lens _cdtrsResponseStatus (\ s a -> s{_cdtrsResponseStatus = a})  -- | A complex type that contains information about whether the specified domain can be transferred to Amazon Route 53. cdtrsTransferability :: Lens' CheckDomainTransferabilityResponse DomainTransferability-cdtrsTransferability = lens _cdtrsTransferability (\ s a -> s{_cdtrsTransferability = a});+cdtrsTransferability = lens _cdtrsTransferability (\ s a -> s{_cdtrsTransferability = a})  instance NFData CheckDomainTransferabilityResponse          where
gen/Network/AWS/Route53Domains/DeleteTagsForDomain.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.DeleteTagsForDomain--- 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@@ -69,16 +69,16 @@     -> DeleteTagsForDomain deleteTagsForDomain pDomainName_ =   DeleteTagsForDomain'-  {_dtfdDomainName = pDomainName_, _dtfdTagsToDelete = mempty}+    {_dtfdDomainName = pDomainName_, _dtfdTagsToDelete = mempty}   -- | The domain for which you want to delete one or more tags. dtfdDomainName :: Lens' DeleteTagsForDomain Text-dtfdDomainName = lens _dtfdDomainName (\ s a -> s{_dtfdDomainName = a});+dtfdDomainName = lens _dtfdDomainName (\ s a -> s{_dtfdDomainName = a})  -- | A list of tag keys to delete. dtfdTagsToDelete :: Lens' DeleteTagsForDomain [Text]-dtfdTagsToDelete = lens _dtfdTagsToDelete (\ s a -> s{_dtfdTagsToDelete = a}) . _Coerce;+dtfdTagsToDelete = lens _dtfdTagsToDelete (\ s a -> s{_dtfdTagsToDelete = a}) . _Coerce  instance AWSRequest DeleteTagsForDomain where         type Rs DeleteTagsForDomain =@@ -136,6 +136,6 @@  -- | -- | The response status code. dtfdrsResponseStatus :: Lens' DeleteTagsForDomainResponse Int-dtfdrsResponseStatus = lens _dtfdrsResponseStatus (\ s a -> s{_dtfdrsResponseStatus = a});+dtfdrsResponseStatus = lens _dtfdrsResponseStatus (\ s a -> s{_dtfdrsResponseStatus = a})  instance NFData DeleteTagsForDomainResponse where
gen/Network/AWS/Route53Domains/DisableDomainAutoRenew.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.DisableDomainAutoRenew--- 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@@ -63,7 +63,7 @@  -- | The name of the domain that you want to disable automatic renewal for. ddarDomainName :: Lens' DisableDomainAutoRenew Text-ddarDomainName = lens _ddarDomainName (\ s a -> s{_ddarDomainName = a});+ddarDomainName = lens _ddarDomainName (\ s a -> s{_ddarDomainName = a})  instance AWSRequest DisableDomainAutoRenew where         type Rs DisableDomainAutoRenew =@@ -120,6 +120,6 @@  -- | -- | The response status code. ddarrsResponseStatus :: Lens' DisableDomainAutoRenewResponse Int-ddarrsResponseStatus = lens _ddarrsResponseStatus (\ s a -> s{_ddarrsResponseStatus = a});+ddarrsResponseStatus = lens _ddarrsResponseStatus (\ s a -> s{_ddarrsResponseStatus = a})  instance NFData DisableDomainAutoRenewResponse where
gen/Network/AWS/Route53Domains/DisableDomainTransferLock.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.DisableDomainTransferLock--- 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@@ -68,7 +68,7 @@  -- | The name of the domain that you want to remove the transfer lock for. ddtlDomainName :: Lens' DisableDomainTransferLock Text-ddtlDomainName = lens _ddtlDomainName (\ s a -> s{_ddtlDomainName = a});+ddtlDomainName = lens _ddtlDomainName (\ s a -> s{_ddtlDomainName = a})  instance AWSRequest DisableDomainTransferLock where         type Rs DisableDomainTransferLock =@@ -129,16 +129,18 @@     -> DisableDomainTransferLockResponse disableDomainTransferLockResponse pResponseStatus_ pOperationId_ =   DisableDomainTransferLockResponse'-  {_ddtlrsResponseStatus = pResponseStatus_, _ddtlrsOperationId = pOperationId_}+    { _ddtlrsResponseStatus = pResponseStatus_+    , _ddtlrsOperationId = pOperationId_+    }   -- | -- | The response status code. ddtlrsResponseStatus :: Lens' DisableDomainTransferLockResponse Int-ddtlrsResponseStatus = lens _ddtlrsResponseStatus (\ s a -> s{_ddtlrsResponseStatus = a});+ddtlrsResponseStatus = lens _ddtlrsResponseStatus (\ s a -> s{_ddtlrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . ddtlrsOperationId :: Lens' DisableDomainTransferLockResponse Text-ddtlrsOperationId = lens _ddtlrsOperationId (\ s a -> s{_ddtlrsOperationId = a});+ddtlrsOperationId = lens _ddtlrsOperationId (\ s a -> s{_ddtlrsOperationId = a})  instance NFData DisableDomainTransferLockResponse          where
gen/Network/AWS/Route53Domains/EnableDomainAutoRenew.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.EnableDomainAutoRenew--- 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@@ -21,7 +21,7 @@ -- This operation configures Amazon Route 53 to automatically renew the specified domain before the domain registration expires. The cost of renewing your domain registration is billed to your AWS account. -- ----- The period during which you can renew a domain name varies by TLD. For a list of TLDs and their renewal policies, see <http://wiki.gandi.net/en/domains/renew#renewal_restoration_and_deletion_times "Renewal, restoration, and deletion times"> on the website for our registrar partner, Gandi. Route 53 requires that you renew before the end of the renewal period that is listed on the Gandi website so we can complete processing before the deadline.+-- The period during which you can renew a domain name varies by TLD. For a list of TLDs and their renewal policies, see <http://wiki.gandi.net/en/domains/renew#renewal_restoration_and_deletion_times "Renewal, restoration, and deletion times"> on the website for our registrar associate, Gandi. Amazon Route 53 requires that you renew before the end of the renewal period that is listed on the Gandi website so we can complete processing before the deadline. -- module Network.AWS.Route53Domains.EnableDomainAutoRenew     (@@ -65,7 +65,7 @@  -- | The name of the domain that you want to enable automatic renewal for. edarDomainName :: Lens' EnableDomainAutoRenew Text-edarDomainName = lens _edarDomainName (\ s a -> s{_edarDomainName = a});+edarDomainName = lens _edarDomainName (\ s a -> s{_edarDomainName = a})  instance AWSRequest EnableDomainAutoRenew where         type Rs EnableDomainAutoRenew =@@ -122,6 +122,6 @@  -- | -- | The response status code. edarrsResponseStatus :: Lens' EnableDomainAutoRenewResponse Int-edarrsResponseStatus = lens _edarrsResponseStatus (\ s a -> s{_edarrsResponseStatus = a});+edarrsResponseStatus = lens _edarrsResponseStatus (\ s a -> s{_edarrsResponseStatus = a})  instance NFData EnableDomainAutoRenewResponse where
gen/Network/AWS/Route53Domains/EnableDomainTransferLock.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.EnableDomainTransferLock--- 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@@ -68,7 +68,7 @@  -- | The name of the domain that you want to set the transfer lock for. edtlDomainName :: Lens' EnableDomainTransferLock Text-edtlDomainName = lens _edtlDomainName (\ s a -> s{_edtlDomainName = a});+edtlDomainName = lens _edtlDomainName (\ s a -> s{_edtlDomainName = a})  instance AWSRequest EnableDomainTransferLock where         type Rs EnableDomainTransferLock =@@ -129,16 +129,18 @@     -> EnableDomainTransferLockResponse enableDomainTransferLockResponse pResponseStatus_ pOperationId_ =   EnableDomainTransferLockResponse'-  {_edtlrsResponseStatus = pResponseStatus_, _edtlrsOperationId = pOperationId_}+    { _edtlrsResponseStatus = pResponseStatus_+    , _edtlrsOperationId = pOperationId_+    }   -- | -- | The response status code. edtlrsResponseStatus :: Lens' EnableDomainTransferLockResponse Int-edtlrsResponseStatus = lens _edtlrsResponseStatus (\ s a -> s{_edtlrsResponseStatus = a});+edtlrsResponseStatus = lens _edtlrsResponseStatus (\ s a -> s{_edtlrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use GetOperationDetail. edtlrsOperationId :: Lens' EnableDomainTransferLockResponse Text-edtlrsOperationId = lens _edtlrsOperationId (\ s a -> s{_edtlrsOperationId = a});+edtlrsOperationId = lens _edtlrsOperationId (\ s a -> s{_edtlrsOperationId = a})  instance NFData EnableDomainTransferLockResponse          where
gen/Network/AWS/Route53Domains/GetContactReachabilityStatus.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.GetContactReachabilityStatus--- 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 @@  -- | The name of the domain for which you want to know whether the registrant contact has confirmed that the email address is valid. gcrsDomainName :: Lens' GetContactReachabilityStatus (Maybe Text)-gcrsDomainName = lens _gcrsDomainName (\ s a -> s{_gcrsDomainName = a});+gcrsDomainName = lens _gcrsDomainName (\ s a -> s{_gcrsDomainName = a})  instance AWSRequest GetContactReachabilityStatus          where@@ -127,23 +127,23 @@     -> GetContactReachabilityStatusResponse getContactReachabilityStatusResponse pResponseStatus_ =   GetContactReachabilityStatusResponse'-  { _gcrsrsStatus = Nothing-  , _gcrsrsDomainName = Nothing-  , _gcrsrsResponseStatus = pResponseStatus_-  }+    { _gcrsrsStatus = Nothing+    , _gcrsrsDomainName = Nothing+    , _gcrsrsResponseStatus = pResponseStatus_+    }   -- | Whether the registrant contact has responded. Values include the following:     * PENDING    * We sent the confirmation email and haven't received a response yet.     * DONE    * We sent the email and got confirmation from the registrant contact.     * EXPIRED    * The time limit expired before the registrant contact responded. gcrsrsStatus :: Lens' GetContactReachabilityStatusResponse (Maybe ReachabilityStatus)-gcrsrsStatus = lens _gcrsrsStatus (\ s a -> s{_gcrsrsStatus = a});+gcrsrsStatus = lens _gcrsrsStatus (\ s a -> s{_gcrsrsStatus = a})  -- | The domain name for which you requested the reachability status. gcrsrsDomainName :: Lens' GetContactReachabilityStatusResponse (Maybe Text)-gcrsrsDomainName = lens _gcrsrsDomainName (\ s a -> s{_gcrsrsDomainName = a});+gcrsrsDomainName = lens _gcrsrsDomainName (\ s a -> s{_gcrsrsDomainName = a})  -- | -- | The response status code. gcrsrsResponseStatus :: Lens' GetContactReachabilityStatusResponse Int-gcrsrsResponseStatus = lens _gcrsrsResponseStatus (\ s a -> s{_gcrsrsResponseStatus = a});+gcrsrsResponseStatus = lens _gcrsrsResponseStatus (\ s a -> s{_gcrsrsResponseStatus = a})  instance NFData GetContactReachabilityStatusResponse          where
gen/Network/AWS/Route53Domains/GetDomainDetail.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.GetDomainDetail--- 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@@ -87,7 +87,7 @@  -- | The name of the domain that you want to get detailed information about. gddDomainName :: Lens' GetDomainDetail Text-gddDomainName = lens _gddDomainName (\ s a -> s{_gddDomainName = a});+gddDomainName = lens _gddDomainName (\ s a -> s{_gddDomainName = a})  instance AWSRequest GetDomainDetail where         type Rs GetDomainDetail = GetDomainDetailResponse@@ -178,7 +178,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gddrsTechPrivacy' - Specifies whether contact information for the tech contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'gddrsTechPrivacy' - Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the technical contact. -- -- * 'gddrsDNSSec' - Reserved for future use. --@@ -186,11 +186,11 @@ -- -- * 'gddrsRegistryDomainId' - Reserved for future use. ----- * 'gddrsRegistrantPrivacy' - Specifies whether contact information for the registrant contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'gddrsRegistrantPrivacy' - Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). ----- * 'gddrsUpdatedDate' - The last updated date of the domain as found in the response to a WHOIS query. The date format is Unix time.+-- * 'gddrsUpdatedDate' - The last updated date of the domain as found in the response to a WHOIS query. The date and time is in Coordinated Universal time (UTC). ----- * 'gddrsAdminPrivacy' - Specifies whether contact information for the admin contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'gddrsAdminPrivacy' - Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the admin contact. -- -- * 'gddrsAutoRenew' - Specifies whether the domain registration is set to renew automatically. --@@ -200,11 +200,11 @@ -- -- * 'gddrsAbuseContactEmail' - Email address to contact to report incorrect contact information for a domain, to report that the domain is being used to send spam, to report that someone is cybersquatting on a domain name, or report some other type of abuse. ----- * 'gddrsExpirationDate' - The date when the registration for the domain is set to expire. The date format is Unix time.+-- * 'gddrsExpirationDate' - The date when the registration for the domain is set to expire. The date and time is in Coordinated Universal time (UTC). ----- * 'gddrsCreationDate' - The date when the domain was created as found in the response to a WHOIS query. The date format is Unix time.+-- * 'gddrsCreationDate' - The date when the domain was created as found in the response to a WHOIS query. The date and time is in Coordinated Universal time (UTC). ----- * 'gddrsRegistrarName' - Name of the registrar of the domain as identified in the registry. Amazon Route 53 domains are registered by registrar Gandi. The value is @"GANDI SAS"@ .+-- * 'gddrsRegistrarName' - Name of the registrar of the domain as identified in the registry. Domains with a .com, .net, or .org TLD are registered by Amazon Registrar. All other domains are registered by our registrar associate, Gandi. The value for domains that are registered by Gandi is @"GANDI SAS"@ . -- -- * 'gddrsReseller' - Reseller of the domain. Domains registered or transferred using Amazon Route 53 domains will have @"Amazon"@ as the reseller. --@@ -230,117 +230,117 @@     -> GetDomainDetailResponse getDomainDetailResponse pResponseStatus_ pDomainName_ pAdminContact_ pRegistrantContact_ pTechContact_ =   GetDomainDetailResponse'-  { _gddrsTechPrivacy = Nothing-  , _gddrsDNSSec = Nothing-  , _gddrsWhoIsServer = Nothing-  , _gddrsRegistryDomainId = Nothing-  , _gddrsRegistrantPrivacy = Nothing-  , _gddrsUpdatedDate = Nothing-  , _gddrsAdminPrivacy = Nothing-  , _gddrsAutoRenew = Nothing-  , _gddrsAbuseContactPhone = Nothing-  , _gddrsRegistrarURL = Nothing-  , _gddrsAbuseContactEmail = Nothing-  , _gddrsExpirationDate = Nothing-  , _gddrsCreationDate = Nothing-  , _gddrsRegistrarName = Nothing-  , _gddrsReseller = Nothing-  , _gddrsStatusList = Nothing-  , _gddrsResponseStatus = pResponseStatus_-  , _gddrsDomainName = pDomainName_-  , _gddrsNameservers = mempty-  , _gddrsAdminContact = _Sensitive # pAdminContact_-  , _gddrsRegistrantContact = _Sensitive # pRegistrantContact_-  , _gddrsTechContact = _Sensitive # pTechContact_-  }+    { _gddrsTechPrivacy = Nothing+    , _gddrsDNSSec = Nothing+    , _gddrsWhoIsServer = Nothing+    , _gddrsRegistryDomainId = Nothing+    , _gddrsRegistrantPrivacy = Nothing+    , _gddrsUpdatedDate = Nothing+    , _gddrsAdminPrivacy = Nothing+    , _gddrsAutoRenew = Nothing+    , _gddrsAbuseContactPhone = Nothing+    , _gddrsRegistrarURL = Nothing+    , _gddrsAbuseContactEmail = Nothing+    , _gddrsExpirationDate = Nothing+    , _gddrsCreationDate = Nothing+    , _gddrsRegistrarName = Nothing+    , _gddrsReseller = Nothing+    , _gddrsStatusList = Nothing+    , _gddrsResponseStatus = pResponseStatus_+    , _gddrsDomainName = pDomainName_+    , _gddrsNameservers = mempty+    , _gddrsAdminContact = _Sensitive # pAdminContact_+    , _gddrsRegistrantContact = _Sensitive # pRegistrantContact_+    , _gddrsTechContact = _Sensitive # pTechContact_+    }  --- | Specifies whether contact information for the tech contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the technical contact. gddrsTechPrivacy :: Lens' GetDomainDetailResponse (Maybe Bool)-gddrsTechPrivacy = lens _gddrsTechPrivacy (\ s a -> s{_gddrsTechPrivacy = a});+gddrsTechPrivacy = lens _gddrsTechPrivacy (\ s a -> s{_gddrsTechPrivacy = a})  -- | Reserved for future use. gddrsDNSSec :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsDNSSec = lens _gddrsDNSSec (\ s a -> s{_gddrsDNSSec = a});+gddrsDNSSec = lens _gddrsDNSSec (\ s a -> s{_gddrsDNSSec = a})  -- | The fully qualified name of the WHOIS server that can answer the WHOIS query for the domain. gddrsWhoIsServer :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsWhoIsServer = lens _gddrsWhoIsServer (\ s a -> s{_gddrsWhoIsServer = a});+gddrsWhoIsServer = lens _gddrsWhoIsServer (\ s a -> s{_gddrsWhoIsServer = a})  -- | Reserved for future use. gddrsRegistryDomainId :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsRegistryDomainId = lens _gddrsRegistryDomainId (\ s a -> s{_gddrsRegistryDomainId = a});+gddrsRegistryDomainId = lens _gddrsRegistryDomainId (\ s a -> s{_gddrsRegistryDomainId = a}) --- | Specifies whether contact information for the registrant contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). gddrsRegistrantPrivacy :: Lens' GetDomainDetailResponse (Maybe Bool)-gddrsRegistrantPrivacy = lens _gddrsRegistrantPrivacy (\ s a -> s{_gddrsRegistrantPrivacy = a});+gddrsRegistrantPrivacy = lens _gddrsRegistrantPrivacy (\ s a -> s{_gddrsRegistrantPrivacy = a}) --- | The last updated date of the domain as found in the response to a WHOIS query. The date format is Unix time.+-- | The last updated date of the domain as found in the response to a WHOIS query. The date and time is in Coordinated Universal time (UTC). gddrsUpdatedDate :: Lens' GetDomainDetailResponse (Maybe UTCTime)-gddrsUpdatedDate = lens _gddrsUpdatedDate (\ s a -> s{_gddrsUpdatedDate = a}) . mapping _Time;+gddrsUpdatedDate = lens _gddrsUpdatedDate (\ s a -> s{_gddrsUpdatedDate = a}) . mapping _Time --- | Specifies whether contact information for the admin contact is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Specifies whether contact information is concealed from WHOIS queries. If the value is @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If the value is @false@ , WHOIS queries return the information that you entered for the admin contact. gddrsAdminPrivacy :: Lens' GetDomainDetailResponse (Maybe Bool)-gddrsAdminPrivacy = lens _gddrsAdminPrivacy (\ s a -> s{_gddrsAdminPrivacy = a});+gddrsAdminPrivacy = lens _gddrsAdminPrivacy (\ s a -> s{_gddrsAdminPrivacy = a})  -- | Specifies whether the domain registration is set to renew automatically. gddrsAutoRenew :: Lens' GetDomainDetailResponse (Maybe Bool)-gddrsAutoRenew = lens _gddrsAutoRenew (\ s a -> s{_gddrsAutoRenew = a});+gddrsAutoRenew = lens _gddrsAutoRenew (\ s a -> s{_gddrsAutoRenew = a})  -- | Phone number for reporting abuse. gddrsAbuseContactPhone :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsAbuseContactPhone = lens _gddrsAbuseContactPhone (\ s a -> s{_gddrsAbuseContactPhone = a});+gddrsAbuseContactPhone = lens _gddrsAbuseContactPhone (\ s a -> s{_gddrsAbuseContactPhone = a})  -- | Web address of the registrar. gddrsRegistrarURL :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsRegistrarURL = lens _gddrsRegistrarURL (\ s a -> s{_gddrsRegistrarURL = a});+gddrsRegistrarURL = lens _gddrsRegistrarURL (\ s a -> s{_gddrsRegistrarURL = a})  -- | Email address to contact to report incorrect contact information for a domain, to report that the domain is being used to send spam, to report that someone is cybersquatting on a domain name, or report some other type of abuse. gddrsAbuseContactEmail :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsAbuseContactEmail = lens _gddrsAbuseContactEmail (\ s a -> s{_gddrsAbuseContactEmail = a});+gddrsAbuseContactEmail = lens _gddrsAbuseContactEmail (\ s a -> s{_gddrsAbuseContactEmail = a}) --- | The date when the registration for the domain is set to expire. The date format is Unix time.+-- | The date when the registration for the domain is set to expire. The date and time is in Coordinated Universal time (UTC). gddrsExpirationDate :: Lens' GetDomainDetailResponse (Maybe UTCTime)-gddrsExpirationDate = lens _gddrsExpirationDate (\ s a -> s{_gddrsExpirationDate = a}) . mapping _Time;+gddrsExpirationDate = lens _gddrsExpirationDate (\ s a -> s{_gddrsExpirationDate = a}) . mapping _Time --- | The date when the domain was created as found in the response to a WHOIS query. The date format is Unix time.+-- | The date when the domain was created as found in the response to a WHOIS query. The date and time is in Coordinated Universal time (UTC). gddrsCreationDate :: Lens' GetDomainDetailResponse (Maybe UTCTime)-gddrsCreationDate = lens _gddrsCreationDate (\ s a -> s{_gddrsCreationDate = a}) . mapping _Time;+gddrsCreationDate = lens _gddrsCreationDate (\ s a -> s{_gddrsCreationDate = a}) . mapping _Time --- | Name of the registrar of the domain as identified in the registry. Amazon Route 53 domains are registered by registrar Gandi. The value is @"GANDI SAS"@ .+-- | Name of the registrar of the domain as identified in the registry. Domains with a .com, .net, or .org TLD are registered by Amazon Registrar. All other domains are registered by our registrar associate, Gandi. The value for domains that are registered by Gandi is @"GANDI SAS"@ . gddrsRegistrarName :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsRegistrarName = lens _gddrsRegistrarName (\ s a -> s{_gddrsRegistrarName = a});+gddrsRegistrarName = lens _gddrsRegistrarName (\ s a -> s{_gddrsRegistrarName = a})  -- | Reseller of the domain. Domains registered or transferred using Amazon Route 53 domains will have @"Amazon"@ as the reseller. gddrsReseller :: Lens' GetDomainDetailResponse (Maybe Text)-gddrsReseller = lens _gddrsReseller (\ s a -> s{_gddrsReseller = a});+gddrsReseller = lens _gddrsReseller (\ s a -> s{_gddrsReseller = a})  -- | An array of domain name status codes, also known as Extensible Provisioning Protocol (EPP) status codes. ICANN, the organization that maintains a central database of domain names, has developed a set of domain name status codes that tell you the status of a variety of operations on a domain name, for example, registering a domain name, transferring a domain name to another registrar, renewing the registration for a domain name, and so on. All registrars use this same set of status codes. For a current list of domain name status codes and an explanation of what each code means, go to the <https://www.icann.org/ ICANN website> and search for @epp status codes@ . (Search on the ICANN website; web searches sometimes return an old version of the document.) gddrsStatusList :: Lens' GetDomainDetailResponse [Text]-gddrsStatusList = lens _gddrsStatusList (\ s a -> s{_gddrsStatusList = a}) . _Default . _Coerce;+gddrsStatusList = lens _gddrsStatusList (\ s a -> s{_gddrsStatusList = a}) . _Default . _Coerce  -- | -- | The response status code. gddrsResponseStatus :: Lens' GetDomainDetailResponse Int-gddrsResponseStatus = lens _gddrsResponseStatus (\ s a -> s{_gddrsResponseStatus = a});+gddrsResponseStatus = lens _gddrsResponseStatus (\ s a -> s{_gddrsResponseStatus = a})  -- | The name of a domain. gddrsDomainName :: Lens' GetDomainDetailResponse Text-gddrsDomainName = lens _gddrsDomainName (\ s a -> s{_gddrsDomainName = a});+gddrsDomainName = lens _gddrsDomainName (\ s a -> s{_gddrsDomainName = a})  -- | The name of the domain. gddrsNameservers :: Lens' GetDomainDetailResponse [Nameserver]-gddrsNameservers = lens _gddrsNameservers (\ s a -> s{_gddrsNameservers = a}) . _Coerce;+gddrsNameservers = lens _gddrsNameservers (\ s a -> s{_gddrsNameservers = a}) . _Coerce  -- | Provides details about the domain administrative contact. gddrsAdminContact :: Lens' GetDomainDetailResponse ContactDetail-gddrsAdminContact = lens _gddrsAdminContact (\ s a -> s{_gddrsAdminContact = a}) . _Sensitive;+gddrsAdminContact = lens _gddrsAdminContact (\ s a -> s{_gddrsAdminContact = a}) . _Sensitive  -- | Provides details about the domain registrant. gddrsRegistrantContact :: Lens' GetDomainDetailResponse ContactDetail-gddrsRegistrantContact = lens _gddrsRegistrantContact (\ s a -> s{_gddrsRegistrantContact = a}) . _Sensitive;+gddrsRegistrantContact = lens _gddrsRegistrantContact (\ s a -> s{_gddrsRegistrantContact = a}) . _Sensitive  -- | Provides details about the domain technical contact. gddrsTechContact :: Lens' GetDomainDetailResponse ContactDetail-gddrsTechContact = lens _gddrsTechContact (\ s a -> s{_gddrsTechContact = a}) . _Sensitive;+gddrsTechContact = lens _gddrsTechContact (\ s a -> s{_gddrsTechContact = a}) . _Sensitive  instance NFData GetDomainDetailResponse where
gen/Network/AWS/Route53Domains/GetDomainSuggestions.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.GetDomainSuggestions--- 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@@ -70,23 +70,23 @@     -> GetDomainSuggestions getDomainSuggestions pDomainName_ pSuggestionCount_ pOnlyAvailable_ =   GetDomainSuggestions'-  { _gdsDomainName = pDomainName_-  , _gdsSuggestionCount = pSuggestionCount_-  , _gdsOnlyAvailable = pOnlyAvailable_-  }+    { _gdsDomainName = pDomainName_+    , _gdsSuggestionCount = pSuggestionCount_+    , _gdsOnlyAvailable = pOnlyAvailable_+    }   -- | A domain name that you want to use as the basis for a list of possible domain names. The domain name must contain a top-level domain (TLD), such as .com, that Amazon Route 53 supports. For a list of TLDs, see <http://docs.aws.amazon.com/Route53/latest/DeveloperGuide/registrar-tld-list.html Domains that You Can Register with Amazon Route 53> in the /Amazon Route 53 Developer Guide/ . gdsDomainName :: Lens' GetDomainSuggestions Text-gdsDomainName = lens _gdsDomainName (\ s a -> s{_gdsDomainName = a});+gdsDomainName = lens _gdsDomainName (\ s a -> s{_gdsDomainName = a})  -- | The number of suggested domain names that you want Amazon Route 53 to return. gdsSuggestionCount :: Lens' GetDomainSuggestions Int-gdsSuggestionCount = lens _gdsSuggestionCount (\ s a -> s{_gdsSuggestionCount = a});+gdsSuggestionCount = lens _gdsSuggestionCount (\ s a -> s{_gdsSuggestionCount = a})  -- | If @OnlyAvailable@ is @true@ , Amazon Route 53 returns only domain names that are available. If @OnlyAvailable@ is @false@ , Amazon Route 53 returns domain names without checking whether they're available to be registered. To determine whether the domain is available, you can call @checkDomainAvailability@ for each suggestion. gdsOnlyAvailable :: Lens' GetDomainSuggestions Bool-gdsOnlyAvailable = lens _gdsOnlyAvailable (\ s a -> s{_gdsOnlyAvailable = a});+gdsOnlyAvailable = lens _gdsOnlyAvailable (\ s a -> s{_gdsOnlyAvailable = a})  instance AWSRequest GetDomainSuggestions where         type Rs GetDomainSuggestions =@@ -146,15 +146,15 @@     -> GetDomainSuggestionsResponse getDomainSuggestionsResponse pResponseStatus_ =   GetDomainSuggestionsResponse'-  {_gdsrsSuggestionsList = Nothing, _gdsrsResponseStatus = pResponseStatus_}+    {_gdsrsSuggestionsList = Nothing, _gdsrsResponseStatus = pResponseStatus_}   -- | A list of possible domain names. If you specified @true@ for @OnlyAvailable@ in the request, the list contains only domains that are available for registration. gdsrsSuggestionsList :: Lens' GetDomainSuggestionsResponse [DomainSuggestion]-gdsrsSuggestionsList = lens _gdsrsSuggestionsList (\ s a -> s{_gdsrsSuggestionsList = a}) . _Default . _Coerce;+gdsrsSuggestionsList = lens _gdsrsSuggestionsList (\ s a -> s{_gdsrsSuggestionsList = a}) . _Default . _Coerce  -- | -- | The response status code. gdsrsResponseStatus :: Lens' GetDomainSuggestionsResponse Int-gdsrsResponseStatus = lens _gdsrsResponseStatus (\ s a -> s{_gdsrsResponseStatus = a});+gdsrsResponseStatus = lens _gdsrsResponseStatus (\ s a -> s{_gdsrsResponseStatus = a})  instance NFData GetDomainSuggestionsResponse where
gen/Network/AWS/Route53Domains/GetOperationDetail.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.GetOperationDetail--- 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@@ -73,7 +73,7 @@  -- | The identifier for the operation for which you want to get the status. Amazon Route 53 returned the identifier in the response to the original request. godOperationId :: Lens' GetOperationDetail Text-godOperationId = lens _godOperationId (\ s a -> s{_godOperationId = a});+godOperationId = lens _godOperationId (\ s a -> s{_godOperationId = a})  instance AWSRequest GetOperationDetail where         type Rs GetOperationDetail =@@ -153,42 +153,42 @@     -> GetOperationDetailResponse getOperationDetailResponse pResponseStatus_ =   GetOperationDetailResponse'-  { _godrsStatus = Nothing-  , _godrsSubmittedDate = Nothing-  , _godrsDomainName = Nothing-  , _godrsOperationId = Nothing-  , _godrsType = Nothing-  , _godrsMessage = Nothing-  , _godrsResponseStatus = pResponseStatus_-  }+    { _godrsStatus = Nothing+    , _godrsSubmittedDate = Nothing+    , _godrsDomainName = Nothing+    , _godrsOperationId = Nothing+    , _godrsType = Nothing+    , _godrsMessage = Nothing+    , _godrsResponseStatus = pResponseStatus_+    }   -- | The current status of the requested operation in the system. godrsStatus :: Lens' GetOperationDetailResponse (Maybe OperationStatus)-godrsStatus = lens _godrsStatus (\ s a -> s{_godrsStatus = a});+godrsStatus = lens _godrsStatus (\ s a -> s{_godrsStatus = a})  -- | The date when the request was submitted. godrsSubmittedDate :: Lens' GetOperationDetailResponse (Maybe UTCTime)-godrsSubmittedDate = lens _godrsSubmittedDate (\ s a -> s{_godrsSubmittedDate = a}) . mapping _Time;+godrsSubmittedDate = lens _godrsSubmittedDate (\ s a -> s{_godrsSubmittedDate = a}) . mapping _Time  -- | The name of a domain. godrsDomainName :: Lens' GetOperationDetailResponse (Maybe Text)-godrsDomainName = lens _godrsDomainName (\ s a -> s{_godrsDomainName = a});+godrsDomainName = lens _godrsDomainName (\ s a -> s{_godrsDomainName = a})  -- | The identifier for the operation. godrsOperationId :: Lens' GetOperationDetailResponse (Maybe Text)-godrsOperationId = lens _godrsOperationId (\ s a -> s{_godrsOperationId = a});+godrsOperationId = lens _godrsOperationId (\ s a -> s{_godrsOperationId = a})  -- | The type of operation that was requested. godrsType :: Lens' GetOperationDetailResponse (Maybe OperationType)-godrsType = lens _godrsType (\ s a -> s{_godrsType = a});+godrsType = lens _godrsType (\ s a -> s{_godrsType = a})  -- | Detailed information on the status including possible errors. godrsMessage :: Lens' GetOperationDetailResponse (Maybe Text)-godrsMessage = lens _godrsMessage (\ s a -> s{_godrsMessage = a});+godrsMessage = lens _godrsMessage (\ s a -> s{_godrsMessage = a})  -- | -- | The response status code. godrsResponseStatus :: Lens' GetOperationDetailResponse Int-godrsResponseStatus = lens _godrsResponseStatus (\ s a -> s{_godrsResponseStatus = a});+godrsResponseStatus = lens _godrsResponseStatus (\ s a -> s{_godrsResponseStatus = a})  instance NFData GetOperationDetailResponse where
gen/Network/AWS/Route53Domains/ListDomains.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.ListDomains--- 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,11 +74,11 @@  -- | For an initial request for a list of domains, omit this element. If the number of domains that are associated with the current AWS account is greater than the value that you specified for @MaxItems@ , you can use @Marker@ to return additional domains. Get the value of @NextPageMarker@ from the previous response, and submit another request that includes the value of @NextPageMarker@ in the @Marker@ element. Constraints: The marker must match the value specified in the previous request. ldMarker :: Lens' ListDomains (Maybe Text)-ldMarker = lens _ldMarker (\ s a -> s{_ldMarker = a});+ldMarker = lens _ldMarker (\ s a -> s{_ldMarker = a})  -- | Number of domains to be returned. Default: 20 ldMaxItems :: Lens' ListDomains (Maybe Int)-ldMaxItems = lens _ldMaxItems (\ s a -> s{_ldMaxItems = a});+ldMaxItems = lens _ldMaxItems (\ s a -> s{_ldMaxItems = a})  instance AWSPager ListDomains where         page rq rs@@ -150,22 +150,22 @@     -> ListDomainsResponse listDomainsResponse pResponseStatus_ =   ListDomainsResponse'-  { _ldrsNextPageMarker = Nothing-  , _ldrsResponseStatus = pResponseStatus_-  , _ldrsDomains = mempty-  }+    { _ldrsNextPageMarker = Nothing+    , _ldrsResponseStatus = pResponseStatus_+    , _ldrsDomains = mempty+    }   -- | If there are more domains than you specified for @MaxItems@ in the request, submit another request and include the value of @NextPageMarker@ in the value of @Marker@ . ldrsNextPageMarker :: Lens' ListDomainsResponse (Maybe Text)-ldrsNextPageMarker = lens _ldrsNextPageMarker (\ s a -> s{_ldrsNextPageMarker = a});+ldrsNextPageMarker = lens _ldrsNextPageMarker (\ s a -> s{_ldrsNextPageMarker = a})  -- | -- | The response status code. ldrsResponseStatus :: Lens' ListDomainsResponse Int-ldrsResponseStatus = lens _ldrsResponseStatus (\ s a -> s{_ldrsResponseStatus = a});+ldrsResponseStatus = lens _ldrsResponseStatus (\ s a -> s{_ldrsResponseStatus = a})  -- | A summary of domains. ldrsDomains :: Lens' ListDomainsResponse [DomainSummary]-ldrsDomains = lens _ldrsDomains (\ s a -> s{_ldrsDomains = a}) . _Coerce;+ldrsDomains = lens _ldrsDomains (\ s a -> s{_ldrsDomains = a}) . _Coerce  instance NFData ListDomainsResponse where
gen/Network/AWS/Route53Domains/ListOperations.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.ListOperations--- 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@@ -31,6 +31,7 @@     -- * Request Lenses     , loMarker     , loMaxItems+    , loSubmittedSince      -- * Destructuring the Response     , listOperationsResponse@@ -55,8 +56,9 @@ -- -- /See:/ 'listOperations' smart constructor. data ListOperations = ListOperations'-  { _loMarker   :: !(Maybe Text)-  , _loMaxItems :: !(Maybe Int)+  { _loMarker         :: !(Maybe Text)+  , _loMaxItems       :: !(Maybe Int)+  , _loSubmittedSince :: !(Maybe POSIX)   } deriving (Eq, Read, Show, Data, Typeable, Generic)  @@ -67,19 +69,27 @@ -- * 'loMarker' - For an initial request for a list of operations, omit this element. If the number of operations that are not yet complete is greater than the value that you specified for @MaxItems@ , you can use @Marker@ to return additional operations. Get the value of @NextPageMarker@ from the previous response, and submit another request that includes the value of @NextPageMarker@ in the @Marker@ element. -- -- * 'loMaxItems' - Number of domains to be returned. Default: 20+--+-- * 'loSubmittedSince' - An optional parameter that lets you get information about all the operations that you submitted after a specified date and time. Specify the date and time in Coordinated Universal time (UTC). listOperations     :: ListOperations-listOperations = ListOperations' {_loMarker = Nothing, _loMaxItems = Nothing}+listOperations =+  ListOperations'+    {_loMarker = Nothing, _loMaxItems = Nothing, _loSubmittedSince = Nothing}   -- | For an initial request for a list of operations, omit this element. If the number of operations that are not yet complete is greater than the value that you specified for @MaxItems@ , you can use @Marker@ to return additional operations. Get the value of @NextPageMarker@ from the previous response, and submit another request that includes the value of @NextPageMarker@ in the @Marker@ element. loMarker :: Lens' ListOperations (Maybe Text)-loMarker = lens _loMarker (\ s a -> s{_loMarker = a});+loMarker = lens _loMarker (\ s a -> s{_loMarker = a})  -- | Number of domains to be returned. Default: 20 loMaxItems :: Lens' ListOperations (Maybe Int)-loMaxItems = lens _loMaxItems (\ s a -> s{_loMaxItems = a});+loMaxItems = lens _loMaxItems (\ s a -> s{_loMaxItems = a}) +-- | An optional parameter that lets you get information about all the operations that you submitted after a specified date and time. Specify the date and time in Coordinated Universal time (UTC).+loSubmittedSince :: Lens' ListOperations (Maybe UTCTime)+loSubmittedSince = lens _loSubmittedSince (\ s a -> s{_loSubmittedSince = a}) . mapping _Time+ instance AWSPager ListOperations where         page rq rs           | stop (rs ^. lorsNextPageMarker) = Nothing@@ -116,7 +126,8 @@           = object               (catMaybes                  [("Marker" .=) <$> _loMarker,-                  ("MaxItems" .=) <$> _loMaxItems])+                  ("MaxItems" .=) <$> _loMaxItems,+                  ("SubmittedSince" .=) <$> _loSubmittedSince])  instance ToPath ListOperations where         toPath = const "/"@@ -150,22 +161,22 @@     -> ListOperationsResponse listOperationsResponse pResponseStatus_ =   ListOperationsResponse'-  { _lorsNextPageMarker = Nothing-  , _lorsResponseStatus = pResponseStatus_-  , _lorsOperations = mempty-  }+    { _lorsNextPageMarker = Nothing+    , _lorsResponseStatus = pResponseStatus_+    , _lorsOperations = mempty+    }   -- | If there are more operations than you specified for @MaxItems@ in the request, submit another request and include the value of @NextPageMarker@ in the value of @Marker@ . lorsNextPageMarker :: Lens' ListOperationsResponse (Maybe Text)-lorsNextPageMarker = lens _lorsNextPageMarker (\ s a -> s{_lorsNextPageMarker = a});+lorsNextPageMarker = lens _lorsNextPageMarker (\ s a -> s{_lorsNextPageMarker = a})  -- | -- | The response status code. lorsResponseStatus :: Lens' ListOperationsResponse Int-lorsResponseStatus = lens _lorsResponseStatus (\ s a -> s{_lorsResponseStatus = a});+lorsResponseStatus = lens _lorsResponseStatus (\ s a -> s{_lorsResponseStatus = a})  -- | Lists summaries of the operations. lorsOperations :: Lens' ListOperationsResponse [OperationSummary]-lorsOperations = lens _lorsOperations (\ s a -> s{_lorsOperations = a}) . _Coerce;+lorsOperations = lens _lorsOperations (\ s a -> s{_lorsOperations = a}) . _Coerce  instance NFData ListOperationsResponse where
gen/Network/AWS/Route53Domains/ListTagsForDomain.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.ListTagsForDomain--- 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@@ -70,7 +70,7 @@  -- | The domain for which you want to get a list of tags. ltfdDomainName :: Lens' ListTagsForDomain Text-ltfdDomainName = lens _ltfdDomainName (\ s a -> s{_ltfdDomainName = a});+ltfdDomainName = lens _ltfdDomainName (\ s a -> s{_ltfdDomainName = a})  instance AWSRequest ListTagsForDomain where         type Rs ListTagsForDomain = ListTagsForDomainResponse@@ -129,15 +129,15 @@     -> ListTagsForDomainResponse listTagsForDomainResponse pResponseStatus_ =   ListTagsForDomainResponse'-  {_ltfdrsResponseStatus = pResponseStatus_, _ltfdrsTagList = mempty}+    {_ltfdrsResponseStatus = pResponseStatus_, _ltfdrsTagList = mempty}   -- | -- | The response status code. ltfdrsResponseStatus :: Lens' ListTagsForDomainResponse Int-ltfdrsResponseStatus = lens _ltfdrsResponseStatus (\ s a -> s{_ltfdrsResponseStatus = a});+ltfdrsResponseStatus = lens _ltfdrsResponseStatus (\ s a -> s{_ltfdrsResponseStatus = a})  -- | A list of the tags that are associated with the specified domain. ltfdrsTagList :: Lens' ListTagsForDomainResponse [Tag]-ltfdrsTagList = lens _ltfdrsTagList (\ s a -> s{_ltfdrsTagList = a}) . _Coerce;+ltfdrsTagList = lens _ltfdrsTagList (\ s a -> s{_ltfdrsTagList = a}) . _Coerce  instance NFData ListTagsForDomainResponse where
gen/Network/AWS/Route53Domains/RegisterDomain.hs view
@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.Route53Domains.RegisterDomain--- 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 -- Portability : non-portable (GHC extensions) ----- This operation registers a domain. Domains are registered by the AWS registrar partner, Gandi. For some top-level domains (TLDs), this operation requires extra parameters.+-- This operation registers a domain. Domains are registered either by Amazon Registrar (for .com, .net, and .org domains) or by our registrar associate, Gandi (for all other domains). For some top-level domains (TLDs), this operation requires extra parameters. -- -- -- When you register a domain, Amazon Route 53 does the following:@@ -27,7 +27,7 @@ -- --     * Enables autorenew, so your domain registration will renew automatically each year. We'll notify you in advance of the renewal date so you can choose whether to renew the registration. -----     * Optionally enables privacy protection, so WHOIS queries return contact information for our registrar partner, Gandi, instead of the information you entered for registrant, admin, and tech contacts.+--     * Optionally enables privacy protection, so WHOIS queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you don't enable privacy protection, WHOIS queries return the information that you entered for the registrant, admin, and tech contacts. -- --     * If registration is successful, returns an operation ID that you can use to track the progress and completion of the action. If the request is not completed successfully, the domain registrant is notified by email. --@@ -90,13 +90,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'rPrivacyProtectTechContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'rPrivacyProtectTechContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. Default: @true@ ----- * 'rPrivacyProtectRegistrantContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'rPrivacyProtectRegistrantContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (the domain owner). Default: @true@ -- -- * 'rAutoRenew' - Indicates whether the domain will be automatically renewed (@true@ ) or not (@false@ ). Autorenewal only takes effect after the account is charged. Default: @true@ ----- * 'rPrivacyProtectAdminContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'rPrivacyProtectAdminContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. Default: @true@ -- -- * 'rIdNLangCode' - Reserved for future use. --@@ -118,58 +118,58 @@     -> RegisterDomain registerDomain pDomainName_ pDurationInYears_ pAdminContact_ pRegistrantContact_ pTechContact_ =   RegisterDomain'-  { _rPrivacyProtectTechContact = Nothing-  , _rPrivacyProtectRegistrantContact = Nothing-  , _rAutoRenew = Nothing-  , _rPrivacyProtectAdminContact = Nothing-  , _rIdNLangCode = Nothing-  , _rDomainName = pDomainName_-  , _rDurationInYears = _Nat # pDurationInYears_-  , _rAdminContact = _Sensitive # pAdminContact_-  , _rRegistrantContact = _Sensitive # pRegistrantContact_-  , _rTechContact = _Sensitive # pTechContact_-  }+    { _rPrivacyProtectTechContact = Nothing+    , _rPrivacyProtectRegistrantContact = Nothing+    , _rAutoRenew = Nothing+    , _rPrivacyProtectAdminContact = Nothing+    , _rIdNLangCode = Nothing+    , _rDomainName = pDomainName_+    , _rDurationInYears = _Nat # pDurationInYears_+    , _rAdminContact = _Sensitive # pAdminContact_+    , _rRegistrantContact = _Sensitive # pRegistrantContact_+    , _rTechContact = _Sensitive # pTechContact_+    }  --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. Default: @true@ rPrivacyProtectTechContact :: Lens' RegisterDomain (Maybe Bool)-rPrivacyProtectTechContact = lens _rPrivacyProtectTechContact (\ s a -> s{_rPrivacyProtectTechContact = a});+rPrivacyProtectTechContact = lens _rPrivacyProtectTechContact (\ s a -> s{_rPrivacyProtectTechContact = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (the domain owner). Default: @true@ rPrivacyProtectRegistrantContact :: Lens' RegisterDomain (Maybe Bool)-rPrivacyProtectRegistrantContact = lens _rPrivacyProtectRegistrantContact (\ s a -> s{_rPrivacyProtectRegistrantContact = a});+rPrivacyProtectRegistrantContact = lens _rPrivacyProtectRegistrantContact (\ s a -> s{_rPrivacyProtectRegistrantContact = a})  -- | Indicates whether the domain will be automatically renewed (@true@ ) or not (@false@ ). Autorenewal only takes effect after the account is charged. Default: @true@ rAutoRenew :: Lens' RegisterDomain (Maybe Bool)-rAutoRenew = lens _rAutoRenew (\ s a -> s{_rAutoRenew = a});+rAutoRenew = lens _rAutoRenew (\ s a -> s{_rAutoRenew = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. Default: @true@ rPrivacyProtectAdminContact :: Lens' RegisterDomain (Maybe Bool)-rPrivacyProtectAdminContact = lens _rPrivacyProtectAdminContact (\ s a -> s{_rPrivacyProtectAdminContact = a});+rPrivacyProtectAdminContact = lens _rPrivacyProtectAdminContact (\ s a -> s{_rPrivacyProtectAdminContact = a})  -- | Reserved for future use. rIdNLangCode :: Lens' RegisterDomain (Maybe Text)-rIdNLangCode = lens _rIdNLangCode (\ s a -> s{_rIdNLangCode = a});+rIdNLangCode = lens _rIdNLangCode (\ s a -> s{_rIdNLangCode = a})  -- | The domain name that you want to register. Constraints: The domain name can contain only the letters a through z, the numbers 0 through 9, and hyphen (-). Internationalized Domain Names are not supported. rDomainName :: Lens' RegisterDomain Text-rDomainName = lens _rDomainName (\ s a -> s{_rDomainName = a});+rDomainName = lens _rDomainName (\ s a -> s{_rDomainName = a})  -- | The number of years that you want to register the domain for. Domains are registered for a minimum of one year. The maximum period depends on the top-level domain. For the range of valid values for your domain, see <http://docs.aws.amazon.com/Route53/latest/DeveloperGuide/registrar-tld-list.html Domains that You Can Register with Amazon Route 53> in the /Amazon Route 53 Developer Guide/ . Default: 1 rDurationInYears :: Lens' RegisterDomain Natural-rDurationInYears = lens _rDurationInYears (\ s a -> s{_rDurationInYears = a}) . _Nat;+rDurationInYears = lens _rDurationInYears (\ s a -> s{_rDurationInYears = a}) . _Nat  -- | Provides detailed contact information. rAdminContact :: Lens' RegisterDomain ContactDetail-rAdminContact = lens _rAdminContact (\ s a -> s{_rAdminContact = a}) . _Sensitive;+rAdminContact = lens _rAdminContact (\ s a -> s{_rAdminContact = a}) . _Sensitive  -- | Provides detailed contact information. rRegistrantContact :: Lens' RegisterDomain ContactDetail-rRegistrantContact = lens _rRegistrantContact (\ s a -> s{_rRegistrantContact = a}) . _Sensitive;+rRegistrantContact = lens _rRegistrantContact (\ s a -> s{_rRegistrantContact = a}) . _Sensitive  -- | Provides detailed contact information. rTechContact :: Lens' RegisterDomain ContactDetail-rTechContact = lens _rTechContact (\ s a -> s{_rTechContact = a}) . _Sensitive;+rTechContact = lens _rTechContact (\ s a -> s{_rTechContact = a}) . _Sensitive  instance AWSRequest RegisterDomain where         type Rs RegisterDomain = RegisterDomainResponse@@ -242,15 +242,15 @@     -> RegisterDomainResponse registerDomainResponse pResponseStatus_ pOperationId_ =   RegisterDomainResponse'-  {_rdrsResponseStatus = pResponseStatus_, _rdrsOperationId = pOperationId_}+    {_rdrsResponseStatus = pResponseStatus_, _rdrsOperationId = pOperationId_}   -- | -- | The response status code. rdrsResponseStatus :: Lens' RegisterDomainResponse Int-rdrsResponseStatus = lens _rdrsResponseStatus (\ s a -> s{_rdrsResponseStatus = a});+rdrsResponseStatus = lens _rdrsResponseStatus (\ s a -> s{_rdrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . rdrsOperationId :: Lens' RegisterDomainResponse Text-rdrsOperationId = lens _rdrsOperationId (\ s a -> s{_rdrsOperationId = a});+rdrsOperationId = lens _rdrsOperationId (\ s a -> s{_rdrsOperationId = a})  instance NFData RegisterDomainResponse where
gen/Network/AWS/Route53Domains/RenewDomain.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.RenewDomain--- 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@@ -75,23 +75,23 @@     -> RenewDomain renewDomain pDomainName_ pCurrentExpiryYear_ =   RenewDomain'-  { _rdDurationInYears = Nothing-  , _rdDomainName = pDomainName_-  , _rdCurrentExpiryYear = pCurrentExpiryYear_-  }+    { _rdDurationInYears = Nothing+    , _rdDomainName = pDomainName_+    , _rdCurrentExpiryYear = pCurrentExpiryYear_+    }   -- | The number of years that you want to renew the domain for. The maximum number of years depends on the top-level domain. For the range of valid values for your domain, see <http://docs.aws.amazon.com/Route53/latest/DeveloperGuide/registrar-tld-list.html Domains that You Can Register with Amazon Route 53> in the /Amazon Route 53 Developer Guide/ . Default: 1 rdDurationInYears :: Lens' RenewDomain (Maybe Natural)-rdDurationInYears = lens _rdDurationInYears (\ s a -> s{_rdDurationInYears = a}) . mapping _Nat;+rdDurationInYears = lens _rdDurationInYears (\ s a -> s{_rdDurationInYears = a}) . mapping _Nat  -- | The name of the domain that you want to renew. rdDomainName :: Lens' RenewDomain Text-rdDomainName = lens _rdDomainName (\ s a -> s{_rdDomainName = a});+rdDomainName = lens _rdDomainName (\ s a -> s{_rdDomainName = a})  -- | The year when the registration for the domain is set to expire. This value must match the current expiration date for the domain. rdCurrentExpiryYear :: Lens' RenewDomain Int-rdCurrentExpiryYear = lens _rdCurrentExpiryYear (\ s a -> s{_rdCurrentExpiryYear = a});+rdCurrentExpiryYear = lens _rdCurrentExpiryYear (\ s a -> s{_rdCurrentExpiryYear = a})  instance AWSRequest RenewDomain where         type Rs RenewDomain = RenewDomainResponse@@ -150,15 +150,15 @@     -> RenewDomainResponse renewDomainResponse pResponseStatus_ pOperationId_ =   RenewDomainResponse'-  {_rrsResponseStatus = pResponseStatus_, _rrsOperationId = pOperationId_}+    {_rrsResponseStatus = pResponseStatus_, _rrsOperationId = pOperationId_}   -- | -- | The response status code. rrsResponseStatus :: Lens' RenewDomainResponse Int-rrsResponseStatus = lens _rrsResponseStatus (\ s a -> s{_rrsResponseStatus = a});+rrsResponseStatus = lens _rrsResponseStatus (\ s a -> s{_rrsResponseStatus = a})  -- | The identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . rrsOperationId :: Lens' RenewDomainResponse Text-rrsOperationId = lens _rrsOperationId (\ s a -> s{_rrsOperationId = a});+rrsOperationId = lens _rrsOperationId (\ s a -> s{_rrsOperationId = a})  instance NFData RenewDomainResponse where
gen/Network/AWS/Route53Domains/ResendContactReachabilityEmail.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.ResendContactReachabilityEmail--- 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@@ -65,7 +65,7 @@  -- | The name of the domain for which you want Amazon Route 53 to resend a confirmation email to the registrant contact. rcreDomainName :: Lens' ResendContactReachabilityEmail (Maybe Text)-rcreDomainName = lens _rcreDomainName (\ s a -> s{_rcreDomainName = a});+rcreDomainName = lens _rcreDomainName (\ s a -> s{_rcreDomainName = a})  instance AWSRequest ResendContactReachabilityEmail          where@@ -132,28 +132,28 @@     -> ResendContactReachabilityEmailResponse resendContactReachabilityEmailResponse pResponseStatus_ =   ResendContactReachabilityEmailResponse'-  { _rcrersDomainName = Nothing-  , _rcrersEmailAddress = Nothing-  , _rcrersIsAlreadyVerified = Nothing-  , _rcrersResponseStatus = pResponseStatus_-  }+    { _rcrersDomainName = Nothing+    , _rcrersEmailAddress = Nothing+    , _rcrersIsAlreadyVerified = Nothing+    , _rcrersResponseStatus = pResponseStatus_+    }   -- | The domain name for which you requested a confirmation email. rcrersDomainName :: Lens' ResendContactReachabilityEmailResponse (Maybe Text)-rcrersDomainName = lens _rcrersDomainName (\ s a -> s{_rcrersDomainName = a});+rcrersDomainName = lens _rcrersDomainName (\ s a -> s{_rcrersDomainName = a})  -- | The email address for the registrant contact at the time that we sent the verification email. rcrersEmailAddress :: Lens' ResendContactReachabilityEmailResponse (Maybe Text)-rcrersEmailAddress = lens _rcrersEmailAddress (\ s a -> s{_rcrersEmailAddress = a});+rcrersEmailAddress = lens _rcrersEmailAddress (\ s a -> s{_rcrersEmailAddress = a})  -- | @True@ if the email address for the registrant contact has already been verified, and @false@ otherwise. If the email address has already been verified, we don't send another confirmation email. rcrersIsAlreadyVerified :: Lens' ResendContactReachabilityEmailResponse (Maybe Bool)-rcrersIsAlreadyVerified = lens _rcrersIsAlreadyVerified (\ s a -> s{_rcrersIsAlreadyVerified = a});+rcrersIsAlreadyVerified = lens _rcrersIsAlreadyVerified (\ s a -> s{_rcrersIsAlreadyVerified = a})  -- | -- | The response status code. rcrersResponseStatus :: Lens' ResendContactReachabilityEmailResponse Int-rcrersResponseStatus = lens _rcrersResponseStatus (\ s a -> s{_rcrersResponseStatus = a});+rcrersResponseStatus = lens _rcrersResponseStatus (\ s a -> s{_rcrersResponseStatus = a})  instance NFData            ResendContactReachabilityEmailResponse
gen/Network/AWS/Route53Domains/RetrieveDomainAuthCode.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.RetrieveDomainAuthCode--- 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@@ -68,7 +68,7 @@  -- | The name of the domain that you want to get an authorization code for. rdacDomainName :: Lens' RetrieveDomainAuthCode Text-rdacDomainName = lens _rdacDomainName (\ s a -> s{_rdacDomainName = a});+rdacDomainName = lens _rdacDomainName (\ s a -> s{_rdacDomainName = a})  instance AWSRequest RetrieveDomainAuthCode where         type Rs RetrieveDomainAuthCode =@@ -129,17 +129,17 @@     -> RetrieveDomainAuthCodeResponse retrieveDomainAuthCodeResponse pResponseStatus_ pAuthCode_ =   RetrieveDomainAuthCodeResponse'-  { _rdacrsResponseStatus = pResponseStatus_-  , _rdacrsAuthCode = _Sensitive # pAuthCode_-  }+    { _rdacrsResponseStatus = pResponseStatus_+    , _rdacrsAuthCode = _Sensitive # pAuthCode_+    }   -- | -- | The response status code. rdacrsResponseStatus :: Lens' RetrieveDomainAuthCodeResponse Int-rdacrsResponseStatus = lens _rdacrsResponseStatus (\ s a -> s{_rdacrsResponseStatus = a});+rdacrsResponseStatus = lens _rdacrsResponseStatus (\ s a -> s{_rdacrsResponseStatus = a})  -- | The authorization code for the domain. rdacrsAuthCode :: Lens' RetrieveDomainAuthCodeResponse Text-rdacrsAuthCode = lens _rdacrsAuthCode (\ s a -> s{_rdacrsAuthCode = a}) . _Sensitive;+rdacrsAuthCode = lens _rdacrsAuthCode (\ s a -> s{_rdacrsAuthCode = a}) . _Sensitive  instance NFData RetrieveDomainAuthCodeResponse where
gen/Network/AWS/Route53Domains/TransferDomain.hs view
@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.Route53Domains.TransferDomain--- 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 -- Portability : non-portable (GHC extensions) ----- This operation transfers a domain from another registrar to Amazon Route 53. When the transfer is complete, the domain is registered with the AWS registrar partner, Gandi.+-- This operation transfers a domain from another registrar to Amazon Route 53. When the transfer is complete, the domain is registered either with Amazon Registrar (for .com, .net, and .org domains) or with our registrar associate, Gandi (for all other TLDs). -- -- -- For transfer requirements, a detailed procedure, and information about viewing the status of a domain transfer, see <http://docs.aws.amazon.com/Route53/latest/DeveloperGuide/domain-transfer-to-route-53.html Transferring Registration for a Domain to Amazon Route 53> in the /Amazon Route 53 Developer Guide/ .@@ -88,13 +88,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'tdPrivacyProtectTechContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'tdPrivacyProtectTechContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. Default: @true@ ----- * 'tdPrivacyProtectRegistrantContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'tdPrivacyProtectRegistrantContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). Default: @true@ -- -- * 'tdAutoRenew' - Indicates whether the domain will be automatically renewed (true) or not (false). Autorenewal only takes effect after the account is charged. Default: true ----- * 'tdPrivacyProtectAdminContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- * 'tdPrivacyProtectAdminContact' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. Default: @true@ -- -- * 'tdIdNLangCode' - Reserved for future use. --@@ -120,68 +120,68 @@     -> TransferDomain transferDomain pDomainName_ pDurationInYears_ pAdminContact_ pRegistrantContact_ pTechContact_ =   TransferDomain'-  { _tdPrivacyProtectTechContact = Nothing-  , _tdPrivacyProtectRegistrantContact = Nothing-  , _tdAutoRenew = Nothing-  , _tdPrivacyProtectAdminContact = Nothing-  , _tdIdNLangCode = Nothing-  , _tdAuthCode = Nothing-  , _tdNameservers = Nothing-  , _tdDomainName = pDomainName_-  , _tdDurationInYears = _Nat # pDurationInYears_-  , _tdAdminContact = _Sensitive # pAdminContact_-  , _tdRegistrantContact = _Sensitive # pRegistrantContact_-  , _tdTechContact = _Sensitive # pTechContact_-  }+    { _tdPrivacyProtectTechContact = Nothing+    , _tdPrivacyProtectRegistrantContact = Nothing+    , _tdAutoRenew = Nothing+    , _tdPrivacyProtectAdminContact = Nothing+    , _tdIdNLangCode = Nothing+    , _tdAuthCode = Nothing+    , _tdNameservers = Nothing+    , _tdDomainName = pDomainName_+    , _tdDurationInYears = _Nat # pDurationInYears_+    , _tdAdminContact = _Sensitive # pAdminContact_+    , _tdRegistrantContact = _Sensitive # pRegistrantContact_+    , _tdTechContact = _Sensitive # pTechContact_+    }  --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. Default: @true@ tdPrivacyProtectTechContact :: Lens' TransferDomain (Maybe Bool)-tdPrivacyProtectTechContact = lens _tdPrivacyProtectTechContact (\ s a -> s{_tdPrivacyProtectTechContact = a});+tdPrivacyProtectTechContact = lens _tdPrivacyProtectTechContact (\ s a -> s{_tdPrivacyProtectTechContact = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). Default: @true@ tdPrivacyProtectRegistrantContact :: Lens' TransferDomain (Maybe Bool)-tdPrivacyProtectRegistrantContact = lens _tdPrivacyProtectRegistrantContact (\ s a -> s{_tdPrivacyProtectRegistrantContact = a});+tdPrivacyProtectRegistrantContact = lens _tdPrivacyProtectRegistrantContact (\ s a -> s{_tdPrivacyProtectRegistrantContact = a})  -- | Indicates whether the domain will be automatically renewed (true) or not (false). Autorenewal only takes effect after the account is charged. Default: true tdAutoRenew :: Lens' TransferDomain (Maybe Bool)-tdAutoRenew = lens _tdAutoRenew (\ s a -> s{_tdAutoRenew = a});+tdAutoRenew = lens _tdAutoRenew (\ s a -> s{_tdAutoRenew = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter. Default: @true@+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. Default: @true@ tdPrivacyProtectAdminContact :: Lens' TransferDomain (Maybe Bool)-tdPrivacyProtectAdminContact = lens _tdPrivacyProtectAdminContact (\ s a -> s{_tdPrivacyProtectAdminContact = a});+tdPrivacyProtectAdminContact = lens _tdPrivacyProtectAdminContact (\ s a -> s{_tdPrivacyProtectAdminContact = a})  -- | Reserved for future use. tdIdNLangCode :: Lens' TransferDomain (Maybe Text)-tdIdNLangCode = lens _tdIdNLangCode (\ s a -> s{_tdIdNLangCode = a});+tdIdNLangCode = lens _tdIdNLangCode (\ s a -> s{_tdIdNLangCode = a})  -- | The authorization code for the domain. You get this value from the current registrar. tdAuthCode :: Lens' TransferDomain (Maybe Text)-tdAuthCode = lens _tdAuthCode (\ s a -> s{_tdAuthCode = a}) . mapping _Sensitive;+tdAuthCode = lens _tdAuthCode (\ s a -> s{_tdAuthCode = a}) . mapping _Sensitive  -- | Contains details for the host and glue IP addresses. tdNameservers :: Lens' TransferDomain [Nameserver]-tdNameservers = lens _tdNameservers (\ s a -> s{_tdNameservers = a}) . _Default . _Coerce;+tdNameservers = lens _tdNameservers (\ s a -> s{_tdNameservers = a}) . _Default . _Coerce  -- | The name of the domain that you want to transfer to Amazon Route 53. Constraints: The domain name can contain only the letters a through z, the numbers 0 through 9, and hyphen (-). Internationalized Domain Names are not supported. tdDomainName :: Lens' TransferDomain Text-tdDomainName = lens _tdDomainName (\ s a -> s{_tdDomainName = a});+tdDomainName = lens _tdDomainName (\ s a -> s{_tdDomainName = a})  -- | The number of years that you want to register the domain for. Domains are registered for a minimum of one year. The maximum period depends on the top-level domain. Default: 1 tdDurationInYears :: Lens' TransferDomain Natural-tdDurationInYears = lens _tdDurationInYears (\ s a -> s{_tdDurationInYears = a}) . _Nat;+tdDurationInYears = lens _tdDurationInYears (\ s a -> s{_tdDurationInYears = a}) . _Nat  -- | Provides detailed contact information. tdAdminContact :: Lens' TransferDomain ContactDetail-tdAdminContact = lens _tdAdminContact (\ s a -> s{_tdAdminContact = a}) . _Sensitive;+tdAdminContact = lens _tdAdminContact (\ s a -> s{_tdAdminContact = a}) . _Sensitive  -- | Provides detailed contact information. tdRegistrantContact :: Lens' TransferDomain ContactDetail-tdRegistrantContact = lens _tdRegistrantContact (\ s a -> s{_tdRegistrantContact = a}) . _Sensitive;+tdRegistrantContact = lens _tdRegistrantContact (\ s a -> s{_tdRegistrantContact = a}) . _Sensitive  -- | Provides detailed contact information. tdTechContact :: Lens' TransferDomain ContactDetail-tdTechContact = lens _tdTechContact (\ s a -> s{_tdTechContact = a}) . _Sensitive;+tdTechContact = lens _tdTechContact (\ s a -> s{_tdTechContact = a}) . _Sensitive  instance AWSRequest TransferDomain where         type Rs TransferDomain = TransferDomainResponse@@ -256,15 +256,15 @@     -> TransferDomainResponse transferDomainResponse pResponseStatus_ pOperationId_ =   TransferDomainResponse'-  {_tdrsResponseStatus = pResponseStatus_, _tdrsOperationId = pOperationId_}+    {_tdrsResponseStatus = pResponseStatus_, _tdrsOperationId = pOperationId_}   -- | -- | The response status code. tdrsResponseStatus :: Lens' TransferDomainResponse Int-tdrsResponseStatus = lens _tdrsResponseStatus (\ s a -> s{_tdrsResponseStatus = a});+tdrsResponseStatus = lens _tdrsResponseStatus (\ s a -> s{_tdrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . tdrsOperationId :: Lens' TransferDomainResponse Text-tdrsOperationId = lens _tdrsOperationId (\ s a -> s{_tdrsOperationId = a});+tdrsOperationId = lens _tdrsOperationId (\ s a -> s{_tdrsOperationId = a})  instance NFData TransferDomainResponse where
gen/Network/AWS/Route53Domains/Types.hs view
@@ -4,7 +4,7 @@  -- | -- Module      : Network.AWS.Route53Domains.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@@ -130,24 +130,24 @@ route53Domains :: Service route53Domains =   Service-  { _svcAbbrev = "Route53Domains"-  , _svcSigner = v4-  , _svcPrefix = "route53domains"-  , _svcVersion = "2014-05-15"-  , _svcEndpoint = defaultEndpoint route53Domains-  , _svcTimeout = Just 70-  , _svcCheck = statusSuccess-  , _svcError = parseJSONError "Route53Domains"-  , _svcRetry = retry-  }+    { _svcAbbrev = "Route53Domains"+    , _svcSigner = v4+    , _svcPrefix = "route53domains"+    , _svcVersion = "2014-05-15"+    , _svcEndpoint = defaultEndpoint route53Domains+    , _svcTimeout = Just 70+    , _svcCheck = statusSuccess+    , _svcError = parseJSONError "Route53Domains"+    , _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"@@ -156,6 +156,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/Route53Domains/Types/Product.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.Route53Domains.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@@ -52,33 +52,33 @@     :: BillingRecord billingRecord =   BillingRecord'-  { _brOperation = Nothing-  , _brInvoiceId = Nothing-  , _brDomainName = Nothing-  , _brBillDate = Nothing-  , _brPrice = Nothing-  }+    { _brOperation = Nothing+    , _brInvoiceId = Nothing+    , _brDomainName = Nothing+    , _brBillDate = Nothing+    , _brPrice = Nothing+    }   -- | The operation that you were charged for. brOperation :: Lens' BillingRecord (Maybe OperationType)-brOperation = lens _brOperation (\ s a -> s{_brOperation = a});+brOperation = lens _brOperation (\ s a -> s{_brOperation = a})  -- | The ID of the invoice that is associated with the billing record. brInvoiceId :: Lens' BillingRecord (Maybe Text)-brInvoiceId = lens _brInvoiceId (\ s a -> s{_brInvoiceId = a});+brInvoiceId = lens _brInvoiceId (\ s a -> s{_brInvoiceId = a})  -- | The name of the domain that the billing record applies to. If the domain name contains characters other than a-z, 0-9, and - (hyphen), such as an internationalized domain name, then this value is in Punycode. For more information, see <http://docs.aws.amazon.com/Route53/latest/DeveloperGuide/DomainNameFormat.html DNS Domain Name Format> in the /Amazon Route 53 Developer Guidezzz/ . brDomainName :: Lens' BillingRecord (Maybe Text)-brDomainName = lens _brDomainName (\ s a -> s{_brDomainName = a});+brDomainName = lens _brDomainName (\ s a -> s{_brDomainName = a})  -- | The date that the operation was billed, in Unix format. brBillDate :: Lens' BillingRecord (Maybe UTCTime)-brBillDate = lens _brBillDate (\ s a -> s{_brBillDate = a}) . mapping _Time;+brBillDate = lens _brBillDate (\ s a -> s{_brBillDate = a}) . mapping _Time  -- | The price that you were charged for the operation, in US dollars. Example value: 12.0 brPrice :: Lens' BillingRecord (Maybe Double)-brPrice = lens _brPrice (\ s a -> s{_brPrice = a});+brPrice = lens _brPrice (\ s a -> s{_brPrice = a})  instance FromJSON BillingRecord where         parseJSON@@ -152,78 +152,78 @@     :: ContactDetail contactDetail =   ContactDetail'-  { _cdOrganizationName = Nothing-  , _cdEmail = Nothing-  , _cdState = Nothing-  , _cdFax = Nothing-  , _cdLastName = Nothing-  , _cdExtraParams = Nothing-  , _cdZipCode = Nothing-  , _cdAddressLine1 = Nothing-  , _cdCity = Nothing-  , _cdPhoneNumber = Nothing-  , _cdAddressLine2 = Nothing-  , _cdFirstName = Nothing-  , _cdCountryCode = Nothing-  , _cdContactType = Nothing-  }+    { _cdOrganizationName = Nothing+    , _cdEmail = Nothing+    , _cdState = Nothing+    , _cdFax = Nothing+    , _cdLastName = Nothing+    , _cdExtraParams = Nothing+    , _cdZipCode = Nothing+    , _cdAddressLine1 = Nothing+    , _cdCity = Nothing+    , _cdPhoneNumber = Nothing+    , _cdAddressLine2 = Nothing+    , _cdFirstName = Nothing+    , _cdCountryCode = Nothing+    , _cdContactType = Nothing+    }   -- | Name of the organization for contact types other than @PERSON@ . cdOrganizationName :: Lens' ContactDetail (Maybe Text)-cdOrganizationName = lens _cdOrganizationName (\ s a -> s{_cdOrganizationName = a});+cdOrganizationName = lens _cdOrganizationName (\ s a -> s{_cdOrganizationName = a})  -- | Email address of the contact. cdEmail :: Lens' ContactDetail (Maybe Text)-cdEmail = lens _cdEmail (\ s a -> s{_cdEmail = a});+cdEmail = lens _cdEmail (\ s a -> s{_cdEmail = a})  -- | The state or province of the contact's city. cdState :: Lens' ContactDetail (Maybe Text)-cdState = lens _cdState (\ s a -> s{_cdState = a});+cdState = lens _cdState (\ s a -> s{_cdState = a})  -- | Fax number of the contact. Constraints: Phone number must be specified in the format "+[country dialing code].[number including any area code]". For example, a US phone number might appear as @"+1.1234567890"@ . cdFax :: Lens' ContactDetail (Maybe Text)-cdFax = lens _cdFax (\ s a -> s{_cdFax = a});+cdFax = lens _cdFax (\ s a -> s{_cdFax = a})  -- | Last name of contact. cdLastName :: Lens' ContactDetail (Maybe Text)-cdLastName = lens _cdLastName (\ s a -> s{_cdLastName = a});+cdLastName = lens _cdLastName (\ s a -> s{_cdLastName = a})  -- | A list of name-value pairs for parameters required by certain top-level domains. cdExtraParams :: Lens' ContactDetail [ExtraParam]-cdExtraParams = lens _cdExtraParams (\ s a -> s{_cdExtraParams = a}) . _Default . _Coerce;+cdExtraParams = lens _cdExtraParams (\ s a -> s{_cdExtraParams = a}) . _Default . _Coerce  -- | The zip or postal code of the contact's address. cdZipCode :: Lens' ContactDetail (Maybe Text)-cdZipCode = lens _cdZipCode (\ s a -> s{_cdZipCode = a});+cdZipCode = lens _cdZipCode (\ s a -> s{_cdZipCode = a})  -- | First line of the contact's address. cdAddressLine1 :: Lens' ContactDetail (Maybe Text)-cdAddressLine1 = lens _cdAddressLine1 (\ s a -> s{_cdAddressLine1 = a});+cdAddressLine1 = lens _cdAddressLine1 (\ s a -> s{_cdAddressLine1 = a})  -- | The city of the contact's address. cdCity :: Lens' ContactDetail (Maybe Text)-cdCity = lens _cdCity (\ s a -> s{_cdCity = a});+cdCity = lens _cdCity (\ s a -> s{_cdCity = a})  -- | The phone number of the contact. Constraints: Phone number must be specified in the format "+[country dialing code].[number including any area code>]". For example, a US phone number might appear as @"+1.1234567890"@ . cdPhoneNumber :: Lens' ContactDetail (Maybe Text)-cdPhoneNumber = lens _cdPhoneNumber (\ s a -> s{_cdPhoneNumber = a});+cdPhoneNumber = lens _cdPhoneNumber (\ s a -> s{_cdPhoneNumber = a})  -- | Second line of contact's address, if any. cdAddressLine2 :: Lens' ContactDetail (Maybe Text)-cdAddressLine2 = lens _cdAddressLine2 (\ s a -> s{_cdAddressLine2 = a});+cdAddressLine2 = lens _cdAddressLine2 (\ s a -> s{_cdAddressLine2 = a})  -- | First name of contact. cdFirstName :: Lens' ContactDetail (Maybe Text)-cdFirstName = lens _cdFirstName (\ s a -> s{_cdFirstName = a});+cdFirstName = lens _cdFirstName (\ s a -> s{_cdFirstName = a})  -- | Code for the country of the contact's address. cdCountryCode :: Lens' ContactDetail (Maybe CountryCode)-cdCountryCode = lens _cdCountryCode (\ s a -> s{_cdCountryCode = a});+cdCountryCode = lens _cdCountryCode (\ s a -> s{_cdCountryCode = a})  -- | Indicates whether the contact is a person, company, association, or public organization. If you choose an option other than @PERSON@ , you must enter an organization name, and you can't enable privacy protection for the contact. cdContactType :: Lens' ContactDetail (Maybe ContactType)-cdContactType = lens _cdContactType (\ s a -> s{_cdContactType = a});+cdContactType = lens _cdContactType (\ s a -> s{_cdContactType = a})  instance FromJSON ContactDetail where         parseJSON@@ -292,11 +292,11 @@  -- | Whether the domain name is available for registering. Valid values:     * AVAILABLE    * The domain name is available.     * AVAILABLE_RESERVED    * The domain name is reserved under specific conditions.     * AVAILABLE_PREORDER    * The domain name is available and can be preordered.     * DONT_KNOW    * The TLD registry didn't reply with a definitive answer about whether the domain name is available. Amazon Route 53 can return this response for a variety of reasons, for example, the registry is performing maintenance. Try again later.     * PENDING    * The TLD registry didn't return a response in the expected amount of time. When the response is delayed, it usually takes just a few extra seconds. You can resubmit the request immediately.     * RESERVED    * The domain name has been reserved for another person or organization.     * UNAVAILABLE    * The domain name is not available.     * UNAVAILABLE_PREMIUM    * The domain name is not available.     * UNAVAILABLE_RESTRICTED    * The domain name is forbidden. dAvailability :: Lens' DomainSuggestion (Maybe Text)-dAvailability = lens _dAvailability (\ s a -> s{_dAvailability = a});+dAvailability = lens _dAvailability (\ s a -> s{_dAvailability = a})  -- | A suggested domain name. dDomainName :: Lens' DomainSuggestion (Maybe Text)-dDomainName = lens _dDomainName (\ s a -> s{_dDomainName = a});+dDomainName = lens _dDomainName (\ s a -> s{_dDomainName = a})  instance FromJSON DomainSuggestion where         parseJSON@@ -338,28 +338,28 @@     -> DomainSummary domainSummary pDomainName_ =   DomainSummary'-  { _dsExpiry = Nothing-  , _dsTransferLock = Nothing-  , _dsAutoRenew = Nothing-  , _dsDomainName = pDomainName_-  }+    { _dsExpiry = Nothing+    , _dsTransferLock = Nothing+    , _dsAutoRenew = Nothing+    , _dsDomainName = pDomainName_+    }   -- | Expiration date of the domain in Coordinated Universal Time (UTC). dsExpiry :: Lens' DomainSummary (Maybe UTCTime)-dsExpiry = lens _dsExpiry (\ s a -> s{_dsExpiry = a}) . mapping _Time;+dsExpiry = lens _dsExpiry (\ s a -> s{_dsExpiry = a}) . mapping _Time  -- | Indicates whether a domain is locked from unauthorized transfer to another party. dsTransferLock :: Lens' DomainSummary (Maybe Bool)-dsTransferLock = lens _dsTransferLock (\ s a -> s{_dsTransferLock = a});+dsTransferLock = lens _dsTransferLock (\ s a -> s{_dsTransferLock = a})  -- | Indicates whether the domain is automatically renewed upon expiration. dsAutoRenew :: Lens' DomainSummary (Maybe Bool)-dsAutoRenew = lens _dsAutoRenew (\ s a -> s{_dsAutoRenew = a});+dsAutoRenew = lens _dsAutoRenew (\ s a -> s{_dsAutoRenew = a})  -- | The name of the domain that the summary information applies to. dsDomainName :: Lens' DomainSummary Text-dsDomainName = lens _dsDomainName (\ s a -> s{_dsDomainName = a});+dsDomainName = lens _dsDomainName (\ s a -> s{_dsDomainName = a})  instance FromJSON DomainSummary where         parseJSON@@ -374,7 +374,11 @@  instance NFData DomainSummary where --- | /See:/ 'domainTransferability' smart constructor.+-- | A complex type that contains information about whether the specified domain can be transferred to Amazon Route 53.+--+--+--+-- /See:/ 'domainTransferability' smart constructor. newtype DomainTransferability = DomainTransferability'   { _dtTransferable :: Maybe Transferable   } deriving (Eq, Read, Show, Data, Typeable, Generic)@@ -392,7 +396,7 @@  -- | Undocumented member. dtTransferable :: Lens' DomainTransferability (Maybe Transferable)-dtTransferable = lens _dtTransferable (\ s a -> s{_dtTransferable = a});+dtTransferable = lens _dtTransferable (\ s a -> s{_dtTransferable = a})  instance FromJSON DomainTransferability where         parseJSON@@ -419,7 +423,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'epName' - Name of the additional parameter required by the top-level domain.+-- * 'epName' - Name of the additional parameter required by the top-level domain. Here are the top-level domains that require additional parameters and which parameters they require:     * __.com.au and .net.au:__ @AU_ID_NUMBER@ and @AU_ID_TYPE@      * __.ca:__ @BRAND_NUMBER@ , @CA_LEGAL_TYPE@ , and @CA_BUSINESS_ENTITY_TYPE@      * __.es:__ @ES_IDENTIFICATION@ , @ES_IDENTIFICATION_TYPE@ , and @ES_LEGAL_FORM@      * __.fi:__ @BIRTH_DATE_IN_YYYY_MM_DD@ , @FI_BUSINESS_NUMBER@ , @FI_ID_NUMBER@ , @FI_NATIONALITY@ , and @FI_ORGANIZATION_TYPE@      * __.fr:__ @BRAND_NUMBER@ , @BIRTH_DEPARTMENT@ , @BIRTH_DATE_IN_YYYY_MM_DD@ , @BIRTH_COUNTRY@ , and @BIRTH_CITY@      * __.it:__ @BIRTH_COUNTRY@ , @IT_PIN@ , and @IT_REGISTRANT_ENTITY_TYPE@      * __.ru:__ @BIRTH_DATE_IN_YYYY_MM_DD@ and @RU_PASSPORT_DATA@      * __.se:__ @BIRTH_COUNTRY@ and @SE_ID_NUMBER@      * __.sg:__ @SG_ID_NUMBER@      * __.co.uk, .me.uk, and .org.uk:__ @UK_CONTACT_TYPE@ and @UK_COMPANY_NUMBER@  In addition, many TLDs require @VAT_NUMBER@ . -- -- * 'epValue' - Values corresponding to the additional parameter names required by some top-level domains. extraParam@@ -429,13 +433,13 @@ extraParam pName_ pValue_ = ExtraParam' {_epName = pName_, _epValue = pValue_}  --- | Name of the additional parameter required by the top-level domain.+-- | Name of the additional parameter required by the top-level domain. Here are the top-level domains that require additional parameters and which parameters they require:     * __.com.au and .net.au:__ @AU_ID_NUMBER@ and @AU_ID_TYPE@      * __.ca:__ @BRAND_NUMBER@ , @CA_LEGAL_TYPE@ , and @CA_BUSINESS_ENTITY_TYPE@      * __.es:__ @ES_IDENTIFICATION@ , @ES_IDENTIFICATION_TYPE@ , and @ES_LEGAL_FORM@      * __.fi:__ @BIRTH_DATE_IN_YYYY_MM_DD@ , @FI_BUSINESS_NUMBER@ , @FI_ID_NUMBER@ , @FI_NATIONALITY@ , and @FI_ORGANIZATION_TYPE@      * __.fr:__ @BRAND_NUMBER@ , @BIRTH_DEPARTMENT@ , @BIRTH_DATE_IN_YYYY_MM_DD@ , @BIRTH_COUNTRY@ , and @BIRTH_CITY@      * __.it:__ @BIRTH_COUNTRY@ , @IT_PIN@ , and @IT_REGISTRANT_ENTITY_TYPE@      * __.ru:__ @BIRTH_DATE_IN_YYYY_MM_DD@ and @RU_PASSPORT_DATA@      * __.se:__ @BIRTH_COUNTRY@ and @SE_ID_NUMBER@      * __.sg:__ @SG_ID_NUMBER@      * __.co.uk, .me.uk, and .org.uk:__ @UK_CONTACT_TYPE@ and @UK_COMPANY_NUMBER@  In addition, many TLDs require @VAT_NUMBER@ . epName :: Lens' ExtraParam ExtraParamName-epName = lens _epName (\ s a -> s{_epName = a});+epName = lens _epName (\ s a -> s{_epName = a})  -- | Values corresponding to the additional parameter names required by some top-level domains. epValue :: Lens' ExtraParam Text-epValue = lens _epValue (\ s a -> s{_epValue = a});+epValue = lens _epValue (\ s a -> s{_epValue = a})  instance FromJSON ExtraParam where         parseJSON@@ -480,11 +484,11 @@  -- | Glue IP address of a name server entry. Glue IP addresses are required only when the name of the name server is a subdomain of the domain. For example, if your domain is example.com and the name server for the domain is ns.example.com, you need to specify the IP address for ns.example.com. Constraints: The list can contain only one IPv4 and one IPv6 address. nGlueIPs :: Lens' Nameserver [Text]-nGlueIPs = lens _nGlueIPs (\ s a -> s{_nGlueIPs = a}) . _Default . _Coerce;+nGlueIPs = lens _nGlueIPs (\ s a -> s{_nGlueIPs = a}) . _Default . _Coerce  -- | The fully qualified host name of the name server. Constraint: Maximum 255 characters nName :: Lens' Nameserver Text-nName = lens _nName (\ s a -> s{_nName = a});+nName = lens _nName (\ s a -> s{_nName = a})  instance FromJSON Nameserver where         parseJSON@@ -536,28 +540,28 @@     -> OperationSummary operationSummary pOperationId_ pStatus_ pType_ pSubmittedDate_ =   OperationSummary'-  { _osOperationId = pOperationId_-  , _osStatus = pStatus_-  , _osType = pType_-  , _osSubmittedDate = _Time # pSubmittedDate_-  }+    { _osOperationId = pOperationId_+    , _osStatus = pStatus_+    , _osType = pType_+    , _osSubmittedDate = _Time # pSubmittedDate_+    }   -- | Identifier returned to track the requested action. osOperationId :: Lens' OperationSummary Text-osOperationId = lens _osOperationId (\ s a -> s{_osOperationId = a});+osOperationId = lens _osOperationId (\ s a -> s{_osOperationId = a})  -- | The current status of the requested operation in the system. osStatus :: Lens' OperationSummary OperationStatus-osStatus = lens _osStatus (\ s a -> s{_osStatus = a});+osStatus = lens _osStatus (\ s a -> s{_osStatus = a})  -- | Type of the action requested. osType :: Lens' OperationSummary OperationType-osType = lens _osType (\ s a -> s{_osType = a});+osType = lens _osType (\ s a -> s{_osType = a})  -- | The date when the request was submitted. osSubmittedDate :: Lens' OperationSummary UTCTime-osSubmittedDate = lens _osSubmittedDate (\ s a -> s{_osSubmittedDate = a}) . _Time;+osSubmittedDate = lens _osSubmittedDate (\ s a -> s{_osSubmittedDate = a}) . _Time  instance FromJSON OperationSummary where         parseJSON@@ -597,11 +601,11 @@  -- | The value of a tag. Valid values: A-Z, a-z, 0-9, space, ".:/=+\-@" Constraints: Each value can be 0-256 characters long. tagValue :: Lens' Tag (Maybe Text)-tagValue = lens _tagValue (\ s a -> s{_tagValue = a});+tagValue = lens _tagValue (\ s a -> s{_tagValue = a})  -- | The key (name) of a tag. Valid values: A-Z, a-z, 0-9, space, ".:/=+\-@" Constraints: Each key can be 1-128 characters long. tagKey :: Lens' Tag (Maybe Text)-tagKey = lens _tagKey (\ s a -> s{_tagKey = a});+tagKey = lens _tagKey (\ s a -> s{_tagKey = a})  instance FromJSON Tag where         parseJSON
gen/Network/AWS/Route53Domains/Types/Sum.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.Route53Domains.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/Route53Domains/UpdateDomainContact.hs view
@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.Route53Domains.UpdateDomainContact--- 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 -- Portability : non-portable (GHC extensions) ----- This operation updates the contact information for a particular domain. Information for at least one contact (registrant, administrator, or technical) must be supplied for update.+-- This operation updates the contact information for a particular domain. You must specify information for at least one contact: registrant, administrator, or technical. -- -- -- If the update is successful, this method returns an operation ID that you can use to track the progress and completion of the action. If the request is not completed successfully, the domain registrant will be notified by email.@@ -78,28 +78,28 @@     -> UpdateDomainContact updateDomainContact pDomainName_ =   UpdateDomainContact'-  { _udcRegistrantContact = Nothing-  , _udcAdminContact = Nothing-  , _udcTechContact = Nothing-  , _udcDomainName = pDomainName_-  }+    { _udcRegistrantContact = Nothing+    , _udcAdminContact = Nothing+    , _udcTechContact = Nothing+    , _udcDomainName = pDomainName_+    }   -- | Provides detailed contact information. udcRegistrantContact :: Lens' UpdateDomainContact (Maybe ContactDetail)-udcRegistrantContact = lens _udcRegistrantContact (\ s a -> s{_udcRegistrantContact = a}) . mapping _Sensitive;+udcRegistrantContact = lens _udcRegistrantContact (\ s a -> s{_udcRegistrantContact = a}) . mapping _Sensitive  -- | Provides detailed contact information. udcAdminContact :: Lens' UpdateDomainContact (Maybe ContactDetail)-udcAdminContact = lens _udcAdminContact (\ s a -> s{_udcAdminContact = a}) . mapping _Sensitive;+udcAdminContact = lens _udcAdminContact (\ s a -> s{_udcAdminContact = a}) . mapping _Sensitive  -- | Provides detailed contact information. udcTechContact :: Lens' UpdateDomainContact (Maybe ContactDetail)-udcTechContact = lens _udcTechContact (\ s a -> s{_udcTechContact = a}) . mapping _Sensitive;+udcTechContact = lens _udcTechContact (\ s a -> s{_udcTechContact = a}) . mapping _Sensitive  -- | The name of the domain that you want to update contact information for. udcDomainName :: Lens' UpdateDomainContact Text-udcDomainName = lens _udcDomainName (\ s a -> s{_udcDomainName = a});+udcDomainName = lens _udcDomainName (\ s a -> s{_udcDomainName = a})  instance AWSRequest UpdateDomainContact where         type Rs UpdateDomainContact =@@ -164,15 +164,15 @@     -> UpdateDomainContactResponse updateDomainContactResponse pResponseStatus_ pOperationId_ =   UpdateDomainContactResponse'-  {_udcrsResponseStatus = pResponseStatus_, _udcrsOperationId = pOperationId_}+    {_udcrsResponseStatus = pResponseStatus_, _udcrsOperationId = pOperationId_}   -- | -- | The response status code. udcrsResponseStatus :: Lens' UpdateDomainContactResponse Int-udcrsResponseStatus = lens _udcrsResponseStatus (\ s a -> s{_udcrsResponseStatus = a});+udcrsResponseStatus = lens _udcrsResponseStatus (\ s a -> s{_udcrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . udcrsOperationId :: Lens' UpdateDomainContactResponse Text-udcrsOperationId = lens _udcrsOperationId (\ s a -> s{_udcrsOperationId = a});+udcrsOperationId = lens _udcrsOperationId (\ s a -> s{_udcrsOperationId = a})  instance NFData UpdateDomainContactResponse where
gen/Network/AWS/Route53Domains/UpdateDomainContactPrivacy.hs view
@@ -12,16 +12,16 @@  -- | -- Module      : Network.AWS.Route53Domains.UpdateDomainContactPrivacy--- 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 -- Portability : non-portable (GHC extensions) ----- This operation updates the specified domain contact's privacy setting. When the privacy option is enabled, personal information such as postal or email address is hidden from the results of a public WHOIS query. The privacy services are provided by the AWS registrar, Gandi. For more information, see the <http://www.gandi.net/domain/whois/?currency=USD&amp;amp;lang=en Gandi privacy features> .+-- This operation updates the specified domain contact's privacy setting. When privacy protection is enabled, contact information such as email address is replaced either with contact information for Amazon Registrar (for .com, .net, and .org domains) or with contact information for our registrar associate, Gandi. -- ----- This operation only affects the privacy of the specified contact type (registrant, administrator, or tech). Successful acceptance returns an operation ID that you can use with 'GetOperationDetail' to track the progress and completion of the action. If the request is not completed successfully, the domain registrant will be notified by email.+-- This operation affects only the contact information for the specified contact type (registrant, administrator, or tech). If the request succeeds, Amazon Route 53 returns an operation ID that you can use with 'GetOperationDetail' to track the progress and completion of the action. If the request doesn't complete successfully, the domain registrant will be notified by email. -- module Network.AWS.Route53Domains.UpdateDomainContactPrivacy     (@@ -66,11 +66,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'udcpTechPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'udcpTechPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. ----- * 'udcpRegistrantPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'udcpRegistrantPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). ----- * 'udcpAdminPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- * 'udcpAdminPrivacy' - Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. -- -- * 'udcpDomainName' - The name of the domain that you want to update the privacy setting for. updateDomainContactPrivacy@@ -78,28 +78,28 @@     -> UpdateDomainContactPrivacy updateDomainContactPrivacy pDomainName_ =   UpdateDomainContactPrivacy'-  { _udcpTechPrivacy = Nothing-  , _udcpRegistrantPrivacy = Nothing-  , _udcpAdminPrivacy = Nothing-  , _udcpDomainName = pDomainName_-  }+    { _udcpTechPrivacy = Nothing+    , _udcpRegistrantPrivacy = Nothing+    , _udcpAdminPrivacy = Nothing+    , _udcpDomainName = pDomainName_+    }  --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the technical contact. udcpTechPrivacy :: Lens' UpdateDomainContactPrivacy (Maybe Bool)-udcpTechPrivacy = lens _udcpTechPrivacy (\ s a -> s{_udcpTechPrivacy = a});+udcpTechPrivacy = lens _udcpTechPrivacy (\ s a -> s{_udcpTechPrivacy = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the registrant contact (domain owner). udcpRegistrantPrivacy :: Lens' UpdateDomainContactPrivacy (Maybe Bool)-udcpRegistrantPrivacy = lens _udcpRegistrantPrivacy (\ s a -> s{_udcpRegistrantPrivacy = a});+udcpRegistrantPrivacy = lens _udcpRegistrantPrivacy (\ s a -> s{_udcpRegistrantPrivacy = a}) --- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries will return contact information for our registrar partner, Gandi, instead of the contact information that you enter.+-- | Whether you want to conceal contact information from WHOIS queries. If you specify @true@ , WHOIS ("who is") queries return contact information either for Amazon Registrar (for .com, .net, and .org domains) or for our registrar associate, Gandi (for all other TLDs). If you specify @false@ , WHOIS queries return the information that you entered for the admin contact. udcpAdminPrivacy :: Lens' UpdateDomainContactPrivacy (Maybe Bool)-udcpAdminPrivacy = lens _udcpAdminPrivacy (\ s a -> s{_udcpAdminPrivacy = a});+udcpAdminPrivacy = lens _udcpAdminPrivacy (\ s a -> s{_udcpAdminPrivacy = a})  -- | The name of the domain that you want to update the privacy setting for. udcpDomainName :: Lens' UpdateDomainContactPrivacy Text-udcpDomainName = lens _udcpDomainName (\ s a -> s{_udcpDomainName = a});+udcpDomainName = lens _udcpDomainName (\ s a -> s{_udcpDomainName = a})  instance AWSRequest UpdateDomainContactPrivacy where         type Rs UpdateDomainContactPrivacy =@@ -164,16 +164,18 @@     -> UpdateDomainContactPrivacyResponse updateDomainContactPrivacyResponse pResponseStatus_ pOperationId_ =   UpdateDomainContactPrivacyResponse'-  {_udcprsResponseStatus = pResponseStatus_, _udcprsOperationId = pOperationId_}+    { _udcprsResponseStatus = pResponseStatus_+    , _udcprsOperationId = pOperationId_+    }   -- | -- | The response status code. udcprsResponseStatus :: Lens' UpdateDomainContactPrivacyResponse Int-udcprsResponseStatus = lens _udcprsResponseStatus (\ s a -> s{_udcprsResponseStatus = a});+udcprsResponseStatus = lens _udcprsResponseStatus (\ s a -> s{_udcprsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use GetOperationDetail. udcprsOperationId :: Lens' UpdateDomainContactPrivacyResponse Text-udcprsOperationId = lens _udcprsOperationId (\ s a -> s{_udcprsOperationId = a});+udcprsOperationId = lens _udcprsOperationId (\ s a -> s{_udcprsOperationId = a})  instance NFData UpdateDomainContactPrivacyResponse          where
gen/Network/AWS/Route53Domains/UpdateDomainNameservers.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.UpdateDomainNameservers--- 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@@ -76,23 +76,23 @@     -> UpdateDomainNameservers updateDomainNameservers pDomainName_ =   UpdateDomainNameservers'-  { _udnFIAuthKey = Nothing-  , _udnDomainName = pDomainName_-  , _udnNameservers = mempty-  }+    { _udnFIAuthKey = Nothing+    , _udnDomainName = pDomainName_+    , _udnNameservers = mempty+    }   -- | The authorization key for .fi domains udnFIAuthKey :: Lens' UpdateDomainNameservers (Maybe Text)-udnFIAuthKey = lens _udnFIAuthKey (\ s a -> s{_udnFIAuthKey = a});+udnFIAuthKey = lens _udnFIAuthKey (\ s a -> s{_udnFIAuthKey = a})  -- | The name of the domain that you want to change name servers for. udnDomainName :: Lens' UpdateDomainNameservers Text-udnDomainName = lens _udnDomainName (\ s a -> s{_udnDomainName = a});+udnDomainName = lens _udnDomainName (\ s a -> s{_udnDomainName = a})  -- | A list of new name servers for the domain. udnNameservers :: Lens' UpdateDomainNameservers [Nameserver]-udnNameservers = lens _udnNameservers (\ s a -> s{_udnNameservers = a}) . _Coerce;+udnNameservers = lens _udnNameservers (\ s a -> s{_udnNameservers = a}) . _Coerce  instance AWSRequest UpdateDomainNameservers where         type Rs UpdateDomainNameservers =@@ -156,15 +156,15 @@     -> UpdateDomainNameserversResponse updateDomainNameserversResponse pResponseStatus_ pOperationId_ =   UpdateDomainNameserversResponse'-  {_udnrsResponseStatus = pResponseStatus_, _udnrsOperationId = pOperationId_}+    {_udnrsResponseStatus = pResponseStatus_, _udnrsOperationId = pOperationId_}   -- | -- | The response status code. udnrsResponseStatus :: Lens' UpdateDomainNameserversResponse Int-udnrsResponseStatus = lens _udnrsResponseStatus (\ s a -> s{_udnrsResponseStatus = a});+udnrsResponseStatus = lens _udnrsResponseStatus (\ s a -> s{_udnrsResponseStatus = a})  -- | Identifier for tracking the progress of the request. To use this ID to query the operation status, use 'GetOperationDetail' . udnrsOperationId :: Lens' UpdateDomainNameserversResponse Text-udnrsOperationId = lens _udnrsOperationId (\ s a -> s{_udnrsOperationId = a});+udnrsOperationId = lens _udnrsOperationId (\ s a -> s{_udnrsOperationId = a})  instance NFData UpdateDomainNameserversResponse where
gen/Network/AWS/Route53Domains/UpdateTagsForDomain.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.UpdateTagsForDomain--- 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@@ -69,16 +69,16 @@     -> UpdateTagsForDomain updateTagsForDomain pDomainName_ =   UpdateTagsForDomain'-  {_utfdTagsToUpdate = Nothing, _utfdDomainName = pDomainName_}+    {_utfdTagsToUpdate = Nothing, _utfdDomainName = pDomainName_}   -- | A list of the tag keys and values that you want to add or update. If you specify a key that already exists, the corresponding value will be replaced. utfdTagsToUpdate :: Lens' UpdateTagsForDomain [Tag]-utfdTagsToUpdate = lens _utfdTagsToUpdate (\ s a -> s{_utfdTagsToUpdate = a}) . _Default . _Coerce;+utfdTagsToUpdate = lens _utfdTagsToUpdate (\ s a -> s{_utfdTagsToUpdate = a}) . _Default . _Coerce  -- | The domain for which you want to add or update tags. utfdDomainName :: Lens' UpdateTagsForDomain Text-utfdDomainName = lens _utfdDomainName (\ s a -> s{_utfdDomainName = a});+utfdDomainName = lens _utfdDomainName (\ s a -> s{_utfdDomainName = a})  instance AWSRequest UpdateTagsForDomain where         type Rs UpdateTagsForDomain =@@ -136,6 +136,6 @@  -- | -- | The response status code. utfdrsResponseStatus :: Lens' UpdateTagsForDomainResponse Int-utfdrsResponseStatus = lens _utfdrsResponseStatus (\ s a -> s{_utfdrsResponseStatus = a});+utfdrsResponseStatus = lens _utfdrsResponseStatus (\ s a -> s{_utfdrsResponseStatus = a})  instance NFData UpdateTagsForDomainResponse where
gen/Network/AWS/Route53Domains/ViewBilling.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.Route53Domains.ViewBilling--- 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@@ -65,9 +65,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'vbStart' - The beginning date and time for the time period for which you want a list of billing records. Specify the date in Unix time format.+-- * 'vbStart' - The beginning date and time for the time period for which you want a list of billing records. Specify the date and time in Coordinated Universal time (UTC). ----- * 'vbEnd' - The end date and time for the time period for which you want a list of billing records. Specify the date in Unix time format.+-- * 'vbEnd' - The end date and time for the time period for which you want a list of billing records. Specify the date and time in Coordinated Universal time (UTC). -- -- * 'vbMarker' - For an initial request for a list of billing records, omit this element. If the number of billing records that are associated with the current AWS account during the specified period is greater than the value that you specified for @MaxItems@ , you can use @Marker@ to return additional billing records. Get the value of @NextPageMarker@ from the previous response, and submit another request that includes the value of @NextPageMarker@ in the @Marker@ element.  Constraints: The marker must match the value of @NextPageMarker@ that was returned in the previous response. --@@ -76,28 +76,28 @@     :: ViewBilling viewBilling =   ViewBilling'-  { _vbStart = Nothing-  , _vbEnd = Nothing-  , _vbMarker = Nothing-  , _vbMaxItems = Nothing-  }+    { _vbStart = Nothing+    , _vbEnd = Nothing+    , _vbMarker = Nothing+    , _vbMaxItems = Nothing+    }  --- | The beginning date and time for the time period for which you want a list of billing records. Specify the date in Unix time format.+-- | The beginning date and time for the time period for which you want a list of billing records. Specify the date and time in Coordinated Universal time (UTC). vbStart :: Lens' ViewBilling (Maybe UTCTime)-vbStart = lens _vbStart (\ s a -> s{_vbStart = a}) . mapping _Time;+vbStart = lens _vbStart (\ s a -> s{_vbStart = a}) . mapping _Time --- | The end date and time for the time period for which you want a list of billing records. Specify the date in Unix time format.+-- | The end date and time for the time period for which you want a list of billing records. Specify the date and time in Coordinated Universal time (UTC). vbEnd :: Lens' ViewBilling (Maybe UTCTime)-vbEnd = lens _vbEnd (\ s a -> s{_vbEnd = a}) . mapping _Time;+vbEnd = lens _vbEnd (\ s a -> s{_vbEnd = a}) . mapping _Time  -- | For an initial request for a list of billing records, omit this element. If the number of billing records that are associated with the current AWS account during the specified period is greater than the value that you specified for @MaxItems@ , you can use @Marker@ to return additional billing records. Get the value of @NextPageMarker@ from the previous response, and submit another request that includes the value of @NextPageMarker@ in the @Marker@ element.  Constraints: The marker must match the value of @NextPageMarker@ that was returned in the previous response. vbMarker :: Lens' ViewBilling (Maybe Text)-vbMarker = lens _vbMarker (\ s a -> s{_vbMarker = a});+vbMarker = lens _vbMarker (\ s a -> s{_vbMarker = a})  -- | The number of billing records to be returned. Default: 20 vbMaxItems :: Lens' ViewBilling (Maybe Int)-vbMaxItems = lens _vbMaxItems (\ s a -> s{_vbMaxItems = a});+vbMaxItems = lens _vbMaxItems (\ s a -> s{_vbMaxItems = a})  instance AWSRequest ViewBilling where         type Rs ViewBilling = ViewBillingResponse@@ -164,22 +164,22 @@     -> ViewBillingResponse viewBillingResponse pResponseStatus_ =   ViewBillingResponse'-  { _vbrsNextPageMarker = Nothing-  , _vbrsBillingRecords = Nothing-  , _vbrsResponseStatus = pResponseStatus_-  }+    { _vbrsNextPageMarker = Nothing+    , _vbrsBillingRecords = Nothing+    , _vbrsResponseStatus = pResponseStatus_+    }   -- | If there are more billing records than you specified for @MaxItems@ in the request, submit another request and include the value of @NextPageMarker@ in the value of @Marker@ . vbrsNextPageMarker :: Lens' ViewBillingResponse (Maybe Text)-vbrsNextPageMarker = lens _vbrsNextPageMarker (\ s a -> s{_vbrsNextPageMarker = a});+vbrsNextPageMarker = lens _vbrsNextPageMarker (\ s a -> s{_vbrsNextPageMarker = a})  -- | A summary of billing records. vbrsBillingRecords :: Lens' ViewBillingResponse [BillingRecord]-vbrsBillingRecords = lens _vbrsBillingRecords (\ s a -> s{_vbrsBillingRecords = a}) . _Default . _Coerce;+vbrsBillingRecords = lens _vbrsBillingRecords (\ s a -> s{_vbrsBillingRecords = a}) . _Default . _Coerce  -- | -- | The response status code. vbrsResponseStatus :: Lens' ViewBillingResponse Int-vbrsResponseStatus = lens _vbrsResponseStatus (\ s a -> s{_vbrsResponseStatus = a});+vbrsResponseStatus = lens _vbrsResponseStatus (\ s a -> s{_vbrsResponseStatus = a})  instance NFData ViewBillingResponse where
gen/Network/AWS/Route53Domains/Waiters.hs view
@@ -7,7 +7,7 @@  -- | -- Module      : Network.AWS.Route53Domains.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/Route53Domains.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Test.AWS.Gen.Route53Domains--- 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/Route53Domains.hs view
@@ -1,7 +1,7 @@ {-# LANGUAGE OverloadedStrings #-}  -- Module      : Test.AWS.Route53Domains--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : This Source Code Form is subject to the terms of --               the Mozilla Public License, v. 2.0. --               A copy of the MPL can be found in the LICENSE file or
test/Test/AWS/Route53Domains/Internal.hs view
@@ -2,7 +2,7 @@ {-# OPTIONS_GHC -fno-warn-unused-imports #-}  -- Module      : Test.AWS.Route53Domains.Internal--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : This Source Code Form is subject to the terms of --               the Mozilla Public License, v. 2.0. --               A copy of the MPL can be found in the LICENSE file or