{-# 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.YouTube.LiveChatModerators.Delete
(
LiveChatModeratorsDeleteResource
, liveChatModeratorsDelete
, LiveChatModeratorsDelete
, lcmdId
) where
import Network.Google.Prelude
import Network.Google.YouTube.Types
type LiveChatModeratorsDeleteResource =
"youtube" :>
"v3" :>
"liveChat" :>
"moderators" :>
QueryParam "id" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
newtype LiveChatModeratorsDelete = LiveChatModeratorsDelete'
{ _lcmdId :: Text
} deriving (Eq,Show,Data,Typeable,Generic)
liveChatModeratorsDelete
:: Text
-> LiveChatModeratorsDelete
liveChatModeratorsDelete pLcmdId_ =
LiveChatModeratorsDelete'
{ _lcmdId = pLcmdId_
}
lcmdId :: Lens' LiveChatModeratorsDelete Text
lcmdId = lens _lcmdId (\ s a -> s{_lcmdId = a})
instance GoogleRequest LiveChatModeratorsDelete where
type Rs LiveChatModeratorsDelete = ()
type Scopes LiveChatModeratorsDelete =
'["https://www.googleapis.com/auth/youtube",
"https://www.googleapis.com/auth/youtube.force-ssl"]
requestClient LiveChatModeratorsDelete'{..}
= go (Just _lcmdId) (Just AltJSON) youTubeService
where go
= buildClient
(Proxy :: Proxy LiveChatModeratorsDeleteResource)
mempty