module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Patch
(
EditsAPKListingsPatchResource
, editsAPKListingsPatch
, EditsAPKListingsPatch
, eapklpPackageName
, eapklpAPKVersionCode
, eapklpPayload
, eapklpLanguage
, eapklpEditId
) where
import Network.Google.AndroidPublisher.Types
import Network.Google.Prelude
type EditsAPKListingsPatchResource =
"androidpublisher" :>
"v2" :>
"applications" :>
Capture "packageName" Text :>
"edits" :>
Capture "editId" Text :>
"apks" :>
Capture "apkVersionCode" (Textual Int32) :>
"listings" :>
Capture "language" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] APKListing :>
Patch '[JSON] APKListing
data EditsAPKListingsPatch = EditsAPKListingsPatch
{ _eapklpPackageName :: !Text
, _eapklpAPKVersionCode :: !(Textual Int32)
, _eapklpPayload :: !APKListing
, _eapklpLanguage :: !Text
, _eapklpEditId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
editsAPKListingsPatch
:: Text
-> Int32
-> APKListing
-> Text
-> Text
-> EditsAPKListingsPatch
editsAPKListingsPatch pEapklpPackageName_ pEapklpAPKVersionCode_ pEapklpPayload_ pEapklpLanguage_ pEapklpEditId_ =
EditsAPKListingsPatch
{ _eapklpPackageName = pEapklpPackageName_
, _eapklpAPKVersionCode = _Coerce # pEapklpAPKVersionCode_
, _eapklpPayload = pEapklpPayload_
, _eapklpLanguage = pEapklpLanguage_
, _eapklpEditId = pEapklpEditId_
}
eapklpPackageName :: Lens' EditsAPKListingsPatch Text
eapklpPackageName
= lens _eapklpPackageName
(\ s a -> s{_eapklpPackageName = a})
eapklpAPKVersionCode :: Lens' EditsAPKListingsPatch Int32
eapklpAPKVersionCode
= lens _eapklpAPKVersionCode
(\ s a -> s{_eapklpAPKVersionCode = a})
. _Coerce
eapklpPayload :: Lens' EditsAPKListingsPatch APKListing
eapklpPayload
= lens _eapklpPayload
(\ s a -> s{_eapklpPayload = a})
eapklpLanguage :: Lens' EditsAPKListingsPatch Text
eapklpLanguage
= lens _eapklpLanguage
(\ s a -> s{_eapklpLanguage = a})
eapklpEditId :: Lens' EditsAPKListingsPatch Text
eapklpEditId
= lens _eapklpEditId (\ s a -> s{_eapklpEditId = a})
instance GoogleRequest EditsAPKListingsPatch where
type Rs EditsAPKListingsPatch = APKListing
requestClient EditsAPKListingsPatch{..}
= go _eapklpPackageName _eapklpEditId
_eapklpAPKVersionCode
_eapklpLanguage
(Just AltJSON)
_eapklpPayload
androidPublisherService
where go
= buildClient
(Proxy :: Proxy EditsAPKListingsPatchResource)
mempty