module Network.Google.Resource.FirebaseRules.Projects.Releases.Delete
(
ProjectsReleasesDeleteResource
, projectsReleasesDelete
, ProjectsReleasesDelete
, prdXgafv
, prdUploadProtocol
, prdPp
, prdAccessToken
, prdUploadType
, prdBearerToken
, prdName
, prdCallback
) where
import Network.Google.FirebaseRules.Types
import Network.Google.Prelude
type ProjectsReleasesDeleteResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Empty
data ProjectsReleasesDelete = ProjectsReleasesDelete'
{ _prdXgafv :: !(Maybe Xgafv)
, _prdUploadProtocol :: !(Maybe Text)
, _prdPp :: !Bool
, _prdAccessToken :: !(Maybe Text)
, _prdUploadType :: !(Maybe Text)
, _prdBearerToken :: !(Maybe Text)
, _prdName :: !Text
, _prdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsReleasesDelete
:: Text
-> ProjectsReleasesDelete
projectsReleasesDelete pPrdName_ =
ProjectsReleasesDelete'
{ _prdXgafv = Nothing
, _prdUploadProtocol = Nothing
, _prdPp = True
, _prdAccessToken = Nothing
, _prdUploadType = Nothing
, _prdBearerToken = Nothing
, _prdName = pPrdName_
, _prdCallback = Nothing
}
prdXgafv :: Lens' ProjectsReleasesDelete (Maybe Xgafv)
prdXgafv = lens _prdXgafv (\ s a -> s{_prdXgafv = a})
prdUploadProtocol :: Lens' ProjectsReleasesDelete (Maybe Text)
prdUploadProtocol
= lens _prdUploadProtocol
(\ s a -> s{_prdUploadProtocol = a})
prdPp :: Lens' ProjectsReleasesDelete Bool
prdPp = lens _prdPp (\ s a -> s{_prdPp = a})
prdAccessToken :: Lens' ProjectsReleasesDelete (Maybe Text)
prdAccessToken
= lens _prdAccessToken
(\ s a -> s{_prdAccessToken = a})
prdUploadType :: Lens' ProjectsReleasesDelete (Maybe Text)
prdUploadType
= lens _prdUploadType
(\ s a -> s{_prdUploadType = a})
prdBearerToken :: Lens' ProjectsReleasesDelete (Maybe Text)
prdBearerToken
= lens _prdBearerToken
(\ s a -> s{_prdBearerToken = a})
prdName :: Lens' ProjectsReleasesDelete Text
prdName = lens _prdName (\ s a -> s{_prdName = a})
prdCallback :: Lens' ProjectsReleasesDelete (Maybe Text)
prdCallback
= lens _prdCallback (\ s a -> s{_prdCallback = a})
instance GoogleRequest ProjectsReleasesDelete where
type Rs ProjectsReleasesDelete = Empty
type Scopes ProjectsReleasesDelete =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsReleasesDelete'{..}
= go _prdName _prdXgafv _prdUploadProtocol
(Just _prdPp)
_prdAccessToken
_prdUploadType
_prdBearerToken
_prdCallback
(Just AltJSON)
firebaseRulesService
where go
= buildClient
(Proxy :: Proxy ProjectsReleasesDeleteResource)
mempty