module Network.Google.Resource.TagManager.Accounts.Containers.Environments.Get
(
AccountsContainersEnvironmentsGetResource
, accountsContainersEnvironmentsGet
, AccountsContainersEnvironmentsGet
, acegContainerId
, acegAccountId
, acegEnvironmentId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersEnvironmentsGetResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"environments" :>
Capture "environmentId" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] Environment
data AccountsContainersEnvironmentsGet = AccountsContainersEnvironmentsGet'
{ _acegContainerId :: !Text
, _acegAccountId :: !Text
, _acegEnvironmentId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersEnvironmentsGet
:: Text
-> Text
-> Text
-> AccountsContainersEnvironmentsGet
accountsContainersEnvironmentsGet pAcegContainerId_ pAcegAccountId_ pAcegEnvironmentId_ =
AccountsContainersEnvironmentsGet'
{ _acegContainerId = pAcegContainerId_
, _acegAccountId = pAcegAccountId_
, _acegEnvironmentId = pAcegEnvironmentId_
}
acegContainerId :: Lens' AccountsContainersEnvironmentsGet Text
acegContainerId
= lens _acegContainerId
(\ s a -> s{_acegContainerId = a})
acegAccountId :: Lens' AccountsContainersEnvironmentsGet Text
acegAccountId
= lens _acegAccountId
(\ s a -> s{_acegAccountId = a})
acegEnvironmentId :: Lens' AccountsContainersEnvironmentsGet Text
acegEnvironmentId
= lens _acegEnvironmentId
(\ s a -> s{_acegEnvironmentId = a})
instance GoogleRequest
AccountsContainersEnvironmentsGet where
type Rs AccountsContainersEnvironmentsGet =
Environment
type Scopes AccountsContainersEnvironmentsGet =
'["https://www.googleapis.com/auth/tagmanager.edit.containers",
"https://www.googleapis.com/auth/tagmanager.readonly"]
requestClient AccountsContainersEnvironmentsGet'{..}
= go _acegAccountId _acegContainerId
_acegEnvironmentId
(Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersEnvironmentsGetResource)
mempty