{-# 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