module Network.Google.Resource.TagManager.Accounts.Containers.Triggers.List
(
AccountsContainersTriggersListResource
, accountsContainersTriggersList
, AccountsContainersTriggersList
, actlcContainerId
, actlcAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersTriggersListResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"triggers" :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListTriggersResponse
data AccountsContainersTriggersList = AccountsContainersTriggersList'
{ _actlcContainerId :: !Text
, _actlcAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersTriggersList
:: Text
-> Text
-> AccountsContainersTriggersList
accountsContainersTriggersList pActlcContainerId_ pActlcAccountId_ =
AccountsContainersTriggersList'
{ _actlcContainerId = pActlcContainerId_
, _actlcAccountId = pActlcAccountId_
}
actlcContainerId :: Lens' AccountsContainersTriggersList Text
actlcContainerId
= lens _actlcContainerId
(\ s a -> s{_actlcContainerId = a})
actlcAccountId :: Lens' AccountsContainersTriggersList Text
actlcAccountId
= lens _actlcAccountId
(\ s a -> s{_actlcAccountId = a})
instance GoogleRequest AccountsContainersTriggersList
where
type Rs AccountsContainersTriggersList =
ListTriggersResponse
type Scopes AccountsContainersTriggersList =
'["https://www.googleapis.com/auth/tagmanager.edit.containers",
"https://www.googleapis.com/auth/tagmanager.readonly"]
requestClient AccountsContainersTriggersList'{..}
= go _actlcAccountId _actlcContainerId (Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersTriggersListResource)
mempty