{-# 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.AndroidPublisher.Edits.Commit
(
EditsCommitResource
, editsCommit
, EditsCommit
, ecPackageName
, ecEditId
) where
import Network.Google.AndroidPublisher.Types
import Network.Google.Prelude
type EditsCommitResource =
"androidpublisher" :>
"v3" :>
"applications" :>
Capture "packageName" Text :>
"edits" :>
CaptureMode "editId" "commit" Text :>
QueryParam "alt" AltJSON :> Post '[JSON] AppEdit
data EditsCommit =
EditsCommit'
{ _ecPackageName :: !Text
, _ecEditId :: !Text
}
deriving (Eq, Show, Data, Typeable, Generic)
editsCommit
:: Text
-> Text
-> EditsCommit
editsCommit pEcPackageName_ pEcEditId_ =
EditsCommit' {_ecPackageName = pEcPackageName_, _ecEditId = pEcEditId_}
ecPackageName :: Lens' EditsCommit Text
ecPackageName
= lens _ecPackageName
(\ s a -> s{_ecPackageName = a})
ecEditId :: Lens' EditsCommit Text
ecEditId = lens _ecEditId (\ s a -> s{_ecEditId = a})
instance GoogleRequest EditsCommit where
type Rs EditsCommit = AppEdit
type Scopes EditsCommit =
'["https://www.googleapis.com/auth/androidpublisher"]
requestClient EditsCommit'{..}
= go _ecPackageName _ecEditId (Just AltJSON)
androidPublisherService
where go
= buildClient (Proxy :: Proxy EditsCommitResource)
mempty