Regenerating all services
commit4feeffa383368586a1bcea9fa746772cb9ee745c
authorBrendan Hay <brendan.g.hay@gmail.com>
dateSun 4 Oct 2015, 19:06 (11 years ago)
parentd0af8ed
749 files changed+761−8322
gen/src/Gen/Syntax.hs+2−2
@@ -107,10 +107,10 @@ verbAlias n m
107107 (TyCon "Body")]
108108
109109 | Just b <- _mRequest m =
110− [TyApp (TyApp (TyCon "ReqBody") octet) (tycon (ref b))]
110+ [TyApp (TyApp (TyCon "ReqBody") json) (tycon (ref b))]
111111
112112 | _mSupportsMediaUpload m =
113− [TyApp (TyApp (TyCon "ReqBody") json) (TyCon "Body")]
113+ [TyApp (TyApp (TyCon "ReqBody") octet) (TyCon "Body")]
114114
115115 | otherwise = []
116116
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs+1−2
@@ -56,8 +56,7 @@ type AccountsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Account :>
60− Patch '[JSON] Account
59+ ReqBody '[JSON] Account :> Patch '[JSON] Account
6160
6261-- | Updates an existing account. This method supports patch semantics.
6362--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs+1−1
@@ -56,7 +56,7 @@ type AccountsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Account :> Put '[JSON] Account
59+ ReqBody '[JSON] Account :> Put '[JSON] Account
6060
6161-- | Updates an existing account.
6262--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs+1−1
@@ -60,7 +60,7 @@ type BudgetPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Budget :> Patch '[JSON] Budget
63+ ReqBody '[JSON] Budget :> Patch '[JSON] Budget
6464
6565-- | Updates the budget amount for the budget of the adgroup specified by the
6666-- accountId and billingId, with the budget amount in the request. This
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs+1−1
@@ -59,7 +59,7 @@ type BudgetUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Budget :> Put '[JSON] Budget
62+ ReqBody '[JSON] Budget :> Put '[JSON] Budget
6363
6464-- | Updates the budget amount for the budget of the adgroup specified by the
6565-- accountId and billingId, with the budget amount in the request.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Insert.hs+1−1
@@ -58,7 +58,7 @@ type ClientAccessInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ClientAccessCapabilities :>
61+ ReqBody '[JSON] ClientAccessCapabilities :>
6262 Post '[JSON] ClientAccessCapabilities
6363
6464--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/List.hs+1−2
@@ -54,8 +54,7 @@ type ClientAccessListResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
58− ListClientAccessCapabilitiesRequest
57+ ReqBody '[JSON] ListClientAccessCapabilitiesRequest
5958 :> Get '[JSON] ListClientAccessCapabilitiesResponse
6059
6160--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Patch.hs+1−1
@@ -58,7 +58,7 @@ type ClientAccessPatchResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ClientAccessCapabilities :>
61+ ReqBody '[JSON] ClientAccessCapabilities :>
6262 Patch '[JSON] ClientAccessCapabilities
6363
6464--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Update.hs+1−1
@@ -58,7 +58,7 @@ type ClientAccessUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ClientAccessCapabilities :>
61+ ReqBody '[JSON] ClientAccessCapabilities :>
6262 Put '[JSON] ClientAccessCapabilities
6363
6464--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs+1−2
@@ -54,8 +54,7 @@ type CreativesInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Creative :>
58− Post '[JSON] Creative
57+ ReqBody '[JSON] Creative :> Post '[JSON] Creative
5958
6059-- | Submit a new creative.
6160--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Deals/Get.hs+1−1
@@ -56,7 +56,7 @@ type DealsGetResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream]
59+ ReqBody '[JSON]
6060 GetFinalizedNegotiationByExternalDealIdRequest
6161 :> Get '[JSON] NegotiationDTO
6262
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs+1−1
@@ -58,7 +58,7 @@ type MarketplaceDealsDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] DeleteOrderDealsRequest :>
61+ ReqBody '[JSON] DeleteOrderDealsRequest :>
6262 Post '[JSON] DeleteOrderDealsResponse
6363
6464-- | Delete the specified deals from the order
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs+1−1
@@ -58,7 +58,7 @@ type MarketplaceDealsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] AddOrderDealsRequest :>
61+ ReqBody '[JSON] AddOrderDealsRequest :>
6262 Post '[JSON] AddOrderDealsResponse
6363
6464-- | Add new deals for the specified order
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs+1−1
@@ -58,7 +58,7 @@ type MarketplaceDealsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] EditAllOrderDealsRequest :>
61+ ReqBody '[JSON] EditAllOrderDealsRequest :>
6262 Post '[JSON] EditAllOrderDealsResponse
6363
6464-- | Replaces all the deals in the order with the passed in deals
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs+1−1
@@ -58,7 +58,7 @@ type MarketplaceNotesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] AddOrderNotesRequest :>
61+ ReqBody '[JSON] AddOrderNotesRequest :>
6262 Post '[JSON] AddOrderNotesResponse
6363
6464-- | Add notes to the order
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Insert.hs+1−1
@@ -55,7 +55,7 @@ type MarketplaceOrdersInsertResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] CreateOrdersRequest :>
58+ ReqBody '[JSON] CreateOrdersRequest :>
5959 Post '[JSON] CreateOrdersResponse
6060
6161-- | Create the given list of orders
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Patch.hs+1−1
@@ -62,7 +62,7 @@ type MarketplaceOrdersPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] MarketplaceOrder :>
65+ ReqBody '[JSON] MarketplaceOrder :>
6666 Patch '[JSON] MarketplaceOrder
6767
6868-- | Update the given order. This method supports patch semantics.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Update.hs+1−1
@@ -62,7 +62,7 @@ type MarketplaceOrdersUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] MarketplaceOrder :>
65+ ReqBody '[JSON] MarketplaceOrder :>
6666 Put '[JSON] MarketplaceOrder
6767
6868-- | Update the given order
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/NegotiationRounds/Insert.hs+1−1
@@ -57,7 +57,7 @@ type NegotiationRoundsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] NegotiationRoundDTO :>
60+ ReqBody '[JSON] NegotiationRoundDTO :>
6161 Post '[JSON] NegotiationRoundDTO
6262
6363-- | Adds the requested negotiationRound to the requested negotiation.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Get.hs+1−1
@@ -56,7 +56,7 @@ type NegotiationsGetResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] GetNegotiationByIdRequest :>
59+ ReqBody '[JSON] GetNegotiationByIdRequest :>
6060 Get '[JSON] NegotiationDTO
6161
6262-- | Gets the requested negotiation.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Insert.hs+1−1
@@ -54,7 +54,7 @@ type NegotiationsInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] NegotiationDTO :>
57+ ReqBody '[JSON] NegotiationDTO :>
5858 Post '[JSON] NegotiationDTO
5959
6060-- | Creates or updates the requested negotiation.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/List.hs+1−1
@@ -54,7 +54,7 @@ type NegotiationsListResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] GetNegotiationsRequest :>
57+ ReqBody '[JSON] GetNegotiationsRequest :>
5858 Get '[JSON] GetNegotiationsResponse
5959
6060-- | Lists all negotiations the authenticated user has access to.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/Insert.hs+1−2
@@ -54,8 +54,7 @@ type OffersInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] OfferDTO :>
58− Post '[JSON] OfferDTO
57+ ReqBody '[JSON] OfferDTO :> Post '[JSON] OfferDTO
5958
6059-- | Creates or updates the requested offer.
6160--
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/List.hs+1−1
@@ -54,7 +54,7 @@ type OffersListResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] ListOffersRequest :>
57+ ReqBody '[JSON] ListOffersRequest :>
5858 Get '[JSON] ListOffersResponse
5959
6060-- | Lists all offers the authenticated user has access to.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs+1−1
@@ -56,7 +56,7 @@ type PretargetingConfigInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] PretargetingConfig :>
59+ ReqBody '[JSON] PretargetingConfig :>
6060 Post '[JSON] PretargetingConfig
6161
6262-- | Inserts a new pretargeting configuration.
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs+1−1
@@ -59,7 +59,7 @@ type PretargetingConfigPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] PretargetingConfig :>
62+ ReqBody '[JSON] PretargetingConfig :>
6363 Patch '[JSON] PretargetingConfig
6464
6565-- | Updates an existing pretargeting config. This method supports patch
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs+1−1
@@ -58,7 +58,7 @@ type PretargetingConfigUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PretargetingConfig :>
61+ ReqBody '[JSON] PretargetingConfig :>
6262 Put '[JSON] PretargetingConfig
6363
6464-- | Updates an existing pretargeting config.
gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Transfers/Insert.hs+1−1
@@ -54,7 +54,7 @@ type TransfersInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] DataTransfer :>
57+ ReqBody '[JSON] DataTransfer :>
5858 Post '[JSON] DataTransfer
5959
6060-- | Inserts a data transfer request.
gogol-admin-directory/gen/Network/Google/Resource/Admin/Channels/Stop.hs+1−1
@@ -57,7 +57,7 @@ type ChannelsStopResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Channel :> Post '[JSON] ()
60+ ReqBody '[JSON] Channel :> Post '[JSON] ()
6161
6262-- | Stop watching resources through this channel
6363--
gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Patch.hs+1−1
@@ -64,7 +64,7 @@ type ChromeosDevicesPatchResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ChromeOSDevice :>
67+ ReqBody '[JSON] ChromeOSDevice :>
6868 Patch '[JSON] ChromeOSDevice
6969
7070-- | Update Chrome OS Device. This method supports patch semantics.
gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Update.hs+1−1
@@ -64,7 +64,7 @@ type ChromeosDevicesUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ChromeOSDevice :>
67+ ReqBody '[JSON] ChromeOSDevice :>
6868 Put '[JSON] ChromeOSDevice
6969
7070-- | Update Chrome OS Device
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/Insert.hs+1−1
@@ -57,7 +57,7 @@ type GroupsAliasesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Alias :> Post '[JSON] Alias
60+ ReqBody '[JSON] Alias :> Post '[JSON] Alias
6161
6262-- | Add a alias for the group
6363--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Insert.hs+1−1
@@ -54,7 +54,7 @@ type GroupsInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Group :> Post '[JSON] Group
57+ ReqBody '[JSON] Group :> Post '[JSON] Group
5858
5959-- | Create Group
6060--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Patch.hs+1−1
@@ -56,7 +56,7 @@ type GroupsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Group :> Patch '[JSON] Group
59+ ReqBody '[JSON] Group :> Patch '[JSON] Group
6060
6161-- | Update Group. This method supports patch semantics.
6262--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Update.hs+1−1
@@ -56,7 +56,7 @@ type GroupsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Group :> Put '[JSON] Group
59+ ReqBody '[JSON] Group :> Put '[JSON] Group
6060
6161-- | Update Group
6262--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Insert.hs+1−1
@@ -57,7 +57,7 @@ type MembersInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Member :> Post '[JSON] Member
60+ ReqBody '[JSON] Member :> Post '[JSON] Member
6161
6262-- | Add user to the specified group.
6363--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Patch.hs+1−1
@@ -60,7 +60,7 @@ type MembersPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Member :> Patch '[JSON] Member
63+ ReqBody '[JSON] Member :> Patch '[JSON] Member
6464
6565-- | Update membership of a user in the specified group. This method supports
6666-- patch semantics.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Update.hs+1−1
@@ -59,7 +59,7 @@ type MembersUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Member :> Put '[JSON] Member
62+ ReqBody '[JSON] Member :> Put '[JSON] Member
6363
6464-- | Update membership of a user in the specified group.
6565--
gogol-admin-directory/gen/Network/Google/Resource/Directory/MobileDevices/Action.hs+1−1
@@ -61,7 +61,7 @@ type MobileDevicesActionResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] MobileDeviceAction :>
64+ ReqBody '[JSON] MobileDeviceAction :>
6565 Post '[JSON] ()
6666
6767-- | Take action on Mobile Device
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Patch.hs+1−1
@@ -59,7 +59,7 @@ type NotificationsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Notification :>
62+ ReqBody '[JSON] Notification :>
6363 Patch '[JSON] Notification
6464
6565-- | Updates a notification. This method supports patch semantics.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Update.hs+1−1
@@ -59,7 +59,7 @@ type NotificationsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Notification :>
62+ ReqBody '[JSON] Notification :>
6363 Put '[JSON] Notification
6464
6565-- | Updates a notification.
gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Insert.hs+1−2
@@ -57,8 +57,7 @@ type OrgUnitsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] OrgUnit :>
61− Post '[JSON] OrgUnit
60+ ReqBody '[JSON] OrgUnit :> Post '[JSON] OrgUnit
6261
6362-- | Add Organization Unit
6463--
gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Patch.hs+1−2
@@ -59,8 +59,7 @@ type OrgUnitsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrgUnit :>
63− Patch '[JSON] OrgUnit
62+ ReqBody '[JSON] OrgUnit :> Patch '[JSON] OrgUnit
6463
6564-- | Update Organization Unit. This method supports patch semantics.
6665--
gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Update.hs+1−1
@@ -59,7 +59,7 @@ type OrgUnitsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrgUnit :> Put '[JSON] OrgUnit
62+ ReqBody '[JSON] OrgUnit :> Put '[JSON] OrgUnit
6363
6464-- | Update Organization Unit
6565--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Insert.hs+1−1
@@ -57,7 +57,7 @@ type SchemasInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Schema :> Post '[JSON] Schema
60+ ReqBody '[JSON] Schema :> Post '[JSON] Schema
6161
6262-- | Create schema.
6363--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Patch.hs+1−1
@@ -59,7 +59,7 @@ type SchemasPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Schema :> Patch '[JSON] Schema
62+ ReqBody '[JSON] Schema :> Patch '[JSON] Schema
6363
6464-- | Update schema. This method supports patch semantics.
6565--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Update.hs+1−1
@@ -59,7 +59,7 @@ type SchemasUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Schema :> Put '[JSON] Schema
62+ ReqBody '[JSON] Schema :> Put '[JSON] Schema
6363
6464-- | Update schema
6565--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Insert.hs+1−1
@@ -57,7 +57,7 @@ type UsersAliasesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Alias :> Post '[JSON] Alias
60+ ReqBody '[JSON] Alias :> Post '[JSON] Alias
6161
6262-- | Add a alias for the user
6363--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Watch.hs+1−2
@@ -60,8 +60,7 @@ type UsersAliasesWatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Channel :>
64− Post '[JSON] Channel
63+ ReqBody '[JSON] Channel :> Post '[JSON] Channel
6564
6665-- | Watch for changes in user aliases list
6766--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Insert.hs+1−1
@@ -54,7 +54,7 @@ type UsersInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] User :> Post '[JSON] User
57+ ReqBody '[JSON] User :> Post '[JSON] User
5858
5959-- | create user.
6060--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/MakeAdmin.hs+1−2
@@ -57,8 +57,7 @@ type UsersMakeAdminResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] UserMakeAdmin :>
61− Post '[JSON] ()
60+ ReqBody '[JSON] UserMakeAdmin :> Post '[JSON] ()
6261
6362-- | change admin status of a user
6463--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Patch.hs+1−1
@@ -56,7 +56,7 @@ type UsersPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] User :> Patch '[JSON] User
59+ ReqBody '[JSON] User :> Patch '[JSON] User
6060
6161-- | update user. This method supports patch semantics.
6262--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Patch.hs+1−2
@@ -58,8 +58,7 @@ type UsersPhotosPatchResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] UserPhoto :>
62− Patch '[JSON] UserPhoto
61+ ReqBody '[JSON] UserPhoto :> Patch '[JSON] UserPhoto
6362
6463-- | Add a photo for the user. This method supports patch semantics.
6564--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Update.hs+1−2
@@ -58,8 +58,7 @@ type UsersPhotosUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] UserPhoto :>
62− Put '[JSON] UserPhoto
61+ ReqBody '[JSON] UserPhoto :> Put '[JSON] UserPhoto
6362
6463-- | Add a photo for the user
6564--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Undelete.hs+1−2
@@ -57,8 +57,7 @@ type UsersUndeleteResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] UserUndelete :>
61− Post '[JSON] ()
60+ ReqBody '[JSON] UserUndelete :> Post '[JSON] ()
6261
6362-- | Undelete a deleted user
6463--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Update.hs+1−1
@@ -56,7 +56,7 @@ type UsersUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] User :> Put '[JSON] User
59+ ReqBody '[JSON] User :> Put '[JSON] User
6060
6161-- | update user
6262--
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Watch.hs+1−1
@@ -80,7 +80,7 @@ type UsersWatchResource =
8080 QueryParam "oauth_token" OAuthToken
8181 :>
8282 QueryParam "alt" AltJSON :>
83− ReqBody '[OctetStream] Channel :>
83+ ReqBody '[JSON] Channel :>
8484 Post '[JSON] Channel
8585
8686-- | Watch for changes in users list
gogol-admin-reports/gen/Network/Google/Resource/Admin/Channels/Stop.hs+1−1
@@ -57,7 +57,7 @@ type ChannelsStopResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Channel :> Post '[JSON] ()
60+ ReqBody '[JSON] Channel :> Post '[JSON] ()
6161
6262-- | Stop watching resources through this channel
6363--
gogol-admin-reports/gen/Network/Google/Resource/Reports/Activities/Watch.hs+1−1
@@ -78,7 +78,7 @@ type ActivitiesWatchResource =
7878 QueryParam "oauth_token" OAuthToken
7979 :>
8080 QueryParam "alt" AltJSON :>
81− ReqBody '[OctetStream] Channel :>
81+ ReqBody '[JSON] Channel :>
8282 Post '[JSON] Channel
8383
8484-- | Push changes to activities
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs+1−2
@@ -61,8 +61,7 @@ type AccountsAdUnitsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] AdUnit :>
65− Post '[JSON] AdUnit
64+ ReqBody '[JSON] AdUnit :> Post '[JSON] AdUnit
6665
6766-- | Insert the supplied ad unit into the specified publisher AdSense
6867-- account.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs+1−2
@@ -63,8 +63,7 @@ type AccountsAdUnitsPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] AdUnit :>
67− Patch '[JSON] AdUnit
66+ ReqBody '[JSON] AdUnit :> Patch '[JSON] AdUnit
6867
6968-- | Update the supplied ad unit in the specified publisher AdSense account.
7069-- This method supports patch semantics.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs+1−1
@@ -60,7 +60,7 @@ type AccountsAdUnitsUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] AdUnit :> Put '[JSON] AdUnit
63+ ReqBody '[JSON] AdUnit :> Put '[JSON] AdUnit
6464
6565-- | Update the supplied ad unit in the specified publisher AdSense account.
6666--
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs+1−1
@@ -57,7 +57,7 @@ type CustomChannelsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CustomChannel :>
60+ ReqBody '[JSON] CustomChannel :>
6161 Post '[JSON] CustomChannel
6262
6363-- | Add a new custom channel to the host AdSense account.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs+1−1
@@ -60,7 +60,7 @@ type CustomChannelsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CustomChannel :>
63+ ReqBody '[JSON] CustomChannel :>
6464 Patch '[JSON] CustomChannel
6565
6666-- | Update a custom channel in the host AdSense account. This method
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs+1−1
@@ -57,7 +57,7 @@ type CustomChannelsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CustomChannel :>
60+ ReqBody '[JSON] CustomChannel :>
6161 Put '[JSON] CustomChannel
6262
6363-- | Update a custom channel in the host AdSense account.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs+1−2
@@ -57,8 +57,7 @@ type URLChannelsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] URLChannel :>
61− Post '[JSON] URLChannel
60+ ReqBody '[JSON] URLChannel :> Post '[JSON] URLChannel
6261
6362-- | Add a new URL channel to the host AdSense account.
6463--
gogol-affiliates/gen/Network/Google/Resource/GAN/Links/Insert.hs+1−1
@@ -58,7 +58,7 @@ type LinksInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Link :> Post '[JSON] Link
61+ ReqBody '[JSON] Link :> Post '[JSON] Link
6262
6363-- | Inserts a new link.
6464--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Insert.hs+1−1
@@ -58,7 +58,7 @@ type ManagementAccountUserLinksInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] EntityUserLink :>
61+ ReqBody '[JSON] EntityUserLink :>
6262 Post '[JSON] EntityUserLink
6363
6464-- | Adds a new user to the given account.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Update.hs+1−1
@@ -60,7 +60,7 @@ type ManagementAccountUserLinksUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] EntityUserLink :>
63+ ReqBody '[JSON] EntityUserLink :>
6464 Put '[JSON] EntityUserLink
6565
6666-- | Updates permissions for an existing user on the given account.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Insert.hs+1−1
@@ -61,7 +61,7 @@ type ManagementCustomDimensionsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] CustomDimension :>
64+ ReqBody '[JSON] CustomDimension :>
6565 Post '[JSON] CustomDimension
6666
6767-- | Create a new custom dimension.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Patch.hs+1−1
@@ -66,7 +66,7 @@ type ManagementCustomDimensionsPatchResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] CustomDimension :>
69+ ReqBody '[JSON] CustomDimension :>
7070 Patch '[JSON] CustomDimension
7171
7272-- | Updates an existing custom dimension. This method supports patch
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Update.hs+1−1
@@ -65,7 +65,7 @@ type ManagementCustomDimensionsUpdateResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] CustomDimension :>
68+ ReqBody '[JSON] CustomDimension :>
6969 Put '[JSON] CustomDimension
7070
7171-- | Updates an existing custom dimension.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Insert.hs+1−1
@@ -61,7 +61,7 @@ type ManagementCustomMetricsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] CustomMetric :>
64+ ReqBody '[JSON] CustomMetric :>
6565 Post '[JSON] CustomMetric
6666
6767-- | Create a new custom metric.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Patch.hs+1−1
@@ -65,7 +65,7 @@ type ManagementCustomMetricsPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] CustomMetric :>
68+ ReqBody '[JSON] CustomMetric :>
6969 Patch '[JSON] CustomMetric
7070
7171-- | Updates an existing custom metric. This method supports patch semantics.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Update.hs+1−1
@@ -65,7 +65,7 @@ type ManagementCustomMetricsUpdateResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] CustomMetric :>
68+ ReqBody '[JSON] CustomMetric :>
6969 Put '[JSON] CustomMetric
7070
7171-- | Updates an existing custom metric.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Insert.hs+1−1
@@ -64,7 +64,7 @@ type ManagementExperimentsInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Experiment :>
67+ ReqBody '[JSON] Experiment :>
6868 Post '[JSON] Experiment
6969
7070-- | Create a new experiment.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Patch.hs+1−1
@@ -66,7 +66,7 @@ type ManagementExperimentsPatchResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] Experiment :>
69+ ReqBody '[JSON] Experiment :>
7070 Patch '[JSON] Experiment
7171
7272-- | Update an existing experiment. This method supports patch semantics.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Update.hs+1−1
@@ -66,7 +66,7 @@ type ManagementExperimentsUpdateResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] Experiment :>
69+ ReqBody '[JSON] Experiment :>
7070 Put '[JSON] Experiment
7171
7272-- | Update an existing experiment.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Insert.hs+1−1
@@ -58,7 +58,7 @@ type ManagementFiltersInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Filter :> Post '[JSON] Filter
61+ ReqBody '[JSON] Filter :> Post '[JSON] Filter
6262
6363-- | Create a new filter.
6464--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Patch.hs+1−2
@@ -60,8 +60,7 @@ type ManagementFiltersPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Filter :>
64− Patch '[JSON] Filter
63+ ReqBody '[JSON] Filter :> Patch '[JSON] Filter
6564
6665-- | Updates an existing filter. This method supports patch semantics.
6766--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Update.hs+1−1
@@ -60,7 +60,7 @@ type ManagementFiltersUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Filter :> Put '[JSON] Filter
63+ ReqBody '[JSON] Filter :> Put '[JSON] Filter
6464
6565-- | Updates an existing filter.
6666--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Insert.hs+1−2
@@ -64,8 +64,7 @@ type ManagementGoalsInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Goal :>
68− Post '[JSON] Goal
67+ ReqBody '[JSON] Goal :> Post '[JSON] Goal
6968
7069-- | Create a new goal.
7170--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Patch.hs+1−2
@@ -67,8 +67,7 @@ type ManagementGoalsPatchResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Goal :>
71− Patch '[JSON] Goal
70+ ReqBody '[JSON] Goal :> Patch '[JSON] Goal
7271
7372-- | Updates an existing view (profile). This method supports patch
7473-- semantics.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Update.hs+1−2
@@ -66,8 +66,7 @@ type ManagementGoalsUpdateResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] Goal :>
70− Put '[JSON] Goal
69+ ReqBody '[JSON] Goal :> Put '[JSON] Goal
7170
7271-- | Updates an existing view (profile).
7372--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Insert.hs+1−1
@@ -64,7 +64,7 @@ type ManagementProFileFilterLinksInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ProFileFilterLink :>
67+ ReqBody '[JSON] ProFileFilterLink :>
6868 Post '[JSON] ProFileFilterLink
6969
7070-- | Create a new profile filter link.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Patch.hs+1−1
@@ -67,7 +67,7 @@ type ManagementProFileFilterLinksPatchResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] ProFileFilterLink :>
70+ ReqBody '[JSON] ProFileFilterLink :>
7171 Patch '[JSON] ProFileFilterLink
7272
7373-- | Update an existing profile filter link. This method supports patch
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Update.hs+1−1
@@ -66,7 +66,7 @@ type ManagementProFileFilterLinksUpdateResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] ProFileFilterLink :>
69+ ReqBody '[JSON] ProFileFilterLink :>
7070 Put '[JSON] ProFileFilterLink
7171
7272-- | Update an existing profile filter link.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Insert.hs+1−1
@@ -64,7 +64,7 @@ type ManagementProFileUserLinksInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] EntityUserLink :>
67+ ReqBody '[JSON] EntityUserLink :>
6868 Post '[JSON] EntityUserLink
6969
7070-- | Adds a new user to the given view (profile).
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Update.hs+1−1
@@ -66,7 +66,7 @@ type ManagementProFileUserLinksUpdateResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] EntityUserLink :>
69+ ReqBody '[JSON] EntityUserLink :>
7070 Put '[JSON] EntityUserLink
7171
7272-- | Updates permissions for an existing user on the given view (profile).
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Insert.hs+1−2
@@ -61,8 +61,7 @@ type ManagementProFilesInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] ProFile :>
65− Post '[JSON] ProFile
64+ ReqBody '[JSON] ProFile :> Post '[JSON] ProFile
6665
6766-- | Create a new view (profile).
6867--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Patch.hs+1−1
@@ -64,7 +64,7 @@ type ManagementProFilesPatchResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ProFile :>
67+ ReqBody '[JSON] ProFile :>
6868 Patch '[JSON] ProFile
6969
7070-- | Updates an existing view (profile). This method supports patch
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Update.hs+1−2
@@ -63,8 +63,7 @@ type ManagementProFilesUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] ProFile :>
67− Put '[JSON] ProFile
66+ ReqBody '[JSON] ProFile :> Put '[JSON] ProFile
6867
6968-- | Updates an existing view (profile).
7069--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Delete.hsdeleted−214
@@ -1,214 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Delete
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Delete a profile filter link.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksDelete@.
24−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Delete
25− (
26− -- * REST Resource
27− ManagementProfileFilterLinksDeleteResource
28−
29− -- * Creating a Request
30− , managementProfileFilterLinksDelete'
31− , ManagementProfileFilterLinksDelete'
32−
33− -- * Request Lenses
34− , mpfldQuotaUser
35− , mpfldPrettyPrint
36− , mpfldWebPropertyId
37− , mpfldUserIP
38− , mpfldProfileId
39− , mpfldAccountId
40− , mpfldKey
41− , mpfldLinkId
42− , mpfldOAuthToken
43− , mpfldFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfileFilterLinksDelete@ which the
50−-- 'ManagementProfileFilterLinksDelete'' request conforms to.
51−type ManagementProfileFilterLinksDeleteResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "profileFilterLinks" :>
60− Capture "linkId" Text :>
61− QueryParam "quotaUser" Text :>
62− QueryParam "prettyPrint" Bool :>
63− QueryParam "userIp" Text :>
64− QueryParam "fields" Text :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "alt" AltJSON :> Delete '[JSON] ()
68−
69−-- | Delete a profile filter link.
70−--
71−-- /See:/ 'managementProfileFilterLinksDelete'' smart constructor.
72−data ManagementProfileFilterLinksDelete' = ManagementProfileFilterLinksDelete'
73− { _mpfldQuotaUser :: !(Maybe Text)
74− , _mpfldPrettyPrint :: !Bool
75− , _mpfldWebPropertyId :: !Text
76− , _mpfldUserIP :: !(Maybe Text)
77− , _mpfldProfileId :: !Text
78− , _mpfldAccountId :: !Text
79− , _mpfldKey :: !(Maybe Key)
80− , _mpfldLinkId :: !Text
81− , _mpfldOAuthToken :: !(Maybe OAuthToken)
82− , _mpfldFields :: !(Maybe Text)
83− } deriving (Eq,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'ManagementProfileFilterLinksDelete'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'mpfldQuotaUser'
90−--
91−-- * 'mpfldPrettyPrint'
92−--
93−-- * 'mpfldWebPropertyId'
94−--
95−-- * 'mpfldUserIP'
96−--
97−-- * 'mpfldProfileId'
98−--
99−-- * 'mpfldAccountId'
100−--
101−-- * 'mpfldKey'
102−--
103−-- * 'mpfldLinkId'
104−--
105−-- * 'mpfldOAuthToken'
106−--
107−-- * 'mpfldFields'
108−managementProfileFilterLinksDelete'
109− :: Text -- ^ 'webPropertyId'
110− -> Text -- ^ 'profileId'
111− -> Text -- ^ 'accountId'
112− -> Text -- ^ 'linkId'
113− -> ManagementProfileFilterLinksDelete'
114−managementProfileFilterLinksDelete' pMpfldWebPropertyId_ pMpfldProfileId_ pMpfldAccountId_ pMpfldLinkId_ =
115− ManagementProfileFilterLinksDelete'
116− { _mpfldQuotaUser = Nothing
117− , _mpfldPrettyPrint = False
118− , _mpfldWebPropertyId = pMpfldWebPropertyId_
119− , _mpfldUserIP = Nothing
120− , _mpfldProfileId = pMpfldProfileId_
121− , _mpfldAccountId = pMpfldAccountId_
122− , _mpfldKey = Nothing
123− , _mpfldLinkId = pMpfldLinkId_
124− , _mpfldOAuthToken = Nothing
125− , _mpfldFields = Nothing
126− }
127−
128−-- | Available to use for quota purposes for server-side applications. Can be
129−-- any arbitrary string assigned to a user, but should not exceed 40
130−-- characters. Overrides userIp if both are provided.
131−mpfldQuotaUser :: Lens' ManagementProfileFilterLinksDelete' (Maybe Text)
132−mpfldQuotaUser
133− = lens _mpfldQuotaUser
134− (\ s a -> s{_mpfldQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−mpfldPrettyPrint :: Lens' ManagementProfileFilterLinksDelete' Bool
138−mpfldPrettyPrint
139− = lens _mpfldPrettyPrint
140− (\ s a -> s{_mpfldPrettyPrint = a})
141−
142−-- | Web property Id to which the profile filter link belongs.
143−mpfldWebPropertyId :: Lens' ManagementProfileFilterLinksDelete' Text
144−mpfldWebPropertyId
145− = lens _mpfldWebPropertyId
146− (\ s a -> s{_mpfldWebPropertyId = a})
147−
148−-- | IP address of the site where the request originates. Use this if you
149−-- want to enforce per-user limits.
150−mpfldUserIP :: Lens' ManagementProfileFilterLinksDelete' (Maybe Text)
151−mpfldUserIP
152− = lens _mpfldUserIP (\ s a -> s{_mpfldUserIP = a})
153−
154−-- | Profile ID to which the filter link belongs.
155−mpfldProfileId :: Lens' ManagementProfileFilterLinksDelete' Text
156−mpfldProfileId
157− = lens _mpfldProfileId
158− (\ s a -> s{_mpfldProfileId = a})
159−
160−-- | Account ID to which the profile filter link belongs.
161−mpfldAccountId :: Lens' ManagementProfileFilterLinksDelete' Text
162−mpfldAccountId
163− = lens _mpfldAccountId
164− (\ s a -> s{_mpfldAccountId = a})
165−
166−-- | API key. Your API key identifies your project and provides you with API
167−-- access, quota, and reports. Required unless you provide an OAuth 2.0
168−-- token.
169−mpfldKey :: Lens' ManagementProfileFilterLinksDelete' (Maybe Key)
170−mpfldKey = lens _mpfldKey (\ s a -> s{_mpfldKey = a})
171−
172−-- | ID of the profile filter link to delete.
173−mpfldLinkId :: Lens' ManagementProfileFilterLinksDelete' Text
174−mpfldLinkId
175− = lens _mpfldLinkId (\ s a -> s{_mpfldLinkId = a})
176−
177−-- | OAuth 2.0 token for the current user.
178−mpfldOAuthToken :: Lens' ManagementProfileFilterLinksDelete' (Maybe OAuthToken)
179−mpfldOAuthToken
180− = lens _mpfldOAuthToken
181− (\ s a -> s{_mpfldOAuthToken = a})
182−
183−-- | Selector specifying which fields to include in a partial response.
184−mpfldFields :: Lens' ManagementProfileFilterLinksDelete' (Maybe Text)
185−mpfldFields
186− = lens _mpfldFields (\ s a -> s{_mpfldFields = a})
187−
188−instance GoogleAuth
189− ManagementProfileFilterLinksDelete' where
190− authKey = mpfldKey . _Just
191− authToken = mpfldOAuthToken . _Just
192−
193−instance GoogleRequest
194− ManagementProfileFilterLinksDelete' where
195− type Rs ManagementProfileFilterLinksDelete' = ()
196− request = requestWithRoute defReq analyticsURL
197− requestWithRoute r u
198− ManagementProfileFilterLinksDelete'{..}
199− = go _mpfldAccountId _mpfldWebPropertyId
200− _mpfldProfileId
201− _mpfldLinkId
202− _mpfldQuotaUser
203− (Just _mpfldPrettyPrint)
204− _mpfldUserIP
205− _mpfldFields
206− _mpfldKey
207− _mpfldOAuthToken
208− (Just AltJSON)
209− where go
210− = clientWithRoute
211− (Proxy ::
212− Proxy ManagementProfileFilterLinksDeleteResource)
213− r
214− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Get.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Returns a single profile filter link.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksGet@.
24−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Get
25− (
26− -- * REST Resource
27− ManagementProfileFilterLinksGetResource
28−
29− -- * Creating a Request
30− , managementProfileFilterLinksGet'
31− , ManagementProfileFilterLinksGet'
32−
33− -- * Request Lenses
34− , mpflgQuotaUser
35− , mpflgPrettyPrint
36− , mpflgWebPropertyId
37− , mpflgUserIP
38− , mpflgProfileId
39− , mpflgAccountId
40− , mpflgKey
41− , mpflgLinkId
42− , mpflgOAuthToken
43− , mpflgFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfileFilterLinksGet@ which the
50−-- 'ManagementProfileFilterLinksGet'' request conforms to.
51−type ManagementProfileFilterLinksGetResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "profileFilterLinks" :>
60− Capture "linkId" Text :>
61− QueryParam "quotaUser" Text :>
62− QueryParam "prettyPrint" Bool :>
63− QueryParam "userIp" Text :>
64− QueryParam "fields" Text :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "alt" AltJSON :>
68− Get '[JSON] ProfileFilterLink
69−
70−-- | Returns a single profile filter link.
71−--
72−-- /See:/ 'managementProfileFilterLinksGet'' smart constructor.
73−data ManagementProfileFilterLinksGet' = ManagementProfileFilterLinksGet'
74− { _mpflgQuotaUser :: !(Maybe Text)
75− , _mpflgPrettyPrint :: !Bool
76− , _mpflgWebPropertyId :: !Text
77− , _mpflgUserIP :: !(Maybe Text)
78− , _mpflgProfileId :: !Text
79− , _mpflgAccountId :: !Text
80− , _mpflgKey :: !(Maybe Key)
81− , _mpflgLinkId :: !Text
82− , _mpflgOAuthToken :: !(Maybe OAuthToken)
83− , _mpflgFields :: !(Maybe Text)
84− } deriving (Eq,Show,Data,Typeable,Generic)
85−
86−-- | Creates a value of 'ManagementProfileFilterLinksGet'' with the minimum fields required to make a request.
87−--
88−-- Use one of the following lenses to modify other fields as desired:
89−--
90−-- * 'mpflgQuotaUser'
91−--
92−-- * 'mpflgPrettyPrint'
93−--
94−-- * 'mpflgWebPropertyId'
95−--
96−-- * 'mpflgUserIP'
97−--
98−-- * 'mpflgProfileId'
99−--
100−-- * 'mpflgAccountId'
101−--
102−-- * 'mpflgKey'
103−--
104−-- * 'mpflgLinkId'
105−--
106−-- * 'mpflgOAuthToken'
107−--
108−-- * 'mpflgFields'
109−managementProfileFilterLinksGet'
110− :: Text -- ^ 'webPropertyId'
111− -> Text -- ^ 'profileId'
112− -> Text -- ^ 'accountId'
113− -> Text -- ^ 'linkId'
114− -> ManagementProfileFilterLinksGet'
115−managementProfileFilterLinksGet' pMpflgWebPropertyId_ pMpflgProfileId_ pMpflgAccountId_ pMpflgLinkId_ =
116− ManagementProfileFilterLinksGet'
117− { _mpflgQuotaUser = Nothing
118− , _mpflgPrettyPrint = False
119− , _mpflgWebPropertyId = pMpflgWebPropertyId_
120− , _mpflgUserIP = Nothing
121− , _mpflgProfileId = pMpflgProfileId_
122− , _mpflgAccountId = pMpflgAccountId_
123− , _mpflgKey = Nothing
124− , _mpflgLinkId = pMpflgLinkId_
125− , _mpflgOAuthToken = Nothing
126− , _mpflgFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−mpflgQuotaUser :: Lens' ManagementProfileFilterLinksGet' (Maybe Text)
133−mpflgQuotaUser
134− = lens _mpflgQuotaUser
135− (\ s a -> s{_mpflgQuotaUser = a})
136−
137−-- | Returns response with indentations and line breaks.
138−mpflgPrettyPrint :: Lens' ManagementProfileFilterLinksGet' Bool
139−mpflgPrettyPrint
140− = lens _mpflgPrettyPrint
141− (\ s a -> s{_mpflgPrettyPrint = a})
142−
143−-- | Web property Id to retrieve profile filter link for.
144−mpflgWebPropertyId :: Lens' ManagementProfileFilterLinksGet' Text
145−mpflgWebPropertyId
146− = lens _mpflgWebPropertyId
147− (\ s a -> s{_mpflgWebPropertyId = a})
148−
149−-- | IP address of the site where the request originates. Use this if you
150−-- want to enforce per-user limits.
151−mpflgUserIP :: Lens' ManagementProfileFilterLinksGet' (Maybe Text)
152−mpflgUserIP
153− = lens _mpflgUserIP (\ s a -> s{_mpflgUserIP = a})
154−
155−-- | Profile ID to retrieve filter link for.
156−mpflgProfileId :: Lens' ManagementProfileFilterLinksGet' Text
157−mpflgProfileId
158− = lens _mpflgProfileId
159− (\ s a -> s{_mpflgProfileId = a})
160−
161−-- | Account ID to retrieve profile filter link for.
162−mpflgAccountId :: Lens' ManagementProfileFilterLinksGet' Text
163−mpflgAccountId
164− = lens _mpflgAccountId
165− (\ s a -> s{_mpflgAccountId = a})
166−
167−-- | API key. Your API key identifies your project and provides you with API
168−-- access, quota, and reports. Required unless you provide an OAuth 2.0
169−-- token.
170−mpflgKey :: Lens' ManagementProfileFilterLinksGet' (Maybe Key)
171−mpflgKey = lens _mpflgKey (\ s a -> s{_mpflgKey = a})
172−
173−-- | ID of the profile filter link.
174−mpflgLinkId :: Lens' ManagementProfileFilterLinksGet' Text
175−mpflgLinkId
176− = lens _mpflgLinkId (\ s a -> s{_mpflgLinkId = a})
177−
178−-- | OAuth 2.0 token for the current user.
179−mpflgOAuthToken :: Lens' ManagementProfileFilterLinksGet' (Maybe OAuthToken)
180−mpflgOAuthToken
181− = lens _mpflgOAuthToken
182− (\ s a -> s{_mpflgOAuthToken = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−mpflgFields :: Lens' ManagementProfileFilterLinksGet' (Maybe Text)
186−mpflgFields
187− = lens _mpflgFields (\ s a -> s{_mpflgFields = a})
188−
189−instance GoogleAuth ManagementProfileFilterLinksGet'
190− where
191− authKey = mpflgKey . _Just
192− authToken = mpflgOAuthToken . _Just
193−
194−instance GoogleRequest
195− ManagementProfileFilterLinksGet' where
196− type Rs ManagementProfileFilterLinksGet' =
197− ProfileFilterLink
198− request = requestWithRoute defReq analyticsURL
199− requestWithRoute r u
200− ManagementProfileFilterLinksGet'{..}
201− = go _mpflgAccountId _mpflgWebPropertyId
202− _mpflgProfileId
203− _mpflgLinkId
204− _mpflgQuotaUser
205− (Just _mpflgPrettyPrint)
206− _mpflgUserIP
207− _mpflgFields
208− _mpflgKey
209− _mpflgOAuthToken
210− (Just AltJSON)
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy ManagementProfileFilterLinksGetResource)
215− r
216− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Insert.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Insert
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Create a new profile filter link.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksInsert@.
24−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Insert
25− (
26− -- * REST Resource
27− ManagementProfileFilterLinksInsertResource
28−
29− -- * Creating a Request
30− , managementProfileFilterLinksInsert'
31− , ManagementProfileFilterLinksInsert'
32−
33− -- * Request Lenses
34− , mpfliQuotaUser
35− , mpfliPrettyPrint
36− , mpfliWebPropertyId
37− , mpfliUserIP
38− , mpfliProfileId
39− , mpfliPayload
40− , mpfliAccountId
41− , mpfliKey
42− , mpfliOAuthToken
43− , mpfliFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfileFilterLinksInsert@ which the
50−-- 'ManagementProfileFilterLinksInsert'' request conforms to.
51−type ManagementProfileFilterLinksInsertResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "profileFilterLinks" :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "fields" Text :>
64− QueryParam "key" Key :>
65− QueryParam "oauth_token" OAuthToken :>
66− QueryParam "alt" AltJSON :>
67− ReqBody '[JSON] ProfileFilterLink :>
68− Post '[JSON] ProfileFilterLink
69−
70−-- | Create a new profile filter link.
71−--
72−-- /See:/ 'managementProfileFilterLinksInsert'' smart constructor.
73−data ManagementProfileFilterLinksInsert' = ManagementProfileFilterLinksInsert'
74− { _mpfliQuotaUser :: !(Maybe Text)
75− , _mpfliPrettyPrint :: !Bool
76− , _mpfliWebPropertyId :: !Text
77− , _mpfliUserIP :: !(Maybe Text)
78− , _mpfliProfileId :: !Text
79− , _mpfliPayload :: !ProfileFilterLink
80− , _mpfliAccountId :: !Text
81− , _mpfliKey :: !(Maybe Key)
82− , _mpfliOAuthToken :: !(Maybe OAuthToken)
83− , _mpfliFields :: !(Maybe Text)
84− } deriving (Eq,Show,Data,Typeable,Generic)
85−
86−-- | Creates a value of 'ManagementProfileFilterLinksInsert'' with the minimum fields required to make a request.
87−--
88−-- Use one of the following lenses to modify other fields as desired:
89−--
90−-- * 'mpfliQuotaUser'
91−--
92−-- * 'mpfliPrettyPrint'
93−--
94−-- * 'mpfliWebPropertyId'
95−--
96−-- * 'mpfliUserIP'
97−--
98−-- * 'mpfliProfileId'
99−--
100−-- * 'mpfliPayload'
101−--
102−-- * 'mpfliAccountId'
103−--
104−-- * 'mpfliKey'
105−--
106−-- * 'mpfliOAuthToken'
107−--
108−-- * 'mpfliFields'
109−managementProfileFilterLinksInsert'
110− :: Text -- ^ 'webPropertyId'
111− -> Text -- ^ 'profileId'
112− -> ProfileFilterLink -- ^ 'payload'
113− -> Text -- ^ 'accountId'
114− -> ManagementProfileFilterLinksInsert'
115−managementProfileFilterLinksInsert' pMpfliWebPropertyId_ pMpfliProfileId_ pMpfliPayload_ pMpfliAccountId_ =
116− ManagementProfileFilterLinksInsert'
117− { _mpfliQuotaUser = Nothing
118− , _mpfliPrettyPrint = False
119− , _mpfliWebPropertyId = pMpfliWebPropertyId_
120− , _mpfliUserIP = Nothing
121− , _mpfliProfileId = pMpfliProfileId_
122− , _mpfliPayload = pMpfliPayload_
123− , _mpfliAccountId = pMpfliAccountId_
124− , _mpfliKey = Nothing
125− , _mpfliOAuthToken = Nothing
126− , _mpfliFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−mpfliQuotaUser :: Lens' ManagementProfileFilterLinksInsert' (Maybe Text)
133−mpfliQuotaUser
134− = lens _mpfliQuotaUser
135− (\ s a -> s{_mpfliQuotaUser = a})
136−
137−-- | Returns response with indentations and line breaks.
138−mpfliPrettyPrint :: Lens' ManagementProfileFilterLinksInsert' Bool
139−mpfliPrettyPrint
140− = lens _mpfliPrettyPrint
141− (\ s a -> s{_mpfliPrettyPrint = a})
142−
143−-- | Web property Id to create profile filter link for.
144−mpfliWebPropertyId :: Lens' ManagementProfileFilterLinksInsert' Text
145−mpfliWebPropertyId
146− = lens _mpfliWebPropertyId
147− (\ s a -> s{_mpfliWebPropertyId = a})
148−
149−-- | IP address of the site where the request originates. Use this if you
150−-- want to enforce per-user limits.
151−mpfliUserIP :: Lens' ManagementProfileFilterLinksInsert' (Maybe Text)
152−mpfliUserIP
153− = lens _mpfliUserIP (\ s a -> s{_mpfliUserIP = a})
154−
155−-- | Profile ID to create filter link for.
156−mpfliProfileId :: Lens' ManagementProfileFilterLinksInsert' Text
157−mpfliProfileId
158− = lens _mpfliProfileId
159− (\ s a -> s{_mpfliProfileId = a})
160−
161−-- | Multipart request metadata.
162−mpfliPayload :: Lens' ManagementProfileFilterLinksInsert' ProfileFilterLink
163−mpfliPayload
164− = lens _mpfliPayload (\ s a -> s{_mpfliPayload = a})
165−
166−-- | Account ID to create profile filter link for.
167−mpfliAccountId :: Lens' ManagementProfileFilterLinksInsert' Text
168−mpfliAccountId
169− = lens _mpfliAccountId
170− (\ s a -> s{_mpfliAccountId = a})
171−
172−-- | API key. Your API key identifies your project and provides you with API
173−-- access, quota, and reports. Required unless you provide an OAuth 2.0
174−-- token.
175−mpfliKey :: Lens' ManagementProfileFilterLinksInsert' (Maybe Key)
176−mpfliKey = lens _mpfliKey (\ s a -> s{_mpfliKey = a})
177−
178−-- | OAuth 2.0 token for the current user.
179−mpfliOAuthToken :: Lens' ManagementProfileFilterLinksInsert' (Maybe OAuthToken)
180−mpfliOAuthToken
181− = lens _mpfliOAuthToken
182− (\ s a -> s{_mpfliOAuthToken = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−mpfliFields :: Lens' ManagementProfileFilterLinksInsert' (Maybe Text)
186−mpfliFields
187− = lens _mpfliFields (\ s a -> s{_mpfliFields = a})
188−
189−instance GoogleAuth
190− ManagementProfileFilterLinksInsert' where
191− authKey = mpfliKey . _Just
192− authToken = mpfliOAuthToken . _Just
193−
194−instance GoogleRequest
195− ManagementProfileFilterLinksInsert' where
196− type Rs ManagementProfileFilterLinksInsert' =
197− ProfileFilterLink
198− request = requestWithRoute defReq analyticsURL
199− requestWithRoute r u
200− ManagementProfileFilterLinksInsert'{..}
201− = go _mpfliAccountId _mpfliWebPropertyId
202− _mpfliProfileId
203− _mpfliQuotaUser
204− (Just _mpfliPrettyPrint)
205− _mpfliUserIP
206− _mpfliFields
207− _mpfliKey
208− _mpfliOAuthToken
209− (Just AltJSON)
210− _mpfliPayload
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy ManagementProfileFilterLinksInsertResource)
215− r
216− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/List.hsdeleted−234
@@ -1,234 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Lists all profile filter links for a profile.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksList@.
24−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.List
25− (
26− -- * REST Resource
27− ManagementProfileFilterLinksListResource
28−
29− -- * Creating a Request
30− , managementProfileFilterLinksList'
31− , ManagementProfileFilterLinksList'
32−
33− -- * Request Lenses
34− , mpfllQuotaUser
35− , mpfllPrettyPrint
36− , mpfllWebPropertyId
37− , mpfllUserIP
38− , mpfllProfileId
39− , mpfllAccountId
40− , mpfllKey
41− , mpfllOAuthToken
42− , mpfllStartIndex
43− , mpfllMaxResults
44− , mpfllFields
45− ) where
46−
47−import Network.Google.Analytics.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AnalyticsManagementProfileFilterLinksList@ which the
51−-- 'ManagementProfileFilterLinksList'' request conforms to.
52−type ManagementProfileFilterLinksListResource =
53− "management" :>
54− "accounts" :>
55− Capture "accountId" Text :>
56− "webproperties" :>
57− Capture "webPropertyId" Text :>
58− "profiles" :>
59− Capture "profileId" Text :>
60− "profileFilterLinks" :>
61− QueryParam "start-index" Int32 :>
62− QueryParam "max-results" Int32 :>
63− QueryParam "quotaUser" Text :>
64− QueryParam "prettyPrint" Bool :>
65− QueryParam "userIp" Text :>
66− QueryParam "fields" Text :>
67− QueryParam "key" Key :>
68− QueryParam "oauth_token" OAuthToken :>
69− QueryParam "alt" AltJSON :>
70− Get '[JSON] ProfileFilterLinks
71−
72−-- | Lists all profile filter links for a profile.
73−--
74−-- /See:/ 'managementProfileFilterLinksList'' smart constructor.
75−data ManagementProfileFilterLinksList' = ManagementProfileFilterLinksList'
76− { _mpfllQuotaUser :: !(Maybe Text)
77− , _mpfllPrettyPrint :: !Bool
78− , _mpfllWebPropertyId :: !Text
79− , _mpfllUserIP :: !(Maybe Text)
80− , _mpfllProfileId :: !Text
81− , _mpfllAccountId :: !Text
82− , _mpfllKey :: !(Maybe Key)
83− , _mpfllOAuthToken :: !(Maybe OAuthToken)
84− , _mpfllStartIndex :: !(Maybe Int32)
85− , _mpfllMaxResults :: !(Maybe Int32)
86− , _mpfllFields :: !(Maybe Text)
87− } deriving (Eq,Show,Data,Typeable,Generic)
88−
89−-- | Creates a value of 'ManagementProfileFilterLinksList'' with the minimum fields required to make a request.
90−--
91−-- Use one of the following lenses to modify other fields as desired:
92−--
93−-- * 'mpfllQuotaUser'
94−--
95−-- * 'mpfllPrettyPrint'
96−--
97−-- * 'mpfllWebPropertyId'
98−--
99−-- * 'mpfllUserIP'
100−--
101−-- * 'mpfllProfileId'
102−--
103−-- * 'mpfllAccountId'
104−--
105−-- * 'mpfllKey'
106−--
107−-- * 'mpfllOAuthToken'
108−--
109−-- * 'mpfllStartIndex'
110−--
111−-- * 'mpfllMaxResults'
112−--
113−-- * 'mpfllFields'
114−managementProfileFilterLinksList'
115− :: Text -- ^ 'webPropertyId'
116− -> Text -- ^ 'profileId'
117− -> Text -- ^ 'accountId'
118− -> ManagementProfileFilterLinksList'
119−managementProfileFilterLinksList' pMpfllWebPropertyId_ pMpfllProfileId_ pMpfllAccountId_ =
120− ManagementProfileFilterLinksList'
121− { _mpfllQuotaUser = Nothing
122− , _mpfllPrettyPrint = False
123− , _mpfllWebPropertyId = pMpfllWebPropertyId_
124− , _mpfllUserIP = Nothing
125− , _mpfllProfileId = pMpfllProfileId_
126− , _mpfllAccountId = pMpfllAccountId_
127− , _mpfllKey = Nothing
128− , _mpfllOAuthToken = Nothing
129− , _mpfllStartIndex = Nothing
130− , _mpfllMaxResults = Nothing
131− , _mpfllFields = Nothing
132− }
133−
134−-- | Available to use for quota purposes for server-side applications. Can be
135−-- any arbitrary string assigned to a user, but should not exceed 40
136−-- characters. Overrides userIp if both are provided.
137−mpfllQuotaUser :: Lens' ManagementProfileFilterLinksList' (Maybe Text)
138−mpfllQuotaUser
139− = lens _mpfllQuotaUser
140− (\ s a -> s{_mpfllQuotaUser = a})
141−
142−-- | Returns response with indentations and line breaks.
143−mpfllPrettyPrint :: Lens' ManagementProfileFilterLinksList' Bool
144−mpfllPrettyPrint
145− = lens _mpfllPrettyPrint
146− (\ s a -> s{_mpfllPrettyPrint = a})
147−
148−-- | Web property Id for profile filter links for. Can either be a specific
149−-- web property ID or \'~all\', which refers to all the web properties that
150−-- user has access to.
151−mpfllWebPropertyId :: Lens' ManagementProfileFilterLinksList' Text
152−mpfllWebPropertyId
153− = lens _mpfllWebPropertyId
154− (\ s a -> s{_mpfllWebPropertyId = a})
155−
156−-- | IP address of the site where the request originates. Use this if you
157−-- want to enforce per-user limits.
158−mpfllUserIP :: Lens' ManagementProfileFilterLinksList' (Maybe Text)
159−mpfllUserIP
160− = lens _mpfllUserIP (\ s a -> s{_mpfllUserIP = a})
161−
162−-- | Profile ID to retrieve filter links for. Can either be a specific
163−-- profile ID or \'~all\', which refers to all the profiles that user has
164−-- access to.
165−mpfllProfileId :: Lens' ManagementProfileFilterLinksList' Text
166−mpfllProfileId
167− = lens _mpfllProfileId
168− (\ s a -> s{_mpfllProfileId = a})
169−
170−-- | Account ID to retrieve profile filter links for.
171−mpfllAccountId :: Lens' ManagementProfileFilterLinksList' Text
172−mpfllAccountId
173− = lens _mpfllAccountId
174− (\ s a -> s{_mpfllAccountId = a})
175−
176−-- | API key. Your API key identifies your project and provides you with API
177−-- access, quota, and reports. Required unless you provide an OAuth 2.0
178−-- token.
179−mpfllKey :: Lens' ManagementProfileFilterLinksList' (Maybe Key)
180−mpfllKey = lens _mpfllKey (\ s a -> s{_mpfllKey = a})
181−
182−-- | OAuth 2.0 token for the current user.
183−mpfllOAuthToken :: Lens' ManagementProfileFilterLinksList' (Maybe OAuthToken)
184−mpfllOAuthToken
185− = lens _mpfllOAuthToken
186− (\ s a -> s{_mpfllOAuthToken = a})
187−
188−-- | An index of the first entity to retrieve. Use this parameter as a
189−-- pagination mechanism along with the max-results parameter.
190−mpfllStartIndex :: Lens' ManagementProfileFilterLinksList' (Maybe Int32)
191−mpfllStartIndex
192− = lens _mpfllStartIndex
193− (\ s a -> s{_mpfllStartIndex = a})
194−
195−-- | The maximum number of profile filter links to include in this response.
196−mpfllMaxResults :: Lens' ManagementProfileFilterLinksList' (Maybe Int32)
197−mpfllMaxResults
198− = lens _mpfllMaxResults
199− (\ s a -> s{_mpfllMaxResults = a})
200−
201−-- | Selector specifying which fields to include in a partial response.
202−mpfllFields :: Lens' ManagementProfileFilterLinksList' (Maybe Text)
203−mpfllFields
204− = lens _mpfllFields (\ s a -> s{_mpfllFields = a})
205−
206−instance GoogleAuth ManagementProfileFilterLinksList'
207− where
208− authKey = mpfllKey . _Just
209− authToken = mpfllOAuthToken . _Just
210−
211−instance GoogleRequest
212− ManagementProfileFilterLinksList' where
213− type Rs ManagementProfileFilterLinksList' =
214− ProfileFilterLinks
215− request = requestWithRoute defReq analyticsURL
216− requestWithRoute r u
217− ManagementProfileFilterLinksList'{..}
218− = go _mpfllAccountId _mpfllWebPropertyId
219− _mpfllProfileId
220− _mpfllStartIndex
221− _mpfllMaxResults
222− _mpfllQuotaUser
223− (Just _mpfllPrettyPrint)
224− _mpfllUserIP
225− _mpfllFields
226− _mpfllKey
227− _mpfllOAuthToken
228− (Just AltJSON)
229− where go
230− = clientWithRoute
231− (Proxy ::
232− Proxy ManagementProfileFilterLinksListResource)
233− r
234− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Patch.hsdeleted−231
@@ -1,231 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Patch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Update an existing profile filter link. This method supports patch
22−-- semantics.
23−--
24−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksPatch@.
25−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Patch
26− (
27− -- * REST Resource
28− ManagementProfileFilterLinksPatchResource
29−
30− -- * Creating a Request
31− , managementProfileFilterLinksPatch'
32− , ManagementProfileFilterLinksPatch'
33−
34− -- * Request Lenses
35− , mpflpQuotaUser
36− , mpflpPrettyPrint
37− , mpflpWebPropertyId
38− , mpflpUserIP
39− , mpflpProfileId
40− , mpflpPayload
41− , mpflpAccountId
42− , mpflpKey
43− , mpflpLinkId
44− , mpflpOAuthToken
45− , mpflpFields
46− ) where
47−
48−import Network.Google.Analytics.Types
49−import Network.Google.Prelude
50−
51−-- | A resource alias for @AnalyticsManagementProfileFilterLinksPatch@ which the
52−-- 'ManagementProfileFilterLinksPatch'' request conforms to.
53−type ManagementProfileFilterLinksPatchResource =
54− "management" :>
55− "accounts" :>
56− Capture "accountId" Text :>
57− "webproperties" :>
58− Capture "webPropertyId" Text :>
59− "profiles" :>
60− Capture "profileId" Text :>
61− "profileFilterLinks" :>
62− Capture "linkId" Text :>
63− QueryParam "quotaUser" Text :>
64− QueryParam "prettyPrint" Bool :>
65− QueryParam "userIp" Text :>
66− QueryParam "fields" Text :>
67− QueryParam "key" Key :>
68− QueryParam "oauth_token" OAuthToken :>
69− QueryParam "alt" AltJSON :>
70− ReqBody '[JSON] ProfileFilterLink :>
71− Patch '[JSON] ProfileFilterLink
72−
73−-- | Update an existing profile filter link. This method supports patch
74−-- semantics.
75−--
76−-- /See:/ 'managementProfileFilterLinksPatch'' smart constructor.
77−data ManagementProfileFilterLinksPatch' = ManagementProfileFilterLinksPatch'
78− { _mpflpQuotaUser :: !(Maybe Text)
79− , _mpflpPrettyPrint :: !Bool
80− , _mpflpWebPropertyId :: !Text
81− , _mpflpUserIP :: !(Maybe Text)
82− , _mpflpProfileId :: !Text
83− , _mpflpPayload :: !ProfileFilterLink
84− , _mpflpAccountId :: !Text
85− , _mpflpKey :: !(Maybe Key)
86− , _mpflpLinkId :: !Text
87− , _mpflpOAuthToken :: !(Maybe OAuthToken)
88− , _mpflpFields :: !(Maybe Text)
89− } deriving (Eq,Show,Data,Typeable,Generic)
90−
91−-- | Creates a value of 'ManagementProfileFilterLinksPatch'' with the minimum fields required to make a request.
92−--
93−-- Use one of the following lenses to modify other fields as desired:
94−--
95−-- * 'mpflpQuotaUser'
96−--
97−-- * 'mpflpPrettyPrint'
98−--
99−-- * 'mpflpWebPropertyId'
100−--
101−-- * 'mpflpUserIP'
102−--
103−-- * 'mpflpProfileId'
104−--
105−-- * 'mpflpPayload'
106−--
107−-- * 'mpflpAccountId'
108−--
109−-- * 'mpflpKey'
110−--
111−-- * 'mpflpLinkId'
112−--
113−-- * 'mpflpOAuthToken'
114−--
115−-- * 'mpflpFields'
116−managementProfileFilterLinksPatch'
117− :: Text -- ^ 'webPropertyId'
118− -> Text -- ^ 'profileId'
119− -> ProfileFilterLink -- ^ 'payload'
120− -> Text -- ^ 'accountId'
121− -> Text -- ^ 'linkId'
122− -> ManagementProfileFilterLinksPatch'
123−managementProfileFilterLinksPatch' pMpflpWebPropertyId_ pMpflpProfileId_ pMpflpPayload_ pMpflpAccountId_ pMpflpLinkId_ =
124− ManagementProfileFilterLinksPatch'
125− { _mpflpQuotaUser = Nothing
126− , _mpflpPrettyPrint = False
127− , _mpflpWebPropertyId = pMpflpWebPropertyId_
128− , _mpflpUserIP = Nothing
129− , _mpflpProfileId = pMpflpProfileId_
130− , _mpflpPayload = pMpflpPayload_
131− , _mpflpAccountId = pMpflpAccountId_
132− , _mpflpKey = Nothing
133− , _mpflpLinkId = pMpflpLinkId_
134− , _mpflpOAuthToken = Nothing
135− , _mpflpFields = Nothing
136− }
137−
138−-- | Available to use for quota purposes for server-side applications. Can be
139−-- any arbitrary string assigned to a user, but should not exceed 40
140−-- characters. Overrides userIp if both are provided.
141−mpflpQuotaUser :: Lens' ManagementProfileFilterLinksPatch' (Maybe Text)
142−mpflpQuotaUser
143− = lens _mpflpQuotaUser
144− (\ s a -> s{_mpflpQuotaUser = a})
145−
146−-- | Returns response with indentations and line breaks.
147−mpflpPrettyPrint :: Lens' ManagementProfileFilterLinksPatch' Bool
148−mpflpPrettyPrint
149− = lens _mpflpPrettyPrint
150− (\ s a -> s{_mpflpPrettyPrint = a})
151−
152−-- | Web property Id to which profile filter link belongs
153−mpflpWebPropertyId :: Lens' ManagementProfileFilterLinksPatch' Text
154−mpflpWebPropertyId
155− = lens _mpflpWebPropertyId
156− (\ s a -> s{_mpflpWebPropertyId = a})
157−
158−-- | IP address of the site where the request originates. Use this if you
159−-- want to enforce per-user limits.
160−mpflpUserIP :: Lens' ManagementProfileFilterLinksPatch' (Maybe Text)
161−mpflpUserIP
162− = lens _mpflpUserIP (\ s a -> s{_mpflpUserIP = a})
163−
164−-- | Profile ID to which filter link belongs
165−mpflpProfileId :: Lens' ManagementProfileFilterLinksPatch' Text
166−mpflpProfileId
167− = lens _mpflpProfileId
168− (\ s a -> s{_mpflpProfileId = a})
169−
170−-- | Multipart request metadata.
171−mpflpPayload :: Lens' ManagementProfileFilterLinksPatch' ProfileFilterLink
172−mpflpPayload
173− = lens _mpflpPayload (\ s a -> s{_mpflpPayload = a})
174−
175−-- | Account ID to which profile filter link belongs.
176−mpflpAccountId :: Lens' ManagementProfileFilterLinksPatch' Text
177−mpflpAccountId
178− = lens _mpflpAccountId
179− (\ s a -> s{_mpflpAccountId = a})
180−
181−-- | API key. Your API key identifies your project and provides you with API
182−-- access, quota, and reports. Required unless you provide an OAuth 2.0
183−-- token.
184−mpflpKey :: Lens' ManagementProfileFilterLinksPatch' (Maybe Key)
185−mpflpKey = lens _mpflpKey (\ s a -> s{_mpflpKey = a})
186−
187−-- | ID of the profile filter link to be updated.
188−mpflpLinkId :: Lens' ManagementProfileFilterLinksPatch' Text
189−mpflpLinkId
190− = lens _mpflpLinkId (\ s a -> s{_mpflpLinkId = a})
191−
192−-- | OAuth 2.0 token for the current user.
193−mpflpOAuthToken :: Lens' ManagementProfileFilterLinksPatch' (Maybe OAuthToken)
194−mpflpOAuthToken
195− = lens _mpflpOAuthToken
196− (\ s a -> s{_mpflpOAuthToken = a})
197−
198−-- | Selector specifying which fields to include in a partial response.
199−mpflpFields :: Lens' ManagementProfileFilterLinksPatch' (Maybe Text)
200−mpflpFields
201− = lens _mpflpFields (\ s a -> s{_mpflpFields = a})
202−
203−instance GoogleAuth
204− ManagementProfileFilterLinksPatch' where
205− authKey = mpflpKey . _Just
206− authToken = mpflpOAuthToken . _Just
207−
208−instance GoogleRequest
209− ManagementProfileFilterLinksPatch' where
210− type Rs ManagementProfileFilterLinksPatch' =
211− ProfileFilterLink
212− request = requestWithRoute defReq analyticsURL
213− requestWithRoute r u
214− ManagementProfileFilterLinksPatch'{..}
215− = go _mpflpAccountId _mpflpWebPropertyId
216− _mpflpProfileId
217− _mpflpLinkId
218− _mpflpQuotaUser
219− (Just _mpflpPrettyPrint)
220− _mpflpUserIP
221− _mpflpFields
222− _mpflpKey
223− _mpflpOAuthToken
224− (Just AltJSON)
225− _mpflpPayload
226− where go
227− = clientWithRoute
228− (Proxy ::
229− Proxy ManagementProfileFilterLinksPatchResource)
230− r
231− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Update.hsdeleted−229
@@ -1,229 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Update an existing profile filter link.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileFilterLinksUpdate@.
24−module Network.Google.Resource.Analytics.Management.ProfileFilterLinks.Update
25− (
26− -- * REST Resource
27− ManagementProfileFilterLinksUpdateResource
28−
29− -- * Creating a Request
30− , managementProfileFilterLinksUpdate'
31− , ManagementProfileFilterLinksUpdate'
32−
33− -- * Request Lenses
34− , mpfluQuotaUser
35− , mpfluPrettyPrint
36− , mpfluWebPropertyId
37− , mpfluUserIP
38− , mpfluProfileId
39− , mpfluPayload
40− , mpfluAccountId
41− , mpfluKey
42− , mpfluLinkId
43− , mpfluOAuthToken
44− , mpfluFields
45− ) where
46−
47−import Network.Google.Analytics.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AnalyticsManagementProfileFilterLinksUpdate@ which the
51−-- 'ManagementProfileFilterLinksUpdate'' request conforms to.
52−type ManagementProfileFilterLinksUpdateResource =
53− "management" :>
54− "accounts" :>
55− Capture "accountId" Text :>
56− "webproperties" :>
57− Capture "webPropertyId" Text :>
58− "profiles" :>
59− Capture "profileId" Text :>
60− "profileFilterLinks" :>
61− Capture "linkId" Text :>
62− QueryParam "quotaUser" Text :>
63− QueryParam "prettyPrint" Bool :>
64− QueryParam "userIp" Text :>
65− QueryParam "fields" Text :>
66− QueryParam "key" Key :>
67− QueryParam "oauth_token" OAuthToken :>
68− QueryParam "alt" AltJSON :>
69− ReqBody '[JSON] ProfileFilterLink :>
70− Put '[JSON] ProfileFilterLink
71−
72−-- | Update an existing profile filter link.
73−--
74−-- /See:/ 'managementProfileFilterLinksUpdate'' smart constructor.
75−data ManagementProfileFilterLinksUpdate' = ManagementProfileFilterLinksUpdate'
76− { _mpfluQuotaUser :: !(Maybe Text)
77− , _mpfluPrettyPrint :: !Bool
78− , _mpfluWebPropertyId :: !Text
79− , _mpfluUserIP :: !(Maybe Text)
80− , _mpfluProfileId :: !Text
81− , _mpfluPayload :: !ProfileFilterLink
82− , _mpfluAccountId :: !Text
83− , _mpfluKey :: !(Maybe Key)
84− , _mpfluLinkId :: !Text
85− , _mpfluOAuthToken :: !(Maybe OAuthToken)
86− , _mpfluFields :: !(Maybe Text)
87− } deriving (Eq,Show,Data,Typeable,Generic)
88−
89−-- | Creates a value of 'ManagementProfileFilterLinksUpdate'' with the minimum fields required to make a request.
90−--
91−-- Use one of the following lenses to modify other fields as desired:
92−--
93−-- * 'mpfluQuotaUser'
94−--
95−-- * 'mpfluPrettyPrint'
96−--
97−-- * 'mpfluWebPropertyId'
98−--
99−-- * 'mpfluUserIP'
100−--
101−-- * 'mpfluProfileId'
102−--
103−-- * 'mpfluPayload'
104−--
105−-- * 'mpfluAccountId'
106−--
107−-- * 'mpfluKey'
108−--
109−-- * 'mpfluLinkId'
110−--
111−-- * 'mpfluOAuthToken'
112−--
113−-- * 'mpfluFields'
114−managementProfileFilterLinksUpdate'
115− :: Text -- ^ 'webPropertyId'
116− -> Text -- ^ 'profileId'
117− -> ProfileFilterLink -- ^ 'payload'
118− -> Text -- ^ 'accountId'
119− -> Text -- ^ 'linkId'
120− -> ManagementProfileFilterLinksUpdate'
121−managementProfileFilterLinksUpdate' pMpfluWebPropertyId_ pMpfluProfileId_ pMpfluPayload_ pMpfluAccountId_ pMpfluLinkId_ =
122− ManagementProfileFilterLinksUpdate'
123− { _mpfluQuotaUser = Nothing
124− , _mpfluPrettyPrint = False
125− , _mpfluWebPropertyId = pMpfluWebPropertyId_
126− , _mpfluUserIP = Nothing
127− , _mpfluProfileId = pMpfluProfileId_
128− , _mpfluPayload = pMpfluPayload_
129− , _mpfluAccountId = pMpfluAccountId_
130− , _mpfluKey = Nothing
131− , _mpfluLinkId = pMpfluLinkId_
132− , _mpfluOAuthToken = Nothing
133− , _mpfluFields = Nothing
134− }
135−
136−-- | Available to use for quota purposes for server-side applications. Can be
137−-- any arbitrary string assigned to a user, but should not exceed 40
138−-- characters. Overrides userIp if both are provided.
139−mpfluQuotaUser :: Lens' ManagementProfileFilterLinksUpdate' (Maybe Text)
140−mpfluQuotaUser
141− = lens _mpfluQuotaUser
142− (\ s a -> s{_mpfluQuotaUser = a})
143−
144−-- | Returns response with indentations and line breaks.
145−mpfluPrettyPrint :: Lens' ManagementProfileFilterLinksUpdate' Bool
146−mpfluPrettyPrint
147− = lens _mpfluPrettyPrint
148− (\ s a -> s{_mpfluPrettyPrint = a})
149−
150−-- | Web property Id to which profile filter link belongs
151−mpfluWebPropertyId :: Lens' ManagementProfileFilterLinksUpdate' Text
152−mpfluWebPropertyId
153− = lens _mpfluWebPropertyId
154− (\ s a -> s{_mpfluWebPropertyId = a})
155−
156−-- | IP address of the site where the request originates. Use this if you
157−-- want to enforce per-user limits.
158−mpfluUserIP :: Lens' ManagementProfileFilterLinksUpdate' (Maybe Text)
159−mpfluUserIP
160− = lens _mpfluUserIP (\ s a -> s{_mpfluUserIP = a})
161−
162−-- | Profile ID to which filter link belongs
163−mpfluProfileId :: Lens' ManagementProfileFilterLinksUpdate' Text
164−mpfluProfileId
165− = lens _mpfluProfileId
166− (\ s a -> s{_mpfluProfileId = a})
167−
168−-- | Multipart request metadata.
169−mpfluPayload :: Lens' ManagementProfileFilterLinksUpdate' ProfileFilterLink
170−mpfluPayload
171− = lens _mpfluPayload (\ s a -> s{_mpfluPayload = a})
172−
173−-- | Account ID to which profile filter link belongs.
174−mpfluAccountId :: Lens' ManagementProfileFilterLinksUpdate' Text
175−mpfluAccountId
176− = lens _mpfluAccountId
177− (\ s a -> s{_mpfluAccountId = a})
178−
179−-- | API key. Your API key identifies your project and provides you with API
180−-- access, quota, and reports. Required unless you provide an OAuth 2.0
181−-- token.
182−mpfluKey :: Lens' ManagementProfileFilterLinksUpdate' (Maybe Key)
183−mpfluKey = lens _mpfluKey (\ s a -> s{_mpfluKey = a})
184−
185−-- | ID of the profile filter link to be updated.
186−mpfluLinkId :: Lens' ManagementProfileFilterLinksUpdate' Text
187−mpfluLinkId
188− = lens _mpfluLinkId (\ s a -> s{_mpfluLinkId = a})
189−
190−-- | OAuth 2.0 token for the current user.
191−mpfluOAuthToken :: Lens' ManagementProfileFilterLinksUpdate' (Maybe OAuthToken)
192−mpfluOAuthToken
193− = lens _mpfluOAuthToken
194− (\ s a -> s{_mpfluOAuthToken = a})
195−
196−-- | Selector specifying which fields to include in a partial response.
197−mpfluFields :: Lens' ManagementProfileFilterLinksUpdate' (Maybe Text)
198−mpfluFields
199− = lens _mpfluFields (\ s a -> s{_mpfluFields = a})
200−
201−instance GoogleAuth
202− ManagementProfileFilterLinksUpdate' where
203− authKey = mpfluKey . _Just
204− authToken = mpfluOAuthToken . _Just
205−
206−instance GoogleRequest
207− ManagementProfileFilterLinksUpdate' where
208− type Rs ManagementProfileFilterLinksUpdate' =
209− ProfileFilterLink
210− request = requestWithRoute defReq analyticsURL
211− requestWithRoute r u
212− ManagementProfileFilterLinksUpdate'{..}
213− = go _mpfluAccountId _mpfluWebPropertyId
214− _mpfluProfileId
215− _mpfluLinkId
216− _mpfluQuotaUser
217− (Just _mpfluPrettyPrint)
218− _mpfluUserIP
219− _mpfluFields
220− _mpfluKey
221− _mpfluOAuthToken
222− (Just AltJSON)
223− _mpfluPayload
224− where go
225− = clientWithRoute
226− (Proxy ::
227− Proxy ManagementProfileFilterLinksUpdateResource)
228− r
229− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Delete.hsdeleted−214
@@ -1,214 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileUserLinks.Delete
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Removes a user from the given view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileUserLinksDelete@.
24−module Network.Google.Resource.Analytics.Management.ProfileUserLinks.Delete
25− (
26− -- * REST Resource
27− ManagementProfileUserLinksDeleteResource
28−
29− -- * Creating a Request
30− , managementProfileUserLinksDelete'
31− , ManagementProfileUserLinksDelete'
32−
33− -- * Request Lenses
34− , mpuldQuotaUser
35− , mpuldPrettyPrint
36− , mpuldWebPropertyId
37− , mpuldUserIP
38− , mpuldProfileId
39− , mpuldAccountId
40− , mpuldKey
41− , mpuldLinkId
42− , mpuldOAuthToken
43− , mpuldFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfileUserLinksDelete@ which the
50−-- 'ManagementProfileUserLinksDelete'' request conforms to.
51−type ManagementProfileUserLinksDeleteResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "entityUserLinks" :>
60− Capture "linkId" Text :>
61− QueryParam "quotaUser" Text :>
62− QueryParam "prettyPrint" Bool :>
63− QueryParam "userIp" Text :>
64− QueryParam "fields" Text :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "alt" AltJSON :> Delete '[JSON] ()
68−
69−-- | Removes a user from the given view (profile).
70−--
71−-- /See:/ 'managementProfileUserLinksDelete'' smart constructor.
72−data ManagementProfileUserLinksDelete' = ManagementProfileUserLinksDelete'
73− { _mpuldQuotaUser :: !(Maybe Text)
74− , _mpuldPrettyPrint :: !Bool
75− , _mpuldWebPropertyId :: !Text
76− , _mpuldUserIP :: !(Maybe Text)
77− , _mpuldProfileId :: !Text
78− , _mpuldAccountId :: !Text
79− , _mpuldKey :: !(Maybe Key)
80− , _mpuldLinkId :: !Text
81− , _mpuldOAuthToken :: !(Maybe OAuthToken)
82− , _mpuldFields :: !(Maybe Text)
83− } deriving (Eq,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'ManagementProfileUserLinksDelete'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'mpuldQuotaUser'
90−--
91−-- * 'mpuldPrettyPrint'
92−--
93−-- * 'mpuldWebPropertyId'
94−--
95−-- * 'mpuldUserIP'
96−--
97−-- * 'mpuldProfileId'
98−--
99−-- * 'mpuldAccountId'
100−--
101−-- * 'mpuldKey'
102−--
103−-- * 'mpuldLinkId'
104−--
105−-- * 'mpuldOAuthToken'
106−--
107−-- * 'mpuldFields'
108−managementProfileUserLinksDelete'
109− :: Text -- ^ 'webPropertyId'
110− -> Text -- ^ 'profileId'
111− -> Text -- ^ 'accountId'
112− -> Text -- ^ 'linkId'
113− -> ManagementProfileUserLinksDelete'
114−managementProfileUserLinksDelete' pMpuldWebPropertyId_ pMpuldProfileId_ pMpuldAccountId_ pMpuldLinkId_ =
115− ManagementProfileUserLinksDelete'
116− { _mpuldQuotaUser = Nothing
117− , _mpuldPrettyPrint = False
118− , _mpuldWebPropertyId = pMpuldWebPropertyId_
119− , _mpuldUserIP = Nothing
120− , _mpuldProfileId = pMpuldProfileId_
121− , _mpuldAccountId = pMpuldAccountId_
122− , _mpuldKey = Nothing
123− , _mpuldLinkId = pMpuldLinkId_
124− , _mpuldOAuthToken = Nothing
125− , _mpuldFields = Nothing
126− }
127−
128−-- | Available to use for quota purposes for server-side applications. Can be
129−-- any arbitrary string assigned to a user, but should not exceed 40
130−-- characters. Overrides userIp if both are provided.
131−mpuldQuotaUser :: Lens' ManagementProfileUserLinksDelete' (Maybe Text)
132−mpuldQuotaUser
133− = lens _mpuldQuotaUser
134− (\ s a -> s{_mpuldQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−mpuldPrettyPrint :: Lens' ManagementProfileUserLinksDelete' Bool
138−mpuldPrettyPrint
139− = lens _mpuldPrettyPrint
140− (\ s a -> s{_mpuldPrettyPrint = a})
141−
142−-- | Web Property ID to delete the user link for.
143−mpuldWebPropertyId :: Lens' ManagementProfileUserLinksDelete' Text
144−mpuldWebPropertyId
145− = lens _mpuldWebPropertyId
146− (\ s a -> s{_mpuldWebPropertyId = a})
147−
148−-- | IP address of the site where the request originates. Use this if you
149−-- want to enforce per-user limits.
150−mpuldUserIP :: Lens' ManagementProfileUserLinksDelete' (Maybe Text)
151−mpuldUserIP
152− = lens _mpuldUserIP (\ s a -> s{_mpuldUserIP = a})
153−
154−-- | View (Profile) ID to delete the user link for.
155−mpuldProfileId :: Lens' ManagementProfileUserLinksDelete' Text
156−mpuldProfileId
157− = lens _mpuldProfileId
158− (\ s a -> s{_mpuldProfileId = a})
159−
160−-- | Account ID to delete the user link for.
161−mpuldAccountId :: Lens' ManagementProfileUserLinksDelete' Text
162−mpuldAccountId
163− = lens _mpuldAccountId
164− (\ s a -> s{_mpuldAccountId = a})
165−
166−-- | API key. Your API key identifies your project and provides you with API
167−-- access, quota, and reports. Required unless you provide an OAuth 2.0
168−-- token.
169−mpuldKey :: Lens' ManagementProfileUserLinksDelete' (Maybe Key)
170−mpuldKey = lens _mpuldKey (\ s a -> s{_mpuldKey = a})
171−
172−-- | Link ID to delete the user link for.
173−mpuldLinkId :: Lens' ManagementProfileUserLinksDelete' Text
174−mpuldLinkId
175− = lens _mpuldLinkId (\ s a -> s{_mpuldLinkId = a})
176−
177−-- | OAuth 2.0 token for the current user.
178−mpuldOAuthToken :: Lens' ManagementProfileUserLinksDelete' (Maybe OAuthToken)
179−mpuldOAuthToken
180− = lens _mpuldOAuthToken
181− (\ s a -> s{_mpuldOAuthToken = a})
182−
183−-- | Selector specifying which fields to include in a partial response.
184−mpuldFields :: Lens' ManagementProfileUserLinksDelete' (Maybe Text)
185−mpuldFields
186− = lens _mpuldFields (\ s a -> s{_mpuldFields = a})
187−
188−instance GoogleAuth ManagementProfileUserLinksDelete'
189− where
190− authKey = mpuldKey . _Just
191− authToken = mpuldOAuthToken . _Just
192−
193−instance GoogleRequest
194− ManagementProfileUserLinksDelete' where
195− type Rs ManagementProfileUserLinksDelete' = ()
196− request = requestWithRoute defReq analyticsURL
197− requestWithRoute r u
198− ManagementProfileUserLinksDelete'{..}
199− = go _mpuldAccountId _mpuldWebPropertyId
200− _mpuldProfileId
201− _mpuldLinkId
202− _mpuldQuotaUser
203− (Just _mpuldPrettyPrint)
204− _mpuldUserIP
205− _mpuldFields
206− _mpuldKey
207− _mpuldOAuthToken
208− (Just AltJSON)
209− where go
210− = clientWithRoute
211− (Proxy ::
212− Proxy ManagementProfileUserLinksDeleteResource)
213− r
214− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Insert.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileUserLinks.Insert
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Adds a new user to the given view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileUserLinksInsert@.
24−module Network.Google.Resource.Analytics.Management.ProfileUserLinks.Insert
25− (
26− -- * REST Resource
27− ManagementProfileUserLinksInsertResource
28−
29− -- * Creating a Request
30− , managementProfileUserLinksInsert'
31− , ManagementProfileUserLinksInsert'
32−
33− -- * Request Lenses
34− , mpuliQuotaUser
35− , mpuliPrettyPrint
36− , mpuliWebPropertyId
37− , mpuliUserIP
38− , mpuliProfileId
39− , mpuliPayload
40− , mpuliAccountId
41− , mpuliKey
42− , mpuliOAuthToken
43− , mpuliFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfileUserLinksInsert@ which the
50−-- 'ManagementProfileUserLinksInsert'' request conforms to.
51−type ManagementProfileUserLinksInsertResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "entityUserLinks" :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "fields" Text :>
64− QueryParam "key" Key :>
65− QueryParam "oauth_token" OAuthToken :>
66− QueryParam "alt" AltJSON :>
67− ReqBody '[JSON] EntityUserLink :>
68− Post '[JSON] EntityUserLink
69−
70−-- | Adds a new user to the given view (profile).
71−--
72−-- /See:/ 'managementProfileUserLinksInsert'' smart constructor.
73−data ManagementProfileUserLinksInsert' = ManagementProfileUserLinksInsert'
74− { _mpuliQuotaUser :: !(Maybe Text)
75− , _mpuliPrettyPrint :: !Bool
76− , _mpuliWebPropertyId :: !Text
77− , _mpuliUserIP :: !(Maybe Text)
78− , _mpuliProfileId :: !Text
79− , _mpuliPayload :: !EntityUserLink
80− , _mpuliAccountId :: !Text
81− , _mpuliKey :: !(Maybe Key)
82− , _mpuliOAuthToken :: !(Maybe OAuthToken)
83− , _mpuliFields :: !(Maybe Text)
84− } deriving (Eq,Show,Data,Typeable,Generic)
85−
86−-- | Creates a value of 'ManagementProfileUserLinksInsert'' with the minimum fields required to make a request.
87−--
88−-- Use one of the following lenses to modify other fields as desired:
89−--
90−-- * 'mpuliQuotaUser'
91−--
92−-- * 'mpuliPrettyPrint'
93−--
94−-- * 'mpuliWebPropertyId'
95−--
96−-- * 'mpuliUserIP'
97−--
98−-- * 'mpuliProfileId'
99−--
100−-- * 'mpuliPayload'
101−--
102−-- * 'mpuliAccountId'
103−--
104−-- * 'mpuliKey'
105−--
106−-- * 'mpuliOAuthToken'
107−--
108−-- * 'mpuliFields'
109−managementProfileUserLinksInsert'
110− :: Text -- ^ 'webPropertyId'
111− -> Text -- ^ 'profileId'
112− -> EntityUserLink -- ^ 'payload'
113− -> Text -- ^ 'accountId'
114− -> ManagementProfileUserLinksInsert'
115−managementProfileUserLinksInsert' pMpuliWebPropertyId_ pMpuliProfileId_ pMpuliPayload_ pMpuliAccountId_ =
116− ManagementProfileUserLinksInsert'
117− { _mpuliQuotaUser = Nothing
118− , _mpuliPrettyPrint = False
119− , _mpuliWebPropertyId = pMpuliWebPropertyId_
120− , _mpuliUserIP = Nothing
121− , _mpuliProfileId = pMpuliProfileId_
122− , _mpuliPayload = pMpuliPayload_
123− , _mpuliAccountId = pMpuliAccountId_
124− , _mpuliKey = Nothing
125− , _mpuliOAuthToken = Nothing
126− , _mpuliFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−mpuliQuotaUser :: Lens' ManagementProfileUserLinksInsert' (Maybe Text)
133−mpuliQuotaUser
134− = lens _mpuliQuotaUser
135− (\ s a -> s{_mpuliQuotaUser = a})
136−
137−-- | Returns response with indentations and line breaks.
138−mpuliPrettyPrint :: Lens' ManagementProfileUserLinksInsert' Bool
139−mpuliPrettyPrint
140− = lens _mpuliPrettyPrint
141− (\ s a -> s{_mpuliPrettyPrint = a})
142−
143−-- | Web Property ID to create the user link for.
144−mpuliWebPropertyId :: Lens' ManagementProfileUserLinksInsert' Text
145−mpuliWebPropertyId
146− = lens _mpuliWebPropertyId
147− (\ s a -> s{_mpuliWebPropertyId = a})
148−
149−-- | IP address of the site where the request originates. Use this if you
150−-- want to enforce per-user limits.
151−mpuliUserIP :: Lens' ManagementProfileUserLinksInsert' (Maybe Text)
152−mpuliUserIP
153− = lens _mpuliUserIP (\ s a -> s{_mpuliUserIP = a})
154−
155−-- | View (Profile) ID to create the user link for.
156−mpuliProfileId :: Lens' ManagementProfileUserLinksInsert' Text
157−mpuliProfileId
158− = lens _mpuliProfileId
159− (\ s a -> s{_mpuliProfileId = a})
160−
161−-- | Multipart request metadata.
162−mpuliPayload :: Lens' ManagementProfileUserLinksInsert' EntityUserLink
163−mpuliPayload
164− = lens _mpuliPayload (\ s a -> s{_mpuliPayload = a})
165−
166−-- | Account ID to create the user link for.
167−mpuliAccountId :: Lens' ManagementProfileUserLinksInsert' Text
168−mpuliAccountId
169− = lens _mpuliAccountId
170− (\ s a -> s{_mpuliAccountId = a})
171−
172−-- | API key. Your API key identifies your project and provides you with API
173−-- access, quota, and reports. Required unless you provide an OAuth 2.0
174−-- token.
175−mpuliKey :: Lens' ManagementProfileUserLinksInsert' (Maybe Key)
176−mpuliKey = lens _mpuliKey (\ s a -> s{_mpuliKey = a})
177−
178−-- | OAuth 2.0 token for the current user.
179−mpuliOAuthToken :: Lens' ManagementProfileUserLinksInsert' (Maybe OAuthToken)
180−mpuliOAuthToken
181− = lens _mpuliOAuthToken
182− (\ s a -> s{_mpuliOAuthToken = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−mpuliFields :: Lens' ManagementProfileUserLinksInsert' (Maybe Text)
186−mpuliFields
187− = lens _mpuliFields (\ s a -> s{_mpuliFields = a})
188−
189−instance GoogleAuth ManagementProfileUserLinksInsert'
190− where
191− authKey = mpuliKey . _Just
192− authToken = mpuliOAuthToken . _Just
193−
194−instance GoogleRequest
195− ManagementProfileUserLinksInsert' where
196− type Rs ManagementProfileUserLinksInsert' =
197− EntityUserLink
198− request = requestWithRoute defReq analyticsURL
199− requestWithRoute r u
200− ManagementProfileUserLinksInsert'{..}
201− = go _mpuliAccountId _mpuliWebPropertyId
202− _mpuliProfileId
203− _mpuliQuotaUser
204− (Just _mpuliPrettyPrint)
205− _mpuliUserIP
206− _mpuliFields
207− _mpuliKey
208− _mpuliOAuthToken
209− (Just AltJSON)
210− _mpuliPayload
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy ManagementProfileUserLinksInsertResource)
215− r
216− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/List.hsdeleted−234
@@ -1,234 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileUserLinks.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Lists profile-user links for a given view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileUserLinksList@.
24−module Network.Google.Resource.Analytics.Management.ProfileUserLinks.List
25− (
26− -- * REST Resource
27− ManagementProfileUserLinksListResource
28−
29− -- * Creating a Request
30− , managementProfileUserLinksList'
31− , ManagementProfileUserLinksList'
32−
33− -- * Request Lenses
34− , mpullQuotaUser
35− , mpullPrettyPrint
36− , mpullWebPropertyId
37− , mpullUserIP
38− , mpullProfileId
39− , mpullAccountId
40− , mpullKey
41− , mpullOAuthToken
42− , mpullStartIndex
43− , mpullMaxResults
44− , mpullFields
45− ) where
46−
47−import Network.Google.Analytics.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AnalyticsManagementProfileUserLinksList@ which the
51−-- 'ManagementProfileUserLinksList'' request conforms to.
52−type ManagementProfileUserLinksListResource =
53− "management" :>
54− "accounts" :>
55− Capture "accountId" Text :>
56− "webproperties" :>
57− Capture "webPropertyId" Text :>
58− "profiles" :>
59− Capture "profileId" Text :>
60− "entityUserLinks" :>
61− QueryParam "start-index" Int32 :>
62− QueryParam "max-results" Int32 :>
63− QueryParam "quotaUser" Text :>
64− QueryParam "prettyPrint" Bool :>
65− QueryParam "userIp" Text :>
66− QueryParam "fields" Text :>
67− QueryParam "key" Key :>
68− QueryParam "oauth_token" OAuthToken :>
69− QueryParam "alt" AltJSON :>
70− Get '[JSON] EntityUserLinks
71−
72−-- | Lists profile-user links for a given view (profile).
73−--
74−-- /See:/ 'managementProfileUserLinksList'' smart constructor.
75−data ManagementProfileUserLinksList' = ManagementProfileUserLinksList'
76− { _mpullQuotaUser :: !(Maybe Text)
77− , _mpullPrettyPrint :: !Bool
78− , _mpullWebPropertyId :: !Text
79− , _mpullUserIP :: !(Maybe Text)
80− , _mpullProfileId :: !Text
81− , _mpullAccountId :: !Text
82− , _mpullKey :: !(Maybe Key)
83− , _mpullOAuthToken :: !(Maybe OAuthToken)
84− , _mpullStartIndex :: !(Maybe Int32)
85− , _mpullMaxResults :: !(Maybe Int32)
86− , _mpullFields :: !(Maybe Text)
87− } deriving (Eq,Show,Data,Typeable,Generic)
88−
89−-- | Creates a value of 'ManagementProfileUserLinksList'' with the minimum fields required to make a request.
90−--
91−-- Use one of the following lenses to modify other fields as desired:
92−--
93−-- * 'mpullQuotaUser'
94−--
95−-- * 'mpullPrettyPrint'
96−--
97−-- * 'mpullWebPropertyId'
98−--
99−-- * 'mpullUserIP'
100−--
101−-- * 'mpullProfileId'
102−--
103−-- * 'mpullAccountId'
104−--
105−-- * 'mpullKey'
106−--
107−-- * 'mpullOAuthToken'
108−--
109−-- * 'mpullStartIndex'
110−--
111−-- * 'mpullMaxResults'
112−--
113−-- * 'mpullFields'
114−managementProfileUserLinksList'
115− :: Text -- ^ 'webPropertyId'
116− -> Text -- ^ 'profileId'
117− -> Text -- ^ 'accountId'
118− -> ManagementProfileUserLinksList'
119−managementProfileUserLinksList' pMpullWebPropertyId_ pMpullProfileId_ pMpullAccountId_ =
120− ManagementProfileUserLinksList'
121− { _mpullQuotaUser = Nothing
122− , _mpullPrettyPrint = False
123− , _mpullWebPropertyId = pMpullWebPropertyId_
124− , _mpullUserIP = Nothing
125− , _mpullProfileId = pMpullProfileId_
126− , _mpullAccountId = pMpullAccountId_
127− , _mpullKey = Nothing
128− , _mpullOAuthToken = Nothing
129− , _mpullStartIndex = Nothing
130− , _mpullMaxResults = Nothing
131− , _mpullFields = Nothing
132− }
133−
134−-- | Available to use for quota purposes for server-side applications. Can be
135−-- any arbitrary string assigned to a user, but should not exceed 40
136−-- characters. Overrides userIp if both are provided.
137−mpullQuotaUser :: Lens' ManagementProfileUserLinksList' (Maybe Text)
138−mpullQuotaUser
139− = lens _mpullQuotaUser
140− (\ s a -> s{_mpullQuotaUser = a})
141−
142−-- | Returns response with indentations and line breaks.
143−mpullPrettyPrint :: Lens' ManagementProfileUserLinksList' Bool
144−mpullPrettyPrint
145− = lens _mpullPrettyPrint
146− (\ s a -> s{_mpullPrettyPrint = a})
147−
148−-- | Web Property ID which the given view (profile) belongs to. Can either be
149−-- a specific web property ID or \'~all\', which refers to all the web
150−-- properties that user has access to.
151−mpullWebPropertyId :: Lens' ManagementProfileUserLinksList' Text
152−mpullWebPropertyId
153− = lens _mpullWebPropertyId
154− (\ s a -> s{_mpullWebPropertyId = a})
155−
156−-- | IP address of the site where the request originates. Use this if you
157−-- want to enforce per-user limits.
158−mpullUserIP :: Lens' ManagementProfileUserLinksList' (Maybe Text)
159−mpullUserIP
160− = lens _mpullUserIP (\ s a -> s{_mpullUserIP = a})
161−
162−-- | View (Profile) ID to retrieve the profile-user links for. Can either be
163−-- a specific profile ID or \'~all\', which refers to all the profiles that
164−-- user has access to.
165−mpullProfileId :: Lens' ManagementProfileUserLinksList' Text
166−mpullProfileId
167− = lens _mpullProfileId
168− (\ s a -> s{_mpullProfileId = a})
169−
170−-- | Account ID which the given view (profile) belongs to.
171−mpullAccountId :: Lens' ManagementProfileUserLinksList' Text
172−mpullAccountId
173− = lens _mpullAccountId
174− (\ s a -> s{_mpullAccountId = a})
175−
176−-- | API key. Your API key identifies your project and provides you with API
177−-- access, quota, and reports. Required unless you provide an OAuth 2.0
178−-- token.
179−mpullKey :: Lens' ManagementProfileUserLinksList' (Maybe Key)
180−mpullKey = lens _mpullKey (\ s a -> s{_mpullKey = a})
181−
182−-- | OAuth 2.0 token for the current user.
183−mpullOAuthToken :: Lens' ManagementProfileUserLinksList' (Maybe OAuthToken)
184−mpullOAuthToken
185− = lens _mpullOAuthToken
186− (\ s a -> s{_mpullOAuthToken = a})
187−
188−-- | An index of the first profile-user link to retrieve. Use this parameter
189−-- as a pagination mechanism along with the max-results parameter.
190−mpullStartIndex :: Lens' ManagementProfileUserLinksList' (Maybe Int32)
191−mpullStartIndex
192− = lens _mpullStartIndex
193− (\ s a -> s{_mpullStartIndex = a})
194−
195−-- | The maximum number of profile-user links to include in this response.
196−mpullMaxResults :: Lens' ManagementProfileUserLinksList' (Maybe Int32)
197−mpullMaxResults
198− = lens _mpullMaxResults
199− (\ s a -> s{_mpullMaxResults = a})
200−
201−-- | Selector specifying which fields to include in a partial response.
202−mpullFields :: Lens' ManagementProfileUserLinksList' (Maybe Text)
203−mpullFields
204− = lens _mpullFields (\ s a -> s{_mpullFields = a})
205−
206−instance GoogleAuth ManagementProfileUserLinksList'
207− where
208− authKey = mpullKey . _Just
209− authToken = mpullOAuthToken . _Just
210−
211−instance GoogleRequest
212− ManagementProfileUserLinksList' where
213− type Rs ManagementProfileUserLinksList' =
214− EntityUserLinks
215− request = requestWithRoute defReq analyticsURL
216− requestWithRoute r u
217− ManagementProfileUserLinksList'{..}
218− = go _mpullAccountId _mpullWebPropertyId
219− _mpullProfileId
220− _mpullStartIndex
221− _mpullMaxResults
222− _mpullQuotaUser
223− (Just _mpullPrettyPrint)
224− _mpullUserIP
225− _mpullFields
226− _mpullKey
227− _mpullOAuthToken
228− (Just AltJSON)
229− where go
230− = clientWithRoute
231− (Proxy ::
232− Proxy ManagementProfileUserLinksListResource)
233− r
234− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Update.hsdeleted−229
@@ -1,229 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.ProfileUserLinks.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates permissions for an existing user on the given view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfileUserLinksUpdate@.
24−module Network.Google.Resource.Analytics.Management.ProfileUserLinks.Update
25− (
26− -- * REST Resource
27− ManagementProfileUserLinksUpdateResource
28−
29− -- * Creating a Request
30− , managementProfileUserLinksUpdate'
31− , ManagementProfileUserLinksUpdate'
32−
33− -- * Request Lenses
34− , mpuluQuotaUser
35− , mpuluPrettyPrint
36− , mpuluWebPropertyId
37− , mpuluUserIP
38− , mpuluProfileId
39− , mpuluPayload
40− , mpuluAccountId
41− , mpuluKey
42− , mpuluLinkId
43− , mpuluOAuthToken
44− , mpuluFields
45− ) where
46−
47−import Network.Google.Analytics.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AnalyticsManagementProfileUserLinksUpdate@ which the
51−-- 'ManagementProfileUserLinksUpdate'' request conforms to.
52−type ManagementProfileUserLinksUpdateResource =
53− "management" :>
54− "accounts" :>
55− Capture "accountId" Text :>
56− "webproperties" :>
57− Capture "webPropertyId" Text :>
58− "profiles" :>
59− Capture "profileId" Text :>
60− "entityUserLinks" :>
61− Capture "linkId" Text :>
62− QueryParam "quotaUser" Text :>
63− QueryParam "prettyPrint" Bool :>
64− QueryParam "userIp" Text :>
65− QueryParam "fields" Text :>
66− QueryParam "key" Key :>
67− QueryParam "oauth_token" OAuthToken :>
68− QueryParam "alt" AltJSON :>
69− ReqBody '[JSON] EntityUserLink :>
70− Put '[JSON] EntityUserLink
71−
72−-- | Updates permissions for an existing user on the given view (profile).
73−--
74−-- /See:/ 'managementProfileUserLinksUpdate'' smart constructor.
75−data ManagementProfileUserLinksUpdate' = ManagementProfileUserLinksUpdate'
76− { _mpuluQuotaUser :: !(Maybe Text)
77− , _mpuluPrettyPrint :: !Bool
78− , _mpuluWebPropertyId :: !Text
79− , _mpuluUserIP :: !(Maybe Text)
80− , _mpuluProfileId :: !Text
81− , _mpuluPayload :: !EntityUserLink
82− , _mpuluAccountId :: !Text
83− , _mpuluKey :: !(Maybe Key)
84− , _mpuluLinkId :: !Text
85− , _mpuluOAuthToken :: !(Maybe OAuthToken)
86− , _mpuluFields :: !(Maybe Text)
87− } deriving (Eq,Show,Data,Typeable,Generic)
88−
89−-- | Creates a value of 'ManagementProfileUserLinksUpdate'' with the minimum fields required to make a request.
90−--
91−-- Use one of the following lenses to modify other fields as desired:
92−--
93−-- * 'mpuluQuotaUser'
94−--
95−-- * 'mpuluPrettyPrint'
96−--
97−-- * 'mpuluWebPropertyId'
98−--
99−-- * 'mpuluUserIP'
100−--
101−-- * 'mpuluProfileId'
102−--
103−-- * 'mpuluPayload'
104−--
105−-- * 'mpuluAccountId'
106−--
107−-- * 'mpuluKey'
108−--
109−-- * 'mpuluLinkId'
110−--
111−-- * 'mpuluOAuthToken'
112−--
113−-- * 'mpuluFields'
114−managementProfileUserLinksUpdate'
115− :: Text -- ^ 'webPropertyId'
116− -> Text -- ^ 'profileId'
117− -> EntityUserLink -- ^ 'payload'
118− -> Text -- ^ 'accountId'
119− -> Text -- ^ 'linkId'
120− -> ManagementProfileUserLinksUpdate'
121−managementProfileUserLinksUpdate' pMpuluWebPropertyId_ pMpuluProfileId_ pMpuluPayload_ pMpuluAccountId_ pMpuluLinkId_ =
122− ManagementProfileUserLinksUpdate'
123− { _mpuluQuotaUser = Nothing
124− , _mpuluPrettyPrint = False
125− , _mpuluWebPropertyId = pMpuluWebPropertyId_
126− , _mpuluUserIP = Nothing
127− , _mpuluProfileId = pMpuluProfileId_
128− , _mpuluPayload = pMpuluPayload_
129− , _mpuluAccountId = pMpuluAccountId_
130− , _mpuluKey = Nothing
131− , _mpuluLinkId = pMpuluLinkId_
132− , _mpuluOAuthToken = Nothing
133− , _mpuluFields = Nothing
134− }
135−
136−-- | Available to use for quota purposes for server-side applications. Can be
137−-- any arbitrary string assigned to a user, but should not exceed 40
138−-- characters. Overrides userIp if both are provided.
139−mpuluQuotaUser :: Lens' ManagementProfileUserLinksUpdate' (Maybe Text)
140−mpuluQuotaUser
141− = lens _mpuluQuotaUser
142− (\ s a -> s{_mpuluQuotaUser = a})
143−
144−-- | Returns response with indentations and line breaks.
145−mpuluPrettyPrint :: Lens' ManagementProfileUserLinksUpdate' Bool
146−mpuluPrettyPrint
147− = lens _mpuluPrettyPrint
148− (\ s a -> s{_mpuluPrettyPrint = a})
149−
150−-- | Web Property ID to update the user link for.
151−mpuluWebPropertyId :: Lens' ManagementProfileUserLinksUpdate' Text
152−mpuluWebPropertyId
153− = lens _mpuluWebPropertyId
154− (\ s a -> s{_mpuluWebPropertyId = a})
155−
156−-- | IP address of the site where the request originates. Use this if you
157−-- want to enforce per-user limits.
158−mpuluUserIP :: Lens' ManagementProfileUserLinksUpdate' (Maybe Text)
159−mpuluUserIP
160− = lens _mpuluUserIP (\ s a -> s{_mpuluUserIP = a})
161−
162−-- | View (Profile ID) to update the user link for.
163−mpuluProfileId :: Lens' ManagementProfileUserLinksUpdate' Text
164−mpuluProfileId
165− = lens _mpuluProfileId
166− (\ s a -> s{_mpuluProfileId = a})
167−
168−-- | Multipart request metadata.
169−mpuluPayload :: Lens' ManagementProfileUserLinksUpdate' EntityUserLink
170−mpuluPayload
171− = lens _mpuluPayload (\ s a -> s{_mpuluPayload = a})
172−
173−-- | Account ID to update the user link for.
174−mpuluAccountId :: Lens' ManagementProfileUserLinksUpdate' Text
175−mpuluAccountId
176− = lens _mpuluAccountId
177− (\ s a -> s{_mpuluAccountId = a})
178−
179−-- | API key. Your API key identifies your project and provides you with API
180−-- access, quota, and reports. Required unless you provide an OAuth 2.0
181−-- token.
182−mpuluKey :: Lens' ManagementProfileUserLinksUpdate' (Maybe Key)
183−mpuluKey = lens _mpuluKey (\ s a -> s{_mpuluKey = a})
184−
185−-- | Link ID to update the user link for.
186−mpuluLinkId :: Lens' ManagementProfileUserLinksUpdate' Text
187−mpuluLinkId
188− = lens _mpuluLinkId (\ s a -> s{_mpuluLinkId = a})
189−
190−-- | OAuth 2.0 token for the current user.
191−mpuluOAuthToken :: Lens' ManagementProfileUserLinksUpdate' (Maybe OAuthToken)
192−mpuluOAuthToken
193− = lens _mpuluOAuthToken
194− (\ s a -> s{_mpuluOAuthToken = a})
195−
196−-- | Selector specifying which fields to include in a partial response.
197−mpuluFields :: Lens' ManagementProfileUserLinksUpdate' (Maybe Text)
198−mpuluFields
199− = lens _mpuluFields (\ s a -> s{_mpuluFields = a})
200−
201−instance GoogleAuth ManagementProfileUserLinksUpdate'
202− where
203− authKey = mpuluKey . _Just
204− authToken = mpuluOAuthToken . _Just
205−
206−instance GoogleRequest
207− ManagementProfileUserLinksUpdate' where
208− type Rs ManagementProfileUserLinksUpdate' =
209− EntityUserLink
210− request = requestWithRoute defReq analyticsURL
211− requestWithRoute r u
212− ManagementProfileUserLinksUpdate'{..}
213− = go _mpuluAccountId _mpuluWebPropertyId
214− _mpuluProfileId
215− _mpuluLinkId
216− _mpuluQuotaUser
217− (Just _mpuluPrettyPrint)
218− _mpuluUserIP
219− _mpuluFields
220− _mpuluKey
221− _mpuluOAuthToken
222− (Just AltJSON)
223− _mpuluPayload
224− where go
225− = clientWithRoute
226− (Proxy ::
227− Proxy ManagementProfileUserLinksUpdateResource)
228− r
229− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Delete.hsdeleted−193
@@ -1,193 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.Delete
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Deletes a view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesDelete@.
24−module Network.Google.Resource.Analytics.Management.Profiles.Delete
25− (
26− -- * REST Resource
27− ManagementProfilesDeleteResource
28−
29− -- * Creating a Request
30− , managementProfilesDelete'
31− , ManagementProfilesDelete'
32−
33− -- * Request Lenses
34− , mpdQuotaUser
35− , mpdPrettyPrint
36− , mpdWebPropertyId
37− , mpdUserIP
38− , mpdProfileId
39− , mpdAccountId
40− , mpdKey
41− , mpdOAuthToken
42− , mpdFields
43− ) where
44−
45−import Network.Google.Analytics.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AnalyticsManagementProfilesDelete@ which the
49−-- 'ManagementProfilesDelete'' request conforms to.
50−type ManagementProfilesDeleteResource =
51− "management" :>
52− "accounts" :>
53− Capture "accountId" Text :>
54− "webproperties" :>
55− Capture "webPropertyId" Text :>
56− "profiles" :>
57− Capture "profileId" Text :>
58− QueryParam "quotaUser" Text :>
59− QueryParam "prettyPrint" Bool :>
60− QueryParam "userIp" Text :>
61− QueryParam "fields" Text :>
62− QueryParam "key" Key :>
63− QueryParam "oauth_token" OAuthToken :>
64− QueryParam "alt" AltJSON :> Delete '[JSON] ()
65−
66−-- | Deletes a view (profile).
67−--
68−-- /See:/ 'managementProfilesDelete'' smart constructor.
69−data ManagementProfilesDelete' = ManagementProfilesDelete'
70− { _mpdQuotaUser :: !(Maybe Text)
71− , _mpdPrettyPrint :: !Bool
72− , _mpdWebPropertyId :: !Text
73− , _mpdUserIP :: !(Maybe Text)
74− , _mpdProfileId :: !Text
75− , _mpdAccountId :: !Text
76− , _mpdKey :: !(Maybe Key)
77− , _mpdOAuthToken :: !(Maybe OAuthToken)
78− , _mpdFields :: !(Maybe Text)
79− } deriving (Eq,Show,Data,Typeable,Generic)
80−
81−-- | Creates a value of 'ManagementProfilesDelete'' with the minimum fields required to make a request.
82−--
83−-- Use one of the following lenses to modify other fields as desired:
84−--
85−-- * 'mpdQuotaUser'
86−--
87−-- * 'mpdPrettyPrint'
88−--
89−-- * 'mpdWebPropertyId'
90−--
91−-- * 'mpdUserIP'
92−--
93−-- * 'mpdProfileId'
94−--
95−-- * 'mpdAccountId'
96−--
97−-- * 'mpdKey'
98−--
99−-- * 'mpdOAuthToken'
100−--
101−-- * 'mpdFields'
102−managementProfilesDelete'
103− :: Text -- ^ 'webPropertyId'
104− -> Text -- ^ 'profileId'
105− -> Text -- ^ 'accountId'
106− -> ManagementProfilesDelete'
107−managementProfilesDelete' pMpdWebPropertyId_ pMpdProfileId_ pMpdAccountId_ =
108− ManagementProfilesDelete'
109− { _mpdQuotaUser = Nothing
110− , _mpdPrettyPrint = False
111− , _mpdWebPropertyId = pMpdWebPropertyId_
112− , _mpdUserIP = Nothing
113− , _mpdProfileId = pMpdProfileId_
114− , _mpdAccountId = pMpdAccountId_
115− , _mpdKey = Nothing
116− , _mpdOAuthToken = Nothing
117− , _mpdFields = Nothing
118− }
119−
120−-- | Available to use for quota purposes for server-side applications. Can be
121−-- any arbitrary string assigned to a user, but should not exceed 40
122−-- characters. Overrides userIp if both are provided.
123−mpdQuotaUser :: Lens' ManagementProfilesDelete' (Maybe Text)
124−mpdQuotaUser
125− = lens _mpdQuotaUser (\ s a -> s{_mpdQuotaUser = a})
126−
127−-- | Returns response with indentations and line breaks.
128−mpdPrettyPrint :: Lens' ManagementProfilesDelete' Bool
129−mpdPrettyPrint
130− = lens _mpdPrettyPrint
131− (\ s a -> s{_mpdPrettyPrint = a})
132−
133−-- | Web property ID to delete the view (profile) for.
134−mpdWebPropertyId :: Lens' ManagementProfilesDelete' Text
135−mpdWebPropertyId
136− = lens _mpdWebPropertyId
137− (\ s a -> s{_mpdWebPropertyId = a})
138−
139−-- | IP address of the site where the request originates. Use this if you
140−-- want to enforce per-user limits.
141−mpdUserIP :: Lens' ManagementProfilesDelete' (Maybe Text)
142−mpdUserIP
143− = lens _mpdUserIP (\ s a -> s{_mpdUserIP = a})
144−
145−-- | ID of the view (profile) to be deleted.
146−mpdProfileId :: Lens' ManagementProfilesDelete' Text
147−mpdProfileId
148− = lens _mpdProfileId (\ s a -> s{_mpdProfileId = a})
149−
150−-- | Account ID to delete the view (profile) for.
151−mpdAccountId :: Lens' ManagementProfilesDelete' Text
152−mpdAccountId
153− = lens _mpdAccountId (\ s a -> s{_mpdAccountId = a})
154−
155−-- | API key. Your API key identifies your project and provides you with API
156−-- access, quota, and reports. Required unless you provide an OAuth 2.0
157−-- token.
158−mpdKey :: Lens' ManagementProfilesDelete' (Maybe Key)
159−mpdKey = lens _mpdKey (\ s a -> s{_mpdKey = a})
160−
161−-- | OAuth 2.0 token for the current user.
162−mpdOAuthToken :: Lens' ManagementProfilesDelete' (Maybe OAuthToken)
163−mpdOAuthToken
164− = lens _mpdOAuthToken
165− (\ s a -> s{_mpdOAuthToken = a})
166−
167−-- | Selector specifying which fields to include in a partial response.
168−mpdFields :: Lens' ManagementProfilesDelete' (Maybe Text)
169−mpdFields
170− = lens _mpdFields (\ s a -> s{_mpdFields = a})
171−
172−instance GoogleAuth ManagementProfilesDelete' where
173− authKey = mpdKey . _Just
174− authToken = mpdOAuthToken . _Just
175−
176−instance GoogleRequest ManagementProfilesDelete'
177− where
178− type Rs ManagementProfilesDelete' = ()
179− request = requestWithRoute defReq analyticsURL
180− requestWithRoute r u ManagementProfilesDelete'{..}
181− = go _mpdAccountId _mpdWebPropertyId _mpdProfileId
182− _mpdQuotaUser
183− (Just _mpdPrettyPrint)
184− _mpdUserIP
185− _mpdFields
186− _mpdKey
187− _mpdOAuthToken
188− (Just AltJSON)
189− where go
190− = clientWithRoute
191− (Proxy :: Proxy ManagementProfilesDeleteResource)
192− r
193− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Get.hsdeleted−192
@@ -1,192 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Gets a view (profile) to which the user has access.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesGet@.
24−module Network.Google.Resource.Analytics.Management.Profiles.Get
25− (
26− -- * REST Resource
27− ManagementProfilesGetResource
28−
29− -- * Creating a Request
30− , managementProfilesGet'
31− , ManagementProfilesGet'
32−
33− -- * Request Lenses
34− , mpgQuotaUser
35− , mpgPrettyPrint
36− , mpgWebPropertyId
37− , mpgUserIP
38− , mpgProfileId
39− , mpgAccountId
40− , mpgKey
41− , mpgOAuthToken
42− , mpgFields
43− ) where
44−
45−import Network.Google.Analytics.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AnalyticsManagementProfilesGet@ which the
49−-- 'ManagementProfilesGet'' request conforms to.
50−type ManagementProfilesGetResource =
51− "management" :>
52− "accounts" :>
53− Capture "accountId" Text :>
54− "webproperties" :>
55− Capture "webPropertyId" Text :>
56− "profiles" :>
57− Capture "profileId" Text :>
58− QueryParam "quotaUser" Text :>
59− QueryParam "prettyPrint" Bool :>
60− QueryParam "userIp" Text :>
61− QueryParam "fields" Text :>
62− QueryParam "key" Key :>
63− QueryParam "oauth_token" OAuthToken :>
64− QueryParam "alt" AltJSON :> Get '[JSON] Profile
65−
66−-- | Gets a view (profile) to which the user has access.
67−--
68−-- /See:/ 'managementProfilesGet'' smart constructor.
69−data ManagementProfilesGet' = ManagementProfilesGet'
70− { _mpgQuotaUser :: !(Maybe Text)
71− , _mpgPrettyPrint :: !Bool
72− , _mpgWebPropertyId :: !Text
73− , _mpgUserIP :: !(Maybe Text)
74− , _mpgProfileId :: !Text
75− , _mpgAccountId :: !Text
76− , _mpgKey :: !(Maybe Key)
77− , _mpgOAuthToken :: !(Maybe OAuthToken)
78− , _mpgFields :: !(Maybe Text)
79− } deriving (Eq,Show,Data,Typeable,Generic)
80−
81−-- | Creates a value of 'ManagementProfilesGet'' with the minimum fields required to make a request.
82−--
83−-- Use one of the following lenses to modify other fields as desired:
84−--
85−-- * 'mpgQuotaUser'
86−--
87−-- * 'mpgPrettyPrint'
88−--
89−-- * 'mpgWebPropertyId'
90−--
91−-- * 'mpgUserIP'
92−--
93−-- * 'mpgProfileId'
94−--
95−-- * 'mpgAccountId'
96−--
97−-- * 'mpgKey'
98−--
99−-- * 'mpgOAuthToken'
100−--
101−-- * 'mpgFields'
102−managementProfilesGet'
103− :: Text -- ^ 'webPropertyId'
104− -> Text -- ^ 'profileId'
105− -> Text -- ^ 'accountId'
106− -> ManagementProfilesGet'
107−managementProfilesGet' pMpgWebPropertyId_ pMpgProfileId_ pMpgAccountId_ =
108− ManagementProfilesGet'
109− { _mpgQuotaUser = Nothing
110− , _mpgPrettyPrint = False
111− , _mpgWebPropertyId = pMpgWebPropertyId_
112− , _mpgUserIP = Nothing
113− , _mpgProfileId = pMpgProfileId_
114− , _mpgAccountId = pMpgAccountId_
115− , _mpgKey = Nothing
116− , _mpgOAuthToken = Nothing
117− , _mpgFields = Nothing
118− }
119−
120−-- | Available to use for quota purposes for server-side applications. Can be
121−-- any arbitrary string assigned to a user, but should not exceed 40
122−-- characters. Overrides userIp if both are provided.
123−mpgQuotaUser :: Lens' ManagementProfilesGet' (Maybe Text)
124−mpgQuotaUser
125− = lens _mpgQuotaUser (\ s a -> s{_mpgQuotaUser = a})
126−
127−-- | Returns response with indentations and line breaks.
128−mpgPrettyPrint :: Lens' ManagementProfilesGet' Bool
129−mpgPrettyPrint
130− = lens _mpgPrettyPrint
131− (\ s a -> s{_mpgPrettyPrint = a})
132−
133−-- | Web property ID to retrieve the goal for.
134−mpgWebPropertyId :: Lens' ManagementProfilesGet' Text
135−mpgWebPropertyId
136− = lens _mpgWebPropertyId
137− (\ s a -> s{_mpgWebPropertyId = a})
138−
139−-- | IP address of the site where the request originates. Use this if you
140−-- want to enforce per-user limits.
141−mpgUserIP :: Lens' ManagementProfilesGet' (Maybe Text)
142−mpgUserIP
143− = lens _mpgUserIP (\ s a -> s{_mpgUserIP = a})
144−
145−-- | View (Profile) ID to retrieve the goal for.
146−mpgProfileId :: Lens' ManagementProfilesGet' Text
147−mpgProfileId
148− = lens _mpgProfileId (\ s a -> s{_mpgProfileId = a})
149−
150−-- | Account ID to retrieve the goal for.
151−mpgAccountId :: Lens' ManagementProfilesGet' Text
152−mpgAccountId
153− = lens _mpgAccountId (\ s a -> s{_mpgAccountId = a})
154−
155−-- | API key. Your API key identifies your project and provides you with API
156−-- access, quota, and reports. Required unless you provide an OAuth 2.0
157−-- token.
158−mpgKey :: Lens' ManagementProfilesGet' (Maybe Key)
159−mpgKey = lens _mpgKey (\ s a -> s{_mpgKey = a})
160−
161−-- | OAuth 2.0 token for the current user.
162−mpgOAuthToken :: Lens' ManagementProfilesGet' (Maybe OAuthToken)
163−mpgOAuthToken
164− = lens _mpgOAuthToken
165− (\ s a -> s{_mpgOAuthToken = a})
166−
167−-- | Selector specifying which fields to include in a partial response.
168−mpgFields :: Lens' ManagementProfilesGet' (Maybe Text)
169−mpgFields
170− = lens _mpgFields (\ s a -> s{_mpgFields = a})
171−
172−instance GoogleAuth ManagementProfilesGet' where
173− authKey = mpgKey . _Just
174− authToken = mpgOAuthToken . _Just
175−
176−instance GoogleRequest ManagementProfilesGet' where
177− type Rs ManagementProfilesGet' = Profile
178− request = requestWithRoute defReq analyticsURL
179− requestWithRoute r u ManagementProfilesGet'{..}
180− = go _mpgAccountId _mpgWebPropertyId _mpgProfileId
181− _mpgQuotaUser
182− (Just _mpgPrettyPrint)
183− _mpgUserIP
184− _mpgFields
185− _mpgKey
186− _mpgOAuthToken
187− (Just AltJSON)
188− where go
189− = clientWithRoute
190− (Proxy :: Proxy ManagementProfilesGetResource)
191− r
192− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Insert.hsdeleted−193
@@ -1,193 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.Insert
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Create a new view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesInsert@.
24−module Network.Google.Resource.Analytics.Management.Profiles.Insert
25− (
26− -- * REST Resource
27− ManagementProfilesInsertResource
28−
29− -- * Creating a Request
30− , managementProfilesInsert'
31− , ManagementProfilesInsert'
32−
33− -- * Request Lenses
34− , mpiQuotaUser
35− , mpiPrettyPrint
36− , mpiWebPropertyId
37− , mpiUserIP
38− , mpiPayload
39− , mpiAccountId
40− , mpiKey
41− , mpiOAuthToken
42− , mpiFields
43− ) where
44−
45−import Network.Google.Analytics.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AnalyticsManagementProfilesInsert@ which the
49−-- 'ManagementProfilesInsert'' request conforms to.
50−type ManagementProfilesInsertResource =
51− "management" :>
52− "accounts" :>
53− Capture "accountId" Text :>
54− "webproperties" :>
55− Capture "webPropertyId" Text :>
56− "profiles" :>
57− QueryParam "quotaUser" Text :>
58− QueryParam "prettyPrint" Bool :>
59− QueryParam "userIp" Text :>
60− QueryParam "fields" Text :>
61− QueryParam "key" Key :>
62− QueryParam "oauth_token" OAuthToken :>
63− QueryParam "alt" AltJSON :>
64− ReqBody '[JSON] Profile :> Post '[JSON] Profile
65−
66−-- | Create a new view (profile).
67−--
68−-- /See:/ 'managementProfilesInsert'' smart constructor.
69−data ManagementProfilesInsert' = ManagementProfilesInsert'
70− { _mpiQuotaUser :: !(Maybe Text)
71− , _mpiPrettyPrint :: !Bool
72− , _mpiWebPropertyId :: !Text
73− , _mpiUserIP :: !(Maybe Text)
74− , _mpiPayload :: !Profile
75− , _mpiAccountId :: !Text
76− , _mpiKey :: !(Maybe Key)
77− , _mpiOAuthToken :: !(Maybe OAuthToken)
78− , _mpiFields :: !(Maybe Text)
79− } deriving (Eq,Show,Data,Typeable,Generic)
80−
81−-- | Creates a value of 'ManagementProfilesInsert'' with the minimum fields required to make a request.
82−--
83−-- Use one of the following lenses to modify other fields as desired:
84−--
85−-- * 'mpiQuotaUser'
86−--
87−-- * 'mpiPrettyPrint'
88−--
89−-- * 'mpiWebPropertyId'
90−--
91−-- * 'mpiUserIP'
92−--
93−-- * 'mpiPayload'
94−--
95−-- * 'mpiAccountId'
96−--
97−-- * 'mpiKey'
98−--
99−-- * 'mpiOAuthToken'
100−--
101−-- * 'mpiFields'
102−managementProfilesInsert'
103− :: Text -- ^ 'webPropertyId'
104− -> Profile -- ^ 'payload'
105− -> Text -- ^ 'accountId'
106− -> ManagementProfilesInsert'
107−managementProfilesInsert' pMpiWebPropertyId_ pMpiPayload_ pMpiAccountId_ =
108− ManagementProfilesInsert'
109− { _mpiQuotaUser = Nothing
110− , _mpiPrettyPrint = False
111− , _mpiWebPropertyId = pMpiWebPropertyId_
112− , _mpiUserIP = Nothing
113− , _mpiPayload = pMpiPayload_
114− , _mpiAccountId = pMpiAccountId_
115− , _mpiKey = Nothing
116− , _mpiOAuthToken = Nothing
117− , _mpiFields = Nothing
118− }
119−
120−-- | Available to use for quota purposes for server-side applications. Can be
121−-- any arbitrary string assigned to a user, but should not exceed 40
122−-- characters. Overrides userIp if both are provided.
123−mpiQuotaUser :: Lens' ManagementProfilesInsert' (Maybe Text)
124−mpiQuotaUser
125− = lens _mpiQuotaUser (\ s a -> s{_mpiQuotaUser = a})
126−
127−-- | Returns response with indentations and line breaks.
128−mpiPrettyPrint :: Lens' ManagementProfilesInsert' Bool
129−mpiPrettyPrint
130− = lens _mpiPrettyPrint
131− (\ s a -> s{_mpiPrettyPrint = a})
132−
133−-- | Web property ID to create the view (profile) for.
134−mpiWebPropertyId :: Lens' ManagementProfilesInsert' Text
135−mpiWebPropertyId
136− = lens _mpiWebPropertyId
137− (\ s a -> s{_mpiWebPropertyId = a})
138−
139−-- | IP address of the site where the request originates. Use this if you
140−-- want to enforce per-user limits.
141−mpiUserIP :: Lens' ManagementProfilesInsert' (Maybe Text)
142−mpiUserIP
143− = lens _mpiUserIP (\ s a -> s{_mpiUserIP = a})
144−
145−-- | Multipart request metadata.
146−mpiPayload :: Lens' ManagementProfilesInsert' Profile
147−mpiPayload
148− = lens _mpiPayload (\ s a -> s{_mpiPayload = a})
149−
150−-- | Account ID to create the view (profile) for.
151−mpiAccountId :: Lens' ManagementProfilesInsert' Text
152−mpiAccountId
153− = lens _mpiAccountId (\ s a -> s{_mpiAccountId = a})
154−
155−-- | API key. Your API key identifies your project and provides you with API
156−-- access, quota, and reports. Required unless you provide an OAuth 2.0
157−-- token.
158−mpiKey :: Lens' ManagementProfilesInsert' (Maybe Key)
159−mpiKey = lens _mpiKey (\ s a -> s{_mpiKey = a})
160−
161−-- | OAuth 2.0 token for the current user.
162−mpiOAuthToken :: Lens' ManagementProfilesInsert' (Maybe OAuthToken)
163−mpiOAuthToken
164− = lens _mpiOAuthToken
165− (\ s a -> s{_mpiOAuthToken = a})
166−
167−-- | Selector specifying which fields to include in a partial response.
168−mpiFields :: Lens' ManagementProfilesInsert' (Maybe Text)
169−mpiFields
170− = lens _mpiFields (\ s a -> s{_mpiFields = a})
171−
172−instance GoogleAuth ManagementProfilesInsert' where
173− authKey = mpiKey . _Just
174− authToken = mpiOAuthToken . _Just
175−
176−instance GoogleRequest ManagementProfilesInsert'
177− where
178− type Rs ManagementProfilesInsert' = Profile
179− request = requestWithRoute defReq analyticsURL
180− requestWithRoute r u ManagementProfilesInsert'{..}
181− = go _mpiAccountId _mpiWebPropertyId _mpiQuotaUser
182− (Just _mpiPrettyPrint)
183− _mpiUserIP
184− _mpiFields
185− _mpiKey
186− _mpiOAuthToken
187− (Just AltJSON)
188− _mpiPayload
189− where go
190− = clientWithRoute
191− (Proxy :: Proxy ManagementProfilesInsertResource)
192− r
193− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/List.hsdeleted−211
@@ -1,211 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Lists views (profiles) to which the user has access.
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesList@.
24−module Network.Google.Resource.Analytics.Management.Profiles.List
25− (
26− -- * REST Resource
27− ManagementProfilesListResource
28−
29− -- * Creating a Request
30− , managementProfilesList'
31− , ManagementProfilesList'
32−
33− -- * Request Lenses
34− , mplQuotaUser
35− , mplPrettyPrint
36− , mplWebPropertyId
37− , mplUserIP
38− , mplAccountId
39− , mplKey
40− , mplOAuthToken
41− , mplStartIndex
42− , mplMaxResults
43− , mplFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfilesList@ which the
50−-- 'ManagementProfilesList'' request conforms to.
51−type ManagementProfilesListResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− QueryParam "start-index" Int32 :>
59− QueryParam "max-results" Int32 :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "fields" Text :>
64− QueryParam "key" Key :>
65− QueryParam "oauth_token" OAuthToken :>
66− QueryParam "alt" AltJSON :>
67− Get '[JSON] Profiles
68−
69−-- | Lists views (profiles) to which the user has access.
70−--
71−-- /See:/ 'managementProfilesList'' smart constructor.
72−data ManagementProfilesList' = ManagementProfilesList'
73− { _mplQuotaUser :: !(Maybe Text)
74− , _mplPrettyPrint :: !Bool
75− , _mplWebPropertyId :: !Text
76− , _mplUserIP :: !(Maybe Text)
77− , _mplAccountId :: !Text
78− , _mplKey :: !(Maybe Key)
79− , _mplOAuthToken :: !(Maybe OAuthToken)
80− , _mplStartIndex :: !(Maybe Int32)
81− , _mplMaxResults :: !(Maybe Int32)
82− , _mplFields :: !(Maybe Text)
83− } deriving (Eq,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'ManagementProfilesList'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'mplQuotaUser'
90−--
91−-- * 'mplPrettyPrint'
92−--
93−-- * 'mplWebPropertyId'
94−--
95−-- * 'mplUserIP'
96−--
97−-- * 'mplAccountId'
98−--
99−-- * 'mplKey'
100−--
101−-- * 'mplOAuthToken'
102−--
103−-- * 'mplStartIndex'
104−--
105−-- * 'mplMaxResults'
106−--
107−-- * 'mplFields'
108−managementProfilesList'
109− :: Text -- ^ 'webPropertyId'
110− -> Text -- ^ 'accountId'
111− -> ManagementProfilesList'
112−managementProfilesList' pMplWebPropertyId_ pMplAccountId_ =
113− ManagementProfilesList'
114− { _mplQuotaUser = Nothing
115− , _mplPrettyPrint = False
116− , _mplWebPropertyId = pMplWebPropertyId_
117− , _mplUserIP = Nothing
118− , _mplAccountId = pMplAccountId_
119− , _mplKey = Nothing
120− , _mplOAuthToken = Nothing
121− , _mplStartIndex = Nothing
122− , _mplMaxResults = Nothing
123− , _mplFields = Nothing
124− }
125−
126−-- | Available to use for quota purposes for server-side applications. Can be
127−-- any arbitrary string assigned to a user, but should not exceed 40
128−-- characters. Overrides userIp if both are provided.
129−mplQuotaUser :: Lens' ManagementProfilesList' (Maybe Text)
130−mplQuotaUser
131− = lens _mplQuotaUser (\ s a -> s{_mplQuotaUser = a})
132−
133−-- | Returns response with indentations and line breaks.
134−mplPrettyPrint :: Lens' ManagementProfilesList' Bool
135−mplPrettyPrint
136− = lens _mplPrettyPrint
137− (\ s a -> s{_mplPrettyPrint = a})
138−
139−-- | Web property ID for the views (profiles) to retrieve. Can either be a
140−-- specific web property ID or \'~all\', which refers to all the web
141−-- properties to which the user has access.
142−mplWebPropertyId :: Lens' ManagementProfilesList' Text
143−mplWebPropertyId
144− = lens _mplWebPropertyId
145− (\ s a -> s{_mplWebPropertyId = a})
146−
147−-- | IP address of the site where the request originates. Use this if you
148−-- want to enforce per-user limits.
149−mplUserIP :: Lens' ManagementProfilesList' (Maybe Text)
150−mplUserIP
151− = lens _mplUserIP (\ s a -> s{_mplUserIP = a})
152−
153−-- | Account ID for the view (profiles) to retrieve. Can either be a specific
154−-- account ID or \'~all\', which refers to all the accounts to which the
155−-- user has access.
156−mplAccountId :: Lens' ManagementProfilesList' Text
157−mplAccountId
158− = lens _mplAccountId (\ s a -> s{_mplAccountId = a})
159−
160−-- | API key. Your API key identifies your project and provides you with API
161−-- access, quota, and reports. Required unless you provide an OAuth 2.0
162−-- token.
163−mplKey :: Lens' ManagementProfilesList' (Maybe Key)
164−mplKey = lens _mplKey (\ s a -> s{_mplKey = a})
165−
166−-- | OAuth 2.0 token for the current user.
167−mplOAuthToken :: Lens' ManagementProfilesList' (Maybe OAuthToken)
168−mplOAuthToken
169− = lens _mplOAuthToken
170− (\ s a -> s{_mplOAuthToken = a})
171−
172−-- | An index of the first entity to retrieve. Use this parameter as a
173−-- pagination mechanism along with the max-results parameter.
174−mplStartIndex :: Lens' ManagementProfilesList' (Maybe Int32)
175−mplStartIndex
176− = lens _mplStartIndex
177− (\ s a -> s{_mplStartIndex = a})
178−
179−-- | The maximum number of views (profiles) to include in this response.
180−mplMaxResults :: Lens' ManagementProfilesList' (Maybe Int32)
181−mplMaxResults
182− = lens _mplMaxResults
183− (\ s a -> s{_mplMaxResults = a})
184−
185−-- | Selector specifying which fields to include in a partial response.
186−mplFields :: Lens' ManagementProfilesList' (Maybe Text)
187−mplFields
188− = lens _mplFields (\ s a -> s{_mplFields = a})
189−
190−instance GoogleAuth ManagementProfilesList' where
191− authKey = mplKey . _Just
192− authToken = mplOAuthToken . _Just
193−
194−instance GoogleRequest ManagementProfilesList' where
195− type Rs ManagementProfilesList' = Profiles
196− request = requestWithRoute defReq analyticsURL
197− requestWithRoute r u ManagementProfilesList'{..}
198− = go _mplAccountId _mplWebPropertyId _mplStartIndex
199− _mplMaxResults
200− _mplQuotaUser
201− (Just _mplPrettyPrint)
202− _mplUserIP
203− _mplFields
204− _mplKey
205− _mplOAuthToken
206− (Just AltJSON)
207− where go
208− = clientWithRoute
209− (Proxy :: Proxy ManagementProfilesListResource)
210− r
211− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Patch.hsdeleted−208
@@ -1,208 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.Patch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates an existing view (profile). This method supports patch
22−-- semantics.
23−--
24−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesPatch@.
25−module Network.Google.Resource.Analytics.Management.Profiles.Patch
26− (
27− -- * REST Resource
28− ManagementProfilesPatchResource
29−
30− -- * Creating a Request
31− , managementProfilesPatch'
32− , ManagementProfilesPatch'
33−
34− -- * Request Lenses
35− , mppQuotaUser
36− , mppPrettyPrint
37− , mppWebPropertyId
38− , mppUserIP
39− , mppProfileId
40− , mppPayload
41− , mppAccountId
42− , mppKey
43− , mppOAuthToken
44− , mppFields
45− ) where
46−
47−import Network.Google.Analytics.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AnalyticsManagementProfilesPatch@ which the
51−-- 'ManagementProfilesPatch'' request conforms to.
52−type ManagementProfilesPatchResource =
53− "management" :>
54− "accounts" :>
55− Capture "accountId" Text :>
56− "webproperties" :>
57− Capture "webPropertyId" Text :>
58− "profiles" :>
59− Capture "profileId" Text :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "fields" Text :>
64− QueryParam "key" Key :>
65− QueryParam "oauth_token" OAuthToken :>
66− QueryParam "alt" AltJSON :>
67− ReqBody '[JSON] Profile :>
68− Patch '[JSON] Profile
69−
70−-- | Updates an existing view (profile). This method supports patch
71−-- semantics.
72−--
73−-- /See:/ 'managementProfilesPatch'' smart constructor.
74−data ManagementProfilesPatch' = ManagementProfilesPatch'
75− { _mppQuotaUser :: !(Maybe Text)
76− , _mppPrettyPrint :: !Bool
77− , _mppWebPropertyId :: !Text
78− , _mppUserIP :: !(Maybe Text)
79− , _mppProfileId :: !Text
80− , _mppPayload :: !Profile
81− , _mppAccountId :: !Text
82− , _mppKey :: !(Maybe Key)
83− , _mppOAuthToken :: !(Maybe OAuthToken)
84− , _mppFields :: !(Maybe Text)
85− } deriving (Eq,Show,Data,Typeable,Generic)
86−
87−-- | Creates a value of 'ManagementProfilesPatch'' with the minimum fields required to make a request.
88−--
89−-- Use one of the following lenses to modify other fields as desired:
90−--
91−-- * 'mppQuotaUser'
92−--
93−-- * 'mppPrettyPrint'
94−--
95−-- * 'mppWebPropertyId'
96−--
97−-- * 'mppUserIP'
98−--
99−-- * 'mppProfileId'
100−--
101−-- * 'mppPayload'
102−--
103−-- * 'mppAccountId'
104−--
105−-- * 'mppKey'
106−--
107−-- * 'mppOAuthToken'
108−--
109−-- * 'mppFields'
110−managementProfilesPatch'
111− :: Text -- ^ 'webPropertyId'
112− -> Text -- ^ 'profileId'
113− -> Profile -- ^ 'payload'
114− -> Text -- ^ 'accountId'
115− -> ManagementProfilesPatch'
116−managementProfilesPatch' pMppWebPropertyId_ pMppProfileId_ pMppPayload_ pMppAccountId_ =
117− ManagementProfilesPatch'
118− { _mppQuotaUser = Nothing
119− , _mppPrettyPrint = False
120− , _mppWebPropertyId = pMppWebPropertyId_
121− , _mppUserIP = Nothing
122− , _mppProfileId = pMppProfileId_
123− , _mppPayload = pMppPayload_
124− , _mppAccountId = pMppAccountId_
125− , _mppKey = Nothing
126− , _mppOAuthToken = Nothing
127− , _mppFields = Nothing
128− }
129−
130−-- | Available to use for quota purposes for server-side applications. Can be
131−-- any arbitrary string assigned to a user, but should not exceed 40
132−-- characters. Overrides userIp if both are provided.
133−mppQuotaUser :: Lens' ManagementProfilesPatch' (Maybe Text)
134−mppQuotaUser
135− = lens _mppQuotaUser (\ s a -> s{_mppQuotaUser = a})
136−
137−-- | Returns response with indentations and line breaks.
138−mppPrettyPrint :: Lens' ManagementProfilesPatch' Bool
139−mppPrettyPrint
140− = lens _mppPrettyPrint
141− (\ s a -> s{_mppPrettyPrint = a})
142−
143−-- | Web property ID to which the view (profile) belongs
144−mppWebPropertyId :: Lens' ManagementProfilesPatch' Text
145−mppWebPropertyId
146− = lens _mppWebPropertyId
147− (\ s a -> s{_mppWebPropertyId = a})
148−
149−-- | IP address of the site where the request originates. Use this if you
150−-- want to enforce per-user limits.
151−mppUserIP :: Lens' ManagementProfilesPatch' (Maybe Text)
152−mppUserIP
153− = lens _mppUserIP (\ s a -> s{_mppUserIP = a})
154−
155−-- | ID of the view (profile) to be updated.
156−mppProfileId :: Lens' ManagementProfilesPatch' Text
157−mppProfileId
158− = lens _mppProfileId (\ s a -> s{_mppProfileId = a})
159−
160−-- | Multipart request metadata.
161−mppPayload :: Lens' ManagementProfilesPatch' Profile
162−mppPayload
163− = lens _mppPayload (\ s a -> s{_mppPayload = a})
164−
165−-- | Account ID to which the view (profile) belongs
166−mppAccountId :: Lens' ManagementProfilesPatch' Text
167−mppAccountId
168− = lens _mppAccountId (\ s a -> s{_mppAccountId = a})
169−
170−-- | API key. Your API key identifies your project and provides you with API
171−-- access, quota, and reports. Required unless you provide an OAuth 2.0
172−-- token.
173−mppKey :: Lens' ManagementProfilesPatch' (Maybe Key)
174−mppKey = lens _mppKey (\ s a -> s{_mppKey = a})
175−
176−-- | OAuth 2.0 token for the current user.
177−mppOAuthToken :: Lens' ManagementProfilesPatch' (Maybe OAuthToken)
178−mppOAuthToken
179− = lens _mppOAuthToken
180− (\ s a -> s{_mppOAuthToken = a})
181−
182−-- | Selector specifying which fields to include in a partial response.
183−mppFields :: Lens' ManagementProfilesPatch' (Maybe Text)
184−mppFields
185− = lens _mppFields (\ s a -> s{_mppFields = a})
186−
187−instance GoogleAuth ManagementProfilesPatch' where
188− authKey = mppKey . _Just
189− authToken = mppOAuthToken . _Just
190−
191−instance GoogleRequest ManagementProfilesPatch' where
192− type Rs ManagementProfilesPatch' = Profile
193− request = requestWithRoute defReq analyticsURL
194− requestWithRoute r u ManagementProfilesPatch'{..}
195− = go _mppAccountId _mppWebPropertyId _mppProfileId
196− _mppQuotaUser
197− (Just _mppPrettyPrint)
198− _mppUserIP
199− _mppFields
200− _mppKey
201− _mppOAuthToken
202− (Just AltJSON)
203− _mppPayload
204− where go
205− = clientWithRoute
206− (Proxy :: Proxy ManagementProfilesPatchResource)
207− r
208− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Update.hsdeleted−206
@@ -1,206 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Analytics.Management.Profiles.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates an existing view (profile).
22−--
23−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementProfilesUpdate@.
24−module Network.Google.Resource.Analytics.Management.Profiles.Update
25− (
26− -- * REST Resource
27− ManagementProfilesUpdateResource
28−
29− -- * Creating a Request
30− , managementProfilesUpdate'
31− , ManagementProfilesUpdate'
32−
33− -- * Request Lenses
34− , mpuQuotaUser
35− , mpuPrettyPrint
36− , mpuWebPropertyId
37− , mpuUserIP
38− , mpuProfileId
39− , mpuPayload
40− , mpuAccountId
41− , mpuKey
42− , mpuOAuthToken
43− , mpuFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementProfilesUpdate@ which the
50−-- 'ManagementProfilesUpdate'' request conforms to.
51−type ManagementProfilesUpdateResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− QueryParam "quotaUser" Text :>
60− QueryParam "prettyPrint" Bool :>
61− QueryParam "userIp" Text :>
62− QueryParam "fields" Text :>
63− QueryParam "key" Key :>
64− QueryParam "oauth_token" OAuthToken :>
65− QueryParam "alt" AltJSON :>
66− ReqBody '[JSON] Profile :> Put '[JSON] Profile
67−
68−-- | Updates an existing view (profile).
69−--
70−-- /See:/ 'managementProfilesUpdate'' smart constructor.
71−data ManagementProfilesUpdate' = ManagementProfilesUpdate'
72− { _mpuQuotaUser :: !(Maybe Text)
73− , _mpuPrettyPrint :: !Bool
74− , _mpuWebPropertyId :: !Text
75− , _mpuUserIP :: !(Maybe Text)
76− , _mpuProfileId :: !Text
77− , _mpuPayload :: !Profile
78− , _mpuAccountId :: !Text
79− , _mpuKey :: !(Maybe Key)
80− , _mpuOAuthToken :: !(Maybe OAuthToken)
81− , _mpuFields :: !(Maybe Text)
82− } deriving (Eq,Show,Data,Typeable,Generic)
83−
84−-- | Creates a value of 'ManagementProfilesUpdate'' with the minimum fields required to make a request.
85−--
86−-- Use one of the following lenses to modify other fields as desired:
87−--
88−-- * 'mpuQuotaUser'
89−--
90−-- * 'mpuPrettyPrint'
91−--
92−-- * 'mpuWebPropertyId'
93−--
94−-- * 'mpuUserIP'
95−--
96−-- * 'mpuProfileId'
97−--
98−-- * 'mpuPayload'
99−--
100−-- * 'mpuAccountId'
101−--
102−-- * 'mpuKey'
103−--
104−-- * 'mpuOAuthToken'
105−--
106−-- * 'mpuFields'
107−managementProfilesUpdate'
108− :: Text -- ^ 'webPropertyId'
109− -> Text -- ^ 'profileId'
110− -> Profile -- ^ 'payload'
111− -> Text -- ^ 'accountId'
112− -> ManagementProfilesUpdate'
113−managementProfilesUpdate' pMpuWebPropertyId_ pMpuProfileId_ pMpuPayload_ pMpuAccountId_ =
114− ManagementProfilesUpdate'
115− { _mpuQuotaUser = Nothing
116− , _mpuPrettyPrint = False
117− , _mpuWebPropertyId = pMpuWebPropertyId_
118− , _mpuUserIP = Nothing
119− , _mpuProfileId = pMpuProfileId_
120− , _mpuPayload = pMpuPayload_
121− , _mpuAccountId = pMpuAccountId_
122− , _mpuKey = Nothing
123− , _mpuOAuthToken = Nothing
124− , _mpuFields = Nothing
125− }
126−
127−-- | Available to use for quota purposes for server-side applications. Can be
128−-- any arbitrary string assigned to a user, but should not exceed 40
129−-- characters. Overrides userIp if both are provided.
130−mpuQuotaUser :: Lens' ManagementProfilesUpdate' (Maybe Text)
131−mpuQuotaUser
132− = lens _mpuQuotaUser (\ s a -> s{_mpuQuotaUser = a})
133−
134−-- | Returns response with indentations and line breaks.
135−mpuPrettyPrint :: Lens' ManagementProfilesUpdate' Bool
136−mpuPrettyPrint
137− = lens _mpuPrettyPrint
138− (\ s a -> s{_mpuPrettyPrint = a})
139−
140−-- | Web property ID to which the view (profile) belongs
141−mpuWebPropertyId :: Lens' ManagementProfilesUpdate' Text
142−mpuWebPropertyId
143− = lens _mpuWebPropertyId
144− (\ s a -> s{_mpuWebPropertyId = a})
145−
146−-- | IP address of the site where the request originates. Use this if you
147−-- want to enforce per-user limits.
148−mpuUserIP :: Lens' ManagementProfilesUpdate' (Maybe Text)
149−mpuUserIP
150− = lens _mpuUserIP (\ s a -> s{_mpuUserIP = a})
151−
152−-- | ID of the view (profile) to be updated.
153−mpuProfileId :: Lens' ManagementProfilesUpdate' Text
154−mpuProfileId
155− = lens _mpuProfileId (\ s a -> s{_mpuProfileId = a})
156−
157−-- | Multipart request metadata.
158−mpuPayload :: Lens' ManagementProfilesUpdate' Profile
159−mpuPayload
160− = lens _mpuPayload (\ s a -> s{_mpuPayload = a})
161−
162−-- | Account ID to which the view (profile) belongs
163−mpuAccountId :: Lens' ManagementProfilesUpdate' Text
164−mpuAccountId
165− = lens _mpuAccountId (\ s a -> s{_mpuAccountId = a})
166−
167−-- | API key. Your API key identifies your project and provides you with API
168−-- access, quota, and reports. Required unless you provide an OAuth 2.0
169−-- token.
170−mpuKey :: Lens' ManagementProfilesUpdate' (Maybe Key)
171−mpuKey = lens _mpuKey (\ s a -> s{_mpuKey = a})
172−
173−-- | OAuth 2.0 token for the current user.
174−mpuOAuthToken :: Lens' ManagementProfilesUpdate' (Maybe OAuthToken)
175−mpuOAuthToken
176− = lens _mpuOAuthToken
177− (\ s a -> s{_mpuOAuthToken = a})
178−
179−-- | Selector specifying which fields to include in a partial response.
180−mpuFields :: Lens' ManagementProfilesUpdate' (Maybe Text)
181−mpuFields
182− = lens _mpuFields (\ s a -> s{_mpuFields = a})
183−
184−instance GoogleAuth ManagementProfilesUpdate' where
185− authKey = mpuKey . _Just
186− authToken = mpuOAuthToken . _Just
187−
188−instance GoogleRequest ManagementProfilesUpdate'
189− where
190− type Rs ManagementProfilesUpdate' = Profile
191− request = requestWithRoute defReq analyticsURL
192− requestWithRoute r u ManagementProfilesUpdate'{..}
193− = go _mpuAccountId _mpuWebPropertyId _mpuProfileId
194− _mpuQuotaUser
195− (Just _mpuPrettyPrint)
196− _mpuUserIP
197− _mpuFields
198− _mpuKey
199− _mpuOAuthToken
200− (Just AltJSON)
201− _mpuPayload
202− where go
203− = clientWithRoute
204− (Proxy :: Proxy ManagementProfilesUpdateResource)
205− r
206− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hs+1−1
@@ -64,7 +64,7 @@ type ManagementUnSampledReportsInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] UnSampledReport :>
67+ ReqBody '[JSON] UnSampledReport :>
6868 Post '[JSON] UnSampledReport
6969
7070-- | Create a new unsampled report.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/DeleteUploadData.hs+1−1
@@ -64,7 +64,7 @@ type ManagementUploadsDeleteUploadDataResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream]
67+ ReqBody '[JSON]
6868 AnalyticsDataimportDeleteUploadDataRequest
6969 :> Post '[JSON] ()
7070
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+2−1
@@ -64,7 +64,8 @@ type ManagementUploadsUploadDataResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[JSON] Body :> Post '[JSON] Upload
67+ ReqBody '[OctetStream] Body :>
68+ Post '[JSON] Upload
6869
6970-- | Upload data for a custom data source.
7071--
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Insert.hs+1−1
@@ -60,7 +60,7 @@ type ManagementWebPropertiesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] WebProperty :>
63+ ReqBody '[JSON] WebProperty :>
6464 Post '[JSON] WebProperty
6565
6666-- | Create a new property if the account has fewer than 20 properties. Web
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Patch.hs+1−1
@@ -60,7 +60,7 @@ type ManagementWebPropertiesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] WebProperty :>
63+ ReqBody '[JSON] WebProperty :>
6464 Patch '[JSON] WebProperty
6565
6666-- | Updates an existing web property. This method supports patch semantics.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Update.hs+1−1
@@ -60,7 +60,7 @@ type ManagementWebPropertiesUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] WebProperty :>
63+ ReqBody '[JSON] WebProperty :>
6464 Put '[JSON] WebProperty
6565
6666-- | Updates an existing web property.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Insert.hs+1−1
@@ -62,7 +62,7 @@ type ManagementWebPropertyAdWordsLinksInsertResource
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] EntityAdWordsLink :>
65+ ReqBody '[JSON] EntityAdWordsLink :>
6666 Post '[JSON] EntityAdWordsLink
6767
6868-- | Creates a webProperty-AdWords link.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Patch.hs+1−1
@@ -64,7 +64,7 @@ type ManagementWebPropertyAdWordsLinksPatchResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] EntityAdWordsLink :>
67+ ReqBody '[JSON] EntityAdWordsLink :>
6868 Patch '[JSON] EntityAdWordsLink
6969
7070-- | Updates an existing webProperty-AdWords link. This method supports patch
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Update.hs+1−1
@@ -64,7 +64,7 @@ type ManagementWebPropertyAdWordsLinksUpdateResource
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] EntityAdWordsLink :>
67+ ReqBody '[JSON] EntityAdWordsLink :>
6868 Put '[JSON] EntityAdWordsLink
6969
7070-- | Updates an existing webProperty-AdWords link.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Insert.hs+1−1
@@ -61,7 +61,7 @@ type ManagementWebPropertyUserLinksInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] EntityUserLink :>
64+ ReqBody '[JSON] EntityUserLink :>
6565 Post '[JSON] EntityUserLink
6666
6767-- | Adds a new user to the given web property.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Update.hs+1−1
@@ -63,7 +63,7 @@ type ManagementWebPropertyUserLinksUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] EntityUserLink :>
66+ ReqBody '[JSON] EntityUserLink :>
6767 Put '[JSON] EntityUserLink
6868
6969-- | Updates permissions for an existing user on the given web property.
gogol-analytics/gen/Network/Google/Resource/Analytics/Provisioning/CreateAccountTicket.hs+1−1
@@ -55,7 +55,7 @@ type ProvisioningCreateAccountTicketResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] AccountTicket :>
58+ ReqBody '[JSON] AccountTicket :>
5959 Post '[JSON] AccountTicket
6060
6161-- | Creates an account ticket.
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Insert.hs+1−2
@@ -57,8 +57,7 @@ type CollectionsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Collection :>
61− Post '[JSON] Collection
60+ ReqBody '[JSON] Collection :> Post '[JSON] Collection
6261
6362-- | Creates a new collection.
6463--
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Patch.hs+1−1
@@ -59,7 +59,7 @@ type CollectionsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Collection :>
62+ ReqBody '[JSON] Collection :>
6363 Patch '[JSON] Collection
6464
6565-- | Updates a collection. This method supports patch semantics.
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Update.hs+1−2
@@ -59,8 +59,7 @@ type CollectionsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Collection :>
63− Put '[JSON] Collection
62+ ReqBody '[JSON] Collection :> Put '[JSON] Collection
6463
6564-- | Updates a collection.
6665--
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Patch.hs+1−1
@@ -65,7 +65,7 @@ type CollectionviewersPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] User :> Patch '[JSON] User
68+ ReqBody '[JSON] User :> Patch '[JSON] User
6969
7070-- | Adds the user to the list of those specifically allowed to see the
7171-- collection. If the collection\'s visibility is set to viewersOnly then
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Update.hs+1−1
@@ -64,7 +64,7 @@ type CollectionviewersUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] User :> Put '[JSON] User
67+ ReqBody '[JSON] User :> Put '[JSON] User
6868
6969-- | Adds the user to the list of those specifically allowed to see the
7070-- collection. If the collection\'s visibility is set to viewersOnly then
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/SetState.hs+1−1
@@ -67,7 +67,7 @@ type DevicesSetStateResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] DeviceState :>
70+ ReqBody '[JSON] DeviceState :>
7171 Put '[JSON] DeviceState
7272
7373-- | Sets whether a device is enabled or disabled for access by the user to
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Enroll.hs+1−2
@@ -57,8 +57,7 @@ type EnterprisesEnrollResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Enterprise :>
61− Post '[JSON] Enterprise
60+ ReqBody '[JSON] Enterprise :> Post '[JSON] Enterprise
6261
6362-- | Enrolls an enterprise with the calling MDM.
6463--
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Insert.hs+1−2
@@ -57,8 +57,7 @@ type EnterprisesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Enterprise :>
61− Post '[JSON] Enterprise
60+ ReqBody '[JSON] Enterprise :> Post '[JSON] Enterprise
6261
6362-- | Establishes the binding between the MDM and an enterprise. This is now
6463-- deprecated; use enroll instead.
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetAccount.hs+1−1
@@ -58,7 +58,7 @@ type EnterprisesSetAccountResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] EnterpriseAccount :>
61+ ReqBody '[JSON] EnterpriseAccount :>
6262 Put '[JSON] EnterpriseAccount
6363
6464-- | Set the account that will be used to authenticate to the API as the
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Patch.hs+1−1
@@ -65,7 +65,7 @@ type EntitlementsPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] Entitlement :>
68+ ReqBody '[JSON] Entitlement :>
6969 Patch '[JSON] Entitlement
7070
7171-- | Adds or updates an entitlement to an app for a user. This method
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Update.hs+1−1
@@ -64,7 +64,7 @@ type EntitlementsUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Entitlement :>
67+ ReqBody '[JSON] Entitlement :>
6868 Put '[JSON] Entitlement
6969
7070-- | Adds or updates an entitlement to an app for a user.
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Patch.hs+1−1
@@ -67,7 +67,7 @@ type InstallsPatchResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Install :>
70+ ReqBody '[JSON] Install :>
7171 Patch '[JSON] Install
7272
7373-- | Requests to install the latest version of an app to a device. If the app
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Update.hs+1−1
@@ -67,7 +67,7 @@ type InstallsUpdateResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Install :>
70+ ReqBody '[JSON] Install :>
7171 Put '[JSON] Install
7272
7373-- | Requests to install the latest version of an app to a device. If the app
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/Approve.hs+1−1
@@ -61,7 +61,7 @@ type ProductsApproveResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] ProductsApproveRequest :>
64+ ReqBody '[JSON] ProductsApproveRequest :>
6565 Post '[JSON] ()
6666
6767-- | Approves the specified product (and the relevant app permissions, if
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/UpdatePermissions.hs+1−1
@@ -61,7 +61,7 @@ type ProductsUpdatePermissionsResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] ProductPermissions :>
64+ ReqBody '[JSON] ProductPermissions :>
6565 Put '[JSON] ProductPermissions
6666
6767-- | Updates the set of Android app permissions for this app that have been
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/SetAvailableProductSet.hs+1−1
@@ -60,7 +60,7 @@ type UsersSetAvailableProductSetResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ProductSet :>
63+ ReqBody '[JSON] ProductSet :>
6464 Put '[JSON] ProductSet
6565
6666-- | Modifies the set of products a user is entitled to access.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+1−1
@@ -65,7 +65,7 @@ type EditsAPKListingsPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] APKListing :>
68+ ReqBody '[JSON] APKListing :>
6969 Patch '[JSON] APKListing
7070
7171-- | Updates or creates the APK-specific localized listing for a specified
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+1−1
@@ -65,7 +65,7 @@ type EditsAPKListingsUpdateResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] APKListing :>
68+ ReqBody '[JSON] APKListing :>
6969 Put '[JSON] APKListing
7070
7171-- | Updates or creates the APK-specific localized listing for a specified
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Addexternallyhosted.hs+2−3
@@ -63,9 +63,8 @@ type EditsAPKsAddexternallyhostedResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
67− APKsAddExternallyHostedRequest
68− :> Post '[JSON] APKsAddExternallyHostedResponse
66+ ReqBody '[JSON] APKsAddExternallyHostedRequest :>
67+ Post '[JSON] APKsAddExternallyHostedResponse
6968
7069-- | Creates a new APK without uploading the APK itself to Google Play,
7170-- instead hosting the APK at a specified URL. This function is only
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+1−1
@@ -59,7 +59,7 @@ type EditsAPKsUploadResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[JSON] Body :> Post '[JSON] APK
62+ ReqBody '[OctetStream] Body :> Post '[JSON] APK
6363
6464--
6565-- /See:/ 'editsAPKsUpload'' smart constructor.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Patch.hs+1−1
@@ -59,7 +59,7 @@ type EditsDetailsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] AppDetails :>
62+ ReqBody '[JSON] AppDetails :>
6363 Patch '[JSON] AppDetails
6464
6565-- | Updates app details for this edit. This method supports patch semantics.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Update.hs+1−2
@@ -59,8 +59,7 @@ type EditsDetailsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] AppDetails :>
63− Put '[JSON] AppDetails
62+ ReqBody '[JSON] AppDetails :> Put '[JSON] AppDetails
6463
6564-- | Updates app details for this edit.
6665--
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Patch.hs+1−1
@@ -68,7 +68,7 @@ type EditsExpansionFilesPatchResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream] ExpansionFile :>
71+ ReqBody '[JSON] ExpansionFile :>
7272 Patch '[JSON] ExpansionFile
7373
7474-- | Updates the APK\'s Expansion File configuration to reference another
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Update.hs+1−1
@@ -68,7 +68,7 @@ type EditsExpansionFilesUpdateResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream] ExpansionFile :>
71+ ReqBody '[JSON] ExpansionFile :>
7272 Put '[JSON] ExpansionFile
7373
7474-- | Updates the APK\'s Expansion File configuration to reference another
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Upload.hs+1−1
@@ -66,7 +66,7 @@ type EditsExpansionFilesUploadResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[JSON] Body :>
69+ ReqBody '[OctetStream] Body :>
7070 Post '[JSON] ExpansionFilesUploadResponse
7171
7272-- | Uploads and attaches a new Expansion File to the APK specified.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Get.hsdeleted−210
@@ -1,210 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Fetches the Expansion File configuration for the APK specified.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherEditsExpansionfilesGet@.
24−module Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Get
25− (
26− -- * REST Resource
27− EditsExpansionfilesGetResource
28−
29− -- * Creating a Request
30− , editsExpansionfilesGet'
31− , EditsExpansionfilesGet'
32−
33− -- * Request Lenses
34− , eegQuotaUser
35− , eegPrettyPrint
36− , eegPackageName
37− , eegAPKVersionCode
38− , eegUserIP
39− , eegKey
40− , eegExpansionFileType
41− , eegOAuthToken
42− , eegEditId
43− , eegFields
44− ) where
45−
46−import Network.Google.AndroidPublisher.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AndroidPublisherEditsExpansionfilesGet@ which the
50−-- 'EditsExpansionfilesGet'' request conforms to.
51−type EditsExpansionfilesGetResource =
52− Capture "packageName" Text :>
53− "edits" :>
54− Capture "editId" Text :>
55− "apks" :>
56− Capture "apkVersionCode" Int32 :>
57− "expansionFiles" :>
58− Capture "expansionFileType"
59− AndroidPublisherEditsExpansionfilesGetExpansionFileType
60− :>
61− QueryParam "quotaUser" Text :>
62− QueryParam "prettyPrint" Bool :>
63− QueryParam "userIp" Text :>
64− QueryParam "fields" Text :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "alt" AltJSON :>
68− Get '[JSON] ExpansionFile
69−
70−-- | Fetches the Expansion File configuration for the APK specified.
71−--
72−-- /See:/ 'editsExpansionfilesGet'' smart constructor.
73−data EditsExpansionfilesGet' = EditsExpansionfilesGet'
74− { _eegQuotaUser :: !(Maybe Text)
75− , _eegPrettyPrint :: !Bool
76− , _eegPackageName :: !Text
77− , _eegAPKVersionCode :: !Int32
78− , _eegUserIP :: !(Maybe Text)
79− , _eegKey :: !(Maybe Key)
80− , _eegExpansionFileType :: !AndroidPublisherEditsExpansionfilesGetExpansionFileType
81− , _eegOAuthToken :: !(Maybe OAuthToken)
82− , _eegEditId :: !Text
83− , _eegFields :: !(Maybe Text)
84− } deriving (Eq,Show,Data,Typeable,Generic)
85−
86−-- | Creates a value of 'EditsExpansionfilesGet'' with the minimum fields required to make a request.
87−--
88−-- Use one of the following lenses to modify other fields as desired:
89−--
90−-- * 'eegQuotaUser'
91−--
92−-- * 'eegPrettyPrint'
93−--
94−-- * 'eegPackageName'
95−--
96−-- * 'eegAPKVersionCode'
97−--
98−-- * 'eegUserIP'
99−--
100−-- * 'eegKey'
101−--
102−-- * 'eegExpansionFileType'
103−--
104−-- * 'eegOAuthToken'
105−--
106−-- * 'eegEditId'
107−--
108−-- * 'eegFields'
109−editsExpansionfilesGet'
110− :: Text -- ^ 'packageName'
111− -> Int32 -- ^ 'apkVersionCode'
112− -> AndroidPublisherEditsExpansionfilesGetExpansionFileType -- ^ 'expansionFileType'
113− -> Text -- ^ 'editId'
114− -> EditsExpansionfilesGet'
115−editsExpansionfilesGet' pEegPackageName_ pEegAPKVersionCode_ pEegExpansionFileType_ pEegEditId_ =
116− EditsExpansionfilesGet'
117− { _eegQuotaUser = Nothing
118− , _eegPrettyPrint = True
119− , _eegPackageName = pEegPackageName_
120− , _eegAPKVersionCode = pEegAPKVersionCode_
121− , _eegUserIP = Nothing
122− , _eegKey = Nothing
123− , _eegExpansionFileType = pEegExpansionFileType_
124− , _eegOAuthToken = Nothing
125− , _eegEditId = pEegEditId_
126− , _eegFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−eegQuotaUser :: Lens' EditsExpansionfilesGet' (Maybe Text)
133−eegQuotaUser
134− = lens _eegQuotaUser (\ s a -> s{_eegQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−eegPrettyPrint :: Lens' EditsExpansionfilesGet' Bool
138−eegPrettyPrint
139− = lens _eegPrettyPrint
140− (\ s a -> s{_eegPrettyPrint = a})
141−
142−-- | Unique identifier for the Android app that is being updated; for
143−-- example, \"com.spiffygame\".
144−eegPackageName :: Lens' EditsExpansionfilesGet' Text
145−eegPackageName
146− = lens _eegPackageName
147− (\ s a -> s{_eegPackageName = a})
148−
149−-- | The version code of the APK whose Expansion File configuration is being
150−-- read or modified.
151−eegAPKVersionCode :: Lens' EditsExpansionfilesGet' Int32
152−eegAPKVersionCode
153− = lens _eegAPKVersionCode
154− (\ s a -> s{_eegAPKVersionCode = a})
155−
156−-- | IP address of the site where the request originates. Use this if you
157−-- want to enforce per-user limits.
158−eegUserIP :: Lens' EditsExpansionfilesGet' (Maybe Text)
159−eegUserIP
160− = lens _eegUserIP (\ s a -> s{_eegUserIP = a})
161−
162−-- | API key. Your API key identifies your project and provides you with API
163−-- access, quota, and reports. Required unless you provide an OAuth 2.0
164−-- token.
165−eegKey :: Lens' EditsExpansionfilesGet' (Maybe Key)
166−eegKey = lens _eegKey (\ s a -> s{_eegKey = a})
167−
168−eegExpansionFileType :: Lens' EditsExpansionfilesGet' AndroidPublisherEditsExpansionfilesGetExpansionFileType
169−eegExpansionFileType
170− = lens _eegExpansionFileType
171− (\ s a -> s{_eegExpansionFileType = a})
172−
173−-- | OAuth 2.0 token for the current user.
174−eegOAuthToken :: Lens' EditsExpansionfilesGet' (Maybe OAuthToken)
175−eegOAuthToken
176− = lens _eegOAuthToken
177− (\ s a -> s{_eegOAuthToken = a})
178−
179−-- | Unique identifier for this edit.
180−eegEditId :: Lens' EditsExpansionfilesGet' Text
181−eegEditId
182− = lens _eegEditId (\ s a -> s{_eegEditId = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−eegFields :: Lens' EditsExpansionfilesGet' (Maybe Text)
186−eegFields
187− = lens _eegFields (\ s a -> s{_eegFields = a})
188−
189−instance GoogleAuth EditsExpansionfilesGet' where
190− authKey = eegKey . _Just
191− authToken = eegOAuthToken . _Just
192−
193−instance GoogleRequest EditsExpansionfilesGet' where
194− type Rs EditsExpansionfilesGet' = ExpansionFile
195− request = requestWithRoute defReq androidPublisherURL
196− requestWithRoute r u EditsExpansionfilesGet'{..}
197− = go _eegPackageName _eegEditId _eegAPKVersionCode
198− _eegExpansionFileType
199− _eegQuotaUser
200− (Just _eegPrettyPrint)
201− _eegUserIP
202− _eegFields
203− _eegKey
204− _eegOAuthToken
205− (Just AltJSON)
206− where go
207− = clientWithRoute
208− (Proxy :: Proxy EditsExpansionfilesGetResource)
209− r
210− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Patch.hsdeleted−228
@@ -1,228 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Patch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates the APK\'s Expansion File configuration to reference another
22−-- APK\'s Expansion Files. To add a new Expansion File use the Upload
23−-- method. This method supports patch semantics.
24−--
25−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherEditsExpansionfilesPatch@.
26−module Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Patch
27− (
28− -- * REST Resource
29− EditsExpansionfilesPatchResource
30−
31− -- * Creating a Request
32− , editsExpansionfilesPatch'
33− , EditsExpansionfilesPatch'
34−
35− -- * Request Lenses
36− , eepQuotaUser
37− , eepPrettyPrint
38− , eepPackageName
39− , eepAPKVersionCode
40− , eepUserIP
41− , eepPayload
42− , eepKey
43− , eepExpansionFileType
44− , eepOAuthToken
45− , eepEditId
46− , eepFields
47− ) where
48−
49−import Network.Google.AndroidPublisher.Types
50−import Network.Google.Prelude
51−
52−-- | A resource alias for @AndroidPublisherEditsExpansionfilesPatch@ which the
53−-- 'EditsExpansionfilesPatch'' request conforms to.
54−type EditsExpansionfilesPatchResource =
55− Capture "packageName" Text :>
56− "edits" :>
57− Capture "editId" Text :>
58− "apks" :>
59− Capture "apkVersionCode" Int32 :>
60− "expansionFiles" :>
61− Capture "expansionFileType"
62− AndroidPublisherEditsExpansionfilesPatchExpansionFileType
63− :>
64− QueryParam "quotaUser" Text :>
65− QueryParam "prettyPrint" Bool :>
66− QueryParam "userIp" Text :>
67− QueryParam "fields" Text :>
68− QueryParam "key" Key :>
69− QueryParam "oauth_token" OAuthToken :>
70− QueryParam "alt" AltJSON :>
71− ReqBody '[JSON] ExpansionFile :>
72− Patch '[JSON] ExpansionFile
73−
74−-- | Updates the APK\'s Expansion File configuration to reference another
75−-- APK\'s Expansion Files. To add a new Expansion File use the Upload
76−-- method. This method supports patch semantics.
77−--
78−-- /See:/ 'editsExpansionfilesPatch'' smart constructor.
79−data EditsExpansionfilesPatch' = EditsExpansionfilesPatch'
80− { _eepQuotaUser :: !(Maybe Text)
81− , _eepPrettyPrint :: !Bool
82− , _eepPackageName :: !Text
83− , _eepAPKVersionCode :: !Int32
84− , _eepUserIP :: !(Maybe Text)
85− , _eepPayload :: !ExpansionFile
86− , _eepKey :: !(Maybe Key)
87− , _eepExpansionFileType :: !AndroidPublisherEditsExpansionfilesPatchExpansionFileType
88− , _eepOAuthToken :: !(Maybe OAuthToken)
89− , _eepEditId :: !Text
90− , _eepFields :: !(Maybe Text)
91− } deriving (Eq,Show,Data,Typeable,Generic)
92−
93−-- | Creates a value of 'EditsExpansionfilesPatch'' with the minimum fields required to make a request.
94−--
95−-- Use one of the following lenses to modify other fields as desired:
96−--
97−-- * 'eepQuotaUser'
98−--
99−-- * 'eepPrettyPrint'
100−--
101−-- * 'eepPackageName'
102−--
103−-- * 'eepAPKVersionCode'
104−--
105−-- * 'eepUserIP'
106−--
107−-- * 'eepPayload'
108−--
109−-- * 'eepKey'
110−--
111−-- * 'eepExpansionFileType'
112−--
113−-- * 'eepOAuthToken'
114−--
115−-- * 'eepEditId'
116−--
117−-- * 'eepFields'
118−editsExpansionfilesPatch'
119− :: Text -- ^ 'packageName'
120− -> Int32 -- ^ 'apkVersionCode'
121− -> ExpansionFile -- ^ 'payload'
122− -> AndroidPublisherEditsExpansionfilesPatchExpansionFileType -- ^ 'expansionFileType'
123− -> Text -- ^ 'editId'
124− -> EditsExpansionfilesPatch'
125−editsExpansionfilesPatch' pEepPackageName_ pEepAPKVersionCode_ pEepPayload_ pEepExpansionFileType_ pEepEditId_ =
126− EditsExpansionfilesPatch'
127− { _eepQuotaUser = Nothing
128− , _eepPrettyPrint = True
129− , _eepPackageName = pEepPackageName_
130− , _eepAPKVersionCode = pEepAPKVersionCode_
131− , _eepUserIP = Nothing
132− , _eepPayload = pEepPayload_
133− , _eepKey = Nothing
134− , _eepExpansionFileType = pEepExpansionFileType_
135− , _eepOAuthToken = Nothing
136− , _eepEditId = pEepEditId_
137− , _eepFields = Nothing
138− }
139−
140−-- | Available to use for quota purposes for server-side applications. Can be
141−-- any arbitrary string assigned to a user, but should not exceed 40
142−-- characters. Overrides userIp if both are provided.
143−eepQuotaUser :: Lens' EditsExpansionfilesPatch' (Maybe Text)
144−eepQuotaUser
145− = lens _eepQuotaUser (\ s a -> s{_eepQuotaUser = a})
146−
147−-- | Returns response with indentations and line breaks.
148−eepPrettyPrint :: Lens' EditsExpansionfilesPatch' Bool
149−eepPrettyPrint
150− = lens _eepPrettyPrint
151− (\ s a -> s{_eepPrettyPrint = a})
152−
153−-- | Unique identifier for the Android app that is being updated; for
154−-- example, \"com.spiffygame\".
155−eepPackageName :: Lens' EditsExpansionfilesPatch' Text
156−eepPackageName
157− = lens _eepPackageName
158− (\ s a -> s{_eepPackageName = a})
159−
160−-- | The version code of the APK whose Expansion File configuration is being
161−-- read or modified.
162−eepAPKVersionCode :: Lens' EditsExpansionfilesPatch' Int32
163−eepAPKVersionCode
164− = lens _eepAPKVersionCode
165− (\ s a -> s{_eepAPKVersionCode = a})
166−
167−-- | IP address of the site where the request originates. Use this if you
168−-- want to enforce per-user limits.
169−eepUserIP :: Lens' EditsExpansionfilesPatch' (Maybe Text)
170−eepUserIP
171− = lens _eepUserIP (\ s a -> s{_eepUserIP = a})
172−
173−-- | Multipart request metadata.
174−eepPayload :: Lens' EditsExpansionfilesPatch' ExpansionFile
175−eepPayload
176− = lens _eepPayload (\ s a -> s{_eepPayload = a})
177−
178−-- | API key. Your API key identifies your project and provides you with API
179−-- access, quota, and reports. Required unless you provide an OAuth 2.0
180−-- token.
181−eepKey :: Lens' EditsExpansionfilesPatch' (Maybe Key)
182−eepKey = lens _eepKey (\ s a -> s{_eepKey = a})
183−
184−eepExpansionFileType :: Lens' EditsExpansionfilesPatch' AndroidPublisherEditsExpansionfilesPatchExpansionFileType
185−eepExpansionFileType
186− = lens _eepExpansionFileType
187− (\ s a -> s{_eepExpansionFileType = a})
188−
189−-- | OAuth 2.0 token for the current user.
190−eepOAuthToken :: Lens' EditsExpansionfilesPatch' (Maybe OAuthToken)
191−eepOAuthToken
192− = lens _eepOAuthToken
193− (\ s a -> s{_eepOAuthToken = a})
194−
195−-- | Unique identifier for this edit.
196−eepEditId :: Lens' EditsExpansionfilesPatch' Text
197−eepEditId
198− = lens _eepEditId (\ s a -> s{_eepEditId = a})
199−
200−-- | Selector specifying which fields to include in a partial response.
201−eepFields :: Lens' EditsExpansionfilesPatch' (Maybe Text)
202−eepFields
203− = lens _eepFields (\ s a -> s{_eepFields = a})
204−
205−instance GoogleAuth EditsExpansionfilesPatch' where
206− authKey = eepKey . _Just
207− authToken = eepOAuthToken . _Just
208−
209−instance GoogleRequest EditsExpansionfilesPatch'
210− where
211− type Rs EditsExpansionfilesPatch' = ExpansionFile
212− request = requestWithRoute defReq androidPublisherURL
213− requestWithRoute r u EditsExpansionfilesPatch'{..}
214− = go _eepPackageName _eepEditId _eepAPKVersionCode
215− _eepExpansionFileType
216− _eepQuotaUser
217− (Just _eepPrettyPrint)
218− _eepUserIP
219− _eepFields
220− _eepKey
221− _eepOAuthToken
222− (Just AltJSON)
223− _eepPayload
224− where go
225− = clientWithRoute
226− (Proxy :: Proxy EditsExpansionfilesPatchResource)
227− r
228− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Update.hsdeleted−221
@@ -1,221 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates the APK\'s Expansion File configuration to reference another
22−-- APK\'s Expansion Files. To add a new Expansion File use the Upload
23−-- method.
24−--
25−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherEditsExpansionfilesUpdate@.
26−module Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Update
27− (
28− -- * REST Resource
29− EditsExpansionfilesUpdateResource
30−
31− -- * Creating a Request
32− , editsExpansionfilesUpdate'
33− , EditsExpansionfilesUpdate'
34−
35− -- * Request Lenses
36− , eQuotaUser
37− , ePrettyPrint
38− , ePackageName
39− , eAPKVersionCode
40− , eUserIP
41− , ePayload
42− , eKey
43− , eExpansionFileType
44− , eOAuthToken
45− , eEditId
46− , eFields
47− ) where
48−
49−import Network.Google.AndroidPublisher.Types
50−import Network.Google.Prelude
51−
52−-- | A resource alias for @AndroidPublisherEditsExpansionfilesUpdate@ which the
53−-- 'EditsExpansionfilesUpdate'' request conforms to.
54−type EditsExpansionfilesUpdateResource =
55− Capture "packageName" Text :>
56− "edits" :>
57− Capture "editId" Text :>
58− "apks" :>
59− Capture "apkVersionCode" Int32 :>
60− "expansionFiles" :>
61− Capture "expansionFileType"
62− AndroidPublisherEditsExpansionfilesUpdateExpansionFileType
63− :>
64− QueryParam "quotaUser" Text :>
65− QueryParam "prettyPrint" Bool :>
66− QueryParam "userIp" Text :>
67− QueryParam "fields" Text :>
68− QueryParam "key" Key :>
69− QueryParam "oauth_token" OAuthToken :>
70− QueryParam "alt" AltJSON :>
71− ReqBody '[JSON] ExpansionFile :>
72− Put '[JSON] ExpansionFile
73−
74−-- | Updates the APK\'s Expansion File configuration to reference another
75−-- APK\'s Expansion Files. To add a new Expansion File use the Upload
76−-- method.
77−--
78−-- /See:/ 'editsExpansionfilesUpdate'' smart constructor.
79−data EditsExpansionfilesUpdate' = EditsExpansionfilesUpdate'
80− { _eQuotaUser :: !(Maybe Text)
81− , _ePrettyPrint :: !Bool
82− , _ePackageName :: !Text
83− , _eAPKVersionCode :: !Int32
84− , _eUserIP :: !(Maybe Text)
85− , _ePayload :: !ExpansionFile
86− , _eKey :: !(Maybe Key)
87− , _eExpansionFileType :: !AndroidPublisherEditsExpansionfilesUpdateExpansionFileType
88− , _eOAuthToken :: !(Maybe OAuthToken)
89− , _eEditId :: !Text
90− , _eFields :: !(Maybe Text)
91− } deriving (Eq,Show,Data,Typeable,Generic)
92−
93−-- | Creates a value of 'EditsExpansionfilesUpdate'' with the minimum fields required to make a request.
94−--
95−-- Use one of the following lenses to modify other fields as desired:
96−--
97−-- * 'eQuotaUser'
98−--
99−-- * 'ePrettyPrint'
100−--
101−-- * 'ePackageName'
102−--
103−-- * 'eAPKVersionCode'
104−--
105−-- * 'eUserIP'
106−--
107−-- * 'ePayload'
108−--
109−-- * 'eKey'
110−--
111−-- * 'eExpansionFileType'
112−--
113−-- * 'eOAuthToken'
114−--
115−-- * 'eEditId'
116−--
117−-- * 'eFields'
118−editsExpansionfilesUpdate'
119− :: Text -- ^ 'packageName'
120− -> Int32 -- ^ 'apkVersionCode'
121− -> ExpansionFile -- ^ 'payload'
122− -> AndroidPublisherEditsExpansionfilesUpdateExpansionFileType -- ^ 'expansionFileType'
123− -> Text -- ^ 'editId'
124− -> EditsExpansionfilesUpdate'
125−editsExpansionfilesUpdate' pEPackageName_ pEAPKVersionCode_ pEPayload_ pEExpansionFileType_ pEEditId_ =
126− EditsExpansionfilesUpdate'
127− { _eQuotaUser = Nothing
128− , _ePrettyPrint = True
129− , _ePackageName = pEPackageName_
130− , _eAPKVersionCode = pEAPKVersionCode_
131− , _eUserIP = Nothing
132− , _ePayload = pEPayload_
133− , _eKey = Nothing
134− , _eExpansionFileType = pEExpansionFileType_
135− , _eOAuthToken = Nothing
136− , _eEditId = pEEditId_
137− , _eFields = Nothing
138− }
139−
140−-- | Available to use for quota purposes for server-side applications. Can be
141−-- any arbitrary string assigned to a user, but should not exceed 40
142−-- characters. Overrides userIp if both are provided.
143−eQuotaUser :: Lens' EditsExpansionfilesUpdate' (Maybe Text)
144−eQuotaUser
145− = lens _eQuotaUser (\ s a -> s{_eQuotaUser = a})
146−
147−-- | Returns response with indentations and line breaks.
148−ePrettyPrint :: Lens' EditsExpansionfilesUpdate' Bool
149−ePrettyPrint
150− = lens _ePrettyPrint (\ s a -> s{_ePrettyPrint = a})
151−
152−-- | Unique identifier for the Android app that is being updated; for
153−-- example, \"com.spiffygame\".
154−ePackageName :: Lens' EditsExpansionfilesUpdate' Text
155−ePackageName
156− = lens _ePackageName (\ s a -> s{_ePackageName = a})
157−
158−-- | The version code of the APK whose Expansion File configuration is being
159−-- read or modified.
160−eAPKVersionCode :: Lens' EditsExpansionfilesUpdate' Int32
161−eAPKVersionCode
162− = lens _eAPKVersionCode
163− (\ s a -> s{_eAPKVersionCode = a})
164−
165−-- | IP address of the site where the request originates. Use this if you
166−-- want to enforce per-user limits.
167−eUserIP :: Lens' EditsExpansionfilesUpdate' (Maybe Text)
168−eUserIP = lens _eUserIP (\ s a -> s{_eUserIP = a})
169−
170−-- | Multipart request metadata.
171−ePayload :: Lens' EditsExpansionfilesUpdate' ExpansionFile
172−ePayload = lens _ePayload (\ s a -> s{_ePayload = a})
173−
174−-- | API key. Your API key identifies your project and provides you with API
175−-- access, quota, and reports. Required unless you provide an OAuth 2.0
176−-- token.
177−eKey :: Lens' EditsExpansionfilesUpdate' (Maybe Key)
178−eKey = lens _eKey (\ s a -> s{_eKey = a})
179−
180−eExpansionFileType :: Lens' EditsExpansionfilesUpdate' AndroidPublisherEditsExpansionfilesUpdateExpansionFileType
181−eExpansionFileType
182− = lens _eExpansionFileType
183− (\ s a -> s{_eExpansionFileType = a})
184−
185−-- | OAuth 2.0 token for the current user.
186−eOAuthToken :: Lens' EditsExpansionfilesUpdate' (Maybe OAuthToken)
187−eOAuthToken
188− = lens _eOAuthToken (\ s a -> s{_eOAuthToken = a})
189−
190−-- | Unique identifier for this edit.
191−eEditId :: Lens' EditsExpansionfilesUpdate' Text
192−eEditId = lens _eEditId (\ s a -> s{_eEditId = a})
193−
194−-- | Selector specifying which fields to include in a partial response.
195−eFields :: Lens' EditsExpansionfilesUpdate' (Maybe Text)
196−eFields = lens _eFields (\ s a -> s{_eFields = a})
197−
198−instance GoogleAuth EditsExpansionfilesUpdate' where
199− authKey = eKey . _Just
200− authToken = eOAuthToken . _Just
201−
202−instance GoogleRequest EditsExpansionfilesUpdate'
203− where
204− type Rs EditsExpansionfilesUpdate' = ExpansionFile
205− request = requestWithRoute defReq androidPublisherURL
206− requestWithRoute r u EditsExpansionfilesUpdate'{..}
207− = go _ePackageName _eEditId _eAPKVersionCode
208− _eExpansionFileType
209− _eQuotaUser
210− (Just _ePrettyPrint)
211− _eUserIP
212− _eFields
213− _eKey
214− _eOAuthToken
215− (Just AltJSON)
216− _ePayload
217− where go
218− = clientWithRoute
219− (Proxy :: Proxy EditsExpansionfilesUpdateResource)
220− r
221− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Upload.hsdeleted−222
@@ -1,222 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Upload
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Uploads and attaches a new Expansion File to the APK specified.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherEditsExpansionfilesUpload@.
24−module Network.Google.Resource.AndroidPublisher.Edits.Expansionfiles.Upload
25− (
26− -- * REST Resource
27− EditsExpansionfilesUploadResource
28−
29− -- * Creating a Request
30− , editsExpansionfilesUpload'
31− , EditsExpansionfilesUpload'
32−
33− -- * Request Lenses
34− , eeuQuotaUser
35− , eeuPrettyPrint
36− , eeuPackageName
37− , eeuAPKVersionCode
38− , eeuUserIP
39− , eeuMedia
40− , eeuKey
41− , eeuExpansionFileType
42− , eeuOAuthToken
43− , eeuEditId
44− , eeuFields
45− ) where
46−
47−import Network.Google.AndroidPublisher.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AndroidPublisherEditsExpansionfilesUpload@ which the
51−-- 'EditsExpansionfilesUpload'' request conforms to.
52−type EditsExpansionfilesUploadResource =
53− Capture "packageName" Text :>
54− "edits" :>
55− Capture "editId" Text :>
56− "apks" :>
57− Capture "apkVersionCode" Int32 :>
58− "expansionFiles" :>
59− Capture "expansionFileType"
60− AndroidPublisherEditsExpansionfilesUploadExpansionFileType
61− :>
62− QueryParam "quotaUser" Text :>
63− QueryParam "prettyPrint" Bool :>
64− QueryParam "userIp" Text :>
65− QueryParam "fields" Text :>
66− QueryParam "key" Key :>
67− QueryParam "oauth_token" OAuthToken :>
68− QueryParam "alt" AltJSON :>
69− Post '[JSON] ExpansionFilesUploadResponse
70−
71−-- | Uploads and attaches a new Expansion File to the APK specified.
72−--
73−-- /See:/ 'editsExpansionfilesUpload'' smart constructor.
74−data EditsExpansionfilesUpload' = EditsExpansionfilesUpload'
75− { _eeuQuotaUser :: !(Maybe Text)
76− , _eeuPrettyPrint :: !Bool
77− , _eeuPackageName :: !Text
78− , _eeuAPKVersionCode :: !Int32
79− , _eeuUserIP :: !(Maybe Text)
80− , _eeuMedia :: !Body
81− , _eeuKey :: !(Maybe Key)
82− , _eeuExpansionFileType :: !AndroidPublisherEditsExpansionfilesUploadExpansionFileType
83− , _eeuOAuthToken :: !(Maybe OAuthToken)
84− , _eeuEditId :: !Text
85− , _eeuFields :: !(Maybe Text)
86− } deriving (Eq,Show,Data,Typeable,Generic)
87−
88−-- | Creates a value of 'EditsExpansionfilesUpload'' with the minimum fields required to make a request.
89−--
90−-- Use one of the following lenses to modify other fields as desired:
91−--
92−-- * 'eeuQuotaUser'
93−--
94−-- * 'eeuPrettyPrint'
95−--
96−-- * 'eeuPackageName'
97−--
98−-- * 'eeuAPKVersionCode'
99−--
100−-- * 'eeuUserIP'
101−--
102−-- * 'eeuMedia'
103−--
104−-- * 'eeuKey'
105−--
106−-- * 'eeuExpansionFileType'
107−--
108−-- * 'eeuOAuthToken'
109−--
110−-- * 'eeuEditId'
111−--
112−-- * 'eeuFields'
113−editsExpansionfilesUpload'
114− :: Text -- ^ 'packageName'
115− -> Int32 -- ^ 'apkVersionCode'
116− -> Body -- ^ 'media'
117− -> AndroidPublisherEditsExpansionfilesUploadExpansionFileType -- ^ 'expansionFileType'
118− -> Text -- ^ 'editId'
119− -> EditsExpansionfilesUpload'
120−editsExpansionfilesUpload' pEeuPackageName_ pEeuAPKVersionCode_ pEeuMedia_ pEeuExpansionFileType_ pEeuEditId_ =
121− EditsExpansionfilesUpload'
122− { _eeuQuotaUser = Nothing
123− , _eeuPrettyPrint = True
124− , _eeuPackageName = pEeuPackageName_
125− , _eeuAPKVersionCode = pEeuAPKVersionCode_
126− , _eeuUserIP = Nothing
127− , _eeuMedia = pEeuMedia_
128− , _eeuKey = Nothing
129− , _eeuExpansionFileType = pEeuExpansionFileType_
130− , _eeuOAuthToken = Nothing
131− , _eeuEditId = pEeuEditId_
132− , _eeuFields = Nothing
133− }
134−
135−-- | Available to use for quota purposes for server-side applications. Can be
136−-- any arbitrary string assigned to a user, but should not exceed 40
137−-- characters. Overrides userIp if both are provided.
138−eeuQuotaUser :: Lens' EditsExpansionfilesUpload' (Maybe Text)
139−eeuQuotaUser
140− = lens _eeuQuotaUser (\ s a -> s{_eeuQuotaUser = a})
141−
142−-- | Returns response with indentations and line breaks.
143−eeuPrettyPrint :: Lens' EditsExpansionfilesUpload' Bool
144−eeuPrettyPrint
145− = lens _eeuPrettyPrint
146− (\ s a -> s{_eeuPrettyPrint = a})
147−
148−-- | Unique identifier for the Android app that is being updated; for
149−-- example, \"com.spiffygame\".
150−eeuPackageName :: Lens' EditsExpansionfilesUpload' Text
151−eeuPackageName
152− = lens _eeuPackageName
153− (\ s a -> s{_eeuPackageName = a})
154−
155−-- | The version code of the APK whose Expansion File configuration is being
156−-- read or modified.
157−eeuAPKVersionCode :: Lens' EditsExpansionfilesUpload' Int32
158−eeuAPKVersionCode
159− = lens _eeuAPKVersionCode
160− (\ s a -> s{_eeuAPKVersionCode = a})
161−
162−-- | IP address of the site where the request originates. Use this if you
163−-- want to enforce per-user limits.
164−eeuUserIP :: Lens' EditsExpansionfilesUpload' (Maybe Text)
165−eeuUserIP
166− = lens _eeuUserIP (\ s a -> s{_eeuUserIP = a})
167−
168−eeuMedia :: Lens' EditsExpansionfilesUpload' Body
169−eeuMedia = lens _eeuMedia (\ s a -> s{_eeuMedia = a})
170−
171−-- | API key. Your API key identifies your project and provides you with API
172−-- access, quota, and reports. Required unless you provide an OAuth 2.0
173−-- token.
174−eeuKey :: Lens' EditsExpansionfilesUpload' (Maybe Key)
175−eeuKey = lens _eeuKey (\ s a -> s{_eeuKey = a})
176−
177−eeuExpansionFileType :: Lens' EditsExpansionfilesUpload' AndroidPublisherEditsExpansionfilesUploadExpansionFileType
178−eeuExpansionFileType
179− = lens _eeuExpansionFileType
180− (\ s a -> s{_eeuExpansionFileType = a})
181−
182−-- | OAuth 2.0 token for the current user.
183−eeuOAuthToken :: Lens' EditsExpansionfilesUpload' (Maybe OAuthToken)
184−eeuOAuthToken
185− = lens _eeuOAuthToken
186− (\ s a -> s{_eeuOAuthToken = a})
187−
188−-- | Unique identifier for this edit.
189−eeuEditId :: Lens' EditsExpansionfilesUpload' Text
190−eeuEditId
191− = lens _eeuEditId (\ s a -> s{_eeuEditId = a})
192−
193−-- | Selector specifying which fields to include in a partial response.
194−eeuFields :: Lens' EditsExpansionfilesUpload' (Maybe Text)
195−eeuFields
196− = lens _eeuFields (\ s a -> s{_eeuFields = a})
197−
198−instance GoogleAuth EditsExpansionfilesUpload' where
199− authKey = eeuKey . _Just
200− authToken = eeuOAuthToken . _Just
201−
202−instance GoogleRequest EditsExpansionfilesUpload'
203− where
204− type Rs EditsExpansionfilesUpload' =
205− ExpansionFilesUploadResponse
206− request = requestWithRoute defReq androidPublisherURL
207− requestWithRoute r u EditsExpansionfilesUpload'{..}
208− = go _eeuPackageName _eeuEditId _eeuAPKVersionCode
209− _eeuExpansionFileType
210− _eeuQuotaUser
211− (Just _eeuPrettyPrint)
212− _eeuUserIP
213− _eeuFields
214− _eeuKey
215− _eeuOAuthToken
216− (Just AltJSON)
217− _eeuMedia
218− where go
219− = clientWithRoute
220− (Proxy :: Proxy EditsExpansionfilesUploadResource)
221− r
222− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Upload.hs+1−1
@@ -64,7 +64,7 @@ type EditsImagesUploadResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[JSON] Body :>
67+ ReqBody '[OctetStream] Body :>
6868 Post '[JSON] ImagesUploadResponse
6969
7070-- | Uploads a new image and adds it to the list of images for the specified
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Insert.hs+1−2
@@ -56,8 +56,7 @@ type EditsInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] AppEdit :>
60− Post '[JSON] AppEdit
59+ ReqBody '[JSON] AppEdit :> Post '[JSON] AppEdit
6160
6261-- | Creates a new edit for an app, populated with the app\'s current state.
6362--
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Patch.hs+1−2
@@ -62,8 +62,7 @@ type EditsListingsPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Listing :>
66− Patch '[JSON] Listing
65+ ReqBody '[JSON] Listing :> Patch '[JSON] Listing
6766
6867-- | Creates or updates a localized store listing. This method supports patch
6968-- semantics.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Update.hs+1−2
@@ -61,8 +61,7 @@ type EditsListingsUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Listing :>
65− Put '[JSON] Listing
64+ ReqBody '[JSON] Listing :> Put '[JSON] Listing
6665
6766-- | Creates or updates a localized store listing.
6867--
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+1−2
@@ -61,8 +61,7 @@ type EditsTestersPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Testers :>
65− Patch '[JSON] Testers
64+ ReqBody '[JSON] Testers :> Patch '[JSON] Testers
6665
6766--
6867-- /See:/ 'editsTestersPatch'' smart constructor.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+1−2
@@ -61,8 +61,7 @@ type EditsTestersUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Testers :>
65− Put '[JSON] Testers
64+ ReqBody '[JSON] Testers :> Put '[JSON] Testers
6665
6766--
6867-- /See:/ 'editsTestersUpdate'' smart constructor.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Patch.hs+1−1
@@ -64,7 +64,7 @@ type EditsTracksPatchResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Track :> Patch '[JSON] Track
67+ ReqBody '[JSON] Track :> Patch '[JSON] Track
6868
6969-- | Updates the track configuration for the specified track type. When
7070-- halted, the rollout track cannot be updated without adding new APKs, and
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+1−1
@@ -63,7 +63,7 @@ type EditsTracksUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Track :> Put '[JSON] Track
66+ ReqBody '[JSON] Track :> Put '[JSON] Track
6767
6868-- | Updates the track configuration for the specified track type. When
6969-- halted, the rollout track cannot be updated without adding new APKs, and
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Batch.hs+1−1
@@ -55,7 +55,7 @@ type InAppProductsBatchResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] InAppProductsBatchRequest :>
58+ ReqBody '[JSON] InAppProductsBatchRequest :>
5959 Post '[JSON] InAppProductsBatchResponse
6060
6161--
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Insert.hs+1−1
@@ -58,7 +58,7 @@ type InAppProductsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] InAppProduct :>
61+ ReqBody '[JSON] InAppProduct :>
6262 Post '[JSON] InAppProduct
6363
6464-- | Creates a new in-app product for an app.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Patch.hs+1−1
@@ -61,7 +61,7 @@ type InAppProductsPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] InAppProduct :>
64+ ReqBody '[JSON] InAppProduct :>
6565 Patch '[JSON] InAppProduct
6666
6767-- | Updates the details of an in-app product. This method supports patch
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Update.hs+1−1
@@ -60,7 +60,7 @@ type InAppProductsUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] InAppProduct :>
63+ ReqBody '[JSON] InAppProduct :>
6464 Put '[JSON] InAppProduct
6565
6666-- | Updates the details of an in-app product.
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Batch.hsdeleted−161
@@ -1,161 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Batch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsBatch@.
24−module Network.Google.Resource.AndroidPublisher.Inappproducts.Batch
25− (
26− -- * REST Resource
27− InappproductsBatchResource
28−
29− -- * Creating a Request
30− , inappproductsBatch'
31− , InappproductsBatch'
32−
33− -- * Request Lenses
34− , ibQuotaUser
35− , ibPrettyPrint
36− , ibUserIP
37− , ibPayload
38− , ibKey
39− , ibOAuthToken
40− , ibFields
41− ) where
42−
43−import Network.Google.AndroidPublisher.Types
44−import Network.Google.Prelude
45−
46−-- | A resource alias for @AndroidPublisherInappproductsBatch@ which the
47−-- 'InappproductsBatch'' request conforms to.
48−type InappproductsBatchResource =
49− "inappproducts" :>
50− "batch" :>
51− QueryParam "quotaUser" Text :>
52− QueryParam "prettyPrint" Bool :>
53− QueryParam "userIp" Text :>
54− QueryParam "fields" Text :>
55− QueryParam "key" Key :>
56− QueryParam "oauth_token" OAuthToken :>
57− QueryParam "alt" AltJSON :>
58− ReqBody '[JSON] InappproductsBatchRequest :>
59− Post '[JSON] InappproductsBatchResponse
60−
61−--
62−-- /See:/ 'inappproductsBatch'' smart constructor.
63−data InappproductsBatch' = InappproductsBatch'
64− { _ibQuotaUser :: !(Maybe Text)
65− , _ibPrettyPrint :: !Bool
66− , _ibUserIP :: !(Maybe Text)
67− , _ibPayload :: !InappproductsBatchRequest
68− , _ibKey :: !(Maybe Key)
69− , _ibOAuthToken :: !(Maybe OAuthToken)
70− , _ibFields :: !(Maybe Text)
71− } deriving (Eq,Show,Data,Typeable,Generic)
72−
73−-- | Creates a value of 'InappproductsBatch'' with the minimum fields required to make a request.
74−--
75−-- Use one of the following lenses to modify other fields as desired:
76−--
77−-- * 'ibQuotaUser'
78−--
79−-- * 'ibPrettyPrint'
80−--
81−-- * 'ibUserIP'
82−--
83−-- * 'ibPayload'
84−--
85−-- * 'ibKey'
86−--
87−-- * 'ibOAuthToken'
88−--
89−-- * 'ibFields'
90−inappproductsBatch'
91− :: InappproductsBatchRequest -- ^ 'payload'
92− -> InappproductsBatch'
93−inappproductsBatch' pIbPayload_ =
94− InappproductsBatch'
95− { _ibQuotaUser = Nothing
96− , _ibPrettyPrint = True
97− , _ibUserIP = Nothing
98− , _ibPayload = pIbPayload_
99− , _ibKey = Nothing
100− , _ibOAuthToken = Nothing
101− , _ibFields = Nothing
102− }
103−
104−-- | Available to use for quota purposes for server-side applications. Can be
105−-- any arbitrary string assigned to a user, but should not exceed 40
106−-- characters. Overrides userIp if both are provided.
107−ibQuotaUser :: Lens' InappproductsBatch' (Maybe Text)
108−ibQuotaUser
109− = lens _ibQuotaUser (\ s a -> s{_ibQuotaUser = a})
110−
111−-- | Returns response with indentations and line breaks.
112−ibPrettyPrint :: Lens' InappproductsBatch' Bool
113−ibPrettyPrint
114− = lens _ibPrettyPrint
115− (\ s a -> s{_ibPrettyPrint = a})
116−
117−-- | IP address of the site where the request originates. Use this if you
118−-- want to enforce per-user limits.
119−ibUserIP :: Lens' InappproductsBatch' (Maybe Text)
120−ibUserIP = lens _ibUserIP (\ s a -> s{_ibUserIP = a})
121−
122−-- | Multipart request metadata.
123−ibPayload :: Lens' InappproductsBatch' InappproductsBatchRequest
124−ibPayload
125− = lens _ibPayload (\ s a -> s{_ibPayload = a})
126−
127−-- | API key. Your API key identifies your project and provides you with API
128−-- access, quota, and reports. Required unless you provide an OAuth 2.0
129−-- token.
130−ibKey :: Lens' InappproductsBatch' (Maybe Key)
131−ibKey = lens _ibKey (\ s a -> s{_ibKey = a})
132−
133−-- | OAuth 2.0 token for the current user.
134−ibOAuthToken :: Lens' InappproductsBatch' (Maybe OAuthToken)
135−ibOAuthToken
136− = lens _ibOAuthToken (\ s a -> s{_ibOAuthToken = a})
137−
138−-- | Selector specifying which fields to include in a partial response.
139−ibFields :: Lens' InappproductsBatch' (Maybe Text)
140−ibFields = lens _ibFields (\ s a -> s{_ibFields = a})
141−
142−instance GoogleAuth InappproductsBatch' where
143− authKey = ibKey . _Just
144− authToken = ibOAuthToken . _Just
145−
146−instance GoogleRequest InappproductsBatch' where
147− type Rs InappproductsBatch' =
148− InappproductsBatchResponse
149− request = requestWithRoute defReq androidPublisherURL
150− requestWithRoute r u InappproductsBatch'{..}
151− = go _ibQuotaUser (Just _ibPrettyPrint) _ibUserIP
152− _ibFields
153− _ibKey
154− _ibOAuthToken
155− (Just AltJSON)
156− _ibPayload
157− where go
158− = clientWithRoute
159− (Proxy :: Proxy InappproductsBatchResource)
160− r
161− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Delete.hsdeleted−173
@@ -1,173 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Delete
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Delete an in-app product for an app.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsDelete@.
24−module Network.Google.Resource.AndroidPublisher.Inappproducts.Delete
25− (
26− -- * REST Resource
27− InappproductsDeleteResource
28−
29− -- * Creating a Request
30− , inappproductsDelete'
31− , InappproductsDelete'
32−
33− -- * Request Lenses
34− , idQuotaUser
35− , idPrettyPrint
36− , idPackageName
37− , idUserIP
38− , idKey
39− , idSKU
40− , idOAuthToken
41− , idFields
42− ) where
43−
44−import Network.Google.AndroidPublisher.Types
45−import Network.Google.Prelude
46−
47−-- | A resource alias for @AndroidPublisherInappproductsDelete@ which the
48−-- 'InappproductsDelete'' request conforms to.
49−type InappproductsDeleteResource =
50− Capture "packageName" Text :>
51− "inappproducts" :>
52− Capture "sku" Text :>
53− QueryParam "quotaUser" Text :>
54− QueryParam "prettyPrint" Bool :>
55− QueryParam "userIp" Text :>
56− QueryParam "fields" Text :>
57− QueryParam "key" Key :>
58− QueryParam "oauth_token" OAuthToken :>
59− QueryParam "alt" AltJSON :> Delete '[JSON] ()
60−
61−-- | Delete an in-app product for an app.
62−--
63−-- /See:/ 'inappproductsDelete'' smart constructor.
64−data InappproductsDelete' = InappproductsDelete'
65− { _idQuotaUser :: !(Maybe Text)
66− , _idPrettyPrint :: !Bool
67− , _idPackageName :: !Text
68− , _idUserIP :: !(Maybe Text)
69− , _idKey :: !(Maybe Key)
70− , _idSKU :: !Text
71− , _idOAuthToken :: !(Maybe OAuthToken)
72− , _idFields :: !(Maybe Text)
73− } deriving (Eq,Show,Data,Typeable,Generic)
74−
75−-- | Creates a value of 'InappproductsDelete'' with the minimum fields required to make a request.
76−--
77−-- Use one of the following lenses to modify other fields as desired:
78−--
79−-- * 'idQuotaUser'
80−--
81−-- * 'idPrettyPrint'
82−--
83−-- * 'idPackageName'
84−--
85−-- * 'idUserIP'
86−--
87−-- * 'idKey'
88−--
89−-- * 'idSKU'
90−--
91−-- * 'idOAuthToken'
92−--
93−-- * 'idFields'
94−inappproductsDelete'
95− :: Text -- ^ 'packageName'
96− -> Text -- ^ 'sku'
97− -> InappproductsDelete'
98−inappproductsDelete' pIdPackageName_ pIdSKU_ =
99− InappproductsDelete'
100− { _idQuotaUser = Nothing
101− , _idPrettyPrint = True
102− , _idPackageName = pIdPackageName_
103− , _idUserIP = Nothing
104− , _idKey = Nothing
105− , _idSKU = pIdSKU_
106− , _idOAuthToken = Nothing
107− , _idFields = Nothing
108− }
109−
110−-- | Available to use for quota purposes for server-side applications. Can be
111−-- any arbitrary string assigned to a user, but should not exceed 40
112−-- characters. Overrides userIp if both are provided.
113−idQuotaUser :: Lens' InappproductsDelete' (Maybe Text)
114−idQuotaUser
115− = lens _idQuotaUser (\ s a -> s{_idQuotaUser = a})
116−
117−-- | Returns response with indentations and line breaks.
118−idPrettyPrint :: Lens' InappproductsDelete' Bool
119−idPrettyPrint
120− = lens _idPrettyPrint
121− (\ s a -> s{_idPrettyPrint = a})
122−
123−-- | Unique identifier for the Android app with the in-app product; for
124−-- example, \"com.spiffygame\".
125−idPackageName :: Lens' InappproductsDelete' Text
126−idPackageName
127− = lens _idPackageName
128− (\ s a -> s{_idPackageName = a})
129−
130−-- | IP address of the site where the request originates. Use this if you
131−-- want to enforce per-user limits.
132−idUserIP :: Lens' InappproductsDelete' (Maybe Text)
133−idUserIP = lens _idUserIP (\ s a -> s{_idUserIP = a})
134−
135−-- | API key. Your API key identifies your project and provides you with API
136−-- access, quota, and reports. Required unless you provide an OAuth 2.0
137−-- token.
138−idKey :: Lens' InappproductsDelete' (Maybe Key)
139−idKey = lens _idKey (\ s a -> s{_idKey = a})
140−
141−-- | Unique identifier for the in-app product.
142−idSKU :: Lens' InappproductsDelete' Text
143−idSKU = lens _idSKU (\ s a -> s{_idSKU = a})
144−
145−-- | OAuth 2.0 token for the current user.
146−idOAuthToken :: Lens' InappproductsDelete' (Maybe OAuthToken)
147−idOAuthToken
148− = lens _idOAuthToken (\ s a -> s{_idOAuthToken = a})
149−
150−-- | Selector specifying which fields to include in a partial response.
151−idFields :: Lens' InappproductsDelete' (Maybe Text)
152−idFields = lens _idFields (\ s a -> s{_idFields = a})
153−
154−instance GoogleAuth InappproductsDelete' where
155− authKey = idKey . _Just
156− authToken = idOAuthToken . _Just
157−
158−instance GoogleRequest InappproductsDelete' where
159− type Rs InappproductsDelete' = ()
160− request = requestWithRoute defReq androidPublisherURL
161− requestWithRoute r u InappproductsDelete'{..}
162− = go _idPackageName _idSKU _idQuotaUser
163− (Just _idPrettyPrint)
164− _idUserIP
165− _idFields
166− _idKey
167− _idOAuthToken
168− (Just AltJSON)
169− where go
170− = clientWithRoute
171− (Proxy :: Proxy InappproductsDeleteResource)
172− r
173− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Get.hsdeleted−171
@@ -1,171 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Returns information about the in-app product specified.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsGet@.
24−module Network.Google.Resource.AndroidPublisher.Inappproducts.Get
25− (
26− -- * REST Resource
27− InappproductsGetResource
28−
29− -- * Creating a Request
30− , inappproductsGet'
31− , InappproductsGet'
32−
33− -- * Request Lenses
34− , igQuotaUser
35− , igPrettyPrint
36− , igPackageName
37− , igUserIP
38− , igKey
39− , igSKU
40− , igOAuthToken
41− , igFields
42− ) where
43−
44−import Network.Google.AndroidPublisher.Types
45−import Network.Google.Prelude
46−
47−-- | A resource alias for @AndroidPublisherInappproductsGet@ which the
48−-- 'InappproductsGet'' request conforms to.
49−type InappproductsGetResource =
50− Capture "packageName" Text :>
51− "inappproducts" :>
52− Capture "sku" Text :>
53− QueryParam "quotaUser" Text :>
54− QueryParam "prettyPrint" Bool :>
55− QueryParam "userIp" Text :>
56− QueryParam "fields" Text :>
57− QueryParam "key" Key :>
58− QueryParam "oauth_token" OAuthToken :>
59− QueryParam "alt" AltJSON :> Get '[JSON] InAppProduct
60−
61−-- | Returns information about the in-app product specified.
62−--
63−-- /See:/ 'inappproductsGet'' smart constructor.
64−data InappproductsGet' = InappproductsGet'
65− { _igQuotaUser :: !(Maybe Text)
66− , _igPrettyPrint :: !Bool
67− , _igPackageName :: !Text
68− , _igUserIP :: !(Maybe Text)
69− , _igKey :: !(Maybe Key)
70− , _igSKU :: !Text
71− , _igOAuthToken :: !(Maybe OAuthToken)
72− , _igFields :: !(Maybe Text)
73− } deriving (Eq,Show,Data,Typeable,Generic)
74−
75−-- | Creates a value of 'InappproductsGet'' with the minimum fields required to make a request.
76−--
77−-- Use one of the following lenses to modify other fields as desired:
78−--
79−-- * 'igQuotaUser'
80−--
81−-- * 'igPrettyPrint'
82−--
83−-- * 'igPackageName'
84−--
85−-- * 'igUserIP'
86−--
87−-- * 'igKey'
88−--
89−-- * 'igSKU'
90−--
91−-- * 'igOAuthToken'
92−--
93−-- * 'igFields'
94−inappproductsGet'
95− :: Text -- ^ 'packageName'
96− -> Text -- ^ 'sku'
97− -> InappproductsGet'
98−inappproductsGet' pIgPackageName_ pIgSKU_ =
99− InappproductsGet'
100− { _igQuotaUser = Nothing
101− , _igPrettyPrint = True
102− , _igPackageName = pIgPackageName_
103− , _igUserIP = Nothing
104− , _igKey = Nothing
105− , _igSKU = pIgSKU_
106− , _igOAuthToken = Nothing
107− , _igFields = Nothing
108− }
109−
110−-- | Available to use for quota purposes for server-side applications. Can be
111−-- any arbitrary string assigned to a user, but should not exceed 40
112−-- characters. Overrides userIp if both are provided.
113−igQuotaUser :: Lens' InappproductsGet' (Maybe Text)
114−igQuotaUser
115− = lens _igQuotaUser (\ s a -> s{_igQuotaUser = a})
116−
117−-- | Returns response with indentations and line breaks.
118−igPrettyPrint :: Lens' InappproductsGet' Bool
119−igPrettyPrint
120− = lens _igPrettyPrint
121− (\ s a -> s{_igPrettyPrint = a})
122−
123−igPackageName :: Lens' InappproductsGet' Text
124−igPackageName
125− = lens _igPackageName
126− (\ s a -> s{_igPackageName = a})
127−
128−-- | IP address of the site where the request originates. Use this if you
129−-- want to enforce per-user limits.
130−igUserIP :: Lens' InappproductsGet' (Maybe Text)
131−igUserIP = lens _igUserIP (\ s a -> s{_igUserIP = a})
132−
133−-- | API key. Your API key identifies your project and provides you with API
134−-- access, quota, and reports. Required unless you provide an OAuth 2.0
135−-- token.
136−igKey :: Lens' InappproductsGet' (Maybe Key)
137−igKey = lens _igKey (\ s a -> s{_igKey = a})
138−
139−-- | Unique identifier for the in-app product.
140−igSKU :: Lens' InappproductsGet' Text
141−igSKU = lens _igSKU (\ s a -> s{_igSKU = a})
142−
143−-- | OAuth 2.0 token for the current user.
144−igOAuthToken :: Lens' InappproductsGet' (Maybe OAuthToken)
145−igOAuthToken
146− = lens _igOAuthToken (\ s a -> s{_igOAuthToken = a})
147−
148−-- | Selector specifying which fields to include in a partial response.
149−igFields :: Lens' InappproductsGet' (Maybe Text)
150−igFields = lens _igFields (\ s a -> s{_igFields = a})
151−
152−instance GoogleAuth InappproductsGet' where
153− authKey = igKey . _Just
154− authToken = igOAuthToken . _Just
155−
156−instance GoogleRequest InappproductsGet' where
157− type Rs InappproductsGet' = InAppProduct
158− request = requestWithRoute defReq androidPublisherURL
159− requestWithRoute r u InappproductsGet'{..}
160− = go _igPackageName _igSKU _igQuotaUser
161− (Just _igPrettyPrint)
162− _igUserIP
163− _igFields
164− _igKey
165− _igOAuthToken
166− (Just AltJSON)
167− where go
168− = clientWithRoute
169− (Proxy :: Proxy InappproductsGetResource)
170− r
171− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Insert.hsdeleted−191
@@ -1,191 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Insert
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Creates a new in-app product for an app.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsInsert@.
24−module Network.Google.Resource.AndroidPublisher.Inappproducts.Insert
25− (
26− -- * REST Resource
27− InappproductsInsertResource
28−
29− -- * Creating a Request
30− , inappproductsInsert'
31− , InappproductsInsert'
32−
33− -- * Request Lenses
34− , iiQuotaUser
35− , iiPrettyPrint
36− , iiAutoConvertMissingPrices
37− , iiPackageName
38− , iiUserIP
39− , iiPayload
40− , iiKey
41− , iiOAuthToken
42− , iiFields
43− ) where
44−
45−import Network.Google.AndroidPublisher.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AndroidPublisherInappproductsInsert@ which the
49−-- 'InappproductsInsert'' request conforms to.
50−type InappproductsInsertResource =
51− Capture "packageName" Text :>
52− "inappproducts" :>
53− QueryParam "autoConvertMissingPrices" Bool :>
54− QueryParam "quotaUser" Text :>
55− QueryParam "prettyPrint" Bool :>
56− QueryParam "userIp" Text :>
57− QueryParam "fields" Text :>
58− QueryParam "key" Key :>
59− QueryParam "oauth_token" OAuthToken :>
60− QueryParam "alt" AltJSON :>
61− ReqBody '[JSON] InAppProduct :>
62− Post '[JSON] InAppProduct
63−
64−-- | Creates a new in-app product for an app.
65−--
66−-- /See:/ 'inappproductsInsert'' smart constructor.
67−data InappproductsInsert' = InappproductsInsert'
68− { _iiQuotaUser :: !(Maybe Text)
69− , _iiPrettyPrint :: !Bool
70− , _iiAutoConvertMissingPrices :: !(Maybe Bool)
71− , _iiPackageName :: !Text
72− , _iiUserIP :: !(Maybe Text)
73− , _iiPayload :: !InAppProduct
74− , _iiKey :: !(Maybe Key)
75− , _iiOAuthToken :: !(Maybe OAuthToken)
76− , _iiFields :: !(Maybe Text)
77− } deriving (Eq,Show,Data,Typeable,Generic)
78−
79−-- | Creates a value of 'InappproductsInsert'' with the minimum fields required to make a request.
80−--
81−-- Use one of the following lenses to modify other fields as desired:
82−--
83−-- * 'iiQuotaUser'
84−--
85−-- * 'iiPrettyPrint'
86−--
87−-- * 'iiAutoConvertMissingPrices'
88−--
89−-- * 'iiPackageName'
90−--
91−-- * 'iiUserIP'
92−--
93−-- * 'iiPayload'
94−--
95−-- * 'iiKey'
96−--
97−-- * 'iiOAuthToken'
98−--
99−-- * 'iiFields'
100−inappproductsInsert'
101− :: Text -- ^ 'packageName'
102− -> InAppProduct -- ^ 'payload'
103− -> InappproductsInsert'
104−inappproductsInsert' pIiPackageName_ pIiPayload_ =
105− InappproductsInsert'
106− { _iiQuotaUser = Nothing
107− , _iiPrettyPrint = True
108− , _iiAutoConvertMissingPrices = Nothing
109− , _iiPackageName = pIiPackageName_
110− , _iiUserIP = Nothing
111− , _iiPayload = pIiPayload_
112− , _iiKey = Nothing
113− , _iiOAuthToken = Nothing
114− , _iiFields = Nothing
115− }
116−
117−-- | Available to use for quota purposes for server-side applications. Can be
118−-- any arbitrary string assigned to a user, but should not exceed 40
119−-- characters. Overrides userIp if both are provided.
120−iiQuotaUser :: Lens' InappproductsInsert' (Maybe Text)
121−iiQuotaUser
122− = lens _iiQuotaUser (\ s a -> s{_iiQuotaUser = a})
123−
124−-- | Returns response with indentations and line breaks.
125−iiPrettyPrint :: Lens' InappproductsInsert' Bool
126−iiPrettyPrint
127− = lens _iiPrettyPrint
128− (\ s a -> s{_iiPrettyPrint = a})
129−
130−-- | If true the prices for all regions targeted by the parent app that
131−-- don\'t have a price specified for this in-app product will be auto
132−-- converted to the target currency based on the default price. Defaults to
133−-- false.
134−iiAutoConvertMissingPrices :: Lens' InappproductsInsert' (Maybe Bool)
135−iiAutoConvertMissingPrices
136− = lens _iiAutoConvertMissingPrices
137− (\ s a -> s{_iiAutoConvertMissingPrices = a})
138−
139−-- | Unique identifier for the Android app; for example, \"com.spiffygame\".
140−iiPackageName :: Lens' InappproductsInsert' Text
141−iiPackageName
142− = lens _iiPackageName
143− (\ s a -> s{_iiPackageName = a})
144−
145−-- | IP address of the site where the request originates. Use this if you
146−-- want to enforce per-user limits.
147−iiUserIP :: Lens' InappproductsInsert' (Maybe Text)
148−iiUserIP = lens _iiUserIP (\ s a -> s{_iiUserIP = a})
149−
150−-- | Multipart request metadata.
151−iiPayload :: Lens' InappproductsInsert' InAppProduct
152−iiPayload
153− = lens _iiPayload (\ s a -> s{_iiPayload = a})
154−
155−-- | API key. Your API key identifies your project and provides you with API
156−-- access, quota, and reports. Required unless you provide an OAuth 2.0
157−-- token.
158−iiKey :: Lens' InappproductsInsert' (Maybe Key)
159−iiKey = lens _iiKey (\ s a -> s{_iiKey = a})
160−
161−-- | OAuth 2.0 token for the current user.
162−iiOAuthToken :: Lens' InappproductsInsert' (Maybe OAuthToken)
163−iiOAuthToken
164− = lens _iiOAuthToken (\ s a -> s{_iiOAuthToken = a})
165−
166−-- | Selector specifying which fields to include in a partial response.
167−iiFields :: Lens' InappproductsInsert' (Maybe Text)
168−iiFields = lens _iiFields (\ s a -> s{_iiFields = a})
169−
170−instance GoogleAuth InappproductsInsert' where
171− authKey = iiKey . _Just
172− authToken = iiOAuthToken . _Just
173−
174−instance GoogleRequest InappproductsInsert' where
175− type Rs InappproductsInsert' = InAppProduct
176− request = requestWithRoute defReq androidPublisherURL
177− requestWithRoute r u InappproductsInsert'{..}
178− = go _iiPackageName _iiAutoConvertMissingPrices
179− _iiQuotaUser
180− (Just _iiPrettyPrint)
181− _iiUserIP
182− _iiFields
183− _iiKey
184− _iiOAuthToken
185− (Just AltJSON)
186− _iiPayload
187− where go
188− = clientWithRoute
189− (Proxy :: Proxy InappproductsInsertResource)
190− r
191− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/List.hsdeleted−197
@@ -1,197 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | List all the in-app products for an Android app, both subscriptions and
22−-- managed in-app products..
23−--
24−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsList@.
25−module Network.Google.Resource.AndroidPublisher.Inappproducts.List
26− (
27− -- * REST Resource
28− InappproductsListResource
29−
30− -- * Creating a Request
31− , inappproductsList'
32− , InappproductsList'
33−
34− -- * Request Lenses
35− , ilQuotaUser
36− , ilPrettyPrint
37− , ilPackageName
38− , ilUserIP
39− , ilToken
40− , ilKey
41− , ilOAuthToken
42− , ilStartIndex
43− , ilMaxResults
44− , ilFields
45− ) where
46−
47−import Network.Google.AndroidPublisher.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AndroidPublisherInappproductsList@ which the
51−-- 'InappproductsList'' request conforms to.
52−type InappproductsListResource =
53− Capture "packageName" Text :>
54− "inappproducts" :>
55− QueryParam "token" Text :>
56− QueryParam "startIndex" Word32 :>
57− QueryParam "maxResults" Word32 :>
58− QueryParam "quotaUser" Text :>
59− QueryParam "prettyPrint" Bool :>
60− QueryParam "userIp" Text :>
61− QueryParam "fields" Text :>
62− QueryParam "key" Key :>
63− QueryParam "oauth_token" OAuthToken :>
64− QueryParam "alt" AltJSON :>
65− Get '[JSON] InappproductsListResponse
66−
67−-- | List all the in-app products for an Android app, both subscriptions and
68−-- managed in-app products..
69−--
70−-- /See:/ 'inappproductsList'' smart constructor.
71−data InappproductsList' = InappproductsList'
72− { _ilQuotaUser :: !(Maybe Text)
73− , _ilPrettyPrint :: !Bool
74− , _ilPackageName :: !Text
75− , _ilUserIP :: !(Maybe Text)
76− , _ilToken :: !(Maybe Text)
77− , _ilKey :: !(Maybe Key)
78− , _ilOAuthToken :: !(Maybe OAuthToken)
79− , _ilStartIndex :: !(Maybe Word32)
80− , _ilMaxResults :: !(Maybe Word32)
81− , _ilFields :: !(Maybe Text)
82− } deriving (Eq,Show,Data,Typeable,Generic)
83−
84−-- | Creates a value of 'InappproductsList'' with the minimum fields required to make a request.
85−--
86−-- Use one of the following lenses to modify other fields as desired:
87−--
88−-- * 'ilQuotaUser'
89−--
90−-- * 'ilPrettyPrint'
91−--
92−-- * 'ilPackageName'
93−--
94−-- * 'ilUserIP'
95−--
96−-- * 'ilToken'
97−--
98−-- * 'ilKey'
99−--
100−-- * 'ilOAuthToken'
101−--
102−-- * 'ilStartIndex'
103−--
104−-- * 'ilMaxResults'
105−--
106−-- * 'ilFields'
107−inappproductsList'
108− :: Text -- ^ 'packageName'
109− -> InappproductsList'
110−inappproductsList' pIlPackageName_ =
111− InappproductsList'
112− { _ilQuotaUser = Nothing
113− , _ilPrettyPrint = True
114− , _ilPackageName = pIlPackageName_
115− , _ilUserIP = Nothing
116− , _ilToken = Nothing
117− , _ilKey = Nothing
118− , _ilOAuthToken = Nothing
119− , _ilStartIndex = Nothing
120− , _ilMaxResults = Nothing
121− , _ilFields = Nothing
122− }
123−
124−-- | Available to use for quota purposes for server-side applications. Can be
125−-- any arbitrary string assigned to a user, but should not exceed 40
126−-- characters. Overrides userIp if both are provided.
127−ilQuotaUser :: Lens' InappproductsList' (Maybe Text)
128−ilQuotaUser
129− = lens _ilQuotaUser (\ s a -> s{_ilQuotaUser = a})
130−
131−-- | Returns response with indentations and line breaks.
132−ilPrettyPrint :: Lens' InappproductsList' Bool
133−ilPrettyPrint
134− = lens _ilPrettyPrint
135− (\ s a -> s{_ilPrettyPrint = a})
136−
137−-- | Unique identifier for the Android app with in-app products; for example,
138−-- \"com.spiffygame\".
139−ilPackageName :: Lens' InappproductsList' Text
140−ilPackageName
141− = lens _ilPackageName
142− (\ s a -> s{_ilPackageName = a})
143−
144−-- | IP address of the site where the request originates. Use this if you
145−-- want to enforce per-user limits.
146−ilUserIP :: Lens' InappproductsList' (Maybe Text)
147−ilUserIP = lens _ilUserIP (\ s a -> s{_ilUserIP = a})
148−
149−ilToken :: Lens' InappproductsList' (Maybe Text)
150−ilToken = lens _ilToken (\ s a -> s{_ilToken = a})
151−
152−-- | API key. Your API key identifies your project and provides you with API
153−-- access, quota, and reports. Required unless you provide an OAuth 2.0
154−-- token.
155−ilKey :: Lens' InappproductsList' (Maybe Key)
156−ilKey = lens _ilKey (\ s a -> s{_ilKey = a})
157−
158−-- | OAuth 2.0 token for the current user.
159−ilOAuthToken :: Lens' InappproductsList' (Maybe OAuthToken)
160−ilOAuthToken
161− = lens _ilOAuthToken (\ s a -> s{_ilOAuthToken = a})
162−
163−ilStartIndex :: Lens' InappproductsList' (Maybe Word32)
164−ilStartIndex
165− = lens _ilStartIndex (\ s a -> s{_ilStartIndex = a})
166−
167−ilMaxResults :: Lens' InappproductsList' (Maybe Word32)
168−ilMaxResults
169− = lens _ilMaxResults (\ s a -> s{_ilMaxResults = a})
170−
171−-- | Selector specifying which fields to include in a partial response.
172−ilFields :: Lens' InappproductsList' (Maybe Text)
173−ilFields = lens _ilFields (\ s a -> s{_ilFields = a})
174−
175−instance GoogleAuth InappproductsList' where
176− authKey = ilKey . _Just
177− authToken = ilOAuthToken . _Just
178−
179−instance GoogleRequest InappproductsList' where
180− type Rs InappproductsList' =
181− InappproductsListResponse
182− request = requestWithRoute defReq androidPublisherURL
183− requestWithRoute r u InappproductsList'{..}
184− = go _ilPackageName _ilToken _ilStartIndex
185− _ilMaxResults
186− _ilQuotaUser
187− (Just _ilPrettyPrint)
188− _ilUserIP
189− _ilFields
190− _ilKey
191− _ilOAuthToken
192− (Just AltJSON)
193− where go
194− = clientWithRoute
195− (Proxy :: Proxy InappproductsListResource)
196− r
197− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Patch.hsdeleted−206
@@ -1,206 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Patch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates the details of an in-app product. This method supports patch
22−-- semantics.
23−--
24−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsPatch@.
25−module Network.Google.Resource.AndroidPublisher.Inappproducts.Patch
26− (
27− -- * REST Resource
28− InappproductsPatchResource
29−
30− -- * Creating a Request
31− , inappproductsPatch'
32− , InappproductsPatch'
33−
34− -- * Request Lenses
35− , ipQuotaUser
36− , ipPrettyPrint
37− , ipAutoConvertMissingPrices
38− , ipPackageName
39− , ipUserIP
40− , ipPayload
41− , ipKey
42− , ipSKU
43− , ipOAuthToken
44− , ipFields
45− ) where
46−
47−import Network.Google.AndroidPublisher.Types
48−import Network.Google.Prelude
49−
50−-- | A resource alias for @AndroidPublisherInappproductsPatch@ which the
51−-- 'InappproductsPatch'' request conforms to.
52−type InappproductsPatchResource =
53− Capture "packageName" Text :>
54− "inappproducts" :>
55− Capture "sku" Text :>
56− QueryParam "autoConvertMissingPrices" Bool :>
57− QueryParam "quotaUser" Text :>
58− QueryParam "prettyPrint" Bool :>
59− QueryParam "userIp" Text :>
60− QueryParam "fields" Text :>
61− QueryParam "key" Key :>
62− QueryParam "oauth_token" OAuthToken :>
63− QueryParam "alt" AltJSON :>
64− ReqBody '[JSON] InAppProduct :>
65− Patch '[JSON] InAppProduct
66−
67−-- | Updates the details of an in-app product. This method supports patch
68−-- semantics.
69−--
70−-- /See:/ 'inappproductsPatch'' smart constructor.
71−data InappproductsPatch' = InappproductsPatch'
72− { _ipQuotaUser :: !(Maybe Text)
73− , _ipPrettyPrint :: !Bool
74− , _ipAutoConvertMissingPrices :: !(Maybe Bool)
75− , _ipPackageName :: !Text
76− , _ipUserIP :: !(Maybe Text)
77− , _ipPayload :: !InAppProduct
78− , _ipKey :: !(Maybe Key)
79− , _ipSKU :: !Text
80− , _ipOAuthToken :: !(Maybe OAuthToken)
81− , _ipFields :: !(Maybe Text)
82− } deriving (Eq,Show,Data,Typeable,Generic)
83−
84−-- | Creates a value of 'InappproductsPatch'' with the minimum fields required to make a request.
85−--
86−-- Use one of the following lenses to modify other fields as desired:
87−--
88−-- * 'ipQuotaUser'
89−--
90−-- * 'ipPrettyPrint'
91−--
92−-- * 'ipAutoConvertMissingPrices'
93−--
94−-- * 'ipPackageName'
95−--
96−-- * 'ipUserIP'
97−--
98−-- * 'ipPayload'
99−--
100−-- * 'ipKey'
101−--
102−-- * 'ipSKU'
103−--
104−-- * 'ipOAuthToken'
105−--
106−-- * 'ipFields'
107−inappproductsPatch'
108− :: Text -- ^ 'packageName'
109− -> InAppProduct -- ^ 'payload'
110− -> Text -- ^ 'sku'
111− -> InappproductsPatch'
112−inappproductsPatch' pIpPackageName_ pIpPayload_ pIpSKU_ =
113− InappproductsPatch'
114− { _ipQuotaUser = Nothing
115− , _ipPrettyPrint = True
116− , _ipAutoConvertMissingPrices = Nothing
117− , _ipPackageName = pIpPackageName_
118− , _ipUserIP = Nothing
119− , _ipPayload = pIpPayload_
120− , _ipKey = Nothing
121− , _ipSKU = pIpSKU_
122− , _ipOAuthToken = Nothing
123− , _ipFields = Nothing
124− }
125−
126−-- | Available to use for quota purposes for server-side applications. Can be
127−-- any arbitrary string assigned to a user, but should not exceed 40
128−-- characters. Overrides userIp if both are provided.
129−ipQuotaUser :: Lens' InappproductsPatch' (Maybe Text)
130−ipQuotaUser
131− = lens _ipQuotaUser (\ s a -> s{_ipQuotaUser = a})
132−
133−-- | Returns response with indentations and line breaks.
134−ipPrettyPrint :: Lens' InappproductsPatch' Bool
135−ipPrettyPrint
136− = lens _ipPrettyPrint
137− (\ s a -> s{_ipPrettyPrint = a})
138−
139−-- | If true the prices for all regions targeted by the parent app that
140−-- don\'t have a price specified for this in-app product will be auto
141−-- converted to the target currency based on the default price. Defaults to
142−-- false.
143−ipAutoConvertMissingPrices :: Lens' InappproductsPatch' (Maybe Bool)
144−ipAutoConvertMissingPrices
145− = lens _ipAutoConvertMissingPrices
146− (\ s a -> s{_ipAutoConvertMissingPrices = a})
147−
148−-- | Unique identifier for the Android app with the in-app product; for
149−-- example, \"com.spiffygame\".
150−ipPackageName :: Lens' InappproductsPatch' Text
151−ipPackageName
152− = lens _ipPackageName
153− (\ s a -> s{_ipPackageName = a})
154−
155−-- | IP address of the site where the request originates. Use this if you
156−-- want to enforce per-user limits.
157−ipUserIP :: Lens' InappproductsPatch' (Maybe Text)
158−ipUserIP = lens _ipUserIP (\ s a -> s{_ipUserIP = a})
159−
160−-- | Multipart request metadata.
161−ipPayload :: Lens' InappproductsPatch' InAppProduct
162−ipPayload
163− = lens _ipPayload (\ s a -> s{_ipPayload = a})
164−
165−-- | API key. Your API key identifies your project and provides you with API
166−-- access, quota, and reports. Required unless you provide an OAuth 2.0
167−-- token.
168−ipKey :: Lens' InappproductsPatch' (Maybe Key)
169−ipKey = lens _ipKey (\ s a -> s{_ipKey = a})
170−
171−-- | Unique identifier for the in-app product.
172−ipSKU :: Lens' InappproductsPatch' Text
173−ipSKU = lens _ipSKU (\ s a -> s{_ipSKU = a})
174−
175−-- | OAuth 2.0 token for the current user.
176−ipOAuthToken :: Lens' InappproductsPatch' (Maybe OAuthToken)
177−ipOAuthToken
178− = lens _ipOAuthToken (\ s a -> s{_ipOAuthToken = a})
179−
180−-- | Selector specifying which fields to include in a partial response.
181−ipFields :: Lens' InappproductsPatch' (Maybe Text)
182−ipFields = lens _ipFields (\ s a -> s{_ipFields = a})
183−
184−instance GoogleAuth InappproductsPatch' where
185− authKey = ipKey . _Just
186− authToken = ipOAuthToken . _Just
187−
188−instance GoogleRequest InappproductsPatch' where
189− type Rs InappproductsPatch' = InAppProduct
190− request = requestWithRoute defReq androidPublisherURL
191− requestWithRoute r u InappproductsPatch'{..}
192− = go _ipPackageName _ipSKU
193− _ipAutoConvertMissingPrices
194− _ipQuotaUser
195− (Just _ipPrettyPrint)
196− _ipUserIP
197− _ipFields
198− _ipKey
199− _ipOAuthToken
200− (Just AltJSON)
201− _ipPayload
202− where go
203− = clientWithRoute
204− (Proxy :: Proxy InappproductsPatchResource)
205− r
206− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Update.hsdeleted−204
@@ -1,204 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.AndroidPublisher.Inappproducts.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates the details of an in-app product.
22−--
23−-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @AndroidPublisherInappproductsUpdate@.
24−module Network.Google.Resource.AndroidPublisher.Inappproducts.Update
25− (
26− -- * REST Resource
27− InappproductsUpdateResource
28−
29− -- * Creating a Request
30− , inappproductsUpdate'
31− , InappproductsUpdate'
32−
33− -- * Request Lenses
34− , iuQuotaUser
35− , iuPrettyPrint
36− , iuAutoConvertMissingPrices
37− , iuPackageName
38− , iuUserIP
39− , iuPayload
40− , iuKey
41− , iuSKU
42− , iuOAuthToken
43− , iuFields
44− ) where
45−
46−import Network.Google.AndroidPublisher.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AndroidPublisherInappproductsUpdate@ which the
50−-- 'InappproductsUpdate'' request conforms to.
51−type InappproductsUpdateResource =
52− Capture "packageName" Text :>
53− "inappproducts" :>
54− Capture "sku" Text :>
55− QueryParam "autoConvertMissingPrices" Bool :>
56− QueryParam "quotaUser" Text :>
57− QueryParam "prettyPrint" Bool :>
58− QueryParam "userIp" Text :>
59− QueryParam "fields" Text :>
60− QueryParam "key" Key :>
61− QueryParam "oauth_token" OAuthToken :>
62− QueryParam "alt" AltJSON :>
63− ReqBody '[JSON] InAppProduct :>
64− Put '[JSON] InAppProduct
65−
66−-- | Updates the details of an in-app product.
67−--
68−-- /See:/ 'inappproductsUpdate'' smart constructor.
69−data InappproductsUpdate' = InappproductsUpdate'
70− { _iuQuotaUser :: !(Maybe Text)
71− , _iuPrettyPrint :: !Bool
72− , _iuAutoConvertMissingPrices :: !(Maybe Bool)
73− , _iuPackageName :: !Text
74− , _iuUserIP :: !(Maybe Text)
75− , _iuPayload :: !InAppProduct
76− , _iuKey :: !(Maybe Key)
77− , _iuSKU :: !Text
78− , _iuOAuthToken :: !(Maybe OAuthToken)
79− , _iuFields :: !(Maybe Text)
80− } deriving (Eq,Show,Data,Typeable,Generic)
81−
82−-- | Creates a value of 'InappproductsUpdate'' with the minimum fields required to make a request.
83−--
84−-- Use one of the following lenses to modify other fields as desired:
85−--
86−-- * 'iuQuotaUser'
87−--
88−-- * 'iuPrettyPrint'
89−--
90−-- * 'iuAutoConvertMissingPrices'
91−--
92−-- * 'iuPackageName'
93−--
94−-- * 'iuUserIP'
95−--
96−-- * 'iuPayload'
97−--
98−-- * 'iuKey'
99−--
100−-- * 'iuSKU'
101−--
102−-- * 'iuOAuthToken'
103−--
104−-- * 'iuFields'
105−inappproductsUpdate'
106− :: Text -- ^ 'packageName'
107− -> InAppProduct -- ^ 'payload'
108− -> Text -- ^ 'sku'
109− -> InappproductsUpdate'
110−inappproductsUpdate' pIuPackageName_ pIuPayload_ pIuSKU_ =
111− InappproductsUpdate'
112− { _iuQuotaUser = Nothing
113− , _iuPrettyPrint = True
114− , _iuAutoConvertMissingPrices = Nothing
115− , _iuPackageName = pIuPackageName_
116− , _iuUserIP = Nothing
117− , _iuPayload = pIuPayload_
118− , _iuKey = Nothing
119− , _iuSKU = pIuSKU_
120− , _iuOAuthToken = Nothing
121− , _iuFields = Nothing
122− }
123−
124−-- | Available to use for quota purposes for server-side applications. Can be
125−-- any arbitrary string assigned to a user, but should not exceed 40
126−-- characters. Overrides userIp if both are provided.
127−iuQuotaUser :: Lens' InappproductsUpdate' (Maybe Text)
128−iuQuotaUser
129− = lens _iuQuotaUser (\ s a -> s{_iuQuotaUser = a})
130−
131−-- | Returns response with indentations and line breaks.
132−iuPrettyPrint :: Lens' InappproductsUpdate' Bool
133−iuPrettyPrint
134− = lens _iuPrettyPrint
135− (\ s a -> s{_iuPrettyPrint = a})
136−
137−-- | If true the prices for all regions targeted by the parent app that
138−-- don\'t have a price specified for this in-app product will be auto
139−-- converted to the target currency based on the default price. Defaults to
140−-- false.
141−iuAutoConvertMissingPrices :: Lens' InappproductsUpdate' (Maybe Bool)
142−iuAutoConvertMissingPrices
143− = lens _iuAutoConvertMissingPrices
144− (\ s a -> s{_iuAutoConvertMissingPrices = a})
145−
146−-- | Unique identifier for the Android app with the in-app product; for
147−-- example, \"com.spiffygame\".
148−iuPackageName :: Lens' InappproductsUpdate' Text
149−iuPackageName
150− = lens _iuPackageName
151− (\ s a -> s{_iuPackageName = a})
152−
153−-- | IP address of the site where the request originates. Use this if you
154−-- want to enforce per-user limits.
155−iuUserIP :: Lens' InappproductsUpdate' (Maybe Text)
156−iuUserIP = lens _iuUserIP (\ s a -> s{_iuUserIP = a})
157−
158−-- | Multipart request metadata.
159−iuPayload :: Lens' InappproductsUpdate' InAppProduct
160−iuPayload
161− = lens _iuPayload (\ s a -> s{_iuPayload = a})
162−
163−-- | API key. Your API key identifies your project and provides you with API
164−-- access, quota, and reports. Required unless you provide an OAuth 2.0
165−-- token.
166−iuKey :: Lens' InappproductsUpdate' (Maybe Key)
167−iuKey = lens _iuKey (\ s a -> s{_iuKey = a})
168−
169−-- | Unique identifier for the in-app product.
170−iuSKU :: Lens' InappproductsUpdate' Text
171−iuSKU = lens _iuSKU (\ s a -> s{_iuSKU = a})
172−
173−-- | OAuth 2.0 token for the current user.
174−iuOAuthToken :: Lens' InappproductsUpdate' (Maybe OAuthToken)
175−iuOAuthToken
176− = lens _iuOAuthToken (\ s a -> s{_iuOAuthToken = a})
177−
178−-- | Selector specifying which fields to include in a partial response.
179−iuFields :: Lens' InappproductsUpdate' (Maybe Text)
180−iuFields = lens _iuFields (\ s a -> s{_iuFields = a})
181−
182−instance GoogleAuth InappproductsUpdate' where
183− authKey = iuKey . _Just
184− authToken = iuOAuthToken . _Just
185−
186−instance GoogleRequest InappproductsUpdate' where
187− type Rs InappproductsUpdate' = InAppProduct
188− request = requestWithRoute defReq androidPublisherURL
189− requestWithRoute r u InappproductsUpdate'{..}
190− = go _iuPackageName _iuSKU
191− _iuAutoConvertMissingPrices
192− _iuQuotaUser
193− (Just _iuPrettyPrint)
194− _iuUserIP
195− _iuFields
196− _iuKey
197− _iuOAuthToken
198− (Just AltJSON)
199− _iuPayload
200− where go
201− = clientWithRoute
202− (Proxy :: Proxy InappproductsUpdateResource)
203− r
204− u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Defer.hs+1−2
@@ -63,8 +63,7 @@ type PurchasesSubscriptionsDeferResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
67− SubscriptionPurchasesDeferRequest
66+ ReqBody '[JSON] SubscriptionPurchasesDeferRequest
6867 :>
6968 Post '[JSON] SubscriptionPurchasesDeferResponse
7069
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Insert.hs+1−1
@@ -59,7 +59,7 @@ type TasksInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Task :> Post '[JSON] Task
62+ ReqBody '[JSON] Task :> Post '[JSON] Task
6363
6464-- | Insert a new task in a TaskQueue
6565--
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Patch.hs+1−1
@@ -64,7 +64,7 @@ type TasksPatchResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Task :> Patch '[JSON] Task
67+ ReqBody '[JSON] Task :> Patch '[JSON] Task
6868
6969-- | Update tasks that are leased out of a TaskQueue. This method supports
7070-- patch semantics.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Update.hs+1−1
@@ -63,7 +63,7 @@ type TasksUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Task :> Post '[JSON] Task
66+ ReqBody '[JSON] Task :> Post '[JSON] Task
6767
6868-- | Update tasks that are leased out of a TaskQueue.
6969--
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Patch.hs+1−1
@@ -76,7 +76,7 @@ type AppsModulesPatchResource =
7676 QueryParam "key" Key :>
7777 QueryParam "oauth_token" OAuthToken :>
7878 QueryParam "alt" AltJSON :>
79− ReqBody '[OctetStream] Module :>
79+ ReqBody '[JSON] Module :>
8080 Patch '[JSON] Operation
8181
8282-- | Updates the configuration of the specified module.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Create.hs+1−1
@@ -73,7 +73,7 @@ type AppsModulesVersionsCreateResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream] Version :>
76+ ReqBody '[JSON] Version :>
7777 Post '[JSON] Operation
7878
7979-- | Deploys new code and resource files to a version.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+1−2
@@ -57,8 +57,7 @@ type ACLInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ACLRule :>
61− Post '[JSON] ACLRule
60+ ReqBody '[JSON] ACLRule :> Post '[JSON] ACLRule
6261
6362-- | Creates an access control rule.
6463--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+1−2
@@ -59,8 +59,7 @@ type ACLPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] ACLRule :>
63− Patch '[JSON] ACLRule
62+ ReqBody '[JSON] ACLRule :> Patch '[JSON] ACLRule
6463
6564-- | Updates an access control rule. This method supports patch semantics.
6665--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+1−1
@@ -59,7 +59,7 @@ type ACLUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] ACLRule :> Put '[JSON] ACLRule
62+ ReqBody '[JSON] ACLRule :> Put '[JSON] ACLRule
6363
6464-- | Updates an access control rule.
6565--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+1−1
@@ -66,7 +66,7 @@ type ACLWatchResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] Channel :>
69+ ReqBody '[JSON] Channel :>
7070 Post '[JSON] Channel
7171
7272-- | Watch for changes to ACL resources.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Insert.hs+1−1
@@ -58,7 +58,7 @@ type CalendarListInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] CalendarListEntry :>
61+ ReqBody '[JSON] CalendarListEntry :>
6262 Post '[JSON] CalendarListEntry
6363
6464-- | Adds an entry to the user\'s calendar list.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Patch.hs+1−1
@@ -61,7 +61,7 @@ type CalendarListPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] CalendarListEntry :>
64+ ReqBody '[JSON] CalendarListEntry :>
6565 Patch '[JSON] CalendarListEntry
6666
6767-- | Updates an entry on the user\'s calendar list. This method supports
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Update.hs+1−1
@@ -60,7 +60,7 @@ type CalendarListUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CalendarListEntry :>
63+ ReqBody '[JSON] CalendarListEntry :>
6464 Put '[JSON] CalendarListEntry
6565
6666-- | Updates an entry on the user\'s calendar list.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Watch.hs+1−1
@@ -71,7 +71,7 @@ type CalendarListWatchResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] Channel :>
74+ ReqBody '[JSON] Channel :>
7575 Post '[JSON] Channel
7676
7777-- | Watch for changes to CalendarList resources.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Insert.hs+1−2
@@ -54,8 +54,7 @@ type CalendarsInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Calendar :>
58− Post '[JSON] Calendar
57+ ReqBody '[JSON] Calendar :> Post '[JSON] Calendar
5958
6059-- | Creates a secondary calendar.
6160--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Patch.hs+1−2
@@ -56,8 +56,7 @@ type CalendarsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Calendar :>
60− Patch '[JSON] Calendar
59+ ReqBody '[JSON] Calendar :> Patch '[JSON] Calendar
6160
6261-- | Updates metadata for a calendar. This method supports patch semantics.
6362--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Update.hs+1−2
@@ -56,8 +56,7 @@ type CalendarsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Calendar :>
60− Put '[JSON] Calendar
59+ ReqBody '[JSON] Calendar :> Put '[JSON] Calendar
6160
6261-- | Updates metadata for a calendar.
6362--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Channels/Stop.hs+1−1
@@ -55,7 +55,7 @@ type ChannelsStopResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] Channel :> Post '[JSON] ()
58+ ReqBody '[JSON] Channel :> Post '[JSON] ()
5959
6060-- | Stop watching resources through this channel
6161--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Import.hs+1−1
@@ -61,7 +61,7 @@ type EventsImportResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Event :> Post '[JSON] Event
64+ ReqBody '[JSON] Event :> Post '[JSON] Event
6565
6666-- | Imports an event. This operation is used to add a private copy of an
6767-- existing event to a calendar.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Insert.hs+1−2
@@ -63,8 +63,7 @@ type EventsInsertResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Event :>
67− Post '[JSON] Event
66+ ReqBody '[JSON] Event :> Post '[JSON] Event
6867
6968-- | Creates an event.
7069--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Patch.hs+1−2
@@ -67,8 +67,7 @@ type EventsPatchResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Event :>
71− Patch '[JSON] Event
70+ ReqBody '[JSON] Event :> Patch '[JSON] Event
7271
7372-- | Updates an event. This method supports patch semantics.
7473--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Update.hs+1−2
@@ -67,8 +67,7 @@ type EventsUpdateResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Event :>
71− Put '[JSON] Event
70+ ReqBody '[JSON] Event :> Put '[JSON] Event
7271
7372-- | Updates an event.
7473--
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+1−2
@@ -100,8 +100,7 @@ type EventsWatchResource =
100100 QueryParam "alt"
101101 AltJSON
102102 :>
103− ReqBody
104− '[OctetStream]
103+ ReqBody '[JSON]
105104 Channel
106105 :>
107106 Post '[JSON]
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/FreeBusy/Query.hs+1−1
@@ -54,7 +54,7 @@ type FreeBusyQueryResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] FreeBusyRequest :>
57+ ReqBody '[JSON] FreeBusyRequest :>
5858 Post '[JSON] FreeBusyResponse
5959
6060-- | Returns free\/busy information for a set of calendars.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Watch.hs+1−2
@@ -63,8 +63,7 @@ type SettingsWatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Channel :>
67− Post '[JSON] Channel
66+ ReqBody '[JSON] Channel :> Post '[JSON] Channel
6867
6968-- | Watch for changes to Settings resources.
7069--
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Insert.hs+1−1
@@ -59,7 +59,7 @@ type LicenseAssignmentsInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] LicenseAssignmentInsert :>
62+ ReqBody '[JSON] LicenseAssignmentInsert :>
6363 Post '[JSON] LicenseAssignment
6464
6565-- | Assign License.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Patch.hs+1−1
@@ -61,7 +61,7 @@ type LicenseAssignmentsPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] LicenseAssignment :>
64+ ReqBody '[JSON] LicenseAssignment :>
6565 Patch '[JSON] LicenseAssignment
6666
6767-- | Assign License. This method supports patch semantics.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Update.hs+1−1
@@ -61,7 +61,7 @@ type LicenseAssignmentsUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] LicenseAssignment :>
64+ ReqBody '[JSON] LicenseAssignment :>
6565 Put '[JSON] LicenseAssignment
6666
6767-- | Assign License.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Insert.hs+1−2
@@ -56,8 +56,7 @@ type CustomersInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Customer :>
60− Post '[JSON] Customer
59+ ReqBody '[JSON] Customer :> Post '[JSON] Customer
6160
6261-- | Creates a customer resource if one does not already exist.
6362--
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Patch.hs+1−2
@@ -57,8 +57,7 @@ type CustomersPatchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Customer :>
61− Patch '[JSON] Customer
60+ ReqBody '[JSON] Customer :> Patch '[JSON] Customer
6261
6362-- | Update a customer resource if one it exists and is owned by the
6463-- reseller. This method supports patch semantics.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Update.hs+1−2
@@ -57,8 +57,7 @@ type CustomersUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Customer :>
61− Put '[JSON] Customer
60+ ReqBody '[JSON] Customer :> Put '[JSON] Customer
6261
6362-- | Update a customer resource if one it exists and is owned by the
6463-- reseller.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs+1−1
@@ -60,7 +60,7 @@ type SubscriptionsChangePlanResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ChangePlanRequest :>
63+ ReqBody '[JSON] ChangePlanRequest :>
6464 Post '[JSON] Subscription
6565
6666-- | Changes the plan of a subscription
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs+1−1
@@ -60,7 +60,7 @@ type SubscriptionsChangeRenewalSettingsResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] RenewalSettings :>
63+ ReqBody '[JSON] RenewalSettings :>
6464 Post '[JSON] Subscription
6565
6666-- | Changes the renewal settings of a subscription
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs+1−2
@@ -60,8 +60,7 @@ type SubscriptionsChangeSeatsResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Seats :>
64− Post '[JSON] Subscription
63+ ReqBody '[JSON] Seats :> Post '[JSON] Subscription
6564
6665-- | Changes the seats configuration of a subscription
6766--
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs+1−1
@@ -59,7 +59,7 @@ type SubscriptionsInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Subscription :>
62+ ReqBody '[JSON] Subscription :>
6363 Post '[JSON] Subscription
6464
6565-- | Creates\/Transfers a subscription for the customer.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Insert.hs+1−2
@@ -57,8 +57,7 @@ type TaskListsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] TaskList :>
61− Post '[JSON] TaskList
60+ ReqBody '[JSON] TaskList :> Post '[JSON] TaskList
6261
6362-- | Creates a new task list and adds it to the authenticated user\'s task
6463-- lists.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Patch.hs+1−2
@@ -59,8 +59,7 @@ type TaskListsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] TaskList :>
63− Patch '[JSON] TaskList
62+ ReqBody '[JSON] TaskList :> Patch '[JSON] TaskList
6463
6564-- | Updates the authenticated user\'s specified task list. This method
6665-- supports patch semantics.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Update.hs+1−2
@@ -58,8 +58,7 @@ type TaskListsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] TaskList :>
62− Put '[JSON] TaskList
61+ ReqBody '[JSON] TaskList :> Put '[JSON] TaskList
6362
6463-- | Updates the authenticated user\'s specified task list.
6564--
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Insert.hs+1−1
@@ -61,7 +61,7 @@ type TasksInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Task :> Post '[JSON] Task
64+ ReqBody '[JSON] Task :> Post '[JSON] Task
6565
6666-- | Creates a new task on the specified task list.
6767--
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Patch.hs+1−1
@@ -59,7 +59,7 @@ type TasksPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Task :> Patch '[JSON] Task
62+ ReqBody '[JSON] Task :> Patch '[JSON] Task
6363
6464-- | Updates the specified task. This method supports patch semantics.
6565--
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Update.hs+1−1
@@ -59,7 +59,7 @@ type TasksUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Task :> Put '[JSON] Task
62+ ReqBody '[JSON] Task :> Put '[JSON] Task
6363
6464-- | Updates the specified task.
6565--
gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Insert.hs+1−1
@@ -60,7 +60,7 @@ type AutoscalersInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Autoscaler :>
63+ ReqBody '[JSON] Autoscaler :>
6464 Post '[JSON] Operation
6565
6666-- | Adds new Autoscaler resource.
gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Patch.hs+1−1
@@ -63,7 +63,7 @@ type AutoscalersPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Autoscaler :>
66+ ReqBody '[JSON] Autoscaler :>
6767 Patch '[JSON] Operation
6868
6969-- | Update the entire content of the Autoscaler resource. This method
gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Update.hs+1−1
@@ -62,7 +62,7 @@ type AutoscalersUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Autoscaler :>
65+ ReqBody '[JSON] Autoscaler :>
6666 Put '[JSON] Operation
6767
6868-- | Update the entire content of the Autoscaler resource.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Insert.hs+1−2
@@ -57,8 +57,7 @@ type DatasetsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Dataset :>
61− Post '[JSON] Dataset
60+ ReqBody '[JSON] Dataset :> Post '[JSON] Dataset
6261
6362-- | Creates a new empty dataset.
6463--
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Patch.hs+1−2
@@ -62,8 +62,7 @@ type DatasetsPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Dataset :>
66− Patch '[JSON] Dataset
65+ ReqBody '[JSON] Dataset :> Patch '[JSON] Dataset
6766
6867-- | Updates information in an existing dataset. The update method replaces
6968-- the entire dataset resource, whereas the patch method only replaces
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Update.hs+1−1
@@ -61,7 +61,7 @@ type DatasetsUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Dataset :> Put '[JSON] Dataset
64+ ReqBody '[JSON] Dataset :> Put '[JSON] Dataset
6565
6666-- | Updates information in an existing dataset. The update method replaces
6767-- the entire dataset resource, whereas the patch method only replaces
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Query.hs+1−1
@@ -58,7 +58,7 @@ type JobsQueryResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] QueryRequest :>
61+ ReqBody '[JSON] QueryRequest :>
6262 Post '[JSON] QueryResponse
6363
6464-- | Runs a BigQuery SQL query synchronously and returns query results if the
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tabledata/InsertAll.hs+2−3
@@ -64,9 +64,8 @@ type TabledataInsertAllResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream]
68− TableDataInsertAllRequest
69− :> Post '[JSON] TableDataInsertAllResponse
67+ ReqBody '[JSON] TableDataInsertAllRequest :>
68+ Post '[JSON] TableDataInsertAllResponse
7069
7170-- | Streams data into BigQuery one record at a time without needing to run a
7271-- load job. Requires the WRITER dataset role.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Insert.hs+1−1
@@ -60,7 +60,7 @@ type TablesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Table :> Post '[JSON] Table
63+ ReqBody '[JSON] Table :> Post '[JSON] Table
6464
6565-- | Creates a new, empty table in the dataset.
6666--
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Patch.hs+1−2
@@ -65,8 +65,7 @@ type TablesPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] Table :>
69− Patch '[JSON] Table
68+ ReqBody '[JSON] Table :> Patch '[JSON] Table
7069
7170-- | Updates information in an existing table. The update method replaces the
7271-- entire table resource, whereas the patch method only replaces fields
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Update.hs+1−1
@@ -64,7 +64,7 @@ type TablesUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Table :> Put '[JSON] Table
67+ ReqBody '[JSON] Table :> Put '[JSON] Table
6868
6969-- | Updates information in an existing table. The update method replaces the
7070-- entire table resource, whereas the patch method only replaces fields
gogol-billing/gen/Network/Google/Resource/CloudBilling/Projects/UpdateBillingInfo.hs+2−2
@@ -95,8 +95,8 @@ type ProjectsUpdateBillingInfoResource =
9595 QueryParam "key" Key :>
9696 QueryParam "oauth_token" OAuthToken :>
9797 QueryParam "alt" AltJSON :>
98− ReqBody '[OctetStream] ProjectBillingInfo
99− :> Put '[JSON] ProjectBillingInfo
98+ ReqBody '[JSON] ProjectBillingInfo :>
99+ Put '[JSON] ProjectBillingInfo
100100
101101-- | Sets or updates the billing account associated with a project. You
102102-- specify the new billing account by setting the \`billing_account_name\`
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Insert.hs+1−1
@@ -59,7 +59,7 @@ type PagesInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Page :> Post '[JSON] Page
62+ ReqBody '[JSON] Page :> Post '[JSON] Page
6363
6464-- | Add a page.
6565--
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Patch.hs+1−1
@@ -63,7 +63,7 @@ type PagesPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Page :> Patch '[JSON] Page
66+ ReqBody '[JSON] Page :> Patch '[JSON] Page
6767
6868-- | Update a page. This method supports patch semantics.
6969--
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Update.hs+1−1
@@ -63,7 +63,7 @@ type PagesUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Page :> Put '[JSON] Page
66+ ReqBody '[JSON] Page :> Put '[JSON] Page
6767
6868-- | Update a page.
6969--
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Insert.hs+1−1
@@ -63,7 +63,7 @@ type PostsInsertResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Post :> Post '[JSON] Post
66+ ReqBody '[JSON] Post :> Post '[JSON] Post
6767
6868-- | Add a post.
6969--
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Patch.hs+1−2
@@ -69,8 +69,7 @@ type PostsPatchResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] Post :>
73− Patch '[JSON] Post
72+ ReqBody '[JSON] Post :> Patch '[JSON] Post
7473
7574-- | Update a post. This method supports patch semantics.
7675--
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Update.hs+1−2
@@ -69,8 +69,7 @@ type PostsUpdateResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] Post :>
73− Put '[JSON] Post
72+ ReqBody '[JSON] Post :> Put '[JSON] Post
7473
7574-- | Update a post.
7675--
gogol-books/gen/Network/Google/Resource/Books/CloudLoading/UpdateBook.hs+1−1
@@ -55,7 +55,7 @@ type CloudLoadingUpdateBookResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] BooksCloudLoadingResource :>
58+ ReqBody '[JSON] BooksCloudLoadingResource :>
5959 Post '[JSON] BooksCloudLoadingResource
6060
6161-- |
gogol-books/gen/Network/Google/Resource/Books/MyConfig/UpdateUserSettings.hs+1−1
@@ -57,7 +57,7 @@ type MyConfigUpdateUserSettingsResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Usersettings :>
60+ ReqBody '[JSON] Usersettings :>
6161 Post '[JSON] Usersettings
6262
6363-- | Sets the settings for the user. If a sub-object is specified, it will
gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Insert.hs+1−1
@@ -61,7 +61,7 @@ type MyLibraryAnnotationsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Annotation :>
64+ ReqBody '[JSON] Annotation :>
6565 Post '[JSON] Annotation
6666
6767-- | Inserts a new annotation.
gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Update.hs+1−2
@@ -59,8 +59,7 @@ type MyLibraryAnnotationsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Annotation :>
63− Put '[JSON] Annotation
62+ ReqBody '[JSON] Annotation :> Put '[JSON] Annotation
6463
6564-- | Updates an existing annotation.
6665--
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/Create.hs+1−1
@@ -74,7 +74,7 @@ type CoursesAliasesCreateResource =
7474 QueryParam "key" Key :>
7575 QueryParam "oauth_token" OAuthToken :>
7676 QueryParam "alt" AltJSON :>
77− ReqBody '[OctetStream] CourseAlias :>
77+ ReqBody '[JSON] CourseAlias :>
7878 Post '[JSON] CourseAlias
7979
8080-- | Creates an alias for a course. This method returns the following error
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Create.hs+1−2
@@ -74,8 +74,7 @@ type CoursesCreateResource =
7474 QueryParam "key" Key :>
7575 QueryParam "oauth_token" OAuthToken :>
7676 QueryParam "alt" AltJSON :>
77− ReqBody '[OctetStream] Course :>
78− Post '[JSON] Course
77+ ReqBody '[JSON] Course :> Post '[JSON] Course
7978
8079-- | Creates a course. The user specified in \`ownerId\` is the owner of the
8180-- created course and added as a teacher. This method returns the following
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Patch.hs+1−1
@@ -76,7 +76,7 @@ type CoursesPatchResource =
7676 QueryParam "key" Key :>
7777 QueryParam "oauth_token" OAuthToken :>
7878 QueryParam "alt" AltJSON :>
79− ReqBody '[OctetStream] Course :>
79+ ReqBody '[JSON] Course :>
8080 Patch '[JSON] Course
8181
8282-- | Updates one or more fields in a course. This method returns the
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Create.hs+1−1
@@ -78,7 +78,7 @@ type CoursesStudentsCreateResource =
7878 QueryParam "key" Key :>
7979 QueryParam "oauth_token" OAuthToken :>
8080 QueryParam "alt" AltJSON :>
81− ReqBody '[OctetStream] Student :>
81+ ReqBody '[JSON] Student :>
8282 Post '[JSON] Student
8383
8484-- | Adds a user as a student of a course. This method returns the following
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Create.hs+1−1
@@ -76,7 +76,7 @@ type CoursesTeachersCreateResource =
7676 QueryParam "key" Key :>
7777 QueryParam "oauth_token" OAuthToken :>
7878 QueryParam "alt" AltJSON :>
79− ReqBody '[OctetStream] Teacher :>
79+ ReqBody '[JSON] Teacher :>
8080 Post '[JSON] Teacher
8181
8282-- | Creates a teacher of a course. This method returns the following error
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Update.hs+1−1
@@ -73,7 +73,7 @@ type CoursesUpdateResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream] Course :>
76+ ReqBody '[JSON] Course :>
7777 Put '[JSON] Course
7878
7979-- | Updates a course. This method returns the following error codes: *
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Create.hs+1−1
@@ -76,7 +76,7 @@ type InvitationsCreateResource =
7676 QueryParam "key" Key :>
7777 QueryParam "oauth_token" OAuthToken :>
7878 QueryParam "alt" AltJSON :>
79− ReqBody '[OctetStream] Invitation :>
79+ ReqBody '[JSON] Invitation :>
8080 Post '[JSON] Invitation
8181
8282-- | Creates an invitation. Only one invitation for a user and course may
gogol-classroom/gen/Network/Google/Resource/Classroom/UserProfiles/Get.hsdeleted−245
@@ -1,245 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Classroom.UserProfiles.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Returns a user profile. This method returns the following error codes: *
22−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access
23−-- this user profile or if no profile exists with the requested ID or for
24−-- [general user permission errors][User Permission Errors].
25−--
26−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @ClassroomUserProfilesGet@.
27−module Network.Google.Resource.Classroom.UserProfiles.Get
28− (
29− -- * REST Resource
30− UserProfilesGetResource
31−
32− -- * Creating a Request
33− , userProfilesGet'
34− , UserProfilesGet'
35−
36− -- * Request Lenses
37− , upgXgafv
38− , upgQuotaUser
39− , upgPrettyPrint
40− , upgUploadProtocol
41− , upgPp
42− , upgAccessToken
43− , upgUploadType
44− , upgUserId
45− , upgBearerToken
46− , upgKey
47− , upgOAuthToken
48− , upgFields
49− , upgCallback
50− ) where
51−
52−import Network.Google.Classroom.Types
53−import Network.Google.Prelude
54−
55−-- | A resource alias for @ClassroomUserProfilesGet@ which the
56−-- 'UserProfilesGet'' request conforms to.
57−type UserProfilesGetResource =
58− "v1" :>
59− "userProfiles" :>
60− Capture "userId" Text :>
61− QueryParam "$.xgafv" Text :>
62− QueryParam "upload_protocol" Text :>
63− QueryParam "pp" Bool :>
64− QueryParam "access_token" Text :>
65− QueryParam "uploadType" Text :>
66− QueryParam "bearer_token" Text :>
67− QueryParam "callback" Text :>
68− QueryParam "quotaUser" Text :>
69− QueryParam "prettyPrint" Bool :>
70− QueryParam "fields" Text :>
71− QueryParam "key" Key :>
72− QueryParam "oauth_token" OAuthToken :>
73− QueryParam "alt" AltJSON :>
74− Get '[JSON] UserProfile
75−
76−-- | Returns a user profile. This method returns the following error codes: *
77−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access
78−-- this user profile or if no profile exists with the requested ID or for
79−-- [general user permission errors][User Permission Errors].
80−--
81−-- /See:/ 'userProfilesGet'' smart constructor.
82−data UserProfilesGet' = UserProfilesGet'
83− { _upgXgafv :: !(Maybe Text)
84− , _upgQuotaUser :: !(Maybe Text)
85− , _upgPrettyPrint :: !Bool
86− , _upgUploadProtocol :: !(Maybe Text)
87− , _upgPp :: !Bool
88− , _upgAccessToken :: !(Maybe Text)
89− , _upgUploadType :: !(Maybe Text)
90− , _upgUserId :: !Text
91− , _upgBearerToken :: !(Maybe Text)
92− , _upgKey :: !(Maybe Key)
93− , _upgOAuthToken :: !(Maybe OAuthToken)
94− , _upgFields :: !(Maybe Text)
95− , _upgCallback :: !(Maybe Text)
96− } deriving (Eq,Show,Data,Typeable,Generic)
97−
98−-- | Creates a value of 'UserProfilesGet'' with the minimum fields required to make a request.
99−--
100−-- Use one of the following lenses to modify other fields as desired:
101−--
102−-- * 'upgXgafv'
103−--
104−-- * 'upgQuotaUser'
105−--
106−-- * 'upgPrettyPrint'
107−--
108−-- * 'upgUploadProtocol'
109−--
110−-- * 'upgPp'
111−--
112−-- * 'upgAccessToken'
113−--
114−-- * 'upgUploadType'
115−--
116−-- * 'upgUserId'
117−--
118−-- * 'upgBearerToken'
119−--
120−-- * 'upgKey'
121−--
122−-- * 'upgOAuthToken'
123−--
124−-- * 'upgFields'
125−--
126−-- * 'upgCallback'
127−userProfilesGet'
128− :: Text -- ^ 'userId'
129− -> UserProfilesGet'
130−userProfilesGet' pUpgUserId_ =
131− UserProfilesGet'
132− { _upgXgafv = Nothing
133− , _upgQuotaUser = Nothing
134− , _upgPrettyPrint = True
135− , _upgUploadProtocol = Nothing
136− , _upgPp = True
137− , _upgAccessToken = Nothing
138− , _upgUploadType = Nothing
139− , _upgUserId = pUpgUserId_
140− , _upgBearerToken = Nothing
141− , _upgKey = Nothing
142− , _upgOAuthToken = Nothing
143− , _upgFields = Nothing
144− , _upgCallback = Nothing
145− }
146−
147−-- | V1 error format.
148−upgXgafv :: Lens' UserProfilesGet' (Maybe Text)
149−upgXgafv = lens _upgXgafv (\ s a -> s{_upgXgafv = a})
150−
151−-- | Available to use for quota purposes for server-side applications. Can be
152−-- any arbitrary string assigned to a user, but should not exceed 40
153−-- characters.
154−upgQuotaUser :: Lens' UserProfilesGet' (Maybe Text)
155−upgQuotaUser
156− = lens _upgQuotaUser (\ s a -> s{_upgQuotaUser = a})
157−
158−-- | Returns response with indentations and line breaks.
159−upgPrettyPrint :: Lens' UserProfilesGet' Bool
160−upgPrettyPrint
161− = lens _upgPrettyPrint
162− (\ s a -> s{_upgPrettyPrint = a})
163−
164−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").
165−upgUploadProtocol :: Lens' UserProfilesGet' (Maybe Text)
166−upgUploadProtocol
167− = lens _upgUploadProtocol
168− (\ s a -> s{_upgUploadProtocol = a})
169−
170−-- | Pretty-print response.
171−upgPp :: Lens' UserProfilesGet' Bool
172−upgPp = lens _upgPp (\ s a -> s{_upgPp = a})
173−
174−-- | OAuth access token.
175−upgAccessToken :: Lens' UserProfilesGet' (Maybe Text)
176−upgAccessToken
177− = lens _upgAccessToken
178− (\ s a -> s{_upgAccessToken = a})
179−
180−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").
181−upgUploadType :: Lens' UserProfilesGet' (Maybe Text)
182−upgUploadType
183− = lens _upgUploadType
184− (\ s a -> s{_upgUploadType = a})
185−
186−-- | Identifier of the profile to return. The identifier can be one of the
187−-- following: * the numeric identifier for the user * the email address of
188−-- the user * the string literal \`\"me\"\`, indicating the requesting user
189−upgUserId :: Lens' UserProfilesGet' Text
190−upgUserId
191− = lens _upgUserId (\ s a -> s{_upgUserId = a})
192−
193−-- | OAuth bearer token.
194−upgBearerToken :: Lens' UserProfilesGet' (Maybe Text)
195−upgBearerToken
196− = lens _upgBearerToken
197− (\ s a -> s{_upgBearerToken = a})
198−
199−-- | API key. Your API key identifies your project and provides you with API
200−-- access, quota, and reports. Required unless you provide an OAuth 2.0
201−-- token.
202−upgKey :: Lens' UserProfilesGet' (Maybe Key)
203−upgKey = lens _upgKey (\ s a -> s{_upgKey = a})
204−
205−-- | OAuth 2.0 token for the current user.
206−upgOAuthToken :: Lens' UserProfilesGet' (Maybe OAuthToken)
207−upgOAuthToken
208− = lens _upgOAuthToken
209− (\ s a -> s{_upgOAuthToken = a})
210−
211−-- | Selector specifying which fields to include in a partial response.
212−upgFields :: Lens' UserProfilesGet' (Maybe Text)
213−upgFields
214− = lens _upgFields (\ s a -> s{_upgFields = a})
215−
216−-- | JSONP
217−upgCallback :: Lens' UserProfilesGet' (Maybe Text)
218−upgCallback
219− = lens _upgCallback (\ s a -> s{_upgCallback = a})
220−
221−instance GoogleAuth UserProfilesGet' where
222− authKey = upgKey . _Just
223− authToken = upgOAuthToken . _Just
224−
225−instance GoogleRequest UserProfilesGet' where
226− type Rs UserProfilesGet' = UserProfile
227− request = requestWithRoute defReq classroomURL
228− requestWithRoute r u UserProfilesGet'{..}
229− = go _upgUserId _upgXgafv _upgUploadProtocol
230− (Just _upgPp)
231− _upgAccessToken
232− _upgUploadType
233− _upgBearerToken
234− _upgCallback
235− _upgQuotaUser
236− (Just _upgPrettyPrint)
237− _upgFields
238− _upgKey
239− _upgOAuthToken
240− (Just AltJSON)
241− where go
242− = clientWithRoute
243− (Proxy :: Proxy UserProfilesGetResource)
244− r
245− u
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Insert.hs+1−2
@@ -60,8 +60,7 @@ type AddressesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Address :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] Address :> Post '[JSON] Operation
6564
6665-- | Creates an address resource in the specified project using the data
6766-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Insert.hs+1−2
@@ -60,8 +60,7 @@ type AutoscalersInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Autoscaler :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] Autoscaler :> Post '[JSON] Operation
6564
6665-- | Creates an autoscaler resource in the specified project using the data
6766-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Patch.hs+1−1
@@ -62,7 +62,7 @@ type AutoscalersPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Autoscaler :>
65+ ReqBody '[JSON] Autoscaler :>
6666 Patch '[JSON] Operation
6767
6868-- | Updates an autoscaler resource in the specified project using the data
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Update.hs+1−2
@@ -62,8 +62,7 @@ type AutoscalersUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Autoscaler :>
66− Put '[JSON] Operation
65+ ReqBody '[JSON] Autoscaler :> Put '[JSON] Operation
6766
6867-- | Updates an autoscaler resource in the specified project using the data
6968-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/GetHealth.hs+1−1
@@ -60,7 +60,7 @@ type BackendServicesGetHealthResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ResourceGroupReference :>
63+ ReqBody '[JSON] ResourceGroupReference :>
6464 Post '[JSON] BackendServiceGroupHealth
6565
6666-- | Gets the most recent health check results for this BackendService.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Insert.hs+1−1
@@ -58,7 +58,7 @@ type BackendServicesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] BackendService :>
61+ ReqBody '[JSON] BackendService :>
6262 Post '[JSON] Operation
6363
6464-- | Creates a BackendService resource in the specified project using the
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Patch.hs+1−1
@@ -60,7 +60,7 @@ type BackendServicesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] BackendService :>
63+ ReqBody '[JSON] BackendService :>
6464 Patch '[JSON] Operation
6565
6666-- | Update the entire content of the BackendService resource. This method
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Update.hs+1−1
@@ -59,7 +59,7 @@ type BackendServicesUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] BackendService :>
62+ ReqBody '[JSON] BackendService :>
6363 Put '[JSON] Operation
6464
6565-- | Update the entire content of the BackendService resource.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/CreateSnapshot.hs+1−1
@@ -62,7 +62,7 @@ type DisksCreateSnapshotResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Snapshot :>
65+ ReqBody '[JSON] Snapshot :>
6666 Post '[JSON] Operation
6767
6868-- | Creates a snapshot of this disk.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/Insert.hs+1−2
@@ -62,8 +62,7 @@ type DisksInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Disk :>
66− Post '[JSON] Operation
65+ ReqBody '[JSON] Disk :> Post '[JSON] Operation
6766
6867-- | Creates a persistent disk in the specified project using the data
6968-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Insert.hs+1−2
@@ -58,8 +58,7 @@ type FirewallsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Firewall :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Firewall :> Post '[JSON] Operation
6362
6463-- | Creates a firewall resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Patch.hs+1−2
@@ -60,8 +60,7 @@ type FirewallsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Firewall :>
64− Patch '[JSON] Operation
63+ ReqBody '[JSON] Firewall :> Patch '[JSON] Operation
6564
6665-- | Updates the specified firewall resource with the data included in the
6766-- request. This method supports patch semantics.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Update.hs+1−2
@@ -60,8 +60,7 @@ type FirewallsUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Firewall :>
64− Put '[JSON] Operation
63+ ReqBody '[JSON] Firewall :> Put '[JSON] Operation
6564
6665-- | Updates the specified firewall resource with the data included in the
6766-- request.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Insert.hs+1−1
@@ -60,7 +60,7 @@ type ForwardingRulesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ForwardingRule :>
63+ ReqBody '[JSON] ForwardingRule :>
6464 Post '[JSON] Operation
6565
6666-- | Creates a ForwardingRule resource in the specified project and region
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/SetTarget.hs+1−1
@@ -62,7 +62,7 @@ type ForwardingRulesSetTargetResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] TargetReference :>
65+ ReqBody '[JSON] TargetReference :>
6666 Post '[JSON] Operation
6767
6868-- | Changes target url for forwarding rule.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Insert.hs+1−2
@@ -58,8 +58,7 @@ type GlobalAddressesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Address :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Address :> Post '[JSON] Operation
6362
6463-- | Creates an address resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Insert.hs+1−1
@@ -58,7 +58,7 @@ type GlobalForwardingRulesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ForwardingRule :>
61+ ReqBody '[JSON] ForwardingRule :>
6262 Post '[JSON] Operation
6363
6464-- | Creates a ForwardingRule resource in the specified project and region
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/SetTarget.hs+1−1
@@ -60,7 +60,7 @@ type GlobalForwardingRulesSetTargetResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] TargetReference :>
63+ ReqBody '[JSON] TargetReference :>
6464 Post '[JSON] Operation
6565
6666-- | Changes target url for forwarding rule.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Insert.hs+1−1
@@ -58,7 +58,7 @@ type HTTPHealthChecksInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] HTTPHealthCheck :>
61+ ReqBody '[JSON] HTTPHealthCheck :>
6262 Post '[JSON] Operation
6363
6464-- | Creates a HttpHealthCheck resource in the specified project using the
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Patch.hs+1−1
@@ -60,7 +60,7 @@ type HTTPHealthChecksPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] HTTPHealthCheck :>
63+ ReqBody '[JSON] HTTPHealthCheck :>
6464 Patch '[JSON] Operation
6565
6666-- | Updates a HttpHealthCheck resource in the specified project using the
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Update.hs+1−1
@@ -60,7 +60,7 @@ type HTTPHealthChecksUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] HTTPHealthCheck :>
63+ ReqBody '[JSON] HTTPHealthCheck :>
6464 Put '[JSON] Operation
6565
6666-- | Updates a HttpHealthCheck resource in the specified project using the
gogol-compute/gen/Network/Google/Resource/Compute/Images/Deprecate.hs+1−1
@@ -61,7 +61,7 @@ type ImagesDeprecateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] DeprecationStatus :>
64+ ReqBody '[JSON] DeprecationStatus :>
6565 Post '[JSON] Operation
6666
6767-- | Sets the deprecation status of an image. If an empty request body is
gogol-compute/gen/Network/Google/Resource/Compute/Images/Insert.hs+1−2
@@ -58,8 +58,7 @@ type ImagesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Image :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Image :> Post '[JSON] Operation
6362
6463-- | Creates an image resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AbandonInstances.hs+1−1
@@ -65,7 +65,7 @@ type InstanceGroupManagersAbandonInstancesResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream]
68+ ReqBody '[JSON]
6969 InstanceGroupManagersAbandonInstancesRequest
7070 :> Post '[JSON] Operation
7171
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/DeleteInstances.hs+1−1
@@ -65,7 +65,7 @@ type InstanceGroupManagersDeleteInstancesResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream]
68+ ReqBody '[JSON]
6969 InstanceGroupManagersDeleteInstancesRequest
7070 :> Post '[JSON] Operation
7171
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Insert.hs+1−1
@@ -60,7 +60,7 @@ type InstanceGroupManagersInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] InstanceGroupManager :>
63+ ReqBody '[JSON] InstanceGroupManager :>
6464 Post '[JSON] Operation
6565
6666-- | Creates a managed instance group resource in the specified project using
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/RecreateInstances.hs+1−1
@@ -63,7 +63,7 @@ type InstanceGroupManagersRecreateInstancesResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
66+ ReqBody '[JSON]
6767 InstanceGroupManagersRecreateInstancesRequest
6868 :> Post '[JSON] Operation
6969
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetInstanceTemplate.hs+1−1
@@ -65,7 +65,7 @@ type InstanceGroupManagersSetInstanceTemplateResource
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream]
68+ ReqBody '[JSON]
6969 InstanceGroupManagersSetInstanceTemplateRequest
7070 :> Post '[JSON] Operation
7171
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetTargetPools.hs+1−1
@@ -64,7 +64,7 @@ type InstanceGroupManagersSetTargetPoolsResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream]
67+ ReqBody '[JSON]
6868 InstanceGroupManagersSetTargetPoolsRequest
6969 :> Post '[JSON] Operation
7070
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AddInstances.hs+1−2
@@ -63,8 +63,7 @@ type InstanceGroupsAddInstancesResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
67− InstanceGroupsAddInstancesRequest
66+ ReqBody '[JSON] InstanceGroupsAddInstancesRequest
6867 :> Post '[JSON] Operation
6968
7069-- | Adds a list of instances to an instance group. All of the instances in
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Insert.hs+1−1
@@ -60,7 +60,7 @@ type InstanceGroupsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] InstanceGroup :>
63+ ReqBody '[JSON] InstanceGroup :>
6464 Post '[JSON] Operation
6565
6666-- | Creates an instance group in the specified project using the parameters
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/ListInstances.hs+1−1
@@ -70,7 +70,7 @@ type InstanceGroupsListInstancesResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream]
73+ ReqBody '[JSON]
7474 InstanceGroupsListInstancesRequest
7575 :>
7676 Post '[JSON] InstanceGroupsListInstances
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/RemoveInstances.hs+1−1
@@ -62,7 +62,7 @@ type InstanceGroupsRemoveInstancesResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
65+ ReqBody '[JSON]
6666 InstanceGroupsRemoveInstancesRequest
6767 :> Post '[JSON] Operation
6868
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/SetNamedPorts.hs+1−1
@@ -62,7 +62,7 @@ type InstanceGroupsSetNamedPortsResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
65+ ReqBody '[JSON]
6666 InstanceGroupsSetNamedPortsRequest
6767 :> Post '[JSON] Operation
6868
gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Insert.hs+1−1
@@ -58,7 +58,7 @@ type InstanceTemplatesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] InstanceTemplate :>
61+ ReqBody '[JSON] InstanceTemplate :>
6262 Post '[JSON] Operation
6363
6464-- | Creates an instance template in the specified project using the data
gogol-compute/gen/Network/Google/Resource/Compute/Instances/AddAccessConfig.hs+1−1
@@ -64,7 +64,7 @@ type InstancesAddAccessConfigResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] AccessConfig :>
67+ ReqBody '[JSON] AccessConfig :>
6868 Post '[JSON] Operation
6969
7070-- | Adds an access config to an instance\'s network interface.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/AttachDisk.hs+1−1
@@ -62,7 +62,7 @@ type InstancesAttachDiskResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] AttachedDisk :>
65+ ReqBody '[JSON] AttachedDisk :>
6666 Post '[JSON] Operation
6767
6868-- | Attaches a Disk resource to an instance.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Insert.hs+1−2
@@ -60,8 +60,7 @@ type InstancesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Instance :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] Instance :> Post '[JSON] Operation
6564
6665-- | Creates an instance resource in the specified project using the data
6766-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetMetadata.hs+1−1
@@ -63,7 +63,7 @@ type InstancesSetMetadataResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Metadata :>
66+ ReqBody '[JSON] Metadata :>
6767 Post '[JSON] Operation
6868
6969-- | Sets metadata for the specified instance to the data included in the
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetScheduling.hs+1−1
@@ -62,7 +62,7 @@ type InstancesSetSchedulingResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Scheduling :>
65+ ReqBody '[JSON] Scheduling :>
6666 Post '[JSON] Operation
6767
6868-- | Sets an instance\'s scheduling options.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetTags.hs+1−2
@@ -63,8 +63,7 @@ type InstancesSetTagsResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Tags :>
67− Post '[JSON] Operation
66+ ReqBody '[JSON] Tags :> Post '[JSON] Operation
6867
6968-- | Sets tags for the specified instance to the data included in the
7069-- request.
gogol-compute/gen/Network/Google/Resource/Compute/Networks/Insert.hs+1−2
@@ -58,8 +58,7 @@ type NetworksInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Network :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Network :> Post '[JSON] Operation
6362
6463-- | Creates a network resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveDisk.hs+1−1
@@ -56,7 +56,7 @@ type ProjectsMoveDiskResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] DiskMoveRequest :>
59+ ReqBody '[JSON] DiskMoveRequest :>
6060 Post '[JSON] Operation
6161
6262-- | Moves a persistent disk from one zone to another.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveInstance.hs+1−1
@@ -57,7 +57,7 @@ type ProjectsMoveInstanceResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] InstanceMoveRequest :>
60+ ReqBody '[JSON] InstanceMoveRequest :>
6161 Post '[JSON] Operation
6262
6363-- | Moves an instance and its attached persistent disks from one zone to
gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetCommonInstanceMetadata.hs+1−2
@@ -57,8 +57,7 @@ type ProjectsSetCommonInstanceMetadataResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Metadata :>
61− Post '[JSON] Operation
60+ ReqBody '[JSON] Metadata :> Post '[JSON] Operation
6261
6362-- | Sets metadata common to all instances within the specified project using
6463-- the data included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetUsageExportBucket.hs+1−1
@@ -58,7 +58,7 @@ type ProjectsSetUsageExportBucketResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] UsageExportLocation :>
61+ ReqBody '[JSON] UsageExportLocation :>
6262 Post '[JSON] Operation
6363
6464-- | Enables the usage export feature and sets the usage export bucket where
gogol-compute/gen/Network/Google/Resource/Compute/Routes/Insert.hs+1−2
@@ -58,8 +58,7 @@ type RoutesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Route :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Route :> Post '[JSON] Operation
6362
6463-- | Creates a route resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Insert.hs+1−1
@@ -58,7 +58,7 @@ type TargetHTTPProxiesInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] TargetHTTPProxy :>
61+ ReqBody '[JSON] TargetHTTPProxy :>
6262 Post '[JSON] Operation
6363
6464-- | Creates a TargetHttpProxy resource in the specified project using the
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/SetURLMap.hs+1−1
@@ -59,7 +59,7 @@ type TargetHTTPProxiesSetURLMapResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] URLMapReference :>
62+ ReqBody '[JSON] URLMapReference :>
6363 Post '[JSON] Operation
6464
6565-- | Changes the URL map for TargetHttpProxy.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Insert.hs+1−1
@@ -60,7 +60,7 @@ type TargetInstancesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] TargetInstance :>
63+ ReqBody '[JSON] TargetInstance :>
6464 Post '[JSON] Operation
6565
6666-- | Creates a TargetInstance resource in the specified project and zone
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddHealthCheck.hs+1−2
@@ -62,8 +62,7 @@ type TargetPoolsAddHealthCheckResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
66− TargetPoolsAddHealthCheckRequest
65+ ReqBody '[JSON] TargetPoolsAddHealthCheckRequest
6766 :> Post '[JSON] Operation
6867
6968-- | Adds health check URL to targetPool.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddInstance.hs+2−3
@@ -62,9 +62,8 @@ type TargetPoolsAddInstanceResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
66− TargetPoolsAddInstanceRequest
67− :> Post '[JSON] Operation
65+ ReqBody '[JSON] TargetPoolsAddInstanceRequest :>
66+ Post '[JSON] Operation
6867
6968-- | Adds instance url to targetPool.
7069--
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/GetHealth.hs+1−1
@@ -63,7 +63,7 @@ type TargetPoolsGetHealthResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] InstanceReference :>
66+ ReqBody '[JSON] InstanceReference :>
6767 Post '[JSON] TargetPoolInstanceHealth
6868
6969-- | Gets the most recent health check results for each IP for the given
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Insert.hs+1−2
@@ -60,8 +60,7 @@ type TargetPoolsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] TargetPool :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] TargetPool :> Post '[JSON] Operation
6564
6665-- | Creates a TargetPool resource in the specified project and region using
6766-- the data included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveHealthCheck.hs+1−1
@@ -62,7 +62,7 @@ type TargetPoolsRemoveHealthCheckResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
65+ ReqBody '[JSON]
6666 TargetPoolsRemoveHealthCheckRequest
6767 :> Post '[JSON] Operation
6868
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveInstance.hs+1−2
@@ -62,8 +62,7 @@ type TargetPoolsRemoveInstanceResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
66− TargetPoolsRemoveInstanceRequest
65+ ReqBody '[JSON] TargetPoolsRemoveInstanceRequest
6766 :> Post '[JSON] Operation
6867
6968-- | Removes instance URL from targetPool.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/SetBackup.hs+1−1
@@ -64,7 +64,7 @@ type TargetPoolsSetBackupResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] TargetReference :>
67+ ReqBody '[JSON] TargetReference :>
6868 Post '[JSON] Operation
6969
7070-- | Changes backup pool configurations.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Insert.hs+1−1
@@ -60,7 +60,7 @@ type TargetVPNGatewaysInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] TargetVPNGateway :>
63+ ReqBody '[JSON] TargetVPNGateway :>
6464 Post '[JSON] Operation
6565
6666-- | Creates a TargetVpnGateway resource in the specified project and region
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Insert.hs+1−2
@@ -58,8 +58,7 @@ type URLMapsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] URLMap :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] URLMap :> Post '[JSON] Operation
6362
6463-- | Creates a UrlMap resource in the specified project using the data
6564-- included in the request.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Patch.hs+1−2
@@ -60,8 +60,7 @@ type URLMapsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] URLMap :>
64− Patch '[JSON] Operation
63+ ReqBody '[JSON] URLMap :> Patch '[JSON] Operation
6564
6665-- | Update the entire content of the UrlMap resource. This method supports
6766-- patch semantics.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Update.hs+1−2
@@ -59,8 +59,7 @@ type URLMapsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] URLMap :>
63− Put '[JSON] Operation
62+ ReqBody '[JSON] URLMap :> Put '[JSON] Operation
6463
6564-- | Update the entire content of the UrlMap resource.
6665--
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Validate.hs+1−1
@@ -62,7 +62,7 @@ type URLMapsValidateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] URLMapsValidateRequest :>
65+ ReqBody '[JSON] URLMapsValidateRequest :>
6666 Post '[JSON] URLMapsValidateResponse
6767
6868-- | Run static validation for the UrlMap. In particular, the tests of the
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Insert.hs+1−2
@@ -60,8 +60,7 @@ type VPNTunnelsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] VPNTunnel :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] VPNTunnel :> Post '[JSON] Operation
6564
6665-- | Creates a VpnTunnel resource in the specified project and region using
6766-- the data included in the request.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Create.hs+1−1
@@ -66,7 +66,7 @@ type ProjectsZonesClustersCreateResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] CreateClusterRequest :>
69+ ReqBody '[JSON] CreateClusterRequest :>
7070 Post '[JSON] Operation
7171
7272-- | Creates a cluster, consisting of the specified number and type of Google
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Create.hs+1−1
@@ -74,7 +74,7 @@ type ProjectsJobsCreateResource =
7474 QueryParam "key" Key :>
7575 QueryParam "oauth_token" OAuthToken :>
7676 QueryParam "alt" AltJSON :>
77− ReqBody '[OctetStream] Job :>
77+ ReqBody '[JSON] Job :>
7878 Post '[JSON] Job
7979
8080-- | Creates a dataflow job.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Update.hs+1−2
@@ -72,8 +72,7 @@ type ProjectsJobsUpdateResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Job :>
76− Put '[JSON] Job
75+ ReqBody '[JSON] Job :> Put '[JSON] Job
7776
7877-- | Updates the state of an existing dataflow job.
7978--
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/Lease.hs+1−2
@@ -73,8 +73,7 @@ type ProjectsJobsWorkItemsLeaseResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream]
77− LeaseWorkItemRequest
76+ ReqBody '[JSON] LeaseWorkItemRequest
7877 :>
7978 Post '[JSON] LeaseWorkItemResponse
8079
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/ReportStatus.hs+1−1
@@ -73,7 +73,7 @@ type ProjectsJobsWorkItemsReportStatusResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream]
76+ ReqBody '[JSON]
7777 ReportWorkItemStatusRequest
7878 :>
7979 Post '[JSON]
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/AllocateIds.hs+1−1
@@ -57,7 +57,7 @@ type DatasetsAllocateIdsResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltPROTO :>
60− ReqBody '[OctetStream] AllocateIdsRequest :>
60+ ReqBody '[JSON] AllocateIdsRequest :>
6161 Post '[JSON] AllocateIdsResponse
6262
6363-- | Allocate IDs for incomplete keys (useful for referencing an entity
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/BeginTransaction.hs+1−1
@@ -56,7 +56,7 @@ type DatasetsBeginTransactionResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltPROTO :>
59− ReqBody '[OctetStream] BeginTransactionRequest :>
59+ ReqBody '[JSON] BeginTransactionRequest :>
6060 Post '[JSON] BeginTransactionResponse
6161
6262-- | Begin a new transaction.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Commit.hs+1−1
@@ -57,7 +57,7 @@ type DatasetsCommitResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltPROTO :>
60− ReqBody '[OctetStream] CommitRequest :>
60+ ReqBody '[JSON] CommitRequest :>
6161 Post '[JSON] CommitResponse
6262
6363-- | Commit a transaction, optionally creating, deleting or modifying some
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Lookup.hs+1−1
@@ -56,7 +56,7 @@ type DatasetsLookupResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltPROTO :>
59− ReqBody '[OctetStream] LookupRequest :>
59+ ReqBody '[JSON] LookupRequest :>
6060 Post '[JSON] LookupResponse
6161
6262-- | Look up some entities by key.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Rollback.hs+1−1
@@ -56,7 +56,7 @@ type DatasetsRollbackResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltPROTO :>
59− ReqBody '[OctetStream] RollbackRequest :>
59+ ReqBody '[JSON] RollbackRequest :>
6060 Post '[JSON] RollbackResponse
6161
6262-- | Roll back a transaction.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/RunQuery.hs+1−1
@@ -56,7 +56,7 @@ type DatasetsRunQueryResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltPROTO :>
59− ReqBody '[OctetStream] RunQueryRequest :>
59+ ReqBody '[JSON] RunQueryRequest :>
6060 Post '[JSON] RunQueryResponse
6161
6262-- | Query for entities.
gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/Update.hs+1−1
@@ -79,7 +79,7 @@ type ControllerDebuggeesBreakpointsUpdateResource =
7979 QueryParam "key" Key :>
8080 QueryParam "oauth_token" OAuthToken :>
8181 QueryParam "alt" AltJSON :>
82− ReqBody '[OctetStream]
82+ ReqBody '[JSON]
8383 UpdateActiveBreakpointRequest
8484 :>
8585 Put '[JSON]
gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Register.hs+1−2
@@ -75,8 +75,7 @@ type ControllerDebuggeesRegisterResource =
7575 QueryParam "key" Key :>
7676 QueryParam "oauth_token" OAuthToken :>
7777 QueryParam "alt" AltJSON :>
78− ReqBody '[OctetStream]
79− RegisterDebuggeeRequest
78+ ReqBody '[JSON] RegisterDebuggeeRequest
8079 :>
8180 Post '[JSON] RegisterDebuggeeResponse
8281
gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Set.hs+1−1
@@ -72,7 +72,7 @@ type DebuggerDebuggeesBreakpointsSetResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Breakpoint :>
75+ ReqBody '[JSON] Breakpoint :>
7676 Post '[JSON] SetBreakpointResponse
7777
7878-- | Sets the breakpoint to the debuggee.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs+1−2
@@ -58,8 +58,7 @@ type DeploymentsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Deployment :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Deployment :> Post '[JSON] Operation
6362
6463-- | Creates a deployment and all of the resources described by the
6564-- deployment manifest.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs+1−1
@@ -72,7 +72,7 @@ type DeploymentsPatchResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Deployment :>
75+ ReqBody '[JSON] Deployment :>
7676 Patch '[JSON] Operation
7777
7878-- | Updates a deployment and all of the resources described by the
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs+1−1
@@ -72,7 +72,7 @@ type DeploymentsUpdateResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Deployment :>
75+ ReqBody '[JSON] Deployment :>
7676 Put '[JSON] Operation
7777
7878-- | Updates a deployment and all of the resources described by the
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Insert.hs+1−1
@@ -57,7 +57,7 @@ type AccountUserProFilesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AccountUserProFile :>
60+ ReqBody '[JSON] AccountUserProFile :>
6161 Post '[JSON] AccountUserProFile
6262
6363-- | Inserts a new account user profile.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Patch.hs+1−1
@@ -60,7 +60,7 @@ type AccountUserProFilesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] AccountUserProFile :>
63+ ReqBody '[JSON] AccountUserProFile :>
6464 Patch '[JSON] AccountUserProFile
6565
6666-- | Updates an existing account user profile. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Update.hs+1−1
@@ -57,7 +57,7 @@ type AccountUserProFilesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AccountUserProFile :>
60+ ReqBody '[JSON] AccountUserProFile :>
6161 Put '[JSON] AccountUserProFile
6262
6363-- | Updates an existing account user profile.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Get.hsdeleted−178
@@ -1,178 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.AccountUserProfiles.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Gets one account user profile by ID.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingAccountUserProfilesGet@.
24−module Network.Google.Resource.DFAReporting.AccountUserProfiles.Get
25− (
26− -- * REST Resource
27− AccountUserProfilesGetResource
28−
29− -- * Creating a Request
30− , accountUserProfilesGet'
31− , AccountUserProfilesGet'
32−
33− -- * Request Lenses
34− , aupgQuotaUser
35− , aupgPrettyPrint
36− , aupgUserIP
37− , aupgProfileId
38− , aupgKey
39− , aupgId
40− , aupgOAuthToken
41− , aupgFields
42− ) where
43−
44−import Network.Google.DFAReporting.Types
45−import Network.Google.Prelude
46−
47−-- | A resource alias for @DfareportingAccountUserProfilesGet@ which the
48−-- 'AccountUserProfilesGet'' request conforms to.
49−type AccountUserProfilesGetResource =
50− "userprofiles" :>
51− Capture "profileId" Int64 :>
52− "accountUserProfiles" :>
53− Capture "id" Int64 :>
54− QueryParam "quotaUser" Text :>
55− QueryParam "prettyPrint" Bool :>
56− QueryParam "userIp" Text :>
57− QueryParam "fields" Text :>
58− QueryParam "key" Key :>
59− QueryParam "oauth_token" OAuthToken :>
60− QueryParam "alt" AltJSON :>
61− Get '[JSON] AccountUserProfile
62−
63−-- | Gets one account user profile by ID.
64−--
65−-- /See:/ 'accountUserProfilesGet'' smart constructor.
66−data AccountUserProfilesGet' = AccountUserProfilesGet'
67− { _aupgQuotaUser :: !(Maybe Text)
68− , _aupgPrettyPrint :: !Bool
69− , _aupgUserIP :: !(Maybe Text)
70− , _aupgProfileId :: !Int64
71− , _aupgKey :: !(Maybe Key)
72− , _aupgId :: !Int64
73− , _aupgOAuthToken :: !(Maybe OAuthToken)
74− , _aupgFields :: !(Maybe Text)
75− } deriving (Eq,Show,Data,Typeable,Generic)
76−
77−-- | Creates a value of 'AccountUserProfilesGet'' with the minimum fields required to make a request.
78−--
79−-- Use one of the following lenses to modify other fields as desired:
80−--
81−-- * 'aupgQuotaUser'
82−--
83−-- * 'aupgPrettyPrint'
84−--
85−-- * 'aupgUserIP'
86−--
87−-- * 'aupgProfileId'
88−--
89−-- * 'aupgKey'
90−--
91−-- * 'aupgId'
92−--
93−-- * 'aupgOAuthToken'
94−--
95−-- * 'aupgFields'
96−accountUserProfilesGet'
97− :: Int64 -- ^ 'profileId'
98− -> Int64 -- ^ 'id'
99− -> AccountUserProfilesGet'
100−accountUserProfilesGet' pAupgProfileId_ pAupgId_ =
101− AccountUserProfilesGet'
102− { _aupgQuotaUser = Nothing
103− , _aupgPrettyPrint = True
104− , _aupgUserIP = Nothing
105− , _aupgProfileId = pAupgProfileId_
106− , _aupgKey = Nothing
107− , _aupgId = pAupgId_
108− , _aupgOAuthToken = Nothing
109− , _aupgFields = Nothing
110− }
111−
112−-- | Available to use for quota purposes for server-side applications. Can be
113−-- any arbitrary string assigned to a user, but should not exceed 40
114−-- characters. Overrides userIp if both are provided.
115−aupgQuotaUser :: Lens' AccountUserProfilesGet' (Maybe Text)
116−aupgQuotaUser
117− = lens _aupgQuotaUser
118− (\ s a -> s{_aupgQuotaUser = a})
119−
120−-- | Returns response with indentations and line breaks.
121−aupgPrettyPrint :: Lens' AccountUserProfilesGet' Bool
122−aupgPrettyPrint
123− = lens _aupgPrettyPrint
124− (\ s a -> s{_aupgPrettyPrint = a})
125−
126−-- | IP address of the site where the request originates. Use this if you
127−-- want to enforce per-user limits.
128−aupgUserIP :: Lens' AccountUserProfilesGet' (Maybe Text)
129−aupgUserIP
130− = lens _aupgUserIP (\ s a -> s{_aupgUserIP = a})
131−
132−-- | User profile ID associated with this request.
133−aupgProfileId :: Lens' AccountUserProfilesGet' Int64
134−aupgProfileId
135− = lens _aupgProfileId
136− (\ s a -> s{_aupgProfileId = a})
137−
138−-- | API key. Your API key identifies your project and provides you with API
139−-- access, quota, and reports. Required unless you provide an OAuth 2.0
140−-- token.
141−aupgKey :: Lens' AccountUserProfilesGet' (Maybe Key)
142−aupgKey = lens _aupgKey (\ s a -> s{_aupgKey = a})
143−
144−-- | User profile ID.
145−aupgId :: Lens' AccountUserProfilesGet' Int64
146−aupgId = lens _aupgId (\ s a -> s{_aupgId = a})
147−
148−-- | OAuth 2.0 token for the current user.
149−aupgOAuthToken :: Lens' AccountUserProfilesGet' (Maybe OAuthToken)
150−aupgOAuthToken
151− = lens _aupgOAuthToken
152− (\ s a -> s{_aupgOAuthToken = a})
153−
154−-- | Selector specifying which fields to include in a partial response.
155−aupgFields :: Lens' AccountUserProfilesGet' (Maybe Text)
156−aupgFields
157− = lens _aupgFields (\ s a -> s{_aupgFields = a})
158−
159−instance GoogleAuth AccountUserProfilesGet' where
160− authKey = aupgKey . _Just
161− authToken = aupgOAuthToken . _Just
162−
163−instance GoogleRequest AccountUserProfilesGet' where
164− type Rs AccountUserProfilesGet' = AccountUserProfile
165− request = requestWithRoute defReq dFAReportingURL
166− requestWithRoute r u AccountUserProfilesGet'{..}
167− = go _aupgProfileId _aupgId _aupgQuotaUser
168− (Just _aupgPrettyPrint)
169− _aupgUserIP
170− _aupgFields
171− _aupgKey
172− _aupgOAuthToken
173− (Just AltJSON)
174− where go
175− = clientWithRoute
176− (Proxy :: Proxy AccountUserProfilesGetResource)
177− r
178− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Insert.hsdeleted−182
@@ -1,182 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.AccountUserProfiles.Insert
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Inserts a new account user profile.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingAccountUserProfilesInsert@.
24−module Network.Google.Resource.DFAReporting.AccountUserProfiles.Insert
25− (
26− -- * REST Resource
27− AccountUserProfilesInsertResource
28−
29− -- * Creating a Request
30− , accountUserProfilesInsert'
31− , AccountUserProfilesInsert'
32−
33− -- * Request Lenses
34− , aupiQuotaUser
35− , aupiPrettyPrint
36− , aupiUserIP
37− , aupiProfileId
38− , aupiPayload
39− , aupiKey
40− , aupiOAuthToken
41− , aupiFields
42− ) where
43−
44−import Network.Google.DFAReporting.Types
45−import Network.Google.Prelude
46−
47−-- | A resource alias for @DfareportingAccountUserProfilesInsert@ which the
48−-- 'AccountUserProfilesInsert'' request conforms to.
49−type AccountUserProfilesInsertResource =
50− "userprofiles" :>
51− Capture "profileId" Int64 :>
52− "accountUserProfiles" :>
53− QueryParam "quotaUser" Text :>
54− QueryParam "prettyPrint" Bool :>
55− QueryParam "userIp" Text :>
56− QueryParam "fields" Text :>
57− QueryParam "key" Key :>
58− QueryParam "oauth_token" OAuthToken :>
59− QueryParam "alt" AltJSON :>
60− ReqBody '[JSON] AccountUserProfile :>
61− Post '[JSON] AccountUserProfile
62−
63−-- | Inserts a new account user profile.
64−--
65−-- /See:/ 'accountUserProfilesInsert'' smart constructor.
66−data AccountUserProfilesInsert' = AccountUserProfilesInsert'
67− { _aupiQuotaUser :: !(Maybe Text)
68− , _aupiPrettyPrint :: !Bool
69− , _aupiUserIP :: !(Maybe Text)
70− , _aupiProfileId :: !Int64
71− , _aupiPayload :: !AccountUserProfile
72− , _aupiKey :: !(Maybe Key)
73− , _aupiOAuthToken :: !(Maybe OAuthToken)
74− , _aupiFields :: !(Maybe Text)
75− } deriving (Eq,Show,Data,Typeable,Generic)
76−
77−-- | Creates a value of 'AccountUserProfilesInsert'' with the minimum fields required to make a request.
78−--
79−-- Use one of the following lenses to modify other fields as desired:
80−--
81−-- * 'aupiQuotaUser'
82−--
83−-- * 'aupiPrettyPrint'
84−--
85−-- * 'aupiUserIP'
86−--
87−-- * 'aupiProfileId'
88−--
89−-- * 'aupiPayload'
90−--
91−-- * 'aupiKey'
92−--
93−-- * 'aupiOAuthToken'
94−--
95−-- * 'aupiFields'
96−accountUserProfilesInsert'
97− :: Int64 -- ^ 'profileId'
98− -> AccountUserProfile -- ^ 'payload'
99− -> AccountUserProfilesInsert'
100−accountUserProfilesInsert' pAupiProfileId_ pAupiPayload_ =
101− AccountUserProfilesInsert'
102− { _aupiQuotaUser = Nothing
103− , _aupiPrettyPrint = True
104− , _aupiUserIP = Nothing
105− , _aupiProfileId = pAupiProfileId_
106− , _aupiPayload = pAupiPayload_
107− , _aupiKey = Nothing
108− , _aupiOAuthToken = Nothing
109− , _aupiFields = Nothing
110− }
111−
112−-- | Available to use for quota purposes for server-side applications. Can be
113−-- any arbitrary string assigned to a user, but should not exceed 40
114−-- characters. Overrides userIp if both are provided.
115−aupiQuotaUser :: Lens' AccountUserProfilesInsert' (Maybe Text)
116−aupiQuotaUser
117− = lens _aupiQuotaUser
118− (\ s a -> s{_aupiQuotaUser = a})
119−
120−-- | Returns response with indentations and line breaks.
121−aupiPrettyPrint :: Lens' AccountUserProfilesInsert' Bool
122−aupiPrettyPrint
123− = lens _aupiPrettyPrint
124− (\ s a -> s{_aupiPrettyPrint = a})
125−
126−-- | IP address of the site where the request originates. Use this if you
127−-- want to enforce per-user limits.
128−aupiUserIP :: Lens' AccountUserProfilesInsert' (Maybe Text)
129−aupiUserIP
130− = lens _aupiUserIP (\ s a -> s{_aupiUserIP = a})
131−
132−-- | User profile ID associated with this request.
133−aupiProfileId :: Lens' AccountUserProfilesInsert' Int64
134−aupiProfileId
135− = lens _aupiProfileId
136− (\ s a -> s{_aupiProfileId = a})
137−
138−-- | Multipart request metadata.
139−aupiPayload :: Lens' AccountUserProfilesInsert' AccountUserProfile
140−aupiPayload
141− = lens _aupiPayload (\ s a -> s{_aupiPayload = a})
142−
143−-- | API key. Your API key identifies your project and provides you with API
144−-- access, quota, and reports. Required unless you provide an OAuth 2.0
145−-- token.
146−aupiKey :: Lens' AccountUserProfilesInsert' (Maybe Key)
147−aupiKey = lens _aupiKey (\ s a -> s{_aupiKey = a})
148−
149−-- | OAuth 2.0 token for the current user.
150−aupiOAuthToken :: Lens' AccountUserProfilesInsert' (Maybe OAuthToken)
151−aupiOAuthToken
152− = lens _aupiOAuthToken
153− (\ s a -> s{_aupiOAuthToken = a})
154−
155−-- | Selector specifying which fields to include in a partial response.
156−aupiFields :: Lens' AccountUserProfilesInsert' (Maybe Text)
157−aupiFields
158− = lens _aupiFields (\ s a -> s{_aupiFields = a})
159−
160−instance GoogleAuth AccountUserProfilesInsert' where
161− authKey = aupiKey . _Just
162− authToken = aupiOAuthToken . _Just
163−
164−instance GoogleRequest AccountUserProfilesInsert'
165− where
166− type Rs AccountUserProfilesInsert' =
167− AccountUserProfile
168− request = requestWithRoute defReq dFAReportingURL
169− requestWithRoute r u AccountUserProfilesInsert'{..}
170− = go _aupiProfileId _aupiQuotaUser
171− (Just _aupiPrettyPrint)
172− _aupiUserIP
173− _aupiFields
174− _aupiKey
175− _aupiOAuthToken
176− (Just AltJSON)
177− _aupiPayload
178− where go
179− = clientWithRoute
180− (Proxy :: Proxy AccountUserProfilesInsertResource)
181− r
182− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/List.hsdeleted−294
@@ -1,294 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.AccountUserProfiles.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Retrieves a list of account user profiles, possibly filtered.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingAccountUserProfilesList@.
24−module Network.Google.Resource.DFAReporting.AccountUserProfiles.List
25− (
26− -- * REST Resource
27− AccountUserProfilesListResource
28−
29− -- * Creating a Request
30− , accountUserProfilesList'
31− , AccountUserProfilesList'
32−
33− -- * Request Lenses
34− , auplQuotaUser
35− , auplPrettyPrint
36− , auplUserRoleId
37− , auplUserIP
38− , auplSearchString
39− , auplIds
40− , auplProfileId
41− , auplSortOrder
42− , auplActive
43− , auplKey
44− , auplPageToken
45− , auplSortField
46− , auplSubAccountId
47− , auplOAuthToken
48− , auplMaxResults
49− , auplFields
50− ) where
51−
52−import Network.Google.DFAReporting.Types
53−import Network.Google.Prelude
54−
55−-- | A resource alias for @DfareportingAccountUserProfilesList@ which the
56−-- 'AccountUserProfilesList'' request conforms to.
57−type AccountUserProfilesListResource =
58− "userprofiles" :>
59− Capture "profileId" Int64 :>
60− "accountUserProfiles" :>
61− QueryParam "userRoleId" Int64 :>
62− QueryParam "searchString" Text :>
63− QueryParams "ids" Int64 :>
64− QueryParam "sortOrder"
65− DfareportingAccountUserProfilesListSortOrder
66− :>
67− QueryParam "active" Bool :>
68− QueryParam "pageToken" Text :>
69− QueryParam "sortField"
70− DfareportingAccountUserProfilesListSortField
71− :>
72− QueryParam "subaccountId" Int64 :>
73− QueryParam "maxResults" Int32 :>
74− QueryParam "quotaUser" Text :>
75− QueryParam "prettyPrint" Bool :>
76− QueryParam "userIp" Text :>
77− QueryParam "fields" Text :>
78− QueryParam "key" Key :>
79− QueryParam "oauth_token" OAuthToken :>
80− QueryParam "alt" AltJSON :>
81− Get '[JSON]
82− AccountUserProfilesListResponse
83−
84−-- | Retrieves a list of account user profiles, possibly filtered.
85−--
86−-- /See:/ 'accountUserProfilesList'' smart constructor.
87−data AccountUserProfilesList' = AccountUserProfilesList'
88− { _auplQuotaUser :: !(Maybe Text)
89− , _auplPrettyPrint :: !Bool
90− , _auplUserRoleId :: !(Maybe Int64)
91− , _auplUserIP :: !(Maybe Text)
92− , _auplSearchString :: !(Maybe Text)
93− , _auplIds :: !(Maybe [Int64])
94− , _auplProfileId :: !Int64
95− , _auplSortOrder :: !(Maybe DfareportingAccountUserProfilesListSortOrder)
96− , _auplActive :: !(Maybe Bool)
97− , _auplKey :: !(Maybe Key)
98− , _auplPageToken :: !(Maybe Text)
99− , _auplSortField :: !(Maybe DfareportingAccountUserProfilesListSortField)
100− , _auplSubAccountId :: !(Maybe Int64)
101− , _auplOAuthToken :: !(Maybe OAuthToken)
102− , _auplMaxResults :: !(Maybe Int32)
103− , _auplFields :: !(Maybe Text)
104− } deriving (Eq,Show,Data,Typeable,Generic)
105−
106−-- | Creates a value of 'AccountUserProfilesList'' with the minimum fields required to make a request.
107−--
108−-- Use one of the following lenses to modify other fields as desired:
109−--
110−-- * 'auplQuotaUser'
111−--
112−-- * 'auplPrettyPrint'
113−--
114−-- * 'auplUserRoleId'
115−--
116−-- * 'auplUserIP'
117−--
118−-- * 'auplSearchString'
119−--
120−-- * 'auplIds'
121−--
122−-- * 'auplProfileId'
123−--
124−-- * 'auplSortOrder'
125−--
126−-- * 'auplActive'
127−--
128−-- * 'auplKey'
129−--
130−-- * 'auplPageToken'
131−--
132−-- * 'auplSortField'
133−--
134−-- * 'auplSubAccountId'
135−--
136−-- * 'auplOAuthToken'
137−--
138−-- * 'auplMaxResults'
139−--
140−-- * 'auplFields'
141−accountUserProfilesList'
142− :: Int64 -- ^ 'profileId'
143− -> AccountUserProfilesList'
144−accountUserProfilesList' pAuplProfileId_ =
145− AccountUserProfilesList'
146− { _auplQuotaUser = Nothing
147− , _auplPrettyPrint = True
148− , _auplUserRoleId = Nothing
149− , _auplUserIP = Nothing
150− , _auplSearchString = Nothing
151− , _auplIds = Nothing
152− , _auplProfileId = pAuplProfileId_
153− , _auplSortOrder = Nothing
154− , _auplActive = Nothing
155− , _auplKey = Nothing
156− , _auplPageToken = Nothing
157− , _auplSortField = Nothing
158− , _auplSubAccountId = Nothing
159− , _auplOAuthToken = Nothing
160− , _auplMaxResults = Nothing
161− , _auplFields = Nothing
162− }
163−
164−-- | Available to use for quota purposes for server-side applications. Can be
165−-- any arbitrary string assigned to a user, but should not exceed 40
166−-- characters. Overrides userIp if both are provided.
167−auplQuotaUser :: Lens' AccountUserProfilesList' (Maybe Text)
168−auplQuotaUser
169− = lens _auplQuotaUser
170− (\ s a -> s{_auplQuotaUser = a})
171−
172−-- | Returns response with indentations and line breaks.
173−auplPrettyPrint :: Lens' AccountUserProfilesList' Bool
174−auplPrettyPrint
175− = lens _auplPrettyPrint
176− (\ s a -> s{_auplPrettyPrint = a})
177−
178−-- | Select only user profiles with the specified user role ID.
179−auplUserRoleId :: Lens' AccountUserProfilesList' (Maybe Int64)
180−auplUserRoleId
181− = lens _auplUserRoleId
182− (\ s a -> s{_auplUserRoleId = a})
183−
184−-- | IP address of the site where the request originates. Use this if you
185−-- want to enforce per-user limits.
186−auplUserIP :: Lens' AccountUserProfilesList' (Maybe Text)
187−auplUserIP
188− = lens _auplUserIP (\ s a -> s{_auplUserIP = a})
189−
190−-- | Allows searching for objects by name, ID or email. Wildcards (*) are
191−-- allowed. For example, \"user profile*2015\" will return objects with
192−-- names like \"user profile June 2015\", \"user profile April 2015\", or
193−-- simply \"user profile 2015\". Most of the searches also add wildcards
194−-- implicitly at the start and the end of the search string. For example, a
195−-- search string of \"user profile\" will match objects with name \"my user
196−-- profile\", \"user profile 2015\", or simply \"user profile\".
197−auplSearchString :: Lens' AccountUserProfilesList' (Maybe Text)
198−auplSearchString
199− = lens _auplSearchString
200− (\ s a -> s{_auplSearchString = a})
201−
202−-- | Select only user profiles with these IDs.
203−auplIds :: Lens' AccountUserProfilesList' [Int64]
204−auplIds
205− = lens _auplIds (\ s a -> s{_auplIds = a}) . _Default
206− . _Coerce
207−
208−-- | User profile ID associated with this request.
209−auplProfileId :: Lens' AccountUserProfilesList' Int64
210−auplProfileId
211− = lens _auplProfileId
212− (\ s a -> s{_auplProfileId = a})
213−
214−-- | Order of sorted results, default is ASCENDING.
215−auplSortOrder :: Lens' AccountUserProfilesList' (Maybe DfareportingAccountUserProfilesListSortOrder)
216−auplSortOrder
217− = lens _auplSortOrder
218− (\ s a -> s{_auplSortOrder = a})
219−
220−-- | Select only active user profiles.
221−auplActive :: Lens' AccountUserProfilesList' (Maybe Bool)
222−auplActive
223− = lens _auplActive (\ s a -> s{_auplActive = a})
224−
225−-- | API key. Your API key identifies your project and provides you with API
226−-- access, quota, and reports. Required unless you provide an OAuth 2.0
227−-- token.
228−auplKey :: Lens' AccountUserProfilesList' (Maybe Key)
229−auplKey = lens _auplKey (\ s a -> s{_auplKey = a})
230−
231−-- | Value of the nextPageToken from the previous result page.
232−auplPageToken :: Lens' AccountUserProfilesList' (Maybe Text)
233−auplPageToken
234− = lens _auplPageToken
235− (\ s a -> s{_auplPageToken = a})
236−
237−-- | Field by which to sort the list.
238−auplSortField :: Lens' AccountUserProfilesList' (Maybe DfareportingAccountUserProfilesListSortField)
239−auplSortField
240− = lens _auplSortField
241− (\ s a -> s{_auplSortField = a})
242−
243−-- | Select only user profiles with the specified subaccount ID.
244−auplSubAccountId :: Lens' AccountUserProfilesList' (Maybe Int64)
245−auplSubAccountId
246− = lens _auplSubAccountId
247− (\ s a -> s{_auplSubAccountId = a})
248−
249−-- | OAuth 2.0 token for the current user.
250−auplOAuthToken :: Lens' AccountUserProfilesList' (Maybe OAuthToken)
251−auplOAuthToken
252− = lens _auplOAuthToken
253− (\ s a -> s{_auplOAuthToken = a})
254−
255−-- | Maximum number of results to return.
256−auplMaxResults :: Lens' AccountUserProfilesList' (Maybe Int32)
257−auplMaxResults
258− = lens _auplMaxResults
259− (\ s a -> s{_auplMaxResults = a})
260−
261−-- | Selector specifying which fields to include in a partial response.
262−auplFields :: Lens' AccountUserProfilesList' (Maybe Text)
263−auplFields
264− = lens _auplFields (\ s a -> s{_auplFields = a})
265−
266−instance GoogleAuth AccountUserProfilesList' where
267− authKey = auplKey . _Just
268− authToken = auplOAuthToken . _Just
269−
270−instance GoogleRequest AccountUserProfilesList' where
271− type Rs AccountUserProfilesList' =
272− AccountUserProfilesListResponse
273− request = requestWithRoute defReq dFAReportingURL
274− requestWithRoute r u AccountUserProfilesList'{..}
275− = go _auplProfileId _auplUserRoleId _auplSearchString
276− (_auplIds ^. _Default)
277− _auplSortOrder
278− _auplActive
279− _auplPageToken
280− _auplSortField
281− _auplSubAccountId
282− _auplMaxResults
283− _auplQuotaUser
284− (Just _auplPrettyPrint)
285− _auplUserIP
286− _auplFields
287− _auplKey
288− _auplOAuthToken
289− (Just AltJSON)
290− where go
291− = clientWithRoute
292− (Proxy :: Proxy AccountUserProfilesListResource)
293− r
294− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Patch.hsdeleted−195
@@ -1,195 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.AccountUserProfiles.Patch
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates an existing account user profile. This method supports patch
22−-- semantics.
23−--
24−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingAccountUserProfilesPatch@.
25−module Network.Google.Resource.DFAReporting.AccountUserProfiles.Patch
26− (
27− -- * REST Resource
28− AccountUserProfilesPatchResource
29−
30− -- * Creating a Request
31− , accountUserProfilesPatch'
32− , AccountUserProfilesPatch'
33−
34− -- * Request Lenses
35− , auppQuotaUser
36− , auppPrettyPrint
37− , auppUserIP
38− , auppProfileId
39− , auppPayload
40− , auppKey
41− , auppId
42− , auppOAuthToken
43− , auppFields
44− ) where
45−
46−import Network.Google.DFAReporting.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @DfareportingAccountUserProfilesPatch@ which the
50−-- 'AccountUserProfilesPatch'' request conforms to.
51−type AccountUserProfilesPatchResource =
52− "userprofiles" :>
53− Capture "profileId" Int64 :>
54− "accountUserProfiles" :>
55− QueryParam "id" Int64 :>
56− QueryParam "quotaUser" Text :>
57− QueryParam "prettyPrint" Bool :>
58− QueryParam "userIp" Text :>
59− QueryParam "fields" Text :>
60− QueryParam "key" Key :>
61− QueryParam "oauth_token" OAuthToken :>
62− QueryParam "alt" AltJSON :>
63− ReqBody '[JSON] AccountUserProfile :>
64− Patch '[JSON] AccountUserProfile
65−
66−-- | Updates an existing account user profile. This method supports patch
67−-- semantics.
68−--
69−-- /See:/ 'accountUserProfilesPatch'' smart constructor.
70−data AccountUserProfilesPatch' = AccountUserProfilesPatch'
71− { _auppQuotaUser :: !(Maybe Text)
72− , _auppPrettyPrint :: !Bool
73− , _auppUserIP :: !(Maybe Text)
74− , _auppProfileId :: !Int64
75− , _auppPayload :: !AccountUserProfile
76− , _auppKey :: !(Maybe Key)
77− , _auppId :: !Int64
78− , _auppOAuthToken :: !(Maybe OAuthToken)
79− , _auppFields :: !(Maybe Text)
80− } deriving (Eq,Show,Data,Typeable,Generic)
81−
82−-- | Creates a value of 'AccountUserProfilesPatch'' with the minimum fields required to make a request.
83−--
84−-- Use one of the following lenses to modify other fields as desired:
85−--
86−-- * 'auppQuotaUser'
87−--
88−-- * 'auppPrettyPrint'
89−--
90−-- * 'auppUserIP'
91−--
92−-- * 'auppProfileId'
93−--
94−-- * 'auppPayload'
95−--
96−-- * 'auppKey'
97−--
98−-- * 'auppId'
99−--
100−-- * 'auppOAuthToken'
101−--
102−-- * 'auppFields'
103−accountUserProfilesPatch'
104− :: Int64 -- ^ 'profileId'
105− -> AccountUserProfile -- ^ 'payload'
106− -> Int64 -- ^ 'id'
107− -> AccountUserProfilesPatch'
108−accountUserProfilesPatch' pAuppProfileId_ pAuppPayload_ pAuppId_ =
109− AccountUserProfilesPatch'
110− { _auppQuotaUser = Nothing
111− , _auppPrettyPrint = True
112− , _auppUserIP = Nothing
113− , _auppProfileId = pAuppProfileId_
114− , _auppPayload = pAuppPayload_
115− , _auppKey = Nothing
116− , _auppId = pAuppId_
117− , _auppOAuthToken = Nothing
118− , _auppFields = Nothing
119− }
120−
121−-- | Available to use for quota purposes for server-side applications. Can be
122−-- any arbitrary string assigned to a user, but should not exceed 40
123−-- characters. Overrides userIp if both are provided.
124−auppQuotaUser :: Lens' AccountUserProfilesPatch' (Maybe Text)
125−auppQuotaUser
126− = lens _auppQuotaUser
127− (\ s a -> s{_auppQuotaUser = a})
128−
129−-- | Returns response with indentations and line breaks.
130−auppPrettyPrint :: Lens' AccountUserProfilesPatch' Bool
131−auppPrettyPrint
132− = lens _auppPrettyPrint
133− (\ s a -> s{_auppPrettyPrint = a})
134−
135−-- | IP address of the site where the request originates. Use this if you
136−-- want to enforce per-user limits.
137−auppUserIP :: Lens' AccountUserProfilesPatch' (Maybe Text)
138−auppUserIP
139− = lens _auppUserIP (\ s a -> s{_auppUserIP = a})
140−
141−-- | User profile ID associated with this request.
142−auppProfileId :: Lens' AccountUserProfilesPatch' Int64
143−auppProfileId
144− = lens _auppProfileId
145− (\ s a -> s{_auppProfileId = a})
146−
147−-- | Multipart request metadata.
148−auppPayload :: Lens' AccountUserProfilesPatch' AccountUserProfile
149−auppPayload
150− = lens _auppPayload (\ s a -> s{_auppPayload = a})
151−
152−-- | API key. Your API key identifies your project and provides you with API
153−-- access, quota, and reports. Required unless you provide an OAuth 2.0
154−-- token.
155−auppKey :: Lens' AccountUserProfilesPatch' (Maybe Key)
156−auppKey = lens _auppKey (\ s a -> s{_auppKey = a})
157−
158−-- | User profile ID.
159−auppId :: Lens' AccountUserProfilesPatch' Int64
160−auppId = lens _auppId (\ s a -> s{_auppId = a})
161−
162−-- | OAuth 2.0 token for the current user.
163−auppOAuthToken :: Lens' AccountUserProfilesPatch' (Maybe OAuthToken)
164−auppOAuthToken
165− = lens _auppOAuthToken
166− (\ s a -> s{_auppOAuthToken = a})
167−
168−-- | Selector specifying which fields to include in a partial response.
169−auppFields :: Lens' AccountUserProfilesPatch' (Maybe Text)
170−auppFields
171− = lens _auppFields (\ s a -> s{_auppFields = a})
172−
173−instance GoogleAuth AccountUserProfilesPatch' where
174− authKey = auppKey . _Just
175− authToken = auppOAuthToken . _Just
176−
177−instance GoogleRequest AccountUserProfilesPatch'
178− where
179− type Rs AccountUserProfilesPatch' =
180− AccountUserProfile
181− request = requestWithRoute defReq dFAReportingURL
182− requestWithRoute r u AccountUserProfilesPatch'{..}
183− = go _auppProfileId (Just _auppId) _auppQuotaUser
184− (Just _auppPrettyPrint)
185− _auppUserIP
186− _auppFields
187− _auppKey
188− _auppOAuthToken
189− (Just AltJSON)
190− _auppPayload
191− where go
192− = clientWithRoute
193− (Proxy :: Proxy AccountUserProfilesPatchResource)
194− r
195− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Update.hsdeleted−182
@@ -1,182 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.AccountUserProfiles.Update
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Updates an existing account user profile.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingAccountUserProfilesUpdate@.
24−module Network.Google.Resource.DFAReporting.AccountUserProfiles.Update
25− (
26− -- * REST Resource
27− AccountUserProfilesUpdateResource
28−
29− -- * Creating a Request
30− , accountUserProfilesUpdate'
31− , AccountUserProfilesUpdate'
32−
33− -- * Request Lenses
34− , aupuQuotaUser
35− , aupuPrettyPrint
36− , aupuUserIP
37− , aupuProfileId
38− , aupuPayload
39− , aupuKey
40− , aupuOAuthToken
41− , aupuFields
42− ) where
43−
44−import Network.Google.DFAReporting.Types
45−import Network.Google.Prelude
46−
47−-- | A resource alias for @DfareportingAccountUserProfilesUpdate@ which the
48−-- 'AccountUserProfilesUpdate'' request conforms to.
49−type AccountUserProfilesUpdateResource =
50− "userprofiles" :>
51− Capture "profileId" Int64 :>
52− "accountUserProfiles" :>
53− QueryParam "quotaUser" Text :>
54− QueryParam "prettyPrint" Bool :>
55− QueryParam "userIp" Text :>
56− QueryParam "fields" Text :>
57− QueryParam "key" Key :>
58− QueryParam "oauth_token" OAuthToken :>
59− QueryParam "alt" AltJSON :>
60− ReqBody '[JSON] AccountUserProfile :>
61− Put '[JSON] AccountUserProfile
62−
63−-- | Updates an existing account user profile.
64−--
65−-- /See:/ 'accountUserProfilesUpdate'' smart constructor.
66−data AccountUserProfilesUpdate' = AccountUserProfilesUpdate'
67− { _aupuQuotaUser :: !(Maybe Text)
68− , _aupuPrettyPrint :: !Bool
69− , _aupuUserIP :: !(Maybe Text)
70− , _aupuProfileId :: !Int64
71− , _aupuPayload :: !AccountUserProfile
72− , _aupuKey :: !(Maybe Key)
73− , _aupuOAuthToken :: !(Maybe OAuthToken)
74− , _aupuFields :: !(Maybe Text)
75− } deriving (Eq,Show,Data,Typeable,Generic)
76−
77−-- | Creates a value of 'AccountUserProfilesUpdate'' with the minimum fields required to make a request.
78−--
79−-- Use one of the following lenses to modify other fields as desired:
80−--
81−-- * 'aupuQuotaUser'
82−--
83−-- * 'aupuPrettyPrint'
84−--
85−-- * 'aupuUserIP'
86−--
87−-- * 'aupuProfileId'
88−--
89−-- * 'aupuPayload'
90−--
91−-- * 'aupuKey'
92−--
93−-- * 'aupuOAuthToken'
94−--
95−-- * 'aupuFields'
96−accountUserProfilesUpdate'
97− :: Int64 -- ^ 'profileId'
98− -> AccountUserProfile -- ^ 'payload'
99− -> AccountUserProfilesUpdate'
100−accountUserProfilesUpdate' pAupuProfileId_ pAupuPayload_ =
101− AccountUserProfilesUpdate'
102− { _aupuQuotaUser = Nothing
103− , _aupuPrettyPrint = True
104− , _aupuUserIP = Nothing
105− , _aupuProfileId = pAupuProfileId_
106− , _aupuPayload = pAupuPayload_
107− , _aupuKey = Nothing
108− , _aupuOAuthToken = Nothing
109− , _aupuFields = Nothing
110− }
111−
112−-- | Available to use for quota purposes for server-side applications. Can be
113−-- any arbitrary string assigned to a user, but should not exceed 40
114−-- characters. Overrides userIp if both are provided.
115−aupuQuotaUser :: Lens' AccountUserProfilesUpdate' (Maybe Text)
116−aupuQuotaUser
117− = lens _aupuQuotaUser
118− (\ s a -> s{_aupuQuotaUser = a})
119−
120−-- | Returns response with indentations and line breaks.
121−aupuPrettyPrint :: Lens' AccountUserProfilesUpdate' Bool
122−aupuPrettyPrint
123− = lens _aupuPrettyPrint
124− (\ s a -> s{_aupuPrettyPrint = a})
125−
126−-- | IP address of the site where the request originates. Use this if you
127−-- want to enforce per-user limits.
128−aupuUserIP :: Lens' AccountUserProfilesUpdate' (Maybe Text)
129−aupuUserIP
130− = lens _aupuUserIP (\ s a -> s{_aupuUserIP = a})
131−
132−-- | User profile ID associated with this request.
133−aupuProfileId :: Lens' AccountUserProfilesUpdate' Int64
134−aupuProfileId
135− = lens _aupuProfileId
136− (\ s a -> s{_aupuProfileId = a})
137−
138−-- | Multipart request metadata.
139−aupuPayload :: Lens' AccountUserProfilesUpdate' AccountUserProfile
140−aupuPayload
141− = lens _aupuPayload (\ s a -> s{_aupuPayload = a})
142−
143−-- | API key. Your API key identifies your project and provides you with API
144−-- access, quota, and reports. Required unless you provide an OAuth 2.0
145−-- token.
146−aupuKey :: Lens' AccountUserProfilesUpdate' (Maybe Key)
147−aupuKey = lens _aupuKey (\ s a -> s{_aupuKey = a})
148−
149−-- | OAuth 2.0 token for the current user.
150−aupuOAuthToken :: Lens' AccountUserProfilesUpdate' (Maybe OAuthToken)
151−aupuOAuthToken
152− = lens _aupuOAuthToken
153− (\ s a -> s{_aupuOAuthToken = a})
154−
155−-- | Selector specifying which fields to include in a partial response.
156−aupuFields :: Lens' AccountUserProfilesUpdate' (Maybe Text)
157−aupuFields
158− = lens _aupuFields (\ s a -> s{_aupuFields = a})
159−
160−instance GoogleAuth AccountUserProfilesUpdate' where
161− authKey = aupuKey . _Just
162− authToken = aupuOAuthToken . _Just
163−
164−instance GoogleRequest AccountUserProfilesUpdate'
165− where
166− type Rs AccountUserProfilesUpdate' =
167− AccountUserProfile
168− request = requestWithRoute defReq dFAReportingURL
169− requestWithRoute r u AccountUserProfilesUpdate'{..}
170− = go _aupuProfileId _aupuQuotaUser
171− (Just _aupuPrettyPrint)
172− _aupuUserIP
173− _aupuFields
174− _aupuKey
175− _aupuOAuthToken
176− (Just AltJSON)
177− _aupuPayload
178− where go
179− = clientWithRoute
180− (Proxy :: Proxy AccountUserProfilesUpdateResource)
181− r
182− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Patch.hs+1−2
@@ -59,8 +59,7 @@ type AccountsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Account :>
63− Patch '[JSON] Account
62+ ReqBody '[JSON] Account :> Patch '[JSON] Account
6463
6564-- | Updates an existing account. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Update.hs+1−1
@@ -57,7 +57,7 @@ type AccountsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Account :> Put '[JSON] Account
60+ ReqBody '[JSON] Account :> Put '[JSON] Account
6161
6262-- | Updates an existing account.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Insert.hs+1−1
@@ -57,7 +57,7 @@ type AdsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Ad :> Post '[JSON] Ad
60+ ReqBody '[JSON] Ad :> Post '[JSON] Ad
6161
6262-- | Inserts a new ad.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Patch.hs+1−1
@@ -59,7 +59,7 @@ type AdsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Ad :> Patch '[JSON] Ad
62+ ReqBody '[JSON] Ad :> Patch '[JSON] Ad
6363
6464-- | Updates an existing ad. This method supports patch semantics.
6565--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Update.hs+1−1
@@ -57,7 +57,7 @@ type AdsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Ad :> Put '[JSON] Ad
60+ ReqBody '[JSON] Ad :> Put '[JSON] Ad
6161
6262-- | Updates an existing ad.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Insert.hs+1−1
@@ -57,7 +57,7 @@ type AdvertiserGroupsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AdvertiserGroup :>
60+ ReqBody '[JSON] AdvertiserGroup :>
6161 Post '[JSON] AdvertiserGroup
6262
6363-- | Inserts a new advertiser group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Patch.hs+1−1
@@ -60,7 +60,7 @@ type AdvertiserGroupsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] AdvertiserGroup :>
63+ ReqBody '[JSON] AdvertiserGroup :>
6464 Patch '[JSON] AdvertiserGroup
6565
6666-- | Updates an existing advertiser group. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Update.hs+1−1
@@ -57,7 +57,7 @@ type AdvertiserGroupsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AdvertiserGroup :>
60+ ReqBody '[JSON] AdvertiserGroup :>
6161 Put '[JSON] AdvertiserGroup
6262
6363-- | Updates an existing advertiser group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Insert.hs+1−2
@@ -57,8 +57,7 @@ type AdvertisersInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Advertiser :>
61− Post '[JSON] Advertiser
60+ ReqBody '[JSON] Advertiser :> Post '[JSON] Advertiser
6261
6362-- | Inserts a new advertiser.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Patch.hs+1−1
@@ -59,7 +59,7 @@ type AdvertisersPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Advertiser :>
62+ ReqBody '[JSON] Advertiser :>
6363 Patch '[JSON] Advertiser
6464
6565-- | Updates an existing advertiser. This method supports patch semantics.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Update.hs+1−2
@@ -57,8 +57,7 @@ type AdvertisersUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Advertiser :>
61− Put '[JSON] Advertiser
60+ ReqBody '[JSON] Advertiser :> Put '[JSON] Advertiser
6261
6362-- | Updates an existing advertiser.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/Insert.hs+2−2
@@ -62,8 +62,8 @@ type CampaignCreativeAssociationsInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] CampaignCreativeAssociation
66− :> Post '[JSON] CampaignCreativeAssociation
65+ ReqBody '[JSON] CampaignCreativeAssociation :>
66+ Post '[JSON] CampaignCreativeAssociation
6767
6868-- | Associates a creative with the specified campaign. This method creates a
6969-- default ad with dimensions matching the creative in the campaign if such
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Insert.hs+1−2
@@ -61,8 +61,7 @@ type CampaignsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Campaign :>
65− Post '[JSON] Campaign
64+ ReqBody '[JSON] Campaign :> Post '[JSON] Campaign
6665
6766-- | Inserts a new campaign.
6867--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Patch.hs+1−2
@@ -59,8 +59,7 @@ type CampaignsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Campaign :>
63− Patch '[JSON] Campaign
62+ ReqBody '[JSON] Campaign :> Patch '[JSON] Campaign
6463
6564-- | Updates an existing campaign. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Update.hs+1−2
@@ -57,8 +57,7 @@ type CampaignsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Campaign :>
61− Put '[JSON] Campaign
60+ ReqBody '[JSON] Campaign :> Put '[JSON] Campaign
6261
6362-- | Updates an existing campaign.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Insert.hs+1−1
@@ -57,7 +57,7 @@ type ContentCategoriesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ContentCategory :>
60+ ReqBody '[JSON] ContentCategory :>
6161 Post '[JSON] ContentCategory
6262
6363-- | Inserts a new content category.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Patch.hs+1−1
@@ -60,7 +60,7 @@ type ContentCategoriesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ContentCategory :>
63+ ReqBody '[JSON] ContentCategory :>
6464 Patch '[JSON] ContentCategory
6565
6666-- | Updates an existing content category. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Update.hs+1−1
@@ -57,7 +57,7 @@ type ContentCategoriesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ContentCategory :>
60+ ReqBody '[JSON] ContentCategory :>
6161 Put '[JSON] ContentCategory
6262
6363-- | Updates an existing content category.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Insert.hs+1−1
@@ -60,7 +60,7 @@ type CreativeFieldValuesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CreativeFieldValue :>
63+ ReqBody '[JSON] CreativeFieldValue :>
6464 Post '[JSON] CreativeFieldValue
6565
6666-- | Inserts a new creative field value.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Patch.hs+1−1
@@ -63,7 +63,7 @@ type CreativeFieldValuesPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] CreativeFieldValue :>
66+ ReqBody '[JSON] CreativeFieldValue :>
6767 Patch '[JSON] CreativeFieldValue
6868
6969-- | Updates an existing creative field value. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Update.hs+1−1
@@ -60,7 +60,7 @@ type CreativeFieldValuesUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CreativeFieldValue :>
63+ ReqBody '[JSON] CreativeFieldValue :>
6464 Put '[JSON] CreativeFieldValue
6565
6666-- | Updates an existing creative field value.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Insert.hs+1−1
@@ -57,7 +57,7 @@ type CreativeFieldsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CreativeField :>
60+ ReqBody '[JSON] CreativeField :>
6161 Post '[JSON] CreativeField
6262
6363-- | Inserts a new creative field.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Patch.hs+1−1
@@ -60,7 +60,7 @@ type CreativeFieldsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CreativeField :>
63+ ReqBody '[JSON] CreativeField :>
6464 Patch '[JSON] CreativeField
6565
6666-- | Updates an existing creative field. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Update.hs+1−1
@@ -57,7 +57,7 @@ type CreativeFieldsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CreativeField :>
60+ ReqBody '[JSON] CreativeField :>
6161 Put '[JSON] CreativeField
6262
6363-- | Updates an existing creative field.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Insert.hs+1−1
@@ -57,7 +57,7 @@ type CreativeGroupsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CreativeGroup :>
60+ ReqBody '[JSON] CreativeGroup :>
6161 Post '[JSON] CreativeGroup
6262
6363-- | Inserts a new creative group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Patch.hs+1−1
@@ -60,7 +60,7 @@ type CreativeGroupsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CreativeGroup :>
63+ ReqBody '[JSON] CreativeGroup :>
6464 Patch '[JSON] CreativeGroup
6565
6666-- | Updates an existing creative group. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Update.hs+1−1
@@ -57,7 +57,7 @@ type CreativeGroupsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CreativeGroup :>
60+ ReqBody '[JSON] CreativeGroup :>
6161 Put '[JSON] CreativeGroup
6262
6363-- | Updates an existing creative group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Insert.hs+1−2
@@ -57,8 +57,7 @@ type CreativesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Creative :>
61− Post '[JSON] Creative
60+ ReqBody '[JSON] Creative :> Post '[JSON] Creative
6261
6362-- | Inserts a new creative.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Patch.hs+1−2
@@ -59,8 +59,7 @@ type CreativesPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Creative :>
63− Patch '[JSON] Creative
62+ ReqBody '[JSON] Creative :> Patch '[JSON] Creative
6463
6564-- | Updates an existing creative. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Update.hs+1−2
@@ -57,8 +57,7 @@ type CreativesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Creative :>
61− Put '[JSON] Creative
60+ ReqBody '[JSON] Creative :> Put '[JSON] Creative
6261
6362-- | Updates an existing creative.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DimensionValues/Query.hs+1−1
@@ -62,7 +62,7 @@ type DimensionValuesQueryResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] DimensionValueRequest :>
65+ ReqBody '[JSON] DimensionValueRequest :>
6666 Post '[JSON] DimensionValueList
6767
6868-- | Retrieves list of report dimension values for a list of filters.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Insert.hs+1−1
@@ -57,7 +57,7 @@ type DirectorySitesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] DirectorySite :>
60+ ReqBody '[JSON] DirectorySite :>
6161 Post '[JSON] DirectorySite
6262
6363-- | Inserts a new directory site.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Insert.hs+1−2
@@ -57,8 +57,7 @@ type EventTagsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] EventTag :>
61− Post '[JSON] EventTag
60+ ReqBody '[JSON] EventTag :> Post '[JSON] EventTag
6261
6362-- | Inserts a new event tag.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Patch.hs+1−2
@@ -59,8 +59,7 @@ type EventTagsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] EventTag :>
63− Patch '[JSON] EventTag
62+ ReqBody '[JSON] EventTag :> Patch '[JSON] EventTag
6463
6564-- | Updates an existing event tag. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Update.hs+1−2
@@ -57,8 +57,7 @@ type EventTagsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] EventTag :>
61− Put '[JSON] EventTag
60+ ReqBody '[JSON] EventTag :> Put '[JSON] EventTag
6261
6362-- | Updates an existing event tag.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Insert.hs+1−1
@@ -57,7 +57,7 @@ type FloodlightActivitiesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] FloodlightActivity :>
60+ ReqBody '[JSON] FloodlightActivity :>
6161 Post '[JSON] FloodlightActivity
6262
6363-- | Inserts a new floodlight activity.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Patch.hs+1−1
@@ -60,7 +60,7 @@ type FloodlightActivitiesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] FloodlightActivity :>
63+ ReqBody '[JSON] FloodlightActivity :>
6464 Patch '[JSON] FloodlightActivity
6565
6666-- | Updates an existing floodlight activity. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Update.hs+1−1
@@ -57,7 +57,7 @@ type FloodlightActivitiesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] FloodlightActivity :>
60+ ReqBody '[JSON] FloodlightActivity :>
6161 Put '[JSON] FloodlightActivity
6262
6363-- | Updates an existing floodlight activity.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Insert.hs+1−1
@@ -57,7 +57,7 @@ type FloodlightActivityGroupsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] FloodlightActivityGroup :>
60+ ReqBody '[JSON] FloodlightActivityGroup :>
6161 Post '[JSON] FloodlightActivityGroup
6262
6363-- | Inserts a new floodlight activity group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Patch.hs+1−1
@@ -60,7 +60,7 @@ type FloodlightActivityGroupsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] FloodlightActivityGroup :>
63+ ReqBody '[JSON] FloodlightActivityGroup :>
6464 Patch '[JSON] FloodlightActivityGroup
6565
6666-- | Updates an existing floodlight activity group. This method supports
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Update.hs+1−1
@@ -57,7 +57,7 @@ type FloodlightActivityGroupsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] FloodlightActivityGroup :>
60+ ReqBody '[JSON] FloodlightActivityGroup :>
6161 Put '[JSON] FloodlightActivityGroup
6262
6363-- | Updates an existing floodlight activity group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Patch.hs+1−1
@@ -60,7 +60,7 @@ type FloodlightConfigurationsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] FloodlightConfiguration :>
63+ ReqBody '[JSON] FloodlightConfiguration :>
6464 Patch '[JSON] FloodlightConfiguration
6565
6666-- | Updates an existing floodlight configuration. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Update.hs+1−1
@@ -57,7 +57,7 @@ type FloodlightConfigurationsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] FloodlightConfiguration :>
60+ ReqBody '[JSON] FloodlightConfiguration :>
6161 Put '[JSON] FloodlightConfiguration
6262
6363-- | Updates an existing floodlight configuration.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Insert.hs+1−1
@@ -60,7 +60,7 @@ type LandingPagesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] LandingPage :>
63+ ReqBody '[JSON] LandingPage :>
6464 Post '[JSON] LandingPage
6565
6666-- | Inserts a new landing page for the specified campaign.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Patch.hs+1−1
@@ -63,7 +63,7 @@ type LandingPagesPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] LandingPage :>
66+ ReqBody '[JSON] LandingPage :>
6767 Patch '[JSON] LandingPage
6868
6969-- | Updates an existing campaign landing page. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Update.hs+1−1
@@ -60,7 +60,7 @@ type LandingPagesUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] LandingPage :>
63+ ReqBody '[JSON] LandingPage :>
6464 Put '[JSON] LandingPage
6565
6666-- | Updates an existing campaign landing page.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Insert.hs+1−1
@@ -57,7 +57,7 @@ type PlacementGroupsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlacementGroup :>
60+ ReqBody '[JSON] PlacementGroup :>
6161 Post '[JSON] PlacementGroup
6262
6363-- | Inserts a new placement group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Patch.hs+1−1
@@ -60,7 +60,7 @@ type PlacementGroupsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PlacementGroup :>
63+ ReqBody '[JSON] PlacementGroup :>
6464 Patch '[JSON] PlacementGroup
6565
6666-- | Updates an existing placement group. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Update.hs+1−1
@@ -57,7 +57,7 @@ type PlacementGroupsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlacementGroup :>
60+ ReqBody '[JSON] PlacementGroup :>
6161 Put '[JSON] PlacementGroup
6262
6363-- | Updates an existing placement group.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Insert.hs+1−1
@@ -57,7 +57,7 @@ type PlacementStrategiesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlacementStrategy :>
60+ ReqBody '[JSON] PlacementStrategy :>
6161 Post '[JSON] PlacementStrategy
6262
6363-- | Inserts a new placement strategy.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Patch.hs+1−1
@@ -60,7 +60,7 @@ type PlacementStrategiesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PlacementStrategy :>
63+ ReqBody '[JSON] PlacementStrategy :>
6464 Patch '[JSON] PlacementStrategy
6565
6666-- | Updates an existing placement strategy. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Update.hs+1−1
@@ -57,7 +57,7 @@ type PlacementStrategiesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlacementStrategy :>
60+ ReqBody '[JSON] PlacementStrategy :>
6161 Put '[JSON] PlacementStrategy
6262
6363-- | Updates an existing placement strategy.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Insert.hs+1−2
@@ -57,8 +57,7 @@ type PlacementsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Placement :>
61− Post '[JSON] Placement
60+ ReqBody '[JSON] Placement :> Post '[JSON] Placement
6261
6362-- | Inserts a new placement.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Patch.hs+1−2
@@ -59,8 +59,7 @@ type PlacementsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Placement :>
63− Patch '[JSON] Placement
62+ ReqBody '[JSON] Placement :> Patch '[JSON] Placement
6463
6564-- | Updates an existing placement. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Update.hs+1−2
@@ -57,8 +57,7 @@ type PlacementsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Placement :>
61− Put '[JSON] Placement
60+ ReqBody '[JSON] Placement :> Put '[JSON] Placement
6261
6362-- | Updates an existing placement.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Patch.hs+1−1
@@ -60,7 +60,7 @@ type RemarketingListSharesPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] RemarketingListShare :>
63+ ReqBody '[JSON] RemarketingListShare :>
6464 Patch '[JSON] RemarketingListShare
6565
6666-- | Updates an existing remarketing list share. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Update.hs+1−1
@@ -57,7 +57,7 @@ type RemarketingListSharesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] RemarketingListShare :>
60+ ReqBody '[JSON] RemarketingListShare :>
6161 Put '[JSON] RemarketingListShare
6262
6363-- | Updates an existing remarketing list share.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Insert.hs+1−1
@@ -57,7 +57,7 @@ type RemarketingListsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] RemarketingList :>
60+ ReqBody '[JSON] RemarketingList :>
6161 Post '[JSON] RemarketingList
6262
6363-- | Inserts a new remarketing list.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Patch.hs+1−1
@@ -60,7 +60,7 @@ type RemarketingListsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] RemarketingList :>
63+ ReqBody '[JSON] RemarketingList :>
6464 Patch '[JSON] RemarketingList
6565
6666-- | Updates an existing remarketing list. This method supports patch
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Update.hs+1−1
@@ -57,7 +57,7 @@ type RemarketingListsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] RemarketingList :>
60+ ReqBody '[JSON] RemarketingList :>
6161 Put '[JSON] RemarketingList
6262
6363-- | Updates an existing remarketing list.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/CompatibleFields/Query.hs+1−1
@@ -61,7 +61,7 @@ type ReportsCompatibleFieldsQueryResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Report :>
64+ ReqBody '[JSON] Report :>
6565 Post '[JSON] CompatibleFields
6666
6767-- | Returns the fields that are compatible to be selected in the respective
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Insert.hs+1−1
@@ -57,7 +57,7 @@ type ReportsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Report :> Post '[JSON] Report
60+ ReqBody '[JSON] Report :> Post '[JSON] Report
6161
6262-- | Creates a report.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Patch.hs+1−1
@@ -59,7 +59,7 @@ type ReportsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Report :> Patch '[JSON] Report
62+ ReqBody '[JSON] Report :> Patch '[JSON] Report
6363
6464-- | Updates a report. This method supports patch semantics.
6565--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Update.hs+1−1
@@ -59,7 +59,7 @@ type ReportsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Report :> Put '[JSON] Report
62+ ReqBody '[JSON] Report :> Put '[JSON] Report
6363
6464-- | Updates a report.
6565--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Insert.hs+1−1
@@ -57,7 +57,7 @@ type SitesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Site :> Post '[JSON] Site
60+ ReqBody '[JSON] Site :> Post '[JSON] Site
6161
6262-- | Inserts a new site.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Patch.hs+1−1
@@ -59,7 +59,7 @@ type SitesPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Site :> Patch '[JSON] Site
62+ ReqBody '[JSON] Site :> Patch '[JSON] Site
6363
6464-- | Updates an existing site. This method supports patch semantics.
6565--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Update.hs+1−1
@@ -57,7 +57,7 @@ type SitesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Site :> Put '[JSON] Site
60+ ReqBody '[JSON] Site :> Put '[JSON] Site
6161
6262-- | Updates an existing site.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Insert.hs+1−1
@@ -57,7 +57,7 @@ type SizesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Size :> Post '[JSON] Size
60+ ReqBody '[JSON] Size :> Post '[JSON] Size
6161
6262-- | Inserts a new size.
6363--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Insert.hs+1−2
@@ -57,8 +57,7 @@ type SubAccountsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] SubAccount :>
61− Post '[JSON] SubAccount
60+ ReqBody '[JSON] SubAccount :> Post '[JSON] SubAccount
6261
6362-- | Inserts a new subaccount.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Patch.hs+1−1
@@ -59,7 +59,7 @@ type SubAccountsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] SubAccount :>
62+ ReqBody '[JSON] SubAccount :>
6363 Patch '[JSON] SubAccount
6464
6565-- | Updates an existing subaccount. This method supports patch semantics.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Update.hs+1−2
@@ -57,8 +57,7 @@ type SubAccountsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] SubAccount :>
61− Put '[JSON] SubAccount
60+ ReqBody '[JSON] SubAccount :> Put '[JSON] SubAccount
6261
6362-- | Updates an existing subaccount.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProfiles/Get.hsdeleted−163
@@ -1,163 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.UserProfiles.Get
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Gets one user profile by ID.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingUserProfilesGet@.
24−module Network.Google.Resource.DFAReporting.UserProfiles.Get
25− (
26− -- * REST Resource
27− UserProfilesGetResource
28−
29− -- * Creating a Request
30− , userProfilesGet'
31− , UserProfilesGet'
32−
33− -- * Request Lenses
34− , upgQuotaUser
35− , upgPrettyPrint
36− , upgUserIP
37− , upgProfileId
38− , upgKey
39− , upgOAuthToken
40− , upgFields
41− ) where
42−
43−import Network.Google.DFAReporting.Types
44−import Network.Google.Prelude
45−
46−-- | A resource alias for @DfareportingUserProfilesGet@ which the
47−-- 'UserProfilesGet'' request conforms to.
48−type UserProfilesGetResource =
49− "userprofiles" :>
50− Capture "profileId" Int64 :>
51− QueryParam "quotaUser" Text :>
52− QueryParam "prettyPrint" Bool :>
53− QueryParam "userIp" Text :>
54− QueryParam "fields" Text :>
55− QueryParam "key" Key :>
56− QueryParam "oauth_token" OAuthToken :>
57− QueryParam "alt" AltJSON :> Get '[JSON] UserProfile
58−
59−-- | Gets one user profile by ID.
60−--
61−-- /See:/ 'userProfilesGet'' smart constructor.
62−data UserProfilesGet' = UserProfilesGet'
63− { _upgQuotaUser :: !(Maybe Text)
64− , _upgPrettyPrint :: !Bool
65− , _upgUserIP :: !(Maybe Text)
66− , _upgProfileId :: !Int64
67− , _upgKey :: !(Maybe Key)
68− , _upgOAuthToken :: !(Maybe OAuthToken)
69− , _upgFields :: !(Maybe Text)
70− } deriving (Eq,Show,Data,Typeable,Generic)
71−
72−-- | Creates a value of 'UserProfilesGet'' with the minimum fields required to make a request.
73−--
74−-- Use one of the following lenses to modify other fields as desired:
75−--
76−-- * 'upgQuotaUser'
77−--
78−-- * 'upgPrettyPrint'
79−--
80−-- * 'upgUserIP'
81−--
82−-- * 'upgProfileId'
83−--
84−-- * 'upgKey'
85−--
86−-- * 'upgOAuthToken'
87−--
88−-- * 'upgFields'
89−userProfilesGet'
90− :: Int64 -- ^ 'profileId'
91− -> UserProfilesGet'
92−userProfilesGet' pUpgProfileId_ =
93− UserProfilesGet'
94− { _upgQuotaUser = Nothing
95− , _upgPrettyPrint = True
96− , _upgUserIP = Nothing
97− , _upgProfileId = pUpgProfileId_
98− , _upgKey = Nothing
99− , _upgOAuthToken = Nothing
100− , _upgFields = Nothing
101− }
102−
103−-- | Available to use for quota purposes for server-side applications. Can be
104−-- any arbitrary string assigned to a user, but should not exceed 40
105−-- characters. Overrides userIp if both are provided.
106−upgQuotaUser :: Lens' UserProfilesGet' (Maybe Text)
107−upgQuotaUser
108− = lens _upgQuotaUser (\ s a -> s{_upgQuotaUser = a})
109−
110−-- | Returns response with indentations and line breaks.
111−upgPrettyPrint :: Lens' UserProfilesGet' Bool
112−upgPrettyPrint
113− = lens _upgPrettyPrint
114− (\ s a -> s{_upgPrettyPrint = a})
115−
116−-- | IP address of the site where the request originates. Use this if you
117−-- want to enforce per-user limits.
118−upgUserIP :: Lens' UserProfilesGet' (Maybe Text)
119−upgUserIP
120− = lens _upgUserIP (\ s a -> s{_upgUserIP = a})
121−
122−-- | The user profile ID.
123−upgProfileId :: Lens' UserProfilesGet' Int64
124−upgProfileId
125− = lens _upgProfileId (\ s a -> s{_upgProfileId = a})
126−
127−-- | API key. Your API key identifies your project and provides you with API
128−-- access, quota, and reports. Required unless you provide an OAuth 2.0
129−-- token.
130−upgKey :: Lens' UserProfilesGet' (Maybe Key)
131−upgKey = lens _upgKey (\ s a -> s{_upgKey = a})
132−
133−-- | OAuth 2.0 token for the current user.
134−upgOAuthToken :: Lens' UserProfilesGet' (Maybe OAuthToken)
135−upgOAuthToken
136− = lens _upgOAuthToken
137− (\ s a -> s{_upgOAuthToken = a})
138−
139−-- | Selector specifying which fields to include in a partial response.
140−upgFields :: Lens' UserProfilesGet' (Maybe Text)
141−upgFields
142− = lens _upgFields (\ s a -> s{_upgFields = a})
143−
144−instance GoogleAuth UserProfilesGet' where
145− authKey = upgKey . _Just
146− authToken = upgOAuthToken . _Just
147−
148−instance GoogleRequest UserProfilesGet' where
149− type Rs UserProfilesGet' = UserProfile
150− request = requestWithRoute defReq dFAReportingURL
151− requestWithRoute r u UserProfilesGet'{..}
152− = go _upgProfileId _upgQuotaUser
153− (Just _upgPrettyPrint)
154− _upgUserIP
155− _upgFields
156− _upgKey
157− _upgOAuthToken
158− (Just AltJSON)
159− where go
160− = clientWithRoute
161− (Proxy :: Proxy UserProfilesGetResource)
162− r
163− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProfiles/List.hsdeleted−150
@@ -1,150 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.DFAReporting.UserProfiles.List
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Retrieves list of user profiles for a user.
22−--
23−-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference> for @DfareportingUserProfilesList@.
24−module Network.Google.Resource.DFAReporting.UserProfiles.List
25− (
26− -- * REST Resource
27− UserProfilesListResource
28−
29− -- * Creating a Request
30− , userProfilesList'
31− , UserProfilesList'
32−
33− -- * Request Lenses
34− , uplQuotaUser
35− , uplPrettyPrint
36− , uplUserIP
37− , uplKey
38− , uplOAuthToken
39− , uplFields
40− ) where
41−
42−import Network.Google.DFAReporting.Types
43−import Network.Google.Prelude
44−
45−-- | A resource alias for @DfareportingUserProfilesList@ which the
46−-- 'UserProfilesList'' request conforms to.
47−type UserProfilesListResource =
48− "userprofiles" :>
49− QueryParam "quotaUser" Text :>
50− QueryParam "prettyPrint" Bool :>
51− QueryParam "userIp" Text :>
52− QueryParam "fields" Text :>
53− QueryParam "key" Key :>
54− QueryParam "oauth_token" OAuthToken :>
55− QueryParam "alt" AltJSON :>
56− Get '[JSON] UserProfileList
57−
58−-- | Retrieves list of user profiles for a user.
59−--
60−-- /See:/ 'userProfilesList'' smart constructor.
61−data UserProfilesList' = UserProfilesList'
62− { _uplQuotaUser :: !(Maybe Text)
63− , _uplPrettyPrint :: !Bool
64− , _uplUserIP :: !(Maybe Text)
65− , _uplKey :: !(Maybe Key)
66− , _uplOAuthToken :: !(Maybe OAuthToken)
67− , _uplFields :: !(Maybe Text)
68− } deriving (Eq,Show,Data,Typeable,Generic)
69−
70−-- | Creates a value of 'UserProfilesList'' with the minimum fields required to make a request.
71−--
72−-- Use one of the following lenses to modify other fields as desired:
73−--
74−-- * 'uplQuotaUser'
75−--
76−-- * 'uplPrettyPrint'
77−--
78−-- * 'uplUserIP'
79−--
80−-- * 'uplKey'
81−--
82−-- * 'uplOAuthToken'
83−--
84−-- * 'uplFields'
85−userProfilesList'
86− :: UserProfilesList'
87−userProfilesList' =
88− UserProfilesList'
89− { _uplQuotaUser = Nothing
90− , _uplPrettyPrint = True
91− , _uplUserIP = Nothing
92− , _uplKey = Nothing
93− , _uplOAuthToken = Nothing
94− , _uplFields = Nothing
95− }
96−
97−-- | Available to use for quota purposes for server-side applications. Can be
98−-- any arbitrary string assigned to a user, but should not exceed 40
99−-- characters. Overrides userIp if both are provided.
100−uplQuotaUser :: Lens' UserProfilesList' (Maybe Text)
101−uplQuotaUser
102− = lens _uplQuotaUser (\ s a -> s{_uplQuotaUser = a})
103−
104−-- | Returns response with indentations and line breaks.
105−uplPrettyPrint :: Lens' UserProfilesList' Bool
106−uplPrettyPrint
107− = lens _uplPrettyPrint
108− (\ s a -> s{_uplPrettyPrint = a})
109−
110−-- | IP address of the site where the request originates. Use this if you
111−-- want to enforce per-user limits.
112−uplUserIP :: Lens' UserProfilesList' (Maybe Text)
113−uplUserIP
114− = lens _uplUserIP (\ s a -> s{_uplUserIP = a})
115−
116−-- | API key. Your API key identifies your project and provides you with API
117−-- access, quota, and reports. Required unless you provide an OAuth 2.0
118−-- token.
119−uplKey :: Lens' UserProfilesList' (Maybe Key)
120−uplKey = lens _uplKey (\ s a -> s{_uplKey = a})
121−
122−-- | OAuth 2.0 token for the current user.
123−uplOAuthToken :: Lens' UserProfilesList' (Maybe OAuthToken)
124−uplOAuthToken
125− = lens _uplOAuthToken
126− (\ s a -> s{_uplOAuthToken = a})
127−
128−-- | Selector specifying which fields to include in a partial response.
129−uplFields :: Lens' UserProfilesList' (Maybe Text)
130−uplFields
131− = lens _uplFields (\ s a -> s{_uplFields = a})
132−
133−instance GoogleAuth UserProfilesList' where
134− authKey = uplKey . _Just
135− authToken = uplOAuthToken . _Just
136−
137−instance GoogleRequest UserProfilesList' where
138− type Rs UserProfilesList' = UserProfileList
139− request = requestWithRoute defReq dFAReportingURL
140− requestWithRoute r u UserProfilesList'{..}
141− = go _uplQuotaUser (Just _uplPrettyPrint) _uplUserIP
142− _uplFields
143− _uplKey
144− _uplOAuthToken
145− (Just AltJSON)
146− where go
147− = clientWithRoute
148− (Proxy :: Proxy UserProfilesListResource)
149− r
150− u
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Insert.hs+1−2
@@ -57,8 +57,7 @@ type UserRolesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] UserRole :>
61− Post '[JSON] UserRole
60+ ReqBody '[JSON] UserRole :> Post '[JSON] UserRole
6261
6362-- | Inserts a new user role.
6463--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Patch.hs+1−2
@@ -59,8 +59,7 @@ type UserRolesPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] UserRole :>
63− Patch '[JSON] UserRole
62+ ReqBody '[JSON] UserRole :> Patch '[JSON] UserRole
6463
6564-- | Updates an existing user role. This method supports patch semantics.
6665--
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Update.hs+1−2
@@ -57,8 +57,7 @@ type UserRolesUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] UserRole :>
61− Put '[JSON] UserRole
60+ ReqBody '[JSON] UserRole :> Put '[JSON] UserRole
6261
6362-- | Updates an existing user role.
6463--
gogol-dns/gen/Network/Google/Resource/DNS/Changes/Create.hs+1−1
@@ -59,7 +59,7 @@ type ChangesCreateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Change :> Post '[JSON] Change
62+ ReqBody '[JSON] Change :> Post '[JSON] Change
6363
6464-- | Atomically update the ResourceRecordSet collection.
6565--
gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Create.hs+1−1
@@ -56,7 +56,7 @@ type ManagedZonesCreateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] ManagedZone :>
59+ ReqBody '[JSON] ManagedZone :>
6060 Post '[JSON] ManagedZone
6161
6262-- | Create a new ManagedZone.
gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Lineitems/Downloadlineitems.hs+1−1
@@ -55,7 +55,7 @@ type LineitemsDownloadlineitemsResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] DownloadLineItemsRequest :>
58+ ReqBody '[JSON] DownloadLineItemsRequest :>
5959 Post '[JSON] DownloadLineItemsResponse
6060
6161-- | Retrieves line items in CSV format.
gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Lineitems/Uploadlineitems.hs+1−1
@@ -55,7 +55,7 @@ type LineitemsUploadlineitemsResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] UploadLineItemsRequest :>
58+ ReqBody '[JSON] UploadLineItemsRequest :>
5959 Post '[JSON] UploadLineItemsResponse
6060
6161-- | Uploads line items in CSV format.
gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/Createquery.hs+1−1
@@ -54,7 +54,7 @@ type QueriesCreatequeryResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Query :> Post '[JSON] Query
57+ ReqBody '[JSON] Query :> Post '[JSON] Query
5858
5959-- | Creates a query.
6060--
gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/Runquery.hs+1−2
@@ -56,8 +56,7 @@ type QueriesRunqueryResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] RunQueryRequest :>
60− Post '[JSON] ()
59+ ReqBody '[JSON] RunQueryRequest :> Post '[JSON] ()
6160
6261-- | Runs a stored query to generate a report.
6362--
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Insert.hs+1−1
@@ -54,7 +54,7 @@ type ConversionInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] ConversionList :>
57+ ReqBody '[JSON] ConversionList :>
5858 Post '[JSON] ConversionList
5959
6060-- | Inserts a batch of new conversions into DoubleClick Search.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Patch.hs+1−1
@@ -69,7 +69,7 @@ type ConversionPatchResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] ConversionList :>
72+ ReqBody '[JSON] ConversionList :>
7373 Patch '[JSON] ConversionList
7474
7575-- | Updates a batch of conversions in DoubleClick Search. This method
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Update.hs+1−1
@@ -54,7 +54,7 @@ type ConversionUpdateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] ConversionList :>
57+ ReqBody '[JSON] ConversionList :>
5858 Put '[JSON] ConversionList
5959
6060-- | Updates a batch of conversions in DoubleClick Search.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/UpdateAvailability.hs+1−1
@@ -56,7 +56,7 @@ type ConversionUpdateAvailabilityResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] UpdateAvailabilityRequest :>
59+ ReqBody '[JSON] UpdateAvailabilityRequest :>
6060 Post '[JSON] UpdateAvailabilityResponse
6161
6262-- | Updates the availabilities of a batch of floodlight activities in
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Generate.hs+1−2
@@ -55,8 +55,7 @@ type ReportsGenerateResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] ReportRequest :>
59− Post '[JSON] Report
58+ ReqBody '[JSON] ReportRequest :> Post '[JSON] Report
6059
6160-- | Generates and returns a report immediately.
6261--
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Request.hs+1−2
@@ -54,8 +54,7 @@ type ReportsRequestResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] ReportRequest :>
58− Post '[JSON] Report
57+ ReqBody '[JSON] ReportRequest :> Post '[JSON] Report
5958
6059-- | Inserts a report request into the reporting system.
6160--
gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+1−1
@@ -67,7 +67,7 @@ type ChangesWatchResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] Channel :>
70+ ReqBody '[JSON] Channel :>
7171 Post '[JSON] Channel
7272
7373-- | Subscribe to changes for a user.
gogol-drive/gen/Network/Google/Resource/Drive/Channels/Stop.hs+1−1
@@ -55,7 +55,7 @@ type ChannelsStopResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] Channel :> Post '[JSON] ()
58+ ReqBody '[JSON] Channel :> Post '[JSON] ()
5959
6060-- | Stop watching resources through this channel
6161--
gogol-drive/gen/Network/Google/Resource/Drive/Children/Insert.hs+1−1
@@ -57,7 +57,7 @@ type ChildrenInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ChildReference :>
60+ ReqBody '[JSON] ChildReference :>
6161 Post '[JSON] ChildReference
6262
6363-- | Inserts a file into a folder.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Insert.hs+1−2
@@ -57,8 +57,7 @@ type CommentsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Comment :>
61− Post '[JSON] Comment
60+ ReqBody '[JSON] Comment :> Post '[JSON] Comment
6261
6362-- | Creates a new comment on the given file.
6463--
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Patch.hs+1−2
@@ -59,8 +59,7 @@ type CommentsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Comment :>
63− Patch '[JSON] Comment
62+ ReqBody '[JSON] Comment :> Patch '[JSON] Comment
6463
6564-- | Updates an existing comment. This method supports patch semantics.
6665--
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Update.hs+1−1
@@ -59,7 +59,7 @@ type CommentsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Comment :> Put '[JSON] Comment
62+ ReqBody '[JSON] Comment :> Put '[JSON] Comment
6363
6464-- | Updates an existing comment.
6565--
gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs+1−2
@@ -71,8 +71,7 @@ type FilesCopyResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] File :>
75− Post '[JSON] File
74+ ReqBody '[JSON] File :> Post '[JSON] File
7675
7776-- | Creates a copy of the specified file.
7877--
gogol-drive/gen/Network/Google/Resource/Drive/Files/Patch.hs+1−1
@@ -86,7 +86,7 @@ type FilesPatchResource =
8686 QueryParam "oauth_token" OAuthToken
8787 :>
8888 QueryParam "alt" AltJSON :>
89− ReqBody '[OctetStream] File :>
89+ ReqBody '[JSON] File :>
9090 Patch '[JSON] File
9191
9292-- | Updates file metadata and\/or content. This method supports patch
gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+2−3
@@ -65,8 +65,7 @@ type FilesWatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] Channel :>
69− Post '[JSON] Channel
68+ ReqBody '[JSON] Channel :> Post '[JSON] Channel
7069 :<|>
7170 "files" :>
7271 Capture "fileId" Text :>
@@ -82,7 +81,7 @@ type FilesWatchResource =
8281 QueryParam "key" Key :>
8382 QueryParam "oauth_token" OAuthToken :>
8483 QueryParam "alt" AltMedia :>
85− ReqBody '[OctetStream] Channel :>
84+ ReqBody '[JSON] Channel :>
8685 Post '[OctetStream] Body
8786
8887-- | Subscribe to changes on a file
gogol-drive/gen/Network/Google/Resource/Drive/Parents/Insert.hs+1−1
@@ -57,7 +57,7 @@ type ParentsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ParentReference :>
60+ ReqBody '[JSON] ParentReference :>
6161 Post '[JSON] ParentReference
6262
6363-- | Adds a parent folder for a file.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Insert.hs+1−1
@@ -61,7 +61,7 @@ type PermissionsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Permission :>
64+ ReqBody '[JSON] Permission :>
6565 Post '[JSON] Permission
6666
6767-- | Inserts a permission for a file.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Patch.hs+1−1
@@ -61,7 +61,7 @@ type PermissionsPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Permission :>
64+ ReqBody '[JSON] Permission :>
6565 Patch '[JSON] Permission
6666
6767-- | Updates a permission using patch semantics.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Update.hs+1−1
@@ -61,7 +61,7 @@ type PermissionsUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Permission :>
64+ ReqBody '[JSON] Permission :>
6565 Put '[JSON] Permission
6666
6767-- | Updates a permission.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Insert.hs+1−2
@@ -57,8 +57,7 @@ type PropertiesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Property :>
61− Post '[JSON] Property
60+ ReqBody '[JSON] Property :> Post '[JSON] Property
6261
6362-- | Adds a property to a file.
6463--
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Patch.hs+1−2
@@ -61,8 +61,7 @@ type PropertiesPatchResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Property :>
65− Patch '[JSON] Property
64+ ReqBody '[JSON] Property :> Patch '[JSON] Property
6665
6766-- | Updates a property. This method supports patch semantics.
6867--
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Update.hs+1−2
@@ -61,8 +61,7 @@ type PropertiesUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Property :>
65− Put '[JSON] Property
64+ ReqBody '[JSON] Property :> Put '[JSON] Property
6665
6766-- | Updates a property.
6867--
gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Update.hs+1−1
@@ -60,7 +60,7 @@ type RealtimeUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[JSON] Body :> Put '[JSON] ()
63+ ReqBody '[OctetStream] Body :> Put '[JSON] ()
6464
6565-- | Overwrites the Realtime API data model associated with this file with
6666-- the provided JSON data model.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Insert.hs+1−1
@@ -60,7 +60,7 @@ type RepliesInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] CommentReply :>
63+ ReqBody '[JSON] CommentReply :>
6464 Post '[JSON] CommentReply
6565
6666-- | Creates a new reply to the given comment.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Patch.hs+1−1
@@ -62,7 +62,7 @@ type RepliesPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] CommentReply :>
65+ ReqBody '[JSON] CommentReply :>
6666 Patch '[JSON] CommentReply
6767
6868-- | Updates an existing reply. This method supports patch semantics.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Update.hs+1−1
@@ -62,7 +62,7 @@ type RepliesUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] CommentReply :>
65+ ReqBody '[JSON] CommentReply :>
6666 Put '[JSON] CommentReply
6767
6868-- | Updates an existing reply.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Patch.hs+1−2
@@ -59,8 +59,7 @@ type RevisionsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Revision :>
63− Patch '[JSON] Revision
62+ ReqBody '[JSON] Revision :> Patch '[JSON] Revision
6463
6564-- | Updates a revision. This method supports patch semantics.
6665--
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Update.hs+1−2
@@ -59,8 +59,7 @@ type RevisionsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Revision :>
63− Put '[JSON] Revision
62+ ReqBody '[JSON] Revision :> Put '[JSON] Revision
6463
6564-- | Updates a revision.
6665--
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Create.hs+1−2
@@ -63,8 +63,7 @@ type UsersDataSourcesCreateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] DataSource :>
67− Post '[JSON] DataSource
66+ ReqBody '[JSON] DataSource :> Post '[JSON] DataSource
6867
6968-- | Creates a new data source that is unique across all data sources
7069-- belonging to this user. The data stream ID field can be omitted and will
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Datasets/Patch.hs+1−2
@@ -66,8 +66,7 @@ type UsersDataSourcesDatasetsPatchResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] Dataset :>
70− Patch '[JSON] Dataset
69+ ReqBody '[JSON] Dataset :> Patch '[JSON] Dataset
7170
7271-- | Adds data points to a dataset. The dataset need not be previously
7372-- created. All points within the given dataset will be returned with
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Patch.hs+1−1
@@ -63,7 +63,7 @@ type UsersDataSourcesPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] DataSource :>
66+ ReqBody '[JSON] DataSource :>
6767 Patch '[JSON] DataSource
6868
6969-- | Updates a given data source. It is an error to modify the data source\'s
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Update.hs+1−2
@@ -62,8 +62,7 @@ type UsersDataSourcesUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] DataSource :>
66− Put '[JSON] DataSource
65+ ReqBody '[JSON] DataSource :> Put '[JSON] DataSource
6766
6867-- | Updates a given data source. It is an error to modify the data source\'s
6968-- data stream ID, data type, type, stream name or device information apart
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Dataset/Aggregate.hs+1−1
@@ -59,7 +59,7 @@ type UsersDatasetAggregateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] AggregateRequest :>
62+ ReqBody '[JSON] AggregateRequest :>
6363 Post '[JSON] AggregateResponse
6464
6565-- | Aggregates data of a certain type or stream into buckets divided by a
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Update.hs+1−1
@@ -60,7 +60,7 @@ type UsersSessionsUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Session :> Put '[JSON] Session
63+ ReqBody '[JSON] Session :> Put '[JSON] Session
6464
6565-- | Updates or insert a given session.
6666--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Insert.hs+1−1
@@ -57,7 +57,7 @@ type ColumnInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Column :> Post '[JSON] Column
60+ ReqBody '[JSON] Column :> Post '[JSON] Column
6161
6262-- | Adds a new column to the table.
6363--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Patch.hs+1−1
@@ -60,7 +60,7 @@ type ColumnPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Column :> Patch '[JSON] Column
63+ ReqBody '[JSON] Column :> Patch '[JSON] Column
6464
6565-- | Updates the name or type of an existing column. This method supports
6666-- patch semantics.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Update.hs+1−1
@@ -59,7 +59,7 @@ type ColumnUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Column :> Put '[JSON] Column
62+ ReqBody '[JSON] Column :> Put '[JSON] Column
6363
6464-- | Updates the name or type of an existing column.
6565--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Insert.hs+1−1
@@ -57,7 +57,7 @@ type StyleInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] StyleSetting :>
60+ ReqBody '[JSON] StyleSetting :>
6161 Post '[JSON] StyleSetting
6262
6363-- | Adds a new style for the table.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Patch.hs+1−1
@@ -59,7 +59,7 @@ type StylePatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] StyleSetting :>
62+ ReqBody '[JSON] StyleSetting :>
6363 Patch '[JSON] StyleSetting
6464
6565-- | Updates an existing style. This method supports patch semantics.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Update.hs+1−1
@@ -59,7 +59,7 @@ type StyleUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] StyleSetting :>
62+ ReqBody '[JSON] StyleSetting :>
6363 Put '[JSON] StyleSetting
6464
6565-- | Updates an existing style.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+2−1
@@ -67,7 +67,8 @@ type TableImportRowsResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[JSON] Body :> Post '[JSON] Import
70+ ReqBody '[OctetStream] Body :>
71+ Post '[JSON] Import
7172
7273-- | Imports more rows into a table.
7374--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportTable.hs+1−1
@@ -61,7 +61,7 @@ type TableImportTableResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[JSON] Body :> Post '[JSON] Table
64+ ReqBody '[OctetStream] Body :> Post '[JSON] Table
6565
6666-- | Imports a new table.
6767--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Insert.hs+1−1
@@ -54,7 +54,7 @@ type TableInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Table :> Post '[JSON] Table
57+ ReqBody '[JSON] Table :> Post '[JSON] Table
5858
5959-- | Creates a new table.
6060--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Patch.hs+1−1
@@ -60,7 +60,7 @@ type TablePatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Table :> Patch '[JSON] Table
63+ ReqBody '[JSON] Table :> Patch '[JSON] Table
6464
6565-- | Updates an existing table. Unless explicitly requested, only the name,
6666-- description, and attribution will be updated. This method supports patch
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+2−1
@@ -68,7 +68,8 @@ type TableReplaceRowsResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[JSON] Body :> Post '[JSON] Task
71+ ReqBody '[OctetStream] Body :>
72+ Post '[JSON] Task
7273
7374-- | Replaces rows of an existing table. Current rows remain visible until
7475-- all replacement rows are ready.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Update.hs+1−1
@@ -59,7 +59,7 @@ type TableUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Table :> Put '[JSON] Table
62+ ReqBody '[JSON] Table :> Put '[JSON] Table
6363
6464-- | Updates an existing table. Unless explicitly requested, only the name,
6565-- description, and attribution will be updated.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Insert.hs+1−2
@@ -57,8 +57,7 @@ type TemplateInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Template :>
61− Post '[JSON] Template
60+ ReqBody '[JSON] Template :> Post '[JSON] Template
6261
6362-- | Creates a new template for the table.
6463--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Patch.hs+1−2
@@ -59,8 +59,7 @@ type TemplatePatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Template :>
63− Patch '[JSON] Template
62+ ReqBody '[JSON] Template :> Patch '[JSON] Template
6463
6564-- | Updates an existing template. This method supports patch semantics.
6665--
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Update.hs+1−2
@@ -59,8 +59,7 @@ type TemplateUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Template :>
63− Put '[JSON] Template
62+ ReqBody '[JSON] Template :> Put '[JSON] Template
6463
6564-- | Updates an existing template
6665--
gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Update.hs+1−1
@@ -60,7 +60,7 @@ type StatesUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] UpdateRequest :>
63+ ReqBody '[JSON] UpdateRequest :>
6464 Put '[JSON] WriteResult
6565
6666-- | Update the data associated with the input key if and only if the passed
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Insert.hs+1−1
@@ -57,7 +57,7 @@ type AchievementConfigurationsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AchievementConfiguration :>
60+ ReqBody '[JSON] AchievementConfiguration :>
6161 Post '[JSON] AchievementConfiguration
6262
6363-- | Insert a new achievement configuration in this application.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Patch.hs+1−1
@@ -57,7 +57,7 @@ type AchievementConfigurationsPatchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AchievementConfiguration :>
60+ ReqBody '[JSON] AchievementConfiguration :>
6161 Patch '[JSON] AchievementConfiguration
6262
6363-- | Update the metadata of the achievement configuration with the given ID.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Update.hs+1−1
@@ -56,7 +56,7 @@ type AchievementConfigurationsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] AchievementConfiguration :>
59+ ReqBody '[JSON] AchievementConfiguration :>
6060 Put '[JSON] AchievementConfiguration
6161
6262-- | Update the metadata of the achievement configuration with the given ID.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/ImageConfigurations/Upload.hs+1−1
@@ -61,7 +61,7 @@ type ImageConfigurationsUploadResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[JSON] Body :>
64+ ReqBody '[OctetStream] Body :>
6565 Post '[JSON] ImageConfiguration
6666
6767-- | Uploads an image for a resource with the given ID and image type.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Insert.hs+1−1
@@ -57,7 +57,7 @@ type LeaderboardConfigurationsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] LeaderboardConfiguration :>
60+ ReqBody '[JSON] LeaderboardConfiguration :>
6161 Post '[JSON] LeaderboardConfiguration
6262
6363-- | Insert a new leaderboard configuration in this application.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Patch.hs+1−1
@@ -57,7 +57,7 @@ type LeaderboardConfigurationsPatchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] LeaderboardConfiguration :>
60+ ReqBody '[JSON] LeaderboardConfiguration :>
6161 Patch '[JSON] LeaderboardConfiguration
6262
6363-- | Update the metadata of the leaderboard configuration with the given ID.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Update.hs+1−1
@@ -56,7 +56,7 @@ type LeaderboardConfigurationsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] LeaderboardConfiguration :>
59+ ReqBody '[JSON] LeaderboardConfiguration :>
6060 Put '[JSON] LeaderboardConfiguration
6161
6262-- | Update the metadata of the leaderboard configuration with the given ID.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetMultipleForAllPlayers.hs+1−2
@@ -57,8 +57,7 @@ type AchievementsResetMultipleForAllPlayersResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream]
61− AchievementResetMultipleForAllRequest
60+ ReqBody '[JSON] AchievementResetMultipleForAllRequest
6261 :> Post '[JSON] ()
6362
6463-- | Resets achievements with the given IDs for all players. This method is
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetMultipleForAllPlayers.hs+2−3
@@ -57,9 +57,8 @@ type EventsResetMultipleForAllPlayersResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream]
61− EventsResetMultipleForAllRequest
62− :> Post '[JSON] ()
60+ ReqBody '[JSON] EventsResetMultipleForAllRequest :>
61+ Post '[JSON] ()
6362
6463-- | Resets events with the given IDs for all players. This method is only
6564-- available to user accounts for your developer console. Only draft events
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetMultipleForAllPlayers.hs+2−3
@@ -57,9 +57,8 @@ type QuestsResetMultipleForAllPlayersResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream]
61− QuestsResetMultipleForAllRequest
62− :> Post '[JSON] ()
60+ ReqBody '[JSON] QuestsResetMultipleForAllRequest :>
61+ Post '[JSON] ()
6362
6463-- | Resets quests with the given IDs for all players. This method is only
6564-- available to user accounts for your developer console. Only draft quests
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetMultipleForAllPlayers.hs+2−3
@@ -57,9 +57,8 @@ type ScoresResetMultipleForAllPlayersResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream]
61− ScoresResetMultipleForAllRequest
62− :> Post '[JSON] ()
60+ ReqBody '[JSON] ScoresResetMultipleForAllRequest :>
61+ Post '[JSON] ()
6362
6463-- | Resets scores for the leaderboards with the given IDs for all players.
6564-- This method is only available to user accounts for your developer
gogol-games/gen/Network/Google/Resource/Games/Achievements/UpdateMultiple.hs+2−3
@@ -55,9 +55,8 @@ type AchievementsUpdateMultipleResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream]
59− AchievementUpdateMultipleRequest
60− :> Post '[JSON] AchievementUpdateMultipleResponse
58+ ReqBody '[JSON] AchievementUpdateMultipleRequest :>
59+ Post '[JSON] AchievementUpdateMultipleResponse
6160
6261-- | Updates multiple achievements for the currently authenticated player.
6362--
gogol-games/gen/Network/Google/Resource/Games/Events/Record.hs+1−1
@@ -57,7 +57,7 @@ type EventsRecordResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] EventRecordRequest :>
60+ ReqBody '[JSON] EventRecordRequest :>
6161 Post '[JSON] EventUpdateResponse
6262
6363-- | Records a batch of changes to the number of times events have occurred
gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Remove.hs+1−1
@@ -56,7 +56,7 @@ type PushtokensRemoveResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] PushTokenId :> Post '[JSON] ()
59+ ReqBody '[JSON] PushTokenId :> Post '[JSON] ()
6060
6161-- | Removes a push token for the current user and application. Removing a
6262-- non-existent push token will report success.
gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Update.hs+1−1
@@ -54,7 +54,7 @@ type PushtokensUpdateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] PushToken :> Put '[JSON] ()
57+ ReqBody '[JSON] PushToken :> Put '[JSON] ()
5858
5959-- | Registers a push token for the current user and application.
6060--
gogol-games/gen/Network/Google/Resource/Games/Rooms/Create.hs+1−1
@@ -58,7 +58,7 @@ type RoomsCreateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] RoomCreateRequest :>
61+ ReqBody '[JSON] RoomCreateRequest :>
6262 Post '[JSON] Room
6363
6464-- | Create a room. For internal use by the Games SDK only. Calling this
gogol-games/gen/Network/Google/Resource/Games/Rooms/Join.hs+1−2
@@ -60,8 +60,7 @@ type RoomsJoinResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] RoomJoinRequest :>
64− Post '[JSON] Room
63+ ReqBody '[JSON] RoomJoinRequest :> Post '[JSON] Room
6564
6665-- | Join a room. For internal use by the Games SDK only. Calling this method
6766-- directly is unsupported.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Leave.hs+1−2
@@ -60,8 +60,7 @@ type RoomsLeaveResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] RoomLeaveRequest :>
64− Post '[JSON] Room
63+ ReqBody '[JSON] RoomLeaveRequest :> Post '[JSON] Room
6564
6665-- | Leave a room. For internal use by the Games SDK only. Calling this
6766-- method directly is unsupported.
gogol-games/gen/Network/Google/Resource/Games/Rooms/ReportStatus.hs+1−1
@@ -61,7 +61,7 @@ type RoomsReportStatusResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] RoomP2PStatuses :>
64+ ReqBody '[JSON] RoomP2PStatuses :>
6565 Post '[JSON] RoomStatus
6666
6767-- | Updates sent by a client reporting the status of peers in a room. For
gogol-games/gen/Network/Google/Resource/Games/Scores/SubmitMultiple.hs+1−1
@@ -57,7 +57,7 @@ type ScoresSubmitMultipleResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlayerScoreSubmissionList :>
60+ ReqBody '[JSON] PlayerScoreSubmissionList :>
6161 Post '[JSON] PlayerScoreListResponse
6262
6363-- | Submits multiple scores to leaderboards.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Create.hs+1−1
@@ -57,7 +57,7 @@ type TurnBasedMatchesCreateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] TurnBasedMatchCreateRequest :>
60+ ReqBody '[JSON] TurnBasedMatchCreateRequest :>
6161 Post '[JSON] TurnBasedMatch
6262
6363-- | Create a turn-based match.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Finish.hs+1−1
@@ -61,7 +61,7 @@ type TurnBasedMatchesFinishResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] TurnBasedMatchResults :>
64+ ReqBody '[JSON] TurnBasedMatchResults :>
6565 Put '[JSON] TurnBasedMatch
6666
6767-- | Finish a turn-based match. Each player should make this call once, after
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/TakeTurn.hs+1−1
@@ -59,7 +59,7 @@ type TurnBasedMatchesTakeTurnResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] TurnBasedMatchTurn :>
62+ ReqBody '[JSON] TurnBasedMatchTurn :>
6363 Put '[JSON] TurnBasedMatch
6464
6565-- | Commit the results of a player turn.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Create.hs+1−1
@@ -55,7 +55,7 @@ type AnnotationSetsCreateResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] AnnotationSet :>
58+ ReqBody '[JSON] AnnotationSet :>
5959 Post '[JSON] AnnotationSet
6060
6161-- | Creates a new annotation set. Caller must have WRITE permission for the
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Patch.hs+1−1
@@ -59,7 +59,7 @@ type AnnotationSetsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] AnnotationSet :>
62+ ReqBody '[JSON] AnnotationSet :>
6363 Patch '[JSON] AnnotationSet
6464
6565-- | Updates an annotation set. The update must respect all mutability
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Search.hs+1−1
@@ -57,7 +57,7 @@ type AnnotationSetsSearchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] SearchAnnotationSetsRequest :>
60+ ReqBody '[JSON] SearchAnnotationSetsRequest :>
6161 Post '[JSON] SearchAnnotationSetsResponse
6262
6363-- | Searches for annotation sets that match the given criteria. Results are
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Update.hs+1−1
@@ -58,7 +58,7 @@ type AnnotationSetsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] AnnotationSet :>
61+ ReqBody '[JSON] AnnotationSet :>
6262 Put '[JSON] AnnotationSet
6363
6464-- | Updates an annotation set. The update must respect all mutability
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/BatchCreate.hs+2−2
@@ -61,8 +61,8 @@ type AnnotationsBatchCreateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] BatchCreateAnnotationsRequest
65− :> Post '[JSON] BatchAnnotationsResponse
64+ ReqBody '[JSON] BatchCreateAnnotationsRequest :>
65+ Post '[JSON] BatchAnnotationsResponse
6666
6767-- | Creates one or more new annotations atomically. All annotations must
6868-- belong to the same annotation set. Caller must have WRITE permission for
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Create.hs+1−2
@@ -55,8 +55,7 @@ type AnnotationsCreateResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] Annotation :>
59− Post '[JSON] Annotation
58+ ReqBody '[JSON] Annotation :> Post '[JSON] Annotation
6059
6160-- | Creates a new annotation. Caller must have WRITE permission for the
6261-- associated annotation set.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Patch.hs+1−1
@@ -59,7 +59,7 @@ type AnnotationsPatchResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Annotation :>
62+ ReqBody '[JSON] Annotation :>
6363 Patch '[JSON] Annotation
6464
6565-- | Updates an annotation. The update must respect all mutability
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Search.hs+1−1
@@ -58,7 +58,7 @@ type AnnotationsSearchResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] SearchAnnotationsRequest :>
61+ ReqBody '[JSON] SearchAnnotationsRequest :>
6262 Post '[JSON] SearchAnnotationsResponse
6363
6464-- | Searches for annotations that match the given criteria. Results are
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Update.hs+1−2
@@ -58,8 +58,7 @@ type AnnotationsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Annotation :>
62− Put '[JSON] Annotation
61+ ReqBody '[JSON] Annotation :> Put '[JSON] Annotation
6362
6463-- | Updates an annotation. The update must respect all mutability
6564-- restrictions and other invariants described on the annotation resource.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Create.hs+1−2
@@ -54,8 +54,7 @@ type CallsetsCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] CallSet :>
58− Post '[JSON] CallSet
57+ ReqBody '[JSON] CallSet :> Post '[JSON] CallSet
5958
6059-- | Creates a new call set.
6160--
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Patch.hs+1−2
@@ -56,8 +56,7 @@ type CallsetsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] CallSet :>
60− Patch '[JSON] CallSet
59+ ReqBody '[JSON] CallSet :> Patch '[JSON] CallSet
6160
6261-- | Updates a call set. This method supports patch semantics.
6362--
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Search.hs+1−1
@@ -56,7 +56,7 @@ type CallsetsSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchCallSetsRequest :>
59+ ReqBody '[JSON] SearchCallSetsRequest :>
6060 Post '[JSON] SearchCallSetsResponse
6161
6262-- | Gets a list of call sets matching the criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Update.hs+1−1
@@ -56,7 +56,7 @@ type CallsetsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] CallSet :> Put '[JSON] CallSet
59+ ReqBody '[JSON] CallSet :> Put '[JSON] CallSet
6060
6161-- | Updates a call set.
6262--
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Create.hs+1−2
@@ -54,8 +54,7 @@ type DatasetsCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Dataset :>
58− Post '[JSON] Dataset
57+ ReqBody '[JSON] Dataset :> Post '[JSON] Dataset
5958
6059-- | Creates a new dataset.
6160--
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Patch.hs+1−2
@@ -56,8 +56,7 @@ type DatasetsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Dataset :>
60− Patch '[JSON] Dataset
59+ ReqBody '[JSON] Dataset :> Patch '[JSON] Dataset
6160
6261-- | Updates a dataset. This method supports patch semantics.
6362--
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Update.hs+1−1
@@ -56,7 +56,7 @@ type DatasetsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Dataset :> Put '[JSON] Dataset
59+ ReqBody '[JSON] Dataset :> Put '[JSON] Dataset
6060
6161-- | Updates a dataset.
6262--
gogol-genomics/gen/Network/Google/Resource/Genomics/Experimental/Jobs/Create.hs+2−2
@@ -57,8 +57,8 @@ type ExperimentalJobsCreateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ExperimentalCreateJobRequest
61− :> Post '[JSON] ExperimentalCreateJobResponse
60+ ReqBody '[JSON] ExperimentalCreateJobRequest :>
61+ Post '[JSON] ExperimentalCreateJobResponse
6262
6363-- | Creates and asynchronously runs an ad-hoc job. This is an experimental
6464-- call and may be removed or changed at any time.
gogol-genomics/gen/Network/Google/Resource/Genomics/Jobs/Search.hs+1−1
@@ -55,7 +55,7 @@ type JobsSearchResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] SearchJobsRequest :>
58+ ReqBody '[JSON] SearchJobsRequest :>
5959 Post '[JSON] SearchJobsResponse
6060
6161-- | Gets a list of jobs matching the criteria.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Align.hs+1−1
@@ -57,7 +57,7 @@ type ReadgroupsetsAlignResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] AlignReadGroupSetsRequest :>
60+ ReqBody '[JSON] AlignReadGroupSetsRequest :>
6161 Post '[JSON] AlignReadGroupSetsResponse
6262
6363-- | Aligns read data from existing read group sets or files from Google
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Call.hs+1−1
@@ -57,7 +57,7 @@ type ReadgroupsetsCallResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CallReadGroupSetsRequest :>
60+ ReqBody '[JSON] CallReadGroupSetsRequest :>
6161 Post '[JSON] CallReadGroupSetsResponse
6262
6363-- | Calls variants on read data from existing read group sets or files from
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Export.hs+1−1
@@ -58,7 +58,7 @@ type ReadgroupsetsExportResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ExportReadGroupSetsRequest :>
61+ ReqBody '[JSON] ExportReadGroupSetsRequest :>
6262 Post '[JSON] ExportReadGroupSetsResponse
6363
6464-- | Exports read group sets to a BAM file in Google Cloud Storage. Note that
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Import.hs+1−1
@@ -62,7 +62,7 @@ type ReadgroupsetsImportResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] ImportReadGroupSetsRequest :>
65+ ReqBody '[JSON] ImportReadGroupSetsRequest :>
6666 Post '[JSON] ImportReadGroupSetsResponse
6767
6868-- | Creates read group sets by asynchronously importing the provided
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Patch.hs+1−1
@@ -56,7 +56,7 @@ type ReadgroupsetsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] ReadGroupSet :>
59+ ReqBody '[JSON] ReadGroupSet :>
6060 Patch '[JSON] ReadGroupSet
6161
6262-- | Updates a read group set. This method supports patch semantics.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Search.hs+1−1
@@ -56,7 +56,7 @@ type ReadgroupsetsSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchReadGroupSetsRequest :>
59+ ReqBody '[JSON] SearchReadGroupSetsRequest :>
6060 Post '[JSON] SearchReadGroupSetsResponse
6161
6262-- | Searches for read group sets matching the criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Update.hs+1−1
@@ -56,7 +56,7 @@ type ReadgroupsetsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] ReadGroupSet :>
59+ ReqBody '[JSON] ReadGroupSet :>
6060 Put '[JSON] ReadGroupSet
6161
6262-- | Updates a read group set.
gogol-genomics/gen/Network/Google/Resource/Genomics/Reads/Search.hs+1−1
@@ -65,7 +65,7 @@ type ReadsSearchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] SearchReadsRequest :>
68+ ReqBody '[JSON] SearchReadsRequest :>
6969 Post '[JSON] SearchReadsResponse
7070
7171-- | Gets a list of reads for one or more read group sets. Reads search
gogol-genomics/gen/Network/Google/Resource/Genomics/References/Search.hs+1−1
@@ -56,7 +56,7 @@ type ReferencesSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchReferencesRequest :>
59+ ReqBody '[JSON] SearchReferencesRequest :>
6060 Post '[JSON] SearchReferencesResponse
6161
6262-- | Searches for references which match the given criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Referencesets/Search.hs+1−1
@@ -56,7 +56,7 @@ type ReferencesetsSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchReferenceSetsRequest :>
59+ ReqBody '[JSON] SearchReferenceSetsRequest :>
6060 Post '[JSON] SearchReferenceSetsResponse
6161
6262-- | Searches for reference sets which match the given criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Create.hs+1−2
@@ -54,8 +54,7 @@ type VariantsCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Variant :>
58− Post '[JSON] Variant
57+ ReqBody '[JSON] Variant :> Post '[JSON] Variant
5958
6059-- | Creates a new variant.
6160--
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Search.hs+1−1
@@ -56,7 +56,7 @@ type VariantsSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchVariantsRequest :>
59+ ReqBody '[JSON] SearchVariantsRequest :>
6060 Post '[JSON] SearchVariantsResponse
6161
6262-- | Gets a list of variants matching the criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Update.hs+1−1
@@ -57,7 +57,7 @@ type VariantsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Variant :> Put '[JSON] Variant
60+ ReqBody '[JSON] Variant :> Put '[JSON] Variant
6161
6262-- | Updates a variant\'s names and info fields. All other modifications are
6363-- silently ignored. Returns the modified variant without its calls.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Create.hs+1−2
@@ -57,8 +57,7 @@ type VariantsetsCreateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] VariantSet :>
61− Post '[JSON] VariantSet
60+ ReqBody '[JSON] VariantSet :> Post '[JSON] VariantSet
6261
6362-- | Creates a new variant set (only necessary in v1). The provided variant
6463-- set must have a valid datasetId set - all other fields are optional.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Export.hs+1−1
@@ -57,7 +57,7 @@ type VariantsetsExportResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ExportVariantSetRequest :>
60+ ReqBody '[JSON] ExportVariantSetRequest :>
6161 Post '[JSON] ExportVariantSetResponse
6262
6363-- | Exports variant set data to an external destination.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/ImportVariants.hs+1−1
@@ -65,7 +65,7 @@ type VariantsetsImportVariantsResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] ImportVariantsRequest :>
68+ ReqBody '[JSON] ImportVariantsRequest :>
6969 Post '[JSON] ImportVariantsResponse
7070
7171-- | Creates variant data by asynchronously importing the provided
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/MergeVariants.hs+1−1
@@ -62,7 +62,7 @@ type VariantsetsMergeVariantsResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] MergeVariantsRequest :>
65+ ReqBody '[JSON] MergeVariantsRequest :>
6666 Post '[JSON] ()
6767
6868-- | Merges the given variants with existing variants. Each variant will be
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Patch.hs+1−1
@@ -57,7 +57,7 @@ type VariantsetsPatchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] VariantSet :>
60+ ReqBody '[JSON] VariantSet :>
6161 Patch '[JSON] VariantSet
6262
6363-- | Updates a variant set\'s metadata. All other modifications are silently
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Search.hs+1−1
@@ -56,7 +56,7 @@ type VariantsetsSearchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] SearchVariantSetsRequest :>
59+ ReqBody '[JSON] SearchVariantSetsRequest :>
6060 Post '[JSON] SearchVariantSetsResponse
6161
6262-- | Returns a list of all variant sets matching search criteria. Implements
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Update.hs+1−2
@@ -57,8 +57,7 @@ type VariantsetsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] VariantSet :>
61− Put '[JSON] VariantSet
60+ ReqBody '[JSON] VariantSet :> Put '[JSON] VariantSet
6261
6362-- | Updates a variant set\'s metadata. All other modifications are silently
6463-- ignored.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/GetProfile.hsdeleted−163
@@ -1,163 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE FlexibleInstances #-}
5−{-# LANGUAGE OverloadedStrings #-}
6−{-# LANGUAGE RecordWildCards #-}
7−{-# LANGUAGE TypeFamilies #-}
8−{-# LANGUAGE TypeOperators #-}
9−
10−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
12−
13−-- |
14−-- Module : Network.Google.Resource.Gmail.Users.GetProfile
15−-- Copyright : (c) 2015 Brendan Hay
16−-- License : Mozilla Public License, v. 2.0.
17−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
18−-- Stability : auto-generated
19−-- Portability : non-portable (GHC extensions)
20−--
21−-- | Gets the current user\'s Gmail profile.
22−--
23−-- /See:/ <https://developers.google.com/gmail/api/ Gmail API Reference> for @GmailUsersGetProfile@.
24−module Network.Google.Resource.Gmail.Users.GetProfile
25− (
26− -- * REST Resource
27− UsersGetProfileResource
28−
29− -- * Creating a Request
30− , usersGetProfile'
31− , UsersGetProfile'
32−
33− -- * Request Lenses
34− , ugpQuotaUser
35− , ugpPrettyPrint
36− , ugpUserIP
37− , ugpUserId
38− , ugpKey
39− , ugpOAuthToken
40− , ugpFields
41− ) where
42−
43−import Network.Google.Gmail.Types
44−import Network.Google.Prelude
45−
46−-- | A resource alias for @GmailUsersGetProfile@ which the
47−-- 'UsersGetProfile'' request conforms to.
48−type UsersGetProfileResource =
49− Capture "userId" Text :>
50− "profile" :>
51− QueryParam "quotaUser" Text :>
52− QueryParam "prettyPrint" Bool :>
53− QueryParam "userIp" Text :>
54− QueryParam "fields" Text :>
55− QueryParam "key" Key :>
56− QueryParam "oauth_token" OAuthToken :>
57− QueryParam "alt" AltJSON :> Get '[JSON] Profile
58−
59−-- | Gets the current user\'s Gmail profile.
60−--
61−-- /See:/ 'usersGetProfile'' smart constructor.
62−data UsersGetProfile' = UsersGetProfile'
63− { _ugpQuotaUser :: !(Maybe Text)
64− , _ugpPrettyPrint :: !Bool
65− , _ugpUserIP :: !(Maybe Text)
66− , _ugpUserId :: !Text
67− , _ugpKey :: !(Maybe Key)
68− , _ugpOAuthToken :: !(Maybe OAuthToken)
69− , _ugpFields :: !(Maybe Text)
70− } deriving (Eq,Show,Data,Typeable,Generic)
71−
72−-- | Creates a value of 'UsersGetProfile'' with the minimum fields required to make a request.
73−--
74−-- Use one of the following lenses to modify other fields as desired:
75−--
76−-- * 'ugpQuotaUser'
77−--
78−-- * 'ugpPrettyPrint'
79−--
80−-- * 'ugpUserIP'
81−--
82−-- * 'ugpUserId'
83−--
84−-- * 'ugpKey'
85−--
86−-- * 'ugpOAuthToken'
87−--
88−-- * 'ugpFields'
89−usersGetProfile'
90− :: Text
91− -> UsersGetProfile'
92−usersGetProfile' pUgpUserId_ =
93− UsersGetProfile'
94− { _ugpQuotaUser = Nothing
95− , _ugpPrettyPrint = True
96− , _ugpUserIP = Nothing
97− , _ugpUserId = pUgpUserId_
98− , _ugpKey = Nothing
99− , _ugpOAuthToken = Nothing
100− , _ugpFields = Nothing
101− }
102−
103−-- | Available to use for quota purposes for server-side applications. Can be
104−-- any arbitrary string assigned to a user, but should not exceed 40
105−-- characters. Overrides userIp if both are provided.
106−ugpQuotaUser :: Lens' UsersGetProfile' (Maybe Text)
107−ugpQuotaUser
108− = lens _ugpQuotaUser (\ s a -> s{_ugpQuotaUser = a})
109−
110−-- | Returns response with indentations and line breaks.
111−ugpPrettyPrint :: Lens' UsersGetProfile' Bool
112−ugpPrettyPrint
113− = lens _ugpPrettyPrint
114− (\ s a -> s{_ugpPrettyPrint = a})
115−
116−-- | IP address of the site where the request originates. Use this if you
117−-- want to enforce per-user limits.
118−ugpUserIP :: Lens' UsersGetProfile' (Maybe Text)
119−ugpUserIP
120− = lens _ugpUserIP (\ s a -> s{_ugpUserIP = a})
121−
122−-- | The user\'s email address. The special value me can be used to indicate
123−-- the authenticated user.
124−ugpUserId :: Lens' UsersGetProfile' Text
125−ugpUserId
126− = lens _ugpUserId (\ s a -> s{_ugpUserId = a})
127−
128−-- | API key. Your API key identifies your project and provides you with API
129−-- access, quota, and reports. Required unless you provide an OAuth 2.0
130−-- token.
131−ugpKey :: Lens' UsersGetProfile' (Maybe Key)
132−ugpKey = lens _ugpKey (\ s a -> s{_ugpKey = a})
133−
134−-- | OAuth 2.0 token for the current user.
135−ugpOAuthToken :: Lens' UsersGetProfile' (Maybe OAuthToken)
136−ugpOAuthToken
137− = lens _ugpOAuthToken
138− (\ s a -> s{_ugpOAuthToken = a})
139−
140−-- | Selector specifying which fields to include in a partial response.
141−ugpFields :: Lens' UsersGetProfile' (Maybe Text)
142−ugpFields
143− = lens _ugpFields (\ s a -> s{_ugpFields = a})
144−
145−instance GoogleAuth UsersGetProfile' where
146− authKey = ugpKey . _Just
147− authToken = ugpOAuthToken . _Just
148−
149−instance GoogleRequest UsersGetProfile' where
150− type Rs UsersGetProfile' = Profile
151− request = requestWithRoute defReq gmailURL
152− requestWithRoute r u UsersGetProfile'{..}
153− = go _ugpUserId _ugpQuotaUser (Just _ugpPrettyPrint)
154− _ugpUserIP
155− _ugpFields
156− _ugpKey
157− _ugpOAuthToken
158− (Just AltJSON)
159− where go
160− = clientWithRoute
161− (Proxy :: Proxy UsersGetProfileResource)
162− r
163− u
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Create.hs+1−1
@@ -56,7 +56,7 @@ type UsersLabelsCreateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Label :> Post '[JSON] Label
59+ ReqBody '[JSON] Label :> Post '[JSON] Label
6060
6161-- | Creates a new label.
6262--
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Patch.hs+1−1
@@ -58,7 +58,7 @@ type UsersLabelsPatchResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Label :> Patch '[JSON] Label
61+ ReqBody '[JSON] Label :> Patch '[JSON] Label
6262
6363-- | Updates the specified label. This method supports patch semantics.
6464--
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Update.hs+1−1
@@ -58,7 +58,7 @@ type UsersLabelsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Label :> Put '[JSON] Label
61+ ReqBody '[JSON] Label :> Put '[JSON] Label
6262
6363-- | Updates the specified label.
6464--
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Modify.hs+1−1
@@ -59,7 +59,7 @@ type UsersMessagesModifyResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] ModifyMessageRequest :>
62+ ReqBody '[JSON] ModifyMessageRequest :>
6363 Post '[JSON] Message
6464
6565-- | Modifies the labels on the specified message.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Modify.hs+1−1
@@ -60,7 +60,7 @@ type UsersThreadsModifyResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ModifyThreadRequest :>
63+ ReqBody '[JSON] ModifyThreadRequest :>
6464 Post '[JSON] Thread
6565
6666-- | Modifies the labels applied to the thread. This applies to all messages
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Watch.hs+1−1
@@ -56,7 +56,7 @@ type UsersWatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] WatchRequest :>
59+ ReqBody '[JSON] WatchRequest :>
6060 Post '[JSON] WatchResponse
6161
6262-- | Set up or update a push notification watch on the given user mailbox.
gogol-groups-migration/gen/Network/Google/Resource/GroupsMigration/Archive/Insert.hs+1−1
@@ -56,7 +56,7 @@ type ArchiveInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[JSON] Body :> Post '[JSON] Groups
59+ ReqBody '[OctetStream] Body :> Post '[JSON] Groups
6060
6161-- | Inserts a new mail into the archive of the Google group.
6262--
gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs+1−1
@@ -55,7 +55,7 @@ type GroupsPatchResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltATOM :>
58− ReqBody '[OctetStream] Groups :> Patch '[JSON] Groups
58+ ReqBody '[JSON] Groups :> Patch '[JSON] Groups
5959
6060-- | Updates an existing resource. This method supports patch semantics.
6161--
gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs+1−1
@@ -55,7 +55,7 @@ type GroupsUpdateResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltATOM :>
58− ReqBody '[OctetStream] Groups :> Put '[JSON] Groups
58+ ReqBody '[JSON] Groups :> Put '[JSON] Groups
5959
6060-- | Updates an existing resource.
6161--
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/CreateAuthURI.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyCreateAuthURIResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyCreateAuthURIRequest
5959 :> Post '[JSON] CreateAuthURIResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DeleteAccount.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyDeleteAccountResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyDeleteAccountRequest
5959 :> Post '[JSON] DeleteAccountResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DownloadAccount.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyDownloadAccountResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyDownloadAccountRequest
5959 :> Post '[JSON] DownloadAccountResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetAccountInfo.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyGetAccountInfoResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyGetAccountInfoRequest
5959 :> Post '[JSON] GetAccountInfoResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetOOBConfirmationCode.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyGetOOBConfirmationCodeResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] RelyingParty :>
57+ ReqBody '[JSON] RelyingParty :>
5858 Post '[JSON] GetOOBConfirmationCodeResponse
5959
6060-- | Get a code for user action confirmation.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/ResetPassword.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyResetPasswordResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyResetPasswordRequest
5959 :> Post '[JSON] ResetPasswordResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetAccountInfo.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartySetAccountInfoResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartySetAccountInfoRequest
5959 :> Post '[JSON] SetAccountInfoResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/UploadAccount.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyUploadAccountResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyUploadAccountRequest
5959 :> Post '[JSON] UploadAccountResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyAssertion.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyVerifyAssertionResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyVerifyAssertionRequest
5959 :> Post '[JSON] VerifyAssertionResponse
6060
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyPassword.hs+1−1
@@ -54,7 +54,7 @@ type RelyingPartyVerifyPasswordResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 IdentitytoolkitRelyingPartyVerifyPasswordRequest
5959 :> Post '[JSON] VerifyPasswordResponse
6060
gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updateaggregatedstats.hs+1−1
@@ -54,7 +54,7 @@ type StatscollectionUpdateaggregatedstatsResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] AggregatedStats :>
57+ ReqBody '[JSON] AggregatedStats :>
5858 Post '[JSON] AggregatedStatsReply
5959
6060-- | RPC to update the new TCP stats.
gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updatestats.hs+1−2
@@ -54,8 +54,7 @@ type StatscollectionUpdatestatsResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Stats :>
58− Post '[JSON] StatsReply
57+ ReqBody '[JSON] Stats :> Post '[JSON] StatsReply
5958
6059-- | RPC to update the new TCP stats.
6160--
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Create.hs+1−1
@@ -74,7 +74,7 @@ type ProjectsLogServicesSinksCreateResource =
7474 QueryParam "key" Key :>
7575 QueryParam "oauth_token" OAuthToken :>
7676 QueryParam "alt" AltJSON :>
77− ReqBody '[OctetStream] LogSink :>
77+ ReqBody '[JSON] LogSink :>
7878 Post '[JSON] LogSink
7979
8080-- | Creates a log service sink. All log entries from a specified log service
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Update.hs+1−1
@@ -75,7 +75,7 @@ type ProjectsLogServicesSinksUpdateResource =
7575 QueryParam "key" Key :>
7676 QueryParam "oauth_token" OAuthToken :>
7777 QueryParam "alt" AltJSON :>
78− ReqBody '[OctetStream] LogSink :>
78+ ReqBody '[JSON] LogSink :>
7979 Put '[JSON] LogSink
8080
8181-- | Updates a log service sink. If the sink does not exist, it is created.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Entries/Write.hs+1−1
@@ -78,7 +78,7 @@ type ProjectsLogsEntriesWriteResource =
7878 QueryParam "key" Key :>
7979 QueryParam "oauth_token" OAuthToken :>
8080 QueryParam "alt" AltJSON :>
81− ReqBody '[OctetStream]
81+ ReqBody '[JSON]
8282 WriteLogEntriesRequest
8383 :>
8484 Post '[JSON]
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Create.hs+1−1
@@ -74,7 +74,7 @@ type ProjectsLogsSinksCreateResource =
7474 QueryParam "key" Key :>
7575 QueryParam "oauth_token" OAuthToken :>
7676 QueryParam "alt" AltJSON :>
77− ReqBody '[OctetStream] LogSink :>
77+ ReqBody '[JSON] LogSink :>
7878 Post '[JSON] LogSink
7979
8080-- | Creates a log sink. All log entries for a specified log are written to
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Update.hs+1−1
@@ -75,7 +75,7 @@ type ProjectsLogsSinksUpdateResource =
7575 QueryParam "key" Key :>
7676 QueryParam "oauth_token" OAuthToken :>
7777 QueryParam "alt" AltJSON :>
78− ReqBody '[OctetStream] LogSink :>
78+ ReqBody '[JSON] LogSink :>
7979 Put '[JSON] LogSink
8080
8181-- | Updates a log sink. If the sink does not exist, it is created.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Create.hs+1−1
@@ -71,7 +71,7 @@ type ProjectsSinksCreateResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] LogSink :>
74+ ReqBody '[JSON] LogSink :>
7575 Post '[JSON] LogSink
7676
7777-- | Creates a project sink. A logs filter determines which log entries are
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Update.hs+1−1
@@ -73,7 +73,7 @@ type ProjectsSinksUpdateResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream] LogSink :>
76+ ReqBody '[JSON] LogSink :>
7777 Put '[JSON] LogSink
7878
7979-- | Updates a project sink. If the sink does not exist, it is created. The
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Insert.hs+1−1
@@ -75,7 +75,7 @@ type JobsInsertResource =
7575 QueryParam "key" Key :>
7676 QueryParam "oauth_token" OAuthToken :>
7777 QueryParam "alt" AltJSON :>
78− ReqBody '[OctetStream] Job :>
78+ ReqBody '[JSON] Job :>
7979 Post '[JSON] Job
8080
8181-- | Inserts a new job. Only the state field of the job should be set.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Patch.hs+1−1
@@ -81,7 +81,7 @@ type JobsPatchResource =
8181 QueryParam "oauth_token" OAuthToken
8282 :>
8383 QueryParam "alt" AltJSON :>
84− ReqBody '[OctetStream] Job :>
84+ ReqBody '[JSON] Job :>
8585 Patch '[JSON] Job
8686
8787-- | Updates a job. Fields that are set in the job state will be updated.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Update.hs+1−1
@@ -80,7 +80,7 @@ type JobsUpdateResource =
8080 QueryParam "oauth_token" OAuthToken
8181 :>
8282 QueryParam "alt" AltJSON :>
83− ReqBody '[OctetStream] Job :>
83+ ReqBody '[JSON] Job :>
8484 Put '[JSON] Job
8585
8686-- | Updates a job. Fields that are set in the job state will be updated.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Patch.hs+1−1
@@ -69,7 +69,7 @@ type SchedulePatchResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] Schedule :>
72+ ReqBody '[JSON] Schedule :>
7373 Patch '[JSON] Schedule
7474
7575-- | Replaces the schedule of a job with the provided schedule. This method
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Update.hs+1−1
@@ -68,7 +68,7 @@ type ScheduleUpdateResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream] Schedule :>
71+ ReqBody '[JSON] Schedule :>
7272 Put '[JSON] Schedule
7373
7474-- | Replaces the schedule of a job with the provided schedule.
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Create.hs+1−1
@@ -56,7 +56,7 @@ type LayersCreateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Layer :> Post '[JSON] Layer
59+ ReqBody '[JSON] Layer :> Post '[JSON] Layer
6060
6161-- | Create a layer asset.
6262--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Patch.hs+1−1
@@ -56,7 +56,7 @@ type LayersPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Layer :> Patch '[JSON] ()
59+ ReqBody '[JSON] Layer :> Patch '[JSON] ()
6060
6161-- | Mutate a layer asset.
6262--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Permissions/BatchDelete.hs+2−2
@@ -58,8 +58,8 @@ type LayersPermissionsBatchDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PermissionsBatchDeleteRequest
62− :> Post '[JSON] PermissionsBatchDeleteResponse
61+ ReqBody '[JSON] PermissionsBatchDeleteRequest :>
62+ Post '[JSON] PermissionsBatchDeleteResponse
6363
6464-- | Remove permission entries from an already existing asset.
6565--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Permissions/BatchUpdate.hs+2−2
@@ -60,8 +60,8 @@ type LayersPermissionsBatchUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PermissionsBatchUpdateRequest
64− :> Post '[JSON] PermissionsBatchUpdateResponse
63+ ReqBody '[JSON] PermissionsBatchUpdateRequest :>
64+ Post '[JSON] PermissionsBatchUpdateResponse
6565
6666-- | Add or update permission entries to an already existing asset. An asset
6767-- can hold up to 20 different permission entries. Each batchInsert request
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Create.hs+1−1
@@ -54,7 +54,7 @@ type MapsCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Map :> Post '[JSON] Map
57+ ReqBody '[JSON] Map :> Post '[JSON] Map
5858
5959-- | Create a map asset.
6060--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Patch.hs+1−1
@@ -56,7 +56,7 @@ type MapsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Map :> Patch '[JSON] ()
59+ ReqBody '[JSON] Map :> Patch '[JSON] ()
6060
6161-- | Mutate a map asset.
6262--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Permissions/BatchDelete.hs+2−2
@@ -58,8 +58,8 @@ type MapsPermissionsBatchDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PermissionsBatchDeleteRequest
62− :> Post '[JSON] PermissionsBatchDeleteResponse
61+ ReqBody '[JSON] PermissionsBatchDeleteRequest :>
62+ Post '[JSON] PermissionsBatchDeleteResponse
6363
6464-- | Remove permission entries from an already existing asset.
6565--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Permissions/BatchUpdate.hs+2−2
@@ -60,8 +60,8 @@ type MapsPermissionsBatchUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PermissionsBatchUpdateRequest
64− :> Post '[JSON] PermissionsBatchUpdateResponse
63+ ReqBody '[JSON] PermissionsBatchUpdateRequest :>
64+ Post '[JSON] PermissionsBatchUpdateResponse
6565
6666-- | Add or update permission entries to an already existing asset. An asset
6767-- can hold up to 20 different permission entries. Each batchInsert request
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Create.hs+1−1
@@ -54,7 +54,7 @@ type RasterCollectionsCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] RasterCollection :>
57+ ReqBody '[JSON] RasterCollection :>
5858 Post '[JSON] RasterCollection
5959
6060-- | Create a raster collection asset.
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Patch.hs+1−2
@@ -56,8 +56,7 @@ type RasterCollectionsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] RasterCollection :>
60− Patch '[JSON] ()
59+ ReqBody '[JSON] RasterCollection :> Patch '[JSON] ()
6160
6261-- | Mutate a raster collection asset.
6362--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Permissions/BatchDelete.hs+2−2
@@ -59,8 +59,8 @@ type RasterCollectionsPermissionsBatchDeleteResource
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] PermissionsBatchDeleteRequest
63− :> Post '[JSON] PermissionsBatchDeleteResponse
62+ ReqBody '[JSON] PermissionsBatchDeleteRequest :>
63+ Post '[JSON] PermissionsBatchDeleteResponse
6464
6565-- | Remove permission entries from an already existing asset.
6666--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Permissions/BatchUpdate.hs+2−2
@@ -61,8 +61,8 @@ type RasterCollectionsPermissionsBatchUpdateResource
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] PermissionsBatchUpdateRequest
65− :> Post '[JSON] PermissionsBatchUpdateResponse
64+ ReqBody '[JSON] PermissionsBatchUpdateRequest :>
65+ Post '[JSON] PermissionsBatchUpdateResponse
6666
6767-- | Add or update permission entries to an already existing asset. An asset
6868-- can hold up to 20 different permission entries. Each batchInsert request
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/BatchDelete.hs+1−1
@@ -60,7 +60,7 @@ type RasterCollectionsRastersBatchDeleteResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream]
63+ ReqBody '[JSON]
6464 RasterCollectionsRasterBatchDeleteRequest
6565 :>
6666 Post '[JSON]
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/BatchInsert.hs+1−1
@@ -61,7 +61,7 @@ type RasterCollectionsRastersBatchInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream]
64+ ReqBody '[JSON]
6565 RasterCollectionsRastersBatchInsertRequest
6666 :>
6767 Post '[JSON]
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Files/Insert.hs+1−1
@@ -59,7 +59,7 @@ type RastersFilesInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[JSON] Body :> Post '[JSON] ()
62+ ReqBody '[OctetStream] Body :> Post '[JSON] ()
6363
6464-- | Upload a file to a raster asset.
6565--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Patch.hs+1−1
@@ -56,7 +56,7 @@ type RastersPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Raster :> Patch '[JSON] ()
59+ ReqBody '[JSON] Raster :> Patch '[JSON] ()
6060
6161-- | Mutate a raster asset.
6262--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Permissions/BatchDelete.hs+2−2
@@ -58,8 +58,8 @@ type RastersPermissionsBatchDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PermissionsBatchDeleteRequest
62− :> Post '[JSON] PermissionsBatchDeleteResponse
61+ ReqBody '[JSON] PermissionsBatchDeleteRequest :>
62+ Post '[JSON] PermissionsBatchDeleteResponse
6363
6464-- | Remove permission entries from an already existing asset.
6565--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Permissions/BatchUpdate.hs+2−2
@@ -60,8 +60,8 @@ type RastersPermissionsBatchUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PermissionsBatchUpdateRequest
64− :> Post '[JSON] PermissionsBatchUpdateResponse
63+ ReqBody '[JSON] PermissionsBatchUpdateRequest :>
64+ Post '[JSON] PermissionsBatchUpdateResponse
6565
6666-- | Add or update permission entries to an already existing asset. An asset
6767-- can hold up to 20 different permission entries. Each batchInsert request
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Upload.hs+1−1
@@ -55,7 +55,7 @@ type RastersUploadResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] Raster :> Post '[JSON] Raster
58+ ReqBody '[JSON] Raster :> Post '[JSON] Raster
5959
6060-- | Create a skeleton raster asset for upload.
6161--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Create.hs+1−1
@@ -54,7 +54,7 @@ type TablesCreateResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Table :> Post '[JSON] Table
57+ ReqBody '[JSON] Table :> Post '[JSON] Table
5858
5959-- | Create a table asset.
6060--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchDelete.hs+1−1
@@ -58,7 +58,7 @@ type TablesFeaturesBatchDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] FeaturesBatchDeleteRequest :>
61+ ReqBody '[JSON] FeaturesBatchDeleteRequest :>
6262 Post '[JSON] ()
6363
6464-- | Delete all features matching the given IDs.
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchInsert.hs+1−1
@@ -64,7 +64,7 @@ type TablesFeaturesBatchInsertResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] FeaturesBatchInsertRequest :>
67+ ReqBody '[JSON] FeaturesBatchInsertRequest :>
6868 Post '[JSON] ()
6969
7070-- | Append features to an existing table. A single batchInsert request can
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchPatch.hs+1−1
@@ -69,7 +69,7 @@ type TablesFeaturesBatchPatchResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] FeaturesBatchPatchRequest :>
72+ ReqBody '[JSON] FeaturesBatchPatchRequest :>
7373 Post '[JSON] ()
7474
7575-- | Update the supplied features. A single batchPatch request can update: -
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Files/Insert.hs+1−1
@@ -62,7 +62,7 @@ type TablesFilesInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[JSON] Body :> Post '[JSON] ()
65+ ReqBody '[OctetStream] Body :> Post '[JSON] ()
6666
6767-- | Upload a file to a placeholder table asset. See Table Upload in the
6868-- Developer\'s Guide for more information. Supported file types are listed
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Patch.hs+1−1
@@ -56,7 +56,7 @@ type TablesPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Table :> Patch '[JSON] ()
59+ ReqBody '[JSON] Table :> Patch '[JSON] ()
6060
6161-- | Mutate a table asset.
6262--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Permissions/BatchDelete.hs+2−2
@@ -58,8 +58,8 @@ type TablesPermissionsBatchDeleteResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PermissionsBatchDeleteRequest
62− :> Post '[JSON] PermissionsBatchDeleteResponse
61+ ReqBody '[JSON] PermissionsBatchDeleteRequest :>
62+ Post '[JSON] PermissionsBatchDeleteResponse
6363
6464-- | Remove permission entries from an already existing asset.
6565--
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Permissions/BatchUpdate.hs+2−2
@@ -60,8 +60,8 @@ type TablesPermissionsBatchUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PermissionsBatchUpdateRequest
64− :> Post '[JSON] PermissionsBatchUpdateResponse
63+ ReqBody '[JSON] PermissionsBatchUpdateRequest :>
64+ Post '[JSON] PermissionsBatchUpdateResponse
6565
6666-- | Add or update permission entries to an already existing asset. An asset
6767-- can hold up to 20 different permission entries. Each batchInsert request
gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Upload.hs+1−1
@@ -59,7 +59,7 @@ type TablesUploadResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Table :> Post '[JSON] Table
62+ ReqBody '[JSON] Table :> Post '[JSON] Table
6363
6464-- | Create a placeholder table asset to which table files can be uploaded.
6565-- Once the placeholder has been created, files are uploaded to the
gogol-mirror/gen/Network/Google/Resource/Mirror/Accounts/Insert.hs+1−2
@@ -60,8 +60,7 @@ type AccountsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Account :>
64− Post '[JSON] Account
63+ ReqBody '[JSON] Account :> Post '[JSON] Account
6564
6665-- | Inserts a new account for a user
6766--
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Insert.hs+1−2
@@ -54,8 +54,7 @@ type ContactsInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Contact :>
58− Post '[JSON] Contact
57+ ReqBody '[JSON] Contact :> Post '[JSON] Contact
5958
6059-- | Inserts a new contact.
6160--
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Patch.hs+1−2
@@ -56,8 +56,7 @@ type ContactsPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Contact :>
60− Patch '[JSON] Contact
59+ ReqBody '[JSON] Contact :> Patch '[JSON] Contact
6160
6261-- | Updates a contact in place. This method supports patch semantics.
6362--
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Update.hs+1−1
@@ -56,7 +56,7 @@ type ContactsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Contact :> Put '[JSON] Contact
59+ ReqBody '[JSON] Contact :> Put '[JSON] Contact
6060
6161-- | Updates a contact in place.
6262--
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Insert.hs+1−1
@@ -54,7 +54,7 @@ type SubscriptionsInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] Subscription :>
57+ ReqBody '[JSON] Subscription :>
5858 Post '[JSON] Subscription
5959
6060-- | Creates a new subscription.
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Update.hs+1−1
@@ -56,7 +56,7 @@ type SubscriptionsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Subscription :>
59+ ReqBody '[JSON] Subscription :>
6060 Put '[JSON] Subscription
6161
6262-- | Updates an existing subscription in place.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Insert.hs+2−1
@@ -57,7 +57,8 @@ type TimelineAttachmentsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[JSON] Body :> Post '[JSON] Attachment
60+ ReqBody '[OctetStream] Body :>
61+ Post '[JSON] Attachment
6162
6263-- | Adds a new attachment to a timeline item.
6364--
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Patch.hs+1−1
@@ -56,7 +56,7 @@ type TimelinePatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] TimelineItem :>
59+ ReqBody '[JSON] TimelineItem :>
6060 Patch '[JSON] TimelineItem
6161
6262-- | Updates a timeline item in place. This method supports patch semantics.
gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/Create.hs+1−1
@@ -56,7 +56,7 @@ type MetricDescriptorsCreateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] MetricDescriptor :>
59+ ReqBody '[JSON] MetricDescriptor :>
6060 Post '[JSON] MetricDescriptor
6161
6262-- | Create a new metric.
gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/List.hs+2−2
@@ -66,8 +66,8 @@ type MetricDescriptorsListResource =
6666 QueryParam "key" Key :>
6767 QueryParam "oauth_token" OAuthToken :>
6868 QueryParam "alt" AltJSON :>
69− ReqBody '[OctetStream] ListMetricDescriptorsRequest
70− :> Get '[JSON] ListMetricDescriptorsResponse
69+ ReqBody '[JSON] ListMetricDescriptorsRequest :>
70+ Get '[JSON] ListMetricDescriptorsResponse
7171
7272-- | List metric descriptors that match the query. If the query is not set,
7373-- then all of the metric descriptors will be returned. Large responses
gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/List.hs+1−2
@@ -78,8 +78,7 @@ type TimeseriesListResource =
7878 QueryParam "key" Key :>
7979 QueryParam "oauth_token" OAuthToken :>
8080 QueryParam "alt" AltJSON :>
81− ReqBody '[OctetStream]
82− ListTimeseriesRequest
81+ ReqBody '[JSON] ListTimeseriesRequest
8382 :> Get '[JSON] ListTimeseriesResponse
8483
8584-- | List the data points of the time series that match the metric and labels
gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/Write.hs+1−1
@@ -62,7 +62,7 @@ type TimeseriesWriteResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] WriteTimeseriesRequest :>
65+ ReqBody '[JSON] WriteTimeseriesRequest :>
6666 Post '[JSON] WriteTimeseriesResponse
6767
6868-- | Put data points to one or more time series for one or more metrics. If a
gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/TimeseriesDescriptors/List.hs+1−1
@@ -80,7 +80,7 @@ type TimeseriesDescriptorsListResource =
8080 QueryParam "key" Key :>
8181 QueryParam "oauth_token" OAuthToken :>
8282 QueryParam "alt" AltJSON :>
83− ReqBody '[OctetStream]
83+ ReqBody '[JSON]
8484 ListTimeseriesDescriptorsRequest
8585 :>
8686 Get '[JSON]
gogol-partners/gen/Network/Google/Resource/Partners/ClientMessages/Log.hs+1−1
@@ -69,7 +69,7 @@ type ClientMessagesLogResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] LogMessageRequest :>
72+ ReqBody '[JSON] LogMessageRequest :>
7373 Post '[JSON] LogMessageResponse
7474
7575-- | Logs a generic message from the client, such as \`Failed to render
gogol-partners/gen/Network/Google/Resource/Partners/Companies/Leads/Create.hs+2−2
@@ -70,8 +70,8 @@ type CompaniesLeadsCreateResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] CreateLeadRequest
74− :> Post '[JSON] CreateLeadResponse
73+ ReqBody '[JSON] CreateLeadRequest :>
74+ Post '[JSON] CreateLeadResponse
7575
7676-- | Creates an advertiser lead for the given company ID.
7777--
gogol-partners/gen/Network/Google/Resource/Partners/UserEvents/Log.hs+1−1
@@ -67,7 +67,7 @@ type UserEventsLogResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] LogUserEventRequest :>
70+ ReqBody '[JSON] LogUserEventRequest :>
7171 Post '[JSON] LogUserEventResponse
7272
7373-- | Logs a user event.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Insert.hs+1−2
@@ -59,8 +59,7 @@ type ActivitiesInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Activity :>
63− Post '[JSON] Activity
62+ ReqBody '[JSON] Activity :> Post '[JSON] Activity
6463
6564-- | Create a new activity for the authenticated user.
6665--
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Insert.hs+1−1
@@ -57,7 +57,7 @@ type CirclesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Circle :> Post '[JSON] Circle
60+ ReqBody '[JSON] Circle :> Post '[JSON] Circle
6161
6262-- | Create a new circle for the authenticated user.
6363--
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Patch.hs+1−1
@@ -56,7 +56,7 @@ type CirclesPatchResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Circle :> Patch '[JSON] Circle
59+ ReqBody '[JSON] Circle :> Patch '[JSON] Circle
6060
6161-- | Update a circle\'s description. This method supports patch semantics.
6262--
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Update.hs+1−1
@@ -56,7 +56,7 @@ type CirclesUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Circle :> Put '[JSON] Circle
59+ ReqBody '[JSON] Circle :> Put '[JSON] Circle
6060
6161-- | Update a circle\'s description.
6262--
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Insert.hs+1−2
@@ -57,8 +57,7 @@ type CommentsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Comment :>
61− Post '[JSON] Comment
60+ ReqBody '[JSON] Comment :> Post '[JSON] Comment
6261
6362-- | Create a new comment in reply to an activity.
6463--
gogol-plus/gen/Network/Google/Resource/Plus/Moments/Insert.hs+1−2
@@ -62,8 +62,7 @@ type MomentsInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Moment :>
66− Post '[JSON] Moment
65+ ReqBody '[JSON] Moment :> Post '[JSON] Moment
6766
6867-- | Record a moment representing a user\'s action such as making a purchase
6968-- or commenting on a blog.
gogol-prediction/gen/Network/Google/Resource/Prediction/HostedModels/Predict.hs+1−1
@@ -59,7 +59,7 @@ type HostedModelsPredictResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Input :> Post '[JSON] Output
62+ ReqBody '[JSON] Input :> Post '[JSON] Output
6363
6464-- | Submit input and request an output against a hosted model.
6565--
gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Insert.hs+1−1
@@ -56,7 +56,7 @@ type TrainedModelsInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Insert :> Post '[JSON] Insert2
59+ ReqBody '[JSON] Insert :> Post '[JSON] Insert2
6060
6161-- | Train a Prediction API model.
6262--
gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Predict.hs+1−1
@@ -59,7 +59,7 @@ type TrainedModelsPredictResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] Input :> Post '[JSON] Output
62+ ReqBody '[JSON] Input :> Post '[JSON] Output
6363
6464-- | Submit model id and request a prediction.
6565--
gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Update.hs+1−1
@@ -58,7 +58,7 @@ type TrainedModelsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Update :> Put '[JSON] Insert2
61+ ReqBody '[JSON] Update :> Put '[JSON] Insert2
6262
6363-- | Add new data to a trained model.
6464--
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/BeaconInfo/GetforObserved.hs+1−1
@@ -68,7 +68,7 @@ type BeaconInfoGetforObservedResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream]
71+ ReqBody '[JSON]
7272 GetInfoForObservedBeaconsRequest
7373 :>
7474 Post '[JSON]
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/Create.hs+1−1
@@ -75,7 +75,7 @@ type BeaconsAttachmentsCreateResource =
7575 QueryParam "key" Key :>
7676 QueryParam "oauth_token" OAuthToken :>
7777 QueryParam "alt" AltJSON :>
78− ReqBody '[OctetStream] BeaconAttachment :>
78+ ReqBody '[JSON] BeaconAttachment :>
7979 Post '[JSON] BeaconAttachment
8080
8181-- | Associates the given data with the specified beacon. Attachment data
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Register.hs+1−2
@@ -69,8 +69,7 @@ type BeaconsRegisterResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] Beacon :>
73− Post '[JSON] Beacon
72+ ReqBody '[JSON] Beacon :> Post '[JSON] Beacon
7473
7574-- | Registers a previously unregistered beacon given its \`advertisedId\`.
7675-- These IDs are unique within the system. An ID can be registered only
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Update.hs+1−2
@@ -73,8 +73,7 @@ type BeaconsUpdateResource =
7373 QueryParam "key" Key :>
7474 QueryParam "oauth_token" OAuthToken :>
7575 QueryParam "alt" AltJSON :>
76− ReqBody '[OctetStream] Beacon :>
77− Put '[JSON] Beacon
76+ ReqBody '[JSON] Beacon :> Put '[JSON] Beacon
7877
7978-- | Updates the information about the specified beacon. **Any field that you
8079-- do not populate in the submitted beacon will be permanently erased**, so
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Acknowledge.hs+1−1
@@ -72,7 +72,7 @@ type ProjectsSubscriptionsAcknowledgeResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] AcknowledgeRequest :>
75+ ReqBody '[JSON] AcknowledgeRequest :>
7676 Post '[JSON] Empty
7777
7878-- | Acknowledges the messages associated with the ack tokens in the
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Create.hs+1−1
@@ -72,7 +72,7 @@ type ProjectsSubscriptionsCreateResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Subscription :>
75+ ReqBody '[JSON] Subscription :>
7676 Put '[JSON] Subscription
7777
7878-- | Creates a subscription to a given topic for a given subscriber. If the
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyAckDeadline.hs+2−3
@@ -72,9 +72,8 @@ type ProjectsSubscriptionsModifyAckDeadlineResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream]
76− ModifyAckDeadlineRequest
77− :> Post '[JSON] Empty
75+ ReqBody '[JSON] ModifyAckDeadlineRequest :>
76+ Post '[JSON] Empty
7877
7978-- | Modifies the ack deadline for a specific message. This method is useful
8079-- to indicate that more time is needed to process a message by the
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyPushConfig.hs+2−3
@@ -72,9 +72,8 @@ type ProjectsSubscriptionsModifyPushConfigResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream]
76− ModifyPushConfigRequest
77− :> Post '[JSON] Empty
75+ ReqBody '[JSON] ModifyPushConfigRequest :>
76+ Post '[JSON] Empty
7877
7978-- | Modifies the PushConfig for a specified subscription. This may be used
8079-- to change a push subscription to a pull one (signified by an empty
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Pull.hs+1−1
@@ -71,7 +71,7 @@ type ProjectsSubscriptionsPullResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] PullRequest :>
74+ ReqBody '[JSON] PullRequest :>
7575 Post '[JSON] PullResponse
7676
7777-- | Pulls messages from the server. Returns an empty list if there are no
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/SetIAMPolicy.hs+1−1
@@ -69,7 +69,7 @@ type ProjectsSubscriptionsSetIAMPolicyResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] SetIAMPolicyRequest :>
72+ ReqBody '[JSON] SetIAMPolicyRequest :>
7373 Post '[JSON] Policy
7474
7575-- | Sets the access control policy on the specified resource. Replaces any
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/TestIAMPermissions.hs+2−3
@@ -69,9 +69,8 @@ type ProjectsSubscriptionsTestIAMPermissionsResource
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream]
73− TestIAMPermissionsRequest
74− :> Post '[JSON] TestIAMPermissionsResponse
72+ ReqBody '[JSON] TestIAMPermissionsRequest :>
73+ Post '[JSON] TestIAMPermissionsResponse
7574
7675-- | Returns permissions that a caller has on the specified resource.
7776--
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Create.hs+1−2
@@ -68,8 +68,7 @@ type ProjectsTopicsCreateResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream] Topic :>
72− Put '[JSON] Topic
71+ ReqBody '[JSON] Topic :> Put '[JSON] Topic
7372
7473-- | Creates the given topic with the given name.
7574--
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Publish.hs+1−1
@@ -70,7 +70,7 @@ type ProjectsTopicsPublishResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] PublishRequest :>
73+ ReqBody '[JSON] PublishRequest :>
7474 Post '[JSON] PublishResponse
7575
7676-- | Adds one or more messages to the topic. Returns NOT_FOUND if the topic
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/SetIAMPolicy.hs+1−1
@@ -69,7 +69,7 @@ type ProjectsTopicsSetIAMPolicyResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] SetIAMPolicyRequest :>
72+ ReqBody '[JSON] SetIAMPolicyRequest :>
7373 Post '[JSON] Policy
7474
7575-- | Sets the access control policy on the specified resource. Replaces any
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/TestIAMPermissions.hs+2−3
@@ -68,9 +68,8 @@ type ProjectsTopicsTestIAMPermissionsResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream]
72− TestIAMPermissionsRequest
73− :> Post '[JSON] TestIAMPermissionsResponse
71+ ReqBody '[JSON] TestIAMPermissionsRequest :>
72+ Post '[JSON] TestIAMPermissionsResponse
7473
7574-- | Returns permissions that a caller has on the specified resource.
7675--
gogol-qpxexpress/gen/Network/Google/Resource/QPXExpress/Trips/Search.hs+1−1
@@ -54,7 +54,7 @@ type TripsSearchResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] TripsSearchRequest :>
57+ ReqBody '[JSON] TripsSearchRequest :>
5858 Post '[JSON] TripsSearchResponse
5959
6060-- | Returns a list of flights.
gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Insert.hs+1−1
@@ -59,7 +59,7 @@ type RollingUpdatesInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] RollingUpdate :>
62+ ReqBody '[JSON] RollingUpdate :>
6363 Post '[JSON] Operation
6464
6565-- | Inserts and starts a new update.
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/AbandonInstances.hs+1−1
@@ -64,7 +64,7 @@ type InstanceGroupManagersAbandonInstancesResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream]
67+ ReqBody '[JSON]
6868 InstanceGroupManagersAbandonInstancesRequest
6969 :> Post '[JSON] Operation
7070
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/DeleteInstances.hs+1−1
@@ -65,7 +65,7 @@ type InstanceGroupManagersDeleteInstancesResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream]
68+ ReqBody '[JSON]
6969 InstanceGroupManagersDeleteInstancesRequest
7070 :> Post '[JSON] Operation
7171
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/Insert.hs+1−1
@@ -62,7 +62,7 @@ type InstanceGroupManagersInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] InstanceGroupManager :>
65+ ReqBody '[JSON] InstanceGroupManager :>
6666 Post '[JSON] Operation
6767
6868-- | Creates an instance group manager, as well as the instance group and the
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/RecreateInstances.hs+1−1
@@ -63,7 +63,7 @@ type InstanceGroupManagersRecreateInstancesResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
66+ ReqBody '[JSON]
6767 InstanceGroupManagersRecreateInstancesRequest
6868 :> Post '[JSON] Operation
6969
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/SetInstanceTemplate.hs+1−1
@@ -64,7 +64,7 @@ type InstanceGroupManagersSetInstanceTemplateResource
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream]
67+ ReqBody '[JSON]
6868 InstanceGroupManagersSetInstanceTemplateRequest
6969 :> Post '[JSON] Operation
7070
gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/SetTargetPools.hs+1−1
@@ -63,7 +63,7 @@ type InstanceGroupManagersSetTargetPoolsResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
66+ ReqBody '[JSON]
6767 InstanceGroupManagersSetTargetPoolsRequest
6868 :> Post '[JSON] Operation
6969
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Organizations/GetIAMPolicy.hs+2−2
@@ -70,8 +70,8 @@ type OrganizationsGetIAMPolicyResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] GetIAMPolicyRequest
74− :> Post '[JSON] Policy
73+ ReqBody '[JSON] GetIAMPolicyRequest :>
74+ Post '[JSON] Policy
7575
7676-- | Gets the access control policy for a Organization resource. May be empty
7777-- if no such policy or resource exists.
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Organizations/SetIAMPolicy.hs+2−2
@@ -70,8 +70,8 @@ type OrganizationsSetIAMPolicyResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] SetIAMPolicyRequest
74− :> Post '[JSON] Policy
73+ ReqBody '[JSON] SetIAMPolicyRequest :>
74+ Post '[JSON] Policy
7575
7676-- | Sets the access control policy on a Organization resource. Replaces any
7777-- existing policy.
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Organizations/TestIAMPermissions.hs+1−2
@@ -69,8 +69,7 @@ type OrganizationsTestIAMPermissionsResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream]
73− TestIAMPermissionsRequest
72+ ReqBody '[JSON] TestIAMPermissionsRequest
7473 :>
7574 Post '[JSON] TestIAMPermissionsResponse
7675
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Organizations/Update.hs+1−1
@@ -69,7 +69,7 @@ type OrganizationsUpdateResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] Organization :>
72+ ReqBody '[JSON] Organization :>
7373 Put '[JSON] Organization
7474
7575-- | Updates an Organization resource.
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Create.hs+1−1
@@ -70,7 +70,7 @@ type ProjectsCreateResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] Project :>
73+ ReqBody '[JSON] Project :>
7474 Post '[JSON] Project
7575
7676-- | Creates a project resource. Initially, the project resource is owned by
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/GetIAMPolicy.hs+2−2
@@ -69,8 +69,8 @@ type ProjectsGetIAMPolicyResource =
6969 QueryParam "key" Key :>
7070 QueryParam "oauth_token" OAuthToken :>
7171 QueryParam "alt" AltJSON :>
72− ReqBody '[OctetStream] GetIAMPolicyRequest
73− :> Post '[JSON] Policy
72+ ReqBody '[JSON] GetIAMPolicyRequest :>
73+ Post '[JSON] Policy
7474
7575-- | Returns the IAM access control policy for specified project.
7676--
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/SetIAMPolicy.hs+2−2
@@ -71,8 +71,8 @@ type ProjectsSetIAMPolicyResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] SetIAMPolicyRequest
75− :> Post '[JSON] Policy
74+ ReqBody '[JSON] SetIAMPolicyRequest :>
75+ Post '[JSON] Policy
7676
7777-- | Sets the IAM access control policy for the specified project. We do not
7878-- currently support \'domain:\' prefixed members in a Binding of a Policy.
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/TestIAMPermissions.hs+1−2
@@ -70,8 +70,7 @@ type ProjectsTestIAMPermissionsResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream]
74− TestIAMPermissionsRequest
73+ ReqBody '[JSON] TestIAMPermissionsRequest
7574 :>
7675 Post '[JSON] TestIAMPermissionsResponse
7776
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Update.hs+1−1
@@ -71,7 +71,7 @@ type ProjectsUpdateResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] Project :>
74+ ReqBody '[JSON] Project :>
7575 Put '[JSON] Project
7676
7777-- | Updates the attributes of the project identified by the specified
gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/AddResources.hs+2−3
@@ -62,9 +62,8 @@ type ZoneViewsAddResourcesResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
66− ZoneViewsAddResourcesRequest
67− :> Post '[JSON] Operation
65+ ReqBody '[JSON] ZoneViewsAddResourcesRequest :>
66+ Post '[JSON] Operation
6867
6968-- | Add resources to the view.
7069--
gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/Insert.hs+1−1
@@ -59,7 +59,7 @@ type ZoneViewsInsertResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] ResourceView :>
62+ ReqBody '[JSON] ResourceView :>
6363 Post '[JSON] Operation
6464
6565-- | Create a resource view.
gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/RemoveResources.hs+1−2
@@ -62,8 +62,7 @@ type ZoneViewsRemoveResourcesResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream]
66− ZoneViewsRemoveResourcesRequest
65+ ReqBody '[JSON] ZoneViewsRemoveResourcesRequest
6766 :> Post '[JSON] Operation
6867
6968-- | Remove resources from the view.
gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/SetService.hs+2−2
@@ -62,8 +62,8 @@ type ZoneViewsSetServiceResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] ZoneViewsSetServiceRequest
66− :> Post '[JSON] Operation
65+ ReqBody '[JSON] ZoneViewsSetServiceRequest :>
66+ Post '[JSON] Operation
6767
6868-- | Update the service information of a resource view or a resource.
6969--
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Acknowledge.hs+1−1
@@ -59,7 +59,7 @@ type OrdersAcknowledgeResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersAcknowledgeRequest :>
62+ ReqBody '[JSON] OrdersAcknowledgeRequest :>
6363 Post '[JSON] OrdersAcknowledgeResponse
6464
6565-- | Marks an order as acknowledged.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancel.hs+1−1
@@ -59,7 +59,7 @@ type OrdersCancelResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersCancelRequest :>
62+ ReqBody '[JSON] OrdersCancelRequest :>
6363 Post '[JSON] OrdersCancelResponse
6464
6565-- | Cancels all line items in an order.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancellineitem.hs+1−1
@@ -59,7 +59,7 @@ type OrdersCancellineitemResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersCancelLineItemRequest :>
62+ ReqBody '[JSON] OrdersCancelLineItemRequest :>
6363 Post '[JSON] OrdersCancelLineItemResponse
6464
6565-- | Cancels a line item.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/CreatetestOrder.hs+2−2
@@ -56,8 +56,8 @@ type OrdersCreatetestOrderResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] OrdersCreateTestOrderRequest
60− :> Post '[JSON] OrdersCreateTestOrderResponse
59+ ReqBody '[JSON] OrdersCreateTestOrderRequest :>
60+ Post '[JSON] OrdersCreateTestOrderResponse
6161
6262-- | Sandbox only. Creates a test order.
6363--
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Custombatch.hs+1−1
@@ -55,7 +55,7 @@ type OrdersCustombatchResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] OrdersCustomBatchRequest :>
58+ ReqBody '[JSON] OrdersCustomBatchRequest :>
5959 Post '[JSON] OrdersCustomBatchResponse
6060
6161-- | Retrieves or modifies multiple orders in a single request.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Refund.hs+1−1
@@ -59,7 +59,7 @@ type OrdersRefundResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersRefundRequest :>
62+ ReqBody '[JSON] OrdersRefundRequest :>
6363 Post '[JSON] OrdersRefundResponse
6464
6565-- | Refund a portion of the order, up to the full amount paid.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Returnlineitem.hs+1−1
@@ -59,7 +59,7 @@ type OrdersReturnlineitemResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersReturnLineItemRequest :>
62+ ReqBody '[JSON] OrdersReturnLineItemRequest :>
6363 Post '[JSON] OrdersReturnLineItemResponse
6464
6565-- | Returns a line item.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Shiplineitems.hs+1−1
@@ -59,7 +59,7 @@ type OrdersShiplineitemsResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersShipLineItemsRequest :>
62+ ReqBody '[JSON] OrdersShipLineItemsRequest :>
6363 Post '[JSON] OrdersShipLineItemsResponse
6464
6565-- | Marks line item(s) as shipped.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/UpdatemerchantOrderid.hs+2−3
@@ -59,9 +59,8 @@ type OrdersUpdatemerchantOrderidResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream]
63− OrdersUpdateMerchantOrderIdRequest
64− :> Post '[JSON] OrdersUpdateMerchantOrderIdResponse
62+ ReqBody '[JSON] OrdersUpdateMerchantOrderIdRequest :>
63+ Post '[JSON] OrdersUpdateMerchantOrderIdResponse
6564
6665-- | Updates the merchant order ID for a given order.
6766--
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Updateshipment.hs+1−1
@@ -59,7 +59,7 @@ type OrdersUpdateshipmentResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] OrdersUpdateShipmentRequest :>
62+ ReqBody '[JSON] OrdersUpdateShipmentRequest :>
6363 Post '[JSON] OrdersUpdateShipmentResponse
6464
6565-- | Updates a shipment\'s status, carrier, and\/or tracking ID.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/GetToken.hs+1−1
@@ -54,7 +54,7 @@ type WebResourceGetTokenResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream]
57+ ReqBody '[JSON]
5858 SiteVerificationWebResourceGettokenRequest
5959 :>
6060 Post '[JSON]
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Insert.hs+1−2
@@ -56,8 +56,7 @@ type WebResourceInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream]
60− SiteVerificationWebResourceResource
59+ ReqBody '[JSON] SiteVerificationWebResourceResource
6160 :> Post '[JSON] SiteVerificationWebResourceResource
6261
6362-- | Attempt verification of a website or domain.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Patch.hs+1−2
@@ -57,8 +57,7 @@ type WebResourcePatchResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream]
61− SiteVerificationWebResourceResource
60+ ReqBody '[JSON] SiteVerificationWebResourceResource
6261 :> Patch '[JSON] SiteVerificationWebResourceResource
6362
6463-- | Modify the list of owners for your website or domain. This method
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Update.hs+1−2
@@ -56,8 +56,7 @@ type WebResourceUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream]
60− SiteVerificationWebResourceResource
59+ ReqBody '[JSON] SiteVerificationWebResourceResource
6160 :> Put '[JSON] SiteVerificationWebResourceResource
6261
6362-- | Modify the list of owners for your website or domain.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrum.hs+1−1
@@ -56,7 +56,7 @@ type PawsGetSpectrumResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] PawsGetSpectrumRequest :>
59+ ReqBody '[JSON] PawsGetSpectrumRequest :>
6060 Post '[JSON] PawsGetSpectrumResponse
6161
6262-- | Requests information about the available spectrum for a device at a
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrumBatch.hs+1−1
@@ -55,7 +55,7 @@ type PawsGetSpectrumBatchResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] PawsGetSpectrumBatchRequest :>
58+ ReqBody '[JSON] PawsGetSpectrumBatchRequest :>
5959 Post '[JSON] PawsGetSpectrumBatchResponse
6060
6161-- | The Google Spectrum Database does not support batch requests, so this
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Init.hs+1−1
@@ -55,7 +55,7 @@ type PawsInitResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] PawsInitRequest :>
58+ ReqBody '[JSON] PawsInitRequest :>
5959 Post '[JSON] PawsInitResponse
6060
6161-- | Initializes the connection between a white space device and the
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/NotifySpectrumUse.hs+2−2
@@ -57,8 +57,8 @@ type PawsNotifySpectrumUseResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PawsNotifySpectrumUseRequest
61− :> Post '[JSON] PawsNotifySpectrumUseResponse
60+ ReqBody '[JSON] PawsNotifySpectrumUseRequest :>
61+ Post '[JSON] PawsNotifySpectrumUseResponse
6262
6363-- | Notifies the database that the device has selected certain frequency
6464-- ranges for transmission. Only to be invoked when required by the
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Register.hs+1−1
@@ -55,7 +55,7 @@ type PawsRegisterResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] PawsRegisterRequest :>
58+ ReqBody '[JSON] PawsRegisterRequest :>
5959 Post '[JSON] PawsRegisterResponse
6060
6161-- | The Google Spectrum Database implements registration in the getSpectrum
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/VerifyDevice.hs+1−1
@@ -56,7 +56,7 @@ type PawsVerifyDeviceResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] PawsVerifyDeviceRequest :>
59+ ReqBody '[JSON] PawsVerifyDeviceRequest :>
6060 Post '[JSON] PawsVerifyDeviceResponse
6161
6262-- | Validates a device for white space use in accordance with regulatory
gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Insert.hs+1−2
@@ -61,8 +61,7 @@ type DatabasesInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Database :>
65− Post '[JSON] Operation
64+ ReqBody '[JSON] Database :> Post '[JSON] Operation
6665
6766-- | Inserts a resource containing information about a database inside a
6867-- Cloud SQL instance.
gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Patch.hs+1−1
@@ -63,7 +63,7 @@ type DatabasesPatchResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Database :>
66+ ReqBody '[JSON] Database :>
6767 Patch '[JSON] Operation
6868
6969-- | Updates a resource containing information about a database inside a
gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Update.hs+1−2
@@ -63,8 +63,7 @@ type DatabasesUpdateResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] Database :>
67− Put '[JSON] Operation
66+ ReqBody '[JSON] Database :> Put '[JSON] Operation
6867
6968-- | Updates a resource containing information about a database inside a
7069-- Cloud SQL instance.
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Clone.hs+1−1
@@ -60,7 +60,7 @@ type InstancesCloneResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] InstancesCloneRequest :>
63+ ReqBody '[JSON] InstancesCloneRequest :>
6464 Post '[JSON] Operation
6565
6666-- | Creates a Cloud SQL instance as a clone of the source instance.
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Export.hs+1−1
@@ -61,7 +61,7 @@ type InstancesExportResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] InstancesExportRequest :>
64+ ReqBody '[JSON] InstancesExportRequest :>
6565 Post '[JSON] Operation
6666
6767-- | Exports data from a Cloud SQL instance to a Google Cloud Storage bucket
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Import.hs+1−1
@@ -61,7 +61,7 @@ type InstancesImportResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] InstancesImportRequest :>
64+ ReqBody '[JSON] InstancesImportRequest :>
6565 Post '[JSON] Operation
6666
6767-- | Imports data into a Cloud SQL instance from a MySQL dump file in Google
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Insert.hs+1−1
@@ -57,7 +57,7 @@ type InstancesInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] DatabaseInstance :>
60+ ReqBody '[JSON] DatabaseInstance :>
6161 Post '[JSON] Operation
6262
6363-- | Creates a new Cloud SQL instance.
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Patch.hs+1−1
@@ -62,7 +62,7 @@ type InstancesPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] DatabaseInstance :>
65+ ReqBody '[JSON] DatabaseInstance :>
6666 Patch '[JSON] Operation
6767
6868-- | Updates settings of a Cloud SQL instance. Caution: This is not a partial
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/RestoreBackup.hs+2−3
@@ -60,9 +60,8 @@ type InstancesRestoreBackupResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream]
64− InstancesRestoreBackupRequest
65− :> Post '[JSON] Operation
63+ ReqBody '[JSON] InstancesRestoreBackupRequest :>
64+ Post '[JSON] Operation
6665
6766-- | Restores a backup of a Cloud SQL instance.
6867--
gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Update.hs+1−1
@@ -61,7 +61,7 @@ type InstancesUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] DatabaseInstance :>
64+ ReqBody '[JSON] DatabaseInstance :>
6565 Put '[JSON] Operation
6666
6767-- | Updates settings of a Cloud SQL instance. Caution: This is not a partial
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/CreateEphemeral.hs+2−3
@@ -63,9 +63,8 @@ type SSLCertsCreateEphemeralResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream]
67− SSLCertsCreateEphemeralRequest
68− :> Post '[JSON] SSLCert
66+ ReqBody '[JSON] SSLCertsCreateEphemeralRequest :>
67+ Post '[JSON] SSLCert
6968
7069-- | Generates a short-lived X509 certificate containing the provided public
7170-- key and signed by a private key specific to the target instance. Users
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Insert.hs+1−1
@@ -62,7 +62,7 @@ type SSLCertsInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] SSLCertsInsertRequest :>
65+ ReqBody '[JSON] SSLCertsInsertRequest :>
6666 Post '[JSON] SSLCertsInsertResponse
6767
6868-- | Creates an SSL certificate and returns it along with the private key and
gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/Insert.hs+1−2
@@ -60,8 +60,7 @@ type UsersInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] User :>
64− Post '[JSON] Operation
63+ ReqBody '[JSON] User :> Post '[JSON] Operation
6564
6665-- | Creates a new user in a Cloud SQL instance.
6766--
gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/Update.hs+1−2
@@ -64,8 +64,7 @@ type UsersUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] User :>
68− Put '[JSON] Operation
67+ ReqBody '[JSON] User :> Put '[JSON] Operation
6968
7069-- | Updates an existing user in a Cloud SQL instance.
7170--
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Create.hs+1−1
@@ -67,7 +67,7 @@ type TransferJobsCreateResource =
6767 QueryParam "key" Key :>
6868 QueryParam "oauth_token" OAuthToken :>
6969 QueryParam "alt" AltJSON :>
70− ReqBody '[OctetStream] TransferJob :>
70+ ReqBody '[JSON] TransferJob :>
7171 Post '[JSON] TransferJob
7272
7373-- | Creates a transfer job that runs periodically.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Patch.hs+2−3
@@ -70,9 +70,8 @@ type TransferJobsPatchResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream]
74− UpdateTransferJobRequest
75− :> Patch '[JSON] TransferJob
73+ ReqBody '[JSON] UpdateTransferJobRequest :>
74+ Patch '[JSON] TransferJob
7675
7776-- | Updates a transfer job. Updating a job\'s transfer spec does not affect
7877-- transfer operations that are running already. Updating the scheduling of
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Pause.hs+1−2
@@ -68,8 +68,7 @@ type TransferOperationsPauseResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream]
72− PauseTransferOperationRequest
71+ ReqBody '[JSON] PauseTransferOperationRequest
7372 :> Post '[JSON] Empty
7473
7574-- | Pauses a transfer operation.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Resume.hs+1−1
@@ -68,7 +68,7 @@ type TransferOperationsResumeResource =
6868 QueryParam "key" Key :>
6969 QueryParam "oauth_token" OAuthToken :>
7070 QueryParam "alt" AltJSON :>
71− ReqBody '[OctetStream]
71+ ReqBody '[JSON]
7272 ResumeTransferOperationRequest
7373 :> Post '[JSON] Empty
7474
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Insert.hs+1−1
@@ -57,7 +57,7 @@ type BucketAccessControlsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] BucketAccessControl :>
60+ ReqBody '[JSON] BucketAccessControl :>
6161 Post '[JSON] BucketAccessControl
6262
6363-- | Creates a new ACL entry on the specified bucket.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Patch.hs+1−1
@@ -60,7 +60,7 @@ type BucketAccessControlsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] BucketAccessControl :>
63+ ReqBody '[JSON] BucketAccessControl :>
6464 Patch '[JSON] BucketAccessControl
6565
6666-- | Updates an ACL entry on the specified bucket. This method supports patch
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Update.hs+1−1
@@ -59,7 +59,7 @@ type BucketAccessControlsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] BucketAccessControl :>
62+ ReqBody '[JSON] BucketAccessControl :>
6363 Put '[JSON] BucketAccessControl
6464
6565-- | Updates an ACL entry on the specified bucket.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Insert.hs+1−1
@@ -58,7 +58,7 @@ type BucketsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Bucket :> Post '[JSON] Bucket
61+ ReqBody '[JSON] Bucket :> Post '[JSON] Bucket
6262
6363-- | Creates a new bucket.
6464--
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Patch.hs+1−2
@@ -62,8 +62,7 @@ type BucketsPatchResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Bucket :>
66− Patch '[JSON] Bucket
65+ ReqBody '[JSON] Bucket :> Patch '[JSON] Bucket
6766
6867-- | Updates a bucket. This method supports patch semantics.
6968--
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Update.hs+1−1
@@ -62,7 +62,7 @@ type BucketsUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Bucket :> Put '[JSON] Bucket
65+ ReqBody '[JSON] Bucket :> Put '[JSON] Bucket
6666
6767-- | Updates a bucket.
6868--
gogol-storage/gen/Network/Google/Resource/Storage/Channels/Stop.hs+1−1
@@ -55,7 +55,7 @@ type ChannelsStopResource =
5555 QueryParam "key" Key :>
5656 QueryParam "oauth_token" OAuthToken :>
5757 QueryParam "alt" AltJSON :>
58− ReqBody '[OctetStream] Channel :> Post '[JSON] ()
58+ ReqBody '[JSON] Channel :> Post '[JSON] ()
5959
6060-- | Stop watching resources through this channel
6161--
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Insert.hs+1−1
@@ -57,7 +57,7 @@ type DefaultObjectAccessControlsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] ObjectAccessControl :>
60+ ReqBody '[JSON] ObjectAccessControl :>
6161 Post '[JSON] ObjectAccessControl
6262
6363-- | Creates a new default object ACL entry on the specified bucket.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Patch.hs+1−1
@@ -60,7 +60,7 @@ type DefaultObjectAccessControlsPatchResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ObjectAccessControl :>
63+ ReqBody '[JSON] ObjectAccessControl :>
6464 Patch '[JSON] ObjectAccessControl
6565
6666-- | Updates a default object ACL entry on the specified bucket. This method
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Update.hs+1−1
@@ -59,7 +59,7 @@ type DefaultObjectAccessControlsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] ObjectAccessControl :>
62+ ReqBody '[JSON] ObjectAccessControl :>
6363 Put '[JSON] ObjectAccessControl
6464
6565-- | Updates a default object ACL entry on the specified bucket.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Insert.hs+1−1
@@ -62,7 +62,7 @@ type ObjectAccessControlsInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] ObjectAccessControl :>
65+ ReqBody '[JSON] ObjectAccessControl :>
6666 Post '[JSON] ObjectAccessControl
6767
6868-- | Creates a new ACL entry on the specified object.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Patch.hs+1−1
@@ -65,7 +65,7 @@ type ObjectAccessControlsPatchResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] ObjectAccessControl :>
68+ ReqBody '[JSON] ObjectAccessControl :>
6969 Patch '[JSON] ObjectAccessControl
7070
7171-- | Updates an ACL entry on the specified object. This method supports patch
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Update.hs+1−1
@@ -64,7 +64,7 @@ type ObjectAccessControlsUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ObjectAccessControl :>
67+ ReqBody '[JSON] ObjectAccessControl :>
6868 Put '[JSON] ObjectAccessControl
6969
7070-- | Updates an ACL entry on the specified object.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Compose.hs+2−2
@@ -65,7 +65,7 @@ type ObjectsComposeResource =
6565 QueryParam "key" Key :>
6666 QueryParam "oauth_token" OAuthToken :>
6767 QueryParam "alt" AltJSON :>
68− ReqBody '[OctetStream] ComposeRequest :>
68+ ReqBody '[JSON] ComposeRequest :>
6969 Post '[JSON] Object
7070 :<|>
7171 "b" :>
@@ -82,7 +82,7 @@ type ObjectsComposeResource =
8282 QueryParam "key" Key :>
8383 QueryParam "oauth_token" OAuthToken :>
8484 QueryParam "alt" AltMedia :>
85− ReqBody '[OctetStream] ComposeRequest :>
85+ ReqBody '[JSON] ComposeRequest :>
8686 Post '[OctetStream] Body
8787
8888-- | Concatenates a list of existing objects into a new object in the same
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Copy.hs+2−4
@@ -97,8 +97,7 @@ type ObjectsCopyResource =
9797 :>
9898 QueryParam "alt" AltJSON
9999 :>
100− ReqBody '[OctetStream]
101− Object
100+ ReqBody '[JSON] Object
102101 :>
103102 Post '[JSON] Object
104103 :<|>
@@ -142,8 +141,7 @@ type ObjectsCopyResource =
142141 QueryParam "alt"
143142 AltMedia
144143 :>
145− ReqBody
146− '[OctetStream]
144+ ReqBody '[JSON]
147145 Object
148146 :>
149147 Post '[OctetStream]
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Patch.hs+1−1
@@ -72,7 +72,7 @@ type ObjectsPatchResource =
7272 QueryParam "key" Key :>
7373 QueryParam "oauth_token" OAuthToken :>
7474 QueryParam "alt" AltJSON :>
75− ReqBody '[OctetStream] Object :>
75+ ReqBody '[JSON] Object :>
7676 Patch '[JSON] Object
7777
7878-- | Updates a data blob\'s associated metadata. This method supports patch
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Update.hs+2−2
@@ -71,7 +71,7 @@ type ObjectsUpdateResource =
7171 QueryParam "key" Key :>
7272 QueryParam "oauth_token" OAuthToken :>
7373 QueryParam "alt" AltJSON :>
74− ReqBody '[OctetStream] Object :>
74+ ReqBody '[JSON] Object :>
7575 Put '[JSON] Object
7676 :<|>
7777 "b" :>
@@ -91,7 +91,7 @@ type ObjectsUpdateResource =
9191 QueryParam "key" Key :>
9292 QueryParam "oauth_token" OAuthToken :>
9393 QueryParam "alt" AltMedia :>
94− ReqBody '[OctetStream] Object :>
94+ ReqBody '[JSON] Object :>
9595 Put '[OctetStream] Body
9696
9797-- | Updates a data blob\'s associated metadata.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/WatchAll.hs+1−1
@@ -70,7 +70,7 @@ type ObjectsWatchAllResource =
7070 QueryParam "key" Key :>
7171 QueryParam "oauth_token" OAuthToken :>
7272 QueryParam "alt" AltJSON :>
73− ReqBody '[OctetStream] Channel :>
73+ ReqBody '[JSON] Channel :>
7474 Post '[JSON] Channel
7575
7676-- | Watch for changes on all objects in a bucket.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Create.hs+1−2
@@ -57,8 +57,7 @@ type AccountsContainersCreateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Container :>
61− Post '[JSON] Container
60+ ReqBody '[JSON] Container :> Post '[JSON] Container
6261
6362-- | Creates a Container.
6463--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Create.hs+1−2
@@ -60,8 +60,7 @@ type AccountsContainersFoldersCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Folder :>
64− Post '[JSON] Folder
63+ ReqBody '[JSON] Folder :> Post '[JSON] Folder
6564
6665-- | Creates a GTM Folder.
6766--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Update.hs+1−2
@@ -64,8 +64,7 @@ type AccountsContainersFoldersUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Folder :>
68− Put '[JSON] Folder
67+ ReqBody '[JSON] Folder :> Put '[JSON] Folder
6968
7069-- | Updates a GTM Folder.
7170--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Macros/Create.hs+1−1
@@ -60,7 +60,7 @@ type AccountsContainersMacrosCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Macro :> Post '[JSON] Macro
63+ ReqBody '[JSON] Macro :> Post '[JSON] Macro
6464
6565-- | Creates a GTM Macro.
6666--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Macros/Update.hs+1−2
@@ -64,8 +64,7 @@ type AccountsContainersMacrosUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Macro :>
68− Put '[JSON] Macro
67+ ReqBody '[JSON] Macro :> Put '[JSON] Macro
6968
7069-- | Updates a GTM Macro.
7170--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Create.hs+1−1
@@ -60,7 +60,7 @@ type AccountsContainersRulesCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Rule :> Post '[JSON] Rule
63+ ReqBody '[JSON] Rule :> Post '[JSON] Rule
6464
6565-- | Creates a GTM Rule.
6666--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Update.hs+1−1
@@ -64,7 +64,7 @@ type AccountsContainersRulesUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Rule :> Put '[JSON] Rule
67+ ReqBody '[JSON] Rule :> Put '[JSON] Rule
6868
6969-- | Updates a GTM Rule.
7070--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Create.hs+1−1
@@ -60,7 +60,7 @@ type AccountsContainersTagsCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Tag :> Post '[JSON] Tag
63+ ReqBody '[JSON] Tag :> Post '[JSON] Tag
6464
6565-- | Creates a GTM Tag.
6666--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Update.hs+1−1
@@ -64,7 +64,7 @@ type AccountsContainersTagsUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Tag :> Put '[JSON] Tag
67+ ReqBody '[JSON] Tag :> Put '[JSON] Tag
6868
6969-- | Updates a GTM Tag.
7070--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Create.hs+1−2
@@ -60,8 +60,7 @@ type AccountsContainersTriggersCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Trigger :>
64− Post '[JSON] Trigger
63+ ReqBody '[JSON] Trigger :> Post '[JSON] Trigger
6564
6665-- | Creates a GTM Trigger.
6766--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Update.hs+1−2
@@ -64,8 +64,7 @@ type AccountsContainersTriggersUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Trigger :>
68− Put '[JSON] Trigger
67+ ReqBody '[JSON] Trigger :> Put '[JSON] Trigger
6968
7069-- | Updates a GTM Trigger.
7170--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Update.hs+1−2
@@ -61,8 +61,7 @@ type AccountsContainersUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] Container :>
65− Put '[JSON] Container
64+ ReqBody '[JSON] Container :> Put '[JSON] Container
6665
6766-- | Updates a Container.
6867--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Create.hs+1−2
@@ -60,8 +60,7 @@ type AccountsContainersVariablesCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Variable :>
64− Post '[JSON] Variable
63+ ReqBody '[JSON] Variable :> Post '[JSON] Variable
6564
6665-- | Creates a GTM Variable.
6766--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Update.hs+1−1
@@ -64,7 +64,7 @@ type AccountsContainersVariablesUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] Variable :>
67+ ReqBody '[JSON] Variable :>
6868 Put '[JSON] Variable
6969
7070-- | Updates a GTM Variable.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Create.hs+1−1
@@ -60,7 +60,7 @@ type AccountsContainersVersionsCreateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream]
63+ ReqBody '[JSON]
6464 CreateContainerVersionRequestVersionOptions
6565 :> Post '[JSON] CreateContainerVersionResponse
6666
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Update.hs+1−1
@@ -64,7 +64,7 @@ type AccountsContainersVersionsUpdateResource =
6464 QueryParam "key" Key :>
6565 QueryParam "oauth_token" OAuthToken :>
6666 QueryParam "alt" AltJSON :>
67− ReqBody '[OctetStream] ContainerVersion :>
67+ ReqBody '[JSON] ContainerVersion :>
6868 Put '[JSON] ContainerVersion
6969
7070-- | Updates a Container Version.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Create.hs+1−2
@@ -57,8 +57,7 @@ type AccountsPermissionsCreateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] UserAccess :>
61− Post '[JSON] UserAccess
60+ ReqBody '[JSON] UserAccess :> Post '[JSON] UserAccess
6261
6362-- | Creates a user\'s Account & Container Permissions.
6463--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Update.hs+1−2
@@ -59,8 +59,7 @@ type AccountsPermissionsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] UserAccess :>
63− Put '[JSON] UserAccess
62+ ReqBody '[JSON] UserAccess :> Put '[JSON] UserAccess
6463
6564-- | Updates a user\'s Account & Container Permissions.
6665--
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Update.hs+1−1
@@ -58,7 +58,7 @@ type AccountsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Account :> Put '[JSON] Account
61+ ReqBody '[JSON] Account :> Put '[JSON] Account
6262
6363-- | Updates a GTM Account.
6464--
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Insert.hs+1−1
@@ -54,7 +54,7 @@ type URLInsertResource =
5454 QueryParam "key" Key :>
5555 QueryParam "oauth_token" OAuthToken :>
5656 QueryParam "alt" AltJSON :>
57− ReqBody '[OctetStream] URL :> Post '[JSON] URL
57+ ReqBody '[JSON] URL :> Post '[JSON] URL
5858
5959-- | Creates a new short URL.
6060--
gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/AddMember.hs+1−1
@@ -60,7 +60,7 @@ type GroupsAddMemberResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] GroupsAddMemberRequest :>
63+ ReqBody '[JSON] GroupsAddMemberRequest :>
6464 Post '[JSON] Operation
6565
6666-- | Adds users to the specified group.
gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/Insert.hs+1−2
@@ -58,8 +58,7 @@ type GroupsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Group :>
62− Post '[JSON] Operation
61+ ReqBody '[JSON] Group :> Post '[JSON] Operation
6362
6463-- | Creates a Group resource in the specified project using the data
6564-- included in the request.
gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/RemoveMember.hs+1−1
@@ -60,7 +60,7 @@ type GroupsRemoveMemberResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] GroupsRemoveMemberRequest :>
63+ ReqBody '[JSON] GroupsRemoveMemberRequest :>
6464 Post '[JSON] Operation
6565
6666-- | Removes users from the specified group.
gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/AddPublicKey.hs+1−2
@@ -61,8 +61,7 @@ type UsersAddPublicKeyResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] PublicKey :>
65− Post '[JSON] Operation
64+ ReqBody '[JSON] PublicKey :> Post '[JSON] Operation
6665
6766-- | Adds a public key to the specified User resource with the data included
6867-- in the request.
gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/Insert.hs+1−1
@@ -58,7 +58,7 @@ type UsersInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] User :> Post '[JSON] Operation
61+ ReqBody '[JSON] User :> Post '[JSON] Operation
6262
6363-- | Creates a User resource in the specified project using the data included
6464-- in the request.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Searchanalytics/Query.hs+1−1
@@ -63,7 +63,7 @@ type SearchanalyticsQueryResource =
6363 QueryParam "key" Key :>
6464 QueryParam "oauth_token" OAuthToken :>
6565 QueryParam "alt" AltJSON :>
66− ReqBody '[OctetStream] SearchAnalyticsQueryRequest :>
66+ ReqBody '[JSON] SearchAnalyticsQueryRequest :>
6767 Post '[JSON] SearchAnalyticsQueryResponse
6868
6969-- | Query your data with filters and parameters that you define. Returns
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/Insert.hs+1−2
@@ -56,8 +56,7 @@ type GroupItemsInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] GroupItem :>
60− Post '[JSON] GroupItem
59+ ReqBody '[JSON] GroupItem :> Post '[JSON] GroupItem
6160
6261-- | Creates a group item.
6362--
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Insert.hs+1−1
@@ -56,7 +56,7 @@ type GroupsInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Group :> Post '[JSON] Group
59+ ReqBody '[JSON] Group :> Post '[JSON] Group
6060
6161-- | Creates a group.
6262--
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Update.hs+1−1
@@ -56,7 +56,7 @@ type GroupsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Group :> Put '[JSON] Group
59+ ReqBody '[JSON] Group :> Put '[JSON] Group
6060
6161-- | Modifies a group. For example, you could change a group\'s title.
6262--
gogol-youtube/gen/Network/Google/Resource/YouTube/Activities/Insert.hs+1−2
@@ -62,8 +62,7 @@ type ActivitiesInsertResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] Activity :>
66− Post '[JSON] Activity
65+ ReqBody '[JSON] Activity :> Post '[JSON] Activity
6766
6867-- | Posts a bulletin for a specific channel. (The user submitting the
6968-- request must be authorized to act on the channel\'s behalf.) Note: Even
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Insert.hs+1−1
@@ -60,7 +60,7 @@ type ChannelSectionsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] ChannelSection :>
63+ ReqBody '[JSON] ChannelSection :>
6464 Post '[JSON] ChannelSection
6565
6666-- | Adds a channelSection for the authenticated user\'s channel.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Update.hs+1−1
@@ -58,7 +58,7 @@ type ChannelSectionsUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] ChannelSection :>
61+ ReqBody '[JSON] ChannelSection :>
6262 Put '[JSON] ChannelSection
6363
6464-- | Update a channelSection.
gogol-youtube/gen/Network/Google/Resource/YouTube/Channels/Update.hs+1−1
@@ -60,7 +60,7 @@ type ChannelsUpdateResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] Channel :> Put '[JSON] Channel
63+ ReqBody '[JSON] Channel :> Put '[JSON] Channel
6464
6565-- | Updates a channel\'s metadata. Note that this method currently only
6666-- supports updates to the channel resource\'s brandingSettings and
gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Insert.hs+1−1
@@ -57,7 +57,7 @@ type CommentThreadsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] CommentThread :>
60+ ReqBody '[JSON] CommentThread :>
6161 Post '[JSON] CommentThread
6262
6363-- | Creates a new top-level comment. To add a reply to an existing comment,
gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Update.hs+1−1
@@ -56,7 +56,7 @@ type CommentThreadsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] CommentThread :>
59+ ReqBody '[JSON] CommentThread :>
6060 Put '[JSON] CommentThread
6161
6262-- | Modifies the top-level comment in a comment thread.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Insert.hs+1−2
@@ -57,8 +57,7 @@ type CommentsInsertResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] Comment :>
61− Post '[JSON] Comment
60+ ReqBody '[JSON] Comment :> Post '[JSON] Comment
6261
6362-- | Creates a reply to an existing comment. Note: To create a top-level
6463-- comment, use the commentThreads.insert method.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Update.hs+1−1
@@ -56,7 +56,7 @@ type CommentsUpdateResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Comment :> Put '[JSON] Comment
59+ ReqBody '[JSON] Comment :> Put '[JSON] Comment
6060
6161-- | Modifies a comment.
6262--
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Insert.hs+1−1
@@ -60,7 +60,7 @@ type LiveBroadcastsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] LiveBroadcast :>
63+ ReqBody '[JSON] LiveBroadcast :>
6464 Post '[JSON] LiveBroadcast
6565
6666-- | Creates a broadcast.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Update.hs+1−1
@@ -61,7 +61,7 @@ type LiveBroadcastsUpdateResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] LiveBroadcast :>
64+ ReqBody '[JSON] LiveBroadcast :>
6565 Put '[JSON] LiveBroadcast
6666
6767-- | Updates a broadcast. For example, you could modify the broadcast
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Insert.hs+1−2
@@ -61,8 +61,7 @@ type LiveStreamsInsertResource =
6161 QueryParam "key" Key :>
6262 QueryParam "oauth_token" OAuthToken :>
6363 QueryParam "alt" AltJSON :>
64− ReqBody '[OctetStream] LiveStream :>
65− Post '[JSON] LiveStream
64+ ReqBody '[JSON] LiveStream :> Post '[JSON] LiveStream
6665
6766-- | Creates a video stream. The stream enables you to send your video to
6867-- YouTube, which can then broadcast the video to your audience.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Update.hs+1−2
@@ -62,8 +62,7 @@ type LiveStreamsUpdateResource =
6262 QueryParam "key" Key :>
6363 QueryParam "oauth_token" OAuthToken :>
6464 QueryParam "alt" AltJSON :>
65− ReqBody '[OctetStream] LiveStream :>
66− Put '[JSON] LiveStream
65+ ReqBody '[JSON] LiveStream :> Put '[JSON] LiveStream
6766
6867-- | Updates a video stream. If the properties that you want to change cannot
6968-- be updated, then you need to create a new stream with the proper
gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/Insert.hs+1−1
@@ -58,7 +58,7 @@ type PlayListItemsInsertResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] PlayListItem :>
61+ ReqBody '[JSON] PlayListItem :>
6262 Post '[JSON] PlayListItem
6363
6464-- | Adds a resource to a playlist.
gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/Update.hs+1−1
@@ -57,7 +57,7 @@ type PlayListItemsUpdateResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] PlayListItem :>
60+ ReqBody '[JSON] PlayListItem :>
6161 Put '[JSON] PlayListItem
6262
6363-- | Modifies a playlist item. For example, you could update the item\'s
gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/Insert.hs+1−2
@@ -60,8 +60,7 @@ type PlayListsInsertResource =
6060 QueryParam "key" Key :>
6161 QueryParam "oauth_token" OAuthToken :>
6262 QueryParam "alt" AltJSON :>
63− ReqBody '[OctetStream] PlayList :>
64− Post '[JSON] PlayList
63+ ReqBody '[JSON] PlayList :> Post '[JSON] PlayList
6564
6665-- | Creates a playlist.
6766--
gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/Update.hs+1−2
@@ -59,8 +59,7 @@ type PlayListsUpdateResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[OctetStream] PlayList :>
63− Put '[JSON] PlayList
62+ ReqBody '[JSON] PlayList :> Put '[JSON] PlayList
6463
6564-- | Modifies a playlist. For example, you could change a playlist\'s title,
6665-- description, or privacy status.
gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/Insert.hs+1−1
@@ -56,7 +56,7 @@ type SubscriptionsInsertResource =
5656 QueryParam "key" Key :>
5757 QueryParam "oauth_token" OAuthToken :>
5858 QueryParam "alt" AltJSON :>
59− ReqBody '[OctetStream] Subscription :>
59+ ReqBody '[JSON] Subscription :>
6060 Post '[JSON] Subscription
6161
6262-- | Adds a subscription for the authenticated user\'s channel.
gogol-youtube/gen/Network/Google/Resource/YouTube/Thumbnails/Set.hs+1−1
@@ -59,7 +59,7 @@ type ThumbnailsSetResource =
5959 QueryParam "key" Key :>
6060 QueryParam "oauth_token" OAuthToken :>
6161 QueryParam "alt" AltJSON :>
62− ReqBody '[JSON] Body :>
62+ ReqBody '[OctetStream] Body :>
6363 Post '[JSON] ThumbnailSetResponse
6464
6565-- | Uploads a custom video thumbnail to YouTube and sets it for a video.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/ReportAbuse.hs+1−2
@@ -57,8 +57,7 @@ type VideosReportAbuseResource =
5757 QueryParam "key" Key :>
5858 QueryParam "oauth_token" OAuthToken :>
5959 QueryParam "alt" AltJSON :>
60− ReqBody '[OctetStream] VideoAbuseReport :>
61− Post '[JSON] ()
60+ ReqBody '[JSON] VideoAbuseReport :> Post '[JSON] ()
6261
6362-- | Report abuse for a video.
6463--
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Update.hs+1−1
@@ -58,7 +58,7 @@ type VideosUpdateResource =
5858 QueryParam "key" Key :>
5959 QueryParam "oauth_token" OAuthToken :>
6060 QueryParam "alt" AltJSON :>
61− ReqBody '[OctetStream] Video :> Put '[JSON] Video
61+ ReqBody '[JSON] Video :> Put '[JSON] Video
6262
6363-- | Updates a video\'s metadata.
6464--