module Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout
(
EnterprisesSetStoreLayoutResource
, enterprisesSetStoreLayout
, EnterprisesSetStoreLayout
, esslEnterpriseId
, esslPayload
) where
import Network.Google.AndroidEnterprise.Types
import Network.Google.Prelude
type EnterprisesSetStoreLayoutResource =
"androidenterprise" :>
"v1" :>
"enterprises" :>
Capture "enterpriseId" Text :>
"storeLayout" :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] StoreLayout :>
Put '[JSON] StoreLayout
data EnterprisesSetStoreLayout = EnterprisesSetStoreLayout'
{ _esslEnterpriseId :: !Text
, _esslPayload :: !StoreLayout
} deriving (Eq,Show,Data,Typeable,Generic)
enterprisesSetStoreLayout
:: Text
-> StoreLayout
-> EnterprisesSetStoreLayout
enterprisesSetStoreLayout pEsslEnterpriseId_ pEsslPayload_ =
EnterprisesSetStoreLayout'
{ _esslEnterpriseId = pEsslEnterpriseId_
, _esslPayload = pEsslPayload_
}
esslEnterpriseId :: Lens' EnterprisesSetStoreLayout Text
esslEnterpriseId
= lens _esslEnterpriseId
(\ s a -> s{_esslEnterpriseId = a})
esslPayload :: Lens' EnterprisesSetStoreLayout StoreLayout
esslPayload
= lens _esslPayload (\ s a -> s{_esslPayload = a})
instance GoogleRequest EnterprisesSetStoreLayout
where
type Rs EnterprisesSetStoreLayout = StoreLayout
type Scopes EnterprisesSetStoreLayout =
'["https://www.googleapis.com/auth/androidenterprise"]
requestClient EnterprisesSetStoreLayout'{..}
= go _esslEnterpriseId (Just AltJSON) _esslPayload
androidEnterpriseService
where go
= buildClient
(Proxy :: Proxy EnterprisesSetStoreLayoutResource)
mempty