module Network.AWS.RDS.DeleteOptionGroup
(
DeleteOptionGroup
, deleteOptionGroup
, dog1OptionGroupName
, DeleteOptionGroupResponse
, deleteOptionGroupResponse
) where
import Network.AWS.Prelude
import Network.AWS.Request.Query
import Network.AWS.RDS.Types
import qualified GHC.Exts
newtype DeleteOptionGroup = DeleteOptionGroup
{ _dog1OptionGroupName :: Text
} deriving (Eq, Ord, Show, Monoid, IsString)
deleteOptionGroup :: Text
-> DeleteOptionGroup
deleteOptionGroup p1 = DeleteOptionGroup
{ _dog1OptionGroupName = p1
}
dog1OptionGroupName :: Lens' DeleteOptionGroup Text
dog1OptionGroupName =
lens _dog1OptionGroupName (\s a -> s { _dog1OptionGroupName = a })
data DeleteOptionGroupResponse = DeleteOptionGroupResponse
deriving (Eq, Ord, Show, Generic)
deleteOptionGroupResponse :: DeleteOptionGroupResponse
deleteOptionGroupResponse = DeleteOptionGroupResponse
instance ToPath DeleteOptionGroup where
toPath = const "/"
instance ToQuery DeleteOptionGroup where
toQuery DeleteOptionGroup{..} = mconcat
[ "OptionGroupName" =? _dog1OptionGroupName
]
instance ToHeaders DeleteOptionGroup
instance AWSRequest DeleteOptionGroup where
type Sv DeleteOptionGroup = RDS
type Rs DeleteOptionGroup = DeleteOptionGroupResponse
request = post "DeleteOptionGroup"
response = nullResponse DeleteOptionGroupResponse