{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.AppEngine.Apps.DomainMAppings.Delete
(
AppsDomainMAppingsDeleteResource
, appsDomainMAppingsDelete
, AppsDomainMAppingsDelete
, admadXgafv
, admadUploadProtocol
, admadAccessToken
, admadUploadType
, admadAppsId
, admadDomainMAppingsId
, admadCallback
) where
import Network.Google.AppEngine.Types
import Network.Google.Prelude
type AppsDomainMAppingsDeleteResource =
"v1" :>
"apps" :>
Capture "appsId" Text :>
"domainMappings" :>
Capture "domainMappingsId" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Operation
data AppsDomainMAppingsDelete = AppsDomainMAppingsDelete'
{ _admadXgafv :: !(Maybe Xgafv)
, _admadUploadProtocol :: !(Maybe Text)
, _admadAccessToken :: !(Maybe Text)
, _admadUploadType :: !(Maybe Text)
, _admadAppsId :: !Text
, _admadDomainMAppingsId :: !Text
, _admadCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
appsDomainMAppingsDelete
:: Text
-> Text
-> AppsDomainMAppingsDelete
appsDomainMAppingsDelete pAdmadAppsId_ pAdmadDomainMAppingsId_ =
AppsDomainMAppingsDelete'
{ _admadXgafv = Nothing
, _admadUploadProtocol = Nothing
, _admadAccessToken = Nothing
, _admadUploadType = Nothing
, _admadAppsId = pAdmadAppsId_
, _admadDomainMAppingsId = pAdmadDomainMAppingsId_
, _admadCallback = Nothing
}
admadXgafv :: Lens' AppsDomainMAppingsDelete (Maybe Xgafv)
admadXgafv
= lens _admadXgafv (\ s a -> s{_admadXgafv = a})
admadUploadProtocol :: Lens' AppsDomainMAppingsDelete (Maybe Text)
admadUploadProtocol
= lens _admadUploadProtocol
(\ s a -> s{_admadUploadProtocol = a})
admadAccessToken :: Lens' AppsDomainMAppingsDelete (Maybe Text)
admadAccessToken
= lens _admadAccessToken
(\ s a -> s{_admadAccessToken = a})
admadUploadType :: Lens' AppsDomainMAppingsDelete (Maybe Text)
admadUploadType
= lens _admadUploadType
(\ s a -> s{_admadUploadType = a})
admadAppsId :: Lens' AppsDomainMAppingsDelete Text
admadAppsId
= lens _admadAppsId (\ s a -> s{_admadAppsId = a})
admadDomainMAppingsId :: Lens' AppsDomainMAppingsDelete Text
admadDomainMAppingsId
= lens _admadDomainMAppingsId
(\ s a -> s{_admadDomainMAppingsId = a})
admadCallback :: Lens' AppsDomainMAppingsDelete (Maybe Text)
admadCallback
= lens _admadCallback
(\ s a -> s{_admadCallback = a})
instance GoogleRequest AppsDomainMAppingsDelete where
type Rs AppsDomainMAppingsDelete = Operation
type Scopes AppsDomainMAppingsDelete =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient AppsDomainMAppingsDelete'{..}
= go _admadAppsId _admadDomainMAppingsId _admadXgafv
_admadUploadProtocol
_admadAccessToken
_admadUploadType
_admadCallback
(Just AltJSON)
appEngineService
where go
= buildClient
(Proxy :: Proxy AppsDomainMAppingsDeleteResource)
mempty