module Network.Google.Resource.AppEngine.Apps.Modules.Versions.List
(
AppsModulesVersionsListResource
, appsModulesVersionsList
, AppsModulesVersionsList
, amvlXgafv
, amvlUploadProtocol
, amvlPp
, amvlAccessToken
, amvlUploadType
, amvlModulesId
, amvlBearerToken
, amvlAppsId
, amvlView
, amvlPageToken
, amvlPageSize
, amvlCallback
) where
import Network.Google.AppEngine.Types
import Network.Google.Prelude
type AppsModulesVersionsListResource =
"v1beta4" :>
"apps" :>
Capture "appsId" Text :>
"modules" :>
Capture "modulesId" Text :>
"versions" :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "view" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListVersionsResponse
data AppsModulesVersionsList = AppsModulesVersionsList
{ _amvlXgafv :: !(Maybe Text)
, _amvlUploadProtocol :: !(Maybe Text)
, _amvlPp :: !Bool
, _amvlAccessToken :: !(Maybe Text)
, _amvlUploadType :: !(Maybe Text)
, _amvlModulesId :: !Text
, _amvlBearerToken :: !(Maybe Text)
, _amvlAppsId :: !Text
, _amvlView :: !(Maybe Text)
, _amvlPageToken :: !(Maybe Text)
, _amvlPageSize :: !(Maybe (Textual Int32))
, _amvlCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
appsModulesVersionsList
:: Text
-> Text
-> AppsModulesVersionsList
appsModulesVersionsList pAmvlModulesId_ pAmvlAppsId_ =
AppsModulesVersionsList
{ _amvlXgafv = Nothing
, _amvlUploadProtocol = Nothing
, _amvlPp = True
, _amvlAccessToken = Nothing
, _amvlUploadType = Nothing
, _amvlModulesId = pAmvlModulesId_
, _amvlBearerToken = Nothing
, _amvlAppsId = pAmvlAppsId_
, _amvlView = Nothing
, _amvlPageToken = Nothing
, _amvlPageSize = Nothing
, _amvlCallback = Nothing
}
amvlXgafv :: Lens' AppsModulesVersionsList (Maybe Text)
amvlXgafv
= lens _amvlXgafv (\ s a -> s{_amvlXgafv = a})
amvlUploadProtocol :: Lens' AppsModulesVersionsList (Maybe Text)
amvlUploadProtocol
= lens _amvlUploadProtocol
(\ s a -> s{_amvlUploadProtocol = a})
amvlPp :: Lens' AppsModulesVersionsList Bool
amvlPp = lens _amvlPp (\ s a -> s{_amvlPp = a})
amvlAccessToken :: Lens' AppsModulesVersionsList (Maybe Text)
amvlAccessToken
= lens _amvlAccessToken
(\ s a -> s{_amvlAccessToken = a})
amvlUploadType :: Lens' AppsModulesVersionsList (Maybe Text)
amvlUploadType
= lens _amvlUploadType
(\ s a -> s{_amvlUploadType = a})
amvlModulesId :: Lens' AppsModulesVersionsList Text
amvlModulesId
= lens _amvlModulesId
(\ s a -> s{_amvlModulesId = a})
amvlBearerToken :: Lens' AppsModulesVersionsList (Maybe Text)
amvlBearerToken
= lens _amvlBearerToken
(\ s a -> s{_amvlBearerToken = a})
amvlAppsId :: Lens' AppsModulesVersionsList Text
amvlAppsId
= lens _amvlAppsId (\ s a -> s{_amvlAppsId = a})
amvlView :: Lens' AppsModulesVersionsList (Maybe Text)
amvlView = lens _amvlView (\ s a -> s{_amvlView = a})
amvlPageToken :: Lens' AppsModulesVersionsList (Maybe Text)
amvlPageToken
= lens _amvlPageToken
(\ s a -> s{_amvlPageToken = a})
amvlPageSize :: Lens' AppsModulesVersionsList (Maybe Int32)
amvlPageSize
= lens _amvlPageSize (\ s a -> s{_amvlPageSize = a})
. mapping _Coerce
amvlCallback :: Lens' AppsModulesVersionsList (Maybe Text)
amvlCallback
= lens _amvlCallback (\ s a -> s{_amvlCallback = a})
instance GoogleRequest AppsModulesVersionsList where
type Rs AppsModulesVersionsList =
ListVersionsResponse
requestClient AppsModulesVersionsList{..}
= go _amvlAppsId _amvlModulesId _amvlXgafv
_amvlUploadProtocol
(Just _amvlPp)
_amvlAccessToken
_amvlUploadType
_amvlBearerToken
_amvlView
_amvlPageToken
_amvlPageSize
_amvlCallback
(Just AltJSON)
appEngineService
where go
= buildClient
(Proxy :: Proxy AppsModulesVersionsListResource)
mempty