{-# 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.Get
(
EditsGetResource
, editsGet
, EditsGet
, egPackageName
, egEditId
) where
import Network.Google.AndroidPublisher.Types
import Network.Google.Prelude
type EditsGetResource =
"androidpublisher" :>
"v3" :>
"applications" :>
Capture "packageName" Text :>
"edits" :>
Capture "editId" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] AppEdit
data EditsGet = EditsGet'
{ _egPackageName :: !Text
, _egEditId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
editsGet
:: Text
-> Text
-> EditsGet
editsGet pEgPackageName_ pEgEditId_ =
EditsGet'
{ _egPackageName = pEgPackageName_
, _egEditId = pEgEditId_
}
egPackageName :: Lens' EditsGet Text
egPackageName
= lens _egPackageName
(\ s a -> s{_egPackageName = a})
egEditId :: Lens' EditsGet Text
egEditId = lens _egEditId (\ s a -> s{_egEditId = a})
instance GoogleRequest EditsGet where
type Rs EditsGet = AppEdit
type Scopes EditsGet =
'["https://www.googleapis.com/auth/androidpublisher"]
requestClient EditsGet'{..}
= go _egPackageName _egEditId (Just AltJSON)
androidPublisherService
where go
= buildClient (Proxy :: Proxy EditsGetResource)
mempty