module Network.Google.Resource.TagManager.Accounts.Containers.Triggers.Delete
(
AccountsContainersTriggersDeleteResource
, accountsContainersTriggersDelete
, AccountsContainersTriggersDelete
, actdContainerId
, actdTriggerId
, actdAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersTriggersDeleteResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"triggers" :>
Capture "triggerId" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
data AccountsContainersTriggersDelete = AccountsContainersTriggersDelete'
{ _actdContainerId :: !Text
, _actdTriggerId :: !Text
, _actdAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersTriggersDelete
:: Text
-> Text
-> Text
-> AccountsContainersTriggersDelete
accountsContainersTriggersDelete pActdContainerId_ pActdTriggerId_ pActdAccountId_ =
AccountsContainersTriggersDelete'
{ _actdContainerId = pActdContainerId_
, _actdTriggerId = pActdTriggerId_
, _actdAccountId = pActdAccountId_
}
actdContainerId :: Lens' AccountsContainersTriggersDelete Text
actdContainerId
= lens _actdContainerId
(\ s a -> s{_actdContainerId = a})
actdTriggerId :: Lens' AccountsContainersTriggersDelete Text
actdTriggerId
= lens _actdTriggerId
(\ s a -> s{_actdTriggerId = a})
actdAccountId :: Lens' AccountsContainersTriggersDelete Text
actdAccountId
= lens _actdAccountId
(\ s a -> s{_actdAccountId = a})
instance GoogleRequest
AccountsContainersTriggersDelete where
type Rs AccountsContainersTriggersDelete = ()
type Scopes AccountsContainersTriggersDelete =
'["https://www.googleapis.com/auth/tagmanager.edit.containers"]
requestClient AccountsContainersTriggersDelete'{..}
= go _actdAccountId _actdContainerId _actdTriggerId
(Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersTriggersDeleteResource)
mempty