module Network.Google.Resource.AndroidEnterprise.Collections.Update
(
CollectionsUpdateResource
, collectionsUpdate
, CollectionsUpdate
, cuuEnterpriseId
, cuuCollectionId
, cuuPayload
) where
import Network.Google.AndroidEnterprise.Types
import Network.Google.Prelude
type CollectionsUpdateResource =
"androidenterprise" :>
"v1" :>
"enterprises" :>
Capture "enterpriseId" Text :>
"collections" :>
Capture "collectionId" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] Collection :> Put '[JSON] Collection
data CollectionsUpdate = CollectionsUpdate'
{ _cuuEnterpriseId :: !Text
, _cuuCollectionId :: !Text
, _cuuPayload :: !Collection
} deriving (Eq,Show,Data,Typeable,Generic)
collectionsUpdate
:: Text
-> Text
-> Collection
-> CollectionsUpdate
collectionsUpdate pCuuEnterpriseId_ pCuuCollectionId_ pCuuPayload_ =
CollectionsUpdate'
{ _cuuEnterpriseId = pCuuEnterpriseId_
, _cuuCollectionId = pCuuCollectionId_
, _cuuPayload = pCuuPayload_
}
cuuEnterpriseId :: Lens' CollectionsUpdate Text
cuuEnterpriseId
= lens _cuuEnterpriseId
(\ s a -> s{_cuuEnterpriseId = a})
cuuCollectionId :: Lens' CollectionsUpdate Text
cuuCollectionId
= lens _cuuCollectionId
(\ s a -> s{_cuuCollectionId = a})
cuuPayload :: Lens' CollectionsUpdate Collection
cuuPayload
= lens _cuuPayload (\ s a -> s{_cuuPayload = a})
instance GoogleRequest CollectionsUpdate where
type Rs CollectionsUpdate = Collection
type Scopes CollectionsUpdate =
'["https://www.googleapis.com/auth/androidenterprise"]
requestClient CollectionsUpdate'{..}
= go _cuuEnterpriseId _cuuCollectionId (Just AltJSON)
_cuuPayload
androidEnterpriseService
where go
= buildClient
(Proxy :: Proxy CollectionsUpdateResource)
mempty