0afdf3b · gogol · git.iko.soy

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs+6−6

compare with develop

unifiedsplit

@@ -50,9 +50,9 @@ type AccountsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Account

57

58-- | Gets one account by ID.

@@ -144,11 +144,11 @@ instance GoogleRequest AccountsGet' where

144 type Rs AccountsGet' = Account

145 request = requestWithRoute defReq adExchangeBuyerURL

146 requestWithRoute r u AccountsGet'{..}

147− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

147+ = go _agId _agQuotaUser (Just _agPrettyPrint)

148+ _agUserIP

149+ _agFields

148 _agKey

150 _agKey

149− _agId

150 _agOAuthToken

151 _agOAuthToken

151− _agFields

152 (Just AltJSON)

153 where go

154 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs+4−4

@@ -48,9 +48,9 @@ type AccountsListResource =

48 QueryParam "quotaUser" Text :>

49 QueryParam "prettyPrint" Bool :>

50 QueryParam "userIp" Text :>

51− QueryParam "key" Key :>

51+ QueryParam "fields" Text :>

52+ QueryParam "key" Key :>

52− QueryParam "oauth_token" OAuthToken :>

53+ QueryParam "oauth_token" OAuthToken :>

53− QueryParam "fields" Text :>

54 QueryParam "alt" AltJSON :> Get '[JSON] AccountsList

55

56-- | Retrieves the authenticated user\'s list of accounts.

@@ -134,9 +134,9 @@ instance GoogleRequest AccountsList' where

134 request = requestWithRoute defReq adExchangeBuyerURL

135 requestWithRoute r u AccountsList'{..}

136 = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

137+ _alFields

137 _alKey

138 _alKey

138 _alOAuthToken

139 _alOAuthToken

139− _alFields

140 (Just AltJSON)

141 where go

142 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs+6−6

@@ -51,9 +51,9 @@ type AccountsPatchResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Account :> Patch '[JSON] Account

59

@@ -156,11 +156,11 @@ instance GoogleRequest AccountsPatch' where

156 type Rs AccountsPatch' = Account

157 request = requestWithRoute defReq adExchangeBuyerURL

158 requestWithRoute r u AccountsPatch'{..}

159− = go _apQuotaUser (Just _apPrettyPrint) _apUserIP

159+ = go _apId _apQuotaUser (Just _apPrettyPrint)

160+ _apUserIP

161+ _apFields

160 _apKey

162 _apKey

161− _apId

162 _apOAuthToken

163 _apOAuthToken

163− _apFields

164 (Just AltJSON)

165 _apAccount

166 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs+6−6

@@ -51,9 +51,9 @@ type AccountsUpdateResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Account :> Put '[JSON] Account

59

@@ -156,11 +156,11 @@ instance GoogleRequest AccountsUpdate' where

156 type Rs AccountsUpdate' = Account

157 request = requestWithRoute defReq adExchangeBuyerURL

158 requestWithRoute r u AccountsUpdate'{..}

159− = go _auQuotaUser (Just _auPrettyPrint) _auUserIP

159+ = go _auId _auQuotaUser (Just _auPrettyPrint)

160+ _auUserIP

161+ _auFields

160 _auKey

162 _auKey

161− _auId

162 _auOAuthToken

163 _auOAuthToken

163− _auFields

164 (Just AltJSON)

165 _auAccount

166 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs+7−6

@@ -50,9 +50,9 @@ type BillingInfoGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] BillingInfo

57

58-- | Returns the billing information for one account specified by account ID.

@@ -148,11 +148,12 @@ instance GoogleRequest BillingInfoGet' where

148 type Rs BillingInfoGet' = BillingInfo

149 request = requestWithRoute defReq adExchangeBuyerURL

150 requestWithRoute r u BillingInfoGet'{..}

151+ = go _bigAccountId _bigQuotaUser

151− = go _bigQuotaUser (Just _bigPrettyPrint) _bigUserIP

152+ (Just _bigPrettyPrint)

152− _bigAccountId

153+ _bigUserIP

154+ _bigFields

153 _bigKey

155 _bigKey

154 _bigOAuthToken

156 _bigOAuthToken

155− _bigFields

156 (Just AltJSON)

157 (Just AltJSON)

157 where go

158 where go

158 = clientWithRoute

159 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs+4−4

@@ -49,9 +49,9 @@ type BillingInfoListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 Get '[JSON] BillingInfoList

57

@@ -140,9 +140,9 @@ instance GoogleRequest BillingInfoList' where

140 request = requestWithRoute defReq adExchangeBuyerURL

141 requestWithRoute r u BillingInfoList'{..}

142 = go _bilQuotaUser (Just _bilPrettyPrint) _bilUserIP

143+ _bilFields

143 _bilKey

144 _bilKey

144 _bilOAuthToken

145 _bilOAuthToken

145− _bilFields

146 (Just AltJSON)

147 where go

148 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs+7−7

@@ -53,9 +53,9 @@ type BudgetGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Budget

60

61-- | Returns the budget information for the adgroup specified by the

@@ -159,12 +159,12 @@ instance GoogleRequest BudgetGet' where

159 type Rs BudgetGet' = Budget

160 request = requestWithRoute defReq adExchangeBuyerURL

161 requestWithRoute r u BudgetGet'{..}

162+ = go _bgAccountId _bgBillingId _bgQuotaUser

162− = go _bgQuotaUser (Just _bgPrettyPrint) _bgUserIP

163+ (Just _bgPrettyPrint)

163− _bgAccountId

164+ _bgUserIP

165+ _bgFields

164 _bgKey

166 _bgKey

165 _bgOAuthToken

167 _bgOAuthToken

166− _bgBillingId

167− _bgFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute (Proxy :: Proxy BudgetGetResource)

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs+7−7

@@ -55,9 +55,9 @@ type BudgetPatchResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Budget :> Patch '[JSON] Budget

63

@@ -172,12 +172,12 @@ instance GoogleRequest BudgetPatch' where

172 type Rs BudgetPatch' = Budget

173 request = requestWithRoute defReq adExchangeBuyerURL

174 requestWithRoute r u BudgetPatch'{..}

175+ = go _bpAccountId _bpBillingId _bpQuotaUser

175− = go _bpQuotaUser (Just _bpPrettyPrint) _bpUserIP

176+ (Just _bpPrettyPrint)

176− _bpAccountId

177+ _bpUserIP

178+ _bpFields

177 _bpKey

179 _bpKey

178 _bpOAuthToken

180 _bpOAuthToken

179− _bpBillingId

180− _bpFields

181 (Just AltJSON)

182 _bpBudget

183 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs+7−7

@@ -54,9 +54,9 @@ type BudgetUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Budget :> Put '[JSON] Budget

62

@@ -170,12 +170,12 @@ instance GoogleRequest BudgetUpdate' where

170 type Rs BudgetUpdate' = Budget

171 request = requestWithRoute defReq adExchangeBuyerURL

172 requestWithRoute r u BudgetUpdate'{..}

173+ = go _buAccountId _buBillingId _buQuotaUser

173− = go _buQuotaUser (Just _buPrettyPrint) _buUserIP

174+ (Just _buPrettyPrint)

174− _buAccountId

175+ _buUserIP

176+ _buFields

175 _buKey

177 _buKey

176 _buOAuthToken

178 _buOAuthToken

177− _buBillingId

178− _buFields

179 (Just AltJSON)

180 _buBudget

181 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Delete.hs+12−11

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48type ClientAccessDeleteResource =

49 "clientAccess" :>

50 Capture "clientAccountId" Int64 :>

51+ QueryParam "sponsorAccountId" Int32 :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

54− QueryParam "sponsorAccountId" Int32 :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60--

@@ -159,12 +159,13 @@ instance GoogleRequest ClientAccessDelete' where

159 type Rs ClientAccessDelete' = ()

160 request = requestWithRoute defReq adExchangeBuyerURL

161 requestWithRoute r u ClientAccessDelete'{..}

162+ = go _cadClientAccountId (Just _cadSponsorAccountId)

163+ _cadQuotaUser

162− = go _cadQuotaUser (Just _cadPrettyPrint) _cadUserIP

164+ (Just _cadPrettyPrint)

163− (Just _cadSponsorAccountId)

165+ _cadUserIP

166+ _cadFields

164 _cadKey

167 _cadKey

165− _cadClientAccountId

166 _cadOAuthToken

168 _cadOAuthToken

167− _cadFields

168 (Just AltJSON)

169 (Just AltJSON)

169 where go

170 where go

170 = clientWithRoute

171 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Get.hs+12−11

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48type ClientAccessGetResource =

49 "clientAccess" :>

50 Capture "clientAccountId" Int64 :>

51+ QueryParam "sponsorAccountId" Int32 :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

54− QueryParam "sponsorAccountId" Int32 :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] ClientAccessCapabilities

60

@@ -160,12 +160,13 @@ instance GoogleRequest ClientAccessGet' where

160 type Rs ClientAccessGet' = ClientAccessCapabilities

161 request = requestWithRoute defReq adExchangeBuyerURL

162 requestWithRoute r u ClientAccessGet'{..}

163+ = go _cagClientAccountId (Just _cagSponsorAccountId)

164+ _cagQuotaUser

163− = go _cagQuotaUser (Just _cagPrettyPrint) _cagUserIP

165+ (Just _cagPrettyPrint)

164− (Just _cagSponsorAccountId)

166+ _cagUserIP

167+ _cagFields

165 _cagKey

168 _cagKey

166− _cagClientAccountId

167 _cagOAuthToken

169 _cagOAuthToken

168− _cagFields

169 (Just AltJSON)

170 (Just AltJSON)

170 where go

171 where go

171 = clientWithRoute

172 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Insert.hs+13−12

@@ -48,14 +48,14 @@ import Network.Google.Prelude

48-- 'ClientAccessInsert'' request conforms to.

49type ClientAccessInsertResource =

50 "clientAccess" :>

51+ QueryParam "clientAccountId" Int64 :>

52+ QueryParam "sponsorAccountId" Int32 :>

51− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

54− QueryParam "sponsorAccountId" Int32 :>

56+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

57+ QueryParam "key" Key :>

56− QueryParam "clientAccountId" Int64 :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] ClientAccessCapabilities :>

61 Post '[JSON] ClientAccessCapabilities

@@ -172,12 +172,13 @@ instance GoogleRequest ClientAccessInsert' where

172 ClientAccessCapabilities

173 request = requestWithRoute defReq adExchangeBuyerURL

174 requestWithRoute r u ClientAccessInsert'{..}

175+ = go _caiClientAccountId _caiSponsorAccountId

176+ _caiQuotaUser

175− = go _caiQuotaUser (Just _caiPrettyPrint) _caiUserIP

177+ (Just _caiPrettyPrint)

176− _caiSponsorAccountId

178+ _caiUserIP

179+ _caiFields

177 _caiKey

180 _caiKey

178− _caiClientAccountId

179 _caiOAuthToken

181 _caiOAuthToken

180− _caiFields

181 (Just AltJSON)

182 (Just AltJSON)

182 _caiClientAccessCapabilities

183 _caiClientAccessCapabilities

183 where go

184 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/List.hs+4−4

@@ -49,9 +49,9 @@ type ClientAccessListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] ListClientAccessCapabilitiesRequest

57 :> Get '[JSON] ListClientAccessCapabilitiesResponse

@@ -152,9 +152,9 @@ instance GoogleRequest ClientAccessList' where

152 request = requestWithRoute defReq adExchangeBuyerURL

153 requestWithRoute r u ClientAccessList'{..}

154 = go _calQuotaUser (Just _calPrettyPrint) _calUserIP

155+ _calFields

155 _calKey

156 _calKey

156 _calOAuthToken

157 _calOAuthToken

157− _calFields

158 (Just AltJSON)

159 _calListClientAccessCapabilitiesRequest

160 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Patch.hs+12−11

@@ -49,13 +49,13 @@ import Network.Google.Prelude

49type ClientAccessPatchResource =

50 "clientAccess" :>

51 Capture "clientAccountId" Int64 :>

52+ QueryParam "sponsorAccountId" Int32 :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

55− QueryParam "sponsorAccountId" Int32 :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] ClientAccessCapabilities :>

61 Patch '[JSON] ClientAccessCapabilities

@@ -173,12 +173,13 @@ instance GoogleRequest ClientAccessPatch' where

173 type Rs ClientAccessPatch' = ClientAccessCapabilities

174 request = requestWithRoute defReq adExchangeBuyerURL

175 requestWithRoute r u ClientAccessPatch'{..}

176+ = go _capClientAccountId (Just _capSponsorAccountId)

177+ _capQuotaUser

176− = go _capQuotaUser (Just _capPrettyPrint) _capUserIP

178+ (Just _capPrettyPrint)

177− (Just _capSponsorAccountId)

179+ _capUserIP

180+ _capFields

178 _capKey

181 _capKey

179− _capClientAccountId

180 _capOAuthToken

182 _capOAuthToken

181− _capFields

182 (Just AltJSON)

183 (Just AltJSON)

183 _capClientAccessCapabilities

184 _capClientAccessCapabilities

184 where go

185 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/ClientAccess/Update.hs+12−11

@@ -49,13 +49,13 @@ import Network.Google.Prelude

49type ClientAccessUpdateResource =

50 "clientAccess" :>

51 Capture "clientAccountId" Int64 :>

52+ QueryParam "sponsorAccountId" Int32 :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

55− QueryParam "sponsorAccountId" Int32 :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] ClientAccessCapabilities :>

61 Put '[JSON] ClientAccessCapabilities

@@ -174,12 +174,13 @@ instance GoogleRequest ClientAccessUpdate' where

174 ClientAccessCapabilities

175 request = requestWithRoute defReq adExchangeBuyerURL

176 requestWithRoute r u ClientAccessUpdate'{..}

177+ = go _cauClientAccountId (Just _cauSponsorAccountId)

178+ _cauQuotaUser

177− = go _cauQuotaUser (Just _cauPrettyPrint) _cauUserIP

179+ (Just _cauPrettyPrint)

178− (Just _cauSponsorAccountId)

180+ _cauUserIP

181+ _cauFields

179 _cauKey

182 _cauKey

180− _cauClientAccountId

181 _cauOAuthToken

183 _cauOAuthToken

182− _cauFields

183 (Just AltJSON)

184 (Just AltJSON)

184 _cauClientAccessCapabilities

185 _cauClientAccessCapabilities

185 where go

186 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs+6−7

@@ -53,9 +53,9 @@ type CreativesGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Creative

60

61-- | Gets the status for a single creative. A creative will be available

@@ -160,13 +160,12 @@ instance GoogleRequest CreativesGet' where

160 type Rs CreativesGet' = Creative

161 request = requestWithRoute defReq adExchangeBuyerURL

162 requestWithRoute r u CreativesGet'{..}

163+ = go _cgAccountId _cgBuyerCreativeId _cgQuotaUser

163− = go _cgQuotaUser (Just _cgPrettyPrint)

164+ (Just _cgPrettyPrint)

164− _cgBuyerCreativeId

165 _cgUserIP

166− _cgAccountId

166+ _cgFields

167 _cgKey

168 _cgOAuthToken

169− _cgFields

170 (Just AltJSON)

169 (Just AltJSON)

171 where go

170 where go

172 = clientWithRoute

171 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs+4−4

@@ -49,9 +49,9 @@ type CreativesInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] Creative :> Post '[JSON] Creative

57

@@ -146,9 +146,9 @@ instance GoogleRequest CreativesInsert' where

146 request = requestWithRoute defReq adExchangeBuyerURL

147 requestWithRoute r u CreativesInsert'{..}

148 = go _ciQuotaUser (Just _ciPrettyPrint) _ciUserIP

149+ _ciFields

149 _ciKey

150 _ciKey

150 _ciOAuthToken

151 _ciOAuthToken

151− _ciFields

152 (Just AltJSON)

153 _ciCreative

154 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs+21−21

@@ -52,22 +52,22 @@ import Network.Google.Prelude

52-- 'CreativesList'' request conforms to.

53type CreativesListResource =

54 "creatives" :>

55− QueryParam "quotaUser" Text :>

55+ QueryParams "accountId" Int32 :>

56− QueryParam "prettyPrint" Bool :>

57− QueryParams "buyerCreativeId" Text :>

56+ QueryParams "buyerCreativeId" Text :>

57+ QueryParam "dealsStatusFilter"

58+ AdexchangebuyerCreativesListDealsStatusFilter

59+ :>

58− QueryParam "userIp" Text :>

60+ QueryParam "maxResults" Word32 :>

59 QueryParam "openAuctionStatusFilter"

61 QueryParam "openAuctionStatusFilter"

60 AdexchangebuyerCreativesListOpenAuctionStatusFilter

62 AdexchangebuyerCreativesListOpenAuctionStatusFilter

61 :>

63 :>

62− QueryParams "accountId" Int32 :>

64+ QueryParam "pageToken" Text :>

63− QueryParam "key" Key :>

65+ QueryParam "quotaUser" Text :>

64− QueryParam "pageToken" Text :>

66+ QueryParam "prettyPrint" Bool :>

65− QueryParam "dealsStatusFilter"

67+ QueryParam "userIp" Text :>

66− AdexchangebuyerCreativesListDealsStatusFilter

68+ QueryParam "fields" Text :>

67− :>

69+ QueryParam "key" Key :>

68− QueryParam "oauth_token" OAuthToken :>

70+ QueryParam "oauth_token" OAuthToken :>

69− QueryParam "maxResults" Word32 :>

70− QueryParam "fields" Text :>

71 QueryParam "alt" AltJSON :>

72 Get '[JSON] CreativesList

73

@@ -215,17 +215,17 @@ instance GoogleRequest CreativesList' where

215 type Rs CreativesList' = CreativesList

216 request = requestWithRoute defReq adExchangeBuyerURL

217 requestWithRoute r u CreativesList'{..}

218− = go _clQuotaUser (Just _clPrettyPrint)

219− _clBuyerCreativeId

220− _clUserIP

221− _clOpenAuctionStatusFilter

222− _clAccountId

218+ = go _clAccountId _clBuyerCreativeId

223− _clKey

224− _clPageToken

225 _clDealsStatusFilter

219 _clDealsStatusFilter

226− _clOAuthToken

227 _clMaxResults

220 _clMaxResults

221+ _clOpenAuctionStatusFilter

222+ _clPageToken

223+ _clQuotaUser

224+ (Just _clPrettyPrint)

225+ _clUserIP

228 _clFields

226 _clFields

227+ _clKey

228+ _clOAuthToken

229 (Just AltJSON)

230 where go

231 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Deals/Get.hs+6−6

@@ -51,9 +51,9 @@ type DealsGetResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON]

59 GetFinalizedNegotiationByExternalDealIdRequest

@@ -161,11 +161,11 @@ instance GoogleRequest DealsGet' where

161 type Rs DealsGet' = NegotiationDto

162 request = requestWithRoute defReq adExchangeBuyerURL

163 requestWithRoute r u DealsGet'{..}

164− = go _dgQuotaUser (Just _dgPrettyPrint) _dgUserIP

164+ = go _dgDealId _dgQuotaUser (Just _dgPrettyPrint)

165− _dgDealId

165+ _dgUserIP

166+ _dgFields

166 _dgKey

167 _dgKey

167 _dgOAuthToken

168 _dgOAuthToken

168− _dgFields

169 (Just AltJSON)

170 _dgGetFinalizedNegotiationByExternalDealIdRequest

171 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Delete.hs+6−6

@@ -53,9 +53,9 @@ type MarketplaceDealsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] DeleteOrderDealsRequest :>

61 Post '[JSON] DeleteOrderDealsResponse

@@ -165,11 +165,11 @@ instance GoogleRequest MarketplaceDealsDelete' where

165 DeleteOrderDealsResponse

166 request = requestWithRoute defReq adExchangeBuyerURL

167 requestWithRoute r u MarketplaceDealsDelete'{..}

168− = go _mddQuotaUser (Just _mddPrettyPrint) _mddUserIP

168+ = go _mddOrderId _mddQuotaUser (Just _mddPrettyPrint)

169+ _mddUserIP

170+ _mddFields

169 _mddKey

171 _mddKey

170 _mddOAuthToken

172 _mddOAuthToken

171− _mddOrderId

172− _mddFields

173 (Just AltJSON)

174 _mddDeleteOrderDealsRequest

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Insert.hs+6−6

@@ -53,9 +53,9 @@ type MarketplaceDealsInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] AddOrderDealsRequest :>

61 Post '[JSON] AddOrderDealsResponse

@@ -165,11 +165,11 @@ instance GoogleRequest MarketplaceDealsInsert' where

165 AddOrderDealsResponse

166 request = requestWithRoute defReq adExchangeBuyerURL

167 requestWithRoute r u MarketplaceDealsInsert'{..}

168− = go _mdiQuotaUser (Just _mdiPrettyPrint) _mdiUserIP

168+ = go _mdiOrderId _mdiQuotaUser (Just _mdiPrettyPrint)

169+ _mdiUserIP

170+ _mdiFields

169 _mdiKey

171 _mdiKey

170 _mdiOAuthToken

172 _mdiOAuthToken

171− _mdiOrderId

172− _mdiFields

173 (Just AltJSON)

174 _mdiAddOrderDealsRequest

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/List.hs+6−6

@@ -51,9 +51,9 @@ type MarketplaceDealsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] GetOrderDealsResponse

59

@@ -150,11 +150,11 @@ instance GoogleRequest MarketplaceDealsList' where

150 type Rs MarketplaceDealsList' = GetOrderDealsResponse

151 request = requestWithRoute defReq adExchangeBuyerURL

152 requestWithRoute r u MarketplaceDealsList'{..}

153− = go _mdlQuotaUser (Just _mdlPrettyPrint) _mdlUserIP

153+ = go _mdlOrderId _mdlQuotaUser (Just _mdlPrettyPrint)

154+ _mdlUserIP

155+ _mdlFields

154 _mdlKey

156 _mdlKey

155 _mdlOAuthToken

157 _mdlOAuthToken

156− _mdlOrderId

157− _mdlFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceDeals/Update.hs+6−6

@@ -53,9 +53,9 @@ type MarketplaceDealsUpdateResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] EditAllOrderDealsRequest :>

61 Post '[JSON] EditAllOrderDealsResponse

@@ -165,11 +165,11 @@ instance GoogleRequest MarketplaceDealsUpdate' where

165 EditAllOrderDealsResponse

166 request = requestWithRoute defReq adExchangeBuyerURL

167 requestWithRoute r u MarketplaceDealsUpdate'{..}

168− = go _mduQuotaUser (Just _mduPrettyPrint) _mduUserIP

168+ = go _mduOrderId _mduQuotaUser (Just _mduPrettyPrint)

169+ _mduUserIP

170+ _mduFields

169 _mduKey

171 _mduKey

170 _mduOAuthToken

172 _mduOAuthToken

171− _mduOrderId

172− _mduFields

173 (Just AltJSON)

174 _mduEditAllOrderDealsRequest

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/Insert.hs+6−6

@@ -53,9 +53,9 @@ type MarketplaceNotesInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] AddOrderNotesRequest :>

61 Post '[JSON] AddOrderNotesResponse

@@ -165,11 +165,11 @@ instance GoogleRequest MarketplaceNotesInsert' where

165 AddOrderNotesResponse

166 request = requestWithRoute defReq adExchangeBuyerURL

167 requestWithRoute r u MarketplaceNotesInsert'{..}

168− = go _mniQuotaUser (Just _mniPrettyPrint) _mniUserIP

168+ = go _mniOrderId _mniQuotaUser (Just _mniPrettyPrint)

169+ _mniUserIP

170+ _mniFields

169 _mniKey

171 _mniKey

170 _mniOAuthToken

172 _mniOAuthToken

171− _mniOrderId

172− _mniFields

173 (Just AltJSON)

174 _mniAddOrderNotesRequest

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceNotes/List.hs+6−6

@@ -51,9 +51,9 @@ type MarketplaceNotesListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] GetOrderNotesResponse

59

@@ -150,11 +150,11 @@ instance GoogleRequest MarketplaceNotesList' where

150 type Rs MarketplaceNotesList' = GetOrderNotesResponse

151 request = requestWithRoute defReq adExchangeBuyerURL

152 requestWithRoute r u MarketplaceNotesList'{..}

153− = go _mnlQuotaUser (Just _mnlPrettyPrint) _mnlUserIP

153+ = go _mnlOrderId _mnlQuotaUser (Just _mnlPrettyPrint)

154+ _mnlUserIP

155+ _mnlFields

154 _mnlKey

156 _mnlKey

155 _mnlOAuthToken

157 _mnlOAuthToken

156− _mnlOrderId

157− _mnlFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOffers/Get.hs+6−6

@@ -50,9 +50,9 @@ type MarketplaceOffersGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 Get '[JSON] MarketplaceOffer

58

@@ -149,11 +149,11 @@ instance GoogleRequest MarketplaceOffersGet' where

149 type Rs MarketplaceOffersGet' = MarketplaceOffer

150 request = requestWithRoute defReq adExchangeBuyerURL

151 requestWithRoute r u MarketplaceOffersGet'{..}

152− = go _mogQuotaUser (Just _mogPrettyPrint) _mogUserIP

152+ = go _mogOfferId _mogQuotaUser (Just _mogPrettyPrint)

153+ _mogUserIP

154+ _mogFields

153 _mogKey

155 _mogKey

154− _mogOfferId

155 _mogOAuthToken

156 _mogOAuthToken

156− _mogFields

157 (Just AltJSON)

158 where go

159 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOffers/Search.hs+11−10

@@ -47,13 +47,13 @@ import Network.Google.Prelude

47type MarketplaceOffersSearchResource =

48 "marketplaceOffers" :>

49 "search" :>

50+ QueryParam "pqlQuery" Text :>

50− QueryParam "quotaUser" Text :>

51+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

52+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

53+ QueryParam "userIp" Text :>

54+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

55+ QueryParam "key" Key :>

54− QueryParam "pqlQuery" Text :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] GetOffersResponse

59

@@ -149,11 +149,12 @@ instance GoogleRequest MarketplaceOffersSearch' where

149 type Rs MarketplaceOffersSearch' = GetOffersResponse

150 request = requestWithRoute defReq adExchangeBuyerURL

151 requestWithRoute r u MarketplaceOffersSearch'{..}

152+ = go _mosPqlQuery _mosQuotaUser

152− = go _mosQuotaUser (Just _mosPrettyPrint) _mosUserIP

153+ (Just _mosPrettyPrint)

154+ _mosUserIP

155+ _mosFields

153 _mosKey

156 _mosKey

154− _mosPqlQuery

155 _mosOAuthToken

157 _mosOAuthToken

156− _mosFields

157 (Just AltJSON)

158 (Just AltJSON)

158 where go

159 where go

159 = clientWithRoute

160 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Get.hs+7−6

@@ -50,9 +50,9 @@ type MarketplaceOrdersGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 Get '[JSON] MarketplaceOrder

58

@@ -144,10 +144,11 @@ instance GoogleRequest MarketplaceOrdersGet' where

144 type Rs MarketplaceOrdersGet' = MarketplaceOrder

145 request = requestWithRoute defReq adExchangeBuyerURL

146 requestWithRoute r u MarketplaceOrdersGet'{..}

147− = go _mQuotaUser (Just _mPrettyPrint) _mUserIP _mKey

147+ = go _mOrderId _mQuotaUser (Just _mPrettyPrint)

148− _mOAuthToken

148+ _mUserIP

149− _mOrderId

150 _mFields

149 _mFields

150+ _mKey

151+ _mOAuthToken

151 (Just AltJSON)

152 (Just AltJSON)

152 where go

153 where go

153 = clientWithRoute

154 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Insert.hs+4−4

@@ -50,9 +50,9 @@ type MarketplaceOrdersInsertResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 ReqBody '[JSON] CreateOrdersRequest :>

58 Post '[JSON] CreateOrdersResponse

@@ -153,9 +153,9 @@ instance GoogleRequest MarketplaceOrdersInsert' where

153 request = requestWithRoute defReq adExchangeBuyerURL

154 requestWithRoute r u MarketplaceOrdersInsert'{..}

155 = go _moiQuotaUser (Just _moiPrettyPrint) _moiUserIP

156+ _moiFields

156 _moiKey

157 _moiKey

157 _moiOAuthToken

158 _moiOAuthToken

158− _moiFields

159 (Just AltJSON)

160 _moiCreateOrdersRequest

161 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Patch.hs+6−7

@@ -57,9 +57,9 @@ type MarketplaceOrdersPatchResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] MarketplaceOrder :>

65 Patch '[JSON] MarketplaceOrder

@@ -193,14 +193,13 @@ instance GoogleRequest MarketplaceOrdersPatch' where

193 type Rs MarketplaceOrdersPatch' = MarketplaceOrder

194 request = requestWithRoute defReq adExchangeBuyerURL

195 requestWithRoute r u MarketplaceOrdersPatch'{..}

196+ = go _mopOrderId _mopRevisionNumber _mopUpdateAction

196− = go _mopQuotaUser _mopUpdateAction

197+ _mopQuotaUser

197 (Just _mopPrettyPrint)

198 (Just _mopPrettyPrint)

198 _mopUserIP

199 _mopUserIP

199− _mopRevisionNumber

200+ _mopFields

200 _mopKey

201 _mopKey

201 _mopOAuthToken

202 _mopOAuthToken

202− _mopOrderId

203− _mopFields

204 (Just AltJSON)

203 (Just AltJSON)

205 _mopMarketplaceOrder

204 _mopMarketplaceOrder

206 where go

205 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Search.hs+11−10

@@ -47,13 +47,13 @@ import Network.Google.Prelude

47type MarketplaceOrdersSearchResource =

48 "marketplaceOrders" :>

49 "search" :>

50+ QueryParam "pqlQuery" Text :>

50− QueryParam "quotaUser" Text :>

51+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

52+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

53+ QueryParam "userIp" Text :>

54+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

55+ QueryParam "key" Key :>

54− QueryParam "pqlQuery" Text :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] GetOrdersResponse

59

@@ -149,11 +149,12 @@ instance GoogleRequest MarketplaceOrdersSearch' where

149 type Rs MarketplaceOrdersSearch' = GetOrdersResponse

150 request = requestWithRoute defReq adExchangeBuyerURL

151 requestWithRoute r u MarketplaceOrdersSearch'{..}

152+ = go _marPqlQuery _marQuotaUser

152− = go _marQuotaUser (Just _marPrettyPrint) _marUserIP

153+ (Just _marPrettyPrint)

154+ _marUserIP

155+ _marFields

153 _marKey

156 _marKey

154− _marPqlQuery

155 _marOAuthToken

157 _marOAuthToken

156− _marFields

157 (Just AltJSON)

158 (Just AltJSON)

158 where go

159 where go

159 = clientWithRoute

160 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/MarketplaceOrders/Update.hs+6−7

@@ -57,9 +57,9 @@ type MarketplaceOrdersUpdateResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] MarketplaceOrder :>

65 Put '[JSON] MarketplaceOrder

@@ -193,14 +193,13 @@ instance GoogleRequest MarketplaceOrdersUpdate' where

193 type Rs MarketplaceOrdersUpdate' = MarketplaceOrder

194 request = requestWithRoute defReq adExchangeBuyerURL

195 requestWithRoute r u MarketplaceOrdersUpdate'{..}

196+ = go _mouOrderId _mouRevisionNumber _mouUpdateAction

196− = go _mouQuotaUser _mouUpdateAction

197+ _mouQuotaUser

197 (Just _mouPrettyPrint)

198 (Just _mouPrettyPrint)

198 _mouUserIP

199 _mouUserIP

199− _mouRevisionNumber

200+ _mouFields

200 _mouKey

201 _mouKey

201 _mouOAuthToken

202 _mouOAuthToken

202− _mouOrderId

203− _mouFields

204 (Just AltJSON)

203 (Just AltJSON)

205 _mouMarketplaceOrder

204 _mouMarketplaceOrder

206 where go

205 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/NegotiationRounds/Insert.hs+7−6

@@ -52,9 +52,9 @@ type NegotiationRoundsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] NegotiationRoundDto :>

60 Post '[JSON] NegotiationRoundDto

@@ -164,11 +164,12 @@ instance GoogleRequest NegotiationRoundsInsert' where

164 NegotiationRoundDto

165 request = requestWithRoute defReq adExchangeBuyerURL

166 requestWithRoute r u NegotiationRoundsInsert'{..}

167+ = go _nriNegotiationId _nriQuotaUser

167− = go _nriQuotaUser (Just _nriPrettyPrint) _nriUserIP

168+ (Just _nriPrettyPrint)

169+ _nriUserIP

170+ _nriFields

168 _nriKey

171 _nriKey

169 _nriOAuthToken

172 _nriOAuthToken

170− _nriNegotiationId

171− _nriFields

172 (Just AltJSON)

173 (Just AltJSON)

173 _nriNegotiationRoundDto

174 _nriNegotiationRoundDto

174 where go

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Get.hs+7−6

@@ -51,9 +51,9 @@ type NegotiationsGetResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] GetNegotiationByIdRequest :>

59 Get '[JSON] NegotiationDto

@@ -159,11 +159,12 @@ instance GoogleRequest NegotiationsGet' where

159 type Rs NegotiationsGet' = NegotiationDto

160 request = requestWithRoute defReq adExchangeBuyerURL

161 requestWithRoute r u NegotiationsGet'{..}

162+ = go _ngNegotiationId _ngQuotaUser

162− = go _ngQuotaUser (Just _ngPrettyPrint) _ngUserIP

163+ (Just _ngPrettyPrint)

164+ _ngUserIP

165+ _ngFields

163 _ngKey

166 _ngKey

164 _ngOAuthToken

167 _ngOAuthToken

165− _ngNegotiationId

166− _ngFields

167 (Just AltJSON)

168 (Just AltJSON)

168 _ngGetNegotiationByIdRequest

169 _ngGetNegotiationByIdRequest

169 where go

170 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Insert.hs+4−4

@@ -49,9 +49,9 @@ type NegotiationsInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] NegotiationDto :>

57 Post '[JSON] NegotiationDto

@@ -148,9 +148,9 @@ instance GoogleRequest NegotiationsInsert' where

148 request = requestWithRoute defReq adExchangeBuyerURL

149 requestWithRoute r u NegotiationsInsert'{..}

150 = go _niQuotaUser (Just _niPrettyPrint) _niUserIP

151+ _niFields

151 _niKey

152 _niKey

152 _niOAuthToken

153 _niOAuthToken

153− _niFields

154 (Just AltJSON)

155 _niNegotiationDto

156 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/List.hs+4−4

@@ -49,9 +49,9 @@ type NegotiationsListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] GetNegotiationsRequest :>

57 Get '[JSON] GetNegotiationsResponse

@@ -148,9 +148,9 @@ instance GoogleRequest NegotiationsList' where

148 request = requestWithRoute defReq adExchangeBuyerURL

149 requestWithRoute r u NegotiationsList'{..}

150 = go _nlQuotaUser (Just _nlPrettyPrint) _nlUserIP

151+ _nlFields

151 _nlKey

152 _nlKey

152 _nlOAuthToken

153 _nlOAuthToken

153− _nlFields

154 (Just AltJSON)

155 _nlGetNegotiationsRequest

156 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/Get.hs+6−6

@@ -50,9 +50,9 @@ type OffersGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] OfferDto

57

58-- | Gets the requested offer.

@@ -144,11 +144,11 @@ instance GoogleRequest OffersGet' where

144 type Rs OffersGet' = OfferDto

145 request = requestWithRoute defReq adExchangeBuyerURL

146 requestWithRoute r u OffersGet'{..}

147− = go _ogQuotaUser (Just _ogPrettyPrint) _ogUserIP

147+ = go _ogOfferId _ogQuotaUser (Just _ogPrettyPrint)

148+ _ogUserIP

149+ _ogFields

148 _ogKey

150 _ogKey

149− _ogOfferId

150 _ogOAuthToken

151 _ogOAuthToken

151− _ogFields

152 (Just AltJSON)

153 where go

154 = clientWithRoute (Proxy :: Proxy OffersGetResource)

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/Insert.hs+4−4

@@ -49,9 +49,9 @@ type OffersInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] OfferDto :> Post '[JSON] OfferDto

57

@@ -146,9 +146,9 @@ instance GoogleRequest OffersInsert' where

146 request = requestWithRoute defReq adExchangeBuyerURL

147 requestWithRoute r u OffersInsert'{..}

148 = go _oiQuotaUser (Just _oiPrettyPrint) _oiUserIP

149+ _oiFields

149 _oiKey

150 _oiKey

150 _oiOAuthToken

151 _oiOAuthToken

151− _oiFields

152 (Just AltJSON)

153 _oiOfferDto

154 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/List.hs+4−4

@@ -49,9 +49,9 @@ type OffersListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] ListOffersRequest :>

57 Get '[JSON] ListOffersResponse

@@ -148,9 +148,9 @@ instance GoogleRequest OffersList' where

148 request = requestWithRoute defReq adExchangeBuyerURL

149 requestWithRoute r u OffersList'{..}

150 = go _olQuotaUser (Just _olPrettyPrint) _olUserIP

151+ _olFields

151 _olKey

152 _olKey

152 _olOAuthToken

153 _olOAuthToken

153− _olFields

154 (Just AltJSON)

155 _olListOffersRequest

156 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs+17−16

@@ -50,17 +50,17 @@ import Network.Google.Prelude

50-- 'PerformanceReportList'' request conforms to.

51type PerformanceReportListResource =

52 "performancereport" :>

53− QueryParam "quotaUser" Text :>

53+ QueryParam "maxResults" Word32 :>

54− QueryParam "prettyPrint" Bool :>

54+ QueryParam "pageToken" Text :>

55− QueryParam "userIp" Text :>

56− QueryParam "accountId" Int64 :>

55+ QueryParam "accountId" Int64 :>

56+ QueryParam "endDateTime" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "startDateTime" Text :>

58− QueryParam "pageToken" Text :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "endDateTime" Text :>

60+ QueryParam "userIp" Text :>

61− QueryParam "maxResults" Word32 :>

61+ QueryParam "fields" Text :>

62− QueryParam "startDateTime" Text :>

62+ QueryParam "key" Key :>

63− QueryParam "fields" Text :>

63+ QueryParam "oauth_token" OAuthToken :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] PerformanceReportList

66

@@ -202,15 +202,16 @@ instance GoogleRequest PerformanceReportList' where

202 PerformanceReportList

203 request = requestWithRoute defReq adExchangeBuyerURL

204 requestWithRoute r u PerformanceReportList'{..}

205− = go _prlQuotaUser (Just _prlPrettyPrint) _prlUserIP

205+ = go _prlMaxResults _prlPageToken

206 (Just _prlAccountId)

207− _prlKey

208− _prlPageToken

209− _prlOAuthToken

210 (Just _prlEndDateTime)

207 (Just _prlEndDateTime)

211− _prlMaxResults

212 (Just _prlStartDateTime)

208 (Just _prlStartDateTime)

209+ _prlQuotaUser

210+ (Just _prlPrettyPrint)

211+ _prlUserIP

213 _prlFields

212 _prlFields

213+ _prlKey

214+ _prlOAuthToken

214 (Just AltJSON)

215 (Just AltJSON)

215 where go

216 where go

216 = clientWithRoute

217 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs+7−7

@@ -52,9 +52,9 @@ type PretargetingConfigDeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60-- | Deletes an existing pretargeting config.

@@ -161,12 +161,12 @@ instance GoogleRequest PretargetingConfigDelete'

161 type Rs PretargetingConfigDelete' = ()

162 request = requestWithRoute defReq adExchangeBuyerURL

163 requestWithRoute r u PretargetingConfigDelete'{..}

164+ = go _pcdAccountId _pcdConfigId _pcdQuotaUser

164− = go _pcdQuotaUser (Just _pcdPrettyPrint) _pcdUserIP

165+ (Just _pcdPrettyPrint)

165− _pcdAccountId

166+ _pcdUserIP

167+ _pcdFields

166 _pcdKey

168 _pcdKey

167− _pcdConfigId

168 _pcdOAuthToken

169 _pcdOAuthToken

169− _pcdFields

170 (Just AltJSON)

171 where go

172 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs+7−7

@@ -52,9 +52,9 @@ type PretargetingConfigGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] PretargetingConfig

60

@@ -161,12 +161,12 @@ instance GoogleRequest PretargetingConfigGet' where

161 type Rs PretargetingConfigGet' = PretargetingConfig

162 request = requestWithRoute defReq adExchangeBuyerURL

163 requestWithRoute r u PretargetingConfigGet'{..}

164+ = go _pcgAccountId _pcgConfigId _pcgQuotaUser

164− = go _pcgQuotaUser (Just _pcgPrettyPrint) _pcgUserIP

165+ (Just _pcgPrettyPrint)

165− _pcgAccountId

166+ _pcgUserIP

167+ _pcgFields

166 _pcgKey

168 _pcgKey

167− _pcgConfigId

168 _pcgOAuthToken

169 _pcgOAuthToken

169− _pcgFields

170 (Just AltJSON)

171 where go

172 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs+7−6

@@ -51,9 +51,9 @@ type PretargetingConfigInsertResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] PretargetingConfig :>

59 Post '[JSON] PretargetingConfig

@@ -164,11 +164,12 @@ instance GoogleRequest PretargetingConfigInsert'

164 PretargetingConfig

165 request = requestWithRoute defReq adExchangeBuyerURL

166 requestWithRoute r u PretargetingConfigInsert'{..}

167+ = go _pciAccountId _pciQuotaUser

167− = go _pciQuotaUser (Just _pciPrettyPrint) _pciUserIP

168+ (Just _pciPrettyPrint)

168− _pciAccountId

169+ _pciUserIP

170+ _pciFields

169 _pciKey

171 _pciKey

170 _pciOAuthToken

172 _pciOAuthToken

171− _pciFields

172 (Just AltJSON)

173 (Just AltJSON)

173 _pciPretargetingConfig

174 _pciPretargetingConfig

174 where go

175 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs+7−6

@@ -51,9 +51,9 @@ type PretargetingConfigListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] PretargetingConfigList

59

@@ -152,11 +152,12 @@ instance GoogleRequest PretargetingConfigList' where

152 PretargetingConfigList

153 request = requestWithRoute defReq adExchangeBuyerURL

154 requestWithRoute r u PretargetingConfigList'{..}

155+ = go _pclAccountId _pclQuotaUser

155− = go _pclQuotaUser (Just _pclPrettyPrint) _pclUserIP

156+ (Just _pclPrettyPrint)

156− _pclAccountId

157+ _pclUserIP

158+ _pclFields

157 _pclKey

159 _pclKey

158 _pclOAuthToken

160 _pclOAuthToken

159− _pclFields

160 (Just AltJSON)

161 (Just AltJSON)

161 where go

162 where go

162 = clientWithRoute

163 = clientWithRoute

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs+7−7

@@ -54,9 +54,9 @@ type PretargetingConfigPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] PretargetingConfig :>

62 Patch '[JSON] PretargetingConfig

@@ -176,12 +176,12 @@ instance GoogleRequest PretargetingConfigPatch' where

176 type Rs PretargetingConfigPatch' = PretargetingConfig

177 request = requestWithRoute defReq adExchangeBuyerURL

178 requestWithRoute r u PretargetingConfigPatch'{..}

179+ = go _pcpAccountId _pcpConfigId _pcpQuotaUser

179− = go _pcpQuotaUser (Just _pcpPrettyPrint) _pcpUserIP

180+ (Just _pcpPrettyPrint)

180− _pcpAccountId

181+ _pcpUserIP

182+ _pcpFields

181 _pcpKey

183 _pcpKey

182− _pcpConfigId

183 _pcpOAuthToken

184 _pcpOAuthToken

184− _pcpFields

185 (Just AltJSON)

186 _pcpPretargetingConfig

187 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs+7−7

@@ -53,9 +53,9 @@ type PretargetingConfigUpdateResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] PretargetingConfig :>

61 Put '[JSON] PretargetingConfig

@@ -176,12 +176,12 @@ instance GoogleRequest PretargetingConfigUpdate'

176 PretargetingConfig

177 request = requestWithRoute defReq adExchangeBuyerURL

178 requestWithRoute r u PretargetingConfigUpdate'{..}

179+ = go _pcuAccountId _pcuConfigId _pcuQuotaUser

179− = go _pcuQuotaUser (Just _pcuPrettyPrint) _pcuUserIP

180+ (Just _pcuPrettyPrint)

180− _pcuAccountId

181+ _pcuUserIP

182+ _pcuFields

181 _pcuKey

183 _pcuKey

182− _pcuConfigId

183 _pcuOAuthToken

184 _pcuOAuthToken

184− _pcuFields

185 (Just AltJSON)

186 _pcuPretargetingConfig

187 where go

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller.hs+2−2

@@ -128,7 +128,7 @@ module Network.Google.AdExchangeSeller

128

129 -- ** URLChannels

130 , URLChannels

131− , uRLChannels

131+ , urlChannels

132 , ucEtag

133 , ucNextPageToken

134 , ucKind

@@ -209,7 +209,7 @@ module Network.Google.AdExchangeSeller

209

210 -- ** URLChannel

211 , URLChannel

212− , uRLChannel

212+ , urlChannel

213 , urlcKind

214 , urlcId

215 , urlcURLPattern

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+2−2

@@ -74,7 +74,7 @@ module Network.Google.AdExchangeSeller.Types

74

75 -- * URLChannels

76 , URLChannels

77− , uRLChannels

77+ , urlChannels

78 , ucEtag

79 , ucNextPageToken

80 , ucKind

@@ -155,7 +155,7 @@ module Network.Google.AdExchangeSeller.Types

155

156 -- * URLChannel

157 , URLChannel

158− , uRLChannel

158+ , urlChannel

159 , urlcKind

160 , urlcId

161 , urlcURLPattern

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs+6−6

@@ -512,7 +512,7 @@ instance ToJSON SavedReport where

512 ("id" .=) <$> _sId])

513

514--

515−-- /See:/ 'uRLChannels' smart constructor.

515+-- /See:/ 'urlChannels' smart constructor.

516data URLChannels = URLChannels

517 { _ucEtag :: !(Maybe Text)

518 , _ucNextPageToken :: !(Maybe Text)

@@ -531,9 +531,9 @@ data URLChannels = URLChannels

531-- * 'ucKind'

532--

533-- * 'ucItems'

534−uRLChannels

534+urlChannels

535 :: URLChannels

536−uRLChannels =

536+urlChannels =

537 URLChannels

538 { _ucEtag = Nothing

539 , _ucNextPageToken = Nothing

@@ -1228,7 +1228,7 @@ instance ToJSON CustomChannel where

1228 ("code" .=) <$> _cCode, ("id" .=) <$> _cId])

1229

1230--

1231−-- /See:/ 'uRLChannel' smart constructor.

1231+-- /See:/ 'urlChannel' smart constructor.

1232data URLChannel = URLChannel

1233 { _urlcKind :: !Text

1234 , _urlcId :: !(Maybe Text)

@@ -1244,9 +1244,9 @@ data URLChannel = URLChannel

1244-- * 'urlcId'

1245--

1246-- * 'urlcURLPattern'

1247−uRLChannel

1247+urlChannel

1248 :: URLChannel

1249−uRLChannel =

1249+urlChannel =

1250 URLChannel

1251 { _urlcKind = "adexchangeseller#urlChannel"

1252 , _urlcId = Nothing

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/AdClients/List.hs+12−13

@@ -50,14 +50,14 @@ type AccountsAdClientsListResource =

50 "accounts" :>

51 Capture "accountId" Text :>

52 "adclients" :>

53+ QueryParam "maxResults" Word32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Word32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] AdClients

62

63-- | List all ad clients in this Ad Exchange account.

@@ -178,14 +178,13 @@ instance GoogleRequest AccountsAdClientsList' where

178 type Rs AccountsAdClientsList' = AdClients

179 request = requestWithRoute defReq adExchangeSellerURL

180 requestWithRoute r u AccountsAdClientsList'{..}

181+ = go _aaclMaxResults _aaclPageToken _aaclAccountId

182+ _aaclQuotaUser

181− = go _aaclQuotaUser (Just _aaclPrettyPrint)

183+ (Just _aaclPrettyPrint)

182 _aaclUserIP

184 _aaclUserIP

183− _aaclAccountId

185+ _aaclFields

184 _aaclKey

186 _aaclKey

185− _aaclPageToken

186 _aaclOAuthToken

187 _aaclOAuthToken

187− _aaclMaxResults

188− _aaclFields

189 (Just AltJSON)

188 (Just AltJSON)

190 where go

189 where go

191 = clientWithRoute

190 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Alerts/List.hs+11−11

@@ -49,13 +49,13 @@ type AccountsAlertsListResource =

49 "accounts" :>

50 Capture "accountId" Text :>

51 "alerts" :>

52+ QueryParam "locale" Text :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

55− QueryParam "locale" Text :>

55+ QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Alerts

60

61-- | List the alerts for this Ad Exchange account.

@@ -162,12 +162,12 @@ instance GoogleRequest AccountsAlertsList' where

162 type Rs AccountsAlertsList' = Alerts

163 request = requestWithRoute defReq adExchangeSellerURL

164 requestWithRoute r u AccountsAlertsList'{..}

165+ = go _aalLocale _aalAccountId _aalQuotaUser

165− = go _aalQuotaUser (Just _aalPrettyPrint) _aalUserIP

166+ (Just _aalPrettyPrint)

166− _aalLocale

167+ _aalUserIP

167− _aalAccountId

168+ _aalFields

168 _aalKey

169 _aalKey

169 _aalOAuthToken

170 _aalOAuthToken

170− _aalFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/CustomChannels/Get.hs+7−7

@@ -56,9 +56,9 @@ type AccountsCustomChannelsGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] CustomChannel

64

@@ -180,14 +180,14 @@ instance GoogleRequest AccountsCustomChannelsGet'

180 type Rs AccountsCustomChannelsGet' = CustomChannel

181 request = requestWithRoute defReq adExchangeSellerURL

182 requestWithRoute r u AccountsCustomChannelsGet'{..}

183− = go _accgQuotaUser (Just _accgPrettyPrint)

183+ = go _accgAccountId _accgAdClientId

184 _accgCustomChannelId

185+ _accgQuotaUser

186+ (Just _accgPrettyPrint)

185 _accgUserIP

187 _accgUserIP

186− _accgAdClientId

188+ _accgFields

187− _accgAccountId

188 _accgKey

189 _accgKey

189 _accgOAuthToken

190 _accgOAuthToken

190− _accgFields

191 (Just AltJSON)

192 where go

193 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/CustomChannels/List.hs+13−14

@@ -54,14 +54,14 @@ type AccountsCustomChannelsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "customchannels" :>

57+ QueryParam "maxResults" Word32 :>

58+ QueryParam "pageToken" Text :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Word32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] CustomChannels

67

@@ -196,15 +196,14 @@ instance GoogleRequest AccountsCustomChannelsList'

196 type Rs AccountsCustomChannelsList' = CustomChannels

197 request = requestWithRoute defReq adExchangeSellerURL

198 requestWithRoute r u AccountsCustomChannelsList'{..}

199− = go _acclQuotaUser (Just _acclPrettyPrint)

199+ = go _acclMaxResults _acclPageToken _acclAccountId

200− _acclUserIP

201 _acclAdClientId

200 _acclAdClientId

202− _acclAccountId

201+ _acclQuotaUser

202+ (Just _acclPrettyPrint)

203+ _acclUserIP

204+ _acclFields

203 _acclKey

205 _acclKey

204− _acclPageToken

205 _acclOAuthToken

206 _acclOAuthToken

206− _acclMaxResults

207− _acclFields

208 (Just AltJSON)

207 (Just AltJSON)

209 where go

208 where go

210 = clientWithRoute

209 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Get.hs+6−6

@@ -50,9 +50,9 @@ type AccountsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Account

57

58-- | Get information about the selected Ad Exchange account.

@@ -145,11 +145,11 @@ instance GoogleRequest AccountsGet' where

145 type Rs AccountsGet' = Account

146 request = requestWithRoute defReq adExchangeSellerURL

147 requestWithRoute r u AccountsGet'{..}

148− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

148+ = go _agAccountId _agQuotaUser (Just _agPrettyPrint)

149− _agAccountId

149+ _agUserIP

150+ _agFields

150 _agKey

151 _agKey

151 _agOAuthToken

152 _agOAuthToken

152− _agFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'AccountsList'' request conforms to.

48type AccountsListResource =

49 "accounts" :>

50+ QueryParam "maxResults" Int32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Int32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Accounts

59

60-- | List all accounts available to this Ad Exchange account.

@@ -158,12 +158,12 @@ instance GoogleRequest AccountsList' where

158 type Rs AccountsList' = Accounts

159 request = requestWithRoute defReq adExchangeSellerURL

160 requestWithRoute r u AccountsList'{..}

161+ = go _alMaxResults _alPageToken _alQuotaUser

161− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

162+ (Just _alPrettyPrint)

163+ _alUserIP

164+ _alFields

162 _alKey

165 _alKey

163− _alPageToken

164 _alOAuthToken

166 _alOAuthToken

165− _alMaxResults

166− _alFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Metadata/Dimensions/List.hs+6−6

@@ -53,9 +53,9 @@ type AccountsMetadataDimensionsListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Metadata

60

61-- | List the metadata for the dimensions available to this AdExchange

@@ -157,12 +157,12 @@ instance GoogleRequest

157 request = requestWithRoute defReq adExchangeSellerURL

158 requestWithRoute r u

159 AccountsMetadataDimensionsList'{..}

160+ = go _amdlAccountId _amdlQuotaUser

160− = go _amdlQuotaUser (Just _amdlPrettyPrint)

161+ (Just _amdlPrettyPrint)

161 _amdlUserIP

162 _amdlUserIP

162− _amdlAccountId

163+ _amdlFields

163 _amdlKey

164 _amdlKey

164 _amdlOAuthToken

165 _amdlOAuthToken

165− _amdlFields

166 (Just AltJSON)

167 where go

168 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Metadata/Metrics/List.hs+6−6

@@ -52,9 +52,9 @@ type AccountsMetadataMetricsListResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Metadata

59

60-- | List the metadata for the metrics available to this AdExchange account.

@@ -154,12 +154,12 @@ instance GoogleRequest AccountsMetadataMetricsList'

154 type Rs AccountsMetadataMetricsList' = Metadata

155 request = requestWithRoute defReq adExchangeSellerURL

156 requestWithRoute r u AccountsMetadataMetricsList'{..}

157+ = go _ammlAccountId _ammlQuotaUser

157− = go _ammlQuotaUser (Just _ammlPrettyPrint)

158+ (Just _ammlPrettyPrint)

158 _ammlUserIP

159 _ammlUserIP

159− _ammlAccountId

160+ _ammlFields

160 _ammlKey

161 _ammlKey

161 _ammlOAuthToken

162 _ammlOAuthToken

162− _ammlFields

163 (Just AltJSON)

164 where go

165 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/PreferredDeals/Get.hs+6−7

@@ -53,9 +53,9 @@ type AccountsPreferredDealsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] PreferredDeal

60

61-- | Get information about the selected Ad Exchange Preferred Deal.

@@ -164,13 +164,12 @@ instance GoogleRequest AccountsPreferredDealsGet'

164 type Rs AccountsPreferredDealsGet' = PreferredDeal

165 request = requestWithRoute defReq adExchangeSellerURL

166 requestWithRoute r u AccountsPreferredDealsGet'{..}

167+ = go _apdgAccountId _apdgDealId _apdgQuotaUser

167− = go _apdgQuotaUser (Just _apdgPrettyPrint)

168+ (Just _apdgPrettyPrint)

168 _apdgUserIP

169 _apdgUserIP

169− _apdgDealId

170+ _apdgFields

170− _apdgAccountId

171 _apdgKey

172 _apdgOAuthToken

173− _apdgFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/PreferredDeals/List.hs+6−6

@@ -51,9 +51,9 @@ type AccountsPreferredDealsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] PreferredDeals

59

@@ -153,12 +153,12 @@ instance GoogleRequest AccountsPreferredDealsList'

153 type Rs AccountsPreferredDealsList' = PreferredDeals

154 request = requestWithRoute defReq adExchangeSellerURL

155 requestWithRoute r u AccountsPreferredDealsList'{..}

156+ = go _apdlAccountId _apdlQuotaUser

156− = go _apdlQuotaUser (Just _apdlPrettyPrint)

157+ (Just _apdlPrettyPrint)

157 _apdlUserIP

158 _apdlUserIP

158− _apdlAccountId

159+ _apdlFields

159 _apdlKey

160 _apdlKey

160 _apdlOAuthToken

161 _apdlOAuthToken

161− _apdlFields

162 (Just AltJSON)

163 where go

164 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Generate.hs+50−50

@@ -59,42 +59,42 @@ type AccountsReportsGenerateResource =

59 "accounts" :>

60 Capture "accountId" Text :>

61 "reports" :>

62− QueryParam "quotaUser" Text :>

62+ QueryParams "dimension" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParams "filter" Text :>

64− QueryParam "userIp" Text :>

64+ QueryParam "locale" Text :>

65− QueryParams "dimension" Text :>

65+ QueryParam "maxResults" Word32 :>

66− QueryParam "locale" Text :>

66+ QueryParams "metric" Text :>

67− QueryParam "endDate" Text :>

67+ QueryParams "sort" Text :>

68− QueryParam "startDate" Text :>

68+ QueryParam "startIndex" Word32 :>

69− QueryParams "metric" Text :>

69+ QueryParam "startDate" Text :>

70− QueryParam "key" Key :>

70+ QueryParam "endDate" Text :>

71− QueryParams "sort" Text :>

71+ QueryParam "quotaUser" Text :>

72− QueryParams "filter" Text :>

72+ QueryParam "prettyPrint" Bool :>

73− QueryParam "oauth_token" OAuthToken :>

73+ QueryParam "userIp" Text :>

74− QueryParam "startIndex" Word32 :>

74+ QueryParam "fields" Text :>

75− QueryParam "maxResults" Word32 :>

75+ QueryParam "key" Key :>

76− QueryParam "fields" Text :>

76+ QueryParam "oauth_token" OAuthToken :>

77 QueryParam "alt" AltJSON :>

78 Get '[JSON] Report

79 :<|>

80 "accounts" :>

81 Capture "accountId" Text :>

82 "reports" :>

83− QueryParam "quotaUser" Text :>

83+ QueryParams "dimension" Text :>

84− QueryParam "prettyPrint" Bool :>

84+ QueryParams "filter" Text :>

85− QueryParam "userIp" Text :>

85+ QueryParam "locale" Text :>

86− QueryParams "dimension" Text :>

86+ QueryParam "maxResults" Word32 :>

87− QueryParam "locale" Text :>

87+ QueryParams "metric" Text :>

88− QueryParam "endDate" Text :>

88+ QueryParams "sort" Text :>

89− QueryParam "startDate" Text :>

89+ QueryParam "startIndex" Word32 :>

90− QueryParams "metric" Text :>

90+ QueryParam "startDate" Text :>

91− QueryParam "key" Key :>

91+ QueryParam "endDate" Text :>

92− QueryParams "sort" Text :>

92+ QueryParam "quotaUser" Text :>

93− QueryParams "filter" Text :>

93+ QueryParam "prettyPrint" Bool :>

94− QueryParam "oauth_token" OAuthToken :>

94+ QueryParam "userIp" Text :>

95− QueryParam "startIndex" Word32 :>

95+ QueryParam "fields" Text :>

96− QueryParam "maxResults" Word32 :>

96+ QueryParam "key" Key :>

97− QueryParam "fields" Text :>

97+ QueryParam "oauth_token" OAuthToken :>

98 QueryParam "alt" Media :>

99 Get '[OctetStream] Stream

100

@@ -281,20 +281,20 @@ instance GoogleRequest AccountsReportsGenerate' where

281 type Rs AccountsReportsGenerate' = Report

282 request = requestWithRoute defReq adExchangeSellerURL

283 requestWithRoute r u AccountsReportsGenerate'{..}

284− = go _argQuotaUser (Just _argPrettyPrint) _argUserIP

285− _argDimension

284+ = go _argDimension _argFilter _argLocale

286− _argLocale

285+ _argMaxResults

287− (Just _argEndDate)

288− (Just _argStartDate)

289− _argAccountId

290 _argMetric

286 _argMetric

291− _argKey

292 _argSort

287 _argSort

293− _argFilter

294− _argOAuthToken

295 _argStartIndex

288 _argStartIndex

296− _argMaxResults

289+ _argAccountId

290+ (Just _argStartDate)

291+ (Just _argEndDate)

292+ _argQuotaUser

293+ (Just _argPrettyPrint)

294+ _argUserIP

297 _argFields

295 _argFields

296+ _argKey

297+ _argOAuthToken

298 (Just AltJSON)

299 where go :<|> _

300 = clientWithRoute

@@ -306,20 +306,20 @@ instance GoogleRequest AccountsReportsGenerate' where

306 type Rs (Download AccountsReportsGenerate') = Stream

307 request = requestWithRoute defReq adExchangeSellerURL

308 requestWithRoute r u AccountsReportsGenerate'{..}

309− = go _argQuotaUser (Just _argPrettyPrint) _argUserIP

310− _argDimension

309+ = go _argDimension _argFilter _argLocale

311− _argLocale

310+ _argMaxResults

312− (Just _argEndDate)

313− (Just _argStartDate)

314− _argAccountId

315 _argMetric

311 _argMetric

316− _argKey

317 _argSort

312 _argSort

318− _argFilter

319− _argOAuthToken

320 _argStartIndex

313 _argStartIndex

321− _argMaxResults

314+ _argAccountId

315+ (Just _argStartDate)

316+ (Just _argEndDate)

317+ _argQuotaUser

318+ (Just _argPrettyPrint)

319+ _argUserIP

322 _argFields

320 _argFields

321+ _argKey

322+ _argOAuthToken

323 (Just Media)

324 where go :<|> _

325 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Saved/Generate.hs+15−16

@@ -54,15 +54,15 @@ type AccountsReportsSavedGenerateResource =

54 Capture "accountId" Text :>

55 "reports" :>

56 Capture "savedReportId" Text :>

57+ QueryParam "locale" Text :>

58+ QueryParam "maxResults" Int32 :>

59+ QueryParam "startIndex" Int32 :>

57− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

60− QueryParam "locale" Text :>

63+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "startIndex" Int32 :>

64− QueryParam "maxResults" Int32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] Report

67

68-- | Generate an Ad Exchange report based on the saved report ID sent in the

@@ -205,16 +205,15 @@ instance GoogleRequest AccountsReportsSavedGenerate'

205 request = requestWithRoute defReq adExchangeSellerURL

206 requestWithRoute r u

207 AccountsReportsSavedGenerate'{..}

208− = go _arsgQuotaUser (Just _arsgPrettyPrint)

209− _arsgUserIP

210− _arsgLocale

208+ = go _arsgLocale _arsgMaxResults _arsgStartIndex

211− _arsgSavedReportId

212 _arsgAccountId

209 _arsgAccountId

210+ _arsgSavedReportId

211+ _arsgQuotaUser

212+ (Just _arsgPrettyPrint)

213+ _arsgUserIP

214+ _arsgFields

213 _arsgKey

215 _arsgKey

214 _arsgOAuthToken

216 _arsgOAuthToken

215− _arsgStartIndex

216− _arsgMaxResults

217− _arsgFields

218 (Just AltJSON)

217 (Just AltJSON)

219 where go

218 where go

220 = clientWithRoute

219 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Saved/List.hs+12−13

@@ -51,14 +51,14 @@ type AccountsReportsSavedListResource =

51 Capture "accountId" Text :>

52 "reports" :>

53 "saved" :>

54+ QueryParam "maxResults" Int32 :>

55+ QueryParam "pageToken" Text :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] SavedReports

64

@@ -181,14 +181,13 @@ instance GoogleRequest AccountsReportsSavedList'

181 type Rs AccountsReportsSavedList' = SavedReports

182 request = requestWithRoute defReq adExchangeSellerURL

183 requestWithRoute r u AccountsReportsSavedList'{..}

184+ = go _arslMaxResults _arslPageToken _arslAccountId

185+ _arslQuotaUser

184− = go _arslQuotaUser (Just _arslPrettyPrint)

186+ (Just _arslPrettyPrint)

185 _arslUserIP

187 _arslUserIP

186− _arslAccountId

188+ _arslFields

187 _arslKey

189 _arslKey

188− _arslPageToken

189 _arslOAuthToken

190 _arslOAuthToken

190− _arslMaxResults

191− _arslFields

192 (Just AltJSON)

191 (Just AltJSON)

193 where go

192 where go

194 = clientWithRoute

193 = clientWithRoute

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/URLChannels/List.hs+13−14

@@ -54,14 +54,14 @@ type AccountsURLChannelsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "urlchannels" :>

57+ QueryParam "maxResults" Word32 :>

58+ QueryParam "pageToken" Text :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Word32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] URLChannels

67

@@ -195,15 +195,14 @@ instance GoogleRequest AccountsURLChannelsList' where

195 type Rs AccountsURLChannelsList' = URLChannels

196 request = requestWithRoute defReq adExchangeSellerURL

197 requestWithRoute r u AccountsURLChannelsList'{..}

198− = go _auclQuotaUser (Just _auclPrettyPrint)

198+ = go _auclMaxResults _auclPageToken _auclAccountId

199− _auclUserIP

200 _auclAdClientId

199 _auclAdClientId

201− _auclAccountId

200+ _auclQuotaUser

201+ (Just _auclPrettyPrint)

202+ _auclUserIP

203+ _auclFields

202 _auclKey

204 _auclKey

203− _auclPageToken

204 _auclOAuthToken

205 _auclOAuthToken

205− _auclMaxResults

206− _auclFields

207 (Just AltJSON)

206 (Just AltJSON)

208 where go

207 where go

209 = clientWithRoute

208 = clientWithRoute

gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Applications/Get.hs+7−6

@@ -50,9 +50,9 @@ type ApplicationsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Application

57

58-- | Retrieves information about an application for the given application ID.

@@ -147,11 +147,12 @@ instance GoogleRequest ApplicationsGet' where

147 request

148 = requestWithRoute defReq adminDataTransferURL

149 requestWithRoute r u ApplicationsGet'{..}

150+ = go _agApplicationId _agQuotaUser

150− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

151+ (Just _agPrettyPrint)

151− _agApplicationId

152+ _agUserIP

153+ _agFields

152 _agKey

154 _agKey

153 _agOAuthToken

155 _agOAuthToken

154− _agFields

155 (Just AltJSON)

156 (Just AltJSON)

156 where go

157 where go

157 = clientWithRoute

158 = clientWithRoute

gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Applications/List.hs+14−14

@@ -48,15 +48,15 @@ import Network.Google.Prelude

48-- 'ApplicationsList'' request conforms to.

49type ApplicationsListResource =

50 "applications" :>

51− QueryParam "quotaUser" Text :>

51+ QueryParam "customerId" Text :>

52+ QueryParam "maxResults" Word32 :>

53+ QueryParam "pageToken" Text :>

54+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

54− QueryParam "customerId" Text :>

57+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

56− QueryParam "pageToken" Text :>

57− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "maxResults" Word32 :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 Get '[JSON] ApplicationsListResponse

62

@@ -168,13 +168,13 @@ instance GoogleRequest ApplicationsList' where

168 request

169 = requestWithRoute defReq adminDataTransferURL

170 requestWithRoute r u ApplicationsList'{..}

171+ = go _alCustomerId _alMaxResults _alPageToken

172+ _alQuotaUser

171− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

173+ (Just _alPrettyPrint)

172− _alCustomerId

174+ _alUserIP

175+ _alFields

173 _alKey

176 _alKey

174− _alPageToken

175 _alOAuthToken

177 _alOAuthToken

176− _alMaxResults

177− _alFields

178 (Just AltJSON)

179 where go

180 = clientWithRoute

gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Transfers/Get.hs+7−6

@@ -50,9 +50,9 @@ type TransfersGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] DataTransfer

57

58-- | Retrieves a data transfer request by its resource ID.

@@ -148,11 +148,12 @@ instance GoogleRequest TransfersGet' where

148 request

149 = requestWithRoute defReq adminDataTransferURL

150 requestWithRoute r u TransfersGet'{..}

151+ = go _tgDataTransferId _tgQuotaUser

151− = go _tgQuotaUser (Just _tgPrettyPrint) _tgUserIP

152+ (Just _tgPrettyPrint)

153+ _tgUserIP

154+ _tgFields

152 _tgKey

155 _tgKey

153 _tgOAuthToken

156 _tgOAuthToken

154− _tgDataTransferId

155− _tgFields

156 (Just AltJSON)

157 (Just AltJSON)

157 where go

158 where go

158 = clientWithRoute

159 = clientWithRoute

gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Transfers/Insert.hs+4−4

@@ -49,9 +49,9 @@ type TransfersInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] DataTransfer :>

57 Post '[JSON] DataTransfer

@@ -149,9 +149,9 @@ instance GoogleRequest TransfersInsert' where

149 = requestWithRoute defReq adminDataTransferURL

150 requestWithRoute r u TransfersInsert'{..}

151 = go _tiQuotaUser (Just _tiPrettyPrint) _tiUserIP

152+ _tiFields

152 _tiKey

153 _tiKey

153 _tiOAuthToken

154 _tiOAuthToken

154− _tiFields

155 (Just AltJSON)

156 _tiDataTransfer

157 where go

gogol-admin-datatransfer/gen/Network/Google/Resource/DataTransfer/Transfers/List.hs+17−17

@@ -52,18 +52,18 @@ import Network.Google.Prelude

52-- 'TransfersList'' request conforms to.

53type TransfersListResource =

54 "transfers" :>

55− QueryParam "status" Text :>

55+ QueryParam "customerId" Text :>

56− QueryParam "quotaUser" Text :>

56+ QueryParam "maxResults" Int32 :>

57− QueryParam "prettyPrint" Bool :>

57+ QueryParam "newOwnerUserId" Text :>

58 QueryParam "oldOwnerUserId" Text :>

59− QueryParam "userIp" Text :>

59+ QueryParam "pageToken" Text :>

60− QueryParam "newOwnerUserId" Text :>

60+ QueryParam "status" Text :>

61− QueryParam "customerId" Text :>

61+ QueryParam "quotaUser" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "prettyPrint" Bool :>

63− QueryParam "pageToken" Text :>

63+ QueryParam "userIp" Text :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "maxResults" Int32 :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Get '[JSON] DataTransfersListResponse

69

@@ -204,16 +204,16 @@ instance GoogleRequest TransfersList' where

204 request

205 = requestWithRoute defReq adminDataTransferURL

206 requestWithRoute r u TransfersList'{..}

207− = go _tlStatus _tlQuotaUser (Just _tlPrettyPrint)

207+ = go _tlCustomerId _tlMaxResults _tlNewOwnerUserId

208 _tlOldOwnerUserId

209+ _tlPageToken

210+ _tlStatus

211+ _tlQuotaUser

212+ (Just _tlPrettyPrint)

209 _tlUserIP

213 _tlUserIP

210− _tlNewOwnerUserId

214+ _tlFields

211− _tlCustomerId

212 _tlKey

215 _tlKey

213− _tlPageToken

214 _tlOAuthToken

216 _tlOAuthToken

215− _tlMaxResults

216− _tlFields

217 (Just AltJSON)

218 where go

219 = clientWithRoute

gogol-admin-directory/gen/Network/Google/AdminDirectory.hs+18−18

@@ -323,13 +323,13 @@ module Network.Google.AdminDirectory

323 -- ** Asp

324 , Asp

325 , asp

326− , aspCreationTime

326+ , aCreationTime

327− , aspEtag

327+ , aEtag

328− , aspCodeId

328+ , aCodeId

329− , aspKind

329+ , aKind

330− , aspName

330+ , aName

331− , aspLastTimeUsed

331+ , aLastTimeUsed

332− , aspUserKey

332+ , aUserKey

333

334 -- ** Schemas

335 , Schemas

@@ -417,9 +417,9 @@ module Network.Google.AdminDirectory

417 -- ** Aliases

418 , Aliases

419 , aliases

420− , aEtag

420+ , aliEtag

421− , aKind

421+ , aliKind

422− , aAliases

422+ , aliAliases

423

424 -- ** Tokens

425 , Tokens

@@ -484,11 +484,11 @@ module Network.Google.AdminDirectory

484 -- ** Alias

485 , Alias

486 , alias

487− , aliEtag

487+ , aaEtag

488− , aliKind

488+ , aaKind

489− , aliAlias

489+ , aaAlias

490− , aliId

490+ , aaId

491− , aliPrimaryEmail

491+ , aaPrimaryEmail

492

493 -- ** DirectoryUsersAliasesWatchEvent

494 , DirectoryUsersAliasesWatchEvent (..)

@@ -773,9 +773,9 @@ module Network.Google.AdminDirectory

773 -- ** Asps

774 , Asps

775 , asps

776− , aaEtag

776+ , aspEtag

777− , aaKind

777+ , aspKind

778− , aaItems

778+ , aspItems

779

780 -- ** ChromeOSDevices

781 , ChromeOSDevices

gogol-admin-directory/gen/Network/Google/AdminDirectory/Types.hs+18−18

@@ -109,13 +109,13 @@ module Network.Google.AdminDirectory.Types

109 -- * Asp

110 , Asp

111 , asp

112− , aspCreationTime

112+ , aCreationTime

113− , aspEtag

113+ , aEtag

114− , aspCodeId

114+ , aCodeId

115− , aspKind

115+ , aKind

116− , aspName

116+ , aName

117− , aspLastTimeUsed

117+ , aLastTimeUsed

118− , aspUserKey

118+ , aUserKey

119

120 -- * Schemas

121 , Schemas

@@ -203,9 +203,9 @@ module Network.Google.AdminDirectory.Types

203 -- * Aliases

204 , Aliases

205 , aliases

206− , aEtag

206+ , aliEtag

207− , aKind

207+ , aliKind

208− , aAliases

208+ , aliAliases

209

210 -- * Tokens

211 , Tokens

@@ -270,11 +270,11 @@ module Network.Google.AdminDirectory.Types

270 -- * Alias

271 , Alias

272 , alias

273− , aliEtag

273+ , aaEtag

274− , aliKind

274+ , aaKind

275− , aliAlias

275+ , aaAlias

276− , aliId

276+ , aaId

277− , aliPrimaryEmail

277+ , aaPrimaryEmail

278

279 -- * DirectoryUsersAliasesWatchEvent

280 , DirectoryUsersAliasesWatchEvent (..)

@@ -559,9 +559,9 @@ module Network.Google.AdminDirectory.Types

559 -- * Asps

560 , Asps

561 , asps

562− , aaEtag

562+ , aspEtag

563− , aaKind

563+ , aspKind

564− , aaItems

564+ , aspItems

565

566 -- * ChromeOSDevices

567 , ChromeOSDevices

gogol-admin-directory/gen/Network/Google/AdminDirectory/Types/Product.hs+111−113

@@ -728,79 +728,77 @@ instance ToJSON ChromeOSDeviceActiveTimeRanges where

728--

729-- /See:/ 'asp' smart constructor.

730data Asp = Asp

731− { _aspCreationTime :: !(Maybe Int64)

731+ { _aCreationTime :: !(Maybe Int64)

732− , _aspEtag :: !(Maybe Text)

732+ , _aEtag :: !(Maybe Text)

733− , _aspCodeId :: !(Maybe Int32)

733+ , _aCodeId :: !(Maybe Int32)

734− , _aspKind :: !Text

734+ , _aKind :: !Text

735− , _aspName :: !(Maybe Text)

735+ , _aName :: !(Maybe Text)

736− , _aspLastTimeUsed :: !(Maybe Int64)

736+ , _aLastTimeUsed :: !(Maybe Int64)

737− , _aspUserKey :: !(Maybe Text)

737+ , _aUserKey :: !(Maybe Text)

738 } deriving (Eq,Read,Show,Data,Typeable,Generic)

739

740-- | Creates a value of 'Asp' with the minimum fields required to make a request.

741--

742-- Use one of the following lenses to modify other fields as desired:

743--

744−-- * 'aspCreationTime'

744+-- * 'aCreationTime'

745--

746−-- * 'aspEtag'

746+-- * 'aEtag'

747--

748−-- * 'aspCodeId'

748+-- * 'aCodeId'

749--

750−-- * 'aspKind'

750+-- * 'aKind'

751--

752−-- * 'aspName'

752+-- * 'aName'

753--

754−-- * 'aspLastTimeUsed'

754+-- * 'aLastTimeUsed'

755--

756−-- * 'aspUserKey'

756+-- * 'aUserKey'

757asp

758 :: Asp

759asp =

760 Asp

761− { _aspCreationTime = Nothing

761+ { _aCreationTime = Nothing

762− , _aspEtag = Nothing

762+ , _aEtag = Nothing

763− , _aspCodeId = Nothing

763+ , _aCodeId = Nothing

764− , _aspKind = "admin#directory#asp"

764+ , _aKind = "admin#directory#asp"

765− , _aspName = Nothing

765+ , _aName = Nothing

766− , _aspLastTimeUsed = Nothing

766+ , _aLastTimeUsed = Nothing

767− , _aspUserKey = Nothing

767+ , _aUserKey = Nothing

768 }

769

770-- | The time when the ASP was created. Expressed in Unix time format.

771−aspCreationTime :: Lens' Asp (Maybe Int64)

771+aCreationTime :: Lens' Asp (Maybe Int64)

772−aspCreationTime

772+aCreationTime

773− = lens _aspCreationTime

773+ = lens _aCreationTime

774− (\ s a -> s{_aspCreationTime = a})

774+ (\ s a -> s{_aCreationTime = a})

775

776-- | ETag of the ASP.

777−aspEtag :: Lens' Asp (Maybe Text)

777+aEtag :: Lens' Asp (Maybe Text)

778−aspEtag = lens _aspEtag (\ s a -> s{_aspEtag = a})

778+aEtag = lens _aEtag (\ s a -> s{_aEtag = a})

779

780-- | The unique ID of the ASP.

781−aspCodeId :: Lens' Asp (Maybe Int32)

781+aCodeId :: Lens' Asp (Maybe Int32)

782−aspCodeId

782+aCodeId = lens _aCodeId (\ s a -> s{_aCodeId = a})

783− = lens _aspCodeId (\ s a -> s{_aspCodeId = a})

784

783

785-- | The type of the API resource. This is always admin#directory#asp.

784-- | The type of the API resource. This is always admin#directory#asp.

786−aspKind :: Lens' Asp Text

785+aKind :: Lens' Asp Text

787−aspKind = lens _aspKind (\ s a -> s{_aspKind = a})

786+aKind = lens _aKind (\ s a -> s{_aKind = a})

788

787

789-- | The name of the application that the user, represented by their userId,

788-- | The name of the application that the user, represented by their userId,

790-- entered when the ASP was created.

789-- entered when the ASP was created.

791−aspName :: Lens' Asp (Maybe Text)

790+aName :: Lens' Asp (Maybe Text)

792−aspName = lens _aspName (\ s a -> s{_aspName = a})

791+aName = lens _aName (\ s a -> s{_aName = a})

793

792

794-- | The time when the ASP was last used. Expressed in Unix time format.

793-- | The time when the ASP was last used. Expressed in Unix time format.

795−aspLastTimeUsed :: Lens' Asp (Maybe Int64)

794+aLastTimeUsed :: Lens' Asp (Maybe Int64)

796−aspLastTimeUsed

795+aLastTimeUsed

797− = lens _aspLastTimeUsed

796+ = lens _aLastTimeUsed

798− (\ s a -> s{_aspLastTimeUsed = a})

797+ (\ s a -> s{_aLastTimeUsed = a})

799

798

800-- | The unique ID of the user who issued the ASP.

799-- | The unique ID of the user who issued the ASP.

801−aspUserKey :: Lens' Asp (Maybe Text)

800+aUserKey :: Lens' Asp (Maybe Text)

802−aspUserKey

801+aUserKey = lens _aUserKey (\ s a -> s{_aUserKey = a})

803− = lens _aspUserKey (\ s a -> s{_aspUserKey = a})

804

802

805instance FromJSON Asp where

803instance FromJSON Asp where

806 parseJSON

804 parseJSON

@@ -818,12 +816,11 @@ instance ToJSON Asp where

818 toJSON Asp{..}

816 toJSON Asp{..}

819 = object

817 = object

820 (catMaybes

818 (catMaybes

821− [("creationTime" .=) <$> _aspCreationTime,

819+ [("creationTime" .=) <$> _aCreationTime,

822− ("etag" .=) <$> _aspEtag,

820+ ("etag" .=) <$> _aEtag, ("codeId" .=) <$> _aCodeId,

823− ("codeId" .=) <$> _aspCodeId,

824− Just ("kind" .= _aspKind), ("name" .=) <$> _aspName,

821+ Just ("kind" .= _aKind), ("name" .=) <$> _aName,

825− ("lastTimeUsed" .=) <$> _aspLastTimeUsed,

822+ ("lastTimeUsed" .=) <$> _aLastTimeUsed,

826− ("userKey" .=) <$> _aspUserKey])

823+ ("userKey" .=) <$> _aUserKey])

827

824

828-- | JSON response template for List Schema operation in Directory API.

825-- | JSON response template for List Schema operation in Directory API.

829--

826--

@@ -1511,41 +1508,41 @@ instance ToJSON UserCustomSchemas where

1511--

1508--

1512-- /See:/ 'aliases' smart constructor.

1509-- /See:/ 'aliases' smart constructor.

1513data Aliases = Aliases

1510data Aliases = Aliases

1514− { _aEtag :: !(Maybe Text)

1511+ { _aliEtag :: !(Maybe Text)

1515− , _aKind :: !Text

1512+ , _aliKind :: !Text

1516− , _aAliases :: !(Maybe [Alias])

1513+ , _aliAliases :: !(Maybe [Alias])

1517 } deriving (Eq,Read,Show,Data,Typeable,Generic)

1514 } deriving (Eq,Read,Show,Data,Typeable,Generic)

1518

1515

1519-- | Creates a value of 'Aliases' with the minimum fields required to make a request.

1516-- | Creates a value of 'Aliases' with the minimum fields required to make a request.

1520--

1517--

1521-- Use one of the following lenses to modify other fields as desired:

1518-- Use one of the following lenses to modify other fields as desired:

1522--

1519--

1523−-- * 'aEtag'

1520+-- * 'aliEtag'

1524--

1521--

1525−-- * 'aKind'

1522+-- * 'aliKind'

1526--

1523--

1527−-- * 'aAliases'

1524+-- * 'aliAliases'

1528aliases

1525aliases

1529 :: Aliases

1526 :: Aliases

1530aliases =

1527aliases =

1531 Aliases

1528 Aliases

1532− { _aEtag = Nothing

1529+ { _aliEtag = Nothing

1533− , _aKind = "admin#directory#aliases"

1530+ , _aliKind = "admin#directory#aliases"

1534− , _aAliases = Nothing

1531+ , _aliAliases = Nothing

1535 }

1532 }

1536

1533

1537-- | ETag of the resource.

1534-- | ETag of the resource.

1538−aEtag :: Lens' Aliases (Maybe Text)

1535+aliEtag :: Lens' Aliases (Maybe Text)

1539−aEtag = lens _aEtag (\ s a -> s{_aEtag = a})

1536+aliEtag = lens _aliEtag (\ s a -> s{_aliEtag = a})

1540

1537

1541-- | Kind of resource this is.

1538-- | Kind of resource this is.

1542−aKind :: Lens' Aliases Text

1539+aliKind :: Lens' Aliases Text

1543−aKind = lens _aKind (\ s a -> s{_aKind = a})

1540+aliKind = lens _aliKind (\ s a -> s{_aliKind = a})

1544

1541

1545-- | List of alias objects.

1542-- | List of alias objects.

1546−aAliases :: Lens' Aliases [Alias]

1543+aliAliases :: Lens' Aliases [Alias]

1547−aAliases

1544+aliAliases

1548− = lens _aAliases (\ s a -> s{_aAliases = a}) .

1545+ = lens _aliAliases (\ s a -> s{_aliAliases = a}) .

1549 _Default

1546 _Default

1550 . _Coerce

1547 . _Coerce

1551

1548

@@ -1562,8 +1559,8 @@ instance ToJSON Aliases where

1562 toJSON Aliases{..}

1559 toJSON Aliases{..}

1563 = object

1560 = object

1564 (catMaybes

1561 (catMaybes

1565− [("etag" .=) <$> _aEtag, Just ("kind" .= _aKind),

1562+ [("etag" .=) <$> _aliEtag, Just ("kind" .= _aliKind),

1566− ("aliases" .=) <$> _aAliases])

1563+ ("aliases" .=) <$> _aliAliases])

1567

1564

1568-- | JSON response template for List tokens operation in Directory API.

1565-- | JSON response template for List tokens operation in Directory API.

1569--

1566--

@@ -2096,58 +2093,58 @@ instance ToJSON Channel where

2096--

2093--

2097-- /See:/ 'alias' smart constructor.

2094-- /See:/ 'alias' smart constructor.

2098data Alias = Alias

2095data Alias = Alias

2099− { _aliEtag :: !(Maybe Text)

2096+ { _aaEtag :: !(Maybe Text)

2100− , _aliKind :: !Text

2097+ , _aaKind :: !Text

2101− , _aliAlias :: !(Maybe Text)

2098+ , _aaAlias :: !(Maybe Text)

2102− , _aliId :: !(Maybe Text)

2099+ , _aaId :: !(Maybe Text)

2103− , _aliPrimaryEmail :: !(Maybe Text)

2100+ , _aaPrimaryEmail :: !(Maybe Text)

2104 } deriving (Eq,Read,Show,Data,Typeable,Generic)

2101 } deriving (Eq,Read,Show,Data,Typeable,Generic)

2105

2102

2106-- | Creates a value of 'Alias' with the minimum fields required to make a request.

2103-- | Creates a value of 'Alias' with the minimum fields required to make a request.

2107--

2104--

2108-- Use one of the following lenses to modify other fields as desired:

2105-- Use one of the following lenses to modify other fields as desired:

2109--

2106--

2110−-- * 'aliEtag'

2107+-- * 'aaEtag'

2111--

2108--

2112−-- * 'aliKind'

2109+-- * 'aaKind'

2113--

2110--

2114−-- * 'aliAlias'

2111+-- * 'aaAlias'

2115--

2112--

2116−-- * 'aliId'

2113+-- * 'aaId'

2117--

2114--

2118−-- * 'aliPrimaryEmail'

2115+-- * 'aaPrimaryEmail'

2119alias

2116alias

2120 :: Alias

2117 :: Alias

2121alias =

2118alias =

2122 Alias

2119 Alias

2123− { _aliEtag = Nothing

2120+ { _aaEtag = Nothing

2124− , _aliKind = "admin#directory#alias"

2121+ , _aaKind = "admin#directory#alias"

2125− , _aliAlias = Nothing

2122+ , _aaAlias = Nothing

2126− , _aliId = Nothing

2123+ , _aaId = Nothing

2127− , _aliPrimaryEmail = Nothing

2124+ , _aaPrimaryEmail = Nothing

2128 }

2125 }

2129

2126

2130-- | ETag of the resource.

2127-- | ETag of the resource.

2131−aliEtag :: Lens' Alias (Maybe Text)

2128+aaEtag :: Lens' Alias (Maybe Text)

2132−aliEtag = lens _aliEtag (\ s a -> s{_aliEtag = a})

2129+aaEtag = lens _aaEtag (\ s a -> s{_aaEtag = a})

2133

2130

2134-- | Kind of resource this is.

2131-- | Kind of resource this is.

2135−aliKind :: Lens' Alias Text

2132+aaKind :: Lens' Alias Text

2136−aliKind = lens _aliKind (\ s a -> s{_aliKind = a})

2133+aaKind = lens _aaKind (\ s a -> s{_aaKind = a})

2137

2134

2138-- | A alias email

2135-- | A alias email

2139−aliAlias :: Lens' Alias (Maybe Text)

2136+aaAlias :: Lens' Alias (Maybe Text)

2140−aliAlias = lens _aliAlias (\ s a -> s{_aliAlias = a})

2137+aaAlias = lens _aaAlias (\ s a -> s{_aaAlias = a})

2141

2138

2142-- | Unique id of the group (Read-only) Unique id of the user (Read-only)

2139-- | Unique id of the group (Read-only) Unique id of the user (Read-only)

2143−aliId :: Lens' Alias (Maybe Text)

2140+aaId :: Lens' Alias (Maybe Text)

2144−aliId = lens _aliId (\ s a -> s{_aliId = a})

2141+aaId = lens _aaId (\ s a -> s{_aaId = a})

2145

2142

2146-- | Group\'s primary email (Read-only) User\'s primary email (Read-only)

2143-- | Group\'s primary email (Read-only) User\'s primary email (Read-only)

2147−aliPrimaryEmail :: Lens' Alias (Maybe Text)

2144+aaPrimaryEmail :: Lens' Alias (Maybe Text)

2148−aliPrimaryEmail

2145+aaPrimaryEmail

2149− = lens _aliPrimaryEmail

2146+ = lens _aaPrimaryEmail

2150− (\ s a -> s{_aliPrimaryEmail = a})

2147+ (\ s a -> s{_aaPrimaryEmail = a})

2151

2148

2152instance FromJSON Alias where

2149instance FromJSON Alias where

2153 parseJSON

2150 parseJSON

@@ -2164,9 +2161,9 @@ instance ToJSON Alias where

2164 toJSON Alias{..}

2161 toJSON Alias{..}

2165 = object

2162 = object

2166 (catMaybes

2163 (catMaybes

2167− [("etag" .=) <$> _aliEtag, Just ("kind" .= _aliKind),

2164+ [("etag" .=) <$> _aaEtag, Just ("kind" .= _aaKind),

2168− ("alias" .=) <$> _aliAlias, ("id" .=) <$> _aliId,

2165+ ("alias" .=) <$> _aaAlias, ("id" .=) <$> _aaId,

2169− ("primaryEmail" .=) <$> _aliPrimaryEmail])

2166+ ("primaryEmail" .=) <$> _aaPrimaryEmail])

2170

2167

2171-- | JSON template for name of a user in Directory API.

2168-- | JSON template for name of a user in Directory API.

2172--

2169--

@@ -4331,41 +4328,42 @@ instance ToJSON UserExternalId where

4331--

4328--

4332-- /See:/ 'asps' smart constructor.

4329-- /See:/ 'asps' smart constructor.

4333data Asps = Asps

4330data Asps = Asps

4334− { _aaEtag :: !(Maybe Text)

4331+ { _aspEtag :: !(Maybe Text)

4335− , _aaKind :: !Text

4332+ , _aspKind :: !Text

4336− , _aaItems :: !(Maybe [Asp])

4333+ , _aspItems :: !(Maybe [Asp])

4337 } deriving (Eq,Read,Show,Data,Typeable,Generic)

4334 } deriving (Eq,Read,Show,Data,Typeable,Generic)

4338

4335

4339-- | Creates a value of 'Asps' with the minimum fields required to make a request.

4336-- | Creates a value of 'Asps' with the minimum fields required to make a request.

4340--

4337--

4341-- Use one of the following lenses to modify other fields as desired:

4338-- Use one of the following lenses to modify other fields as desired:

4342--

4339--

4343−-- * 'aaEtag'

4340+-- * 'aspEtag'

4344--

4341--

4345−-- * 'aaKind'

4342+-- * 'aspKind'

4346--

4343--

4347−-- * 'aaItems'

4344+-- * 'aspItems'

4348asps

4345asps

4349 :: Asps

4346 :: Asps

4350asps =

4347asps =

4351 Asps

4348 Asps

4352− { _aaEtag = Nothing

4349+ { _aspEtag = Nothing

4353− , _aaKind = "admin#directory#aspList"

4350+ , _aspKind = "admin#directory#aspList"

4354− , _aaItems = Nothing

4351+ , _aspItems = Nothing

4355 }

4352 }

4356

4353

4357-- | ETag of the resource.

4354-- | ETag of the resource.

4358−aaEtag :: Lens' Asps (Maybe Text)

4355+aspEtag :: Lens' Asps (Maybe Text)

4359−aaEtag = lens _aaEtag (\ s a -> s{_aaEtag = a})

4356+aspEtag = lens _aspEtag (\ s a -> s{_aspEtag = a})

4360

4357

4361-- | The type of the API resource. This is always admin#directory#aspList.

4358-- | The type of the API resource. This is always admin#directory#aspList.

4362−aaKind :: Lens' Asps Text

4359+aspKind :: Lens' Asps Text

4363−aaKind = lens _aaKind (\ s a -> s{_aaKind = a})

4360+aspKind = lens _aspKind (\ s a -> s{_aspKind = a})

4364

4361

4365-- | A list of ASP resources.

4362-- | A list of ASP resources.

4366−aaItems :: Lens' Asps [Asp]

4363+aspItems :: Lens' Asps [Asp]

4367−aaItems

4364+aspItems

4365+ = lens _aspItems (\ s a -> s{_aspItems = a}) .

4368− = lens _aaItems (\ s a -> s{_aaItems = a}) . _Default

4366+ _Default

4369 . _Coerce

4367 . _Coerce

4370

4368

4371instance FromJSON Asps where

4369instance FromJSON Asps where

@@ -4381,8 +4379,8 @@ instance ToJSON Asps where

4381 toJSON Asps{..}

4379 toJSON Asps{..}

4382 = object

4380 = object

4383 (catMaybes

4381 (catMaybes

4384− [("etag" .=) <$> _aaEtag, Just ("kind" .= _aaKind),

4382+ [("etag" .=) <$> _aspEtag, Just ("kind" .= _aspKind),

4385− ("items" .=) <$> _aaItems])

4383+ ("items" .=) <$> _aspItems])

4386

4384

4387-- | JSON response template for List Chrome OS Devices operation in Directory

4385-- | JSON response template for List Chrome OS Devices operation in Directory

4388-- API.

4386-- API.

gogol-admin-directory/gen/Network/Google/Resource/Admin/Channels/Stop.hs+4−4

@@ -52,9 +52,9 @@ type ChannelsStopResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Channel :> Post '[JSON] ()

60

@@ -149,9 +149,9 @@ instance GoogleRequest ChannelsStop' where

149 request = requestWithRoute defReq adminDirectoryURL

150 requestWithRoute r u ChannelsStop'{..}

151 = go _csQuotaUser (Just _csPrettyPrint) _csUserIP

152+ _csFields

152 _csKey

153 _csKey

153 _csOAuthToken

154 _csOAuthToken

154− _csFields

155 (Just AltJSON)

156 _csChannel

157 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/Delete.hs+6−6

@@ -53,9 +53,9 @@ type AspsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Delete an ASP issued by a user.

@@ -158,12 +158,12 @@ instance GoogleRequest AspsDelete' where

158 type Rs AspsDelete' = ()

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u AspsDelete'{..}

161+ = go _adUserKey _adCodeId _adQuotaUser

161− = go _adQuotaUser (Just _adPrettyPrint) _adCodeId

162+ (Just _adPrettyPrint)

162 _adUserIP

163 _adUserIP

164+ _adFields

163 _adKey

165 _adKey

164 _adOAuthToken

166 _adOAuthToken

165− _adUserKey

166− _adFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute (Proxy :: Proxy AspsDeleteResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/Get.hs+6−6

@@ -53,9 +53,9 @@ type AspsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Asp

60

61-- | Get information about an ASP issued by a user.

@@ -158,12 +158,12 @@ instance GoogleRequest AspsGet' where

158 type Rs AspsGet' = Asp

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u AspsGet'{..}

161+ = go _agUserKey _agCodeId _agQuotaUser

161− = go _agQuotaUser (Just _agPrettyPrint) _agCodeId

162+ (Just _agPrettyPrint)

162 _agUserIP

163 _agUserIP

164+ _agFields

163 _agKey

165 _agKey

164 _agOAuthToken

166 _agOAuthToken

165− _agUserKey

166− _agFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute (Proxy :: Proxy AspsGetResource) r

gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/List.hs+6−6

@@ -51,9 +51,9 @@ type AspsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Asps

58

59-- | List the ASPs issued by a user.

@@ -147,11 +147,11 @@ instance GoogleRequest AspsList' where

147 type Rs AspsList' = Asps

148 request = requestWithRoute defReq adminDirectoryURL

149 requestWithRoute r u AspsList'{..}

150− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

150+ = go _alUserKey _alQuotaUser (Just _alPrettyPrint)

151+ _alUserIP

152+ _alFields

151 _alKey

153 _alKey

152 _alOAuthToken

154 _alOAuthToken

153− _alUserKey

154− _alFields

155 (Just AltJSON)

156 where go

157 = clientWithRoute (Proxy :: Proxy AspsListResource) r

gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Get.hs+14−14

@@ -52,15 +52,15 @@ type ChromeosDevicesGetResource =

52 "devices" :>

53 "chromeos" :>

54 Capture "deviceId" Text :>

55+ QueryParam "projection"

56+ DirectoryChromeosDevicesGetProjection

57+ :>

55− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

59− QueryParam "projection"

60− DirectoryChromeosDevicesGetProjection

61− :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] ChromeOSDevice

66

@@ -178,13 +178,13 @@ instance GoogleRequest ChromeosDevicesGet' where

178 type Rs ChromeosDevicesGet' = ChromeOSDevice

179 request = requestWithRoute defReq adminDirectoryURL

180 requestWithRoute r u ChromeosDevicesGet'{..}

181+ = go _cdgProjection _cdgCustomerId _cdgDeviceId

182+ _cdgQuotaUser

181− = go _cdgQuotaUser (Just _cdgPrettyPrint) _cdgUserIP

183+ (Just _cdgPrettyPrint)

182− _cdgCustomerId

184+ _cdgUserIP

185+ _cdgFields

183 _cdgKey

186 _cdgKey

184− _cdgDeviceId

185− _cdgProjection

186 _cdgOAuthToken

187 _cdgOAuthToken

187− _cdgFields

188 (Just AltJSON)

189 where go

190 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/List.hs+26−26

@@ -55,24 +55,24 @@ type ChromeosDevicesListResource =

55 Capture "customerId" Text :>

56 "devices" :>

57 "chromeos" :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "maxResults" Int32 :>

59− QueryParam "prettyPrint" Bool :>

59+ QueryParam "orderBy"

60− QueryParam "orderBy"

61− DirectoryChromeosDevicesListOrderBy

60+ DirectoryChromeosDevicesListOrderBy

61+ :>

62+ QueryParam "pageToken" Text :>

63+ QueryParam "projection"

64+ DirectoryChromeosDevicesListProjection

62− :>

65+ :>

63− QueryParam "userIp" Text :>

66+ QueryParam "query" Text :>

64− QueryParam "sortOrder"

67+ QueryParam "sortOrder"

65− DirectoryChromeosDevicesListSortOrder

68+ DirectoryChromeosDevicesListSortOrder

66− :>

69+ :>

70+ QueryParam "quotaUser" Text :>

71+ QueryParam "prettyPrint" Bool :>

72+ QueryParam "userIp" Text :>

73+ QueryParam "fields" Text :>

67− QueryParam "key" Key :>

74+ QueryParam "key" Key :>

68− QueryParam "query" Text :>

69− QueryParam "projection"

70− DirectoryChromeosDevicesListProjection

71− :>

72− QueryParam "pageToken" Text :>

73− QueryParam "oauth_token" OAuthToken :>

75+ QueryParam "oauth_token" OAuthToken :>

74− QueryParam "maxResults" Int32 :>

75− QueryParam "fields" Text :>

76 QueryParam "alt" AltJSON :>

77 Get '[JSON] ChromeOSDevices

78

@@ -227,17 +227,17 @@ instance GoogleRequest ChromeosDevicesList' where

227 type Rs ChromeosDevicesList' = ChromeOSDevices

228 request = requestWithRoute defReq adminDirectoryURL

229 requestWithRoute r u ChromeosDevicesList'{..}

230− = go _cdlQuotaUser (Just _cdlPrettyPrint) _cdlOrderBy

230+ = go _cdlMaxResults _cdlOrderBy _cdlPageToken

231− _cdlUserIP

231+ _cdlProjection

232− _cdlCustomerId

232+ _cdlQuery

233 _cdlSortOrder

234+ _cdlCustomerId

235+ _cdlQuotaUser

236+ (Just _cdlPrettyPrint)

237+ _cdlUserIP

238+ _cdlFields

234 _cdlKey

239 _cdlKey

235− _cdlQuery

236− _cdlProjection

237− _cdlPageToken

238 _cdlOAuthToken

240 _cdlOAuthToken

239− _cdlMaxResults

240− _cdlFields

241 (Just AltJSON)

242 where go

243 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Patch.hs+14−14

@@ -53,15 +53,15 @@ type ChromeosDevicesPatchResource =

53 "devices" :>

54 "chromeos" :>

55 Capture "deviceId" Text :>

56+ QueryParam "projection"

57+ DirectoryChromeosDevicesPatchProjection

58+ :>

56− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

60− QueryParam "projection"

61− DirectoryChromeosDevicesPatchProjection

62− :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] ChromeOSDevice :>

67 Patch '[JSON] ChromeOSDevice

@@ -191,13 +191,13 @@ instance GoogleRequest ChromeosDevicesPatch' where

191 type Rs ChromeosDevicesPatch' = ChromeOSDevice

192 request = requestWithRoute defReq adminDirectoryURL

193 requestWithRoute r u ChromeosDevicesPatch'{..}

194+ = go _cdpProjection _cdpCustomerId _cdpDeviceId

195+ _cdpQuotaUser

194− = go _cdpQuotaUser (Just _cdpPrettyPrint) _cdpUserIP

196+ (Just _cdpPrettyPrint)

195− _cdpCustomerId

197+ _cdpUserIP

198+ _cdpFields

196 _cdpKey

199 _cdpKey

197− _cdpDeviceId

198− _cdpProjection

199 _cdpOAuthToken

200 _cdpOAuthToken

200− _cdpFields

201 (Just AltJSON)

202 _cdpChromeOSDevice

203 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/ChromeosDevices/Update.hs+14−14

@@ -53,15 +53,15 @@ type ChromeosDevicesUpdateResource =

53 "devices" :>

54 "chromeos" :>

55 Capture "deviceId" Text :>

56+ QueryParam "projection"

57+ DirectoryChromeosDevicesUpdateProjection

58+ :>

56− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

60− QueryParam "projection"

61− DirectoryChromeosDevicesUpdateProjection

62− :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] ChromeOSDevice :>

67 Put '[JSON] ChromeOSDevice

@@ -191,13 +191,13 @@ instance GoogleRequest ChromeosDevicesUpdate' where

191 type Rs ChromeosDevicesUpdate' = ChromeOSDevice

192 request = requestWithRoute defReq adminDirectoryURL

193 requestWithRoute r u ChromeosDevicesUpdate'{..}

194+ = go _cduProjection _cduCustomerId _cduDeviceId

195+ _cduQuotaUser

194− = go _cduQuotaUser (Just _cduPrettyPrint) _cduUserIP

196+ (Just _cduPrettyPrint)

195− _cduCustomerId

197+ _cduUserIP

198+ _cduFields

196 _cduKey

199 _cduKey

197− _cduDeviceId

198− _cduProjection

199 _cduOAuthToken

200 _cduOAuthToken

200− _cduFields

201 (Just AltJSON)

202 _cduChromeOSDevice

203 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/Delete.hs+7−7

@@ -53,9 +53,9 @@ type GroupsAliasesDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Remove a alias for the group

@@ -160,12 +160,12 @@ instance GoogleRequest GroupsAliasesDelete' where

160 type Rs GroupsAliasesDelete' = ()

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u GroupsAliasesDelete'{..}

163+ = go _gadGroupKey _gadAlias _gadQuotaUser

163− = go _gadQuotaUser (Just _gadPrettyPrint) _gadUserIP

164+ (Just _gadPrettyPrint)

164− _gadGroupKey

165+ _gadUserIP

165− _gadAlias

166+ _gadFields

166 _gadKey

167 _gadKey

167 _gadOAuthToken

168 _gadOAuthToken

168− _gadFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/Insert.hs+7−6

@@ -52,9 +52,9 @@ type GroupsAliasesInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Alias :> Post '[JSON] Alias

60

@@ -160,11 +160,12 @@ instance GoogleRequest GroupsAliasesInsert' where

160 type Rs GroupsAliasesInsert' = Alias

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u GroupsAliasesInsert'{..}

163+ = go _gaiGroupKey _gaiQuotaUser

163− = go _gaiQuotaUser (Just _gaiPrettyPrint) _gaiUserIP

164+ (Just _gaiPrettyPrint)

164− _gaiGroupKey

165+ _gaiUserIP

166+ _gaiFields

165 _gaiKey

167 _gaiKey

166 _gaiOAuthToken

168 _gaiOAuthToken

167− _gaiFields

168 (Just AltJSON)

169 (Just AltJSON)

169 _gaiAlias

170 _gaiAlias

170 where go

171 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/List.hs+7−6

@@ -51,9 +51,9 @@ type GroupsAliasesListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Aliases

58

59-- | List all aliases for a group

@@ -149,11 +149,12 @@ instance GoogleRequest GroupsAliasesList' where

149 type Rs GroupsAliasesList' = Aliases

150 request = requestWithRoute defReq adminDirectoryURL

151 requestWithRoute r u GroupsAliasesList'{..}

152+ = go _galGroupKey _galQuotaUser

152− = go _galQuotaUser (Just _galPrettyPrint) _galUserIP

153+ (Just _galPrettyPrint)

153− _galGroupKey

154+ _galUserIP

155+ _galFields

154 _galKey

156 _galKey

155 _galOAuthToken

157 _galOAuthToken

156− _galFields

157 (Just AltJSON)

158 (Just AltJSON)

158 where go

159 where go

159 = clientWithRoute

160 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Delete.hs+6−6

@@ -50,9 +50,9 @@ type GroupsDeleteResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Delete '[JSON] ()

57

58-- | Delete Group

@@ -145,11 +145,11 @@ instance GoogleRequest GroupsDelete' where

145 type Rs GroupsDelete' = ()

146 request = requestWithRoute defReq adminDirectoryURL

147 requestWithRoute r u GroupsDelete'{..}

148− = go _gdQuotaUser (Just _gdPrettyPrint) _gdUserIP

148+ = go _gdGroupKey _gdQuotaUser (Just _gdPrettyPrint)

149− _gdGroupKey

149+ _gdUserIP

150+ _gdFields

150 _gdKey

151 _gdKey

151 _gdOAuthToken

152 _gdOAuthToken

152− _gdFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Get.hs+6−6

@@ -50,9 +50,9 @@ type GroupsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Group

57

58-- | Retrieve Group

@@ -145,11 +145,11 @@ instance GoogleRequest GroupsGet' where

145 type Rs GroupsGet' = Group

146 request = requestWithRoute defReq adminDirectoryURL

147 requestWithRoute r u GroupsGet'{..}

148− = go _ggQuotaUser (Just _ggPrettyPrint) _ggUserIP

148+ = go _ggGroupKey _ggQuotaUser (Just _ggPrettyPrint)

149− _ggGroupKey

149+ _ggUserIP

150+ _ggFields

150 _ggKey

151 _ggKey

151 _ggOAuthToken

152 _ggOAuthToken

152− _ggFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute (Proxy :: Proxy GroupsGetResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Insert.hs+4−4

@@ -49,9 +49,9 @@ type GroupsInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] Group :> Post '[JSON] Group

57

@@ -145,9 +145,9 @@ instance GoogleRequest GroupsInsert' where

145 request = requestWithRoute defReq adminDirectoryURL

146 requestWithRoute r u GroupsInsert'{..}

147 = go _giQuotaUser (Just _giPrettyPrint) _giUserIP

148+ _giFields

148 _giKey

149 _giKey

149 _giOAuthToken

150 _giOAuthToken

150− _giFields

151 (Just AltJSON)

152 _giGroup

153 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/List.hs+17−18

@@ -50,17 +50,17 @@ import Network.Google.Prelude

50-- 'GroupsList'' request conforms to.

51type GroupsListResource =

52 "groups" :>

53− QueryParam "quotaUser" Text :>

53+ QueryParam "customer" Text :>

54− QueryParam "prettyPrint" Bool :>

54+ QueryParam "domain" Text :>

55− QueryParam "userIp" Text :>

55+ QueryParam "maxResults" Int32 :>

56− QueryParam "domain" Text :>

56+ QueryParam "pageToken" Text :>

57− QueryParam "customer" Text :>

57+ QueryParam "userKey" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "pageToken" Text :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "userIp" Text :>

61− QueryParam "userKey" Text :>

61+ QueryParam "fields" Text :>

62− QueryParam "maxResults" Int32 :>

62+ QueryParam "key" Key :>

63− QueryParam "fields" Text :>

63+ QueryParam "oauth_token" OAuthToken :>

64 QueryParam "alt" AltJSON :> Get '[JSON] Groups

65

66-- | Retrieve all groups in a domain (paginated)

@@ -191,15 +191,14 @@ instance GoogleRequest GroupsList' where

191 type Rs GroupsList' = Groups

192 request = requestWithRoute defReq adminDirectoryURL

193 requestWithRoute r u GroupsList'{..}

194− = go _glQuotaUser (Just _glPrettyPrint) _glUserIP

195− _glDomain

196− _glCustomer

197− _glKey

198− _glPageToken

194+ = go _glCustomer _glDomain _glMaxResults _glPageToken

199− _glOAuthToken

200 _glUserKey

195 _glUserKey

201− _glMaxResults

196+ _glQuotaUser

197+ (Just _glPrettyPrint)

198+ _glUserIP

202 _glFields

199 _glFields

200+ _glKey

201+ _glOAuthToken

203 (Just AltJSON)

202 (Just AltJSON)

204 where go

203 where go

205 = clientWithRoute (Proxy :: Proxy GroupsListResource)

204 = clientWithRoute (Proxy :: Proxy GroupsListResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Patch.hs+6−6

@@ -51,9 +51,9 @@ type GroupsPatchResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Group :> Patch '[JSON] Group

59

@@ -157,11 +157,11 @@ instance GoogleRequest GroupsPatch' where

157 type Rs GroupsPatch' = Group

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u GroupsPatch'{..}

160− = go _gpQuotaUser (Just _gpPrettyPrint) _gpUserIP

160+ = go _gpGroupKey _gpQuotaUser (Just _gpPrettyPrint)

161− _gpGroupKey

161+ _gpUserIP

162+ _gpFields

162 _gpKey

163 _gpKey

163 _gpOAuthToken

164 _gpOAuthToken

164− _gpFields

165 (Just AltJSON)

166 _gpGroup

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Update.hs+6−6

@@ -51,9 +51,9 @@ type GroupsUpdateResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Group :> Put '[JSON] Group

59

@@ -157,11 +157,11 @@ instance GoogleRequest GroupsUpdate' where

157 type Rs GroupsUpdate' = Group

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u GroupsUpdate'{..}

160− = go _guQuotaUser (Just _guPrettyPrint) _guUserIP

160+ = go _guGroupKey _guQuotaUser (Just _guPrettyPrint)

161− _guGroupKey

161+ _guUserIP

162+ _guFields

162 _guKey

163 _guKey

163 _guOAuthToken

164 _guOAuthToken

164− _guFields

165 (Just AltJSON)

166 _guGroup

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Delete.hs+6−6

@@ -53,9 +53,9 @@ type MembersDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Remove membership.

@@ -158,12 +158,12 @@ instance GoogleRequest MembersDelete' where

158 type Rs MembersDelete' = ()

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u MembersDelete'{..}

161+ = go _mdGroupKey _mdMemberKey _mdQuotaUser

161− = go _mdQuotaUser _mdMemberKey (Just _mdPrettyPrint)

162+ (Just _mdPrettyPrint)

162 _mdUserIP

163 _mdUserIP

163− _mdGroupKey

164+ _mdFields

164 _mdKey

165 _mdKey

165 _mdOAuthToken

166 _mdOAuthToken

166− _mdFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Get.hs+6−6

@@ -53,9 +53,9 @@ type MembersGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Member

60

61-- | Retrieve Group Member

@@ -158,12 +158,12 @@ instance GoogleRequest MembersGet' where

158 type Rs MembersGet' = Member

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u MembersGet'{..}

161+ = go _mgGroupKey _mgMemberKey _mgQuotaUser

161− = go _mgQuotaUser _mgMemberKey (Just _mgPrettyPrint)

162+ (Just _mgPrettyPrint)

162 _mgUserIP

163 _mgUserIP

163− _mgGroupKey

164+ _mgFields

164 _mgKey

165 _mgKey

165 _mgOAuthToken

166 _mgOAuthToken

166− _mgFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute (Proxy :: Proxy MembersGetResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Insert.hs+6−6

@@ -52,9 +52,9 @@ type MembersInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Member :> Post '[JSON] Member

60

@@ -157,11 +157,11 @@ instance GoogleRequest MembersInsert' where

157 type Rs MembersInsert' = Member

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u MembersInsert'{..}

160− = go _miQuotaUser (Just _miPrettyPrint) _miUserIP

160+ = go _miGroupKey _miQuotaUser (Just _miPrettyPrint)

161− _miGroupKey

161+ _miUserIP

162+ _miFields

162 _miKey

163 _miKey

163 _miOAuthToken

164 _miOAuthToken

164− _miFields

165 (Just AltJSON)

166 _miMember

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/List.hs+13−14

@@ -51,15 +51,15 @@ type MembersListResource =

51 "groups" :>

52 Capture "groupKey" Text :>

53 "members" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "maxResults" Int32 :>

55− QueryParam "roles" Text :>

55+ QueryParam "pageToken" Text :>

56+ QueryParam "roles" Text :>

57+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

60+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

59− QueryParam "pageToken" Text :>

60− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "maxResults" Int32 :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Members

64

65-- | Retrieve all members in a group (paginated)

@@ -178,14 +178,13 @@ instance GoogleRequest MembersList' where

178 type Rs MembersList' = Members

179 request = requestWithRoute defReq adminDirectoryURL

180 requestWithRoute r u MembersList'{..}

181+ = go _mlMaxResults _mlPageToken _mlRoles _mlGroupKey

182+ _mlQuotaUser

181− = go _mlQuotaUser _mlRoles (Just _mlPrettyPrint)

183+ (Just _mlPrettyPrint)

182 _mlUserIP

184 _mlUserIP

183− _mlGroupKey

185+ _mlFields

184 _mlKey

186 _mlKey

185− _mlPageToken

186 _mlOAuthToken

187 _mlOAuthToken

187− _mlMaxResults

188− _mlFields

189 (Just AltJSON)

188 (Just AltJSON)

190 where go

189 where go

191 = clientWithRoute

190 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Patch.hs+6−6

@@ -55,9 +55,9 @@ type MembersPatchResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Member :> Patch '[JSON] Member

63

@@ -173,12 +173,12 @@ instance GoogleRequest MembersPatch' where

173 type Rs MembersPatch' = Member

174 request = requestWithRoute defReq adminDirectoryURL

175 requestWithRoute r u MembersPatch'{..}

176+ = go _mpGroupKey _mpMemberKey _mpQuotaUser

176− = go _mpQuotaUser _mpMemberKey (Just _mpPrettyPrint)

177+ (Just _mpPrettyPrint)

177 _mpUserIP

178 _mpUserIP

178− _mpGroupKey

179+ _mpFields

179 _mpKey

180 _mpKey

180 _mpOAuthToken

181 _mpOAuthToken

181− _mpFields

182 (Just AltJSON)

183 _mpMember

184 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Update.hs+6−6

@@ -54,9 +54,9 @@ type MembersUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Member :> Put '[JSON] Member

62

@@ -171,12 +171,12 @@ instance GoogleRequest MembersUpdate' where

171 type Rs MembersUpdate' = Member

172 request = requestWithRoute defReq adminDirectoryURL

173 requestWithRoute r u MembersUpdate'{..}

174+ = go _muGroupKey _muMemberKey _muQuotaUser

174− = go _muQuotaUser _muMemberKey (Just _muPrettyPrint)

175+ (Just _muPrettyPrint)

175 _muUserIP

176 _muUserIP

176− _muGroupKey

177+ _muFields

177 _muKey

178 _muKey

178 _muOAuthToken

179 _muOAuthToken

179− _muFields

180 (Just AltJSON)

181 _muMember

182 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/MobileDevices/Action.hs+5−6

@@ -56,9 +56,9 @@ type MobileDevicesActionResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] MobileDeviceAction :>

64 Post '[JSON] ()

@@ -179,13 +179,12 @@ instance GoogleRequest MobileDevicesAction' where

179 type Rs MobileDevicesAction' = ()

180 request = requestWithRoute defReq adminDirectoryURL

181 requestWithRoute r u MobileDevicesAction'{..}

182− = go _mdaQuotaUser _mdaResourceId

182+ = go _mdaCustomerId _mdaResourceId _mdaQuotaUser

183 (Just _mdaPrettyPrint)

184 _mdaUserIP

185− _mdaCustomerId

185+ _mdaFields

186 _mdaKey

187 _mdaOAuthToken

188− _mdaFields

189 (Just AltJSON)

188 (Just AltJSON)

190 _mdaMobileDeviceAction

189 _mdaMobileDeviceAction

191 where go

190 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/MobileDevices/Delete.hs+5−6

@@ -54,9 +54,9 @@ type MobileDevicesDeleteResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] ()

61

62-- | Delete Mobile Device

@@ -164,13 +164,12 @@ instance GoogleRequest MobileDevicesDelete' where

164 type Rs MobileDevicesDelete' = ()

165 request = requestWithRoute defReq adminDirectoryURL

166 requestWithRoute r u MobileDevicesDelete'{..}

167− = go _mddQuotaUser _mddResourceId

167+ = go _mddCustomerId _mddResourceId _mddQuotaUser

168 (Just _mddPrettyPrint)

169 _mddUserIP

170− _mddCustomerId

170+ _mddFields

171 _mddKey

172 _mddOAuthToken

173− _mddFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/MobileDevices/Get.hs+12−13

@@ -52,15 +52,15 @@ type MobileDevicesGetResource =

52 "devices" :>

53 "mobile" :>

54 Capture "resourceId" Text :>

55+ QueryParam "projection"

56+ DirectoryMobileDevicesGetProjection

57+ :>

55− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

59− QueryParam "projection"

60− DirectoryMobileDevicesGetProjection

61− :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] MobileDevice

66

@@ -179,14 +179,13 @@ instance GoogleRequest MobileDevicesGet' where

179 type Rs MobileDevicesGet' = MobileDevice

180 request = requestWithRoute defReq adminDirectoryURL

181 requestWithRoute r u MobileDevicesGet'{..}

182+ = go _mdgProjection _mdgCustomerId _mdgResourceId

182− = go _mdgQuotaUser _mdgResourceId

183+ _mdgQuotaUser

183 (Just _mdgPrettyPrint)

184 (Just _mdgPrettyPrint)

184 _mdgUserIP

185 _mdgUserIP

185− _mdgCustomerId

186+ _mdgFields

186 _mdgKey

187 _mdgKey

187− _mdgProjection

188 _mdgOAuthToken

189− _mdgFields

190 (Just AltJSON)

189 (Just AltJSON)

191 where go

190 where go

192 = clientWithRoute

191 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/MobileDevices/List.hs+26−26

@@ -55,24 +55,24 @@ type MobileDevicesListResource =

55 Capture "customerId" Text :>

56 "devices" :>

57 "mobile" :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "maxResults" Int32 :>

59− QueryParam "prettyPrint" Bool :>

59+ QueryParam "orderBy"

60− QueryParam "orderBy"

61− DirectoryMobileDevicesListOrderBy

60+ DirectoryMobileDevicesListOrderBy

61+ :>

62+ QueryParam "pageToken" Text :>

63+ QueryParam "projection"

64+ DirectoryMobileDevicesListProjection

62− :>

65+ :>

63− QueryParam "userIp" Text :>

66+ QueryParam "query" Text :>

64− QueryParam "sortOrder"

67+ QueryParam "sortOrder"

65− DirectoryMobileDevicesListSortOrder

68+ DirectoryMobileDevicesListSortOrder

66− :>

69+ :>

70+ QueryParam "quotaUser" Text :>

71+ QueryParam "prettyPrint" Bool :>

72+ QueryParam "userIp" Text :>

73+ QueryParam "fields" Text :>

67− QueryParam "key" Key :>

74+ QueryParam "key" Key :>

68− QueryParam "query" Text :>

69− QueryParam "projection"

70− DirectoryMobileDevicesListProjection

71− :>

72− QueryParam "pageToken" Text :>

73− QueryParam "oauth_token" OAuthToken :>

75+ QueryParam "oauth_token" OAuthToken :>

74− QueryParam "maxResults" Int32 :>

75− QueryParam "fields" Text :>

76 QueryParam "alt" AltJSON :>

77 Get '[JSON] MobileDevices

78

@@ -227,17 +227,17 @@ instance GoogleRequest MobileDevicesList' where

227 type Rs MobileDevicesList' = MobileDevices

228 request = requestWithRoute defReq adminDirectoryURL

229 requestWithRoute r u MobileDevicesList'{..}

230− = go _mdlQuotaUser (Just _mdlPrettyPrint) _mdlOrderBy

230+ = go _mdlMaxResults _mdlOrderBy _mdlPageToken

231− _mdlUserIP

231+ _mdlProjection

232− _mdlCustomerId

232+ _mdlQuery

233 _mdlSortOrder

234+ _mdlCustomerId

235+ _mdlQuotaUser

236+ (Just _mdlPrettyPrint)

237+ _mdlUserIP

238+ _mdlFields

234 _mdlKey

239 _mdlKey

235− _mdlQuery

236− _mdlProjection

237− _mdlPageToken

238 _mdlOAuthToken

240 _mdlOAuthToken

239− _mdlMaxResults

240− _mdlFields

241 (Just AltJSON)

242 where go

243 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Delete.hs+7−7

@@ -53,9 +53,9 @@ type NotificationsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes a notification

@@ -160,12 +160,12 @@ instance GoogleRequest NotificationsDelete' where

160 type Rs NotificationsDelete' = ()

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u NotificationsDelete'{..}

163+ = go _ndCustomer _ndNotificationId _ndQuotaUser

163− = go _ndQuotaUser (Just _ndPrettyPrint) _ndUserIP

164+ (Just _ndPrettyPrint)

164− _ndCustomer

165+ _ndUserIP

166+ _ndFields

165 _ndKey

167 _ndKey

166− _ndNotificationId

167 _ndOAuthToken

168 _ndOAuthToken

168− _ndFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Get.hs+7−7

@@ -53,9 +53,9 @@ type NotificationsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Notification

60

61-- | Retrieves a notification.

@@ -160,12 +160,12 @@ instance GoogleRequest NotificationsGet' where

160 type Rs NotificationsGet' = Notification

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u NotificationsGet'{..}

163+ = go _ngCustomer _ngNotificationId _ngQuotaUser

163− = go _ngQuotaUser (Just _ngPrettyPrint) _ngUserIP

164+ (Just _ngPrettyPrint)

164− _ngCustomer

165+ _ngUserIP

166+ _ngFields

165 _ngKey

167 _ngKey

166− _ngNotificationId

167 _ngOAuthToken

168 _ngOAuthToken

168− _ngFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/List.hs+14−14

@@ -51,15 +51,15 @@ type NotificationsListResource =

51 "customer" :>

52 Capture "customer" Text :>

53 "notifications" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "language" Text :>

55+ QueryParam "maxResults" Word32 :>

56+ QueryParam "pageToken" Text :>

57+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

60+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

58− QueryParam "language" Text :>

59− QueryParam "pageToken" Text :>

60− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "maxResults" Word32 :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] Notifications

65

@@ -181,14 +181,14 @@ instance GoogleRequest NotificationsList' where

181 type Rs NotificationsList' = Notifications

182 request = requestWithRoute defReq adminDirectoryURL

183 requestWithRoute r u NotificationsList'{..}

184− = go _nlQuotaUser (Just _nlPrettyPrint) _nlUserIP

184+ = go _nlLanguage _nlMaxResults _nlPageToken

185 _nlCustomer

186+ _nlQuotaUser

187+ (Just _nlPrettyPrint)

188+ _nlUserIP

189+ _nlFields

186 _nlKey

190 _nlKey

187− _nlLanguage

188− _nlPageToken

189 _nlOAuthToken

191 _nlOAuthToken

190− _nlMaxResults

191− _nlFields

192 (Just AltJSON)

193 where go

194 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Patch.hs+7−7

@@ -54,9 +54,9 @@ type NotificationsPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Notification :>

62 Patch '[JSON] Notification

@@ -173,12 +173,12 @@ instance GoogleRequest NotificationsPatch' where

173 type Rs NotificationsPatch' = Notification

174 request = requestWithRoute defReq adminDirectoryURL

175 requestWithRoute r u NotificationsPatch'{..}

176+ = go _npCustomer _npNotificationId _npQuotaUser

176− = go _npQuotaUser (Just _npPrettyPrint) _npUserIP

177+ (Just _npPrettyPrint)

177− _npCustomer

178+ _npUserIP

179+ _npFields

178 _npKey

180 _npKey

179− _npNotificationId

180 _npOAuthToken

181 _npOAuthToken

181− _npFields

182 (Just AltJSON)

183 _npNotification

184 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Update.hs+7−7

@@ -54,9 +54,9 @@ type NotificationsUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Notification :>

62 Put '[JSON] Notification

@@ -173,12 +173,12 @@ instance GoogleRequest NotificationsUpdate' where

173 type Rs NotificationsUpdate' = Notification

174 request = requestWithRoute defReq adminDirectoryURL

175 requestWithRoute r u NotificationsUpdate'{..}

176+ = go _nuCustomer _nuNotificationId _nuQuotaUser

176− = go _nuQuotaUser (Just _nuPrettyPrint) _nuUserIP

177+ (Just _nuPrettyPrint)

177− _nuCustomer

178+ _nuUserIP

179+ _nuFields

178 _nuKey

180 _nuKey

179− _nuNotificationId

180 _nuOAuthToken

181 _nuOAuthToken

181− _nuFields

182 (Just AltJSON)

183 _nuNotification

184 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Delete.hs+7−7

@@ -53,9 +53,9 @@ type OrgUnitsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Remove Organization Unit

@@ -163,12 +163,12 @@ instance GoogleRequest OrgUnitsDelete' where

163 type Rs OrgUnitsDelete' = ()

164 request = requestWithRoute defReq adminDirectoryURL

165 requestWithRoute r u OrgUnitsDelete'{..}

166+ = go _oudCustomerId _oudOrgUnitPath _oudQuotaUser

166− = go _oudQuotaUser (Just _oudPrettyPrint) _oudUserIP

167+ (Just _oudPrettyPrint)

167− _oudOrgUnitPath

168+ _oudUserIP

168− _oudCustomerId

169+ _oudFields

169 _oudKey

170 _oudKey

170 _oudOAuthToken

171 _oudOAuthToken

171− _oudFields

172 (Just AltJSON)

173 where go

174 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Get.hs+7−7

@@ -53,9 +53,9 @@ type OrgUnitsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] OrgUnit

60

61-- | Retrieve Organization Unit

@@ -163,12 +163,12 @@ instance GoogleRequest OrgUnitsGet' where

163 type Rs OrgUnitsGet' = OrgUnit

164 request = requestWithRoute defReq adminDirectoryURL

165 requestWithRoute r u OrgUnitsGet'{..}

166+ = go _ougCustomerId _ougOrgUnitPath _ougQuotaUser

166− = go _ougQuotaUser (Just _ougPrettyPrint) _ougUserIP

167+ (Just _ougPrettyPrint)

167− _ougOrgUnitPath

168+ _ougUserIP

168− _ougCustomerId

169+ _ougFields

169 _ougKey

170 _ougKey

170 _ougOAuthToken

171 _ougOAuthToken

171− _ougFields

172 (Just AltJSON)

173 where go

174 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Insert.hs+7−6

@@ -52,9 +52,9 @@ type OrgUnitsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] OrgUnit :> Post '[JSON] OrgUnit

60

@@ -162,11 +162,12 @@ instance GoogleRequest OrgUnitsInsert' where

162 type Rs OrgUnitsInsert' = OrgUnit

163 request = requestWithRoute defReq adminDirectoryURL

164 requestWithRoute r u OrgUnitsInsert'{..}

165+ = go _ouiCustomerId _ouiQuotaUser

165− = go _ouiQuotaUser (Just _ouiPrettyPrint) _ouiUserIP

166+ (Just _ouiPrettyPrint)

166− _ouiCustomerId

167+ _ouiUserIP

168+ _ouiFields

167 _ouiKey

169 _ouiKey

168 _ouiOAuthToken

170 _ouiOAuthToken

169− _ouiFields

170 (Just AltJSON)

171 (Just AltJSON)

171 _ouiOrgUnit

172 _ouiOrgUnit

172 where go

173 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/List.hs+13−13

@@ -50,14 +50,14 @@ type OrgUnitsListResource =

50 "customer" :>

51 Capture "customerId" Text :>

52 "orgunits" :>

53+ QueryParam "orgUnitPath" Text :>

54+ QueryParam "type" DirectoryOrgUnitsListType :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

56− QueryParam "orgUnitPath" Text :>

58+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

58− QueryParam "type" DirectoryOrgUnitsListType :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] OrgUnits

62

63-- | Retrieve all Organization Units

@@ -172,13 +172,13 @@ instance GoogleRequest OrgUnitsList' where

172 type Rs OrgUnitsList' = OrgUnits

173 request = requestWithRoute defReq adminDirectoryURL

174 requestWithRoute r u OrgUnitsList'{..}

175+ = go (Just _oulOrgUnitPath) _oulType _oulCustomerId

176+ _oulQuotaUser

175− = go _oulQuotaUser (Just _oulPrettyPrint) _oulUserIP

177+ (Just _oulPrettyPrint)

176− (Just _oulOrgUnitPath)

178+ _oulUserIP

177− _oulCustomerId

179+ _oulFields

178 _oulKey

180 _oulKey

179− _oulType

180 _oulOAuthToken

181 _oulOAuthToken

181− _oulFields

182 (Just AltJSON)

183 where go

184 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Patch.hs+7−7

@@ -54,9 +54,9 @@ type OrgUnitsPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] OrgUnit :> Patch '[JSON] OrgUnit

62

@@ -175,12 +175,12 @@ instance GoogleRequest OrgUnitsPatch' where

175 type Rs OrgUnitsPatch' = OrgUnit

176 request = requestWithRoute defReq adminDirectoryURL

177 requestWithRoute r u OrgUnitsPatch'{..}

178+ = go _oupCustomerId _oupOrgUnitPath _oupQuotaUser

178− = go _oupQuotaUser (Just _oupPrettyPrint) _oupUserIP

179+ (Just _oupPrettyPrint)

179− _oupOrgUnitPath

180+ _oupUserIP

180− _oupCustomerId

181+ _oupFields

181 _oupKey

182 _oupKey

182 _oupOAuthToken

183 _oupOAuthToken

183− _oupFields

184 (Just AltJSON)

185 _oupOrgUnit

186 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/OrgUnits/Update.hs+7−7

@@ -54,9 +54,9 @@ type OrgUnitsUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] OrgUnit :> Put '[JSON] OrgUnit

62

@@ -175,12 +175,12 @@ instance GoogleRequest OrgUnitsUpdate' where

175 type Rs OrgUnitsUpdate' = OrgUnit

176 request = requestWithRoute defReq adminDirectoryURL

177 requestWithRoute r u OrgUnitsUpdate'{..}

178+ = go _ouuCustomerId _ouuOrgUnitPath _ouuQuotaUser

178− = go _ouuQuotaUser (Just _ouuPrettyPrint) _ouuUserIP

179+ (Just _ouuPrettyPrint)

179− _ouuOrgUnitPath

180+ _ouuUserIP

180− _ouuCustomerId

181+ _ouuFields

181 _ouuKey

182 _ouuKey

182 _ouuOAuthToken

183 _ouuOAuthToken

183− _ouuFields

184 (Just AltJSON)

185 _ouuOrgUnit

186 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Delete.hs+7−7

@@ -53,9 +53,9 @@ type SchemasDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Delete schema

@@ -158,12 +158,12 @@ instance GoogleRequest SchemasDelete' where

158 type Rs SchemasDelete' = ()

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u SchemasDelete'{..}

161+ = go _sdCustomerId _sdSchemaKey _sdQuotaUser

161− = go _sdQuotaUser (Just _sdPrettyPrint) _sdUserIP

162+ (Just _sdPrettyPrint)

162− _sdCustomerId

163+ _sdUserIP

164+ _sdFields

163 _sdKey

165 _sdKey

164 _sdOAuthToken

166 _sdOAuthToken

165− _sdSchemaKey

166− _sdFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Get.hs+7−7

@@ -53,9 +53,9 @@ type SchemasGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Schema

60

61-- | Retrieve schema

@@ -158,12 +158,12 @@ instance GoogleRequest SchemasGet' where

158 type Rs SchemasGet' = Schema

159 request = requestWithRoute defReq adminDirectoryURL

160 requestWithRoute r u SchemasGet'{..}

161+ = go _sgCustomerId _sgSchemaKey _sgQuotaUser

161− = go _sgQuotaUser (Just _sgPrettyPrint) _sgUserIP

162+ (Just _sgPrettyPrint)

162− _sgCustomerId

163+ _sgUserIP

164+ _sgFields

163 _sgKey

165 _sgKey

164 _sgOAuthToken

166 _sgOAuthToken

165− _sgSchemaKey

166− _sgFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute (Proxy :: Proxy SchemasGetResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Insert.hs+6−6

@@ -52,9 +52,9 @@ type SchemasInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Schema :> Post '[JSON] Schema

60

@@ -157,11 +157,11 @@ instance GoogleRequest SchemasInsert' where

157 type Rs SchemasInsert' = Schema

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u SchemasInsert'{..}

160− = go _siQuotaUser (Just _siPrettyPrint) _siUserIP

160+ = go _siCustomerId _siQuotaUser (Just _siPrettyPrint)

161− _siCustomerId

161+ _siUserIP

162+ _siFields

162 _siKey

163 _siKey

163 _siOAuthToken

164 _siOAuthToken

164− _siFields

165 (Just AltJSON)

166 _siSchema

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/List.hs+6−6

@@ -51,9 +51,9 @@ type SchemasListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Schemas

58

59-- | Retrieve all schemas for a customer

@@ -146,11 +146,11 @@ instance GoogleRequest SchemasList' where

146 type Rs SchemasList' = Schemas

147 request = requestWithRoute defReq adminDirectoryURL

148 requestWithRoute r u SchemasList'{..}

149− = go _slQuotaUser (Just _slPrettyPrint) _slUserIP

149+ = go _slCustomerId _slQuotaUser (Just _slPrettyPrint)

150− _slCustomerId

150+ _slUserIP

151+ _slFields

151 _slKey

152 _slKey

152 _slOAuthToken

153 _slOAuthToken

153− _slFields

154 (Just AltJSON)

155 where go

156 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Patch.hs+7−7

@@ -54,9 +54,9 @@ type SchemasPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Schema :> Patch '[JSON] Schema

62

@@ -169,12 +169,12 @@ instance GoogleRequest SchemasPatch' where

169 type Rs SchemasPatch' = Schema

170 request = requestWithRoute defReq adminDirectoryURL

171 requestWithRoute r u SchemasPatch'{..}

172+ = go _spCustomerId _spSchemaKey _spQuotaUser

172− = go _spQuotaUser (Just _spPrettyPrint) _spUserIP

173+ (Just _spPrettyPrint)

173− _spCustomerId

174+ _spUserIP

175+ _spFields

174 _spKey

176 _spKey

175 _spOAuthToken

177 _spOAuthToken

176− _spSchemaKey

177− _spFields

178 (Just AltJSON)

179 _spSchema

180 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Update.hs+7−7

@@ -54,9 +54,9 @@ type SchemasUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Schema :> Put '[JSON] Schema

62

@@ -169,12 +169,12 @@ instance GoogleRequest SchemasUpdate' where

169 type Rs SchemasUpdate' = Schema

170 request = requestWithRoute defReq adminDirectoryURL

171 requestWithRoute r u SchemasUpdate'{..}

172+ = go _suCustomerId _suSchemaKey _suQuotaUser

172− = go _suQuotaUser (Just _suPrettyPrint) _suUserIP

173+ (Just _suPrettyPrint)

173− _suCustomerId

174+ _suUserIP

175+ _suFields

174 _suKey

176 _suKey

175 _suOAuthToken

177 _suOAuthToken

176− _suSchemaKey

177− _suFields

178 (Just AltJSON)

179 _suSchema

180 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/Delete.hs+6−6

@@ -53,9 +53,9 @@ type TokensDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Delete all access tokens issued by a user for an application.

@@ -159,12 +159,12 @@ instance GoogleRequest TokensDelete' where

159 type Rs TokensDelete' = ()

160 request = requestWithRoute defReq adminDirectoryURL

161 requestWithRoute r u TokensDelete'{..}

162− = go _tdClientId _tdQuotaUser (Just _tdPrettyPrint)

162+ = go _tdUserKey _tdClientId _tdQuotaUser

163+ (Just _tdPrettyPrint)

163 _tdUserIP

164 _tdUserIP

165+ _tdFields

164 _tdKey

166 _tdKey

165 _tdOAuthToken

167 _tdOAuthToken

166− _tdUserKey

167− _tdFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/Get.hs+6−6

@@ -53,9 +53,9 @@ type TokensGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Token

60

61-- | Get information about an access token issued by a user.

@@ -159,12 +159,12 @@ instance GoogleRequest TokensGet' where

159 type Rs TokensGet' = Token

160 request = requestWithRoute defReq adminDirectoryURL

161 requestWithRoute r u TokensGet'{..}

162− = go _tgClientId _tgQuotaUser (Just _tgPrettyPrint)

162+ = go _tgUserKey _tgClientId _tgQuotaUser

163+ (Just _tgPrettyPrint)

163 _tgUserIP

164 _tgUserIP

165+ _tgFields

164 _tgKey

166 _tgKey

165 _tgOAuthToken

167 _tgOAuthToken

166− _tgUserKey

167− _tgFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute (Proxy :: Proxy TokensGetResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/List.hs+6−6

@@ -52,9 +52,9 @@ type TokensListResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Tokens

59

60-- | Returns the set of tokens specified user has issued to 3rd party

@@ -149,11 +149,11 @@ instance GoogleRequest TokensList' where

149 type Rs TokensList' = Tokens

150 request = requestWithRoute defReq adminDirectoryURL

151 requestWithRoute r u TokensList'{..}

152− = go _tlQuotaUser (Just _tlPrettyPrint) _tlUserIP

152+ = go _tlUserKey _tlQuotaUser (Just _tlPrettyPrint)

153+ _tlUserIP

154+ _tlFields

153 _tlKey

155 _tlKey

154 _tlOAuthToken

156 _tlOAuthToken

155− _tlUserKey

156− _tlFields

157 (Just AltJSON)

158 where go

159 = clientWithRoute (Proxy :: Proxy TokensListResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Delete.hs+7−7

@@ -53,9 +53,9 @@ type UsersAliasesDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Remove a alias for the user

@@ -160,12 +160,12 @@ instance GoogleRequest UsersAliasesDelete' where

160 type Rs UsersAliasesDelete' = ()

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u UsersAliasesDelete'{..}

163+ = go _uadUserKey _uadAlias _uadQuotaUser

163− = go _uadQuotaUser (Just _uadPrettyPrint) _uadUserIP

164+ (Just _uadPrettyPrint)

164− _uadAlias

165+ _uadUserIP

166+ _uadFields

165 _uadKey

167 _uadKey

166 _uadOAuthToken

168 _uadOAuthToken

167− _uadUserKey

168− _uadFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Insert.hs+6−6

@@ -52,9 +52,9 @@ type UsersAliasesInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Alias :> Post '[JSON] Alias

60

@@ -160,11 +160,11 @@ instance GoogleRequest UsersAliasesInsert' where

160 type Rs UsersAliasesInsert' = Alias

161 request = requestWithRoute defReq adminDirectoryURL

162 requestWithRoute r u UsersAliasesInsert'{..}

163− = go _uaiQuotaUser (Just _uaiPrettyPrint) _uaiUserIP

163+ = go _uaiUserKey _uaiQuotaUser (Just _uaiPrettyPrint)

164+ _uaiUserIP

165+ _uaiFields

164 _uaiKey

166 _uaiKey

165 _uaiOAuthToken

167 _uaiOAuthToken

166− _uaiUserKey

167− _uaiFields

168 (Just AltJSON)

169 _uaiAlias

170 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/List.hs+6−6

@@ -53,9 +53,9 @@ type UsersAliasesListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Aliases

60

61-- | List all aliases for a user

@@ -159,12 +159,12 @@ instance GoogleRequest UsersAliasesList' where

159 type Rs UsersAliasesList' = Aliases

160 request = requestWithRoute defReq adminDirectoryURL

161 requestWithRoute r u UsersAliasesList'{..}

162− = go _ualEvent _ualQuotaUser (Just _ualPrettyPrint)

162+ = go _ualEvent _ualUserKey _ualQuotaUser

163+ (Just _ualPrettyPrint)

163 _ualUserIP

164 _ualUserIP

165+ _ualFields

164 _ualKey

166 _ualKey

165 _ualOAuthToken

167 _ualOAuthToken

166− _ualUserKey

167− _ualFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Watch.hs+6−6

@@ -55,9 +55,9 @@ type UsersAliasesWatchResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Channel :> Post '[JSON] Channel

63

@@ -172,12 +172,12 @@ instance GoogleRequest UsersAliasesWatch' where

172 type Rs UsersAliasesWatch' = Channel

173 request = requestWithRoute defReq adminDirectoryURL

174 requestWithRoute r u UsersAliasesWatch'{..}

175− = go _uawEvent _uawQuotaUser (Just _uawPrettyPrint)

175+ = go _uawEvent _uawUserKey _uawQuotaUser

176+ (Just _uawPrettyPrint)

176 _uawUserIP

177 _uawUserIP

178+ _uawFields

177 _uawKey

179 _uawKey

178 _uawOAuthToken

180 _uawOAuthToken

179− _uawUserKey

180− _uawFields

181 (Just AltJSON)

182 _uawChannel

183 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Delete.hs+6−6

@@ -50,9 +50,9 @@ type UsersDeleteResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Delete '[JSON] ()

57

58-- | Delete user

@@ -145,11 +145,11 @@ instance GoogleRequest UsersDelete' where

145 type Rs UsersDelete' = ()

146 request = requestWithRoute defReq adminDirectoryURL

147 requestWithRoute r u UsersDelete'{..}

148− = go _udQuotaUser (Just _udPrettyPrint) _udUserIP

148+ = go _udUserKey _udQuotaUser (Just _udPrettyPrint)

149+ _udUserIP

150+ _udFields

149 _udKey

151 _udKey

150 _udOAuthToken

152 _udOAuthToken

151− _udUserKey

152− _udFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Get.hs+14−14

@@ -50,16 +50,16 @@ import Network.Google.Prelude

50type UsersGetResource =

51 "users" :>

52 Capture "userKey" Text :>

53− QueryParam "quotaUser" Text :>

53+ QueryParam "customFieldMask" Text :>

54− QueryParam "prettyPrint" Bool :>

54+ QueryParam "projection" DirectoryUsersGetProjection

55+ :>

55 QueryParam "viewType" DirectoryUsersGetViewType :>

56 QueryParam "viewType" DirectoryUsersGetViewType :>

56− QueryParam "customFieldMask" Text :>

57+ QueryParam "quotaUser" Text :>

58+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

60+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

59− QueryParam "projection" DirectoryUsersGetProjection

60− :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] User

64

65-- | retrieve user

@@ -181,15 +181,15 @@ instance GoogleRequest UsersGet' where

181 type Rs UsersGet' = User

182 request = requestWithRoute defReq adminDirectoryURL

183 requestWithRoute r u UsersGet'{..}

184− = go _ugQuotaUser (Just _ugPrettyPrint)

184+ = go _ugCustomFieldMask (Just _ugProjection)

185 (Just _ugViewType)

186− _ugCustomFieldMask

186+ _ugUserKey

187+ _ugQuotaUser

188+ (Just _ugPrettyPrint)

187 _ugUserIP

189 _ugUserIP

190+ _ugFields

188 _ugKey

191 _ugKey

189− (Just _ugProjection)

190 _ugOAuthToken

192 _ugOAuthToken

191− _ugUserKey

192− _ugFields

193 (Just AltJSON)

194 where go

195 = clientWithRoute (Proxy :: Proxy UsersGetResource) r

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Insert.hs+4−4

@@ -49,9 +49,9 @@ type UsersInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] User :> Post '[JSON] User

57

@@ -145,9 +145,9 @@ instance GoogleRequest UsersInsert' where

145 request = requestWithRoute defReq adminDirectoryURL

146 requestWithRoute r u UsersInsert'{..}

147 = go _uiQuotaUser (Just _uiPrettyPrint) _uiUserIP

148+ _uiFields

148 _uiKey

149 _uiKey

149 _uiOAuthToken

150 _uiOAuthToken

150− _uiFields

151 (Just AltJSON)

152 _uiUser

153 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/List.hs+30−31

@@ -57,26 +57,25 @@ import Network.Google.Prelude

57-- 'UsersList'' request conforms to.

58type UsersListResource =

59 "users" :>

60− QueryParam "event" DirectoryUsersListEvent :>

60+ QueryParam "customFieldMask" Text :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "customer" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "domain" Text :>

63− QueryParam "orderBy" DirectoryUsersListOrderBy :>

63+ QueryParam "event" DirectoryUsersListEvent :>

64− QueryParam "viewType" DirectoryUsersListViewType :>

64+ QueryParam "maxResults" Int32 :>

65− QueryParam "customFieldMask" Text :>

65+ QueryParam "orderBy" DirectoryUsersListOrderBy :>

66− QueryParam "userIp" Text :>

66+ QueryParam "pageToken" Text :>

67− QueryParam "domain" Text :>

67+ QueryParam "projection" DirectoryUsersListProjection

68+ :>

69+ QueryParam "query" Text :>

68− QueryParam "showDeleted" Text :>

70+ QueryParam "showDeleted" Text :>

69− QueryParam "sortOrder" DirectoryUsersListSortOrder :>

71+ QueryParam "sortOrder" DirectoryUsersListSortOrder :>

70− QueryParam "customer" Text :>

72+ QueryParam "viewType" DirectoryUsersListViewType :>

71− QueryParam "key" Key :>

72− QueryParam "query" Text :>

73+ QueryParam "quotaUser" Text :>

73− QueryParam "projection"

74+ QueryParam "prettyPrint" Bool :>

74− DirectoryUsersListProjection

75− :>

76− QueryParam "pageToken" Text :>

75+ QueryParam "userIp" Text :>

77− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "fields" Text :>

78− QueryParam "maxResults" Int32 :>

77+ QueryParam "key" Key :>

79− QueryParam "fields" Text :>

78+ QueryParam "oauth_token" OAuthToken :>

80 QueryParam "alt" AltJSON :>

79 QueryParam "alt" AltJSON :>

81 Get '[JSON] Users

80 Get '[JSON] Users

82

81

@@ -272,22 +271,22 @@ instance GoogleRequest UsersList' where

272 type Rs UsersList' = Users

271 type Rs UsersList' = Users

273 request = requestWithRoute defReq adminDirectoryURL

272 request = requestWithRoute defReq adminDirectoryURL

274 requestWithRoute r u UsersList'{..}

273 requestWithRoute r u UsersList'{..}

275− = go _ulEvent _ulQuotaUser (Just _ulPrettyPrint)

274+ = go _ulCustomFieldMask _ulCustomer _ulDomain

275+ _ulEvent

276+ _ulMaxResults

276 _ulOrderBy

277 _ulOrderBy

277− (Just _ulViewType)

278+ _ulPageToken

278− _ulCustomFieldMask

279+ (Just _ulProjection)

279− _ulUserIP

280+ _ulQuery

280− _ulDomain

281 _ulShowDeleted

282 _ulSortOrder

283− _ulCustomer

283+ (Just _ulViewType)

284+ _ulQuotaUser

285+ (Just _ulPrettyPrint)

286+ _ulUserIP

287+ _ulFields

284 _ulKey

288 _ulKey

285− _ulQuery

286− (Just _ulProjection)

287− _ulPageToken

288 _ulOAuthToken

289 _ulOAuthToken

289− _ulMaxResults

290− _ulFields

291 (Just AltJSON)

290 (Just AltJSON)

292 where go

291 where go

293 = clientWithRoute (Proxy :: Proxy UsersListResource)

292 = clientWithRoute (Proxy :: Proxy UsersListResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/MakeAdmin.hs+6−6

@@ -52,9 +52,9 @@ type UsersMakeAdminResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] UserMakeAdmin :> Post '[JSON] ()

60

@@ -162,11 +162,11 @@ instance GoogleRequest UsersMakeAdmin' where

162 type Rs UsersMakeAdmin' = ()

163 request = requestWithRoute defReq adminDirectoryURL

164 requestWithRoute r u UsersMakeAdmin'{..}

165− = go _umaQuotaUser (Just _umaPrettyPrint) _umaUserIP

165+ = go _umaUserKey _umaQuotaUser (Just _umaPrettyPrint)

166+ _umaUserIP

167+ _umaFields

166 _umaKey

168 _umaKey

167 _umaOAuthToken

169 _umaOAuthToken

168− _umaUserKey

169− _umaFields

170 (Just AltJSON)

171 _umaUserMakeAdmin

172 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Patch.hs+6−6

@@ -51,9 +51,9 @@ type UsersPatchResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] User :> Patch '[JSON] User

59

@@ -157,11 +157,11 @@ instance GoogleRequest UsersPatch' where

157 type Rs UsersPatch' = User

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u UsersPatch'{..}

160− = go _upQuotaUser (Just _upPrettyPrint) _upUserIP

160+ = go _upUserKey _upQuotaUser (Just _upPrettyPrint)

161+ _upUserIP

162+ _upFields

161 _upKey

163 _upKey

162 _upOAuthToken

164 _upOAuthToken

163− _upUserKey

164− _upFields

165 (Just AltJSON)

166 _upUser

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Delete.hs+6−6

@@ -52,9 +52,9 @@ type UsersPhotosDeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60-- | Remove photos for the user

@@ -150,11 +150,11 @@ instance GoogleRequest UsersPhotosDelete' where

150 type Rs UsersPhotosDelete' = ()

151 request = requestWithRoute defReq adminDirectoryURL

152 requestWithRoute r u UsersPhotosDelete'{..}

153− = go _updQuotaUser (Just _updPrettyPrint) _updUserIP

153+ = go _updUserKey _updQuotaUser (Just _updPrettyPrint)

154+ _updUserIP

155+ _updFields

154 _updKey

156 _updKey

155 _updOAuthToken

157 _updOAuthToken

156− _updUserKey

157− _updFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Get.hs+6−6

@@ -52,9 +52,9 @@ type UsersPhotosGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] UserPhoto

59

60-- | Retrieve photo of a user

@@ -150,11 +150,11 @@ instance GoogleRequest UsersPhotosGet' where

150 type Rs UsersPhotosGet' = UserPhoto

151 request = requestWithRoute defReq adminDirectoryURL

152 requestWithRoute r u UsersPhotosGet'{..}

153− = go _upgQuotaUser (Just _upgPrettyPrint) _upgUserIP

153+ = go _upgUserKey _upgQuotaUser (Just _upgPrettyPrint)

154+ _upgUserIP

155+ _upgFields

154 _upgKey

156 _upgKey

155 _upgOAuthToken

157 _upgOAuthToken

156− _upgUserKey

157− _upgFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Patch.hs+6−6

@@ -53,9 +53,9 @@ type UsersPhotosPatchResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] UserPhoto :> Patch '[JSON] UserPhoto

61

@@ -162,11 +162,11 @@ instance GoogleRequest UsersPhotosPatch' where

162 type Rs UsersPhotosPatch' = UserPhoto

163 request = requestWithRoute defReq adminDirectoryURL

164 requestWithRoute r u UsersPhotosPatch'{..}

165− = go _uppQuotaUser (Just _uppPrettyPrint) _uppUserIP

165+ = go _uppUserKey _uppQuotaUser (Just _uppPrettyPrint)

166+ _uppUserIP

167+ _uppFields

166 _uppKey

168 _uppKey

167 _uppOAuthToken

169 _uppOAuthToken

168− _uppUserKey

169− _uppFields

170 (Just AltJSON)

171 _uppUserPhoto

172 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Update.hs+6−6

@@ -53,9 +53,9 @@ type UsersPhotosUpdateResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] UserPhoto :> Put '[JSON] UserPhoto

61

@@ -162,11 +162,11 @@ instance GoogleRequest UsersPhotosUpdate' where

162 type Rs UsersPhotosUpdate' = UserPhoto

163 request = requestWithRoute defReq adminDirectoryURL

164 requestWithRoute r u UsersPhotosUpdate'{..}

165− = go _upuQuotaUser (Just _upuPrettyPrint) _upuUserIP

165+ = go _upuUserKey _upuQuotaUser (Just _upuPrettyPrint)

166+ _upuUserIP

167+ _upuFields

166 _upuKey

168 _upuKey

167 _upuOAuthToken

169 _upuOAuthToken

168− _upuUserKey

169− _upuFields

170 (Just AltJSON)

171 _upuUserPhoto

172 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Undelete.hs+7−6

@@ -52,9 +52,9 @@ type UsersUndeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] UserUndelete :> Post '[JSON] ()

60

@@ -157,10 +157,11 @@ instance GoogleRequest UsersUndelete' where

157 type Rs UsersUndelete' = ()

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u UsersUndelete'{..}

160− = go _uQuotaUser (Just _uPrettyPrint) _uUserIP _uKey

160+ = go _uUserKey _uQuotaUser (Just _uPrettyPrint)

161− _uOAuthToken

161+ _uUserIP

162− _uUserKey

163 _uFields

162 _uFields

163+ _uKey

164+ _uOAuthToken

164 (Just AltJSON)

165 (Just AltJSON)

165 _uUserUndelete

166 _uUserUndelete

166 where go

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Update.hs+6−6

@@ -51,9 +51,9 @@ type UsersUpdateResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] User :> Put '[JSON] User

59

@@ -157,11 +157,11 @@ instance GoogleRequest UsersUpdate' where

157 type Rs UsersUpdate' = User

158 request = requestWithRoute defReq adminDirectoryURL

159 requestWithRoute r u UsersUpdate'{..}

160− = go _uuQuotaUser (Just _uuPrettyPrint) _uuUserIP

160+ = go _uuUserKey _uuQuotaUser (Just _uuPrettyPrint)

161+ _uuUserIP

162+ _uuFields

161 _uuKey

163 _uuKey

162 _uuOAuthToken

164 _uuOAuthToken

163− _uuUserKey

164− _uuFields

165 (Just AltJSON)

166 _uuUser

167 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Watch.hs+33−32

@@ -59,27 +59,28 @@ import Network.Google.Prelude

59type UsersWatchResource =

60 "users" :>

61 "watch" :>

62− QueryParam "event" DirectoryUsersWatchEvent :>

62+ QueryParam "customFieldMask" Text :>

63− QueryParam "quotaUser" Text :>

63+ QueryParam "customer" Text :>

64− QueryParam "prettyPrint" Bool :>

64+ QueryParam "domain" Text :>

65+ QueryParam "event" DirectoryUsersWatchEvent :>

66+ QueryParam "maxResults" Int32 :>

65− QueryParam "orderBy" DirectoryUsersWatchOrderBy :>

67+ QueryParam "orderBy" DirectoryUsersWatchOrderBy :>

66− QueryParam "viewType" DirectoryUsersWatchViewType :>

67− QueryParam "customFieldMask" Text :>

68− QueryParam "userIp" Text :>

68+ QueryParam "pageToken" Text :>

69− QueryParam "domain" Text :>

69+ QueryParam "projection" DirectoryUsersWatchProjection

70+ :>

71+ QueryParam "query" Text :>

70− QueryParam "showDeleted" Text :>

72+ QueryParam "showDeleted" Text :>

71− QueryParam "sortOrder" DirectoryUsersWatchSortOrder

73+ QueryParam "sortOrder" DirectoryUsersWatchSortOrder

72− :>

74+ :>

73− QueryParam "customer" Text :>

75+ QueryParam "viewType" DirectoryUsersWatchViewType

76+ :>

77+ QueryParam "quotaUser" Text :>

78+ QueryParam "prettyPrint" Bool :>

79+ QueryParam "userIp" Text :>

80+ QueryParam "fields" Text :>

74− QueryParam "key" Key :>

81+ QueryParam "key" Key :>

75− QueryParam "query" Text :>

76− QueryParam "projection"

77− DirectoryUsersWatchProjection

78− :>

79− QueryParam "pageToken" Text :>

80− QueryParam "oauth_token" OAuthToken :>

82+ QueryParam "oauth_token" OAuthToken

81− QueryParam "maxResults" Int32 :>

83+ :>

82− QueryParam "fields" Text :>

83 QueryParam "alt" AltJSON :>

84 QueryParam "alt" AltJSON :>

84 ReqBody '[JSON] Channel :>

85 ReqBody '[JSON] Channel :>

85 Post '[JSON] Channel

86 Post '[JSON] Channel

@@ -286,22 +287,22 @@ instance GoogleRequest UsersWatch' where

286 type Rs UsersWatch' = Channel

287 type Rs UsersWatch' = Channel

287 request = requestWithRoute defReq adminDirectoryURL

288 request = requestWithRoute defReq adminDirectoryURL

288 requestWithRoute r u UsersWatch'{..}

289 requestWithRoute r u UsersWatch'{..}

289− = go _uwEvent _uwQuotaUser (Just _uwPrettyPrint)

290+ = go _uwCustomFieldMask _uwCustomer _uwDomain

291+ _uwEvent

292+ _uwMaxResults

290 _uwOrderBy

293 _uwOrderBy

291− (Just _uwViewType)

294+ _uwPageToken

292− _uwCustomFieldMask

295+ (Just _uwProjection)

293− _uwUserIP

296+ _uwQuery

294− _uwDomain

295 _uwShowDeleted

297 _uwShowDeleted

296 _uwSortOrder

298 _uwSortOrder

297− _uwCustomer

299+ (Just _uwViewType)

300+ _uwQuotaUser

301+ (Just _uwPrettyPrint)

302+ _uwUserIP

303+ _uwFields

298 _uwKey

304 _uwKey

299− _uwQuery

300− (Just _uwProjection)

301− _uwPageToken

302 _uwOAuthToken

305 _uwOAuthToken

303− _uwMaxResults

304− _uwFields

305 (Just AltJSON)

306 (Just AltJSON)

306 _uwChannel

307 _uwChannel

307 where go

308 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/Generate.hs+6−6

@@ -52,9 +52,9 @@ type VerificationCodesGenerateResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Post '[JSON] ()

59

60-- | Generate new backup verification codes for the user.

@@ -151,11 +151,11 @@ instance GoogleRequest VerificationCodesGenerate'

151 type Rs VerificationCodesGenerate' = ()

152 request = requestWithRoute defReq adminDirectoryURL

153 requestWithRoute r u VerificationCodesGenerate'{..}

154− = go _vcgQuotaUser (Just _vcgPrettyPrint) _vcgUserIP

154+ = go _vcgUserKey _vcgQuotaUser (Just _vcgPrettyPrint)

155+ _vcgUserIP

156+ _vcgFields

155 _vcgKey

157 _vcgKey

156 _vcgOAuthToken

158 _vcgOAuthToken

157− _vcgUserKey

158− _vcgFields

159 (Just AltJSON)

160 where go

161 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/Invalidate.hs+6−6

@@ -52,9 +52,9 @@ type VerificationCodesInvalidateResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Post '[JSON] ()

59

60-- | Invalidate the current backup verification codes for the user.

@@ -152,11 +152,11 @@ instance GoogleRequest VerificationCodesInvalidate'

152 type Rs VerificationCodesInvalidate' = ()

153 request = requestWithRoute defReq adminDirectoryURL

154 requestWithRoute r u VerificationCodesInvalidate'{..}

155− = go _vciQuotaUser (Just _vciPrettyPrint) _vciUserIP

155+ = go _vciUserKey _vciQuotaUser (Just _vciPrettyPrint)

156+ _vciUserIP

157+ _vciFields

156 _vciKey

158 _vciKey

157 _vciOAuthToken

159 _vciOAuthToken

158− _vciUserKey

159− _vciFields

160 (Just AltJSON)

161 where go

162 = clientWithRoute

gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/List.hs+6−6

@@ -52,9 +52,9 @@ type VerificationCodesListResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] VerificationCodes

60

@@ -153,11 +153,11 @@ instance GoogleRequest VerificationCodesList' where

153 type Rs VerificationCodesList' = VerificationCodes

154 request = requestWithRoute defReq adminDirectoryURL

155 requestWithRoute r u VerificationCodesList'{..}

156− = go _vclQuotaUser (Just _vclPrettyPrint) _vclUserIP

156+ = go _vclUserKey _vclQuotaUser (Just _vclPrettyPrint)

157+ _vclUserIP

158+ _vclFields

157 _vclKey

159 _vclKey

158 _vclOAuthToken

160 _vclOAuthToken

159− _vclUserKey

160− _vclFields

161 (Just AltJSON)

162 where go

163 = clientWithRoute

gogol-admin-emailmigration/gen/Network/Google/Resource/EmailMigration/Mail/Insert.hs+7−7

@@ -52,9 +52,9 @@ type MailInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 MultipartRelated '[JSON] MailItem Body :>

60 Post '[JSON] ()

@@ -168,12 +168,12 @@ instance GoogleRequest MailInsert' where

168 request

169 = requestWithRoute defReq adminEmailMigrationURL

170 requestWithRoute r u MailInsert'{..}

171+ = go _miMedia _miUserKey _miQuotaUser

171− = go _miQuotaUser (Just _miPrettyPrint) _miUserIP

172+ (Just _miPrettyPrint)

172− _miMedia

173+ _miUserIP

174+ _miFields

173 _miKey

175 _miKey

174 _miOAuthToken

176 _miOAuthToken

175− _miUserKey

176− _miFields

177 (Just AltJSON)

178 _miMailItem

179 where go

gogol-admin-reports/gen/Network/Google/Resource/Admin/Channels/Stop.hs+4−4

@@ -52,9 +52,9 @@ type ChannelsStopResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Channel :> Post '[JSON] ()

60

@@ -149,9 +149,9 @@ instance GoogleRequest ChannelsStop' where

149 request = requestWithRoute defReq adminReportsURL

150 requestWithRoute r u ChannelsStop'{..}

151 = go _csQuotaUser (Just _csPrettyPrint) _csUserIP

152+ _csFields

152 _csKey

153 _csKey

153 _csOAuthToken

154 _csOAuthToken

154− _csFields

155 (Just AltJSON)

156 _csChannel

157 where go

gogol-admin-reports/gen/Network/Google/Resource/Reports/Activities/List.hs+23−23

@@ -59,20 +59,20 @@ type ActivitiesListResource =

59 Capture "userKey" Text :>

60 "applications" :>

61 Capture "applicationName" Text :>

62− QueryParam "quotaUser" Text :>

62+ QueryParam "actorIpAddress" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParam "customerId" Text :>

64− QueryParam "startTime" Text :>

64+ QueryParam "endTime" Text :>

65− QueryParam "userIp" Text :>

65+ QueryParam "eventName" Text :>

66 QueryParam "filters" Text :>

67− QueryParam "customerId" Text :>

67+ QueryParam "maxResults" Int32 :>

68− QueryParam "actorIpAddress" Text :>

68+ QueryParam "pageToken" Text :>

69− QueryParam "key" Key :>

69+ QueryParam "startTime" Text :>

70− QueryParam "endTime" Text :>

70+ QueryParam "quotaUser" Text :>

71− QueryParam "pageToken" Text :>

71+ QueryParam "prettyPrint" Bool :>

72− QueryParam "oauth_token" OAuthToken :>

72+ QueryParam "userIp" Text :>

73− QueryParam "eventName" Text :>

73+ QueryParam "fields" Text :>

74− QueryParam "maxResults" Int32 :>

74+ QueryParam "key" Key :>

75− QueryParam "fields" Text :>

75+ QueryParam "oauth_token" OAuthToken :>

76 QueryParam "alt" AltJSON :>

77 Get '[JSON] Activities

78

@@ -254,20 +254,20 @@ instance GoogleRequest ActivitiesList' where

254 type Rs ActivitiesList' = Activities

255 request = requestWithRoute defReq adminReportsURL

256 requestWithRoute r u ActivitiesList'{..}

257− = go _alQuotaUser (Just _alPrettyPrint) _alStartTime

257+ = go _alActorIPAddress _alCustomerId _alEndTime

258− _alUserIP

258+ _alEventName

259 _alFilters

260− _alCustomerId

260+ _alMaxResults

261− _alActorIPAddress

262− _alKey

263− _alEndTime

264− _alApplicationName

265 _alPageToken

261 _alPageToken

266− _alOAuthToken

262+ _alStartTime

267− _alEventName

268 _alUserKey

263 _alUserKey

269− _alMaxResults

264+ _alApplicationName

265+ _alQuotaUser

266+ (Just _alPrettyPrint)

267+ _alUserIP

270 _alFields

268 _alFields

269+ _alKey

270+ _alOAuthToken

271 (Just AltJSON)

272 where go

273 = clientWithRoute

gogol-admin-reports/gen/Network/Google/Resource/Reports/Activities/Watch.hs+24−23

@@ -61,20 +61,21 @@ type ActivitiesWatchResource =

61 "applications" :>

62 Capture "applicationName" Text :>

63 "watch" :>

64− QueryParam "quotaUser" Text :>

64+ QueryParam "actorIpAddress" Text :>

65− QueryParam "prettyPrint" Bool :>

65+ QueryParam "customerId" Text :>

66− QueryParam "startTime" Text :>

66+ QueryParam "endTime" Text :>

67− QueryParam "userIp" Text :>

67+ QueryParam "eventName" Text :>

68 QueryParam "filters" Text :>

69− QueryParam "customerId" Text :>

69+ QueryParam "maxResults" Int32 :>

70− QueryParam "actorIpAddress" Text :>

70+ QueryParam "pageToken" Text :>

71− QueryParam "key" Key :>

71+ QueryParam "startTime" Text :>

72− QueryParam "endTime" Text :>

72+ QueryParam "quotaUser" Text :>

73− QueryParam "pageToken" Text :>

73+ QueryParam "prettyPrint" Bool :>

74− QueryParam "oauth_token" OAuthToken :>

74+ QueryParam "userIp" Text :>

75− QueryParam "eventName" Text :>

75+ QueryParam "fields" Text :>

76− QueryParam "maxResults" Int32 :>

76+ QueryParam "key" Key :>

77− QueryParam "fields" Text :>

77+ QueryParam "oauth_token" OAuthToken

78+ :>

78 QueryParam "alt" AltJSON :>

79 QueryParam "alt" AltJSON :>

79 ReqBody '[JSON] Channel :>

80 ReqBody '[JSON] Channel :>

80 Post '[JSON] Channel

81 Post '[JSON] Channel

@@ -267,20 +268,20 @@ instance GoogleRequest ActivitiesWatch' where

267 type Rs ActivitiesWatch' = Channel

268 type Rs ActivitiesWatch' = Channel

268 request = requestWithRoute defReq adminReportsURL

269 request = requestWithRoute defReq adminReportsURL

269 requestWithRoute r u ActivitiesWatch'{..}

270 requestWithRoute r u ActivitiesWatch'{..}

270− = go _awQuotaUser (Just _awPrettyPrint) _awStartTime

271+ = go _awActorIPAddress _awCustomerId _awEndTime

271− _awUserIP

272+ _awEventName

272 _awFilters

273 _awFilters

273− _awCustomerId

274+ _awMaxResults

274− _awActorIPAddress

275− _awKey

276− _awEndTime

277− _awApplicationName

278 _awPageToken

275 _awPageToken

279− _awOAuthToken

276+ _awStartTime

280− _awEventName

281 _awUserKey

277 _awUserKey

282− _awMaxResults

278+ _awApplicationName

279+ _awQuotaUser

280+ (Just _awPrettyPrint)

281+ _awUserIP

283 _awFields

282 _awFields

283+ _awKey

284+ _awOAuthToken

284 (Just AltJSON)

285 (Just AltJSON)

285 _awChannel

286 _awChannel

286 where go

287 where go

gogol-admin-reports/gen/Network/Google/Resource/Reports/CustomerUsageReports/Get.hs+14−15

@@ -52,15 +52,15 @@ type CustomerUsageReportsGetResource =

52 "usage" :>

53 "dates" :>

54 Capture "date" Text :>

55− QueryParam "quotaUser" Text :>

55+ QueryParam "customerId" Text :>

56− QueryParam "prettyPrint" Bool :>

56+ QueryParam "pageToken" Text :>

57− QueryParam "userIp" Text :>

57+ QueryParam "parameters" Text :>

58− QueryParam "customerId" Text :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "parameters" Text :>

60+ QueryParam "userIp" Text :>

61− QueryParam "pageToken" Text :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] UsageReports

66

@@ -190,15 +190,14 @@ instance GoogleRequest CustomerUsageReportsGet' where

190 type Rs CustomerUsageReportsGet' = UsageReports

191 request = requestWithRoute defReq adminReportsURL

192 requestWithRoute r u CustomerUsageReportsGet'{..}

193− = go _curgQuotaUser (Just _curgPrettyPrint)

194− _curgUserIP

195− _curgCustomerId

193+ = go _curgCustomerId _curgPageToken _curgParameters

196 _curgDate

194 _curgDate

195+ _curgQuotaUser

196+ (Just _curgPrettyPrint)

197+ _curgUserIP

198+ _curgFields

197 _curgKey

199 _curgKey

198− _curgParameters

199− _curgPageToken

200 _curgOAuthToken

201− _curgFields

202 (Just AltJSON)

201 (Just AltJSON)

203 where go

202 where go

204 = clientWithRoute

203 = clientWithRoute

gogol-admin-reports/gen/Network/Google/Resource/Reports/UserUsageReport/Get.hs+19−20

@@ -57,17 +57,17 @@ type UserUsageReportGetResource =

57 Capture "userKey" Text :>

58 "dates" :>

59 Capture "date" Text :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "customerId" Text :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "filters" Text :>

62− QueryParam "userIp" Text :>

62+ QueryParam "maxResults" Word32 :>

63− QueryParam "filters" Text :>

63+ QueryParam "pageToken" Text :>

64− QueryParam "customerId" Text :>

64+ QueryParam "parameters" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "quotaUser" Text :>

66− QueryParam "parameters" Text :>

66+ QueryParam "prettyPrint" Bool :>

67− QueryParam "pageToken" Text :>

67+ QueryParam "userIp" Text :>

68− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "fields" Text :>

69− QueryParam "maxResults" Word32 :>

69+ QueryParam "key" Key :>

70− QueryParam "fields" Text :>

70+ QueryParam "oauth_token" OAuthToken :>

71 QueryParam "alt" AltJSON :>

72 Get '[JSON] UsageReports

73

@@ -227,18 +227,17 @@ instance GoogleRequest UserUsageReportGet' where

227 type Rs UserUsageReportGet' = UsageReports

228 request = requestWithRoute defReq adminReportsURL

229 requestWithRoute r u UserUsageReportGet'{..}

230− = go _uurgQuotaUser (Just _uurgPrettyPrint)

231− _uurgUserIP

232− _uurgFilters

230+ = go _uurgCustomerId _uurgFilters _uurgMaxResults

233− _uurgCustomerId

234− _uurgDate

235− _uurgKey

236− _uurgParameters

237 _uurgPageToken

231 _uurgPageToken

238− _uurgOAuthToken

232+ _uurgParameters

239 _uurgUserKey

233 _uurgUserKey

240− _uurgMaxResults

234+ _uurgDate

235+ _uurgQuotaUser

236+ (Just _uurgPrettyPrint)

237+ _uurgUserIP

241 _uurgFields

238 _uurgFields

239+ _uurgKey

240+ _uurgOAuthToken

242 (Just AltJSON)

241 (Just AltJSON)

243 where go

242 where go

244 = clientWithRoute

243 = clientWithRoute

gogol-adsense-host/gen/Network/Google/AdSenseHost.hs+2−2

@@ -164,7 +164,7 @@ module Network.Google.AdSenseHost

164

165 -- ** URLChannels

166 , URLChannels

167− , uRLChannels

167+ , urlChannels

168 , ucEtag

169 , ucNextPageToken

170 , ucKind

@@ -257,7 +257,7 @@ module Network.Google.AdSenseHost

257

258 -- ** URLChannel

259 , URLChannel

260− , uRLChannel

260+ , urlChannel

261 , urlcKind

262 , urlcId

263 , urlcURLPattern

gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+2−2

@@ -74,7 +74,7 @@ module Network.Google.AdSenseHost.Types

74

75 -- * URLChannels

76 , URLChannels

77− , uRLChannels

77+ , urlChannels

78 , ucEtag

79 , ucNextPageToken

80 , ucKind

@@ -167,7 +167,7 @@ module Network.Google.AdSenseHost.Types

167

168 -- * URLChannel

169 , URLChannel

170− , uRLChannel

170+ , urlChannel

171 , urlcKind

172 , urlcId

173 , urlcURLPattern

gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Product.hs+6−6

@@ -515,7 +515,7 @@ instance ToJSON AdUnit where

515 ("code" .=) <$> _adCode, ("id" .=) <$> _adId])

516

517--

518−-- /See:/ 'uRLChannels' smart constructor.

518+-- /See:/ 'urlChannels' smart constructor.

519data URLChannels = URLChannels

520 { _ucEtag :: !(Maybe Text)

521 , _ucNextPageToken :: !(Maybe Text)

@@ -534,9 +534,9 @@ data URLChannels = URLChannels

534-- * 'ucKind'

535--

536-- * 'ucItems'

537−uRLChannels

537+urlChannels

538 :: URLChannels

539−uRLChannels =

539+urlChannels =

540 URLChannels

541 { _ucEtag = Nothing

542 , _ucNextPageToken = Nothing

@@ -1310,7 +1310,7 @@ instance ToJSON CustomChannel where

1310 ("code" .=) <$> _cCode, ("id" .=) <$> _cId])

1311

1312--

1313−-- /See:/ 'uRLChannel' smart constructor.

1313+-- /See:/ 'urlChannel' smart constructor.

1314data URLChannel = URLChannel

1315 { _urlcKind :: !Text

1316 , _urlcId :: !(Maybe Text)

@@ -1326,9 +1326,9 @@ data URLChannel = URLChannel

1326-- * 'urlcId'

1327--

1328-- * 'urlcURLPattern'

1329−uRLChannel

1329+urlChannel

1330 :: URLChannel

1331−uRLChannel =

1331+urlChannel =

1332 URLChannel

1333 { _urlcKind = "adsensehost#urlChannel"

1334 , _urlcId = Nothing

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/Get.hs+6−7

@@ -54,9 +54,9 @@ type AccountsAdClientsGetResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] AdClient

61

62-- | Get information about one of the ad clients in the specified

@@ -166,13 +166,12 @@ instance GoogleRequest AccountsAdClientsGet' where

166 type Rs AccountsAdClientsGet' = AdClient

167 request = requestWithRoute defReq adSenseHostURL

168 requestWithRoute r u AccountsAdClientsGet'{..}

169+ = go _aacgAccountId _aacgAdClientId _aacgQuotaUser

169− = go _aacgQuotaUser (Just _aacgPrettyPrint)

170+ (Just _aacgPrettyPrint)

170 _aacgUserIP

171 _aacgUserIP

171− _aacgAdClientId

172+ _aacgFields

172− _aacgAccountId

173 _aacgKey

174 _aacgOAuthToken

175− _aacgFields

176 (Just AltJSON)

175 (Just AltJSON)

177 where go

176 where go

178 = clientWithRoute

177 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdClients/List.hs+12−13

@@ -50,14 +50,14 @@ type AccountsAdClientsListResource =

50 "accounts" :>

51 Capture "accountId" Text :>

52 "adclients" :>

53+ QueryParam "maxResults" Word32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Word32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] AdClients

62

63-- | List all hosted ad clients in the specified hosted account.

@@ -178,14 +178,13 @@ instance GoogleRequest AccountsAdClientsList' where

178 type Rs AccountsAdClientsList' = AdClients

179 request = requestWithRoute defReq adSenseHostURL

180 requestWithRoute r u AccountsAdClientsList'{..}

181+ = go _aaclMaxResults _aaclPageToken _aaclAccountId

182+ _aaclQuotaUser

181− = go _aaclQuotaUser (Just _aaclPrettyPrint)

183+ (Just _aaclPrettyPrint)

182 _aaclUserIP

184 _aaclUserIP

183− _aaclAccountId

185+ _aaclFields

184 _aaclKey

186 _aaclKey

185− _aaclPageToken

186 _aaclOAuthToken

187 _aaclOAuthToken

187− _aaclMaxResults

188− _aaclFields

189 (Just AltJSON)

188 (Just AltJSON)

190 where go

189 where go

191 = clientWithRoute

190 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Delete.hs+7−8

@@ -57,9 +57,9 @@ type AccountsAdUnitsDeleteResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Delete '[JSON] AdUnit

64

65-- | Delete the specified ad unit from the specified publisher AdSense

@@ -179,14 +179,13 @@ instance GoogleRequest AccountsAdUnitsDelete' where

179 type Rs AccountsAdUnitsDelete' = AdUnit

180 request = requestWithRoute defReq adSenseHostURL

181 requestWithRoute r u AccountsAdUnitsDelete'{..}

182+ = go _aaudAccountId _aaudAdClientId _aaudAdUnitId

183+ _aaudQuotaUser

182− = go _aaudQuotaUser (Just _aaudPrettyPrint)

184+ (Just _aaudPrettyPrint)

183 _aaudUserIP

185 _aaudUserIP

184− _aaudAdUnitId

186+ _aaudFields

185− _aaudAdClientId

186− _aaudAccountId

187 _aaudKey

188 _aaudOAuthToken

189− _aaudFields

190 (Just AltJSON)

189 (Just AltJSON)

191 where go

190 where go

192 = clientWithRoute

191 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Get.hs+7−8

@@ -56,9 +56,9 @@ type AccountsAdUnitsGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] AdUnit

63

64-- | Get the specified host ad unit in this AdSense account.

@@ -177,14 +177,13 @@ instance GoogleRequest AccountsAdUnitsGet' where

177 type Rs AccountsAdUnitsGet' = AdUnit

178 request = requestWithRoute defReq adSenseHostURL

179 requestWithRoute r u AccountsAdUnitsGet'{..}

180+ = go _aaugAccountId _aaugAdClientId _aaugAdUnitId

181+ _aaugQuotaUser

180− = go _aaugQuotaUser (Just _aaugPrettyPrint)

182+ (Just _aaugPrettyPrint)

181 _aaugUserIP

183 _aaugUserIP

182− _aaugAdUnitId

184+ _aaugFields

183− _aaugAdClientId

184− _aaugAccountId

185 _aaugKey

186 _aaugOAuthToken

187− _aaugFields

188 (Just AltJSON)

187 (Just AltJSON)

189 where go

188 where go

190 = clientWithRoute

189 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/GetAdCode.hs+13−13

@@ -56,13 +56,13 @@ type AccountsAdUnitsGetAdCodeResource =

56 "adunits" :>

57 Capture "adUnitId" Text :>

58 "adcode" :>

59− QueryParam "quotaUser" Text :>

59+ QueryParams "hostCustomChannelId" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

61− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

62− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

63− QueryParams "hostCustomChannelId" Text :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] AdCode

67

68-- | Get ad code for the specified ad unit, attaching the specified host

@@ -195,15 +195,15 @@ instance GoogleRequest AccountsAdUnitsGetAdCode'

195 type Rs AccountsAdUnitsGetAdCode' = AdCode

196 request = requestWithRoute defReq adSenseHostURL

197 requestWithRoute r u AccountsAdUnitsGetAdCode'{..}

198− = go _aaugacQuotaUser (Just _aaugacPrettyPrint)

198+ = go _aaugacHostCustomChannelId _aaugacAccountId

199− _aaugacUserIP

200− _aaugacAdUnitId

201 _aaugacAdClientId

199 _aaugacAdClientId

202− _aaugacAccountId

200+ _aaugacAdUnitId

201+ _aaugacQuotaUser

202+ (Just _aaugacPrettyPrint)

203+ _aaugacUserIP

204+ _aaugacFields

203 _aaugacKey

205 _aaugacKey

204− _aaugacHostCustomChannelId

205 _aaugacOAuthToken

206 _aaugacOAuthToken

206− _aaugacFields

207 (Just AltJSON)

208 where go

209 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Insert.hs+6−7

@@ -56,9 +56,9 @@ type AccountsAdUnitsInsertResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] AdUnit :> Post '[JSON] AdUnit

64

@@ -179,13 +179,12 @@ instance GoogleRequest AccountsAdUnitsInsert' where

179 type Rs AccountsAdUnitsInsert' = AdUnit

180 request = requestWithRoute defReq adSenseHostURL

181 requestWithRoute r u AccountsAdUnitsInsert'{..}

182+ = go _aauiAccountId _aauiAdClientId _aauiQuotaUser

182− = go _aauiQuotaUser (Just _aauiPrettyPrint)

183+ (Just _aauiPrettyPrint)

183 _aauiUserIP

184 _aauiUserIP

184− _aauiAdClientId

185+ _aauiFields

185− _aauiAccountId

186 _aauiKey

187 _aauiOAuthToken

188− _aauiFields

189 (Just AltJSON)

188 (Just AltJSON)

190 _aauiAdUnit

189 _aauiAdUnit

191 where go

190 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/List.hs+16−16

@@ -54,15 +54,15 @@ type AccountsAdUnitsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "adunits" :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "includeInactive" Bool :>

58− QueryParam "prettyPrint" Bool :>

58+ QueryParam "maxResults" Word32 :>

59− QueryParam "includeInactive" Bool :>

59+ QueryParam "pageToken" Text :>

60+ QueryParam "quotaUser" Text :>

61+ QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

62− QueryParam "pageToken" Text :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "maxResults" Word32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] AdUnits

67

68-- | List all ad units in the specified publisher\'s AdSense account.

@@ -204,16 +204,16 @@ instance GoogleRequest AccountsAdUnitsList' where

204 type Rs AccountsAdUnitsList' = AdUnits

205 request = requestWithRoute defReq adSenseHostURL

206 requestWithRoute r u AccountsAdUnitsList'{..}

207− = go _aaulQuotaUser (Just _aaulPrettyPrint)

208− _aaulIncludeInactive

207+ = go _aaulIncludeInactive _aaulMaxResults

209− _aaulUserIP

208+ _aaulPageToken

210− _aaulAdClientId

211 _aaulAccountId

209 _aaulAccountId

210+ _aaulAdClientId

211+ _aaulQuotaUser

212+ (Just _aaulPrettyPrint)

213+ _aaulUserIP

214+ _aaulFields

212 _aaulKey

215 _aaulKey

213− _aaulPageToken

214 _aaulOAuthToken

216 _aaulOAuthToken

215− _aaulMaxResults

216− _aaulFields

217 (Just AltJSON)

218 where go

219 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Patch.hs+12−12

@@ -54,13 +54,13 @@ type AccountsAdUnitsPatchResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "adunits" :>

57+ QueryParam "adUnitId" Text :>

57− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

60− QueryParam "adUnitId" Text :>

60+ QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] AdUnit :> Patch '[JSON] AdUnit

66

@@ -191,14 +191,14 @@ instance GoogleRequest AccountsAdUnitsPatch' where

191 type Rs AccountsAdUnitsPatch' = AdUnit

192 request = requestWithRoute defReq adSenseHostURL

193 requestWithRoute r u AccountsAdUnitsPatch'{..}

194− = go _aaupQuotaUser (Just _aaupPrettyPrint)

194+ = go _aaupAccountId _aaupAdClientId

195− _aaupUserIP

196 (Just _aaupAdUnitId)

195 (Just _aaupAdUnitId)

197− _aaupAdClientId

196+ _aaupQuotaUser

198− _aaupAccountId

197+ (Just _aaupPrettyPrint)

198+ _aaupUserIP

199+ _aaupFields

199 _aaupKey

200 _aaupKey

200 _aaupOAuthToken

201 _aaupOAuthToken

201− _aaupFields

202 (Just AltJSON)

203 _aaupAdUnit

204 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/AdUnits/Update.hs+6−7

@@ -55,9 +55,9 @@ type AccountsAdUnitsUpdateResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] AdUnit :> Put '[JSON] AdUnit

63

@@ -177,13 +177,12 @@ instance GoogleRequest AccountsAdUnitsUpdate' where

177 type Rs AccountsAdUnitsUpdate' = AdUnit

178 request = requestWithRoute defReq adSenseHostURL

179 requestWithRoute r u AccountsAdUnitsUpdate'{..}

180+ = go _aauuAccountId _aauuAdClientId _aauuQuotaUser

180− = go _aauuQuotaUser (Just _aauuPrettyPrint)

181+ (Just _aauuPrettyPrint)

181 _aauuUserIP

182 _aauuUserIP

182− _aauuAdClientId

183+ _aauuFields

183− _aauuAccountId

184 _aauuKey

185 _aauuOAuthToken

186− _aauuFields

187 (Just AltJSON)

186 (Just AltJSON)

188 _aauuAdUnit

187 _aauuAdUnit

189 where go

188 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs+6−6

@@ -50,9 +50,9 @@ type AccountsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Account

57

58-- | Get information about the selected associated AdSense account.

@@ -145,11 +145,11 @@ instance GoogleRequest AccountsGet' where

145 type Rs AccountsGet' = Account

146 request = requestWithRoute defReq adSenseHostURL

147 requestWithRoute r u AccountsGet'{..}

148− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

148+ = go _agAccountId _agQuotaUser (Just _agPrettyPrint)

149− _agAccountId

149+ _agUserIP

150+ _agFields

150 _agKey

151 _agKey

151 _agOAuthToken

152 _agOAuthToken

152− _agFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs+11−10

@@ -47,13 +47,13 @@ import Network.Google.Prelude

47-- 'AccountsList'' request conforms to.

48type AccountsListResource =

49 "accounts" :>

50− QueryParam "quotaUser" Text :>

50+ QueryParams "filterAdClientId" Text :>

51+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

52+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

53+ QueryParam "userIp" Text :>

54+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

55+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

55− QueryParams "filterAdClientId" Text :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Accounts

58

59-- | List hosted accounts associated with this AdSense account by ad client

@@ -148,11 +148,12 @@ instance GoogleRequest AccountsList' where

148 type Rs AccountsList' = Accounts

149 request = requestWithRoute defReq adSenseHostURL

150 requestWithRoute r u AccountsList'{..}

151+ = go (Just _alFilterAdClientId) _alQuotaUser

151− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

152+ (Just _alPrettyPrint)

153+ _alUserIP

154+ _alFields

152 _alKey

155 _alKey

153 _alOAuthToken

156 _alOAuthToken

154− (Just _alFilterAdClientId)

155− _alFields

156 (Just AltJSON)

157 (Just AltJSON)

157 where go

158 where go

158 = clientWithRoute

159 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs+25−25

@@ -59,21 +59,21 @@ type AccountsReportsGenerateResource =

59 "accounts" :>

60 Capture "accountId" Text :>

61 "reports" :>

62− QueryParam "quotaUser" Text :>

62+ QueryParams "dimension" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParams "filter" Text :>

64− QueryParam "userIp" Text :>

64+ QueryParam "locale" Text :>

65− QueryParams "dimension" Text :>

65+ QueryParam "maxResults" Word32 :>

66− QueryParam "locale" Text :>

66+ QueryParams "metric" Text :>

67− QueryParam "endDate" Text :>

67+ QueryParams "sort" Text :>

68− QueryParam "startDate" Text :>

68+ QueryParam "startIndex" Word32 :>

69− QueryParams "metric" Text :>

69+ QueryParam "startDate" Text :>

70− QueryParam "key" Key :>

70+ QueryParam "endDate" Text :>

71− QueryParams "sort" Text :>

71+ QueryParam "quotaUser" Text :>

72− QueryParams "filter" Text :>

72+ QueryParam "prettyPrint" Bool :>

73− QueryParam "oauth_token" OAuthToken :>

73+ QueryParam "userIp" Text :>

74− QueryParam "startIndex" Word32 :>

74+ QueryParam "fields" Text :>

75− QueryParam "maxResults" Word32 :>

75+ QueryParam "key" Key :>

76− QueryParam "fields" Text :>

76+ QueryParam "oauth_token" OAuthToken :>

77 QueryParam "alt" AltJSON :>

78 Get '[JSON] Report

79

@@ -260,20 +260,20 @@ instance GoogleRequest AccountsReportsGenerate' where

260 type Rs AccountsReportsGenerate' = Report

261 request = requestWithRoute defReq adSenseHostURL

262 requestWithRoute r u AccountsReportsGenerate'{..}

263− = go _argQuotaUser (Just _argPrettyPrint) _argUserIP

264− _argDimension

263+ = go _argDimension _argFilter _argLocale

265− _argLocale

264+ _argMaxResults

266− (Just _argEndDate)

267− (Just _argStartDate)

268− _argAccountId

269 _argMetric

265 _argMetric

270− _argKey

271 _argSort

266 _argSort

272− _argFilter

273− _argOAuthToken

274 _argStartIndex

267 _argStartIndex

275− _argMaxResults

268+ _argAccountId

269+ (Just _argStartDate)

270+ (Just _argEndDate)

271+ _argQuotaUser

272+ (Just _argPrettyPrint)

273+ _argUserIP

276 _argFields

274 _argFields

275+ _argKey

276+ _argOAuthToken

277 (Just AltJSON)

278 where go

279 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/AdClients/Get.hs+7−6

@@ -50,9 +50,9 @@ type AdClientsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] AdClient

57

58-- | Get information about one of the ad clients in the Host AdSense account.

@@ -149,11 +149,12 @@ instance GoogleRequest AdClientsGet' where

149 type Rs AdClientsGet' = AdClient

150 request = requestWithRoute defReq adSenseHostURL

151 requestWithRoute r u AdClientsGet'{..}

152+ = go _acgAdClientId _acgQuotaUser

152− = go _acgQuotaUser (Just _acgPrettyPrint) _acgUserIP

153+ (Just _acgPrettyPrint)

153− _acgAdClientId

154+ _acgUserIP

155+ _acgFields

154 _acgKey

156 _acgKey

155 _acgOAuthToken

157 _acgOAuthToken

156− _acgFields

157 (Just AltJSON)

158 (Just AltJSON)

158 where go

159 where go

159 = clientWithRoute

160 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/AdClients/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'AdClientsList'' request conforms to.

48type AdClientsListResource =

49 "adclients" :>

50+ QueryParam "maxResults" Word32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Word32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] AdClients

59

60-- | List all host ad clients in this AdSense account.

@@ -162,12 +162,12 @@ instance GoogleRequest AdClientsList' where

162 type Rs AdClientsList' = AdClients

163 request = requestWithRoute defReq adSenseHostURL

164 requestWithRoute r u AdClientsList'{..}

165+ = go _aclMaxResults _aclPageToken _aclQuotaUser

165− = go _aclQuotaUser (Just _aclPrettyPrint) _aclUserIP

166+ (Just _aclPrettyPrint)

167+ _aclUserIP

168+ _aclFields

166 _aclKey

169 _aclKey

167− _aclPageToken

168 _aclOAuthToken

170 _aclOAuthToken

169− _aclMaxResults

170− _aclFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Associationsessions/Start.hs+19−18

@@ -51,18 +51,18 @@ import Network.Google.Prelude

51type AssociationsessionsStartResource =

52 "associationsessions" :>

53 "start" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "userLocale" Text :>

55+ QueryParam "websiteLocale" Text :>

56+ QueryParams "productCode"

57+ AdsensehostAssociationsessionsStartProductCode

58+ :>

59+ QueryParam "websiteUrl" Text :>

60+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

57− QueryParam "websiteLocale" Text :>

58− QueryParam "userLocale" Text :>

63+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

60− QueryParam "websiteUrl" Text :>

61− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

62− QueryParams "productCode"

63− AdsensehostAssociationsessionsStartProductCode

64− :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] AssociationSession

68

@@ -187,14 +187,15 @@ instance GoogleRequest AssociationsessionsStart'

187 AssociationSession

188 request = requestWithRoute defReq adSenseHostURL

189 requestWithRoute r u AssociationsessionsStart'{..}

190− = go _aQuotaUser (Just _aPrettyPrint) _aUserIP

191− _aWebsiteLocale

190+ = go _aUserLocale _aWebsiteLocale

192− _aUserLocale

193− _aKey

194− (Just _aWebsiteURL)

195− _aOAuthToken

196 (Just _aProductCode)

191 (Just _aProductCode)

192+ (Just _aWebsiteURL)

193+ _aQuotaUser

194+ (Just _aPrettyPrint)

195+ _aUserIP

197 _aFields

196 _aFields

197+ _aKey

198+ _aOAuthToken

198 (Just AltJSON)

199 (Just AltJSON)

199 where go

200 where go

200 = clientWithRoute

201 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Associationsessions/Verify.hs+11−10

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48type AssociationsessionsVerifyResource =

49 "associationsessions" :>

50 "verify" :>

51+ QueryParam "token" Text :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

54− QueryParam "token" Text :>

54+ QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] AssociationSession

60

@@ -150,11 +150,12 @@ instance GoogleRequest AssociationsessionsVerify'

150 AssociationSession

151 request = requestWithRoute defReq adSenseHostURL

152 requestWithRoute r u AssociationsessionsVerify'{..}

153+ = go (Just _avToken) _avQuotaUser

153− = go _avQuotaUser (Just _avPrettyPrint) _avUserIP

154+ (Just _avPrettyPrint)

154− (Just _avToken)

155+ _avUserIP

156+ _avFields

155 _avKey

157 _avKey

156 _avOAuthToken

158 _avOAuthToken

157− _avFields

158 (Just AltJSON)

159 (Just AltJSON)

159 where go

160 where go

160 = clientWithRoute

161 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Delete.hs+6−7

@@ -53,9 +53,9 @@ type CustomChannelsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 Delete '[JSON] CustomChannel

61

@@ -164,13 +164,12 @@ instance GoogleRequest CustomChannelsDelete' where

164 type Rs CustomChannelsDelete' = CustomChannel

165 request = requestWithRoute defReq adSenseHostURL

166 requestWithRoute r u CustomChannelsDelete'{..}

167+ = go _ccdAdClientId _ccdCustomChannelId _ccdQuotaUser

167− = go _ccdQuotaUser (Just _ccdPrettyPrint)

168+ (Just _ccdPrettyPrint)

168− _ccdCustomChannelId

169 _ccdUserIP

170− _ccdAdClientId

170+ _ccdFields

171 _ccdKey

172 _ccdOAuthToken

173− _ccdFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Get.hs+6−7

@@ -53,9 +53,9 @@ type CustomChannelsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] CustomChannel

60

61-- | Get a specific custom channel from the host AdSense account.

@@ -163,13 +163,12 @@ instance GoogleRequest CustomChannelsGet' where

163 type Rs CustomChannelsGet' = CustomChannel

164 request = requestWithRoute defReq adSenseHostURL

165 requestWithRoute r u CustomChannelsGet'{..}

166+ = go _ccgAdClientId _ccgCustomChannelId _ccgQuotaUser

166− = go _ccgQuotaUser (Just _ccgPrettyPrint)

167+ (Just _ccgPrettyPrint)

167− _ccgCustomChannelId

168 _ccgUserIP

169− _ccgAdClientId

169+ _ccgFields

170 _ccgKey

171 _ccgOAuthToken

172− _ccgFields

173 (Just AltJSON)

172 (Just AltJSON)

174 where go

173 where go

175 = clientWithRoute

174 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Insert.hs+7−6

@@ -52,9 +52,9 @@ type CustomChannelsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] CustomChannel :>

60 Post '[JSON] CustomChannel

@@ -164,11 +164,12 @@ instance GoogleRequest CustomChannelsInsert' where

164 type Rs CustomChannelsInsert' = CustomChannel

165 request = requestWithRoute defReq adSenseHostURL

166 requestWithRoute r u CustomChannelsInsert'{..}

167+ = go _cciAdClientId _cciQuotaUser

167− = go _cciQuotaUser (Just _cciPrettyPrint) _cciUserIP

168+ (Just _cciPrettyPrint)

168− _cciAdClientId

169+ _cciUserIP

170+ _cciFields

169 _cciKey

171 _cciKey

170 _cciOAuthToken

172 _cciOAuthToken

171− _cciFields

172 (Just AltJSON)

173 (Just AltJSON)

173 _cciCustomChannel

174 _cciCustomChannel

174 where go

175 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs+13−13

@@ -50,14 +50,14 @@ type CustomChannelsListResource =

50 "adclients" :>

51 Capture "adClientId" Text :>

52 "customchannels" :>

53+ QueryParam "maxResults" Word32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Word32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 Get '[JSON] CustomChannels

63

@@ -177,13 +177,13 @@ instance GoogleRequest CustomChannelsList' where

177 type Rs CustomChannelsList' = CustomChannels

178 request = requestWithRoute defReq adSenseHostURL

179 requestWithRoute r u CustomChannelsList'{..}

180+ = go _cclMaxResults _cclPageToken _cclAdClientId

181+ _cclQuotaUser

180− = go _cclQuotaUser (Just _cclPrettyPrint) _cclUserIP

182+ (Just _cclPrettyPrint)

181− _cclAdClientId

183+ _cclUserIP

184+ _cclFields

182 _cclKey

185 _cclKey

183− _cclPageToken

184 _cclOAuthToken

186 _cclOAuthToken

185− _cclMaxResults

186− _cclFields

187 (Just AltJSON)

188 where go

189 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs+10−10

@@ -51,13 +51,13 @@ type CustomChannelsPatchResource =

51 "adclients" :>

52 Capture "adClientId" Text :>

53 "customchannels" :>

54+ QueryParam "customChannelId" Text :>

54− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

56− QueryParam "customChannelId" Text :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] CustomChannel :>

63 Patch '[JSON] CustomChannel

@@ -179,13 +179,13 @@ instance GoogleRequest CustomChannelsPatch' where

179 type Rs CustomChannelsPatch' = CustomChannel

180 request = requestWithRoute defReq adSenseHostURL

181 requestWithRoute r u CustomChannelsPatch'{..}

182+ = go _ccpAdClientId (Just _ccpCustomChannelId)

183+ _ccpQuotaUser

182− = go _ccpQuotaUser (Just _ccpPrettyPrint)

184+ (Just _ccpPrettyPrint)

183− (Just _ccpCustomChannelId)

184 _ccpUserIP

185 _ccpUserIP

185− _ccpAdClientId

186+ _ccpFields

186 _ccpKey

187 _ccpKey

187 _ccpOAuthToken

188 _ccpOAuthToken

188− _ccpFields

189 (Just AltJSON)

190 _ccpCustomChannel

191 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs+7−6

@@ -52,9 +52,9 @@ type CustomChannelsUpdateResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] CustomChannel :>

60 Put '[JSON] CustomChannel

@@ -164,11 +164,12 @@ instance GoogleRequest CustomChannelsUpdate' where

164 type Rs CustomChannelsUpdate' = CustomChannel

165 request = requestWithRoute defReq adSenseHostURL

166 requestWithRoute r u CustomChannelsUpdate'{..}

167+ = go _ccuAdClientId _ccuQuotaUser

167− = go _ccuQuotaUser (Just _ccuPrettyPrint) _ccuUserIP

168+ (Just _ccuPrettyPrint)

168− _ccuAdClientId

169+ _ccuUserIP

170+ _ccuFields

169 _ccuKey

171 _ccuKey

170 _ccuOAuthToken

172 _ccuOAuthToken

171− _ccuFields

172 (Just AltJSON)

173 (Just AltJSON)

173 _ccuCustomChannel

174 _ccuCustomChannel

174 where go

175 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs+23−24

@@ -56,21 +56,21 @@ import Network.Google.Prelude

56-- 'ReportsGenerate'' request conforms to.

57type ReportsGenerateResource =

58 "reports" :>

59− QueryParam "quotaUser" Text :>

59+ QueryParams "dimension" Text :>

60− QueryParam "prettyPrint" Bool :>

60+ QueryParams "filter" Text :>

61− QueryParam "userIp" Text :>

61+ QueryParam "locale" Text :>

62− QueryParams "dimension" Text :>

62+ QueryParam "maxResults" Word32 :>

63− QueryParam "locale" Text :>

63+ QueryParams "metric" Text :>

64− QueryParam "endDate" Text :>

64+ QueryParams "sort" Text :>

65− QueryParam "startDate" Text :>

65+ QueryParam "startIndex" Word32 :>

66− QueryParams "metric" Text :>

66+ QueryParam "startDate" Text :>

67− QueryParam "key" Key :>

67+ QueryParam "endDate" Text :>

68− QueryParams "sort" Text :>

68+ QueryParam "quotaUser" Text :>

69− QueryParams "filter" Text :>

69+ QueryParam "prettyPrint" Bool :>

70− QueryParam "oauth_token" OAuthToken :>

70+ QueryParam "userIp" Text :>

71− QueryParam "startIndex" Word32 :>

71+ QueryParam "fields" Text :>

72− QueryParam "maxResults" Word32 :>

72+ QueryParam "key" Key :>

73− QueryParam "fields" Text :>

73+ QueryParam "oauth_token" OAuthToken :>

74 QueryParam "alt" AltJSON :>

75 Get '[JSON] Report

76

@@ -239,19 +239,18 @@ instance GoogleRequest ReportsGenerate' where

239 type Rs ReportsGenerate' = Report

240 request = requestWithRoute defReq adSenseHostURL

241 requestWithRoute r u ReportsGenerate'{..}

242− = go _rgQuotaUser (Just _rgPrettyPrint) _rgUserIP

243− _rgDimension

242+ = go _rgDimension _rgFilter _rgLocale _rgMaxResults

244− _rgLocale

245− (Just _rgEndDate)

246− (Just _rgStartDate)

247 _rgMetric

243 _rgMetric

248− _rgKey

249 _rgSort

244 _rgSort

250− _rgFilter

251− _rgOAuthToken

252 _rgStartIndex

245 _rgStartIndex

253− _rgMaxResults

246+ (Just _rgStartDate)

247+ (Just _rgEndDate)

248+ _rgQuotaUser

249+ (Just _rgPrettyPrint)

250+ _rgUserIP

254 _rgFields

251 _rgFields

252+ _rgKey

253+ _rgOAuthToken

255 (Just AltJSON)

254 (Just AltJSON)

256 where go

255 where go

257 = clientWithRoute

256 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs+10−11

@@ -26,7 +26,7 @@ module Network.Google.Resource.AdSenseHost.URLChannels.Delete

26 URLChannelsDeleteResource

27

28 -- * Creating a Request

29− , uRLChannelsDelete'

29+ , urlChannelsDelete'

30 , URLChannelsDelete'

31

32 -- * Request Lenses

@@ -53,14 +53,14 @@ type URLChannelsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] URLChannel

60

61-- | Delete a URL channel from the host AdSense account.

62--

63−-- /See:/ 'uRLChannelsDelete'' smart constructor.

63+-- /See:/ 'urlChannelsDelete'' smart constructor.

64data URLChannelsDelete' = URLChannelsDelete'

65 { _ucdQuotaUser :: !(Maybe Text)

66 , _ucdPrettyPrint :: !Bool

@@ -91,11 +91,11 @@ data URLChannelsDelete' = URLChannelsDelete'

91-- * 'ucdOAuthToken'

92--

93-- * 'ucdFields'

94−uRLChannelsDelete'

94+urlChannelsDelete'

95 :: Text -- ^ 'urlChannelId'

96 -> Text -- ^ 'adClientId'

97 -> URLChannelsDelete'

98−uRLChannelsDelete' pUcdURLChannelId_ pUcdAdClientId_ =

98+urlChannelsDelete' pUcdURLChannelId_ pUcdAdClientId_ =

99 URLChannelsDelete'

100 { _ucdQuotaUser = Nothing

101 , _ucdPrettyPrint = True

@@ -163,13 +163,12 @@ instance GoogleRequest URLChannelsDelete' where

163 type Rs URLChannelsDelete' = URLChannel

164 request = requestWithRoute defReq adSenseHostURL

165 requestWithRoute r u URLChannelsDelete'{..}

166+ = go _ucdAdClientId _ucdURLChannelId _ucdQuotaUser

166− = go _ucdQuotaUser (Just _ucdPrettyPrint)

167+ (Just _ucdPrettyPrint)

167− _ucdURLChannelId

168 _ucdUserIP

169− _ucdAdClientId

169+ _ucdFields

170 _ucdKey

171 _ucdOAuthToken

172− _ucdFields

173 (Just AltJSON)

172 (Just AltJSON)

174 where go

173 where go

175 = clientWithRoute

174 = clientWithRoute

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs+11−10

@@ -26,7 +26,7 @@ module Network.Google.Resource.AdSenseHost.URLChannels.Insert

26 URLChannelsInsertResource

27

28 -- * Creating a Request

29− , uRLChannelsInsert'

29+ , urlChannelsInsert'

30 , URLChannelsInsert'

31

32 -- * Request Lenses

@@ -52,15 +52,15 @@ type URLChannelsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] URLChannel :> Post '[JSON] URLChannel

60

61-- | Add a new URL channel to the host AdSense account.

62--

63−-- /See:/ 'uRLChannelsInsert'' smart constructor.

63+-- /See:/ 'urlChannelsInsert'' smart constructor.

64data URLChannelsInsert' = URLChannelsInsert'

65 { _uciQuotaUser :: !(Maybe Text)

66 , _uciPrettyPrint :: !Bool

@@ -91,11 +91,11 @@ data URLChannelsInsert' = URLChannelsInsert'

91-- * 'uciOAuthToken'

92--

93-- * 'uciFields'

94−uRLChannelsInsert'

94+urlChannelsInsert'

95 :: Text -- ^ 'adClientId'

96 -> URLChannel -- ^ 'URLChannel'

97 -> URLChannelsInsert'

98−uRLChannelsInsert' pUciAdClientId_ pUciURLChannel_ =

98+urlChannelsInsert' pUciAdClientId_ pUciURLChannel_ =

99 URLChannelsInsert'

100 { _uciQuotaUser = Nothing

101 , _uciPrettyPrint = True

@@ -163,11 +163,12 @@ instance GoogleRequest URLChannelsInsert' where

163 type Rs URLChannelsInsert' = URLChannel

164 request = requestWithRoute defReq adSenseHostURL

165 requestWithRoute r u URLChannelsInsert'{..}

166+ = go _uciAdClientId _uciQuotaUser

166− = go _uciQuotaUser (Just _uciPrettyPrint) _uciUserIP

167+ (Just _uciPrettyPrint)

167− _uciAdClientId

168+ _uciUserIP

169+ _uciFields

168 _uciKey

170 _uciKey

169 _uciOAuthToken

171 _uciOAuthToken

170− _uciFields

171 (Just AltJSON)

172 (Just AltJSON)

172 _uciURLChannel

173 _uciURLChannel

173 where go

174 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs+17−17

@@ -26,7 +26,7 @@ module Network.Google.Resource.AdSenseHost.URLChannels.List

26 URLChannelsListResource

27

28 -- * Creating a Request

29− , uRLChannelsList'

29+ , urlChannelsList'

30 , URLChannelsList'

31

32 -- * Request Lenses

@@ -50,19 +50,19 @@ type URLChannelsListResource =

50 "adclients" :>

51 Capture "adClientId" Text :>

52 "urlchannels" :>

53+ QueryParam "maxResults" Word32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Word32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

62

63-- | List all host URL channels in the host AdSense account.

64--

65−-- /See:/ 'uRLChannelsList'' smart constructor.

65+-- /See:/ 'urlChannelsList'' smart constructor.

66data URLChannelsList' = URLChannelsList'

67 { _uclQuotaUser :: !(Maybe Text)

68 , _uclPrettyPrint :: !Bool

@@ -96,10 +96,10 @@ data URLChannelsList' = URLChannelsList'

96-- * 'uclMaxResults'

97--

98-- * 'uclFields'

99−uRLChannelsList'

99+urlChannelsList'

100 :: Text -- ^ 'adClientId'

101 -> URLChannelsList'

102−uRLChannelsList' pUclAdClientId_ =

102+urlChannelsList' pUclAdClientId_ =

103 URLChannelsList'

104 { _uclQuotaUser = Nothing

105 , _uclPrettyPrint = True

@@ -176,13 +176,13 @@ instance GoogleRequest URLChannelsList' where

176 type Rs URLChannelsList' = URLChannels

177 request = requestWithRoute defReq adSenseHostURL

178 requestWithRoute r u URLChannelsList'{..}

179+ = go _uclMaxResults _uclPageToken _uclAdClientId

180+ _uclQuotaUser

179− = go _uclQuotaUser (Just _uclPrettyPrint) _uclUserIP

181+ (Just _uclPrettyPrint)

180− _uclAdClientId

182+ _uclUserIP

183+ _uclFields

181 _uclKey

184 _uclKey

182− _uclPageToken

183 _uclOAuthToken

185 _uclOAuthToken

184− _uclMaxResults

185− _uclFields

186 (Just AltJSON)

187 where go

188 = clientWithRoute

gogol-adsense/gen/Network/Google/AdSense.hs+2−2

@@ -224,7 +224,7 @@ module Network.Google.AdSense

224

225 -- ** URLChannels

226 , URLChannels

227− , uRLChannels

227+ , urlChannels

228 , ucEtag

229 , ucNextPageToken

230 , ucKind

@@ -362,7 +362,7 @@ module Network.Google.AdSense

362

363 -- ** URLChannel

364 , URLChannel

365− , uRLChannel

365+ , urlChannel

366 , urlcKind

367 , urlcId

368 , urlcURLPattern

gogol-adsense/gen/Network/Google/AdSense/Types.hs+2−2

@@ -98,7 +98,7 @@ module Network.Google.AdSense.Types

98

99 -- * URLChannels

100 , URLChannels

101− , uRLChannels

101+ , urlChannels

102 , ucEtag

103 , ucNextPageToken

104 , ucKind

@@ -236,7 +236,7 @@ module Network.Google.AdSense.Types

236

237 -- * URLChannel

238 , URLChannel

239− , uRLChannel

239+ , urlChannel

240 , urlcKind

241 , urlcId

242 , urlcURLPattern

gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+6−6

@@ -744,7 +744,7 @@ instance ToJSON SavedReport where

744 ("id" .=) <$> _sId])

745

746--

747−-- /See:/ 'uRLChannels' smart constructor.

747+-- /See:/ 'urlChannels' smart constructor.

748data URLChannels = URLChannels

749 { _ucEtag :: !(Maybe Text)

750 , _ucNextPageToken :: !(Maybe Text)

@@ -763,9 +763,9 @@ data URLChannels = URLChannels

763-- * 'ucKind'

764--

765-- * 'ucItems'

766−uRLChannels

766+urlChannels

767 :: URLChannels

768−uRLChannels =

768+urlChannels =

769 URLChannels

770 { _ucEtag = Nothing

771 , _ucNextPageToken = Nothing

@@ -1950,7 +1950,7 @@ instance ToJSON CustomChannel where

1950 ("code" .=) <$> _cCode, ("id" .=) <$> _cId])

1951

1952--

1953−-- /See:/ 'uRLChannel' smart constructor.

1953+-- /See:/ 'urlChannel' smart constructor.

1954data URLChannel = URLChannel

1955 { _urlcKind :: !Text

1956 , _urlcId :: !(Maybe Text)

@@ -1966,9 +1966,9 @@ data URLChannel = URLChannel

1966-- * 'urlcId'

1967--

1968-- * 'urlcURLPattern'

1969−uRLChannel

1969+urlChannel

1970 :: URLChannel

1971−uRLChannel =

1971+urlChannel =

1972 URLChannel

1973 { _urlcKind = "adsense#urlChannel"

1974 , _urlcId = Nothing

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs+12−13

@@ -50,14 +50,14 @@ type AccountsAdClientsListResource =

50 "accounts" :>

51 Capture "accountId" Text :>

52 "adclients" :>

53+ QueryParam "maxResults" Int32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Int32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] AdClients

62

63-- | List all ad clients in the specified account.

@@ -178,14 +178,13 @@ instance GoogleRequest AccountsAdClientsList' where

178 type Rs AccountsAdClientsList' = AdClients

179 request = requestWithRoute defReq adSenseURL

180 requestWithRoute r u AccountsAdClientsList'{..}

181+ = go _aaclMaxResults _aaclPageToken _aaclAccountId

182+ _aaclQuotaUser

181− = go _aaclQuotaUser (Just _aaclPrettyPrint)

183+ (Just _aaclPrettyPrint)

182 _aaclUserIP

184 _aaclUserIP

183− _aaclAccountId

185+ _aaclFields

184 _aaclKey

186 _aaclKey

185− _aaclPageToken

186 _aaclOAuthToken

187 _aaclOAuthToken

187− _aaclMaxResults

188− _aaclFields

189 (Just AltJSON)

188 (Just AltJSON)

190 where go

189 where go

191 = clientWithRoute

190 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs+15−15

@@ -56,14 +56,14 @@ type AccountsAdUnitsCustomChannelsListResource =

56 "adunits" :>

57 Capture "adUnitId" Text :>

58 "customchannels" :>

59+ QueryParam "maxResults" Int32 :>

60+ QueryParam "pageToken" Text :>

59− QueryParam "quotaUser" Text :>

61+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

62+ QueryParam "prettyPrint" Bool :>

61− QueryParam "userIp" Text :>

63+ QueryParam "userIp" Text :>

64+ QueryParam "fields" Text :>

62− QueryParam "key" Key :>

65+ QueryParam "key" Key :>

63− QueryParam "pageToken" Text :>

64− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "maxResults" Int32 :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Get '[JSON] CustomChannels

69

@@ -212,16 +212,16 @@ instance GoogleRequest

212 request = requestWithRoute defReq adSenseURL

213 requestWithRoute r u

214 AccountsAdUnitsCustomChannelsList'{..}

215− = go _aaucclQuotaUser (Just _aaucclPrettyPrint)

215+ = go _aaucclMaxResults _aaucclPageToken

216− _aaucclUserIP

217− _aaucclAdUnitId

218− _aaucclAdClientId

219 _aaucclAccountId

216 _aaucclAccountId

217+ _aaucclAdClientId

218+ _aaucclAdUnitId

219+ _aaucclQuotaUser

220+ (Just _aaucclPrettyPrint)

221+ _aaucclUserIP

222+ _aaucclFields

220 _aaucclKey

223 _aaucclKey

221− _aaucclPageToken

222 _aaucclOAuthToken

224 _aaucclOAuthToken

223− _aaucclMaxResults

224− _aaucclFields

225 (Just AltJSON)

226 where go

227 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/Get.hs+7−8

@@ -57,9 +57,9 @@ type AccountsAdUnitsGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] AdUnit

64

65-- | Gets the specified ad unit in the specified ad client for the specified

@@ -179,14 +179,13 @@ instance GoogleRequest AccountsAdUnitsGet' where

179 type Rs AccountsAdUnitsGet' = AdUnit

180 request = requestWithRoute defReq adSenseURL

181 requestWithRoute r u AccountsAdUnitsGet'{..}

182+ = go _aaugAccountId _aaugAdClientId _aaugAdUnitId

183+ _aaugQuotaUser

182− = go _aaugQuotaUser (Just _aaugPrettyPrint)

184+ (Just _aaugPrettyPrint)

183 _aaugUserIP

185 _aaugUserIP

184− _aaugAdUnitId

186+ _aaugFields

185− _aaugAdClientId

186− _aaugAccountId

187 _aaugKey

188 _aaugOAuthToken

189− _aaugFields

190 (Just AltJSON)

189 (Just AltJSON)

191 where go

190 where go

192 = clientWithRoute

191 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/GetAdCode.hs+8−8

@@ -57,9 +57,9 @@ type AccountsAdUnitsGetAdCodeResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] AdCode

64

65-- | Get ad code for the specified ad unit.

@@ -181,14 +181,14 @@ instance GoogleRequest AccountsAdUnitsGetAdCode'

181 type Rs AccountsAdUnitsGetAdCode' = AdCode

182 request = requestWithRoute defReq adSenseURL

183 requestWithRoute r u AccountsAdUnitsGetAdCode'{..}

184− = go _aaugacQuotaUser (Just _aaugacPrettyPrint)

184+ = go _aaugacAccountId _aaugacAdClientId

185− _aaugacUserIP

186 _aaugacAdUnitId

185 _aaugacAdUnitId

187− _aaugacAdClientId

186+ _aaugacQuotaUser

188− _aaugacAccountId

187+ (Just _aaugacPrettyPrint)

188+ _aaugacUserIP

189+ _aaugacFields

189 _aaugacKey

190 _aaugacKey

190 _aaugacOAuthToken

191 _aaugacOAuthToken

191− _aaugacFields

192 (Just AltJSON)

193 where go

194 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs+16−16

@@ -54,15 +54,15 @@ type AccountsAdUnitsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "adunits" :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "includeInactive" Bool :>

58− QueryParam "prettyPrint" Bool :>

58+ QueryParam "maxResults" Int32 :>

59− QueryParam "includeInactive" Bool :>

59+ QueryParam "pageToken" Text :>

60+ QueryParam "quotaUser" Text :>

61+ QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

62− QueryParam "pageToken" Text :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "maxResults" Int32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] AdUnits

67

68-- | List all ad units in the specified ad client for the specified account.

@@ -204,16 +204,16 @@ instance GoogleRequest AccountsAdUnitsList' where

204 type Rs AccountsAdUnitsList' = AdUnits

205 request = requestWithRoute defReq adSenseURL

206 requestWithRoute r u AccountsAdUnitsList'{..}

207− = go _aaulQuotaUser (Just _aaulPrettyPrint)

208− _aaulIncludeInactive

207+ = go _aaulIncludeInactive _aaulMaxResults

209− _aaulUserIP

208+ _aaulPageToken

210− _aaulAdClientId

211 _aaulAccountId

209 _aaulAccountId

210+ _aaulAdClientId

211+ _aaulQuotaUser

212+ (Just _aaulPrettyPrint)

213+ _aaulUserIP

214+ _aaulFields

212 _aaulKey

215 _aaulKey

213− _aaulPageToken

214 _aaulOAuthToken

216 _aaulOAuthToken

215− _aaulMaxResults

216− _aaulFields

217 (Just AltJSON)

218 where go

219 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs+7−7

@@ -54,9 +54,9 @@ type AccountsAlertsDeleteResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] ()

61

62-- | Dismiss (delete) the specified alert from the specified publisher

@@ -163,12 +163,12 @@ instance GoogleRequest AccountsAlertsDelete' where

163 type Rs AccountsAlertsDelete' = ()

164 request = requestWithRoute defReq adSenseURL

165 requestWithRoute r u AccountsAlertsDelete'{..}

166+ = go _aadAccountId _aadAlertId _aadQuotaUser

166− = go _aadQuotaUser (Just _aadPrettyPrint) _aadUserIP

167+ (Just _aadPrettyPrint)

167− _aadAlertId

168+ _aadUserIP

168− _aadAccountId

169+ _aadFields

169 _aadKey

170 _aadKey

170 _aadOAuthToken

171 _aadOAuthToken

171− _aadFields

172 (Just AltJSON)

173 where go

174 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs+11−11

@@ -49,13 +49,13 @@ type AccountsAlertsListResource =

49 "accounts" :>

50 Capture "accountId" Text :>

51 "alerts" :>

52+ QueryParam "locale" Text :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

55− QueryParam "locale" Text :>

55+ QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Alerts

60

61-- | List the alerts for the specified AdSense account.

@@ -162,12 +162,12 @@ instance GoogleRequest AccountsAlertsList' where

162 type Rs AccountsAlertsList' = Alerts

163 request = requestWithRoute defReq adSenseURL

164 requestWithRoute r u AccountsAlertsList'{..}

165+ = go _aalLocale _aalAccountId _aalQuotaUser

165− = go _aalQuotaUser (Just _aalPrettyPrint) _aalUserIP

166+ (Just _aalPrettyPrint)

166− _aalLocale

167+ _aalUserIP

167− _aalAccountId

168+ _aalFields

168 _aalKey

169 _aalKey

169 _aalOAuthToken

170 _aalOAuthToken

170− _aalFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs+16−16

@@ -57,15 +57,15 @@ type AccountsCustomChannelsAdUnitsListResource =

57 "customchannels" :>

58 Capture "customChannelId" Text :>

59 "adunits" :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "includeInactive" Bool :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "maxResults" Int32 :>

62− QueryParam "includeInactive" Bool :>

62+ QueryParam "pageToken" Text :>

63+ QueryParam "quotaUser" Text :>

64+ QueryParam "prettyPrint" Bool :>

63− QueryParam "userIp" Text :>

65+ QueryParam "userIp" Text :>

66+ QueryParam "fields" Text :>

64− QueryParam "key" Key :>

67+ QueryParam "key" Key :>

65− QueryParam "pageToken" Text :>

66− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "maxResults" Int32 :>

68− QueryParam "fields" Text :>

69 QueryParam "alt" AltJSON :>

70 Get '[JSON] AdUnits

71

@@ -223,17 +223,17 @@ instance GoogleRequest

223 request = requestWithRoute defReq adSenseURL

224 requestWithRoute r u

225 AccountsCustomChannelsAdUnitsList'{..}

226− = go _accaulQuotaUser (Just _accaulPrettyPrint)

227− _accaulIncludeInactive

226+ = go _accaulIncludeInactive _accaulMaxResults

227+ _accaulPageToken

228+ _accaulAccountId

229+ _accaulAdClientId

228 _accaulCustomChannelId

230 _accaulCustomChannelId

231+ _accaulQuotaUser

232+ (Just _accaulPrettyPrint)

229 _accaulUserIP

233 _accaulUserIP

230− _accaulAdClientId

234+ _accaulFields

231− _accaulAccountId

232 _accaulKey

235 _accaulKey

233− _accaulPageToken

234 _accaulOAuthToken

236 _accaulOAuthToken

235− _accaulMaxResults

236− _accaulFields

237 (Just AltJSON)

238 where go

239 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/Get.hs+7−7

@@ -57,9 +57,9 @@ type AccountsCustomChannelsGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] CustomChannel

65

@@ -182,14 +182,14 @@ instance GoogleRequest AccountsCustomChannelsGet'

182 type Rs AccountsCustomChannelsGet' = CustomChannel

183 request = requestWithRoute defReq adSenseURL

184 requestWithRoute r u AccountsCustomChannelsGet'{..}

185− = go _accgQuotaUser (Just _accgPrettyPrint)

185+ = go _accgAccountId _accgAdClientId

186 _accgCustomChannelId

187+ _accgQuotaUser

188+ (Just _accgPrettyPrint)

187 _accgUserIP

189 _accgUserIP

188− _accgAdClientId

190+ _accgFields

189− _accgAccountId

190 _accgKey

191 _accgKey

191 _accgOAuthToken

192 _accgOAuthToken

192− _accgFields

193 (Just AltJSON)

194 where go

195 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs+13−14

@@ -54,14 +54,14 @@ type AccountsCustomChannelsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "customchannels" :>

57+ QueryParam "maxResults" Int32 :>

58+ QueryParam "pageToken" Text :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] CustomChannels

67

@@ -196,15 +196,14 @@ instance GoogleRequest AccountsCustomChannelsList'

196 type Rs AccountsCustomChannelsList' = CustomChannels

197 request = requestWithRoute defReq adSenseURL

198 requestWithRoute r u AccountsCustomChannelsList'{..}

199− = go _acclQuotaUser (Just _acclPrettyPrint)

199+ = go _acclMaxResults _acclPageToken _acclAccountId

200− _acclUserIP

201 _acclAdClientId

200 _acclAdClientId

202− _acclAccountId

201+ _acclQuotaUser

202+ (Just _acclPrettyPrint)

203+ _acclUserIP

204+ _acclFields

203 _acclKey

205 _acclKey

204− _acclPageToken

205 _acclOAuthToken

206 _acclOAuthToken

206− _acclMaxResults

207− _acclFields

208 (Just AltJSON)

207 (Just AltJSON)

209 where go

208 where go

210 = clientWithRoute

209 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Get.hs+11−11

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48type AccountsGetResource =

49 "accounts" :>

50 Capture "accountId" Text :>

51+ QueryParam "tree" Bool :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

53+ QueryParam "prettyPrint" Bool :>

54− QueryParam "tree" Bool :>

54+ QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Account

59

60-- | Get information about the selected AdSense account.

@@ -155,12 +155,12 @@ instance GoogleRequest AccountsGet' where

155 type Rs AccountsGet' = Account

156 request = requestWithRoute defReq adSenseURL

157 requestWithRoute r u AccountsGet'{..}

158+ = go _agTree _agAccountId _agQuotaUser

158− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

159+ (Just _agPrettyPrint)

159− _agTree

160+ _agUserIP

160− _agAccountId

161+ _agFields

161 _agKey

162 _agKey

162 _agOAuthToken

163 _agOAuthToken

163− _agFields

164 (Just AltJSON)

165 where go

166 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'AccountsList'' request conforms to.

48type AccountsListResource =

49 "accounts" :>

50+ QueryParam "maxResults" Int32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Int32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Accounts

59

60-- | List all accounts available to this AdSense account.

@@ -158,12 +158,12 @@ instance GoogleRequest AccountsList' where

158 type Rs AccountsList' = Accounts

159 request = requestWithRoute defReq adSenseURL

160 requestWithRoute r u AccountsList'{..}

161+ = go _alMaxResults _alPageToken _alQuotaUser

161− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

162+ (Just _alPrettyPrint)

163+ _alUserIP

164+ _alFields

162 _alKey

165 _alKey

163− _alPageToken

164 _alOAuthToken

166 _alOAuthToken

165− _alMaxResults

166− _alFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs+7−6

@@ -51,9 +51,9 @@ type AccountsPaymentsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Payments

58

59-- | List the payments for the specified AdSense account.

@@ -149,11 +149,12 @@ instance GoogleRequest AccountsPaymentsList' where

149 type Rs AccountsPaymentsList' = Payments

150 request = requestWithRoute defReq adSenseURL

151 requestWithRoute r u AccountsPaymentsList'{..}

152+ = go _aplAccountId _aplQuotaUser

152− = go _aplQuotaUser (Just _aplPrettyPrint) _aplUserIP

153+ (Just _aplPrettyPrint)

153− _aplAccountId

154+ _aplUserIP

155+ _aplFields

154 _aplKey

156 _aplKey

155 _aplOAuthToken

157 _aplOAuthToken

156− _aplFields

157 (Just AltJSON)

158 (Just AltJSON)

158 where go

159 where go

159 = clientWithRoute

160 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+56−57

@@ -61,23 +61,24 @@ type AccountsReportsGenerateResource =

61 "accounts" :>

62 Capture "accountId" Text :>

63 "reports" :>

64− QueryParam "quotaUser" Text :>

64+ QueryParam "currency" Text :>

65− QueryParam "prettyPrint" Bool :>

65+ QueryParams "dimension" Text :>

66− QueryParam "userIp" Text :>

66+ QueryParams "filter" Text :>

67− QueryParams "dimension" Text :>

68− QueryParam "locale" Text :>

67+ QueryParam "locale" Text :>

69− QueryParam "endDate" Text :>

68+ QueryParam "maxResults" Int32 :>

70− QueryParam "startDate" Text :>

69+ QueryParams "metric" Text :>

71− QueryParams "metric" Text :>

70+ QueryParams "sort" Text :>

71+ QueryParam "startIndex" Int32 :>

72− QueryParam "key" Key :>

72+ QueryParam "useTimezoneReporting" Bool :>

73− QueryParam "currency" Text :>

73+ QueryParam "startDate" Text :>

74− QueryParams "sort" Text :>

74+ QueryParam "endDate" Text :>

75− QueryParams "filter" Text :>

75+ QueryParam "quotaUser" Text :>

76− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "prettyPrint" Bool :>

77− QueryParam "startIndex" Int32 :>

77+ QueryParam "userIp" Text :>

78− QueryParam "useTimezoneReporting" Bool :>

78+ QueryParam "fields" Text :>

79− QueryParam "maxResults" Int32 :>

79+ QueryParam "key" Key :>

80− QueryParam "fields" Text :>

80+ QueryParam "oauth_token" OAuthToken

81+ :>

81 QueryParam "alt" AltJSON :>

82 QueryParam "alt" AltJSON :>

82 Get '[JSON]

83 Get '[JSON]

83 AdsenseReportsGenerateResponse

84 AdsenseReportsGenerateResponse

@@ -85,24 +86,24 @@ type AccountsReportsGenerateResource =

85 "accounts" :>

86 "accounts" :>

86 Capture "accountId" Text :>

87 Capture "accountId" Text :>

87 "reports" :>

88 "reports" :>

88− QueryParam "quotaUser" Text :>

89+ QueryParam "currency" Text :>

89− QueryParam "prettyPrint" Bool :>

90+ QueryParams "dimension" Text :>

90− QueryParam "userIp" Text :>

91+ QueryParams "filter" Text :>

91− QueryParams "dimension" Text :>

92− QueryParam "locale" Text :>

92+ QueryParam "locale" Text :>

93− QueryParam "endDate" Text :>

93+ QueryParam "maxResults" Int32 :>

94− QueryParam "startDate" Text :>

94+ QueryParams "metric" Text :>

95− QueryParams "metric" Text :>

95+ QueryParams "sort" Text :>

96+ QueryParam "startIndex" Int32 :>

96− QueryParam "key" Key :>

97+ QueryParam "useTimezoneReporting" Bool :>

97− QueryParam "currency" Text :>

98+ QueryParam "startDate" Text :>

98− QueryParams "sort" Text :>

99+ QueryParam "endDate" Text :>

99− QueryParams "filter" Text :>

100+ QueryParam "quotaUser" Text :>

100− QueryParam "oauth_token" OAuthToken :>

101+ QueryParam "prettyPrint" Bool :>

101− QueryParam "startIndex" Int32 :>

102+ QueryParam "userIp" Text :>

102− QueryParam "useTimezoneReporting" Bool

103+ QueryParam "fields" Text :>

103− :>

104− QueryParam "maxResults" Int32 :>

104+ QueryParam "key" Key :>

105− QueryParam "fields" Text :>

105+ QueryParam "oauth_token" OAuthToken

106+ :>

106 QueryParam "alt" Media :>

107 QueryParam "alt" Media :>

107 Get '[OctetStream] Stream

108 Get '[OctetStream] Stream

108

109

@@ -311,22 +312,21 @@ instance GoogleRequest AccountsReportsGenerate' where

311 AdsenseReportsGenerateResponse

312 AdsenseReportsGenerateResponse

312 request = requestWithRoute defReq adSenseURL

313 request = requestWithRoute defReq adSenseURL

313 requestWithRoute r u AccountsReportsGenerate'{..}

314 requestWithRoute r u AccountsReportsGenerate'{..}

314− = go _argQuotaUser (Just _argPrettyPrint) _argUserIP

315− _argDimension

315+ = go _argCurrency _argDimension _argFilter _argLocale

316− _argLocale

316+ _argMaxResults

317− (Just _argEndDate)

318− (Just _argStartDate)

319− _argAccountId

320 _argMetric

317 _argMetric

321− _argKey

322− _argCurrency

323 _argSort

318 _argSort

324− _argFilter

325− _argOAuthToken

326 _argStartIndex

319 _argStartIndex

327 _argUseTimezoneReporting

320 _argUseTimezoneReporting

328− _argMaxResults

321+ _argAccountId

322+ (Just _argStartDate)

323+ (Just _argEndDate)

324+ _argQuotaUser

325+ (Just _argPrettyPrint)

326+ _argUserIP

329 _argFields

327 _argFields

328+ _argKey

329+ _argOAuthToken

330 (Just AltJSON)

331 where go :<|> _

332 = clientWithRoute

@@ -338,22 +338,21 @@ instance GoogleRequest AccountsReportsGenerate' where

338 type Rs (Download AccountsReportsGenerate') = Stream

339 request = requestWithRoute defReq adSenseURL

340 requestWithRoute r u AccountsReportsGenerate'{..}

341− = go _argQuotaUser (Just _argPrettyPrint) _argUserIP

342− _argDimension

341+ = go _argCurrency _argDimension _argFilter _argLocale

343− _argLocale

342+ _argMaxResults

344− (Just _argEndDate)

345− (Just _argStartDate)

346− _argAccountId

347 _argMetric

343 _argMetric

348− _argKey

349− _argCurrency

350 _argSort

344 _argSort

351− _argFilter

352− _argOAuthToken

353 _argStartIndex

345 _argStartIndex

354 _argUseTimezoneReporting

346 _argUseTimezoneReporting

355− _argMaxResults

347+ _argAccountId

348+ (Just _argStartDate)

349+ (Just _argEndDate)

350+ _argQuotaUser

351+ (Just _argPrettyPrint)

352+ _argUserIP

356 _argFields

353 _argFields

354+ _argKey

355+ _argOAuthToken

357 (Just Media)

356 (Just Media)

358 where go :<|> _

357 where go :<|> _

359 = clientWithRoute

358 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs+15−16

@@ -54,15 +54,15 @@ type AccountsReportsSavedGenerateResource =

54 Capture "accountId" Text :>

55 "reports" :>

56 Capture "savedReportId" Text :>

57+ QueryParam "locale" Text :>

58+ QueryParam "maxResults" Int32 :>

59+ QueryParam "startIndex" Int32 :>

57− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

60− QueryParam "locale" Text :>

63+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "startIndex" Int32 :>

64− QueryParam "maxResults" Int32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] AdsenseReportsGenerateResponse

68

@@ -207,16 +207,15 @@ instance GoogleRequest AccountsReportsSavedGenerate'

207 request = requestWithRoute defReq adSenseURL

208 requestWithRoute r u

209 AccountsReportsSavedGenerate'{..}

210− = go _arsgQuotaUser (Just _arsgPrettyPrint)

211− _arsgUserIP

212− _arsgLocale

210+ = go _arsgLocale _arsgMaxResults _arsgStartIndex

213− _arsgSavedReportId

214 _arsgAccountId

211 _arsgAccountId

212+ _arsgSavedReportId

213+ _arsgQuotaUser

214+ (Just _arsgPrettyPrint)

215+ _arsgUserIP

216+ _arsgFields

215 _arsgKey

217 _arsgKey

216 _arsgOAuthToken

218 _arsgOAuthToken

217− _arsgStartIndex

218− _arsgMaxResults

219− _arsgFields

220 (Just AltJSON)

219 (Just AltJSON)

221 where go

220 where go

222 = clientWithRoute

221 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs+12−13

@@ -51,14 +51,14 @@ type AccountsReportsSavedListResource =

51 Capture "accountId" Text :>

52 "reports" :>

53 "saved" :>

54+ QueryParam "maxResults" Int32 :>

55+ QueryParam "pageToken" Text :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] SavedReports

64

@@ -181,14 +181,13 @@ instance GoogleRequest AccountsReportsSavedList'

181 type Rs AccountsReportsSavedList' = SavedReports

182 request = requestWithRoute defReq adSenseURL

183 requestWithRoute r u AccountsReportsSavedList'{..}

184+ = go _arslMaxResults _arslPageToken _arslAccountId

185+ _arslQuotaUser

184− = go _arslQuotaUser (Just _arslPrettyPrint)

186+ (Just _arslPrettyPrint)

185 _arslUserIP

187 _arslUserIP

186− _arslAccountId

188+ _arslFields

187 _arslKey

189 _arslKey

188− _arslPageToken

189 _arslOAuthToken

190 _arslOAuthToken

190− _arslMaxResults

191− _arslFields

192 (Just AltJSON)

191 (Just AltJSON)

193 where go

192 where go

194 = clientWithRoute

193 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs+6−7

@@ -53,9 +53,9 @@ type AccountsSavedadstylesGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyle

60

61-- | List a specific saved ad style for the specified account.

@@ -163,13 +163,12 @@ instance GoogleRequest AccountsSavedadstylesGet'

163 type Rs AccountsSavedadstylesGet' = SavedAdStyle

164 request = requestWithRoute defReq adSenseURL

165 requestWithRoute r u AccountsSavedadstylesGet'{..}

166+ = go _asgAccountId _asgSavedAdStyleId _asgQuotaUser

166− = go _asgQuotaUser (Just _asgPrettyPrint)

167+ (Just _asgPrettyPrint)

167− _asgSavedAdStyleId

168 _asgUserIP

169− _asgAccountId

169+ _asgFields

170 _asgKey

171 _asgOAuthToken

172− _asgFields

173 (Just AltJSON)

172 (Just AltJSON)

174 where go

173 where go

175 = clientWithRoute

174 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs+13−13

@@ -50,14 +50,14 @@ type AccountsSavedadstylesListResource =

50 "accounts" :>

51 Capture "accountId" Text :>

52 "savedadstyles" :>

53+ QueryParam "maxResults" Int32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParam "pageToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "maxResults" Int32 :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyles

62

63-- | List all saved ad styles in the specified account.

@@ -176,13 +176,13 @@ instance GoogleRequest AccountsSavedadstylesList'

176 type Rs AccountsSavedadstylesList' = SavedAdStyles

177 request = requestWithRoute defReq adSenseURL

178 requestWithRoute r u AccountsSavedadstylesList'{..}

179+ = go _aslMaxResults _aslPageToken _aslAccountId

180+ _aslQuotaUser

179− = go _aslQuotaUser (Just _aslPrettyPrint) _aslUserIP

181+ (Just _aslPrettyPrint)

180− _aslAccountId

182+ _aslUserIP

183+ _aslFields

181 _aslKey

184 _aslKey

182− _aslPageToken

183 _aslOAuthToken

185 _aslOAuthToken

184− _aslMaxResults

185− _aslFields

186 (Just AltJSON)

187 where go

188 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+13−14

@@ -54,14 +54,14 @@ type AccountsURLChannelsListResource =

54 "adclients" :>

55 Capture "adClientId" Text :>

56 "urlchannels" :>

57+ QueryParam "maxResults" Int32 :>

58+ QueryParam "pageToken" Text :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] URLChannels

67

@@ -195,15 +195,14 @@ instance GoogleRequest AccountsURLChannelsList' where

195 type Rs AccountsURLChannelsList' = URLChannels

196 request = requestWithRoute defReq adSenseURL

197 requestWithRoute r u AccountsURLChannelsList'{..}

198− = go _auclQuotaUser (Just _auclPrettyPrint)

198+ = go _auclMaxResults _auclPageToken _auclAccountId

199− _auclUserIP

200 _auclAdClientId

199 _auclAdClientId

201− _auclAccountId

200+ _auclQuotaUser

201+ (Just _auclPrettyPrint)

202+ _auclUserIP

203+ _auclFields

202 _auclKey

204 _auclKey

203− _auclPageToken

204 _auclOAuthToken

205 _auclOAuthToken

205− _auclMaxResults

206− _auclFields

207 (Just AltJSON)

206 (Just AltJSON)

208 where go

207 where go

209 = clientWithRoute

208 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/AdClients/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'AdClientsList'' request conforms to.

48type AdClientsListResource =

49 "adclients" :>

50+ QueryParam "maxResults" Int32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Int32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] AdClients

59

60-- | List all ad clients in this AdSense account.

@@ -162,12 +162,12 @@ instance GoogleRequest AdClientsList' where

162 type Rs AdClientsList' = AdClients

163 request = requestWithRoute defReq adSenseURL

164 requestWithRoute r u AdClientsList'{..}

165+ = go _aclMaxResults _aclPageToken _aclQuotaUser

165− = go _aclQuotaUser (Just _aclPrettyPrint) _aclUserIP

166+ (Just _aclPrettyPrint)

167+ _aclUserIP

168+ _aclFields

166 _aclKey

169 _aclKey

167− _aclPageToken

168 _aclOAuthToken

170 _aclOAuthToken

169− _aclMaxResults

170− _aclFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs+14−14

@@ -53,14 +53,14 @@ type AdUnitsCustomChannelsListResource =

53 "adunits" :>

54 Capture "adUnitId" Text :>

55 "customchannels" :>

56+ QueryParam "maxResults" Int32 :>

57+ QueryParam "pageToken" Text :>

56− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

60− QueryParam "pageToken" Text :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "maxResults" Int32 :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] CustomChannels

66

@@ -194,15 +194,15 @@ instance GoogleRequest AdUnitsCustomChannelsList'

194 type Rs AdUnitsCustomChannelsList' = CustomChannels

195 request = requestWithRoute defReq adSenseURL

196 requestWithRoute r u AdUnitsCustomChannelsList'{..}

197− = go _aucclQuotaUser (Just _aucclPrettyPrint)

197+ = go _aucclMaxResults _aucclPageToken

198− _aucclUserIP

199− _aucclAdUnitId

200 _aucclAdClientId

198 _aucclAdClientId

199+ _aucclAdUnitId

200+ _aucclQuotaUser

201+ (Just _aucclPrettyPrint)

202+ _aucclUserIP

203+ _aucclFields

201 _aucclKey

204 _aucclKey

202− _aucclPageToken

203 _aucclOAuthToken

205 _aucclOAuthToken

204− _aucclMaxResults

205− _aucclFields

206 (Just AltJSON)

207 where go

208 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/Get.hs+7−7

@@ -53,9 +53,9 @@ type AdUnitsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] AdUnit

60

61-- | Gets the specified ad unit in the specified ad client.

@@ -162,12 +162,12 @@ instance GoogleRequest AdUnitsGet' where

162 type Rs AdUnitsGet' = AdUnit

163 request = requestWithRoute defReq adSenseURL

164 requestWithRoute r u AdUnitsGet'{..}

165+ = go _augAdClientId _augAdUnitId _augQuotaUser

165− = go _augQuotaUser (Just _augPrettyPrint) _augUserIP

166+ (Just _augPrettyPrint)

166− _augAdUnitId

167+ _augUserIP

167− _augAdClientId

168+ _augFields

168 _augKey

169 _augKey

169 _augOAuthToken

170 _augOAuthToken

170− _augFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute (Proxy :: Proxy AdUnitsGetResource)

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/GetAdCode.hs+6−7

@@ -54,9 +54,9 @@ type AdUnitsGetAdCodeResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] AdCode

61

62-- | Get ad code for the specified ad unit.

@@ -165,13 +165,12 @@ instance GoogleRequest AdUnitsGetAdCode' where

165 type Rs AdUnitsGetAdCode' = AdCode

166 request = requestWithRoute defReq adSenseURL

167 requestWithRoute r u AdUnitsGetAdCode'{..}

168+ = go _augacAdClientId _augacAdUnitId _augacQuotaUser

168− = go _augacQuotaUser (Just _augacPrettyPrint)

169+ (Just _augacPrettyPrint)

169 _augacUserIP

170 _augacUserIP

170− _augacAdUnitId

171+ _augacFields

171− _augacAdClientId

172 _augacKey

173 _augacOAuthToken

174− _augacFields

175 (Just AltJSON)

174 (Just AltJSON)

176 where go

175 where go

177 = clientWithRoute

176 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/List.hs+14−15

@@ -51,15 +51,15 @@ type AdUnitsListResource =

51 "adclients" :>

52 Capture "adClientId" Text :>

53 "adunits" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "includeInactive" Bool :>

55− QueryParam "prettyPrint" Bool :>

55+ QueryParam "maxResults" Int32 :>

56− QueryParam "includeInactive" Bool :>

56+ QueryParam "pageToken" Text :>

57+ QueryParam "quotaUser" Text :>

58+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

60+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

59− QueryParam "pageToken" Text :>

60− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "maxResults" Int32 :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] AdUnits

64

65-- | List all ad units in the specified ad client for this AdSense account.

@@ -188,15 +188,14 @@ instance GoogleRequest AdUnitsList' where

188 type Rs AdUnitsList' = AdUnits

189 request = requestWithRoute defReq adSenseURL

190 requestWithRoute r u AdUnitsList'{..}

191− = go _aulQuotaUser (Just _aulPrettyPrint)

192− _aulIncludeInactive

191+ = go _aulIncludeInactive _aulMaxResults _aulPageToken

193− _aulUserIP

194 _aulAdClientId

192 _aulAdClientId

193+ _aulQuotaUser

194+ (Just _aulPrettyPrint)

195+ _aulUserIP

196+ _aulFields

195 _aulKey

197 _aulKey

196− _aulPageToken

197 _aulOAuthToken

198 _aulOAuthToken

198− _aulMaxResults

199− _aulFields

200 (Just AltJSON)

199 (Just AltJSON)

201 where go

200 where go

202 = clientWithRoute

201 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/Delete.hs+6−6

@@ -51,9 +51,9 @@ type AlertsDeleteResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Delete '[JSON] ()

58

59-- | Dismiss (delete) the specified alert from the publisher\'s AdSense

@@ -147,11 +147,11 @@ instance GoogleRequest AlertsDelete' where

147 type Rs AlertsDelete' = ()

148 request = requestWithRoute defReq adSenseURL

149 requestWithRoute r u AlertsDelete'{..}

150− = go _adQuotaUser (Just _adPrettyPrint) _adUserIP

150+ = go _adAlertId _adQuotaUser (Just _adPrettyPrint)

151− _adAlertId

151+ _adUserIP

152+ _adFields

152 _adKey

153 _adKey

153 _adOAuthToken

154 _adOAuthToken

154− _adFields

155 (Just AltJSON)

156 where go

157 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/List.hs+10−10

@@ -46,13 +46,13 @@ import Network.Google.Prelude

46-- 'AlertsList'' request conforms to.

47type AlertsListResource =

48 "alerts" :>

49+ QueryParam "locale" Text :>

49− QueryParam "quotaUser" Text :>

50+ QueryParam "quotaUser" Text :>

50− QueryParam "prettyPrint" Bool :>

51+ QueryParam "prettyPrint" Bool :>

51− QueryParam "userIp" Text :>

52− QueryParam "locale" Text :>

52+ QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Alerts

57

58-- | List the alerts for this AdSense account.

@@ -144,11 +144,11 @@ instance GoogleRequest AlertsList' where

144 type Rs AlertsList' = Alerts

145 request = requestWithRoute defReq adSenseURL

146 requestWithRoute r u AlertsList'{..}

147− = go _aQuotaUser (Just _aPrettyPrint) _aUserIP

147+ = go _aLocale _aQuotaUser (Just _aPrettyPrint)

148− _aLocale

148+ _aUserIP

149+ _aFields

149 _aKey

150 _aKey

150 _aOAuthToken

151 _aOAuthToken

151− _aFields

152 (Just AltJSON)

153 where go

154 = clientWithRoute (Proxy :: Proxy AlertsListResource)

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs+15−15

@@ -54,15 +54,15 @@ type CustomChannelsAdUnitsListResource =

54 "customchannels" :>

55 Capture "customChannelId" Text :>

56 "adunits" :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "includeInactive" Bool :>

58− QueryParam "prettyPrint" Bool :>

58+ QueryParam "maxResults" Int32 :>

59− QueryParam "includeInactive" Bool :>

59+ QueryParam "pageToken" Text :>

60+ QueryParam "quotaUser" Text :>

61+ QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

62− QueryParam "pageToken" Text :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "maxResults" Int32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] AdUnits

67

68-- | List all ad units in the specified custom channel.

@@ -205,16 +205,16 @@ instance GoogleRequest CustomChannelsAdUnitsList'

205 type Rs CustomChannelsAdUnitsList' = AdUnits

206 request = requestWithRoute defReq adSenseURL

207 requestWithRoute r u CustomChannelsAdUnitsList'{..}

208− = go _ccaulQuotaUser (Just _ccaulPrettyPrint)

209− _ccaulIncludeInactive

208+ = go _ccaulIncludeInactive _ccaulMaxResults

209+ _ccaulPageToken

210+ _ccaulAdClientId

210 _ccaulCustomChannelId

211 _ccaulCustomChannelId

212+ _ccaulQuotaUser

213+ (Just _ccaulPrettyPrint)

211 _ccaulUserIP

214 _ccaulUserIP

212− _ccaulAdClientId

215+ _ccaulFields

213 _ccaulKey

216 _ccaulKey

214− _ccaulPageToken

215 _ccaulOAuthToken

217 _ccaulOAuthToken

216− _ccaulMaxResults

217− _ccaulFields

218 (Just AltJSON)

219 where go

220 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/Get.hs+6−7

@@ -53,9 +53,9 @@ type CustomChannelsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] CustomChannel

60

61-- | Get the specified custom channel from the specified ad client.

@@ -163,13 +163,12 @@ instance GoogleRequest CustomChannelsGet' where

163 type Rs CustomChannelsGet' = CustomChannel

164 request = requestWithRoute defReq adSenseURL

165 requestWithRoute r u CustomChannelsGet'{..}

166+ = go _ccgAdClientId _ccgCustomChannelId _ccgQuotaUser

166− = go _ccgQuotaUser (Just _ccgPrettyPrint)

167+ (Just _ccgPrettyPrint)

167− _ccgCustomChannelId

168 _ccgUserIP

169− _ccgAdClientId

169+ _ccgFields

170 _ccgKey

171 _ccgOAuthToken

172− _ccgFields

173 (Just AltJSON)

172 (Just AltJSON)

174 where go

173 where go

175 = clientWithRoute

174 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/List.hs+13−13

@@ -51,14 +51,14 @@ type CustomChannelsListResource =

51 "adclients" :>

52 Capture "adClientId" Text :>

53 "customchannels" :>

54+ QueryParam "maxResults" Int32 :>

55+ QueryParam "pageToken" Text :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] CustomChannels

64

@@ -179,13 +179,13 @@ instance GoogleRequest CustomChannelsList' where

179 type Rs CustomChannelsList' = CustomChannels

180 request = requestWithRoute defReq adSenseURL

181 requestWithRoute r u CustomChannelsList'{..}

182+ = go _cclMaxResults _cclPageToken _cclAdClientId

183+ _cclQuotaUser

182− = go _cclQuotaUser (Just _cclPrettyPrint) _cclUserIP

184+ (Just _cclPrettyPrint)

183− _cclAdClientId

185+ _cclUserIP

186+ _cclFields

184 _cclKey

187 _cclKey

185− _cclPageToken

186 _cclOAuthToken

188 _cclOAuthToken

187− _cclMaxResults

188− _cclFields

189 (Just AltJSON)

190 where go

191 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs+4−4

@@ -49,9 +49,9 @@ type MetadataDimensionsListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :> Get '[JSON] Metadata

56

57-- | List the metadata for the dimensions available to this AdSense account.

@@ -138,9 +138,9 @@ instance GoogleRequest MetadataDimensionsList' where

138 request = requestWithRoute defReq adSenseURL

139 requestWithRoute r u MetadataDimensionsList'{..}

140 = go _mdlQuotaUser (Just _mdlPrettyPrint) _mdlUserIP

141+ _mdlFields

141 _mdlKey

142 _mdlKey

142 _mdlOAuthToken

143 _mdlOAuthToken

143− _mdlFields

144 (Just AltJSON)

145 where go

146 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs+4−4

@@ -49,9 +49,9 @@ type MetadataMetricsListResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :> Get '[JSON] Metadata

56

57-- | List the metadata for the metrics available to this AdSense account.

@@ -138,9 +138,9 @@ instance GoogleRequest MetadataMetricsList' where

138 request = requestWithRoute defReq adSenseURL

139 requestWithRoute r u MetadataMetricsList'{..}

140 = go _mmlQuotaUser (Just _mmlPrettyPrint) _mmlUserIP

141+ _mmlFields

141 _mmlKey

142 _mmlKey

142 _mmlOAuthToken

143 _mmlOAuthToken

143− _mmlFields

144 (Just AltJSON)

145 where go

146 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Payments/List.hs+4−4

@@ -48,9 +48,9 @@ type PaymentsListResource =

48 QueryParam "quotaUser" Text :>

49 QueryParam "prettyPrint" Bool :>

50 QueryParam "userIp" Text :>

51− QueryParam "key" Key :>

51+ QueryParam "fields" Text :>

52+ QueryParam "key" Key :>

52− QueryParam "oauth_token" OAuthToken :>

53+ QueryParam "oauth_token" OAuthToken :>

53− QueryParam "fields" Text :>

54 QueryParam "alt" AltJSON :> Get '[JSON] Payments

55

56-- | List the payments for this AdSense account.

@@ -134,9 +134,9 @@ instance GoogleRequest PaymentsList' where

134 request = requestWithRoute defReq adSenseURL

135 requestWithRoute r u PaymentsList'{..}

136 = go _plQuotaUser (Just _plPrettyPrint) _plUserIP

137+ _plFields

137 _plKey

138 _plKey

138 _plOAuthToken

139 _plOAuthToken

139− _plFields

140 (Just AltJSON)

141 where go

142 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+53−54

@@ -59,47 +59,48 @@ import Network.Google.Prelude

59-- 'ReportsGenerate'' request conforms to.

60type ReportsGenerateResource =

61 "reports" :>

62− QueryParam "quotaUser" Text :>

62+ QueryParams "accountId" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParam "currency" Text :>

64− QueryParam "userIp" Text :>

65− QueryParams "dimension" Text :>

64+ QueryParams "dimension" Text :>

65+ QueryParams "filter" Text :>

66 QueryParam "locale" Text :>

67− QueryParam "endDate" Text :>

67+ QueryParam "maxResults" Int32 :>

68− QueryParam "startDate" Text :>

68+ QueryParams "metric" Text :>

69− QueryParams "accountId" Text :>

69+ QueryParams "sort" Text :>

70− QueryParams "metric" Text :>

70+ QueryParam "startIndex" Int32 :>

71− QueryParam "key" Key :>

71+ QueryParam "useTimezoneReporting" Bool :>

72− QueryParam "currency" Text :>

72+ QueryParam "startDate" Text :>

73− QueryParams "sort" Text :>

73+ QueryParam "endDate" Text :>

74− QueryParams "filter" Text :>

74+ QueryParam "quotaUser" Text :>

75− QueryParam "oauth_token" OAuthToken :>

75+ QueryParam "prettyPrint" Bool :>

76− QueryParam "startIndex" Int32 :>

76+ QueryParam "userIp" Text :>

77− QueryParam "useTimezoneReporting" Bool :>

77+ QueryParam "fields" Text :>

78− QueryParam "maxResults" Int32 :>

78+ QueryParam "key" Key :>

79− QueryParam "fields" Text :>

79+ QueryParam "oauth_token" OAuthToken :>

80 QueryParam "alt" AltJSON :>

81 Get '[JSON]

82 AdsenseReportsGenerateResponse

83 :<|>

84 "reports" :>

85− QueryParam "quotaUser" Text :>

85+ QueryParams "accountId" Text :>

86− QueryParam "prettyPrint" Bool :>

86+ QueryParam "currency" Text :>

87− QueryParam "userIp" Text :>

88− QueryParams "dimension" Text :>

87+ QueryParams "dimension" Text :>

88+ QueryParams "filter" Text :>

89 QueryParam "locale" Text :>

90− QueryParam "endDate" Text :>

90+ QueryParam "maxResults" Int32 :>

91− QueryParam "startDate" Text :>

91+ QueryParams "metric" Text :>

92− QueryParams "accountId" Text :>

92+ QueryParams "sort" Text :>

93− QueryParams "metric" Text :>

93+ QueryParam "startIndex" Int32 :>

94− QueryParam "key" Key :>

94+ QueryParam "useTimezoneReporting" Bool :>

95− QueryParam "currency" Text :>

95+ QueryParam "startDate" Text :>

96− QueryParams "sort" Text :>

96+ QueryParam "endDate" Text :>

97− QueryParams "filter" Text :>

97+ QueryParam "quotaUser" Text :>

98− QueryParam "oauth_token" OAuthToken :>

98+ QueryParam "prettyPrint" Bool :>

99− QueryParam "startIndex" Int32 :>

99+ QueryParam "userIp" Text :>

100− QueryParam "useTimezoneReporting" Bool :>

100+ QueryParam "fields" Text :>

101− QueryParam "maxResults" Int32 :>

101+ QueryParam "key" Key :>

102− QueryParam "fields" Text :>

102+ QueryParam "oauth_token" OAuthToken

103+ :>

103 QueryParam "alt" Media :>

104 QueryParam "alt" Media :>

104 Get '[OctetStream] Stream

105 Get '[OctetStream] Stream

105

106

@@ -299,22 +300,21 @@ instance GoogleRequest ReportsGenerate' where

299 AdsenseReportsGenerateResponse

300 AdsenseReportsGenerateResponse

300 request = requestWithRoute defReq adSenseURL

301 request = requestWithRoute defReq adSenseURL

301 requestWithRoute r u ReportsGenerate'{..}

302 requestWithRoute r u ReportsGenerate'{..}

302− = go _rgQuotaUser (Just _rgPrettyPrint) _rgUserIP

303− _rgDimension

303+ = go _rgAccountId _rgCurrency _rgDimension _rgFilter

304 _rgLocale

305− (Just _rgEndDate)

305+ _rgMaxResults

306− (Just _rgStartDate)

307− _rgAccountId

308 _rgMetric

306 _rgMetric

309− _rgKey

310− _rgCurrency

311 _rgSort

307 _rgSort

312− _rgFilter

313− _rgOAuthToken

314 _rgStartIndex

308 _rgStartIndex

315 _rgUseTimezoneReporting

309 _rgUseTimezoneReporting

316− _rgMaxResults

310+ (Just _rgStartDate)

311+ (Just _rgEndDate)

312+ _rgQuotaUser

313+ (Just _rgPrettyPrint)

314+ _rgUserIP

317 _rgFields

315 _rgFields

316+ _rgKey

317+ _rgOAuthToken

318 (Just AltJSON)

319 where go :<|> _

320 = clientWithRoute

@@ -326,22 +326,21 @@ instance GoogleRequest ReportsGenerate' where

326 type Rs (Download ReportsGenerate') = Stream

327 request = requestWithRoute defReq adSenseURL

328 requestWithRoute r u ReportsGenerate'{..}

329− = go _rgQuotaUser (Just _rgPrettyPrint) _rgUserIP

330− _rgDimension

329+ = go _rgAccountId _rgCurrency _rgDimension _rgFilter

331 _rgLocale

330 _rgLocale

332− (Just _rgEndDate)

331+ _rgMaxResults

333− (Just _rgStartDate)

334− _rgAccountId

335 _rgMetric

332 _rgMetric

336− _rgKey

337− _rgCurrency

338 _rgSort

333 _rgSort

339− _rgFilter

340− _rgOAuthToken

341 _rgStartIndex

334 _rgStartIndex

342 _rgUseTimezoneReporting

335 _rgUseTimezoneReporting

343− _rgMaxResults

336+ (Just _rgStartDate)

337+ (Just _rgEndDate)

338+ _rgQuotaUser

339+ (Just _rgPrettyPrint)

340+ _rgUserIP

344 _rgFields

341 _rgFields

342+ _rgKey

343+ _rgOAuthToken

345 (Just Media)

344 (Just Media)

346 where go :<|> _

345 where go :<|> _

347 = clientWithRoute

346 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs+14−14

@@ -51,15 +51,15 @@ import Network.Google.Prelude

51type ReportsSavedGenerateResource =

52 "reports" :>

53 Capture "savedReportId" Text :>

54+ QueryParam "locale" Text :>

55+ QueryParam "maxResults" Int32 :>

56+ QueryParam "startIndex" Int32 :>

54− QueryParam "quotaUser" Text :>

57+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

57− QueryParam "locale" Text :>

60+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "startIndex" Int32 :>

61− QueryParam "maxResults" Int32 :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] AdsenseReportsGenerateResponse

65

@@ -189,14 +189,14 @@ instance GoogleRequest ReportsSavedGenerate' where

189 AdsenseReportsGenerateResponse

190 request = requestWithRoute defReq adSenseURL

191 requestWithRoute r u ReportsSavedGenerate'{..}

192− = go _rsgQuotaUser (Just _rsgPrettyPrint) _rsgUserIP

193− _rsgLocale

192+ = go _rsgLocale _rsgMaxResults _rsgStartIndex

194 _rsgSavedReportId

193 _rsgSavedReportId

194+ _rsgQuotaUser

195+ (Just _rsgPrettyPrint)

196+ _rsgUserIP

197+ _rsgFields

195 _rsgKey

198 _rsgKey

196 _rsgOAuthToken

199 _rsgOAuthToken

197− _rsgStartIndex

198− _rsgMaxResults

199− _rsgFields

200 (Just AltJSON)

201 where go

202 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs+12−12

@@ -48,14 +48,14 @@ import Network.Google.Prelude

48type ReportsSavedListResource =

49 "reports" :>

50 "saved" :>

51+ QueryParam "maxResults" Int32 :>

52+ QueryParam "pageToken" Text :>

51− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

56+ QueryParam "fields" Text :>

54− QueryParam "key" Key :>

57+ QueryParam "key" Key :>

55− QueryParam "pageToken" Text :>

56− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "maxResults" Int32 :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] SavedReports

60

61-- | List all saved reports in this AdSense account.

@@ -163,12 +163,12 @@ instance GoogleRequest ReportsSavedList' where

163 type Rs ReportsSavedList' = SavedReports

164 request = requestWithRoute defReq adSenseURL

165 requestWithRoute r u ReportsSavedList'{..}

166+ = go _rslMaxResults _rslPageToken _rslQuotaUser

166− = go _rslQuotaUser (Just _rslPrettyPrint) _rslUserIP

167+ (Just _rslPrettyPrint)

168+ _rslUserIP

169+ _rslFields

167 _rslKey

170 _rslKey

168− _rslPageToken

169 _rslOAuthToken

171 _rslOAuthToken

170− _rslMaxResults

171− _rslFields

172 (Just AltJSON)

173 where go

174 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs+6−6

@@ -50,9 +50,9 @@ type SavedadstylesGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyle

57

58-- | Get a specific saved ad style from the user\'s account.

@@ -146,12 +146,12 @@ instance GoogleRequest SavedadstylesGet' where

146 type Rs SavedadstylesGet' = SavedAdStyle

147 request = requestWithRoute defReq adSenseURL

148 requestWithRoute r u SavedadstylesGet'{..}

149+ = go _sgSavedAdStyleId _sgQuotaUser

149− = go _sgQuotaUser (Just _sgPrettyPrint)

150+ (Just _sgPrettyPrint)

150− _sgSavedAdStyleId

151 _sgUserIP

152+ _sgFields

152 _sgKey

153 _sgKey

153 _sgOAuthToken

154 _sgOAuthToken

154− _sgFields

155 (Just AltJSON)

156 where go

157 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'SavedadstylesList'' request conforms to.

48type SavedadstylesListResource =

49 "savedadstyles" :>

50+ QueryParam "maxResults" Int32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Int32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyles

59

60-- | List all saved ad styles in the user\'s account.

@@ -158,12 +158,12 @@ instance GoogleRequest SavedadstylesList' where

158 type Rs SavedadstylesList' = SavedAdStyles

159 request = requestWithRoute defReq adSenseURL

160 requestWithRoute r u SavedadstylesList'{..}

161+ = go _slMaxResults _slPageToken _slQuotaUser

161− = go _slQuotaUser (Just _slPrettyPrint) _slUserIP

162+ (Just _slPrettyPrint)

163+ _slUserIP

164+ _slFields

162 _slKey

165 _slKey

163− _slPageToken

164 _slOAuthToken

166 _slOAuthToken

165− _slMaxResults

166− _slFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+17−17

@@ -27,7 +27,7 @@ module Network.Google.Resource.AdSense.URLChannels.List

27 URLChannelsListResource

28

29 -- * Creating a Request

30− , uRLChannelsList'

30+ , urlChannelsList'

31 , URLChannelsList'

32

33 -- * Request Lenses

@@ -51,20 +51,20 @@ type URLChannelsListResource =

51 "adclients" :>

52 Capture "adClientId" Text :>

53 "urlchannels" :>

54+ QueryParam "maxResults" Int32 :>

55+ QueryParam "pageToken" Text :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

63

64-- | List all URL channels in the specified ad client for this AdSense

65-- account.

66--

67−-- /See:/ 'uRLChannelsList'' smart constructor.

67+-- /See:/ 'urlChannelsList'' smart constructor.

68data URLChannelsList' = URLChannelsList'

69 { _uclQuotaUser :: !(Maybe Text)

70 , _uclPrettyPrint :: !Bool

@@ -98,10 +98,10 @@ data URLChannelsList' = URLChannelsList'

98-- * 'uclMaxResults'

99--

100-- * 'uclFields'

101−uRLChannelsList'

101+urlChannelsList'

102 :: Text -- ^ 'adClientId'

103 -> URLChannelsList'

104−uRLChannelsList' pUclAdClientId_ =

104+urlChannelsList' pUclAdClientId_ =

105 URLChannelsList'

106 { _uclQuotaUser = Nothing

107 , _uclPrettyPrint = True

@@ -178,13 +178,13 @@ instance GoogleRequest URLChannelsList' where

178 type Rs URLChannelsList' = URLChannels

179 request = requestWithRoute defReq adSenseURL

180 requestWithRoute r u URLChannelsList'{..}

181+ = go _uclMaxResults _uclPageToken _uclAdClientId

182+ _uclQuotaUser

181− = go _uclQuotaUser (Just _uclPrettyPrint) _uclUserIP

183+ (Just _uclPrettyPrint)

182− _uclAdClientId

184+ _uclUserIP

185+ _uclFields

183 _uclKey

186 _uclKey

184− _uclPageToken

185 _uclOAuthToken

187 _uclOAuthToken

186− _uclMaxResults

187− _uclFields

188 (Just AltJSON)

189 where go

190 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/Advertisers/Get.hs+11−12

@@ -53,13 +53,13 @@ type AdvertisersGetResource =

53 Capture "role" GanAdvertisersGetRole :>

54 Capture "roleId" Text :>

55 "advertiser" :>

56+ QueryParam "advertiserId" Text :>

56− QueryParam "quotaUser" Text :>

57+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

59− QueryParam "advertiserId" Text :>

59+ QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Advertiser

64

65-- | Retrieves data about a single advertiser if that the requesting

@@ -174,13 +174,12 @@ instance GoogleRequest AdvertisersGet' where

174 type Rs AdvertisersGet' = Advertiser

175 request = requestWithRoute defReq affiliatesURL

176 requestWithRoute r u AdvertisersGet'{..}

177+ = go _agAdvertiserId _agRole _agRoleId _agQuotaUser

177− = go _agQuotaUser (Just _agPrettyPrint) _agUserIP

178+ (Just _agPrettyPrint)

178− _agAdvertiserId

179+ _agUserIP

179− _agRoleId

180+ _agFields

180− _agRole

181 _agKey

182 _agOAuthToken

183− _agFields

184 (Just AltJSON)

183 (Just AltJSON)

185 where go

184 where go

186 = clientWithRoute

185 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/Advertisers/List.hs+24−23

@@ -57,21 +57,21 @@ type AdvertisersListResource =

57 Capture "role" GanAdvertisersListRole :>

58 Capture "roleId" Text :>

59 "advertisers" :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "advertiserCategory" Text :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "maxResults" Word32 :>

62− QueryParam "userIp" Text :>

62+ QueryParam "minNinetyDayEpc" Double :>

63− QueryParam "relationshipStatus"

63+ QueryParam "minPayoutRank" Int32 :>

64− GanAdvertisersListRelationshipStatus

65− :>

66 QueryParam "minSevenDayEpc" Double :>

64 QueryParam "minSevenDayEpc" Double :>

67− QueryParam "minNinetyDayEpc" Double :>

65+ QueryParam "pageToken" Text :>

68− QueryParam "key" Key :>

66+ QueryParam "relationshipStatus"

69− QueryParam "minPayoutRank" Int32 :>

67+ GanAdvertisersListRelationshipStatus

70− QueryParam "advertiserCategory" Text :>

68+ :>

69+ QueryParam "quotaUser" Text :>

70+ QueryParam "prettyPrint" Bool :>

71− QueryParam "pageToken" Text :>

71+ QueryParam "userIp" Text :>

72− QueryParam "oauth_token" OAuthToken :>

72+ QueryParam "fields" Text :>

73− QueryParam "maxResults" Word32 :>

73+ QueryParam "key" Key :>

74− QueryParam "fields" Text :>

74+ QueryParam "oauth_token" OAuthToken :>

75 QueryParam "alt" AltJSON :>

76 Get '[JSON] Advertisers

77

@@ -254,19 +254,20 @@ instance GoogleRequest AdvertisersList' where

254 type Rs AdvertisersList' = Advertisers

255 request = requestWithRoute defReq affiliatesURL

256 requestWithRoute r u AdvertisersList'{..}

257− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

257+ = go _alAdvertiserCategory _alMaxResults

258− _alRelationshipStatus

259− _alMinSevenDayEpc

260− _alRoleId

261 _alMinNinetyDayEpc

258 _alMinNinetyDayEpc

262− _alRole

263− _alKey

264 _alMinPayoutRank

259 _alMinPayoutRank

265− _alAdvertiserCategory

260+ _alMinSevenDayEpc

266 _alPageToken

261 _alPageToken

267− _alOAuthToken

262+ _alRelationshipStatus

268− _alMaxResults

263+ _alRole

264+ _alRoleId

265+ _alQuotaUser

266+ (Just _alPrettyPrint)

267+ _alUserIP

269 _alFields

268 _alFields

269+ _alKey

270+ _alOAuthToken

270 (Just AltJSON)

271 (Just AltJSON)

271 where go

272 where go

272 = clientWithRoute

273 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/CcOffers/List.hs+13−13

@@ -50,14 +50,14 @@ type CcOffersListResource =

50 "publishers" :>

51 Capture "publisher" Text :>

52 "ccOffers" :>

53+ QueryParams "advertiser" Text :>

54+ QueryParam "projection" GanCcOffersListProjection :>

53− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

57− QueryParams "advertiser" Text :>

58− QueryParam "projection" GanCcOffersListProjection :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] CcOffers

62

63-- | Retrieves credit card offers for the given publisher.

@@ -174,13 +174,13 @@ instance GoogleRequest CcOffersList' where

174 type Rs CcOffersList' = CcOffers

175 request = requestWithRoute defReq affiliatesURL

176 requestWithRoute r u CcOffersList'{..}

177+ = go _colAdvertiser _colProjection _colPublisher

178+ _colQuotaUser

177− = go _colQuotaUser (Just _colPrettyPrint) _colUserIP

179+ (Just _colPrettyPrint)

180+ _colUserIP

181+ _colFields

178 _colKey

182 _colKey

179− _colAdvertiser

180− _colProjection

181 _colOAuthToken

183 _colOAuthToken

182− _colPublisher

183− _colFields

184 (Just AltJSON)

185 where go

186 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/Events/List.hs+37−39

@@ -65,33 +65,31 @@ type EventsListResource =

65 Capture "role" GanEventsListRole :>

66 Capture "roleId" Text :>

67 "events" :>

68− QueryParam "status" GanEventsListStatus :>

68+ QueryParam "advertiserId" Text :>

69− QueryParam "quotaUser" Text :>

69+ QueryParam "chargeType" GanEventsListChargeType :>

70− QueryParam "prettyPrint" Bool :>

70+ QueryParam "eventDateMax" Text :>

71 QueryParam "eventDateMin" Text :>

72− QueryParam "chargeType" GanEventsListChargeType :>

72+ QueryParam "linkId" Text :>

73+ QueryParam "maxResults" Word32 :>

73− QueryParam "memberId" Text :>

74+ QueryParam "memberId" Text :>

74− QueryParam "userIp" Text :>

75 QueryParam "modifyDateMax" Text :>

76− QueryParam "advertiserId" Text :>

77− QueryParam "modifyDateMin" Text :>

76+ QueryParam "modifyDateMin" Text :>

77+ QueryParam "orderId" Text :>

78− QueryParam "eventDateMax" Text :>

78+ QueryParam "pageToken" Text :>

79− QueryParam "key" Key :>

79+ QueryParam "productCategory" Text :>

80− QueryParam "sku" Text :>

80+ QueryParam "publisherId" Text :>

81− QueryParam "linkId" Text :>

81+ QueryParam "sku" Text :>

82− QueryParam "pageToken" Text :>

82+ QueryParam "status" GanEventsListStatus

83+ :>

83 QueryParam "type" GanEventsListType :>

84 QueryParam "type" GanEventsListType :>

84− QueryParam "oauth_token" OAuthToken

85+ QueryParam "quotaUser" Text :>

85− :>

86− QueryParam "orderId" Text :>

86+ QueryParam "prettyPrint" Bool :>

87− QueryParam "publisherId" Text :>

87+ QueryParam "userIp" Text :>

88− QueryParam "productCategory"

89− Text

90− :>

91− QueryParam "maxResults"

92− Word32

93− :>

94− QueryParam "fields" Text :>

88+ QueryParam "fields" Text :>

89+ QueryParam "key" Key :>

90+ QueryParam "oauth_token"

91+ OAuthToken

92+ :>

95 QueryParam "alt" AltJSON

93 QueryParam "alt" AltJSON

96 :> Get '[JSON] Events

94 :> Get '[JSON] Events

97

95

@@ -361,28 +359,28 @@ instance GoogleRequest EventsList' where

361 type Rs EventsList' = Events

359 type Rs EventsList' = Events

362 request = requestWithRoute defReq affiliatesURL

360 request = requestWithRoute defReq affiliatesURL

363 requestWithRoute r u EventsList'{..}

361 requestWithRoute r u EventsList'{..}

364− = go _elStatus _elQuotaUser (Just _elPrettyPrint)

362+ = go _elAdvertiserId _elChargeType _elEventDateMax

365 _elEventDateMin

363 _elEventDateMin

366− _elChargeType

364+ _elLinkId

365+ _elMaxResults

367 _elMemberId

366 _elMemberId

368− _elUserIP

369 _elModifyDateMax

367 _elModifyDateMax

370− _elAdvertiserId

371 _elModifyDateMin

368 _elModifyDateMin

372− _elRoleId

373− _elRole

374− _elEventDateMax

375− _elKey

376− _elSku

377− _elLinkId

378− _elPageToken

379− _elType

380− _elOAuthToken

381 _elOrderId

369 _elOrderId

382− _elPublisherId

370+ _elPageToken

383 _elProductCategory

371 _elProductCategory

384− _elMaxResults

372+ _elPublisherId

373+ _elSku

374+ _elStatus

375+ _elType

376+ _elRole

377+ _elRoleId

378+ _elQuotaUser

379+ (Just _elPrettyPrint)

380+ _elUserIP

385 _elFields

381 _elFields

382+ _elKey

383+ _elOAuthToken

386 (Just AltJSON)

384 (Just AltJSON)

387 where go

385 where go

388 = clientWithRoute (Proxy :: Proxy EventsListResource)

386 = clientWithRoute (Proxy :: Proxy EventsListResource)

gogol-affiliates/gen/Network/Google/Resource/Gan/Links/Get.hs+7−8

@@ -57,9 +57,9 @@ type LinksGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Link

64

65-- | Retrieves data about a single link if the requesting

@@ -173,13 +173,12 @@ instance GoogleRequest LinksGet' where

173 type Rs LinksGet' = Link

174 request = requestWithRoute defReq affiliatesURL

175 requestWithRoute r u LinksGet'{..}

176+ = go _lgRole _lgRoleId _lgLinkId _lgQuotaUser

176− = go _lgQuotaUser (Just _lgPrettyPrint) _lgUserIP

177+ (Just _lgPrettyPrint)

177− _lgRoleId

178+ _lgUserIP

178− _lgRole

179+ _lgFields

179 _lgKey

180 _lgKey

180− _lgLinkId

181 _lgOAuthToken

182− _lgFields

183 (Just AltJSON)

182 (Just AltJSON)

184 where go

183 where go

185 = clientWithRoute (Proxy :: Proxy LinksGetResource) r

184 = clientWithRoute (Proxy :: Proxy LinksGetResource) r

gogol-affiliates/gen/Network/Google/Resource/Gan/Links/Insert.hs+7−7

@@ -53,9 +53,9 @@ type LinksInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] Link :> Post '[JSON] Link

61

@@ -167,12 +167,12 @@ instance GoogleRequest LinksInsert' where

167 type Rs LinksInsert' = Link

168 request = requestWithRoute defReq affiliatesURL

169 requestWithRoute r u LinksInsert'{..}

170+ = go _liRole _liRoleId _liQuotaUser

170− = go _liQuotaUser (Just _liPrettyPrint) _liUserIP

171+ (Just _liPrettyPrint)

171− _liRoleId

172+ _liUserIP

172− _liRole

173+ _liFields

173 _liKey

174 _liKey

174 _liOAuthToken

175 _liOAuthToken

175− _liFields

176 (Just AltJSON)

177 _liLink

178 where go

gogol-affiliates/gen/Network/Google/Resource/Gan/Links/List.hs+36−35

@@ -62,29 +62,30 @@ type LinksListResource =

62 Capture "role" GanLinksListRole :>

63 Capture "roleId" Text :>

64 "links" :>

65− QueryParam "createDateMax" Text :>

65+ QueryParams "advertiserId" Int64 :>

66+ QueryParams "assetSize" Text :>

66− QueryParam "authorship" GanLinksListAuthorship :>

67+ QueryParam "authorship" GanLinksListAuthorship :>

67− QueryParam "quotaUser" Text :>

68+ QueryParam "createDateMax" Text :>

68− QueryParam "prettyPrint" Bool :>

69+ QueryParam "createDateMin" Text :>

69− QueryParams "assetSize" Text :>

70+ QueryParam "linkType" GanLinksListLinkType :>

70− QueryParam "userIp" Text :>

71+ QueryParam "maxResults" Word32 :>

71− QueryParam "relationshipStatus"

72+ QueryParam "pageToken" Text :>

72− GanLinksListRelationshipStatus

73− :>

74− QueryParams "advertiserId" Int64 :>

75− QueryParam "searchText" Text :>

76− QueryParams "promotionType"

77− GanLinksListPromotionType

73+ QueryParams "promotionType" GanLinksListPromotionType

74+ :>

75+ QueryParam "relationshipStatus"

76+ GanLinksListRelationshipStatus

78 :>

77 :>

79− QueryParam "key" Key :>

78+ QueryParam "searchText" Text :>

80− QueryParam "createDateMin" Text :>

79+ QueryParam "startDateMax" Text :>

81− QueryParam "linkType" GanLinksListLinkType :>

80+ QueryParam "startDateMin" Text :>

82− QueryParam "pageToken" Text :>

81+ QueryParam "quotaUser" Text :>

83− QueryParam "startDateMax" Text :>

82+ QueryParam "prettyPrint" Bool :>

84− QueryParam "oauth_token" OAuthToken :>

83+ QueryParam "userIp" Text :>

85− QueryParam "startDateMin" Text :>

84+ QueryParam "fields" Text :>

86− QueryParam "maxResults" Word32 :>

85+ QueryParam "key" Key :>

87− QueryParam "fields" Text :>

86+ QueryParam "oauth_token"

87+ OAuthToken

88+ :>

88 QueryParam "alt" AltJSON :>

89 QueryParam "alt" AltJSON :>

89 Get '[JSON] Links

90 Get '[JSON] Links

90

91

@@ -313,25 +314,25 @@ instance GoogleRequest LinksList' where

313 type Rs LinksList' = Links

314 type Rs LinksList' = Links

314 request = requestWithRoute defReq affiliatesURL

315 request = requestWithRoute defReq affiliatesURL

315 requestWithRoute r u LinksList'{..}

316 requestWithRoute r u LinksList'{..}

317+ = go _llAdvertiserId _llAssetSize _llAuthorship

316− = go _llCreateDateMax _llAuthorship _llQuotaUser

318+ _llCreateDateMax

317− (Just _llPrettyPrint)

318− _llAssetSize

319− _llUserIP

320− _llRelationshipStatus

321− _llAdvertiserId

322− _llSearchText

323− _llPromotionType

324− _llRoleId

325− _llRole

326− _llKey

327 _llCreateDateMin

319 _llCreateDateMin

328 _llLinkType

320 _llLinkType

321+ _llMaxResults

329 _llPageToken

322 _llPageToken

323+ _llPromotionType

324+ _llRelationshipStatus

325+ _llSearchText

330 _llStartDateMax

326 _llStartDateMax

331− _llOAuthToken

332 _llStartDateMin

327 _llStartDateMin

333− _llMaxResults

328+ _llRole

329+ _llRoleId

330+ _llQuotaUser

331+ (Just _llPrettyPrint)

332+ _llUserIP

334 _llFields

333 _llFields

334+ _llKey

335+ _llOAuthToken

335 (Just AltJSON)

336 (Just AltJSON)

336 where go

337 where go

337 = clientWithRoute (Proxy :: Proxy LinksListResource)

338 = clientWithRoute (Proxy :: Proxy LinksListResource)

gogol-affiliates/gen/Network/Google/Resource/Gan/Publishers/Get.hs+11−12

@@ -53,13 +53,13 @@ type PublishersGetResource =

53 Capture "role" GanPublishersGetRole :>

54 Capture "roleId" Text :>

55 "publisher" :>

56+ QueryParam "publisherId" Text :>

56− QueryParam "quotaUser" Text :>

57+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

60+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "publisherId" Text :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Publisher

64

65-- | Retrieves data about a single advertiser if that the requesting

@@ -174,13 +174,12 @@ instance GoogleRequest PublishersGet' where

174 type Rs PublishersGet' = Publisher

175 request = requestWithRoute defReq affiliatesURL

176 requestWithRoute r u PublishersGet'{..}

177+ = go _pgPublisherId _pgRole _pgRoleId _pgQuotaUser

177− = go _pgQuotaUser (Just _pgPrettyPrint) _pgUserIP

178+ (Just _pgPrettyPrint)

178− _pgRoleId

179+ _pgUserIP

179− _pgRole

180+ _pgFields

180 _pgKey

181 _pgKey

181 _pgOAuthToken

182 _pgOAuthToken

182− _pgPublisherId

183− _pgFields

184 (Just AltJSON)

183 (Just AltJSON)

185 where go

184 where go

186 = clientWithRoute

185 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/Publishers/List.hs+25−24

@@ -57,21 +57,21 @@ type PublishersListResource =

57 Capture "role" GanPublishersListRole :>

58 Capture "roleId" Text :>

59 "publishers" :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "maxResults" Word32 :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "minNinetyDayEpc" Double :>

62− QueryParam "userIp" Text :>

62+ QueryParam "minPayoutRank" Int32 :>

63− QueryParam "relationshipStatus"

64− GanPublishersListRelationshipStatus

65− :>

66− QueryParam "minSevenDayEpc" Double :>

63+ QueryParam "minSevenDayEpc" Double :>

67− QueryParam "minNinetyDayEpc" Double :>

64+ QueryParam "pageToken" Text :>

65+ QueryParam "publisherCategory" Text :>

68− QueryParam "key" Key :>

66+ QueryParam "relationshipStatus"

69− QueryParam "minPayoutRank" Int32 :>

67+ GanPublishersListRelationshipStatus

68+ :>

69+ QueryParam "quotaUser" Text :>

70− QueryParam "pageToken" Text :>

70+ QueryParam "prettyPrint" Bool :>

71− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "userIp" Text :>

72− QueryParam "publisherCategory" Text :>

72+ QueryParam "fields" Text :>

73− QueryParam "maxResults" Word32 :>

73+ QueryParam "key" Key :>

74− QueryParam "fields" Text :>

74+ QueryParam "oauth_token" OAuthToken :>

75 QueryParam "alt" AltJSON :>

76 Get '[JSON] Publishers

77

@@ -253,19 +253,20 @@ instance GoogleRequest PublishersList' where

253 type Rs PublishersList' = Publishers

254 request = requestWithRoute defReq affiliatesURL

255 requestWithRoute r u PublishersList'{..}

256− = go _plQuotaUser (Just _plPrettyPrint) _plUserIP

257− _plRelationshipStatus

258− _plMinSevenDayEpc

259− _plRoleId

260− _plMinNinetyDayEpc

256+ = go _plMaxResults _plMinNinetyDayEpc

261− _plRole

262− _plKey

263 _plMinPayoutRank

257 _plMinPayoutRank

258+ _plMinSevenDayEpc

264 _plPageToken

259 _plPageToken

265− _plOAuthToken

266 _plPublisherCategory

260 _plPublisherCategory

267− _plMaxResults

261+ _plRelationshipStatus

262+ _plRole

263+ _plRoleId

264+ _plQuotaUser

265+ (Just _plPrettyPrint)

266+ _plUserIP

268 _plFields

267 _plFields

268+ _plKey

269+ _plOAuthToken

269 (Just AltJSON)

270 (Just AltJSON)

270 where go

271 where go

271 = clientWithRoute

272 = clientWithRoute

gogol-affiliates/gen/Network/Google/Resource/Gan/Reports/Get.hs+30−29

@@ -62,23 +62,24 @@ type ReportsGetResource =

62 Capture "roleId" Text :>

63 "report" :>

64 Capture "reportType" GanReportsGetReportType :>

65− QueryParam "status" GanReportsGetStatus :>

65+ QueryParams "advertiserId" Text :>

66− QueryParam "quotaUser" Text :>

66+ QueryParam "calculateTotals" Bool :>

67− QueryParam "prettyPrint" Bool :>

67+ QueryParam "endDate" Text :>

68− QueryParam "userIp" Text :>

68+ QueryParam "eventType" GanReportsGetEventType :>

69− QueryParams "advertiserId" Text :>

69+ QueryParams "linkId" Text :>

70− QueryParam "endDate" Text :>

70+ QueryParam "maxResults" Word32 :>

71− QueryParam "eventType" GanReportsGetEventType :>

71+ QueryParams "orderId" Text :>

72− QueryParam "startDate" Text :>

72+ QueryParams "publisherId" Text :>

73− QueryParam "key" Key :>

73+ QueryParam "startDate" Text :>

74− QueryParam "calculateTotals" Bool :>

74+ QueryParam "startIndex" Word32 :>

75− QueryParams "linkId" Text :>

75+ QueryParam "status" GanReportsGetStatus :>

76− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "quotaUser" Text :>

77− QueryParams "orderId" Text :>

77+ QueryParam "prettyPrint" Bool :>

78− QueryParams "publisherId" Text :>

78+ QueryParam "userIp" Text :>

79− QueryParam "startIndex" Word32 :>

79+ QueryParam "fields" Text :>

80− QueryParam "maxResults" Word32 :>

80+ QueryParam "key" Key :>

81− QueryParam "fields" Text :>

81+ QueryParam "oauth_token" OAuthToken

82+ :>

82 QueryParam "alt" AltJSON :>

83 QueryParam "alt" AltJSON :>

83 Get '[JSON] Report

84 Get '[JSON] Report

84

85

@@ -299,24 +300,24 @@ instance GoogleRequest ReportsGet' where

299 type Rs ReportsGet' = Report

300 type Rs ReportsGet' = Report

300 request = requestWithRoute defReq affiliatesURL

301 request = requestWithRoute defReq affiliatesURL

301 requestWithRoute r u ReportsGet'{..}

302 requestWithRoute r u ReportsGet'{..}

302− = go _rgStatus _rgQuotaUser (Just _rgPrettyPrint)

303− _rgUserIP

304− _rgAdvertiserId

303+ = go _rgAdvertiserId _rgCalculateTotals _rgEndDate

305− _rgEndDate

306− _rgRoleId

307− _rgRole

308 _rgEventType

304 _rgEventType

309− _rgStartDate

310− _rgKey

311− _rgCalculateTotals

312 _rgLinkId

305 _rgLinkId

313− _rgOAuthToken

306+ _rgMaxResults

314 _rgOrderId

307 _rgOrderId

315 _rgPublisherId

308 _rgPublisherId

316− _rgReportType

309+ _rgStartDate

317 _rgStartIndex

310 _rgStartIndex

318− _rgMaxResults

311+ _rgStatus

312+ _rgRole

313+ _rgRoleId

314+ _rgReportType

315+ _rgQuotaUser

316+ (Just _rgPrettyPrint)

317+ _rgUserIP

319 _rgFields

318 _rgFields

319+ _rgKey

320+ _rgOAuthToken

320 (Just AltJSON)

321 (Just AltJSON)

321 where go

322 where go

322 = clientWithRoute (Proxy :: Proxy ReportsGetResource)

323 = clientWithRoute (Proxy :: Proxy ReportsGetResource)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Ga/Get.hs+32−32

@@ -58,26 +58,27 @@ import Network.Google.Prelude

58type DataGaGetResource =

59 "data" :>

60 "ga" :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "dimensions" Text :>

62− QueryParam "metrics" Text :>

62+ QueryParam "filters" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParam "max-results" Int32 :>

64+ QueryParam "output" AnalyticsDataGaGetOutput :>

64− QueryParam "samplingLevel"

65+ QueryParam "samplingLevel"

65− AnalyticsDataGaGetSamplingLevel

66+ AnalyticsDataGaGetSamplingLevel

66− :>

67+ :>

67− QueryParam "userIp" Text :>

68− QueryParam "filters" Text :>

68+ QueryParam "segment" Text :>

69− QueryParam "ids" Text :>

69+ QueryParam "sort" Text :>

70− QueryParam "end-date" Text :>

70+ QueryParam "start-index" Int32 :>

71− QueryParam "key" Key :>

71+ QueryParam "ids" Text :>

72− QueryParam "output" AnalyticsDataGaGetOutput :>

72+ QueryParam "start-date" Text :>

73− QueryParam "sort" Text :>

73+ QueryParam "end-date" Text :>

74− QueryParam "dimensions" Text :>

74+ QueryParam "metrics" Text :>

75− QueryParam "oauth_token" OAuthToken :>

75+ QueryParam "quotaUser" Text :>

76− QueryParam "start-index" Int32 :>

76+ QueryParam "prettyPrint" Bool :>

77− QueryParam "max-results" Int32 :>

77+ QueryParam "userIp" Text :>

78− QueryParam "segment" Text :>

78+ QueryParam "fields" Text :>

79− QueryParam "start-date" Text :>

79+ QueryParam "key" Key :>

80− QueryParam "fields" Text :>

80+ QueryParam "oauth_token" OAuthToken

81+ :>

81 QueryParam "alt" AltJSON :>

82 QueryParam "alt" AltJSON :>

82 Get '[JSON] GaData

83 Get '[JSON] GaData

83

84

@@ -288,23 +289,22 @@ instance GoogleRequest DataGaGet' where

288 type Rs DataGaGet' = GaData

289 type Rs DataGaGet' = GaData

289 request = requestWithRoute defReq analyticsURL

290 request = requestWithRoute defReq analyticsURL

290 requestWithRoute r u DataGaGet'{..}

291 requestWithRoute r u DataGaGet'{..}

291− = go _dggQuotaUser (Just _dggMetrics)

292− (Just _dggPrettyPrint)

293− _dggSamplingLevel

294− _dggUserIP

295− _dggFilters

292+ = go _dggDimensions _dggFilters _dggMaxResults

296− (Just _dggIds)

297− (Just _dggEndDate)

298− _dggKey

299 _dggOutput

293 _dggOutput

294+ _dggSamplingLevel

295+ _dggSegment

300 _dggSort

296 _dggSort

301− _dggDimensions

302− _dggOAuthToken

303 _dggStartIndex

297 _dggStartIndex

304− _dggMaxResults

298+ (Just _dggIds)

305− _dggSegment

306 (Just _dggStartDate)

299 (Just _dggStartDate)

300+ (Just _dggEndDate)

301+ (Just _dggMetrics)

302+ _dggQuotaUser

303+ (Just _dggPrettyPrint)

304+ _dggUserIP

307 _dggFields

305 _dggFields

306+ _dggKey

307+ _dggOAuthToken

308 (Just AltJSON)

309 where go

310 = clientWithRoute (Proxy :: Proxy DataGaGetResource)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Mcf/Get.hs+23−24

@@ -56,24 +56,24 @@ import Network.Google.Prelude

56type DataMcfGetResource =

57 "data" :>

58 "mcf" :>

59− QueryParam "quotaUser" Text :>

59+ QueryParam "dimensions" Text :>

60− QueryParam "metrics" Text :>

60+ QueryParam "filters" Text :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "max-results" Int32 :>

62 QueryParam "samplingLevel"

63 AnalyticsDataMcfGetSamplingLevel

64 :>

65− QueryParam "userIp" Text :>

65+ QueryParam "sort" Text :>

66− QueryParam "filters" Text :>

66+ QueryParam "start-index" Int32 :>

67 QueryParam "ids" Text :>

68− QueryParam "end-date" Text :>

68+ QueryParam "start-date" Text :>

69− QueryParam "key" Key :>

69+ QueryParam "end-date" Text :>

70− QueryParam "sort" Text :>

70+ QueryParam "metrics" Text :>

71− QueryParam "dimensions" Text :>

71+ QueryParam "quotaUser" Text :>

72− QueryParam "oauth_token" OAuthToken :>

72+ QueryParam "prettyPrint" Bool :>

73− QueryParam "start-index" Int32 :>

73+ QueryParam "userIp" Text :>

74− QueryParam "max-results" Int32 :>

74+ QueryParam "fields" Text :>

75− QueryParam "start-date" Text :>

75+ QueryParam "key" Key :>

76− QueryParam "fields" Text :>

76+ QueryParam "oauth_token" OAuthToken :>

77 QueryParam "alt" AltJSON :>

78 Get '[JSON] McfData

79

@@ -267,21 +267,20 @@ instance GoogleRequest DataMcfGet' where

267 type Rs DataMcfGet' = McfData

268 request = requestWithRoute defReq analyticsURL

269 requestWithRoute r u DataMcfGet'{..}

270− = go _dmgQuotaUser (Just _dmgMetrics)

270+ = go _dmgDimensions _dmgFilters _dmgMaxResults

271− (Just _dmgPrettyPrint)

272 _dmgSamplingLevel

271 _dmgSamplingLevel

273− _dmgUserIP

274− _dmgFilters

275− (Just _dmgIds)

276− (Just _dmgEndDate)

277− _dmgKey

278 _dmgSort

272 _dmgSort

279− _dmgDimensions

280− _dmgOAuthToken

281 _dmgStartIndex

273 _dmgStartIndex

282− _dmgMaxResults

274+ (Just _dmgIds)

283 (Just _dmgStartDate)

275 (Just _dmgStartDate)

276+ (Just _dmgEndDate)

277+ (Just _dmgMetrics)

278+ _dmgQuotaUser

279+ (Just _dmgPrettyPrint)

280+ _dmgUserIP

284 _dmgFields

281 _dmgFields

282+ _dmgKey

283+ _dmgOAuthToken

285 (Just AltJSON)

284 (Just AltJSON)

286 where go

285 where go

287 = clientWithRoute (Proxy :: Proxy DataMcfGetResource)

286 = clientWithRoute (Proxy :: Proxy DataMcfGetResource)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Realtime/Get.hs+18−19

@@ -52,18 +52,18 @@ import Network.Google.Prelude

52type DataRealtimeGetResource =

53 "data" :>

54 "realtime" :>

55− QueryParam "quotaUser" Text :>

55+ QueryParam "dimensions" Text :>

56− QueryParam "metrics" Text :>

56+ QueryParam "filters" Text :>

57− QueryParam "prettyPrint" Bool :>

57+ QueryParam "max-results" Int32 :>

58− QueryParam "userIp" Text :>

58+ QueryParam "sort" Text :>

59− QueryParam "filters" Text :>

59+ QueryParam "ids" Text :>

60− QueryParam "ids" Text :>

60+ QueryParam "metrics" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "quotaUser" Text :>

62− QueryParam "sort" Text :>

62+ QueryParam "prettyPrint" Bool :>

63− QueryParam "dimensions" Text :>

63+ QueryParam "userIp" Text :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "max-results" Int32 :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Get '[JSON] RealtimeData

69

@@ -211,17 +211,16 @@ instance GoogleRequest DataRealtimeGet' where

211 type Rs DataRealtimeGet' = RealtimeData

212 request = requestWithRoute defReq analyticsURL

213 requestWithRoute r u DataRealtimeGet'{..}

214+ = go _drgDimensions _drgFilters _drgMaxResults

215+ _drgSort

216+ (Just _drgIds)

214− = go _drgQuotaUser (Just _drgMetrics)

217+ (Just _drgMetrics)

218+ _drgQuotaUser

215 (Just _drgPrettyPrint)

219 (Just _drgPrettyPrint)

216 _drgUserIP

220 _drgUserIP

217− _drgFilters

221+ _drgFields

218− (Just _drgIds)

219 _drgKey

222 _drgKey

220− _drgSort

221− _drgDimensions

222 _drgOAuthToken

223 _drgOAuthToken

223− _drgMaxResults

224− _drgFields

225 (Just AltJSON)

224 (Just AltJSON)

226 where go

225 where go

227 = clientWithRoute

226 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountSummaries/List.hs+11−12

@@ -49,14 +49,14 @@ import Network.Google.Prelude

49type ManagementAccountSummariesListResource =

50 "management" :>

51 "accountSummaries" :>

52+ QueryParam "max-results" Int32 :>

53+ QueryParam "start-index" Int32 :>

52− QueryParam "quotaUser" Text :>

54+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

57+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "start-index" Int32 :>

58− QueryParam "max-results" Int32 :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 Get '[JSON] AccountSummaries

62

@@ -171,13 +171,12 @@ instance GoogleRequest

171 request = requestWithRoute defReq analyticsURL

172 requestWithRoute r u

173 ManagementAccountSummariesList'{..}

174+ = go _maslMaxResults _maslStartIndex _maslQuotaUser

174− = go _maslQuotaUser (Just _maslPrettyPrint)

175+ (Just _maslPrettyPrint)

175 _maslUserIP

176 _maslUserIP

177+ _maslFields

176 _maslKey

178 _maslKey

177 _maslOAuthToken

179 _maslOAuthToken

178− _maslStartIndex

179− _maslMaxResults

180− _maslFields

181 (Just AltJSON)

180 (Just AltJSON)

182 where go

181 where go

183 = clientWithRoute

182 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Delete.hs+6−7

@@ -54,9 +54,9 @@ type ManagementAccountUserLinksDeleteResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] ()

61

62-- | Removes a user from the given account.

@@ -167,13 +167,12 @@ instance GoogleRequest

167 request = requestWithRoute defReq analyticsURL

168 requestWithRoute r u

169 ManagementAccountUserLinksDelete'{..}

170+ = go _mauldAccountId _mauldLinkId _mauldQuotaUser

170− = go _mauldQuotaUser (Just _mauldPrettyPrint)

171+ (Just _mauldPrettyPrint)

171 _mauldUserIP

172 _mauldUserIP

172− _mauldAccountId

173+ _mauldFields

173 _mauldKey

174 _mauldKey

174− _mauldLinkId

175 _mauldOAuthToken

176− _mauldFields

177 (Just AltJSON)

176 (Just AltJSON)

178 where go

177 where go

179 = clientWithRoute

178 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Insert.hs+6−6

@@ -53,9 +53,9 @@ type ManagementAccountUserLinksInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] EntityUserLink :>

61 Post '[JSON] EntityUserLink

@@ -170,12 +170,12 @@ instance GoogleRequest

170 request = requestWithRoute defReq analyticsURL

171 requestWithRoute r u

172 ManagementAccountUserLinksInsert'{..}

173+ = go _mauliAccountId _mauliQuotaUser

173− = go _mauliQuotaUser (Just _mauliPrettyPrint)

174+ (Just _mauliPrettyPrint)

174 _mauliUserIP

175 _mauliUserIP

175− _mauliAccountId

176+ _mauliFields

176 _mauliKey

177 _mauliKey

177 _mauliOAuthToken

178 _mauliOAuthToken

178− _mauliFields

179 (Just AltJSON)

180 _mauliEntityUserLink

181 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/List.hs+13−13

@@ -51,14 +51,14 @@ type ManagementAccountUserLinksListResource =

51 "accounts" :>

52 Capture "accountId" Text :>

53 "entityUserLinks" :>

54+ QueryParam "max-results" Int32 :>

55+ QueryParam "start-index" Int32 :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "start-index" Int32 :>

60− QueryParam "max-results" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] EntityUserLinks

64

@@ -182,14 +182,14 @@ instance GoogleRequest

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u

184 ManagementAccountUserLinksList'{..}

185− = go _maullQuotaUser (Just _maullPrettyPrint)

185+ = go _maullMaxResults _maullStartIndex

186− _maullUserIP

187 _maullAccountId

186 _maullAccountId

187+ _maullQuotaUser

188+ (Just _maullPrettyPrint)

189+ _maullUserIP

190+ _maullFields

188 _maullKey

191 _maullKey

189 _maullOAuthToken

192 _maullOAuthToken

190− _maullStartIndex

191− _maullMaxResults

192− _maullFields

193 (Just AltJSON)

194 where go

195 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Update.hs+6−7

@@ -55,9 +55,9 @@ type ManagementAccountUserLinksUpdateResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] EntityUserLink :>

63 Put '[JSON] EntityUserLink

@@ -182,13 +182,12 @@ instance GoogleRequest

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u

184 ManagementAccountUserLinksUpdate'{..}

185+ = go _mauluAccountId _mauluLinkId _mauluQuotaUser

185− = go _mauluQuotaUser (Just _mauluPrettyPrint)

186+ (Just _mauluPrettyPrint)

186 _mauluUserIP

187 _mauluUserIP

187− _mauluAccountId

188+ _mauluFields

188 _mauluKey

189 _mauluKey

189− _mauluLinkId

190 _mauluOAuthToken

191− _mauluFields

192 (Just AltJSON)

191 (Just AltJSON)

193 _mauluEntityUserLink

192 _mauluEntityUserLink

194 where go

193 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Accounts/List.hs+12−12

@@ -48,14 +48,14 @@ import Network.Google.Prelude

48type ManagementAccountsListResource =

49 "management" :>

50 "accounts" :>

51+ QueryParam "max-results" Int32 :>

52+ QueryParam "start-index" Int32 :>

51− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

56+ QueryParam "fields" Text :>

54− QueryParam "key" Key :>

57+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "start-index" Int32 :>

57− QueryParam "max-results" Int32 :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Accounts

60

61-- | Lists all accounts to which the user has access.

@@ -162,12 +162,12 @@ instance GoogleRequest ManagementAccountsList' where

162 type Rs ManagementAccountsList' = Accounts

163 request = requestWithRoute defReq analyticsURL

164 requestWithRoute r u ManagementAccountsList'{..}

165+ = go _malMaxResults _malStartIndex _malQuotaUser

165− = go _malQuotaUser (Just _malPrettyPrint) _malUserIP

166+ (Just _malPrettyPrint)

167+ _malUserIP

168+ _malFields

166 _malKey

169 _malKey

167 _malOAuthToken

170 _malOAuthToken

168− _malStartIndex

169− _malMaxResults

170− _malFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDataSources/List.hs+13−13

@@ -54,14 +54,14 @@ type ManagementCustomDataSourcesListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "customDataSources" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] CustomDataSources

67

@@ -197,15 +197,15 @@ instance GoogleRequest

197 request = requestWithRoute defReq analyticsURL

198 requestWithRoute r u

199 ManagementCustomDataSourcesList'{..}

200− = go _mcdslQuotaUser (Just _mcdslPrettyPrint)

200+ = go _mcdslMaxResults _mcdslStartIndex

201+ _mcdslAccountId

201 _mcdslWebPropertyId

202 _mcdslWebPropertyId

203+ _mcdslQuotaUser

204+ (Just _mcdslPrettyPrint)

202 _mcdslUserIP

205 _mcdslUserIP

203− _mcdslAccountId

206+ _mcdslFields

204 _mcdslKey

207 _mcdslKey

205 _mcdslOAuthToken

208 _mcdslOAuthToken

206− _mcdslStartIndex

207− _mcdslMaxResults

208− _mcdslFields

209 (Just AltJSON)

210 where go

211 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Get.hs+8−8

@@ -57,9 +57,9 @@ type ManagementCustomDimensionsGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] CustomDimension

65

@@ -184,14 +184,14 @@ instance GoogleRequest ManagementCustomDimensionsGet'

184 request = requestWithRoute defReq analyticsURL

185 requestWithRoute r u

186 ManagementCustomDimensionsGet'{..}

187+ = go _mcdgAccountId _mcdgWebPropertyId

188+ _mcdgCustomDimensionId

189+ _mcdgQuotaUser

187− = go _mcdgQuotaUser (Just _mcdgPrettyPrint)

190+ (Just _mcdgPrettyPrint)

188− _mcdgWebPropertyId

189 _mcdgUserIP

191 _mcdgUserIP

190− _mcdgAccountId

192+ _mcdgFields

191 _mcdgKey

193 _mcdgKey

192 _mcdgOAuthToken

194 _mcdgOAuthToken

193− _mcdgCustomDimensionId

194− _mcdgFields

195 (Just AltJSON)

196 where go

197 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Insert.hs+6−7

@@ -56,9 +56,9 @@ type ManagementCustomDimensionsInsertResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] CustomDimension :>

64 Post '[JSON] CustomDimension

@@ -184,13 +184,12 @@ instance GoogleRequest

184 request = requestWithRoute defReq analyticsURL

185 requestWithRoute r u

186 ManagementCustomDimensionsInsert'{..}

187+ = go _mcdiAccountId _mcdiWebPropertyId _mcdiQuotaUser

187− = go _mcdiQuotaUser (Just _mcdiPrettyPrint)

188+ (Just _mcdiPrettyPrint)

188− _mcdiWebPropertyId

189 _mcdiUserIP

190− _mcdiAccountId

190+ _mcdiFields

191 _mcdiKey

192 _mcdiOAuthToken

193− _mcdiFields

194 (Just AltJSON)

193 (Just AltJSON)

195 _mcdiCustomDimension

194 _mcdiCustomDimension

196 where go

195 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/List.hs+12−13

@@ -54,14 +54,14 @@ type ManagementCustomDimensionsListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "customDimensions" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] CustomDimensions

67

@@ -196,15 +196,14 @@ instance GoogleRequest

196 request = requestWithRoute defReq analyticsURL

197 requestWithRoute r u

198 ManagementCustomDimensionsList'{..}

199− = go _mcdlQuotaUser (Just _mcdlPrettyPrint)

199+ = go _mcdlMaxResults _mcdlStartIndex _mcdlAccountId

200 _mcdlWebPropertyId

201+ _mcdlQuotaUser

202+ (Just _mcdlPrettyPrint)

201 _mcdlUserIP

203 _mcdlUserIP

202− _mcdlAccountId

204+ _mcdlFields

203 _mcdlKey

205 _mcdlKey

204 _mcdlOAuthToken

206 _mcdlOAuthToken

205− _mcdlStartIndex

206− _mcdlMaxResults

207− _mcdlFields

208 (Just AltJSON)

207 (Just AltJSON)

209 where go

208 where go

210 = clientWithRoute

209 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Patch.hs+12−11

@@ -57,13 +57,13 @@ type ManagementCustomDimensionsPatchResource =

57 Capture "webPropertyId" Text :>

58 "customDimensions" :>

59 Capture "customDimensionId" Text :>

60+ QueryParam "ignoreCustomDataSourceLinks" Bool :>

60− QueryParam "quotaUser" Text :>

61+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

62+ QueryParam "prettyPrint" Bool :>

62− QueryParam "ignoreCustomDataSourceLinks" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] CustomDimension :>

69 Patch '[JSON] CustomDimension

@@ -212,15 +212,16 @@ instance GoogleRequest

212 request = requestWithRoute defReq analyticsURL

213 requestWithRoute r u

214 ManagementCustomDimensionsPatch'{..}

215− = go _mcdpQuotaUser (Just _mcdpPrettyPrint)

215+ = go (Just _mcdpIgnoreCustomDataSourceLinks)

216+ _mcdpAccountId

216 _mcdpWebPropertyId

217 _mcdpWebPropertyId

217− (Just _mcdpIgnoreCustomDataSourceLinks)

218+ _mcdpCustomDimensionId

219+ _mcdpQuotaUser

220+ (Just _mcdpPrettyPrint)

218 _mcdpUserIP

221 _mcdpUserIP

219− _mcdpAccountId

222+ _mcdpFields

220 _mcdpKey

223 _mcdpKey

221 _mcdpOAuthToken

224 _mcdpOAuthToken

222− _mcdpCustomDimensionId

223− _mcdpFields

224 (Just AltJSON)

225 (Just AltJSON)

225 _mcdpCustomDimension

226 _mcdpCustomDimension

226 where go

227 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Update.hs+12−11

@@ -56,13 +56,13 @@ type ManagementCustomDimensionsUpdateResource =

56 Capture "webPropertyId" Text :>

57 "customDimensions" :>

58 Capture "customDimensionId" Text :>

59+ QueryParam "ignoreCustomDataSourceLinks" Bool :>

59− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

61− QueryParam "ignoreCustomDataSourceLinks" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] CustomDimension :>

68 Put '[JSON] CustomDimension

@@ -210,15 +210,16 @@ instance GoogleRequest

210 request = requestWithRoute defReq analyticsURL

211 requestWithRoute r u

212 ManagementCustomDimensionsUpdate'{..}

213− = go _mcduQuotaUser (Just _mcduPrettyPrint)

213+ = go (Just _mcduIgnoreCustomDataSourceLinks)

214+ _mcduAccountId

214 _mcduWebPropertyId

215 _mcduWebPropertyId

215− (Just _mcduIgnoreCustomDataSourceLinks)

216+ _mcduCustomDimensionId

217+ _mcduQuotaUser

218+ (Just _mcduPrettyPrint)

216 _mcduUserIP

219 _mcduUserIP

217− _mcduAccountId

220+ _mcduFields

218 _mcduKey

221 _mcduKey

219 _mcduOAuthToken

222 _mcduOAuthToken

220− _mcduCustomDimensionId

221− _mcduFields

222 (Just AltJSON)

223 (Just AltJSON)

223 _mcduCustomDimension

224 _mcduCustomDimension

224 where go

225 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Get.hs+7−7

@@ -57,9 +57,9 @@ type ManagementCustomMetricsGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] CustomMetric

65

@@ -181,14 +181,14 @@ instance GoogleRequest ManagementCustomMetricsGet'

181 type Rs ManagementCustomMetricsGet' = CustomMetric

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u ManagementCustomMetricsGet'{..}

184− = go _mcmgQuotaUser (Just _mcmgPrettyPrint)

184+ = go _mcmgAccountId _mcmgWebPropertyId

185 _mcmgCustomMetricId

186− _mcmgWebPropertyId

186+ _mcmgQuotaUser

187+ (Just _mcmgPrettyPrint)

187 _mcmgUserIP

188 _mcmgUserIP

188− _mcmgAccountId

189+ _mcmgFields

189 _mcmgKey

190 _mcmgKey

190 _mcmgOAuthToken

191 _mcmgOAuthToken

191− _mcmgFields

192 (Just AltJSON)

193 where go

194 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Insert.hs+6−7

@@ -56,9 +56,9 @@ type ManagementCustomMetricsInsertResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] CustomMetric :>

64 Post '[JSON] CustomMetric

@@ -183,13 +183,12 @@ instance GoogleRequest ManagementCustomMetricsInsert'

183 request = requestWithRoute defReq analyticsURL

184 requestWithRoute r u

185 ManagementCustomMetricsInsert'{..}

186+ = go _mcmiAccountId _mcmiWebPropertyId _mcmiQuotaUser

186− = go _mcmiQuotaUser (Just _mcmiPrettyPrint)

187+ (Just _mcmiPrettyPrint)

187− _mcmiWebPropertyId

188 _mcmiUserIP

189− _mcmiAccountId

189+ _mcmiFields

190 _mcmiKey

191 _mcmiOAuthToken

192− _mcmiFields

193 (Just AltJSON)

192 (Just AltJSON)

194 _mcmiCustomMetric

193 _mcmiCustomMetric

195 where go

194 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/List.hs+12−13

@@ -54,14 +54,14 @@ type ManagementCustomMetricsListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "customMetrics" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] CustomMetrics

67

@@ -194,15 +194,14 @@ instance GoogleRequest ManagementCustomMetricsList'

194 type Rs ManagementCustomMetricsList' = CustomMetrics

195 request = requestWithRoute defReq analyticsURL

196 requestWithRoute r u ManagementCustomMetricsList'{..}

197− = go _mcmlQuotaUser (Just _mcmlPrettyPrint)

197+ = go _mcmlMaxResults _mcmlStartIndex _mcmlAccountId

198 _mcmlWebPropertyId

199+ _mcmlQuotaUser

200+ (Just _mcmlPrettyPrint)

199 _mcmlUserIP

201 _mcmlUserIP

200− _mcmlAccountId

202+ _mcmlFields

201 _mcmlKey

203 _mcmlKey

202 _mcmlOAuthToken

204 _mcmlOAuthToken

203− _mcmlStartIndex

204− _mcmlMaxResults

205− _mcmlFields

206 (Just AltJSON)

205 (Just AltJSON)

207 where go

206 where go

208 = clientWithRoute

207 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Patch.hs+12−11

@@ -56,13 +56,13 @@ type ManagementCustomMetricsPatchResource =

56 Capture "webPropertyId" Text :>

57 "customMetrics" :>

58 Capture "customMetricId" Text :>

59+ QueryParam "ignoreCustomDataSourceLinks" Bool :>

59− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

61− QueryParam "ignoreCustomDataSourceLinks" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] CustomMetric :>

68 Patch '[JSON] CustomMetric

@@ -209,15 +209,16 @@ instance GoogleRequest ManagementCustomMetricsPatch'

209 request = requestWithRoute defReq analyticsURL

210 requestWithRoute r u

211 ManagementCustomMetricsPatch'{..}

212− = go _mcmpQuotaUser (Just _mcmpPrettyPrint)

212+ = go (Just _mcmpIgnoreCustomDataSourceLinks)

213− _mcmpCustomMetricId

213+ _mcmpAccountId

214 _mcmpWebPropertyId

215− (Just _mcmpIgnoreCustomDataSourceLinks)

215+ _mcmpCustomMetricId

216+ _mcmpQuotaUser

217+ (Just _mcmpPrettyPrint)

216 _mcmpUserIP

218 _mcmpUserIP

217− _mcmpAccountId

219+ _mcmpFields

218 _mcmpKey

220 _mcmpKey

219 _mcmpOAuthToken

221 _mcmpOAuthToken

220− _mcmpFields

221 (Just AltJSON)

222 (Just AltJSON)

222 _mcmpCustomMetric

223 _mcmpCustomMetric

223 where go

224 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Update.hs+12−11

@@ -56,13 +56,13 @@ type ManagementCustomMetricsUpdateResource =

56 Capture "webPropertyId" Text :>

57 "customMetrics" :>

58 Capture "customMetricId" Text :>

59+ QueryParam "ignoreCustomDataSourceLinks" Bool :>

59− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

61− QueryParam "ignoreCustomDataSourceLinks" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] CustomMetric :>

68 Put '[JSON] CustomMetric

@@ -209,15 +209,16 @@ instance GoogleRequest ManagementCustomMetricsUpdate'

209 request = requestWithRoute defReq analyticsURL

210 requestWithRoute r u

211 ManagementCustomMetricsUpdate'{..}

212− = go _mcmuQuotaUser (Just _mcmuPrettyPrint)

212+ = go (Just _mcmuIgnoreCustomDataSourceLinks)

213− _mcmuCustomMetricId

213+ _mcmuAccountId

214 _mcmuWebPropertyId

215− (Just _mcmuIgnoreCustomDataSourceLinks)

215+ _mcmuCustomMetricId

216+ _mcmuQuotaUser

217+ (Just _mcmuPrettyPrint)

216 _mcmuUserIP

218 _mcmuUserIP

217− _mcmuAccountId

219+ _mcmuFields

218 _mcmuKey

220 _mcmuKey

219 _mcmuOAuthToken

221 _mcmuOAuthToken

220− _mcmuFields

221 (Just AltJSON)

222 (Just AltJSON)

222 _mcmuCustomMetric

223 _mcmuCustomMetric

223 where go

224 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Delete.hs+8−9

@@ -60,9 +60,9 @@ type ManagementExperimentsDeleteResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Delete '[JSON] ()

67

68-- | Delete an experiment.

@@ -192,15 +192,14 @@ instance GoogleRequest ManagementExperimentsDelete'

192 type Rs ManagementExperimentsDelete' = ()

193 request = requestWithRoute defReq analyticsURL

194 requestWithRoute r u ManagementExperimentsDelete'{..}

195− = go _medQuotaUser (Just _medPrettyPrint)

196− _medWebPropertyId

195+ = go _medAccountId _medWebPropertyId _medProfileId

197− _medUserIP

198− _medProfileId

199− _medAccountId

200 _medExperimentId

196 _medExperimentId

197+ _medQuotaUser

198+ (Just _medPrettyPrint)

199+ _medUserIP

200+ _medFields

201 _medKey

202 _medOAuthToken

203− _medFields

204 (Just AltJSON)

203 (Just AltJSON)

205 where go

204 where go

206 = clientWithRoute

205 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Get.hs+8−9

@@ -60,9 +60,9 @@ type ManagementExperimentsGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] Experiment

68

@@ -192,15 +192,14 @@ instance GoogleRequest ManagementExperimentsGet'

192 type Rs ManagementExperimentsGet' = Experiment

193 request = requestWithRoute defReq analyticsURL

194 requestWithRoute r u ManagementExperimentsGet'{..}

195− = go _megQuotaUser (Just _megPrettyPrint)

196− _megWebPropertyId

195+ = go _megAccountId _megWebPropertyId _megProfileId

197− _megUserIP

198− _megProfileId

199− _megAccountId

200 _megExperimentId

196 _megExperimentId

197+ _megQuotaUser

198+ (Just _megPrettyPrint)

199+ _megUserIP

200+ _megFields

201 _megKey

202 _megOAuthToken

203− _megFields

204 (Just AltJSON)

203 (Just AltJSON)

205 where go

204 where go

206 = clientWithRoute

205 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Insert.hs+7−8

@@ -59,9 +59,9 @@ type ManagementExperimentsInsertResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Experiment :>

67 Post '[JSON] Experiment

@@ -193,14 +193,13 @@ instance GoogleRequest ManagementExperimentsInsert'

193 type Rs ManagementExperimentsInsert' = Experiment

194 request = requestWithRoute defReq analyticsURL

195 requestWithRoute r u ManagementExperimentsInsert'{..}

196+ = go _meiAccountId _meiWebPropertyId _meiProfileId

197+ _meiQuotaUser

196− = go _meiQuotaUser (Just _meiPrettyPrint)

198+ (Just _meiPrettyPrint)

197− _meiWebPropertyId

198 _meiUserIP

199 _meiUserIP

199− _meiProfileId

200+ _meiFields

200− _meiAccountId

201 _meiKey

202 _meiOAuthToken

203− _meiFields

204 (Just AltJSON)

203 (Just AltJSON)

205 _meiExperiment

204 _meiExperiment

206 where go

205 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/List.hs+13−14

@@ -57,14 +57,14 @@ type ManagementExperimentsListResource =

57 "profiles" :>

58 Capture "profileId" Text :>

59 "experiments" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] Experiments

70

@@ -204,16 +204,15 @@ instance GoogleRequest ManagementExperimentsList'

204 type Rs ManagementExperimentsList' = Experiments

205 request = requestWithRoute defReq analyticsURL

206 requestWithRoute r u ManagementExperimentsList'{..}

207− = go _melQuotaUser (Just _melPrettyPrint)

207+ = go _melMaxResults _melStartIndex _melAccountId

208 _melWebPropertyId

209− _melUserIP

210 _melProfileId

209 _melProfileId

211− _melAccountId

210+ _melQuotaUser

211+ (Just _melPrettyPrint)

212+ _melUserIP

213+ _melFields

212 _melKey

214 _melKey

213 _melOAuthToken

215 _melOAuthToken

214− _melStartIndex

215− _melMaxResults

216− _melFields

217 (Just AltJSON)

216 (Just AltJSON)

218 where go

217 where go

219 = clientWithRoute

218 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Patch.hs+8−9

@@ -61,9 +61,9 @@ type ManagementExperimentsPatchResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] Experiment :>

69 Patch '[JSON] Experiment

@@ -205,15 +205,14 @@ instance GoogleRequest ManagementExperimentsPatch'

205 type Rs ManagementExperimentsPatch' = Experiment

206 request = requestWithRoute defReq analyticsURL

207 requestWithRoute r u ManagementExperimentsPatch'{..}

208− = go _mepQuotaUser (Just _mepPrettyPrint)

209− _mepWebPropertyId

208+ = go _mepAccountId _mepWebPropertyId _mepProfileId

210− _mepUserIP

211− _mepProfileId

212− _mepAccountId

213 _mepExperimentId

209 _mepExperimentId

210+ _mepQuotaUser

211+ (Just _mepPrettyPrint)

212+ _mepUserIP

213+ _mepFields

214 _mepKey

215 _mepOAuthToken

216− _mepFields

217 (Just AltJSON)

216 (Just AltJSON)

218 _mepExperiment

217 _mepExperiment

219 where go

218 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Update.hs+8−9

@@ -61,9 +61,9 @@ type ManagementExperimentsUpdateResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] Experiment :>

69 Put '[JSON] Experiment

@@ -206,15 +206,14 @@ instance GoogleRequest ManagementExperimentsUpdate'

206 type Rs ManagementExperimentsUpdate' = Experiment

207 request = requestWithRoute defReq analyticsURL

208 requestWithRoute r u ManagementExperimentsUpdate'{..}

209− = go _meuQuotaUser (Just _meuPrettyPrint)

210− _meuWebPropertyId

209+ = go _meuAccountId _meuWebPropertyId _meuProfileId

211− _meuUserIP

212− _meuProfileId

213− _meuAccountId

214 _meuExperimentId

210 _meuExperimentId

211+ _meuQuotaUser

212+ (Just _meuPrettyPrint)

213+ _meuUserIP

214+ _meuFields

215 _meuKey

216 _meuOAuthToken

217− _meuFields

218 (Just AltJSON)

217 (Just AltJSON)

219 _meuExperiment

218 _meuExperiment

220 where go

219 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Delete.hs+6−7

@@ -54,9 +54,9 @@ type ManagementFiltersDeleteResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] Filter

61

62-- | Delete a filter.

@@ -162,13 +162,12 @@ instance GoogleRequest ManagementFiltersDelete' where

162 type Rs ManagementFiltersDelete' = Filter

163 request = requestWithRoute defReq analyticsURL

164 requestWithRoute r u ManagementFiltersDelete'{..}

165+ = go _mfdAccountId _mfdFilterId _mfdQuotaUser

165− = go _mfdQuotaUser (Just _mfdPrettyPrint)

166+ (Just _mfdPrettyPrint)

166− _mfdFilterId

167 _mfdUserIP

168− _mfdAccountId

168+ _mfdFields

169 _mfdKey

170 _mfdOAuthToken

171− _mfdFields

172 (Just AltJSON)

171 (Just AltJSON)

173 where go

172 where go

174 = clientWithRoute

173 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Get.hs+6−7

@@ -54,9 +54,9 @@ type ManagementFiltersGetResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] Filter

61

62-- | Returns a filters to which the user has access.

@@ -162,13 +162,12 @@ instance GoogleRequest ManagementFiltersGet' where

162 type Rs ManagementFiltersGet' = Filter

163 request = requestWithRoute defReq analyticsURL

164 requestWithRoute r u ManagementFiltersGet'{..}

165+ = go _mfgAccountId _mfgFilterId _mfgQuotaUser

165− = go _mfgQuotaUser (Just _mfgPrettyPrint)

166+ (Just _mfgPrettyPrint)

166− _mfgFilterId

167 _mfgUserIP

168− _mfgAccountId

168+ _mfgFields

169 _mfgKey

170 _mfgOAuthToken

171− _mfgFields

172 (Just AltJSON)

171 (Just AltJSON)

173 where go

172 where go

174 = clientWithRoute

173 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Insert.hs+7−6

@@ -53,9 +53,9 @@ type ManagementFiltersInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] Filter :> Post '[JSON] Filter

61

@@ -162,11 +162,12 @@ instance GoogleRequest ManagementFiltersInsert' where

162 type Rs ManagementFiltersInsert' = Filter

163 request = requestWithRoute defReq analyticsURL

164 requestWithRoute r u ManagementFiltersInsert'{..}

165+ = go _mfiAccountId _mfiQuotaUser

165− = go _mfiQuotaUser (Just _mfiPrettyPrint) _mfiUserIP

166+ (Just _mfiPrettyPrint)

166− _mfiAccountId

167+ _mfiUserIP

168+ _mfiFields

167 _mfiKey

169 _mfiKey

168 _mfiOAuthToken

170 _mfiOAuthToken

169− _mfiFields

170 (Just AltJSON)

171 (Just AltJSON)

171 _mfiFilter

172 _mfiFilter

172 where go

173 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/List.hs+13−13

@@ -51,14 +51,14 @@ type ManagementFiltersListResource =

51 "accounts" :>

52 Capture "accountId" Text :>

53 "filters" :>

54+ QueryParam "max-results" Int32 :>

55+ QueryParam "start-index" Int32 :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "start-index" Int32 :>

60− QueryParam "max-results" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Filters

63

64-- | Lists all filters for an account

@@ -175,13 +175,13 @@ instance GoogleRequest ManagementFiltersList' where

175 type Rs ManagementFiltersList' = Filters

176 request = requestWithRoute defReq analyticsURL

177 requestWithRoute r u ManagementFiltersList'{..}

178+ = go _mflMaxResults _mflStartIndex _mflAccountId

179+ _mflQuotaUser

178− = go _mflQuotaUser (Just _mflPrettyPrint) _mflUserIP

180+ (Just _mflPrettyPrint)

179− _mflAccountId

181+ _mflUserIP

182+ _mflFields

180 _mflKey

183 _mflKey

181 _mflOAuthToken

184 _mflOAuthToken

182− _mflStartIndex

183− _mflMaxResults

184− _mflFields

185 (Just AltJSON)

186 where go

187 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Patch.hs+6−7

@@ -55,9 +55,9 @@ type ManagementFiltersPatchResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Filter :> Patch '[JSON] Filter

63

@@ -174,13 +174,12 @@ instance GoogleRequest ManagementFiltersPatch' where

174 type Rs ManagementFiltersPatch' = Filter

175 request = requestWithRoute defReq analyticsURL

176 requestWithRoute r u ManagementFiltersPatch'{..}

177+ = go _mfpAccountId _mfpFilterId _mfpQuotaUser

177− = go _mfpQuotaUser (Just _mfpPrettyPrint)

178+ (Just _mfpPrettyPrint)

178− _mfpFilterId

179 _mfpUserIP

180− _mfpAccountId

180+ _mfpFields

181 _mfpKey

182 _mfpOAuthToken

183− _mfpFields

184 (Just AltJSON)

183 (Just AltJSON)

185 _mfpFilter

184 _mfpFilter

186 where go

185 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Update.hs+6−7

@@ -55,9 +55,9 @@ type ManagementFiltersUpdateResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Filter :> Put '[JSON] Filter

63

@@ -174,13 +174,12 @@ instance GoogleRequest ManagementFiltersUpdate' where

174 type Rs ManagementFiltersUpdate' = Filter

175 request = requestWithRoute defReq analyticsURL

176 requestWithRoute r u ManagementFiltersUpdate'{..}

177+ = go _mfuAccountId _mfuFilterId _mfuQuotaUser

177− = go _mfuQuotaUser (Just _mfuPrettyPrint)

178+ (Just _mfuPrettyPrint)

178− _mfuFilterId

179 _mfuUserIP

180− _mfuAccountId

180+ _mfuFields

181 _mfuKey

182 _mfuOAuthToken

183− _mfuFields

184 (Just AltJSON)

183 (Just AltJSON)

185 _mfuFilter

184 _mfuFilter

186 where go

185 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Get.hs+7−8

@@ -60,9 +60,9 @@ type ManagementGoalsGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Get '[JSON] Goal

67

68-- | Gets a goal to which the user has access.

@@ -189,15 +189,14 @@ instance GoogleRequest ManagementGoalsGet' where

189 type Rs ManagementGoalsGet' = Goal

190 request = requestWithRoute defReq analyticsURL

191 requestWithRoute r u ManagementGoalsGet'{..}

192− = go _mggQuotaUser (Just _mggPrettyPrint)

193− _mggWebPropertyId

192+ = go _mggAccountId _mggWebPropertyId _mggProfileId

194 _mggGoalId

193 _mggGoalId

194+ _mggQuotaUser

195+ (Just _mggPrettyPrint)

195 _mggUserIP

196 _mggUserIP

196− _mggProfileId

197+ _mggFields

197− _mggAccountId

198 _mggKey

199 _mggOAuthToken

200− _mggFields

201 (Just AltJSON)

200 (Just AltJSON)

202 where go

201 where go

203 = clientWithRoute

202 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Insert.hs+7−8

@@ -59,9 +59,9 @@ type ManagementGoalsInsertResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Goal :> Post '[JSON] Goal

67

@@ -188,14 +188,13 @@ instance GoogleRequest ManagementGoalsInsert' where

188 type Rs ManagementGoalsInsert' = Goal

189 request = requestWithRoute defReq analyticsURL

190 requestWithRoute r u ManagementGoalsInsert'{..}

191+ = go _mgiAccountId _mgiWebPropertyId _mgiProfileId

192+ _mgiQuotaUser

191− = go _mgiQuotaUser (Just _mgiPrettyPrint)

193+ (Just _mgiPrettyPrint)

192− _mgiWebPropertyId

193 _mgiUserIP

194 _mgiUserIP

194− _mgiProfileId

195+ _mgiFields

195− _mgiAccountId

196 _mgiKey

197 _mgiOAuthToken

198− _mgiFields

199 (Just AltJSON)

198 (Just AltJSON)

200 _mgiGoal

199 _mgiGoal

201 where go

200 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/List.hs+13−14

@@ -57,14 +57,14 @@ type ManagementGoalsListResource =

57 "profiles" :>

58 Capture "profileId" Text :>

59 "goals" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] Goals

70

@@ -208,16 +208,15 @@ instance GoogleRequest ManagementGoalsList' where

208 type Rs ManagementGoalsList' = Goals

209 request = requestWithRoute defReq analyticsURL

210 requestWithRoute r u ManagementGoalsList'{..}

211− = go _mglQuotaUser (Just _mglPrettyPrint)

211+ = go _mglMaxResults _mglStartIndex _mglAccountId

212 _mglWebPropertyId

213− _mglUserIP

214 _mglProfileId

213 _mglProfileId

215− _mglAccountId

214+ _mglQuotaUser

215+ (Just _mglPrettyPrint)

216+ _mglUserIP

217+ _mglFields

216 _mglKey

218 _mglKey

217 _mglOAuthToken

219 _mglOAuthToken

218− _mglStartIndex

219− _mglMaxResults

220− _mglFields

221 (Just AltJSON)

220 (Just AltJSON)

222 where go

221 where go

223 = clientWithRoute

222 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Patch.hs+7−8

@@ -62,9 +62,9 @@ type ManagementGoalsPatchResource =

62 QueryParam "quotaUser" Text :>

63 QueryParam "prettyPrint" Bool :>

64 QueryParam "userIp" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

66− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] Goal :> Patch '[JSON] Goal

70

@@ -202,15 +202,14 @@ instance GoogleRequest ManagementGoalsPatch' where

202 type Rs ManagementGoalsPatch' = Goal

203 request = requestWithRoute defReq analyticsURL

204 requestWithRoute r u ManagementGoalsPatch'{..}

205− = go _mgpQuotaUser (Just _mgpPrettyPrint)

206− _mgpWebPropertyId

205+ = go _mgpAccountId _mgpWebPropertyId _mgpProfileId

207 _mgpGoalId

206 _mgpGoalId

207+ _mgpQuotaUser

208+ (Just _mgpPrettyPrint)

208 _mgpUserIP

209 _mgpUserIP

209− _mgpProfileId

210+ _mgpFields

210− _mgpAccountId

211 _mgpKey

212 _mgpOAuthToken

213− _mgpFields

214 (Just AltJSON)

213 (Just AltJSON)

215 _mgpGoal

214 _mgpGoal

216 where go

215 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Update.hs+7−8

@@ -61,9 +61,9 @@ type ManagementGoalsUpdateResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] Goal :> Put '[JSON] Goal

69

@@ -200,15 +200,14 @@ instance GoogleRequest ManagementGoalsUpdate' where

200 type Rs ManagementGoalsUpdate' = Goal

201 request = requestWithRoute defReq analyticsURL

202 requestWithRoute r u ManagementGoalsUpdate'{..}

203− = go _mguQuotaUser (Just _mguPrettyPrint)

204− _mguWebPropertyId

203+ = go _mguAccountId _mguWebPropertyId _mguProfileId

205 _mguGoalId

204 _mguGoalId

205+ _mguQuotaUser

206+ (Just _mguPrettyPrint)

206 _mguUserIP

207 _mguUserIP

207− _mguProfileId

208+ _mguFields

208− _mguAccountId

209 _mguKey

210 _mguOAuthToken

211− _mguFields

212 (Just AltJSON)

211 (Just AltJSON)

213 _mguGoal

212 _mguGoal

214 where go

213 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Delete.hs+9−9

@@ -60,9 +60,9 @@ type ManagementProfileFilterLinksDeleteResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Delete '[JSON] ()

67

68-- | Delete a profile filter link.

@@ -195,15 +195,15 @@ instance GoogleRequest

195 request = requestWithRoute defReq analyticsURL

196 requestWithRoute r u

197 ManagementProfileFilterLinksDelete'{..}

198− = go _mpfldQuotaUser (Just _mpfldPrettyPrint)

199− _mpfldWebPropertyId

198+ = go _mpfldAccountId _mpfldWebPropertyId

200− _mpfldUserIP

201 _mpfldProfileId

199 _mpfldProfileId

202− _mpfldAccountId

203− _mpfldKey

204 _mpfldLinkId

200 _mpfldLinkId

205− _mpfldOAuthToken

201+ _mpfldQuotaUser

202+ (Just _mpfldPrettyPrint)

203+ _mpfldUserIP

206 _mpfldFields

204 _mpfldFields

205+ _mpfldKey

206+ _mpfldOAuthToken

207 (Just AltJSON)

208 where go

209 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Get.hs+9−9

@@ -60,9 +60,9 @@ type ManagementProfileFilterLinksGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] ProfileFilterLink

68

@@ -197,15 +197,15 @@ instance GoogleRequest

197 request = requestWithRoute defReq analyticsURL

198 requestWithRoute r u

199 ManagementProfileFilterLinksGet'{..}

200− = go _mpflgQuotaUser (Just _mpflgPrettyPrint)

201− _mpflgWebPropertyId

200+ = go _mpflgAccountId _mpflgWebPropertyId

202− _mpflgUserIP

203 _mpflgProfileId

201 _mpflgProfileId

204− _mpflgAccountId

205− _mpflgKey

206 _mpflgLinkId

202 _mpflgLinkId

207− _mpflgOAuthToken

203+ _mpflgQuotaUser

204+ (Just _mpflgPrettyPrint)

205+ _mpflgUserIP

208 _mpflgFields

206 _mpflgFields

207+ _mpflgKey

208+ _mpflgOAuthToken

209 (Just AltJSON)

210 where go

211 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Insert.hs+8−8

@@ -59,9 +59,9 @@ type ManagementProfileFilterLinksInsertResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] ProfileFilterLink :>

67 Post '[JSON] ProfileFilterLink

@@ -198,14 +198,14 @@ instance GoogleRequest

198 request = requestWithRoute defReq analyticsURL

199 requestWithRoute r u

200 ManagementProfileFilterLinksInsert'{..}

201− = go _mpfliQuotaUser (Just _mpfliPrettyPrint)

202− _mpfliWebPropertyId

201+ = go _mpfliAccountId _mpfliWebPropertyId

203− _mpfliUserIP

204 _mpfliProfileId

202 _mpfliProfileId

205− _mpfliAccountId

203+ _mpfliQuotaUser

204+ (Just _mpfliPrettyPrint)

205+ _mpfliUserIP

206+ _mpfliFields

206 _mpfliKey

207 _mpfliKey

207 _mpfliOAuthToken

208 _mpfliOAuthToken

208− _mpfliFields

209 (Just AltJSON)

210 _mpfliProfileFilterLink

211 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/List.hs+14−14

@@ -57,14 +57,14 @@ type ManagementProfileFilterLinksListResource =

57 "profiles" :>

58 Capture "profileId" Text :>

59 "profileFilterLinks" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] ProfileFilterLinks

70

@@ -214,16 +214,16 @@ instance GoogleRequest

214 request = requestWithRoute defReq analyticsURL

215 requestWithRoute r u

216 ManagementProfileFilterLinksList'{..}

217− = go _mpfllQuotaUser (Just _mpfllPrettyPrint)

217+ = go _mpfllMaxResults _mpfllStartIndex

218+ _mpfllAccountId

218 _mpfllWebPropertyId

219 _mpfllWebPropertyId

219− _mpfllUserIP

220 _mpfllProfileId

221− _mpfllAccountId

221+ _mpfllQuotaUser

222+ (Just _mpfllPrettyPrint)

223+ _mpfllUserIP

224+ _mpfllFields

222 _mpfllKey

225 _mpfllKey

223 _mpfllOAuthToken

226 _mpfllOAuthToken

224− _mpfllStartIndex

225− _mpfllMaxResults

226− _mpfllFields

227 (Just AltJSON)

228 where go

229 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Patch.hs+9−9

@@ -62,9 +62,9 @@ type ManagementProfileFilterLinksPatchResource =

62 QueryParam "quotaUser" Text :>

63 QueryParam "prettyPrint" Bool :>

64 QueryParam "userIp" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

66− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] ProfileFilterLink :>

70 Patch '[JSON] ProfileFilterLink

@@ -212,15 +212,15 @@ instance GoogleRequest

212 request = requestWithRoute defReq analyticsURL

213 requestWithRoute r u

214 ManagementProfileFilterLinksPatch'{..}

215− = go _mpflpQuotaUser (Just _mpflpPrettyPrint)

216− _mpflpWebPropertyId

215+ = go _mpflpAccountId _mpflpWebPropertyId

217− _mpflpUserIP

218 _mpflpProfileId

216 _mpflpProfileId

219− _mpflpAccountId

220− _mpflpKey

221 _mpflpLinkId

217 _mpflpLinkId

222− _mpflpOAuthToken

218+ _mpflpQuotaUser

219+ (Just _mpflpPrettyPrint)

220+ _mpflpUserIP

223 _mpflpFields

221 _mpflpFields

222+ _mpflpKey

223+ _mpflpOAuthToken

224 (Just AltJSON)

225 _mpflpProfileFilterLink

226 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Update.hs+9−9

@@ -61,9 +61,9 @@ type ManagementProfileFilterLinksUpdateResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] ProfileFilterLink :>

69 Put '[JSON] ProfileFilterLink

@@ -210,15 +210,15 @@ instance GoogleRequest

210 request = requestWithRoute defReq analyticsURL

211 requestWithRoute r u

212 ManagementProfileFilterLinksUpdate'{..}

213− = go _mpfluQuotaUser (Just _mpfluPrettyPrint)

214− _mpfluWebPropertyId

213+ = go _mpfluAccountId _mpfluWebPropertyId

215− _mpfluUserIP

216 _mpfluProfileId

214 _mpfluProfileId

217− _mpfluAccountId

218− _mpfluKey

219 _mpfluLinkId

215 _mpfluLinkId

220− _mpfluOAuthToken

216+ _mpfluQuotaUser

217+ (Just _mpfluPrettyPrint)

218+ _mpfluUserIP

221 _mpfluFields

219 _mpfluFields

220+ _mpfluKey

221+ _mpfluOAuthToken

222 (Just AltJSON)

223 _mpfluProfileFilterLink

224 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Delete.hs+9−9

@@ -60,9 +60,9 @@ type ManagementProfileUserLinksDeleteResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :> Delete '[JSON] ()

67

68-- | Removes a user from the given view (profile).

@@ -195,15 +195,15 @@ instance GoogleRequest

195 request = requestWithRoute defReq analyticsURL

196 requestWithRoute r u

197 ManagementProfileUserLinksDelete'{..}

198− = go _mpuldQuotaUser (Just _mpuldPrettyPrint)

199− _mpuldWebPropertyId

198+ = go _mpuldAccountId _mpuldWebPropertyId

200− _mpuldUserIP

201 _mpuldProfileId

199 _mpuldProfileId

202− _mpuldAccountId

203− _mpuldKey

204 _mpuldLinkId

200 _mpuldLinkId

205− _mpuldOAuthToken

201+ _mpuldQuotaUser

202+ (Just _mpuldPrettyPrint)

203+ _mpuldUserIP

206 _mpuldFields

204 _mpuldFields

205+ _mpuldKey

206+ _mpuldOAuthToken

207 (Just AltJSON)

208 where go

209 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Insert.hs+8−8

@@ -59,9 +59,9 @@ type ManagementProfileUserLinksInsertResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] EntityUserLink :>

67 Post '[JSON] EntityUserLink

@@ -198,14 +198,14 @@ instance GoogleRequest

198 request = requestWithRoute defReq analyticsURL

199 requestWithRoute r u

200 ManagementProfileUserLinksInsert'{..}

201− = go _mpuliQuotaUser (Just _mpuliPrettyPrint)

202− _mpuliWebPropertyId

201+ = go _mpuliAccountId _mpuliWebPropertyId

203− _mpuliUserIP

204 _mpuliProfileId

202 _mpuliProfileId

205− _mpuliAccountId

203+ _mpuliQuotaUser

204+ (Just _mpuliPrettyPrint)

205+ _mpuliUserIP

206+ _mpuliFields

206 _mpuliKey

207 _mpuliKey

207 _mpuliOAuthToken

208 _mpuliOAuthToken

208− _mpuliFields

209 (Just AltJSON)

210 _mpuliEntityUserLink

211 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/List.hs+14−14

@@ -57,14 +57,14 @@ type ManagementProfileUserLinksListResource =

57 "profiles" :>

58 Capture "profileId" Text :>

59 "entityUserLinks" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] EntityUserLinks

70

@@ -214,16 +214,16 @@ instance GoogleRequest

214 request = requestWithRoute defReq analyticsURL

215 requestWithRoute r u

216 ManagementProfileUserLinksList'{..}

217− = go _mpullQuotaUser (Just _mpullPrettyPrint)

217+ = go _mpullMaxResults _mpullStartIndex

218+ _mpullAccountId

218 _mpullWebPropertyId

219 _mpullWebPropertyId

219− _mpullUserIP

220 _mpullProfileId

221− _mpullAccountId

221+ _mpullQuotaUser

222+ (Just _mpullPrettyPrint)

223+ _mpullUserIP

224+ _mpullFields

222 _mpullKey

225 _mpullKey

223 _mpullOAuthToken

226 _mpullOAuthToken

224− _mpullStartIndex

225− _mpullMaxResults

226− _mpullFields

227 (Just AltJSON)

228 where go

229 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Update.hs+9−9

@@ -61,9 +61,9 @@ type ManagementProfileUserLinksUpdateResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] EntityUserLink :>

69 Put '[JSON] EntityUserLink

@@ -210,15 +210,15 @@ instance GoogleRequest

210 request = requestWithRoute defReq analyticsURL

211 requestWithRoute r u

212 ManagementProfileUserLinksUpdate'{..}

213− = go _mpuluQuotaUser (Just _mpuluPrettyPrint)

214− _mpuluWebPropertyId

213+ = go _mpuluAccountId _mpuluWebPropertyId

215− _mpuluUserIP

216 _mpuluProfileId

214 _mpuluProfileId

217− _mpuluAccountId

218− _mpuluKey

219 _mpuluLinkId

215 _mpuluLinkId

220− _mpuluOAuthToken

216+ _mpuluQuotaUser

217+ (Just _mpuluPrettyPrint)

218+ _mpuluUserIP

221 _mpuluFields

219 _mpuluFields

220+ _mpuluKey

221+ _mpuluOAuthToken

222 (Just AltJSON)

223 _mpuluEntityUserLink

224 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Delete.hs+7−8

@@ -57,9 +57,9 @@ type ManagementProfilesDeleteResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Delete '[JSON] ()

64

65-- | Deletes a view (profile).

@@ -177,14 +177,13 @@ instance GoogleRequest ManagementProfilesDelete'

177 type Rs ManagementProfilesDelete' = ()

178 request = requestWithRoute defReq analyticsURL

179 requestWithRoute r u ManagementProfilesDelete'{..}

180+ = go _mpdAccountId _mpdWebPropertyId _mpdProfileId

181+ _mpdQuotaUser

180− = go _mpdQuotaUser (Just _mpdPrettyPrint)

182+ (Just _mpdPrettyPrint)

181− _mpdWebPropertyId

182 _mpdUserIP

183 _mpdUserIP

183− _mpdProfileId

184+ _mpdFields

184− _mpdAccountId

185 _mpdKey

186 _mpdOAuthToken

187− _mpdFields

188 (Just AltJSON)

187 (Just AltJSON)

189 where go

188 where go

190 = clientWithRoute

189 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Get.hs+7−8

@@ -57,9 +57,9 @@ type ManagementProfilesGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Profile

64

65-- | Gets a view (profile) to which the user has access.

@@ -176,14 +176,13 @@ instance GoogleRequest ManagementProfilesGet' where

176 type Rs ManagementProfilesGet' = Profile

177 request = requestWithRoute defReq analyticsURL

178 requestWithRoute r u ManagementProfilesGet'{..}

179+ = go _mpgAccountId _mpgWebPropertyId _mpgProfileId

180+ _mpgQuotaUser

179− = go _mpgQuotaUser (Just _mpgPrettyPrint)

181+ (Just _mpgPrettyPrint)

180− _mpgWebPropertyId

181 _mpgUserIP

182 _mpgUserIP

182− _mpgProfileId

183+ _mpgFields

183− _mpgAccountId

184 _mpgKey

185 _mpgOAuthToken

186− _mpgFields

187 (Just AltJSON)

186 (Just AltJSON)

188 where go

187 where go

189 = clientWithRoute

188 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Insert.hs+6−7

@@ -56,9 +56,9 @@ type ManagementProfilesInsertResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] Profile :> Post '[JSON] Profile

64

@@ -177,13 +177,12 @@ instance GoogleRequest ManagementProfilesInsert'

177 type Rs ManagementProfilesInsert' = Profile

178 request = requestWithRoute defReq analyticsURL

179 requestWithRoute r u ManagementProfilesInsert'{..}

180+ = go _mpiAccountId _mpiWebPropertyId _mpiQuotaUser

180− = go _mpiQuotaUser (Just _mpiPrettyPrint)

181+ (Just _mpiPrettyPrint)

181− _mpiWebPropertyId

182 _mpiUserIP

183− _mpiAccountId

183+ _mpiFields

184 _mpiKey

185 _mpiOAuthToken

186− _mpiFields

187 (Just AltJSON)

186 (Just AltJSON)

188 _mpiProfile

187 _mpiProfile

189 where go

188 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/List.hs+12−13

@@ -54,14 +54,14 @@ type ManagementProfilesListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "profiles" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] Profiles

67

@@ -194,15 +194,14 @@ instance GoogleRequest ManagementProfilesList' where

194 type Rs ManagementProfilesList' = Profiles

195 request = requestWithRoute defReq analyticsURL

196 requestWithRoute r u ManagementProfilesList'{..}

197− = go _mplQuotaUser (Just _mplPrettyPrint)

197+ = go _mplMaxResults _mplStartIndex _mplAccountId

198 _mplWebPropertyId

199+ _mplQuotaUser

200+ (Just _mplPrettyPrint)

199 _mplUserIP

201 _mplUserIP

200− _mplAccountId

202+ _mplFields

201 _mplKey

203 _mplKey

202 _mplOAuthToken

204 _mplOAuthToken

203− _mplStartIndex

204− _mplMaxResults

205− _mplFields

206 (Just AltJSON)

205 (Just AltJSON)

207 where go

206 where go

208 = clientWithRoute

207 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Patch.hs+7−8

@@ -59,9 +59,9 @@ type ManagementProfilesPatchResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Profile :>

67 Patch '[JSON] Profile

@@ -191,14 +191,13 @@ instance GoogleRequest ManagementProfilesPatch' where

191 type Rs ManagementProfilesPatch' = Profile

192 request = requestWithRoute defReq analyticsURL

193 requestWithRoute r u ManagementProfilesPatch'{..}

194+ = go _mppAccountId _mppWebPropertyId _mppProfileId

195+ _mppQuotaUser

194− = go _mppQuotaUser (Just _mppPrettyPrint)

196+ (Just _mppPrettyPrint)

195− _mppWebPropertyId

196 _mppUserIP

197 _mppUserIP

197− _mppProfileId

198+ _mppFields

198− _mppAccountId

199 _mppKey

200 _mppOAuthToken

201− _mppFields

202 (Just AltJSON)

201 (Just AltJSON)

203 _mppProfile

202 _mppProfile

204 where go

203 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Update.hs+7−8

@@ -58,9 +58,9 @@ type ManagementProfilesUpdateResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Profile :> Put '[JSON] Profile

66

@@ -189,14 +189,13 @@ instance GoogleRequest ManagementProfilesUpdate'

189 type Rs ManagementProfilesUpdate' = Profile

190 request = requestWithRoute defReq analyticsURL

191 requestWithRoute r u ManagementProfilesUpdate'{..}

192+ = go _mpuAccountId _mpuWebPropertyId _mpuProfileId

193+ _mpuQuotaUser

192− = go _mpuQuotaUser (Just _mpuPrettyPrint)

194+ (Just _mpuPrettyPrint)

193− _mpuWebPropertyId

194 _mpuUserIP

195 _mpuUserIP

195− _mpuProfileId

196+ _mpuFields

196− _mpuAccountId

197 _mpuKey

198 _mpuOAuthToken

199− _mpuFields

200 (Just AltJSON)

199 (Just AltJSON)

201 _mpuProfile

200 _mpuProfile

202 where go

201 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Segments/List.hs+12−12

@@ -48,14 +48,14 @@ import Network.Google.Prelude

48type ManagementSegmentsListResource =

49 "management" :>

50 "segments" :>

51+ QueryParam "max-results" Int32 :>

52+ QueryParam "start-index" Int32 :>

51− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

56+ QueryParam "fields" Text :>

54− QueryParam "key" Key :>

57+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "start-index" Int32 :>

57− QueryParam "max-results" Int32 :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Segments

60

61-- | Lists segments to which the user has access.

@@ -162,12 +162,12 @@ instance GoogleRequest ManagementSegmentsList' where

162 type Rs ManagementSegmentsList' = Segments

163 request = requestWithRoute defReq analyticsURL

164 requestWithRoute r u ManagementSegmentsList'{..}

165+ = go _mslMaxResults _mslStartIndex _mslQuotaUser

165− = go _mslQuotaUser (Just _mslPrettyPrint) _mslUserIP

166+ (Just _mslPrettyPrint)

167+ _mslUserIP

168+ _mslFields

166 _mslKey

169 _mslKey

167 _mslOAuthToken

170 _mslOAuthToken

168− _mslStartIndex

169− _mslMaxResults

170− _mslFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Get.hs+9−9

@@ -60,9 +60,9 @@ type ManagementUnSampledReportsGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] UnSampledReport

68

@@ -198,15 +198,15 @@ instance GoogleRequest ManagementUnSampledReportsGet'

198 request = requestWithRoute defReq analyticsURL

199 requestWithRoute r u

200 ManagementUnSampledReportsGet'{..}

201− = go _musrgQuotaUser (Just _musrgPrettyPrint)

202− _musrgWebPropertyId

201+ = go _musrgAccountId _musrgWebPropertyId

203− _musrgUserIP

204 _musrgProfileId

202 _musrgProfileId

205− _musrgAccountId

206− _musrgKey

207 _musrgUnSampledReportId

203 _musrgUnSampledReportId

208− _musrgOAuthToken

204+ _musrgQuotaUser

205+ (Just _musrgPrettyPrint)

206+ _musrgUserIP

209 _musrgFields

207 _musrgFields

208+ _musrgKey

209+ _musrgOAuthToken

210 (Just AltJSON)

211 where go

212 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hs+8−8

@@ -59,9 +59,9 @@ type ManagementUnSampledReportsInsertResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] UnSampledReport :>

67 Post '[JSON] UnSampledReport

@@ -198,14 +198,14 @@ instance GoogleRequest

198 request = requestWithRoute defReq analyticsURL

199 requestWithRoute r u

200 ManagementUnSampledReportsInsert'{..}

201− = go _musriQuotaUser (Just _musriPrettyPrint)

202− _musriWebPropertyId

201+ = go _musriAccountId _musriWebPropertyId

203− _musriUserIP

204 _musriProfileId

202 _musriProfileId

205− _musriAccountId

203+ _musriQuotaUser

204+ (Just _musriPrettyPrint)

205+ _musriUserIP

206+ _musriFields

206 _musriKey

207 _musriKey

207 _musriOAuthToken

208 _musriOAuthToken

208− _musriFields

209 (Just AltJSON)

210 _musriUnSampledReport

211 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hs+14−14

@@ -57,14 +57,14 @@ type ManagementUnSampledReportsListResource =

57 "profiles" :>

58 Capture "profileId" Text :>

59 "unsampledReports" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] UnSampledReports

70

@@ -213,16 +213,16 @@ instance GoogleRequest

213 request = requestWithRoute defReq analyticsURL

214 requestWithRoute r u

215 ManagementUnSampledReportsList'{..}

216− = go _musrlQuotaUser (Just _musrlPrettyPrint)

216+ = go _musrlMaxResults _musrlStartIndex

217+ _musrlAccountId

217 _musrlWebPropertyId

218 _musrlWebPropertyId

218− _musrlUserIP

219 _musrlProfileId

220− _musrlAccountId

220+ _musrlQuotaUser

221+ (Just _musrlPrettyPrint)

222+ _musrlUserIP

223+ _musrlFields

221 _musrlKey

224 _musrlKey

222 _musrlOAuthToken

225 _musrlOAuthToken

223− _musrlStartIndex

224− _musrlMaxResults

225− _musrlFields

226 (Just AltJSON)

227 where go

228 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/DeleteUploadData.hs+8−8

@@ -59,9 +59,9 @@ type ManagementUploadsDeleteUploadDataResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON]

67 AnalyticsDataimportDeleteUploadDataRequest

@@ -201,14 +201,14 @@ instance GoogleRequest

201 request = requestWithRoute defReq analyticsURL

202 requestWithRoute r u

203 ManagementUploadsDeleteUploadData'{..}

204− = go _mududQuotaUser (Just _mududPrettyPrint)

205− _mududWebPropertyId

204+ = go _mududAccountId _mududWebPropertyId

206− _mududUserIP

207 _mududCustomDataSourceId

205 _mududCustomDataSourceId

208− _mududAccountId

206+ _mududQuotaUser

207+ (Just _mududPrettyPrint)

208+ _mududUserIP

209+ _mududFields

209 _mududKey

210 _mududKey

210 _mududOAuthToken

211 _mududOAuthToken

211− _mududFields

212 (Just AltJSON)

213 _mududAnalyticsDataimportDeleteUploadDataRequest

214 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/Get.hs+9−9

@@ -60,9 +60,9 @@ type ManagementUploadsGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] Upload

68

@@ -191,15 +191,15 @@ instance GoogleRequest ManagementUploadsGet' where

191 type Rs ManagementUploadsGet' = Upload

192 request = requestWithRoute defReq analyticsURL

193 requestWithRoute r u ManagementUploadsGet'{..}

194− = go _mugQuotaUser (Just _mugPrettyPrint)

195− _mugWebPropertyId

194+ = go _mugAccountId _mugWebPropertyId

196− _mugUserIP

197 _mugCustomDataSourceId

195 _mugCustomDataSourceId

198− _mugAccountId

199− _mugKey

200− _mugOAuthToken

201 _mugUploadId

196 _mugUploadId

197+ _mugQuotaUser

198+ (Just _mugPrettyPrint)

199+ _mugUserIP

202 _mugFields

200 _mugFields

201+ _mugKey

202+ _mugOAuthToken

203 (Just AltJSON)

204 where go

205 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/List.hs+13−14

@@ -57,14 +57,14 @@ type ManagementUploadsListResource =

57 "customDataSources" :>

58 Capture "customDataSourceId" Text :>

59 "uploads" :>

60+ QueryParam "max-results" Int32 :>

61+ QueryParam "start-index" Int32 :>

60− QueryParam "quotaUser" Text :>

62+ QueryParam "quotaUser" Text :>

61− QueryParam "prettyPrint" Bool :>

63+ QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

63− QueryParam "key" Key :>

66+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "start-index" Int32 :>

66− QueryParam "max-results" Int32 :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Get '[JSON] Uploads

70

@@ -204,16 +204,15 @@ instance GoogleRequest ManagementUploadsList' where

204 type Rs ManagementUploadsList' = Uploads

205 request = requestWithRoute defReq analyticsURL

206 requestWithRoute r u ManagementUploadsList'{..}

207− = go _mulQuotaUser (Just _mulPrettyPrint)

207+ = go _mulMaxResults _mulStartIndex _mulAccountId

208 _mulWebPropertyId

209− _mulUserIP

210 _mulCustomDataSourceId

209 _mulCustomDataSourceId

211− _mulAccountId

210+ _mulQuotaUser

211+ (Just _mulPrettyPrint)

212+ _mulUserIP

213+ _mulFields

212 _mulKey

214 _mulKey

213 _mulOAuthToken

215 _mulOAuthToken

214− _mulStartIndex

215− _mulMaxResults

216− _mulFields

217 (Just AltJSON)

216 (Just AltJSON)

218 where go

217 where go

219 = clientWithRoute

218 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+8−9

@@ -59,9 +59,9 @@ type ManagementUploadsUploadDataResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Post '[JSON] Upload

66

67-- | Upload data for a custom data source.

@@ -192,15 +192,14 @@ instance GoogleRequest ManagementUploadsUploadData'

192 type Rs ManagementUploadsUploadData' = Upload

193 request = requestWithRoute defReq analyticsURL

194 requestWithRoute r u ManagementUploadsUploadData'{..}

195− = go _muudQuotaUser (Just _muudPrettyPrint)

196− _muudWebPropertyId

195+ = go _muudMedia _muudAccountId _muudWebPropertyId

197− _muudUserIP

198 _muudCustomDataSourceId

196 _muudCustomDataSourceId

199− _muudMedia

197+ _muudQuotaUser

200− _muudAccountId

198+ (Just _muudPrettyPrint)

199+ _muudUserIP

200+ _muudFields

201 _muudKey

202 _muudOAuthToken

203− _muudFields

204 (Just AltJSON)

203 (Just AltJSON)

205 where go

204 where go

206 = clientWithRoute

205 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Get.hs+6−7

@@ -54,9 +54,9 @@ type ManagementWebPropertiesGetResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] WebProperty

61

62-- | Gets a web property to which the user has access.

@@ -166,13 +166,12 @@ instance GoogleRequest ManagementWebPropertiesGet'

166 type Rs ManagementWebPropertiesGet' = WebProperty

167 request = requestWithRoute defReq analyticsURL

168 requestWithRoute r u ManagementWebPropertiesGet'{..}

169+ = go _mwpgAccountId _mwpgWebPropertyId _mwpgQuotaUser

169− = go _mwpgQuotaUser (Just _mwpgPrettyPrint)

170+ (Just _mwpgPrettyPrint)

170− _mwpgWebPropertyId

171 _mwpgUserIP

172− _mwpgAccountId

172+ _mwpgFields

173 _mwpgKey

174 _mwpgOAuthToken

175− _mwpgFields

176 (Just AltJSON)

175 (Just AltJSON)

177 where go

176 where go

178 = clientWithRoute

177 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Insert.hs+6−6

@@ -55,9 +55,9 @@ type ManagementWebPropertiesInsertResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] WebProperty :>

63 Post '[JSON] WebProperty

@@ -173,12 +173,12 @@ instance GoogleRequest ManagementWebPropertiesInsert'

173 request = requestWithRoute defReq analyticsURL

174 requestWithRoute r u

175 ManagementWebPropertiesInsert'{..}

176+ = go _mwpiAccountId _mwpiQuotaUser

176− = go _mwpiQuotaUser (Just _mwpiPrettyPrint)

177+ (Just _mwpiPrettyPrint)

177 _mwpiUserIP

178 _mwpiUserIP

178− _mwpiAccountId

179+ _mwpiFields

179 _mwpiKey

180 _mwpiKey

180 _mwpiOAuthToken

181 _mwpiOAuthToken

181− _mwpiFields

182 (Just AltJSON)

183 _mwpiWebProperty

184 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/List.hs+12−13

@@ -51,14 +51,14 @@ type ManagementWebPropertiesListResource =

51 "accounts" :>

52 Capture "accountId" Text :>

53 "webproperties" :>

54+ QueryParam "max-results" Int32 :>

55+ QueryParam "start-index" Int32 :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "start-index" Int32 :>

60− QueryParam "max-results" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] WebProperties

64

@@ -182,14 +182,13 @@ instance GoogleRequest ManagementWebPropertiesList'

182 type Rs ManagementWebPropertiesList' = WebProperties

183 request = requestWithRoute defReq analyticsURL

184 requestWithRoute r u ManagementWebPropertiesList'{..}

185+ = go _mwplMaxResults _mwplStartIndex _mwplAccountId

186+ _mwplQuotaUser

185− = go _mwplQuotaUser (Just _mwplPrettyPrint)

187+ (Just _mwplPrettyPrint)

186 _mwplUserIP

188 _mwplUserIP

187− _mwplAccountId

189+ _mwplFields

188 _mwplKey

190 _mwplKey

189 _mwplOAuthToken

191 _mwplOAuthToken

190− _mwplStartIndex

191− _mwplMaxResults

192− _mwplFields

193 (Just AltJSON)

192 (Just AltJSON)

194 where go

193 where go

195 = clientWithRoute

194 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Patch.hs+6−7

@@ -55,9 +55,9 @@ type ManagementWebPropertiesPatchResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] WebProperty :>

63 Patch '[JSON] WebProperty

@@ -182,13 +182,12 @@ instance GoogleRequest ManagementWebPropertiesPatch'

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u

184 ManagementWebPropertiesPatch'{..}

185+ = go _mwppAccountId _mwppWebPropertyId _mwppQuotaUser

185− = go _mwppQuotaUser (Just _mwppPrettyPrint)

186+ (Just _mwppPrettyPrint)

186− _mwppWebPropertyId

187 _mwppUserIP

188− _mwppAccountId

188+ _mwppFields

189 _mwppKey

190 _mwppOAuthToken

191− _mwppFields

192 (Just AltJSON)

191 (Just AltJSON)

193 _mwppWebProperty

192 _mwppWebProperty

194 where go

193 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Update.hs+6−7

@@ -55,9 +55,9 @@ type ManagementWebPropertiesUpdateResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] WebProperty :>

63 Put '[JSON] WebProperty

@@ -182,13 +182,12 @@ instance GoogleRequest ManagementWebPropertiesUpdate'

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u

184 ManagementWebPropertiesUpdate'{..}

185+ = go _mwpuAccountId _mwpuWebPropertyId _mwpuQuotaUser

185− = go _mwpuQuotaUser (Just _mwpuPrettyPrint)

186+ (Just _mwpuPrettyPrint)

186− _mwpuWebPropertyId

187 _mwpuUserIP

188− _mwpuAccountId

188+ _mwpuFields

189 _mwpuKey

190 _mwpuOAuthToken

191− _mwpuFields

192 (Just AltJSON)

191 (Just AltJSON)

193 _mwpuWebProperty

192 _mwpuWebProperty

194 where go

193 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Delete.hs+8−8

@@ -58,9 +58,9 @@ type ManagementWebPropertyAdWordsLinksDeleteResource

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Delete '[JSON] ()

65

66-- | Deletes a web property-AdWords link.

@@ -186,14 +186,14 @@ instance GoogleRequest

186 request = requestWithRoute defReq analyticsURL

187 requestWithRoute r u

188 ManagementWebPropertyAdWordsLinksDelete'{..}

189+ = go _mwpawldAccountId _mwpawldWebPropertyId

190+ _mwpawldWebPropertyAdWordsLinkId

191+ _mwpawldQuotaUser

189− = go _mwpawldQuotaUser (Just _mwpawldPrettyPrint)

192+ (Just _mwpawldPrettyPrint)

190− _mwpawldWebPropertyId

191 _mwpawldUserIP

193 _mwpawldUserIP

192− _mwpawldAccountId

194+ _mwpawldFields

193 _mwpawldKey

195 _mwpawldKey

194− _mwpawldWebPropertyAdWordsLinkId

195 _mwpawldOAuthToken

196 _mwpawldOAuthToken

196− _mwpawldFields

197 (Just AltJSON)

198 where go

199 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Get.hs+8−8

@@ -57,9 +57,9 @@ type ManagementWebPropertyAdWordsLinksGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] EntityAdWordsLink

65

@@ -187,14 +187,14 @@ instance GoogleRequest

187 request = requestWithRoute defReq analyticsURL

188 requestWithRoute r u

189 ManagementWebPropertyAdWordsLinksGet'{..}

190+ = go _mwpawlgAccountId _mwpawlgWebPropertyId

191+ _mwpawlgWebPropertyAdWordsLinkId

192+ _mwpawlgQuotaUser

190− = go _mwpawlgQuotaUser (Just _mwpawlgPrettyPrint)

193+ (Just _mwpawlgPrettyPrint)

191− _mwpawlgWebPropertyId

192 _mwpawlgUserIP

194 _mwpawlgUserIP

193− _mwpawlgAccountId

195+ _mwpawlgFields

194 _mwpawlgKey

196 _mwpawlgKey

195− _mwpawlgWebPropertyAdWordsLinkId

196 _mwpawlgOAuthToken

197 _mwpawlgOAuthToken

197− _mwpawlgFields

198 (Just AltJSON)

199 where go

200 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Insert.hs+7−7

@@ -57,9 +57,9 @@ type ManagementWebPropertyAdWordsLinksInsertResource

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] EntityAdWordsLink :>

65 Post '[JSON] EntityAdWordsLink

@@ -188,13 +188,13 @@ instance GoogleRequest

188 request = requestWithRoute defReq analyticsURL

189 requestWithRoute r u

190 ManagementWebPropertyAdWordsLinksInsert'{..}

191+ = go _mwpawliAccountId _mwpawliWebPropertyId

192+ _mwpawliQuotaUser

191− = go _mwpawliQuotaUser (Just _mwpawliPrettyPrint)

193+ (Just _mwpawliPrettyPrint)

192− _mwpawliWebPropertyId

193 _mwpawliUserIP

194 _mwpawliUserIP

194− _mwpawliAccountId

195+ _mwpawliFields

195 _mwpawliKey

196 _mwpawliKey

196 _mwpawliOAuthToken

197 _mwpawliOAuthToken

197− _mwpawliFields

198 (Just AltJSON)

199 _mwpawliEntityAdWordsLink

200 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/List.hs+13−13

@@ -54,14 +54,14 @@ type ManagementWebPropertyAdWordsLinksListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "entityAdWordsLinks" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] EntityAdWordsLinks

67

@@ -201,15 +201,15 @@ instance GoogleRequest

201 request = requestWithRoute defReq analyticsURL

202 requestWithRoute r u

203 ManagementWebPropertyAdWordsLinksList'{..}

204− = go _mwpawllQuotaUser (Just _mwpawllPrettyPrint)

204+ = go _mwpawllMaxResults _mwpawllStartIndex

205+ _mwpawllAccountId

205 _mwpawllWebPropertyId

206 _mwpawllWebPropertyId

207+ _mwpawllQuotaUser

208+ (Just _mwpawllPrettyPrint)

206 _mwpawllUserIP

209 _mwpawllUserIP

207− _mwpawllAccountId

210+ _mwpawllFields

208 _mwpawllKey

211 _mwpawllKey

209 _mwpawllOAuthToken

212 _mwpawllOAuthToken

210− _mwpawllStartIndex

211− _mwpawllMaxResults

212− _mwpawllFields

213 (Just AltJSON)

214 where go

215 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Patch.hs+8−8

@@ -59,9 +59,9 @@ type ManagementWebPropertyAdWordsLinksPatchResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] EntityAdWordsLink :>

67 Patch '[JSON] EntityAdWordsLink

@@ -202,14 +202,14 @@ instance GoogleRequest

202 request = requestWithRoute defReq analyticsURL

203 requestWithRoute r u

204 ManagementWebPropertyAdWordsLinksPatch'{..}

205+ = go _mwpawlpAccountId _mwpawlpWebPropertyId

206+ _mwpawlpWebPropertyAdWordsLinkId

207+ _mwpawlpQuotaUser

205− = go _mwpawlpQuotaUser (Just _mwpawlpPrettyPrint)

208+ (Just _mwpawlpPrettyPrint)

206− _mwpawlpWebPropertyId

207 _mwpawlpUserIP

209 _mwpawlpUserIP

208− _mwpawlpAccountId

210+ _mwpawlpFields

209 _mwpawlpKey

211 _mwpawlpKey

210− _mwpawlpWebPropertyAdWordsLinkId

211 _mwpawlpOAuthToken

212 _mwpawlpOAuthToken

212− _mwpawlpFields

213 (Just AltJSON)

214 _mwpawlpEntityAdWordsLink

215 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Update.hs+8−8

@@ -59,9 +59,9 @@ type ManagementWebPropertyAdWordsLinksUpdateResource

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] EntityAdWordsLink :>

67 Put '[JSON] EntityAdWordsLink

@@ -201,14 +201,14 @@ instance GoogleRequest

201 request = requestWithRoute defReq analyticsURL

202 requestWithRoute r u

203 ManagementWebPropertyAdWordsLinksUpdate'{..}

204+ = go _mwpawluAccountId _mwpawluWebPropertyId

205+ _mwpawluWebPropertyAdWordsLinkId

206+ _mwpawluQuotaUser

204− = go _mwpawluQuotaUser (Just _mwpawluPrettyPrint)

207+ (Just _mwpawluPrettyPrint)

205− _mwpawluWebPropertyId

206 _mwpawluUserIP

208 _mwpawluUserIP

207− _mwpawluAccountId

209+ _mwpawluFields

208 _mwpawluKey

210 _mwpawluKey

209− _mwpawluWebPropertyAdWordsLinkId

210 _mwpawluOAuthToken

211 _mwpawluOAuthToken

211− _mwpawluFields

212 (Just AltJSON)

213 _mwpawluEntityAdWordsLink

214 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Delete.hs+8−8

@@ -57,9 +57,9 @@ type ManagementWebPropertyUserLinksDeleteResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Delete '[JSON] ()

64

65-- | Removes a user from the given web property.

@@ -182,14 +182,14 @@ instance GoogleRequest

182 request = requestWithRoute defReq analyticsURL

183 requestWithRoute r u

184 ManagementWebPropertyUserLinksDelete'{..}

185+ = go _mwpuldAccountId _mwpuldWebPropertyId

186+ _mwpuldLinkId

187+ _mwpuldQuotaUser

185− = go _mwpuldQuotaUser (Just _mwpuldPrettyPrint)

188+ (Just _mwpuldPrettyPrint)

186− _mwpuldWebPropertyId

187 _mwpuldUserIP

189 _mwpuldUserIP

188− _mwpuldAccountId

190+ _mwpuldFields

189 _mwpuldKey

191 _mwpuldKey

190− _mwpuldLinkId

191 _mwpuldOAuthToken

192 _mwpuldOAuthToken

192− _mwpuldFields

193 (Just AltJSON)

194 where go

195 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Insert.hs+7−7

@@ -56,9 +56,9 @@ type ManagementWebPropertyUserLinksInsertResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] EntityUserLink :>

64 Post '[JSON] EntityUserLink

@@ -185,13 +185,13 @@ instance GoogleRequest

185 request = requestWithRoute defReq analyticsURL

186 requestWithRoute r u

187 ManagementWebPropertyUserLinksInsert'{..}

188+ = go _mwpuliAccountId _mwpuliWebPropertyId

189+ _mwpuliQuotaUser

188− = go _mwpuliQuotaUser (Just _mwpuliPrettyPrint)

190+ (Just _mwpuliPrettyPrint)

189− _mwpuliWebPropertyId

190 _mwpuliUserIP

191 _mwpuliUserIP

191− _mwpuliAccountId

192+ _mwpuliFields

192 _mwpuliKey

193 _mwpuliKey

193 _mwpuliOAuthToken

194 _mwpuliOAuthToken

194− _mwpuliFields

195 (Just AltJSON)

196 _mwpuliEntityUserLink

197 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/List.hs+13−13

@@ -54,14 +54,14 @@ type ManagementWebPropertyUserLinksListResource =

54 "webproperties" :>

55 Capture "webPropertyId" Text :>

56 "entityUserLinks" :>

57+ QueryParam "max-results" Int32 :>

58+ QueryParam "start-index" Int32 :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "start-index" Int32 :>

63− QueryParam "max-results" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] EntityUserLinks

67

@@ -201,15 +201,15 @@ instance GoogleRequest

201 request = requestWithRoute defReq analyticsURL

202 requestWithRoute r u

203 ManagementWebPropertyUserLinksList'{..}

204− = go _mwpullQuotaUser (Just _mwpullPrettyPrint)

204+ = go _mwpullMaxResults _mwpullStartIndex

205+ _mwpullAccountId

205 _mwpullWebPropertyId

206 _mwpullWebPropertyId

207+ _mwpullQuotaUser

208+ (Just _mwpullPrettyPrint)

206 _mwpullUserIP

209 _mwpullUserIP

207− _mwpullAccountId

210+ _mwpullFields

208 _mwpullKey

211 _mwpullKey

209 _mwpullOAuthToken

212 _mwpullOAuthToken

210− _mwpullStartIndex

211− _mwpullMaxResults

212− _mwpullFields

213 (Just AltJSON)

214 where go

215 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Update.hs+8−8

@@ -58,9 +58,9 @@ type ManagementWebPropertyUserLinksUpdateResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] EntityUserLink :>

66 Put '[JSON] EntityUserLink

@@ -197,14 +197,14 @@ instance GoogleRequest

197 request = requestWithRoute defReq analyticsURL

198 requestWithRoute r u

199 ManagementWebPropertyUserLinksUpdate'{..}

200+ = go _mwpuluAccountId _mwpuluWebPropertyId

201+ _mwpuluLinkId

202+ _mwpuluQuotaUser

200− = go _mwpuluQuotaUser (Just _mwpuluPrettyPrint)

203+ (Just _mwpuluPrettyPrint)

201− _mwpuluWebPropertyId

202 _mwpuluUserIP

204 _mwpuluUserIP

203− _mwpuluAccountId

205+ _mwpuluFields

204 _mwpuluKey

206 _mwpuluKey

205− _mwpuluLinkId

206 _mwpuluOAuthToken

207 _mwpuluOAuthToken

207− _mwpuluFields

208 (Just AltJSON)

209 _mwpuluEntityUserLink

210 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Metadata/Columns/List.hs+7−6

@@ -51,9 +51,9 @@ type MetadataColumnsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Get '[JSON] Columns

58

59-- | Lists all columns for a report type

@@ -151,11 +151,12 @@ instance GoogleRequest MetadataColumnsList' where

151 type Rs MetadataColumnsList' = Columns

152 request = requestWithRoute defReq analyticsURL

153 requestWithRoute r u MetadataColumnsList'{..}

154+ = go _mclReportType _mclQuotaUser

154− = go _mclQuotaUser (Just _mclPrettyPrint) _mclUserIP

155+ (Just _mclPrettyPrint)

156+ _mclUserIP

157+ _mclFields

155 _mclKey

158 _mclKey

156 _mclOAuthToken

159 _mclOAuthToken

157− _mclReportType

158− _mclFields

159 (Just AltJSON)

160 (Just AltJSON)

160 where go

161 where go

161 = clientWithRoute

162 = clientWithRoute

gogol-analytics/gen/Network/Google/Resource/Analytics/Provisioning/CreateAccountTicket.hs+4−4

@@ -50,9 +50,9 @@ type ProvisioningCreateAccountTicketResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 ReqBody '[JSON] AccountTicket :>

58 Post '[JSON] AccountTicket

@@ -158,9 +158,9 @@ instance GoogleRequest

158 ProvisioningCreateAccountTicket'{..}

159 = go _pcatQuotaUser (Just _pcatPrettyPrint)

160 _pcatUserIP

161+ _pcatFields

161 _pcatKey

162 _pcatKey

162 _pcatOAuthToken

163 _pcatOAuthToken

163− _pcatFields

164 (Just AltJSON)

165 _pcatAccountTicket

166 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Delete.hs+6−7

@@ -53,9 +53,9 @@ type CollectionsDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes a collection.

@@ -161,13 +161,12 @@ instance GoogleRequest CollectionsDelete' where

161 request

162 = requestWithRoute defReq androidEnterpriseURL

163 requestWithRoute r u CollectionsDelete'{..}

164+ = go _cdEnterpriseId _cdCollectionId _cdQuotaUser

164− = go _cdQuotaUser (Just _cdPrettyPrint)

165+ (Just _cdPrettyPrint)

165− _cdEnterpriseId

166 _cdUserIP

167− _cdCollectionId

167+ _cdFields

168 _cdKey

169 _cdOAuthToken

170− _cdFields

171 (Just AltJSON)

170 (Just AltJSON)

172 where go

171 where go

173 = clientWithRoute

172 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Get.hs+6−7

@@ -53,9 +53,9 @@ type CollectionsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Collection

60

61-- | Retrieves the details of a collection.

@@ -164,13 +164,12 @@ instance GoogleRequest CollectionsGet' where

164 request

165 = requestWithRoute defReq androidEnterpriseURL

166 requestWithRoute r u CollectionsGet'{..}

167+ = go _cggEnterpriseId _cggCollectionId _cggQuotaUser

167− = go _cggQuotaUser (Just _cggPrettyPrint)

168+ (Just _cggPrettyPrint)

168− _cggEnterpriseId

169 _cggUserIP

170− _cggCollectionId

170+ _cggFields

171 _cggKey

172 _cggOAuthToken

173− _cggFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Insert.hs+6−6

@@ -52,9 +52,9 @@ type CollectionsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Collection :> Post '[JSON] Collection

60

@@ -160,12 +160,12 @@ instance GoogleRequest CollectionsInsert' where

160 request

161 = requestWithRoute defReq androidEnterpriseURL

162 requestWithRoute r u CollectionsInsert'{..}

163+ = go _ciEnterpriseId _ciQuotaUser

163− = go _ciQuotaUser (Just _ciPrettyPrint)

164+ (Just _ciPrettyPrint)

164− _ciEnterpriseId

165 _ciUserIP

166+ _ciFields

166 _ciKey

167 _ciKey

167 _ciOAuthToken

168 _ciOAuthToken

168− _ciFields

169 (Just AltJSON)

170 _ciCollection

171 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/List.hs+5−5

@@ -51,9 +51,9 @@ type CollectionsListResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 Get '[JSON] CollectionsListResponse

59

@@ -148,11 +148,11 @@ instance GoogleRequest CollectionsList' where

148 request

149 = requestWithRoute defReq androidEnterpriseURL

150 requestWithRoute r u CollectionsList'{..}

151− = go _cQuotaUser (Just _cPrettyPrint) _cEnterpriseId

151+ = go _cEnterpriseId _cQuotaUser (Just _cPrettyPrint)

152 _cUserIP

153+ _cFields

153 _cKey

154 _cKey

154 _cOAuthToken

155 _cOAuthToken

155− _cFields

156 (Just AltJSON)

157 where go

158 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Patch.hs+6−7

@@ -54,9 +54,9 @@ type CollectionsPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Collection :>

62 Patch '[JSON] Collection

@@ -178,13 +178,12 @@ instance GoogleRequest CollectionsPatch' where

178 request

179 = requestWithRoute defReq androidEnterpriseURL

180 requestWithRoute r u CollectionsPatch'{..}

181+ = go _colEnterpriseId _colCollectionId _colQuotaUser

181− = go _colQuotaUser (Just _colPrettyPrint)

182+ (Just _colPrettyPrint)

182− _colEnterpriseId

183 _colUserIP

184− _colCollectionId

184+ _colFields

185 _colKey

186 _colOAuthToken

187− _colFields

188 (Just AltJSON)

187 (Just AltJSON)

189 _colCollection

188 _colCollection

190 where go

189 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Update.hs+6−7

@@ -54,9 +54,9 @@ type CollectionsUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Collection :> Put '[JSON] Collection

62

@@ -173,13 +173,12 @@ instance GoogleRequest CollectionsUpdate' where

173 request

174 = requestWithRoute defReq androidEnterpriseURL

175 requestWithRoute r u CollectionsUpdate'{..}

176+ = go _cuEnterpriseId _cuCollectionId _cuQuotaUser

176− = go _cuQuotaUser (Just _cuPrettyPrint)

177+ (Just _cuPrettyPrint)

177− _cuEnterpriseId

178 _cuUserIP

179− _cuCollectionId

179+ _cuFields

180 _cuKey

181 _cuOAuthToken

182− _cuFields

183 (Just AltJSON)

182 (Just AltJSON)

184 _cuCollection

183 _cuCollection

185 where go

184 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Delete.hs+7−8

@@ -58,9 +58,9 @@ type CollectionviewersDeleteResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Delete '[JSON] ()

65

66-- | Removes the user from the list of those specifically allowed to see the

@@ -181,14 +181,13 @@ instance GoogleRequest CollectionviewersDelete' where

181 request

182 = requestWithRoute defReq androidEnterpriseURL

183 requestWithRoute r u CollectionviewersDelete'{..}

184+ = go _cddEnterpriseId _cddCollectionId _cddUserId

185+ _cddQuotaUser

184− = go _cddQuotaUser (Just _cddPrettyPrint)

186+ (Just _cddPrettyPrint)

185− _cddEnterpriseId

186 _cddUserIP

187 _cddUserIP

187− _cddCollectionId

188+ _cddFields

188− _cddUserId

189 _cddKey

190 _cddOAuthToken

191− _cddFields

192 (Just AltJSON)

191 (Just AltJSON)

193 where go

192 where go

194 = clientWithRoute

193 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Get.hs+7−8

@@ -58,9 +58,9 @@ type CollectionviewersGetResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Get '[JSON] User

65

66-- | Retrieves the ID of the user if they have been specifically allowed to

@@ -177,14 +177,13 @@ instance GoogleRequest CollectionviewersGet' where

177 request

178 = requestWithRoute defReq androidEnterpriseURL

179 requestWithRoute r u CollectionviewersGet'{..}

180+ = go _cgEnterpriseId _cgCollectionId _cgUserId

181+ _cgQuotaUser

180− = go _cgQuotaUser (Just _cgPrettyPrint)

182+ (Just _cgPrettyPrint)

181− _cgEnterpriseId

182 _cgUserIP

183 _cgUserIP

183− _cgCollectionId

184+ _cgFields

184− _cgUserId

185 _cgKey

186 _cgOAuthToken

187− _cgFields

188 (Just AltJSON)

187 (Just AltJSON)

189 where go

188 where go

190 = clientWithRoute

189 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/List.hs+6−7

@@ -56,9 +56,9 @@ type CollectionviewersListResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] CollectionViewersListResponse

64

@@ -168,13 +168,12 @@ instance GoogleRequest CollectionviewersList' where

168 request

169 = requestWithRoute defReq androidEnterpriseURL

170 requestWithRoute r u CollectionviewersList'{..}

171+ = go _clEnterpriseId _clCollectionId _clQuotaUser

171− = go _clQuotaUser (Just _clPrettyPrint)

172+ (Just _clPrettyPrint)

172− _clEnterpriseId

173 _clUserIP

174− _clCollectionId

174+ _clFields

175 _clKey

176 _clOAuthToken

177− _clFields

178 (Just AltJSON)

177 (Just AltJSON)

179 where go

178 where go

180 = clientWithRoute

179 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Patch.hs+7−8

@@ -60,9 +60,9 @@ type CollectionviewersPatchResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] User :> Patch '[JSON] User

68

@@ -190,14 +190,13 @@ instance GoogleRequest CollectionviewersPatch' where

190 request

191 = requestWithRoute defReq androidEnterpriseURL

192 requestWithRoute r u CollectionviewersPatch'{..}

193+ = go _cpEnterpriseId _cpCollectionId _cpUserId

194+ _cpQuotaUser

193− = go _cpQuotaUser (Just _cpPrettyPrint)

195+ (Just _cpPrettyPrint)

194− _cpEnterpriseId

195 _cpUserIP

196 _cpUserIP

196− _cpCollectionId

197+ _cpFields

197− _cpUserId

198 _cpKey

199 _cpOAuthToken

200− _cpFields

201 (Just AltJSON)

200 (Just AltJSON)

202 _cpUser

201 _cpUser

203 where go

202 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Update.hs+7−8

@@ -59,9 +59,9 @@ type CollectionviewersUpdateResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] User :> Put '[JSON] User

67

@@ -192,14 +192,13 @@ instance GoogleRequest CollectionviewersUpdate' where

192 request

193 = requestWithRoute defReq androidEnterpriseURL

194 requestWithRoute r u CollectionviewersUpdate'{..}

195+ = go _cuuEnterpriseId _cuuCollectionId _cuuUserId

196+ _cuuQuotaUser

195− = go _cuuQuotaUser (Just _cuuPrettyPrint)

197+ (Just _cuuPrettyPrint)

196− _cuuEnterpriseId

197 _cuuUserIP

198 _cuuUserIP

198− _cuuCollectionId

199+ _cuuFields

199− _cuuUserId

200 _cuuKey

201 _cuuOAuthToken

202− _cuuFields

203 (Just AltJSON)

202 (Just AltJSON)

204 _cuuUser

203 _cuuUser

205 where go

204 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/Get.hs+7−8

@@ -56,9 +56,9 @@ type DevicesGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Device

63

64-- | Retrieves the details of a device.

@@ -172,14 +172,13 @@ instance GoogleRequest DevicesGet' where

172 request

173 = requestWithRoute defReq androidEnterpriseURL

174 requestWithRoute r u DevicesGet'{..}

175+ = go _dgEnterpriseId _dgUserId _dgDeviceId

176+ _dgQuotaUser

175− = go _dgQuotaUser (Just _dgPrettyPrint)

177+ (Just _dgPrettyPrint)

176− _dgEnterpriseId

177 _dgUserIP

178 _dgUserIP

178− _dgUserId

179+ _dgFields

179 _dgKey

180 _dgKey

180− _dgDeviceId

181 _dgOAuthToken

182− _dgFields

183 (Just AltJSON)

182 (Just AltJSON)

184 where go

183 where go

185 = clientWithRoute (Proxy :: Proxy DevicesGetResource)

184 = clientWithRoute (Proxy :: Proxy DevicesGetResource)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/GetState.hs+7−8

@@ -61,9 +61,9 @@ type DevicesGetStateResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Get '[JSON] DeviceState

69

@@ -186,14 +186,13 @@ instance GoogleRequest DevicesGetState' where

186 request

187 = requestWithRoute defReq androidEnterpriseURL

188 requestWithRoute r u DevicesGetState'{..}

189+ = go _dgsEnterpriseId _dgsUserId _dgsDeviceId

190+ _dgsQuotaUser

189− = go _dgsQuotaUser (Just _dgsPrettyPrint)

191+ (Just _dgsPrettyPrint)

190− _dgsEnterpriseId

191 _dgsUserIP

192 _dgsUserIP

192− _dgsUserId

193+ _dgsFields

193 _dgsKey

194 _dgsKey

194− _dgsDeviceId

195 _dgsOAuthToken

196− _dgsFields

197 (Just AltJSON)

196 (Just AltJSON)

198 where go

197 where go

199 = clientWithRoute

198 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/List.hs+6−7

@@ -54,9 +54,9 @@ type DevicesListResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 Get '[JSON] DevicesListResponse

62

@@ -161,13 +161,12 @@ instance GoogleRequest DevicesList' where

161 request

162 = requestWithRoute defReq androidEnterpriseURL

163 requestWithRoute r u DevicesList'{..}

164+ = go _dlEnterpriseId _dlUserId _dlQuotaUser

164− = go _dlQuotaUser (Just _dlPrettyPrint)

165+ (Just _dlPrettyPrint)

165− _dlEnterpriseId

166 _dlUserIP

167− _dlUserId

167+ _dlFields

168 _dlKey

169 _dlOAuthToken

170− _dlFields

171 (Just AltJSON)

170 (Just AltJSON)

172 where go

171 where go

173 = clientWithRoute

172 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/SetState.hs+7−8

@@ -62,9 +62,9 @@ type DevicesSetStateResource =

62 QueryParam "quotaUser" Text :>

63 QueryParam "prettyPrint" Bool :>

64 QueryParam "userIp" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

66− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] DeviceState :>

70 Put '[JSON] DeviceState

@@ -199,14 +199,13 @@ instance GoogleRequest DevicesSetState' where

199 request

200 = requestWithRoute defReq androidEnterpriseURL

201 requestWithRoute r u DevicesSetState'{..}

202+ = go _dssEnterpriseId _dssUserId _dssDeviceId

203+ _dssQuotaUser

202− = go _dssQuotaUser (Just _dssPrettyPrint)

204+ (Just _dssPrettyPrint)

203− _dssEnterpriseId

204 _dssUserIP

205 _dssUserIP

205− _dssUserId

206+ _dssFields

206 _dssKey

207 _dssKey

207− _dssDeviceId

208 _dssOAuthToken

209− _dssFields

210 (Just AltJSON)

209 (Just AltJSON)

211 _dssDeviceState

210 _dssDeviceState

212 where go

211 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Delete.hs+6−6

@@ -53,9 +53,9 @@ type EnterprisesDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes the binding between the MDM and enterprise. This is now

@@ -156,12 +156,12 @@ instance GoogleRequest EnterprisesDelete' where

156 request

157 = requestWithRoute defReq androidEnterpriseURL

158 requestWithRoute r u EnterprisesDelete'{..}

159+ = go _eddEnterpriseId _eddQuotaUser

159− = go _eddQuotaUser (Just _eddPrettyPrint)

160+ (Just _eddPrettyPrint)

160− _eddEnterpriseId

161 _eddUserIP

162+ _eddFields

162 _eddKey

163 _eddKey

163 _eddOAuthToken

164 _eddOAuthToken

164− _eddFields

165 (Just AltJSON)

166 where go

167 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Enroll.hs+11−10

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48type EnterprisesEnrollResource =

49 "enterprises" :>

50 "enroll" :>

51+ QueryParam "token" Text :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

54− QueryParam "token" Text :>

54+ QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Enterprise :> Post '[JSON] Enterprise

60

@@ -158,11 +158,12 @@ instance GoogleRequest EnterprisesEnroll' where

158 request

159 = requestWithRoute defReq androidEnterpriseURL

160 requestWithRoute r u EnterprisesEnroll'{..}

161+ = go (Just _eeToken) _eeQuotaUser

161− = go _eeQuotaUser (Just _eePrettyPrint) _eeUserIP

162+ (Just _eePrettyPrint)

162− (Just _eeToken)

163+ _eeUserIP

164+ _eeFields

163 _eeKey

165 _eeKey

164 _eeOAuthToken

166 _eeOAuthToken

165− _eeFields

166 (Just AltJSON)

167 (Just AltJSON)

167 _eeEnterprise

168 _eeEnterprise

168 where go

169 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Get.hs+6−6

@@ -50,9 +50,9 @@ type EnterprisesGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Enterprise

57

58-- | Retrieves the name and domain of an enterprise.

@@ -147,12 +147,12 @@ instance GoogleRequest EnterprisesGet' where

147 request

148 = requestWithRoute defReq androidEnterpriseURL

149 requestWithRoute r u EnterprisesGet'{..}

150+ = go _egEnterpriseId _egQuotaUser

150− = go _egQuotaUser (Just _egPrettyPrint)

151+ (Just _egPrettyPrint)

151− _egEnterpriseId

152 _egUserIP

153+ _egFields

153 _egKey

154 _egKey

154 _egOAuthToken

155 _egOAuthToken

155− _egFields

156 (Just AltJSON)

157 where go

158 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Insert.hs+11−10

@@ -48,13 +48,13 @@ import Network.Google.Prelude

48-- 'EnterprisesInsert'' request conforms to.

49type EnterprisesInsertResource =

50 "enterprises" :>

51+ QueryParam "token" Text :>

51− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

52− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

53− QueryParam "userIp" Text :>

54− QueryParam "token" Text :>

54+ QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Enterprise :> Post '[JSON] Enterprise

60

@@ -159,11 +159,12 @@ instance GoogleRequest EnterprisesInsert' where

159 request

160 = requestWithRoute defReq androidEnterpriseURL

161 requestWithRoute r u EnterprisesInsert'{..}

162+ = go (Just _eiToken) _eiQuotaUser

162− = go _eiQuotaUser (Just _eiPrettyPrint) _eiUserIP

163+ (Just _eiPrettyPrint)

163− (Just _eiToken)

164+ _eiUserIP

165+ _eiFields

164 _eiKey

166 _eiKey

165 _eiOAuthToken

167 _eiOAuthToken

166− _eiFields

167 (Just AltJSON)

168 (Just AltJSON)

168 _eiEnterprise

169 _eiEnterprise

169 where go

170 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/List.hs+11−10

@@ -46,13 +46,13 @@ import Network.Google.Prelude

46-- 'EnterprisesList'' request conforms to.

47type EnterprisesListResource =

48 "enterprises" :>

49+ QueryParam "domain" Text :>

49− QueryParam "quotaUser" Text :>

50+ QueryParam "quotaUser" Text :>

50− QueryParam "prettyPrint" Bool :>

51+ QueryParam "prettyPrint" Bool :>

51− QueryParam "userIp" Text :>

52− QueryParam "domain" Text :>

52+ QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 Get '[JSON] EnterprisesListResponse

58

@@ -150,11 +150,12 @@ instance GoogleRequest EnterprisesList' where

150 request

151 = requestWithRoute defReq androidEnterpriseURL

152 requestWithRoute r u EnterprisesList'{..}

153+ = go (Just _ellDomain) _ellQuotaUser

153− = go _ellQuotaUser (Just _ellPrettyPrint) _ellUserIP

154+ (Just _ellPrettyPrint)

154− (Just _ellDomain)

155+ _ellUserIP

156+ _ellFields

155 _ellKey

157 _ellKey

156 _ellOAuthToken

158 _ellOAuthToken

157− _ellFields

158 (Just AltJSON)

159 (Just AltJSON)

159 where go

160 where go

160 = clientWithRoute

161 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SendTestPushNotification.hs+6−6

@@ -52,9 +52,9 @@ type EnterprisesSendTestPushNotificationResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Post '[JSON]

60 EnterprisesSendTestPushNotificationResponse

@@ -160,12 +160,12 @@ instance GoogleRequest

160 = requestWithRoute defReq androidEnterpriseURL

161 requestWithRoute r u

162 EnterprisesSendTestPushNotification'{..}

163+ = go _estpnEnterpriseId _estpnQuotaUser

163− = go _estpnQuotaUser (Just _estpnPrettyPrint)

164+ (Just _estpnPrettyPrint)

164− _estpnEnterpriseId

165 _estpnUserIP

166+ _estpnFields

166 _estpnKey

167 _estpnKey

167 _estpnOAuthToken

168 _estpnOAuthToken

168− _estpnFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetAccount.hs+6−6

@@ -53,9 +53,9 @@ type EnterprisesSetAccountResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] EnterpriseAccount :>

61 Put '[JSON] EnterpriseAccount

@@ -167,12 +167,12 @@ instance GoogleRequest EnterprisesSetAccount' where

167 request

168 = requestWithRoute defReq androidEnterpriseURL

169 requestWithRoute r u EnterprisesSetAccount'{..}

170+ = go _esaEnterpriseId _esaQuotaUser

170− = go _esaQuotaUser (Just _esaPrettyPrint)

171+ (Just _esaPrettyPrint)

171− _esaEnterpriseId

172 _esaUserIP

173+ _esaFields

173 _esaKey

174 _esaKey

174 _esaOAuthToken

175 _esaOAuthToken

175− _esaFields

176 (Just AltJSON)

177 _esaEnterpriseAccount

178 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Unenroll.hs+6−6

@@ -51,9 +51,9 @@ type EnterprisesUnenrollResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Post '[JSON] ()

58

59-- | Unenrolls an enterprise from the calling MDM.

@@ -148,12 +148,12 @@ instance GoogleRequest EnterprisesUnenroll' where

148 request

149 = requestWithRoute defReq androidEnterpriseURL

150 requestWithRoute r u EnterprisesUnenroll'{..}

151+ = go _euEnterpriseId _euQuotaUser

151− = go _euQuotaUser (Just _euPrettyPrint)

152+ (Just _euPrettyPrint)

152− _euEnterpriseId

153 _euUserIP

154+ _euFields

154 _euKey

155 _euKey

155 _euOAuthToken

156 _euOAuthToken

156− _euFields

157 (Just AltJSON)

158 where go

159 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Delete.hs+6−7

@@ -56,9 +56,9 @@ type EntitlementsDeleteResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Delete '[JSON] ()

63

64-- | Removes an entitlement to an app for a user and uninstalls it.

@@ -173,14 +173,13 @@ instance GoogleRequest EntitlementsDelete' where

173 request

174 = requestWithRoute defReq androidEnterpriseURL

175 requestWithRoute r u EntitlementsDelete'{..}

176+ = go _edEnterpriseId _edUserId _edEntitlementId

176− = go _edEntitlementId _edQuotaUser

177+ _edQuotaUser

177 (Just _edPrettyPrint)

178 (Just _edPrettyPrint)

178− _edEnterpriseId

179 _edUserIP

180− _edUserId

180+ _edFields

181 _edKey

182 _edOAuthToken

183− _edFields

184 (Just AltJSON)

183 (Just AltJSON)

185 where go

184 where go

186 = clientWithRoute

185 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Get.hs+7−7

@@ -56,9 +56,9 @@ type EntitlementsGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Entitlement

63

64-- | Retrieves details of an entitlement.

@@ -172,13 +172,13 @@ instance GoogleRequest EntitlementsGet' where

172 request

173 = requestWithRoute defReq androidEnterpriseURL

174 requestWithRoute r u EntitlementsGet'{..}

175+ = go _eEnterpriseId _eUserId _eEntitlementId

176+ _eQuotaUser

175− = go _eEntitlementId _eQuotaUser (Just _ePrettyPrint)

177+ (Just _ePrettyPrint)

176− _eEnterpriseId

177 _eUserIP

178 _eUserIP

178− _eUserId

179+ _eFields

179 _eKey

180 _eKey

180 _eOAuthToken

181 _eOAuthToken

181− _eFields

182 (Just AltJSON)

183 where go

184 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/List.hs+6−7

@@ -54,9 +54,9 @@ type EntitlementsListResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 Get '[JSON] EntitlementsListResponse

62

@@ -161,13 +161,12 @@ instance GoogleRequest EntitlementsList' where

161 request

162 = requestWithRoute defReq androidEnterpriseURL

163 requestWithRoute r u EntitlementsList'{..}

164+ = go _elEnterpriseId _elUserId _elQuotaUser

164− = go _elQuotaUser (Just _elPrettyPrint)

165+ (Just _elPrettyPrint)

165− _elEnterpriseId

166 _elUserIP

167− _elUserId

167+ _elFields

168 _elKey

169 _elOAuthToken

170− _elFields

171 (Just AltJSON)

170 (Just AltJSON)

172 where go

171 where go

173 = clientWithRoute

172 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Patch.hs+11−12

@@ -56,13 +56,13 @@ type EntitlementsPatchResource =

56 Capture "userId" Text :>

57 "entitlements" :>

58 Capture "entitlementId" Text :>

59+ QueryParam "install" Bool :>

59− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61− QueryParam "userIp" Text :>

61+ QueryParam "prettyPrint" Bool :>

62− QueryParam "install" Bool :>

62+ QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] Entitlement :>

68 Patch '[JSON] Entitlement

@@ -203,15 +203,14 @@ instance GoogleRequest EntitlementsPatch' where

203 request

204 = requestWithRoute defReq androidEnterpriseURL

205 requestWithRoute r u EntitlementsPatch'{..}

206+ = go _epInstall _epEnterpriseId _epUserId

206− = go _epEntitlementId _epQuotaUser

207+ _epEntitlementId

208+ _epQuotaUser

207 (Just _epPrettyPrint)

209 (Just _epPrettyPrint)

208− _epEnterpriseId

209 _epUserIP

210 _epUserIP

210− _epInstall

211+ _epFields

211− _epUserId

212 _epKey

213 _epOAuthToken

214− _epFields

215 (Just AltJSON)

214 (Just AltJSON)

216 _epEntitlement

215 _epEntitlement

217 where go

216 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Update.hs+11−12

@@ -55,13 +55,13 @@ type EntitlementsUpdateResource =

55 Capture "userId" Text :>

56 "entitlements" :>

57 Capture "entitlementId" Text :>

58+ QueryParam "install" Bool :>

58− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

59− QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

60+ QueryParam "prettyPrint" Bool :>

61− QueryParam "install" Bool :>

61+ QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Entitlement :>

67 Put '[JSON] Entitlement

@@ -205,15 +205,14 @@ instance GoogleRequest EntitlementsUpdate' where

205 request

206 = requestWithRoute defReq androidEnterpriseURL

207 requestWithRoute r u EntitlementsUpdate'{..}

208+ = go _entInstall _entEnterpriseId _entUserId

208− = go _entEntitlementId _entQuotaUser

209+ _entEntitlementId

210+ _entQuotaUser

209 (Just _entPrettyPrint)

211 (Just _entPrettyPrint)

210− _entEnterpriseId

211 _entUserIP

212 _entUserIP

212− _entInstall

213+ _entFields

213− _entUserId

214 _entKey

215 _entOAuthToken

216− _entFields

217 (Just AltJSON)

216 (Just AltJSON)

218 _entEntitlement

217 _entEntitlement

219 where go

218 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/GrouplicenseUsers/List.hs+7−7

@@ -55,9 +55,9 @@ type GrouplicenseUsersListResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 Get '[JSON] GroupLicenseUsersListResponse

63

@@ -170,13 +170,13 @@ instance GoogleRequest GrouplicenseUsersList' where

170 request

171 = requestWithRoute defReq androidEnterpriseURL

172 requestWithRoute r u GrouplicenseUsersList'{..}

173+ = go _gulEnterpriseId _gulGroupLicenseId

174+ _gulQuotaUser

173− = go _gulQuotaUser (Just _gulPrettyPrint)

175+ (Just _gulPrettyPrint)

174− _gulEnterpriseId

175 _gulUserIP

176 _gulUserIP

177+ _gulFields

176 _gulKey

178 _gulKey

177 _gulOAuthToken

179 _gulOAuthToken

178− _gulGroupLicenseId

179− _gulFields

180 (Just AltJSON)

181 where go

182 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Grouplicenses/Get.hs+6−7

@@ -53,9 +53,9 @@ type GrouplicensesGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] GroupLicense

60

61-- | Retrieves details of an enterprise\'s group license for a product.

@@ -162,13 +162,12 @@ instance GoogleRequest GrouplicensesGet' where

162 request

163 = requestWithRoute defReq androidEnterpriseURL

164 requestWithRoute r u GrouplicensesGet'{..}

165+ = go _ggEnterpriseId _ggGroupLicenseId _ggQuotaUser

165− = go _ggQuotaUser (Just _ggPrettyPrint)

166+ (Just _ggPrettyPrint)

166− _ggEnterpriseId

167 _ggUserIP

168+ _ggFields

168 _ggKey

169 _ggKey

169 _ggOAuthToken

170 _ggOAuthToken

170− _ggGroupLicenseId

171− _ggFields

172 (Just AltJSON)

171 (Just AltJSON)

173 where go

172 where go

174 = clientWithRoute

173 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Grouplicenses/List.hs+6−6

@@ -52,9 +52,9 @@ type GrouplicensesListResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] GroupLicensesListResponse

60

@@ -152,12 +152,12 @@ instance GoogleRequest GrouplicensesList' where

152 request

153 = requestWithRoute defReq androidEnterpriseURL

154 requestWithRoute r u GrouplicensesList'{..}

155+ = go _glEnterpriseId _glQuotaUser

155− = go _glQuotaUser (Just _glPrettyPrint)

156+ (Just _glPrettyPrint)

156− _glEnterpriseId

157 _glUserIP

158+ _glFields

158 _glKey

159 _glKey

159 _glOAuthToken

160 _glOAuthToken

160− _glFields

161 (Just AltJSON)

162 where go

163 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Delete.hs+8−9

@@ -61,9 +61,9 @@ type InstallsDeleteResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :> Delete '[JSON] ()

68

69-- | Requests to remove an app from a device. A call to get or list will

@@ -190,15 +190,14 @@ instance GoogleRequest InstallsDelete' where

190 request

191 = requestWithRoute defReq androidEnterpriseURL

192 requestWithRoute r u InstallsDelete'{..}

193− = go _idQuotaUser (Just _idPrettyPrint)

194− _idEnterpriseId

193+ = go _idEnterpriseId _idUserId _idDeviceId

195− _idUserIP

196− _idUserId

197 _idInstallId

194 _idInstallId

195+ _idQuotaUser

196+ (Just _idPrettyPrint)

197+ _idUserIP

198+ _idFields

198 _idKey

199 _idKey

199− _idDeviceId

200 _idOAuthToken

201− _idFields

202 (Just AltJSON)

201 (Just AltJSON)

203 where go

202 where go

204 = clientWithRoute

203 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Get.hs+8−9

@@ -59,9 +59,9 @@ type InstallsGetResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Get '[JSON] Install

66

67-- | Retrieves details of an installation of an app on a device.

@@ -186,15 +186,14 @@ instance GoogleRequest InstallsGet' where

186 request

187 = requestWithRoute defReq androidEnterpriseURL

188 requestWithRoute r u InstallsGet'{..}

189− = go _igQuotaUser (Just _igPrettyPrint)

190− _igEnterpriseId

189+ = go _igEnterpriseId _igUserId _igDeviceId

191− _igUserIP

192− _igUserId

193 _igInstallId

190 _igInstallId

191+ _igQuotaUser

192+ (Just _igPrettyPrint)

193+ _igUserIP

194+ _igFields

194 _igKey

195 _igKey

195− _igDeviceId

196 _igOAuthToken

197− _igFields

198 (Just AltJSON)

197 (Just AltJSON)

199 where go

198 where go

200 = clientWithRoute

199 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/List.hs+7−8

@@ -57,9 +57,9 @@ type InstallsListResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] InstallsListResponse

65

@@ -174,14 +174,13 @@ instance GoogleRequest InstallsList' where

174 request

175 = requestWithRoute defReq androidEnterpriseURL

176 requestWithRoute r u InstallsList'{..}

177+ = go _ilEnterpriseId _ilUserId _ilDeviceId

178+ _ilQuotaUser

177− = go _ilQuotaUser (Just _ilPrettyPrint)

179+ (Just _ilPrettyPrint)

178− _ilEnterpriseId

179 _ilUserIP

180 _ilUserIP

180− _ilUserId

181+ _ilFields

181 _ilKey

182 _ilKey

182− _ilDeviceId

183 _ilOAuthToken

184− _ilFields

185 (Just AltJSON)

184 (Just AltJSON)

186 where go

185 where go

187 = clientWithRoute

186 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Patch.hs+8−9

@@ -62,9 +62,9 @@ type InstallsPatchResource =

62 QueryParam "quotaUser" Text :>

63 QueryParam "prettyPrint" Bool :>

64 QueryParam "userIp" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

66− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] Install :>

70 Patch '[JSON] Install

@@ -203,15 +203,14 @@ instance GoogleRequest InstallsPatch' where

203 request

204 = requestWithRoute defReq androidEnterpriseURL

205 requestWithRoute r u InstallsPatch'{..}

206− = go _ipQuotaUser (Just _ipPrettyPrint)

207− _ipEnterpriseId

206+ = go _ipEnterpriseId _ipUserId _ipDeviceId

208− _ipUserIP

209− _ipUserId

210 _ipInstallId

207 _ipInstallId

208+ _ipQuotaUser

209+ (Just _ipPrettyPrint)

210+ _ipUserIP

211+ _ipFields

211 _ipKey

212 _ipKey

212− _ipDeviceId

213 _ipOAuthToken

214− _ipFields

215 (Just AltJSON)

214 (Just AltJSON)

216 _ipInstall

215 _ipInstall

217 where go

216 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Update.hs+8−9

@@ -62,9 +62,9 @@ type InstallsUpdateResource =

62 QueryParam "quotaUser" Text :>

63 QueryParam "prettyPrint" Bool :>

64 QueryParam "userIp" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

66− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] Install :>

70 Put '[JSON] Install

@@ -203,15 +203,14 @@ instance GoogleRequest InstallsUpdate' where

203 request

204 = requestWithRoute defReq androidEnterpriseURL

205 requestWithRoute r u InstallsUpdate'{..}

206− = go _iuQuotaUser (Just _iuPrettyPrint)

207− _iuEnterpriseId

206+ = go _iuEnterpriseId _iuUserId _iuDeviceId

208− _iuUserIP

209− _iuUserId

210 _iuInstallId

207 _iuInstallId

208+ _iuQuotaUser

209+ (Just _iuPrettyPrint)

210+ _iuUserIP

211+ _iuFields

211 _iuKey

212 _iuKey

212− _iuDeviceId

213 _iuOAuthToken

214− _iuFields

215 (Just AltJSON)

214 (Just AltJSON)

216 _iuInstall

215 _iuInstall

217 where go

216 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Permissions/Get.hs+11−11

@@ -49,13 +49,13 @@ import Network.Google.Prelude

49type PermissionsGetResource =

50 "permissions" :>

51 Capture "permissionId" Text :>

52+ QueryParam "language" Text :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

55+ QueryParam "userIp" Text :>

56+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

57+ QueryParam "key" Key :>

56− QueryParam "language" Text :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Permission

60

61-- | Retrieves details of an Android app permission for display to an

@@ -161,12 +161,12 @@ instance GoogleRequest PermissionsGet' where

161 request

162 = requestWithRoute defReq androidEnterpriseURL

163 requestWithRoute r u PermissionsGet'{..}

164+ = go _pgLanguage _pgPermissionId _pgQuotaUser

164− = go _pgQuotaUser (Just _pgPrettyPrint) _pgUserIP

165+ (Just _pgPrettyPrint)

166+ _pgUserIP

167+ _pgFields

165 _pgKey

168 _pgKey

166− _pgLanguage

167 _pgOAuthToken

169 _pgOAuthToken

168− _pgPermissionId

169− _pgFields

170 (Just AltJSON)

171 where go

172 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/Approve.hs+6−7

@@ -56,9 +56,9 @@ type ProductsApproveResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] ProductsApproveRequest :>

64 Post '[JSON] ()

@@ -177,13 +177,12 @@ instance GoogleRequest ProductsApprove' where

177 request

178 = requestWithRoute defReq androidEnterpriseURL

179 requestWithRoute r u ProductsApprove'{..}

180+ = go _paEnterpriseId _paProductId _paQuotaUser

180− = go _paQuotaUser (Just _paPrettyPrint)

181+ (Just _paPrettyPrint)

181− _paEnterpriseId

182 _paUserIP

183+ _paFields

183 _paKey

184 _paKey

184 _paOAuthToken

185 _paOAuthToken

185− _paProductId

186− _paFields

187 (Just AltJSON)

186 (Just AltJSON)

188 _paProductsApproveRequest

187 _paProductsApproveRequest

189 where go

188 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GenerateApprovalURL.hs+9−9

@@ -59,13 +59,13 @@ type ProductsGenerateApprovalURLResource =

59 "products" :>

60 Capture "productId" Text :>

61 "generateApprovalUrl" :>

62− QueryParam "quotaUser" Text :>

62+ QueryParam "languageCode" Text :>

63− QueryParam "languageCode" Text :>

63+ QueryParam "quotaUser" Text :>

64 QueryParam "prettyPrint" Bool :>

65 QueryParam "userIp" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "fields" Text :>

67+ QueryParam "key" Key :>

67− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "oauth_token" OAuthToken :>

68− QueryParam "fields" Text :>

69 QueryParam "alt" AltJSON :>

70 Post '[JSON] ProductsGenerateApprovalURLResponse

71

@@ -197,14 +197,14 @@ instance GoogleRequest ProductsGenerateApprovalURL'

197 request

198 = requestWithRoute defReq androidEnterpriseURL

199 requestWithRoute r u ProductsGenerateApprovalURL'{..}

200+ = go _pgauLanguageCode _pgauEnterpriseId

201+ _pgauProductId

200− = go _pgauQuotaUser _pgauLanguageCode

202+ _pgauQuotaUser

201 (Just _pgauPrettyPrint)

203 (Just _pgauPrettyPrint)

202− _pgauEnterpriseId

203 _pgauUserIP

204 _pgauUserIP

205+ _pgauFields

204 _pgauKey

206 _pgauKey

205 _pgauOAuthToken

207 _pgauOAuthToken

206− _pgauProductId

207− _pgauFields

208 (Just AltJSON)

209 where go

210 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/Get.hs+11−11

@@ -51,13 +51,13 @@ type ProductsGetResource =

51 Capture "enterpriseId" Text :>

52 "products" :>

53 Capture "productId" Text :>

54+ QueryParam "language" Text :>

54− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

58− QueryParam "language" Text :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] Product

62

63-- | Retrieves details of a product for display to an enterprise admin.

@@ -171,13 +171,13 @@ instance GoogleRequest ProductsGet' where

171 request

172 = requestWithRoute defReq androidEnterpriseURL

173 requestWithRoute r u ProductsGet'{..}

174+ = go _pLanguage _pEnterpriseId _pProductId

175+ _pQuotaUser

174− = go _pQuotaUser (Just _pPrettyPrint) _pEnterpriseId

176+ (Just _pPrettyPrint)

175 _pUserIP

177 _pUserIP

178+ _pFields

176 _pKey

179 _pKey

177− _pLanguage

178 _pOAuthToken

180 _pOAuthToken

179− _pProductId

180− _pFields

181 (Just AltJSON)

182 where go

183 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GetAppRestrictionsSchema.hs+12−12

@@ -54,13 +54,13 @@ type ProductsGetAppRestrictionsSchemaResource =

54 "products" :>

55 Capture "productId" Text :>

56 "appRestrictionsSchema" :>

57+ QueryParam "language" Text :>

57− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

61− QueryParam "language" Text :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] AppRestrictionsSchema

66

@@ -188,14 +188,14 @@ instance GoogleRequest

188 = requestWithRoute defReq androidEnterpriseURL

189 requestWithRoute r u

190 ProductsGetAppRestrictionsSchema'{..}

191+ = go _pgarsLanguage _pgarsEnterpriseId

192+ _pgarsProductId

193+ _pgarsQuotaUser

191− = go _pgarsQuotaUser (Just _pgarsPrettyPrint)

194+ (Just _pgarsPrettyPrint)

192− _pgarsEnterpriseId

193 _pgarsUserIP

195 _pgarsUserIP

196+ _pgarsFields

194 _pgarsKey

197 _pgarsKey

195− _pgarsLanguage

196 _pgarsOAuthToken

198 _pgarsOAuthToken

197− _pgarsProductId

198− _pgarsFields

199 (Just AltJSON)

200 where go

201 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GetPermissions.hs+6−7

@@ -54,9 +54,9 @@ type ProductsGetPermissionsResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 Get '[JSON] ProductPermissions

62

@@ -165,13 +165,12 @@ instance GoogleRequest ProductsGetPermissions' where

165 request

166 = requestWithRoute defReq androidEnterpriseURL

167 requestWithRoute r u ProductsGetPermissions'{..}

168+ = go _pgpEnterpriseId _pgpProductId _pgpQuotaUser

168− = go _pgpQuotaUser (Just _pgpPrettyPrint)

169+ (Just _pgpPrettyPrint)

169− _pgpEnterpriseId

170 _pgpUserIP

171+ _pgpFields

171 _pgpKey

172 _pgpKey

172 _pgpOAuthToken

173 _pgpOAuthToken

173− _pgpProductId

174− _pgpFields

175 (Just AltJSON)

174 (Just AltJSON)

176 where go

175 where go

177 = clientWithRoute

176 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/UpdatePermissions.hs+6−7

@@ -56,9 +56,9 @@ type ProductsUpdatePermissionsResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] ProductPermissions :>

64 Put '[JSON] ProductPermissions

@@ -182,13 +182,12 @@ instance GoogleRequest ProductsUpdatePermissions'

182 request

183 = requestWithRoute defReq androidEnterpriseURL

184 requestWithRoute r u ProductsUpdatePermissions'{..}

185+ = go _pupEnterpriseId _pupProductId _pupQuotaUser

185− = go _pupQuotaUser (Just _pupPrettyPrint)

186+ (Just _pupPrettyPrint)

186− _pupEnterpriseId

187 _pupUserIP

188+ _pupFields

188 _pupKey

189 _pupKey

189 _pupOAuthToken

190 _pupOAuthToken

190− _pupProductId

191− _pupFields

192 (Just AltJSON)

191 (Just AltJSON)

193 _pupProductPermissions

192 _pupProductPermissions

194 where go

193 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/GenerateToken.hs+6−7

@@ -56,9 +56,9 @@ type UsersGenerateTokenResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Post '[JSON] UserToken

63

64-- | Generates a token (activation code) to allow this user to configure

@@ -168,13 +168,12 @@ instance GoogleRequest UsersGenerateToken' where

168 request

169 = requestWithRoute defReq androidEnterpriseURL

170 requestWithRoute r u UsersGenerateToken'{..}

171+ = go _ugtEnterpriseId _ugtUserId _ugtQuotaUser

171− = go _ugtQuotaUser (Just _ugtPrettyPrint)

172+ (Just _ugtPrettyPrint)

172− _ugtEnterpriseId

173 _ugtUserIP

174− _ugtUserId

174+ _ugtFields

175 _ugtKey

176 _ugtOAuthToken

177− _ugtFields

178 (Just AltJSON)

177 (Just AltJSON)

179 where go

178 where go

180 = clientWithRoute

179 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/Get.hs+6−7

@@ -53,9 +53,9 @@ type UsersGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] User

60

61-- | Retrieves a user\'s details.

@@ -159,13 +159,12 @@ instance GoogleRequest UsersGet' where

159 request

160 = requestWithRoute defReq androidEnterpriseURL

161 requestWithRoute r u UsersGet'{..}

162+ = go _ugEnterpriseId _ugUserId _ugQuotaUser

162− = go _ugQuotaUser (Just _ugPrettyPrint)

163+ (Just _ugPrettyPrint)

163− _ugEnterpriseId

164 _ugUserIP

165− _ugUserId

165+ _ugFields

166 _ugKey

167 _ugOAuthToken

168− _ugFields

169 (Just AltJSON)

168 (Just AltJSON)

170 where go

169 where go

171 = clientWithRoute (Proxy :: Proxy UsersGetResource) r

170 = clientWithRoute (Proxy :: Proxy UsersGetResource) r

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/GetAvailableProductSet.hs+6−7

@@ -54,9 +54,9 @@ type UsersGetAvailableProductSetResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] ProductSet

61

62-- | Retrieves the set of products a user is entitled to access.

@@ -167,13 +167,12 @@ instance GoogleRequest UsersGetAvailableProductSet'

167 request

168 = requestWithRoute defReq androidEnterpriseURL

169 requestWithRoute r u UsersGetAvailableProductSet'{..}

170+ = go _ugapsEnterpriseId _ugapsUserId _ugapsQuotaUser

170− = go _ugapsQuotaUser (Just _ugapsPrettyPrint)

171+ (Just _ugapsPrettyPrint)

171− _ugapsEnterpriseId

172 _ugapsUserIP

173− _ugapsUserId

173+ _ugapsFields

174 _ugapsKey

175 _ugapsOAuthToken

176− _ugapsFields

177 (Just AltJSON)

176 (Just AltJSON)

178 where go

177 where go

179 = clientWithRoute

178 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/List.hs+5−6

@@ -53,9 +53,9 @@ type UsersListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 Get '[JSON] UsersListResponse

61

@@ -160,13 +160,12 @@ instance GoogleRequest UsersList' where

160 request

161 = requestWithRoute defReq androidEnterpriseURL

162 requestWithRoute r u UsersList'{..}

163− = go (Just _ulEmail) _ulQuotaUser

163+ = go _ulEnterpriseId (Just _ulEmail) _ulQuotaUser

164 (Just _ulPrettyPrint)

165− _ulEnterpriseId

166 _ulUserIP

165 _ulUserIP

166+ _ulFields

167 _ulKey

168 _ulOAuthToken

169− _ulFields

170 (Just AltJSON)

169 (Just AltJSON)

171 where go

170 where go

172 = clientWithRoute (Proxy :: Proxy UsersListResource)

171 = clientWithRoute (Proxy :: Proxy UsersListResource)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/RevokeToken.hs+6−7

@@ -54,9 +54,9 @@ type UsersRevokeTokenResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] ()

61

62-- | Revokes a previously generated token (activation code) for the user.

@@ -164,13 +164,12 @@ instance GoogleRequest UsersRevokeToken' where

164 request

165 = requestWithRoute defReq androidEnterpriseURL

166 requestWithRoute r u UsersRevokeToken'{..}

167+ = go _urtEnterpriseId _urtUserId _urtQuotaUser

167− = go _urtQuotaUser (Just _urtPrettyPrint)

168+ (Just _urtPrettyPrint)

168− _urtEnterpriseId

169 _urtUserIP

170− _urtUserId

170+ _urtFields

171 _urtKey

172 _urtOAuthToken

173− _urtFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/SetAvailableProductSet.hs+6−7

@@ -55,9 +55,9 @@ type UsersSetAvailableProductSetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] ProductSet :>

63 Put '[JSON] ProductSet

@@ -181,13 +181,12 @@ instance GoogleRequest UsersSetAvailableProductSet'

181 request

182 = requestWithRoute defReq androidEnterpriseURL

183 requestWithRoute r u UsersSetAvailableProductSet'{..}

184+ = go _usapsEnterpriseId _usapsUserId _usapsQuotaUser

184− = go _usapsQuotaUser (Just _usapsPrettyPrint)

185+ (Just _usapsPrettyPrint)

185− _usapsEnterpriseId

186 _usapsUserIP

187− _usapsUserId

187+ _usapsFields

188 _usapsKey

189 _usapsOAuthToken

190− _usapsFields

191 (Just AltJSON)

190 (Just AltJSON)

192 _usapsProductSet

191 _usapsProductSet

193 where go

192 where go

gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+2−2

@@ -258,8 +258,8 @@ module Network.Google.AndroidPublisher

258 -- ** APK

259 , APK

260 , aPK

261− , apkVersionCode

261+ , aVersionCode

262− , apkBinary

262+ , aBinary

263

264 -- ** Testers

265 , Testers

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+2−2

@@ -91,8 +91,8 @@ module Network.Google.AndroidPublisher.Types

91 -- * APK

92 , APK

93 , aPK

94− , apkVersionCode

94+ , aVersionCode

95− , apkBinary

95+ , aBinary

96

97 -- * Testers

98 , Testers

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+13−15

@@ -518,35 +518,33 @@ instance ToJSON SubscriptionPurchasesDeferRequest

518--

519-- /See:/ 'aPK' smart constructor.

520data APK = APK

521− { _apkVersionCode :: !(Maybe Int32)

521+ { _aVersionCode :: !(Maybe Int32)

522− , _apkBinary :: !(Maybe APKBinary)

522+ , _aBinary :: !(Maybe APKBinary)

523 } deriving (Eq,Read,Show,Data,Typeable,Generic)

524

525-- | Creates a value of 'APK' with the minimum fields required to make a request.

526--

527-- Use one of the following lenses to modify other fields as desired:

528--

529−-- * 'apkVersionCode'

529+-- * 'aVersionCode'

530--

531−-- * 'apkBinary'

531+-- * 'aBinary'

532aPK

533 :: APK

534aPK =

535 APK

536− { _apkVersionCode = Nothing

536+ { _aVersionCode = Nothing

537− , _apkBinary = Nothing

537+ , _aBinary = Nothing

538 }

539

540-- | The version code of the APK, as specified in the APK\'s manifest file.

541−apkVersionCode :: Lens' APK (Maybe Int32)

541+aVersionCode :: Lens' APK (Maybe Int32)

542−apkVersionCode

542+aVersionCode

543− = lens _apkVersionCode

543+ = lens _aVersionCode (\ s a -> s{_aVersionCode = a})

544− (\ s a -> s{_apkVersionCode = a})

545

544

546-- | Information about the binary payload of this APK.

545-- | Information about the binary payload of this APK.

547−apkBinary :: Lens' APK (Maybe APKBinary)

546+aBinary :: Lens' APK (Maybe APKBinary)

548−apkBinary

547+aBinary = lens _aBinary (\ s a -> s{_aBinary = a})

549− = lens _apkBinary (\ s a -> s{_apkBinary = a})

550

548

551instance FromJSON APK where

549instance FromJSON APK where

552 parseJSON

550 parseJSON

@@ -558,8 +556,8 @@ instance ToJSON APK where

558 toJSON APK{..}

556 toJSON APK{..}

559 = object

557 = object

560 (catMaybes

558 (catMaybes

561− [("versionCode" .=) <$> _apkVersionCode,

559+ [("versionCode" .=) <$> _aVersionCode,

562− ("binary" .=) <$> _apkBinary])

560+ ("binary" .=) <$> _aBinary])

563

561

564--

562--

565-- /See:/ 'testers' smart constructor.

563-- /See:/ 'testers' smart constructor.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Delete.hs+8−8

@@ -59,9 +59,9 @@ type EditsAPKListingsDeleteResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Delete '[JSON] ()

66

67-- | Deletes the APK-specific localized listing for a specified APK and

@@ -197,15 +197,15 @@ instance GoogleRequest EditsAPKListingsDelete' where

197 type Rs EditsAPKListingsDelete' = ()

198 request = requestWithRoute defReq androidPublisherURL

199 requestWithRoute r u EditsAPKListingsDelete'{..}

200− = go _eapkldQuotaUser (Just _eapkldPrettyPrint)

201− _eapkldPackageName

200+ = go _eapkldPackageName _eapkldEditId

202 _eapkldAPKVersionCode

201 _eapkldAPKVersionCode

202+ _eapkldLanguage

203+ _eapkldQuotaUser

204+ (Just _eapkldPrettyPrint)

203 _eapkldUserIP

205 _eapkldUserIP

206+ _eapkldFields

204 _eapkldKey

207 _eapkldKey

205− _eapkldLanguage

206 _eapkldOAuthToken

208 _eapkldOAuthToken

207− _eapkldEditId

208− _eapkldFields

209 (Just AltJSON)

210 where go

211 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Deleteall.hs+7−7

@@ -56,9 +56,9 @@ type EditsAPKListingsDeleteallResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Delete '[JSON] ()

63

64-- | Deletes all the APK-specific localized listings for a specified APK.

@@ -184,14 +184,14 @@ instance GoogleRequest EditsAPKListingsDeleteall'

184 type Rs EditsAPKListingsDeleteall' = ()

185 request = requestWithRoute defReq androidPublisherURL

186 requestWithRoute r u EditsAPKListingsDeleteall'{..}

187− = go _eapkldaQuotaUser (Just _eapkldaPrettyPrint)

188− _eapkldaPackageName

187+ = go _eapkldaPackageName _eapkldaEditId

189 _eapkldaAPKVersionCode

188 _eapkldaAPKVersionCode

189+ _eapkldaQuotaUser

190+ (Just _eapkldaPrettyPrint)

190 _eapkldaUserIP

191 _eapkldaUserIP

192+ _eapkldaFields

191 _eapkldaKey

193 _eapkldaKey

192 _eapkldaOAuthToken

194 _eapkldaOAuthToken

193− _eapkldaEditId

194− _eapkldaFields

195 (Just AltJSON)

196 where go

197 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Get.hs+8−8

@@ -59,9 +59,9 @@ type EditsAPKListingsGetResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] APKListing

67

@@ -198,15 +198,15 @@ instance GoogleRequest EditsAPKListingsGet' where

198 type Rs EditsAPKListingsGet' = APKListing

199 request = requestWithRoute defReq androidPublisherURL

200 requestWithRoute r u EditsAPKListingsGet'{..}

201− = go _eapklgQuotaUser (Just _eapklgPrettyPrint)

202− _eapklgPackageName

201+ = go _eapklgPackageName _eapklgEditId

203 _eapklgAPKVersionCode

202 _eapklgAPKVersionCode

203+ _eapklgLanguage

204+ _eapklgQuotaUser

205+ (Just _eapklgPrettyPrint)

204 _eapklgUserIP

206 _eapklgUserIP

207+ _eapklgFields

205 _eapklgKey

208 _eapklgKey

206− _eapklgLanguage

207 _eapklgOAuthToken

209 _eapklgOAuthToken

208− _eapklgEditId

209− _eapklgFields

210 (Just AltJSON)

211 where go

212 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/List.hs+7−7

@@ -56,9 +56,9 @@ type EditsAPKListingsListResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] APKListingsListResponse

64

@@ -182,14 +182,14 @@ instance GoogleRequest EditsAPKListingsList' where

182 APKListingsListResponse

183 request = requestWithRoute defReq androidPublisherURL

184 requestWithRoute r u EditsAPKListingsList'{..}

185− = go _eapkllQuotaUser (Just _eapkllPrettyPrint)

186− _eapkllPackageName

185+ = go _eapkllPackageName _eapkllEditId

187 _eapkllAPKVersionCode

186 _eapkllAPKVersionCode

187+ _eapkllQuotaUser

188+ (Just _eapkllPrettyPrint)

188 _eapkllUserIP

189 _eapkllUserIP

190+ _eapkllFields

189 _eapkllKey

191 _eapkllKey

190 _eapkllOAuthToken

192 _eapkllOAuthToken

191− _eapkllEditId

192− _eapkllFields

193 (Just AltJSON)

194 where go

195 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+8−8

@@ -60,9 +60,9 @@ type EditsAPKListingsPatchResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] APKListing :>

68 Patch '[JSON] APKListing

@@ -211,15 +211,15 @@ instance GoogleRequest EditsAPKListingsPatch' where

211 type Rs EditsAPKListingsPatch' = APKListing

212 request = requestWithRoute defReq androidPublisherURL

213 requestWithRoute r u EditsAPKListingsPatch'{..}

214− = go _eapklpQuotaUser (Just _eapklpPrettyPrint)

215− _eapklpPackageName

214+ = go _eapklpPackageName _eapklpEditId

216 _eapklpAPKVersionCode

215 _eapklpAPKVersionCode

216+ _eapklpLanguage

217+ _eapklpQuotaUser

218+ (Just _eapklpPrettyPrint)

217 _eapklpUserIP

219 _eapklpUserIP

220+ _eapklpFields

218 _eapklpKey

221 _eapklpKey

219− _eapklpLanguage

220 _eapklpOAuthToken

222 _eapklpOAuthToken

221− _eapklpEditId

222− _eapklpFields

223 (Just AltJSON)

224 _eapklpAPKListing

225 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+8−8

@@ -60,9 +60,9 @@ type EditsAPKListingsUpdateResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] APKListing :>

68 Put '[JSON] APKListing

@@ -211,15 +211,15 @@ instance GoogleRequest EditsAPKListingsUpdate' where

211 type Rs EditsAPKListingsUpdate' = APKListing

212 request = requestWithRoute defReq androidPublisherURL

213 requestWithRoute r u EditsAPKListingsUpdate'{..}

214− = go _eapkluQuotaUser (Just _eapkluPrettyPrint)

215− _eapkluPackageName

214+ = go _eapkluPackageName _eapkluEditId

216 _eapkluAPKVersionCode

215 _eapkluAPKVersionCode

216+ _eapkluLanguage

217+ _eapkluQuotaUser

218+ (Just _eapkluPrettyPrint)

217 _eapkluUserIP

219 _eapkluUserIP

220+ _eapkluFields

218 _eapkluKey

221 _eapkluKey

219− _eapkluLanguage

220 _eapkluOAuthToken

222 _eapkluOAuthToken

221− _eapkluEditId

222− _eapkluFields

223 (Just AltJSON)

224 _eapkluAPKListing

225 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Addexternallyhosted.hs+6−7

@@ -58,9 +58,9 @@ type EditsAPKsAddexternallyhostedResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] APKsAddExternallyHostedRequest :>

66 Post '[JSON] APKsAddExternallyHostedResponse

@@ -190,13 +190,12 @@ instance GoogleRequest EditsAPKsAddexternallyhosted'

190 request = requestWithRoute defReq androidPublisherURL

191 requestWithRoute r u

192 EditsAPKsAddexternallyhosted'{..}

193+ = go _eapkaPackageName _eapkaEditId _eapkaQuotaUser

193− = go _eapkaQuotaUser (Just _eapkaPrettyPrint)

194+ (Just _eapkaPrettyPrint)

194− _eapkaPackageName

195 _eapkaUserIP

196+ _eapkaFields

196 _eapkaKey

197 _eapkaKey

197 _eapkaOAuthToken

198 _eapkaOAuthToken

198− _eapkaEditId

199− _eapkaFields

200 (Just AltJSON)

199 (Just AltJSON)

201 _eapkaAPKsAddExternallyHostedRequest

200 _eapkaAPKsAddExternallyHostedRequest

202 where go

201 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/List.hs+6−7

@@ -53,9 +53,9 @@ type EditsAPKsListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 Get '[JSON] APKsListResponse

61

@@ -164,13 +164,12 @@ instance GoogleRequest EditsAPKsList' where

164 type Rs EditsAPKsList' = APKsListResponse

165 request = requestWithRoute defReq androidPublisherURL

166 requestWithRoute r u EditsAPKsList'{..}

167+ = go _eapklPackageName _eapklEditId _eapklQuotaUser

167− = go _eapklQuotaUser (Just _eapklPrettyPrint)

168+ (Just _eapklPrettyPrint)

168− _eapklPackageName

169 _eapklUserIP

170+ _eapklFields

170 _eapklKey

171 _eapklKey

171 _eapklOAuthToken

172 _eapklOAuthToken

172− _eapklEditId

173− _eapklFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+7−8

@@ -54,9 +54,9 @@ type EditsAPKsUploadResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Post '[JSON] APK

61

62--

@@ -173,14 +173,13 @@ instance GoogleRequest EditsAPKsUpload' where

173 type Rs EditsAPKsUpload' = APK

174 request = requestWithRoute defReq androidPublisherURL

175 requestWithRoute r u EditsAPKsUpload'{..}

176+ = go _eapkuMedia _eapkuPackageName _eapkuEditId

177+ _eapkuQuotaUser

176− = go _eapkuQuotaUser (Just _eapkuPrettyPrint)

178+ (Just _eapkuPrettyPrint)

177− _eapkuPackageName

178 _eapkuUserIP

179 _eapkuUserIP

179− _eapkuMedia

180+ _eapkuFields

180 _eapkuKey

181 _eapkuKey

181 _eapkuOAuthToken

182 _eapkuOAuthToken

182− _eapkuEditId

183− _eapkuFields

184 (Just AltJSON)

183 (Just AltJSON)

185 where go

184 where go

186 = clientWithRoute

185 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Commit.hs+6−7

@@ -52,9 +52,9 @@ type EditsCommitResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Post '[JSON] AppEdit

59

60-- | Commits\/applies the changes made in this edit back to the app.

@@ -158,13 +158,12 @@ instance GoogleRequest EditsCommit' where

158 type Rs EditsCommit' = AppEdit

159 request = requestWithRoute defReq androidPublisherURL

160 requestWithRoute r u EditsCommit'{..}

161+ = go _ecPackageName _ecEditId _ecQuotaUser

161− = go _ecQuotaUser (Just _ecPrettyPrint)

162+ (Just _ecPrettyPrint)

162− _ecPackageName

163 _ecUserIP

164+ _ecFields

164 _ecKey

165 _ecKey

165 _ecOAuthToken

166 _ecOAuthToken

166− _ecEditId

167− _ecFields

168 (Just AltJSON)

167 (Just AltJSON)

169 where go

168 where go

170 = clientWithRoute

169 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Delete.hs+6−7

@@ -54,9 +54,9 @@ type EditsDeleteResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Delete '[JSON] ()

61

62-- | Deletes an edit for an app. Creating a new edit will automatically

@@ -162,13 +162,12 @@ instance GoogleRequest EditsDelete' where

162 type Rs EditsDelete' = ()

163 request = requestWithRoute defReq androidPublisherURL

164 requestWithRoute r u EditsDelete'{..}

165+ = go _edPackageName _edEditId _edQuotaUser

165− = go _edQuotaUser (Just _edPrettyPrint)

166+ (Just _edPrettyPrint)

166− _edPackageName

167 _edUserIP

168+ _edFields

168 _edKey

169 _edKey

169 _edOAuthToken

170 _edOAuthToken

170− _edEditId

171− _edFields

172 (Just AltJSON)

171 (Just AltJSON)

173 where go

172 where go

174 = clientWithRoute

173 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Get.hs+6−7

@@ -54,9 +54,9 @@ type EditsDetailsGetResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] AppDetails

61

62-- | Fetches app details for this edit. This includes the default language

@@ -165,13 +165,12 @@ instance GoogleRequest EditsDetailsGet' where

165 type Rs EditsDetailsGet' = AppDetails

166 request = requestWithRoute defReq androidPublisherURL

167 requestWithRoute r u EditsDetailsGet'{..}

168+ = go _edgPackageName _edgEditId _edgQuotaUser

168− = go _edgQuotaUser (Just _edgPrettyPrint)

169+ (Just _edgPrettyPrint)

169− _edgPackageName

170 _edgUserIP

171+ _edgFields

171 _edgKey

172 _edgKey

172 _edgOAuthToken

173 _edgOAuthToken

173− _edgEditId

174− _edgFields

175 (Just AltJSON)

174 (Just AltJSON)

176 where go

175 where go

177 = clientWithRoute

176 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Patch.hs+6−7

@@ -54,9 +54,9 @@ type EditsDetailsPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] AppDetails :>

62 Patch '[JSON] AppDetails

@@ -177,13 +177,12 @@ instance GoogleRequest EditsDetailsPatch' where

177 type Rs EditsDetailsPatch' = AppDetails

178 request = requestWithRoute defReq androidPublisherURL

179 requestWithRoute r u EditsDetailsPatch'{..}

180+ = go _edpPackageName _edpEditId _edpQuotaUser

180− = go _edpQuotaUser (Just _edpPrettyPrint)

181+ (Just _edpPrettyPrint)

181− _edpPackageName

182 _edpUserIP

183+ _edpFields

183 _edpKey

184 _edpKey

184 _edpOAuthToken

185 _edpOAuthToken

185− _edpEditId

186− _edpFields

187 (Just AltJSON)

186 (Just AltJSON)

188 _edpAppDetails

187 _edpAppDetails

189 where go

188 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Update.hs+6−7

@@ -54,9 +54,9 @@ type EditsDetailsUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] AppDetails :> Put '[JSON] AppDetails

62

@@ -176,13 +176,12 @@ instance GoogleRequest EditsDetailsUpdate' where

176 type Rs EditsDetailsUpdate' = AppDetails

177 request = requestWithRoute defReq androidPublisherURL

178 requestWithRoute r u EditsDetailsUpdate'{..}

179+ = go _eduPackageName _eduEditId _eduQuotaUser

179− = go _eduQuotaUser (Just _eduPrettyPrint)

180+ (Just _eduPrettyPrint)

180− _eduPackageName

181 _eduUserIP

182+ _eduFields

182 _eduKey

183 _eduKey

183 _eduOAuthToken

184 _eduOAuthToken

184− _eduEditId

185− _eduFields

186 (Just AltJSON)

185 (Just AltJSON)

187 _eduAppDetails

186 _eduAppDetails

188 where go

187 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Get.hs+8−9

@@ -60,9 +60,9 @@ type EditsExpansionfilesGetResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] ExpansionFile

68

@@ -193,15 +193,14 @@ instance GoogleRequest EditsExpansionfilesGet' where

193 type Rs EditsExpansionfilesGet' = ExpansionFile

194 request = requestWithRoute defReq androidPublisherURL

195 requestWithRoute r u EditsExpansionfilesGet'{..}

196+ = go _eegPackageName _eegEditId _eegAPKVersionCode

197+ _eegExpansionFileType

198+ _eegQuotaUser

196− = go _eegQuotaUser (Just _eegPrettyPrint)

199+ (Just _eegPrettyPrint)

197− _eegPackageName

198− _eegAPKVersionCode

199 _eegUserIP

200 _eegUserIP

201+ _eegFields

200 _eegKey

202 _eegKey

201− _eegExpansionFileType

202 _eegOAuthToken

203 _eegOAuthToken

203− _eegEditId

204− _eegFields

205 (Just AltJSON)

204 (Just AltJSON)

206 where go

205 where go

207 = clientWithRoute

206 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Patch.hs+8−9

@@ -63,9 +63,9 @@ type EditsExpansionfilesPatchResource =

63 QueryParam "quotaUser" Text :>

64 QueryParam "prettyPrint" Bool :>

65 QueryParam "userIp" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "fields" Text :>

67+ QueryParam "key" Key :>

67− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "oauth_token" OAuthToken :>

68− QueryParam "fields" Text :>

69 QueryParam "alt" AltJSON :>

70 ReqBody '[JSON] ExpansionFile :>

71 Patch '[JSON] ExpansionFile

@@ -211,15 +211,14 @@ instance GoogleRequest EditsExpansionfilesPatch'

211 type Rs EditsExpansionfilesPatch' = ExpansionFile

212 request = requestWithRoute defReq androidPublisherURL

213 requestWithRoute r u EditsExpansionfilesPatch'{..}

214+ = go _eepPackageName _eepEditId _eepAPKVersionCode

215+ _eepExpansionFileType

216+ _eepQuotaUser

214− = go _eepQuotaUser (Just _eepPrettyPrint)

217+ (Just _eepPrettyPrint)

215− _eepPackageName

216− _eepAPKVersionCode

217 _eepUserIP

218 _eepUserIP

219+ _eepFields

218 _eepKey

220 _eepKey

219− _eepExpansionFileType

220 _eepOAuthToken

221 _eepOAuthToken

221− _eepEditId

222− _eepFields

223 (Just AltJSON)

222 (Just AltJSON)

224 _eepExpansionFile

223 _eepExpansionFile

225 where go

224 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Update.hs+8−8

@@ -63,9 +63,9 @@ type EditsExpansionfilesUpdateResource =

63 QueryParam "quotaUser" Text :>

64 QueryParam "prettyPrint" Bool :>

65 QueryParam "userIp" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "fields" Text :>

67+ QueryParam "key" Key :>

67− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "oauth_token" OAuthToken :>

68− QueryParam "fields" Text :>

69 QueryParam "alt" AltJSON :>

70 ReqBody '[JSON] ExpansionFile :>

71 Put '[JSON] ExpansionFile

@@ -205,14 +205,14 @@ instance GoogleRequest EditsExpansionfilesUpdate'

205 type Rs EditsExpansionfilesUpdate' = ExpansionFile

206 request = requestWithRoute defReq androidPublisherURL

207 requestWithRoute r u EditsExpansionfilesUpdate'{..}

208+ = go _ePackageName _eEditId _eAPKVersionCode

209+ _eExpansionFileType

210+ _eQuotaUser

208− = go _eQuotaUser (Just _ePrettyPrint) _ePackageName

211+ (Just _ePrettyPrint)

209− _eAPKVersionCode

210 _eUserIP

212 _eUserIP

213+ _eFields

211 _eKey

214 _eKey

212− _eExpansionFileType

213 _eOAuthToken

215 _eOAuthToken

214− _eEditId

215− _eFields

216 (Just AltJSON)

217 _eExpansionFile

218 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Expansionfiles/Upload.hs+8−9

@@ -61,9 +61,9 @@ type EditsExpansionfilesUploadResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Post '[JSON] ExpansionFilesUploadResponse

69

@@ -204,16 +204,15 @@ instance GoogleRequest EditsExpansionfilesUpload'

204 ExpansionFilesUploadResponse

205 request = requestWithRoute defReq androidPublisherURL

206 requestWithRoute r u EditsExpansionfilesUpload'{..}

207− = go _eeuQuotaUser (Just _eeuPrettyPrint)

208− _eeuPackageName

207+ = go _eeuMedia _eeuPackageName _eeuEditId

209 _eeuAPKVersionCode

208 _eeuAPKVersionCode

209+ _eeuExpansionFileType

210+ _eeuQuotaUser

211+ (Just _eeuPrettyPrint)

210 _eeuUserIP

212 _eeuUserIP

211− _eeuMedia

213+ _eeuFields

212 _eeuKey

214 _eeuKey

213− _eeuExpansionFileType

214 _eeuOAuthToken

215 _eeuOAuthToken

215− _eeuEditId

216− _eeuFields

217 (Just AltJSON)

216 (Just AltJSON)

218 where go

217 where go

219 = clientWithRoute

218 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Get.hs+6−7

@@ -53,9 +53,9 @@ type EditsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] AppEdit

60

61-- | Returns information about the edit specified. Calls will fail if the

@@ -160,13 +160,12 @@ instance GoogleRequest EditsGet' where

160 type Rs EditsGet' = AppEdit

161 request = requestWithRoute defReq androidPublisherURL

162 requestWithRoute r u EditsGet'{..}

163+ = go _egPackageName _egEditId _egQuotaUser

163− = go _egQuotaUser (Just _egPrettyPrint)

164+ (Just _egPrettyPrint)

164− _egPackageName

165 _egUserIP

166+ _egFields

166 _egKey

167 _egKey

167 _egOAuthToken

168 _egOAuthToken

168− _egEditId

169− _egFields

170 (Just AltJSON)

169 (Just AltJSON)

171 where go

170 where go

172 = clientWithRoute (Proxy :: Proxy EditsGetResource) r

171 = clientWithRoute (Proxy :: Proxy EditsGetResource) r

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Delete.hs+9−10

@@ -61,9 +61,9 @@ type EditsImagesDeleteResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :> Delete '[JSON] ()

68

69-- | Deletes the image (specified by id) from the edit.

@@ -203,16 +203,15 @@ instance GoogleRequest EditsImagesDelete' where

203 type Rs EditsImagesDelete' = ()

204 request = requestWithRoute defReq androidPublisherURL

205 requestWithRoute r u EditsImagesDelete'{..}

206− = go _eidQuotaUser (Just _eidPrettyPrint)

207− _eidPackageName

206+ = go _eidPackageName _eidEditId _eidLanguage

208− _eidUserIP

209 _eidImageType

207 _eidImageType

210− _eidKey

211 _eidImageId

208 _eidImageId

212− _eidLanguage

209+ _eidQuotaUser

213− _eidOAuthToken

210+ (Just _eidPrettyPrint)

214− _eidEditId

211+ _eidUserIP

215 _eidFields

212 _eidFields

213+ _eidKey

214+ _eidOAuthToken

216 (Just AltJSON)

215 (Just AltJSON)

217 where go

216 where go

218 = clientWithRoute

217 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Deleteall.hs+8−9

@@ -59,9 +59,9 @@ type EditsImagesDeleteallResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Delete '[JSON] ImagesDeleteAllResponse

67

@@ -194,15 +194,14 @@ instance GoogleRequest EditsImagesDeleteall' where

194 ImagesDeleteAllResponse

195 request = requestWithRoute defReq androidPublisherURL

196 requestWithRoute r u EditsImagesDeleteall'{..}

197− = go _eidiQuotaUser (Just _eidiPrettyPrint)

198− _eidiPackageName

197+ = go _eidiPackageName _eidiEditId _eidiLanguage

199− _eidiUserIP

200 _eidiImageType

198 _eidiImageType

199+ _eidiQuotaUser

200+ (Just _eidiPrettyPrint)

201+ _eidiUserIP

202+ _eidiFields

201 _eidiKey

203 _eidiKey

202− _eidiLanguage

203 _eidiOAuthToken

204 _eidiOAuthToken

204− _eidiEditId

205− _eidiFields

206 (Just AltJSON)

205 (Just AltJSON)

207 where go

206 where go

208 = clientWithRoute

207 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/List.hs+8−9

@@ -59,9 +59,9 @@ type EditsImagesListResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] ImagesListResponse

67

@@ -191,15 +191,14 @@ instance GoogleRequest EditsImagesList' where

191 type Rs EditsImagesList' = ImagesListResponse

192 request = requestWithRoute defReq androidPublisherURL

193 requestWithRoute r u EditsImagesList'{..}

194− = go _eilQuotaUser (Just _eilPrettyPrint)

195− _eilPackageName

194+ = go _eilPackageName _eilEditId _eilLanguage

196− _eilUserIP

197 _eilImageType

195 _eilImageType

196+ _eilQuotaUser

197+ (Just _eilPrettyPrint)

198+ _eilUserIP

199+ _eilFields

198 _eilKey

200 _eilKey

199− _eilLanguage

200 _eilOAuthToken

201 _eilOAuthToken

201− _eilEditId

202− _eilFields

203 (Just AltJSON)

202 (Just AltJSON)

204 where go

203 where go

205 = clientWithRoute

204 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Upload.hs+9−10

@@ -61,9 +61,9 @@ type EditsImagesUploadResource =

61 QueryParam "quotaUser" Text :>

62 QueryParam "prettyPrint" Bool :>

63 QueryParam "userIp" Text :>

64− QueryParam "key" Key :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 Post '[JSON] ImagesUploadResponse

69

@@ -202,16 +202,15 @@ instance GoogleRequest EditsImagesUpload' where

202 type Rs EditsImagesUpload' = ImagesUploadResponse

203 request = requestWithRoute defReq androidPublisherURL

204 requestWithRoute r u EditsImagesUpload'{..}

205− = go _eiuQuotaUser (Just _eiuPrettyPrint)

206− _eiuPackageName

205+ = go _eiuMedia _eiuPackageName _eiuEditId

207− _eiuUserIP

206+ _eiuLanguage

208− _eiuMedia

209 _eiuImageType

207 _eiuImageType

208+ _eiuQuotaUser

209+ (Just _eiuPrettyPrint)

210+ _eiuUserIP

211+ _eiuFields

210 _eiuKey

212 _eiuKey

211− _eiuLanguage

212 _eiuOAuthToken

213 _eiuOAuthToken

213− _eiuEditId

214− _eiuFields

215 (Just AltJSON)

214 (Just AltJSON)

216 where go

215 where go

217 = clientWithRoute

216 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Insert.hs+6−6

@@ -51,9 +51,9 @@ type EditsInsertResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] AppEdit :> Post '[JSON] AppEdit

59

@@ -159,12 +159,12 @@ instance GoogleRequest EditsInsert' where

159 type Rs EditsInsert' = AppEdit

160 request = requestWithRoute defReq androidPublisherURL

161 requestWithRoute r u EditsInsert'{..}

162+ = go _eiPackageName _eiQuotaUser

162− = go _eiQuotaUser (Just _eiPrettyPrint)

163+ (Just _eiPrettyPrint)

163− _eiPackageName

164 _eiUserIP

165+ _eiFields

165 _eiKey

166 _eiKey

166 _eiOAuthToken

167 _eiOAuthToken

167− _eiFields

168 (Just AltJSON)

169 _eiAppEdit

170 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Delete.hs+7−8

@@ -55,9 +55,9 @@ type EditsListingsDeleteResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Delete '[JSON] ()

62

63-- | Deletes the specified localized store listing from an edit.

@@ -176,14 +176,13 @@ instance GoogleRequest EditsListingsDelete' where

176 type Rs EditsListingsDelete' = ()

177 request = requestWithRoute defReq androidPublisherURL

178 requestWithRoute r u EditsListingsDelete'{..}

179+ = go _eldPackageName _eldEditId _eldLanguage

180+ _eldQuotaUser

179− = go _eldQuotaUser (Just _eldPrettyPrint)

181+ (Just _eldPrettyPrint)

180− _eldPackageName

181 _eldUserIP

182 _eldUserIP

183+ _eldFields

182 _eldKey

184 _eldKey

183− _eldLanguage

184 _eldOAuthToken

185 _eldOAuthToken

185− _eldEditId

186− _eldFields

187 (Just AltJSON)

186 (Just AltJSON)

188 where go

187 where go

189 = clientWithRoute

188 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Deleteall.hs+6−7

@@ -53,9 +53,9 @@ type EditsListingsDeleteallResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes all localized listings from an edit.

@@ -163,13 +163,12 @@ instance GoogleRequest EditsListingsDeleteall' where

163 type Rs EditsListingsDeleteall' = ()

164 request = requestWithRoute defReq androidPublisherURL

165 requestWithRoute r u EditsListingsDeleteall'{..}

166+ = go _ediPackageName _ediEditId _ediQuotaUser

166− = go _ediQuotaUser (Just _ediPrettyPrint)

167+ (Just _ediPrettyPrint)

167− _ediPackageName

168 _ediUserIP

169+ _ediFields

169 _ediKey

170 _ediKey

170 _ediOAuthToken

171 _ediOAuthToken

171− _ediEditId

172− _ediFields

173 (Just AltJSON)

172 (Just AltJSON)

174 where go

173 where go

175 = clientWithRoute

174 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Get.hs+7−8

@@ -55,9 +55,9 @@ type EditsListingsGetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] Listing

62

63-- | Fetches information about a localized store listing.

@@ -176,14 +176,13 @@ instance GoogleRequest EditsListingsGet' where

176 type Rs EditsListingsGet' = Listing

177 request = requestWithRoute defReq androidPublisherURL

178 requestWithRoute r u EditsListingsGet'{..}

179+ = go _elgPackageName _elgEditId _elgLanguage

180+ _elgQuotaUser

179− = go _elgQuotaUser (Just _elgPrettyPrint)

181+ (Just _elgPrettyPrint)

180− _elgPackageName

181 _elgUserIP

182 _elgUserIP

183+ _elgFields

182 _elgKey

184 _elgKey

183− _elgLanguage

184 _elgOAuthToken

185 _elgOAuthToken

185− _elgEditId

186− _elgFields

187 (Just AltJSON)

186 (Just AltJSON)

188 where go

187 where go

189 = clientWithRoute

188 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/List.hs+6−7

@@ -53,9 +53,9 @@ type EditsListingsListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 Get '[JSON] ListingsListResponse

61

@@ -164,13 +164,12 @@ instance GoogleRequest EditsListingsList' where

164 type Rs EditsListingsList' = ListingsListResponse

165 request = requestWithRoute defReq androidPublisherURL

166 requestWithRoute r u EditsListingsList'{..}

167+ = go _ellPackageName _ellEditId _ellQuotaUser

167− = go _ellQuotaUser (Just _ellPrettyPrint)

168+ (Just _ellPrettyPrint)

168− _ellPackageName

169 _ellUserIP

170+ _ellFields

170 _ellKey

171 _ellKey

171 _ellOAuthToken

172 _ellOAuthToken

172− _ellEditId

173− _ellFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Patch.hs+7−8

@@ -57,9 +57,9 @@ type EditsListingsPatchResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] Listing :> Patch '[JSON] Listing

65

@@ -190,14 +190,13 @@ instance GoogleRequest EditsListingsPatch' where

190 type Rs EditsListingsPatch' = Listing

191 request = requestWithRoute defReq androidPublisherURL

192 requestWithRoute r u EditsListingsPatch'{..}

193+ = go _elpPackageName _elpEditId _elpLanguage

194+ _elpQuotaUser

193− = go _elpQuotaUser (Just _elpPrettyPrint)

195+ (Just _elpPrettyPrint)

194− _elpPackageName

195 _elpUserIP

196 _elpUserIP

197+ _elpFields

196 _elpKey

198 _elpKey

197− _elpLanguage

198 _elpOAuthToken

199 _elpOAuthToken

199− _elpEditId

200− _elpFields

201 (Just AltJSON)

200 (Just AltJSON)

202 _elpListing

201 _elpListing

203 where go

202 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Update.hs+7−8

@@ -56,9 +56,9 @@ type EditsListingsUpdateResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] Listing :> Put '[JSON] Listing

64

@@ -188,14 +188,13 @@ instance GoogleRequest EditsListingsUpdate' where

188 type Rs EditsListingsUpdate' = Listing

189 request = requestWithRoute defReq androidPublisherURL

190 requestWithRoute r u EditsListingsUpdate'{..}

191+ = go _eluPackageName _eluEditId _eluLanguage

192+ _eluQuotaUser

191− = go _eluQuotaUser (Just _eluPrettyPrint)

193+ (Just _eluPrettyPrint)

192− _eluPackageName

193 _eluUserIP

194 _eluUserIP

195+ _eluFields

194 _eluKey

196 _eluKey

195− _eluLanguage

196 _eluOAuthToken

197 _eluOAuthToken

197− _eluEditId

198− _eluFields

199 (Just AltJSON)

198 (Just AltJSON)

200 _eluListing

199 _eluListing

201 where go

200 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Get.hs+6−7

@@ -56,9 +56,9 @@ type EditsTestersGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Testers

63

64--

@@ -175,14 +175,13 @@ instance GoogleRequest EditsTestersGet' where

175 type Rs EditsTestersGet' = Testers

176 request = requestWithRoute defReq androidPublisherURL

177 requestWithRoute r u EditsTestersGet'{..}

178+ = go _etgtPackageName _etgtEditId _etgtTrack

178− = go _etgtQuotaUser _etgtTrack

179+ _etgtQuotaUser

179 (Just _etgtPrettyPrint)

180 (Just _etgtPrettyPrint)

180− _etgtPackageName

181 _etgtUserIP

182+ _etgtFields

182 _etgtKey

183 _etgtKey

183 _etgtOAuthToken

184 _etgtOAuthToken

184− _etgtEditId

185− _etgtFields

186 (Just AltJSON)

185 (Just AltJSON)

187 where go

186 where go

188 = clientWithRoute

187 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+6−7

@@ -58,9 +58,9 @@ type EditsTestersPatchResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Testers :> Patch '[JSON] Testers

66

@@ -188,14 +188,13 @@ instance GoogleRequest EditsTestersPatch' where

188 type Rs EditsTestersPatch' = Testers

189 request = requestWithRoute defReq androidPublisherURL

190 requestWithRoute r u EditsTestersPatch'{..}

191+ = go _etptPackageName _etptEditId _etptTrack

191− = go _etptQuotaUser _etptTrack

192+ _etptQuotaUser

192 (Just _etptPrettyPrint)

193 (Just _etptPrettyPrint)

193− _etptPackageName

194 _etptUserIP

195+ _etptFields

195 _etptKey

196 _etptKey

196 _etptOAuthToken

197 _etptOAuthToken

197− _etptEditId

198− _etptFields

199 (Just AltJSON)

198 (Just AltJSON)

200 _etptTesters

199 _etptTesters

201 where go

200 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+6−7

@@ -58,9 +58,9 @@ type EditsTestersUpdateResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Testers :> Put '[JSON] Testers

66

@@ -188,14 +188,13 @@ instance GoogleRequest EditsTestersUpdate' where

188 type Rs EditsTestersUpdate' = Testers

189 request = requestWithRoute defReq androidPublisherURL

190 requestWithRoute r u EditsTestersUpdate'{..}

191+ = go _etutPackageName _etutEditId _etutTrack

191− = go _etutQuotaUser _etutTrack

192+ _etutQuotaUser

192 (Just _etutPrettyPrint)

193 (Just _etutPrettyPrint)

193− _etutPackageName

194 _etutUserIP

195+ _etutFields

195 _etutKey

196 _etutKey

196 _etutOAuthToken

197 _etutOAuthToken

197− _etutEditId

198− _etutFields

199 (Just AltJSON)

198 (Just AltJSON)

200 _etutTesters

199 _etutTesters

201 where go

200 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Get.hs+7−7

@@ -57,9 +57,9 @@ type EditsTracksGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Get '[JSON] Track

64

65-- | Fetches the track configuration for the specified track type. Includes

@@ -177,13 +177,13 @@ instance GoogleRequest EditsTracksGet' where

177 type Rs EditsTracksGet' = Track

178 request = requestWithRoute defReq androidPublisherURL

179 requestWithRoute r u EditsTracksGet'{..}

180+ = go _etgPackageName _etgEditId _etgTrack

181+ _etgQuotaUser

180− = go _etgQuotaUser _etgTrack (Just _etgPrettyPrint)

182+ (Just _etgPrettyPrint)

181− _etgPackageName

182 _etgUserIP

183 _etgUserIP

184+ _etgFields

183 _etgKey

185 _etgKey

184 _etgOAuthToken

186 _etgOAuthToken

185− _etgEditId

186− _etgFields

187 (Just AltJSON)

188 where go

189 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/List.hs+6−7

@@ -53,9 +53,9 @@ type EditsTracksListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 Get '[JSON] TracksListResponse

61

@@ -164,13 +164,12 @@ instance GoogleRequest EditsTracksList' where

164 type Rs EditsTracksList' = TracksListResponse

165 request = requestWithRoute defReq androidPublisherURL

166 requestWithRoute r u EditsTracksList'{..}

167+ = go _etlPackageName _etlEditId _etlQuotaUser

167− = go _etlQuotaUser (Just _etlPrettyPrint)

168+ (Just _etlPrettyPrint)

168− _etlPackageName

169 _etlUserIP

170+ _etlFields

170 _etlKey

171 _etlKey

171 _etlOAuthToken

172 _etlOAuthToken

172− _etlEditId

173− _etlFields

174 (Just AltJSON)

173 (Just AltJSON)

175 where go

174 where go

176 = clientWithRoute

175 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Patch.hs+7−7

@@ -60,9 +60,9 @@ type EditsTracksPatchResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] Track :> Patch '[JSON] Track

68

@@ -192,13 +192,13 @@ instance GoogleRequest EditsTracksPatch' where

192 type Rs EditsTracksPatch' = Track

193 request = requestWithRoute defReq androidPublisherURL

194 requestWithRoute r u EditsTracksPatch'{..}

195+ = go _etpPackageName _etpEditId _etpTrack

196+ _etpQuotaUser

195− = go _etpQuotaUser _etpTrack (Just _etpPrettyPrint)

197+ (Just _etpPrettyPrint)

196− _etpPackageName

197 _etpUserIP

198 _etpUserIP

199+ _etpFields

198 _etpKey

200 _etpKey

199 _etpOAuthToken

201 _etpOAuthToken

200− _etpEditId

201− _etpFields

202 (Just AltJSON)

203 _etpTrack

204 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+7−7

@@ -60,9 +60,9 @@ type EditsTracksUpdateResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] Track :> Put '[JSON] Track

68

@@ -191,13 +191,13 @@ instance GoogleRequest EditsTracksUpdate' where

191 type Rs EditsTracksUpdate' = Track

192 request = requestWithRoute defReq androidPublisherURL

193 requestWithRoute r u EditsTracksUpdate'{..}

194+ = go _etuPackageName _etuEditId _etuTrack

195+ _etuQuotaUser

194− = go _etuQuotaUser _etuTrack (Just _etuPrettyPrint)

196+ (Just _etuPrettyPrint)

195− _etuPackageName

196 _etuUserIP

197 _etuUserIP

198+ _etuFields

197 _etuKey

199 _etuKey

198 _etuOAuthToken

200 _etuOAuthToken

199− _etuEditId

200− _etuFields

201 (Just AltJSON)

202 _etuTrack

203 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Validate.hs+6−7

@@ -53,9 +53,9 @@ type EditsValidateResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Post '[JSON] AppEdit

60

61-- | Checks that the edit can be successfully committed. The edit\'s changes

@@ -160,13 +160,12 @@ instance GoogleRequest EditsValidate' where

160 type Rs EditsValidate' = AppEdit

161 request = requestWithRoute defReq androidPublisherURL

162 requestWithRoute r u EditsValidate'{..}

163+ = go _evPackageName _evEditId _evQuotaUser

163− = go _evQuotaUser (Just _evPrettyPrint)

164+ (Just _evPrettyPrint)

164− _evPackageName

165 _evUserIP

166+ _evFields

166 _evKey

167 _evKey

167 _evOAuthToken

168 _evOAuthToken

168− _evEditId

169− _evFields

170 (Just AltJSON)

169 (Just AltJSON)

171 where go

170 where go

172 = clientWithRoute

171 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Entitlements/List.hs+14−15

@@ -51,16 +51,16 @@ import Network.Google.Prelude

51type EntitlementsListResource =

52 Capture "packageName" Text :>

53 "entitlements" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "maxResults" Word32 :>

55− QueryParam "prettyPrint" Bool :>

55+ QueryParam "productId" Text :>

56− QueryParam "userIp" Text :>

56+ QueryParam "startIndex" Word32 :>

57 QueryParam "token" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "startIndex" Word32 :>

60+ QueryParam "userIp" Text :>

61− QueryParam "productId" Text :>

61+ QueryParam "fields" Text :>

62− QueryParam "maxResults" Word32 :>

62+ QueryParam "key" Key :>

63− QueryParam "fields" Text :>

63+ QueryParam "oauth_token" OAuthToken :>

64 QueryParam "alt" AltJSON :>

65 Get '[JSON] EntitlementsListResponse

66

@@ -189,16 +189,15 @@ instance GoogleRequest EntitlementsList' where

189 type Rs EntitlementsList' = EntitlementsListResponse

190 request = requestWithRoute defReq androidPublisherURL

191 requestWithRoute r u EntitlementsList'{..}

192− = go _elQuotaUser (Just _elPrettyPrint)

192+ = go _elMaxResults _elProductId _elStartIndex

193+ _elToken

193 _elPackageName

194 _elPackageName

195+ _elQuotaUser

196+ (Just _elPrettyPrint)

194 _elUserIP

197 _elUserIP

195− _elToken

198+ _elFields

196 _elKey

199 _elKey

197 _elOAuthToken

200 _elOAuthToken

198− _elStartIndex

199− _elProductId

200− _elMaxResults

201− _elFields

202 (Just AltJSON)

201 (Just AltJSON)

203 where go

202 where go

204 = clientWithRoute

203 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Batch.hs+4−4

@@ -50,9 +50,9 @@ type InappproductsBatchResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 ReqBody '[JSON] InappproductsBatchRequest :>

58 Post '[JSON] InappproductsBatchResponse

@@ -149,9 +149,9 @@ instance GoogleRequest InappproductsBatch' where

149 request = requestWithRoute defReq androidPublisherURL

150 requestWithRoute r u InappproductsBatch'{..}

151 = go _ibQuotaUser (Just _ibPrettyPrint) _ibUserIP

152+ _ibFields

152 _ibKey

153 _ibKey

153 _ibOAuthToken

154 _ibOAuthToken

154− _ibFields

155 (Just AltJSON)

156 _ibInappproductsBatchRequest

157 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Delete.hs+6−7

@@ -52,9 +52,9 @@ type InappproductsDeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60-- | Delete an in-app product for an app.

@@ -158,13 +158,12 @@ instance GoogleRequest InappproductsDelete' where

158 type Rs InappproductsDelete' = ()

159 request = requestWithRoute defReq androidPublisherURL

160 requestWithRoute r u InappproductsDelete'{..}

161+ = go _idPackageName _idSku _idQuotaUser

161− = go _idQuotaUser (Just _idPrettyPrint)

162+ (Just _idPrettyPrint)

162− _idPackageName

163 _idUserIP

164+ _idFields

164 _idKey

165 _idKey

165− _idSku

166 _idOAuthToken

167− _idFields

168 (Just AltJSON)

167 (Just AltJSON)

169 where go

168 where go

170 = clientWithRoute

169 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Get.hs+6−7

@@ -52,9 +52,9 @@ type InappproductsGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] InAppProduct

59

60-- | Returns information about the in-app product specified.

@@ -156,13 +156,12 @@ instance GoogleRequest InappproductsGet' where

156 type Rs InappproductsGet' = InAppProduct

157 request = requestWithRoute defReq androidPublisherURL

158 requestWithRoute r u InappproductsGet'{..}

159+ = go _igPackageName _igSku _igQuotaUser

159− = go _igQuotaUser (Just _igPrettyPrint)

160+ (Just _igPrettyPrint)

160− _igPackageName

161 _igUserIP

162+ _igFields

162 _igKey

163 _igKey

163− _igSku

164 _igOAuthToken

165− _igFields

166 (Just AltJSON)

165 (Just AltJSON)

167 where go

166 where go

168 = clientWithRoute

167 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Insert.hs+10−10

@@ -49,13 +49,13 @@ import Network.Google.Prelude

49type InappproductsInsertResource =

50 Capture "packageName" Text :>

51 "inappproducts" :>

52+ QueryParam "autoConvertMissingPrices" Bool :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54+ QueryParam "prettyPrint" Bool :>

54− QueryParam "autoConvertMissingPrices" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] InAppProduct :>

61 Post '[JSON] InAppProduct

@@ -175,13 +175,13 @@ instance GoogleRequest InappproductsInsert' where

175 type Rs InappproductsInsert' = InAppProduct

176 request = requestWithRoute defReq androidPublisherURL

177 requestWithRoute r u InappproductsInsert'{..}

178+ = go _iiAutoConvertMissingPrices _iiPackageName

179+ _iiQuotaUser

178− = go _iiQuotaUser (Just _iiPrettyPrint)

180+ (Just _iiPrettyPrint)

179− _iiAutoConvertMissingPrices

180− _iiPackageName

181 _iiUserIP

182+ _iiFields

182 _iiKey

183 _iiKey

183 _iiOAuthToken

184 _iiOAuthToken

184− _iiFields

185 (Just AltJSON)

186 _iiInAppProduct

187 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/List.hs+13−14

@@ -51,15 +51,15 @@ import Network.Google.Prelude

51type InappproductsListResource =

52 Capture "packageName" Text :>

53 "inappproducts" :>

54+ QueryParam "maxResults" Word32 :>

55+ QueryParam "startIndex" Word32 :>

56+ QueryParam "token" Text :>

54− QueryParam "quotaUser" Text :>

57+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

57− QueryParam "token" Text :>

60+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "startIndex" Word32 :>

61− QueryParam "maxResults" Word32 :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] InappproductsListResponse

65

@@ -180,15 +180,14 @@ instance GoogleRequest InappproductsList' where

180 InappproductsListResponse

181 request = requestWithRoute defReq androidPublisherURL

182 requestWithRoute r u InappproductsList'{..}

183− = go _ilQuotaUser (Just _ilPrettyPrint)

183+ = go _ilMaxResults _ilStartIndex _ilToken

184 _ilPackageName

185+ _ilQuotaUser

186+ (Just _ilPrettyPrint)

185 _ilUserIP

187 _ilUserIP

186− _ilToken

188+ _ilFields

187 _ilKey

189 _ilKey

188 _ilOAuthToken

190 _ilOAuthToken

189− _ilStartIndex

190− _ilMaxResults

191− _ilFields

192 (Just AltJSON)

191 (Just AltJSON)

193 where go

192 where go

194 = clientWithRoute

193 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Patch.hs+11−11

@@ -52,13 +52,13 @@ type InappproductsPatchResource =

52 Capture "packageName" Text :>

53 "inappproducts" :>

54 Capture "sku" Text :>

55+ QueryParam "autoConvertMissingPrices" Bool :>

55− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

57− QueryParam "autoConvertMissingPrices" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] InAppProduct :>

64 Patch '[JSON] InAppProduct

@@ -189,14 +189,14 @@ instance GoogleRequest InappproductsPatch' where

189 type Rs InappproductsPatch' = InAppProduct

190 request = requestWithRoute defReq androidPublisherURL

191 requestWithRoute r u InappproductsPatch'{..}

192+ = go _ipAutoConvertMissingPrices _ipPackageName

193+ _ipSku

194+ _ipQuotaUser

192− = go _ipQuotaUser (Just _ipPrettyPrint)

195+ (Just _ipPrettyPrint)

193− _ipAutoConvertMissingPrices

194− _ipPackageName

195 _ipUserIP

196 _ipUserIP

197+ _ipFields

196 _ipKey

198 _ipKey

197− _ipSku

198 _ipOAuthToken

199 _ipOAuthToken

199− _ipFields

200 (Just AltJSON)

201 _ipInAppProduct

202 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Inappproducts/Update.hs+11−11

@@ -51,13 +51,13 @@ type InappproductsUpdateResource =

51 Capture "packageName" Text :>

52 "inappproducts" :>

53 Capture "sku" Text :>

54+ QueryParam "autoConvertMissingPrices" Bool :>

54− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

56− QueryParam "autoConvertMissingPrices" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] InAppProduct :>

63 Put '[JSON] InAppProduct

@@ -187,14 +187,14 @@ instance GoogleRequest InappproductsUpdate' where

187 type Rs InappproductsUpdate' = InAppProduct

188 request = requestWithRoute defReq androidPublisherURL

189 requestWithRoute r u InappproductsUpdate'{..}

190+ = go _iuAutoConvertMissingPrices _iuPackageName

191+ _iuSku

192+ _iuQuotaUser

190− = go _iuQuotaUser (Just _iuPrettyPrint)

193+ (Just _iuPrettyPrint)

191− _iuAutoConvertMissingPrices

192− _iuPackageName

193 _iuUserIP

194 _iuUserIP

195+ _iuFields

194 _iuKey

196 _iuKey

195− _iuSku

196 _iuOAuthToken

197 _iuOAuthToken

197− _iuFields

198 (Just AltJSON)

199 _iuInAppProduct

200 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Products/Get.hs+7−8

@@ -56,9 +56,9 @@ type PurchasesProductsGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] ProductPurchase

64

@@ -177,14 +177,13 @@ instance GoogleRequest PurchasesProductsGet' where

177 type Rs PurchasesProductsGet' = ProductPurchase

178 request = requestWithRoute defReq androidPublisherURL

179 requestWithRoute r u PurchasesProductsGet'{..}

180+ = go _ppgPackageName _ppgProductId _ppgToken

181+ _ppgQuotaUser

180− = go _ppgQuotaUser (Just _ppgPrettyPrint)

182+ (Just _ppgPrettyPrint)

181− _ppgPackageName

182 _ppgUserIP

183 _ppgUserIP

183− _ppgToken

184+ _ppgFields

184 _ppgKey

185 _ppgKey

185 _ppgOAuthToken

186 _ppgOAuthToken

186− _ppgProductId

187− _ppgFields

188 (Just AltJSON)

187 (Just AltJSON)

189 where go

188 where go

190 = clientWithRoute

189 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Cancel.hs+7−8

@@ -57,9 +57,9 @@ type PurchasesSubscriptionsCancelResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Post '[JSON] ()

64

65-- | Cancels a user\'s subscription purchase. The subscription remains valid

@@ -182,14 +182,13 @@ instance GoogleRequest PurchasesSubscriptionsCancel'

182 request = requestWithRoute defReq androidPublisherURL

183 requestWithRoute r u

184 PurchasesSubscriptionsCancel'{..}

185+ = go _pscPackageName _pscSubscriptionId _pscToken

186+ _pscQuotaUser

185− = go _pscQuotaUser (Just _pscPrettyPrint)

187+ (Just _pscPrettyPrint)

186− _pscPackageName

187 _pscUserIP

188 _pscUserIP

188− _pscToken

189+ _pscFields

189 _pscKey

190 _pscKey

190 _pscOAuthToken

191 _pscOAuthToken

191− _pscSubscriptionId

192− _pscFields

193 (Just AltJSON)

192 (Just AltJSON)

194 where go

193 where go

195 = clientWithRoute

194 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Defer.hs+7−8

@@ -58,9 +58,9 @@ type PurchasesSubscriptionsDeferResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] SubscriptionPurchasesDeferRequest

66 :>

@@ -198,14 +198,13 @@ instance GoogleRequest PurchasesSubscriptionsDefer'

198 SubscriptionPurchasesDeferResponse

199 request = requestWithRoute defReq androidPublisherURL

200 requestWithRoute r u PurchasesSubscriptionsDefer'{..}

201+ = go _psdPackageName _psdSubscriptionId _psdToken

202+ _psdQuotaUser

201− = go _psdQuotaUser (Just _psdPrettyPrint)

203+ (Just _psdPrettyPrint)

202− _psdPackageName

203 _psdUserIP

204 _psdUserIP

204− _psdToken

205+ _psdFields

205 _psdKey

206 _psdKey

206 _psdOAuthToken

207 _psdOAuthToken

207− _psdSubscriptionId

208− _psdFields

209 (Just AltJSON)

208 (Just AltJSON)

210 _psdSubscriptionPurchasesDeferRequest

209 _psdSubscriptionPurchasesDeferRequest

211 where go

210 where go

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Get.hs+7−8

@@ -57,9 +57,9 @@ type PurchasesSubscriptionsGetResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 Get '[JSON] SubscriptionPurchase

65

@@ -182,14 +182,13 @@ instance GoogleRequest PurchasesSubscriptionsGet'

182 SubscriptionPurchase

183 request = requestWithRoute defReq androidPublisherURL

184 requestWithRoute r u PurchasesSubscriptionsGet'{..}

185+ = go _psgPackageName _psgSubscriptionId _psgToken

186+ _psgQuotaUser

185− = go _psgQuotaUser (Just _psgPrettyPrint)

187+ (Just _psgPrettyPrint)

186− _psgPackageName

187 _psgUserIP

188 _psgUserIP

188− _psgToken

189+ _psgFields

189 _psgKey

190 _psgKey

190 _psgOAuthToken

191 _psgOAuthToken

191− _psgSubscriptionId

192− _psgFields

193 (Just AltJSON)

192 (Just AltJSON)

194 where go

193 where go

195 = clientWithRoute

194 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Refund.hs+7−7

@@ -57,9 +57,9 @@ type PurchasesSubscriptionsRefundResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Post '[JSON] ()

64

65-- | Refunds a user\'s subscription purchase, but the subscription remains

@@ -177,13 +177,13 @@ instance GoogleRequest PurchasesSubscriptionsRefund'

177 request = requestWithRoute defReq androidPublisherURL

178 requestWithRoute r u

179 PurchasesSubscriptionsRefund'{..}

180+ = go _pPackageName _pSubscriptionId _pToken

181+ _pQuotaUser

180− = go _pQuotaUser (Just _pPrettyPrint) _pPackageName

182+ (Just _pPrettyPrint)

181 _pUserIP

183 _pUserIP

182− _pToken

184+ _pFields

183 _pKey

185 _pKey

184 _pOAuthToken

186 _pOAuthToken

185− _pSubscriptionId

186− _pFields

187 (Just AltJSON)

188 where go

189 = clientWithRoute

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Revoke.hs+7−8

@@ -58,9 +58,9 @@ type PurchasesSubscriptionsRevokeResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Post '[JSON] ()

65

66-- | Refunds and immediately revokes a user\'s subscription purchase. Access

@@ -184,14 +184,13 @@ instance GoogleRequest PurchasesSubscriptionsRevoke'

184 request = requestWithRoute defReq androidPublisherURL

185 requestWithRoute r u

186 PurchasesSubscriptionsRevoke'{..}

187+ = go _psrPackageName _psrSubscriptionId _psrToken

188+ _psrQuotaUser

187− = go _psrQuotaUser (Just _psrPrettyPrint)

189+ (Just _psrPrettyPrint)

188− _psrPackageName

189 _psrUserIP

190 _psrUserIP

190− _psrToken

191+ _psrFields

191 _psrKey

192 _psrKey

192 _psrOAuthToken

193 _psrOAuthToken

193− _psrSubscriptionId

194− _psrFields

195 (Just AltJSON)

194 (Just AltJSON)

196 where go

195 where go

197 = clientWithRoute

196 = clientWithRoute

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Taskqueues/Get.hs+10−11

@@ -50,13 +50,13 @@ type TaskqueuesGetResource =

50 Capture "project" Text :>

51 "taskqueues" :>

52 Capture "taskqueue" Text :>

53+ QueryParam "getStats" Bool :>

53− QueryParam "quotaUser" Text :>

54+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

57+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

57− QueryParam "getStats" Bool :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] TaskQueue

61

62-- | Get detailed information about a TaskQueue.

@@ -172,14 +172,13 @@ instance GoogleRequest TaskqueuesGet' where

172 request

173 = requestWithRoute defReq appEngineTaskQueueURL

174 requestWithRoute r u TaskqueuesGet'{..}

175+ = go _tasGetStats _tasProject _tasTaskqueue

175− = go _tasTaskqueue _tasQuotaUser

176+ _tasQuotaUser

176 (Just _tasPrettyPrint)

177 (Just _tasPrettyPrint)

177− _tasProject

178 _tasUserIP

179+ _tasFields

179 _tasKey

180 _tasKey

180− _tasGetStats

181 _tasOAuthToken

182− _tasFields

183 (Just AltJSON)

182 (Just AltJSON)

184 where go

183 where go

185 = clientWithRoute

184 = clientWithRoute

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Delete.hs+6−7

@@ -55,9 +55,9 @@ type TasksDeleteResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Delete '[JSON] ()

62

63-- | Delete a task from a TaskQueue.

@@ -170,13 +170,12 @@ instance GoogleRequest TasksDelete' where

170 request

171 = requestWithRoute defReq appEngineTaskQueueURL

172 requestWithRoute r u TasksDelete'{..}

173− = go _tdTaskqueue _tdQuotaUser (Just _tdPrettyPrint)

173+ = go _tdProject _tdTaskqueue _tdTask _tdQuotaUser

174− _tdProject

174+ (Just _tdPrettyPrint)

175 _tdUserIP

176+ _tdFields

176 _tdKey

177 _tdKey

177− _tdTask

178 _tdOAuthToken

179− _tdFields

180 (Just AltJSON)

179 (Just AltJSON)

181 where go

180 where go

182 = clientWithRoute

181 = clientWithRoute

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Get.hs+6−7

@@ -55,9 +55,9 @@ type TasksGetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] Task

62

63-- | Get a particular task from a TaskQueue.

@@ -170,13 +170,12 @@ instance GoogleRequest TasksGet' where

170 request

171 = requestWithRoute defReq appEngineTaskQueueURL

172 requestWithRoute r u TasksGet'{..}

173− = go _tgTaskqueue _tgQuotaUser (Just _tgPrettyPrint)

173+ = go _tgProject _tgTaskqueue _tgTask _tgQuotaUser

174− _tgProject

174+ (Just _tgPrettyPrint)

175 _tgUserIP

176+ _tgFields

176 _tgKey

177 _tgKey

177− _tgTask

178 _tgOAuthToken

179− _tgFields

180 (Just AltJSON)

179 (Just AltJSON)

181 where go

180 where go

182 = clientWithRoute (Proxy :: Proxy TasksGetResource) r

181 = clientWithRoute (Proxy :: Proxy TasksGetResource) r

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Insert.hs+6−6

@@ -54,9 +54,9 @@ type TasksInsertResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Task :> Post '[JSON] Task

62

@@ -170,12 +170,12 @@ instance GoogleRequest TasksInsert' where

170 request

171 = requestWithRoute defReq appEngineTaskQueueURL

172 requestWithRoute r u TasksInsert'{..}

173− = go _tiTaskqueue _tiQuotaUser (Just _tiPrettyPrint)

173+ = go _tiProject _tiTaskqueue _tiQuotaUser

174− _tiProject

174+ (Just _tiPrettyPrint)

175 _tiUserIP

176+ _tiFields

176 _tiKey

177 _tiKey

177 _tiOAuthToken

178 _tiOAuthToken

178− _tiFields

179 (Just AltJSON)

180 _tiTask

181 where go

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Lease.hs+16−17

@@ -55,16 +55,16 @@ type TasksLeaseResource =

55 Capture "taskqueue" Text :>

56 "tasks" :>

57 "lease" :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "groupByTag" Bool :>

59− QueryParam "prettyPrint" Bool :>

59+ QueryParam "tag" Text :>

60− QueryParam "tag" Text :>

60+ QueryParam "numTasks" Int32 :>

61− QueryParam "userIp" Text :>

61+ QueryParam "leaseSecs" Int32 :>

62− QueryParam "numTasks" Int32 :>

62+ QueryParam "quotaUser" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "prettyPrint" Bool :>

64− QueryParam "leaseSecs" Int32 :>

64+ QueryParam "userIp" Text :>

65+ QueryParam "fields" Text :>

66+ QueryParam "key" Key :>

65− QueryParam "oauth_token" OAuthToken :>

67+ QueryParam "oauth_token" OAuthToken :>

66− QueryParam "groupByTag" Bool :>

67− QueryParam "fields" Text :>

68 QueryParam "alt" AltJSON :>

69 Post '[JSON] Tasks

70

@@ -209,16 +209,15 @@ instance GoogleRequest TasksLease' where

209 request

210 = requestWithRoute defReq appEngineTaskQueueURL

211 requestWithRoute r u TasksLease'{..}

212− = go _tlTaskqueue _tlQuotaUser (Just _tlPrettyPrint)

212+ = go _tlGroupByTag _tlTag _tlProject _tlTaskqueue

213− _tlTag

214− _tlProject

215− _tlUserIP

216 (Just _tlNumTasks)

213 (Just _tlNumTasks)

217− _tlKey

218 (Just _tlLeaseSecs)

214 (Just _tlLeaseSecs)

219− _tlOAuthToken

215+ _tlQuotaUser

220− _tlGroupByTag

216+ (Just _tlPrettyPrint)

217+ _tlUserIP

221 _tlFields

218 _tlFields

219+ _tlKey

220+ _tlOAuthToken

222 (Just AltJSON)

221 (Just AltJSON)

223 where go

222 where go

224 = clientWithRoute (Proxy :: Proxy TasksLeaseResource)

223 = clientWithRoute (Proxy :: Proxy TasksLeaseResource)

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/List.hs+6−6

@@ -53,9 +53,9 @@ type TasksListResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Tasks2

60

61-- | List Tasks in a TaskQueue

@@ -157,12 +157,12 @@ instance GoogleRequest TasksList' where

157 request

158 = requestWithRoute defReq appEngineTaskQueueURL

159 requestWithRoute r u TasksList'{..}

160− = go _tTaskqueue _tQuotaUser (Just _tPrettyPrint)

160+ = go _tProject _tTaskqueue _tQuotaUser

161− _tProject

161+ (Just _tPrettyPrint)

162 _tUserIP

163+ _tFields

163 _tKey

164 _tKey

164 _tOAuthToken

165 _tOAuthToken

165− _tFields

166 (Just AltJSON)

167 where go

168 = clientWithRoute (Proxy :: Proxy TasksListResource)

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Patch.hs+12−12

@@ -55,13 +55,13 @@ type TasksPatchResource =

55 Capture "taskqueue" Text :>

56 "tasks" :>

57 Capture "task" Text :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "newLeaseSeconds" Int32 :>

59+ QueryParam "quotaUser" Text :>

59− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

61− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "newLeaseSeconds" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Task :> Patch '[JSON] Task

67

@@ -194,14 +194,14 @@ instance GoogleRequest TasksPatch' where

194 request

195 = requestWithRoute defReq appEngineTaskQueueURL

196 requestWithRoute r u TasksPatch'{..}

197+ = go _tpProject _tpTaskqueue _tpTask

198+ (Just _tpNewLeaseSeconds)

199+ _tpQuotaUser

197− = go _tpTaskqueue _tpQuotaUser (Just _tpPrettyPrint)

200+ (Just _tpPrettyPrint)

198− _tpProject

199 _tpUserIP

201 _tpUserIP

202+ _tpFields

200 _tpKey

203 _tpKey

201− _tpTask

202 _tpOAuthToken

204 _tpOAuthToken

203− (Just _tpNewLeaseSeconds)

204− _tpFields

205 (Just AltJSON)

206 _tpTask

207 where go

gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Update.hs+12−12

@@ -54,13 +54,13 @@ type TasksUpdateResource =

54 Capture "taskqueue" Text :>

55 "tasks" :>

56 Capture "task" Text :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "newLeaseSeconds" Int32 :>

58+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "newLeaseSeconds" Int32 :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Task :> Post '[JSON] Task

66

@@ -192,14 +192,14 @@ instance GoogleRequest TasksUpdate' where

192 request

193 = requestWithRoute defReq appEngineTaskQueueURL

194 requestWithRoute r u TasksUpdate'{..}

195+ = go _tuProject _tuTaskqueue _tuTask

196+ (Just _tuNewLeaseSeconds)

197+ _tuQuotaUser

195− = go _tuTaskqueue _tuQuotaUser (Just _tuPrettyPrint)

198+ (Just _tuPrettyPrint)

196− _tuProject

197 _tuUserIP

199 _tuUserIP

200+ _tuFields

198 _tuKey

201 _tuKey

199− _tuTask

200 _tuOAuthToken

202 _tuOAuthToken

201− (Just _tuNewLeaseSeconds)

202− _tuFields

203 (Just AltJSON)

204 _tuTask

205 where go

gogol-appengine/gen/Network/Google/AppEngine.hs+5−5

@@ -94,7 +94,7 @@ module Network.Google.AppEngine

94

95 -- ** URLMap

96 , URLMap

97− , uRLMap

97+ , urlMap

98 , umScript

99 , umSecurityLevel

100 , umAPIEndpoint

@@ -107,7 +107,7 @@ module Network.Google.AppEngine

107

108 -- ** APIConfigHandler

109 , APIConfigHandler

110− , aPIConfigHandler

110+ , apiConfigHandler

111 , achScript

112 , achSecurityLevel

113 , achURL

@@ -140,7 +140,7 @@ module Network.Google.AppEngine

140

141 -- ** URLDispatchRule

142 , URLDispatchRule

143− , uRLDispatchRule

143+ , urlDispatchRule

144 , udrPath

145 , udrDomain

146 , udrModule

@@ -196,7 +196,7 @@ module Network.Google.AppEngine

196

197 -- ** APIEndpointHandler

198 , APIEndpointHandler

199− , aPIEndpointHandler

199+ , apiEndpointHandler

200 , aehScriptPath

201

202 -- ** StatusDetails

@@ -223,7 +223,7 @@ module Network.Google.AppEngine

223

224 -- ** CPUUtilization

225 , CPUUtilization

226− , cPUUtilization

226+ , cpuUtilization

227 , cuAggregationWindowLength

228 , cuTargetUtilization

229

gogol-appengine/gen/Network/Google/AppEngine/Types.hs+5−5

@@ -49,7 +49,7 @@ module Network.Google.AppEngine.Types

49

50 -- * URLMap

51 , URLMap

52− , uRLMap

52+ , urlMap

53 , umScript

54 , umSecurityLevel

55 , umAPIEndpoint

@@ -62,7 +62,7 @@ module Network.Google.AppEngine.Types

62

63 -- * APIConfigHandler

64 , APIConfigHandler

65− , aPIConfigHandler

65+ , apiConfigHandler

66 , achScript

67 , achSecurityLevel

68 , achURL

@@ -95,7 +95,7 @@ module Network.Google.AppEngine.Types

95

96 -- * URLDispatchRule

97 , URLDispatchRule

98− , uRLDispatchRule

98+ , urlDispatchRule

99 , udrPath

100 , udrDomain

101 , udrModule

@@ -151,7 +151,7 @@ module Network.Google.AppEngine.Types

151

152 -- * APIEndpointHandler

153 , APIEndpointHandler

154− , aPIEndpointHandler

154+ , apiEndpointHandler

155 , aehScriptPath

156

157 -- * StatusDetails

@@ -178,7 +178,7 @@ module Network.Google.AppEngine.Types

178

179 -- * CPUUtilization

180 , CPUUtilization

181− , cPUUtilization

181+ , cpuUtilization

182 , cuAggregationWindowLength

183 , cuTargetUtilization

184

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+15−15

@@ -311,7 +311,7 @@ instance ToJSON ScriptHandler where

311-- can handle URLs by executing application code, or by serving static

312-- files uploaded with the code, such as images, CSS or JavaScript.

313--

314−-- /See:/ 'uRLMap' smart constructor.

314+-- /See:/ 'urlMap' smart constructor.

315data URLMap = URLMap

316 { _umScript :: !(Maybe ScriptHandler)

317 , _umSecurityLevel :: !(Maybe Text)

@@ -345,9 +345,9 @@ data URLMap = URLMap

345-- * 'umLogin'

346--

347-- * 'umStaticDirectory'

348−uRLMap

348+urlMap

349 :: URLMap

350−uRLMap =

350+urlMap =

351 URLMap

352 { _umScript = Nothing

353 , _umSecurityLevel = Nothing

@@ -448,7 +448,7 @@ instance ToJSON URLMap where

448

449-- | API Serving configuration for Cloud Endpoints.

450--

451−-- /See:/ 'aPIConfigHandler' smart constructor.

451+-- /See:/ 'apiConfigHandler' smart constructor.

452data APIConfigHandler = APIConfigHandler

453 { _achScript :: !(Maybe Text)

454 , _achSecurityLevel :: !(Maybe Text)

@@ -470,9 +470,9 @@ data APIConfigHandler = APIConfigHandler

470-- * 'achAuthFailAction'

471--

472-- * 'achLogin'

473−aPIConfigHandler

473+apiConfigHandler

474 :: APIConfigHandler

475−aPIConfigHandler =

475+apiConfigHandler =

476 APIConfigHandler

477 { _achScript = Nothing

478 , _achSecurityLevel = Nothing

@@ -756,7 +756,7 @@ instance ToJSON HealthCheck where

756

757-- | Rules to match an HTTP request and dispatch that request to a module.

758--

759−-- /See:/ 'uRLDispatchRule' smart constructor.

759+-- /See:/ 'urlDispatchRule' smart constructor.

760data URLDispatchRule = URLDispatchRule

761 { _udrPath :: !(Maybe Text)

762 , _udrDomain :: !(Maybe Text)

@@ -772,9 +772,9 @@ data URLDispatchRule = URLDispatchRule

772-- * 'udrDomain'

773--

774-- * 'udrModule'

775−uRLDispatchRule

775+urlDispatchRule

776 :: URLDispatchRule

777−uRLDispatchRule =

777+urlDispatchRule =

778 URLDispatchRule

779 { _udrPath = Nothing

780 , _udrDomain = Nothing

@@ -1263,7 +1263,7 @@ instance ToJSON AutomaticScaling where

1263

1264-- | Use Google Cloud Endpoints to handle requests.

1265--

1266−-- /See:/ 'aPIEndpointHandler' smart constructor.

1266+-- /See:/ 'apiEndpointHandler' smart constructor.

1267newtype APIEndpointHandler = APIEndpointHandler

1268 { _aehScriptPath :: Maybe Text

1269 } deriving (Eq,Read,Show,Data,Typeable,Generic)

@@ -1273,9 +1273,9 @@ newtype APIEndpointHandler = APIEndpointHandler

1273-- Use one of the following lenses to modify other fields as desired:

1274--

1275-- * 'aehScriptPath'

1276−aPIEndpointHandler

1276+apiEndpointHandler

1277 :: APIEndpointHandler

1278−aPIEndpointHandler =

1278+apiEndpointHandler =

1279 APIEndpointHandler

1280 { _aehScriptPath = Nothing

1281 }

@@ -1458,7 +1458,7 @@ instance ToJSON StaticFilesHandlerHTTPHeaders where

1458

1459-- | Target scaling by CPU usage.

1460--

1461−-- /See:/ 'cPUUtilization' smart constructor.

1461+-- /See:/ 'cpuUtilization' smart constructor.

1462data CPUUtilization = CPUUtilization

1463 { _cuAggregationWindowLength :: !(Maybe Text)

1464 , _cuTargetUtilization :: !(Maybe Double)

@@ -1471,9 +1471,9 @@ data CPUUtilization = CPUUtilization

1471-- * 'cuAggregationWindowLength'

1472--

1473-- * 'cuTargetUtilization'

1474−cPUUtilization

1474+cpuUtilization

1475 :: CPUUtilization

1476−cPUUtilization =

1476+cpuUtilization =

1477 CPUUtilization

1478 { _cuAggregationWindowLength = Nothing

1479 , _cuTargetUtilization = Nothing

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Get.hs+19−19

@@ -56,18 +56,18 @@ type AppsGetResource =

56 "apps" :>

57 Capture "appsId" Text :>

58 QueryParam "$.xgafv" Text :>

59− QueryParam "quotaUser" Text :>

59+ QueryParam "access_token" Text :>

60− QueryParam "prettyPrint" Bool :>

60+ QueryParam "bearer_token" Text :>

61− QueryParam "upload_protocol" Text :>

61+ QueryParam "callback" Text :>

62− QueryParam "pp" Bool :>

62+ QueryParam "ensureResourcesExist" Bool :>

63− QueryParam "access_token" Text :>

63+ QueryParam "pp" Bool :>

64 QueryParam "uploadType" Text :>

65− QueryParam "bearer_token" Text :>

65+ QueryParam "upload_protocol" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "quotaUser" Text :>

67− QueryParam "ensureResourcesExist" Bool :>

67+ QueryParam "prettyPrint" Bool :>

68+ QueryParam "fields" Text :>

69+ QueryParam "key" Key :>

68− QueryParam "oauth_token" OAuthToken :>

70+ QueryParam "oauth_token" OAuthToken :>

69− QueryParam "fields" Text :>

70− QueryParam "callback" Text :>

71 QueryParam "alt" AltJSON :>

72 Get '[JSON] Application

73

@@ -229,18 +229,18 @@ instance GoogleRequest AppsGet' where

229 type Rs AppsGet' = Application

230 request = requestWithRoute defReq appEngineURL

231 requestWithRoute r u AppsGet'{..}

232− = go _agXgafv _agQuotaUser (Just _agPrettyPrint)

232+ = go _agXgafv _agAccessToken _agBearerToken

233− _agUploadProtocol

233+ _agCallback

234+ _agEnsureResourcesExist

234 (Just _agPp)

235 (Just _agPp)

235− _agAccessToken

236 _agUploadType

237− _agBearerToken

237+ _agUploadProtocol

238− _agKey

239 _agAppsId

238 _agAppsId

240− _agEnsureResourcesExist

239+ _agQuotaUser

241− _agOAuthToken

240+ (Just _agPrettyPrint)

242 _agFields

241 _agFields

243− _agCallback

242+ _agKey

243+ _agOAuthToken

244 (Just AltJSON)

245 where go

246 = clientWithRoute (Proxy :: Proxy AppsGetResource) r

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Delete.hs+17−17

@@ -58,17 +58,17 @@ type AppsModulesDeleteResource =

58 "modules" :>

59 Capture "modulesId" Text :>

60 QueryParam "$.xgafv" Text :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "access_token" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "bearer_token" Text :>

63− QueryParam "upload_protocol" Text :>

63+ QueryParam "callback" Text :>

64 QueryParam "pp" Bool :>

65− QueryParam "access_token" Text :>

66− QueryParam "uploadType" Text :>

65+ QueryParam "uploadType" Text :>

66+ QueryParam "upload_protocol" Text :>

67− QueryParam "bearer_token" Text :>

67+ QueryParam "quotaUser" Text :>

68− QueryParam "key" Key :>

68+ QueryParam "prettyPrint" Bool :>

69+ QueryParam "fields" Text :>

70+ QueryParam "key" Key :>

69− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "oauth_token" OAuthToken :>

70− QueryParam "fields" Text :>

71− QueryParam "callback" Text :>

72 QueryParam "alt" AltJSON :>

73 Delete '[JSON] Operation

74

@@ -231,18 +231,18 @@ instance GoogleRequest AppsModulesDelete' where

231 type Rs AppsModulesDelete' = Operation

232 request = requestWithRoute defReq appEngineURL

233 requestWithRoute r u AppsModulesDelete'{..}

234− = go _amdXgafv _amdQuotaUser (Just _amdPrettyPrint)

234+ = go _amdXgafv _amdAccessToken _amdBearerToken

235− _amdUploadProtocol

235+ _amdCallback

236 (Just _amdPp)

237− _amdAccessToken

238 _amdUploadType

237 _amdUploadType

238+ _amdUploadProtocol

239+ _amdAppsId

239 _amdModulesId

240 _amdModulesId

240− _amdBearerToken

241+ _amdQuotaUser

242+ (Just _amdPrettyPrint)

243+ _amdFields

241 _amdKey

244 _amdKey

242− _amdAppsId

243 _amdOAuthToken

245 _amdOAuthToken

244− _amdFields

245− _amdCallback

246 (Just AltJSON)

247 where go

248 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Get.hs+17−17

@@ -58,17 +58,17 @@ type AppsModulesGetResource =

58 "modules" :>

59 Capture "modulesId" Text :>

60 QueryParam "$.xgafv" Text :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "access_token" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "bearer_token" Text :>

63− QueryParam "upload_protocol" Text :>

63+ QueryParam "callback" Text :>

64 QueryParam "pp" Bool :>

65− QueryParam "access_token" Text :>

66− QueryParam "uploadType" Text :>

65+ QueryParam "uploadType" Text :>

66+ QueryParam "upload_protocol" Text :>

67− QueryParam "bearer_token" Text :>

67+ QueryParam "quotaUser" Text :>

68− QueryParam "key" Key :>

68+ QueryParam "prettyPrint" Bool :>

69+ QueryParam "fields" Text :>

70+ QueryParam "key" Key :>

69− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "oauth_token" OAuthToken :>

70− QueryParam "fields" Text :>

71− QueryParam "callback" Text :>

72 QueryParam "alt" AltJSON :>

73 Get '[JSON] Module

74

@@ -231,18 +231,18 @@ instance GoogleRequest AppsModulesGet' where

231 type Rs AppsModulesGet' = Module

232 request = requestWithRoute defReq appEngineURL

233 requestWithRoute r u AppsModulesGet'{..}

234− = go _amgXgafv _amgQuotaUser (Just _amgPrettyPrint)

234+ = go _amgXgafv _amgAccessToken _amgBearerToken

235− _amgUploadProtocol

235+ _amgCallback

236 (Just _amgPp)

237− _amgAccessToken

238 _amgUploadType

237 _amgUploadType

238+ _amgUploadProtocol

239+ _amgAppsId

239 _amgModulesId

240 _amgModulesId

240− _amgBearerToken

241+ _amgQuotaUser

242+ (Just _amgPrettyPrint)

243+ _amgFields

241 _amgKey

244 _amgKey

242− _amgAppsId

243 _amgOAuthToken

245 _amgOAuthToken

244− _amgFields

245− _amgCallback

246 (Just AltJSON)

247 where go

248 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/List.hs+22−22

@@ -58,19 +58,19 @@ type AppsModulesListResource =

58 Capture "appsId" Text :>

59 "modules" :>

60 QueryParam "$.xgafv" Text :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "access_token" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "bearer_token" Text :>

63− QueryParam "upload_protocol" Text :>

63+ QueryParam "callback" Text :>

64− QueryParam "pp" Bool :>

64+ QueryParam "pageSize" Int32 :>

65− QueryParam "access_token" Text :>

65+ QueryParam "pageToken" Text :>

66+ QueryParam "pp" Bool :>

66− QueryParam "uploadType" Text :>

67+ QueryParam "uploadType" Text :>

67− QueryParam "bearer_token" Text :>

68− QueryParam "key" Key :>

68+ QueryParam "upload_protocol" Text :>

69− QueryParam "pageToken" Text :>

69+ QueryParam "quotaUser" Text :>

70− QueryParam "oauth_token" OAuthToken :>

70+ QueryParam "prettyPrint" Bool :>

71− QueryParam "pageSize" Int32 :>

71+ QueryParam "fields" Text :>

72− QueryParam "fields" Text :>

72+ QueryParam "key" Key :>

73− QueryParam "callback" Text :>

73+ QueryParam "oauth_token" OAuthToken :>

74 QueryParam "alt" AltJSON :>

75 Get '[JSON] ListModulesResponse

76

@@ -241,19 +241,19 @@ instance GoogleRequest AppsModulesList' where

241 type Rs AppsModulesList' = ListModulesResponse

242 request = requestWithRoute defReq appEngineURL

243 requestWithRoute r u AppsModulesList'{..}

244− = go _amlXgafv _amlQuotaUser (Just _amlPrettyPrint)

244+ = go _amlXgafv _amlAccessToken _amlBearerToken

245− _amlUploadProtocol

245+ _amlCallback

246+ _amlPageSize

247+ _amlPageToken

246 (Just _amlPp)

248 (Just _amlPp)

247− _amlAccessToken

248 _amlUploadType

249 _amlUploadType

249− _amlBearerToken

250+ _amlUploadProtocol

250− _amlKey

251 _amlAppsId

252− _amlPageToken

252+ _amlQuotaUser

253− _amlOAuthToken

253+ (Just _amlPrettyPrint)

254− _amlPageSize

255 _amlFields

254 _amlFields

256− _amlCallback

255+ _amlKey

256+ _amlOAuthToken

257 (Just AltJSON)

258 where go

259 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Patch.hs+22−22

@@ -61,19 +61,19 @@ type AppsModulesPatchResource =

61 "modules" :>

62 Capture "modulesId" Text :>

63 QueryParam "$.xgafv" Text :>

64− QueryParam "quotaUser" Text :>

64+ QueryParam "access_token" Text :>

65− QueryParam "prettyPrint" Bool :>

65+ QueryParam "bearer_token" Text :>

66− QueryParam "upload_protocol" Text :>

66+ QueryParam "callback" Text :>

67− QueryParam "pp" Bool :>

67+ QueryParam "mask" Text :>

68− QueryParam "access_token" Text :>

68+ QueryParam "migrateTraffic" Bool :>

69− QueryParam "uploadType" Text :>

69+ QueryParam "pp" Bool :>

70− QueryParam "migrateTraffic" Bool :>

70+ QueryParam "uploadType" Text :>

71− QueryParam "mask" Text :>

71+ QueryParam "upload_protocol" Text :>

72− QueryParam "bearer_token" Text :>

72+ QueryParam "quotaUser" Text :>

73− QueryParam "key" Key :>

73+ QueryParam "prettyPrint" Bool :>

74+ QueryParam "fields" Text :>

75+ QueryParam "key" Key :>

74− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "oauth_token" OAuthToken :>

75− QueryParam "fields" Text :>

76− QueryParam "callback" Text :>

77 QueryParam "alt" AltJSON :>

78 ReqBody '[JSON] Module :>

79 Patch '[JSON] Operation

@@ -266,20 +266,20 @@ instance GoogleRequest AppsModulesPatch' where

266 type Rs AppsModulesPatch' = Operation

267 request = requestWithRoute defReq appEngineURL

268 requestWithRoute r u AppsModulesPatch'{..}

269− = go _ampXgafv _ampQuotaUser (Just _ampPrettyPrint)

269+ = go _ampXgafv _ampAccessToken _ampBearerToken

270− _ampUploadProtocol

270+ _ampCallback

271+ _ampMask

272+ _ampMigrateTraffic

271 (Just _ampPp)

273 (Just _ampPp)

272− _ampAccessToken

273 _ampUploadType

274 _ampUploadType

275+ _ampUploadProtocol

276+ _ampAppsId

274 _ampModulesId

277 _ampModulesId

275− _ampMigrateTraffic

278+ _ampQuotaUser

276− _ampMask

279+ (Just _ampPrettyPrint)

277− _ampBearerToken

280+ _ampFields

278 _ampKey

281 _ampKey

279− _ampAppsId

280 _ampOAuthToken

282 _ampOAuthToken

281− _ampFields

282− _ampCallback

283 (Just AltJSON)

284 _ampModule

285 where go

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Create.hs+17−18

@@ -60,17 +60,17 @@ type AppsModulesVersionsCreateResource =

60 Capture "modulesId" Text :>

61 "versions" :>

62 QueryParam "$.xgafv" Text :>

63− QueryParam "quotaUser" Text :>

63+ QueryParam "access_token" Text :>

64− QueryParam "prettyPrint" Bool :>

64+ QueryParam "bearer_token" Text :>

65− QueryParam "upload_protocol" Text :>

65+ QueryParam "callback" Text :>

66 QueryParam "pp" Bool :>

67− QueryParam "access_token" Text :>

68− QueryParam "uploadType" Text :>

67+ QueryParam "uploadType" Text :>

68+ QueryParam "upload_protocol" Text :>

69− QueryParam "bearer_token" Text :>

69+ QueryParam "quotaUser" Text :>

70− QueryParam "key" Key :>

70+ QueryParam "prettyPrint" Bool :>

71+ QueryParam "fields" Text :>

72+ QueryParam "key" Key :>

71− QueryParam "oauth_token" OAuthToken :>

73+ QueryParam "oauth_token" OAuthToken :>

72− QueryParam "fields" Text :>

73− QueryParam "callback" Text :>

74 QueryParam "alt" AltJSON :>

75 ReqBody '[JSON] Version :>

76 Post '[JSON] Operation

@@ -248,19 +248,18 @@ instance GoogleRequest AppsModulesVersionsCreate'

248 type Rs AppsModulesVersionsCreate' = Operation

249 request = requestWithRoute defReq appEngineURL

250 requestWithRoute r u AppsModulesVersionsCreate'{..}

251− = go _amvcXgafv _amvcQuotaUser

251+ = go _amvcXgafv _amvcAccessToken _amvcBearerToken

252− (Just _amvcPrettyPrint)

252+ _amvcCallback

253− _amvcUploadProtocol

254 (Just _amvcPp)

253 (Just _amvcPp)

255− _amvcAccessToken

256 _amvcUploadType

254 _amvcUploadType

255+ _amvcUploadProtocol

256+ _amvcAppsId

257 _amvcModulesId

258− _amvcBearerToken

258+ _amvcQuotaUser

259+ (Just _amvcPrettyPrint)

260+ _amvcFields

259 _amvcKey

261 _amvcKey

260− _amvcAppsId

261 _amvcOAuthToken

262 _amvcOAuthToken

262− _amvcFields

263− _amvcCallback

264 (Just AltJSON)

263 (Just AltJSON)

265 _amvcVersion

264 _amvcVersion

266 where go

265 where go

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Delete.hs+18−19

@@ -61,17 +61,17 @@ type AppsModulesVersionsDeleteResource =

61 "versions" :>

62 Capture "versionsId" Text :>

63 QueryParam "$.xgafv" Text :>

64− QueryParam "quotaUser" Text :>

64+ QueryParam "access_token" Text :>

65− QueryParam "prettyPrint" Bool :>

65+ QueryParam "bearer_token" Text :>

66− QueryParam "upload_protocol" Text :>

66+ QueryParam "callback" Text :>

67 QueryParam "pp" Bool :>

68− QueryParam "access_token" Text :>

69− QueryParam "uploadType" Text :>

68+ QueryParam "uploadType" Text :>

69+ QueryParam "upload_protocol" Text :>

70− QueryParam "bearer_token" Text :>

70+ QueryParam "quotaUser" Text :>

71− QueryParam "key" Key :>

71+ QueryParam "prettyPrint" Bool :>

72+ QueryParam "fields" Text :>

73+ QueryParam "key" Key :>

72− QueryParam "oauth_token" OAuthToken :>

74+ QueryParam "oauth_token" OAuthToken :>

73− QueryParam "fields" Text :>

74− QueryParam "callback" Text :>

75 QueryParam "alt" AltJSON :>

76 Delete '[JSON] Operation

77

@@ -249,20 +249,19 @@ instance GoogleRequest AppsModulesVersionsDelete'

249 type Rs AppsModulesVersionsDelete' = Operation

250 request = requestWithRoute defReq appEngineURL

251 requestWithRoute r u AppsModulesVersionsDelete'{..}

252− = go _amvdXgafv _amvdQuotaUser

252+ = go _amvdXgafv _amvdAccessToken _amvdBearerToken

253− (Just _amvdPrettyPrint)

253+ _amvdCallback

254− _amvdUploadProtocol

255 (Just _amvdPp)

254 (Just _amvdPp)

256− _amvdAccessToken

257 _amvdUploadType

255 _amvdUploadType

258− _amvdVersionsId

256+ _amvdUploadProtocol

257+ _amvdAppsId

259 _amvdModulesId

258 _amvdModulesId

260− _amvdBearerToken

259+ _amvdVersionsId

260+ _amvdQuotaUser

261+ (Just _amvdPrettyPrint)

262+ _amvdFields

261 _amvdKey

263 _amvdKey

262− _amvdAppsId

263 _amvdOAuthToken

264 _amvdOAuthToken

264− _amvdFields

265− _amvdCallback

266 (Just AltJSON)

265 (Just AltJSON)

267 where go

266 where go

268 = clientWithRoute

267 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Get.hs+21−21

@@ -62,18 +62,19 @@ type AppsModulesVersionsGetResource =

62 "versions" :>

63 Capture "versionsId" Text :>

64 QueryParam "$.xgafv" Text :>

65− QueryParam "quotaUser" Text :>

65+ QueryParam "access_token" Text :>

66− QueryParam "prettyPrint" Bool :>

66+ QueryParam "bearer_token" Text :>

67− QueryParam "upload_protocol" Text :>

67+ QueryParam "callback" Text :>

68 QueryParam "pp" Bool :>

69− QueryParam "access_token" Text :>

69+ QueryParam "uploadType" Text :>

70− QueryParam "uploadType" Text :>

70+ QueryParam "upload_protocol" Text :>

71− QueryParam "bearer_token" Text :>

71+ QueryParam "view" Text :>

72− QueryParam "key" Key :>

72+ QueryParam "quotaUser" Text :>

73− QueryParam "view" Text :>

73+ QueryParam "prettyPrint" Bool :>

74+ QueryParam "fields" Text :>

75+ QueryParam "key" Key :>

74− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "oauth_token" OAuthToken

75− QueryParam "fields" Text :>

77+ :>

76− QueryParam "callback" Text :>

77 QueryParam "alt" AltJSON :>

78 QueryParam "alt" AltJSON :>

78 Get '[JSON] Version

79 Get '[JSON] Version

79

80

@@ -258,21 +259,20 @@ instance GoogleRequest AppsModulesVersionsGet' where

258 type Rs AppsModulesVersionsGet' = Version

259 type Rs AppsModulesVersionsGet' = Version

259 request = requestWithRoute defReq appEngineURL

260 request = requestWithRoute defReq appEngineURL

260 requestWithRoute r u AppsModulesVersionsGet'{..}

261 requestWithRoute r u AppsModulesVersionsGet'{..}

261− = go _amvgXgafv _amvgQuotaUser

262+ = go _amvgXgafv _amvgAccessToken _amvgBearerToken

262− (Just _amvgPrettyPrint)

263+ _amvgCallback

263− _amvgUploadProtocol

264 (Just _amvgPp)

265− _amvgAccessToken

266 _amvgUploadType

265 _amvgUploadType

267− _amvgVersionsId

266+ _amvgUploadProtocol

267+ _amvgView

268+ _amvgAppsId

268 _amvgModulesId

269 _amvgModulesId

269− _amvgBearerToken

270+ _amvgVersionsId

271+ _amvgQuotaUser

272+ (Just _amvgPrettyPrint)

273+ _amvgFields

270 _amvgKey

274 _amvgKey

271− _amvgAppsId

272− _amvgView

273 _amvgOAuthToken

275 _amvgOAuthToken

274− _amvgFields

275− _amvgCallback

276 (Just AltJSON)

277 where go

278 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/List.hs+24−24

@@ -62,20 +62,21 @@ type AppsModulesVersionsListResource =

62 Capture "modulesId" Text :>

63 "versions" :>

64 QueryParam "$.xgafv" Text :>

65− QueryParam "quotaUser" Text :>

65+ QueryParam "access_token" Text :>

66− QueryParam "prettyPrint" Bool :>

66+ QueryParam "bearer_token" Text :>

67− QueryParam "upload_protocol" Text :>

67+ QueryParam "callback" Text :>

68− QueryParam "pp" Bool :>

68+ QueryParam "pageSize" Int32 :>

69− QueryParam "access_token" Text :>

69+ QueryParam "pageToken" Text :>

70− QueryParam "uploadType" Text :>

70+ QueryParam "pp" Bool :>

71− QueryParam "bearer_token" Text :>

71+ QueryParam "uploadType" Text :>

72− QueryParam "key" Key :>

72+ QueryParam "upload_protocol" Text :>

73 QueryParam "view" Text :>

74− QueryParam "pageToken" Text :>

74+ QueryParam "quotaUser" Text :>

75− QueryParam "oauth_token" OAuthToken :>

75+ QueryParam "prettyPrint" Bool :>

76− QueryParam "pageSize" Int32 :>

76+ QueryParam "fields" Text :>

77− QueryParam "fields" Text :>

77+ QueryParam "key" Key :>

78− QueryParam "callback" Text :>

78+ QueryParam "oauth_token" OAuthToken

79+ :>

79 QueryParam "alt" AltJSON :>

80 QueryParam "alt" AltJSON :>

80 Get '[JSON]

81 Get '[JSON]

81 ListVersionsResponse

82 ListVersionsResponse

@@ -270,22 +271,21 @@ instance GoogleRequest AppsModulesVersionsList' where

270 ListVersionsResponse

271 ListVersionsResponse

271 request = requestWithRoute defReq appEngineURL

272 request = requestWithRoute defReq appEngineURL

272 requestWithRoute r u AppsModulesVersionsList'{..}

273 requestWithRoute r u AppsModulesVersionsList'{..}

273− = go _amvlXgafv _amvlQuotaUser

274+ = go _amvlXgafv _amvlAccessToken _amvlBearerToken

274− (Just _amvlPrettyPrint)

275+ _amvlCallback

275− _amvlUploadProtocol

276+ _amvlPageSize

277+ _amvlPageToken

276 (Just _amvlPp)

278 (Just _amvlPp)

277− _amvlAccessToken

278 _amvlUploadType

279 _amvlUploadType

280+ _amvlUploadProtocol

281+ _amvlView

282+ _amvlAppsId

279 _amvlModulesId

283 _amvlModulesId

280− _amvlBearerToken

284+ _amvlQuotaUser

285+ (Just _amvlPrettyPrint)

286+ _amvlFields

281 _amvlKey

287 _amvlKey

282− _amvlAppsId

283− _amvlView

284− _amvlPageToken

285 _amvlOAuthToken

288 _amvlOAuthToken

286− _amvlPageSize

287− _amvlFields

288− _amvlCallback

289 (Just AltJSON)

290 where go

291 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/Get.hs+17−17

@@ -60,17 +60,17 @@ type AppsOperationsGetResource =

60 "operations" :>

61 Capture "operationsId" Text :>

62 QueryParam "$.xgafv" Text :>

63− QueryParam "quotaUser" Text :>

63+ QueryParam "access_token" Text :>

64− QueryParam "prettyPrint" Bool :>

64+ QueryParam "bearer_token" Text :>

65− QueryParam "upload_protocol" Text :>

65+ QueryParam "callback" Text :>

66 QueryParam "pp" Bool :>

67− QueryParam "access_token" Text :>

68− QueryParam "uploadType" Text :>

67+ QueryParam "uploadType" Text :>

68+ QueryParam "upload_protocol" Text :>

69− QueryParam "bearer_token" Text :>

69+ QueryParam "quotaUser" Text :>

70− QueryParam "key" Key :>

70+ QueryParam "prettyPrint" Bool :>

71+ QueryParam "fields" Text :>

72+ QueryParam "key" Key :>

71− QueryParam "oauth_token" OAuthToken :>

73+ QueryParam "oauth_token" OAuthToken :>

72− QueryParam "fields" Text :>

73− QueryParam "callback" Text :>

74 QueryParam "alt" AltJSON :>

75 Get '[JSON] Operation

76

@@ -235,18 +235,18 @@ instance GoogleRequest AppsOperationsGet' where

235 type Rs AppsOperationsGet' = Operation

236 request = requestWithRoute defReq appEngineURL

237 requestWithRoute r u AppsOperationsGet'{..}

238− = go _aogXgafv _aogQuotaUser (Just _aogPrettyPrint)

238+ = go _aogXgafv _aogAccessToken _aogBearerToken

239− _aogUploadProtocol

239+ _aogCallback

240 (Just _aogPp)

241− _aogAccessToken

242 _aogUploadType

241 _aogUploadType

243− _aogBearerToken

242+ _aogUploadProtocol

244− _aogKey

245 _aogAppsId

243 _aogAppsId

246− _aogOAuthToken

247 _aogOperationsId

244 _aogOperationsId

245+ _aogQuotaUser

246+ (Just _aogPrettyPrint)

248 _aogFields

247 _aogFields

249− _aogCallback

248+ _aogKey

249+ _aogOAuthToken

250 (Just AltJSON)

251 where go

252 = clientWithRoute

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/List.hs+24−24

@@ -63,20 +63,20 @@ type AppsOperationsListResource =

63 Capture "appsId" Text :>

64 "operations" :>

65 QueryParam "$.xgafv" Text :>

66− QueryParam "quotaUser" Text :>

66+ QueryParam "access_token" Text :>

67− QueryParam "prettyPrint" Bool :>

67+ QueryParam "bearer_token" Text :>

68− QueryParam "upload_protocol" Text :>

68+ QueryParam "callback" Text :>

69− QueryParam "pp" Bool :>

69+ QueryParam "filter" Text :>

70− QueryParam "access_token" Text :>

70+ QueryParam "pageSize" Int32 :>

71− QueryParam "uploadType" Text :>

71+ QueryParam "pageToken" Text :>

72− QueryParam "bearer_token" Text :>

72+ QueryParam "pp" Bool :>

73− QueryParam "key" Key :>

73+ QueryParam "uploadType" Text :>

74− QueryParam "filter" Text :>

74+ QueryParam "upload_protocol" Text :>

75− QueryParam "pageToken" Text :>

75+ QueryParam "quotaUser" Text :>

76− QueryParam "oauth_token" OAuthToken :>

76+ QueryParam "prettyPrint" Bool :>

77− QueryParam "pageSize" Int32 :>

77+ QueryParam "fields" Text :>

78− QueryParam "fields" Text :>

78+ QueryParam "key" Key :>

79− QueryParam "callback" Text :>

79+ QueryParam "oauth_token" OAuthToken :>

80 QueryParam "alt" AltJSON :>

81 Get '[JSON] ListOperationsResponse

82

@@ -259,20 +259,20 @@ instance GoogleRequest AppsOperationsList' where

259 type Rs AppsOperationsList' = ListOperationsResponse

260 request = requestWithRoute defReq appEngineURL

261 requestWithRoute r u AppsOperationsList'{..}

262− = go _aolXgafv _aolQuotaUser (Just _aolPrettyPrint)

262+ = go _aolXgafv _aolAccessToken _aolBearerToken

263− _aolUploadProtocol

263+ _aolCallback

264+ _aolFilter

265+ _aolPageSize

266+ _aolPageToken

264 (Just _aolPp)

267 (Just _aolPp)

265− _aolAccessToken

266 _aolUploadType

268 _aolUploadType

267− _aolBearerToken

269+ _aolUploadProtocol

268− _aolKey

269 _aolAppsId

270 _aolAppsId

270− _aolFilter

271+ _aolQuotaUser

271− _aolPageToken

272+ (Just _aolPrettyPrint)

272− _aolOAuthToken

273− _aolPageSize

274 _aolFields

273 _aolFields

275− _aolCallback

274+ _aolKey

275+ _aolOAuthToken

276 (Just AltJSON)

277 where go

278 = clientWithRoute

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+22−21

@@ -57,21 +57,21 @@ import Network.Google.Prelude

57-- 'ActivitiesList'' request conforms to.

58type ActivitiesListResource =

59 "activities" :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "drive.ancestorId" Text :>

61− QueryParam "prettyPrint" Bool :>

62− QueryParam "userIp" Text :>

63− QueryParam "drive.fileId" Text :>

61+ QueryParam "drive.fileId" Text :>

64− QueryParam "drive.ancestorId" Text :>

65− QueryParam "groupingStrategy"

62+ QueryParam "groupingStrategy"

66− AppsactivityActivitiesListGroupingStrategy

63+ AppsactivityActivitiesListGroupingStrategy

67− :>

64+ :>

65+ QueryParam "pageSize" Int32 :>

66+ QueryParam "pageToken" Text :>

67+ QueryParam "source" Text :>

68 QueryParam "userId" Text :>

69− QueryParam "key" Key :>

69+ QueryParam "quotaUser" Text :>

70− QueryParam "source" Text :>

70+ QueryParam "prettyPrint" Bool :>

71− QueryParam "pageToken" Text :>

71+ QueryParam "userIp" Text :>

72− QueryParam "oauth_token" OAuthToken :>

72+ QueryParam "fields" Text :>

73− QueryParam "pageSize" Int32 :>

73+ QueryParam "key" Key :>

74− QueryParam "fields" Text :>

74+ QueryParam "oauth_token" OAuthToken :>

75 QueryParam "alt" AltJSON :>

76 Get '[JSON] ListActivitiesResponse

77

@@ -229,17 +229,18 @@ instance GoogleRequest ActivitiesList' where

229 type Rs ActivitiesList' = ListActivitiesResponse

230 request = requestWithRoute defReq appsActivityURL

231 requestWithRoute r u ActivitiesList'{..}

232− = go _alQuotaUser (Just _alPrettyPrint) _alUserIP

233− _alDriveFileId

232+ = go _alDriveAncestorId _alDriveFileId

234− _alDriveAncestorId

235 (Just _alGroupingStrategy)

233 (Just _alGroupingStrategy)

234+ (Just _alPageSize)

235+ _alPageToken

236+ _alSource

236 (Just _alUserId)

237 (Just _alUserId)

238+ _alQuotaUser

239+ (Just _alPrettyPrint)

240+ _alUserIP

241+ _alFields

237 _alKey

242 _alKey

238− _alSource

239− _alPageToken

240 _alOAuthToken

243 _alOAuthToken

241− (Just _alPageSize)

242− _alFields

243 (Just AltJSON)

244 (Just AltJSON)

244 where go

245 where go

245 = clientWithRoute

246 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8

@@ -212,7 +212,7 @@ module Network.Google.AppsCalendar

212

213 -- ** ACLRuleScope

214 , ACLRuleScope

215− , aCLRuleScope

215+ , aclRuleScope

216 , arsValue

217 , arsType

218

@@ -447,7 +447,7 @@ module Network.Google.AppsCalendar

447

448 -- ** ACLRule

449 , ACLRule

450− , aCLRule

450+ , aclRule

451 , arEtag

452 , arKind

453 , arRole

@@ -478,12 +478,12 @@ module Network.Google.AppsCalendar

478

479 -- ** ACL

480 , ACL

481− , aCL

481+ , acl

482− , aclEtag

482+ , aEtag

483− , aclNextPageToken

483+ , aNextPageToken

484− , aclKind

484+ , aKind

485− , aclItems

485+ , aItems

486− , aclNextSyncToken

486+ , aNextSyncToken

487

488 -- ** EventSource

489 , EventSource

gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+8−8

@@ -90,7 +90,7 @@ module Network.Google.AppsCalendar.Types

90

91 -- * ACLRuleScope

92 , ACLRuleScope

93− , aCLRuleScope

93+ , aclRuleScope

94 , arsValue

95 , arsType

96

@@ -325,7 +325,7 @@ module Network.Google.AppsCalendar.Types

325

326 -- * ACLRule

327 , ACLRule

328− , aCLRule

328+ , aclRule

329 , arEtag

330 , arKind

331 , arRole

@@ -356,12 +356,12 @@ module Network.Google.AppsCalendar.Types

356

357 -- * ACL

358 , ACL

359− , aCL

359+ , acl

360− , aclEtag

360+ , aEtag

361− , aclNextPageToken

361+ , aNextPageToken

362− , aclKind

362+ , aKind

363− , aclItems

363+ , aItems

364− , aclNextSyncToken

364+ , aNextSyncToken

365

366 -- * EventSource

367 , EventSource

gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+44−46

@@ -814,7 +814,7 @@ instance ToJSON Event where

814

815-- | The scope of the rule.

816--

817−-- /See:/ 'aCLRuleScope' smart constructor.

817+-- /See:/ 'aclRuleScope' smart constructor.

818data ACLRuleScope = ACLRuleScope

819 { _arsValue :: !(Maybe Text)

820 , _arsType :: !(Maybe Text)

@@ -827,9 +827,9 @@ data ACLRuleScope = ACLRuleScope

827-- * 'arsValue'

828--

829-- * 'arsType'

830−aCLRuleScope

830+aclRuleScope

831 :: ACLRuleScope

832−aCLRuleScope =

832+aclRuleScope =

833 ACLRuleScope

834 { _arsValue = Nothing

835 , _arsType = Nothing

@@ -2755,7 +2755,7 @@ instance ToJSON EventGadget where

2755 ("type" .=) <$> _egType])

2756

2757--

2758−-- /See:/ 'aCLRule' smart constructor.

2758+-- /See:/ 'aclRule' smart constructor.

2759data ACLRule = ACLRule

2760 { _arEtag :: !(Maybe Text)

2761 , _arKind :: !Text

@@ -2777,9 +2777,9 @@ data ACLRule = ACLRule

2777-- * 'arScope'

2778--

2779-- * 'arId'

2780−aCLRule

2780+aclRule

2781 :: ACLRule

2782−aCLRule =

2782+aclRule =

2783 ACLRule

2784 { _arEtag = Nothing

2785 , _arKind = "calendar#aclRule"

@@ -3002,68 +3002,67 @@ instance ToJSON FreeBusyGroup where

3002 ("errors" .=) <$> _fbgErrors])

3003

3004--

3005−-- /See:/ 'aCL' smart constructor.

3005+-- /See:/ 'acl' smart constructor.

3006data ACL = ACL

3007− { _aclEtag :: !(Maybe Text)

3007+ { _aEtag :: !(Maybe Text)

3008− , _aclNextPageToken :: !(Maybe Text)

3008+ , _aNextPageToken :: !(Maybe Text)

3009− , _aclKind :: !Text

3009+ , _aKind :: !Text

3010− , _aclItems :: !(Maybe [ACLRule])

3010+ , _aItems :: !(Maybe [ACLRule])

3011− , _aclNextSyncToken :: !(Maybe Text)

3011+ , _aNextSyncToken :: !(Maybe Text)

3012 } deriving (Eq,Read,Show,Data,Typeable,Generic)

3013

3014-- | Creates a value of 'ACL' with the minimum fields required to make a request.

3015--

3016-- Use one of the following lenses to modify other fields as desired:

3017--

3018−-- * 'aclEtag'

3018+-- * 'aEtag'

3019--

3020−-- * 'aclNextPageToken'

3020+-- * 'aNextPageToken'

3021--

3022−-- * 'aclKind'

3022+-- * 'aKind'

3023--

3024−-- * 'aclItems'

3024+-- * 'aItems'

3025--

3026−-- * 'aclNextSyncToken'

3026+-- * 'aNextSyncToken'

3027−aCL

3027+acl

3028 :: ACL

3029−aCL =

3029+acl =

3030 ACL

3031− { _aclEtag = Nothing

3031+ { _aEtag = Nothing

3032− , _aclNextPageToken = Nothing

3032+ , _aNextPageToken = Nothing

3033− , _aclKind = "calendar#acl"

3033+ , _aKind = "calendar#acl"

3034− , _aclItems = Nothing

3034+ , _aItems = Nothing

3035− , _aclNextSyncToken = Nothing

3035+ , _aNextSyncToken = Nothing

3036 }

3037

3038-- | ETag of the collection.

3039−aclEtag :: Lens' ACL (Maybe Text)

3039+aEtag :: Lens' ACL (Maybe Text)

3040−aclEtag = lens _aclEtag (\ s a -> s{_aclEtag = a})

3040+aEtag = lens _aEtag (\ s a -> s{_aEtag = a})

3041

3042-- | Token used to access the next page of this result. Omitted if no further

3043-- results are available, in which case nextSyncToken is provided.

3044−aclNextPageToken :: Lens' ACL (Maybe Text)

3044+aNextPageToken :: Lens' ACL (Maybe Text)

3045−aclNextPageToken

3045+aNextPageToken

3046− = lens _aclNextPageToken

3046+ = lens _aNextPageToken

3047− (\ s a -> s{_aclNextPageToken = a})

3047+ (\ s a -> s{_aNextPageToken = a})

3048

3049-- | Type of the collection (\"calendar#acl\").

3050−aclKind :: Lens' ACL Text

3050+aKind :: Lens' ACL Text

3051−aclKind = lens _aclKind (\ s a -> s{_aclKind = a})

3051+aKind = lens _aKind (\ s a -> s{_aKind = a})

3052

3053-- | List of rules on the access control list.

3054−aclItems :: Lens' ACL [ACLRule]

3054+aItems :: Lens' ACL [ACLRule]

3055−aclItems

3055+aItems

3056− = lens _aclItems (\ s a -> s{_aclItems = a}) .

3057− _Default

3056+ = lens _aItems (\ s a -> s{_aItems = a}) . _Default .

3058− . _Coerce

3057+ _Coerce

3059

3058

3060-- | Token used at a later point in time to retrieve only the entries that

3059-- | Token used at a later point in time to retrieve only the entries that

3061-- have changed since this result was returned. Omitted if further results

3060-- have changed since this result was returned. Omitted if further results

3062-- are available, in which case nextPageToken is provided.

3061-- are available, in which case nextPageToken is provided.

3063−aclNextSyncToken :: Lens' ACL (Maybe Text)

3062+aNextSyncToken :: Lens' ACL (Maybe Text)

3064−aclNextSyncToken

3063+aNextSyncToken

3065− = lens _aclNextSyncToken

3064+ = lens _aNextSyncToken

3066− (\ s a -> s{_aclNextSyncToken = a})

3065+ (\ s a -> s{_aNextSyncToken = a})

3067

3066

3068instance FromJSON ACL where

3067instance FromJSON ACL where

3069 parseJSON

3068 parseJSON

@@ -3079,11 +3078,10 @@ instance ToJSON ACL where

3079 toJSON ACL{..}

3078 toJSON ACL{..}

3080 = object

3079 = object

3081 (catMaybes

3080 (catMaybes

3082− [("etag" .=) <$> _aclEtag,

3081+ [("etag" .=) <$> _aEtag,

3083− ("nextPageToken" .=) <$> _aclNextPageToken,

3082+ ("nextPageToken" .=) <$> _aNextPageToken,

3084− Just ("kind" .= _aclKind),

3083+ Just ("kind" .= _aKind), ("items" .=) <$> _aItems,

3085− ("items" .=) <$> _aclItems,

3086− ("nextSyncToken" .=) <$> _aclNextSyncToken])

3084+ ("nextSyncToken" .=) <$> _aNextSyncToken])

3087

3085

3088-- | Source from which the event was created. For example, a web page, an

3086-- | Source from which the event was created. For example, a web page, an

3089-- email message or any document identifiable by an URL with HTTP or HTTPS

3087-- email message or any document identifiable by an URL with HTTP or HTTPS

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Delete.hs+10−10

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Delete

26 ACLDeleteResource

27

28 -- * Creating a Request

29− , aCLDelete'

29+ , aclDelete'

30 , ACLDelete'

31

32 -- * Request Lenses

@@ -53,14 +53,14 @@ type ACLDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes an access control rule.

62--

63−-- /See:/ 'aCLDelete'' smart constructor.

63+-- /See:/ 'aclDelete'' smart constructor.

64data ACLDelete' = ACLDelete'

65 { _adQuotaUser :: !(Maybe Text)

66 , _adCalendarId :: !Text

@@ -91,11 +91,11 @@ data ACLDelete' = ACLDelete'

91-- * 'adOAuthToken'

92--

93-- * 'adFields'

94−aCLDelete'

94+aclDelete'

95 :: Text -- ^ 'calendarId'

96 -> Text -- ^ 'ruleId'

97 -> ACLDelete'

98−aCLDelete' pAdCalendarId_ pAdRuleId_ =

98+aclDelete' pAdCalendarId_ pAdRuleId_ =

99 ACLDelete'

100 { _adQuotaUser = Nothing

101 , _adCalendarId = pAdCalendarId_

@@ -159,12 +159,12 @@ instance GoogleRequest ACLDelete' where

159 type Rs ACLDelete' = ()

160 request = requestWithRoute defReq appsCalendarURL

161 requestWithRoute r u ACLDelete'{..}

162+ = go _adCalendarId _adRuleId _adQuotaUser

162− = go _adQuotaUser _adCalendarId (Just _adPrettyPrint)

163+ (Just _adPrettyPrint)

163 _adUserIP

164 _adUserIP

164− _adRuleId

165+ _adFields

165 _adKey

166 _adKey

166 _adOAuthToken

167 _adOAuthToken

167− _adFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute (Proxy :: Proxy ACLDeleteResource)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Get.hs+10−10

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Get

26 ACLGetResource

27

28 -- * Creating a Request

29− , aCLGet'

29+ , aclGet'

30 , ACLGet'

31

32 -- * Request Lenses

@@ -53,14 +53,14 @@ type ACLGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] ACLRule

60

61-- | Returns an access control rule.

62--

63−-- /See:/ 'aCLGet'' smart constructor.

63+-- /See:/ 'aclGet'' smart constructor.

64data ACLGet' = ACLGet'

65 { _agQuotaUser :: !(Maybe Text)

66 , _agCalendarId :: !Text

@@ -91,11 +91,11 @@ data ACLGet' = ACLGet'

91-- * 'agOAuthToken'

92--

93-- * 'agFields'

94−aCLGet'

94+aclGet'

95 :: Text -- ^ 'calendarId'

96 -> Text -- ^ 'ruleId'

97 -> ACLGet'

98−aCLGet' pAgCalendarId_ pAgRuleId_ =

98+aclGet' pAgCalendarId_ pAgRuleId_ =

99 ACLGet'

100 { _agQuotaUser = Nothing

101 , _agCalendarId = pAgCalendarId_

@@ -159,12 +159,12 @@ instance GoogleRequest ACLGet' where

159 type Rs ACLGet' = ACLRule

160 request = requestWithRoute defReq appsCalendarURL

161 requestWithRoute r u ACLGet'{..}

162+ = go _agCalendarId _agRuleId _agQuotaUser

162− = go _agQuotaUser _agCalendarId (Just _agPrettyPrint)

163+ (Just _agPrettyPrint)

163 _agUserIP

164 _agUserIP

164− _agRuleId

165+ _agFields

165 _agKey

166 _agKey

166 _agOAuthToken

167 _agOAuthToken

167− _agFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute (Proxy :: Proxy ACLGetResource) r u

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+9−9

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Insert

26 ACLInsertResource

27

28 -- * Creating a Request

29− , aCLInsert'

29+ , aclInsert'

30 , ACLInsert'

31

32 -- * Request Lenses

@@ -52,15 +52,15 @@ type ACLInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] ACLRule :> Post '[JSON] ACLRule

60

61-- | Creates an access control rule.

62--

63−-- /See:/ 'aCLInsert'' smart constructor.

63+-- /See:/ 'aclInsert'' smart constructor.

64data ACLInsert' = ACLInsert'

65 { _aiQuotaUser :: !(Maybe Text)

66 , _aiCalendarId :: !Text

@@ -91,11 +91,11 @@ data ACLInsert' = ACLInsert'

91-- * 'aiOAuthToken'

92--

93-- * 'aiFields'

94−aCLInsert'

94+aclInsert'

95 :: Text -- ^ 'calendarId'

96 -> ACLRule -- ^ 'ACLRule'

97 -> ACLInsert'

98−aCLInsert' pAiCalendarId_ pAiACLRule_ =

98+aclInsert' pAiCalendarId_ pAiACLRule_ =

99 ACLInsert'

100 { _aiQuotaUser = Nothing

101 , _aiCalendarId = pAiCalendarId_

@@ -160,11 +160,11 @@ instance GoogleRequest ACLInsert' where

160 type Rs ACLInsert' = ACLRule

161 request = requestWithRoute defReq appsCalendarURL

162 requestWithRoute r u ACLInsert'{..}

163− = go _aiQuotaUser _aiCalendarId (Just _aiPrettyPrint)

163+ = go _aiCalendarId _aiQuotaUser (Just _aiPrettyPrint)

164 _aiUserIP

165+ _aiFields

165 _aiKey

166 _aiKey

166 _aiOAuthToken

167 _aiOAuthToken

167− _aiFields

168 (Just AltJSON)

169 _aiACLRule

170 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+19−19

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.List

26 ACLListResource

27

28 -- * Creating a Request

29− , aCLList'

29+ , aclList'

30 , ACLList'

31

32 -- * Request Lenses

@@ -52,21 +52,21 @@ type ACLListResource =

52 "calendars" :>

53 Capture "calendarId" Text :>

54 "acl" :>

55− QueryParam "syncToken" Text :>

55+ QueryParam "maxResults" Int32 :>

56− QueryParam "quotaUser" Text :>

56+ QueryParam "pageToken" Text :>

57− QueryParam "prettyPrint" Bool :>

57+ QueryParam "showDeleted" Bool :>

58− QueryParam "userIp" Text :>

58+ QueryParam "syncToken" Text :>

59− QueryParam "showDeleted" Bool :>

59+ QueryParam "quotaUser" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "prettyPrint" Bool :>

61− QueryParam "pageToken" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Int32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Get '[JSON] ACL

66

67-- | Returns the rules in the access control list for the calendar.

68--

69−-- /See:/ 'aCLList'' smart constructor.

69+-- /See:/ 'aclList'' smart constructor.

70data ACLList' = ACLList'

71 { _alSyncToken :: !(Maybe Text)

72 , _alQuotaUser :: !(Maybe Text)

@@ -106,10 +106,10 @@ data ACLList' = ACLList'

106-- * 'alMaxResults'

107--

108-- * 'alFields'

109−aCLList'

109+aclList'

110 :: Text -- ^ 'calendarId'

111 -> ACLList'

112−aCLList' pAlCalendarId_ =

112+aclList' pAlCalendarId_ =

113 ACLList'

114 { _alSyncToken = Nothing

115 , _alQuotaUser = Nothing

@@ -205,15 +205,15 @@ instance GoogleRequest ACLList' where

205 type Rs ACLList' = ACL

206 request = requestWithRoute defReq appsCalendarURL

207 requestWithRoute r u ACLList'{..}

208+ = go _alMaxResults _alPageToken _alShowDeleted

208− = go _alSyncToken _alQuotaUser _alCalendarId

209+ _alSyncToken

210+ _alCalendarId

211+ _alQuotaUser

209 (Just _alPrettyPrint)

212 (Just _alPrettyPrint)

210 _alUserIP

213 _alUserIP

211− _alShowDeleted

214+ _alFields

212 _alKey

215 _alKey

213− _alPageToken

214 _alOAuthToken

216 _alOAuthToken

215− _alMaxResults

216− _alFields

217 (Just AltJSON)

218 where go

219 = clientWithRoute (Proxy :: Proxy ACLListResource) r

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+10−10

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Patch

26 ACLPatchResource

27

28 -- * Creating a Request

29− , aCLPatch'

29+ , aclPatch'

30 , ACLPatch'

31

32 -- * Request Lenses

@@ -54,15 +54,15 @@ type ACLPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] ACLRule :> Patch '[JSON] ACLRule

62

63-- | Updates an access control rule. This method supports patch semantics.

64--

65−-- /See:/ 'aCLPatch'' smart constructor.

65+-- /See:/ 'aclPatch'' smart constructor.

66data ACLPatch' = ACLPatch'

67 { _apQuotaUser :: !(Maybe Text)

68 , _apCalendarId :: !Text

@@ -96,12 +96,12 @@ data ACLPatch' = ACLPatch'

96-- * 'apOAuthToken'

97--

98-- * 'apFields'

99−aCLPatch'

99+aclPatch'

100 :: Text -- ^ 'calendarId'

101 -> Text -- ^ 'ruleId'

102 -> ACLRule -- ^ 'ACLRule'

103 -> ACLPatch'

104−aCLPatch' pApCalendarId_ pApRuleId_ pApACLRule_ =

104+aclPatch' pApCalendarId_ pApRuleId_ pApACLRule_ =

105 ACLPatch'

106 { _apQuotaUser = Nothing

107 , _apCalendarId = pApCalendarId_

@@ -171,12 +171,12 @@ instance GoogleRequest ACLPatch' where

171 type Rs ACLPatch' = ACLRule

172 request = requestWithRoute defReq appsCalendarURL

173 requestWithRoute r u ACLPatch'{..}

174+ = go _apCalendarId _apRuleId _apQuotaUser

174− = go _apQuotaUser _apCalendarId (Just _apPrettyPrint)

175+ (Just _apPrettyPrint)

175 _apUserIP

176 _apUserIP

176− _apRuleId

177+ _apFields

177 _apKey

178 _apKey

178 _apOAuthToken

179 _apOAuthToken

179− _apFields

180 (Just AltJSON)

181 _apACLRule

182 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+10−10

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Update

26 ACLUpdateResource

27

28 -- * Creating a Request

29− , aCLUpdate'

29+ , aclUpdate'

30 , ACLUpdate'

31

32 -- * Request Lenses

@@ -54,15 +54,15 @@ type ACLUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] ACLRule :> Put '[JSON] ACLRule

62

63-- | Updates an access control rule.

64--

65−-- /See:/ 'aCLUpdate'' smart constructor.

65+-- /See:/ 'aclUpdate'' smart constructor.

66data ACLUpdate' = ACLUpdate'

67 { _auQuotaUser :: !(Maybe Text)

68 , _auCalendarId :: !Text

@@ -96,12 +96,12 @@ data ACLUpdate' = ACLUpdate'

96-- * 'auOAuthToken'

97--

98-- * 'auFields'

99−aCLUpdate'

99+aclUpdate'

100 :: Text -- ^ 'calendarId'

101 -> Text -- ^ 'ruleId'

102 -> ACLRule -- ^ 'ACLRule'

103 -> ACLUpdate'

104−aCLUpdate' pAuCalendarId_ pAuRuleId_ pAuACLRule_ =

104+aclUpdate' pAuCalendarId_ pAuRuleId_ pAuACLRule_ =

105 ACLUpdate'

106 { _auQuotaUser = Nothing

107 , _auCalendarId = pAuCalendarId_

@@ -171,12 +171,12 @@ instance GoogleRequest ACLUpdate' where

171 type Rs ACLUpdate' = ACLRule

172 request = requestWithRoute defReq appsCalendarURL

173 requestWithRoute r u ACLUpdate'{..}

174+ = go _auCalendarId _auRuleId _auQuotaUser

174− = go _auQuotaUser _auCalendarId (Just _auPrettyPrint)

175+ (Just _auPrettyPrint)

175 _auUserIP

176 _auUserIP

176− _auRuleId

177+ _auFields

177 _auKey

178 _auKey

178 _auOAuthToken

179 _auOAuthToken

179− _auFields

180 (Just AltJSON)

181 _auACLRule

182 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+19−19

@@ -26,7 +26,7 @@ module Network.Google.Resource.Calendar.ACL.Watch

26 ACLWatchResource

27

28 -- * Creating a Request

29− , aCLWatch'

29+ , aclWatch'

30 , ACLWatch'

31

32 -- * Request Lenses

@@ -54,23 +54,23 @@ type ACLWatchResource =

54 Capture "calendarId" Text :>

55 "acl" :>

56 "watch" :>

57− QueryParam "syncToken" Text :>

57+ QueryParam "maxResults" Int32 :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "pageToken" Text :>

59− QueryParam "prettyPrint" Bool :>

59+ QueryParam "showDeleted" Bool :>

60− QueryParam "userIp" Text :>

60+ QueryParam "syncToken" Text :>

61− QueryParam "showDeleted" Bool :>

61+ QueryParam "quotaUser" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "prettyPrint" Bool :>

63− QueryParam "pageToken" Text :>

63+ QueryParam "userIp" Text :>

64+ QueryParam "fields" Text :>

65+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

66+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "maxResults" Int32 :>

66− QueryParam "fields" Text :>

67 QueryParam "alt" AltJSON :>

68 ReqBody '[JSON] Channel :>

69 Post '[JSON] Channel

70

71-- | Watch for changes to ACL resources.

72--

73−-- /See:/ 'aCLWatch'' smart constructor.

73+-- /See:/ 'aclWatch'' smart constructor.

74data ACLWatch' = ACLWatch'

75 { _awSyncToken :: !(Maybe Text)

76 , _awQuotaUser :: !(Maybe Text)

@@ -113,11 +113,11 @@ data ACLWatch' = ACLWatch'

113-- * 'awMaxResults'

114--

115-- * 'awFields'

116−aCLWatch'

116+aclWatch'

117 :: Text -- ^ 'calendarId'

118 -> Channel -- ^ 'Channel'

119 -> ACLWatch'

120−aCLWatch' pAwCalendarId_ pAwChannel_ =

120+aclWatch' pAwCalendarId_ pAwChannel_ =

121 ACLWatch'

122 { _awSyncToken = Nothing

123 , _awQuotaUser = Nothing

@@ -219,15 +219,15 @@ instance GoogleRequest ACLWatch' where

219 type Rs ACLWatch' = Channel

220 request = requestWithRoute defReq appsCalendarURL

221 requestWithRoute r u ACLWatch'{..}

222+ = go _awMaxResults _awPageToken _awShowDeleted

222− = go _awSyncToken _awQuotaUser _awCalendarId

223+ _awSyncToken

224+ _awCalendarId

225+ _awQuotaUser

223 (Just _awPrettyPrint)

226 (Just _awPrettyPrint)

224 _awUserIP

227 _awUserIP

225− _awShowDeleted

228+ _awFields

226 _awKey

229 _awKey

227− _awPageToken

228 _awOAuthToken

230 _awOAuthToken

229− _awMaxResults

230− _awFields

231 (Just AltJSON)

232 _awChannel

233 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Delete.hs+5−5

@@ -52,9 +52,9 @@ type CalendarListDeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60-- | Deletes an entry on the user\'s calendar list.

@@ -153,12 +153,12 @@ instance GoogleRequest CalendarListDelete' where

153 type Rs CalendarListDelete' = ()

154 request = requestWithRoute defReq appsCalendarURL

155 requestWithRoute r u CalendarListDelete'{..}

156− = go _cldQuotaUser _cldCalendarId

156+ = go _cldCalendarId _cldQuotaUser

157 (Just _cldPrettyPrint)

158 _cldUserIP

159+ _cldFields

159 _cldKey

160 _cldKey

160 _cldOAuthToken

161 _cldOAuthToken

161− _cldFields

162 (Just AltJSON)

163 where go

164 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Get.hs+5−5

@@ -52,9 +52,9 @@ type CalendarListGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 Get '[JSON] CalendarListEntry

60

@@ -154,12 +154,12 @@ instance GoogleRequest CalendarListGet' where

154 type Rs CalendarListGet' = CalendarListEntry

155 request = requestWithRoute defReq appsCalendarURL

156 requestWithRoute r u CalendarListGet'{..}

157− = go _clgQuotaUser _clgCalendarId

157+ = go _clgCalendarId _clgQuotaUser

158 (Just _clgPrettyPrint)

159 _clgUserIP

160+ _clgFields

160 _clgKey

161 _clgKey

161 _clgOAuthToken

162 _clgOAuthToken

162− _clgFields

163 (Just AltJSON)

164 where go

165 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Insert.hs+11−10

@@ -49,13 +49,13 @@ type CalendarListInsertResource =

49 "users" :>

50 "me" :>

51 "calendarList" :>

52+ QueryParam "colorRgbFormat" Bool :>

52− QueryParam "quotaUser" Text :>

53+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

54+ QueryParam "prettyPrint" Bool :>

55− QueryParam "colorRgbFormat" Bool :>

55+ QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] CalendarListEntry :>

61 Post '[JSON] CalendarListEntry

@@ -167,11 +167,12 @@ instance GoogleRequest CalendarListInsert' where

167 type Rs CalendarListInsert' = CalendarListEntry

168 request = requestWithRoute defReq appsCalendarURL

169 requestWithRoute r u CalendarListInsert'{..}

170+ = go _cliColorRgbFormat _cliQuotaUser

170− = go _cliQuotaUser (Just _cliPrettyPrint) _cliUserIP

171+ (Just _cliPrettyPrint)

171− _cliColorRgbFormat

172+ _cliUserIP

173+ _cliFields

172 _cliKey

174 _cliKey

173 _cliOAuthToken

175 _cliOAuthToken

174− _cliFields

175 (Just AltJSON)

176 (Just AltJSON)

176 _cliCalendarListEntry

177 _cliCalendarListEntry

177 where go

178 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/List.hs+20−21

@@ -53,20 +53,20 @@ type CalendarListListResource =

53 "users" :>

54 "me" :>

55 "calendarList" :>

56− QueryParam "syncToken" Text :>

56+ QueryParam "maxResults" Int32 :>

57− QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

59− QueryParam "minAccessRole"

57+ QueryParam "minAccessRole"

60− CalendarCalendarListListMinAccessRole

58+ CalendarCalendarListListMinAccessRole

61− :>

59+ :>

60+ QueryParam "pageToken" Text :>

61+ QueryParam "showDeleted" Bool :>

62− QueryParam "userIp" Text :>

62+ QueryParam "showHidden" Bool :>

63− QueryParam "showDeleted" Bool :>

63+ QueryParam "syncToken" Text :>

64− QueryParam "showHidden" Bool :>

64+ QueryParam "quotaUser" Text :>

65− QueryParam "key" Key :>

65+ QueryParam "prettyPrint" Bool :>

66− QueryParam "pageToken" Text :>

66+ QueryParam "userIp" Text :>

67+ QueryParam "fields" Text :>

68+ QueryParam "key" Key :>

67− QueryParam "oauth_token" OAuthToken :>

69+ QueryParam "oauth_token" OAuthToken :>

68− QueryParam "maxResults" Int32 :>

69− QueryParam "fields" Text :>

70 QueryParam "alt" AltJSON :>

71 Get '[JSON] CalendarList

72

@@ -227,17 +227,16 @@ instance GoogleRequest CalendarListList' where

227 type Rs CalendarListList' = CalendarList

228 request = requestWithRoute defReq appsCalendarURL

229 requestWithRoute r u CalendarListList'{..}

230− = go _cllSyncToken _cllQuotaUser

231− (Just _cllPrettyPrint)

232− _cllMinAccessRole

230+ = go _cllMaxResults _cllMinAccessRole _cllPageToken

233− _cllUserIP

234 _cllShowDeleted

231 _cllShowDeleted

235 _cllShowHidden

232 _cllShowHidden

233+ _cllSyncToken

234+ _cllQuotaUser

235+ (Just _cllPrettyPrint)

236+ _cllUserIP

237+ _cllFields

236 _cllKey

238 _cllKey

237− _cllPageToken

238 _cllOAuthToken

239 _cllOAuthToken

239− _cllMaxResults

240− _cllFields

241 (Just AltJSON)

240 (Just AltJSON)

242 where go

241 where go

243 = clientWithRoute

242 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Patch.hs+9−10

@@ -52,13 +52,13 @@ type CalendarListPatchResource =

52 "me" :>

53 "calendarList" :>

54 Capture "calendarId" Text :>

55+ QueryParam "colorRgbFormat" Bool :>

55− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

57+ QueryParam "prettyPrint" Bool :>

58− QueryParam "colorRgbFormat" Bool :>

58+ QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] CalendarListEntry :>

64 Patch '[JSON] CalendarListEntry

@@ -184,13 +184,12 @@ instance GoogleRequest CalendarListPatch' where

184 type Rs CalendarListPatch' = CalendarListEntry

185 request = requestWithRoute defReq appsCalendarURL

186 requestWithRoute r u CalendarListPatch'{..}

187− = go _clpQuotaUser _clpCalendarId

187+ = go _clpColorRgbFormat _clpCalendarId _clpQuotaUser

188 (Just _clpPrettyPrint)

189 _clpUserIP

190− _clpColorRgbFormat

190+ _clpFields

191 _clpKey

192 _clpOAuthToken

193− _clpFields

194 (Just AltJSON)

193 (Just AltJSON)

195 _clpCalendarListEntry

194 _clpCalendarListEntry

196 where go

195 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Update.hs+9−10

@@ -51,13 +51,13 @@ type CalendarListUpdateResource =

51 "me" :>

52 "calendarList" :>

53 Capture "calendarId" Text :>

54+ QueryParam "colorRgbFormat" Bool :>

54− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

56+ QueryParam "prettyPrint" Bool :>

57− QueryParam "colorRgbFormat" Bool :>

57+ QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] CalendarListEntry :>

63 Put '[JSON] CalendarListEntry

@@ -182,13 +182,12 @@ instance GoogleRequest CalendarListUpdate' where

182 type Rs CalendarListUpdate' = CalendarListEntry

183 request = requestWithRoute defReq appsCalendarURL

184 requestWithRoute r u CalendarListUpdate'{..}

185− = go _cluQuotaUser _cluCalendarId

185+ = go _cluColorRgbFormat _cluCalendarId _cluQuotaUser

186 (Just _cluPrettyPrint)

187 _cluUserIP

188− _cluColorRgbFormat

188+ _cluFields

189 _cluKey

190 _cluOAuthToken

191− _cluFields

192 (Just AltJSON)

191 (Just AltJSON)

193 _cluCalendarListEntry

192 _cluCalendarListEntry

194 where go

193 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Watch.hs+20−21

@@ -55,20 +55,20 @@ type CalendarListWatchResource =

55 "me" :>

56 "calendarList" :>

57 "watch" :>

58− QueryParam "syncToken" Text :>

58+ QueryParam "maxResults" Int32 :>

59− QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61− QueryParam "minAccessRole"

59+ QueryParam "minAccessRole"

62− CalendarCalendarListWatchMinAccessRole

60+ CalendarCalendarListWatchMinAccessRole

63− :>

61+ :>

62+ QueryParam "pageToken" Text :>

63+ QueryParam "showDeleted" Bool :>

64− QueryParam "userIp" Text :>

64+ QueryParam "showHidden" Bool :>

65− QueryParam "showDeleted" Bool :>

65+ QueryParam "syncToken" Text :>

66− QueryParam "showHidden" Bool :>

66+ QueryParam "quotaUser" Text :>

67− QueryParam "key" Key :>

67+ QueryParam "prettyPrint" Bool :>

68− QueryParam "pageToken" Text :>

68+ QueryParam "userIp" Text :>

69+ QueryParam "fields" Text :>

70+ QueryParam "key" Key :>

69− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "oauth_token" OAuthToken :>

70− QueryParam "maxResults" Int32 :>

71− QueryParam "fields" Text :>

72 QueryParam "alt" AltJSON :>

73 ReqBody '[JSON] Channel :>

74 Post '[JSON] Channel

@@ -240,17 +240,16 @@ instance GoogleRequest CalendarListWatch' where

240 type Rs CalendarListWatch' = Channel

241 request = requestWithRoute defReq appsCalendarURL

242 requestWithRoute r u CalendarListWatch'{..}

243− = go _clwSyncToken _clwQuotaUser

244− (Just _clwPrettyPrint)

245− _clwMinAccessRole

243+ = go _clwMaxResults _clwMinAccessRole _clwPageToken

246− _clwUserIP

247 _clwShowDeleted

244 _clwShowDeleted

248 _clwShowHidden

245 _clwShowHidden

246+ _clwSyncToken

247+ _clwQuotaUser

248+ (Just _clwPrettyPrint)

249+ _clwUserIP

250+ _clwFields

249 _clwKey

251 _clwKey

250− _clwPageToken

251 _clwOAuthToken

252 _clwOAuthToken

252− _clwMaxResults

253− _clwFields

254 (Just AltJSON)

253 (Just AltJSON)

255 _clwChannel

254 _clwChannel

256 where go

255 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Clear.hs+5−5

@@ -52,9 +52,9 @@ type CalendarsClearResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Post '[JSON] ()

59

60-- | Clears a primary calendar. This operation deletes all events associated

@@ -150,11 +150,11 @@ instance GoogleRequest CalendarsClear' where

150 type Rs CalendarsClear' = ()

151 request = requestWithRoute defReq appsCalendarURL

152 requestWithRoute r u CalendarsClear'{..}

153− = go _ccQuotaUser _ccCalendarId (Just _ccPrettyPrint)

153+ = go _ccCalendarId _ccQuotaUser (Just _ccPrettyPrint)

154 _ccUserIP

155+ _ccFields

155 _ccKey

156 _ccKey

156 _ccOAuthToken

157 _ccOAuthToken

157− _ccFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Delete.hs+5−5

@@ -51,9 +51,9 @@ type CalendarsDeleteResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :> Delete '[JSON] ()

58

59-- | Deletes a secondary calendar. Use calendars.clear for clearing all

@@ -149,11 +149,11 @@ instance GoogleRequest CalendarsDelete' where

149 type Rs CalendarsDelete' = ()

150 request = requestWithRoute defReq appsCalendarURL

151 requestWithRoute r u CalendarsDelete'{..}

152− = go _cdQuotaUser _cdCalendarId (Just _cdPrettyPrint)

152+ = go _cdCalendarId _cdQuotaUser (Just _cdPrettyPrint)

153 _cdUserIP

154+ _cdFields

154 _cdKey

155 _cdKey

155 _cdOAuthToken

156 _cdOAuthToken

156− _cdFields

157 (Just AltJSON)

158 where go

159 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Get.hs+5−5

@@ -50,9 +50,9 @@ type CalendarsGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Calendar

57

58-- | Returns metadata for a calendar.

@@ -146,11 +146,11 @@ instance GoogleRequest CalendarsGet' where

146 type Rs CalendarsGet' = Calendar

147 request = requestWithRoute defReq appsCalendarURL

148 requestWithRoute r u CalendarsGet'{..}

149− = go _cQuotaUser _cCalendarId (Just _cPrettyPrint)

149+ = go _cCalendarId _cQuotaUser (Just _cPrettyPrint)

150 _cUserIP

151+ _cFields

151 _cKey

152 _cKey

152 _cOAuthToken

153 _cOAuthToken

153− _cFields

154 (Just AltJSON)

155 where go

156 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Insert.hs+4−4

@@ -49,9 +49,9 @@ type CalendarsInsertResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] Calendar :> Post '[JSON] Calendar

57

@@ -146,9 +146,9 @@ instance GoogleRequest CalendarsInsert' where

146 request = requestWithRoute defReq appsCalendarURL

147 requestWithRoute r u CalendarsInsert'{..}

148 = go _ciQuotaUser (Just _ciPrettyPrint) _ciUserIP

149+ _ciFields

149 _ciKey

150 _ciKey

150 _ciOAuthToken

151 _ciOAuthToken

151− _ciFields

152 (Just AltJSON)

153 _ciCalendar

154 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Patch.hs+5−5

@@ -51,9 +51,9 @@ type CalendarsPatchResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Calendar :> Patch '[JSON] Calendar

59

@@ -159,11 +159,11 @@ instance GoogleRequest CalendarsPatch' where

159 type Rs CalendarsPatch' = Calendar

160 request = requestWithRoute defReq appsCalendarURL

161 requestWithRoute r u CalendarsPatch'{..}

162− = go _cpQuotaUser _cpCalendarId (Just _cpPrettyPrint)

162+ = go _cpCalendarId _cpQuotaUser (Just _cpPrettyPrint)

163 _cpUserIP

164+ _cpFields

164 _cpKey

165 _cpKey

165 _cpOAuthToken

166 _cpOAuthToken

166− _cpFields

167 (Just AltJSON)

168 _cpCalendar

169 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Update.hs+5−5

@@ -51,9 +51,9 @@ type CalendarsUpdateResource =

51 QueryParam "quotaUser" Text :>

52 QueryParam "prettyPrint" Bool :>

53 QueryParam "userIp" Text :>

54− QueryParam "key" Key :>

54+ QueryParam "fields" Text :>

55+ QueryParam "key" Key :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Calendar :> Put '[JSON] Calendar

59

@@ -159,11 +159,11 @@ instance GoogleRequest CalendarsUpdate' where

159 type Rs CalendarsUpdate' = Calendar

160 request = requestWithRoute defReq appsCalendarURL

161 requestWithRoute r u CalendarsUpdate'{..}

162− = go _cuQuotaUser _cuCalendarId (Just _cuPrettyPrint)

162+ = go _cuCalendarId _cuQuotaUser (Just _cuPrettyPrint)

163 _cuUserIP

164+ _cuFields

164 _cuKey

165 _cuKey

165 _cuOAuthToken

166 _cuOAuthToken

166− _cuFields

167 (Just AltJSON)

168 _cuCalendar

169 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Channels/Stop.hs+4−4

@@ -50,9 +50,9 @@ type ChannelsStopResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :>

57 ReqBody '[JSON] Channel :> Post '[JSON] ()

58

@@ -147,9 +147,9 @@ instance GoogleRequest ChannelsStop' where

147 request = requestWithRoute defReq appsCalendarURL

148 requestWithRoute r u ChannelsStop'{..}

149 = go _csQuotaUser (Just _csPrettyPrint) _csUserIP

150+ _csFields

150 _csKey

151 _csKey

151 _csOAuthToken

152 _csOAuthToken

152− _csFields

153 (Just AltJSON)

154 _csChannel

155 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Colors/Get.hs+4−4

@@ -48,9 +48,9 @@ type ColorsGetResource =

48 QueryParam "quotaUser" Text :>

49 QueryParam "prettyPrint" Bool :>

50 QueryParam "userIp" Text :>

51− QueryParam "key" Key :>

51+ QueryParam "fields" Text :>

52+ QueryParam "key" Key :>

52− QueryParam "oauth_token" OAuthToken :>

53+ QueryParam "oauth_token" OAuthToken :>

53− QueryParam "fields" Text :>

54 QueryParam "alt" AltJSON :> Get '[JSON] Colors

55

56-- | Returns the color definitions for calendars and events.

@@ -134,9 +134,9 @@ instance GoogleRequest ColorsGet' where

134 request = requestWithRoute defReq appsCalendarURL

135 requestWithRoute r u ColorsGet'{..}

136 = go _cgQuotaUser (Just _cgPrettyPrint) _cgUserIP

137+ _cgFields

137 _cgKey

138 _cgKey

138 _cgOAuthToken

139 _cgOAuthToken

139− _cgFields

140 (Just AltJSON)

141 where go

142 = clientWithRoute (Proxy :: Proxy ColorsGetResource)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Delete.hs+11−11

@@ -51,13 +51,13 @@ type EventsDeleteResource =

51 Capture "calendarId" Text :>

52 "events" :>

53 Capture "eventId" Text :>

54+ QueryParam "sendNotifications" Bool :>

54− QueryParam "quotaUser" Text :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

58− QueryParam "sendNotifications" Bool :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Delete '[JSON] ()

62

63-- | Deletes an event.

@@ -173,13 +173,13 @@ instance GoogleRequest EventsDelete' where

173 type Rs EventsDelete' = ()

174 request = requestWithRoute defReq appsCalendarURL

175 requestWithRoute r u EventsDelete'{..}

176+ = go _edSendNotifications _edCalendarId _edEventId

177+ _edQuotaUser

176− = go _edQuotaUser _edCalendarId (Just _edPrettyPrint)

178+ (Just _edPrettyPrint)

177 _edUserIP

179 _edUserIP

180+ _edFields

178 _edKey

181 _edKey

179− _edSendNotifications

180 _edOAuthToken

182 _edOAuthToken

181− _edEventId

182− _edFields

183 (Just AltJSON)

184 where go

185 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Get.hs+16−15

@@ -53,15 +53,15 @@ type EventsGetResource =

53 Capture "calendarId" Text :>

54 "events" :>

55 Capture "eventId" Text :>

56− QueryParam "quotaUser" Text :>

56+ QueryParam "alwaysIncludeEmail" Bool :>

57− QueryParam "prettyPrint" Bool :>

57+ QueryParam "maxAttendees" Int32 :>

58− QueryParam "userIp" Text :>

58+ QueryParam "timeZone" Text :>

59− QueryParam "maxAttendees" Int32 :>

59+ QueryParam "quotaUser" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "prettyPrint" Bool :>

61− QueryParam "timeZone" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "alwaysIncludeEmail" Bool :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Get '[JSON] Event

66

67-- | Returns an event.

@@ -203,15 +203,16 @@ instance GoogleRequest EventsGet' where

203 type Rs EventsGet' = Event

204 request = requestWithRoute defReq appsCalendarURL

205 requestWithRoute r u EventsGet'{..}

206− = go _egQuotaUser _egCalendarId (Just _egPrettyPrint)

207− _egUserIP

208− _egMaxAttendees

206+ = go _egAlwaysIncludeEmail _egMaxAttendees

209− _egKey

210 _egTimeZone

207 _egTimeZone

211− _egOAuthToken

208+ _egCalendarId

212− _egAlwaysIncludeEmail

213 _egEventId

209 _egEventId

210+ _egQuotaUser

211+ (Just _egPrettyPrint)

212+ _egUserIP

214 _egFields

213 _egFields

214+ _egKey

215+ _egOAuthToken

215 (Just AltJSON)

216 (Just AltJSON)

216 where go

217 where go

217 = clientWithRoute (Proxy :: Proxy EventsGetResource)

218 = clientWithRoute (Proxy :: Proxy EventsGetResource)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Import.hs+10−10

@@ -52,13 +52,13 @@ type EventsImportResource =

52 Capture "calendarId" Text :>

53 "events" :>

54 "import" :>

55+ QueryParam "supportsAttachments" Bool :>

55− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "supportsAttachments" Bool :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] Event :> Post '[JSON] Event

64

@@ -174,12 +174,12 @@ instance GoogleRequest EventsImport' where

174 type Rs EventsImport' = Event

175 request = requestWithRoute defReq appsCalendarURL

176 requestWithRoute r u EventsImport'{..}

177+ = go _eSupportsAttachments _eCalendarId _eQuotaUser

177− = go _eQuotaUser _eCalendarId (Just _ePrettyPrint)

178+ (Just _ePrettyPrint)

178 _eUserIP

179 _eUserIP

180+ _eFields

179 _eKey

181 _eKey

180 _eOAuthToken

182 _eOAuthToken

181− _eSupportsAttachments

182− _eFields

183 (Just AltJSON)

184 _eEvent

185 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Insert.hs+14−14

@@ -52,15 +52,15 @@ type EventsInsertResource =

52 "calendars" :>

53 Capture "calendarId" Text :>

54 "events" :>

55− QueryParam "quotaUser" Text :>

55+ QueryParam "maxAttendees" Int32 :>

56− QueryParam "prettyPrint" Bool :>

56+ QueryParam "sendNotifications" Bool :>

57− QueryParam "userIp" Text :>

57+ QueryParam "supportsAttachments" Bool :>

58− QueryParam "maxAttendees" Int32 :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "sendNotifications" Bool :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "supportsAttachments" Bool :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Event :> Post '[JSON] Event

66

@@ -203,15 +203,15 @@ instance GoogleRequest EventsInsert' where

203 type Rs EventsInsert' = Event

204 request = requestWithRoute defReq appsCalendarURL

205 requestWithRoute r u EventsInsert'{..}

206+ = go _eveMaxAttendees _eveSendNotifications

207+ _eveSupportsAttachments

206− = go _eveQuotaUser _eveCalendarId

208+ _eveCalendarId

209+ _eveQuotaUser

207 (Just _evePrettyPrint)

210 (Just _evePrettyPrint)

208 _eveUserIP

211 _eveUserIP

209− _eveMaxAttendees

212+ _eveFields

210 _eveKey

213 _eveKey

211− _eveSendNotifications

212 _eveOAuthToken

214 _eveOAuthToken

213− _eveSupportsAttachments

214− _eveFields

215 (Just AltJSON)

216 _eveEvent

217 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Instances.hs+27−25

@@ -60,21 +60,22 @@ type EventsInstancesResource =

60 "events" :>

61 Capture "eventId" Text :>

62 "instances" :>

63− QueryParam "quotaUser" Text :>

63+ QueryParam "alwaysIncludeEmail" Bool :>

64− QueryParam "prettyPrint" Bool :>

64+ QueryParam "maxAttendees" Int32 :>

65− QueryParam "timeMin" UTCTime :>

65+ QueryParam "maxResults" Int32 :>

66− QueryParam "userIp" Text :>

66+ QueryParam "originalStart" Text :>

67− QueryParam "showDeleted" Bool :>

67+ QueryParam "pageToken" Text :>

68− QueryParam "originalStart" Text :>

68+ QueryParam "showDeleted" Bool :>

69− QueryParam "maxAttendees" Int32 :>

69+ QueryParam "timeMax" UTCTime :>

70− QueryParam "key" Key :>

70+ QueryParam "timeMin" UTCTime :>

71− QueryParam "pageToken" Text :>

71+ QueryParam "timeZone" Text :>

72− QueryParam "timeZone" Text :>

72+ QueryParam "quotaUser" Text :>

73− QueryParam "oauth_token" OAuthToken :>

73+ QueryParam "prettyPrint" Bool :>

74− QueryParam "maxResults" Int32 :>

74+ QueryParam "userIp" Text :>

75− QueryParam "alwaysIncludeEmail" Bool :>

75+ QueryParam "fields" Text :>

76− QueryParam "timeMax" UTCTime :>

76+ QueryParam "key" Key :>

77− QueryParam "fields" Text :>

77+ QueryParam "oauth_token" OAuthToken

78+ :>

78 QueryParam "alt" AltJSON :>

79 QueryParam "alt" AltJSON :>

79 Get '[JSON] Events

80 Get '[JSON] Events

80

81

@@ -281,21 +282,22 @@ instance GoogleRequest EventsInstances' where

281 type Rs EventsInstances' = Events

282 type Rs EventsInstances' = Events

282 request = requestWithRoute defReq appsCalendarURL

283 request = requestWithRoute defReq appsCalendarURL

283 requestWithRoute r u EventsInstances'{..}

284 requestWithRoute r u EventsInstances'{..}

284− = go _eiQuotaUser _eiCalendarId (Just _eiPrettyPrint)

285+ = go _eiAlwaysIncludeEmail _eiMaxAttendees

285− _eiTimeMin

286+ _eiMaxResults

286− _eiUserIP

287− _eiShowDeleted

288 _eiOriginalStart

287 _eiOriginalStart

289− _eiMaxAttendees

290− _eiKey

291 _eiPageToken

288 _eiPageToken

292− _eiTimeZone

289+ _eiShowDeleted

293− _eiOAuthToken

294− _eiMaxResults

295− _eiAlwaysIncludeEmail

296 _eiTimeMax

290 _eiTimeMax

291+ _eiTimeMin

292+ _eiTimeZone

293+ _eiCalendarId

297 _eiEventId

294 _eiEventId

295+ _eiQuotaUser

296+ (Just _eiPrettyPrint)

297+ _eiUserIP

298 _eiFields

299+ _eiKey

300+ _eiOAuthToken

299 (Just AltJSON)

301 (Just AltJSON)

300 where go

302 where go

301 = clientWithRoute

303 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+37−46

@@ -65,39 +65,30 @@ type EventsListResource =

65 "calendars" :>

66 Capture "calendarId" Text :>

67 "events" :>

68− QueryParam "syncToken" Text :>

68+ QueryParam "alwaysIncludeEmail" Bool :>

69− QueryParam "quotaUser" Text :>

69+ QueryParam "iCalUID" Text :>

70− QueryParam "prettyPrint" Bool :>

70+ QueryParam "maxAttendees" Int32 :>

71− QueryParam "timeMin" UTCTime :>

71+ QueryParam "maxResults" Int32 :>

72 QueryParam "orderBy" CalendarEventsListOrderBy :>

73− QueryParam "singleEvents" Bool :>

73+ QueryParam "pageToken" Text :>

74 QueryParams "privateExtendedProperty" Text :>

75− QueryParam "userIp" Text :>

75+ QueryParam "q" Text :>

76+ QueryParams "sharedExtendedProperty" Text :>

76− QueryParam "showDeleted" Bool :>

77+ QueryParam "showDeleted" Bool :>

77− QueryParam "q" Text :>

78+ QueryParam "showHiddenInvitations" Bool :>

78− QueryParams "sharedExtendedProperty" Text :>

79+ QueryParam "singleEvents" Bool :>

79− QueryParam "maxAttendees" Int32 :>

80− QueryParam "key" Key :>

80+ QueryParam "syncToken" Text :>

81− QueryParam "iCalUID" Text :>

81+ QueryParam "timeMax" UTCTime :>

82− QueryParam "updatedMin" UTCTime :>

82+ QueryParam "timeMin" UTCTime :>

83− QueryParam "pageToken" Text :>

83+ QueryParam "timeZone" Text :>

84− QueryParam "timeZone" Text :>

84+ QueryParam "updatedMin" UTCTime :>

85+ QueryParam "quotaUser" Text :>

86+ QueryParam "prettyPrint" Bool :>

87+ QueryParam "userIp" Text :>

88+ QueryParam "fields" Text :>

89+ QueryParam "key" Key :>

90+ QueryParam "oauth_token"

85− QueryParam "oauth_token" OAuthToken

91+ OAuthToken

86− :>

87− QueryParam

88− "showHiddenInvitations"

89− Bool

90− :>

91− QueryParam "maxResults" Int32

92− :>

93− QueryParam

94− "alwaysIncludeEmail"

95− Bool

96− :>

97− QueryParam "timeMax"

98− UTCTime

99− :>

100− QueryParam "fields" Text

101 :>

92 :>

102 QueryParam "alt"

93 QueryParam "alt"

103 AltJSON

94 AltJSON

@@ -401,28 +392,28 @@ instance GoogleRequest EventsList' where

401 type Rs EventsList' = Events

392 type Rs EventsList' = Events

402 request = requestWithRoute defReq appsCalendarURL

393 request = requestWithRoute defReq appsCalendarURL

403 requestWithRoute r u EventsList'{..}

394 requestWithRoute r u EventsList'{..}

404− = go _elSyncToken _elQuotaUser _elCalendarId

395+ = go _elAlwaysIncludeEmail _elICalUId _elMaxAttendees

405− (Just _elPrettyPrint)

396+ _elMaxResults

406− _elTimeMin

407 _elOrderBy

397 _elOrderBy

408− _elSingleEvents

398+ _elPageToken

409 _elPrivateExtendedProperty

399 _elPrivateExtendedProperty

410− _elUserIP

411− _elShowDeleted

412 _elQ

400 _elQ

413 _elSharedExtendedProperty

401 _elSharedExtendedProperty

414− _elMaxAttendees

402+ _elShowDeleted

415− _elKey

416− _elICalUId

417− _elUpdatedMin

418− _elPageToken

419− _elTimeZone

420− _elOAuthToken

421 _elShowHiddenInvitations

403 _elShowHiddenInvitations

422− _elMaxResults

404+ _elSingleEvents

423− _elAlwaysIncludeEmail

405+ _elSyncToken

424 _elTimeMax

406 _elTimeMax

407+ _elTimeMin

408+ _elTimeZone

409+ _elUpdatedMin

410+ _elCalendarId

411+ _elQuotaUser

412+ (Just _elPrettyPrint)

413+ _elUserIP

425 _elFields

414 _elFields

415+ _elKey

416+ _elOAuthToken

426 (Just AltJSON)

417 (Just AltJSON)

427 where go

418 where go

428 = clientWithRoute (Proxy :: Proxy EventsListResource)

419 = clientWithRoute (Proxy :: Proxy EventsListResource)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Move.hs+12−12

@@ -53,14 +53,14 @@ type EventsMoveResource =

53 "events" :>

54 Capture "eventId" Text :>

55 "move" :>

56− QueryParam "destination" Text :>

56+ QueryParam "sendNotifications" Bool :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "destination" Text :>

58− QueryParam "prettyPrint" Bool :>

58+ QueryParam "quotaUser" Text :>

59+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

61− QueryParam "sendNotifications" Bool :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Post '[JSON] Event

65

66-- | Moves an event to another calendar, i.e. changes an event\'s organizer.

@@ -187,14 +187,14 @@ instance GoogleRequest EventsMove' where

187 type Rs EventsMove' = Event

188 request = requestWithRoute defReq appsCalendarURL

189 requestWithRoute r u EventsMove'{..}

190+ = go _emSendNotifications _emCalendarId _emEventId

190− = go (Just _emDestination) _emQuotaUser _emCalendarId

191+ (Just _emDestination)

192+ _emQuotaUser

191 (Just _emPrettyPrint)

193 (Just _emPrettyPrint)

192 _emUserIP

194 _emUserIP

195+ _emFields

193 _emKey

196 _emKey

194− _emSendNotifications

195 _emOAuthToken

197 _emOAuthToken

196− _emEventId

197− _emFields

198 (Just AltJSON)

199 where go

200 = clientWithRoute (Proxy :: Proxy EventsMoveResource)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Patch.hs+17−16

@@ -55,16 +55,16 @@ type EventsPatchResource =

55 Capture "calendarId" Text :>

56 "events" :>

57 Capture "eventId" Text :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "alwaysIncludeEmail" Bool :>

59− QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

61− QueryParam "maxAttendees" Int32 :>

59+ QueryParam "maxAttendees" Int32 :>

60+ QueryParam "sendNotifications" Bool :>

61+ QueryParam "supportsAttachments" Bool :>

62− QueryParam "key" Key :>

62+ QueryParam "quotaUser" Text :>

63− QueryParam "sendNotifications" Bool :>

63+ QueryParam "prettyPrint" Bool :>

64− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "userIp" Text :>

65− QueryParam "supportsAttachments" Bool :>

65+ QueryParam "fields" Text :>

66− QueryParam "alwaysIncludeEmail" Bool :>

66+ QueryParam "key" Key :>

67− QueryParam "fields" Text :>

67+ QueryParam "oauth_token" OAuthToken :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] Event :> Patch '[JSON] Event

70

@@ -228,16 +228,17 @@ instance GoogleRequest EventsPatch' where

228 type Rs EventsPatch' = Event

229 request = requestWithRoute defReq appsCalendarURL

230 requestWithRoute r u EventsPatch'{..}

231− = go _epQuotaUser _epCalendarId (Just _epPrettyPrint)

232− _epUserIP

233− _epMaxAttendees

231+ = go _epAlwaysIncludeEmail _epMaxAttendees

234− _epKey

235 _epSendNotifications

232 _epSendNotifications

236− _epOAuthToken

237 _epSupportsAttachments

233 _epSupportsAttachments

238− _epAlwaysIncludeEmail

234+ _epCalendarId

239 _epEventId

235 _epEventId

236+ _epQuotaUser

237+ (Just _epPrettyPrint)

238+ _epUserIP

240 _epFields

239 _epFields

240+ _epKey

241+ _epOAuthToken

241 (Just AltJSON)

242 (Just AltJSON)

242 _epEvent

243 _epEvent

243 where go

244 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/QuickAdd.hs+12−12

@@ -51,14 +51,14 @@ type EventsQuickAddResource =

51 Capture "calendarId" Text :>

52 "events" :>

53 "quickAdd" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "sendNotifications" Bool :>

55− QueryParam "prettyPrint" Bool :>

55+ QueryParam "text" Text :>

56− QueryParam "text" Text :>

56+ QueryParam "quotaUser" Text :>

57+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

59− QueryParam "sendNotifications" Bool :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Post '[JSON] Event

63

64-- | Creates an event based on a simple text string.

@@ -177,14 +177,14 @@ instance GoogleRequest EventsQuickAdd' where

177 type Rs EventsQuickAdd' = Event

178 request = requestWithRoute defReq appsCalendarURL

179 requestWithRoute r u EventsQuickAdd'{..}

180− = go _eqaQuotaUser _eqaCalendarId

180+ = go _eqaSendNotifications _eqaCalendarId

181− (Just _eqaPrettyPrint)

182 (Just _eqaText)

181 (Just _eqaText)

182+ _eqaQuotaUser

183+ (Just _eqaPrettyPrint)

183 _eqaUserIP

184 _eqaUserIP

185+ _eqaFields

184 _eqaKey

186 _eqaKey

185− _eqaSendNotifications

186 _eqaOAuthToken

187 _eqaOAuthToken

187− _eqaFields

188 (Just AltJSON)

189 where go

190 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Update.hs+17−16

@@ -55,16 +55,16 @@ type EventsUpdateResource =

55 Capture "calendarId" Text :>

56 "events" :>

57 Capture "eventId" Text :>

58− QueryParam "quotaUser" Text :>

58+ QueryParam "alwaysIncludeEmail" Bool :>

59− QueryParam "prettyPrint" Bool :>

60− QueryParam "userIp" Text :>

61− QueryParam "maxAttendees" Int32 :>

59+ QueryParam "maxAttendees" Int32 :>

60+ QueryParam "sendNotifications" Bool :>

61+ QueryParam "supportsAttachments" Bool :>

62− QueryParam "key" Key :>

62+ QueryParam "quotaUser" Text :>

63− QueryParam "sendNotifications" Bool :>

63+ QueryParam "prettyPrint" Bool :>

64− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "userIp" Text :>

65− QueryParam "supportsAttachments" Bool :>

65+ QueryParam "fields" Text :>

66− QueryParam "alwaysIncludeEmail" Bool :>

66+ QueryParam "key" Key :>

67− QueryParam "fields" Text :>

67+ QueryParam "oauth_token" OAuthToken :>

68 QueryParam "alt" AltJSON :>

69 ReqBody '[JSON] Event :> Put '[JSON] Event

70

@@ -228,16 +228,17 @@ instance GoogleRequest EventsUpdate' where

228 type Rs EventsUpdate' = Event

229 request = requestWithRoute defReq appsCalendarURL

230 requestWithRoute r u EventsUpdate'{..}

231− = go _euQuotaUser _euCalendarId (Just _euPrettyPrint)

232− _euUserIP

233− _euMaxAttendees

231+ = go _euAlwaysIncludeEmail _euMaxAttendees

234− _euKey

235 _euSendNotifications

232 _euSendNotifications

236− _euOAuthToken

237 _euSupportsAttachments

233 _euSupportsAttachments

238− _euAlwaysIncludeEmail

234+ _euCalendarId

239 _euEventId

235 _euEventId

236+ _euQuotaUser

237+ (Just _euPrettyPrint)

238+ _euUserIP

240 _euFields

239 _euFields

240+ _euKey

241+ _euOAuthToken

241 (Just AltJSON)

242 (Just AltJSON)

242 _euEvent

243 _euEvent

243 where go

244 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+38−47

@@ -67,41 +67,32 @@ type EventsWatchResource =

67 Capture "calendarId" Text :>

68 "events" :>

69 "watch" :>

70− QueryParam "syncToken" Text :>

70+ QueryParam "alwaysIncludeEmail" Bool :>

71− QueryParam "quotaUser" Text :>

71+ QueryParam "iCalUID" Text :>

72− QueryParam "prettyPrint" Bool :>

72+ QueryParam "maxAttendees" Int32 :>

73− QueryParam "timeMin" UTCTime :>

73+ QueryParam "maxResults" Int32 :>

74 QueryParam "orderBy" CalendarEventsWatchOrderBy :>

75− QueryParam "singleEvents" Bool :>

75+ QueryParam "pageToken" Text :>

76 QueryParams "privateExtendedProperty" Text :>

77− QueryParam "userIp" Text :>

77+ QueryParam "q" Text :>

78+ QueryParams "sharedExtendedProperty" Text :>

78− QueryParam "showDeleted" Bool :>

79+ QueryParam "showDeleted" Bool :>

79− QueryParam "q" Text :>

80+ QueryParam "showHiddenInvitations" Bool :>

80− QueryParams "sharedExtendedProperty" Text :>

81+ QueryParam "singleEvents" Bool :>

81− QueryParam "maxAttendees" Int32 :>

82− QueryParam "key" Key :>

82+ QueryParam "syncToken" Text :>

83− QueryParam "iCalUID" Text :>

83+ QueryParam "timeMax" UTCTime :>

84− QueryParam "updatedMin" UTCTime :>

84+ QueryParam "timeMin" UTCTime :>

85− QueryParam "pageToken" Text :>

85+ QueryParam "timeZone" Text :>

86− QueryParam "timeZone" Text :>

86+ QueryParam "updatedMin" UTCTime :>

87− QueryParam "oauth_token"

87+ QueryParam "quotaUser" Text :>

88− OAuthToken

89− :>

90− QueryParam

88+ QueryParam "prettyPrint" Bool

91− "showHiddenInvitations"

92− Bool

93 :>

89 :>

94− QueryParam "maxResults" Int32

90+ QueryParam "userIp" Text :>

95− :>

96− QueryParam

97− "alwaysIncludeEmail"

98− Bool

99− :>

100− QueryParam "timeMax"

101− UTCTime

102− :>

103− QueryParam "fields"

91+ QueryParam "fields" Text :>

104− Text

92+ QueryParam "key" Key :>

93+ QueryParam

94+ "oauth_token"

95+ OAuthToken

105 :>

96 :>

106 QueryParam "alt"

97 QueryParam "alt"

107 AltJSON

98 AltJSON

@@ -420,28 +411,28 @@ instance GoogleRequest EventsWatch' where

420 type Rs EventsWatch' = Channel

411 type Rs EventsWatch' = Channel

421 request = requestWithRoute defReq appsCalendarURL

412 request = requestWithRoute defReq appsCalendarURL

422 requestWithRoute r u EventsWatch'{..}

413 requestWithRoute r u EventsWatch'{..}

423− = go _ewSyncToken _ewQuotaUser _ewCalendarId

414+ = go _ewAlwaysIncludeEmail _ewICalUId _ewMaxAttendees

424− (Just _ewPrettyPrint)

415+ _ewMaxResults

425− _ewTimeMin

426 _ewOrderBy

416 _ewOrderBy

427− _ewSingleEvents

417+ _ewPageToken

428 _ewPrivateExtendedProperty

418 _ewPrivateExtendedProperty

429− _ewUserIP

430− _ewShowDeleted

431 _ewQ

419 _ewQ

432 _ewSharedExtendedProperty

420 _ewSharedExtendedProperty

433− _ewMaxAttendees

421+ _ewShowDeleted

434− _ewKey

435− _ewICalUId

436− _ewUpdatedMin

437− _ewPageToken

438− _ewTimeZone

439− _ewOAuthToken

440 _ewShowHiddenInvitations

422 _ewShowHiddenInvitations

441− _ewMaxResults

423+ _ewSingleEvents

442− _ewAlwaysIncludeEmail

424+ _ewSyncToken

443 _ewTimeMax

425 _ewTimeMax

426+ _ewTimeMin

427+ _ewTimeZone

428+ _ewUpdatedMin

429+ _ewCalendarId

430+ _ewQuotaUser

431+ (Just _ewPrettyPrint)

432+ _ewUserIP

444 _ewFields

433 _ewFields

434+ _ewKey

435+ _ewOAuthToken

445 (Just AltJSON)

436 (Just AltJSON)

446 _ewChannel

437 _ewChannel

447 where go

438 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/FreeBusy/Query.hs+4−4

@@ -49,9 +49,9 @@ type FreeBusyQueryResource =

49 QueryParam "quotaUser" Text :>

50 QueryParam "prettyPrint" Bool :>

51 QueryParam "userIp" Text :>

52− QueryParam "key" Key :>

52+ QueryParam "fields" Text :>

53+ QueryParam "key" Key :>

53− QueryParam "oauth_token" OAuthToken :>

54+ QueryParam "oauth_token" OAuthToken :>

54− QueryParam "fields" Text :>

55 QueryParam "alt" AltJSON :>

56 ReqBody '[JSON] FreeBusyRequest :>

57 Post '[JSON] FreeBusyResponse

@@ -151,9 +151,9 @@ instance GoogleRequest FreeBusyQuery' where

151 request = requestWithRoute defReq appsCalendarURL

152 requestWithRoute r u FreeBusyQuery'{..}

153 = go _fbqQuotaUser (Just _fbqPrettyPrint) _fbqUserIP

154+ _fbqFields

154 _fbqKey

155 _fbqKey

155 _fbqOAuthToken

156 _fbqOAuthToken

156− _fbqFields

157 (Just AltJSON)

158 _fbqFreeBusyRequest

159 where go

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Get.hs+6−6

@@ -52,9 +52,9 @@ type SettingsGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] Setting

59

60-- | Returns a single user setting.

@@ -147,11 +147,11 @@ instance GoogleRequest SettingsGet' where

147 type Rs SettingsGet' = Setting

148 request = requestWithRoute defReq appsCalendarURL

149 requestWithRoute r u SettingsGet'{..}

150− = go _sgQuotaUser (Just _sgPrettyPrint) _sgUserIP

150+ = go _sgSetting _sgQuotaUser (Just _sgPrettyPrint)

151− _sgSetting

151+ _sgUserIP

152+ _sgFields

152 _sgKey

153 _sgKey

153 _sgOAuthToken

154 _sgOAuthToken

154− _sgFields

155 (Just AltJSON)

156 where go

157 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/List.hs+13−13

@@ -50,15 +50,15 @@ type SettingsListResource =

50 "users" :>

51 "me" :>

52 "settings" :>

53+ QueryParam "maxResults" Int32 :>

54+ QueryParam "pageToken" Text :>

53− QueryParam "syncToken" Text :>

55+ QueryParam "syncToken" Text :>

54− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Int32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Settings

63

64-- | Returns all user settings for the authenticated user.

@@ -176,13 +176,13 @@ instance GoogleRequest SettingsList' where

176 type Rs SettingsList' = Settings

177 request = requestWithRoute defReq appsCalendarURL

178 requestWithRoute r u SettingsList'{..}

179+ = go _slMaxResults _slPageToken _slSyncToken

180+ _slQuotaUser

179− = go _slSyncToken _slQuotaUser (Just _slPrettyPrint)

181+ (Just _slPrettyPrint)

180 _slUserIP

182 _slUserIP

183+ _slFields

181 _slKey

184 _slKey

182− _slPageToken

183 _slOAuthToken

185 _slOAuthToken

184− _slMaxResults

185− _slFields

186 (Just AltJSON)

187 where go

188 = clientWithRoute

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Watch.hs+13−13

@@ -52,15 +52,15 @@ type SettingsWatchResource =

52 "me" :>

53 "settings" :>

54 "watch" :>

55+ QueryParam "maxResults" Int32 :>

56+ QueryParam "pageToken" Text :>

55− QueryParam "syncToken" Text :>

57+ QueryParam "syncToken" Text :>

56− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

59− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

60− QueryParam "pageToken" Text :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "maxResults" Int32 :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Channel :> Post '[JSON] Channel

66

@@ -189,13 +189,13 @@ instance GoogleRequest SettingsWatch' where

189 type Rs SettingsWatch' = Channel

190 request = requestWithRoute defReq appsCalendarURL

191 requestWithRoute r u SettingsWatch'{..}

192+ = go _swMaxResults _swPageToken _swSyncToken

193+ _swQuotaUser

192− = go _swSyncToken _swQuotaUser (Just _swPrettyPrint)

194+ (Just _swPrettyPrint)

193 _swUserIP

195 _swUserIP

196+ _swFields

194 _swKey

197 _swKey

195− _swPageToken

196 _swOAuthToken

198 _swOAuthToken

197− _swMaxResults

198− _swFields

199 (Just AltJSON)

200 _swChannel

201 where go

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Delete.hs+7−8

@@ -55,9 +55,9 @@ type LicenseAssignmentsDeleteResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Delete '[JSON] ()

62

63-- | Revoke License.

@@ -173,13 +173,12 @@ instance GoogleRequest LicenseAssignmentsDelete'

173 type Rs LicenseAssignmentsDelete' = ()

174 request = requestWithRoute defReq appsLicensingURL

175 requestWithRoute r u LicenseAssignmentsDelete'{..}

176+ = go _ladProductId _ladSkuId _ladUserId _ladQuotaUser

176− = go _ladQuotaUser (Just _ladPrettyPrint) _ladUserIP

177+ (Just _ladPrettyPrint)

177− _ladSkuId

178+ _ladUserIP

178− _ladUserId

179+ _ladFields

179 _ladKey

180 _ladKey

180 _ladOAuthToken

181 _ladOAuthToken

181− _ladProductId

182− _ladFields

183 (Just AltJSON)

182 (Just AltJSON)

184 where go

183 where go

185 = clientWithRoute

184 = clientWithRoute

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Get.hs+7−8

@@ -55,9 +55,9 @@ type LicenseAssignmentsGetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 Get '[JSON] LicenseAssignment

63

@@ -173,13 +173,12 @@ instance GoogleRequest LicenseAssignmentsGet' where

173 type Rs LicenseAssignmentsGet' = LicenseAssignment

174 request = requestWithRoute defReq appsLicensingURL

175 requestWithRoute r u LicenseAssignmentsGet'{..}

176+ = go _lagProductId _lagSkuId _lagUserId _lagQuotaUser

176− = go _lagQuotaUser (Just _lagPrettyPrint) _lagUserIP

177+ (Just _lagPrettyPrint)

177− _lagSkuId

178+ _lagUserIP

178− _lagUserId

179+ _lagFields

179 _lagKey

180 _lagKey

180 _lagOAuthToken

181 _lagOAuthToken

181− _lagProductId

182− _lagFields

183 (Just AltJSON)

182 (Just AltJSON)

184 where go

183 where go

185 = clientWithRoute

184 = clientWithRoute

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Insert.hs+7−7

@@ -54,9 +54,9 @@ type LicenseAssignmentsInsertResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] LicenseAssignmentInsert :>

62 Post '[JSON] LicenseAssignment

@@ -175,12 +175,12 @@ instance GoogleRequest LicenseAssignmentsInsert'

175 type Rs LicenseAssignmentsInsert' = LicenseAssignment

176 request = requestWithRoute defReq appsLicensingURL

177 requestWithRoute r u LicenseAssignmentsInsert'{..}

178+ = go _laiProductId _laiSkuId _laiQuotaUser

178− = go _laiQuotaUser (Just _laiPrettyPrint) _laiUserIP

179+ (Just _laiPrettyPrint)

179− _laiSkuId

180+ _laiUserIP

181+ _laiFields

180 _laiKey

182 _laiKey

181 _laiOAuthToken

183 _laiOAuthToken

182− _laiProductId

183− _laiFields

184 (Just AltJSON)

185 _laiLicenseAssignmentInsert

186 where go

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProduct.hs+15−15

@@ -50,15 +50,15 @@ import Network.Google.Prelude

50type LicenseAssignmentsListForProductResource =

51 Capture "productId" Text :>

52 "users" :>

53− QueryParam "quotaUser" Text :>

53+ QueryParam "maxResults" Word32 :>

54+ QueryParam "pageToken" Text :>

55+ QueryParam "customerId" Text :>

56+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

56− QueryParam "customerId" Text :>

59+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Word32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Get '[JSON] LicenseAssignmentList

64

@@ -195,15 +195,15 @@ instance GoogleRequest

195 request = requestWithRoute defReq appsLicensingURL

196 requestWithRoute r u

197 LicenseAssignmentsListForProduct'{..}

198− = go _lalfpQuotaUser (Just _lalfpPrettyPrint)

198+ = go (Just _lalfpMaxResults) (Just _lalfpPageToken)

199− _lalfpUserIP

199+ _lalfpProductId

200 (Just _lalfpCustomerId)

201+ _lalfpQuotaUser

202+ (Just _lalfpPrettyPrint)

203+ _lalfpUserIP

204+ _lalfpFields

201 _lalfpKey

205 _lalfpKey

202− (Just _lalfpPageToken)

203 _lalfpOAuthToken

206 _lalfpOAuthToken

204− _lalfpProductId

205− (Just _lalfpMaxResults)

206− _lalfpFields

207 (Just AltJSON)

208 where go

209 = clientWithRoute

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProductAndSku.hs+16−15

@@ -53,15 +53,15 @@ type LicenseAssignmentsListForProductAndSkuResource =

53 "sku" :>

54 Capture "skuId" Text :>

55 "users" :>

56− QueryParam "quotaUser" Text :>

56+ QueryParam "maxResults" Word32 :>

57+ QueryParam "pageToken" Text :>

58+ QueryParam "customerId" Text :>

59+ QueryParam "quotaUser" Text :>

57− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

58− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

59− QueryParam "customerId" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Word32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] LicenseAssignmentList

67

@@ -211,16 +211,17 @@ instance GoogleRequest

211 request = requestWithRoute defReq appsLicensingURL

212 requestWithRoute r u

213 LicenseAssignmentsListForProductAndSku'{..}

214− = go _lalfpasQuotaUser (Just _lalfpasPrettyPrint)

214+ = go (Just _lalfpasMaxResults)

215− _lalfpasUserIP

215+ (Just _lalfpasPageToken)

216+ _lalfpasProductId

216 _lalfpasSkuId

217 _lalfpasSkuId

217 (Just _lalfpasCustomerId)

218 (Just _lalfpasCustomerId)

219+ _lalfpasQuotaUser

220+ (Just _lalfpasPrettyPrint)

221+ _lalfpasUserIP

222+ _lalfpasFields

218 _lalfpasKey

223 _lalfpasKey

219− (Just _lalfpasPageToken)

220 _lalfpasOAuthToken

224 _lalfpasOAuthToken

221− _lalfpasProductId

222− (Just _lalfpasMaxResults)

223− _lalfpasFields

224 (Just AltJSON)

225 (Just AltJSON)

225 where go

226 where go

226 = clientWithRoute

227 = clientWithRoute

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Patch.hs+7−8

@@ -56,9 +56,9 @@ type LicenseAssignmentsPatchResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] LicenseAssignment :>

64 Patch '[JSON] LicenseAssignment

@@ -186,13 +186,12 @@ instance GoogleRequest LicenseAssignmentsPatch' where

186 type Rs LicenseAssignmentsPatch' = LicenseAssignment

187 request = requestWithRoute defReq appsLicensingURL

188 requestWithRoute r u LicenseAssignmentsPatch'{..}

189+ = go _lapProductId _lapSkuId _lapUserId _lapQuotaUser

189− = go _lapQuotaUser (Just _lapPrettyPrint) _lapUserIP

190+ (Just _lapPrettyPrint)

190− _lapSkuId

191+ _lapUserIP

191− _lapUserId

192+ _lapFields

192 _lapKey

193 _lapKey

193 _lapOAuthToken

194 _lapOAuthToken

194− _lapProductId

195− _lapFields

196 (Just AltJSON)

195 (Just AltJSON)

197 _lapLicenseAssignment

196 _lapLicenseAssignment

198 where go

197 where go

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Update.hs+7−8

@@ -56,9 +56,9 @@ type LicenseAssignmentsUpdateResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] LicenseAssignment :>

64 Put '[JSON] LicenseAssignment

@@ -187,13 +187,12 @@ instance GoogleRequest LicenseAssignmentsUpdate'

187 type Rs LicenseAssignmentsUpdate' = LicenseAssignment

188 request = requestWithRoute defReq appsLicensingURL

189 requestWithRoute r u LicenseAssignmentsUpdate'{..}

190+ = go _lauProductId _lauSkuId _lauUserId _lauQuotaUser

190− = go _lauQuotaUser (Just _lauPrettyPrint) _lauUserIP

191+ (Just _lauPrettyPrint)

191− _lauSkuId

192+ _lauUserIP

192− _lauUserId

193+ _lauFields

193 _lauKey

194 _lauKey

194 _lauOAuthToken

195 _lauOAuthToken

195− _lauProductId

196− _lauFields

197 (Just AltJSON)

196 (Just AltJSON)

198 _lauLicenseAssignment

197 _lauLicenseAssignment

199 where go

198 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Get.hs+6−6

@@ -50,9 +50,9 @@ type CustomersGetResource =

50 QueryParam "quotaUser" Text :>

51 QueryParam "prettyPrint" Bool :>

52 QueryParam "userIp" Text :>

53− QueryParam "key" Key :>

53+ QueryParam "fields" Text :>

54+ QueryParam "key" Key :>

54− QueryParam "oauth_token" OAuthToken :>

55+ QueryParam "oauth_token" OAuthToken :>

55− QueryParam "fields" Text :>

56 QueryParam "alt" AltJSON :> Get '[JSON] Customer

57

58-- | Gets a customer resource if one exists and is owned by the reseller.

@@ -145,11 +145,11 @@ instance GoogleRequest CustomersGet' where

145 type Rs CustomersGet' = Customer

146 request = requestWithRoute defReq appsResellerURL

147 requestWithRoute r u CustomersGet'{..}

148− = go _cgQuotaUser (Just _cgPrettyPrint) _cgUserIP

148+ = go _cgCustomerId _cgQuotaUser (Just _cgPrettyPrint)

149− _cgCustomerId

149+ _cgUserIP

150+ _cgFields

150 _cgKey

151 _cgKey

151 _cgOAuthToken

152 _cgOAuthToken

152− _cgFields

153 (Just AltJSON)

154 where go

155 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Insert.hs+11−10

@@ -47,13 +47,13 @@ import Network.Google.Prelude

47-- 'CustomersInsert'' request conforms to.

48type CustomersInsertResource =

49 "customers" :>

50+ QueryParam "customerAuthToken" Text :>

50− QueryParam "quotaUser" Text :>

51+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

52+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

53+ QueryParam "userIp" Text :>

54+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

55+ QueryParam "key" Key :>

54− QueryParam "customerAuthToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

56+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "fields" Text :>

57 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Customer :> Post '[JSON] Customer

59

@@ -159,11 +159,12 @@ instance GoogleRequest CustomersInsert' where

159 type Rs CustomersInsert' = Customer

160 request = requestWithRoute defReq appsResellerURL

161 requestWithRoute r u CustomersInsert'{..}

162+ = go _ciCustomerAuthToken _ciQuotaUser

162− = go _ciQuotaUser (Just _ciPrettyPrint) _ciUserIP

163+ (Just _ciPrettyPrint)

164+ _ciUserIP

165+ _ciFields

163 _ciKey

166 _ciKey

164− _ciCustomerAuthToken

165 _ciOAuthToken

167 _ciOAuthToken

166− _ciFields

167 (Just AltJSON)

168 (Just AltJSON)

168 _ciCustomer

169 _ciCustomer

169 where go

170 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Patch.hs+6−6

@@ -52,9 +52,9 @@ type CustomersPatchResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Customer :> Patch '[JSON] Customer

60

@@ -159,11 +159,11 @@ instance GoogleRequest CustomersPatch' where

159 type Rs CustomersPatch' = Customer

160 request = requestWithRoute defReq appsResellerURL

161 requestWithRoute r u CustomersPatch'{..}

162− = go _cpQuotaUser (Just _cpPrettyPrint) _cpUserIP

162+ = go _cpCustomerId _cpQuotaUser (Just _cpPrettyPrint)

163− _cpCustomerId

163+ _cpUserIP

164+ _cpFields

164 _cpKey

165 _cpKey

165 _cpOAuthToken

166 _cpOAuthToken

166− _cpFields

167 (Just AltJSON)

168 _cpCustomer

169 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Update.hs+6−6

@@ -52,9 +52,9 @@ type CustomersUpdateResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Customer :> Put '[JSON] Customer

60

@@ -159,11 +159,11 @@ instance GoogleRequest CustomersUpdate' where

159 type Rs CustomersUpdate' = Customer

160 request = requestWithRoute defReq appsResellerURL

161 requestWithRoute r u CustomersUpdate'{..}

162− = go _cuQuotaUser (Just _cuPrettyPrint) _cuUserIP

162+ = go _cuCustomerId _cuQuotaUser (Just _cuPrettyPrint)

163− _cuCustomerId

163+ _cuUserIP

164+ _cuFields

164 _cuKey

165 _cuKey

165 _cuOAuthToken

166 _cuOAuthToken

166− _cuFields

167 (Just AltJSON)

168 _cuCustomer

169 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Activate.hs+7−7

@@ -54,9 +54,9 @@ type SubscriptionsActivateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Post '[JSON] Subscription

61

62-- | Activates a subscription previously suspended by the reseller

@@ -160,12 +160,12 @@ instance GoogleRequest SubscriptionsActivate' where

160 type Rs SubscriptionsActivate' = Subscription

161 request = requestWithRoute defReq appsResellerURL

162 requestWithRoute r u SubscriptionsActivate'{..}

163+ = go _saCustomerId _saSubscriptionId _saQuotaUser

163− = go _saQuotaUser (Just _saPrettyPrint) _saUserIP

164+ (Just _saPrettyPrint)

164− _saCustomerId

165+ _saUserIP

166+ _saFields

165 _saKey

167 _saKey

166 _saOAuthToken

168 _saOAuthToken

167− _saSubscriptionId

168− _saFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs+7−7

@@ -55,9 +55,9 @@ type SubscriptionsChangePlanResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] ChangePlanRequest :>

63 Post '[JSON] Subscription

@@ -178,12 +178,12 @@ instance GoogleRequest SubscriptionsChangePlan' where

178 type Rs SubscriptionsChangePlan' = Subscription

179 request = requestWithRoute defReq appsResellerURL

180 requestWithRoute r u SubscriptionsChangePlan'{..}

181+ = go _scpCustomerId _scpSubscriptionId _scpQuotaUser

181− = go _scpQuotaUser (Just _scpPrettyPrint) _scpUserIP

182+ (Just _scpPrettyPrint)

182− _scpCustomerId

183+ _scpUserIP

184+ _scpFields

183 _scpKey

185 _scpKey

184 _scpOAuthToken

186 _scpOAuthToken

185− _scpSubscriptionId

186− _scpFields

187 (Just AltJSON)

188 _scpChangePlanRequest

189 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs+7−7

@@ -55,9 +55,9 @@ type SubscriptionsChangeRenewalSettingsResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] RenewalSettings :>

63 Post '[JSON] Subscription

@@ -183,13 +183,13 @@ instance GoogleRequest

183 request = requestWithRoute defReq appsResellerURL

184 requestWithRoute r u

185 SubscriptionsChangeRenewalSettings'{..}

186+ = go _scrsCustomerId _scrsSubscriptionId

187+ _scrsQuotaUser

186− = go _scrsQuotaUser (Just _scrsPrettyPrint)

188+ (Just _scrsPrettyPrint)

187 _scrsUserIP

189 _scrsUserIP

188− _scrsCustomerId

190+ _scrsFields

189 _scrsKey

191 _scrsKey

190 _scrsOAuthToken

192 _scrsOAuthToken

191− _scrsSubscriptionId

192− _scrsFields

193 (Just AltJSON)

194 _scrsRenewalSettings

195 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs+7−7

@@ -55,9 +55,9 @@ type SubscriptionsChangeSeatsResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Seats :> Post '[JSON] Subscription

63

@@ -176,12 +176,12 @@ instance GoogleRequest SubscriptionsChangeSeats'

176 type Rs SubscriptionsChangeSeats' = Subscription

177 request = requestWithRoute defReq appsResellerURL

178 requestWithRoute r u SubscriptionsChangeSeats'{..}

179+ = go _scsCustomerId _scsSubscriptionId _scsQuotaUser

179− = go _scsQuotaUser (Just _scsPrettyPrint) _scsUserIP

180+ (Just _scsPrettyPrint)

180− _scsCustomerId

181+ _scsUserIP

182+ _scsFields

181 _scsKey

183 _scsKey

182 _scsOAuthToken

184 _scsOAuthToken

183− _scsSubscriptionId

184− _scsFields

185 (Just AltJSON)

186 _scsSeats

187 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs+14−13

@@ -51,15 +51,15 @@ type SubscriptionsDeleteResource =

51 Capture "customerId" Text :>

52 "subscriptions" :>

53 Capture "subscriptionId" Text :>

54+ QueryParam "deletionType"

55+ ResellerSubscriptionsDeleteDeletionType

56+ :>

54− QueryParam "quotaUser" Text :>

57+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

58+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

59+ QueryParam "userIp" Text :>

57− QueryParam "deletionType"

60+ QueryParam "fields" Text :>

58− ResellerSubscriptionsDeleteDeletionType

59− :>

60− QueryParam "key" Key :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Delete '[JSON] ()

64

65-- | Cancels\/Downgrades a subscription.

@@ -174,13 +174,14 @@ instance GoogleRequest SubscriptionsDelete' where

174 type Rs SubscriptionsDelete' = ()

175 request = requestWithRoute defReq appsResellerURL

176 requestWithRoute r u SubscriptionsDelete'{..}

177− = go _sdQuotaUser (Just _sdPrettyPrint) _sdUserIP

178− _sdCustomerId

177+ = go _sdCustomerId _sdSubscriptionId

179 (Just _sdDeletionType)

178 (Just _sdDeletionType)

179+ _sdQuotaUser

180+ (Just _sdPrettyPrint)

181+ _sdUserIP

182+ _sdFields

180 _sdKey

183 _sdKey

181 _sdOAuthToken

184 _sdOAuthToken

182− _sdSubscriptionId

183− _sdFields

184 (Just AltJSON)

185 (Just AltJSON)

185 where go

186 where go

186 = clientWithRoute

187 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Get.hs+7−7

@@ -53,9 +53,9 @@ type SubscriptionsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Subscription

60

61-- | Gets a subscription of the customer.

@@ -159,12 +159,12 @@ instance GoogleRequest SubscriptionsGet' where

159 type Rs SubscriptionsGet' = Subscription

160 request = requestWithRoute defReq appsResellerURL

161 requestWithRoute r u SubscriptionsGet'{..}

162+ = go _sgCustomerId _sgSubscriptionId _sgQuotaUser

162− = go _sgQuotaUser (Just _sgPrettyPrint) _sgUserIP

163+ (Just _sgPrettyPrint)

163− _sgCustomerId

164+ _sgUserIP

165+ _sgFields

164 _sgKey

166 _sgKey

165 _sgOAuthToken

167 _sgOAuthToken

166− _sgSubscriptionId

167− _sgFields

168 (Just AltJSON)

169 where go

170 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs+11−11

@@ -50,13 +50,13 @@ type SubscriptionsInsertResource =

50 "customers" :>

51 Capture "customerId" Text :>

52 "subscriptions" :>

53+ QueryParam "customerAuthToken" Text :>

53− QueryParam "quotaUser" Text :>

54+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

57+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

57− QueryParam "customerAuthToken" Text :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Subscription :>

62 Post '[JSON] Subscription

@@ -174,12 +174,12 @@ instance GoogleRequest SubscriptionsInsert' where

174 type Rs SubscriptionsInsert' = Subscription

175 request = requestWithRoute defReq appsResellerURL

176 requestWithRoute r u SubscriptionsInsert'{..}

177+ = go _siCustomerAuthToken _siCustomerId _siQuotaUser

177− = go _siQuotaUser (Just _siPrettyPrint) _siUserIP

178+ (Just _siPrettyPrint)

178− _siCustomerId

179+ _siUserIP

180+ _siFields

179 _siKey

181 _siKey

180− _siCustomerAuthToken

181 _siOAuthToken

182 _siOAuthToken

182− _siFields

183 (Just AltJSON)

184 _siSubscription

185 where go

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/List.hs+18−17

@@ -51,17 +51,17 @@ import Network.Google.Prelude

51-- 'SubscriptionsList'' request conforms to.

52type SubscriptionsListResource =

53 "subscriptions" :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "customerAuthToken" Text :>

55− QueryParam "prettyPrint" Bool :>

55+ QueryParam "customerId" Text :>

56− QueryParam "userIp" Text :>

56+ QueryParam "customerNamePrefix" Text :>

57− QueryParam "customerNamePrefix" Text :>

57+ QueryParam "maxResults" Word32 :>

58− QueryParam "customerId" Text :>

58+ QueryParam "pageToken" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "quotaUser" Text :>

60− QueryParam "customerAuthToken" Text :>

60+ QueryParam "prettyPrint" Bool :>

61− QueryParam "pageToken" Text :>

61+ QueryParam "userIp" Text :>

62− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "fields" Text :>

63− QueryParam "maxResults" Word32 :>

63+ QueryParam "key" Key :>

64− QueryParam "fields" Text :>

64+ QueryParam "oauth_token" OAuthToken :>

65 QueryParam "alt" AltJSON :>

66 Get '[JSON] Subscriptions

67

@@ -196,15 +196,16 @@ instance GoogleRequest SubscriptionsList' where

196 type Rs SubscriptionsList' = Subscriptions

197 request = requestWithRoute defReq appsResellerURL

198 requestWithRoute r u SubscriptionsList'{..}

199− = go _slQuotaUser (Just _slPrettyPrint) _slUserIP

199+ = go _slCustomerAuthToken _slCustomerId

200 _slCustomerNamePrefix

201− _slCustomerId

202− _slKey

203− _slCustomerAuthToken

204− _slPageToken

205− _slOAuthToken

206 _slMaxResults

201 _slMaxResults

202+ _slPageToken

203+ _slQuotaUser

204+ (Just _slPrettyPrint)

205+ _slUserIP

207 _slFields

206 _slFields

207+ _slKey

208+ _slOAuthToken

208 (Just AltJSON)

209 (Just AltJSON)

209 where go

210 where go

210 = clientWithRoute

211 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/StartPaidService.hs+7−7

@@ -54,9 +54,9 @@ type SubscriptionsStartPaidServiceResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Post '[JSON] Subscription

61

62-- | Starts paid service of a trial subscription

@@ -168,13 +168,13 @@ instance GoogleRequest SubscriptionsStartPaidService'

168 request = requestWithRoute defReq appsResellerURL

169 requestWithRoute r u

170 SubscriptionsStartPaidService'{..}

171+ = go _sspsCustomerId _sspsSubscriptionId

172+ _sspsQuotaUser

171− = go _sspsQuotaUser (Just _sspsPrettyPrint)

173+ (Just _sspsPrettyPrint)

172 _sspsUserIP

174 _sspsUserIP

173− _sspsCustomerId

175+ _sspsFields

174 _sspsKey

176 _sspsKey

175 _sspsOAuthToken

177 _sspsOAuthToken

176− _sspsSubscriptionId

177− _sspsFields

178 (Just AltJSON)

179 where go

180 = clientWithRoute

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Suspend.hs+7−7

@@ -54,9 +54,9 @@ type SubscriptionsSuspendResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Post '[JSON] Subscription

61

62-- | Suspends an active subscription

@@ -160,12 +160,12 @@ instance GoogleRequest SubscriptionsSuspend' where

160 type Rs SubscriptionsSuspend' = Subscription

161 request = requestWithRoute defReq appsResellerURL

162 requestWithRoute r u SubscriptionsSuspend'{..}

163+ = go _ssCustomerId _ssSubscriptionId _ssQuotaUser

163− = go _ssQuotaUser (Just _ssPrettyPrint) _ssUserIP

164+ (Just _ssPrettyPrint)

164− _ssCustomerId

165+ _ssUserIP

166+ _ssFields

165 _ssKey

167 _ssKey

166 _ssOAuthToken

168 _ssOAuthToken

167− _ssSubscriptionId

168− _ssFields

169 (Just AltJSON)

170 where go

171 = clientWithRoute

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Delete.hs+7−6

@@ -52,9 +52,9 @@ type TaskListsDeleteResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Delete '[JSON] ()

59

60-- | Deletes the authenticated user\'s specified task list.

@@ -150,11 +150,12 @@ instance GoogleRequest TaskListsDelete' where

150 type Rs TaskListsDelete' = ()

151 request = requestWithRoute defReq appsTasksURL

152 requestWithRoute r u TaskListsDelete'{..}

153+ = go _tldTaskList _tldQuotaUser

153− = go _tldQuotaUser (Just _tldPrettyPrint) _tldUserIP

154+ (Just _tldPrettyPrint)

155+ _tldUserIP

156+ _tldFields

154 _tldKey

157 _tldKey

155− _tldTaskList

156 _tldOAuthToken

158 _tldOAuthToken

157− _tldFields

158 (Just AltJSON)

159 (Just AltJSON)

159 where go

160 where go

160 = clientWithRoute

161 = clientWithRoute

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Get.hs+7−6

@@ -52,9 +52,9 @@ type TaskListsGetResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] TaskList

59

60-- | Returns the authenticated user\'s specified task list.

@@ -150,11 +150,12 @@ instance GoogleRequest TaskListsGet' where

150 type Rs TaskListsGet' = TaskList

151 request = requestWithRoute defReq appsTasksURL

152 requestWithRoute r u TaskListsGet'{..}

153+ = go _tlgTaskList _tlgQuotaUser

153− = go _tlgQuotaUser (Just _tlgPrettyPrint) _tlgUserIP

154+ (Just _tlgPrettyPrint)

155+ _tlgUserIP

156+ _tlgFields

154 _tlgKey

157 _tlgKey

155− _tlgTaskList

156 _tlgOAuthToken

158 _tlgOAuthToken

157− _tlgFields

158 (Just AltJSON)

159 (Just AltJSON)

159 where go

160 where go

160 = clientWithRoute

161 = clientWithRoute

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Insert.hs+4−4

@@ -52,9 +52,9 @@ type TaskListsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] TaskList :> Post '[JSON] TaskList

60

@@ -153,9 +153,9 @@ instance GoogleRequest TaskListsInsert' where

153 request = requestWithRoute defReq appsTasksURL

154 requestWithRoute r u TaskListsInsert'{..}

155 = go _tliQuotaUser (Just _tliPrettyPrint) _tliUserIP

156+ _tliFields

156 _tliKey

157 _tliKey

157 _tliOAuthToken

158 _tliOAuthToken

158− _tliFields

159 (Just AltJSON)

160 _tliTaskList

161 where go

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/List.hs+12−12

@@ -49,14 +49,14 @@ type TaskListsListResource =

49 "users" :>

50 "@me" :>

51 "lists" :>

52+ QueryParam "maxResults" Int64 :>

53+ QueryParam "pageToken" Text :>

52− QueryParam "quotaUser" Text :>

54+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

57+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

56− QueryParam "pageToken" Text :>

57− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "maxResults" Int64 :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] TaskLists

61

62-- | Returns all the authenticated user\'s task lists.

@@ -162,12 +162,12 @@ instance GoogleRequest TaskListsList' where

162 type Rs TaskListsList' = TaskLists

163 request = requestWithRoute defReq appsTasksURL

164 requestWithRoute r u TaskListsList'{..}

165+ = go _tllMaxResults _tllPageToken _tllQuotaUser

165− = go _tllQuotaUser (Just _tllPrettyPrint) _tllUserIP

166+ (Just _tllPrettyPrint)

167+ _tllUserIP

168+ _tllFields

166 _tllKey

169 _tllKey

167− _tllPageToken

168 _tllOAuthToken

170 _tllOAuthToken

169− _tllMaxResults

170− _tllFields

171 (Just AltJSON)

172 where go

173 = clientWithRoute

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Patch.hs+7−6

@@ -54,9 +54,9 @@ type TaskListsPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] TaskList :> Patch '[JSON] TaskList

62

@@ -164,11 +164,12 @@ instance GoogleRequest TaskListsPatch' where

164 type Rs TaskListsPatch' = TaskList

165 request = requestWithRoute defReq appsTasksURL

166 requestWithRoute r u TaskListsPatch'{..}

167+ = go _tlpTaskList _tlpQuotaUser

167− = go _tlpQuotaUser (Just _tlpPrettyPrint) _tlpUserIP

168+ (Just _tlpPrettyPrint)

169+ _tlpUserIP

170+ _tlpFields

168 _tlpKey

171 _tlpKey

169− _tlpTaskList

170 _tlpOAuthToken

172 _tlpOAuthToken

171− _tlpFields

172 (Just AltJSON)

173 (Just AltJSON)

173 _tlpTaskList

174 _tlpTaskList

174 where go

175 where go

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Update.hs+7−6

@@ -53,9 +53,9 @@ type TaskListsUpdateResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] TaskList :> Put '[JSON] TaskList

61

@@ -162,11 +162,12 @@ instance GoogleRequest TaskListsUpdate' where

162 type Rs TaskListsUpdate' = TaskList

163 request = requestWithRoute defReq appsTasksURL

164 requestWithRoute r u TaskListsUpdate'{..}

165+ = go _tluTaskList _tluQuotaUser

165− = go _tluQuotaUser (Just _tluPrettyPrint) _tluUserIP

166+ (Just _tluPrettyPrint)

167+ _tluUserIP

168+ _tluFields

166 _tluKey

169 _tluKey

167− _tluTaskList

168 _tluOAuthToken

170 _tluOAuthToken

169− _tluFields

170 (Just AltJSON)

171 (Just AltJSON)

171 _tluTaskList

172 _tluTaskList

172 where go

173 where go

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Clear.hs+6−6

@@ -53,9 +53,9 @@ type TasksClearResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Post '[JSON] ()

60

61-- | Clears all completed tasks from the specified task list. The affected

@@ -150,11 +150,11 @@ instance GoogleRequest TasksClear' where

150 type Rs TasksClear' = ()

151 request = requestWithRoute defReq appsTasksURL

152 requestWithRoute r u TasksClear'{..}

153− = go _tcQuotaUser (Just _tcPrettyPrint) _tcUserIP

153+ = go _tcTaskList _tcQuotaUser (Just _tcPrettyPrint)

154+ _tcUserIP

155+ _tcFields

154 _tcKey

156 _tcKey

155− _tcTaskList

156 _tcOAuthToken

157 _tcOAuthToken

157− _tcFields

158 (Just AltJSON)

159 where go

160 = clientWithRoute (Proxy :: Proxy TasksClearResource)

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Delete.hs+7−7

@@ -53,9 +53,9 @@ type TasksDeleteResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Delete '[JSON] ()

60

61-- | Deletes the specified task from the task list.

@@ -157,12 +157,12 @@ instance GoogleRequest TasksDelete' where

157 type Rs TasksDelete' = ()

158 request = requestWithRoute defReq appsTasksURL

159 requestWithRoute r u TasksDelete'{..}

160+ = go _tdTaskList _tdTask _tdQuotaUser

160− = go _tdQuotaUser (Just _tdPrettyPrint) _tdUserIP

161+ (Just _tdPrettyPrint)

162+ _tdUserIP

163+ _tdFields

161 _tdKey

164 _tdKey

162− _tdTaskList

163− _tdTask

164 _tdOAuthToken

165 _tdOAuthToken

165− _tdFields

166 (Just AltJSON)

167 where go

168 = clientWithRoute

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Get.hs+7−7

@@ -53,9 +53,9 @@ type TasksGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Task

60

61-- | Returns the specified task.

@@ -157,12 +157,12 @@ instance GoogleRequest TasksGet' where

157 type Rs TasksGet' = Task

158 request = requestWithRoute defReq appsTasksURL

159 requestWithRoute r u TasksGet'{..}

160+ = go _tgTaskList _tgTask _tgQuotaUser

160− = go _tgQuotaUser (Just _tgPrettyPrint) _tgUserIP

161+ (Just _tgPrettyPrint)

162+ _tgUserIP

163+ _tgFields

161 _tgKey

164 _tgKey

162− _tgTaskList

163− _tgTask

164 _tgOAuthToken

165 _tgOAuthToken

165− _tgFields

166 (Just AltJSON)

167 where go

168 = clientWithRoute (Proxy :: Proxy TasksGetResource) r

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Insert.hs+10−11

@@ -52,13 +52,13 @@ type TasksInsertResource =

52 Capture "tasklist" Text :>

53 "tasks" :>

54 QueryParam "parent" Text :>

55+ QueryParam "previous" Text :>

55− QueryParam "quotaUser" Text :>

56+ QueryParam "quotaUser" Text :>

56− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

57− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

58− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61− QueryParam "previous" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] Task :> Post '[JSON] Task

64

@@ -180,13 +180,12 @@ instance GoogleRequest TasksInsert' where

180 type Rs TasksInsert' = Task

181 request = requestWithRoute defReq appsTasksURL

182 requestWithRoute r u TasksInsert'{..}

183+ = go _tiParent _tiPrevious _tiTaskList _tiQuotaUser

183− = go _tiParent _tiQuotaUser (Just _tiPrettyPrint)

184+ (Just _tiPrettyPrint)

184 _tiUserIP

185 _tiUserIP

186+ _tiFields

185 _tiKey

187 _tiKey

186− _tiTaskList

187 _tiOAuthToken

188 _tiOAuthToken

188− _tiFields

189− _tiPrevious

190 (Just AltJSON)

189 (Just AltJSON)

191 _tiTask

190 _tiTask

192 where go

191 where go

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+26−26

@@ -58,22 +58,22 @@ type TasksListResource =

58 "lists" :>

59 Capture "tasklist" Text :>

60 "tasks" :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "completedMax" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "completedMin" Text :>

63− QueryParam "userIp" Text :>

63+ QueryParam "dueMax" Text :>

64− QueryParam "dueMax" Text :>

64+ QueryParam "dueMin" Text :>

65− QueryParam "showDeleted" Bool :>

65+ QueryParam "maxResults" Int64 :>

66− QueryParam "showCompleted" Bool :>

66+ QueryParam "pageToken" Text :>

67− QueryParam "dueMin" Text :>

67+ QueryParam "showCompleted" Bool :>

68+ QueryParam "showDeleted" Bool :>

68− QueryParam "showHidden" Bool :>

69+ QueryParam "showHidden" Bool :>

69− QueryParam "completedMax" Text :>

70− QueryParam "key" Key :>

71− QueryParam "updatedMin" Text :>

70+ QueryParam "updatedMin" Text :>

72− QueryParam "completedMin" Text :>

71+ QueryParam "quotaUser" Text :>

72+ QueryParam "prettyPrint" Bool :>

73− QueryParam "pageToken" Text :>

73+ QueryParam "userIp" Text :>

74− QueryParam "oauth_token" OAuthToken :>

74+ QueryParam "fields" Text :>

75− QueryParam "maxResults" Int64 :>

75+ QueryParam "key" Key :>

76− QueryParam "fields" Text :>

76+ QueryParam "oauth_token" OAuthToken :>

77 QueryParam "alt" AltJSON :>

78 Get '[JSON] Tasks

79

@@ -269,21 +269,21 @@ instance GoogleRequest TasksList' where

269 type Rs TasksList' = Tasks

270 request = requestWithRoute defReq appsTasksURL

271 requestWithRoute r u TasksList'{..}

272− = go _tlQuotaUser (Just _tlPrettyPrint) _tlUserIP

272+ = go _tlCompletedMax _tlCompletedMin _tlDueMax

273− _tlDueMax

274− _tlShowDeleted

275− _tlShowCompleted

276 _tlDueMin

273 _tlDueMin

274+ _tlMaxResults

275+ _tlPageToken

276+ _tlShowCompleted

277+ _tlShowDeleted

277 _tlShowHidden

278 _tlShowHidden

278− _tlCompletedMax

279− _tlKey

280 _tlUpdatedMin

279 _tlUpdatedMin

281 _tlTaskList

280 _tlTaskList

282− _tlCompletedMin

281+ _tlQuotaUser

283− _tlPageToken

282+ (Just _tlPrettyPrint)

284− _tlOAuthToken

283+ _tlUserIP

285− _tlMaxResults

286 _tlFields

284 _tlFields

285+ _tlKey

286+ _tlOAuthToken

287 (Just AltJSON)

288 where go

289 = clientWithRoute (Proxy :: Proxy TasksListResource)

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Move.hs+11−12

@@ -56,13 +56,13 @@ type TasksMoveResource =

56 Capture "task" Text :>

57 "move" :>

58 QueryParam "parent" Text :>

59+ QueryParam "previous" Text :>

59− QueryParam "quotaUser" Text :>

60+ QueryParam "quotaUser" Text :>

60− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

61− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

62− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65− QueryParam "previous" Text :>

66 QueryParam "alt" AltJSON :> Post '[JSON] Task

67

68-- | Moves the specified task to another position in the task list. This can

@@ -185,14 +185,13 @@ instance GoogleRequest TasksMove' where

185 type Rs TasksMove' = Task

186 request = requestWithRoute defReq appsTasksURL

187 requestWithRoute r u TasksMove'{..}

188+ = go _tmParent _tmPrevious _tmTaskList _tmTask

189+ _tmQuotaUser

188− = go _tmParent _tmQuotaUser (Just _tmPrettyPrint)

190+ (Just _tmPrettyPrint)

189 _tmUserIP

191 _tmUserIP

192+ _tmFields

190 _tmKey

193 _tmKey

191− _tmTaskList

192− _tmTask

193 _tmOAuthToken

194 _tmOAuthToken

194− _tmFields

195− _tmPrevious

196 (Just AltJSON)

195 (Just AltJSON)

197 where go

196 where go

198 = clientWithRoute (Proxy :: Proxy TasksMoveResource)

197 = clientWithRoute (Proxy :: Proxy TasksMoveResource)

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Patch.hs+7−7

@@ -54,9 +54,9 @@ type TasksPatchResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Task :> Patch '[JSON] Task

62

@@ -168,12 +168,12 @@ instance GoogleRequest TasksPatch' where

168 type Rs TasksPatch' = Task

169 request = requestWithRoute defReq appsTasksURL

170 requestWithRoute r u TasksPatch'{..}

171+ = go _tpTaskList _tpTask _tpQuotaUser

171− = go _tpQuotaUser (Just _tpPrettyPrint) _tpUserIP

172+ (Just _tpPrettyPrint)

173+ _tpUserIP

174+ _tpFields

172 _tpKey

175 _tpKey

173− _tpTaskList

174− _tpTask

175 _tpOAuthToken

176 _tpOAuthToken

176− _tpFields

177 (Just AltJSON)

178 _tpTask

179 where go

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Update.hs+7−7

@@ -54,9 +54,9 @@ type TasksUpdateResource =

54 QueryParam "quotaUser" Text :>

55 QueryParam "prettyPrint" Bool :>

56 QueryParam "userIp" Text :>

57− QueryParam "key" Key :>

57+ QueryParam "fields" Text :>

58+ QueryParam "key" Key :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :>

61 ReqBody '[JSON] Task :> Put '[JSON] Task

62

@@ -168,12 +168,12 @@ instance GoogleRequest TasksUpdate' where

168 type Rs TasksUpdate' = Task

169 request = requestWithRoute defReq appsTasksURL

170 requestWithRoute r u TasksUpdate'{..}

171+ = go _tuTaskList _tuTask _tuQuotaUser

171− = go _tuQuotaUser (Just _tuPrettyPrint) _tuUserIP

172+ (Just _tuPrettyPrint)

173+ _tuUserIP

174+ _tuFields

172 _tuKey

175 _tuKey

173− _tuTaskList

174− _tuTask

175 _tuOAuthToken

176 _tuOAuthToken

176− _tuFields

177 (Just AltJSON)

178 _tuTask

179 where go

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Delete.hs+6−7

@@ -56,9 +56,9 @@ type AutoscalersDeleteResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Delete '[JSON] Operation

64

@@ -171,13 +171,12 @@ instance GoogleRequest AutoscalersDelete' where

171 type Rs AutoscalersDelete' = Operation

172 request = requestWithRoute defReq autoscalerURL

173 requestWithRoute r u AutoscalersDelete'{..}

174+ = go _adProject _adZone _adAutoscaler _adQuotaUser

174− = go _adQuotaUser (Just _adPrettyPrint) _adProject

175+ (Just _adPrettyPrint)

175 _adUserIP

176 _adUserIP

176− _adZone

177+ _adFields

177 _adKey

178 _adKey

178− _adAutoscaler

179 _adOAuthToken

180− _adFields

181 (Just AltJSON)

180 (Just AltJSON)

182 where go

181 where go

183 = clientWithRoute

182 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Get.hs+6−7

@@ -56,9 +56,9 @@ type AutoscalersGetResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] Autoscaler

63

64-- | Gets the specified Autoscaler resource.

@@ -170,13 +170,12 @@ instance GoogleRequest AutoscalersGet' where

170 type Rs AutoscalersGet' = Autoscaler

171 request = requestWithRoute defReq autoscalerURL

172 requestWithRoute r u AutoscalersGet'{..}

173+ = go _agProject _agZone _agAutoscaler _agQuotaUser

173− = go _agQuotaUser (Just _agPrettyPrint) _agProject

174+ (Just _agPrettyPrint)

174 _agUserIP

175 _agUserIP

175− _agZone

176+ _agFields

176 _agKey

177 _agKey

177− _agAutoscaler

178 _agOAuthToken

179− _agFields

180 (Just AltJSON)

179 (Just AltJSON)

181 where go

180 where go

182 = clientWithRoute

181 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Insert.hs+6−6

@@ -55,9 +55,9 @@ type AutoscalersInsertResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Autoscaler :>

63 Post '[JSON] Operation

@@ -171,12 +171,12 @@ instance GoogleRequest AutoscalersInsert' where

171 type Rs AutoscalersInsert' = Operation

172 request = requestWithRoute defReq autoscalerURL

173 requestWithRoute r u AutoscalersInsert'{..}

174+ = go _aiProject _aiZone _aiQuotaUser

174− = go _aiQuotaUser (Just _aiPrettyPrint) _aiProject

175+ (Just _aiPrettyPrint)

175 _aiUserIP

176 _aiUserIP

176− _aiZone

177+ _aiFields

177 _aiKey

178 _aiKey

178 _aiOAuthToken

179 _aiOAuthToken

179− _aiFields

180 (Just AltJSON)

181 _aiAutoscaler

182 where go

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/List.hs+15−15

@@ -54,15 +54,15 @@ type AutoscalersListResource =

54 "zones" :>

55 Capture "zone" Text :>

56 "autoscalers" :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "filter" Text :>

58+ QueryParam "maxResults" Word32 :>

59+ QueryParam "pageToken" Text :>

60+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

61− QueryParam "filter" Text :>

62− QueryParam "pageToken" Text :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "maxResults" Word32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] AutoscalerListResponse

68

@@ -188,15 +188,15 @@ instance GoogleRequest AutoscalersList' where

188 type Rs AutoscalersList' = AutoscalerListResponse

189 request = requestWithRoute defReq autoscalerURL

190 requestWithRoute r u AutoscalersList'{..}

191− = go _alQuotaUser (Just _alPrettyPrint) _alProject

191+ = go _alFilter (Just _alMaxResults) _alPageToken

192− _alUserIP

192+ _alProject

193 _alZone

194+ _alQuotaUser

195+ (Just _alPrettyPrint)

196+ _alUserIP

197+ _alFields

194 _alKey

198 _alKey

195− _alFilter

196− _alPageToken

197 _alOAuthToken

199 _alOAuthToken

198− (Just _alMaxResults)

199− _alFields

200 (Just AltJSON)

201 where go

202 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Patch.hs+6−7

@@ -58,9 +58,9 @@ type AutoscalersPatchResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :>

65 ReqBody '[JSON] Autoscaler :>

66 Patch '[JSON] Operation

@@ -185,13 +185,12 @@ instance GoogleRequest AutoscalersPatch' where

185 type Rs AutoscalersPatch' = Operation

186 request = requestWithRoute defReq autoscalerURL

187 requestWithRoute r u AutoscalersPatch'{..}

188+ = go _apProject _apZone _apAutoscaler _apQuotaUser

188− = go _apQuotaUser (Just _apPrettyPrint) _apProject

189+ (Just _apPrettyPrint)

189 _apUserIP

190 _apUserIP

190− _apZone

191+ _apFields

191 _apKey

192 _apKey

192− _apAutoscaler

193 _apOAuthToken

194− _apFields

195 (Just AltJSON)

194 (Just AltJSON)

196 _apAutoscaler

195 _apAutoscaler

197 where go

196 where go

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Update.hs+6−7

@@ -57,9 +57,9 @@ type AutoscalersUpdateResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] Autoscaler :>

65 Put '[JSON] Operation

@@ -183,13 +183,12 @@ instance GoogleRequest AutoscalersUpdate' where

183 type Rs AutoscalersUpdate' = Operation

184 request = requestWithRoute defReq autoscalerURL

185 requestWithRoute r u AutoscalersUpdate'{..}

186+ = go _auProject _auZone _auAutoscaler _auQuotaUser

186− = go _auQuotaUser (Just _auPrettyPrint) _auProject

187+ (Just _auPrettyPrint)

187 _auUserIP

188 _auUserIP

188− _auZone

189+ _auFields

189 _auKey

190 _auKey

190− _auAutoscaler

191 _auOAuthToken

192− _auFields

193 (Just AltJSON)

192 (Just AltJSON)

194 _auAutoscaler

193 _auAutoscaler

195 where go

194 where go

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Delete.hs+6−7

@@ -55,9 +55,9 @@ type ZoneOperationsDeleteResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Delete '[JSON] ()

62

63-- | Deletes the specified zone-specific operation resource.

@@ -169,13 +169,12 @@ instance GoogleRequest ZoneOperationsDelete' where

169 type Rs ZoneOperationsDelete' = ()

170 request = requestWithRoute defReq autoscalerURL

171 requestWithRoute r u ZoneOperationsDelete'{..}

172+ = go _zodProject _zodZone _zodOperation _zodQuotaUser

172− = go _zodQuotaUser (Just _zodPrettyPrint) _zodProject

173+ (Just _zodPrettyPrint)

173− _zodOperation

174 _zodUserIP

175− _zodZone

175+ _zodFields

176 _zodKey

177 _zodOAuthToken

178− _zodFields

179 (Just AltJSON)

178 (Just AltJSON)

180 where go

179 where go

181 = clientWithRoute

180 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Get.hs+6−7

@@ -55,9 +55,9 @@ type ZoneOperationsGetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] Operation

62

63-- | Retrieves the specified zone-specific operation resource.

@@ -169,13 +169,12 @@ instance GoogleRequest ZoneOperationsGet' where

169 type Rs ZoneOperationsGet' = Operation

170 request = requestWithRoute defReq autoscalerURL

171 requestWithRoute r u ZoneOperationsGet'{..}

172+ = go _zogProject _zogZone _zogOperation _zogQuotaUser

172− = go _zogQuotaUser (Just _zogPrettyPrint) _zogProject

173+ (Just _zogPrettyPrint)

173− _zogOperation

174 _zogUserIP

175− _zogZone

175+ _zogFields

176 _zogKey

177 _zogOAuthToken

178− _zogFields

179 (Just AltJSON)

178 (Just AltJSON)

180 where go

179 where go

181 = clientWithRoute

180 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/List.hs+15−15

@@ -54,15 +54,15 @@ type ZoneOperationsListResource =

54 "zones" :>

55 Capture "zone" Text :>

56 "operations" :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "filter" Text :>

58+ QueryParam "maxResults" Word32 :>

59+ QueryParam "pageToken" Text :>

60+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

61+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

62+ QueryParam "userIp" Text :>

63+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

64+ QueryParam "key" Key :>

61− QueryParam "filter" Text :>

62− QueryParam "pageToken" Text :>

63− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "maxResults" Word32 :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 Get '[JSON] OperationList

68

@@ -192,15 +192,15 @@ instance GoogleRequest ZoneOperationsList' where

192 type Rs ZoneOperationsList' = OperationList

193 request = requestWithRoute defReq autoscalerURL

194 requestWithRoute r u ZoneOperationsList'{..}

195− = go _zolQuotaUser (Just _zolPrettyPrint) _zolProject

195+ = go _zolFilter (Just _zolMaxResults) _zolPageToken

196− _zolUserIP

196+ _zolProject

197 _zolZone

198+ _zolQuotaUser

199+ (Just _zolPrettyPrint)

200+ _zolUserIP

201+ _zolFields

198 _zolKey

202 _zolKey

199− _zolFilter

200− _zolPageToken

201 _zolOAuthToken

203 _zolOAuthToken

202− (Just _zolMaxResults)

203− _zolFields

204 (Just AltJSON)

205 where go

206 = clientWithRoute

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Zones/List.hs+14−14

@@ -50,15 +50,15 @@ import Network.Google.Prelude

50type ZonesListResource =

51 Capture "project" Text :>

52 "zones" :>

53− QueryParam "quotaUser" Text :>

53+ QueryParam "filter" Text :>

54+ QueryParam "maxResults" Word32 :>

55+ QueryParam "pageToken" Text :>

56+ QueryParam "quotaUser" Text :>

54− QueryParam "prettyPrint" Bool :>

57+ QueryParam "prettyPrint" Bool :>

55− QueryParam "userIp" Text :>

58+ QueryParam "userIp" Text :>

59+ QueryParam "fields" Text :>

56− QueryParam "key" Key :>

60+ QueryParam "key" Key :>

57− QueryParam "filter" Text :>

58− QueryParam "pageToken" Text :>

59− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "maxResults" Word32 :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :> Get '[JSON] ZoneList

63

64-- |

@@ -173,14 +173,14 @@ instance GoogleRequest ZonesList' where

173 type Rs ZonesList' = ZoneList

174 request = requestWithRoute defReq autoscalerURL

175 requestWithRoute r u ZonesList'{..}

176+ = go _zlFilter (Just _zlMaxResults) _zlPageToken

177+ _zlProject

178+ _zlQuotaUser

176− = go _zlQuotaUser (Just _zlPrettyPrint) _zlProject

179+ (Just _zlPrettyPrint)

177 _zlUserIP

180 _zlUserIP

181+ _zlFields

178 _zlKey

182 _zlKey

179− _zlFilter

180− _zlPageToken

181 _zlOAuthToken

183 _zlOAuthToken

182− (Just _zlMaxResults)

183− _zlFields

184 (Just AltJSON)

185 where go

186 = clientWithRoute (Proxy :: Proxy ZonesListResource)

gogol-bigquery/gen/Network/Google/BigQuery.hs+11−11

@@ -327,15 +327,15 @@ module Network.Google.BigQuery

327 -- ** Job

328 , Job

329 , job

330− , jobJobReference

330+ , jJobReference

331− , jobStatus

331+ , jStatus

332− , jobEtag

332+ , jEtag

333− , jobUserEmail

333+ , jUserEmail

334− , jobKind

334+ , jKind

335− , jobSelfLink

335+ , jSelfLink

336− , jobId

336+ , jId

337− , jobStatistics

337+ , jStatistics

338− , jobConfiguration

338+ , jConfiguration

339

340 -- ** JobConfigurationLink

341 , JobConfigurationLink

@@ -374,7 +374,7 @@ module Network.Google.BigQuery

374

375 -- ** JSONObject

376 , JSONObject

377− , jSONObject

377+ , jsonObject

378

379 -- ** JobConfigurationQueryTableDefinitions

380 , JobConfigurationQueryTableDefinitions

@@ -483,7 +483,7 @@ module Network.Google.BigQuery

483

484 -- ** CSVOptions

485 , CSVOptions

486− , cSVOptions

486+ , csvOptions

487 , coSkipLeadingRows

488 , coAllowJaggedRows

489 , coAllowQuotedNewlines

gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+11−11

@@ -253,15 +253,15 @@ module Network.Google.BigQuery.Types

253 -- * Job

254 , Job

255 , job

256− , jobJobReference

256+ , jJobReference

257− , jobStatus

257+ , jStatus

258− , jobEtag

258+ , jEtag

259− , jobUserEmail

259+ , jUserEmail

260− , jobKind

260+ , jKind

261− , jobSelfLink

261+ , jSelfLink

262− , jobId

262+ , jId

263− , jobStatistics

263+ , jStatistics

264− , jobConfiguration

264+ , jConfiguration

265

266 -- * JobConfigurationLink

267 , JobConfigurationLink

@@ -300,7 +300,7 @@ module Network.Google.BigQuery.Types

300

301 -- * JSONObject

302 , JSONObject

303− , jSONObject

303+ , jsonObject

304

305 -- * JobConfigurationQueryTableDefinitions

306 , JobConfigurationQueryTableDefinitions

@@ -409,7 +409,7 @@ module Network.Google.BigQuery.Types

409

410 -- * CSVOptions

411 , CSVOptions

412− , cSVOptions

412+ , csvOptions

413 , coSkipLeadingRows

414 , coAllowJaggedRows

415 , coAllowQuotedNewlines

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+65−69

@@ -2269,99 +2269,97 @@ instance ToJSON Streamingbuffer where

2269--

2270-- /See:/ 'job' smart constructor.

2271data Job = Job

2272− { _jobJobReference :: !(Maybe JobReference)

2272+ { _jJobReference :: !(Maybe JobReference)

2273− , _jobStatus :: !(Maybe JobStatus)

2273+ , _jStatus :: !(Maybe JobStatus)

2274− , _jobEtag :: !(Maybe Text)

2274+ , _jEtag :: !(Maybe Text)

2275− , _jobUserEmail :: !(Maybe Text)

2275+ , _jUserEmail :: !(Maybe Text)

2276− , _jobKind :: !Text

2276+ , _jKind :: !Text

2277− , _jobSelfLink :: !(Maybe Text)

2277+ , _jSelfLink :: !(Maybe Text)

2278− , _jobId :: !(Maybe Text)

2278+ , _jId :: !(Maybe Text)

2279− , _jobStatistics :: !(Maybe JobStatistics)

2279+ , _jStatistics :: !(Maybe JobStatistics)

2280− , _jobConfiguration :: !(Maybe JobConfiguration)

2280+ , _jConfiguration :: !(Maybe JobConfiguration)

2281 } deriving (Eq,Read,Show,Data,Typeable,Generic)

2282

2283-- | Creates a value of 'Job' with the minimum fields required to make a request.

2284--

2285-- Use one of the following lenses to modify other fields as desired:

2286--

2287−-- * 'jobJobReference'

2287+-- * 'jJobReference'

2288--

2289−-- * 'jobStatus'

2289+-- * 'jStatus'

2290--

2291−-- * 'jobEtag'

2291+-- * 'jEtag'

2292--

2293−-- * 'jobUserEmail'

2293+-- * 'jUserEmail'

2294--

2295−-- * 'jobKind'

2295+-- * 'jKind'

2296--

2297−-- * 'jobSelfLink'

2297+-- * 'jSelfLink'

2298--

2299−-- * 'jobId'

2299+-- * 'jId'

2300--

2301−-- * 'jobStatistics'

2301+-- * 'jStatistics'

2302--

2303−-- * 'jobConfiguration'

2303+-- * 'jConfiguration'

2304job

2305 :: Job

2306job =

2307 Job

2308− { _jobJobReference = Nothing

2308+ { _jJobReference = Nothing

2309− , _jobStatus = Nothing

2309+ , _jStatus = Nothing

2310− , _jobEtag = Nothing

2310+ , _jEtag = Nothing

2311− , _jobUserEmail = Nothing

2311+ , _jUserEmail = Nothing

2312− , _jobKind = "bigquery#job"

2312+ , _jKind = "bigquery#job"

2313− , _jobSelfLink = Nothing

2313+ , _jSelfLink = Nothing

2314− , _jobId = Nothing

2314+ , _jId = Nothing

2315− , _jobStatistics = Nothing

2315+ , _jStatistics = Nothing

2316− , _jobConfiguration = Nothing

2316+ , _jConfiguration = Nothing

2317 }

2318

2319-- | [Optional] Reference describing the unique-per-user name of the job.

2320−jobJobReference :: Lens' Job (Maybe JobReference)

2320+jJobReference :: Lens' Job (Maybe JobReference)

2321−jobJobReference

2321+jJobReference

2322− = lens _jobJobReference

2322+ = lens _jJobReference

2323− (\ s a -> s{_jobJobReference = a})

2323+ (\ s a -> s{_jJobReference = a})

2324

2325-- | [Output-only] The status of this job. Examine this value when polling an

2326-- asynchronous job to see if the job is complete.

2327−jobStatus :: Lens' Job (Maybe JobStatus)

2327+jStatus :: Lens' Job (Maybe JobStatus)

2328−jobStatus

2328+jStatus = lens _jStatus (\ s a -> s{_jStatus = a})

2329− = lens _jobStatus (\ s a -> s{_jobStatus = a})

2330

2329

2331-- | [Output-only] A hash of this resource.

2330-- | [Output-only] A hash of this resource.

2332−jobEtag :: Lens' Job (Maybe Text)

2331+jEtag :: Lens' Job (Maybe Text)

2333−jobEtag = lens _jobEtag (\ s a -> s{_jobEtag = a})

2332+jEtag = lens _jEtag (\ s a -> s{_jEtag = a})

2334

2333

2335-- | [Output-only] Email address of the user who ran the job.

2334-- | [Output-only] Email address of the user who ran the job.

2336−jobUserEmail :: Lens' Job (Maybe Text)

2335+jUserEmail :: Lens' Job (Maybe Text)

2337−jobUserEmail

2336+jUserEmail

2338− = lens _jobUserEmail (\ s a -> s{_jobUserEmail = a})

2337+ = lens _jUserEmail (\ s a -> s{_jUserEmail = a})

2339

2338

2340-- | [Output-only] The type of the resource.

2339-- | [Output-only] The type of the resource.

2341−jobKind :: Lens' Job Text

2340+jKind :: Lens' Job Text

2342−jobKind = lens _jobKind (\ s a -> s{_jobKind = a})

2341+jKind = lens _jKind (\ s a -> s{_jKind = a})

2343

2342

2344-- | [Output-only] A URL that can be used to access this resource again.

2343-- | [Output-only] A URL that can be used to access this resource again.

2345−jobSelfLink :: Lens' Job (Maybe Text)

2344+jSelfLink :: Lens' Job (Maybe Text)

2346−jobSelfLink

2345+jSelfLink

2347− = lens _jobSelfLink (\ s a -> s{_jobSelfLink = a})

2346+ = lens _jSelfLink (\ s a -> s{_jSelfLink = a})

2348

2347

2349-- | [Output-only] Opaque ID field of the job

2348-- | [Output-only] Opaque ID field of the job

2350−jobId :: Lens' Job (Maybe Text)

2349+jId :: Lens' Job (Maybe Text)

2351−jobId = lens _jobId (\ s a -> s{_jobId = a})

2350+jId = lens _jId (\ s a -> s{_jId = a})

2352

2351

2353-- | [Output-only] Information about the job, including starting time and

2352-- | [Output-only] Information about the job, including starting time and

2354-- ending time of the job.

2353-- ending time of the job.

2355−jobStatistics :: Lens' Job (Maybe JobStatistics)

2354+jStatistics :: Lens' Job (Maybe JobStatistics)

2356−jobStatistics

2355+jStatistics

2357− = lens _jobStatistics

2356+ = lens _jStatistics (\ s a -> s{_jStatistics = a})

2358− (\ s a -> s{_jobStatistics = a})

2359

2357

2360-- | [Required] Describes the job configuration.

2358-- | [Required] Describes the job configuration.

2361−jobConfiguration :: Lens' Job (Maybe JobConfiguration)

2359+jConfiguration :: Lens' Job (Maybe JobConfiguration)

2362−jobConfiguration

2360+jConfiguration

2363− = lens _jobConfiguration

2361+ = lens _jConfiguration

2364− (\ s a -> s{_jobConfiguration = a})

2362+ (\ s a -> s{_jConfiguration = a})

2365

2363

2366instance FromJSON Job where

2364instance FromJSON Job where

2367 parseJSON

2365 parseJSON

@@ -2381,15 +2379,13 @@ instance ToJSON Job where

2381 toJSON Job{..}

2379 toJSON Job{..}

2382 = object

2380 = object

2383 (catMaybes

2381 (catMaybes

2384− [("jobReference" .=) <$> _jobJobReference,

2382+ [("jobReference" .=) <$> _jJobReference,

2385− ("status" .=) <$> _jobStatus,

2383+ ("status" .=) <$> _jStatus, ("etag" .=) <$> _jEtag,

2386− ("etag" .=) <$> _jobEtag,

2387− ("user_email" .=) <$> _jobUserEmail,

2384+ ("user_email" .=) <$> _jUserEmail,

2388− Just ("kind" .= _jobKind),

2385+ Just ("kind" .= _jKind),

2389− ("selfLink" .=) <$> _jobSelfLink,

2386+ ("selfLink" .=) <$> _jSelfLink, ("id" .=) <$> _jId,

2390− ("id" .=) <$> _jobId,

2391− ("statistics" .=) <$> _jobStatistics,

2387+ ("statistics" .=) <$> _jStatistics,

2392− ("configuration" .=) <$> _jobConfiguration])

2388+ ("configuration" .=) <$> _jConfiguration])

2393

2389

2394--

2390--

2395-- /See:/ 'jobConfigurationLink' smart constructor.

2391-- /See:/ 'jobConfigurationLink' smart constructor.

@@ -2727,16 +2723,16 @@ instance ToJSON JobConfigurationExtract where

2727

2723

2728-- | Represents a single JSON object.

2724-- | Represents a single JSON object.

2729--

2725--

2730−-- /See:/ 'jSONObject' smart constructor.

2726+-- /See:/ 'jsonObject' smart constructor.

2731data JSONObject =

2727data JSONObject =

2732 JSONObject

2728 JSONObject

2733 deriving (Eq,Read,Show,Data,Typeable,Generic)

2729 deriving (Eq,Read,Show,Data,Typeable,Generic)

2734

2730

2735-- | Creates a value of 'JSONObject' with the minimum fields required to make a request.

2731-- | Creates a value of 'JSONObject' with the minimum fields required to make a request.

2736--

2732--

2737−jSONObject

2733+jsonObject

2738 :: JSONObject

2734 :: JSONObject

2739−jSONObject = JSONObject

2735+jsonObject = JSONObject

2740

2736

2741instance FromJSON JSONObject where

2737instance FromJSON JSONObject where

2742 parseJSON

2738 parseJSON

@@ -3738,7 +3734,7 @@ instance ToJSON ErrorProto where

3738 ("message" .=) <$> _epMessage])

3734 ("message" .=) <$> _epMessage])

3739

3735

3740--

3736--

3741−-- /See:/ 'cSVOptions' smart constructor.

3737+-- /See:/ 'csvOptions' smart constructor.

3742data CSVOptions = CSVOptions

3738data CSVOptions = CSVOptions

3743 { _coSkipLeadingRows :: !(Maybe Int32)

3739 { _coSkipLeadingRows :: !(Maybe Int32)

3744 , _coAllowJaggedRows :: !(Maybe Bool)

3740 , _coAllowJaggedRows :: !(Maybe Bool)

@@ -3763,9 +3759,9 @@ data CSVOptions = CSVOptions

3763-- * 'coEncoding'

3759-- * 'coEncoding'

3764--

3760--

3765-- * 'coFieldDelimiter'

3761-- * 'coFieldDelimiter'

3766−cSVOptions

3762+csvOptions

3767 :: CSVOptions

3763 :: CSVOptions

3768−cSVOptions =

3764+csvOptions =

3769 CSVOptions

3765 CSVOptions

3770 { _coSkipLeadingRows = Nothing

3766 { _coSkipLeadingRows = Nothing

3771 , _coAllowJaggedRows = Nothing

3767 , _coAllowJaggedRows = Nothing

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Delete.hs+12−12

@@ -54,13 +54,13 @@ type DatasetsDeleteResource =

54 Capture "projectId" Text :>

55 "datasets" :>

56 Capture "datasetId" Text :>

57+ QueryParam "deleteContents" Bool :>

57− QueryParam "quotaUser" Text :>

58+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

59+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

62+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "deleteContents" Bool :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Delete '[JSON] ()

65

66-- | Deletes the dataset specified by the datasetId value. Before you can

@@ -177,13 +177,13 @@ instance GoogleRequest DatasetsDelete' where

177 type Rs DatasetsDelete' = ()

178 request = requestWithRoute defReq bigQueryURL

179 requestWithRoute r u DatasetsDelete'{..}

180+ = go _ddDeleteContents _ddProjectId _ddDatasetId

181+ _ddQuotaUser

180− = go _ddQuotaUser (Just _ddPrettyPrint) _ddUserIP

182+ (Just _ddPrettyPrint)

183+ _ddUserIP

184+ _ddFields

181 _ddKey

185 _ddKey

182− _ddDatasetId

183− _ddProjectId

184 _ddOAuthToken

186 _ddOAuthToken

185− _ddDeleteContents

186− _ddFields

187 (Just AltJSON)

188 where go

189 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Get.hs+7−7

@@ -53,9 +53,9 @@ type DatasetsGetResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :> Get '[JSON] Dataset

60

61-- | Returns the dataset specified by datasetID.

@@ -158,12 +158,12 @@ instance GoogleRequest DatasetsGet' where

158 type Rs DatasetsGet' = Dataset

159 request = requestWithRoute defReq bigQueryURL

160 requestWithRoute r u DatasetsGet'{..}

161+ = go _dgProjectId _dgDatasetId _dgQuotaUser

161− = go _dgQuotaUser (Just _dgPrettyPrint) _dgUserIP

162+ (Just _dgPrettyPrint)

163+ _dgUserIP

164+ _dgFields

162 _dgKey

165 _dgKey

163− _dgDatasetId

164− _dgProjectId

165 _dgOAuthToken

166 _dgOAuthToken

166− _dgFields

167 (Just AltJSON)

168 where go

169 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Insert.hs+6−6

@@ -52,9 +52,9 @@ type DatasetsInsertResource =

52 QueryParam "quotaUser" Text :>

53 QueryParam "prettyPrint" Bool :>

54 QueryParam "userIp" Text :>

55− QueryParam "key" Key :>

55+ QueryParam "fields" Text :>

56+ QueryParam "key" Key :>

56− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Dataset :> Post '[JSON] Dataset

60

@@ -158,11 +158,11 @@ instance GoogleRequest DatasetsInsert' where

158 type Rs DatasetsInsert' = Dataset

159 request = requestWithRoute defReq bigQueryURL

160 requestWithRoute r u DatasetsInsert'{..}

161− = go _diQuotaUser (Just _diPrettyPrint) _diUserIP

161+ = go _diProjectId _diQuotaUser (Just _diPrettyPrint)

162+ _diUserIP

163+ _diFields

162 _diKey

164 _diKey

163− _diProjectId

164 _diOAuthToken

165 _diOAuthToken

165− _diFields

166 (Just AltJSON)

167 _diDataset

168 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/List.hs+14−15

@@ -52,15 +52,15 @@ type DatasetsListResource =

52 "projects" :>

53 Capture "projectId" Text :>

54 "datasets" :>

55− QueryParam "quotaUser" Text :>

55+ QueryParam "all" Bool :>

56− QueryParam "prettyPrint" Bool :>

56+ QueryParam "maxResults" Word32 :>

57− QueryParam "userIp" Text :>

57+ QueryParam "pageToken" Text :>

58− QueryParam "all" Bool :>

58+ QueryParam "quotaUser" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "prettyPrint" Bool :>

60− QueryParam "pageToken" Text :>

60+ QueryParam "userIp" Text :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "maxResults" Word32 :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Get '[JSON] DatasetList

65

66-- | Lists all datasets in the specified project to which you have been

@@ -181,14 +181,13 @@ instance GoogleRequest DatasetsList' where

181 type Rs DatasetsList' = DatasetList

182 request = requestWithRoute defReq bigQueryURL

183 requestWithRoute r u DatasetsList'{..}

184+ = go _dlAll _dlMaxResults _dlPageToken _dlProjectId

185+ _dlQuotaUser

184− = go _dlQuotaUser (Just _dlPrettyPrint) _dlUserIP

186+ (Just _dlPrettyPrint)

185− _dlAll

187+ _dlUserIP

188+ _dlFields

186 _dlKey

189 _dlKey

187− _dlPageToken

188− _dlProjectId

189 _dlOAuthToken

190 _dlOAuthToken

190− _dlMaxResults

191− _dlFields

192 (Just AltJSON)

191 (Just AltJSON)

193 where go

192 where go

194 = clientWithRoute

193 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Patch.hs+7−7

@@ -57,9 +57,9 @@ type DatasetsPatchResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :>

64 ReqBody '[JSON] Dataset :> Patch '[JSON] Dataset

65

@@ -176,12 +176,12 @@ instance GoogleRequest DatasetsPatch' where

176 type Rs DatasetsPatch' = Dataset

177 request = requestWithRoute defReq bigQueryURL

178 requestWithRoute r u DatasetsPatch'{..}

179+ = go _dpProjectId _dpDatasetId _dpQuotaUser

179− = go _dpQuotaUser (Just _dpPrettyPrint) _dpUserIP

180+ (Just _dpPrettyPrint)

181+ _dpUserIP

182+ _dpFields

180 _dpKey

183 _dpKey

181− _dpDatasetId

182− _dpProjectId

183 _dpOAuthToken

184 _dpOAuthToken

184− _dpFields

185 (Just AltJSON)

186 _dpDataset

187 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Update.hs+7−7

@@ -56,9 +56,9 @@ type DatasetsUpdateResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 ReqBody '[JSON] Dataset :> Put '[JSON] Dataset

64

@@ -174,12 +174,12 @@ instance GoogleRequest DatasetsUpdate' where

174 type Rs DatasetsUpdate' = Dataset

175 request = requestWithRoute defReq bigQueryURL

176 requestWithRoute r u DatasetsUpdate'{..}

177+ = go _duProjectId _duDatasetId _duQuotaUser

177− = go _duQuotaUser (Just _duPrettyPrint) _duUserIP

178+ (Just _duPrettyPrint)

179+ _duUserIP

180+ _duFields

178 _duKey

181 _duKey

179− _duDatasetId

180− _duProjectId

181 _duOAuthToken

182 _duOAuthToken

182− _duFields

183 (Just AltJSON)

184 _duDataset

185 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Cancel.hs+6−6

@@ -56,9 +56,9 @@ type JobsCancelResource =

56 QueryParam "quotaUser" Text :>

57 QueryParam "prettyPrint" Bool :>

58 QueryParam "userIp" Text :>

59− QueryParam "key" Key :>

59+ QueryParam "fields" Text :>

60+ QueryParam "key" Key :>

60− QueryParam "oauth_token" OAuthToken :>

61+ QueryParam "oauth_token" OAuthToken :>

61− QueryParam "fields" Text :>

62 QueryParam "alt" AltJSON :>

63 Post '[JSON] JobCancelResponse

64

@@ -163,12 +163,12 @@ instance GoogleRequest JobsCancel' where

163 type Rs JobsCancel' = JobCancelResponse

164 request = requestWithRoute defReq bigQueryURL

165 requestWithRoute r u JobsCancel'{..}

166+ = go _jcProjectId _jcJobId _jcQuotaUser

166− = go _jcQuotaUser (Just _jcPrettyPrint) _jcJobId

167+ (Just _jcPrettyPrint)

167 _jcUserIP

168 _jcUserIP

169+ _jcFields

168 _jcKey

170 _jcKey

169− _jcProjectId

170 _jcOAuthToken

171 _jcOAuthToken

171− _jcFields

172 (Just AltJSON)

173 where go

174 = clientWithRoute (Proxy :: Proxy JobsCancelResource)

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Get.hs+6−6

@@ -55,9 +55,9 @@ type JobsGetResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] Job

62

63-- | Returns information about a specific job. Job information is available

@@ -161,12 +161,12 @@ instance GoogleRequest JobsGet' where

161 type Rs JobsGet' = Job

162 request = requestWithRoute defReq bigQueryURL

163 requestWithRoute r u JobsGet'{..}

164+ = go _jgProjectId _jgJobId _jgQuotaUser

164− = go _jgQuotaUser (Just _jgPrettyPrint) _jgJobId

165+ (Just _jgPrettyPrint)

165 _jgUserIP

166 _jgUserIP

167+ _jgFields

166 _jgKey

168 _jgKey

167− _jgProjectId

168 _jgOAuthToken

169 _jgOAuthToken

169− _jgFields

170 (Just AltJSON)

171 where go

172 = clientWithRoute (Proxy :: Proxy JobsGetResource) r

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/GetQueryResults.hs+16−17

@@ -54,16 +54,16 @@ type JobsGetQueryResultsResource =

54 Capture "projectId" Text :>

55 "queries" :>

56 Capture "jobId" Text :>

57− QueryParam "quotaUser" Text :>

57+ QueryParam "maxResults" Word32 :>

58− QueryParam "prettyPrint" Bool :>

58+ QueryParam "pageToken" Text :>

59− QueryParam "userIp" Text :>

59+ QueryParam "startIndex" Word64 :>

60− QueryParam "key" Key :>

61− QueryParam "timeoutMs" Word32 :>

60+ QueryParam "timeoutMs" Word32 :>

61+ QueryParam "quotaUser" Text :>

62− QueryParam "pageToken" Text :>

62+ QueryParam "prettyPrint" Bool :>

63− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "userIp" Text :>

64− QueryParam "startIndex" Word64 :>

64+ QueryParam "fields" Text :>

65− QueryParam "maxResults" Word32 :>

65+ QueryParam "key" Key :>

66− QueryParam "fields" Text :>

66+ QueryParam "oauth_token" OAuthToken :>

67 QueryParam "alt" AltJSON :>

68 Get '[JSON] GetQueryResultsResponse

69

@@ -216,17 +216,16 @@ instance GoogleRequest JobsGetQueryResults' where

216 GetQueryResultsResponse

217 request = requestWithRoute defReq bigQueryURL

218 requestWithRoute r u JobsGetQueryResults'{..}

219− = go _jgqrQuotaUser (Just _jgqrPrettyPrint)

219+ = go _jgqrMaxResults _jgqrPageToken _jgqrStartIndex

220+ _jgqrTimeoutMs

221+ _jgqrProjectId

220 _jgqrJobId

222 _jgqrJobId

223+ _jgqrQuotaUser

224+ (Just _jgqrPrettyPrint)

221 _jgqrUserIP

225 _jgqrUserIP

226+ _jgqrFields

222 _jgqrKey

227 _jgqrKey

223− _jgqrTimeoutMs

224− _jgqrPageToken

225− _jgqrProjectId

226 _jgqrOAuthToken

228 _jgqrOAuthToken

227− _jgqrStartIndex

228− _jgqrMaxResults

229− _jgqrFields

230 (Just AltJSON)

229 (Just AltJSON)

231 where go

230 where go

232 = clientWithRoute

231 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Insert.hs+7−7

@@ -53,9 +53,9 @@ type JobsInsertResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 MultipartRelated '[JSON] Job Body :> Post '[JSON] Job

61

@@ -166,12 +166,12 @@ instance GoogleRequest JobsInsert' where

166 type Rs JobsInsert' = Job

167 request = requestWithRoute defReq bigQueryURL

168 requestWithRoute r u JobsInsert'{..}

169+ = go _jiMedia _jiProjectId _jiQuotaUser

169− = go _jiQuotaUser (Just _jiPrettyPrint) _jiUserIP

170+ (Just _jiPrettyPrint)

170− _jiMedia

171+ _jiUserIP

172+ _jiFields

171 _jiKey

173 _jiKey

172− _jiProjectId

173 _jiOAuthToken

174 _jiOAuthToken

174− _jiFields

175 (Just AltJSON)

176 _jiJob

177 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/List.hs+17−17

@@ -57,18 +57,18 @@ type JobsListResource =

57 "projects" :>

58 Capture "projectId" Text :>

59 "jobs" :>

60− QueryParam "quotaUser" Text :>

60+ QueryParam "allUsers" Bool :>

61− QueryParam "prettyPrint" Bool :>

61+ QueryParam "maxResults" Word32 :>

62− QueryParam "userIp" Text :>

62+ QueryParam "pageToken" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "projection" BigqueryJobsListProjection :>

64 QueryParams "stateFilter" BigqueryJobsListStateFilter

65 :>

66− QueryParam "projection" BigqueryJobsListProjection :>

66+ QueryParam "quotaUser" Text :>

67− QueryParam "pageToken" Text :>

67+ QueryParam "prettyPrint" Bool :>

68− QueryParam "allUsers" Bool :>

68+ QueryParam "userIp" Text :>

69− QueryParam "oauth_token" OAuthToken :>

69+ QueryParam "fields" Text :>

70− QueryParam "maxResults" Word32 :>

70+ QueryParam "key" Key :>

71− QueryParam "fields" Text :>

71+ QueryParam "oauth_token" OAuthToken :>

72 QueryParam "alt" AltJSON :> Get '[JSON] JobList

73

74-- | Lists all jobs that you started in the specified project. Job

@@ -212,16 +212,16 @@ instance GoogleRequest JobsList' where

212 type Rs JobsList' = JobList

213 request = requestWithRoute defReq bigQueryURL

214 requestWithRoute r u JobsList'{..}

215− = go _jlQuotaUser (Just _jlPrettyPrint) _jlUserIP

215+ = go _jlAllUsers _jlMaxResults _jlPageToken

216− _jlKey

217− _jlStateFilter

218 _jlProjection

216 _jlProjection

219− _jlPageToken

217+ _jlStateFilter

220 _jlProjectId

218 _jlProjectId

221− _jlAllUsers

219+ _jlQuotaUser

222− _jlOAuthToken

220+ (Just _jlPrettyPrint)

223− _jlMaxResults

221+ _jlUserIP

224 _jlFields

222 _jlFields

223+ _jlKey

224+ _jlOAuthToken

225 (Just AltJSON)

226 where go

227 = clientWithRoute (Proxy :: Proxy JobsListResource) r

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Query.hs+6−6

@@ -53,9 +53,9 @@ type JobsQueryResource =

53 QueryParam "quotaUser" Text :>

54 QueryParam "prettyPrint" Bool :>

55 QueryParam "userIp" Text :>

56− QueryParam "key" Key :>

56+ QueryParam "fields" Text :>

57+ QueryParam "key" Key :>

57− QueryParam "oauth_token" OAuthToken :>

58+ QueryParam "oauth_token" OAuthToken :>

58− QueryParam "fields" Text :>

59 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] QueryRequest :>

61 Post '[JSON] QueryResponse

@@ -162,11 +162,11 @@ instance GoogleRequest JobsQuery' where

162 type Rs JobsQuery' = QueryResponse

163 request = requestWithRoute defReq bigQueryURL

164 requestWithRoute r u JobsQuery'{..}

165− = go _jqQuotaUser (Just _jqPrettyPrint) _jqUserIP

165+ = go _jqProjectId _jqQuotaUser (Just _jqPrettyPrint)

166+ _jqUserIP

167+ _jqFields

166 _jqKey

168 _jqKey

167− _jqProjectId

168 _jqOAuthToken

169 _jqOAuthToken

169− _jqFields

170 (Just AltJSON)

171 _jqQueryRequest

172 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Projects/List.hs+12−12

@@ -47,14 +47,14 @@ import Network.Google.Prelude

47-- 'ProjectsList'' request conforms to.

48type ProjectsListResource =

49 "projects" :>

50+ QueryParam "maxResults" Word32 :>

51+ QueryParam "pageToken" Text :>

50− QueryParam "quotaUser" Text :>

52+ QueryParam "quotaUser" Text :>

51− QueryParam "prettyPrint" Bool :>

53+ QueryParam "prettyPrint" Bool :>

52− QueryParam "userIp" Text :>

54+ QueryParam "userIp" Text :>

55+ QueryParam "fields" Text :>

53− QueryParam "key" Key :>

56+ QueryParam "key" Key :>

54− QueryParam "pageToken" Text :>

55− QueryParam "oauth_token" OAuthToken :>

57+ QueryParam "oauth_token" OAuthToken :>

56− QueryParam "maxResults" Word32 :>

57− QueryParam "fields" Text :>

58 QueryParam "alt" AltJSON :> Get '[JSON] ProjectList

59

60-- | Lists all projects to which you have been granted any project role.

@@ -156,12 +156,12 @@ instance GoogleRequest ProjectsList' where

156 type Rs ProjectsList' = ProjectList

157 request = requestWithRoute defReq bigQueryURL

158 requestWithRoute r u ProjectsList'{..}

159+ = go _plMaxResults _plPageToken _plQuotaUser

159− = go _plQuotaUser (Just _plPrettyPrint) _plUserIP

160+ (Just _plPrettyPrint)

161+ _plUserIP

162+ _plFields

160 _plKey

163 _plKey

161− _plPageToken

162 _plOAuthToken

164 _plOAuthToken

163− _plMaxResults

164− _plFields

165 (Just AltJSON)

166 where go

167 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tabledata/InsertAll.hs+8−8

@@ -59,9 +59,9 @@ type TabledataInsertAllResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] TableDataInsertAllRequest :>

67 Post '[JSON] TableDataInsertAllResponse

@@ -192,13 +192,13 @@ instance GoogleRequest TabledataInsertAll' where

192 TableDataInsertAllResponse

193 request = requestWithRoute defReq bigQueryURL

194 requestWithRoute r u TabledataInsertAll'{..}

195+ = go _tiaProjectId _tiaDatasetId _tiaTableId

196+ _tiaQuotaUser

195− = go _tiaQuotaUser (Just _tiaPrettyPrint) _tiaUserIP

197+ (Just _tiaPrettyPrint)

198+ _tiaUserIP

199+ _tiaFields

196 _tiaKey

200 _tiaKey

197− _tiaDatasetId

198− _tiaProjectId

199 _tiaOAuthToken

201 _tiaOAuthToken

200− _tiaTableId

201− _tiaFields

202 (Just AltJSON)

203 _tiaTableDataInsertAllRequest

204 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tabledata/List.hs+16−15

@@ -58,15 +58,15 @@ type TabledataListResource =

58 "tables" :>

59 Capture "tableId" Text :>

60 "data" :>

61+ QueryParam "maxResults" Word32 :>

62+ QueryParam "pageToken" Text :>

63+ QueryParam "startIndex" Word64 :>

61− QueryParam "quotaUser" Text :>

64+ QueryParam "quotaUser" Text :>

62− QueryParam "prettyPrint" Bool :>

65+ QueryParam "prettyPrint" Bool :>

63− QueryParam "userIp" Text :>

66+ QueryParam "userIp" Text :>

67+ QueryParam "fields" Text :>

64− QueryParam "key" Key :>

68+ QueryParam "key" Key :>

65− QueryParam "pageToken" Text :>

66− QueryParam "oauth_token" OAuthToken :>

69+ QueryParam "oauth_token" OAuthToken :>

67− QueryParam "startIndex" Word64 :>

68− QueryParam "maxResults" Word32 :>

69− QueryParam "fields" Text :>

70 QueryParam "alt" AltJSON :>

71 Get '[JSON] TableDataList

72

@@ -206,15 +206,16 @@ instance GoogleRequest TabledataList' where

206 type Rs TabledataList' = TableDataList

207 request = requestWithRoute defReq bigQueryURL

208 requestWithRoute r u TabledataList'{..}

209− = go _tQuotaUser (Just _tPrettyPrint) _tUserIP _tKey

210− _tDatasetId

211− _tPageToken

209+ = go _tMaxResults _tPageToken _tStartIndex

212 _tProjectId

210 _tProjectId

213− _tOAuthToken

211+ _tDatasetId

214 _tTableId

212 _tTableId

215− _tStartIndex

213+ _tQuotaUser

216− _tMaxResults

214+ (Just _tPrettyPrint)

215+ _tUserIP

217 _tFields

216 _tFields

217+ _tKey

218+ _tOAuthToken

218 (Just AltJSON)

219 (Just AltJSON)

219 where go

220 where go

220 = clientWithRoute

221 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Delete.hs+8−8

@@ -57,9 +57,9 @@ type TablesDeleteResource =

57 QueryParam "quotaUser" Text :>

58 QueryParam "prettyPrint" Bool :>

59 QueryParam "userIp" Text :>

60− QueryParam "key" Key :>

60+ QueryParam "fields" Text :>

61+ QueryParam "key" Key :>

61− QueryParam "oauth_token" OAuthToken :>

62+ QueryParam "oauth_token" OAuthToken :>

62− QueryParam "fields" Text :>

63 QueryParam "alt" AltJSON :> Delete '[JSON] ()

64

65-- | Deletes the table specified by tableId from the dataset. If the table

@@ -173,13 +173,13 @@ instance GoogleRequest TablesDelete' where

173 type Rs TablesDelete' = ()

174 request = requestWithRoute defReq bigQueryURL

175 requestWithRoute r u TablesDelete'{..}

176+ = go _tdProjectId _tdDatasetId _tdTableId

177+ _tdQuotaUser

176− = go _tdQuotaUser (Just _tdPrettyPrint) _tdUserIP

178+ (Just _tdPrettyPrint)

179+ _tdUserIP

180+ _tdFields

177 _tdKey

181 _tdKey

178− _tdDatasetId

179− _tdProjectId

180 _tdOAuthToken

182 _tdOAuthToken

181− _tdTableId

182− _tdFields

183 (Just AltJSON)

184 where go

185 = clientWithRoute

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Get.hs+8−8

@@ -58,9 +58,9 @@ type TablesGetResource =

58 QueryParam "quotaUser" Text :>

59 QueryParam "prettyPrint" Bool :>

60 QueryParam "userIp" Text :>

61− QueryParam "key" Key :>

61+ QueryParam "fields" Text :>

62+ QueryParam "key" Key :>

62− QueryParam "oauth_token" OAuthToken :>

63+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "fields" Text :>

64 QueryParam "alt" AltJSON :> Get '[JSON] Table

65

66-- | Gets the specified table resource by table ID. This method does not

@@ -175,13 +175,13 @@ instance GoogleRequest TablesGet' where

175 type Rs TablesGet' = Table

176 request = requestWithRoute defReq bigQueryURL

177 requestWithRoute r u TablesGet'{..}

178+ = go _tgProjectId _tgDatasetId _tgTableId

179+ _tgQuotaUser

178− = go _tgQuotaUser (Just _tgPrettyPrint) _tgUserIP

180+ (Just _tgPrettyPrint)

181+ _tgUserIP

182+ _tgFields

179 _tgKey

183 _tgKey

180− _tgDatasetId

181− _tgProjectId

182 _tgOAuthToken

184 _tgOAuthToken

183− _tgTableId

184− _tgFields

185 (Just AltJSON)

186 where go

187 = clientWithRoute (Proxy :: Proxy TablesGetResource)

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Insert.hs+7−7

@@ -55,9 +55,9 @@ type TablesInsertResource =

55 QueryParam "quotaUser" Text :>

56 QueryParam "prettyPrint" Bool :>

57 QueryParam "userIp" Text :>

58− QueryParam "key" Key :>

58+ QueryParam "fields" Text :>

59+ QueryParam "key" Key :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :>

62 ReqBody '[JSON] Table :> Post '[JSON] Table

63

@@ -170,12 +170,12 @@ instance GoogleRequest TablesInsert' where

170 type Rs TablesInsert' = Table

171 request = requestWithRoute defReq bigQueryURL

172 requestWithRoute r u TablesInsert'{..}

173+ = go _tiProjectId _tiDatasetId _tiQuotaUser

173− = go _tiQuotaUser (Just _tiPrettyPrint) _tiUserIP

174+ (Just _tiPrettyPrint)

175+ _tiUserIP

176+ _tiFields

174 _tiKey

177 _tiKey

175− _tiDatasetId

176− _tiProjectId

177 _tiOAuthToken

178 _tiOAuthToken

178− _tiFields

179 (Just AltJSON)

180 _tiTable

181 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/List.hs+14−14

@@ -54,14 +54,14 @@ type TablesListResource =

54 "datasets" :>

55 Capture "datasetId" Text :>

56 "tables" :>

57+ QueryParam "maxResults" Word32 :>

58+ QueryParam "pageToken" Text :>

57− QueryParam "quotaUser" Text :>

59+ QueryParam "quotaUser" Text :>

58− QueryParam "prettyPrint" Bool :>

60+ QueryParam "prettyPrint" Bool :>

59− QueryParam "userIp" Text :>

61+ QueryParam "userIp" Text :>

62+ QueryParam "fields" Text :>

60− QueryParam "key" Key :>

63+ QueryParam "key" Key :>

61− QueryParam "pageToken" Text :>

62− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

63− QueryParam "maxResults" Word32 :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :> Get '[JSON] TableList

66

67-- | Lists all tables in the specified dataset. Requires the READER dataset

@@ -184,14 +184,14 @@ instance GoogleRequest TablesList' where

184 type Rs TablesList' = TableList

185 request = requestWithRoute defReq bigQueryURL

186 requestWithRoute r u TablesList'{..}

187− = go _tlQuotaUser (Just _tlPrettyPrint) _tlUserIP

187+ = go _tlMaxResults _tlPageToken _tlProjectId

188− _tlKey

189 _tlDatasetId

188 _tlDatasetId

190− _tlPageToken

189+ _tlQuotaUser

191− _tlProjectId

190+ (Just _tlPrettyPrint)

192− _tlOAuthToken

191+ _tlUserIP

193− _tlMaxResults

194 _tlFields

192 _tlFields

193+ _tlKey

194+ _tlOAuthToken

195 (Just AltJSON)

196 where go

197 = clientWithRoute (Proxy :: Proxy TablesListResource)

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Patch.hs+8−8

@@ -60,9 +60,9 @@ type TablesPatchResource =

60 QueryParam "quotaUser" Text :>

61 QueryParam "prettyPrint" Bool :>

62 QueryParam "userIp" Text :>

63− QueryParam "key" Key :>

63+ QueryParam "fields" Text :>

64+ QueryParam "key" Key :>

64− QueryParam "oauth_token" OAuthToken :>

65+ QueryParam "oauth_token" OAuthToken :>

65− QueryParam "fields" Text :>

66 QueryParam "alt" AltJSON :>

67 ReqBody '[JSON] Table :> Patch '[JSON] Table

68

@@ -188,13 +188,13 @@ instance GoogleRequest TablesPatch' where

188 type Rs TablesPatch' = Table

189 request = requestWithRoute defReq bigQueryURL

190 requestWithRoute r u TablesPatch'{..}

191+ = go _tpProjectId _tpDatasetId _tpTableId

192+ _tpQuotaUser

191− = go _tpQuotaUser (Just _tpPrettyPrint) _tpUserIP

193+ (Just _tpPrettyPrint)

194+ _tpUserIP

195+ _tpFields

192 _tpKey

196 _tpKey

193− _tpDatasetId

194− _tpProjectId

195 _tpOAuthToken

197 _tpOAuthToken

196− _tpTableId

197− _tpFields

198 (Just AltJSON)

199 _tpTable

200 where go

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Update.hs+8−8

@@ -59,9 +59,9 @@ type TablesUpdateResource =

59 QueryParam "quotaUser" Text :>

60 QueryParam "prettyPrint" Bool :>

61 QueryParam "userIp" Text :>

62− QueryParam "key" Key :>

62+ QueryParam "fields" Text :>

63+ QueryParam "key" Key :>

63− QueryParam "oauth_token" OAuthToken :>

64+ QueryParam "oauth_token" OAuthToken :>

64− QueryParam "fields" Text :>

65 QueryParam "alt" AltJSON :>

66 ReqBody '[JSON] Table :> Put '[JSON] Table

67

@@ -186,13 +186,13 @@ instance GoogleRequest TablesUpdate' where

186 type Rs TablesUpdate' = Table

187 request = requestWithRoute defReq bigQueryURL

188 requestWithRoute r u TablesUpdate'{..}

189+ = go _tuProjectId _tuDatasetId _tuTableId

190+ _tuQuotaUser

189− = go _tuQuotaUser (Just _tuPrettyPrint) _tuUserIP

191+ (Just _tuPrettyPrint)

192+ _tuUserIP

193+ _tuFields

190 _tuKey

194 _tuKey

191− _tuDatasetId

192− _tuProjectId

193 _tuOAuthToken

195 _tuOAuthToken

194− _tuTableId

195− _tuFields

196 (Just AltJSON)

197 _tuTable

198 where go

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/Get.hs+17−17

@@ -56,17 +56,17 @@ type BillingAccountsGetResource =

56 "v1" :>

57 "{+name}" :>

58 QueryParam "$.xgafv" Text :>

59− QueryParam "quotaUser" Text :>

59+ QueryParam "access_token" Text :>

60− QueryParam "prettyPrint" Bool :>

60+ QueryParam "bearer_token" Text :>

61− QueryParam "upload_protocol" Text :>

61+ QueryParam "callback" Text :>

62 QueryParam "pp" Bool :>

63− QueryParam "access_token" Text :>

64− QueryParam "uploadType" Text :>

63+ QueryParam "uploadType" Text :>

64+ QueryParam "upload_protocol" Text :>

65− QueryParam "bearer_token" Text :>

65+ QueryParam "quotaUser" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "prettyPrint" Bool :>

67+ QueryParam "fields" Text :>

68+ QueryParam "key" Key :>

67− QueryParam "oauth_token" OAuthToken :>

69+ QueryParam "oauth_token" OAuthToken :>

68− QueryParam "fields" Text :>

69− QueryParam "callback" Text :>

70 QueryParam "alt" AltJSON :>

71 Get '[JSON] BillingAccount

72

@@ -220,17 +220,17 @@ instance GoogleRequest BillingAccountsGet' where

220 type Rs BillingAccountsGet' = BillingAccount

221 request = requestWithRoute defReq billingURL

222 requestWithRoute r u BillingAccountsGet'{..}

223− = go _bagXgafv _bagQuotaUser (Just _bagPrettyPrint)

223+ = go _bagXgafv _bagAccessToken _bagBearerToken

224− _bagUploadProtocol

224+ _bagCallback

225 (Just _bagPp)

226− _bagAccessToken

227 _bagUploadType

226 _bagUploadType

228− _bagBearerToken

227+ _bagUploadProtocol

229− _bagKey

230 _bagName

228 _bagName

231− _bagOAuthToken

229+ _bagQuotaUser

230+ (Just _bagPrettyPrint)

232 _bagFields

231 _bagFields

233− _bagCallback

232+ _bagKey

233+ _bagOAuthToken

234 (Just AltJSON)

235 where go

236 = clientWithRoute

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/List.hs+21−21

@@ -56,19 +56,19 @@ type BillingAccountsListResource =

56 "v1" :>

57 "billingAccounts" :>

58 QueryParam "$.xgafv" Text :>

59− QueryParam "quotaUser" Text :>

59+ QueryParam "access_token" Text :>

60− QueryParam "prettyPrint" Bool :>

60+ QueryParam "bearer_token" Text :>

61− QueryParam "upload_protocol" Text :>

61+ QueryParam "callback" Text :>

62− QueryParam "pp" Bool :>

62+ QueryParam "pageSize" Int32 :>

63− QueryParam "access_token" Text :>

63+ QueryParam "pageToken" Text :>

64+ QueryParam "pp" Bool :>

64− QueryParam "uploadType" Text :>

65+ QueryParam "uploadType" Text :>

65− QueryParam "bearer_token" Text :>

66− QueryParam "key" Key :>

66+ QueryParam "upload_protocol" Text :>

67− QueryParam "pageToken" Text :>

67+ QueryParam "quotaUser" Text :>

68− QueryParam "oauth_token" OAuthToken :>

68+ QueryParam "prettyPrint" Bool :>

69− QueryParam "pageSize" Int32 :>

69+ QueryParam "fields" Text :>

70− QueryParam "fields" Text :>

70+ QueryParam "key" Key :>

71− QueryParam "callback" Text :>

71+ QueryParam "oauth_token" OAuthToken :>

72 QueryParam "alt" AltJSON :>

73 Get '[JSON] ListBillingAccountsResponse

74

@@ -234,18 +234,18 @@ instance GoogleRequest BillingAccountsList' where

234 ListBillingAccountsResponse

235 request = requestWithRoute defReq billingURL

236 requestWithRoute r u BillingAccountsList'{..}

237− = go _balXgafv _balQuotaUser (Just _balPrettyPrint)

237+ = go _balXgafv _balAccessToken _balBearerToken

238− _balUploadProtocol

238+ _balCallback

239+ _balPageSize

240+ _balPageToken

239 (Just _balPp)

241 (Just _balPp)

240− _balAccessToken

241 _balUploadType

242 _balUploadType

242− _balBearerToken

243+ _balUploadProtocol

244+ _balQuotaUser

245+ (Just _balPrettyPrint)

246+ _balFields

243 _balKey

247 _balKey

244− _balPageToken

245 _balOAuthToken

248 _balOAuthToken

246− _balPageSize

247− _balFields

248− _balCallback

249 (Just AltJSON)

250 where go

251 = clientWithRoute

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/Projects/List.hs+22−23

@@ -59,19 +59,19 @@ type BillingAccountsProjectsListResource =

59 "{+name}" :>

60 "projects" :>

61 QueryParam "$.xgafv" Text :>

62− QueryParam "quotaUser" Text :>

62+ QueryParam "access_token" Text :>

63− QueryParam "prettyPrint" Bool :>

63+ QueryParam "bearer_token" Text :>

64− QueryParam "upload_protocol" Text :>

64+ QueryParam "callback" Text :>

65− QueryParam "pp" Bool :>

65+ QueryParam "pageSize" Int32 :>

66− QueryParam "access_token" Text :>

66+ QueryParam "pageToken" Text :>

67+ QueryParam "pp" Bool :>

67− QueryParam "uploadType" Text :>

68+ QueryParam "uploadType" Text :>

68− QueryParam "bearer_token" Text :>

69− QueryParam "key" Key :>

69+ QueryParam "upload_protocol" Text :>

70− QueryParam "pageToken" Text :>

70+ QueryParam "quotaUser" Text :>

71− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "prettyPrint" Bool :>

72− QueryParam "pageSize" Int32 :>

72+ QueryParam "fields" Text :>

73− QueryParam "fields" Text :>

73+ QueryParam "key" Key :>

74− QueryParam "callback" Text :>

74+ QueryParam "oauth_token" OAuthToken :>

75 QueryParam "alt" AltJSON :>

76 Get '[JSON]

77 ListProjectBillingInfoResponse

@@ -255,20 +255,19 @@ instance GoogleRequest BillingAccountsProjectsList'

255 ListProjectBillingInfoResponse

256 request = requestWithRoute defReq billingURL

257 requestWithRoute r u BillingAccountsProjectsList'{..}

258− = go _baplXgafv _baplQuotaUser

258+ = go _baplXgafv _baplAccessToken _baplBearerToken

259− (Just _baplPrettyPrint)

259+ _baplCallback

260− _baplUploadProtocol

260+ _baplPageSize

261+ _baplPageToken

261 (Just _baplPp)

262 (Just _baplPp)

262− _baplAccessToken

263 _baplUploadType

264− _baplBearerToken

264+ _baplUploadProtocol

265− _baplKey

266 _baplName

265 _baplName

267− _baplPageToken

266+ _baplQuotaUser

268− _baplOAuthToken

267+ (Just _baplPrettyPrint)

269− _baplPageSize

270 _baplFields

268 _baplFields

271− _baplCallback

269+ _baplKey

270+ _baplOAuthToken

272 (Just AltJSON)

271 (Just AltJSON)

273 where go

272 where go

274 = clientWithRoute

273 = clientWithRoute

gogol-billing/gen/Network/Google/Resource/CloudBilling/Projects/GetBillingInfo.hs+17−18

@@ -58,17 +58,17 @@ type ProjectsGetBillingInfoResource =

58 "{+name}" :>

59 "billingInfo" :>

60 QueryParam "$.xgafv" Text :>

61− QueryParam "quotaUser" Text :>

61+ QueryParam "access_token" Text :>

62− QueryParam "prettyPrint" Bool :>

62+ QueryParam "bearer_token" Text :>

63− QueryParam "upload_protocol" Text :>

63+ QueryParam "callback" Text :>

64 QueryParam "pp" Bool :>

65− QueryParam "access_token" Text :>

66− QueryParam "uploadType" Text :>

65+ QueryParam "uploadType" Text :>

66+ QueryParam "upload_protocol" Text :>

67− QueryParam "bearer_token" Text :>

67+ QueryParam "quotaUser" Text :>

68− QueryParam "key" Key :>

68+ QueryParam "prettyPrint" Bool :>

69+ QueryParam "fields" Text :>

70+ QueryParam "key" Key :>

69− QueryParam "oauth_token" OAuthToken :>

71+ QueryParam "oauth_token" OAuthToken :>

70− QueryParam "fields" Text :>

71− QueryParam "callback" Text :>

72 QueryParam "alt" AltJSON :>

73 Get '[JSON] ProjectBillingInfo

74

@@ -225,18 +225,17 @@ instance GoogleRequest ProjectsGetBillingInfo' where

225 type Rs ProjectsGetBillingInfo' = ProjectBillingInfo

226 request = requestWithRoute defReq billingURL

227 requestWithRoute r u ProjectsGetBillingInfo'{..}

228− = go _pgbiXgafv _pgbiQuotaUser

228+ = go _pgbiXgafv _pgbiAccessToken _pgbiBearerToken

229− (Just _pgbiPrettyPrint)

229+ _pgbiCallback

230− _pgbiUploadProtocol

231 (Just _pgbiPp)

230 (Just _pgbiPp)

232− _pgbiAccessToken

233 _pgbiUploadType

231 _pgbiUploadType

234− _pgbiBearerToken

232+ _pgbiUploadProtocol

235− _pgbiKey

236 _pgbiName

233 _pgbiName

237− _pgbiOAuthToken

234+ _pgbiQuotaUser

235+ (Just _pgbiPrettyPrint)

238 _pgbiFields

236 _pgbiFields

239− _pgbiCallback

237+ _pgbiKey

238+ _pgbiOAuthToken

240 (Just AltJSON)

239 (Just AltJSON)

241 where go

240 where go

242 = clientWithRoute

241 = clientWithRoute

gogol-billing/gen/Network/Google/Resource/CloudBilling/Projects/UpdateBillingInfo.hs+17−18

@@ -82,17 +82,17 @@ type ProjectsUpdateBillingInfoResource =

82 "{+name}" :>

83 "billingInfo" :>

84 QueryParam "$.xgafv" Text :>

85− QueryParam "quotaUser" Text :>

85+ QueryParam "access_token" Text :>

86− QueryParam "prettyPrint" Bool :>

86+ QueryParam "bearer_token" Text :>

87− QueryParam "upload_protocol" Text :>

87+ QueryParam "callback" Text :>

88 QueryParam "pp" Bool :>

89− QueryParam "access_token" Text :>

90− QueryParam "uploadType" Text :>

89+ QueryParam "uploadType" Text :>

90+ QueryParam "upload_protocol" Text :>

91− QueryParam "bearer_token" Text :>

91+ QueryParam "quotaUser" Text :>

92− QueryParam "key" Key :>

92+ QueryParam "prettyPrint" Bool :>

93+ QueryParam "fields" Text :>

94+ QueryParam "key" Key :>

93− QueryParam "oauth_token" OAuthToken :>

95+ QueryParam "oauth_token" OAuthToken :>

94− QueryParam "fields" Text :>

95− QueryParam "callback" Text :>

96 QueryParam "alt" AltJSON :>

97 ReqBody '[JSON] ProjectBillingInfo :>

98 Put '[JSON] ProjectBillingInfo

@@ -286,18 +286,17 @@ instance GoogleRequest ProjectsUpdateBillingInfo'

286 ProjectBillingInfo

287 request = requestWithRoute defReq billingURL

288 requestWithRoute r u ProjectsUpdateBillingInfo'{..}

289− = go _pubiXgafv _pubiQuotaUser

289+ = go _pubiXgafv _pubiAccessToken _pubiBearerToken

290− (Just _pubiPrettyPrint)

290+ _pubiCallback

291− _pubiUploadProtocol

292 (Just _pubiPp)

291 (Just _pubiPp)

293− _pubiAccessToken

294 _pubiUploadType

292 _pubiUploadType

295− _pubiBearerToken

293+ _pubiUploadProtocol

296− _pubiKey

297 _pubiName

294 _pubiName

298− _pubiOAuthToken

295+ _pubiQuotaUser

296+ (Just _pubiPrettyPrint)

299 _pubiFields

297 _pubiFields

300− _pubiCallback

298+ _pubiKey

299+ _pubiOAuthToken

301 (Just AltJSON)

300 (Just AltJSON)

302 _pubiProjectBillingInfo

301 _pubiProjectBillingInfo

303 where go

302 where go

gogol-blogger/gen/Network/Google/Resource/Blogger/BlogUserInfos/Get.hs+11−12

@@ -51,13 +51,13 @@ type BlogUserInfosGetResource =

51 Capture "userId" Text :>

52 "blogs" :>

53 Capture "blogId" Text :>

54− QueryParam "quotaUser" Text :>

54+ QueryParam "maxPosts" Word32 :>

55+ QueryParam "quotaUser" Text :>

55− QueryParam "prettyPrint" Bool :>

56+ QueryParam "prettyPrint" Bool :>

56− QueryParam "userIp" Text :>

57+ QueryParam "userIp" Text :>

58+ QueryParam "fields" Text :>

57− QueryParam "key" Key :>

59+ QueryParam "key" Key :>

58− QueryParam "maxPosts" Word32 :>

59− QueryParam "oauth_token" OAuthToken :>

60+ QueryParam "oauth_token" OAuthToken :>

60− QueryParam "fields" Text :>

61 QueryParam "alt" AltJSON :> Get '[JSON] BlogUserInfo

62

63-- | Gets one blog and user info pair by blogId and userId.

@@ -174,14 +174,13 @@ instance GoogleRequest BlogUserInfosGet' where

174 type Rs BlogUserInfosGet' = BlogUserInfo

175 request = requestWithRoute defReq bloggerURL

176 requestWithRoute r u BlogUserInfosGet'{..}

177+ = go _buigMaxPosts _buigUserId _buigBlogId

178+ _buigQuotaUser

177− = go _buigQuotaUser (Just _buigPrettyPrint)

179+ (Just _buigPrettyPrint)

178 _buigUserIP

180 _buigUserIP

179− _buigBlogId

181+ _buigFields

180− _buigUserId

181 _buigKey

182 _buigKey

182− _buigMaxPosts

183 _buigOAuthToken

184− _buigFields

185 (Just AltJSON)

184 (Just AltJSON)

186 where go

185 where go

187 = clientWithRoute

186 = clientWithRoute

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/Get.hs+12−13

@@ -49,14 +49,14 @@ import Network.Google.Prelude

49type BlogsGetResource =

50 "blogs" :>

51 Capture "blogId" Text :>

52+ QueryParam "maxPosts" Word32 :>

53+ QueryParam "view" BloggerBlogsGetView :>

52− QueryParam "quotaUser" Text :>

54+ QueryParam "quotaUser" Text :>

53− QueryParam "prettyPrint" Bool :>

55+ QueryParam "prettyPrint" Bool :>

54− QueryParam "userIp" Text :>

56+ QueryParam "userIp" Text :>

57+ QueryParam "fields" Text :>

55− QueryParam "key" Key :>

58+ QueryParam "key" Key :>

56− QueryParam "maxPosts" Word32 :>

57− QueryParam "view" BloggerBlogsGetView :>

58− QueryParam "oauth_token" OAuthToken :>

59+ QueryParam "oauth_token" OAuthToken :>

59− QueryParam "fields" Text :>

60 QueryParam "alt" AltJSON :> Get '[JSON] Blog

61

62-- | Gets one blog by ID.

@@ -166,13 +166,12 @@ instance GoogleRequest BlogsGet' where

166 type Rs BlogsGet' = Blog

167 request = requestWithRoute defReq bloggerURL

168 requestWithRoute r u BlogsGet'{..}

169+ = go _bgMaxPosts _bgView _bgBlogId _bgQuotaUser

169− = go _bgQuotaUser (Just _bgPrettyPrint) _bgUserIP

170+ (Just _bgPrettyPrint)

170− _bgBlogId

171+ _bgUserIP

172+ _bgFields

171 _bgKey

173 _bgKey

172− _bgMaxPosts

173− _bgView

174 _bgOAuthToken

175− _bgFields

176 (Just AltJSON)

175 (Just AltJSON)

177 where go

176 where go

178 = clientWithRoute (Proxy :: Proxy BlogsGetResource) r

177 = clientWithRoute (Proxy :: Proxy BlogsGetResource) r

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/GetByURL.hs+11−12