module Network.Google.Resource.TagManager.Accounts.Containers.Folders.Delete
(
AccountsContainersFoldersDeleteResource
, accountsContainersFoldersDelete
, AccountsContainersFoldersDelete
, acfdContainerId
, acfdFolderId
, acfdAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersFoldersDeleteResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"folders" :>
Capture "folderId" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
data AccountsContainersFoldersDelete = AccountsContainersFoldersDelete'
{ _acfdContainerId :: !Text
, _acfdFolderId :: !Text
, _acfdAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersFoldersDelete
:: Text
-> Text
-> Text
-> AccountsContainersFoldersDelete
accountsContainersFoldersDelete pAcfdContainerId_ pAcfdFolderId_ pAcfdAccountId_ =
AccountsContainersFoldersDelete'
{ _acfdContainerId = pAcfdContainerId_
, _acfdFolderId = pAcfdFolderId_
, _acfdAccountId = pAcfdAccountId_
}
acfdContainerId :: Lens' AccountsContainersFoldersDelete Text
acfdContainerId
= lens _acfdContainerId
(\ s a -> s{_acfdContainerId = a})
acfdFolderId :: Lens' AccountsContainersFoldersDelete Text
acfdFolderId
= lens _acfdFolderId (\ s a -> s{_acfdFolderId = a})
acfdAccountId :: Lens' AccountsContainersFoldersDelete Text
acfdAccountId
= lens _acfdAccountId
(\ s a -> s{_acfdAccountId = a})
instance GoogleRequest
AccountsContainersFoldersDelete where
type Rs AccountsContainersFoldersDelete = ()
type Scopes AccountsContainersFoldersDelete =
'["https://www.googleapis.com/auth/tagmanager.edit.containers"]
requestClient AccountsContainersFoldersDelete'{..}
= go _acfdAccountId _acfdContainerId _acfdFolderId
(Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersFoldersDeleteResource)
mempty