module Network.AWS.APIGateway.DeleteAuthorizer
(
deleteAuthorizer
, DeleteAuthorizer
, daRestAPIId
, daAuthorizerId
, deleteAuthorizerResponse
, DeleteAuthorizerResponse
) where
import Network.AWS.APIGateway.Types
import Network.AWS.APIGateway.Types.Product
import Network.AWS.Lens
import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response
data DeleteAuthorizer = DeleteAuthorizer'
{ _daRestAPIId :: !Text
, _daAuthorizerId :: !Text
} deriving (Eq,Read,Show,Data,Typeable,Generic)
deleteAuthorizer
:: Text
-> Text
-> DeleteAuthorizer
deleteAuthorizer pRestAPIId_ pAuthorizerId_ =
DeleteAuthorizer'
{ _daRestAPIId = pRestAPIId_
, _daAuthorizerId = pAuthorizerId_
}
daRestAPIId :: Lens' DeleteAuthorizer Text
daRestAPIId = lens _daRestAPIId (\ s a -> s{_daRestAPIId = a});
daAuthorizerId :: Lens' DeleteAuthorizer Text
daAuthorizerId = lens _daAuthorizerId (\ s a -> s{_daAuthorizerId = a});
instance AWSRequest DeleteAuthorizer where
type Rs DeleteAuthorizer = DeleteAuthorizerResponse
request = delete apiGateway
response = receiveNull DeleteAuthorizerResponse'
instance Hashable DeleteAuthorizer
instance ToHeaders DeleteAuthorizer where
toHeaders
= const
(mconcat
["Accept" =# ("application/json" :: ByteString)])
instance ToPath DeleteAuthorizer where
toPath DeleteAuthorizer'{..}
= mconcat
["/restapis/", toBS _daRestAPIId, "/authorizers/",
toBS _daAuthorizerId]
instance ToQuery DeleteAuthorizer where
toQuery = const mempty
data DeleteAuthorizerResponse =
DeleteAuthorizerResponse'
deriving (Eq,Read,Show,Data,Typeable,Generic)
deleteAuthorizerResponse
:: DeleteAuthorizerResponse
deleteAuthorizerResponse = DeleteAuthorizerResponse'