{-# 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.Logging.Organizations.Exclusions.Delete
(
OrganizationsExclusionsDeleteResource
, organizationsExclusionsDelete
, OrganizationsExclusionsDelete
, oedXgafv
, oedUploadProtocol
, oedAccessToken
, oedUploadType
, oedName
, oedCallback
) where
import Network.Google.Logging.Types
import Network.Google.Prelude
type OrganizationsExclusionsDeleteResource =
"v2" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Empty
data OrganizationsExclusionsDelete = OrganizationsExclusionsDelete'
{ _oedXgafv :: !(Maybe Xgafv)
, _oedUploadProtocol :: !(Maybe Text)
, _oedAccessToken :: !(Maybe Text)
, _oedUploadType :: !(Maybe Text)
, _oedName :: !Text
, _oedCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
organizationsExclusionsDelete
:: Text
-> OrganizationsExclusionsDelete
organizationsExclusionsDelete pOedName_ =
OrganizationsExclusionsDelete'
{ _oedXgafv = Nothing
, _oedUploadProtocol = Nothing
, _oedAccessToken = Nothing
, _oedUploadType = Nothing
, _oedName = pOedName_
, _oedCallback = Nothing
}
oedXgafv :: Lens' OrganizationsExclusionsDelete (Maybe Xgafv)
oedXgafv = lens _oedXgafv (\ s a -> s{_oedXgafv = a})
oedUploadProtocol :: Lens' OrganizationsExclusionsDelete (Maybe Text)
oedUploadProtocol
= lens _oedUploadProtocol
(\ s a -> s{_oedUploadProtocol = a})
oedAccessToken :: Lens' OrganizationsExclusionsDelete (Maybe Text)
oedAccessToken
= lens _oedAccessToken
(\ s a -> s{_oedAccessToken = a})
oedUploadType :: Lens' OrganizationsExclusionsDelete (Maybe Text)
oedUploadType
= lens _oedUploadType
(\ s a -> s{_oedUploadType = a})
oedName :: Lens' OrganizationsExclusionsDelete Text
oedName = lens _oedName (\ s a -> s{_oedName = a})
oedCallback :: Lens' OrganizationsExclusionsDelete (Maybe Text)
oedCallback
= lens _oedCallback (\ s a -> s{_oedCallback = a})
instance GoogleRequest OrganizationsExclusionsDelete
where
type Rs OrganizationsExclusionsDelete = Empty
type Scopes OrganizationsExclusionsDelete =
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/logging.admin"]
requestClient OrganizationsExclusionsDelete'{..}
= go _oedName _oedXgafv _oedUploadProtocol
_oedAccessToken
_oedUploadType
_oedCallback
(Just AltJSON)
loggingService
where go
= buildClient
(Proxy ::
Proxy OrganizationsExclusionsDeleteResource)
mempty