module Network.Google.Resource.TagManager.Accounts.Containers.Versions.Delete
(
AccountsContainersVersionsDeleteResource
, accountsContainersVersionsDelete
, AccountsContainersVersionsDelete
, acvdcContainerId
, acvdcContainerVersionId
, acvdcAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersVersionsDeleteResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"versions" :>
Capture "containerVersionId" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
data AccountsContainersVersionsDelete = AccountsContainersVersionsDelete'
{ _acvdcContainerId :: !Text
, _acvdcContainerVersionId :: !Text
, _acvdcAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersVersionsDelete
:: Text
-> Text
-> Text
-> AccountsContainersVersionsDelete
accountsContainersVersionsDelete pAcvdcContainerId_ pAcvdcContainerVersionId_ pAcvdcAccountId_ =
AccountsContainersVersionsDelete'
{ _acvdcContainerId = pAcvdcContainerId_
, _acvdcContainerVersionId = pAcvdcContainerVersionId_
, _acvdcAccountId = pAcvdcAccountId_
}
acvdcContainerId :: Lens' AccountsContainersVersionsDelete Text
acvdcContainerId
= lens _acvdcContainerId
(\ s a -> s{_acvdcContainerId = a})
acvdcContainerVersionId :: Lens' AccountsContainersVersionsDelete Text
acvdcContainerVersionId
= lens _acvdcContainerVersionId
(\ s a -> s{_acvdcContainerVersionId = a})
acvdcAccountId :: Lens' AccountsContainersVersionsDelete Text
acvdcAccountId
= lens _acvdcAccountId
(\ s a -> s{_acvdcAccountId = a})
instance GoogleRequest
AccountsContainersVersionsDelete where
type Rs AccountsContainersVersionsDelete = ()
type Scopes AccountsContainersVersionsDelete =
'["https://www.googleapis.com/auth/tagmanager.edit.containerversions"]
requestClient AccountsContainersVersionsDelete'{..}
= go _acvdcAccountId _acvdcContainerId
_acvdcContainerVersionId
(Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersVersionsDeleteResource)
mempty