module Network.AWS.Route53Domains.DisableDomainAutoRenew
(
DisableDomainAutoRenew
, disableDomainAutoRenew
, ddarDomainName
, DisableDomainAutoRenewResponse
, disableDomainAutoRenewResponse
) where
import Network.AWS.Prelude
import Network.AWS.Request.JSON
import Network.AWS.Route53Domains.Types
import qualified GHC.Exts
newtype DisableDomainAutoRenew = DisableDomainAutoRenew
{ _ddarDomainName :: Text
} deriving (Eq, Ord, Show, Monoid, IsString)
disableDomainAutoRenew :: Text
-> DisableDomainAutoRenew
disableDomainAutoRenew p1 = DisableDomainAutoRenew
{ _ddarDomainName = p1
}
ddarDomainName :: Lens' DisableDomainAutoRenew Text
ddarDomainName = lens _ddarDomainName (\s a -> s { _ddarDomainName = a })
data DisableDomainAutoRenewResponse = DisableDomainAutoRenewResponse
deriving (Eq, Ord, Show, Generic)
disableDomainAutoRenewResponse :: DisableDomainAutoRenewResponse
disableDomainAutoRenewResponse = DisableDomainAutoRenewResponse
instance ToPath DisableDomainAutoRenew where
toPath = const "/"
instance ToQuery DisableDomainAutoRenew where
toQuery = const mempty
instance ToHeaders DisableDomainAutoRenew
instance ToJSON DisableDomainAutoRenew where
toJSON DisableDomainAutoRenew{..} = object
[ "DomainName" .= _ddarDomainName
]
instance AWSRequest DisableDomainAutoRenew where
type Sv DisableDomainAutoRenew = Route53Domains
type Rs DisableDomainAutoRenew = DisableDomainAutoRenewResponse
request = post "DisableDomainAutoRenew"
response = nullResponse DisableDomainAutoRenewResponse