{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE ImportQualifiedPost #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Gogol.Vault.Matters.SavedQueries.Delete
(
VaultMattersSavedQueriesDeleteResource,
VaultMattersSavedQueriesDelete (..),
newVaultMattersSavedQueriesDelete,
)
where
import Gogol.Prelude qualified as Core
import Gogol.Vault.Types
type =
"v1"
Core.:> "matters"
Core.:> Core.Capture "matterId" Core.Text
Core.:> "savedQueries"
Core.:> Core.Capture "savedQueryId" Core.Text
Core.:> Core.QueryParam "$.xgafv" Xgafv
Core.:> Core.QueryParam "access_token" Core.Text
Core.:> Core.QueryParam "callback" Core.Text
Core.:> Core.QueryParam "uploadType" Core.Text
Core.:> Core.QueryParam "upload_protocol" Core.Text
Core.:> Core.QueryParam "alt" Core.AltJSON
Core.:> Core.Delete '[Core.JSON] Empty
data =
{
VaultMattersSavedQueriesDelete -> Maybe Xgafv
xgafv :: (Core.Maybe Xgafv),
VaultMattersSavedQueriesDelete -> Maybe Text
accessToken :: (Core.Maybe Core.Text),
VaultMattersSavedQueriesDelete -> Maybe Text
callback :: (Core.Maybe Core.Text),
VaultMattersSavedQueriesDelete -> Text
matterId :: Core.Text,
VaultMattersSavedQueriesDelete -> Text
savedQueryId :: Core.Text,
VaultMattersSavedQueriesDelete -> Maybe Text
uploadType :: (Core.Maybe Core.Text),
VaultMattersSavedQueriesDelete -> Maybe Text
uploadProtocol :: (Core.Maybe Core.Text)
}
deriving (VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool
(VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool)
-> (VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool)
-> Eq VaultMattersSavedQueriesDelete
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool
== :: VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool
$c/= :: VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool
/= :: VaultMattersSavedQueriesDelete
-> VaultMattersSavedQueriesDelete -> Bool
Core.Eq, Int -> VaultMattersSavedQueriesDelete -> ShowS
[VaultMattersSavedQueriesDelete] -> ShowS
VaultMattersSavedQueriesDelete -> String
(Int -> VaultMattersSavedQueriesDelete -> ShowS)
-> (VaultMattersSavedQueriesDelete -> String)
-> ([VaultMattersSavedQueriesDelete] -> ShowS)
-> Show VaultMattersSavedQueriesDelete
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VaultMattersSavedQueriesDelete -> ShowS
showsPrec :: Int -> VaultMattersSavedQueriesDelete -> ShowS
$cshow :: VaultMattersSavedQueriesDelete -> String
show :: VaultMattersSavedQueriesDelete -> String
$cshowList :: [VaultMattersSavedQueriesDelete] -> ShowS
showList :: [VaultMattersSavedQueriesDelete] -> ShowS
Core.Show, (forall x.
VaultMattersSavedQueriesDelete
-> Rep VaultMattersSavedQueriesDelete x)
-> (forall x.
Rep VaultMattersSavedQueriesDelete x
-> VaultMattersSavedQueriesDelete)
-> Generic VaultMattersSavedQueriesDelete
forall x.
Rep VaultMattersSavedQueriesDelete x
-> VaultMattersSavedQueriesDelete
forall x.
VaultMattersSavedQueriesDelete
-> Rep VaultMattersSavedQueriesDelete x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x.
VaultMattersSavedQueriesDelete
-> Rep VaultMattersSavedQueriesDelete x
from :: forall x.
VaultMattersSavedQueriesDelete
-> Rep VaultMattersSavedQueriesDelete x
$cto :: forall x.
Rep VaultMattersSavedQueriesDelete x
-> VaultMattersSavedQueriesDelete
to :: forall x.
Rep VaultMattersSavedQueriesDelete x
-> VaultMattersSavedQueriesDelete
Core.Generic)
newVaultMattersSavedQueriesDelete ::
Core.Text ->
Core.Text ->
VaultMattersSavedQueriesDelete
Text
matterId Text
savedQueryId =
VaultMattersSavedQueriesDelete
{ xgafv :: Maybe Xgafv
xgafv = Maybe Xgafv
forall a. Maybe a
Core.Nothing,
accessToken :: Maybe Text
accessToken = Maybe Text
forall a. Maybe a
Core.Nothing,
callback :: Maybe Text
callback = Maybe Text
forall a. Maybe a
Core.Nothing,
matterId :: Text
matterId = Text
matterId,
savedQueryId :: Text
savedQueryId = Text
savedQueryId,
uploadType :: Maybe Text
uploadType = Maybe Text
forall a. Maybe a
Core.Nothing,
uploadProtocol :: Maybe Text
uploadProtocol = Maybe Text
forall a. Maybe a
Core.Nothing
}
instance Core.GoogleRequest VaultMattersSavedQueriesDelete where
type Rs VaultMattersSavedQueriesDelete = Empty
type
Scopes VaultMattersSavedQueriesDelete =
'[Ediscovery'FullControl]
requestClient :: VaultMattersSavedQueriesDelete
-> GClient (Rs VaultMattersSavedQueriesDelete)
requestClient VaultMattersSavedQueriesDelete {Maybe Text
Maybe Xgafv
Text
xgafv :: VaultMattersSavedQueriesDelete -> Maybe Xgafv
accessToken :: VaultMattersSavedQueriesDelete -> Maybe Text
callback :: VaultMattersSavedQueriesDelete -> Maybe Text
matterId :: VaultMattersSavedQueriesDelete -> Text
savedQueryId :: VaultMattersSavedQueriesDelete -> Text
uploadType :: VaultMattersSavedQueriesDelete -> Maybe Text
uploadProtocol :: VaultMattersSavedQueriesDelete -> Maybe Text
xgafv :: Maybe Xgafv
accessToken :: Maybe Text
callback :: Maybe Text
matterId :: Text
savedQueryId :: Text
uploadType :: Maybe Text
uploadProtocol :: Maybe Text
..} =
Text
-> Text
-> Maybe Xgafv
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe AltJSON
-> ServiceConfig
-> GClient Empty
go
Text
matterId
Text
savedQueryId
Maybe Xgafv
xgafv
Maybe Text
accessToken
Maybe Text
callback
Maybe Text
uploadType
Maybe Text
uploadProtocol
(AltJSON -> Maybe AltJSON
forall a. a -> Maybe a
Core.Just AltJSON
Core.AltJSON)
ServiceConfig
vaultService
where
go :: Fn VaultMattersSavedQueriesDeleteResource
go =
Proxy VaultMattersSavedQueriesDeleteResource
-> Request -> Fn VaultMattersSavedQueriesDeleteResource
forall {k} (fn :: k).
GoogleClient fn =>
Proxy fn -> Request -> Fn fn
Core.buildClient
(Proxy VaultMattersSavedQueriesDeleteResource
forall {k} (t :: k). Proxy t
Core.Proxy :: Core.Proxy VaultMattersSavedQueriesDeleteResource)
Request
forall a. Monoid a => a
Core.mempty