{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.AndroidManagement.Enterprises.EnrollmentTokens.Delete
(
EnterprisesEnrollmentTokensDeleteResource
, enterprisesEnrollmentTokensDelete
, EnterprisesEnrollmentTokensDelete
, eetdXgafv
, eetdUploadProtocol
, eetdAccessToken
, eetdUploadType
, eetdName
, eetdCallback
) where
import Network.Google.AndroidManagement.Types
import Network.Google.Prelude
type EnterprisesEnrollmentTokensDeleteResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Empty
data EnterprisesEnrollmentTokensDelete = EnterprisesEnrollmentTokensDelete'
{ _eetdXgafv :: !(Maybe Xgafv)
, _eetdUploadProtocol :: !(Maybe Text)
, _eetdAccessToken :: !(Maybe Text)
, _eetdUploadType :: !(Maybe Text)
, _eetdName :: !Text
, _eetdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
enterprisesEnrollmentTokensDelete
:: Text
-> EnterprisesEnrollmentTokensDelete
enterprisesEnrollmentTokensDelete pEetdName_ =
EnterprisesEnrollmentTokensDelete'
{ _eetdXgafv = Nothing
, _eetdUploadProtocol = Nothing
, _eetdAccessToken = Nothing
, _eetdUploadType = Nothing
, _eetdName = pEetdName_
, _eetdCallback = Nothing
}
eetdXgafv :: Lens' EnterprisesEnrollmentTokensDelete (Maybe Xgafv)
eetdXgafv
= lens _eetdXgafv (\ s a -> s{_eetdXgafv = a})
eetdUploadProtocol :: Lens' EnterprisesEnrollmentTokensDelete (Maybe Text)
eetdUploadProtocol
= lens _eetdUploadProtocol
(\ s a -> s{_eetdUploadProtocol = a})
eetdAccessToken :: Lens' EnterprisesEnrollmentTokensDelete (Maybe Text)
eetdAccessToken
= lens _eetdAccessToken
(\ s a -> s{_eetdAccessToken = a})
eetdUploadType :: Lens' EnterprisesEnrollmentTokensDelete (Maybe Text)
eetdUploadType
= lens _eetdUploadType
(\ s a -> s{_eetdUploadType = a})
eetdName :: Lens' EnterprisesEnrollmentTokensDelete Text
eetdName = lens _eetdName (\ s a -> s{_eetdName = a})
eetdCallback :: Lens' EnterprisesEnrollmentTokensDelete (Maybe Text)
eetdCallback
= lens _eetdCallback (\ s a -> s{_eetdCallback = a})
instance GoogleRequest
EnterprisesEnrollmentTokensDelete where
type Rs EnterprisesEnrollmentTokensDelete = Empty
type Scopes EnterprisesEnrollmentTokensDelete =
'["https://www.googleapis.com/auth/androidmanagement"]
requestClient EnterprisesEnrollmentTokensDelete'{..}
= go _eetdName _eetdXgafv _eetdUploadProtocol
_eetdAccessToken
_eetdUploadType
_eetdCallback
(Just AltJSON)
androidManagementService
where go
= buildClient
(Proxy ::
Proxy EnterprisesEnrollmentTokensDeleteResource)
mempty