{-# 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.GamesManagement.Quests.ResetMultipleForAllPlayers
(
QuestsResetMultipleForAllPlayersResource
, questsResetMultipleForAllPlayers
, QuestsResetMultipleForAllPlayers
, qrmfapPayload
) where
import Network.Google.GamesManagement.Types
import Network.Google.Prelude
type QuestsResetMultipleForAllPlayersResource =
"games" :>
"v1management" :>
"quests" :>
"resetMultipleForAllPlayers" :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] QuestsResetMultipleForAllRequest :>
Post '[JSON] ()
newtype QuestsResetMultipleForAllPlayers = QuestsResetMultipleForAllPlayers'
{ _qrmfapPayload :: QuestsResetMultipleForAllRequest
} deriving (Eq,Show,Data,Typeable,Generic)
questsResetMultipleForAllPlayers
:: QuestsResetMultipleForAllRequest
-> QuestsResetMultipleForAllPlayers
questsResetMultipleForAllPlayers pQrmfapPayload_ =
QuestsResetMultipleForAllPlayers'
{ _qrmfapPayload = pQrmfapPayload_
}
qrmfapPayload :: Lens' QuestsResetMultipleForAllPlayers QuestsResetMultipleForAllRequest
qrmfapPayload
= lens _qrmfapPayload
(\ s a -> s{_qrmfapPayload = a})
instance GoogleRequest
QuestsResetMultipleForAllPlayers where
type Rs QuestsResetMultipleForAllPlayers = ()
type Scopes QuestsResetMultipleForAllPlayers =
'["https://www.googleapis.com/auth/games"]
requestClient QuestsResetMultipleForAllPlayers'{..}
= go (Just AltJSON) _qrmfapPayload
gamesManagementService
where go
= buildClient
(Proxy ::
Proxy QuestsResetMultipleForAllPlayersResource)
mempty