{-# 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.Tracks.List
(
EditsTracksListResource
, editsTracksList
, EditsTracksList
, etlPackageName
, etlEditId
) where
import Network.Google.AndroidPublisher.Types
import Network.Google.Prelude
type EditsTracksListResource =
"androidpublisher" :>
"v3" :>
"applications" :>
Capture "packageName" Text :>
"edits" :>
Capture "editId" Text :>
"tracks" :>
QueryParam "alt" AltJSON :>
Get '[JSON] TracksListResponse
data EditsTracksList = EditsTracksList'
{ _etlPackageName :: !Text
, _etlEditId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
editsTracksList
:: Text
-> Text
-> EditsTracksList
editsTracksList pEtlPackageName_ pEtlEditId_ =
EditsTracksList'
{ _etlPackageName = pEtlPackageName_
, _etlEditId = pEtlEditId_
}
etlPackageName :: Lens' EditsTracksList Text
etlPackageName
= lens _etlPackageName
(\ s a -> s{_etlPackageName = a})
etlEditId :: Lens' EditsTracksList Text
etlEditId
= lens _etlEditId (\ s a -> s{_etlEditId = a})
instance GoogleRequest EditsTracksList where
type Rs EditsTracksList = TracksListResponse
type Scopes EditsTracksList =
'["https://www.googleapis.com/auth/androidpublisher"]
requestClient EditsTracksList'{..}
= go _etlPackageName _etlEditId (Just AltJSON)
androidPublisherService
where go
= buildClient
(Proxy :: Proxy EditsTracksListResource)
mempty