{-# 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.Reset
(
QuestsResetResource
, questsReset
, QuestsReset
, qrQuestId
) where
import Network.Google.GamesManagement.Types
import Network.Google.Prelude
type QuestsResetResource =
"games" :>
"v1management" :>
"quests" :>
Capture "questId" Text :>
"reset" :>
QueryParam "alt" AltJSON :> Post '[JSON] ()
newtype QuestsReset =
QuestsReset'
{ _qrQuestId :: Text
}
deriving (Eq, Show, Data, Typeable, Generic)
questsReset
:: Text
-> QuestsReset
questsReset pQrQuestId_ = QuestsReset' {_qrQuestId = pQrQuestId_}
qrQuestId :: Lens' QuestsReset Text
qrQuestId
= lens _qrQuestId (\ s a -> s{_qrQuestId = a})
instance GoogleRequest QuestsReset where
type Rs QuestsReset = ()
type Scopes QuestsReset =
'["https://www.googleapis.com/auth/games"]
requestClient QuestsReset'{..}
= go _qrQuestId (Just AltJSON) gamesManagementService
where go
= buildClient (Proxy :: Proxy QuestsResetResource)
mempty