module Network.AWS.ElastiCache.DeleteCacheSubnetGroup
(
DeleteCacheSubnetGroup
, deleteCacheSubnetGroup
, dcsg1CacheSubnetGroupName
, DeleteCacheSubnetGroupResponse
, deleteCacheSubnetGroupResponse
) where
import Network.AWS.Prelude
import Network.AWS.Request.Query
import Network.AWS.ElastiCache.Types
import qualified GHC.Exts
newtype DeleteCacheSubnetGroup = DeleteCacheSubnetGroup
{ _dcsg1CacheSubnetGroupName :: Text
} deriving (Eq, Ord, Show, Monoid, IsString)
deleteCacheSubnetGroup :: Text
-> DeleteCacheSubnetGroup
deleteCacheSubnetGroup p1 = DeleteCacheSubnetGroup
{ _dcsg1CacheSubnetGroupName = p1
}
dcsg1CacheSubnetGroupName :: Lens' DeleteCacheSubnetGroup Text
dcsg1CacheSubnetGroupName =
lens _dcsg1CacheSubnetGroupName
(\s a -> s { _dcsg1CacheSubnetGroupName = a })
data DeleteCacheSubnetGroupResponse = DeleteCacheSubnetGroupResponse
deriving (Eq, Ord, Show, Generic)
deleteCacheSubnetGroupResponse :: DeleteCacheSubnetGroupResponse
deleteCacheSubnetGroupResponse = DeleteCacheSubnetGroupResponse
instance ToPath DeleteCacheSubnetGroup where
toPath = const "/"
instance ToQuery DeleteCacheSubnetGroup where
toQuery DeleteCacheSubnetGroup{..} = mconcat
[ "CacheSubnetGroupName" =? _dcsg1CacheSubnetGroupName
]
instance ToHeaders DeleteCacheSubnetGroup
instance AWSRequest DeleteCacheSubnetGroup where
type Sv DeleteCacheSubnetGroup = ElastiCache
type Rs DeleteCacheSubnetGroup = DeleteCacheSubnetGroupResponse
request = post "DeleteCacheSubnetGroup"
response = nullResponse DeleteCacheSubnetGroupResponse