Regenerating all services
commit4babe4f40744d07864a519faf5e4c674c2ee2abf
authorBrendan Hay <brendan.g.hay@gmail.com>
dateWed 30 Sep 2015, 16:13 (11 years ago)
parent196cf09
2241 files changed+163590−68688
core/src/Network/Google/Data/JSON.hs+2
@@ -17,6 +17,8 @@ import Data.Aeson
1717import Data.Aeson.Types
1818import Servant.API
1919
20+type JSONValue = Value
21+
2022parseJSONText :: FromText a => String -> Value -> Parser a
2123parseJSONText n = withText n (maybe (fail n) pure . fromText)
2224
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer.hs+247−98
@@ -29,142 +29,142 @@ module Network.Google.AdExchangeBuyer
2929 -- * REST Resources
3030
3131 -- ** AdexchangebuyerAccountsGet
32− , module AdExchangeBuyer.Accounts.Get
32+ , module Network.Google.Resource.AdExchangeBuyer.Accounts.Get
3333
3434 -- ** AdexchangebuyerAccountsList
35− , module AdExchangeBuyer.Accounts.List
35+ , module Network.Google.Resource.AdExchangeBuyer.Accounts.List
3636
3737 -- ** AdexchangebuyerAccountsPatch
38− , module AdExchangeBuyer.Accounts.Patch
38+ , module Network.Google.Resource.AdExchangeBuyer.Accounts.Patch
3939
4040 -- ** AdexchangebuyerAccountsUpdate
41− , module AdExchangeBuyer.Accounts.Update
41+ , module Network.Google.Resource.AdExchangeBuyer.Accounts.Update
4242
4343 -- ** AdexchangebuyerBillingInfoGet
44− , module AdExchangeBuyer.BillingInfo.Get
44+ , module Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get
4545
4646 -- ** AdexchangebuyerBillingInfoList
47− , module AdExchangeBuyer.BillingInfo.List
47+ , module Network.Google.Resource.AdExchangeBuyer.BillingInfo.List
4848
4949 -- ** AdexchangebuyerBudgetGet
50− , module AdExchangeBuyer.Budget.Get
50+ , module Network.Google.Resource.AdExchangeBuyer.Budget.Get
5151
5252 -- ** AdexchangebuyerBudgetPatch
53− , module AdExchangeBuyer.Budget.Patch
53+ , module Network.Google.Resource.AdExchangeBuyer.Budget.Patch
5454
5555 -- ** AdexchangebuyerBudgetUpdate
56− , module AdExchangeBuyer.Budget.Update
56+ , module Network.Google.Resource.AdExchangeBuyer.Budget.Update
5757
5858 -- ** AdexchangebuyerClientaccessDelete
59− , module AdExchangeBuyer.Clientaccess.Delete
59+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Delete
6060
6161 -- ** AdexchangebuyerClientaccessGet
62− , module AdExchangeBuyer.Clientaccess.Get
62+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Get
6363
6464 -- ** AdexchangebuyerClientaccessInsert
65− , module AdExchangeBuyer.Clientaccess.Insert
65+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Insert
6666
6767 -- ** AdexchangebuyerClientaccessList
68− , module AdExchangeBuyer.Clientaccess.List
68+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.List
6969
7070 -- ** AdexchangebuyerClientaccessPatch
71− , module AdExchangeBuyer.Clientaccess.Patch
71+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Patch
7272
7373 -- ** AdexchangebuyerClientaccessUpdate
74− , module AdExchangeBuyer.Clientaccess.Update
74+ , module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Update
7575
7676 -- ** AdexchangebuyerCreativesGet
77− , module AdExchangeBuyer.Creatives.Get
77+ , module Network.Google.Resource.AdExchangeBuyer.Creatives.Get
7878
7979 -- ** AdexchangebuyerCreativesInsert
80− , module AdExchangeBuyer.Creatives.Insert
80+ , module Network.Google.Resource.AdExchangeBuyer.Creatives.Insert
8181
8282 -- ** AdexchangebuyerCreativesList
83− , module AdExchangeBuyer.Creatives.List
83+ , module Network.Google.Resource.AdExchangeBuyer.Creatives.List
8484
8585 -- ** AdexchangebuyerDealsGet
86− , module AdExchangeBuyer.Deals.Get
86+ , module Network.Google.Resource.AdExchangeBuyer.Deals.Get
8787
8888 -- ** AdexchangebuyerMarketplacedealsDelete
89− , module AdExchangeBuyer.Marketplacedeals.Delete
89+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Delete
9090
9191 -- ** AdexchangebuyerMarketplacedealsInsert
92− , module AdExchangeBuyer.Marketplacedeals.Insert
92+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Insert
9393
9494 -- ** AdexchangebuyerMarketplacedealsList
95− , module AdExchangeBuyer.Marketplacedeals.List
95+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.List
9696
9797 -- ** AdexchangebuyerMarketplacedealsUpdate
98− , module AdExchangeBuyer.Marketplacedeals.Update
98+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Update
9999
100100 -- ** AdexchangebuyerMarketplacenotesInsert
101− , module AdExchangeBuyer.Marketplacenotes.Insert
101+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacenotes.Insert
102102
103103 -- ** AdexchangebuyerMarketplacenotesList
104− , module AdExchangeBuyer.Marketplacenotes.List
104+ , module Network.Google.Resource.AdExchangeBuyer.Marketplacenotes.List
105105
106106 -- ** AdexchangebuyerMarketplaceoffersGet
107− , module AdExchangeBuyer.Marketplaceoffers.Get
107+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceoffers.Get
108108
109109 -- ** AdexchangebuyerMarketplaceoffersSearch
110− , module AdExchangeBuyer.Marketplaceoffers.Search
110+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceoffers.Search
111111
112112 -- ** AdexchangebuyerMarketplaceordersGet
113− , module AdExchangeBuyer.Marketplaceorders.Get
113+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Get
114114
115115 -- ** AdexchangebuyerMarketplaceordersInsert
116− , module AdExchangeBuyer.Marketplaceorders.Insert
116+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Insert
117117
118118 -- ** AdexchangebuyerMarketplaceordersPatch
119− , module AdExchangeBuyer.Marketplaceorders.Patch
119+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Patch
120120
121121 -- ** AdexchangebuyerMarketplaceordersSearch
122− , module AdExchangeBuyer.Marketplaceorders.Search
122+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Search
123123
124124 -- ** AdexchangebuyerMarketplaceordersUpdate
125− , module AdExchangeBuyer.Marketplaceorders.Update
125+ , module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Update
126126
127127 -- ** AdexchangebuyerNegotiationroundsInsert
128− , module AdExchangeBuyer.Negotiationrounds.Insert
128+ , module Network.Google.Resource.AdExchangeBuyer.Negotiationrounds.Insert
129129
130130 -- ** AdexchangebuyerNegotiationsGet
131− , module AdExchangeBuyer.Negotiations.Get
131+ , module Network.Google.Resource.AdExchangeBuyer.Negotiations.Get
132132
133133 -- ** AdexchangebuyerNegotiationsInsert
134− , module AdExchangeBuyer.Negotiations.Insert
134+ , module Network.Google.Resource.AdExchangeBuyer.Negotiations.Insert
135135
136136 -- ** AdexchangebuyerNegotiationsList
137− , module AdExchangeBuyer.Negotiations.List
137+ , module Network.Google.Resource.AdExchangeBuyer.Negotiations.List
138138
139139 -- ** AdexchangebuyerOffersGet
140− , module AdExchangeBuyer.Offers.Get
140+ , module Network.Google.Resource.AdExchangeBuyer.Offers.Get
141141
142142 -- ** AdexchangebuyerOffersInsert
143− , module AdExchangeBuyer.Offers.Insert
143+ , module Network.Google.Resource.AdExchangeBuyer.Offers.Insert
144144
145145 -- ** AdexchangebuyerOffersList
146− , module AdExchangeBuyer.Offers.List
146+ , module Network.Google.Resource.AdExchangeBuyer.Offers.List
147147
148148 -- ** AdexchangebuyerPerformanceReportList
149− , module AdExchangeBuyer.PerformanceReport.List
149+ , module Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List
150150
151151 -- ** AdexchangebuyerPretargetingConfigDelete
152− , module AdExchangeBuyer.PretargetingConfig.Delete
152+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete
153153
154154 -- ** AdexchangebuyerPretargetingConfigGet
155− , module AdExchangeBuyer.PretargetingConfig.Get
155+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get
156156
157157 -- ** AdexchangebuyerPretargetingConfigInsert
158− , module AdExchangeBuyer.PretargetingConfig.Insert
158+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert
159159
160160 -- ** AdexchangebuyerPretargetingConfigList
161− , module AdExchangeBuyer.PretargetingConfig.List
161+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List
162162
163163 -- ** AdexchangebuyerPretargetingConfigPatch
164− , module AdExchangeBuyer.PretargetingConfig.Patch
164+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch
165165
166166 -- ** AdexchangebuyerPretargetingConfigUpdate
167− , module AdExchangeBuyer.PretargetingConfig.Update
167+ , module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update
168168
169169 -- * Types
170170
@@ -192,6 +192,28 @@ module Network.Google.AdExchangeBuyer
192192 , mnOrderId
193193 , mnOrderRevisionNumber
194194
195+ -- ** CreativeNATiveAd
196+ , CreativeNATiveAd
197+ , creativeNATiveAd
198+ , cnataImage
199+ , cnataAppIcon
200+ , cnataClickTrackingUrl
201+ , cnataBody
202+ , cnataHeadline
203+ , cnataImpressionTrackingUrl
204+ , cnataCallToAction
205+ , cnataStore
206+ , cnataPrice
207+ , cnataAdvertiser
208+ , cnataStarRating
209+ , cnataLogo
210+
211+ -- ** PretargetingConfigDimensions
212+ , PretargetingConfigDimensions
213+ , pretargetingConfigDimensions
214+ , pcdHeight
215+ , pcdWidth
216+
195217 -- ** TermsDto
196218 , TermsDto
197219 , termsDto
@@ -230,6 +252,14 @@ module Network.Google.AdExchangeBuyer
230252 , clKind
231253 , clItems
232254
255+ -- ** CreativeServingRestrictionsContexts
256+ , CreativeServingRestrictionsContexts
257+ , creativeServingRestrictionsContexts
258+ , csrcPlatform
259+ , csrcContextType
260+ , csrcAuctionType
261+ , csrcGeoCriteriaId
262+
233263 -- ** CreateOrdersResponse
234264 , CreateOrdersResponse
235265 , createOrdersResponse
@@ -312,6 +342,12 @@ module Network.Google.AdExchangeBuyer
312342 , alKind
313343 , alItems
314344
345+ -- ** CreativeServingRestrictionsDisapprovalReasons
346+ , CreativeServingRestrictionsDisapprovalReasons
347+ , creativeServingRestrictionsDisapprovalReasons
348+ , csrdrReason
349+ , csrdrDetails
350+
315351 -- ** GetOrderNotesResponse
316352 , GetOrderNotesResponse
317353 , getOrderNotesResponse
@@ -373,6 +409,9 @@ module Network.Google.AdExchangeBuyer
373409 , cServingRestrictions
374410 , cOpenAuctionStatus
375411
412+ -- ** AdexchangebuyerMarketplaceordersUpdateUpdateAction
413+ , AdexchangebuyerMarketplaceordersUpdateUpdateAction (..)
414+
376415 -- ** AddOrderDealsResponse
377416 , AddOrderDealsResponse
378417 , addOrderDealsResponse
@@ -385,6 +424,15 @@ module Network.Google.AdExchangeBuyer
385424 , pclKind
386425 , pclItems
387426
427+ -- ** CreativeCorrections
428+ , CreativeCorrections
429+ , creativeCorrections
430+ , ccReason
431+ , ccDetails
432+
433+ -- ** AdexchangebuyerCreativesListOpenAuctionStatusFilter
434+ , AdexchangebuyerCreativesListOpenAuctionStatusFilter (..)
435+
388436 -- ** BuyerDto
389437 , BuyerDto
390438 , buyerDto
@@ -462,11 +510,30 @@ module Network.Google.AdExchangeBuyer
462510 , dodrDealIds
463511 , dodrOrderRevisionNumber
464512
513+ -- ** PretargetingConfigExcludedPlacements
514+ , PretargetingConfigExcludedPlacements
515+ , pretargetingConfigExcludedPlacements
516+ , pcepToken
517+ , pcepType
518+
519+ -- ** CreativeNATiveAdLogo
520+ , CreativeNATiveAdLogo
521+ , creativeNATiveAdLogo
522+ , cnatalHeight
523+ , cnatalUrl
524+ , cnatalWidth
525+
465526 -- ** GetOrderDealsResponse
466527 , GetOrderDealsResponse
467528 , getOrderDealsResponse
468529 , godrDeals
469530
531+ -- ** CreativeFilteringReasons
532+ , CreativeFilteringReasons
533+ , creativeFilteringReasons
534+ , cfrReasons
535+ , cfrDate
536+
470537 -- ** ContactInformation
471538 , ContactInformation
472539 , contactInformation
@@ -513,6 +580,9 @@ module Network.Google.AdExchangeBuyer
513580 , prlKind
514581 , prlPerformanceReport
515582
583+ -- ** AdexchangebuyerMarketplaceordersPatchUpdateAction
584+ , AdexchangebuyerMarketplaceordersPatchUpdateAction (..)
585+
516586 -- ** NegotiationDto
517587 , NegotiationDto
518588 , negotiationDto
@@ -647,6 +717,13 @@ module Network.Google.AdExchangeBuyer
647717 , pCurrencyCode
648718 , pAmountMicros
649719
720+ -- ** CreativeNATiveAdAppIcon
721+ , CreativeNATiveAdAppIcon
722+ , creativeNATiveAdAppIcon
723+ , cnataaiHeight
724+ , cnataaiUrl
725+ , cnataaiWidth
726+
650727 -- ** EditAllOrderDealsRequest
651728 , EditAllOrderDealsRequest
652729 , editAllOrderDealsRequest
@@ -685,6 +762,13 @@ module Network.Google.AdExchangeBuyer
685762 , listOffersRequest
686763 , lorSinceTimestampMillis
687764
765+ -- ** CreativeNATiveAdImage
766+ , CreativeNATiveAdImage
767+ , creativeNATiveAdImage
768+ , cnataiHeight
769+ , cnataiUrl
770+ , cnataiWidth
771+
688772 -- ** ListClientAccessCapabilitiesRequest
689773 , ListClientAccessCapabilitiesRequest
690774 , listClientAccessCapabilitiesRequest
@@ -737,6 +821,19 @@ module Network.Google.AdExchangeBuyer
737821 , stExclusions
738822 , stInclusions
739823
824+ -- ** AccountBidderLocation
825+ , AccountBidderLocation
826+ , accountBidderLocation
827+ , ablUrl
828+ , ablMaximumQps
829+ , ablRegion
830+
831+ -- ** CreativeFilteringReasonsReasons
832+ , CreativeFilteringReasonsReasons
833+ , creativeFilteringReasonsReasons
834+ , cfrrFilteringStatus
835+ , cfrrFilteringCount
836+
740837 -- ** ClientAccessCapabilities
741838 , ClientAccessCapabilities
742839 , clientAccessCapabilities
@@ -752,25 +849,31 @@ module Network.Google.AdExchangeBuyer
752849 -- ** MarketplaceDeal
753850 , MarketplaceDeal
754851 , marketplaceDeal
755− , mdExternalDealId
756− , mdBuyerPrivateData
757− , mdWebPropertyCode
758− , mdCreationTimeMs
759− , mdTerms
760− , mdOfferRevisionNumber
761− , mdLastUpdateTimeMs
762− , mdKind
763− , mdDeliveryControl
764− , mdFlightStartTimeMs
765− , mdSharedTargetings
766− , mdDealId
767− , mdInventoryDescription
768− , mdSyndicationProduct
769− , mdFlightEndTimeMs
770− , mdName
771− , mdSellerContacts
772− , mdOfferId
773− , mdOrderId
852+ , mddExternalDealId
853+ , mddBuyerPrivateData
854+ , mddWebPropertyCode
855+ , mddCreationTimeMs
856+ , mddTerms
857+ , mddOfferRevisionNumber
858+ , mddLastUpdateTimeMs
859+ , mddKind
860+ , mddDeliveryControl
861+ , mddFlightStartTimeMs
862+ , mddSharedTargetings
863+ , mddDealId
864+ , mddInventoryDescription
865+ , mddSyndicationProduct
866+ , mddFlightEndTimeMs
867+ , mddName
868+ , mddSellerContacts
869+ , mddOfferId
870+ , mddOrderId
871+
872+ -- ** PretargetingConfigPlacements
873+ , PretargetingConfigPlacements
874+ , pretargetingConfigPlacements
875+ , pcpToken
876+ , pcpType
774877
775878 -- ** NegotiationRoundDto
776879 , NegotiationRoundDto
@@ -806,6 +909,16 @@ module Network.Google.AdExchangeBuyer
806909 , dtngatReservePricePerBuyers
807910 , dtngatPrivateAuctionId
808911
912+ -- ** CreativeServingRestrictions
913+ , CreativeServingRestrictions
914+ , creativeServingRestrictions
915+ , csrContexts
916+ , csrReason
917+ , csrDisapprovalReasons
918+
919+ -- ** AdexchangebuyerCreativesListDealsStatusFilter
920+ , AdexchangebuyerCreativesListDealsStatusFilter (..)
921+
809922 -- ** Buyer
810923 , Buyer
811924 , buyer
@@ -840,26 +953,26 @@ module Network.Google.AdExchangeBuyer
840953 -- ** MarketplaceOrder
841954 , MarketplaceOrder
842955 , marketplaceOrder
843− , mBuyerPrivateData
844− , mIsSetupComplete
845− , mBuyerContacts
846− , mKind
847− , mOriginatorRole
848− , mRevisionNumber
849− , mBilledBuyer
850− , mIsRenegotiating
851− , mHasSellerSignedOff
852− , mSeller
853− , mOrderState
854− , mName
855− , mSellerContacts
856− , mLastUpdaterRole
857− , mLabels
858− , mRevisionTimeMs
859− , mOrderId
860− , mLastUpdaterOrCommentorRole
861− , mHasBuyerSignedOff
862− , mBuyer
956+ , mooBuyerPrivateData
957+ , mooIsSetupComplete
958+ , mooBuyerContacts
959+ , mooKind
960+ , mooOriginatorRole
961+ , mooRevisionNumber
962+ , mooBilledBuyer
963+ , mooIsRenegotiating
964+ , mooHasSellerSignedOff
965+ , mooSeller
966+ , mooOrderState
967+ , mooName
968+ , mooSellerContacts
969+ , mooLastUpdaterRole
970+ , mooLabels
971+ , mooRevisionTimeMs
972+ , mooOrderId
973+ , mooLastUpdaterOrCommentorRole
974+ , mooHasBuyerSignedOff
975+ , mooBuyer
863976
864977 -- ** AddOrderDealsRequest
865978 , AddOrderDealsRequest
@@ -876,6 +989,9 @@ module Network.Google.AdExchangeBuyer
876989 , dtGuaranteedFixedPriceTerms
877990 , dtDescription
878991
992+ -- ** Alt
993+ , Alt (..)
994+
879995 -- ** EditHistoryDto
880996 , EditHistoryDto
881997 , editHistoryDto
@@ -939,19 +1055,52 @@ TODO
9391055-}
9401056
9411057type AdExchangeBuyerAPI =
942− Marketplacenotes :<|> Deals :<|> Negotiationrounds
943− :<|> Accounts
944− :<|> Budget
945− :<|> Creatives
946− :<|> PerformanceReport
947− :<|> Marketplaceoffers
948− :<|> PretargetingConfig
949− :<|> Marketplaceorders
950− :<|> Clientaccess
951− :<|> BillingInfo
952− :<|> Marketplacedeals
953− :<|> Negotiations
954− :<|> Offers
1058+ MarketplacenotesInsertResource :<|>
1059+ MarketplacenotesListResource
1060+ :<|> DealsGetResource
1061+ :<|> NegotiationroundsInsertResource
1062+ :<|> AccountsListResource
1063+ :<|> AccountsPatchResource
1064+ :<|> AccountsGetResource
1065+ :<|> AccountsUpdateResource
1066+ :<|> BudgetPatchResource
1067+ :<|> BudgetGetResource
1068+ :<|> BudgetUpdateResource
1069+ :<|> CreativesInsertResource
1070+ :<|> CreativesListResource
1071+ :<|> CreativesGetResource
1072+ :<|> PerformanceReportListResource
1073+ :<|> MarketplaceoffersGetResource
1074+ :<|> MarketplaceoffersSearchResource
1075+ :<|> PretargetingConfigInsertResource
1076+ :<|> PretargetingConfigListResource
1077+ :<|> PretargetingConfigPatchResource
1078+ :<|> PretargetingConfigGetResource
1079+ :<|> PretargetingConfigDeleteResource
1080+ :<|> PretargetingConfigUpdateResource
1081+ :<|> MarketplaceordersInsertResource
1082+ :<|> MarketplaceordersPatchResource
1083+ :<|> MarketplaceordersGetResource
1084+ :<|> MarketplaceordersSearchResource
1085+ :<|> MarketplaceordersUpdateResource
1086+ :<|> ClientaccessInsertResource
1087+ :<|> ClientaccessListResource
1088+ :<|> ClientaccessPatchResource
1089+ :<|> ClientaccessGetResource
1090+ :<|> ClientaccessDeleteResource
1091+ :<|> ClientaccessUpdateResource
1092+ :<|> BillingInfoListResource
1093+ :<|> BillingInfoGetResource
1094+ :<|> MarketplacedealsInsertResource
1095+ :<|> MarketplacedealsListResource
1096+ :<|> MarketplacedealsDeleteResource
1097+ :<|> MarketplacedealsUpdateResource
1098+ :<|> NegotiationsInsertResource
1099+ :<|> NegotiationsListResource
1100+ :<|> NegotiationsGetResource
1101+ :<|> OffersInsertResource
1102+ :<|> OffersListResource
1103+ :<|> OffersGetResource
9551104
9561105adExchangeBuyerAPI :: Proxy AdExchangeBuyerAPI
9571106adExchangeBuyerAPI = Proxy
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+156−40
@@ -41,6 +41,28 @@ module Network.Google.AdExchangeBuyer.Types
4141 , mnOrderId
4242 , mnOrderRevisionNumber
4343
44+ -- * CreativeNATiveAd
45+ , CreativeNATiveAd
46+ , creativeNATiveAd
47+ , cnataImage
48+ , cnataAppIcon
49+ , cnataClickTrackingUrl
50+ , cnataBody
51+ , cnataHeadline
52+ , cnataImpressionTrackingUrl
53+ , cnataCallToAction
54+ , cnataStore
55+ , cnataPrice
56+ , cnataAdvertiser
57+ , cnataStarRating
58+ , cnataLogo
59+
60+ -- * PretargetingConfigDimensions
61+ , PretargetingConfigDimensions
62+ , pretargetingConfigDimensions
63+ , pcdHeight
64+ , pcdWidth
65+
4466 -- * TermsDto
4567 , TermsDto
4668 , termsDto
@@ -79,6 +101,14 @@ module Network.Google.AdExchangeBuyer.Types
79101 , clKind
80102 , clItems
81103
104+ -- * CreativeServingRestrictionsContexts
105+ , CreativeServingRestrictionsContexts
106+ , creativeServingRestrictionsContexts
107+ , csrcPlatform
108+ , csrcContextType
109+ , csrcAuctionType
110+ , csrcGeoCriteriaId
111+
82112 -- * CreateOrdersResponse
83113 , CreateOrdersResponse
84114 , createOrdersResponse
@@ -161,6 +191,12 @@ module Network.Google.AdExchangeBuyer.Types
161191 , alKind
162192 , alItems
163193
194+ -- * CreativeServingRestrictionsDisapprovalReasons
195+ , CreativeServingRestrictionsDisapprovalReasons
196+ , creativeServingRestrictionsDisapprovalReasons
197+ , csrdrReason
198+ , csrdrDetails
199+
164200 -- * GetOrderNotesResponse
165201 , GetOrderNotesResponse
166202 , getOrderNotesResponse
@@ -222,6 +258,9 @@ module Network.Google.AdExchangeBuyer.Types
222258 , cServingRestrictions
223259 , cOpenAuctionStatus
224260
261+ -- * AdexchangebuyerMarketplaceordersUpdateUpdateAction
262+ , AdexchangebuyerMarketplaceordersUpdateUpdateAction (..)
263+
225264 -- * AddOrderDealsResponse
226265 , AddOrderDealsResponse
227266 , addOrderDealsResponse
@@ -234,6 +273,15 @@ module Network.Google.AdExchangeBuyer.Types
234273 , pclKind
235274 , pclItems
236275
276+ -- * CreativeCorrections
277+ , CreativeCorrections
278+ , creativeCorrections
279+ , ccReason
280+ , ccDetails
281+
282+ -- * AdexchangebuyerCreativesListOpenAuctionStatusFilter
283+ , AdexchangebuyerCreativesListOpenAuctionStatusFilter (..)
284+
237285 -- * BuyerDto
238286 , BuyerDto
239287 , buyerDto
@@ -311,11 +359,30 @@ module Network.Google.AdExchangeBuyer.Types
311359 , dodrDealIds
312360 , dodrOrderRevisionNumber
313361
362+ -- * PretargetingConfigExcludedPlacements
363+ , PretargetingConfigExcludedPlacements
364+ , pretargetingConfigExcludedPlacements
365+ , pcepToken
366+ , pcepType
367+
368+ -- * CreativeNATiveAdLogo
369+ , CreativeNATiveAdLogo
370+ , creativeNATiveAdLogo
371+ , cnatalHeight
372+ , cnatalUrl
373+ , cnatalWidth
374+
314375 -- * GetOrderDealsResponse
315376 , GetOrderDealsResponse
316377 , getOrderDealsResponse
317378 , godrDeals
318379
380+ -- * CreativeFilteringReasons
381+ , CreativeFilteringReasons
382+ , creativeFilteringReasons
383+ , cfrReasons
384+ , cfrDate
385+
319386 -- * ContactInformation
320387 , ContactInformation
321388 , contactInformation
@@ -362,6 +429,9 @@ module Network.Google.AdExchangeBuyer.Types
362429 , prlKind
363430 , prlPerformanceReport
364431
432+ -- * AdexchangebuyerMarketplaceordersPatchUpdateAction
433+ , AdexchangebuyerMarketplaceordersPatchUpdateAction (..)
434+
365435 -- * NegotiationDto
366436 , NegotiationDto
367437 , negotiationDto
@@ -496,6 +566,13 @@ module Network.Google.AdExchangeBuyer.Types
496566 , pCurrencyCode
497567 , pAmountMicros
498568
569+ -- * CreativeNATiveAdAppIcon
570+ , CreativeNATiveAdAppIcon
571+ , creativeNATiveAdAppIcon
572+ , cnataaiHeight
573+ , cnataaiUrl
574+ , cnataaiWidth
575+
499576 -- * EditAllOrderDealsRequest
500577 , EditAllOrderDealsRequest
501578 , editAllOrderDealsRequest
@@ -534,6 +611,13 @@ module Network.Google.AdExchangeBuyer.Types
534611 , listOffersRequest
535612 , lorSinceTimestampMillis
536613
614+ -- * CreativeNATiveAdImage
615+ , CreativeNATiveAdImage
616+ , creativeNATiveAdImage
617+ , cnataiHeight
618+ , cnataiUrl
619+ , cnataiWidth
620+
537621 -- * ListClientAccessCapabilitiesRequest
538622 , ListClientAccessCapabilitiesRequest
539623 , listClientAccessCapabilitiesRequest
@@ -586,6 +670,19 @@ module Network.Google.AdExchangeBuyer.Types
586670 , stExclusions
587671 , stInclusions
588672
673+ -- * AccountBidderLocation
674+ , AccountBidderLocation
675+ , accountBidderLocation
676+ , ablUrl
677+ , ablMaximumQps
678+ , ablRegion
679+
680+ -- * CreativeFilteringReasonsReasons
681+ , CreativeFilteringReasonsReasons
682+ , creativeFilteringReasonsReasons
683+ , cfrrFilteringStatus
684+ , cfrrFilteringCount
685+
589686 -- * ClientAccessCapabilities
590687 , ClientAccessCapabilities
591688 , clientAccessCapabilities
@@ -601,25 +698,31 @@ module Network.Google.AdExchangeBuyer.Types
601698 -- * MarketplaceDeal
602699 , MarketplaceDeal
603700 , marketplaceDeal
604− , mdExternalDealId
605− , mdBuyerPrivateData
606− , mdWebPropertyCode
607− , mdCreationTimeMs
608− , mdTerms
609− , mdOfferRevisionNumber
610− , mdLastUpdateTimeMs
611− , mdKind
612− , mdDeliveryControl
613− , mdFlightStartTimeMs
614− , mdSharedTargetings
615− , mdDealId
616− , mdInventoryDescription
617− , mdSyndicationProduct
618− , mdFlightEndTimeMs
619− , mdName
620− , mdSellerContacts
621− , mdOfferId
622− , mdOrderId
701+ , mddExternalDealId
702+ , mddBuyerPrivateData
703+ , mddWebPropertyCode
704+ , mddCreationTimeMs
705+ , mddTerms
706+ , mddOfferRevisionNumber
707+ , mddLastUpdateTimeMs
708+ , mddKind
709+ , mddDeliveryControl
710+ , mddFlightStartTimeMs
711+ , mddSharedTargetings
712+ , mddDealId
713+ , mddInventoryDescription
714+ , mddSyndicationProduct
715+ , mddFlightEndTimeMs
716+ , mddName
717+ , mddSellerContacts
718+ , mddOfferId
719+ , mddOrderId
720+
721+ -- * PretargetingConfigPlacements
722+ , PretargetingConfigPlacements
723+ , pretargetingConfigPlacements
724+ , pcpToken
725+ , pcpType
623726
624727 -- * NegotiationRoundDto
625728 , NegotiationRoundDto
@@ -655,6 +758,16 @@ module Network.Google.AdExchangeBuyer.Types
655758 , dtngatReservePricePerBuyers
656759 , dtngatPrivateAuctionId
657760
761+ -- * CreativeServingRestrictions
762+ , CreativeServingRestrictions
763+ , creativeServingRestrictions
764+ , csrContexts
765+ , csrReason
766+ , csrDisapprovalReasons
767+
768+ -- * AdexchangebuyerCreativesListDealsStatusFilter
769+ , AdexchangebuyerCreativesListDealsStatusFilter (..)
770+
658771 -- * Buyer
659772 , Buyer
660773 , buyer
@@ -689,26 +802,26 @@ module Network.Google.AdExchangeBuyer.Types
689802 -- * MarketplaceOrder
690803 , MarketplaceOrder
691804 , marketplaceOrder
692− , mBuyerPrivateData
693− , mIsSetupComplete
694− , mBuyerContacts
695− , mKind
696− , mOriginatorRole
697− , mRevisionNumber
698− , mBilledBuyer
699− , mIsRenegotiating
700− , mHasSellerSignedOff
701− , mSeller
702− , mOrderState
703− , mName
704− , mSellerContacts
705− , mLastUpdaterRole
706− , mLabels
707− , mRevisionTimeMs
708− , mOrderId
709− , mLastUpdaterOrCommentorRole
710− , mHasBuyerSignedOff
711− , mBuyer
805+ , mooBuyerPrivateData
806+ , mooIsSetupComplete
807+ , mooBuyerContacts
808+ , mooKind
809+ , mooOriginatorRole
810+ , mooRevisionNumber
811+ , mooBilledBuyer
812+ , mooIsRenegotiating
813+ , mooHasSellerSignedOff
814+ , mooSeller
815+ , mooOrderState
816+ , mooName
817+ , mooSellerContacts
818+ , mooLastUpdaterRole
819+ , mooLabels
820+ , mooRevisionTimeMs
821+ , mooOrderId
822+ , mooLastUpdaterOrCommentorRole
823+ , mooHasBuyerSignedOff
824+ , mooBuyer
712825
713826 -- * AddOrderDealsRequest
714827 , AddOrderDealsRequest
@@ -725,6 +838,9 @@ module Network.Google.AdExchangeBuyer.Types
725838 , dtGuaranteedFixedPriceTerms
726839 , dtDescription
727840
841+ -- * Alt
842+ , Alt (..)
843+
728844 -- * EditHistoryDto
729845 , EditHistoryDto
730846 , editHistoryDto
@@ -739,7 +855,7 @@ import Network.Google.AdExchangeBuyer.Types.Sum
739855import Network.Google.Prelude
740856
741857-- | URL referring to version 'v1.4' of the Ad Exchange Buyer API.
742−adExchangeBuyerURL :: BaseURL
858+adExchangeBuyerURL :: BaseUrl
743859adExchangeBuyerURL
744860 = BaseUrl Https
745861 "https://www.googleapis.com/adexchangebuyer/v1.4/"
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs+1197−309
@@ -223,6 +223,216 @@ instance ToJSON MarketplaceNote where
223223 ("orderRevisionNumber" .=) <$>
224224 _mnOrderRevisionNumber])
225225
226+-- | If nativeAd is set, HTMLSnippet and videoURL should not be set.
227+--
228+-- /See:/ 'creativeNATiveAd' smart constructor.
229+data CreativeNATiveAd = CreativeNATiveAd
230+ { _cnataImage :: !(Maybe CreativeNATiveAdImage)
231+ , _cnataAppIcon :: !(Maybe CreativeNATiveAdAppIcon)
232+ , _cnataClickTrackingUrl :: !(Maybe Text)
233+ , _cnataBody :: !(Maybe Text)
234+ , _cnataHeadline :: !(Maybe Text)
235+ , _cnataImpressionTrackingUrl :: !(Maybe [Text])
236+ , _cnataCallToAction :: !(Maybe Text)
237+ , _cnataStore :: !(Maybe Text)
238+ , _cnataPrice :: !(Maybe Text)
239+ , _cnataAdvertiser :: !(Maybe Text)
240+ , _cnataStarRating :: !(Maybe Double)
241+ , _cnataLogo :: !(Maybe CreativeNATiveAdLogo)
242+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
243+
244+-- | Creates a value of 'CreativeNATiveAd' with the minimum fields required to make a request.
245+--
246+-- Use one of the following lenses to modify other fields as desired:
247+--
248+-- * 'cnataImage'
249+--
250+-- * 'cnataAppIcon'
251+--
252+-- * 'cnataClickTrackingUrl'
253+--
254+-- * 'cnataBody'
255+--
256+-- * 'cnataHeadline'
257+--
258+-- * 'cnataImpressionTrackingUrl'
259+--
260+-- * 'cnataCallToAction'
261+--
262+-- * 'cnataStore'
263+--
264+-- * 'cnataPrice'
265+--
266+-- * 'cnataAdvertiser'
267+--
268+-- * 'cnataStarRating'
269+--
270+-- * 'cnataLogo'
271+creativeNATiveAd
272+ :: CreativeNATiveAd
273+creativeNATiveAd =
274+ CreativeNATiveAd
275+ { _cnataImage = Nothing
276+ , _cnataAppIcon = Nothing
277+ , _cnataClickTrackingUrl = Nothing
278+ , _cnataBody = Nothing
279+ , _cnataHeadline = Nothing
280+ , _cnataImpressionTrackingUrl = Nothing
281+ , _cnataCallToAction = Nothing
282+ , _cnataStore = Nothing
283+ , _cnataPrice = Nothing
284+ , _cnataAdvertiser = Nothing
285+ , _cnataStarRating = Nothing
286+ , _cnataLogo = Nothing
287+ }
288+
289+-- | A large image.
290+cnataImage :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdImage)
291+cnataImage
292+ = lens _cnataImage (\ s a -> s{_cnataImage = a})
293+
294+-- | The app icon, for app download ads.
295+cnataAppIcon :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdAppIcon)
296+cnataAppIcon
297+ = lens _cnataAppIcon (\ s a -> s{_cnataAppIcon = a})
298+
299+-- | The URL to use for click tracking.
300+cnataClickTrackingUrl :: Lens' CreativeNATiveAd (Maybe Text)
301+cnataClickTrackingUrl
302+ = lens _cnataClickTrackingUrl
303+ (\ s a -> s{_cnataClickTrackingUrl = a})
304+
305+-- | A long description of the ad.
306+cnataBody :: Lens' CreativeNATiveAd (Maybe Text)
307+cnataBody
308+ = lens _cnataBody (\ s a -> s{_cnataBody = a})
309+
310+-- | A short title for the ad.
311+cnataHeadline :: Lens' CreativeNATiveAd (Maybe Text)
312+cnataHeadline
313+ = lens _cnataHeadline
314+ (\ s a -> s{_cnataHeadline = a})
315+
316+-- | The URLs are called when the impression is rendered.
317+cnataImpressionTrackingUrl :: Lens' CreativeNATiveAd [Text]
318+cnataImpressionTrackingUrl
319+ = lens _cnataImpressionTrackingUrl
320+ (\ s a -> s{_cnataImpressionTrackingUrl = a})
321+ . _Default
322+ . _Coerce
323+
324+-- | A label for the button that the user is supposed to click.
325+cnataCallToAction :: Lens' CreativeNATiveAd (Maybe Text)
326+cnataCallToAction
327+ = lens _cnataCallToAction
328+ (\ s a -> s{_cnataCallToAction = a})
329+
330+-- | The URL to the app store to purchase\/download the promoted app.
331+cnataStore :: Lens' CreativeNATiveAd (Maybe Text)
332+cnataStore
333+ = lens _cnataStore (\ s a -> s{_cnataStore = a})
334+
335+-- | The price of the promoted app including the currency info.
336+cnataPrice :: Lens' CreativeNATiveAd (Maybe Text)
337+cnataPrice
338+ = lens _cnataPrice (\ s a -> s{_cnataPrice = a})
339+
340+cnataAdvertiser :: Lens' CreativeNATiveAd (Maybe Text)
341+cnataAdvertiser
342+ = lens _cnataAdvertiser
343+ (\ s a -> s{_cnataAdvertiser = a})
344+
345+-- | The app rating in the app store. Must be in the range [0-5].
346+cnataStarRating :: Lens' CreativeNATiveAd (Maybe Double)
347+cnataStarRating
348+ = lens _cnataStarRating
349+ (\ s a -> s{_cnataStarRating = a})
350+
351+-- | A smaller image, for the advertiser logo.
352+cnataLogo :: Lens' CreativeNATiveAd (Maybe CreativeNATiveAdLogo)
353+cnataLogo
354+ = lens _cnataLogo (\ s a -> s{_cnataLogo = a})
355+
356+instance FromJSON CreativeNATiveAd where
357+ parseJSON
358+ = withObject "CreativeNATiveAd"
359+ (\ o ->
360+ CreativeNATiveAd <$>
361+ (o .:? "image") <*> (o .:? "appIcon") <*>
362+ (o .:? "clickTrackingUrl")
363+ <*> (o .:? "body")
364+ <*> (o .:? "headline")
365+ <*> (o .:? "impressionTrackingUrl" .!= mempty)
366+ <*> (o .:? "callToAction")
367+ <*> (o .:? "store")
368+ <*> (o .:? "price")
369+ <*> (o .:? "advertiser")
370+ <*> (o .:? "starRating")
371+ <*> (o .:? "logo"))
372+
373+instance ToJSON CreativeNATiveAd where
374+ toJSON CreativeNATiveAd{..}
375+ = object
376+ (catMaybes
377+ [("image" .=) <$> _cnataImage,
378+ ("appIcon" .=) <$> _cnataAppIcon,
379+ ("clickTrackingUrl" .=) <$> _cnataClickTrackingUrl,
380+ ("body" .=) <$> _cnataBody,
381+ ("headline" .=) <$> _cnataHeadline,
382+ ("impressionTrackingUrl" .=) <$>
383+ _cnataImpressionTrackingUrl,
384+ ("callToAction" .=) <$> _cnataCallToAction,
385+ ("store" .=) <$> _cnataStore,
386+ ("price" .=) <$> _cnataPrice,
387+ ("advertiser" .=) <$> _cnataAdvertiser,
388+ ("starRating" .=) <$> _cnataStarRating,
389+ ("logo" .=) <$> _cnataLogo])
390+
391+--
392+-- /See:/ 'pretargetingConfigDimensions' smart constructor.
393+data PretargetingConfigDimensions = PretargetingConfigDimensions
394+ { _pcdHeight :: !(Maybe Int64)
395+ , _pcdWidth :: !(Maybe Int64)
396+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
397+
398+-- | Creates a value of 'PretargetingConfigDimensions' with the minimum fields required to make a request.
399+--
400+-- Use one of the following lenses to modify other fields as desired:
401+--
402+-- * 'pcdHeight'
403+--
404+-- * 'pcdWidth'
405+pretargetingConfigDimensions
406+ :: PretargetingConfigDimensions
407+pretargetingConfigDimensions =
408+ PretargetingConfigDimensions
409+ { _pcdHeight = Nothing
410+ , _pcdWidth = Nothing
411+ }
412+
413+-- | Height in pixels.
414+pcdHeight :: Lens' PretargetingConfigDimensions (Maybe Int64)
415+pcdHeight
416+ = lens _pcdHeight (\ s a -> s{_pcdHeight = a})
417+
418+-- | Width in pixels.
419+pcdWidth :: Lens' PretargetingConfigDimensions (Maybe Int64)
420+pcdWidth = lens _pcdWidth (\ s a -> s{_pcdWidth = a})
421+
422+instance FromJSON PretargetingConfigDimensions where
423+ parseJSON
424+ = withObject "PretargetingConfigDimensions"
425+ (\ o ->
426+ PretargetingConfigDimensions <$>
427+ (o .:? "height") <*> (o .:? "width"))
428+
429+instance ToJSON PretargetingConfigDimensions where
430+ toJSON PretargetingConfigDimensions{..}
431+ = object
432+ (catMaybes
433+ [("height" .=) <$> _pcdHeight,
434+ ("width" .=) <$> _pcdWidth])
435+
226436--
227437-- /See:/ 'termsDto' smart constructor.
228438data TermsDto = TermsDto
@@ -641,6 +851,89 @@ instance ToJSON CreativesList where
641851 [("nextPageToken" .=) <$> _clNextPageToken,
642852 Just ("kind" .= _clKind), ("items" .=) <$> _clItems])
643853
854+--
855+-- /See:/ 'creativeServingRestrictionsContexts' smart constructor.
856+data CreativeServingRestrictionsContexts = CreativeServingRestrictionsContexts
857+ { _csrcPlatform :: !(Maybe [Text])
858+ , _csrcContextType :: !(Maybe Text)
859+ , _csrcAuctionType :: !(Maybe [Text])
860+ , _csrcGeoCriteriaId :: !(Maybe [Int32])
861+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
862+
863+-- | Creates a value of 'CreativeServingRestrictionsContexts' with the minimum fields required to make a request.
864+--
865+-- Use one of the following lenses to modify other fields as desired:
866+--
867+-- * 'csrcPlatform'
868+--
869+-- * 'csrcContextType'
870+--
871+-- * 'csrcAuctionType'
872+--
873+-- * 'csrcGeoCriteriaId'
874+creativeServingRestrictionsContexts
875+ :: CreativeServingRestrictionsContexts
876+creativeServingRestrictionsContexts =
877+ CreativeServingRestrictionsContexts
878+ { _csrcPlatform = Nothing
879+ , _csrcContextType = Nothing
880+ , _csrcAuctionType = Nothing
881+ , _csrcGeoCriteriaId = Nothing
882+ }
883+
884+-- | Only set when contextType=PLATFORM. Represents the platforms this
885+-- restriction applies to.
886+csrcPlatform :: Lens' CreativeServingRestrictionsContexts [Text]
887+csrcPlatform
888+ = lens _csrcPlatform (\ s a -> s{_csrcPlatform = a})
889+ . _Default
890+ . _Coerce
891+
892+-- | The type of context (e.g., location, platform, auction type, SSL-ness).
893+csrcContextType :: Lens' CreativeServingRestrictionsContexts (Maybe Text)
894+csrcContextType
895+ = lens _csrcContextType
896+ (\ s a -> s{_csrcContextType = a})
897+
898+-- | Only set when contextType=AUCTION_TYPE. Represents the auction types
899+-- this restriction applies to.
900+csrcAuctionType :: Lens' CreativeServingRestrictionsContexts [Text]
901+csrcAuctionType
902+ = lens _csrcAuctionType
903+ (\ s a -> s{_csrcAuctionType = a})
904+ . _Default
905+ . _Coerce
906+
907+-- | Only set when contextType=LOCATION. Represents the geo criterias this
908+-- restriction applies to.
909+csrcGeoCriteriaId :: Lens' CreativeServingRestrictionsContexts [Int32]
910+csrcGeoCriteriaId
911+ = lens _csrcGeoCriteriaId
912+ (\ s a -> s{_csrcGeoCriteriaId = a})
913+ . _Default
914+ . _Coerce
915+
916+instance FromJSON CreativeServingRestrictionsContexts
917+ where
918+ parseJSON
919+ = withObject "CreativeServingRestrictionsContexts"
920+ (\ o ->
921+ CreativeServingRestrictionsContexts <$>
922+ (o .:? "platform" .!= mempty) <*>
923+ (o .:? "contextType")
924+ <*> (o .:? "auctionType" .!= mempty)
925+ <*> (o .:? "geoCriteriaId" .!= mempty))
926+
927+instance ToJSON CreativeServingRestrictionsContexts
928+ where
929+ toJSON CreativeServingRestrictionsContexts{..}
930+ = object
931+ (catMaybes
932+ [("platform" .=) <$> _csrcPlatform,
933+ ("contextType" .=) <$> _csrcContextType,
934+ ("auctionType" .=) <$> _csrcAuctionType,
935+ ("geoCriteriaId" .=) <$> _csrcGeoCriteriaId])
936+
644937--
645938-- /See:/ 'createOrdersResponse' smart constructor.
646939newtype CreateOrdersResponse = CreateOrdersResponse
@@ -1286,6 +1579,58 @@ instance ToJSON AccountsList where
12861579 [Just ("kind" .= _alKind),
12871580 ("items" .=) <$> _alItems])
12881581
1582+--
1583+-- /See:/ 'creativeServingRestrictionsDisapprovalReasons' smart constructor.
1584+data CreativeServingRestrictionsDisapprovalReasons = CreativeServingRestrictionsDisapprovalReasons
1585+ { _csrdrReason :: !(Maybe Text)
1586+ , _csrdrDetails :: !(Maybe [Text])
1587+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1588+
1589+-- | Creates a value of 'CreativeServingRestrictionsDisapprovalReasons' with the minimum fields required to make a request.
1590+--
1591+-- Use one of the following lenses to modify other fields as desired:
1592+--
1593+-- * 'csrdrReason'
1594+--
1595+-- * 'csrdrDetails'
1596+creativeServingRestrictionsDisapprovalReasons
1597+ :: CreativeServingRestrictionsDisapprovalReasons
1598+creativeServingRestrictionsDisapprovalReasons =
1599+ CreativeServingRestrictionsDisapprovalReasons
1600+ { _csrdrReason = Nothing
1601+ , _csrdrDetails = Nothing
1602+ }
1603+
1604+-- | The categorized reason for disapproval.
1605+csrdrReason :: Lens' CreativeServingRestrictionsDisapprovalReasons (Maybe Text)
1606+csrdrReason
1607+ = lens _csrdrReason (\ s a -> s{_csrdrReason = a})
1608+
1609+-- | Additional details about the reason for disapproval.
1610+csrdrDetails :: Lens' CreativeServingRestrictionsDisapprovalReasons [Text]
1611+csrdrDetails
1612+ = lens _csrdrDetails (\ s a -> s{_csrdrDetails = a})
1613+ . _Default
1614+ . _Coerce
1615+
1616+instance FromJSON
1617+ CreativeServingRestrictionsDisapprovalReasons where
1618+ parseJSON
1619+ = withObject
1620+ "CreativeServingRestrictionsDisapprovalReasons"
1621+ (\ o ->
1622+ CreativeServingRestrictionsDisapprovalReasons <$>
1623+ (o .:? "reason") <*> (o .:? "details" .!= mempty))
1624+
1625+instance ToJSON
1626+ CreativeServingRestrictionsDisapprovalReasons where
1627+ toJSON
1628+ CreativeServingRestrictionsDisapprovalReasons{..}
1629+ = object
1630+ (catMaybes
1631+ [("reason" .=) <$> _csrdrReason,
1632+ ("details" .=) <$> _csrdrDetails])
1633+
12891634--
12901635-- /See:/ 'getOrderNotesResponse' smart constructor.
12911636newtype GetOrderNotesResponse = GetOrderNotesResponse
@@ -1562,7 +1907,7 @@ data Creative = Creative
15621907 , _cBuyerCreativeId :: !(Maybe Text)
15631908 , _cAdvertiserName :: !(Maybe Text)
15641909 , _cAgencyId :: !(Maybe Int64)
1565− , _cCorrections :: !(Maybe [CreativeCorrectionsItem])
1910+ , _cCorrections :: !(Maybe [CreativeCorrections])
15661911 , _cProductCategories :: !(Maybe [Int32])
15671912 , _cKind :: !Text
15681913 , _cHTMLSnippet :: !(Maybe Text)
@@ -1579,7 +1924,7 @@ data Creative = Creative
15791924 , _cSensitiveCategories :: !(Maybe [Int32])
15801925 , _cVideoURL :: !(Maybe Text)
15811926 , _cApiUploadTimestamp :: !(Maybe UTCTime)
1582− , _cServingRestrictions :: !(Maybe [CreativeServingRestrictionsItem])
1927+ , _cServingRestrictions :: !(Maybe [CreativeServingRestrictions])
15831928 , _cOpenAuctionStatus :: !(Maybe Text)
15841929 } deriving (Eq,Read,Show,Data,Typeable,Generic)
15851930
@@ -1702,7 +2047,7 @@ cAgencyId
17022047
17032048-- | Shows any corrections that were applied to this creative. Read-only.
17042049-- This field should not be set in requests.
1705−cCorrections :: Lens' Creative [CreativeCorrectionsItem]
2050+cCorrections :: Lens' Creative [CreativeCorrections]
17062051cCorrections
17072052 = lens _cCorrections (\ s a -> s{_cCorrections = a})
17082053 . _Default
@@ -1824,7 +2169,7 @@ cApiUploadTimestamp
18242169-- relates to where something ultimately serves (for example, a physical
18252170-- location, a platform, an HTTPS vs HTTP request, or the type of auction).
18262171-- Read-only. This field should not be set in requests.
1827−cServingRestrictions :: Lens' Creative [CreativeServingRestrictionsItem]
2172+cServingRestrictions :: Lens' Creative [CreativeServingRestrictions]
18282173cServingRestrictions
18292174 = lens _cServingRestrictions
18302175 (\ s a -> s{_cServingRestrictions = a})
@@ -2003,6 +2348,53 @@ instance ToJSON PretargetingConfigList where
20032348 [Just ("kind" .= _pclKind),
20042349 ("items" .=) <$> _pclItems])
20052350
2351+--
2352+-- /See:/ 'creativeCorrections' smart constructor.
2353+data CreativeCorrections = CreativeCorrections
2354+ { _ccReason :: !(Maybe Text)
2355+ , _ccDetails :: !(Maybe [Text])
2356+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2357+
2358+-- | Creates a value of 'CreativeCorrections' with the minimum fields required to make a request.
2359+--
2360+-- Use one of the following lenses to modify other fields as desired:
2361+--
2362+-- * 'ccReason'
2363+--
2364+-- * 'ccDetails'
2365+creativeCorrections
2366+ :: CreativeCorrections
2367+creativeCorrections =
2368+ CreativeCorrections
2369+ { _ccReason = Nothing
2370+ , _ccDetails = Nothing
2371+ }
2372+
2373+-- | The type of correction that was applied to the creative.
2374+ccReason :: Lens' CreativeCorrections (Maybe Text)
2375+ccReason = lens _ccReason (\ s a -> s{_ccReason = a})
2376+
2377+-- | Additional details about the correction.
2378+ccDetails :: Lens' CreativeCorrections [Text]
2379+ccDetails
2380+ = lens _ccDetails (\ s a -> s{_ccDetails = a}) .
2381+ _Default
2382+ . _Coerce
2383+
2384+instance FromJSON CreativeCorrections where
2385+ parseJSON
2386+ = withObject "CreativeCorrections"
2387+ (\ o ->
2388+ CreativeCorrections <$>
2389+ (o .:? "reason") <*> (o .:? "details" .!= mempty))
2390+
2391+instance ToJSON CreativeCorrections where
2392+ toJSON CreativeCorrections{..}
2393+ = object
2394+ (catMaybes
2395+ [("reason" .=) <$> _ccReason,
2396+ ("details" .=) <$> _ccDetails])
2397+
20062398--
20072399-- /See:/ 'buyerDto' smart constructor.
20082400data BuyerDto = BuyerDto
@@ -2238,18 +2630,18 @@ data PerformanceReport = PerformanceReport
22382630 { _prFilteredBidRate :: !(Maybe Double)
22392631 , _prKind :: !Text
22402632 , _prLatency95thPercentile :: !(Maybe Double)
2241− , _prCookieMatcherStatusRate :: !(Maybe [JSON])
2242− , _prHostedMatchStatusRate :: !(Maybe [JSON])
2633+ , _prCookieMatcherStatusRate :: !(Maybe [JSONValue])
2634+ , _prHostedMatchStatusRate :: !(Maybe [JSONValue])
22432635 , _prUnsuccessfulRequestRate :: !(Maybe Double)
22442636 , _prBidRequestRate :: !(Maybe Double)
22452637 , _prQuotaThrottledLimit :: !(Maybe Double)
22462638 , _prQuotaConfiguredLimit :: !(Maybe Double)
22472639 , _prSuccessfulRequestRate :: !(Maybe Double)
22482640 , _prLatency85thPercentile :: !(Maybe Double)
2249− , _prCalloutStatusRate :: !(Maybe [JSON])
2641+ , _prCalloutStatusRate :: !(Maybe [JSONValue])
22502642 , _prLatency50thPercentile :: !(Maybe Double)
22512643 , _prBidRate :: !(Maybe Double)
2252− , _prCreativeStatusRate :: !(Maybe [JSON])
2644+ , _prCreativeStatusRate :: !(Maybe [JSONValue])
22532645 , _prNoQuotaInRegion :: !(Maybe Double)
22542646 , _prRegion :: !(Maybe Text)
22552647 , _prInventoryMatchRate :: !(Maybe Double)
@@ -2353,7 +2745,7 @@ prLatency95thPercentile
23532745 (\ s a -> s{_prLatency95thPercentile = a})
23542746
23552747-- | Average QPS for cookie matcher operations.
2356−prCookieMatcherStatusRate :: Lens' PerformanceReport [JSON]
2748+prCookieMatcherStatusRate :: Lens' PerformanceReport [JSONValue]
23572749prCookieMatcherStatusRate
23582750 = lens _prCookieMatcherStatusRate
23592751 (\ s a -> s{_prCookieMatcherStatusRate = a})
@@ -2361,7 +2753,7 @@ prCookieMatcherStatusRate
23612753 . _Coerce
23622754
23632755-- | Average QPS for hosted match operations.
2364−prHostedMatchStatusRate :: Lens' PerformanceReport [JSON]
2756+prHostedMatchStatusRate :: Lens' PerformanceReport [JSONValue]
23652757prHostedMatchStatusRate
23662758 = lens _prHostedMatchStatusRate
23672759 (\ s a -> s{_prHostedMatchStatusRate = a})
@@ -2409,7 +2801,7 @@ prLatency85thPercentile
24092801
24102802-- | Rate of various prefiltering statuses per match. Please refer to the
24112803-- callout-status-codes.txt file for different statuses.
2412−prCalloutStatusRate :: Lens' PerformanceReport [JSON]
2804+prCalloutStatusRate :: Lens' PerformanceReport [JSONValue]
24132805prCalloutStatusRate
24142806 = lens _prCalloutStatusRate
24152807 (\ s a -> s{_prCalloutStatusRate = a})
@@ -2430,7 +2822,7 @@ prBidRate
24302822
24312823-- | Rate of ads with a given status. Please refer to the
24322824-- creative-status-codes.txt file for different statuses.
2433−prCreativeStatusRate :: Lens' PerformanceReport [JSON]
2825+prCreativeStatusRate :: Lens' PerformanceReport [JSONValue]
24342826prCreativeStatusRate
24352827 = lens _prCreativeStatusRate
24362828 (\ s a -> s{_prCreativeStatusRate = a})
@@ -2552,7 +2944,7 @@ data Account = Account
25522944 , _aCookieMatchingNid :: !(Maybe Text)
25532945 , _aNumberActiveCreatives :: !(Maybe Int32)
25542946 , _aId :: !(Maybe Int32)
2555− , _aBidderLocation :: !(Maybe [AccountBidderLocationItem])
2947+ , _aBidderLocation :: !(Maybe [AccountBidderLocation])
25562948 } deriving (Eq,Read,Show,Data,Typeable,Generic)
25572949
25582950-- | Creates a value of 'Account' with the minimum fields required to make a request.
@@ -2634,7 +3026,7 @@ aId :: Lens' Account (Maybe Int32)
26343026aId = lens _aId (\ s a -> s{_aId = a})
26353027
26363028-- | Your bidder locations that have distinct URLs.
2637−aBidderLocation :: Lens' Account [AccountBidderLocationItem]
3029+aBidderLocation :: Lens' Account [AccountBidderLocation]
26383030aBidderLocation
26393031 = lens _aBidderLocation
26403032 (\ s a -> s{_aBidderLocation = a})
@@ -2780,6 +3172,110 @@ instance ToJSON DeleteOrderDealsRequest where
27803172 ("orderRevisionNumber" .=) <$>
27813173 _dodrOrderRevisionNumber])
27823174
3175+--
3176+-- /See:/ 'pretargetingConfigExcludedPlacements' smart constructor.
3177+data PretargetingConfigExcludedPlacements = PretargetingConfigExcludedPlacements
3178+ { _pcepToken :: !(Maybe Text)
3179+ , _pcepType :: !(Maybe Text)
3180+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
3181+
3182+-- | Creates a value of 'PretargetingConfigExcludedPlacements' with the minimum fields required to make a request.
3183+--
3184+-- Use one of the following lenses to modify other fields as desired:
3185+--
3186+-- * 'pcepToken'
3187+--
3188+-- * 'pcepType'
3189+pretargetingConfigExcludedPlacements
3190+ :: PretargetingConfigExcludedPlacements
3191+pretargetingConfigExcludedPlacements =
3192+ PretargetingConfigExcludedPlacements
3193+ { _pcepToken = Nothing
3194+ , _pcepType = Nothing
3195+ }
3196+
3197+-- | The value of the placement. Interpretation depends on the placement
3198+-- type, e.g. URL for a site placement, channel name for a channel
3199+-- placement, app id for a mobile app placement.
3200+pcepToken :: Lens' PretargetingConfigExcludedPlacements (Maybe Text)
3201+pcepToken
3202+ = lens _pcepToken (\ s a -> s{_pcepToken = a})
3203+
3204+-- | The type of the placement.
3205+pcepType :: Lens' PretargetingConfigExcludedPlacements (Maybe Text)
3206+pcepType = lens _pcepType (\ s a -> s{_pcepType = a})
3207+
3208+instance FromJSON
3209+ PretargetingConfigExcludedPlacements where
3210+ parseJSON
3211+ = withObject "PretargetingConfigExcludedPlacements"
3212+ (\ o ->
3213+ PretargetingConfigExcludedPlacements <$>
3214+ (o .:? "token") <*> (o .:? "type"))
3215+
3216+instance ToJSON PretargetingConfigExcludedPlacements
3217+ where
3218+ toJSON PretargetingConfigExcludedPlacements{..}
3219+ = object
3220+ (catMaybes
3221+ [("token" .=) <$> _pcepToken,
3222+ ("type" .=) <$> _pcepType])
3223+
3224+-- | A smaller image, for the advertiser logo.
3225+--
3226+-- /See:/ 'creativeNATiveAdLogo' smart constructor.
3227+data CreativeNATiveAdLogo = CreativeNATiveAdLogo
3228+ { _cnatalHeight :: !(Maybe Int32)
3229+ , _cnatalUrl :: !(Maybe Text)
3230+ , _cnatalWidth :: !(Maybe Int32)
3231+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
3232+
3233+-- | Creates a value of 'CreativeNATiveAdLogo' with the minimum fields required to make a request.
3234+--
3235+-- Use one of the following lenses to modify other fields as desired:
3236+--
3237+-- * 'cnatalHeight'
3238+--
3239+-- * 'cnatalUrl'
3240+--
3241+-- * 'cnatalWidth'
3242+creativeNATiveAdLogo
3243+ :: CreativeNATiveAdLogo
3244+creativeNATiveAdLogo =
3245+ CreativeNATiveAdLogo
3246+ { _cnatalHeight = Nothing
3247+ , _cnatalUrl = Nothing
3248+ , _cnatalWidth = Nothing
3249+ }
3250+
3251+cnatalHeight :: Lens' CreativeNATiveAdLogo (Maybe Int32)
3252+cnatalHeight
3253+ = lens _cnatalHeight (\ s a -> s{_cnatalHeight = a})
3254+
3255+cnatalUrl :: Lens' CreativeNATiveAdLogo (Maybe Text)
3256+cnatalUrl
3257+ = lens _cnatalUrl (\ s a -> s{_cnatalUrl = a})
3258+
3259+cnatalWidth :: Lens' CreativeNATiveAdLogo (Maybe Int32)
3260+cnatalWidth
3261+ = lens _cnatalWidth (\ s a -> s{_cnatalWidth = a})
3262+
3263+instance FromJSON CreativeNATiveAdLogo where
3264+ parseJSON
3265+ = withObject "CreativeNATiveAdLogo"
3266+ (\ o ->
3267+ CreativeNATiveAdLogo <$>
3268+ (o .:? "height") <*> (o .:? "url") <*>
3269+ (o .:? "width"))
3270+
3271+instance ToJSON CreativeNATiveAdLogo where
3272+ toJSON CreativeNATiveAdLogo{..}
3273+ = object
3274+ (catMaybes
3275+ [("height" .=) <$> _cnatalHeight,
3276+ ("url" .=) <$> _cnatalUrl,
3277+ ("width" .=) <$> _cnatalWidth])
3278+
27833279--
27843280-- /See:/ 'getOrderDealsResponse' smart constructor.
27853281newtype GetOrderDealsResponse = GetOrderDealsResponse
@@ -2815,6 +3311,56 @@ instance ToJSON GetOrderDealsResponse where
28153311 toJSON GetOrderDealsResponse{..}
28163312 = object (catMaybes [("deals" .=) <$> _godrDeals])
28173313
3314+-- | The filtering reasons for the creative. Read-only. This field should not
3315+-- be set in requests.
3316+--
3317+-- /See:/ 'creativeFilteringReasons' smart constructor.
3318+data CreativeFilteringReasons = CreativeFilteringReasons
3319+ { _cfrReasons :: !(Maybe [CreativeFilteringReasonsReasons])
3320+ , _cfrDate :: !(Maybe Text)
3321+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
3322+
3323+-- | Creates a value of 'CreativeFilteringReasons' with the minimum fields required to make a request.
3324+--
3325+-- Use one of the following lenses to modify other fields as desired:
3326+--
3327+-- * 'cfrReasons'
3328+--
3329+-- * 'cfrDate'
3330+creativeFilteringReasons
3331+ :: CreativeFilteringReasons
3332+creativeFilteringReasons =
3333+ CreativeFilteringReasons
3334+ { _cfrReasons = Nothing
3335+ , _cfrDate = Nothing
3336+ }
3337+
3338+-- | The filtering reasons.
3339+cfrReasons :: Lens' CreativeFilteringReasons [CreativeFilteringReasonsReasons]
3340+cfrReasons
3341+ = lens _cfrReasons (\ s a -> s{_cfrReasons = a}) .
3342+ _Default
3343+ . _Coerce
3344+
3345+-- | The date in ISO 8601 format for the data. The data is collected from
3346+-- 00:00:00 to 23:59:59 in PST.
3347+cfrDate :: Lens' CreativeFilteringReasons (Maybe Text)
3348+cfrDate = lens _cfrDate (\ s a -> s{_cfrDate = a})
3349+
3350+instance FromJSON CreativeFilteringReasons where
3351+ parseJSON
3352+ = withObject "CreativeFilteringReasons"
3353+ (\ o ->
3354+ CreativeFilteringReasons <$>
3355+ (o .:? "reasons" .!= mempty) <*> (o .:? "date"))
3356+
3357+instance ToJSON CreativeFilteringReasons where
3358+ toJSON CreativeFilteringReasons{..}
3359+ = object
3360+ (catMaybes
3361+ [("reasons" .=) <$> _cfrReasons,
3362+ ("date" .=) <$> _cfrDate])
3363+
28183364--
28193365-- /See:/ 'contactInformation' smart constructor.
28203366data ContactInformation = ContactInformation
@@ -2929,16 +3475,16 @@ data PretargetingConfig = PretargetingConfig
29293475 , _pcSupportedCreativeAttributes :: !(Maybe [Int64])
29303476 , _pcUserLists :: !(Maybe [Int64])
29313477 , _pcKind :: !Text
2932− , _pcExcludedPlacements :: !(Maybe [PretargetingConfigExcludedPlacementsItem])
3478+ , _pcExcludedPlacements :: !(Maybe [PretargetingConfigExcludedPlacements])
29333479 , _pcMobileDevices :: !(Maybe [Int64])
29343480 , _pcLanguages :: !(Maybe [Text])
29353481 , _pcVerticals :: !(Maybe [Int64])
29363482 , _pcConfigId :: !(Maybe Int64)
2937− , _pcPlacements :: !(Maybe [PretargetingConfigPlacementsItem])
3483+ , _pcPlacements :: !(Maybe [PretargetingConfigPlacements])
29383484 , _pcExcludedUserLists :: !(Maybe [Int64])
29393485 , _pcConfigName :: !(Maybe Text)
29403486 , _pcGeoCriteriaIds :: !(Maybe [Int64])
2941− , _pcDimensions :: !(Maybe [PretargetingConfigDimensionsItem])
3487+ , _pcDimensions :: !(Maybe [PretargetingConfigDimensions])
29423488 , _pcExcludedVerticals :: !(Maybe [Int64])
29433489 , _pcCreativeType :: !(Maybe [Text])
29443490 , _pcIsActive :: !(Maybe Bool)
@@ -3083,7 +3629,7 @@ pcKind :: Lens' PretargetingConfig Text
30833629pcKind = lens _pcKind (\ s a -> s{_pcKind = a})
30843630
30853631-- | Requests containing any of these placements will not match.
3086−pcExcludedPlacements :: Lens' PretargetingConfig [PretargetingConfigExcludedPlacementsItem]
3632+pcExcludedPlacements :: Lens' PretargetingConfig [PretargetingConfigExcludedPlacements]
30873633pcExcludedPlacements
30883634 = lens _pcExcludedPlacements
30893635 (\ s a -> s{_pcExcludedPlacements = a})
@@ -3120,7 +3666,7 @@ pcConfigId
31203666 = lens _pcConfigId (\ s a -> s{_pcConfigId = a})
31213667
31223668-- | Requests containing any of these placements will match.
3123−pcPlacements :: Lens' PretargetingConfig [PretargetingConfigPlacementsItem]
3669+pcPlacements :: Lens' PretargetingConfig [PretargetingConfigPlacements]
31243670pcPlacements
31253671 = lens _pcPlacements (\ s a -> s{_pcPlacements = a})
31263672 . _Default
@@ -3149,7 +3695,7 @@ pcGeoCriteriaIds
31493695
31503696-- | Requests which allow one of these (width, height) pairs will match. All
31513697-- pairs must be supported ad dimensions.
3152−pcDimensions :: Lens' PretargetingConfig [PretargetingConfigDimensionsItem]
3698+pcDimensions :: Lens' PretargetingConfig [PretargetingConfigDimensions]
31533699pcDimensions
31543700 = lens _pcDimensions (\ s a -> s{_pcDimensions = a})
31553701 . _Default
@@ -4547,6 +5093,62 @@ instance ToJSON Price where
45475093 [("currencyCode" .=) <$> _pCurrencyCode,
45485094 ("amountMicros" .=) <$> _pAmountMicros])
45495095
5096+-- | The app icon, for app download ads.
5097+--
5098+-- /See:/ 'creativeNATiveAdAppIcon' smart constructor.
5099+data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon
5100+ { _cnataaiHeight :: !(Maybe Int32)
5101+ , _cnataaiUrl :: !(Maybe Text)
5102+ , _cnataaiWidth :: !(Maybe Int32)
5103+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
5104+
5105+-- | Creates a value of 'CreativeNATiveAdAppIcon' with the minimum fields required to make a request.
5106+--
5107+-- Use one of the following lenses to modify other fields as desired:
5108+--
5109+-- * 'cnataaiHeight'
5110+--
5111+-- * 'cnataaiUrl'
5112+--
5113+-- * 'cnataaiWidth'
5114+creativeNATiveAdAppIcon
5115+ :: CreativeNATiveAdAppIcon
5116+creativeNATiveAdAppIcon =
5117+ CreativeNATiveAdAppIcon
5118+ { _cnataaiHeight = Nothing
5119+ , _cnataaiUrl = Nothing
5120+ , _cnataaiWidth = Nothing
5121+ }
5122+
5123+cnataaiHeight :: Lens' CreativeNATiveAdAppIcon (Maybe Int32)
5124+cnataaiHeight
5125+ = lens _cnataaiHeight
5126+ (\ s a -> s{_cnataaiHeight = a})
5127+
5128+cnataaiUrl :: Lens' CreativeNATiveAdAppIcon (Maybe Text)
5129+cnataaiUrl
5130+ = lens _cnataaiUrl (\ s a -> s{_cnataaiUrl = a})
5131+
5132+cnataaiWidth :: Lens' CreativeNATiveAdAppIcon (Maybe Int32)
5133+cnataaiWidth
5134+ = lens _cnataaiWidth (\ s a -> s{_cnataaiWidth = a})
5135+
5136+instance FromJSON CreativeNATiveAdAppIcon where
5137+ parseJSON
5138+ = withObject "CreativeNATiveAdAppIcon"
5139+ (\ o ->
5140+ CreativeNATiveAdAppIcon <$>
5141+ (o .:? "height") <*> (o .:? "url") <*>
5142+ (o .:? "width"))
5143+
5144+instance ToJSON CreativeNATiveAdAppIcon where
5145+ toJSON CreativeNATiveAdAppIcon{..}
5146+ = object
5147+ (catMaybes
5148+ [("height" .=) <$> _cnataaiHeight,
5149+ ("url" .=) <$> _cnataaiUrl,
5150+ ("width" .=) <$> _cnataaiWidth])
5151+
45505152--
45515153-- /See:/ 'editAllOrderDealsRequest' smart constructor.
45525154data EditAllOrderDealsRequest = EditAllOrderDealsRequest
@@ -4890,6 +5492,61 @@ instance ToJSON ListOffersRequest where
48905492 [("sinceTimestampMillis" .=) <$>
48915493 _lorSinceTimestampMillis])
48925494
5495+-- | A large image.
5496+--
5497+-- /See:/ 'creativeNATiveAdImage' smart constructor.
5498+data CreativeNATiveAdImage = CreativeNATiveAdImage
5499+ { _cnataiHeight :: !(Maybe Int32)
5500+ , _cnataiUrl :: !(Maybe Text)
5501+ , _cnataiWidth :: !(Maybe Int32)
5502+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
5503+
5504+-- | Creates a value of 'CreativeNATiveAdImage' with the minimum fields required to make a request.
5505+--
5506+-- Use one of the following lenses to modify other fields as desired:
5507+--
5508+-- * 'cnataiHeight'
5509+--
5510+-- * 'cnataiUrl'
5511+--
5512+-- * 'cnataiWidth'
5513+creativeNATiveAdImage
5514+ :: CreativeNATiveAdImage
5515+creativeNATiveAdImage =
5516+ CreativeNATiveAdImage
5517+ { _cnataiHeight = Nothing
5518+ , _cnataiUrl = Nothing
5519+ , _cnataiWidth = Nothing
5520+ }
5521+
5522+cnataiHeight :: Lens' CreativeNATiveAdImage (Maybe Int32)
5523+cnataiHeight
5524+ = lens _cnataiHeight (\ s a -> s{_cnataiHeight = a})
5525+
5526+cnataiUrl :: Lens' CreativeNATiveAdImage (Maybe Text)
5527+cnataiUrl
5528+ = lens _cnataiUrl (\ s a -> s{_cnataiUrl = a})
5529+
5530+cnataiWidth :: Lens' CreativeNATiveAdImage (Maybe Int32)
5531+cnataiWidth
5532+ = lens _cnataiWidth (\ s a -> s{_cnataiWidth = a})
5533+
5534+instance FromJSON CreativeNATiveAdImage where
5535+ parseJSON
5536+ = withObject "CreativeNATiveAdImage"
5537+ (\ o ->
5538+ CreativeNATiveAdImage <$>
5539+ (o .:? "height") <*> (o .:? "url") <*>
5540+ (o .:? "width"))
5541+
5542+instance ToJSON CreativeNATiveAdImage where
5543+ toJSON CreativeNATiveAdImage{..}
5544+ = object
5545+ (catMaybes
5546+ [("height" .=) <$> _cnataiHeight,
5547+ ("url" .=) <$> _cnataiUrl,
5548+ ("width" .=) <$> _cnataiWidth])
5549+
48935550--
48945551-- /See:/ 'listClientAccessCapabilitiesRequest' smart constructor.
48955552newtype ListClientAccessCapabilitiesRequest = ListClientAccessCapabilitiesRequest
@@ -5506,6 +6163,117 @@ instance ToJSON SharedTargeting where
55066163 ("exclusions" .=) <$> _stExclusions,
55076164 ("inclusions" .=) <$> _stInclusions])
55086165
6166+--
6167+-- /See:/ 'accountBidderLocation' smart constructor.
6168+data AccountBidderLocation = AccountBidderLocation
6169+ { _ablUrl :: !(Maybe Text)
6170+ , _ablMaximumQps :: !(Maybe Int32)
6171+ , _ablRegion :: !(Maybe Text)
6172+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
6173+
6174+-- | Creates a value of 'AccountBidderLocation' with the minimum fields required to make a request.
6175+--
6176+-- Use one of the following lenses to modify other fields as desired:
6177+--
6178+-- * 'ablUrl'
6179+--
6180+-- * 'ablMaximumQps'
6181+--
6182+-- * 'ablRegion'
6183+accountBidderLocation
6184+ :: AccountBidderLocation
6185+accountBidderLocation =
6186+ AccountBidderLocation
6187+ { _ablUrl = Nothing
6188+ , _ablMaximumQps = Nothing
6189+ , _ablRegion = Nothing
6190+ }
6191+
6192+-- | The URL to which the Ad Exchange will send bid requests.
6193+ablUrl :: Lens' AccountBidderLocation (Maybe Text)
6194+ablUrl = lens _ablUrl (\ s a -> s{_ablUrl = a})
6195+
6196+-- | The maximum queries per second the Ad Exchange will send.
6197+ablMaximumQps :: Lens' AccountBidderLocation (Maybe Int32)
6198+ablMaximumQps
6199+ = lens _ablMaximumQps
6200+ (\ s a -> s{_ablMaximumQps = a})
6201+
6202+-- | The geographical region the Ad Exchange should send requests from. Only
6203+-- used by some quota systems, but always setting the value is recommended.
6204+-- Allowed values: - ASIA - EUROPE - US_EAST - US_WEST
6205+ablRegion :: Lens' AccountBidderLocation (Maybe Text)
6206+ablRegion
6207+ = lens _ablRegion (\ s a -> s{_ablRegion = a})
6208+
6209+instance FromJSON AccountBidderLocation where
6210+ parseJSON
6211+ = withObject "AccountBidderLocation"
6212+ (\ o ->
6213+ AccountBidderLocation <$>
6214+ (o .:? "url") <*> (o .:? "maximumQps") <*>
6215+ (o .:? "region"))
6216+
6217+instance ToJSON AccountBidderLocation where
6218+ toJSON AccountBidderLocation{..}
6219+ = object
6220+ (catMaybes
6221+ [("url" .=) <$> _ablUrl,
6222+ ("maximumQps" .=) <$> _ablMaximumQps,
6223+ ("region" .=) <$> _ablRegion])
6224+
6225+--
6226+-- /See:/ 'creativeFilteringReasonsReasons' smart constructor.
6227+data CreativeFilteringReasonsReasons = CreativeFilteringReasonsReasons
6228+ { _cfrrFilteringStatus :: !(Maybe Int32)
6229+ , _cfrrFilteringCount :: !(Maybe Int64)
6230+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
6231+
6232+-- | Creates a value of 'CreativeFilteringReasonsReasons' with the minimum fields required to make a request.
6233+--
6234+-- Use one of the following lenses to modify other fields as desired:
6235+--
6236+-- * 'cfrrFilteringStatus'
6237+--
6238+-- * 'cfrrFilteringCount'
6239+creativeFilteringReasonsReasons
6240+ :: CreativeFilteringReasonsReasons
6241+creativeFilteringReasonsReasons =
6242+ CreativeFilteringReasonsReasons
6243+ { _cfrrFilteringStatus = Nothing
6244+ , _cfrrFilteringCount = Nothing
6245+ }
6246+
6247+-- | The filtering status code. Please refer to the creative-status-codes.txt
6248+-- file for different statuses.
6249+cfrrFilteringStatus :: Lens' CreativeFilteringReasonsReasons (Maybe Int32)
6250+cfrrFilteringStatus
6251+ = lens _cfrrFilteringStatus
6252+ (\ s a -> s{_cfrrFilteringStatus = a})
6253+
6254+-- | The number of times the creative was filtered for the status. The count
6255+-- is aggregated across all publishers on the exchange.
6256+cfrrFilteringCount :: Lens' CreativeFilteringReasonsReasons (Maybe Int64)
6257+cfrrFilteringCount
6258+ = lens _cfrrFilteringCount
6259+ (\ s a -> s{_cfrrFilteringCount = a})
6260+
6261+instance FromJSON CreativeFilteringReasonsReasons
6262+ where
6263+ parseJSON
6264+ = withObject "CreativeFilteringReasonsReasons"
6265+ (\ o ->
6266+ CreativeFilteringReasonsReasons <$>
6267+ (o .:? "filteringStatus") <*>
6268+ (o .:? "filteringCount"))
6269+
6270+instance ToJSON CreativeFilteringReasonsReasons where
6271+ toJSON CreativeFilteringReasonsReasons{..}
6272+ = object
6273+ (catMaybes
6274+ [("filteringStatus" .=) <$> _cfrrFilteringStatus,
6275+ ("filteringCount" .=) <$> _cfrrFilteringCount])
6276+
55096277--
55106278-- /See:/ 'clientAccessCapabilities' smart constructor.
55116279data ClientAccessCapabilities = ClientAccessCapabilities
@@ -5610,208 +6378,209 @@ instance ToJSON DeleteOrderDealsResponse where
56106378--
56116379-- /See:/ 'marketplaceDeal' smart constructor.
56126380data MarketplaceDeal = MarketplaceDeal
5613− { _mdExternalDealId :: !(Maybe Text)
5614− , _mdBuyerPrivateData :: !(Maybe (Maybe PrivateData))
5615− , _mdWebPropertyCode :: !(Maybe Text)
5616− , _mdCreationTimeMs :: !(Maybe Int64)
5617− , _mdTerms :: !(Maybe (Maybe DealTerms))
5618− , _mdOfferRevisionNumber :: !(Maybe Int64)
5619− , _mdLastUpdateTimeMs :: !(Maybe Int64)
5620− , _mdKind :: !Text
5621− , _mdDeliveryControl :: !(Maybe (Maybe DeliveryControl))
5622− , _mdFlightStartTimeMs :: !(Maybe Int64)
5623− , _mdSharedTargetings :: !(Maybe [Maybe SharedTargeting])
5624− , _mdDealId :: !(Maybe Text)
5625− , _mdInventoryDescription :: !(Maybe Text)
5626− , _mdSyndicationProduct :: !(Maybe Text)
5627− , _mdFlightEndTimeMs :: !(Maybe Int64)
5628− , _mdName :: !(Maybe Text)
5629− , _mdSellerContacts :: !(Maybe [Maybe ContactInformation])
5630− , _mdOfferId :: !(Maybe Text)
5631− , _mdOrderId :: !(Maybe Text)
6381+ { _mddExternalDealId :: !(Maybe Text)
6382+ , _mddBuyerPrivateData :: !(Maybe (Maybe PrivateData))
6383+ , _mddWebPropertyCode :: !(Maybe Text)
6384+ , _mddCreationTimeMs :: !(Maybe Int64)
6385+ , _mddTerms :: !(Maybe (Maybe DealTerms))
6386+ , _mddOfferRevisionNumber :: !(Maybe Int64)
6387+ , _mddLastUpdateTimeMs :: !(Maybe Int64)
6388+ , _mddKind :: !Text
6389+ , _mddDeliveryControl :: !(Maybe (Maybe DeliveryControl))
6390+ , _mddFlightStartTimeMs :: !(Maybe Int64)
6391+ , _mddSharedTargetings :: !(Maybe [Maybe SharedTargeting])
6392+ , _mddDealId :: !(Maybe Text)
6393+ , _mddInventoryDescription :: !(Maybe Text)
6394+ , _mddSyndicationProduct :: !(Maybe Text)
6395+ , _mddFlightEndTimeMs :: !(Maybe Int64)
6396+ , _mddName :: !(Maybe Text)
6397+ , _mddSellerContacts :: !(Maybe [Maybe ContactInformation])
6398+ , _mddOfferId :: !(Maybe Text)
6399+ , _mddOrderId :: !(Maybe Text)
56326400 } deriving (Eq,Read,Show,Data,Typeable,Generic)
56336401
56346402-- | Creates a value of 'MarketplaceDeal' with the minimum fields required to make a request.
56356403--
56366404-- Use one of the following lenses to modify other fields as desired:
56376405--
5638−-- * 'mdExternalDealId'
6406+-- * 'mddExternalDealId'
56396407--
5640−-- * 'mdBuyerPrivateData'
6408+-- * 'mddBuyerPrivateData'
56416409--
5642−-- * 'mdWebPropertyCode'
6410+-- * 'mddWebPropertyCode'
56436411--
5644−-- * 'mdCreationTimeMs'
6412+-- * 'mddCreationTimeMs'
56456413--
5646−-- * 'mdTerms'
6414+-- * 'mddTerms'
56476415--
5648−-- * 'mdOfferRevisionNumber'
6416+-- * 'mddOfferRevisionNumber'
56496417--
5650−-- * 'mdLastUpdateTimeMs'
6418+-- * 'mddLastUpdateTimeMs'
56516419--
5652−-- * 'mdKind'
6420+-- * 'mddKind'
56536421--
5654−-- * 'mdDeliveryControl'
6422+-- * 'mddDeliveryControl'
56556423--
5656−-- * 'mdFlightStartTimeMs'
6424+-- * 'mddFlightStartTimeMs'
56576425--
5658−-- * 'mdSharedTargetings'
6426+-- * 'mddSharedTargetings'
56596427--
5660−-- * 'mdDealId'
6428+-- * 'mddDealId'
56616429--
5662−-- * 'mdInventoryDescription'
6430+-- * 'mddInventoryDescription'
56636431--
5664−-- * 'mdSyndicationProduct'
6432+-- * 'mddSyndicationProduct'
56656433--
5666−-- * 'mdFlightEndTimeMs'
6434+-- * 'mddFlightEndTimeMs'
56676435--
5668−-- * 'mdName'
6436+-- * 'mddName'
56696437--
5670−-- * 'mdSellerContacts'
6438+-- * 'mddSellerContacts'
56716439--
5672−-- * 'mdOfferId'
6440+-- * 'mddOfferId'
56736441--
5674−-- * 'mdOrderId'
6442+-- * 'mddOrderId'
56756443marketplaceDeal
56766444 :: MarketplaceDeal
56776445marketplaceDeal =
56786446 MarketplaceDeal
5679− { _mdExternalDealId = Nothing
5680− , _mdBuyerPrivateData = Nothing
5681− , _mdWebPropertyCode = Nothing
5682− , _mdCreationTimeMs = Nothing
5683− , _mdTerms = Nothing
5684− , _mdOfferRevisionNumber = Nothing
5685− , _mdLastUpdateTimeMs = Nothing
5686− , _mdKind = "adexchangebuyer#marketplaceDeal"
5687− , _mdDeliveryControl = Nothing
5688− , _mdFlightStartTimeMs = Nothing
5689− , _mdSharedTargetings = Nothing
5690− , _mdDealId = Nothing
5691− , _mdInventoryDescription = Nothing
5692− , _mdSyndicationProduct = Nothing
5693− , _mdFlightEndTimeMs = Nothing
5694− , _mdName = Nothing
5695− , _mdSellerContacts = Nothing
5696− , _mdOfferId = Nothing
5697− , _mdOrderId = Nothing
6447+ { _mddExternalDealId = Nothing
6448+ , _mddBuyerPrivateData = Nothing
6449+ , _mddWebPropertyCode = Nothing
6450+ , _mddCreationTimeMs = Nothing
6451+ , _mddTerms = Nothing
6452+ , _mddOfferRevisionNumber = Nothing
6453+ , _mddLastUpdateTimeMs = Nothing
6454+ , _mddKind = "adexchangebuyer#marketplaceDeal"
6455+ , _mddDeliveryControl = Nothing
6456+ , _mddFlightStartTimeMs = Nothing
6457+ , _mddSharedTargetings = Nothing
6458+ , _mddDealId = Nothing
6459+ , _mddInventoryDescription = Nothing
6460+ , _mddSyndicationProduct = Nothing
6461+ , _mddFlightEndTimeMs = Nothing
6462+ , _mddName = Nothing
6463+ , _mddSellerContacts = Nothing
6464+ , _mddOfferId = Nothing
6465+ , _mddOrderId = Nothing
56986466 }
56996467
57006468-- | The external deal id assigned to this deal once the deal is finalized.
57016469-- This is the deal-id that shows up in serving\/reporting etc. (readonly)
5702−mdExternalDealId :: Lens' MarketplaceDeal (Maybe Text)
5703−mdExternalDealId
5704− = lens _mdExternalDealId
5705− (\ s a -> s{_mdExternalDealId = a})
6470+mddExternalDealId :: Lens' MarketplaceDeal (Maybe Text)
6471+mddExternalDealId
6472+ = lens _mddExternalDealId
6473+ (\ s a -> s{_mddExternalDealId = a})
57066474
57076475-- | Buyer private data (hidden from seller).
5708−mdBuyerPrivateData :: Lens' MarketplaceDeal (Maybe (Maybe PrivateData))
5709−mdBuyerPrivateData
5710− = lens _mdBuyerPrivateData
5711− (\ s a -> s{_mdBuyerPrivateData = a})
6476+mddBuyerPrivateData :: Lens' MarketplaceDeal (Maybe (Maybe PrivateData))
6477+mddBuyerPrivateData
6478+ = lens _mddBuyerPrivateData
6479+ (\ s a -> s{_mddBuyerPrivateData = a})
57126480
5713−mdWebPropertyCode :: Lens' MarketplaceDeal (Maybe Text)
5714−mdWebPropertyCode
5715− = lens _mdWebPropertyCode
5716− (\ s a -> s{_mdWebPropertyCode = a})
6481+mddWebPropertyCode :: Lens' MarketplaceDeal (Maybe Text)
6482+mddWebPropertyCode
6483+ = lens _mddWebPropertyCode
6484+ (\ s a -> s{_mddWebPropertyCode = a})
57176485
57186486-- | The time (ms since epoch) of the deal creation. (readonly)
5719−mdCreationTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
5720−mdCreationTimeMs
5721− = lens _mdCreationTimeMs
5722− (\ s a -> s{_mdCreationTimeMs = a})
6487+mddCreationTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
6488+mddCreationTimeMs
6489+ = lens _mddCreationTimeMs
6490+ (\ s a -> s{_mddCreationTimeMs = a})
57236491
57246492-- | The negotiable terms of the deal. (updatable)
5725−mdTerms :: Lens' MarketplaceDeal (Maybe (Maybe DealTerms))
5726−mdTerms = lens _mdTerms (\ s a -> s{_mdTerms = a})
6493+mddTerms :: Lens' MarketplaceDeal (Maybe (Maybe DealTerms))
6494+mddTerms = lens _mddTerms (\ s a -> s{_mddTerms = a})
57276495
57286496-- | The revision number of the offer that the deal was created from
57296497-- (readonly, except on create)
5730−mdOfferRevisionNumber :: Lens' MarketplaceDeal (Maybe Int64)
5731−mdOfferRevisionNumber
5732− = lens _mdOfferRevisionNumber
5733− (\ s a -> s{_mdOfferRevisionNumber = a})
6498+mddOfferRevisionNumber :: Lens' MarketplaceDeal (Maybe Int64)
6499+mddOfferRevisionNumber
6500+ = lens _mddOfferRevisionNumber
6501+ (\ s a -> s{_mddOfferRevisionNumber = a})
57346502
57356503-- | The time (ms since epoch) when the deal was last updated. (readonly)
5736−mdLastUpdateTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
5737−mdLastUpdateTimeMs
5738− = lens _mdLastUpdateTimeMs
5739− (\ s a -> s{_mdLastUpdateTimeMs = a})
6504+mddLastUpdateTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
6505+mddLastUpdateTimeMs
6506+ = lens _mddLastUpdateTimeMs
6507+ (\ s a -> s{_mddLastUpdateTimeMs = a})
57406508
57416509-- | Identifies what kind of resource this is. Value: the fixed string
57426510-- \"adexchangebuyer#marketplaceDeal\".
5743−mdKind :: Lens' MarketplaceDeal Text
5744−mdKind = lens _mdKind (\ s a -> s{_mdKind = a})
6511+mddKind :: Lens' MarketplaceDeal Text
6512+mddKind = lens _mddKind (\ s a -> s{_mddKind = a})
57456513
57466514-- | The set of fields around delivery control that are interesting for a
57476515-- buyer to see but are non-negotiable. These are set by the publisher.
57486516-- This message is assigned an id of 100 since some day we would want to
57496517-- model this as a protobuf extension.
5750−mdDeliveryControl :: Lens' MarketplaceDeal (Maybe (Maybe DeliveryControl))
5751−mdDeliveryControl
5752− = lens _mdDeliveryControl
5753− (\ s a -> s{_mdDeliveryControl = a})
6518+mddDeliveryControl :: Lens' MarketplaceDeal (Maybe (Maybe DeliveryControl))
6519+mddDeliveryControl
6520+ = lens _mddDeliveryControl
6521+ (\ s a -> s{_mddDeliveryControl = a})
57546522
57556523-- | Proposed flight start time of the deal (ms since epoch) This will
57566524-- generally be stored in a granularity of a second. (updatable)
5757−mdFlightStartTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
5758−mdFlightStartTimeMs
5759− = lens _mdFlightStartTimeMs
5760− (\ s a -> s{_mdFlightStartTimeMs = a})
6525+mddFlightStartTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
6526+mddFlightStartTimeMs
6527+ = lens _mddFlightStartTimeMs
6528+ (\ s a -> s{_mddFlightStartTimeMs = a})
57616529
57626530-- | The shared targeting visible to buyers and sellers. (updatable)
5763−mdSharedTargetings :: Lens' MarketplaceDeal [Maybe SharedTargeting]
5764−mdSharedTargetings
5765− = lens _mdSharedTargetings
5766− (\ s a -> s{_mdSharedTargetings = a})
6531+mddSharedTargetings :: Lens' MarketplaceDeal [Maybe SharedTargeting]
6532+mddSharedTargetings
6533+ = lens _mddSharedTargetings
6534+ (\ s a -> s{_mddSharedTargetings = a})
57676535 . _Default
57686536 . _Coerce
57696537
57706538-- | A unique deal=id for the deal (readonly).
5771−mdDealId :: Lens' MarketplaceDeal (Maybe Text)
5772−mdDealId = lens _mdDealId (\ s a -> s{_mdDealId = a})
6539+mddDealId :: Lens' MarketplaceDeal (Maybe Text)
6540+mddDealId
6541+ = lens _mddDealId (\ s a -> s{_mddDealId = a})
57736542
57746543-- | Description for the deal terms. (updatable)
5775−mdInventoryDescription :: Lens' MarketplaceDeal (Maybe Text)
5776−mdInventoryDescription
5777− = lens _mdInventoryDescription
5778− (\ s a -> s{_mdInventoryDescription = a})
6544+mddInventoryDescription :: Lens' MarketplaceDeal (Maybe Text)
6545+mddInventoryDescription
6546+ = lens _mddInventoryDescription
6547+ (\ s a -> s{_mddInventoryDescription = a})
57796548
57806549-- | The syndication product associated with the deal. (readonly, except on
57816550-- create)
5782−mdSyndicationProduct :: Lens' MarketplaceDeal (Maybe Text)
5783−mdSyndicationProduct
5784− = lens _mdSyndicationProduct
5785− (\ s a -> s{_mdSyndicationProduct = a})
6551+mddSyndicationProduct :: Lens' MarketplaceDeal (Maybe Text)
6552+mddSyndicationProduct
6553+ = lens _mddSyndicationProduct
6554+ (\ s a -> s{_mddSyndicationProduct = a})
57866555
57876556-- | Proposed flight end time of the deal (ms since epoch) This will
57886557-- generally be stored in a granularity of a second. (updatable)
5789−mdFlightEndTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
5790−mdFlightEndTimeMs
5791− = lens _mdFlightEndTimeMs
5792− (\ s a -> s{_mdFlightEndTimeMs = a})
6558+mddFlightEndTimeMs :: Lens' MarketplaceDeal (Maybe Int64)
6559+mddFlightEndTimeMs
6560+ = lens _mddFlightEndTimeMs
6561+ (\ s a -> s{_mddFlightEndTimeMs = a})
57936562
57946563-- | The name of the deal. (updatable)
5795−mdName :: Lens' MarketplaceDeal (Maybe Text)
5796−mdName = lens _mdName (\ s a -> s{_mdName = a})
6564+mddName :: Lens' MarketplaceDeal (Maybe Text)
6565+mddName = lens _mddName (\ s a -> s{_mddName = a})
57976566
57986567-- | Optional Seller contact information for the deal (buyer-readonly)
5799−mdSellerContacts :: Lens' MarketplaceDeal [Maybe ContactInformation]
5800−mdSellerContacts
5801− = lens _mdSellerContacts
5802− (\ s a -> s{_mdSellerContacts = a})
6568+mddSellerContacts :: Lens' MarketplaceDeal [Maybe ContactInformation]
6569+mddSellerContacts
6570+ = lens _mddSellerContacts
6571+ (\ s a -> s{_mddSellerContacts = a})
58036572 . _Default
58046573 . _Coerce
58056574
58066575-- | The offer-id from which this deal was created. (readonly, except on
58076576-- create)
5808−mdOfferId :: Lens' MarketplaceDeal (Maybe Text)
5809−mdOfferId
5810− = lens _mdOfferId (\ s a -> s{_mdOfferId = a})
6577+mddOfferId :: Lens' MarketplaceDeal (Maybe Text)
6578+mddOfferId
6579+ = lens _mddOfferId (\ s a -> s{_mddOfferId = a})
58116580
5812−mdOrderId :: Lens' MarketplaceDeal (Maybe Text)
5813−mdOrderId
5814− = lens _mdOrderId (\ s a -> s{_mdOrderId = a})
6581+mddOrderId :: Lens' MarketplaceDeal (Maybe Text)
6582+mddOrderId
6583+ = lens _mddOrderId (\ s a -> s{_mddOrderId = a})
58156584
58166585instance FromJSON MarketplaceDeal where
58176586 parseJSON
@@ -5843,27 +6612,73 @@ instance ToJSON MarketplaceDeal where
58436612 toJSON MarketplaceDeal{..}
58446613 = object
58456614 (catMaybes
5846− [("externalDealId" .=) <$> _mdExternalDealId,
5847− ("buyerPrivateData" .=) <$> _mdBuyerPrivateData,
5848− ("webPropertyCode" .=) <$> _mdWebPropertyCode,
5849− ("creationTimeMs" .=) <$> _mdCreationTimeMs,
5850− ("terms" .=) <$> _mdTerms,
6615+ [("externalDealId" .=) <$> _mddExternalDealId,
6616+ ("buyerPrivateData" .=) <$> _mddBuyerPrivateData,
6617+ ("webPropertyCode" .=) <$> _mddWebPropertyCode,
6618+ ("creationTimeMs" .=) <$> _mddCreationTimeMs,
6619+ ("terms" .=) <$> _mddTerms,
58516620 ("offerRevisionNumber" .=) <$>
5852− _mdOfferRevisionNumber,
5853− ("lastUpdateTimeMs" .=) <$> _mdLastUpdateTimeMs,
5854− Just ("kind" .= _mdKind),
5855− ("deliveryControl" .=) <$> _mdDeliveryControl,
5856− ("flightStartTimeMs" .=) <$> _mdFlightStartTimeMs,
5857− ("sharedTargetings" .=) <$> _mdSharedTargetings,
5858− ("dealId" .=) <$> _mdDealId,
6621+ _mddOfferRevisionNumber,
6622+ ("lastUpdateTimeMs" .=) <$> _mddLastUpdateTimeMs,
6623+ Just ("kind" .= _mddKind),
6624+ ("deliveryControl" .=) <$> _mddDeliveryControl,
6625+ ("flightStartTimeMs" .=) <$> _mddFlightStartTimeMs,
6626+ ("sharedTargetings" .=) <$> _mddSharedTargetings,
6627+ ("dealId" .=) <$> _mddDealId,
58596628 ("inventoryDescription" .=) <$>
5860− _mdInventoryDescription,
5861− ("syndicationProduct" .=) <$> _mdSyndicationProduct,
5862− ("flightEndTimeMs" .=) <$> _mdFlightEndTimeMs,
5863− ("name" .=) <$> _mdName,
5864− ("sellerContacts" .=) <$> _mdSellerContacts,
5865− ("offerId" .=) <$> _mdOfferId,
5866− ("orderId" .=) <$> _mdOrderId])
6629+ _mddInventoryDescription,
6630+ ("syndicationProduct" .=) <$> _mddSyndicationProduct,
6631+ ("flightEndTimeMs" .=) <$> _mddFlightEndTimeMs,
6632+ ("name" .=) <$> _mddName,
6633+ ("sellerContacts" .=) <$> _mddSellerContacts,
6634+ ("offerId" .=) <$> _mddOfferId,
6635+ ("orderId" .=) <$> _mddOrderId])
6636+
6637+--
6638+-- /See:/ 'pretargetingConfigPlacements' smart constructor.
6639+data PretargetingConfigPlacements = PretargetingConfigPlacements
6640+ { _pcpToken :: !(Maybe Text)
6641+ , _pcpType :: !(Maybe Text)
6642+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
6643+
6644+-- | Creates a value of 'PretargetingConfigPlacements' with the minimum fields required to make a request.
6645+--
6646+-- Use one of the following lenses to modify other fields as desired:
6647+--
6648+-- * 'pcpToken'
6649+--
6650+-- * 'pcpType'
6651+pretargetingConfigPlacements
6652+ :: PretargetingConfigPlacements
6653+pretargetingConfigPlacements =
6654+ PretargetingConfigPlacements
6655+ { _pcpToken = Nothing
6656+ , _pcpType = Nothing
6657+ }
6658+
6659+-- | The value of the placement. Interpretation depends on the placement
6660+-- type, e.g. URL for a site placement, channel name for a channel
6661+-- placement, app id for a mobile app placement.
6662+pcpToken :: Lens' PretargetingConfigPlacements (Maybe Text)
6663+pcpToken = lens _pcpToken (\ s a -> s{_pcpToken = a})
6664+
6665+-- | The type of the placement.
6666+pcpType :: Lens' PretargetingConfigPlacements (Maybe Text)
6667+pcpType = lens _pcpType (\ s a -> s{_pcpType = a})
6668+
6669+instance FromJSON PretargetingConfigPlacements where
6670+ parseJSON
6671+ = withObject "PretargetingConfigPlacements"
6672+ (\ o ->
6673+ PretargetingConfigPlacements <$>
6674+ (o .:? "token") <*> (o .:? "type"))
6675+
6676+instance ToJSON PretargetingConfigPlacements where
6677+ toJSON PretargetingConfigPlacements{..}
6678+ = object
6679+ (catMaybes
6680+ [("token" .=) <$> _pcpToken,
6681+ ("type" .=) <$> _pcpType])
58676682
58686683--
58696684-- /See:/ 'negotiationRoundDto' smart constructor.
@@ -6161,6 +6976,74 @@ instance ToJSON DealTermsNonGuaranteedAuctionTerms
61616976 _dtngatReservePricePerBuyers,
61626977 ("privateAuctionId" .=) <$> _dtngatPrivateAuctionId])
61636978
6979+--
6980+-- /See:/ 'creativeServingRestrictions' smart constructor.
6981+data CreativeServingRestrictions = CreativeServingRestrictions
6982+ { _csrContexts :: !(Maybe [CreativeServingRestrictionsContexts])
6983+ , _csrReason :: !(Maybe Text)
6984+ , _csrDisapprovalReasons :: !(Maybe [CreativeServingRestrictionsDisapprovalReasons])
6985+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
6986+
6987+-- | Creates a value of 'CreativeServingRestrictions' with the minimum fields required to make a request.
6988+--
6989+-- Use one of the following lenses to modify other fields as desired:
6990+--
6991+-- * 'csrContexts'
6992+--
6993+-- * 'csrReason'
6994+--
6995+-- * 'csrDisapprovalReasons'
6996+creativeServingRestrictions
6997+ :: CreativeServingRestrictions
6998+creativeServingRestrictions =
6999+ CreativeServingRestrictions
7000+ { _csrContexts = Nothing
7001+ , _csrReason = Nothing
7002+ , _csrDisapprovalReasons = Nothing
7003+ }
7004+
7005+-- | All known contexts\/restrictions.
7006+csrContexts :: Lens' CreativeServingRestrictions [CreativeServingRestrictionsContexts]
7007+csrContexts
7008+ = lens _csrContexts (\ s a -> s{_csrContexts = a}) .
7009+ _Default
7010+ . _Coerce
7011+
7012+-- | Why the creative is ineligible to serve in this context (e.g., it has
7013+-- been explicitly disapproved or is pending review).
7014+csrReason :: Lens' CreativeServingRestrictions (Maybe Text)
7015+csrReason
7016+ = lens _csrReason (\ s a -> s{_csrReason = a})
7017+
7018+-- | The reasons for disapproval within this restriction, if any. Note that
7019+-- not all disapproval reasons may be categorized, so it is possible for
7020+-- the creative to have a status of DISAPPROVED or CONDITIONALLY_APPROVED
7021+-- with an empty list for disapproval_reasons. In this case, please reach
7022+-- out to your TAM to help debug the issue.
7023+csrDisapprovalReasons :: Lens' CreativeServingRestrictions [CreativeServingRestrictionsDisapprovalReasons]
7024+csrDisapprovalReasons
7025+ = lens _csrDisapprovalReasons
7026+ (\ s a -> s{_csrDisapprovalReasons = a})
7027+ . _Default
7028+ . _Coerce
7029+
7030+instance FromJSON CreativeServingRestrictions where
7031+ parseJSON
7032+ = withObject "CreativeServingRestrictions"
7033+ (\ o ->
7034+ CreativeServingRestrictions <$>
7035+ (o .:? "contexts" .!= mempty) <*> (o .:? "reason")
7036+ <*> (o .:? "disapprovalReasons" .!= mempty))
7037+
7038+instance ToJSON CreativeServingRestrictions where
7039+ toJSON CreativeServingRestrictions{..}
7040+ = object
7041+ (catMaybes
7042+ [("contexts" .=) <$> _csrContexts,
7043+ ("reason" .=) <$> _csrReason,
7044+ ("disapprovalReasons" .=) <$>
7045+ _csrDisapprovalReasons])
7046+
61647047--
61657048-- /See:/ 'buyer' smart constructor.
61667049newtype Buyer = Buyer
@@ -6427,214 +7310,219 @@ instance ToJSON DealTermsGuaranteedFixedPriceTerms
64277310--
64287311-- /See:/ 'marketplaceOrder' smart constructor.
64297312data MarketplaceOrder = MarketplaceOrder
6430− { _mBuyerPrivateData :: !(Maybe (Maybe PrivateData))
6431− , _mIsSetupComplete :: !(Maybe Bool)
6432− , _mBuyerContacts :: !(Maybe [Maybe ContactInformation])
6433− , _mKind :: !Text
6434− , _mOriginatorRole :: !(Maybe Text)
6435− , _mRevisionNumber :: !(Maybe Int64)
6436− , _mBilledBuyer :: !(Maybe (Maybe Buyer))
6437− , _mIsRenegotiating :: !(Maybe Bool)
6438− , _mHasSellerSignedOff :: !(Maybe Bool)
6439− , _mSeller :: !(Maybe (Maybe Seller))
6440− , _mOrderState :: !(Maybe Text)
6441− , _mName :: !(Maybe Text)
6442− , _mSellerContacts :: !(Maybe [Maybe ContactInformation])
6443− , _mLastUpdaterRole :: !(Maybe Text)
6444− , _mLabels :: !(Maybe [Maybe MarketplaceLabel])
6445− , _mRevisionTimeMs :: !(Maybe Int64)
6446− , _mOrderId :: !(Maybe Text)
6447− , _mLastUpdaterOrCommentorRole :: !(Maybe Text)
6448− , _mHasBuyerSignedOff :: !(Maybe Bool)
6449− , _mBuyer :: !(Maybe (Maybe Buyer))
7313+ { _mooBuyerPrivateData :: !(Maybe (Maybe PrivateData))
7314+ , _mooIsSetupComplete :: !(Maybe Bool)
7315+ , _mooBuyerContacts :: !(Maybe [Maybe ContactInformation])
7316+ , _mooKind :: !Text
7317+ , _mooOriginatorRole :: !(Maybe Text)
7318+ , _mooRevisionNumber :: !(Maybe Int64)
7319+ , _mooBilledBuyer :: !(Maybe (Maybe Buyer))
7320+ , _mooIsRenegotiating :: !(Maybe Bool)
7321+ , _mooHasSellerSignedOff :: !(Maybe Bool)
7322+ , _mooSeller :: !(Maybe (Maybe Seller))
7323+ , _mooOrderState :: !(Maybe Text)
7324+ , _mooName :: !(Maybe Text)
7325+ , _mooSellerContacts :: !(Maybe [Maybe ContactInformation])
7326+ , _mooLastUpdaterRole :: !(Maybe Text)
7327+ , _mooLabels :: !(Maybe [Maybe MarketplaceLabel])
7328+ , _mooRevisionTimeMs :: !(Maybe Int64)
7329+ , _mooOrderId :: !(Maybe Text)
7330+ , _mooLastUpdaterOrCommentorRole :: !(Maybe Text)
7331+ , _mooHasBuyerSignedOff :: !(Maybe Bool)
7332+ , _mooBuyer :: !(Maybe (Maybe Buyer))
64507333 } deriving (Eq,Read,Show,Data,Typeable,Generic)
64517334
64527335-- | Creates a value of 'MarketplaceOrder' with the minimum fields required to make a request.
64537336--
64547337-- Use one of the following lenses to modify other fields as desired:
64557338--
6456−-- * 'mBuyerPrivateData'
7339+-- * 'mooBuyerPrivateData'
64577340--
6458−-- * 'mIsSetupComplete'
7341+-- * 'mooIsSetupComplete'
64597342--
6460−-- * 'mBuyerContacts'
7343+-- * 'mooBuyerContacts'
64617344--
6462−-- * 'mKind'
7345+-- * 'mooKind'
64637346--
6464−-- * 'mOriginatorRole'
7347+-- * 'mooOriginatorRole'
64657348--
6466−-- * 'mRevisionNumber'
7349+-- * 'mooRevisionNumber'
64677350--
6468−-- * 'mBilledBuyer'
7351+-- * 'mooBilledBuyer'
64697352--
6470−-- * 'mIsRenegotiating'
7353+-- * 'mooIsRenegotiating'
64717354--
6472−-- * 'mHasSellerSignedOff'
7355+-- * 'mooHasSellerSignedOff'
64737356--
6474−-- * 'mSeller'
7357+-- * 'mooSeller'
64757358--
6476−-- * 'mOrderState'
7359+-- * 'mooOrderState'
64777360--
6478−-- * 'mName'
7361+-- * 'mooName'
64797362--
6480−-- * 'mSellerContacts'
7363+-- * 'mooSellerContacts'
64817364--
6482−-- * 'mLastUpdaterRole'
7365+-- * 'mooLastUpdaterRole'
64837366--
6484−-- * 'mLabels'
7367+-- * 'mooLabels'
64857368--
6486−-- * 'mRevisionTimeMs'
7369+-- * 'mooRevisionTimeMs'
64877370--
6488−-- * 'mOrderId'
7371+-- * 'mooOrderId'
64897372--
6490−-- * 'mLastUpdaterOrCommentorRole'
7373+-- * 'mooLastUpdaterOrCommentorRole'
64917374--
6492−-- * 'mHasBuyerSignedOff'
7375+-- * 'mooHasBuyerSignedOff'
64937376--
6494−-- * 'mBuyer'
7377+-- * 'mooBuyer'
64957378marketplaceOrder
64967379 :: MarketplaceOrder
64977380marketplaceOrder =
64987381 MarketplaceOrder
6499− { _mBuyerPrivateData = Nothing
6500− , _mIsSetupComplete = Nothing
6501− , _mBuyerContacts = Nothing
6502− , _mKind = "adexchangebuyer#marketplaceOrder"
6503− , _mOriginatorRole = Nothing
6504− , _mRevisionNumber = Nothing
6505− , _mBilledBuyer = Nothing
6506− , _mIsRenegotiating = Nothing
6507− , _mHasSellerSignedOff = Nothing
6508− , _mSeller = Nothing
6509− , _mOrderState = Nothing
6510− , _mName = Nothing
6511− , _mSellerContacts = Nothing
6512− , _mLastUpdaterRole = Nothing
6513− , _mLabels = Nothing
6514− , _mRevisionTimeMs = Nothing
6515− , _mOrderId = Nothing
6516− , _mLastUpdaterOrCommentorRole = Nothing
6517− , _mHasBuyerSignedOff = Nothing
6518− , _mBuyer = Nothing
7382+ { _mooBuyerPrivateData = Nothing
7383+ , _mooIsSetupComplete = Nothing
7384+ , _mooBuyerContacts = Nothing
7385+ , _mooKind = "adexchangebuyer#marketplaceOrder"
7386+ , _mooOriginatorRole = Nothing
7387+ , _mooRevisionNumber = Nothing
7388+ , _mooBilledBuyer = Nothing
7389+ , _mooIsRenegotiating = Nothing
7390+ , _mooHasSellerSignedOff = Nothing
7391+ , _mooSeller = Nothing
7392+ , _mooOrderState = Nothing
7393+ , _mooName = Nothing
7394+ , _mooSellerContacts = Nothing
7395+ , _mooLastUpdaterRole = Nothing
7396+ , _mooLabels = Nothing
7397+ , _mooRevisionTimeMs = Nothing
7398+ , _mooOrderId = Nothing
7399+ , _mooLastUpdaterOrCommentorRole = Nothing
7400+ , _mooHasBuyerSignedOff = Nothing
7401+ , _mooBuyer = Nothing
65197402 }
65207403
65217404-- | Private data for buyer. (hidden from seller).
6522−mBuyerPrivateData :: Lens' MarketplaceOrder (Maybe (Maybe PrivateData))
6523−mBuyerPrivateData
6524− = lens _mBuyerPrivateData
6525− (\ s a -> s{_mBuyerPrivateData = a})
7405+mooBuyerPrivateData :: Lens' MarketplaceOrder (Maybe (Maybe PrivateData))
7406+mooBuyerPrivateData
7407+ = lens _mooBuyerPrivateData
7408+ (\ s a -> s{_mooBuyerPrivateData = a})
65267409
65277410-- | True, if the buyside inventory setup is complete for this order.
65287411-- (readonly)
6529−mIsSetupComplete :: Lens' MarketplaceOrder (Maybe Bool)
6530−mIsSetupComplete
6531− = lens _mIsSetupComplete
6532− (\ s a -> s{_mIsSetupComplete = a})
7412+mooIsSetupComplete :: Lens' MarketplaceOrder (Maybe Bool)
7413+mooIsSetupComplete
7414+ = lens _mooIsSetupComplete
7415+ (\ s a -> s{_mooIsSetupComplete = a})
65337416
65347417-- | Optional contact information fort the buyer. (seller-readonly)
6535−mBuyerContacts :: Lens' MarketplaceOrder [Maybe ContactInformation]
6536−mBuyerContacts
6537− = lens _mBuyerContacts
6538− (\ s a -> s{_mBuyerContacts = a})
7418+mooBuyerContacts :: Lens' MarketplaceOrder [Maybe ContactInformation]
7419+mooBuyerContacts
7420+ = lens _mooBuyerContacts
7421+ (\ s a -> s{_mooBuyerContacts = a})
65397422 . _Default
65407423 . _Coerce
65417424
65427425-- | Identifies what kind of resource this is. Value: the fixed string
65437426-- \"adexchangebuyer#marketplaceOrder\".
6544−mKind :: Lens' MarketplaceOrder Text
6545−mKind = lens _mKind (\ s a -> s{_mKind = a})
7427+mooKind :: Lens' MarketplaceOrder Text
7428+mooKind = lens _mooKind (\ s a -> s{_mooKind = a})
65467429
65477430-- | Indicates whether the buyer\/seller created the offer.(readonly)
6548−mOriginatorRole :: Lens' MarketplaceOrder (Maybe Text)
6549−mOriginatorRole
6550− = lens _mOriginatorRole
6551− (\ s a -> s{_mOriginatorRole = a})
7431+mooOriginatorRole :: Lens' MarketplaceOrder (Maybe Text)
7432+mooOriginatorRole
7433+ = lens _mooOriginatorRole
7434+ (\ s a -> s{_mooOriginatorRole = a})
65527435
65537436-- | The revision number for the order (readonly).
6554−mRevisionNumber :: Lens' MarketplaceOrder (Maybe Int64)
6555−mRevisionNumber
6556− = lens _mRevisionNumber
6557− (\ s a -> s{_mRevisionNumber = a})
7437+mooRevisionNumber :: Lens' MarketplaceOrder (Maybe Int64)
7438+mooRevisionNumber
7439+ = lens _mooRevisionNumber
7440+ (\ s a -> s{_mooRevisionNumber = a})
65587441
65597442-- | Reference to the buyer that will get billed for this order. (readonly)
6560−mBilledBuyer :: Lens' MarketplaceOrder (Maybe (Maybe Buyer))
6561−mBilledBuyer
6562− = lens _mBilledBuyer (\ s a -> s{_mBilledBuyer = a})
7443+mooBilledBuyer :: Lens' MarketplaceOrder (Maybe (Maybe Buyer))
7444+mooBilledBuyer
7445+ = lens _mooBilledBuyer
7446+ (\ s a -> s{_mooBilledBuyer = a})
65637447
65647448-- | True if the order is being renegotiated (readonly).
6565−mIsRenegotiating :: Lens' MarketplaceOrder (Maybe Bool)
6566−mIsRenegotiating
6567− = lens _mIsRenegotiating
6568− (\ s a -> s{_mIsRenegotiating = a})
7449+mooIsRenegotiating :: Lens' MarketplaceOrder (Maybe Bool)
7450+mooIsRenegotiating
7451+ = lens _mooIsRenegotiating
7452+ (\ s a -> s{_mooIsRenegotiating = a})
65697453
65707454-- | When an order is in an accepted state, indicates whether the buyer has
65717455-- signed off Once both sides have signed off on a deal, the order can be
65727456-- finalized by the seller. (buyer-readonly)
6573−mHasSellerSignedOff :: Lens' MarketplaceOrder (Maybe Bool)
6574−mHasSellerSignedOff
6575− = lens _mHasSellerSignedOff
6576− (\ s a -> s{_mHasSellerSignedOff = a})
7457+mooHasSellerSignedOff :: Lens' MarketplaceOrder (Maybe Bool)
7458+mooHasSellerSignedOff
7459+ = lens _mooHasSellerSignedOff
7460+ (\ s a -> s{_mooHasSellerSignedOff = a})
65777461
65787462-- | Reference to the seller on the order. (readonly, except on create)
6579−mSeller :: Lens' MarketplaceOrder (Maybe (Maybe Seller))
6580−mSeller = lens _mSeller (\ s a -> s{_mSeller = a})
7463+mooSeller :: Lens' MarketplaceOrder (Maybe (Maybe Seller))
7464+mooSeller
7465+ = lens _mooSeller (\ s a -> s{_mooSeller = a})
65817466
65827467-- | The current state of the order. (readonly)
6583−mOrderState :: Lens' MarketplaceOrder (Maybe Text)
6584−mOrderState
6585− = lens _mOrderState (\ s a -> s{_mOrderState = a})
7468+mooOrderState :: Lens' MarketplaceOrder (Maybe Text)
7469+mooOrderState
7470+ = lens _mooOrderState
7471+ (\ s a -> s{_mooOrderState = a})
65867472
65877473-- | The name for the order (updatable)
6588−mName :: Lens' MarketplaceOrder (Maybe Text)
6589−mName = lens _mName (\ s a -> s{_mName = a})
7474+mooName :: Lens' MarketplaceOrder (Maybe Text)
7475+mooName = lens _mooName (\ s a -> s{_mooName = a})
65907476
65917477-- | Optional contact information for the seller (buyer-readonly).
6592−mSellerContacts :: Lens' MarketplaceOrder [Maybe ContactInformation]
6593−mSellerContacts
6594− = lens _mSellerContacts
6595− (\ s a -> s{_mSellerContacts = a})
7478+mooSellerContacts :: Lens' MarketplaceOrder [Maybe ContactInformation]
7479+mooSellerContacts
7480+ = lens _mooSellerContacts
7481+ (\ s a -> s{_mooSellerContacts = a})
65967482 . _Default
65977483 . _Coerce
65987484
6599−mLastUpdaterRole :: Lens' MarketplaceOrder (Maybe Text)
6600−mLastUpdaterRole
6601− = lens _mLastUpdaterRole
6602− (\ s a -> s{_mLastUpdaterRole = a})
7485+mooLastUpdaterRole :: Lens' MarketplaceOrder (Maybe Text)
7486+mooLastUpdaterRole
7487+ = lens _mooLastUpdaterRole
7488+ (\ s a -> s{_mooLastUpdaterRole = a})
66037489
66047490-- | List of labels associated with the order. (readonly)
6605−mLabels :: Lens' MarketplaceOrder [Maybe MarketplaceLabel]
6606−mLabels
6607− = lens _mLabels (\ s a -> s{_mLabels = a}) . _Default
7491+mooLabels :: Lens' MarketplaceOrder [Maybe MarketplaceLabel]
7492+mooLabels
7493+ = lens _mooLabels (\ s a -> s{_mooLabels = a}) .
7494+ _Default
66087495 . _Coerce
66097496
66107497-- | The time (ms since epoch) when the order was last revised (readonly).
6611−mRevisionTimeMs :: Lens' MarketplaceOrder (Maybe Int64)
6612−mRevisionTimeMs
6613− = lens _mRevisionTimeMs
6614− (\ s a -> s{_mRevisionTimeMs = a})
7498+mooRevisionTimeMs :: Lens' MarketplaceOrder (Maybe Int64)
7499+mooRevisionTimeMs
7500+ = lens _mooRevisionTimeMs
7501+ (\ s a -> s{_mooRevisionTimeMs = a})
66157502
66167503-- | The unique id of the order. (readonly).
6617−mOrderId :: Lens' MarketplaceOrder (Maybe Text)
6618−mOrderId = lens _mOrderId (\ s a -> s{_mOrderId = a})
7504+mooOrderId :: Lens' MarketplaceOrder (Maybe Text)
7505+mooOrderId
7506+ = lens _mooOrderId (\ s a -> s{_mooOrderId = a})
66197507
66207508-- | The role of the last user that either updated the order or left a
66217509-- comment. (readonly)
6622−mLastUpdaterOrCommentorRole :: Lens' MarketplaceOrder (Maybe Text)
6623−mLastUpdaterOrCommentorRole
6624− = lens _mLastUpdaterOrCommentorRole
6625− (\ s a -> s{_mLastUpdaterOrCommentorRole = a})
7510+mooLastUpdaterOrCommentorRole :: Lens' MarketplaceOrder (Maybe Text)
7511+mooLastUpdaterOrCommentorRole
7512+ = lens _mooLastUpdaterOrCommentorRole
7513+ (\ s a -> s{_mooLastUpdaterOrCommentorRole = a})
66267514
66277515-- | When an order is in an accepted state, indicates whether the buyer has
66287516-- signed off Once both sides have signed off on a deal, the order can be
66297517-- finalized by the seller. (seller-readonly)
6630−mHasBuyerSignedOff :: Lens' MarketplaceOrder (Maybe Bool)
6631−mHasBuyerSignedOff
6632− = lens _mHasBuyerSignedOff
6633− (\ s a -> s{_mHasBuyerSignedOff = a})
7518+mooHasBuyerSignedOff :: Lens' MarketplaceOrder (Maybe Bool)
7519+mooHasBuyerSignedOff
7520+ = lens _mooHasBuyerSignedOff
7521+ (\ s a -> s{_mooHasBuyerSignedOff = a})
66347522
66357523-- | Reference to the buyer on the order. (readonly, except on create)
6636−mBuyer :: Lens' MarketplaceOrder (Maybe (Maybe Buyer))
6637−mBuyer = lens _mBuyer (\ s a -> s{_mBuyer = a})
7524+mooBuyer :: Lens' MarketplaceOrder (Maybe (Maybe Buyer))
7525+mooBuyer = lens _mooBuyer (\ s a -> s{_mooBuyer = a})
66387526
66397527instance FromJSON MarketplaceOrder where
66407528 parseJSON
@@ -6667,27 +7555,27 @@ instance ToJSON MarketplaceOrder where
66677555 toJSON MarketplaceOrder{..}
66687556 = object
66697557 (catMaybes
6670− [("buyerPrivateData" .=) <$> _mBuyerPrivateData,
6671− ("isSetupComplete" .=) <$> _mIsSetupComplete,
6672− ("buyerContacts" .=) <$> _mBuyerContacts,
6673− Just ("kind" .= _mKind),
6674− ("originatorRole" .=) <$> _mOriginatorRole,
6675− ("revisionNumber" .=) <$> _mRevisionNumber,
6676− ("billedBuyer" .=) <$> _mBilledBuyer,
6677− ("isRenegotiating" .=) <$> _mIsRenegotiating,
6678− ("hasSellerSignedOff" .=) <$> _mHasSellerSignedOff,
6679− ("seller" .=) <$> _mSeller,
6680− ("orderState" .=) <$> _mOrderState,
6681− ("name" .=) <$> _mName,
6682− ("sellerContacts" .=) <$> _mSellerContacts,
6683− ("lastUpdaterRole" .=) <$> _mLastUpdaterRole,
6684− ("labels" .=) <$> _mLabels,
6685− ("revisionTimeMs" .=) <$> _mRevisionTimeMs,
6686− ("orderId" .=) <$> _mOrderId,
7558+ [("buyerPrivateData" .=) <$> _mooBuyerPrivateData,
7559+ ("isSetupComplete" .=) <$> _mooIsSetupComplete,
7560+ ("buyerContacts" .=) <$> _mooBuyerContacts,
7561+ Just ("kind" .= _mooKind),
7562+ ("originatorRole" .=) <$> _mooOriginatorRole,
7563+ ("revisionNumber" .=) <$> _mooRevisionNumber,
7564+ ("billedBuyer" .=) <$> _mooBilledBuyer,
7565+ ("isRenegotiating" .=) <$> _mooIsRenegotiating,
7566+ ("hasSellerSignedOff" .=) <$> _mooHasSellerSignedOff,
7567+ ("seller" .=) <$> _mooSeller,
7568+ ("orderState" .=) <$> _mooOrderState,
7569+ ("name" .=) <$> _mooName,
7570+ ("sellerContacts" .=) <$> _mooSellerContacts,
7571+ ("lastUpdaterRole" .=) <$> _mooLastUpdaterRole,
7572+ ("labels" .=) <$> _mooLabels,
7573+ ("revisionTimeMs" .=) <$> _mooRevisionTimeMs,
7574+ ("orderId" .=) <$> _mooOrderId,
66877575 ("lastUpdaterOrCommentorRole" .=) <$>
6688− _mLastUpdaterOrCommentorRole,
6689− ("hasBuyerSignedOff" .=) <$> _mHasBuyerSignedOff,
6690− ("buyer" .=) <$> _mBuyer])
7576+ _mooLastUpdaterOrCommentorRole,
7577+ ("hasBuyerSignedOff" .=) <$> _mooHasBuyerSignedOff,
7578+ ("buyer" .=) <$> _mooBuyer])
66917579
66927580--
66937581-- /See:/ 'addOrderDealsRequest' smart constructor.
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs+184
@@ -16,3 +16,187 @@
1616module Network.Google.AdExchangeBuyer.Types.Sum where
1717
1818import Network.Google.Prelude
19+
20+-- | The proposed action to take on the order.
21+data AdexchangebuyerMarketplaceordersUpdateUpdateAction
22+ = Accept
23+ -- ^ @accept@
24+ | Cancel
25+ -- ^ @cancel@
26+ | Propose
27+ -- ^ @propose@
28+ | UnknownAction
29+ -- ^ @unknownAction@
30+ | UpdateFinalized
31+ -- ^ @updateFinalized@
32+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
33+
34+instance Hashable AdexchangebuyerMarketplaceordersUpdateUpdateAction
35+
36+instance FromText AdexchangebuyerMarketplaceordersUpdateUpdateAction where
37+ fromText = \case
38+ "accept" -> Just Accept
39+ "cancel" -> Just Cancel
40+ "propose" -> Just Propose
41+ "unknownAction" -> Just UnknownAction
42+ "updateFinalized" -> Just UpdateFinalized
43+ _ -> Nothing
44+
45+instance ToText AdexchangebuyerMarketplaceordersUpdateUpdateAction where
46+ toText = \case
47+ Accept -> "accept"
48+ Cancel -> "cancel"
49+ Propose -> "propose"
50+ UnknownAction -> "unknownAction"
51+ UpdateFinalized -> "updateFinalized"
52+
53+instance FromJSON AdexchangebuyerMarketplaceordersUpdateUpdateAction where
54+ parseJSON = parseJSONText "AdexchangebuyerMarketplaceordersUpdateUpdateAction"
55+
56+instance ToJSON AdexchangebuyerMarketplaceordersUpdateUpdateAction where
57+ toJSON = toJSONText
58+
59+-- | When specified, only creatives having the given open auction status are
60+-- returned.
61+data AdexchangebuyerCreativesListOpenAuctionStatusFilter
62+ = Approved
63+ -- ^ @approved@
64+ -- Creatives which have been approved for serving on the open auction.
65+ | ConditionallyApproved
66+ -- ^ @conditionally_approved@
67+ -- Creatives which have been conditionally approved for serving on the open
68+ -- auction.
69+ | Disapproved
70+ -- ^ @disapproved@
71+ -- Creatives which have been disapproved for serving on the open auction.
72+ | NotChecked
73+ -- ^ @not_checked@
74+ -- Creatives whose open auction status is not yet checked.
75+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
76+
77+instance Hashable AdexchangebuyerCreativesListOpenAuctionStatusFilter
78+
79+instance FromText AdexchangebuyerCreativesListOpenAuctionStatusFilter where
80+ fromText = \case
81+ "approved" -> Just Approved
82+ "conditionally_approved" -> Just ConditionallyApproved
83+ "disapproved" -> Just Disapproved
84+ "not_checked" -> Just NotChecked
85+ _ -> Nothing
86+
87+instance ToText AdexchangebuyerCreativesListOpenAuctionStatusFilter where
88+ toText = \case
89+ Approved -> "approved"
90+ ConditionallyApproved -> "conditionally_approved"
91+ Disapproved -> "disapproved"
92+ NotChecked -> "not_checked"
93+
94+instance FromJSON AdexchangebuyerCreativesListOpenAuctionStatusFilter where
95+ parseJSON = parseJSONText "AdexchangebuyerCreativesListOpenAuctionStatusFilter"
96+
97+instance ToJSON AdexchangebuyerCreativesListOpenAuctionStatusFilter where
98+ toJSON = toJSONText
99+
100+-- | The proposed action to take on the order.
101+data AdexchangebuyerMarketplaceordersPatchUpdateAction
102+ = AMPUAAccept
103+ -- ^ @accept@
104+ | AMPUACancel
105+ -- ^ @cancel@
106+ | AMPUAPropose
107+ -- ^ @propose@
108+ | AMPUAUnknownAction
109+ -- ^ @unknownAction@
110+ | AMPUAUpdateFinalized
111+ -- ^ @updateFinalized@
112+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
113+
114+instance Hashable AdexchangebuyerMarketplaceordersPatchUpdateAction
115+
116+instance FromText AdexchangebuyerMarketplaceordersPatchUpdateAction where
117+ fromText = \case
118+ "accept" -> Just AMPUAAccept
119+ "cancel" -> Just AMPUACancel
120+ "propose" -> Just AMPUAPropose
121+ "unknownAction" -> Just AMPUAUnknownAction
122+ "updateFinalized" -> Just AMPUAUpdateFinalized
123+ _ -> Nothing
124+
125+instance ToText AdexchangebuyerMarketplaceordersPatchUpdateAction where
126+ toText = \case
127+ AMPUAAccept -> "accept"
128+ AMPUACancel -> "cancel"
129+ AMPUAPropose -> "propose"
130+ AMPUAUnknownAction -> "unknownAction"
131+ AMPUAUpdateFinalized -> "updateFinalized"
132+
133+instance FromJSON AdexchangebuyerMarketplaceordersPatchUpdateAction where
134+ parseJSON = parseJSONText "AdexchangebuyerMarketplaceordersPatchUpdateAction"
135+
136+instance ToJSON AdexchangebuyerMarketplaceordersPatchUpdateAction where
137+ toJSON = toJSONText
138+
139+-- | When specified, only creatives having the given direct deals status are
140+-- returned.
141+data AdexchangebuyerCreativesListDealsStatusFilter
142+ = ACLDSFApproved
143+ -- ^ @approved@
144+ -- Creatives which have been approved for serving on direct deals.
145+ | ACLDSFConditionallyApproved
146+ -- ^ @conditionally_approved@
147+ -- Creatives which have been conditionally approved for serving on direct
148+ -- deals.
149+ | ACLDSFDisapproved
150+ -- ^ @disapproved@
151+ -- Creatives which have been disapproved for serving on direct deals.
152+ | ACLDSFNotChecked
153+ -- ^ @not_checked@
154+ -- Creatives whose direct deals status is not yet checked.
155+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
156+
157+instance Hashable AdexchangebuyerCreativesListDealsStatusFilter
158+
159+instance FromText AdexchangebuyerCreativesListDealsStatusFilter where
160+ fromText = \case
161+ "approved" -> Just ACLDSFApproved
162+ "conditionally_approved" -> Just ACLDSFConditionallyApproved
163+ "disapproved" -> Just ACLDSFDisapproved
164+ "not_checked" -> Just ACLDSFNotChecked
165+ _ -> Nothing
166+
167+instance ToText AdexchangebuyerCreativesListDealsStatusFilter where
168+ toText = \case
169+ ACLDSFApproved -> "approved"
170+ ACLDSFConditionallyApproved -> "conditionally_approved"
171+ ACLDSFDisapproved -> "disapproved"
172+ ACLDSFNotChecked -> "not_checked"
173+
174+instance FromJSON AdexchangebuyerCreativesListDealsStatusFilter where
175+ parseJSON = parseJSONText "AdexchangebuyerCreativesListDealsStatusFilter"
176+
177+instance ToJSON AdexchangebuyerCreativesListDealsStatusFilter where
178+ toJSON = toJSONText
179+
180+-- | Data format for the response.
181+data Alt
182+ = JSON
183+ -- ^ @json@
184+ -- Responses with Content-Type of application\/json
185+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
186+
187+instance Hashable Alt
188+
189+instance FromText Alt where
190+ fromText = \case
191+ "json" -> Just JSON
192+ _ -> Nothing
193+
194+instance ToText Alt where
195+ toText = \case
196+ JSON -> "json"
197+
198+instance FromJSON Alt where
199+ parseJSON = parseJSONText "Alt"
200+
201+instance ToJSON Alt where
202+ toJSON = toJSONText
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Get.hs+32−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets one account by ID.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerAccountsGet@.
22−module AdExchangeBuyer.Accounts.Get
23+module Network.Google.Resource.AdExchangeBuyer.Accounts.Get
2324 (
2425 -- * REST Resource
25− AccountsGetAPI
26+ AccountsGetResource
2627
2728 -- * Creating a Request
28− , accountsGet
29− , AccountsGet
29+ , accountsGet'
30+ , AccountsGet'
3031
3132 -- * Request Lenses
3233 , agQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerAccountsGet@ which the
46−-- 'AccountsGet' request conforms to.
47−type AccountsGetAPI =
47+-- 'AccountsGet'' request conforms to.
48+type AccountsGetResource =
4849 "accounts" :>
49− Capture "id" Int32 :> Get '[JSON] Account
50+ Capture "id" Int32 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] Account
5058
5159-- | Gets one account by ID.
5260--
53−-- /See:/ 'accountsGet' smart constructor.
54−data AccountsGet = AccountsGet
61+-- /See:/ 'accountsGet'' smart constructor.
62+data AccountsGet' = AccountsGet'
5563 { _agQuotaUser :: !(Maybe Text)
5664 , _agPrettyPrint :: !Bool
5765 , _agUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data AccountsGet = AccountsGet
5967 , _agId :: !Int32
6068 , _agOauthToken :: !(Maybe Text)
6169 , _agFields :: !(Maybe Text)
62− , _agAlt :: !Text
70+ , _agAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'AccountsGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data AccountsGet = AccountsGet
8189-- * 'agFields'
8290--
8391-- * 'agAlt'
84−accountsGet
92+accountsGet'
8593 :: Int32 -- ^ 'id'
86− -> AccountsGet
87−accountsGet pAgId_ =
88− AccountsGet
94+ -> AccountsGet'
95+accountsGet' pAgId_ =
96+ AccountsGet'
8997 { _agQuotaUser = Nothing
9098 , _agPrettyPrint = True
9199 , _agUserIp = Nothing
@@ -93,7 +101,7 @@ accountsGet pAgId_ =
93101 , _agId = pAgId_
94102 , _agOauthToken = Nothing
95103 , _agFields = Nothing
96− , _agAlt = "json"
104+ , _agAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -134,17 +142,21 @@ agFields :: Lens' AccountsGet' (Maybe Text)
134142agFields = lens _agFields (\ s a -> s{_agFields = a})
135143
136144-- | Data format for the response.
137−agAlt :: Lens' AccountsGet' Text
145+agAlt :: Lens' AccountsGet' Alt
138146agAlt = lens _agAlt (\ s a -> s{_agAlt = a})
139147
140148instance GoogleRequest AccountsGet' where
141149 type Rs AccountsGet' = Account
142150 request = requestWithRoute defReq adExchangeBuyerURL
143− requestWithRoute r u AccountsGet{..}
144− = go _agQuotaUser _agPrettyPrint _agUserIp _agKey
151+ requestWithRoute r u AccountsGet'{..}
152+ = go _agQuotaUser (Just _agPrettyPrint) _agUserIp
153+ _agKey
145154 _agId
146155 _agOauthToken
147156 _agFields
148− _agAlt
157+ (Just _agAlt)
149158 where go
150− = clientWithRoute (Proxy :: Proxy AccountsGetAPI) r u
159+ = clientWithRoute
160+ (Proxy :: Proxy AccountsGetResource)
161+ r
162+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/List.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves the authenticated user\'s list of accounts.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerAccountsList@.
22−module AdExchangeBuyer.Accounts.List
23+module Network.Google.Resource.AdExchangeBuyer.Accounts.List
2324 (
2425 -- * REST Resource
25− AccountsListAPI
26+ AccountsListResource
2627
2728 -- * Creating a Request
28− , accountsList
29− , AccountsList
29+ , accountsList'
30+ , AccountsList'
3031
3132 -- * Request Lenses
3233 , alQuotaUser
@@ -42,21 +43,28 @@ import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerAccountsList@ which the
45−-- 'AccountsList' request conforms to.
46−type AccountsListAPI =
47− "accounts" :> Get '[JSON] AccountsList
46+-- 'AccountsList'' request conforms to.
47+type AccountsListResource =
48+ "accounts" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Get '[JSON] AccountsList
4856
4957-- | Retrieves the authenticated user\'s list of accounts.
5058--
51−-- /See:/ 'accountsList' smart constructor.
52−data AccountsList = AccountsList
59+-- /See:/ 'accountsList'' smart constructor.
60+data AccountsList' = AccountsList'
5361 { _alQuotaUser :: !(Maybe Text)
5462 , _alPrettyPrint :: !Bool
5563 , _alUserIp :: !(Maybe Text)
5664 , _alKey :: !(Maybe Text)
5765 , _alOauthToken :: !(Maybe Text)
5866 , _alFields :: !(Maybe Text)
59− , _alAlt :: !Text
67+ , _alAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'AccountsList'' with the minimum fields required to make a request.
@@ -76,17 +84,17 @@ data AccountsList = AccountsList
7684-- * 'alFields'
7785--
7886-- * 'alAlt'
79−accountsList
80− :: AccountsList
81−accountsList =
82− AccountsList
87+accountsList'
88+ :: AccountsList'
89+accountsList' =
90+ AccountsList'
8391 { _alQuotaUser = Nothing
8492 , _alPrettyPrint = True
8593 , _alUserIp = Nothing
8694 , _alKey = Nothing
8795 , _alOauthToken = Nothing
8896 , _alFields = Nothing
89− , _alAlt = "json"
97+ , _alAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
@@ -123,17 +131,20 @@ alFields :: Lens' AccountsList' (Maybe Text)
123131alFields = lens _alFields (\ s a -> s{_alFields = a})
124132
125133-- | Data format for the response.
126−alAlt :: Lens' AccountsList' Text
134+alAlt :: Lens' AccountsList' Alt
127135alAlt = lens _alAlt (\ s a -> s{_alAlt = a})
128136
129137instance GoogleRequest AccountsList' where
130138 type Rs AccountsList' = AccountsList
131139 request = requestWithRoute defReq adExchangeBuyerURL
132− requestWithRoute r u AccountsList{..}
133− = go _alQuotaUser _alPrettyPrint _alUserIp _alKey
140+ requestWithRoute r u AccountsList'{..}
141+ = go _alQuotaUser (Just _alPrettyPrint) _alUserIp
142+ _alKey
134143 _alOauthToken
135144 _alFields
136− _alAlt
145+ (Just _alAlt)
137146 where go
138− = clientWithRoute (Proxy :: Proxy AccountsListAPI) r
147+ = clientWithRoute
148+ (Proxy :: Proxy AccountsListResource)
149+ r
139150 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Patch.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Updates an existing account. This method supports patch semantics.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerAccountsPatch@.
22−module AdExchangeBuyer.Accounts.Patch
23+module Network.Google.Resource.AdExchangeBuyer.Accounts.Patch
2324 (
2425 -- * REST Resource
25− AccountsPatchAPI
26+ AccountsPatchResource
2627
2728 -- * Creating a Request
28− , accountsPatch
29− , AccountsPatch
29+ , accountsPatch'
30+ , AccountsPatch'
3031
3132 -- * Request Lenses
3233 , apQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerAccountsPatch@ which the
46−-- 'AccountsPatch' request conforms to.
47−type AccountsPatchAPI =
47+-- 'AccountsPatch'' request conforms to.
48+type AccountsPatchResource =
4849 "accounts" :>
49− Capture "id" Int32 :> Patch '[JSON] Account
50+ Capture "id" Int32 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Patch '[JSON] Account
5058
5159-- | Updates an existing account. This method supports patch semantics.
5260--
53−-- /See:/ 'accountsPatch' smart constructor.
54−data AccountsPatch = AccountsPatch
61+-- /See:/ 'accountsPatch'' smart constructor.
62+data AccountsPatch' = AccountsPatch'
5563 { _apQuotaUser :: !(Maybe Text)
5664 , _apPrettyPrint :: !Bool
5765 , _apUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data AccountsPatch = AccountsPatch
5967 , _apId :: !Int32
6068 , _apOauthToken :: !(Maybe Text)
6169 , _apFields :: !(Maybe Text)
62− , _apAlt :: !Text
70+ , _apAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'AccountsPatch'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data AccountsPatch = AccountsPatch
8189-- * 'apFields'
8290--
8391-- * 'apAlt'
84−accountsPatch
92+accountsPatch'
8593 :: Int32 -- ^ 'id'
86− -> AccountsPatch
87−accountsPatch pApId_ =
88− AccountsPatch
94+ -> AccountsPatch'
95+accountsPatch' pApId_ =
96+ AccountsPatch'
8997 { _apQuotaUser = Nothing
9098 , _apPrettyPrint = True
9199 , _apUserIp = Nothing
@@ -93,7 +101,7 @@ accountsPatch pApId_ =
93101 , _apId = pApId_
94102 , _apOauthToken = Nothing
95103 , _apFields = Nothing
96− , _apAlt = "json"
104+ , _apAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -134,18 +142,21 @@ apFields :: Lens' AccountsPatch' (Maybe Text)
134142apFields = lens _apFields (\ s a -> s{_apFields = a})
135143
136144-- | Data format for the response.
137−apAlt :: Lens' AccountsPatch' Text
145+apAlt :: Lens' AccountsPatch' Alt
138146apAlt = lens _apAlt (\ s a -> s{_apAlt = a})
139147
140148instance GoogleRequest AccountsPatch' where
141149 type Rs AccountsPatch' = Account
142150 request = requestWithRoute defReq adExchangeBuyerURL
143− requestWithRoute r u AccountsPatch{..}
144− = go _apQuotaUser _apPrettyPrint _apUserIp _apKey
151+ requestWithRoute r u AccountsPatch'{..}
152+ = go _apQuotaUser (Just _apPrettyPrint) _apUserIp
153+ _apKey
145154 _apId
146155 _apOauthToken
147156 _apFields
148− _apAlt
157+ (Just _apAlt)
149158 where go
150− = clientWithRoute (Proxy :: Proxy AccountsPatchAPI) r
159+ = clientWithRoute
160+ (Proxy :: Proxy AccountsPatchResource)
161+ r
151162 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Accounts/Update.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Updates an existing account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerAccountsUpdate@.
22−module AdExchangeBuyer.Accounts.Update
23+module Network.Google.Resource.AdExchangeBuyer.Accounts.Update
2324 (
2425 -- * REST Resource
25− AccountsUpdateAPI
26+ AccountsUpdateResource
2627
2728 -- * Creating a Request
28− , accountsUpdate
29− , AccountsUpdate
29+ , accountsUpdate'
30+ , AccountsUpdate'
3031
3132 -- * Request Lenses
3233 , auQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerAccountsUpdate@ which the
46−-- 'AccountsUpdate' request conforms to.
47−type AccountsUpdateAPI =
47+-- 'AccountsUpdate'' request conforms to.
48+type AccountsUpdateResource =
4849 "accounts" :>
49− Capture "id" Int32 :> Put '[JSON] Account
50+ Capture "id" Int32 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Put '[JSON] Account
5058
5159-- | Updates an existing account.
5260--
53−-- /See:/ 'accountsUpdate' smart constructor.
54−data AccountsUpdate = AccountsUpdate
61+-- /See:/ 'accountsUpdate'' smart constructor.
62+data AccountsUpdate' = AccountsUpdate'
5563 { _auQuotaUser :: !(Maybe Text)
5664 , _auPrettyPrint :: !Bool
5765 , _auUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data AccountsUpdate = AccountsUpdate
5967 , _auId :: !Int32
6068 , _auOauthToken :: !(Maybe Text)
6169 , _auFields :: !(Maybe Text)
62− , _auAlt :: !Text
70+ , _auAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'AccountsUpdate'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data AccountsUpdate = AccountsUpdate
8189-- * 'auFields'
8290--
8391-- * 'auAlt'
84−accountsUpdate
92+accountsUpdate'
8593 :: Int32 -- ^ 'id'
86− -> AccountsUpdate
87−accountsUpdate pAuId_ =
88− AccountsUpdate
94+ -> AccountsUpdate'
95+accountsUpdate' pAuId_ =
96+ AccountsUpdate'
8997 { _auQuotaUser = Nothing
9098 , _auPrettyPrint = True
9199 , _auUserIp = Nothing
@@ -93,7 +101,7 @@ accountsUpdate pAuId_ =
93101 , _auId = pAuId_
94102 , _auOauthToken = Nothing
95103 , _auFields = Nothing
96− , _auAlt = "json"
104+ , _auAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -134,19 +142,21 @@ auFields :: Lens' AccountsUpdate' (Maybe Text)
134142auFields = lens _auFields (\ s a -> s{_auFields = a})
135143
136144-- | Data format for the response.
137−auAlt :: Lens' AccountsUpdate' Text
145+auAlt :: Lens' AccountsUpdate' Alt
138146auAlt = lens _auAlt (\ s a -> s{_auAlt = a})
139147
140148instance GoogleRequest AccountsUpdate' where
141149 type Rs AccountsUpdate' = Account
142150 request = requestWithRoute defReq adExchangeBuyerURL
143− requestWithRoute r u AccountsUpdate{..}
144− = go _auQuotaUser _auPrettyPrint _auUserIp _auKey
151+ requestWithRoute r u AccountsUpdate'{..}
152+ = go _auQuotaUser (Just _auPrettyPrint) _auUserIp
153+ _auKey
145154 _auId
146155 _auOauthToken
147156 _auFields
148− _auAlt
157+ (Just _auAlt)
149158 where go
150− = clientWithRoute (Proxy :: Proxy AccountsUpdateAPI)
159+ = clientWithRoute
160+ (Proxy :: Proxy AccountsUpdateResource)
151161 r
152162 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/Get.hs+29−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Returns the billing information for one account specified by account ID.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerBillingInfoGet@.
22−module AdExchangeBuyer.BillingInfo.Get
23+module Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get
2324 (
2425 -- * REST Resource
25− BillingInfoGetAPI
26+ BillingInfoGetResource
2627
2728 -- * Creating a Request
28− , billingInfoGet
29− , BillingInfoGet
29+ , billingInfoGet'
30+ , BillingInfoGet'
3031
3132 -- * Request Lenses
3233 , bigQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerBillingInfoGet@ which the
46−-- 'BillingInfoGet' request conforms to.
47−type BillingInfoGetAPI =
47+-- 'BillingInfoGet'' request conforms to.
48+type BillingInfoGetResource =
4849 "billinginfo" :>
49− Capture "accountId" Int32 :> Get '[JSON] BillingInfo
50+ Capture "accountId" Int32 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] BillingInfo
5058
5159-- | Returns the billing information for one account specified by account ID.
5260--
53−-- /See:/ 'billingInfoGet' smart constructor.
54−data BillingInfoGet = BillingInfoGet
61+-- /See:/ 'billingInfoGet'' smart constructor.
62+data BillingInfoGet' = BillingInfoGet'
5563 { _bigQuotaUser :: !(Maybe Text)
5664 , _bigPrettyPrint :: !Bool
5765 , _bigUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data BillingInfoGet = BillingInfoGet
5967 , _bigKey :: !(Maybe Text)
6068 , _bigOauthToken :: !(Maybe Text)
6169 , _bigFields :: !(Maybe Text)
62− , _bigAlt :: !Text
70+ , _bigAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'BillingInfoGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data BillingInfoGet = BillingInfoGet
8189-- * 'bigFields'
8290--
8391-- * 'bigAlt'
84−billingInfoGet
92+billingInfoGet'
8593 :: Int32 -- ^ 'accountId'
86− -> BillingInfoGet
87−billingInfoGet pBigAccountId_ =
88− BillingInfoGet
94+ -> BillingInfoGet'
95+billingInfoGet' pBigAccountId_ =
96+ BillingInfoGet'
8997 { _bigQuotaUser = Nothing
9098 , _bigPrettyPrint = True
9199 , _bigUserIp = Nothing
@@ -93,7 +101,7 @@ billingInfoGet pBigAccountId_ =
93101 , _bigKey = Nothing
94102 , _bigOauthToken = Nothing
95103 , _bigFields = Nothing
96− , _bigAlt = "json"
104+ , _bigAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -138,20 +146,21 @@ bigFields
138146 = lens _bigFields (\ s a -> s{_bigFields = a})
139147
140148-- | Data format for the response.
141−bigAlt :: Lens' BillingInfoGet' Text
149+bigAlt :: Lens' BillingInfoGet' Alt
142150bigAlt = lens _bigAlt (\ s a -> s{_bigAlt = a})
143151
144152instance GoogleRequest BillingInfoGet' where
145153 type Rs BillingInfoGet' = BillingInfo
146154 request = requestWithRoute defReq adExchangeBuyerURL
147− requestWithRoute r u BillingInfoGet{..}
148− = go _bigQuotaUser _bigPrettyPrint _bigUserIp
155+ requestWithRoute r u BillingInfoGet'{..}
156+ = go _bigQuotaUser (Just _bigPrettyPrint) _bigUserIp
149157 _bigAccountId
150158 _bigKey
151159 _bigOauthToken
152160 _bigFields
153− _bigAlt
161+ (Just _bigAlt)
154162 where go
155− = clientWithRoute (Proxy :: Proxy BillingInfoGetAPI)
163+ = clientWithRoute
164+ (Proxy :: Proxy BillingInfoGetResource)
156165 r
157166 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/BillingInfo/List.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- authenticated user.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerBillingInfoList@.
23−module AdExchangeBuyer.BillingInfo.List
24+module Network.Google.Resource.AdExchangeBuyer.BillingInfo.List
2425 (
2526 -- * REST Resource
26− BillingInfoListAPI
27+ BillingInfoListResource
2728
2829 -- * Creating a Request
29− , billingInfoList
30− , BillingInfoList
30+ , billingInfoList'
31+ , BillingInfoList'
3132
3233 -- * Request Lenses
3334 , bilQuotaUser
@@ -43,22 +44,29 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerBillingInfoList@ which the
46−-- 'BillingInfoList' request conforms to.
47−type BillingInfoListAPI =
48− "billinginfo" :> Get '[JSON] BillingInfoList
47+-- 'BillingInfoList'' request conforms to.
48+type BillingInfoListResource =
49+ "billinginfo" :>
50+ QueryParam "quotaUser" Text :>
51+ QueryParam "prettyPrint" Bool :>
52+ QueryParam "userIp" Text :>
53+ QueryParam "key" Text :>
54+ QueryParam "oauth_token" Text :>
55+ QueryParam "fields" Text :>
56+ QueryParam "alt" Alt :> Get '[JSON] BillingInfoList
4957
5058-- | Retrieves a list of billing information for all accounts of the
5159-- authenticated user.
5260--
53−-- /See:/ 'billingInfoList' smart constructor.
54−data BillingInfoList = BillingInfoList
61+-- /See:/ 'billingInfoList'' smart constructor.
62+data BillingInfoList' = BillingInfoList'
5563 { _bilQuotaUser :: !(Maybe Text)
5664 , _bilPrettyPrint :: !Bool
5765 , _bilUserIp :: !(Maybe Text)
5866 , _bilKey :: !(Maybe Text)
5967 , _bilOauthToken :: !(Maybe Text)
6068 , _bilFields :: !(Maybe Text)
61− , _bilAlt :: !Text
69+ , _bilAlt :: !Alt
6270 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6371
6472-- | Creates a value of 'BillingInfoList'' with the minimum fields required to make a request.
@@ -78,17 +86,17 @@ data BillingInfoList = BillingInfoList
7886-- * 'bilFields'
7987--
8088-- * 'bilAlt'
81−billingInfoList
82− :: BillingInfoList
83−billingInfoList =
84− BillingInfoList
89+billingInfoList'
90+ :: BillingInfoList'
91+billingInfoList' =
92+ BillingInfoList'
8593 { _bilQuotaUser = Nothing
8694 , _bilPrettyPrint = True
8795 , _bilUserIp = Nothing
8896 , _bilKey = Nothing
8997 , _bilOauthToken = Nothing
9098 , _bilFields = Nothing
91− , _bilAlt = "json"
99+ , _bilAlt = JSON
92100 }
93101
94102-- | Available to use for quota purposes for server-side applications. Can be
@@ -128,18 +136,20 @@ bilFields
128136 = lens _bilFields (\ s a -> s{_bilFields = a})
129137
130138-- | Data format for the response.
131−bilAlt :: Lens' BillingInfoList' Text
139+bilAlt :: Lens' BillingInfoList' Alt
132140bilAlt = lens _bilAlt (\ s a -> s{_bilAlt = a})
133141
134142instance GoogleRequest BillingInfoList' where
135143 type Rs BillingInfoList' = BillingInfoList
136144 request = requestWithRoute defReq adExchangeBuyerURL
137− requestWithRoute r u BillingInfoList{..}
138− = go _bilQuotaUser _bilPrettyPrint _bilUserIp _bilKey
145+ requestWithRoute r u BillingInfoList'{..}
146+ = go _bilQuotaUser (Just _bilPrettyPrint) _bilUserIp
147+ _bilKey
139148 _bilOauthToken
140149 _bilFields
141− _bilAlt
150+ (Just _bilAlt)
142151 where go
143− = clientWithRoute (Proxy :: Proxy BillingInfoListAPI)
152+ = clientWithRoute
153+ (Proxy :: Proxy BillingInfoListResource)
144154 r
145155 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Get.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- accountId and billingId.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerBudgetGet@.
23−module AdExchangeBuyer.Budget.Get
24+module Network.Google.Resource.AdExchangeBuyer.Budget.Get
2425 (
2526 -- * REST Resource
26− BudgetGetAPI
27+ BudgetGetResource
2728
2829 -- * Creating a Request
29− , budgetGet
30− , BudgetGet
30+ , budgetGet'
31+ , BudgetGet'
3132
3233 -- * Request Lenses
3334 , bgQuotaUser
@@ -45,17 +46,24 @@ import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerBudgetGet@ which the
48−-- 'BudgetGet' request conforms to.
49−type BudgetGetAPI =
49+-- 'BudgetGet'' request conforms to.
50+type BudgetGetResource =
5051 "billinginfo" :>
5152 Capture "accountId" Int64 :>
52− Capture "billingId" Int64 :> Get '[JSON] Budget
53+ Capture "billingId" Int64 :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Budget
5361
5462-- | Returns the budget information for the adgroup specified by the
5563-- accountId and billingId.
5664--
57−-- /See:/ 'budgetGet' smart constructor.
58−data BudgetGet = BudgetGet
65+-- /See:/ 'budgetGet'' smart constructor.
66+data BudgetGet' = BudgetGet'
5967 { _bgQuotaUser :: !(Maybe Text)
6068 , _bgPrettyPrint :: !Bool
6169 , _bgUserIp :: !(Maybe Text)
@@ -64,7 +72,7 @@ data BudgetGet = BudgetGet
6472 , _bgOauthToken :: !(Maybe Text)
6573 , _bgBillingId :: !Int64
6674 , _bgFields :: !(Maybe Text)
67− , _bgAlt :: !Text
75+ , _bgAlt :: !Alt
6876 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6977
7078-- | Creates a value of 'BudgetGet'' with the minimum fields required to make a request.
@@ -88,12 +96,12 @@ data BudgetGet = BudgetGet
8896-- * 'bgFields'
8997--
9098-- * 'bgAlt'
91−budgetGet
99+budgetGet'
92100 :: Int64 -- ^ 'accountId'
93101 -> Int64 -- ^ 'billingId'
94− -> BudgetGet
95−budgetGet pBgAccountId_ pBgBillingId_ =
96− BudgetGet
102+ -> BudgetGet'
103+budgetGet' pBgAccountId_ pBgBillingId_ =
104+ BudgetGet'
97105 { _bgQuotaUser = Nothing
98106 , _bgPrettyPrint = True
99107 , _bgUserIp = Nothing
@@ -102,7 +110,7 @@ budgetGet pBgAccountId_ pBgBillingId_ =
102110 , _bgOauthToken = Nothing
103111 , _bgBillingId = pBgBillingId_
104112 , _bgFields = Nothing
105− , _bgAlt = "json"
113+ , _bgAlt = JSON
106114 }
107115
108116-- | Available to use for quota purposes for server-side applications. Can be
@@ -149,19 +157,21 @@ bgFields :: Lens' BudgetGet' (Maybe Text)
149157bgFields = lens _bgFields (\ s a -> s{_bgFields = a})
150158
151159-- | Data format for the response.
152−bgAlt :: Lens' BudgetGet' Text
160+bgAlt :: Lens' BudgetGet' Alt
153161bgAlt = lens _bgAlt (\ s a -> s{_bgAlt = a})
154162
155163instance GoogleRequest BudgetGet' where
156164 type Rs BudgetGet' = Budget
157165 request = requestWithRoute defReq adExchangeBuyerURL
158− requestWithRoute r u BudgetGet{..}
159− = go _bgQuotaUser _bgPrettyPrint _bgUserIp
166+ requestWithRoute r u BudgetGet'{..}
167+ = go _bgQuotaUser (Just _bgPrettyPrint) _bgUserIp
160168 _bgAccountId
161169 _bgKey
162170 _bgOauthToken
163171 _bgBillingId
164172 _bgFields
165− _bgAlt
173+ (Just _bgAlt)
166174 where go
167− = clientWithRoute (Proxy :: Proxy BudgetGetAPI) r u
175+ = clientWithRoute (Proxy :: Proxy BudgetGetResource)
176+ r
177+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Patch.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -21,14 +22,14 @@
2122-- method supports patch semantics.
2223--
2324-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerBudgetPatch@.
24−module AdExchangeBuyer.Budget.Patch
25+module Network.Google.Resource.AdExchangeBuyer.Budget.Patch
2526 (
2627 -- * REST Resource
27− BudgetPatchAPI
28+ BudgetPatchResource
2829
2930 -- * Creating a Request
30− , budgetPatch
31− , BudgetPatch
31+ , budgetPatch'
32+ , BudgetPatch'
3233
3334 -- * Request Lenses
3435 , bpQuotaUser
@@ -46,18 +47,25 @@ import Network.Google.AdExchangeBuyer.Types
4647import Network.Google.Prelude
4748
4849-- | A resource alias for @AdexchangebuyerBudgetPatch@ which the
49−-- 'BudgetPatch' request conforms to.
50−type BudgetPatchAPI =
50+-- 'BudgetPatch'' request conforms to.
51+type BudgetPatchResource =
5152 "billinginfo" :>
5253 Capture "accountId" Int64 :>
53− Capture "billingId" Int64 :> Patch '[JSON] Budget
54+ Capture "billingId" Int64 :>
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "userIp" Text :>
58+ QueryParam "key" Text :>
59+ QueryParam "oauth_token" Text :>
60+ QueryParam "fields" Text :>
61+ QueryParam "alt" Alt :> Patch '[JSON] Budget
5462
5563-- | Updates the budget amount for the budget of the adgroup specified by the
5664-- accountId and billingId, with the budget amount in the request. This
5765-- method supports patch semantics.
5866--
59−-- /See:/ 'budgetPatch' smart constructor.
60−data BudgetPatch = BudgetPatch
67+-- /See:/ 'budgetPatch'' smart constructor.
68+data BudgetPatch' = BudgetPatch'
6169 { _bpQuotaUser :: !(Maybe Text)
6270 , _bpPrettyPrint :: !Bool
6371 , _bpUserIp :: !(Maybe Text)
@@ -66,7 +74,7 @@ data BudgetPatch = BudgetPatch
6674 , _bpOauthToken :: !(Maybe Text)
6775 , _bpBillingId :: !Int64
6876 , _bpFields :: !(Maybe Text)
69− , _bpAlt :: !Text
77+ , _bpAlt :: !Alt
7078 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7179
7280-- | Creates a value of 'BudgetPatch'' with the minimum fields required to make a request.
@@ -90,12 +98,12 @@ data BudgetPatch = BudgetPatch
9098-- * 'bpFields'
9199--
92100-- * 'bpAlt'
93−budgetPatch
101+budgetPatch'
94102 :: Int64 -- ^ 'accountId'
95103 -> Int64 -- ^ 'billingId'
96− -> BudgetPatch
97−budgetPatch pBpAccountId_ pBpBillingId_ =
98− BudgetPatch
104+ -> BudgetPatch'
105+budgetPatch' pBpAccountId_ pBpBillingId_ =
106+ BudgetPatch'
99107 { _bpQuotaUser = Nothing
100108 , _bpPrettyPrint = True
101109 , _bpUserIp = Nothing
@@ -104,7 +112,7 @@ budgetPatch pBpAccountId_ pBpBillingId_ =
104112 , _bpOauthToken = Nothing
105113 , _bpBillingId = pBpBillingId_
106114 , _bpFields = Nothing
107− , _bpAlt = "json"
115+ , _bpAlt = JSON
108116 }
109117
110118-- | Available to use for quota purposes for server-side applications. Can be
@@ -151,19 +159,22 @@ bpFields :: Lens' BudgetPatch' (Maybe Text)
151159bpFields = lens _bpFields (\ s a -> s{_bpFields = a})
152160
153161-- | Data format for the response.
154−bpAlt :: Lens' BudgetPatch' Text
162+bpAlt :: Lens' BudgetPatch' Alt
155163bpAlt = lens _bpAlt (\ s a -> s{_bpAlt = a})
156164
157165instance GoogleRequest BudgetPatch' where
158166 type Rs BudgetPatch' = Budget
159167 request = requestWithRoute defReq adExchangeBuyerURL
160− requestWithRoute r u BudgetPatch{..}
161− = go _bpQuotaUser _bpPrettyPrint _bpUserIp
168+ requestWithRoute r u BudgetPatch'{..}
169+ = go _bpQuotaUser (Just _bpPrettyPrint) _bpUserIp
162170 _bpAccountId
163171 _bpKey
164172 _bpOauthToken
165173 _bpBillingId
166174 _bpFields
167− _bpAlt
175+ (Just _bpAlt)
168176 where go
169− = clientWithRoute (Proxy :: Proxy BudgetPatchAPI) r u
177+ = clientWithRoute
178+ (Proxy :: Proxy BudgetPatchResource)
179+ r
180+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Budget/Update.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- accountId and billingId, with the budget amount in the request.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerBudgetUpdate@.
23−module AdExchangeBuyer.Budget.Update
24+module Network.Google.Resource.AdExchangeBuyer.Budget.Update
2425 (
2526 -- * REST Resource
26− BudgetUpdateAPI
27+ BudgetUpdateResource
2728
2829 -- * Creating a Request
29− , budgetUpdate
30− , BudgetUpdate
30+ , budgetUpdate'
31+ , BudgetUpdate'
3132
3233 -- * Request Lenses
3334 , buQuotaUser
@@ -45,17 +46,24 @@ import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerBudgetUpdate@ which the
48−-- 'BudgetUpdate' request conforms to.
49−type BudgetUpdateAPI =
49+-- 'BudgetUpdate'' request conforms to.
50+type BudgetUpdateResource =
5051 "billinginfo" :>
5152 Capture "accountId" Int64 :>
52− Capture "billingId" Int64 :> Put '[JSON] Budget
53+ Capture "billingId" Int64 :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Put '[JSON] Budget
5361
5462-- | Updates the budget amount for the budget of the adgroup specified by the
5563-- accountId and billingId, with the budget amount in the request.
5664--
57−-- /See:/ 'budgetUpdate' smart constructor.
58−data BudgetUpdate = BudgetUpdate
65+-- /See:/ 'budgetUpdate'' smart constructor.
66+data BudgetUpdate' = BudgetUpdate'
5967 { _buQuotaUser :: !(Maybe Text)
6068 , _buPrettyPrint :: !Bool
6169 , _buUserIp :: !(Maybe Text)
@@ -64,7 +72,7 @@ data BudgetUpdate = BudgetUpdate
6472 , _buOauthToken :: !(Maybe Text)
6573 , _buBillingId :: !Int64
6674 , _buFields :: !(Maybe Text)
67− , _buAlt :: !Text
75+ , _buAlt :: !Alt
6876 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6977
7078-- | Creates a value of 'BudgetUpdate'' with the minimum fields required to make a request.
@@ -88,12 +96,12 @@ data BudgetUpdate = BudgetUpdate
8896-- * 'buFields'
8997--
9098-- * 'buAlt'
91−budgetUpdate
99+budgetUpdate'
92100 :: Int64 -- ^ 'accountId'
93101 -> Int64 -- ^ 'billingId'
94− -> BudgetUpdate
95−budgetUpdate pBuAccountId_ pBuBillingId_ =
96− BudgetUpdate
102+ -> BudgetUpdate'
103+budgetUpdate' pBuAccountId_ pBuBillingId_ =
104+ BudgetUpdate'
97105 { _buQuotaUser = Nothing
98106 , _buPrettyPrint = True
99107 , _buUserIp = Nothing
@@ -102,7 +110,7 @@ budgetUpdate pBuAccountId_ pBuBillingId_ =
102110 , _buOauthToken = Nothing
103111 , _buBillingId = pBuBillingId_
104112 , _buFields = Nothing
105− , _buAlt = "json"
113+ , _buAlt = JSON
106114 }
107115
108116-- | Available to use for quota purposes for server-side applications. Can be
@@ -149,20 +157,22 @@ buFields :: Lens' BudgetUpdate' (Maybe Text)
149157buFields = lens _buFields (\ s a -> s{_buFields = a})
150158
151159-- | Data format for the response.
152−buAlt :: Lens' BudgetUpdate' Text
160+buAlt :: Lens' BudgetUpdate' Alt
153161buAlt = lens _buAlt (\ s a -> s{_buAlt = a})
154162
155163instance GoogleRequest BudgetUpdate' where
156164 type Rs BudgetUpdate' = Budget
157165 request = requestWithRoute defReq adExchangeBuyerURL
158− requestWithRoute r u BudgetUpdate{..}
159− = go _buQuotaUser _buPrettyPrint _buUserIp
166+ requestWithRoute r u BudgetUpdate'{..}
167+ = go _buQuotaUser (Just _buPrettyPrint) _buUserIp
160168 _buAccountId
161169 _buKey
162170 _buOauthToken
163171 _buBillingId
164172 _buFields
165− _buAlt
173+ (Just _buAlt)
166174 where go
167− = clientWithRoute (Proxy :: Proxy BudgetUpdateAPI) r
175+ = clientWithRoute
176+ (Proxy :: Proxy BudgetUpdateResource)
177+ r
168178 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/Delete.hs+28−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessDelete@.
22−module AdExchangeBuyer.Clientaccess.Delete
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Delete
2324 (
2425 -- * REST Resource
25− ClientaccessDeleteAPI
26+ ClientaccessDeleteResource
2627
2728 -- * Creating a Request
28− , clientaccessDelete
29− , ClientaccessDelete
29+ , clientaccessDelete'
30+ , ClientaccessDelete'
3031
3132 -- * Request Lenses
3233 , cdQuotaUser
@@ -44,16 +45,22 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerClientaccessDelete@ which the
47−-- 'ClientaccessDelete' request conforms to.
48−type ClientaccessDeleteAPI =
48+-- 'ClientaccessDelete'' request conforms to.
49+type ClientaccessDeleteResource =
4950 "clientAccess" :>
5051 Capture "clientAccountId" Int64 :>
51− QueryParam "sponsorAccountId" Int32 :>
52− Delete '[JSON] ()
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "sponsorAccountId" Int32 :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :> Delete '[JSON] ()
5360
5461--
55−-- /See:/ 'clientaccessDelete' smart constructor.
56−data ClientaccessDelete = ClientaccessDelete
62+-- /See:/ 'clientaccessDelete'' smart constructor.
63+data ClientaccessDelete' = ClientaccessDelete'
5764 { _cdQuotaUser :: !(Maybe Text)
5865 , _cdPrettyPrint :: !Bool
5966 , _cdUserIp :: !(Maybe Text)
@@ -62,7 +69,7 @@ data ClientaccessDelete = ClientaccessDelete
6269 , _cdClientAccountId :: !Int64
6370 , _cdOauthToken :: !(Maybe Text)
6471 , _cdFields :: !(Maybe Text)
65− , _cdAlt :: !Text
72+ , _cdAlt :: !Alt
6673 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6774
6875-- | Creates a value of 'ClientaccessDelete'' with the minimum fields required to make a request.
@@ -86,12 +93,12 @@ data ClientaccessDelete = ClientaccessDelete
8693-- * 'cdFields'
8794--
8895-- * 'cdAlt'
89−clientaccessDelete
96+clientaccessDelete'
9097 :: Int32 -- ^ 'sponsorAccountId'
9198 -> Int64 -- ^ 'clientAccountId'
92− -> ClientaccessDelete
93−clientaccessDelete pCdSponsorAccountId_ pCdClientAccountId_ =
94− ClientaccessDelete
99+ -> ClientaccessDelete'
100+clientaccessDelete' pCdSponsorAccountId_ pCdClientAccountId_ =
101+ ClientaccessDelete'
95102 { _cdQuotaUser = Nothing
96103 , _cdPrettyPrint = True
97104 , _cdUserIp = Nothing
@@ -100,7 +107,7 @@ clientaccessDelete pCdSponsorAccountId_ pCdClientAccountId_ =
100107 , _cdClientAccountId = pCdClientAccountId_
101108 , _cdOauthToken = Nothing
102109 , _cdFields = Nothing
103− , _cdAlt = "json"
110+ , _cdAlt = JSON
104111 }
105112
106113-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,22 +154,22 @@ cdFields :: Lens' ClientaccessDelete' (Maybe Text)
147154cdFields = lens _cdFields (\ s a -> s{_cdFields = a})
148155
149156-- | Data format for the response.
150−cdAlt :: Lens' ClientaccessDelete' Text
157+cdAlt :: Lens' ClientaccessDelete' Alt
151158cdAlt = lens _cdAlt (\ s a -> s{_cdAlt = a})
152159
153160instance GoogleRequest ClientaccessDelete' where
154161 type Rs ClientaccessDelete' = ()
155162 request = requestWithRoute defReq adExchangeBuyerURL
156− requestWithRoute r u ClientaccessDelete{..}
157− = go _cdQuotaUser _cdPrettyPrint _cdUserIp
163+ requestWithRoute r u ClientaccessDelete'{..}
164+ = go _cdQuotaUser (Just _cdPrettyPrint) _cdUserIp
158165 (Just _cdSponsorAccountId)
159166 _cdKey
160167 _cdClientAccountId
161168 _cdOauthToken
162169 _cdFields
163− _cdAlt
170+ (Just _cdAlt)
164171 where go
165172 = clientWithRoute
166− (Proxy :: Proxy ClientaccessDeleteAPI)
173+ (Proxy :: Proxy ClientaccessDeleteResource)
167174 r
168175 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/Get.hs+94−88
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,152 +20,157 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessGet@.
22−module AdExchangeBuyer.Clientaccess.Get
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Get
2324 (
2425 -- * REST Resource
25− ClientaccessGetAPI
26+ ClientaccessGetResource
2627
2728 -- * Creating a Request
28− , clientaccessGet
29− , ClientaccessGet
29+ , clientaccessGet'
30+ , ClientaccessGet'
3031
3132 -- * Request Lenses
32− , cggQuotaUser
33− , cggPrettyPrint
34− , cggUserIp
35− , cggSponsorAccountId
36− , cggKey
37− , cggClientAccountId
38− , cggOauthToken
39− , cggFields
40− , cggAlt
33+ , cgQuotaUser
34+ , cgPrettyPrint
35+ , cgUserIp
36+ , cgSponsorAccountId
37+ , cgKey
38+ , cgClientAccountId
39+ , cgOauthToken
40+ , cgFields
41+ , cgAlt
4142 ) where
4243
4344import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerClientaccessGet@ which the
47−-- 'ClientaccessGet' request conforms to.
48−type ClientaccessGetAPI =
48+-- 'ClientaccessGet'' request conforms to.
49+type ClientaccessGetResource =
4950 "clientAccess" :>
5051 Capture "clientAccountId" Int64 :>
51− QueryParam "sponsorAccountId" Int32 :>
52− Get '[JSON] ClientAccessCapabilities
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "sponsorAccountId" Int32 :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Get '[JSON] ClientAccessCapabilities
5361
5462--
55−-- /See:/ 'clientaccessGet' smart constructor.
56−data ClientaccessGet = ClientaccessGet
57− { _cggQuotaUser :: !(Maybe Text)
58− , _cggPrettyPrint :: !Bool
59− , _cggUserIp :: !(Maybe Text)
60− , _cggSponsorAccountId :: !Int32
61− , _cggKey :: !(Maybe Text)
62− , _cggClientAccountId :: !Int64
63− , _cggOauthToken :: !(Maybe Text)
64− , _cggFields :: !(Maybe Text)
65− , _cggAlt :: !Text
63+-- /See:/ 'clientaccessGet'' smart constructor.
64+data ClientaccessGet' = ClientaccessGet'
65+ { _cgQuotaUser :: !(Maybe Text)
66+ , _cgPrettyPrint :: !Bool
67+ , _cgUserIp :: !(Maybe Text)
68+ , _cgSponsorAccountId :: !Int32
69+ , _cgKey :: !(Maybe Text)
70+ , _cgClientAccountId :: !Int64
71+ , _cgOauthToken :: !(Maybe Text)
72+ , _cgFields :: !(Maybe Text)
73+ , _cgAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'ClientaccessGet'' with the minimum fields required to make a request.
6977--
7078-- Use one of the following lenses to modify other fields as desired:
7179--
72−-- * 'cggQuotaUser'
80+-- * 'cgQuotaUser'
7381--
74−-- * 'cggPrettyPrint'
82+-- * 'cgPrettyPrint'
7583--
76−-- * 'cggUserIp'
84+-- * 'cgUserIp'
7785--
78−-- * 'cggSponsorAccountId'
86+-- * 'cgSponsorAccountId'
7987--
80−-- * 'cggKey'
88+-- * 'cgKey'
8189--
82−-- * 'cggClientAccountId'
90+-- * 'cgClientAccountId'
8391--
84−-- * 'cggOauthToken'
92+-- * 'cgOauthToken'
8593--
86−-- * 'cggFields'
94+-- * 'cgFields'
8795--
88−-- * 'cggAlt'
89−clientaccessGet
96+-- * 'cgAlt'
97+clientaccessGet'
9098 :: Int32 -- ^ 'sponsorAccountId'
9199 -> Int64 -- ^ 'clientAccountId'
92− -> ClientaccessGet
93−clientaccessGet pCggSponsorAccountId_ pCggClientAccountId_ =
94− ClientaccessGet
95− { _cggQuotaUser = Nothing
96− , _cggPrettyPrint = True
97− , _cggUserIp = Nothing
98− , _cggSponsorAccountId = pCggSponsorAccountId_
99− , _cggKey = Nothing
100− , _cggClientAccountId = pCggClientAccountId_
101− , _cggOauthToken = Nothing
102− , _cggFields = Nothing
103− , _cggAlt = "json"
100+ -> ClientaccessGet'
101+clientaccessGet' pCgSponsorAccountId_ pCgClientAccountId_ =
102+ ClientaccessGet'
103+ { _cgQuotaUser = Nothing
104+ , _cgPrettyPrint = True
105+ , _cgUserIp = Nothing
106+ , _cgSponsorAccountId = pCgSponsorAccountId_
107+ , _cgKey = Nothing
108+ , _cgClientAccountId = pCgClientAccountId_
109+ , _cgOauthToken = Nothing
110+ , _cgFields = Nothing
111+ , _cgAlt = JSON
104112 }
105113
106114-- | Available to use for quota purposes for server-side applications. Can be
107115-- any arbitrary string assigned to a user, but should not exceed 40
108116-- characters. Overrides userIp if both are provided.
109−cggQuotaUser :: Lens' ClientaccessGet' (Maybe Text)
110−cggQuotaUser
111− = lens _cggQuotaUser (\ s a -> s{_cggQuotaUser = a})
117+cgQuotaUser :: Lens' ClientaccessGet' (Maybe Text)
118+cgQuotaUser
119+ = lens _cgQuotaUser (\ s a -> s{_cgQuotaUser = a})
112120
113121-- | Returns response with indentations and line breaks.
114−cggPrettyPrint :: Lens' ClientaccessGet' Bool
115−cggPrettyPrint
116− = lens _cggPrettyPrint
117− (\ s a -> s{_cggPrettyPrint = a})
122+cgPrettyPrint :: Lens' ClientaccessGet' Bool
123+cgPrettyPrint
124+ = lens _cgPrettyPrint
125+ (\ s a -> s{_cgPrettyPrint = a})
118126
119127-- | IP address of the site where the request originates. Use this if you
120128-- want to enforce per-user limits.
121−cggUserIp :: Lens' ClientaccessGet' (Maybe Text)
122−cggUserIp
123− = lens _cggUserIp (\ s a -> s{_cggUserIp = a})
129+cgUserIp :: Lens' ClientaccessGet' (Maybe Text)
130+cgUserIp = lens _cgUserIp (\ s a -> s{_cgUserIp = a})
124131
125−cggSponsorAccountId :: Lens' ClientaccessGet' Int32
126−cggSponsorAccountId
127− = lens _cggSponsorAccountId
128− (\ s a -> s{_cggSponsorAccountId = a})
132+cgSponsorAccountId :: Lens' ClientaccessGet' Int32
133+cgSponsorAccountId
134+ = lens _cgSponsorAccountId
135+ (\ s a -> s{_cgSponsorAccountId = a})
129136
130137-- | API key. Your API key identifies your project and provides you with API
131138-- access, quota, and reports. Required unless you provide an OAuth 2.0
132139-- token.
133−cggKey :: Lens' ClientaccessGet' (Maybe Text)
134−cggKey = lens _cggKey (\ s a -> s{_cggKey = a})
140+cgKey :: Lens' ClientaccessGet' (Maybe Text)
141+cgKey = lens _cgKey (\ s a -> s{_cgKey = a})
135142
136−cggClientAccountId :: Lens' ClientaccessGet' Int64
137−cggClientAccountId
138− = lens _cggClientAccountId
139− (\ s a -> s{_cggClientAccountId = a})
143+cgClientAccountId :: Lens' ClientaccessGet' Int64
144+cgClientAccountId
145+ = lens _cgClientAccountId
146+ (\ s a -> s{_cgClientAccountId = a})
140147
141148-- | OAuth 2.0 token for the current user.
142−cggOauthToken :: Lens' ClientaccessGet' (Maybe Text)
143−cggOauthToken
144− = lens _cggOauthToken
145− (\ s a -> s{_cggOauthToken = a})
149+cgOauthToken :: Lens' ClientaccessGet' (Maybe Text)
150+cgOauthToken
151+ = lens _cgOauthToken (\ s a -> s{_cgOauthToken = a})
146152
147153-- | Selector specifying which fields to include in a partial response.
148−cggFields :: Lens' ClientaccessGet' (Maybe Text)
149−cggFields
150− = lens _cggFields (\ s a -> s{_cggFields = a})
154+cgFields :: Lens' ClientaccessGet' (Maybe Text)
155+cgFields = lens _cgFields (\ s a -> s{_cgFields = a})
151156
152157-- | Data format for the response.
153−cggAlt :: Lens' ClientaccessGet' Text
154−cggAlt = lens _cggAlt (\ s a -> s{_cggAlt = a})
158+cgAlt :: Lens' ClientaccessGet' Alt
159+cgAlt = lens _cgAlt (\ s a -> s{_cgAlt = a})
155160
156161instance GoogleRequest ClientaccessGet' where
157162 type Rs ClientaccessGet' = ClientAccessCapabilities
158163 request = requestWithRoute defReq adExchangeBuyerURL
159− requestWithRoute r u ClientaccessGet{..}
160− = go _cggQuotaUser _cggPrettyPrint _cggUserIp
161− (Just _cggSponsorAccountId)
162− _cggKey
163− _cggClientAccountId
164− _cggOauthToken
165− _cggFields
166− _cggAlt
164+ requestWithRoute r u ClientaccessGet'{..}
165+ = go _cgQuotaUser (Just _cgPrettyPrint) _cgUserIp
166+ (Just _cgSponsorAccountId)
167+ _cgKey
168+ _cgClientAccountId
169+ _cgOauthToken
170+ _cgFields
171+ (Just _cgAlt)
167172 where go
168− = clientWithRoute (Proxy :: Proxy ClientaccessGetAPI)
173+ = clientWithRoute
174+ (Proxy :: Proxy ClientaccessGetResource)
169175 r
170176 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/Insert.hs+94−85
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,148 +20,156 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessInsert@.
22−module AdExchangeBuyer.Clientaccess.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Insert
2324 (
2425 -- * REST Resource
25− ClientaccessInsertAPI
26+ ClientaccessInsertResource
2627
2728 -- * Creating a Request
28− , clientaccessInsert
29− , ClientaccessInsert
29+ , clientaccessInsert'
30+ , ClientaccessInsert'
3031
3132 -- * Request Lenses
32− , cQuotaUser
33− , cPrettyPrint
34− , cUserIp
35− , cSponsorAccountId
36− , cKey
37− , cClientAccountId
38− , cOauthToken
39− , cFields
40− , cAlt
33+ , ciQuotaUser
34+ , ciPrettyPrint
35+ , ciUserIp
36+ , ciSponsorAccountId
37+ , ciKey
38+ , ciClientAccountId
39+ , ciOauthToken
40+ , ciFields
41+ , ciAlt
4142 ) where
4243
4344import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerClientaccessInsert@ which the
47−-- 'ClientaccessInsert' request conforms to.
48−type ClientaccessInsertAPI =
48+-- 'ClientaccessInsert'' request conforms to.
49+type ClientaccessInsertResource =
4950 "clientAccess" :>
50− QueryParam "sponsorAccountId" Int32 :>
51− QueryParam "clientAccountId" Int64 :>
52− Post '[JSON] ClientAccessCapabilities
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "sponsorAccountId" Int32 :>
55+ QueryParam "key" Text :>
56+ QueryParam "clientAccountId" Int64 :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Post '[JSON] ClientAccessCapabilities
5361
5462--
55−-- /See:/ 'clientaccessInsert' smart constructor.
56−data ClientaccessInsert = ClientaccessInsert
57− { _cQuotaUser :: !(Maybe Text)
58− , _cPrettyPrint :: !Bool
59− , _cUserIp :: !(Maybe Text)
60− , _cSponsorAccountId :: !(Maybe Int32)
61− , _cKey :: !(Maybe Text)
62− , _cClientAccountId :: !(Maybe Int64)
63− , _cOauthToken :: !(Maybe Text)
64− , _cFields :: !(Maybe Text)
65− , _cAlt :: !Text
63+-- /See:/ 'clientaccessInsert'' smart constructor.
64+data ClientaccessInsert' = ClientaccessInsert'
65+ { _ciQuotaUser :: !(Maybe Text)
66+ , _ciPrettyPrint :: !Bool
67+ , _ciUserIp :: !(Maybe Text)
68+ , _ciSponsorAccountId :: !(Maybe Int32)
69+ , _ciKey :: !(Maybe Text)
70+ , _ciClientAccountId :: !(Maybe Int64)
71+ , _ciOauthToken :: !(Maybe Text)
72+ , _ciFields :: !(Maybe Text)
73+ , _ciAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'ClientaccessInsert'' with the minimum fields required to make a request.
6977--
7078-- Use one of the following lenses to modify other fields as desired:
7179--
72−-- * 'cQuotaUser'
80+-- * 'ciQuotaUser'
7381--
74−-- * 'cPrettyPrint'
82+-- * 'ciPrettyPrint'
7583--
76−-- * 'cUserIp'
84+-- * 'ciUserIp'
7785--
78−-- * 'cSponsorAccountId'
86+-- * 'ciSponsorAccountId'
7987--
80−-- * 'cKey'
88+-- * 'ciKey'
8189--
82−-- * 'cClientAccountId'
90+-- * 'ciClientAccountId'
8391--
84−-- * 'cOauthToken'
92+-- * 'ciOauthToken'
8593--
86−-- * 'cFields'
94+-- * 'ciFields'
8795--
88−-- * 'cAlt'
89−clientaccessInsert
90− :: ClientaccessInsert
91−clientaccessInsert =
92− ClientaccessInsert
93− { _cQuotaUser = Nothing
94− , _cPrettyPrint = True
95− , _cUserIp = Nothing
96− , _cSponsorAccountId = Nothing
97− , _cKey = Nothing
98− , _cClientAccountId = Nothing
99− , _cOauthToken = Nothing
100− , _cFields = Nothing
101− , _cAlt = "json"
96+-- * 'ciAlt'
97+clientaccessInsert'
98+ :: ClientaccessInsert'
99+clientaccessInsert' =
100+ ClientaccessInsert'
101+ { _ciQuotaUser = Nothing
102+ , _ciPrettyPrint = True
103+ , _ciUserIp = Nothing
104+ , _ciSponsorAccountId = Nothing
105+ , _ciKey = Nothing
106+ , _ciClientAccountId = Nothing
107+ , _ciOauthToken = Nothing
108+ , _ciFields = Nothing
109+ , _ciAlt = JSON
102110 }
103111
104112-- | Available to use for quota purposes for server-side applications. Can be
105113-- any arbitrary string assigned to a user, but should not exceed 40
106114-- characters. Overrides userIp if both are provided.
107−cQuotaUser :: Lens' ClientaccessInsert' (Maybe Text)
108−cQuotaUser
109− = lens _cQuotaUser (\ s a -> s{_cQuotaUser = a})
115+ciQuotaUser :: Lens' ClientaccessInsert' (Maybe Text)
116+ciQuotaUser
117+ = lens _ciQuotaUser (\ s a -> s{_ciQuotaUser = a})
110118
111119-- | Returns response with indentations and line breaks.
112−cPrettyPrint :: Lens' ClientaccessInsert' Bool
113−cPrettyPrint
114− = lens _cPrettyPrint (\ s a -> s{_cPrettyPrint = a})
120+ciPrettyPrint :: Lens' ClientaccessInsert' Bool
121+ciPrettyPrint
122+ = lens _ciPrettyPrint
123+ (\ s a -> s{_ciPrettyPrint = a})
115124
116125-- | IP address of the site where the request originates. Use this if you
117126-- want to enforce per-user limits.
118−cUserIp :: Lens' ClientaccessInsert' (Maybe Text)
119−cUserIp = lens _cUserIp (\ s a -> s{_cUserIp = a})
127+ciUserIp :: Lens' ClientaccessInsert' (Maybe Text)
128+ciUserIp = lens _ciUserIp (\ s a -> s{_ciUserIp = a})
120129
121−cSponsorAccountId :: Lens' ClientaccessInsert' (Maybe Int32)
122−cSponsorAccountId
123− = lens _cSponsorAccountId
124− (\ s a -> s{_cSponsorAccountId = a})
130+ciSponsorAccountId :: Lens' ClientaccessInsert' (Maybe Int32)
131+ciSponsorAccountId
132+ = lens _ciSponsorAccountId
133+ (\ s a -> s{_ciSponsorAccountId = a})
125134
126135-- | API key. Your API key identifies your project and provides you with API
127136-- access, quota, and reports. Required unless you provide an OAuth 2.0
128137-- token.
129−cKey :: Lens' ClientaccessInsert' (Maybe Text)
130−cKey = lens _cKey (\ s a -> s{_cKey = a})
138+ciKey :: Lens' ClientaccessInsert' (Maybe Text)
139+ciKey = lens _ciKey (\ s a -> s{_ciKey = a})
131140
132−cClientAccountId :: Lens' ClientaccessInsert' (Maybe Int64)
133−cClientAccountId
134− = lens _cClientAccountId
135− (\ s a -> s{_cClientAccountId = a})
141+ciClientAccountId :: Lens' ClientaccessInsert' (Maybe Int64)
142+ciClientAccountId
143+ = lens _ciClientAccountId
144+ (\ s a -> s{_ciClientAccountId = a})
136145
137146-- | OAuth 2.0 token for the current user.
138−cOauthToken :: Lens' ClientaccessInsert' (Maybe Text)
139−cOauthToken
140− = lens _cOauthToken (\ s a -> s{_cOauthToken = a})
147+ciOauthToken :: Lens' ClientaccessInsert' (Maybe Text)
148+ciOauthToken
149+ = lens _ciOauthToken (\ s a -> s{_ciOauthToken = a})
141150
142151-- | Selector specifying which fields to include in a partial response.
143−cFields :: Lens' ClientaccessInsert' (Maybe Text)
144−cFields = lens _cFields (\ s a -> s{_cFields = a})
152+ciFields :: Lens' ClientaccessInsert' (Maybe Text)
153+ciFields = lens _ciFields (\ s a -> s{_ciFields = a})
145154
146155-- | Data format for the response.
147−cAlt :: Lens' ClientaccessInsert' Text
148−cAlt = lens _cAlt (\ s a -> s{_cAlt = a})
156+ciAlt :: Lens' ClientaccessInsert' Alt
157+ciAlt = lens _ciAlt (\ s a -> s{_ciAlt = a})
149158
150159instance GoogleRequest ClientaccessInsert' where
151160 type Rs ClientaccessInsert' =
152161 ClientAccessCapabilities
153162 request = requestWithRoute defReq adExchangeBuyerURL
154− requestWithRoute r u ClientaccessInsert{..}
155− = go _cQuotaUser _cPrettyPrint _cUserIp
156− _cSponsorAccountId
157− _cKey
158− _cClientAccountId
159− _cOauthToken
160− _cFields
161− _cAlt
163+ requestWithRoute r u ClientaccessInsert'{..}
164+ = go _ciQuotaUser (Just _ciPrettyPrint) _ciUserIp
165+ _ciSponsorAccountId
166+ _ciKey
167+ _ciClientAccountId
168+ _ciOauthToken
169+ _ciFields
170+ (Just _ciAlt)
162171 where go
163172 = clientWithRoute
164− (Proxy :: Proxy ClientaccessInsertAPI)
173+ (Proxy :: Proxy ClientaccessInsertResource)
165174 r
166175 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/List.hs+72−68
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,127 +20,130 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessList@.
22−module AdExchangeBuyer.Clientaccess.List
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.List
2324 (
2425 -- * REST Resource
25− ClientaccessListAPI
26+ ClientaccessListResource
2627
2728 -- * Creating a Request
28− , clientaccessList
29− , ClientaccessList
29+ , clientaccessList'
30+ , ClientaccessList'
3031
3132 -- * Request Lenses
32− , cliQuotaUser
33− , cliPrettyPrint
34− , cliUserIp
35− , cliKey
36− , cliOauthToken
37− , cliFields
38− , cliAlt
33+ , cQuotaUser
34+ , cPrettyPrint
35+ , cUserIp
36+ , cKey
37+ , cOauthToken
38+ , cFields
39+ , cAlt
3940 ) where
4041
4142import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerClientaccessList@ which the
45−-- 'ClientaccessList' request conforms to.
46−type ClientaccessListAPI =
46+-- 'ClientaccessList'' request conforms to.
47+type ClientaccessListResource =
4748 "clientAccess" :>
48− Get '[JSON] ListClientAccessCapabilitiesResponse
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :>
56+ Get '[JSON] ListClientAccessCapabilitiesResponse
4957
5058--
51−-- /See:/ 'clientaccessList' smart constructor.
52−data ClientaccessList = ClientaccessList
53− { _cliQuotaUser :: !(Maybe Text)
54− , _cliPrettyPrint :: !Bool
55− , _cliUserIp :: !(Maybe Text)
56− , _cliKey :: !(Maybe Text)
57− , _cliOauthToken :: !(Maybe Text)
58− , _cliFields :: !(Maybe Text)
59− , _cliAlt :: !Text
59+-- /See:/ 'clientaccessList'' smart constructor.
60+data ClientaccessList' = ClientaccessList'
61+ { _cQuotaUser :: !(Maybe Text)
62+ , _cPrettyPrint :: !Bool
63+ , _cUserIp :: !(Maybe Text)
64+ , _cKey :: !(Maybe Text)
65+ , _cOauthToken :: !(Maybe Text)
66+ , _cFields :: !(Maybe Text)
67+ , _cAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'ClientaccessList'' with the minimum fields required to make a request.
6371--
6472-- Use one of the following lenses to modify other fields as desired:
6573--
66−-- * 'cliQuotaUser'
74+-- * 'cQuotaUser'
6775--
68−-- * 'cliPrettyPrint'
76+-- * 'cPrettyPrint'
6977--
70−-- * 'cliUserIp'
78+-- * 'cUserIp'
7179--
72−-- * 'cliKey'
80+-- * 'cKey'
7381--
74−-- * 'cliOauthToken'
82+-- * 'cOauthToken'
7583--
76−-- * 'cliFields'
84+-- * 'cFields'
7785--
78−-- * 'cliAlt'
79−clientaccessList
80− :: ClientaccessList
81−clientaccessList =
82− ClientaccessList
83− { _cliQuotaUser = Nothing
84− , _cliPrettyPrint = True
85− , _cliUserIp = Nothing
86− , _cliKey = Nothing
87− , _cliOauthToken = Nothing
88− , _cliFields = Nothing
89− , _cliAlt = "json"
86+-- * 'cAlt'
87+clientaccessList'
88+ :: ClientaccessList'
89+clientaccessList' =
90+ ClientaccessList'
91+ { _cQuotaUser = Nothing
92+ , _cPrettyPrint = True
93+ , _cUserIp = Nothing
94+ , _cKey = Nothing
95+ , _cOauthToken = Nothing
96+ , _cFields = Nothing
97+ , _cAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
93101-- any arbitrary string assigned to a user, but should not exceed 40
94102-- characters. Overrides userIp if both are provided.
95−cliQuotaUser :: Lens' ClientaccessList' (Maybe Text)
96−cliQuotaUser
97− = lens _cliQuotaUser (\ s a -> s{_cliQuotaUser = a})
103+cQuotaUser :: Lens' ClientaccessList' (Maybe Text)
104+cQuotaUser
105+ = lens _cQuotaUser (\ s a -> s{_cQuotaUser = a})
98106
99107-- | Returns response with indentations and line breaks.
100−cliPrettyPrint :: Lens' ClientaccessList' Bool
101−cliPrettyPrint
102− = lens _cliPrettyPrint
103− (\ s a -> s{_cliPrettyPrint = a})
108+cPrettyPrint :: Lens' ClientaccessList' Bool
109+cPrettyPrint
110+ = lens _cPrettyPrint (\ s a -> s{_cPrettyPrint = a})
104111
105112-- | IP address of the site where the request originates. Use this if you
106113-- want to enforce per-user limits.
107−cliUserIp :: Lens' ClientaccessList' (Maybe Text)
108−cliUserIp
109− = lens _cliUserIp (\ s a -> s{_cliUserIp = a})
114+cUserIp :: Lens' ClientaccessList' (Maybe Text)
115+cUserIp = lens _cUserIp (\ s a -> s{_cUserIp = a})
110116
111117-- | API key. Your API key identifies your project and provides you with API
112118-- access, quota, and reports. Required unless you provide an OAuth 2.0
113119-- token.
114−cliKey :: Lens' ClientaccessList' (Maybe Text)
115−cliKey = lens _cliKey (\ s a -> s{_cliKey = a})
120+cKey :: Lens' ClientaccessList' (Maybe Text)
121+cKey = lens _cKey (\ s a -> s{_cKey = a})
116122
117123-- | OAuth 2.0 token for the current user.
118−cliOauthToken :: Lens' ClientaccessList' (Maybe Text)
119−cliOauthToken
120− = lens _cliOauthToken
121− (\ s a -> s{_cliOauthToken = a})
124+cOauthToken :: Lens' ClientaccessList' (Maybe Text)
125+cOauthToken
126+ = lens _cOauthToken (\ s a -> s{_cOauthToken = a})
122127
123128-- | Selector specifying which fields to include in a partial response.
124−cliFields :: Lens' ClientaccessList' (Maybe Text)
125−cliFields
126− = lens _cliFields (\ s a -> s{_cliFields = a})
129+cFields :: Lens' ClientaccessList' (Maybe Text)
130+cFields = lens _cFields (\ s a -> s{_cFields = a})
127131
128132-- | Data format for the response.
129−cliAlt :: Lens' ClientaccessList' Text
130−cliAlt = lens _cliAlt (\ s a -> s{_cliAlt = a})
133+cAlt :: Lens' ClientaccessList' Alt
134+cAlt = lens _cAlt (\ s a -> s{_cAlt = a})
131135
132136instance GoogleRequest ClientaccessList' where
133137 type Rs ClientaccessList' =
134138 ListClientAccessCapabilitiesResponse
135139 request = requestWithRoute defReq adExchangeBuyerURL
136− requestWithRoute r u ClientaccessList{..}
137− = go _cliQuotaUser _cliPrettyPrint _cliUserIp _cliKey
138− _cliOauthToken
139− _cliFields
140− _cliAlt
140+ requestWithRoute r u ClientaccessList'{..}
141+ = go _cQuotaUser (Just _cPrettyPrint) _cUserIp _cKey
142+ _cOauthToken
143+ _cFields
144+ (Just _cAlt)
141145 where go
142146 = clientWithRoute
143− (Proxy :: Proxy ClientaccessListAPI)
147+ (Proxy :: Proxy ClientaccessListResource)
144148 r
145149 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/Patch.hs+29−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessPatch@.
22−module AdExchangeBuyer.Clientaccess.Patch
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Patch
2324 (
2425 -- * REST Resource
25− ClientaccessPatchAPI
26+ ClientaccessPatchResource
2627
2728 -- * Creating a Request
28− , clientaccessPatch
29− , ClientaccessPatch
29+ , clientaccessPatch'
30+ , ClientaccessPatch'
3031
3132 -- * Request Lenses
3233 , cpQuotaUser
@@ -44,16 +45,23 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerClientaccessPatch@ which the
47−-- 'ClientaccessPatch' request conforms to.
48−type ClientaccessPatchAPI =
48+-- 'ClientaccessPatch'' request conforms to.
49+type ClientaccessPatchResource =
4950 "clientAccess" :>
5051 Capture "clientAccountId" Int64 :>
51− QueryParam "sponsorAccountId" Int32 :>
52− Patch '[JSON] ClientAccessCapabilities
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "sponsorAccountId" Int32 :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Patch '[JSON] ClientAccessCapabilities
5361
5462--
55−-- /See:/ 'clientaccessPatch' smart constructor.
56−data ClientaccessPatch = ClientaccessPatch
63+-- /See:/ 'clientaccessPatch'' smart constructor.
64+data ClientaccessPatch' = ClientaccessPatch'
5765 { _cpQuotaUser :: !(Maybe Text)
5866 , _cpPrettyPrint :: !Bool
5967 , _cpUserIp :: !(Maybe Text)
@@ -62,7 +70,7 @@ data ClientaccessPatch = ClientaccessPatch
6270 , _cpClientAccountId :: !Int64
6371 , _cpOauthToken :: !(Maybe Text)
6472 , _cpFields :: !(Maybe Text)
65− , _cpAlt :: !Text
73+ , _cpAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'ClientaccessPatch'' with the minimum fields required to make a request.
@@ -86,12 +94,12 @@ data ClientaccessPatch = ClientaccessPatch
8694-- * 'cpFields'
8795--
8896-- * 'cpAlt'
89−clientaccessPatch
97+clientaccessPatch'
9098 :: Int32 -- ^ 'sponsorAccountId'
9199 -> Int64 -- ^ 'clientAccountId'
92− -> ClientaccessPatch
93−clientaccessPatch pCpSponsorAccountId_ pCpClientAccountId_ =
94− ClientaccessPatch
100+ -> ClientaccessPatch'
101+clientaccessPatch' pCpSponsorAccountId_ pCpClientAccountId_ =
102+ ClientaccessPatch'
95103 { _cpQuotaUser = Nothing
96104 , _cpPrettyPrint = True
97105 , _cpUserIp = Nothing
@@ -100,7 +108,7 @@ clientaccessPatch pCpSponsorAccountId_ pCpClientAccountId_ =
100108 , _cpClientAccountId = pCpClientAccountId_
101109 , _cpOauthToken = Nothing
102110 , _cpFields = Nothing
103− , _cpAlt = "json"
111+ , _cpAlt = JSON
104112 }
105113
106114-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,22 +155,22 @@ cpFields :: Lens' ClientaccessPatch' (Maybe Text)
147155cpFields = lens _cpFields (\ s a -> s{_cpFields = a})
148156
149157-- | Data format for the response.
150−cpAlt :: Lens' ClientaccessPatch' Text
158+cpAlt :: Lens' ClientaccessPatch' Alt
151159cpAlt = lens _cpAlt (\ s a -> s{_cpAlt = a})
152160
153161instance GoogleRequest ClientaccessPatch' where
154162 type Rs ClientaccessPatch' = ClientAccessCapabilities
155163 request = requestWithRoute defReq adExchangeBuyerURL
156− requestWithRoute r u ClientaccessPatch{..}
157− = go _cpQuotaUser _cpPrettyPrint _cpUserIp
164+ requestWithRoute r u ClientaccessPatch'{..}
165+ = go _cpQuotaUser (Just _cpPrettyPrint) _cpUserIp
158166 (Just _cpSponsorAccountId)
159167 _cpKey
160168 _cpClientAccountId
161169 _cpOauthToken
162170 _cpFields
163− _cpAlt
171+ (Just _cpAlt)
164172 where go
165173 = clientWithRoute
166− (Proxy :: Proxy ClientaccessPatchAPI)
174+ (Proxy :: Proxy ClientaccessPatchResource)
167175 r
168176 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Clientaccess/Update.hs+29−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerClientaccessUpdate@.
22−module AdExchangeBuyer.Clientaccess.Update
23+module Network.Google.Resource.AdExchangeBuyer.Clientaccess.Update
2324 (
2425 -- * REST Resource
25− ClientaccessUpdateAPI
26+ ClientaccessUpdateResource
2627
2728 -- * Creating a Request
28− , clientaccessUpdate
29− , ClientaccessUpdate
29+ , clientaccessUpdate'
30+ , ClientaccessUpdate'
3031
3132 -- * Request Lenses
3233 , cuQuotaUser
@@ -44,16 +45,23 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerClientaccessUpdate@ which the
47−-- 'ClientaccessUpdate' request conforms to.
48−type ClientaccessUpdateAPI =
48+-- 'ClientaccessUpdate'' request conforms to.
49+type ClientaccessUpdateResource =
4950 "clientAccess" :>
5051 Capture "clientAccountId" Int64 :>
51− QueryParam "sponsorAccountId" Int32 :>
52− Put '[JSON] ClientAccessCapabilities
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "sponsorAccountId" Int32 :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Put '[JSON] ClientAccessCapabilities
5361
5462--
55−-- /See:/ 'clientaccessUpdate' smart constructor.
56−data ClientaccessUpdate = ClientaccessUpdate
63+-- /See:/ 'clientaccessUpdate'' smart constructor.
64+data ClientaccessUpdate' = ClientaccessUpdate'
5765 { _cuQuotaUser :: !(Maybe Text)
5866 , _cuPrettyPrint :: !Bool
5967 , _cuUserIp :: !(Maybe Text)
@@ -62,7 +70,7 @@ data ClientaccessUpdate = ClientaccessUpdate
6270 , _cuClientAccountId :: !Int64
6371 , _cuOauthToken :: !(Maybe Text)
6472 , _cuFields :: !(Maybe Text)
65− , _cuAlt :: !Text
73+ , _cuAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'ClientaccessUpdate'' with the minimum fields required to make a request.
@@ -86,12 +94,12 @@ data ClientaccessUpdate = ClientaccessUpdate
8694-- * 'cuFields'
8795--
8896-- * 'cuAlt'
89−clientaccessUpdate
97+clientaccessUpdate'
9098 :: Int32 -- ^ 'sponsorAccountId'
9199 -> Int64 -- ^ 'clientAccountId'
92− -> ClientaccessUpdate
93−clientaccessUpdate pCuSponsorAccountId_ pCuClientAccountId_ =
94− ClientaccessUpdate
100+ -> ClientaccessUpdate'
101+clientaccessUpdate' pCuSponsorAccountId_ pCuClientAccountId_ =
102+ ClientaccessUpdate'
95103 { _cuQuotaUser = Nothing
96104 , _cuPrettyPrint = True
97105 , _cuUserIp = Nothing
@@ -100,7 +108,7 @@ clientaccessUpdate pCuSponsorAccountId_ pCuClientAccountId_ =
100108 , _cuClientAccountId = pCuClientAccountId_
101109 , _cuOauthToken = Nothing
102110 , _cuFields = Nothing
103− , _cuAlt = "json"
111+ , _cuAlt = JSON
104112 }
105113
106114-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,23 +155,23 @@ cuFields :: Lens' ClientaccessUpdate' (Maybe Text)
147155cuFields = lens _cuFields (\ s a -> s{_cuFields = a})
148156
149157-- | Data format for the response.
150−cuAlt :: Lens' ClientaccessUpdate' Text
158+cuAlt :: Lens' ClientaccessUpdate' Alt
151159cuAlt = lens _cuAlt (\ s a -> s{_cuAlt = a})
152160
153161instance GoogleRequest ClientaccessUpdate' where
154162 type Rs ClientaccessUpdate' =
155163 ClientAccessCapabilities
156164 request = requestWithRoute defReq adExchangeBuyerURL
157− requestWithRoute r u ClientaccessUpdate{..}
158− = go _cuQuotaUser _cuPrettyPrint _cuUserIp
165+ requestWithRoute r u ClientaccessUpdate'{..}
166+ = go _cuQuotaUser (Just _cuPrettyPrint) _cuUserIp
159167 (Just _cuSponsorAccountId)
160168 _cuKey
161169 _cuClientAccountId
162170 _cuOauthToken
163171 _cuFields
164− _cuAlt
172+ (Just _cuAlt)
165173 where go
166174 = clientWithRoute
167− (Proxy :: Proxy ClientaccessUpdateAPI)
175+ (Proxy :: Proxy ClientaccessUpdateResource)
168176 r
169177 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Get.hs+96−83
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,151 +21,163 @@
2021-- 30-40 minutes after submission.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerCreativesGet@.
23−module AdExchangeBuyer.Creatives.Get
24+module Network.Google.Resource.AdExchangeBuyer.Creatives.Get
2425 (
2526 -- * REST Resource
26− CreativesGetAPI
27+ CreativesGetResource
2728
2829 -- * Creating a Request
29− , creativesGet
30− , CreativesGet
30+ , creativesGet'
31+ , CreativesGet'
3132
3233 -- * Request Lenses
33− , cgQuotaUser
34− , cgPrettyPrint
35− , cgBuyerCreativeId
36− , cgUserIp
37− , cgAccountId
38− , cgKey
39− , cgOauthToken
40− , cgFields
41− , cgAlt
34+ , cggQuotaUser
35+ , cggPrettyPrint
36+ , cggBuyerCreativeId
37+ , cggUserIp
38+ , cggAccountId
39+ , cggKey
40+ , cggOauthToken
41+ , cggFields
42+ , cggAlt
4243 ) where
4344
4445import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerCreativesGet@ which the
48−-- 'CreativesGet' request conforms to.
49−type CreativesGetAPI =
49+-- 'CreativesGet'' request conforms to.
50+type CreativesGetResource =
5051 "creatives" :>
5152 Capture "accountId" Int32 :>
5253 Capture "buyerCreativeId" Text :>
53− Get '[JSON] Creative
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Creative
5461
5562-- | Gets the status for a single creative. A creative will be available
5663-- 30-40 minutes after submission.
5764--
58−-- /See:/ 'creativesGet' smart constructor.
59−data CreativesGet = CreativesGet
60− { _cgQuotaUser :: !(Maybe Text)
61− , _cgPrettyPrint :: !Bool
62− , _cgBuyerCreativeId :: !Text
63− , _cgUserIp :: !(Maybe Text)
64− , _cgAccountId :: !Int32
65− , _cgKey :: !(Maybe Text)
66− , _cgOauthToken :: !(Maybe Text)
67− , _cgFields :: !(Maybe Text)
68− , _cgAlt :: !Text
65+-- /See:/ 'creativesGet'' smart constructor.
66+data CreativesGet' = CreativesGet'
67+ { _cggQuotaUser :: !(Maybe Text)
68+ , _cggPrettyPrint :: !Bool
69+ , _cggBuyerCreativeId :: !Text
70+ , _cggUserIp :: !(Maybe Text)
71+ , _cggAccountId :: !Int32
72+ , _cggKey :: !(Maybe Text)
73+ , _cggOauthToken :: !(Maybe Text)
74+ , _cggFields :: !(Maybe Text)
75+ , _cggAlt :: !Alt
6976 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7077
7178-- | Creates a value of 'CreativesGet'' with the minimum fields required to make a request.
7279--
7380-- Use one of the following lenses to modify other fields as desired:
7481--
75−-- * 'cgQuotaUser'
82+-- * 'cggQuotaUser'
7683--
77−-- * 'cgPrettyPrint'
84+-- * 'cggPrettyPrint'
7885--
79−-- * 'cgBuyerCreativeId'
86+-- * 'cggBuyerCreativeId'
8087--
81−-- * 'cgUserIp'
88+-- * 'cggUserIp'
8289--
83−-- * 'cgAccountId'
90+-- * 'cggAccountId'
8491--
85−-- * 'cgKey'
92+-- * 'cggKey'
8693--
87−-- * 'cgOauthToken'
94+-- * 'cggOauthToken'
8895--
89−-- * 'cgFields'
96+-- * 'cggFields'
9097--
91−-- * 'cgAlt'
92−creativesGet
98+-- * 'cggAlt'
99+creativesGet'
93100 :: Text -- ^ 'buyerCreativeId'
94101 -> Int32 -- ^ 'accountId'
95− -> CreativesGet
96−creativesGet pCgBuyerCreativeId_ pCgAccountId_ =
97− CreativesGet
98− { _cgQuotaUser = Nothing
99− , _cgPrettyPrint = True
100− , _cgBuyerCreativeId = pCgBuyerCreativeId_
101− , _cgUserIp = Nothing
102− , _cgAccountId = pCgAccountId_
103− , _cgKey = Nothing
104− , _cgOauthToken = Nothing
105− , _cgFields = Nothing
106− , _cgAlt = "json"
102+ -> CreativesGet'
103+creativesGet' pCggBuyerCreativeId_ pCggAccountId_ =
104+ CreativesGet'
105+ { _cggQuotaUser = Nothing
106+ , _cggPrettyPrint = True
107+ , _cggBuyerCreativeId = pCggBuyerCreativeId_
108+ , _cggUserIp = Nothing
109+ , _cggAccountId = pCggAccountId_
110+ , _cggKey = Nothing
111+ , _cggOauthToken = Nothing
112+ , _cggFields = Nothing
113+ , _cggAlt = JSON
107114 }
108115
109116-- | Available to use for quota purposes for server-side applications. Can be
110117-- any arbitrary string assigned to a user, but should not exceed 40
111118-- characters. Overrides userIp if both are provided.
112−cgQuotaUser :: Lens' CreativesGet' (Maybe Text)
113−cgQuotaUser
114− = lens _cgQuotaUser (\ s a -> s{_cgQuotaUser = a})
119+cggQuotaUser :: Lens' CreativesGet' (Maybe Text)
120+cggQuotaUser
121+ = lens _cggQuotaUser (\ s a -> s{_cggQuotaUser = a})
115122
116123-- | Returns response with indentations and line breaks.
117−cgPrettyPrint :: Lens' CreativesGet' Bool
118−cgPrettyPrint
119− = lens _cgPrettyPrint
120− (\ s a -> s{_cgPrettyPrint = a})
124+cggPrettyPrint :: Lens' CreativesGet' Bool
125+cggPrettyPrint
126+ = lens _cggPrettyPrint
127+ (\ s a -> s{_cggPrettyPrint = a})
121128
122129-- | The buyer-specific id for this creative.
123−cgBuyerCreativeId :: Lens' CreativesGet' Text
124−cgBuyerCreativeId
125− = lens _cgBuyerCreativeId
126− (\ s a -> s{_cgBuyerCreativeId = a})
130+cggBuyerCreativeId :: Lens' CreativesGet' Text
131+cggBuyerCreativeId
132+ = lens _cggBuyerCreativeId
133+ (\ s a -> s{_cggBuyerCreativeId = a})
127134
128135-- | IP address of the site where the request originates. Use this if you
129136-- want to enforce per-user limits.
130−cgUserIp :: Lens' CreativesGet' (Maybe Text)
131−cgUserIp = lens _cgUserIp (\ s a -> s{_cgUserIp = a})
137+cggUserIp :: Lens' CreativesGet' (Maybe Text)
138+cggUserIp
139+ = lens _cggUserIp (\ s a -> s{_cggUserIp = a})
132140
133141-- | The id for the account that will serve this creative.
134−cgAccountId :: Lens' CreativesGet' Int32
135−cgAccountId
136− = lens _cgAccountId (\ s a -> s{_cgAccountId = a})
142+cggAccountId :: Lens' CreativesGet' Int32
143+cggAccountId
144+ = lens _cggAccountId (\ s a -> s{_cggAccountId = a})
137145
138146-- | API key. Your API key identifies your project and provides you with API
139147-- access, quota, and reports. Required unless you provide an OAuth 2.0
140148-- token.
141−cgKey :: Lens' CreativesGet' (Maybe Text)
142−cgKey = lens _cgKey (\ s a -> s{_cgKey = a})
149+cggKey :: Lens' CreativesGet' (Maybe Text)
150+cggKey = lens _cggKey (\ s a -> s{_cggKey = a})
143151
144152-- | OAuth 2.0 token for the current user.
145−cgOauthToken :: Lens' CreativesGet' (Maybe Text)
146−cgOauthToken
147− = lens _cgOauthToken (\ s a -> s{_cgOauthToken = a})
153+cggOauthToken :: Lens' CreativesGet' (Maybe Text)
154+cggOauthToken
155+ = lens _cggOauthToken
156+ (\ s a -> s{_cggOauthToken = a})
148157
149158-- | Selector specifying which fields to include in a partial response.
150−cgFields :: Lens' CreativesGet' (Maybe Text)
151−cgFields = lens _cgFields (\ s a -> s{_cgFields = a})
159+cggFields :: Lens' CreativesGet' (Maybe Text)
160+cggFields
161+ = lens _cggFields (\ s a -> s{_cggFields = a})
152162
153163-- | Data format for the response.
154−cgAlt :: Lens' CreativesGet' Text
155−cgAlt = lens _cgAlt (\ s a -> s{_cgAlt = a})
164+cggAlt :: Lens' CreativesGet' Alt
165+cggAlt = lens _cggAlt (\ s a -> s{_cggAlt = a})
156166
157167instance GoogleRequest CreativesGet' where
158168 type Rs CreativesGet' = Creative
159169 request = requestWithRoute defReq adExchangeBuyerURL
160− requestWithRoute r u CreativesGet{..}
161− = go _cgQuotaUser _cgPrettyPrint _cgBuyerCreativeId
162− _cgUserIp
163− _cgAccountId
164− _cgKey
165− _cgOauthToken
166− _cgFields
167− _cgAlt
170+ requestWithRoute r u CreativesGet'{..}
171+ = go _cggQuotaUser (Just _cggPrettyPrint)
172+ _cggBuyerCreativeId
173+ _cggUserIp
174+ _cggAccountId
175+ _cggKey
176+ _cggOauthToken
177+ _cggFields
178+ (Just _cggAlt)
168179 where go
169− = clientWithRoute (Proxy :: Proxy CreativesGetAPI) r
180+ = clientWithRoute
181+ (Proxy :: Proxy CreativesGetResource)
182+ r
170183 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/Insert.hs+78−65
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,122 +20,134 @@
1920-- | Submit a new creative.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerCreativesInsert@.
22−module AdExchangeBuyer.Creatives.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Creatives.Insert
2324 (
2425 -- * REST Resource
25− CreativesInsertAPI
26+ CreativesInsertResource
2627
2728 -- * Creating a Request
28− , creativesInsert
29− , CreativesInsert
29+ , creativesInsert'
30+ , CreativesInsert'
3031
3132 -- * Request Lenses
32− , ciQuotaUser
33− , ciPrettyPrint
34− , ciUserIp
35− , ciKey
36− , ciOauthToken
37− , ciFields
38− , ciAlt
33+ , creQuotaUser
34+ , crePrettyPrint
35+ , creUserIp
36+ , creKey
37+ , creOauthToken
38+ , creFields
39+ , creAlt
3940 ) where
4041
4142import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerCreativesInsert@ which the
45−-- 'CreativesInsert' request conforms to.
46−type CreativesInsertAPI =
47− "creatives" :> Post '[JSON] Creative
46+-- 'CreativesInsert'' request conforms to.
47+type CreativesInsertResource =
48+ "creatives" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Post '[JSON] Creative
4856
4957-- | Submit a new creative.
5058--
51−-- /See:/ 'creativesInsert' smart constructor.
52−data CreativesInsert = CreativesInsert
53− { _ciQuotaUser :: !(Maybe Text)
54− , _ciPrettyPrint :: !Bool
55− , _ciUserIp :: !(Maybe Text)
56− , _ciKey :: !(Maybe Text)
57− , _ciOauthToken :: !(Maybe Text)
58− , _ciFields :: !(Maybe Text)
59− , _ciAlt :: !Text
59+-- /See:/ 'creativesInsert'' smart constructor.
60+data CreativesInsert' = CreativesInsert'
61+ { _creQuotaUser :: !(Maybe Text)
62+ , _crePrettyPrint :: !Bool
63+ , _creUserIp :: !(Maybe Text)
64+ , _creKey :: !(Maybe Text)
65+ , _creOauthToken :: !(Maybe Text)
66+ , _creFields :: !(Maybe Text)
67+ , _creAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'CreativesInsert'' with the minimum fields required to make a request.
6371--
6472-- Use one of the following lenses to modify other fields as desired:
6573--
66−-- * 'ciQuotaUser'
74+-- * 'creQuotaUser'
6775--
68−-- * 'ciPrettyPrint'
76+-- * 'crePrettyPrint'
6977--
70−-- * 'ciUserIp'
78+-- * 'creUserIp'
7179--
72−-- * 'ciKey'
80+-- * 'creKey'
7381--
74−-- * 'ciOauthToken'
82+-- * 'creOauthToken'
7583--
76−-- * 'ciFields'
84+-- * 'creFields'
7785--
78−-- * 'ciAlt'
79−creativesInsert
80− :: CreativesInsert
81−creativesInsert =
82− CreativesInsert
83− { _ciQuotaUser = Nothing
84− , _ciPrettyPrint = True
85− , _ciUserIp = Nothing
86− , _ciKey = Nothing
87− , _ciOauthToken = Nothing
88− , _ciFields = Nothing
89− , _ciAlt = "json"
86+-- * 'creAlt'
87+creativesInsert'
88+ :: CreativesInsert'
89+creativesInsert' =
90+ CreativesInsert'
91+ { _creQuotaUser = Nothing
92+ , _crePrettyPrint = True
93+ , _creUserIp = Nothing
94+ , _creKey = Nothing
95+ , _creOauthToken = Nothing
96+ , _creFields = Nothing
97+ , _creAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
93101-- any arbitrary string assigned to a user, but should not exceed 40
94102-- characters. Overrides userIp if both are provided.
95−ciQuotaUser :: Lens' CreativesInsert' (Maybe Text)
96−ciQuotaUser
97− = lens _ciQuotaUser (\ s a -> s{_ciQuotaUser = a})
103+creQuotaUser :: Lens' CreativesInsert' (Maybe Text)
104+creQuotaUser
105+ = lens _creQuotaUser (\ s a -> s{_creQuotaUser = a})
98106
99107-- | Returns response with indentations and line breaks.
100−ciPrettyPrint :: Lens' CreativesInsert' Bool
101−ciPrettyPrint
102− = lens _ciPrettyPrint
103− (\ s a -> s{_ciPrettyPrint = a})
108+crePrettyPrint :: Lens' CreativesInsert' Bool
109+crePrettyPrint
110+ = lens _crePrettyPrint
111+ (\ s a -> s{_crePrettyPrint = a})
104112
105113-- | IP address of the site where the request originates. Use this if you
106114-- want to enforce per-user limits.
107−ciUserIp :: Lens' CreativesInsert' (Maybe Text)
108−ciUserIp = lens _ciUserIp (\ s a -> s{_ciUserIp = a})
115+creUserIp :: Lens' CreativesInsert' (Maybe Text)
116+creUserIp
117+ = lens _creUserIp (\ s a -> s{_creUserIp = a})
109118
110119-- | API key. Your API key identifies your project and provides you with API
111120-- access, quota, and reports. Required unless you provide an OAuth 2.0
112121-- token.
113−ciKey :: Lens' CreativesInsert' (Maybe Text)
114−ciKey = lens _ciKey (\ s a -> s{_ciKey = a})
122+creKey :: Lens' CreativesInsert' (Maybe Text)
123+creKey = lens _creKey (\ s a -> s{_creKey = a})
115124
116125-- | OAuth 2.0 token for the current user.
117−ciOauthToken :: Lens' CreativesInsert' (Maybe Text)
118−ciOauthToken
119− = lens _ciOauthToken (\ s a -> s{_ciOauthToken = a})
126+creOauthToken :: Lens' CreativesInsert' (Maybe Text)
127+creOauthToken
128+ = lens _creOauthToken
129+ (\ s a -> s{_creOauthToken = a})
120130
121131-- | Selector specifying which fields to include in a partial response.
122−ciFields :: Lens' CreativesInsert' (Maybe Text)
123−ciFields = lens _ciFields (\ s a -> s{_ciFields = a})
132+creFields :: Lens' CreativesInsert' (Maybe Text)
133+creFields
134+ = lens _creFields (\ s a -> s{_creFields = a})
124135
125136-- | Data format for the response.
126−ciAlt :: Lens' CreativesInsert' Text
127−ciAlt = lens _ciAlt (\ s a -> s{_ciAlt = a})
137+creAlt :: Lens' CreativesInsert' Alt
138+creAlt = lens _creAlt (\ s a -> s{_creAlt = a})
128139
129140instance GoogleRequest CreativesInsert' where
130141 type Rs CreativesInsert' = Creative
131142 request = requestWithRoute defReq adExchangeBuyerURL
132− requestWithRoute r u CreativesInsert{..}
133− = go _ciQuotaUser _ciPrettyPrint _ciUserIp _ciKey
134− _ciOauthToken
135− _ciFields
136− _ciAlt
143+ requestWithRoute r u CreativesInsert'{..}
144+ = go _creQuotaUser (Just _crePrettyPrint) _creUserIp
145+ _creKey
146+ _creOauthToken
147+ _creFields
148+ (Just _creAlt)
137149 where go
138− = clientWithRoute (Proxy :: Proxy CreativesInsertAPI)
150+ = clientWithRoute
151+ (Proxy :: Proxy CreativesInsertResource)
139152 r
140153 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/List.hs+44−30
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- creative will be available 30-40 minutes after submission.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerCreativesList@.
23−module AdExchangeBuyer.Creatives.List
24+module Network.Google.Resource.AdExchangeBuyer.Creatives.List
2425 (
2526 -- * REST Resource
26− CreativesListAPI
27+ CreativesListResource
2728
2829 -- * Creating a Request
29− , creativesList
30− , CreativesList
30+ , creativesList'
31+ , CreativesList'
3132
3233 -- * Request Lenses
3334 , clQuotaUser
@@ -49,35 +50,45 @@ import Network.Google.AdExchangeBuyer.Types
4950import Network.Google.Prelude
5051
5152-- | A resource alias for @AdexchangebuyerCreativesList@ which the
52−-- 'CreativesList' request conforms to.
53−type CreativesListAPI =
53+-- 'CreativesList'' request conforms to.
54+type CreativesListResource =
5455 "creatives" :>
55− QueryParams "buyerCreativeId" Text :>
56− QueryParam "openAuctionStatusFilter" Text :>
57− QueryParams "accountId" Int32 :>
58− QueryParam "pageToken" Text :>
59− QueryParam "dealsStatusFilter" Text :>
60− QueryParam "maxResults" Word32 :>
61− Get '[JSON] CreativesList
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParams "buyerCreativeId" Text :>
59+ QueryParam "userIp" Text :>
60+ QueryParam "openAuctionStatusFilter"
61+ AdexchangebuyerCreativesListOpenAuctionStatusFilter
62+ :>
63+ QueryParams "accountId" Int32 :>
64+ QueryParam "key" Text :>
65+ QueryParam "pageToken" Text :>
66+ QueryParam "dealsStatusFilter"
67+ AdexchangebuyerCreativesListDealsStatusFilter
68+ :>
69+ QueryParam "oauth_token" Text :>
70+ QueryParam "maxResults" Word32 :>
71+ QueryParam "fields" Text :>
72+ QueryParam "alt" Alt :> Get '[JSON] CreativesList
6273
6374-- | Retrieves a list of the authenticated user\'s active creatives. A
6475-- creative will be available 30-40 minutes after submission.
6576--
66−-- /See:/ 'creativesList' smart constructor.
67−data CreativesList = CreativesList
77+-- /See:/ 'creativesList'' smart constructor.
78+data CreativesList' = CreativesList'
6879 { _clQuotaUser :: !(Maybe Text)
6980 , _clPrettyPrint :: !Bool
7081 , _clBuyerCreativeId :: !(Maybe Text)
7182 , _clUserIp :: !(Maybe Text)
72− , _clOpenAuctionStatusFilter :: !(Maybe Text)
83+ , _clOpenAuctionStatusFilter :: !(Maybe AdexchangebuyerCreativesListOpenAuctionStatusFilter)
7384 , _clAccountId :: !(Maybe Int32)
7485 , _clKey :: !(Maybe Text)
7586 , _clPageToken :: !(Maybe Text)
76− , _clDealsStatusFilter :: !(Maybe Text)
87+ , _clDealsStatusFilter :: !(Maybe AdexchangebuyerCreativesListDealsStatusFilter)
7788 , _clOauthToken :: !(Maybe Text)
7889 , _clMaxResults :: !(Maybe Word32)
7990 , _clFields :: !(Maybe Text)
80− , _clAlt :: !Text
91+ , _clAlt :: !Alt
8192 } deriving (Eq,Read,Show,Data,Typeable,Generic)
8293
8394-- | Creates a value of 'CreativesList'' with the minimum fields required to make a request.
@@ -109,10 +120,10 @@ data CreativesList = CreativesList
109120-- * 'clFields'
110121--
111122-- * 'clAlt'
112−creativesList
113− :: CreativesList
114−creativesList =
115− CreativesList
123+creativesList'
124+ :: CreativesList'
125+creativesList' =
126+ CreativesList'
116127 { _clQuotaUser = Nothing
117128 , _clPrettyPrint = True
118129 , _clBuyerCreativeId = Nothing
@@ -125,7 +136,7 @@ creativesList =
125136 , _clOauthToken = Nothing
126137 , _clMaxResults = Nothing
127138 , _clFields = Nothing
128− , _clAlt = "json"
139+ , _clAlt = JSON
129140 }
130141
131142-- | Available to use for quota purposes for server-side applications. Can be
@@ -155,7 +166,7 @@ clUserIp = lens _clUserIp (\ s a -> s{_clUserIp = a})
155166
156167-- | When specified, only creatives having the given open auction status are
157168-- returned.
158−clOpenAuctionStatusFilter :: Lens' CreativesList' (Maybe Text)
169+clOpenAuctionStatusFilter :: Lens' CreativesList' (Maybe AdexchangebuyerCreativesListOpenAuctionStatusFilter)
159170clOpenAuctionStatusFilter
160171 = lens _clOpenAuctionStatusFilter
161172 (\ s a -> s{_clOpenAuctionStatusFilter = a})
@@ -180,7 +191,7 @@ clPageToken
180191
181192-- | When specified, only creatives having the given direct deals status are
182193-- returned.
183−clDealsStatusFilter :: Lens' CreativesList' (Maybe Text)
194+clDealsStatusFilter :: Lens' CreativesList' (Maybe AdexchangebuyerCreativesListDealsStatusFilter)
184195clDealsStatusFilter
185196 = lens _clDealsStatusFilter
186197 (\ s a -> s{_clDealsStatusFilter = a})
@@ -201,14 +212,15 @@ clFields :: Lens' CreativesList' (Maybe Text)
201212clFields = lens _clFields (\ s a -> s{_clFields = a})
202213
203214-- | Data format for the response.
204−clAlt :: Lens' CreativesList' Text
215+clAlt :: Lens' CreativesList' Alt
205216clAlt = lens _clAlt (\ s a -> s{_clAlt = a})
206217
207218instance GoogleRequest CreativesList' where
208219 type Rs CreativesList' = CreativesList
209220 request = requestWithRoute defReq adExchangeBuyerURL
210− requestWithRoute r u CreativesList{..}
211− = go _clQuotaUser _clPrettyPrint _clBuyerCreativeId
221+ requestWithRoute r u CreativesList'{..}
222+ = go _clQuotaUser (Just _clPrettyPrint)
223+ _clBuyerCreativeId
212224 _clUserIp
213225 _clOpenAuctionStatusFilter
214226 _clAccountId
@@ -218,7 +230,9 @@ instance GoogleRequest CreativesList' where
218230 _clOauthToken
219231 _clMaxResults
220232 _clFields
221− _clAlt
233+ (Just _clAlt)
222234 where go
223− = clientWithRoute (Proxy :: Proxy CreativesListAPI) r
235+ = clientWithRoute
236+ (Proxy :: Proxy CreativesListResource)
237+ r
224238 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Deals/Get.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets the requested deal.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerDealsGet@.
22−module AdExchangeBuyer.Deals.Get
23+module Network.Google.Resource.AdExchangeBuyer.Deals.Get
2324 (
2425 -- * REST Resource
25− DealsGetAPI
26+ DealsGetResource
2627
2728 -- * Creating a Request
28− , dealsGet
29− , DealsGet
29+ , dealsGet'
30+ , DealsGet'
3031
3132 -- * Request Lenses
3233 , dgQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerDealsGet@ which the
46−-- 'DealsGet' request conforms to.
47−type DealsGetAPI =
47+-- 'DealsGet'' request conforms to.
48+type DealsGetResource =
4849 "deals" :>
49− Capture "dealId" Int64 :> Get '[JSON] NegotiationDto
50+ Capture "dealId" Int64 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] NegotiationDto
5058
5159-- | Gets the requested deal.
5260--
53−-- /See:/ 'dealsGet' smart constructor.
54−data DealsGet = DealsGet
61+-- /See:/ 'dealsGet'' smart constructor.
62+data DealsGet' = DealsGet'
5563 { _dgQuotaUser :: !(Maybe Text)
5664 , _dgPrettyPrint :: !Bool
5765 , _dgUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data DealsGet = DealsGet
5967 , _dgKey :: !(Maybe Text)
6068 , _dgOauthToken :: !(Maybe Text)
6169 , _dgFields :: !(Maybe Text)
62− , _dgAlt :: !Text
70+ , _dgAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'DealsGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data DealsGet = DealsGet
8189-- * 'dgFields'
8290--
8391-- * 'dgAlt'
84−dealsGet
92+dealsGet'
8593 :: Int64 -- ^ 'dealId'
86− -> DealsGet
87−dealsGet pDgDealId_ =
88− DealsGet
94+ -> DealsGet'
95+dealsGet' pDgDealId_ =
96+ DealsGet'
8997 { _dgQuotaUser = Nothing
9098 , _dgPrettyPrint = True
9199 , _dgUserIp = Nothing
@@ -93,7 +101,7 @@ dealsGet pDgDealId_ =
93101 , _dgKey = Nothing
94102 , _dgOauthToken = Nothing
95103 , _dgFields = Nothing
96− , _dgAlt = "json"
104+ , _dgAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -133,17 +141,19 @@ dgFields :: Lens' DealsGet' (Maybe Text)
133141dgFields = lens _dgFields (\ s a -> s{_dgFields = a})
134142
135143-- | Data format for the response.
136−dgAlt :: Lens' DealsGet' Text
144+dgAlt :: Lens' DealsGet' Alt
137145dgAlt = lens _dgAlt (\ s a -> s{_dgAlt = a})
138146
139147instance GoogleRequest DealsGet' where
140148 type Rs DealsGet' = NegotiationDto
141149 request = requestWithRoute defReq adExchangeBuyerURL
142− requestWithRoute r u DealsGet{..}
143− = go _dgQuotaUser _dgPrettyPrint _dgUserIp _dgDealId
150+ requestWithRoute r u DealsGet'{..}
151+ = go _dgQuotaUser (Just _dgPrettyPrint) _dgUserIp
152+ _dgDealId
144153 _dgKey
145154 _dgOauthToken
146155 _dgFields
147− _dgAlt
156+ (Just _dgAlt)
148157 where go
149− = clientWithRoute (Proxy :: Proxy DealsGetAPI) r u
158+ = clientWithRoute (Proxy :: Proxy DealsGetResource) r
159+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacedeals/Delete.hs+83−76
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,142 +20,148 @@
1920-- | Delete the specified deals from the order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacedealsDelete@.
22−module AdExchangeBuyer.Marketplacedeals.Delete
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Delete
2324 (
2425 -- * REST Resource
25− MarketplacedealsDeleteAPI
26+ MarketplacedealsDeleteResource
2627
2728 -- * Creating a Request
28− , marketplacedealsDelete
29− , MarketplacedealsDelete
29+ , marketplacedealsDelete'
30+ , MarketplacedealsDelete'
3031
3132 -- * Request Lenses
32− , mddQuotaUser
33− , mddPrettyPrint
34− , mddUserIp
35− , mddKey
36− , mddOauthToken
37− , mddOrderId
38− , mddFields
39− , mddAlt
33+ , mdQuotaUser
34+ , mdPrettyPrint
35+ , mdUserIp
36+ , mdKey
37+ , mdOauthToken
38+ , mdOrderId
39+ , mdFields
40+ , mdAlt
4041 ) where
4142
4243import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacedealsDelete@ which the
46−-- 'MarketplacedealsDelete' request conforms to.
47−type MarketplacedealsDeleteAPI =
47+-- 'MarketplacedealsDelete'' request conforms to.
48+type MarketplacedealsDeleteResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
5051 "deals" :>
51− "delete" :> Post '[JSON] DeleteOrderDealsResponse
52+ "delete" :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Post '[JSON] DeleteOrderDealsResponse
5261
5362-- | Delete the specified deals from the order
5463--
55−-- /See:/ 'marketplacedealsDelete' smart constructor.
56−data MarketplacedealsDelete = MarketplacedealsDelete
57− { _mddQuotaUser :: !(Maybe Text)
58− , _mddPrettyPrint :: !Bool
59− , _mddUserIp :: !(Maybe Text)
60− , _mddKey :: !(Maybe Text)
61− , _mddOauthToken :: !(Maybe Text)
62− , _mddOrderId :: !Text
63− , _mddFields :: !(Maybe Text)
64− , _mddAlt :: !Text
64+-- /See:/ 'marketplacedealsDelete'' smart constructor.
65+data MarketplacedealsDelete' = MarketplacedealsDelete'
66+ { _mdQuotaUser :: !(Maybe Text)
67+ , _mdPrettyPrint :: !Bool
68+ , _mdUserIp :: !(Maybe Text)
69+ , _mdKey :: !(Maybe Text)
70+ , _mdOauthToken :: !(Maybe Text)
71+ , _mdOrderId :: !Text
72+ , _mdFields :: !(Maybe Text)
73+ , _mdAlt :: !Alt
6574 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6675
6776-- | Creates a value of 'MarketplacedealsDelete'' with the minimum fields required to make a request.
6877--
6978-- Use one of the following lenses to modify other fields as desired:
7079--
71−-- * 'mddQuotaUser'
80+-- * 'mdQuotaUser'
7281--
73−-- * 'mddPrettyPrint'
82+-- * 'mdPrettyPrint'
7483--
75−-- * 'mddUserIp'
84+-- * 'mdUserIp'
7685--
77−-- * 'mddKey'
86+-- * 'mdKey'
7887--
79−-- * 'mddOauthToken'
88+-- * 'mdOauthToken'
8089--
81−-- * 'mddOrderId'
90+-- * 'mdOrderId'
8291--
83−-- * 'mddFields'
92+-- * 'mdFields'
8493--
85−-- * 'mddAlt'
86−marketplacedealsDelete
94+-- * 'mdAlt'
95+marketplacedealsDelete'
8796 :: Text -- ^ 'orderId'
88− -> MarketplacedealsDelete
89−marketplacedealsDelete pMddOrderId_ =
90− MarketplacedealsDelete
91− { _mddQuotaUser = Nothing
92− , _mddPrettyPrint = True
93− , _mddUserIp = Nothing
94− , _mddKey = Nothing
95− , _mddOauthToken = Nothing
96− , _mddOrderId = pMddOrderId_
97− , _mddFields = Nothing
98− , _mddAlt = "json"
97+ -> MarketplacedealsDelete'
98+marketplacedealsDelete' pMdOrderId_ =
99+ MarketplacedealsDelete'
100+ { _mdQuotaUser = Nothing
101+ , _mdPrettyPrint = True
102+ , _mdUserIp = Nothing
103+ , _mdKey = Nothing
104+ , _mdOauthToken = Nothing
105+ , _mdOrderId = pMdOrderId_
106+ , _mdFields = Nothing
107+ , _mdAlt = JSON
99108 }
100109
101110-- | Available to use for quota purposes for server-side applications. Can be
102111-- any arbitrary string assigned to a user, but should not exceed 40
103112-- characters. Overrides userIp if both are provided.
104−mddQuotaUser :: Lens' MarketplacedealsDelete' (Maybe Text)
105−mddQuotaUser
106− = lens _mddQuotaUser (\ s a -> s{_mddQuotaUser = a})
113+mdQuotaUser :: Lens' MarketplacedealsDelete' (Maybe Text)
114+mdQuotaUser
115+ = lens _mdQuotaUser (\ s a -> s{_mdQuotaUser = a})
107116
108117-- | Returns response with indentations and line breaks.
109−mddPrettyPrint :: Lens' MarketplacedealsDelete' Bool
110−mddPrettyPrint
111− = lens _mddPrettyPrint
112− (\ s a -> s{_mddPrettyPrint = a})
118+mdPrettyPrint :: Lens' MarketplacedealsDelete' Bool
119+mdPrettyPrint
120+ = lens _mdPrettyPrint
121+ (\ s a -> s{_mdPrettyPrint = a})
113122
114123-- | IP address of the site where the request originates. Use this if you
115124-- want to enforce per-user limits.
116−mddUserIp :: Lens' MarketplacedealsDelete' (Maybe Text)
117−mddUserIp
118− = lens _mddUserIp (\ s a -> s{_mddUserIp = a})
125+mdUserIp :: Lens' MarketplacedealsDelete' (Maybe Text)
126+mdUserIp = lens _mdUserIp (\ s a -> s{_mdUserIp = a})
119127
120128-- | API key. Your API key identifies your project and provides you with API
121129-- access, quota, and reports. Required unless you provide an OAuth 2.0
122130-- token.
123−mddKey :: Lens' MarketplacedealsDelete' (Maybe Text)
124−mddKey = lens _mddKey (\ s a -> s{_mddKey = a})
131+mdKey :: Lens' MarketplacedealsDelete' (Maybe Text)
132+mdKey = lens _mdKey (\ s a -> s{_mdKey = a})
125133
126134-- | OAuth 2.0 token for the current user.
127−mddOauthToken :: Lens' MarketplacedealsDelete' (Maybe Text)
128−mddOauthToken
129− = lens _mddOauthToken
130− (\ s a -> s{_mddOauthToken = a})
135+mdOauthToken :: Lens' MarketplacedealsDelete' (Maybe Text)
136+mdOauthToken
137+ = lens _mdOauthToken (\ s a -> s{_mdOauthToken = a})
131138
132139-- | The orderId to delete deals from.
133−mddOrderId :: Lens' MarketplacedealsDelete' Text
134−mddOrderId
135− = lens _mddOrderId (\ s a -> s{_mddOrderId = a})
140+mdOrderId :: Lens' MarketplacedealsDelete' Text
141+mdOrderId
142+ = lens _mdOrderId (\ s a -> s{_mdOrderId = a})
136143
137144-- | Selector specifying which fields to include in a partial response.
138−mddFields :: Lens' MarketplacedealsDelete' (Maybe Text)
139−mddFields
140− = lens _mddFields (\ s a -> s{_mddFields = a})
145+mdFields :: Lens' MarketplacedealsDelete' (Maybe Text)
146+mdFields = lens _mdFields (\ s a -> s{_mdFields = a})
141147
142148-- | Data format for the response.
143−mddAlt :: Lens' MarketplacedealsDelete' Text
144−mddAlt = lens _mddAlt (\ s a -> s{_mddAlt = a})
149+mdAlt :: Lens' MarketplacedealsDelete' Alt
150+mdAlt = lens _mdAlt (\ s a -> s{_mdAlt = a})
145151
146152instance GoogleRequest MarketplacedealsDelete' where
147153 type Rs MarketplacedealsDelete' =
148154 DeleteOrderDealsResponse
149155 request = requestWithRoute defReq adExchangeBuyerURL
150− requestWithRoute r u MarketplacedealsDelete{..}
151− = go _mddQuotaUser _mddPrettyPrint _mddUserIp _mddKey
152− _mddOauthToken
153− _mddOrderId
154− _mddFields
155− _mddAlt
156+ requestWithRoute r u MarketplacedealsDelete'{..}
157+ = go _mdQuotaUser (Just _mdPrettyPrint) _mdUserIp
158+ _mdKey
159+ _mdOauthToken
160+ _mdOrderId
161+ _mdFields
162+ (Just _mdAlt)
156163 where go
157164 = clientWithRoute
158− (Proxy :: Proxy MarketplacedealsDeleteAPI)
165+ (Proxy :: Proxy MarketplacedealsDeleteResource)
159166 r
160167 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacedeals/Insert.hs+80−76
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,142 +20,145 @@
1920-- | Add new deals for the specified order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacedealsInsert@.
22−module AdExchangeBuyer.Marketplacedeals.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Insert
2324 (
2425 -- * REST Resource
25− MarketplacedealsInsertAPI
26+ MarketplacedealsInsertResource
2627
2728 -- * Creating a Request
28− , marketplacedealsInsert
29− , MarketplacedealsInsert
29+ , marketplacedealsInsert'
30+ , MarketplacedealsInsert'
3031
3132 -- * Request Lenses
32− , miiQuotaUser
33− , miiPrettyPrint
34− , miiUserIp
35− , miiKey
36− , miiOauthToken
37− , miiOrderId
38− , miiFields
39− , miiAlt
33+ , mQuotaUser
34+ , mPrettyPrint
35+ , mUserIp
36+ , mKey
37+ , mOauthToken
38+ , mOrderId
39+ , mFields
40+ , mAlt
4041 ) where
4142
4243import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacedealsInsert@ which the
46−-- 'MarketplacedealsInsert' request conforms to.
47−type MarketplacedealsInsertAPI =
47+-- 'MarketplacedealsInsert'' request conforms to.
48+type MarketplacedealsInsertResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
5051 "deals" :>
51− "insert" :> Post '[JSON] AddOrderDealsResponse
52+ "insert" :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Post '[JSON] AddOrderDealsResponse
5261
5362-- | Add new deals for the specified order
5463--
55−-- /See:/ 'marketplacedealsInsert' smart constructor.
56−data MarketplacedealsInsert = MarketplacedealsInsert
57− { _miiQuotaUser :: !(Maybe Text)
58− , _miiPrettyPrint :: !Bool
59− , _miiUserIp :: !(Maybe Text)
60− , _miiKey :: !(Maybe Text)
61− , _miiOauthToken :: !(Maybe Text)
62− , _miiOrderId :: !Text
63− , _miiFields :: !(Maybe Text)
64− , _miiAlt :: !Text
64+-- /See:/ 'marketplacedealsInsert'' smart constructor.
65+data MarketplacedealsInsert' = MarketplacedealsInsert'
66+ { _mQuotaUser :: !(Maybe Text)
67+ , _mPrettyPrint :: !Bool
68+ , _mUserIp :: !(Maybe Text)
69+ , _mKey :: !(Maybe Text)
70+ , _mOauthToken :: !(Maybe Text)
71+ , _mOrderId :: !Text
72+ , _mFields :: !(Maybe Text)
73+ , _mAlt :: !Alt
6574 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6675
6776-- | Creates a value of 'MarketplacedealsInsert'' with the minimum fields required to make a request.
6877--
6978-- Use one of the following lenses to modify other fields as desired:
7079--
71−-- * 'miiQuotaUser'
80+-- * 'mQuotaUser'
7281--
73−-- * 'miiPrettyPrint'
82+-- * 'mPrettyPrint'
7483--
75−-- * 'miiUserIp'
84+-- * 'mUserIp'
7685--
77−-- * 'miiKey'
86+-- * 'mKey'
7887--
79−-- * 'miiOauthToken'
88+-- * 'mOauthToken'
8089--
81−-- * 'miiOrderId'
90+-- * 'mOrderId'
8291--
83−-- * 'miiFields'
92+-- * 'mFields'
8493--
85−-- * 'miiAlt'
86−marketplacedealsInsert
94+-- * 'mAlt'
95+marketplacedealsInsert'
8796 :: Text -- ^ 'orderId'
88− -> MarketplacedealsInsert
89−marketplacedealsInsert pMiiOrderId_ =
90− MarketplacedealsInsert
91− { _miiQuotaUser = Nothing
92− , _miiPrettyPrint = True
93− , _miiUserIp = Nothing
94− , _miiKey = Nothing
95− , _miiOauthToken = Nothing
96− , _miiOrderId = pMiiOrderId_
97− , _miiFields = Nothing
98− , _miiAlt = "json"
97+ -> MarketplacedealsInsert'
98+marketplacedealsInsert' pMOrderId_ =
99+ MarketplacedealsInsert'
100+ { _mQuotaUser = Nothing
101+ , _mPrettyPrint = True
102+ , _mUserIp = Nothing
103+ , _mKey = Nothing
104+ , _mOauthToken = Nothing
105+ , _mOrderId = pMOrderId_
106+ , _mFields = Nothing
107+ , _mAlt = JSON
99108 }
100109
101110-- | Available to use for quota purposes for server-side applications. Can be
102111-- any arbitrary string assigned to a user, but should not exceed 40
103112-- characters. Overrides userIp if both are provided.
104−miiQuotaUser :: Lens' MarketplacedealsInsert' (Maybe Text)
105−miiQuotaUser
106− = lens _miiQuotaUser (\ s a -> s{_miiQuotaUser = a})
113+mQuotaUser :: Lens' MarketplacedealsInsert' (Maybe Text)
114+mQuotaUser
115+ = lens _mQuotaUser (\ s a -> s{_mQuotaUser = a})
107116
108117-- | Returns response with indentations and line breaks.
109−miiPrettyPrint :: Lens' MarketplacedealsInsert' Bool
110−miiPrettyPrint
111− = lens _miiPrettyPrint
112− (\ s a -> s{_miiPrettyPrint = a})
118+mPrettyPrint :: Lens' MarketplacedealsInsert' Bool
119+mPrettyPrint
120+ = lens _mPrettyPrint (\ s a -> s{_mPrettyPrint = a})
113121
114122-- | IP address of the site where the request originates. Use this if you
115123-- want to enforce per-user limits.
116−miiUserIp :: Lens' MarketplacedealsInsert' (Maybe Text)
117−miiUserIp
118− = lens _miiUserIp (\ s a -> s{_miiUserIp = a})
124+mUserIp :: Lens' MarketplacedealsInsert' (Maybe Text)
125+mUserIp = lens _mUserIp (\ s a -> s{_mUserIp = a})
119126
120127-- | API key. Your API key identifies your project and provides you with API
121128-- access, quota, and reports. Required unless you provide an OAuth 2.0
122129-- token.
123−miiKey :: Lens' MarketplacedealsInsert' (Maybe Text)
124−miiKey = lens _miiKey (\ s a -> s{_miiKey = a})
130+mKey :: Lens' MarketplacedealsInsert' (Maybe Text)
131+mKey = lens _mKey (\ s a -> s{_mKey = a})
125132
126133-- | OAuth 2.0 token for the current user.
127−miiOauthToken :: Lens' MarketplacedealsInsert' (Maybe Text)
128−miiOauthToken
129− = lens _miiOauthToken
130− (\ s a -> s{_miiOauthToken = a})
134+mOauthToken :: Lens' MarketplacedealsInsert' (Maybe Text)
135+mOauthToken
136+ = lens _mOauthToken (\ s a -> s{_mOauthToken = a})
131137
132138-- | OrderId for which deals need to be added.
133−miiOrderId :: Lens' MarketplacedealsInsert' Text
134−miiOrderId
135− = lens _miiOrderId (\ s a -> s{_miiOrderId = a})
139+mOrderId :: Lens' MarketplacedealsInsert' Text
140+mOrderId = lens _mOrderId (\ s a -> s{_mOrderId = a})
136141
137142-- | Selector specifying which fields to include in a partial response.
138−miiFields :: Lens' MarketplacedealsInsert' (Maybe Text)
139−miiFields
140− = lens _miiFields (\ s a -> s{_miiFields = a})
143+mFields :: Lens' MarketplacedealsInsert' (Maybe Text)
144+mFields = lens _mFields (\ s a -> s{_mFields = a})
141145
142146-- | Data format for the response.
143−miiAlt :: Lens' MarketplacedealsInsert' Text
144−miiAlt = lens _miiAlt (\ s a -> s{_miiAlt = a})
147+mAlt :: Lens' MarketplacedealsInsert' Alt
148+mAlt = lens _mAlt (\ s a -> s{_mAlt = a})
145149
146150instance GoogleRequest MarketplacedealsInsert' where
147151 type Rs MarketplacedealsInsert' =
148152 AddOrderDealsResponse
149153 request = requestWithRoute defReq adExchangeBuyerURL
150− requestWithRoute r u MarketplacedealsInsert{..}
151− = go _miiQuotaUser _miiPrettyPrint _miiUserIp _miiKey
152− _miiOauthToken
153− _miiOrderId
154− _miiFields
155− _miiAlt
154+ requestWithRoute r u MarketplacedealsInsert'{..}
155+ = go _mQuotaUser (Just _mPrettyPrint) _mUserIp _mKey
156+ _mOauthToken
157+ _mOrderId
158+ _mFields
159+ (Just _mAlt)
156160 where go
157161 = clientWithRoute
158− (Proxy :: Proxy MarketplacedealsInsertAPI)
162+ (Proxy :: Proxy MarketplacedealsInsertResource)
159163 r
160164 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacedeals/List.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List all the deals for a given order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacedealsList@.
22−module AdExchangeBuyer.Marketplacedeals.List
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.List
2324 (
2425 -- * REST Resource
25− MarketplacedealsListAPI
26+ MarketplacedealsListResource
2627
2728 -- * Creating a Request
28− , marketplacedealsList
29− , MarketplacedealsList
29+ , marketplacedealsList'
30+ , MarketplacedealsList'
3031
3132 -- * Request Lenses
3233 , mllQuotaUser
@@ -43,16 +44,24 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacedealsList@ which the
46−-- 'MarketplacedealsList' request conforms to.
47−type MarketplacedealsListAPI =
47+-- 'MarketplacedealsList'' request conforms to.
48+type MarketplacedealsListResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
50− "deals" :> Get '[JSON] GetOrderDealsResponse
51+ "deals" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :>
59+ Get '[JSON] GetOrderDealsResponse
5160
5261-- | List all the deals for a given order
5362--
54−-- /See:/ 'marketplacedealsList' smart constructor.
55−data MarketplacedealsList = MarketplacedealsList
63+-- /See:/ 'marketplacedealsList'' smart constructor.
64+data MarketplacedealsList' = MarketplacedealsList'
5665 { _mllQuotaUser :: !(Maybe Text)
5766 , _mllPrettyPrint :: !Bool
5867 , _mllUserIp :: !(Maybe Text)
@@ -60,7 +69,7 @@ data MarketplacedealsList = MarketplacedealsList
6069 , _mllOauthToken :: !(Maybe Text)
6170 , _mllOrderId :: !Text
6271 , _mllFields :: !(Maybe Text)
63− , _mllAlt :: !Text
72+ , _mllAlt :: !Alt
6473 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6574
6675-- | Creates a value of 'MarketplacedealsList'' with the minimum fields required to make a request.
@@ -82,11 +91,11 @@ data MarketplacedealsList = MarketplacedealsList
8291-- * 'mllFields'
8392--
8493-- * 'mllAlt'
85−marketplacedealsList
94+marketplacedealsList'
8695 :: Text -- ^ 'orderId'
87− -> MarketplacedealsList
88−marketplacedealsList pMllOrderId_ =
89− MarketplacedealsList
96+ -> MarketplacedealsList'
97+marketplacedealsList' pMllOrderId_ =
98+ MarketplacedealsList'
9099 { _mllQuotaUser = Nothing
91100 , _mllPrettyPrint = True
92101 , _mllUserIp = Nothing
@@ -94,7 +103,7 @@ marketplacedealsList pMllOrderId_ =
94103 , _mllOauthToken = Nothing
95104 , _mllOrderId = pMllOrderId_
96105 , _mllFields = Nothing
97− , _mllAlt = "json"
106+ , _mllAlt = JSON
98107 }
99108
100109-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,20 +148,21 @@ mllFields
139148 = lens _mllFields (\ s a -> s{_mllFields = a})
140149
141150-- | Data format for the response.
142−mllAlt :: Lens' MarketplacedealsList' Text
151+mllAlt :: Lens' MarketplacedealsList' Alt
143152mllAlt = lens _mllAlt (\ s a -> s{_mllAlt = a})
144153
145154instance GoogleRequest MarketplacedealsList' where
146155 type Rs MarketplacedealsList' = GetOrderDealsResponse
147156 request = requestWithRoute defReq adExchangeBuyerURL
148− requestWithRoute r u MarketplacedealsList{..}
149− = go _mllQuotaUser _mllPrettyPrint _mllUserIp _mllKey
157+ requestWithRoute r u MarketplacedealsList'{..}
158+ = go _mllQuotaUser (Just _mllPrettyPrint) _mllUserIp
159+ _mllKey
150160 _mllOauthToken
151161 _mllOrderId
152162 _mllFields
153− _mllAlt
163+ (Just _mllAlt)
154164 where go
155165 = clientWithRoute
156− (Proxy :: Proxy MarketplacedealsListAPI)
166+ (Proxy :: Proxy MarketplacedealsListResource)
157167 r
158168 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacedeals/Update.hs+83−76
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,142 +20,148 @@
1920-- | Replaces all the deals in the order with the passed in deals
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacedealsUpdate@.
22−module AdExchangeBuyer.Marketplacedeals.Update
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacedeals.Update
2324 (
2425 -- * REST Resource
25− MarketplacedealsUpdateAPI
26+ MarketplacedealsUpdateResource
2627
2728 -- * Creating a Request
28− , marketplacedealsUpdate
29− , MarketplacedealsUpdate
29+ , marketplacedealsUpdate'
30+ , MarketplacedealsUpdate'
3031
3132 -- * Request Lenses
32− , muuQuotaUser
33− , muuPrettyPrint
34− , muuUserIp
35− , muuKey
36− , muuOauthToken
37− , muuOrderId
38− , muuFields
39− , muuAlt
33+ , muQuotaUser
34+ , muPrettyPrint
35+ , muUserIp
36+ , muKey
37+ , muOauthToken
38+ , muOrderId
39+ , muFields
40+ , muAlt
4041 ) where
4142
4243import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacedealsUpdate@ which the
46−-- 'MarketplacedealsUpdate' request conforms to.
47−type MarketplacedealsUpdateAPI =
47+-- 'MarketplacedealsUpdate'' request conforms to.
48+type MarketplacedealsUpdateResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
5051 "deals" :>
51− "update" :> Post '[JSON] EditAllOrderDealsResponse
52+ "update" :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Post '[JSON] EditAllOrderDealsResponse
5261
5362-- | Replaces all the deals in the order with the passed in deals
5463--
55−-- /See:/ 'marketplacedealsUpdate' smart constructor.
56−data MarketplacedealsUpdate = MarketplacedealsUpdate
57− { _muuQuotaUser :: !(Maybe Text)
58− , _muuPrettyPrint :: !Bool
59− , _muuUserIp :: !(Maybe Text)
60− , _muuKey :: !(Maybe Text)
61− , _muuOauthToken :: !(Maybe Text)
62− , _muuOrderId :: !Text
63− , _muuFields :: !(Maybe Text)
64− , _muuAlt :: !Text
64+-- /See:/ 'marketplacedealsUpdate'' smart constructor.
65+data MarketplacedealsUpdate' = MarketplacedealsUpdate'
66+ { _muQuotaUser :: !(Maybe Text)
67+ , _muPrettyPrint :: !Bool
68+ , _muUserIp :: !(Maybe Text)
69+ , _muKey :: !(Maybe Text)
70+ , _muOauthToken :: !(Maybe Text)
71+ , _muOrderId :: !Text
72+ , _muFields :: !(Maybe Text)
73+ , _muAlt :: !Alt
6574 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6675
6776-- | Creates a value of 'MarketplacedealsUpdate'' with the minimum fields required to make a request.
6877--
6978-- Use one of the following lenses to modify other fields as desired:
7079--
71−-- * 'muuQuotaUser'
80+-- * 'muQuotaUser'
7281--
73−-- * 'muuPrettyPrint'
82+-- * 'muPrettyPrint'
7483--
75−-- * 'muuUserIp'
84+-- * 'muUserIp'
7685--
77−-- * 'muuKey'
86+-- * 'muKey'
7887--
79−-- * 'muuOauthToken'
88+-- * 'muOauthToken'
8089--
81−-- * 'muuOrderId'
90+-- * 'muOrderId'
8291--
83−-- * 'muuFields'
92+-- * 'muFields'
8493--
85−-- * 'muuAlt'
86−marketplacedealsUpdate
94+-- * 'muAlt'
95+marketplacedealsUpdate'
8796 :: Text -- ^ 'orderId'
88− -> MarketplacedealsUpdate
89−marketplacedealsUpdate pMuuOrderId_ =
90− MarketplacedealsUpdate
91− { _muuQuotaUser = Nothing
92− , _muuPrettyPrint = True
93− , _muuUserIp = Nothing
94− , _muuKey = Nothing
95− , _muuOauthToken = Nothing
96− , _muuOrderId = pMuuOrderId_
97− , _muuFields = Nothing
98− , _muuAlt = "json"
97+ -> MarketplacedealsUpdate'
98+marketplacedealsUpdate' pMuOrderId_ =
99+ MarketplacedealsUpdate'
100+ { _muQuotaUser = Nothing
101+ , _muPrettyPrint = True
102+ , _muUserIp = Nothing
103+ , _muKey = Nothing
104+ , _muOauthToken = Nothing
105+ , _muOrderId = pMuOrderId_
106+ , _muFields = Nothing
107+ , _muAlt = JSON
99108 }
100109
101110-- | Available to use for quota purposes for server-side applications. Can be
102111-- any arbitrary string assigned to a user, but should not exceed 40
103112-- characters. Overrides userIp if both are provided.
104−muuQuotaUser :: Lens' MarketplacedealsUpdate' (Maybe Text)
105−muuQuotaUser
106− = lens _muuQuotaUser (\ s a -> s{_muuQuotaUser = a})
113+muQuotaUser :: Lens' MarketplacedealsUpdate' (Maybe Text)
114+muQuotaUser
115+ = lens _muQuotaUser (\ s a -> s{_muQuotaUser = a})
107116
108117-- | Returns response with indentations and line breaks.
109−muuPrettyPrint :: Lens' MarketplacedealsUpdate' Bool
110−muuPrettyPrint
111− = lens _muuPrettyPrint
112− (\ s a -> s{_muuPrettyPrint = a})
118+muPrettyPrint :: Lens' MarketplacedealsUpdate' Bool
119+muPrettyPrint
120+ = lens _muPrettyPrint
121+ (\ s a -> s{_muPrettyPrint = a})
113122
114123-- | IP address of the site where the request originates. Use this if you
115124-- want to enforce per-user limits.
116−muuUserIp :: Lens' MarketplacedealsUpdate' (Maybe Text)
117−muuUserIp
118− = lens _muuUserIp (\ s a -> s{_muuUserIp = a})
125+muUserIp :: Lens' MarketplacedealsUpdate' (Maybe Text)
126+muUserIp = lens _muUserIp (\ s a -> s{_muUserIp = a})
119127
120128-- | API key. Your API key identifies your project and provides you with API
121129-- access, quota, and reports. Required unless you provide an OAuth 2.0
122130-- token.
123−muuKey :: Lens' MarketplacedealsUpdate' (Maybe Text)
124−muuKey = lens _muuKey (\ s a -> s{_muuKey = a})
131+muKey :: Lens' MarketplacedealsUpdate' (Maybe Text)
132+muKey = lens _muKey (\ s a -> s{_muKey = a})
125133
126134-- | OAuth 2.0 token for the current user.
127−muuOauthToken :: Lens' MarketplacedealsUpdate' (Maybe Text)
128−muuOauthToken
129− = lens _muuOauthToken
130− (\ s a -> s{_muuOauthToken = a})
135+muOauthToken :: Lens' MarketplacedealsUpdate' (Maybe Text)
136+muOauthToken
137+ = lens _muOauthToken (\ s a -> s{_muOauthToken = a})
131138
132139-- | The orderId to edit deals on.
133−muuOrderId :: Lens' MarketplacedealsUpdate' Text
134−muuOrderId
135− = lens _muuOrderId (\ s a -> s{_muuOrderId = a})
140+muOrderId :: Lens' MarketplacedealsUpdate' Text
141+muOrderId
142+ = lens _muOrderId (\ s a -> s{_muOrderId = a})
136143
137144-- | Selector specifying which fields to include in a partial response.
138−muuFields :: Lens' MarketplacedealsUpdate' (Maybe Text)
139−muuFields
140− = lens _muuFields (\ s a -> s{_muuFields = a})
145+muFields :: Lens' MarketplacedealsUpdate' (Maybe Text)
146+muFields = lens _muFields (\ s a -> s{_muFields = a})
141147
142148-- | Data format for the response.
143−muuAlt :: Lens' MarketplacedealsUpdate' Text
144−muuAlt = lens _muuAlt (\ s a -> s{_muuAlt = a})
149+muAlt :: Lens' MarketplacedealsUpdate' Alt
150+muAlt = lens _muAlt (\ s a -> s{_muAlt = a})
145151
146152instance GoogleRequest MarketplacedealsUpdate' where
147153 type Rs MarketplacedealsUpdate' =
148154 EditAllOrderDealsResponse
149155 request = requestWithRoute defReq adExchangeBuyerURL
150− requestWithRoute r u MarketplacedealsUpdate{..}
151− = go _muuQuotaUser _muuPrettyPrint _muuUserIp _muuKey
152− _muuOauthToken
153− _muuOrderId
154− _muuFields
155− _muuAlt
156+ requestWithRoute r u MarketplacedealsUpdate'{..}
157+ = go _muQuotaUser (Just _muPrettyPrint) _muUserIp
158+ _muKey
159+ _muOauthToken
160+ _muOrderId
161+ _muFields
162+ (Just _muAlt)
156163 where go
157164 = clientWithRoute
158− (Proxy :: Proxy MarketplacedealsUpdateAPI)
165+ (Proxy :: Proxy MarketplacedealsUpdateResource)
159166 r
160167 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacenotes/Insert.hs+86−73
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,139 +20,151 @@
1920-- | Add notes to the order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacenotesInsert@.
22−module AdExchangeBuyer.Marketplacenotes.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacenotes.Insert
2324 (
2425 -- * REST Resource
25− MarketplacenotesInsertAPI
26+ MarketplacenotesInsertResource
2627
2728 -- * Creating a Request
28− , marketplacenotesInsert
29− , MarketplacenotesInsert
29+ , marketplacenotesInsert'
30+ , MarketplacenotesInsert'
3031
3132 -- * Request Lenses
32− , miQuotaUser
33− , miPrettyPrint
34− , miUserIp
35− , miKey
36− , miOauthToken
37− , miOrderId
38− , miFields
39− , miAlt
33+ , miiQuotaUser
34+ , miiPrettyPrint
35+ , miiUserIp
36+ , miiKey
37+ , miiOauthToken
38+ , miiOrderId
39+ , miiFields
40+ , miiAlt
4041 ) where
4142
4243import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacenotesInsert@ which the
46−-- 'MarketplacenotesInsert' request conforms to.
47−type MarketplacenotesInsertAPI =
47+-- 'MarketplacenotesInsert'' request conforms to.
48+type MarketplacenotesInsertResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
5051 "notes" :>
51− "insert" :> Post '[JSON] AddOrderNotesResponse
52+ "insert" :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Post '[JSON] AddOrderNotesResponse
5261
5362-- | Add notes to the order
5463--
55−-- /See:/ 'marketplacenotesInsert' smart constructor.
56−data MarketplacenotesInsert = MarketplacenotesInsert
57− { _miQuotaUser :: !(Maybe Text)
58− , _miPrettyPrint :: !Bool
59− , _miUserIp :: !(Maybe Text)
60− , _miKey :: !(Maybe Text)
61− , _miOauthToken :: !(Maybe Text)
62− , _miOrderId :: !Text
63− , _miFields :: !(Maybe Text)
64− , _miAlt :: !Text
64+-- /See:/ 'marketplacenotesInsert'' smart constructor.
65+data MarketplacenotesInsert' = MarketplacenotesInsert'
66+ { _miiQuotaUser :: !(Maybe Text)
67+ , _miiPrettyPrint :: !Bool
68+ , _miiUserIp :: !(Maybe Text)
69+ , _miiKey :: !(Maybe Text)
70+ , _miiOauthToken :: !(Maybe Text)
71+ , _miiOrderId :: !Text
72+ , _miiFields :: !(Maybe Text)
73+ , _miiAlt :: !Alt
6574 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6675
6776-- | Creates a value of 'MarketplacenotesInsert'' with the minimum fields required to make a request.
6877--
6978-- Use one of the following lenses to modify other fields as desired:
7079--
71−-- * 'miQuotaUser'
80+-- * 'miiQuotaUser'
7281--
73−-- * 'miPrettyPrint'
82+-- * 'miiPrettyPrint'
7483--
75−-- * 'miUserIp'
84+-- * 'miiUserIp'
7685--
77−-- * 'miKey'
86+-- * 'miiKey'
7887--
79−-- * 'miOauthToken'
88+-- * 'miiOauthToken'
8089--
81−-- * 'miOrderId'
90+-- * 'miiOrderId'
8291--
83−-- * 'miFields'
92+-- * 'miiFields'
8493--
85−-- * 'miAlt'
86−marketplacenotesInsert
94+-- * 'miiAlt'
95+marketplacenotesInsert'
8796 :: Text -- ^ 'orderId'
88− -> MarketplacenotesInsert
89−marketplacenotesInsert pMiOrderId_ =
90− MarketplacenotesInsert
91− { _miQuotaUser = Nothing
92− , _miPrettyPrint = True
93− , _miUserIp = Nothing
94− , _miKey = Nothing
95− , _miOauthToken = Nothing
96− , _miOrderId = pMiOrderId_
97− , _miFields = Nothing
98− , _miAlt = "json"
97+ -> MarketplacenotesInsert'
98+marketplacenotesInsert' pMiiOrderId_ =
99+ MarketplacenotesInsert'
100+ { _miiQuotaUser = Nothing
101+ , _miiPrettyPrint = True
102+ , _miiUserIp = Nothing
103+ , _miiKey = Nothing
104+ , _miiOauthToken = Nothing
105+ , _miiOrderId = pMiiOrderId_
106+ , _miiFields = Nothing
107+ , _miiAlt = JSON
99108 }
100109
101110-- | Available to use for quota purposes for server-side applications. Can be
102111-- any arbitrary string assigned to a user, but should not exceed 40
103112-- characters. Overrides userIp if both are provided.
104−miQuotaUser :: Lens' MarketplacenotesInsert' (Maybe Text)
105−miQuotaUser
106− = lens _miQuotaUser (\ s a -> s{_miQuotaUser = a})
113+miiQuotaUser :: Lens' MarketplacenotesInsert' (Maybe Text)
114+miiQuotaUser
115+ = lens _miiQuotaUser (\ s a -> s{_miiQuotaUser = a})
107116
108117-- | Returns response with indentations and line breaks.
109−miPrettyPrint :: Lens' MarketplacenotesInsert' Bool
110−miPrettyPrint
111− = lens _miPrettyPrint
112− (\ s a -> s{_miPrettyPrint = a})
118+miiPrettyPrint :: Lens' MarketplacenotesInsert' Bool
119+miiPrettyPrint
120+ = lens _miiPrettyPrint
121+ (\ s a -> s{_miiPrettyPrint = a})
113122
114123-- | IP address of the site where the request originates. Use this if you
115124-- want to enforce per-user limits.
116−miUserIp :: Lens' MarketplacenotesInsert' (Maybe Text)
117−miUserIp = lens _miUserIp (\ s a -> s{_miUserIp = a})
125+miiUserIp :: Lens' MarketplacenotesInsert' (Maybe Text)
126+miiUserIp
127+ = lens _miiUserIp (\ s a -> s{_miiUserIp = a})
118128
119129-- | API key. Your API key identifies your project and provides you with API
120130-- access, quota, and reports. Required unless you provide an OAuth 2.0
121131-- token.
122−miKey :: Lens' MarketplacenotesInsert' (Maybe Text)
123−miKey = lens _miKey (\ s a -> s{_miKey = a})
132+miiKey :: Lens' MarketplacenotesInsert' (Maybe Text)
133+miiKey = lens _miiKey (\ s a -> s{_miiKey = a})
124134
125135-- | OAuth 2.0 token for the current user.
126−miOauthToken :: Lens' MarketplacenotesInsert' (Maybe Text)
127−miOauthToken
128− = lens _miOauthToken (\ s a -> s{_miOauthToken = a})
136+miiOauthToken :: Lens' MarketplacenotesInsert' (Maybe Text)
137+miiOauthToken
138+ = lens _miiOauthToken
139+ (\ s a -> s{_miiOauthToken = a})
129140
130141-- | The orderId to add notes for.
131−miOrderId :: Lens' MarketplacenotesInsert' Text
132−miOrderId
133− = lens _miOrderId (\ s a -> s{_miOrderId = a})
142+miiOrderId :: Lens' MarketplacenotesInsert' Text
143+miiOrderId
144+ = lens _miiOrderId (\ s a -> s{_miiOrderId = a})
134145
135146-- | Selector specifying which fields to include in a partial response.
136−miFields :: Lens' MarketplacenotesInsert' (Maybe Text)
137−miFields = lens _miFields (\ s a -> s{_miFields = a})
147+miiFields :: Lens' MarketplacenotesInsert' (Maybe Text)
148+miiFields
149+ = lens _miiFields (\ s a -> s{_miiFields = a})
138150
139151-- | Data format for the response.
140−miAlt :: Lens' MarketplacenotesInsert' Text
141−miAlt = lens _miAlt (\ s a -> s{_miAlt = a})
152+miiAlt :: Lens' MarketplacenotesInsert' Alt
153+miiAlt = lens _miiAlt (\ s a -> s{_miiAlt = a})
142154
143155instance GoogleRequest MarketplacenotesInsert' where
144156 type Rs MarketplacenotesInsert' =
145157 AddOrderNotesResponse
146158 request = requestWithRoute defReq adExchangeBuyerURL
147− requestWithRoute r u MarketplacenotesInsert{..}
148− = go _miQuotaUser _miPrettyPrint _miUserIp _miKey
149− _miOauthToken
150− _miOrderId
151− _miFields
152− _miAlt
159+ requestWithRoute r u MarketplacenotesInsert'{..}
160+ = go _miiQuotaUser (Just _miiPrettyPrint) _miiUserIp
161+ _miiKey
162+ _miiOauthToken
163+ _miiOrderId
164+ _miiFields
165+ (Just _miiAlt)
153166 where go
154167 = clientWithRoute
155− (Proxy :: Proxy MarketplacenotesInsertAPI)
168+ (Proxy :: Proxy MarketplacenotesInsertResource)
156169 r
157170 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplacenotes/List.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get all the notes associated with an order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplacenotesList@.
22−module AdExchangeBuyer.Marketplacenotes.List
23+module Network.Google.Resource.AdExchangeBuyer.Marketplacenotes.List
2324 (
2425 -- * REST Resource
25− MarketplacenotesListAPI
26+ MarketplacenotesListResource
2627
2728 -- * Creating a Request
28− , marketplacenotesList
29− , MarketplacenotesList
29+ , marketplacenotesList'
30+ , MarketplacenotesList'
3031
3132 -- * Request Lenses
3233 , mlQuotaUser
@@ -43,16 +44,24 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplacenotesList@ which the
46−-- 'MarketplacenotesList' request conforms to.
47−type MarketplacenotesListAPI =
47+-- 'MarketplacenotesList'' request conforms to.
48+type MarketplacenotesListResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
50− "notes" :> Get '[JSON] GetOrderNotesResponse
51+ "notes" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :>
59+ Get '[JSON] GetOrderNotesResponse
5160
5261-- | Get all the notes associated with an order
5362--
54−-- /See:/ 'marketplacenotesList' smart constructor.
55−data MarketplacenotesList = MarketplacenotesList
63+-- /See:/ 'marketplacenotesList'' smart constructor.
64+data MarketplacenotesList' = MarketplacenotesList'
5665 { _mlQuotaUser :: !(Maybe Text)
5766 , _mlPrettyPrint :: !Bool
5867 , _mlUserIp :: !(Maybe Text)
@@ -60,7 +69,7 @@ data MarketplacenotesList = MarketplacenotesList
6069 , _mlOauthToken :: !(Maybe Text)
6170 , _mlOrderId :: !Text
6271 , _mlFields :: !(Maybe Text)
63− , _mlAlt :: !Text
72+ , _mlAlt :: !Alt
6473 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6574
6675-- | Creates a value of 'MarketplacenotesList'' with the minimum fields required to make a request.
@@ -82,11 +91,11 @@ data MarketplacenotesList = MarketplacenotesList
8291-- * 'mlFields'
8392--
8493-- * 'mlAlt'
85−marketplacenotesList
94+marketplacenotesList'
8695 :: Text -- ^ 'orderId'
87− -> MarketplacenotesList
88−marketplacenotesList pMlOrderId_ =
89− MarketplacenotesList
96+ -> MarketplacenotesList'
97+marketplacenotesList' pMlOrderId_ =
98+ MarketplacenotesList'
9099 { _mlQuotaUser = Nothing
91100 , _mlPrettyPrint = True
92101 , _mlUserIp = Nothing
@@ -94,7 +103,7 @@ marketplacenotesList pMlOrderId_ =
94103 , _mlOauthToken = Nothing
95104 , _mlOrderId = pMlOrderId_
96105 , _mlFields = Nothing
97− , _mlAlt = "json"
106+ , _mlAlt = JSON
98107 }
99108
100109-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,20 +145,21 @@ mlFields :: Lens' MarketplacenotesList' (Maybe Text)
136145mlFields = lens _mlFields (\ s a -> s{_mlFields = a})
137146
138147-- | Data format for the response.
139−mlAlt :: Lens' MarketplacenotesList' Text
148+mlAlt :: Lens' MarketplacenotesList' Alt
140149mlAlt = lens _mlAlt (\ s a -> s{_mlAlt = a})
141150
142151instance GoogleRequest MarketplacenotesList' where
143152 type Rs MarketplacenotesList' = GetOrderNotesResponse
144153 request = requestWithRoute defReq adExchangeBuyerURL
145− requestWithRoute r u MarketplacenotesList{..}
146− = go _mlQuotaUser _mlPrettyPrint _mlUserIp _mlKey
154+ requestWithRoute r u MarketplacenotesList'{..}
155+ = go _mlQuotaUser (Just _mlPrettyPrint) _mlUserIp
156+ _mlKey
147157 _mlOauthToken
148158 _mlOrderId
149159 _mlFields
150− _mlAlt
160+ (Just _mlAlt)
151161 where go
152162 = clientWithRoute
153− (Proxy :: Proxy MarketplacenotesListAPI)
163+ (Proxy :: Proxy MarketplacenotesListResource)
154164 r
155165 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceoffers/Get.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets the requested negotiation.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceoffersGet@.
22−module AdExchangeBuyer.Marketplaceoffers.Get
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceoffers.Get
2324 (
2425 -- * REST Resource
25− MarketplaceoffersGetAPI
26+ MarketplaceoffersGetResource
2627
2728 -- * Creating a Request
28− , marketplaceoffersGet
29− , MarketplaceoffersGet
29+ , marketplaceoffersGet'
30+ , MarketplaceoffersGet'
3031
3132 -- * Request Lenses
3233 , mgQuotaUser
@@ -43,16 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplaceoffersGet@ which the
46−-- 'MarketplaceoffersGet' request conforms to.
47−type MarketplaceoffersGetAPI =
47+-- 'MarketplaceoffersGet'' request conforms to.
48+type MarketplaceoffersGetResource =
4849 "marketplaceOffers" :>
4950 Capture "offerId" Text :>
50− Get '[JSON] MarketplaceOffer
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] MarketplaceOffer
5158
5259-- | Gets the requested negotiation.
5360--
54−-- /See:/ 'marketplaceoffersGet' smart constructor.
55−data MarketplaceoffersGet = MarketplaceoffersGet
61+-- /See:/ 'marketplaceoffersGet'' smart constructor.
62+data MarketplaceoffersGet' = MarketplaceoffersGet'
5663 { _mgQuotaUser :: !(Maybe Text)
5764 , _mgPrettyPrint :: !Bool
5865 , _mgUserIp :: !(Maybe Text)
@@ -60,7 +67,7 @@ data MarketplaceoffersGet = MarketplaceoffersGet
6067 , _mgOfferId :: !Text
6168 , _mgOauthToken :: !(Maybe Text)
6269 , _mgFields :: !(Maybe Text)
63− , _mgAlt :: !Text
70+ , _mgAlt :: !Alt
6471 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6572
6673-- | Creates a value of 'MarketplaceoffersGet'' with the minimum fields required to make a request.
@@ -82,11 +89,11 @@ data MarketplaceoffersGet = MarketplaceoffersGet
8289-- * 'mgFields'
8390--
8491-- * 'mgAlt'
85−marketplaceoffersGet
92+marketplaceoffersGet'
8693 :: Text -- ^ 'offerId'
87− -> MarketplaceoffersGet
88−marketplaceoffersGet pMgOfferId_ =
89− MarketplaceoffersGet
94+ -> MarketplaceoffersGet'
95+marketplaceoffersGet' pMgOfferId_ =
96+ MarketplaceoffersGet'
9097 { _mgQuotaUser = Nothing
9198 , _mgPrettyPrint = True
9299 , _mgUserIp = Nothing
@@ -94,7 +101,7 @@ marketplaceoffersGet pMgOfferId_ =
94101 , _mgOfferId = pMgOfferId_
95102 , _mgOauthToken = Nothing
96103 , _mgFields = Nothing
97− , _mgAlt = "json"
104+ , _mgAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,20 +143,21 @@ mgFields :: Lens' MarketplaceoffersGet' (Maybe Text)
136143mgFields = lens _mgFields (\ s a -> s{_mgFields = a})
137144
138145-- | Data format for the response.
139−mgAlt :: Lens' MarketplaceoffersGet' Text
146+mgAlt :: Lens' MarketplaceoffersGet' Alt
140147mgAlt = lens _mgAlt (\ s a -> s{_mgAlt = a})
141148
142149instance GoogleRequest MarketplaceoffersGet' where
143150 type Rs MarketplaceoffersGet' = MarketplaceOffer
144151 request = requestWithRoute defReq adExchangeBuyerURL
145− requestWithRoute r u MarketplaceoffersGet{..}
146− = go _mgQuotaUser _mgPrettyPrint _mgUserIp _mgKey
152+ requestWithRoute r u MarketplaceoffersGet'{..}
153+ = go _mgQuotaUser (Just _mgPrettyPrint) _mgUserIp
154+ _mgKey
147155 _mgOfferId
148156 _mgOauthToken
149157 _mgFields
150− _mgAlt
158+ (Just _mgAlt)
151159 where go
152160 = clientWithRoute
153− (Proxy :: Proxy MarketplaceoffersGetAPI)
161+ (Proxy :: Proxy MarketplaceoffersGetResource)
154162 r
155163 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceoffers/Search.hs+29−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets the requested negotiation.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceoffersSearch@.
22−module AdExchangeBuyer.Marketplaceoffers.Search
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceoffers.Search
2324 (
2425 -- * REST Resource
25− MarketplaceoffersSearchAPI
26+ MarketplaceoffersSearchResource
2627
2728 -- * Creating a Request
28− , marketplaceoffersSearch
29− , MarketplaceoffersSearch
29+ , marketplaceoffersSearch'
30+ , MarketplaceoffersSearch'
3031
3132 -- * Request Lenses
3233 , msQuotaUser
@@ -43,17 +44,23 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplaceoffersSearch@ which the
46−-- 'MarketplaceoffersSearch' request conforms to.
47−type MarketplaceoffersSearchAPI =
47+-- 'MarketplaceoffersSearch'' request conforms to.
48+type MarketplaceoffersSearchResource =
4849 "marketplaceOffers" :>
4950 "search" :>
50− QueryParam "pqlQuery" Text :>
51− Get '[JSON] GetOffersResponse
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "pqlQuery" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Get '[JSON] GetOffersResponse
5259
5360-- | Gets the requested negotiation.
5461--
55−-- /See:/ 'marketplaceoffersSearch' smart constructor.
56−data MarketplaceoffersSearch = MarketplaceoffersSearch
62+-- /See:/ 'marketplaceoffersSearch'' smart constructor.
63+data MarketplaceoffersSearch' = MarketplaceoffersSearch'
5764 { _msQuotaUser :: !(Maybe Text)
5865 , _msPrettyPrint :: !Bool
5966 , _msUserIp :: !(Maybe Text)
@@ -61,7 +68,7 @@ data MarketplaceoffersSearch = MarketplaceoffersSearch
6168 , _msPqlQuery :: !(Maybe Text)
6269 , _msOauthToken :: !(Maybe Text)
6370 , _msFields :: !(Maybe Text)
64− , _msAlt :: !Text
71+ , _msAlt :: !Alt
6572 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6673
6774-- | Creates a value of 'MarketplaceoffersSearch'' with the minimum fields required to make a request.
@@ -83,10 +90,10 @@ data MarketplaceoffersSearch = MarketplaceoffersSearch
8390-- * 'msFields'
8491--
8592-- * 'msAlt'
86−marketplaceoffersSearch
87− :: MarketplaceoffersSearch
88−marketplaceoffersSearch =
89− MarketplaceoffersSearch
93+marketplaceoffersSearch'
94+ :: MarketplaceoffersSearch'
95+marketplaceoffersSearch' =
96+ MarketplaceoffersSearch'
9097 { _msQuotaUser = Nothing
9198 , _msPrettyPrint = True
9299 , _msUserIp = Nothing
@@ -94,7 +101,7 @@ marketplaceoffersSearch =
94101 , _msPqlQuery = Nothing
95102 , _msOauthToken = Nothing
96103 , _msFields = Nothing
97− , _msAlt = "json"
104+ , _msAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,20 +143,21 @@ msFields :: Lens' MarketplaceoffersSearch' (Maybe Text)
136143msFields = lens _msFields (\ s a -> s{_msFields = a})
137144
138145-- | Data format for the response.
139−msAlt :: Lens' MarketplaceoffersSearch' Text
146+msAlt :: Lens' MarketplaceoffersSearch' Alt
140147msAlt = lens _msAlt (\ s a -> s{_msAlt = a})
141148
142149instance GoogleRequest MarketplaceoffersSearch' where
143150 type Rs MarketplaceoffersSearch' = GetOffersResponse
144151 request = requestWithRoute defReq adExchangeBuyerURL
145− requestWithRoute r u MarketplaceoffersSearch{..}
146− = go _msQuotaUser _msPrettyPrint _msUserIp _msKey
152+ requestWithRoute r u MarketplaceoffersSearch'{..}
153+ = go _msQuotaUser (Just _msPrettyPrint) _msUserIp
154+ _msKey
147155 _msPqlQuery
148156 _msOauthToken
149157 _msFields
150− _msAlt
158+ (Just _msAlt)
151159 where go
152160 = clientWithRoute
153− (Proxy :: Proxy MarketplaceoffersSearchAPI)
161+ (Proxy :: Proxy MarketplaceoffersSearchResource)
154162 r
155163 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceorders/Get.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get an order given its id
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceordersGet@.
22−module AdExchangeBuyer.Marketplaceorders.Get
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Get
2324 (
2425 -- * REST Resource
25− MarketplaceordersGetAPI
26+ MarketplaceordersGetResource
2627
2728 -- * Creating a Request
28− , marketplaceordersGet
29− , MarketplaceordersGet
29+ , marketplaceordersGet'
30+ , MarketplaceordersGet'
3031
3132 -- * Request Lenses
3233 , marQuotaUser
@@ -43,16 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplaceordersGet@ which the
46−-- 'MarketplaceordersGet' request conforms to.
47−type MarketplaceordersGetAPI =
47+-- 'MarketplaceordersGet'' request conforms to.
48+type MarketplaceordersGetResource =
4849 "marketplaceOrders" :>
4950 Capture "orderId" Text :>
50− Get '[JSON] MarketplaceOrder
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] MarketplaceOrder
5158
5259-- | Get an order given its id
5360--
54−-- /See:/ 'marketplaceordersGet' smart constructor.
55−data MarketplaceordersGet = MarketplaceordersGet
61+-- /See:/ 'marketplaceordersGet'' smart constructor.
62+data MarketplaceordersGet' = MarketplaceordersGet'
5663 { _marQuotaUser :: !(Maybe Text)
5764 , _marPrettyPrint :: !Bool
5865 , _marUserIp :: !(Maybe Text)
@@ -60,7 +67,7 @@ data MarketplaceordersGet = MarketplaceordersGet
6067 , _marOauthToken :: !(Maybe Text)
6168 , _marOrderId :: !Text
6269 , _marFields :: !(Maybe Text)
63− , _marAlt :: !Text
70+ , _marAlt :: !Alt
6471 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6572
6673-- | Creates a value of 'MarketplaceordersGet'' with the minimum fields required to make a request.
@@ -82,11 +89,11 @@ data MarketplaceordersGet = MarketplaceordersGet
8289-- * 'marFields'
8390--
8491-- * 'marAlt'
85−marketplaceordersGet
92+marketplaceordersGet'
8693 :: Text -- ^ 'orderId'
87− -> MarketplaceordersGet
88−marketplaceordersGet pMarOrderId_ =
89− MarketplaceordersGet
94+ -> MarketplaceordersGet'
95+marketplaceordersGet' pMarOrderId_ =
96+ MarketplaceordersGet'
9097 { _marQuotaUser = Nothing
9198 , _marPrettyPrint = True
9299 , _marUserIp = Nothing
@@ -94,7 +101,7 @@ marketplaceordersGet pMarOrderId_ =
94101 , _marOauthToken = Nothing
95102 , _marOrderId = pMarOrderId_
96103 , _marFields = Nothing
97− , _marAlt = "json"
104+ , _marAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,20 +146,21 @@ marFields
139146 = lens _marFields (\ s a -> s{_marFields = a})
140147
141148-- | Data format for the response.
142−marAlt :: Lens' MarketplaceordersGet' Text
149+marAlt :: Lens' MarketplaceordersGet' Alt
143150marAlt = lens _marAlt (\ s a -> s{_marAlt = a})
144151
145152instance GoogleRequest MarketplaceordersGet' where
146153 type Rs MarketplaceordersGet' = MarketplaceOrder
147154 request = requestWithRoute defReq adExchangeBuyerURL
148− requestWithRoute r u MarketplaceordersGet{..}
149− = go _marQuotaUser _marPrettyPrint _marUserIp _marKey
155+ requestWithRoute r u MarketplaceordersGet'{..}
156+ = go _marQuotaUser (Just _marPrettyPrint) _marUserIp
157+ _marKey
150158 _marOauthToken
151159 _marOrderId
152160 _marFields
153− _marAlt
161+ (Just _marAlt)
154162 where go
155163 = clientWithRoute
156− (Proxy :: Proxy MarketplaceordersGetAPI)
164+ (Proxy :: Proxy MarketplaceordersGetResource)
157165 r
158166 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceorders/Insert.hs+75−64
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,124 +20,134 @@
1920-- | Create the given list of orders
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceordersInsert@.
22−module AdExchangeBuyer.Marketplaceorders.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Insert
2324 (
2425 -- * REST Resource
25− MarketplaceordersInsertAPI
26+ MarketplaceordersInsertResource
2627
2728 -- * Creating a Request
28− , marketplaceordersInsert
29− , MarketplaceordersInsert
29+ , marketplaceordersInsert'
30+ , MarketplaceordersInsert'
3031
3132 -- * Request Lenses
32− , mQuotaUser
33− , mPrettyPrint
34− , mUserIp
35− , mKey
36− , mOauthToken
37− , mFields
38− , mAlt
33+ , miQuotaUser
34+ , miPrettyPrint
35+ , miUserIp
36+ , miKey
37+ , miOauthToken
38+ , miFields
39+ , miAlt
3940 ) where
4041
4142import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerMarketplaceordersInsert@ which the
45−-- 'MarketplaceordersInsert' request conforms to.
46−type MarketplaceordersInsertAPI =
46+-- 'MarketplaceordersInsert'' request conforms to.
47+type MarketplaceordersInsertResource =
4748 "marketplaceOrders" :>
48− "insert" :> Post '[JSON] CreateOrdersResponse
49+ "insert" :>
50+ QueryParam "quotaUser" Text :>
51+ QueryParam "prettyPrint" Bool :>
52+ QueryParam "userIp" Text :>
53+ QueryParam "key" Text :>
54+ QueryParam "oauth_token" Text :>
55+ QueryParam "fields" Text :>
56+ QueryParam "alt" Alt :>
57+ Post '[JSON] CreateOrdersResponse
4958
5059-- | Create the given list of orders
5160--
52−-- /See:/ 'marketplaceordersInsert' smart constructor.
53−data MarketplaceordersInsert = MarketplaceordersInsert
54− { _mQuotaUser :: !(Maybe Text)
55− , _mPrettyPrint :: !Bool
56− , _mUserIp :: !(Maybe Text)
57− , _mKey :: !(Maybe Text)
58− , _mOauthToken :: !(Maybe Text)
59− , _mFields :: !(Maybe Text)
60− , _mAlt :: !Text
61+-- /See:/ 'marketplaceordersInsert'' smart constructor.
62+data MarketplaceordersInsert' = MarketplaceordersInsert'
63+ { _miQuotaUser :: !(Maybe Text)
64+ , _miPrettyPrint :: !Bool
65+ , _miUserIp :: !(Maybe Text)
66+ , _miKey :: !(Maybe Text)
67+ , _miOauthToken :: !(Maybe Text)
68+ , _miFields :: !(Maybe Text)
69+ , _miAlt :: !Alt
6170 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6271
6372-- | Creates a value of 'MarketplaceordersInsert'' with the minimum fields required to make a request.
6473--
6574-- Use one of the following lenses to modify other fields as desired:
6675--
67−-- * 'mQuotaUser'
76+-- * 'miQuotaUser'
6877--
69−-- * 'mPrettyPrint'
78+-- * 'miPrettyPrint'
7079--
71−-- * 'mUserIp'
80+-- * 'miUserIp'
7281--
73−-- * 'mKey'
82+-- * 'miKey'
7483--
75−-- * 'mOauthToken'
84+-- * 'miOauthToken'
7685--
77−-- * 'mFields'
86+-- * 'miFields'
7887--
79−-- * 'mAlt'
80−marketplaceordersInsert
81− :: MarketplaceordersInsert
82−marketplaceordersInsert =
83− MarketplaceordersInsert
84− { _mQuotaUser = Nothing
85− , _mPrettyPrint = True
86− , _mUserIp = Nothing
87− , _mKey = Nothing
88− , _mOauthToken = Nothing
89− , _mFields = Nothing
90− , _mAlt = "json"
88+-- * 'miAlt'
89+marketplaceordersInsert'
90+ :: MarketplaceordersInsert'
91+marketplaceordersInsert' =
92+ MarketplaceordersInsert'
93+ { _miQuotaUser = Nothing
94+ , _miPrettyPrint = True
95+ , _miUserIp = Nothing
96+ , _miKey = Nothing
97+ , _miOauthToken = Nothing
98+ , _miFields = Nothing
99+ , _miAlt = JSON
91100 }
92101
93102-- | Available to use for quota purposes for server-side applications. Can be
94103-- any arbitrary string assigned to a user, but should not exceed 40
95104-- characters. Overrides userIp if both are provided.
96−mQuotaUser :: Lens' MarketplaceordersInsert' (Maybe Text)
97−mQuotaUser
98− = lens _mQuotaUser (\ s a -> s{_mQuotaUser = a})
105+miQuotaUser :: Lens' MarketplaceordersInsert' (Maybe Text)
106+miQuotaUser
107+ = lens _miQuotaUser (\ s a -> s{_miQuotaUser = a})
99108
100109-- | Returns response with indentations and line breaks.
101−mPrettyPrint :: Lens' MarketplaceordersInsert' Bool
102−mPrettyPrint
103− = lens _mPrettyPrint (\ s a -> s{_mPrettyPrint = a})
110+miPrettyPrint :: Lens' MarketplaceordersInsert' Bool
111+miPrettyPrint
112+ = lens _miPrettyPrint
113+ (\ s a -> s{_miPrettyPrint = a})
104114
105115-- | IP address of the site where the request originates. Use this if you
106116-- want to enforce per-user limits.
107−mUserIp :: Lens' MarketplaceordersInsert' (Maybe Text)
108−mUserIp = lens _mUserIp (\ s a -> s{_mUserIp = a})
117+miUserIp :: Lens' MarketplaceordersInsert' (Maybe Text)
118+miUserIp = lens _miUserIp (\ s a -> s{_miUserIp = a})
109119
110120-- | API key. Your API key identifies your project and provides you with API
111121-- access, quota, and reports. Required unless you provide an OAuth 2.0
112122-- token.
113−mKey :: Lens' MarketplaceordersInsert' (Maybe Text)
114−mKey = lens _mKey (\ s a -> s{_mKey = a})
123+miKey :: Lens' MarketplaceordersInsert' (Maybe Text)
124+miKey = lens _miKey (\ s a -> s{_miKey = a})
115125
116126-- | OAuth 2.0 token for the current user.
117−mOauthToken :: Lens' MarketplaceordersInsert' (Maybe Text)
118−mOauthToken
119− = lens _mOauthToken (\ s a -> s{_mOauthToken = a})
127+miOauthToken :: Lens' MarketplaceordersInsert' (Maybe Text)
128+miOauthToken
129+ = lens _miOauthToken (\ s a -> s{_miOauthToken = a})
120130
121131-- | Selector specifying which fields to include in a partial response.
122−mFields :: Lens' MarketplaceordersInsert' (Maybe Text)
123−mFields = lens _mFields (\ s a -> s{_mFields = a})
132+miFields :: Lens' MarketplaceordersInsert' (Maybe Text)
133+miFields = lens _miFields (\ s a -> s{_miFields = a})
124134
125135-- | Data format for the response.
126−mAlt :: Lens' MarketplaceordersInsert' Text
127−mAlt = lens _mAlt (\ s a -> s{_mAlt = a})
136+miAlt :: Lens' MarketplaceordersInsert' Alt
137+miAlt = lens _miAlt (\ s a -> s{_miAlt = a})
128138
129139instance GoogleRequest MarketplaceordersInsert' where
130140 type Rs MarketplaceordersInsert' =
131141 CreateOrdersResponse
132142 request = requestWithRoute defReq adExchangeBuyerURL
133− requestWithRoute r u MarketplaceordersInsert{..}
134− = go _mQuotaUser _mPrettyPrint _mUserIp _mKey
135− _mOauthToken
136− _mFields
137− _mAlt
143+ requestWithRoute r u MarketplaceordersInsert'{..}
144+ = go _miQuotaUser (Just _miPrettyPrint) _miUserIp
145+ _miKey
146+ _miOauthToken
147+ _miFields
148+ (Just _miAlt)
138149 where go
139150 = clientWithRoute
140− (Proxy :: Proxy MarketplaceordersInsertAPI)
151+ (Proxy :: Proxy MarketplaceordersInsertResource)
141152 r
142153 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceorders/Patch.hs+35−24
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update the given order. This method supports patch semantics.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceordersPatch@.
22−module AdExchangeBuyer.Marketplaceorders.Patch
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Patch
2324 (
2425 -- * REST Resource
25− MarketplaceordersPatchAPI
26+ MarketplaceordersPatchResource
2627
2728 -- * Creating a Request
28− , marketplaceordersPatch
29− , MarketplaceordersPatch
29+ , marketplaceordersPatch'
30+ , MarketplaceordersPatch'
3031
3132 -- * Request Lenses
3233 , mpQuotaUser
@@ -45,20 +46,29 @@ import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerMarketplaceordersPatch@ which the
48−-- 'MarketplaceordersPatch' request conforms to.
49−type MarketplaceordersPatchAPI =
49+-- 'MarketplaceordersPatch'' request conforms to.
50+type MarketplaceordersPatchResource =
5051 "marketplaceOrders" :>
5152 Capture "orderId" Text :>
5253 Capture "revisionNumber" Int64 :>
53− Capture "updateAction" Text :>
54− Patch '[JSON] MarketplaceOrder
54+ Capture "updateAction"
55+ AdexchangebuyerMarketplaceordersPatchUpdateAction
56+ :>
57+ QueryParam "quotaUser" Text :>
58+ QueryParam "prettyPrint" Bool :>
59+ QueryParam "userIp" Text :>
60+ QueryParam "key" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "fields" Text :>
63+ QueryParam "alt" Alt :>
64+ Patch '[JSON] MarketplaceOrder
5565
5666-- | Update the given order. This method supports patch semantics.
5767--
58−-- /See:/ 'marketplaceordersPatch' smart constructor.
59−data MarketplaceordersPatch = MarketplaceordersPatch
68+-- /See:/ 'marketplaceordersPatch'' smart constructor.
69+data MarketplaceordersPatch' = MarketplaceordersPatch'
6070 { _mpQuotaUser :: !(Maybe Text)
61− , _mpUpdateAction :: !Text
71+ , _mpUpdateAction :: !AdexchangebuyerMarketplaceordersPatchUpdateAction
6272 , _mpPrettyPrint :: !Bool
6373 , _mpUserIp :: !(Maybe Text)
6474 , _mpRevisionNumber :: !Int64
@@ -66,7 +76,7 @@ data MarketplaceordersPatch = MarketplaceordersPatch
6676 , _mpOauthToken :: !(Maybe Text)
6777 , _mpOrderId :: !Text
6878 , _mpFields :: !(Maybe Text)
69− , _mpAlt :: !Text
79+ , _mpAlt :: !Alt
7080 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7181
7282-- | Creates a value of 'MarketplaceordersPatch'' with the minimum fields required to make a request.
@@ -92,13 +102,13 @@ data MarketplaceordersPatch = MarketplaceordersPatch
92102-- * 'mpFields'
93103--
94104-- * 'mpAlt'
95−marketplaceordersPatch
96− :: Text -- ^ 'updateAction'
105+marketplaceordersPatch'
106+ :: AdexchangebuyerMarketplaceordersPatchUpdateAction -- ^ 'updateAction'
97107 -> Int64 -- ^ 'revisionNumber'
98108 -> Text -- ^ 'orderId'
99− -> MarketplaceordersPatch
100−marketplaceordersPatch pMpUpdateAction_ pMpRevisionNumber_ pMpOrderId_ =
101− MarketplaceordersPatch
109+ -> MarketplaceordersPatch'
110+marketplaceordersPatch' pMpUpdateAction_ pMpRevisionNumber_ pMpOrderId_ =
111+ MarketplaceordersPatch'
102112 { _mpQuotaUser = Nothing
103113 , _mpUpdateAction = pMpUpdateAction_
104114 , _mpPrettyPrint = True
@@ -108,7 +118,7 @@ marketplaceordersPatch pMpUpdateAction_ pMpRevisionNumber_ pMpOrderId_ =
108118 , _mpOauthToken = Nothing
109119 , _mpOrderId = pMpOrderId_
110120 , _mpFields = Nothing
111− , _mpAlt = "json"
121+ , _mpAlt = JSON
112122 }
113123
114124-- | Available to use for quota purposes for server-side applications. Can be
@@ -119,7 +129,7 @@ mpQuotaUser
119129 = lens _mpQuotaUser (\ s a -> s{_mpQuotaUser = a})
120130
121131-- | The proposed action to take on the order.
122−mpUpdateAction :: Lens' MarketplaceordersPatch' Text
132+mpUpdateAction :: Lens' MarketplaceordersPatch' AdexchangebuyerMarketplaceordersPatchUpdateAction
123133mpUpdateAction
124134 = lens _mpUpdateAction
125135 (\ s a -> s{_mpUpdateAction = a})
@@ -165,23 +175,24 @@ mpFields :: Lens' MarketplaceordersPatch' (Maybe Text)
165175mpFields = lens _mpFields (\ s a -> s{_mpFields = a})
166176
167177-- | Data format for the response.
168−mpAlt :: Lens' MarketplaceordersPatch' Text
178+mpAlt :: Lens' MarketplaceordersPatch' Alt
169179mpAlt = lens _mpAlt (\ s a -> s{_mpAlt = a})
170180
171181instance GoogleRequest MarketplaceordersPatch' where
172182 type Rs MarketplaceordersPatch' = MarketplaceOrder
173183 request = requestWithRoute defReq adExchangeBuyerURL
174− requestWithRoute r u MarketplaceordersPatch{..}
175− = go _mpQuotaUser _mpUpdateAction _mpPrettyPrint
184+ requestWithRoute r u MarketplaceordersPatch'{..}
185+ = go _mpQuotaUser _mpUpdateAction
186+ (Just _mpPrettyPrint)
176187 _mpUserIp
177188 _mpRevisionNumber
178189 _mpKey
179190 _mpOauthToken
180191 _mpOrderId
181192 _mpFields
182− _mpAlt
193+ (Just _mpAlt)
183194 where go
184195 = clientWithRoute
185− (Proxy :: Proxy MarketplaceordersPatchAPI)
196+ (Proxy :: Proxy MarketplaceordersPatchResource)
186197 r
187198 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceorders/Search.hs+29−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Search for orders using pql query
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceordersSearch@.
22−module AdExchangeBuyer.Marketplaceorders.Search
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Search
2324 (
2425 -- * REST Resource
25− MarketplaceordersSearchAPI
26+ MarketplaceordersSearchResource
2627
2728 -- * Creating a Request
28− , marketplaceordersSearch
29− , MarketplaceordersSearch
29+ , marketplaceordersSearch'
30+ , MarketplaceordersSearch'
3031
3132 -- * Request Lenses
3233 , mssQuotaUser
@@ -43,17 +44,23 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerMarketplaceordersSearch@ which the
46−-- 'MarketplaceordersSearch' request conforms to.
47−type MarketplaceordersSearchAPI =
47+-- 'MarketplaceordersSearch'' request conforms to.
48+type MarketplaceordersSearchResource =
4849 "marketplaceOrders" :>
4950 "search" :>
50− QueryParam "pqlQuery" Text :>
51− Get '[JSON] GetOrdersResponse
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "pqlQuery" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Get '[JSON] GetOrdersResponse
5259
5360-- | Search for orders using pql query
5461--
55−-- /See:/ 'marketplaceordersSearch' smart constructor.
56−data MarketplaceordersSearch = MarketplaceordersSearch
62+-- /See:/ 'marketplaceordersSearch'' smart constructor.
63+data MarketplaceordersSearch' = MarketplaceordersSearch'
5764 { _mssQuotaUser :: !(Maybe Text)
5865 , _mssPrettyPrint :: !Bool
5966 , _mssUserIp :: !(Maybe Text)
@@ -61,7 +68,7 @@ data MarketplaceordersSearch = MarketplaceordersSearch
6168 , _mssPqlQuery :: !(Maybe Text)
6269 , _mssOauthToken :: !(Maybe Text)
6370 , _mssFields :: !(Maybe Text)
64− , _mssAlt :: !Text
71+ , _mssAlt :: !Alt
6572 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6673
6774-- | Creates a value of 'MarketplaceordersSearch'' with the minimum fields required to make a request.
@@ -83,10 +90,10 @@ data MarketplaceordersSearch = MarketplaceordersSearch
8390-- * 'mssFields'
8491--
8592-- * 'mssAlt'
86−marketplaceordersSearch
87− :: MarketplaceordersSearch
88−marketplaceordersSearch =
89− MarketplaceordersSearch
93+marketplaceordersSearch'
94+ :: MarketplaceordersSearch'
95+marketplaceordersSearch' =
96+ MarketplaceordersSearch'
9097 { _mssQuotaUser = Nothing
9198 , _mssPrettyPrint = True
9299 , _mssUserIp = Nothing
@@ -94,7 +101,7 @@ marketplaceordersSearch =
94101 , _mssPqlQuery = Nothing
95102 , _mssOauthToken = Nothing
96103 , _mssFields = Nothing
97− , _mssAlt = "json"
104+ , _mssAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,20 +146,21 @@ mssFields
139146 = lens _mssFields (\ s a -> s{_mssFields = a})
140147
141148-- | Data format for the response.
142−mssAlt :: Lens' MarketplaceordersSearch' Text
149+mssAlt :: Lens' MarketplaceordersSearch' Alt
143150mssAlt = lens _mssAlt (\ s a -> s{_mssAlt = a})
144151
145152instance GoogleRequest MarketplaceordersSearch' where
146153 type Rs MarketplaceordersSearch' = GetOrdersResponse
147154 request = requestWithRoute defReq adExchangeBuyerURL
148− requestWithRoute r u MarketplaceordersSearch{..}
149− = go _mssQuotaUser _mssPrettyPrint _mssUserIp _mssKey
155+ requestWithRoute r u MarketplaceordersSearch'{..}
156+ = go _mssQuotaUser (Just _mssPrettyPrint) _mssUserIp
157+ _mssKey
150158 _mssPqlQuery
151159 _mssOauthToken
152160 _mssFields
153− _mssAlt
161+ (Just _mssAlt)
154162 where go
155163 = clientWithRoute
156− (Proxy :: Proxy MarketplaceordersSearchAPI)
164+ (Proxy :: Proxy MarketplaceordersSearchResource)
157165 r
158166 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Marketplaceorders/Update.hs+107−94
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,169 +20,181 @@
1920-- | Update the given order
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerMarketplaceordersUpdate@.
22−module AdExchangeBuyer.Marketplaceorders.Update
23+module Network.Google.Resource.AdExchangeBuyer.Marketplaceorders.Update
2324 (
2425 -- * REST Resource
25− MarketplaceordersUpdateAPI
26+ MarketplaceordersUpdateResource
2627
2728 -- * Creating a Request
28− , marketplaceordersUpdate
29− , MarketplaceordersUpdate
29+ , marketplaceordersUpdate'
30+ , MarketplaceordersUpdate'
3031
3132 -- * Request Lenses
32− , muQuotaUser
33− , muUpdateAction
34− , muPrettyPrint
35− , muUserIp
36− , muRevisionNumber
37− , muKey
38− , muOauthToken
39− , muOrderId
40− , muFields
41− , muAlt
33+ , muuQuotaUser
34+ , muuUpdateAction
35+ , muuPrettyPrint
36+ , muuUserIp
37+ , muuRevisionNumber
38+ , muuKey
39+ , muuOauthToken
40+ , muuOrderId
41+ , muuFields
42+ , muuAlt
4243 ) where
4344
4445import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerMarketplaceordersUpdate@ which the
48−-- 'MarketplaceordersUpdate' request conforms to.
49−type MarketplaceordersUpdateAPI =
49+-- 'MarketplaceordersUpdate'' request conforms to.
50+type MarketplaceordersUpdateResource =
5051 "marketplaceOrders" :>
5152 Capture "orderId" Text :>
5253 Capture "revisionNumber" Int64 :>
53− Capture "updateAction" Text :>
54− Put '[JSON] MarketplaceOrder
54+ Capture "updateAction"
55+ AdexchangebuyerMarketplaceordersUpdateUpdateAction
56+ :>
57+ QueryParam "quotaUser" Text :>
58+ QueryParam "prettyPrint" Bool :>
59+ QueryParam "userIp" Text :>
60+ QueryParam "key" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "fields" Text :>
63+ QueryParam "alt" Alt :> Put '[JSON] MarketplaceOrder
5564
5665-- | Update the given order
5766--
58−-- /See:/ 'marketplaceordersUpdate' smart constructor.
59−data MarketplaceordersUpdate = MarketplaceordersUpdate
60− { _muQuotaUser :: !(Maybe Text)
61− , _muUpdateAction :: !Text
62− , _muPrettyPrint :: !Bool
63− , _muUserIp :: !(Maybe Text)
64− , _muRevisionNumber :: !Int64
65− , _muKey :: !(Maybe Text)
66− , _muOauthToken :: !(Maybe Text)
67− , _muOrderId :: !Text
68− , _muFields :: !(Maybe Text)
69− , _muAlt :: !Text
67+-- /See:/ 'marketplaceordersUpdate'' smart constructor.
68+data MarketplaceordersUpdate' = MarketplaceordersUpdate'
69+ { _muuQuotaUser :: !(Maybe Text)
70+ , _muuUpdateAction :: !AdexchangebuyerMarketplaceordersUpdateUpdateAction
71+ , _muuPrettyPrint :: !Bool
72+ , _muuUserIp :: !(Maybe Text)
73+ , _muuRevisionNumber :: !Int64
74+ , _muuKey :: !(Maybe Text)
75+ , _muuOauthToken :: !(Maybe Text)
76+ , _muuOrderId :: !Text
77+ , _muuFields :: !(Maybe Text)
78+ , _muuAlt :: !Alt
7079 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7180
7281-- | Creates a value of 'MarketplaceordersUpdate'' with the minimum fields required to make a request.
7382--
7483-- Use one of the following lenses to modify other fields as desired:
7584--
76−-- * 'muQuotaUser'
85+-- * 'muuQuotaUser'
7786--
78−-- * 'muUpdateAction'
87+-- * 'muuUpdateAction'
7988--
80−-- * 'muPrettyPrint'
89+-- * 'muuPrettyPrint'
8190--
82−-- * 'muUserIp'
91+-- * 'muuUserIp'
8392--
84−-- * 'muRevisionNumber'
93+-- * 'muuRevisionNumber'
8594--
86−-- * 'muKey'
95+-- * 'muuKey'
8796--
88−-- * 'muOauthToken'
97+-- * 'muuOauthToken'
8998--
90−-- * 'muOrderId'
99+-- * 'muuOrderId'
91100--
92−-- * 'muFields'
101+-- * 'muuFields'
93102--
94−-- * 'muAlt'
95−marketplaceordersUpdate
96− :: Text -- ^ 'updateAction'
103+-- * 'muuAlt'
104+marketplaceordersUpdate'
105+ :: AdexchangebuyerMarketplaceordersUpdateUpdateAction -- ^ 'updateAction'
97106 -> Int64 -- ^ 'revisionNumber'
98107 -> Text -- ^ 'orderId'
99− -> MarketplaceordersUpdate
100−marketplaceordersUpdate pMuUpdateAction_ pMuRevisionNumber_ pMuOrderId_ =
101− MarketplaceordersUpdate
102− { _muQuotaUser = Nothing
103− , _muUpdateAction = pMuUpdateAction_
104− , _muPrettyPrint = True
105− , _muUserIp = Nothing
106− , _muRevisionNumber = pMuRevisionNumber_
107− , _muKey = Nothing
108− , _muOauthToken = Nothing
109− , _muOrderId = pMuOrderId_
110− , _muFields = Nothing
111− , _muAlt = "json"
108+ -> MarketplaceordersUpdate'
109+marketplaceordersUpdate' pMuuUpdateAction_ pMuuRevisionNumber_ pMuuOrderId_ =
110+ MarketplaceordersUpdate'
111+ { _muuQuotaUser = Nothing
112+ , _muuUpdateAction = pMuuUpdateAction_
113+ , _muuPrettyPrint = True
114+ , _muuUserIp = Nothing
115+ , _muuRevisionNumber = pMuuRevisionNumber_
116+ , _muuKey = Nothing
117+ , _muuOauthToken = Nothing
118+ , _muuOrderId = pMuuOrderId_
119+ , _muuFields = Nothing
120+ , _muuAlt = JSON
112121 }
113122
114123-- | Available to use for quota purposes for server-side applications. Can be
115124-- any arbitrary string assigned to a user, but should not exceed 40
116125-- characters. Overrides userIp if both are provided.
117−muQuotaUser :: Lens' MarketplaceordersUpdate' (Maybe Text)
118−muQuotaUser
119− = lens _muQuotaUser (\ s a -> s{_muQuotaUser = a})
126+muuQuotaUser :: Lens' MarketplaceordersUpdate' (Maybe Text)
127+muuQuotaUser
128+ = lens _muuQuotaUser (\ s a -> s{_muuQuotaUser = a})
120129
121130-- | The proposed action to take on the order.
122−muUpdateAction :: Lens' MarketplaceordersUpdate' Text
123−muUpdateAction
124− = lens _muUpdateAction
125− (\ s a -> s{_muUpdateAction = a})
131+muuUpdateAction :: Lens' MarketplaceordersUpdate' AdexchangebuyerMarketplaceordersUpdateUpdateAction
132+muuUpdateAction
133+ = lens _muuUpdateAction
134+ (\ s a -> s{_muuUpdateAction = a})
126135
127136-- | Returns response with indentations and line breaks.
128−muPrettyPrint :: Lens' MarketplaceordersUpdate' Bool
129−muPrettyPrint
130− = lens _muPrettyPrint
131− (\ s a -> s{_muPrettyPrint = a})
137+muuPrettyPrint :: Lens' MarketplaceordersUpdate' Bool
138+muuPrettyPrint
139+ = lens _muuPrettyPrint
140+ (\ s a -> s{_muuPrettyPrint = a})
132141
133142-- | IP address of the site where the request originates. Use this if you
134143-- want to enforce per-user limits.
135−muUserIp :: Lens' MarketplaceordersUpdate' (Maybe Text)
136−muUserIp = lens _muUserIp (\ s a -> s{_muUserIp = a})
144+muuUserIp :: Lens' MarketplaceordersUpdate' (Maybe Text)
145+muuUserIp
146+ = lens _muuUserIp (\ s a -> s{_muuUserIp = a})
137147
138148-- | The last known revision number to update. If the head revision in the
139149-- marketplace database has since changed, an error will be thrown. The
140150-- caller should then fetch the lastest order at head revision and retry
141151-- the update at that revision.
142−muRevisionNumber :: Lens' MarketplaceordersUpdate' Int64
143−muRevisionNumber
144− = lens _muRevisionNumber
145− (\ s a -> s{_muRevisionNumber = a})
152+muuRevisionNumber :: Lens' MarketplaceordersUpdate' Int64
153+muuRevisionNumber
154+ = lens _muuRevisionNumber
155+ (\ s a -> s{_muuRevisionNumber = a})
146156
147157-- | API key. Your API key identifies your project and provides you with API
148158-- access, quota, and reports. Required unless you provide an OAuth 2.0
149159-- token.
150−muKey :: Lens' MarketplaceordersUpdate' (Maybe Text)
151−muKey = lens _muKey (\ s a -> s{_muKey = a})
160+muuKey :: Lens' MarketplaceordersUpdate' (Maybe Text)
161+muuKey = lens _muuKey (\ s a -> s{_muuKey = a})
152162
153163-- | OAuth 2.0 token for the current user.
154−muOauthToken :: Lens' MarketplaceordersUpdate' (Maybe Text)
155−muOauthToken
156− = lens _muOauthToken (\ s a -> s{_muOauthToken = a})
164+muuOauthToken :: Lens' MarketplaceordersUpdate' (Maybe Text)
165+muuOauthToken
166+ = lens _muuOauthToken
167+ (\ s a -> s{_muuOauthToken = a})
157168
158169-- | The order id to update.
159−muOrderId :: Lens' MarketplaceordersUpdate' Text
160−muOrderId
161− = lens _muOrderId (\ s a -> s{_muOrderId = a})
170+muuOrderId :: Lens' MarketplaceordersUpdate' Text
171+muuOrderId
172+ = lens _muuOrderId (\ s a -> s{_muuOrderId = a})
162173
163174-- | Selector specifying which fields to include in a partial response.
164−muFields :: Lens' MarketplaceordersUpdate' (Maybe Text)
165−muFields = lens _muFields (\ s a -> s{_muFields = a})
175+muuFields :: Lens' MarketplaceordersUpdate' (Maybe Text)
176+muuFields
177+ = lens _muuFields (\ s a -> s{_muuFields = a})
166178
167179-- | Data format for the response.
168−muAlt :: Lens' MarketplaceordersUpdate' Text
169−muAlt = lens _muAlt (\ s a -> s{_muAlt = a})
180+muuAlt :: Lens' MarketplaceordersUpdate' Alt
181+muuAlt = lens _muuAlt (\ s a -> s{_muuAlt = a})
170182
171183instance GoogleRequest MarketplaceordersUpdate' where
172184 type Rs MarketplaceordersUpdate' = MarketplaceOrder
173185 request = requestWithRoute defReq adExchangeBuyerURL
174− requestWithRoute r u MarketplaceordersUpdate{..}
175− = go _muQuotaUser _muUpdateAction _muPrettyPrint
176− _muUserIp
177− _muRevisionNumber
178− _muKey
179− _muOauthToken
180− _muOrderId
181− _muFields
182− _muAlt
186+ requestWithRoute r u MarketplaceordersUpdate'{..}
187+ = go _muuQuotaUser _muuUpdateAction
188+ (Just _muuPrettyPrint)
189+ _muuUserIp
190+ _muuRevisionNumber
191+ _muuKey
192+ _muuOauthToken
193+ _muuOrderId
194+ _muuFields
195+ (Just _muuAlt)
183196 where go
184197 = clientWithRoute
185− (Proxy :: Proxy MarketplaceordersUpdateAPI)
198+ (Proxy :: Proxy MarketplaceordersUpdateResource)
186199 r
187200 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiationrounds/Insert.hs+81−74
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,139 +20,145 @@
1920-- | Adds the requested negotiationRound to the requested negotiation.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerNegotiationroundsInsert@.
22−module AdExchangeBuyer.Negotiationrounds.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Negotiationrounds.Insert
2324 (
2425 -- * REST Resource
25− NegotiationroundsInsertAPI
26+ NegotiationroundsInsertResource
2627
2728 -- * Creating a Request
28− , negotiationroundsInsert
29− , NegotiationroundsInsert
29+ , negotiationroundsInsert'
30+ , NegotiationroundsInsert'
3031
3132 -- * Request Lenses
32− , niQuotaUser
33− , niPrettyPrint
34− , niUserIp
35− , niKey
36− , niOauthToken
37− , niNegotiationId
38− , niFields
39− , niAlt
33+ , nQuotaUser
34+ , nPrettyPrint
35+ , nUserIp
36+ , nKey
37+ , nOauthToken
38+ , nNegotiationId
39+ , nFields
40+ , nAlt
4041 ) where
4142
4243import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerNegotiationroundsInsert@ which the
46−-- 'NegotiationroundsInsert' request conforms to.
47−type NegotiationroundsInsertAPI =
47+-- 'NegotiationroundsInsert'' request conforms to.
48+type NegotiationroundsInsertResource =
4849 "negotiations" :>
4950 Capture "negotiationId" Int64 :>
5051 "negotiationrounds" :>
51− Post '[JSON] NegotiationRoundDto
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :>
59+ Post '[JSON] NegotiationRoundDto
5260
5361-- | Adds the requested negotiationRound to the requested negotiation.
5462--
55−-- /See:/ 'negotiationroundsInsert' smart constructor.
56−data NegotiationroundsInsert = NegotiationroundsInsert
57− { _niQuotaUser :: !(Maybe Text)
58− , _niPrettyPrint :: !Bool
59− , _niUserIp :: !(Maybe Text)
60− , _niKey :: !(Maybe Text)
61− , _niOauthToken :: !(Maybe Text)
62− , _niNegotiationId :: !Int64
63− , _niFields :: !(Maybe Text)
64− , _niAlt :: !Text
63+-- /See:/ 'negotiationroundsInsert'' smart constructor.
64+data NegotiationroundsInsert' = NegotiationroundsInsert'
65+ { _nQuotaUser :: !(Maybe Text)
66+ , _nPrettyPrint :: !Bool
67+ , _nUserIp :: !(Maybe Text)
68+ , _nKey :: !(Maybe Text)
69+ , _nOauthToken :: !(Maybe Text)
70+ , _nNegotiationId :: !Int64
71+ , _nFields :: !(Maybe Text)
72+ , _nAlt :: !Alt
6573 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6674
6775-- | Creates a value of 'NegotiationroundsInsert'' with the minimum fields required to make a request.
6876--
6977-- Use one of the following lenses to modify other fields as desired:
7078--
71−-- * 'niQuotaUser'
79+-- * 'nQuotaUser'
7280--
73−-- * 'niPrettyPrint'
81+-- * 'nPrettyPrint'
7482--
75−-- * 'niUserIp'
83+-- * 'nUserIp'
7684--
77−-- * 'niKey'
85+-- * 'nKey'
7886--
79−-- * 'niOauthToken'
87+-- * 'nOauthToken'
8088--
81−-- * 'niNegotiationId'
89+-- * 'nNegotiationId'
8290--
83−-- * 'niFields'
91+-- * 'nFields'
8492--
85−-- * 'niAlt'
86−negotiationroundsInsert
93+-- * 'nAlt'
94+negotiationroundsInsert'
8795 :: Int64 -- ^ 'negotiationId'
88− -> NegotiationroundsInsert
89−negotiationroundsInsert pNiNegotiationId_ =
90− NegotiationroundsInsert
91− { _niQuotaUser = Nothing
92− , _niPrettyPrint = True
93− , _niUserIp = Nothing
94− , _niKey = Nothing
95− , _niOauthToken = Nothing
96− , _niNegotiationId = pNiNegotiationId_
97− , _niFields = Nothing
98− , _niAlt = "json"
96+ -> NegotiationroundsInsert'
97+negotiationroundsInsert' pNNegotiationId_ =
98+ NegotiationroundsInsert'
99+ { _nQuotaUser = Nothing
100+ , _nPrettyPrint = True
101+ , _nUserIp = Nothing
102+ , _nKey = Nothing
103+ , _nOauthToken = Nothing
104+ , _nNegotiationId = pNNegotiationId_
105+ , _nFields = Nothing
106+ , _nAlt = JSON
99107 }
100108
101109-- | Available to use for quota purposes for server-side applications. Can be
102110-- any arbitrary string assigned to a user, but should not exceed 40
103111-- characters. Overrides userIp if both are provided.
104−niQuotaUser :: Lens' NegotiationroundsInsert' (Maybe Text)
105−niQuotaUser
106− = lens _niQuotaUser (\ s a -> s{_niQuotaUser = a})
112+nQuotaUser :: Lens' NegotiationroundsInsert' (Maybe Text)
113+nQuotaUser
114+ = lens _nQuotaUser (\ s a -> s{_nQuotaUser = a})
107115
108116-- | Returns response with indentations and line breaks.
109−niPrettyPrint :: Lens' NegotiationroundsInsert' Bool
110−niPrettyPrint
111− = lens _niPrettyPrint
112− (\ s a -> s{_niPrettyPrint = a})
117+nPrettyPrint :: Lens' NegotiationroundsInsert' Bool
118+nPrettyPrint
119+ = lens _nPrettyPrint (\ s a -> s{_nPrettyPrint = a})
113120
114121-- | IP address of the site where the request originates. Use this if you
115122-- want to enforce per-user limits.
116−niUserIp :: Lens' NegotiationroundsInsert' (Maybe Text)
117−niUserIp = lens _niUserIp (\ s a -> s{_niUserIp = a})
123+nUserIp :: Lens' NegotiationroundsInsert' (Maybe Text)
124+nUserIp = lens _nUserIp (\ s a -> s{_nUserIp = a})
118125
119126-- | API key. Your API key identifies your project and provides you with API
120127-- access, quota, and reports. Required unless you provide an OAuth 2.0
121128-- token.
122−niKey :: Lens' NegotiationroundsInsert' (Maybe Text)
123−niKey = lens _niKey (\ s a -> s{_niKey = a})
129+nKey :: Lens' NegotiationroundsInsert' (Maybe Text)
130+nKey = lens _nKey (\ s a -> s{_nKey = a})
124131
125132-- | OAuth 2.0 token for the current user.
126−niOauthToken :: Lens' NegotiationroundsInsert' (Maybe Text)
127−niOauthToken
128− = lens _niOauthToken (\ s a -> s{_niOauthToken = a})
133+nOauthToken :: Lens' NegotiationroundsInsert' (Maybe Text)
134+nOauthToken
135+ = lens _nOauthToken (\ s a -> s{_nOauthToken = a})
129136
130−niNegotiationId :: Lens' NegotiationroundsInsert' Int64
131−niNegotiationId
132− = lens _niNegotiationId
133− (\ s a -> s{_niNegotiationId = a})
137+nNegotiationId :: Lens' NegotiationroundsInsert' Int64
138+nNegotiationId
139+ = lens _nNegotiationId
140+ (\ s a -> s{_nNegotiationId = a})
134141
135142-- | Selector specifying which fields to include in a partial response.
136−niFields :: Lens' NegotiationroundsInsert' (Maybe Text)
137−niFields = lens _niFields (\ s a -> s{_niFields = a})
143+nFields :: Lens' NegotiationroundsInsert' (Maybe Text)
144+nFields = lens _nFields (\ s a -> s{_nFields = a})
138145
139146-- | Data format for the response.
140−niAlt :: Lens' NegotiationroundsInsert' Text
141−niAlt = lens _niAlt (\ s a -> s{_niAlt = a})
147+nAlt :: Lens' NegotiationroundsInsert' Alt
148+nAlt = lens _nAlt (\ s a -> s{_nAlt = a})
142149
143150instance GoogleRequest NegotiationroundsInsert' where
144151 type Rs NegotiationroundsInsert' =
145152 NegotiationRoundDto
146153 request = requestWithRoute defReq adExchangeBuyerURL
147− requestWithRoute r u NegotiationroundsInsert{..}
148− = go _niQuotaUser _niPrettyPrint _niUserIp _niKey
149− _niOauthToken
150− _niNegotiationId
151− _niFields
152− _niAlt
154+ requestWithRoute r u NegotiationroundsInsert'{..}
155+ = go _nQuotaUser (Just _nPrettyPrint) _nUserIp _nKey
156+ _nOauthToken
157+ _nNegotiationId
158+ _nFields
159+ (Just _nAlt)
153160 where go
154161 = clientWithRoute
155− (Proxy :: Proxy NegotiationroundsInsertAPI)
162+ (Proxy :: Proxy NegotiationroundsInsertResource)
156163 r
157164 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Get.hs+29−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets the requested negotiation.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerNegotiationsGet@.
22−module AdExchangeBuyer.Negotiations.Get
23+module Network.Google.Resource.AdExchangeBuyer.Negotiations.Get
2324 (
2425 -- * REST Resource
25− NegotiationsGetAPI
26+ NegotiationsGetResource
2627
2728 -- * Creating a Request
28− , negotiationsGet
29− , NegotiationsGet
29+ , negotiationsGet'
30+ , NegotiationsGet'
3031
3132 -- * Request Lenses
3233 , ngQuotaUser
@@ -43,16 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerNegotiationsGet@ which the
46−-- 'NegotiationsGet' request conforms to.
47−type NegotiationsGetAPI =
47+-- 'NegotiationsGet'' request conforms to.
48+type NegotiationsGetResource =
4849 "negotiations" :>
4950 Capture "negotiationId" Int64 :>
50− Get '[JSON] NegotiationDto
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] NegotiationDto
5158
5259-- | Gets the requested negotiation.
5360--
54−-- /See:/ 'negotiationsGet' smart constructor.
55−data NegotiationsGet = NegotiationsGet
61+-- /See:/ 'negotiationsGet'' smart constructor.
62+data NegotiationsGet' = NegotiationsGet'
5663 { _ngQuotaUser :: !(Maybe Text)
5764 , _ngPrettyPrint :: !Bool
5865 , _ngUserIp :: !(Maybe Text)
@@ -60,7 +67,7 @@ data NegotiationsGet = NegotiationsGet
6067 , _ngOauthToken :: !(Maybe Text)
6168 , _ngNegotiationId :: !Int64
6269 , _ngFields :: !(Maybe Text)
63− , _ngAlt :: !Text
70+ , _ngAlt :: !Alt
6471 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6572
6673-- | Creates a value of 'NegotiationsGet'' with the minimum fields required to make a request.
@@ -82,11 +89,11 @@ data NegotiationsGet = NegotiationsGet
8289-- * 'ngFields'
8390--
8491-- * 'ngAlt'
85−negotiationsGet
92+negotiationsGet'
8693 :: Int64 -- ^ 'negotiationId'
87− -> NegotiationsGet
88−negotiationsGet pNgNegotiationId_ =
89− NegotiationsGet
94+ -> NegotiationsGet'
95+negotiationsGet' pNgNegotiationId_ =
96+ NegotiationsGet'
9097 { _ngQuotaUser = Nothing
9198 , _ngPrettyPrint = True
9299 , _ngUserIp = Nothing
@@ -94,7 +101,7 @@ negotiationsGet pNgNegotiationId_ =
94101 , _ngOauthToken = Nothing
95102 , _ngNegotiationId = pNgNegotiationId_
96103 , _ngFields = Nothing
97− , _ngAlt = "json"
104+ , _ngAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,19 +143,21 @@ ngFields :: Lens' NegotiationsGet' (Maybe Text)
136143ngFields = lens _ngFields (\ s a -> s{_ngFields = a})
137144
138145-- | Data format for the response.
139−ngAlt :: Lens' NegotiationsGet' Text
146+ngAlt :: Lens' NegotiationsGet' Alt
140147ngAlt = lens _ngAlt (\ s a -> s{_ngAlt = a})
141148
142149instance GoogleRequest NegotiationsGet' where
143150 type Rs NegotiationsGet' = NegotiationDto
144151 request = requestWithRoute defReq adExchangeBuyerURL
145− requestWithRoute r u NegotiationsGet{..}
146− = go _ngQuotaUser _ngPrettyPrint _ngUserIp _ngKey
152+ requestWithRoute r u NegotiationsGet'{..}
153+ = go _ngQuotaUser (Just _ngPrettyPrint) _ngUserIp
154+ _ngKey
147155 _ngOauthToken
148156 _ngNegotiationId
149157 _ngFields
150− _ngAlt
158+ (Just _ngAlt)
151159 where go
152− = clientWithRoute (Proxy :: Proxy NegotiationsGetAPI)
160+ = clientWithRoute
161+ (Proxy :: Proxy NegotiationsGetResource)
153162 r
154163 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/Insert.hs+74−64
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,122 +20,131 @@
1920-- | Creates or updates the requested negotiation.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerNegotiationsInsert@.
22−module AdExchangeBuyer.Negotiations.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Negotiations.Insert
2324 (
2425 -- * REST Resource
25− NegotiationsInsertAPI
26+ NegotiationsInsertResource
2627
2728 -- * Creating a Request
28− , negotiationsInsert
29− , NegotiationsInsert
29+ , negotiationsInsert'
30+ , NegotiationsInsert'
3031
3132 -- * Request Lenses
32− , nQuotaUser
33− , nPrettyPrint
34− , nUserIp
35− , nKey
36− , nOauthToken
37− , nFields
38− , nAlt
33+ , niQuotaUser
34+ , niPrettyPrint
35+ , niUserIp
36+ , niKey
37+ , niOauthToken
38+ , niFields
39+ , niAlt
3940 ) where
4041
4142import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerNegotiationsInsert@ which the
45−-- 'NegotiationsInsert' request conforms to.
46−type NegotiationsInsertAPI =
47− "negotiations" :> Post '[JSON] NegotiationDto
46+-- 'NegotiationsInsert'' request conforms to.
47+type NegotiationsInsertResource =
48+ "negotiations" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Post '[JSON] NegotiationDto
4856
4957-- | Creates or updates the requested negotiation.
5058--
51−-- /See:/ 'negotiationsInsert' smart constructor.
52−data NegotiationsInsert = NegotiationsInsert
53− { _nQuotaUser :: !(Maybe Text)
54− , _nPrettyPrint :: !Bool
55− , _nUserIp :: !(Maybe Text)
56− , _nKey :: !(Maybe Text)
57− , _nOauthToken :: !(Maybe Text)
58− , _nFields :: !(Maybe Text)
59− , _nAlt :: !Text
59+-- /See:/ 'negotiationsInsert'' smart constructor.
60+data NegotiationsInsert' = NegotiationsInsert'
61+ { _niQuotaUser :: !(Maybe Text)
62+ , _niPrettyPrint :: !Bool
63+ , _niUserIp :: !(Maybe Text)
64+ , _niKey :: !(Maybe Text)
65+ , _niOauthToken :: !(Maybe Text)
66+ , _niFields :: !(Maybe Text)
67+ , _niAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'NegotiationsInsert'' with the minimum fields required to make a request.
6371--
6472-- Use one of the following lenses to modify other fields as desired:
6573--
66−-- * 'nQuotaUser'
74+-- * 'niQuotaUser'
6775--
68−-- * 'nPrettyPrint'
76+-- * 'niPrettyPrint'
6977--
70−-- * 'nUserIp'
78+-- * 'niUserIp'
7179--
72−-- * 'nKey'
80+-- * 'niKey'
7381--
74−-- * 'nOauthToken'
82+-- * 'niOauthToken'
7583--
76−-- * 'nFields'
84+-- * 'niFields'
7785--
78−-- * 'nAlt'
79−negotiationsInsert
80− :: NegotiationsInsert
81−negotiationsInsert =
82− NegotiationsInsert
83− { _nQuotaUser = Nothing
84− , _nPrettyPrint = True
85− , _nUserIp = Nothing
86− , _nKey = Nothing
87− , _nOauthToken = Nothing
88− , _nFields = Nothing
89− , _nAlt = "json"
86+-- * 'niAlt'
87+negotiationsInsert'
88+ :: NegotiationsInsert'
89+negotiationsInsert' =
90+ NegotiationsInsert'
91+ { _niQuotaUser = Nothing
92+ , _niPrettyPrint = True
93+ , _niUserIp = Nothing
94+ , _niKey = Nothing
95+ , _niOauthToken = Nothing
96+ , _niFields = Nothing
97+ , _niAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
93101-- any arbitrary string assigned to a user, but should not exceed 40
94102-- characters. Overrides userIp if both are provided.
95−nQuotaUser :: Lens' NegotiationsInsert' (Maybe Text)
96−nQuotaUser
97− = lens _nQuotaUser (\ s a -> s{_nQuotaUser = a})
103+niQuotaUser :: Lens' NegotiationsInsert' (Maybe Text)
104+niQuotaUser
105+ = lens _niQuotaUser (\ s a -> s{_niQuotaUser = a})
98106
99107-- | Returns response with indentations and line breaks.
100−nPrettyPrint :: Lens' NegotiationsInsert' Bool
101−nPrettyPrint
102− = lens _nPrettyPrint (\ s a -> s{_nPrettyPrint = a})
108+niPrettyPrint :: Lens' NegotiationsInsert' Bool
109+niPrettyPrint
110+ = lens _niPrettyPrint
111+ (\ s a -> s{_niPrettyPrint = a})
103112
104113-- | IP address of the site where the request originates. Use this if you
105114-- want to enforce per-user limits.
106−nUserIp :: Lens' NegotiationsInsert' (Maybe Text)
107−nUserIp = lens _nUserIp (\ s a -> s{_nUserIp = a})
115+niUserIp :: Lens' NegotiationsInsert' (Maybe Text)
116+niUserIp = lens _niUserIp (\ s a -> s{_niUserIp = a})
108117
109118-- | API key. Your API key identifies your project and provides you with API
110119-- access, quota, and reports. Required unless you provide an OAuth 2.0
111120-- token.
112−nKey :: Lens' NegotiationsInsert' (Maybe Text)
113−nKey = lens _nKey (\ s a -> s{_nKey = a})
121+niKey :: Lens' NegotiationsInsert' (Maybe Text)
122+niKey = lens _niKey (\ s a -> s{_niKey = a})
114123
115124-- | OAuth 2.0 token for the current user.
116−nOauthToken :: Lens' NegotiationsInsert' (Maybe Text)
117−nOauthToken
118− = lens _nOauthToken (\ s a -> s{_nOauthToken = a})
125+niOauthToken :: Lens' NegotiationsInsert' (Maybe Text)
126+niOauthToken
127+ = lens _niOauthToken (\ s a -> s{_niOauthToken = a})
119128
120129-- | Selector specifying which fields to include in a partial response.
121−nFields :: Lens' NegotiationsInsert' (Maybe Text)
122−nFields = lens _nFields (\ s a -> s{_nFields = a})
130+niFields :: Lens' NegotiationsInsert' (Maybe Text)
131+niFields = lens _niFields (\ s a -> s{_niFields = a})
123132
124133-- | Data format for the response.
125−nAlt :: Lens' NegotiationsInsert' Text
126−nAlt = lens _nAlt (\ s a -> s{_nAlt = a})
134+niAlt :: Lens' NegotiationsInsert' Alt
135+niAlt = lens _niAlt (\ s a -> s{_niAlt = a})
127136
128137instance GoogleRequest NegotiationsInsert' where
129138 type Rs NegotiationsInsert' = NegotiationDto
130139 request = requestWithRoute defReq adExchangeBuyerURL
131− requestWithRoute r u NegotiationsInsert{..}
132− = go _nQuotaUser _nPrettyPrint _nUserIp _nKey
133− _nOauthToken
134− _nFields
135− _nAlt
140+ requestWithRoute r u NegotiationsInsert'{..}
141+ = go _niQuotaUser (Just _niPrettyPrint) _niUserIp
142+ _niKey
143+ _niOauthToken
144+ _niFields
145+ (Just _niAlt)
136146 where go
137147 = clientWithRoute
138− (Proxy :: Proxy NegotiationsInsertAPI)
148+ (Proxy :: Proxy NegotiationsInsertResource)
139149 r
140150 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Negotiations/List.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Lists all negotiations the authenticated user has access to.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerNegotiationsList@.
22−module AdExchangeBuyer.Negotiations.List
23+module Network.Google.Resource.AdExchangeBuyer.Negotiations.List
2324 (
2425 -- * REST Resource
25− NegotiationsListAPI
26+ NegotiationsListResource
2627
2728 -- * Creating a Request
28− , negotiationsList
29− , NegotiationsList
29+ , negotiationsList'
30+ , NegotiationsList'
3031
3132 -- * Request Lenses
3233 , nlQuotaUser
@@ -42,21 +43,29 @@ import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerNegotiationsList@ which the
45−-- 'NegotiationsList' request conforms to.
46−type NegotiationsListAPI =
47− "negotiations" :> Get '[JSON] GetNegotiationsResponse
46+-- 'NegotiationsList'' request conforms to.
47+type NegotiationsListResource =
48+ "negotiations" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :>
56+ Get '[JSON] GetNegotiationsResponse
4857
4958-- | Lists all negotiations the authenticated user has access to.
5059--
51−-- /See:/ 'negotiationsList' smart constructor.
52−data NegotiationsList = NegotiationsList
60+-- /See:/ 'negotiationsList'' smart constructor.
61+data NegotiationsList' = NegotiationsList'
5362 { _nlQuotaUser :: !(Maybe Text)
5463 , _nlPrettyPrint :: !Bool
5564 , _nlUserIp :: !(Maybe Text)
5665 , _nlKey :: !(Maybe Text)
5766 , _nlOauthToken :: !(Maybe Text)
5867 , _nlFields :: !(Maybe Text)
59− , _nlAlt :: !Text
68+ , _nlAlt :: !Alt
6069 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6170
6271-- | Creates a value of 'NegotiationsList'' with the minimum fields required to make a request.
@@ -76,17 +85,17 @@ data NegotiationsList = NegotiationsList
7685-- * 'nlFields'
7786--
7887-- * 'nlAlt'
79−negotiationsList
80− :: NegotiationsList
81−negotiationsList =
82− NegotiationsList
88+negotiationsList'
89+ :: NegotiationsList'
90+negotiationsList' =
91+ NegotiationsList'
8392 { _nlQuotaUser = Nothing
8493 , _nlPrettyPrint = True
8594 , _nlUserIp = Nothing
8695 , _nlKey = Nothing
8796 , _nlOauthToken = Nothing
8897 , _nlFields = Nothing
89− , _nlAlt = "json"
98+ , _nlAlt = JSON
9099 }
91100
92101-- | Available to use for quota purposes for server-side applications. Can be
@@ -123,19 +132,20 @@ nlFields :: Lens' NegotiationsList' (Maybe Text)
123132nlFields = lens _nlFields (\ s a -> s{_nlFields = a})
124133
125134-- | Data format for the response.
126−nlAlt :: Lens' NegotiationsList' Text
135+nlAlt :: Lens' NegotiationsList' Alt
127136nlAlt = lens _nlAlt (\ s a -> s{_nlAlt = a})
128137
129138instance GoogleRequest NegotiationsList' where
130139 type Rs NegotiationsList' = GetNegotiationsResponse
131140 request = requestWithRoute defReq adExchangeBuyerURL
132− requestWithRoute r u NegotiationsList{..}
133− = go _nlQuotaUser _nlPrettyPrint _nlUserIp _nlKey
141+ requestWithRoute r u NegotiationsList'{..}
142+ = go _nlQuotaUser (Just _nlPrettyPrint) _nlUserIp
143+ _nlKey
134144 _nlOauthToken
135145 _nlFields
136− _nlAlt
146+ (Just _nlAlt)
137147 where go
138148 = clientWithRoute
139− (Proxy :: Proxy NegotiationsListAPI)
149+ (Proxy :: Proxy NegotiationsListResource)
140150 r
141151 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/Get.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets the requested offer.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerOffersGet@.
22−module AdExchangeBuyer.Offers.Get
23+module Network.Google.Resource.AdExchangeBuyer.Offers.Get
2324 (
2425 -- * REST Resource
25− OffersGetAPI
26+ OffersGetResource
2627
2728 -- * Creating a Request
28− , offersGet
29− , OffersGet
29+ , offersGet'
30+ , OffersGet'
3031
3132 -- * Request Lenses
3233 , ogQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerOffersGet@ which the
46−-- 'OffersGet' request conforms to.
47−type OffersGetAPI =
47+-- 'OffersGet'' request conforms to.
48+type OffersGetResource =
4849 "offers" :>
49− Capture "offerId" Int64 :> Get '[JSON] OfferDto
50+ Capture "offerId" Int64 :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] OfferDto
5058
5159-- | Gets the requested offer.
5260--
53−-- /See:/ 'offersGet' smart constructor.
54−data OffersGet = OffersGet
61+-- /See:/ 'offersGet'' smart constructor.
62+data OffersGet' = OffersGet'
5563 { _ogQuotaUser :: !(Maybe Text)
5664 , _ogPrettyPrint :: !Bool
5765 , _ogUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data OffersGet = OffersGet
5967 , _ogOfferId :: !Int64
6068 , _ogOauthToken :: !(Maybe Text)
6169 , _ogFields :: !(Maybe Text)
62− , _ogAlt :: !Text
70+ , _ogAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'OffersGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data OffersGet = OffersGet
8189-- * 'ogFields'
8290--
8391-- * 'ogAlt'
84−offersGet
92+offersGet'
8593 :: Int64 -- ^ 'offerId'
86− -> OffersGet
87−offersGet pOgOfferId_ =
88− OffersGet
94+ -> OffersGet'
95+offersGet' pOgOfferId_ =
96+ OffersGet'
8997 { _ogQuotaUser = Nothing
9098 , _ogPrettyPrint = True
9199 , _ogUserIp = Nothing
@@ -93,7 +101,7 @@ offersGet pOgOfferId_ =
93101 , _ogOfferId = pOgOfferId_
94102 , _ogOauthToken = Nothing
95103 , _ogFields = Nothing
96− , _ogAlt = "json"
104+ , _ogAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -134,17 +142,20 @@ ogFields :: Lens' OffersGet' (Maybe Text)
134142ogFields = lens _ogFields (\ s a -> s{_ogFields = a})
135143
136144-- | Data format for the response.
137−ogAlt :: Lens' OffersGet' Text
145+ogAlt :: Lens' OffersGet' Alt
138146ogAlt = lens _ogAlt (\ s a -> s{_ogAlt = a})
139147
140148instance GoogleRequest OffersGet' where
141149 type Rs OffersGet' = OfferDto
142150 request = requestWithRoute defReq adExchangeBuyerURL
143− requestWithRoute r u OffersGet{..}
144− = go _ogQuotaUser _ogPrettyPrint _ogUserIp _ogKey
151+ requestWithRoute r u OffersGet'{..}
152+ = go _ogQuotaUser (Just _ogPrettyPrint) _ogUserIp
153+ _ogKey
145154 _ogOfferId
146155 _ogOauthToken
147156 _ogFields
148− _ogAlt
157+ (Just _ogAlt)
149158 where go
150− = clientWithRoute (Proxy :: Proxy OffersGetAPI) r u
159+ = clientWithRoute (Proxy :: Proxy OffersGetResource)
160+ r
161+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/Insert.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Creates or updates the requested offer.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerOffersInsert@.
22−module AdExchangeBuyer.Offers.Insert
23+module Network.Google.Resource.AdExchangeBuyer.Offers.Insert
2324 (
2425 -- * REST Resource
25− OffersInsertAPI
26+ OffersInsertResource
2627
2728 -- * Creating a Request
28− , offersInsert
29− , OffersInsert
29+ , offersInsert'
30+ , OffersInsert'
3031
3132 -- * Request Lenses
3233 , oiQuotaUser
@@ -42,21 +43,28 @@ import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerOffersInsert@ which the
45−-- 'OffersInsert' request conforms to.
46−type OffersInsertAPI =
47− "offers" :> Post '[JSON] OfferDto
46+-- 'OffersInsert'' request conforms to.
47+type OffersInsertResource =
48+ "offers" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Post '[JSON] OfferDto
4856
4957-- | Creates or updates the requested offer.
5058--
51−-- /See:/ 'offersInsert' smart constructor.
52−data OffersInsert = OffersInsert
59+-- /See:/ 'offersInsert'' smart constructor.
60+data OffersInsert' = OffersInsert'
5361 { _oiQuotaUser :: !(Maybe Text)
5462 , _oiPrettyPrint :: !Bool
5563 , _oiUserIp :: !(Maybe Text)
5664 , _oiKey :: !(Maybe Text)
5765 , _oiOauthToken :: !(Maybe Text)
5866 , _oiFields :: !(Maybe Text)
59− , _oiAlt :: !Text
67+ , _oiAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'OffersInsert'' with the minimum fields required to make a request.
@@ -76,17 +84,17 @@ data OffersInsert = OffersInsert
7684-- * 'oiFields'
7785--
7886-- * 'oiAlt'
79−offersInsert
80− :: OffersInsert
81−offersInsert =
82− OffersInsert
87+offersInsert'
88+ :: OffersInsert'
89+offersInsert' =
90+ OffersInsert'
8391 { _oiQuotaUser = Nothing
8492 , _oiPrettyPrint = True
8593 , _oiUserIp = Nothing
8694 , _oiKey = Nothing
8795 , _oiOauthToken = Nothing
8896 , _oiFields = Nothing
89− , _oiAlt = "json"
97+ , _oiAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
@@ -123,17 +131,20 @@ oiFields :: Lens' OffersInsert' (Maybe Text)
123131oiFields = lens _oiFields (\ s a -> s{_oiFields = a})
124132
125133-- | Data format for the response.
126−oiAlt :: Lens' OffersInsert' Text
134+oiAlt :: Lens' OffersInsert' Alt
127135oiAlt = lens _oiAlt (\ s a -> s{_oiAlt = a})
128136
129137instance GoogleRequest OffersInsert' where
130138 type Rs OffersInsert' = OfferDto
131139 request = requestWithRoute defReq adExchangeBuyerURL
132− requestWithRoute r u OffersInsert{..}
133− = go _oiQuotaUser _oiPrettyPrint _oiUserIp _oiKey
140+ requestWithRoute r u OffersInsert'{..}
141+ = go _oiQuotaUser (Just _oiPrettyPrint) _oiUserIp
142+ _oiKey
134143 _oiOauthToken
135144 _oiFields
136− _oiAlt
145+ (Just _oiAlt)
137146 where go
138− = clientWithRoute (Proxy :: Proxy OffersInsertAPI) r
147+ = clientWithRoute
148+ (Proxy :: Proxy OffersInsertResource)
149+ r
139150 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Offers/List.hs+32−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Lists all offers the authenticated user has access to.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerOffersList@.
22−module AdExchangeBuyer.Offers.List
23+module Network.Google.Resource.AdExchangeBuyer.Offers.List
2324 (
2425 -- * REST Resource
25− OffersListAPI
26+ OffersListResource
2627
2728 -- * Creating a Request
28− , offersList
29− , OffersList
29+ , offersList'
30+ , OffersList'
3031
3132 -- * Request Lenses
3233 , olQuotaUser
@@ -42,21 +43,29 @@ import Network.Google.AdExchangeBuyer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdexchangebuyerOffersList@ which the
45−-- 'OffersList' request conforms to.
46−type OffersListAPI =
47− "offers" :> Get '[JSON] ListOffersResponse
46+-- 'OffersList'' request conforms to.
47+type OffersListResource =
48+ "offers" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :>
56+ Get '[JSON] ListOffersResponse
4857
4958-- | Lists all offers the authenticated user has access to.
5059--
51−-- /See:/ 'offersList' smart constructor.
52−data OffersList = OffersList
60+-- /See:/ 'offersList'' smart constructor.
61+data OffersList' = OffersList'
5362 { _olQuotaUser :: !(Maybe Text)
5463 , _olPrettyPrint :: !Bool
5564 , _olUserIp :: !(Maybe Text)
5665 , _olKey :: !(Maybe Text)
5766 , _olOauthToken :: !(Maybe Text)
5867 , _olFields :: !(Maybe Text)
59− , _olAlt :: !Text
68+ , _olAlt :: !Alt
6069 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6170
6271-- | Creates a value of 'OffersList'' with the minimum fields required to make a request.
@@ -76,17 +85,17 @@ data OffersList = OffersList
7685-- * 'olFields'
7786--
7887-- * 'olAlt'
79−offersList
80− :: OffersList
81−offersList =
82− OffersList
88+offersList'
89+ :: OffersList'
90+offersList' =
91+ OffersList'
8392 { _olQuotaUser = Nothing
8493 , _olPrettyPrint = True
8594 , _olUserIp = Nothing
8695 , _olKey = Nothing
8796 , _olOauthToken = Nothing
8897 , _olFields = Nothing
89− , _olAlt = "json"
98+ , _olAlt = JSON
9099 }
91100
92101-- | Available to use for quota purposes for server-side applications. Can be
@@ -123,16 +132,19 @@ olFields :: Lens' OffersList' (Maybe Text)
123132olFields = lens _olFields (\ s a -> s{_olFields = a})
124133
125134-- | Data format for the response.
126−olAlt :: Lens' OffersList' Text
135+olAlt :: Lens' OffersList' Alt
127136olAlt = lens _olAlt (\ s a -> s{_olAlt = a})
128137
129138instance GoogleRequest OffersList' where
130139 type Rs OffersList' = ListOffersResponse
131140 request = requestWithRoute defReq adExchangeBuyerURL
132− requestWithRoute r u OffersList{..}
133− = go _olQuotaUser _olPrettyPrint _olUserIp _olKey
141+ requestWithRoute r u OffersList'{..}
142+ = go _olQuotaUser (Just _olPrettyPrint) _olUserIp
143+ _olKey
134144 _olOauthToken
135145 _olFields
136− _olAlt
146+ (Just _olAlt)
137147 where go
138− = clientWithRoute (Proxy :: Proxy OffersListAPI) r u
148+ = clientWithRoute (Proxy :: Proxy OffersListResource)
149+ r
150+ u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PerformanceReport/List.hs+33−25
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves the authenticated user\'s list of performance metrics.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPerformanceReportList@.
22−module AdExchangeBuyer.PerformanceReport.List
23+module Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List
2324 (
2425 -- * REST Resource
25− PerformanceReportListAPI
26+ PerformanceReportListResource
2627
2728 -- * Creating a Request
28− , performanceReportList
29− , PerformanceReportList
29+ , performanceReportList'
30+ , PerformanceReportList'
3031
3132 -- * Request Lenses
3233 , prlQuotaUser
@@ -47,20 +48,27 @@ import Network.Google.AdExchangeBuyer.Types
4748import Network.Google.Prelude
4849
4950-- | A resource alias for @AdexchangebuyerPerformanceReportList@ which the
50−-- 'PerformanceReportList' request conforms to.
51−type PerformanceReportListAPI =
51+-- 'PerformanceReportList'' request conforms to.
52+type PerformanceReportListResource =
5253 "performancereport" :>
53− QueryParam "accountId" Int64 :>
54− QueryParam "pageToken" Text :>
55− QueryParam "endDateTime" Text :>
56− QueryParam "maxResults" Word32 :>
57− QueryParam "startDateTime" Text :>
58− Get '[JSON] PerformanceReportList
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "accountId" Int64 :>
58+ QueryParam "key" Text :>
59+ QueryParam "pageToken" Text :>
60+ QueryParam "oauth_token" Text :>
61+ QueryParam "endDateTime" Text :>
62+ QueryParam "maxResults" Word32 :>
63+ QueryParam "startDateTime" Text :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :>
66+ Get '[JSON] PerformanceReportList
5967
6068-- | Retrieves the authenticated user\'s list of performance metrics.
6169--
62−-- /See:/ 'performanceReportList' smart constructor.
63−data PerformanceReportList = PerformanceReportList
70+-- /See:/ 'performanceReportList'' smart constructor.
71+data PerformanceReportList' = PerformanceReportList'
6472 { _prlQuotaUser :: !(Maybe Text)
6573 , _prlPrettyPrint :: !Bool
6674 , _prlUserIp :: !(Maybe Text)
@@ -72,7 +80,7 @@ data PerformanceReportList = PerformanceReportList
7280 , _prlMaxResults :: !(Maybe Word32)
7381 , _prlStartDateTime :: !Text
7482 , _prlFields :: !(Maybe Text)
75− , _prlAlt :: !Text
83+ , _prlAlt :: !Alt
7684 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7785
7886-- | Creates a value of 'PerformanceReportList'' with the minimum fields required to make a request.
@@ -102,13 +110,13 @@ data PerformanceReportList = PerformanceReportList
102110-- * 'prlFields'
103111--
104112-- * 'prlAlt'
105−performanceReportList
113+performanceReportList'
106114 :: Int64 -- ^ 'accountId'
107115 -> Text -- ^ 'endDateTime'
108116 -> Text -- ^ 'startDateTime'
109− -> PerformanceReportList
110−performanceReportList pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =
111− PerformanceReportList
117+ -> PerformanceReportList'
118+performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =
119+ PerformanceReportList'
112120 { _prlQuotaUser = Nothing
113121 , _prlPrettyPrint = True
114122 , _prlUserIp = Nothing
@@ -120,7 +128,7 @@ performanceReportList pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =
120128 , _prlMaxResults = Nothing
121129 , _prlStartDateTime = pPrlStartDateTime_
122130 , _prlFields = Nothing
123− , _prlAlt = "json"
131+ , _prlAlt = JSON
124132 }
125133
126134-- | Available to use for quota purposes for server-side applications. Can be
@@ -191,15 +199,15 @@ prlFields
191199 = lens _prlFields (\ s a -> s{_prlFields = a})
192200
193201-- | Data format for the response.
194−prlAlt :: Lens' PerformanceReportList' Text
202+prlAlt :: Lens' PerformanceReportList' Alt
195203prlAlt = lens _prlAlt (\ s a -> s{_prlAlt = a})
196204
197205instance GoogleRequest PerformanceReportList' where
198206 type Rs PerformanceReportList' =
199207 PerformanceReportList
200208 request = requestWithRoute defReq adExchangeBuyerURL
201− requestWithRoute r u PerformanceReportList{..}
202− = go _prlQuotaUser _prlPrettyPrint _prlUserIp
209+ requestWithRoute r u PerformanceReportList'{..}
210+ = go _prlQuotaUser (Just _prlPrettyPrint) _prlUserIp
203211 (Just _prlAccountId)
204212 _prlKey
205213 _prlPageToken
@@ -208,9 +216,9 @@ instance GoogleRequest PerformanceReportList' where
208216 _prlMaxResults
209217 (Just _prlStartDateTime)
210218 _prlFields
211− _prlAlt
219+ (Just _prlAlt)
212220 where go
213221 = clientWithRoute
214− (Proxy :: Proxy PerformanceReportListAPI)
222+ (Proxy :: Proxy PerformanceReportListResource)
215223 r
216224 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Delete.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Deletes an existing pretargeting config.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigDelete@.
22−module AdExchangeBuyer.PretargetingConfig.Delete
23+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete
2324 (
2425 -- * REST Resource
25− PretargetingConfigDeleteAPI
26+ PretargetingConfigDeleteResource
2627
2728 -- * Creating a Request
28− , pretargetingConfigDelete
29− , PretargetingConfigDelete
29+ , pretargetingConfigDelete'
30+ , PretargetingConfigDelete'
3031
3132 -- * Request Lenses
3233 , pcdQuotaUser
@@ -44,16 +45,23 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerPretargetingConfigDelete@ which the
47−-- 'PretargetingConfigDelete' request conforms to.
48−type PretargetingConfigDeleteAPI =
48+-- 'PretargetingConfigDelete'' request conforms to.
49+type PretargetingConfigDeleteResource =
4950 "pretargetingconfigs" :>
5051 Capture "accountId" Int64 :>
51− Capture "configId" Int64 :> Delete '[JSON] ()
52+ Capture "configId" Int64 :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :> Delete '[JSON] ()
5260
5361-- | Deletes an existing pretargeting config.
5462--
55−-- /See:/ 'pretargetingConfigDelete' smart constructor.
56−data PretargetingConfigDelete = PretargetingConfigDelete
63+-- /See:/ 'pretargetingConfigDelete'' smart constructor.
64+data PretargetingConfigDelete' = PretargetingConfigDelete'
5765 { _pcdQuotaUser :: !(Maybe Text)
5866 , _pcdPrettyPrint :: !Bool
5967 , _pcdUserIp :: !(Maybe Text)
@@ -62,7 +70,7 @@ data PretargetingConfigDelete = PretargetingConfigDelete
6270 , _pcdConfigId :: !Int64
6371 , _pcdOauthToken :: !(Maybe Text)
6472 , _pcdFields :: !(Maybe Text)
65− , _pcdAlt :: !Text
73+ , _pcdAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'PretargetingConfigDelete'' with the minimum fields required to make a request.
@@ -86,12 +94,12 @@ data PretargetingConfigDelete = PretargetingConfigDelete
8694-- * 'pcdFields'
8795--
8896-- * 'pcdAlt'
89−pretargetingConfigDelete
97+pretargetingConfigDelete'
9098 :: Int64 -- ^ 'accountId'
9199 -> Int64 -- ^ 'configId'
92− -> PretargetingConfigDelete
93−pretargetingConfigDelete pPcdAccountId_ pPcdConfigId_ =
94− PretargetingConfigDelete
100+ -> PretargetingConfigDelete'
101+pretargetingConfigDelete' pPcdAccountId_ pPcdConfigId_ =
102+ PretargetingConfigDelete'
95103 { _pcdQuotaUser = Nothing
96104 , _pcdPrettyPrint = True
97105 , _pcdUserIp = Nothing
@@ -100,7 +108,7 @@ pretargetingConfigDelete pPcdAccountId_ pPcdConfigId_ =
100108 , _pcdConfigId = pPcdConfigId_
101109 , _pcdOauthToken = Nothing
102110 , _pcdFields = Nothing
103− , _pcdAlt = "json"
111+ , _pcdAlt = JSON
104112 }
105113
106114-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,23 +158,23 @@ pcdFields
150158 = lens _pcdFields (\ s a -> s{_pcdFields = a})
151159
152160-- | Data format for the response.
153−pcdAlt :: Lens' PretargetingConfigDelete' Text
161+pcdAlt :: Lens' PretargetingConfigDelete' Alt
154162pcdAlt = lens _pcdAlt (\ s a -> s{_pcdAlt = a})
155163
156164instance GoogleRequest PretargetingConfigDelete'
157165 where
158166 type Rs PretargetingConfigDelete' = ()
159167 request = requestWithRoute defReq adExchangeBuyerURL
160− requestWithRoute r u PretargetingConfigDelete{..}
161− = go _pcdQuotaUser _pcdPrettyPrint _pcdUserIp
168+ requestWithRoute r u PretargetingConfigDelete'{..}
169+ = go _pcdQuotaUser (Just _pcdPrettyPrint) _pcdUserIp
162170 _pcdAccountId
163171 _pcdKey
164172 _pcdConfigId
165173 _pcdOauthToken
166174 _pcdFields
167− _pcdAlt
175+ (Just _pcdAlt)
168176 where go
169177 = clientWithRoute
170− (Proxy :: Proxy PretargetingConfigDeleteAPI)
178+ (Proxy :: Proxy PretargetingConfigDeleteResource)
171179 r
172180 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Get.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Gets a specific pretargeting configuration
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigGet@.
22−module AdExchangeBuyer.PretargetingConfig.Get
23+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get
2324 (
2425 -- * REST Resource
25− PretargetingConfigGetAPI
26+ PretargetingConfigGetResource
2627
2728 -- * Creating a Request
28− , pretargetingConfigGet
29− , PretargetingConfigGet
29+ , pretargetingConfigGet'
30+ , PretargetingConfigGet'
3031
3132 -- * Request Lenses
3233 , pcgQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerPretargetingConfigGet@ which the
47−-- 'PretargetingConfigGet' request conforms to.
48−type PretargetingConfigGetAPI =
48+-- 'PretargetingConfigGet'' request conforms to.
49+type PretargetingConfigGetResource =
4950 "pretargetingconfigs" :>
5051 Capture "accountId" Int64 :>
5152 Capture "configId" Int64 :>
52− Get '[JSON] PretargetingConfig
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Get '[JSON] PretargetingConfig
5361
5462-- | Gets a specific pretargeting configuration
5563--
56−-- /See:/ 'pretargetingConfigGet' smart constructor.
57−data PretargetingConfigGet = PretargetingConfigGet
64+-- /See:/ 'pretargetingConfigGet'' smart constructor.
65+data PretargetingConfigGet' = PretargetingConfigGet'
5866 { _pcgQuotaUser :: !(Maybe Text)
5967 , _pcgPrettyPrint :: !Bool
6068 , _pcgUserIp :: !(Maybe Text)
@@ -63,7 +71,7 @@ data PretargetingConfigGet = PretargetingConfigGet
6371 , _pcgConfigId :: !Int64
6472 , _pcgOauthToken :: !(Maybe Text)
6573 , _pcgFields :: !(Maybe Text)
66− , _pcgAlt :: !Text
74+ , _pcgAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'PretargetingConfigGet'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data PretargetingConfigGet = PretargetingConfigGet
8795-- * 'pcgFields'
8896--
8997-- * 'pcgAlt'
90−pretargetingConfigGet
98+pretargetingConfigGet'
9199 :: Int64 -- ^ 'accountId'
92100 -> Int64 -- ^ 'configId'
93− -> PretargetingConfigGet
94−pretargetingConfigGet pPcgAccountId_ pPcgConfigId_ =
95− PretargetingConfigGet
101+ -> PretargetingConfigGet'
102+pretargetingConfigGet' pPcgAccountId_ pPcgConfigId_ =
103+ PretargetingConfigGet'
96104 { _pcgQuotaUser = Nothing
97105 , _pcgPrettyPrint = True
98106 , _pcgUserIp = Nothing
@@ -101,7 +109,7 @@ pretargetingConfigGet pPcgAccountId_ pPcgConfigId_ =
101109 , _pcgConfigId = pPcgConfigId_
102110 , _pcgOauthToken = Nothing
103111 , _pcgFields = Nothing
104− , _pcgAlt = "json"
112+ , _pcgAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -151,22 +159,22 @@ pcgFields
151159 = lens _pcgFields (\ s a -> s{_pcgFields = a})
152160
153161-- | Data format for the response.
154−pcgAlt :: Lens' PretargetingConfigGet' Text
162+pcgAlt :: Lens' PretargetingConfigGet' Alt
155163pcgAlt = lens _pcgAlt (\ s a -> s{_pcgAlt = a})
156164
157165instance GoogleRequest PretargetingConfigGet' where
158166 type Rs PretargetingConfigGet' = PretargetingConfig
159167 request = requestWithRoute defReq adExchangeBuyerURL
160− requestWithRoute r u PretargetingConfigGet{..}
161− = go _pcgQuotaUser _pcgPrettyPrint _pcgUserIp
168+ requestWithRoute r u PretargetingConfigGet'{..}
169+ = go _pcgQuotaUser (Just _pcgPrettyPrint) _pcgUserIp
162170 _pcgAccountId
163171 _pcgKey
164172 _pcgConfigId
165173 _pcgOauthToken
166174 _pcgFields
167− _pcgAlt
175+ (Just _pcgAlt)
168176 where go
169177 = clientWithRoute
170− (Proxy :: Proxy PretargetingConfigGetAPI)
178+ (Proxy :: Proxy PretargetingConfigGetResource)
171179 r
172180 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Insert.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Inserts a new pretargeting configuration.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigInsert@.
22−module AdExchangeBuyer.PretargetingConfig.Insert
23+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert
2324 (
2425 -- * REST Resource
25− PretargetingConfigInsertAPI
26+ PretargetingConfigInsertResource
2627
2728 -- * Creating a Request
28− , pretargetingConfigInsert
29− , PretargetingConfigInsert
29+ , pretargetingConfigInsert'
30+ , PretargetingConfigInsert'
3031
3132 -- * Request Lenses
3233 , pciQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdExchangeBuyer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangebuyerPretargetingConfigInsert@ which the
46−-- 'PretargetingConfigInsert' request conforms to.
47−type PretargetingConfigInsertAPI =
47+-- 'PretargetingConfigInsert'' request conforms to.
48+type PretargetingConfigInsertResource =
4849 "pretargetingconfigs" :>
4950 Capture "accountId" Int64 :>
50− Post '[JSON] PretargetingConfig
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :>
58+ Post '[JSON] PretargetingConfig
5159
5260-- | Inserts a new pretargeting configuration.
5361--
54−-- /See:/ 'pretargetingConfigInsert' smart constructor.
55−data PretargetingConfigInsert = PretargetingConfigInsert
62+-- /See:/ 'pretargetingConfigInsert'' smart constructor.
63+data PretargetingConfigInsert' = PretargetingConfigInsert'
5664 { _pciQuotaUser :: !(Maybe Text)
5765 , _pciPrettyPrint :: !Bool
5866 , _pciUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data PretargetingConfigInsert = PretargetingConfigInsert
6068 , _pciKey :: !(Maybe Text)
6169 , _pciOauthToken :: !(Maybe Text)
6270 , _pciFields :: !(Maybe Text)
63− , _pciAlt :: !Text
71+ , _pciAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'PretargetingConfigInsert'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data PretargetingConfigInsert = PretargetingConfigInsert
8290-- * 'pciFields'
8391--
8492-- * 'pciAlt'
85−pretargetingConfigInsert
93+pretargetingConfigInsert'
8694 :: Int64 -- ^ 'accountId'
87− -> PretargetingConfigInsert
88−pretargetingConfigInsert pPciAccountId_ =
89− PretargetingConfigInsert
95+ -> PretargetingConfigInsert'
96+pretargetingConfigInsert' pPciAccountId_ =
97+ PretargetingConfigInsert'
9098 { _pciQuotaUser = Nothing
9199 , _pciPrettyPrint = True
92100 , _pciUserIp = Nothing
@@ -94,7 +102,7 @@ pretargetingConfigInsert pPciAccountId_ =
94102 , _pciKey = Nothing
95103 , _pciOauthToken = Nothing
96104 , _pciFields = Nothing
97− , _pciAlt = "json"
105+ , _pciAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,7 +147,7 @@ pciFields
139147 = lens _pciFields (\ s a -> s{_pciFields = a})
140148
141149-- | Data format for the response.
142−pciAlt :: Lens' PretargetingConfigInsert' Text
150+pciAlt :: Lens' PretargetingConfigInsert' Alt
143151pciAlt = lens _pciAlt (\ s a -> s{_pciAlt = a})
144152
145153instance GoogleRequest PretargetingConfigInsert'
@@ -147,15 +155,15 @@ instance GoogleRequest PretargetingConfigInsert'
147155 type Rs PretargetingConfigInsert' =
148156 PretargetingConfig
149157 request = requestWithRoute defReq adExchangeBuyerURL
150− requestWithRoute r u PretargetingConfigInsert{..}
151− = go _pciQuotaUser _pciPrettyPrint _pciUserIp
158+ requestWithRoute r u PretargetingConfigInsert'{..}
159+ = go _pciQuotaUser (Just _pciPrettyPrint) _pciUserIp
152160 _pciAccountId
153161 _pciKey
154162 _pciOauthToken
155163 _pciFields
156− _pciAlt
164+ (Just _pciAlt)
157165 where go
158166 = clientWithRoute
159− (Proxy :: Proxy PretargetingConfigInsertAPI)
167+ (Proxy :: Proxy PretargetingConfigInsertResource)
160168 r
161169 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/List.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- configurations.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigList@.
23−module AdExchangeBuyer.PretargetingConfig.List
24+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List
2425 (
2526 -- * REST Resource
26− PretargetingConfigListAPI
27+ PretargetingConfigListResource
2728
2829 -- * Creating a Request
29− , pretargetingConfigList
30− , PretargetingConfigList
30+ , pretargetingConfigList'
31+ , PretargetingConfigList'
3132
3233 -- * Request Lenses
3334 , pclQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerPretargetingConfigList@ which the
47−-- 'PretargetingConfigList' request conforms to.
48−type PretargetingConfigListAPI =
48+-- 'PretargetingConfigList'' request conforms to.
49+type PretargetingConfigListResource =
4950 "pretargetingconfigs" :>
5051 Capture "accountId" Int64 :>
51− Get '[JSON] PretargetingConfigList
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :>
59+ Get '[JSON] PretargetingConfigList
5260
5361-- | Retrieves a list of the authenticated user\'s pretargeting
5462-- configurations.
5563--
56−-- /See:/ 'pretargetingConfigList' smart constructor.
57−data PretargetingConfigList = PretargetingConfigList
64+-- /See:/ 'pretargetingConfigList'' smart constructor.
65+data PretargetingConfigList' = PretargetingConfigList'
5866 { _pclQuotaUser :: !(Maybe Text)
5967 , _pclPrettyPrint :: !Bool
6068 , _pclUserIp :: !(Maybe Text)
@@ -62,7 +70,7 @@ data PretargetingConfigList = PretargetingConfigList
6270 , _pclKey :: !(Maybe Text)
6371 , _pclOauthToken :: !(Maybe Text)
6472 , _pclFields :: !(Maybe Text)
65− , _pclAlt :: !Text
73+ , _pclAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'PretargetingConfigList'' with the minimum fields required to make a request.
@@ -84,11 +92,11 @@ data PretargetingConfigList = PretargetingConfigList
8492-- * 'pclFields'
8593--
8694-- * 'pclAlt'
87−pretargetingConfigList
95+pretargetingConfigList'
8896 :: Int64 -- ^ 'accountId'
89− -> PretargetingConfigList
90−pretargetingConfigList pPclAccountId_ =
91− PretargetingConfigList
97+ -> PretargetingConfigList'
98+pretargetingConfigList' pPclAccountId_ =
99+ PretargetingConfigList'
92100 { _pclQuotaUser = Nothing
93101 , _pclPrettyPrint = True
94102 , _pclUserIp = Nothing
@@ -96,7 +104,7 @@ pretargetingConfigList pPclAccountId_ =
96104 , _pclKey = Nothing
97105 , _pclOauthToken = Nothing
98106 , _pclFields = Nothing
99− , _pclAlt = "json"
107+ , _pclAlt = JSON
100108 }
101109
102110-- | Available to use for quota purposes for server-side applications. Can be
@@ -141,22 +149,22 @@ pclFields
141149 = lens _pclFields (\ s a -> s{_pclFields = a})
142150
143151-- | Data format for the response.
144−pclAlt :: Lens' PretargetingConfigList' Text
152+pclAlt :: Lens' PretargetingConfigList' Alt
145153pclAlt = lens _pclAlt (\ s a -> s{_pclAlt = a})
146154
147155instance GoogleRequest PretargetingConfigList' where
148156 type Rs PretargetingConfigList' =
149157 PretargetingConfigList
150158 request = requestWithRoute defReq adExchangeBuyerURL
151− requestWithRoute r u PretargetingConfigList{..}
152− = go _pclQuotaUser _pclPrettyPrint _pclUserIp
159+ requestWithRoute r u PretargetingConfigList'{..}
160+ = go _pclQuotaUser (Just _pclPrettyPrint) _pclUserIp
153161 _pclAccountId
154162 _pclKey
155163 _pclOauthToken
156164 _pclFields
157− _pclAlt
165+ (Just _pclAlt)
158166 where go
159167 = clientWithRoute
160− (Proxy :: Proxy PretargetingConfigListAPI)
168+ (Proxy :: Proxy PretargetingConfigListResource)
161169 r
162170 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Patch.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- semantics.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigPatch@.
23−module AdExchangeBuyer.PretargetingConfig.Patch
24+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch
2425 (
2526 -- * REST Resource
26− PretargetingConfigPatchAPI
27+ PretargetingConfigPatchResource
2728
2829 -- * Creating a Request
29− , pretargetingConfigPatch
30− , PretargetingConfigPatch
30+ , pretargetingConfigPatch'
31+ , PretargetingConfigPatch'
3132
3233 -- * Request Lenses
3334 , pcpQuotaUser
@@ -45,18 +46,25 @@ import Network.Google.AdExchangeBuyer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangebuyerPretargetingConfigPatch@ which the
48−-- 'PretargetingConfigPatch' request conforms to.
49−type PretargetingConfigPatchAPI =
49+-- 'PretargetingConfigPatch'' request conforms to.
50+type PretargetingConfigPatchResource =
5051 "pretargetingconfigs" :>
5152 Capture "accountId" Int64 :>
5253 Capture "configId" Int64 :>
53− Patch '[JSON] PretargetingConfig
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :>
61+ Patch '[JSON] PretargetingConfig
5462
5563-- | Updates an existing pretargeting config. This method supports patch
5664-- semantics.
5765--
58−-- /See:/ 'pretargetingConfigPatch' smart constructor.
59−data PretargetingConfigPatch = PretargetingConfigPatch
66+-- /See:/ 'pretargetingConfigPatch'' smart constructor.
67+data PretargetingConfigPatch' = PretargetingConfigPatch'
6068 { _pcpQuotaUser :: !(Maybe Text)
6169 , _pcpPrettyPrint :: !Bool
6270 , _pcpUserIp :: !(Maybe Text)
@@ -65,7 +73,7 @@ data PretargetingConfigPatch = PretargetingConfigPatch
6573 , _pcpConfigId :: !Int64
6674 , _pcpOauthToken :: !(Maybe Text)
6775 , _pcpFields :: !(Maybe Text)
68− , _pcpAlt :: !Text
76+ , _pcpAlt :: !Alt
6977 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7078
7179-- | Creates a value of 'PretargetingConfigPatch'' with the minimum fields required to make a request.
@@ -89,12 +97,12 @@ data PretargetingConfigPatch = PretargetingConfigPatch
8997-- * 'pcpFields'
9098--
9199-- * 'pcpAlt'
92−pretargetingConfigPatch
100+pretargetingConfigPatch'
93101 :: Int64 -- ^ 'accountId'
94102 -> Int64 -- ^ 'configId'
95− -> PretargetingConfigPatch
96−pretargetingConfigPatch pPcpAccountId_ pPcpConfigId_ =
97− PretargetingConfigPatch
103+ -> PretargetingConfigPatch'
104+pretargetingConfigPatch' pPcpAccountId_ pPcpConfigId_ =
105+ PretargetingConfigPatch'
98106 { _pcpQuotaUser = Nothing
99107 , _pcpPrettyPrint = True
100108 , _pcpUserIp = Nothing
@@ -103,7 +111,7 @@ pretargetingConfigPatch pPcpAccountId_ pPcpConfigId_ =
103111 , _pcpConfigId = pPcpConfigId_
104112 , _pcpOauthToken = Nothing
105113 , _pcpFields = Nothing
106− , _pcpAlt = "json"
114+ , _pcpAlt = JSON
107115 }
108116
109117-- | Available to use for quota purposes for server-side applications. Can be
@@ -153,22 +161,22 @@ pcpFields
153161 = lens _pcpFields (\ s a -> s{_pcpFields = a})
154162
155163-- | Data format for the response.
156−pcpAlt :: Lens' PretargetingConfigPatch' Text
164+pcpAlt :: Lens' PretargetingConfigPatch' Alt
157165pcpAlt = lens _pcpAlt (\ s a -> s{_pcpAlt = a})
158166
159167instance GoogleRequest PretargetingConfigPatch' where
160168 type Rs PretargetingConfigPatch' = PretargetingConfig
161169 request = requestWithRoute defReq adExchangeBuyerURL
162− requestWithRoute r u PretargetingConfigPatch{..}
163− = go _pcpQuotaUser _pcpPrettyPrint _pcpUserIp
170+ requestWithRoute r u PretargetingConfigPatch'{..}
171+ = go _pcpQuotaUser (Just _pcpPrettyPrint) _pcpUserIp
164172 _pcpAccountId
165173 _pcpKey
166174 _pcpConfigId
167175 _pcpOauthToken
168176 _pcpFields
169− _pcpAlt
177+ (Just _pcpAlt)
170178 where go
171179 = clientWithRoute
172− (Proxy :: Proxy PretargetingConfigPatchAPI)
180+ (Proxy :: Proxy PretargetingConfigPatchResource)
173181 r
174182 u
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/PretargetingConfig/Update.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Updates an existing pretargeting config.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> for @AdexchangebuyerPretargetingConfigUpdate@.
22−module AdExchangeBuyer.PretargetingConfig.Update
23+module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update
2324 (
2425 -- * REST Resource
25− PretargetingConfigUpdateAPI
26+ PretargetingConfigUpdateResource
2627
2728 -- * Creating a Request
28− , pretargetingConfigUpdate
29− , PretargetingConfigUpdate
29+ , pretargetingConfigUpdate'
30+ , PretargetingConfigUpdate'
3031
3132 -- * Request Lenses
3233 , pcuQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdExchangeBuyer.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangebuyerPretargetingConfigUpdate@ which the
47−-- 'PretargetingConfigUpdate' request conforms to.
48−type PretargetingConfigUpdateAPI =
48+-- 'PretargetingConfigUpdate'' request conforms to.
49+type PretargetingConfigUpdateResource =
4950 "pretargetingconfigs" :>
5051 Capture "accountId" Int64 :>
5152 Capture "configId" Int64 :>
52− Put '[JSON] PretargetingConfig
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :>
60+ Put '[JSON] PretargetingConfig
5361
5462-- | Updates an existing pretargeting config.
5563--
56−-- /See:/ 'pretargetingConfigUpdate' smart constructor.
57−data PretargetingConfigUpdate = PretargetingConfigUpdate
64+-- /See:/ 'pretargetingConfigUpdate'' smart constructor.
65+data PretargetingConfigUpdate' = PretargetingConfigUpdate'
5866 { _pcuQuotaUser :: !(Maybe Text)
5967 , _pcuPrettyPrint :: !Bool
6068 , _pcuUserIp :: !(Maybe Text)
@@ -63,7 +71,7 @@ data PretargetingConfigUpdate = PretargetingConfigUpdate
6371 , _pcuConfigId :: !Int64
6472 , _pcuOauthToken :: !(Maybe Text)
6573 , _pcuFields :: !(Maybe Text)
66− , _pcuAlt :: !Text
74+ , _pcuAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'PretargetingConfigUpdate'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data PretargetingConfigUpdate = PretargetingConfigUpdate
8795-- * 'pcuFields'
8896--
8997-- * 'pcuAlt'
90−pretargetingConfigUpdate
98+pretargetingConfigUpdate'
9199 :: Int64 -- ^ 'accountId'
92100 -> Int64 -- ^ 'configId'
93− -> PretargetingConfigUpdate
94−pretargetingConfigUpdate pPcuAccountId_ pPcuConfigId_ =
95− PretargetingConfigUpdate
101+ -> PretargetingConfigUpdate'
102+pretargetingConfigUpdate' pPcuAccountId_ pPcuConfigId_ =
103+ PretargetingConfigUpdate'
96104 { _pcuQuotaUser = Nothing
97105 , _pcuPrettyPrint = True
98106 , _pcuUserIp = Nothing
@@ -101,7 +109,7 @@ pretargetingConfigUpdate pPcuAccountId_ pPcuConfigId_ =
101109 , _pcuConfigId = pPcuConfigId_
102110 , _pcuOauthToken = Nothing
103111 , _pcuFields = Nothing
104− , _pcuAlt = "json"
112+ , _pcuAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -151,7 +159,7 @@ pcuFields
151159 = lens _pcuFields (\ s a -> s{_pcuFields = a})
152160
153161-- | Data format for the response.
154−pcuAlt :: Lens' PretargetingConfigUpdate' Text
162+pcuAlt :: Lens' PretargetingConfigUpdate' Alt
155163pcuAlt = lens _pcuAlt (\ s a -> s{_pcuAlt = a})
156164
157165instance GoogleRequest PretargetingConfigUpdate'
@@ -159,16 +167,16 @@ instance GoogleRequest PretargetingConfigUpdate'
159167 type Rs PretargetingConfigUpdate' =
160168 PretargetingConfig
161169 request = requestWithRoute defReq adExchangeBuyerURL
162− requestWithRoute r u PretargetingConfigUpdate{..}
163− = go _pcuQuotaUser _pcuPrettyPrint _pcuUserIp
170+ requestWithRoute r u PretargetingConfigUpdate'{..}
171+ = go _pcuQuotaUser (Just _pcuPrettyPrint) _pcuUserIp
164172 _pcuAccountId
165173 _pcuKey
166174 _pcuConfigId
167175 _pcuOauthToken
168176 _pcuFields
169− _pcuAlt
177+ (Just _pcuAlt)
170178 where go
171179 = clientWithRoute
172− (Proxy :: Proxy PretargetingConfigUpdateAPI)
180+ (Proxy :: Proxy PretargetingConfigUpdateResource)
173181 r
174182 u
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller.hs+47−15
@@ -28,46 +28,46 @@ module Network.Google.AdExchangeSeller
2828 -- * REST Resources
2929
3030 -- ** AdexchangesellerAccountsAdclientsList
31− , module AdExchangeSeller.Accounts.Adclients.List
31+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Adclients.List
3232
3333 -- ** AdexchangesellerAccountsAlertsList
34− , module AdExchangeSeller.Accounts.Alerts.List
34+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Alerts.List
3535
3636 -- ** AdexchangesellerAccountsCustomchannelsGet
37− , module AdExchangeSeller.Accounts.Customchannels.Get
37+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Customchannels.Get
3838
3939 -- ** AdexchangesellerAccountsCustomchannelsList
40− , module AdExchangeSeller.Accounts.Customchannels.List
40+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Customchannels.List
4141
4242 -- ** AdexchangesellerAccountsGet
43− , module AdExchangeSeller.Accounts.Get
43+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Get
4444
4545 -- ** AdexchangesellerAccountsList
46− , module AdExchangeSeller.Accounts.List
46+ , module Network.Google.Resource.AdExchangeSeller.Accounts.List
4747
4848 -- ** AdexchangesellerAccountsMetadataDimensionsList
49− , module AdExchangeSeller.Accounts.Metadata.Dimensions.List
49+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Metadata.Dimensions.List
5050
5151 -- ** AdexchangesellerAccountsMetadataMetricsList
52− , module AdExchangeSeller.Accounts.Metadata.Metrics.List
52+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Metadata.Metrics.List
5353
5454 -- ** AdexchangesellerAccountsPreferreddealsGet
55− , module AdExchangeSeller.Accounts.Preferreddeals.Get
55+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Preferreddeals.Get
5656
5757 -- ** AdexchangesellerAccountsPreferreddealsList
58− , module AdExchangeSeller.Accounts.Preferreddeals.List
58+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Preferreddeals.List
5959
6060 -- ** AdexchangesellerAccountsReportsGenerate
61− , module AdExchangeSeller.Accounts.Reports.Generate
61+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Generate
6262
6363 -- ** AdexchangesellerAccountsReportsSavedGenerate
64− , module AdExchangeSeller.Accounts.Reports.Saved.Generate
64+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Saved.Generate
6565
6666 -- ** AdexchangesellerAccountsReportsSavedList
67− , module AdExchangeSeller.Accounts.Reports.Saved.List
67+ , module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Saved.List
6868
6969 -- ** AdexchangesellerAccountsURLchannelsList
70− , module AdExchangeSeller.Accounts.URLchannels.List
70+ , module Network.Google.Resource.AdExchangeSeller.Accounts.URLchannels.List
7171
7272 -- * Types
7373
@@ -98,6 +98,13 @@ module Network.Google.AdExchangeSeller
9898 , aKind
9999 , aItems
100100
101+ -- ** ReportHeaders
102+ , ReportHeaders
103+ , reportHeaders
104+ , rhName
105+ , rhCurrency
106+ , rhType
107+
101108 -- ** Alerts
102109 , Alerts
103110 , alerts
@@ -171,6 +178,14 @@ module Network.Google.AdExchangeSeller
171178 , adId
172179 , adProductCode
173180
181+ -- ** CustomChannelTargetingInfo
182+ , CustomChannelTargetingInfo
183+ , customChannelTargetingInfo
184+ , cctiLocation
185+ , cctiSiteLanguage
186+ , cctiAdsAppearOn
187+ , cctiDescription
188+
174189 -- ** PreferredDeals
175190 , PreferredDeals
176191 , preferredDeals
@@ -210,6 +225,9 @@ module Network.Google.AdExchangeSeller
210225 , pEndTime
211226 , pId
212227 , pFixedCpm
228+
229+ -- ** Alt
230+ , Alt (..)
213231 ) where
214232
215233import Network.Google.AdExchangeSeller.Types
@@ -233,7 +251,21 @@ import Network.Google.Resource.AdExchangeSeller.Accounts.URLchannels.L
233251TODO
234252-}
235253
236−type AdExchangeSellerAPI = Accounts
254+type AdExchangeSellerAPI =
255+ AccountsAdclientsListResource :<|>
256+ AccountsReportsSavedListResource
257+ :<|> AccountsReportsSavedGenerateResource
258+ :<|> AccountsReportsGenerateResource
259+ :<|> AccountsAlertsListResource
260+ :<|> AccountsUrlchannelsListResource
261+ :<|> AccountsCustomchannelsListResource
262+ :<|> AccountsCustomchannelsGetResource
263+ :<|> AccountsPreferreddealsListResource
264+ :<|> AccountsPreferreddealsGetResource
265+ :<|> AccountsMetadataMetricsListResource
266+ :<|> AccountsMetadataDimensionsListResource
267+ :<|> AccountsListResource
268+ :<|> AccountsGetResource
237269
238270adExchangeSellerAPI :: Proxy AdExchangeSellerAPI
239271adExchangeSellerAPI = Proxy
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+19−1
@@ -44,6 +44,13 @@ module Network.Google.AdExchangeSeller.Types
4444 , aKind
4545 , aItems
4646
47+ -- * ReportHeaders
48+ , ReportHeaders
49+ , reportHeaders
50+ , rhName
51+ , rhCurrency
52+ , rhType
53+
4754 -- * Alerts
4855 , Alerts
4956 , alerts
@@ -117,6 +124,14 @@ module Network.Google.AdExchangeSeller.Types
117124 , adId
118125 , adProductCode
119126
127+ -- * CustomChannelTargetingInfo
128+ , CustomChannelTargetingInfo
129+ , customChannelTargetingInfo
130+ , cctiLocation
131+ , cctiSiteLanguage
132+ , cctiAdsAppearOn
133+ , cctiDescription
134+
120135 -- * PreferredDeals
121136 , PreferredDeals
122137 , preferredDeals
@@ -156,6 +171,9 @@ module Network.Google.AdExchangeSeller.Types
156171 , pEndTime
157172 , pId
158173 , pFixedCpm
174+
175+ -- * Alt
176+ , Alt (..)
159177 ) where
160178
161179import Network.Google.AdExchangeSeller.Types.Product
@@ -163,7 +181,7 @@ import Network.Google.AdExchangeSeller.Types.Sum
163181import Network.Google.Prelude
164182
165183-- | URL referring to version 'v2.0' of the Ad Exchange Seller API.
166−adExchangeSellerURL :: BaseURL
184+adExchangeSellerURL :: BaseUrl
167185adExchangeSellerURL
168186 = BaseUrl Https
169187 "https://www.googleapis.com/adexchangeseller/v2.0/"
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs+136−2
@@ -283,6 +283,63 @@ instance ToJSON Accounts where
283283 ("nextPageToken" .=) <$> _aNextPageToken,
284284 Just ("kind" .= _aKind), ("items" .=) <$> _aItems])
285285
286+--
287+-- /See:/ 'reportHeaders' smart constructor.
288+data ReportHeaders = ReportHeaders
289+ { _rhName :: !(Maybe Text)
290+ , _rhCurrency :: !(Maybe Text)
291+ , _rhType :: !(Maybe Text)
292+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
293+
294+-- | Creates a value of 'ReportHeaders' with the minimum fields required to make a request.
295+--
296+-- Use one of the following lenses to modify other fields as desired:
297+--
298+-- * 'rhName'
299+--
300+-- * 'rhCurrency'
301+--
302+-- * 'rhType'
303+reportHeaders
304+ :: ReportHeaders
305+reportHeaders =
306+ ReportHeaders
307+ { _rhName = Nothing
308+ , _rhCurrency = Nothing
309+ , _rhType = Nothing
310+ }
311+
312+-- | The name of the header.
313+rhName :: Lens' ReportHeaders (Maybe Text)
314+rhName = lens _rhName (\ s a -> s{_rhName = a})
315+
316+-- | The currency of this column. Only present if the header type is
317+-- METRIC_CURRENCY.
318+rhCurrency :: Lens' ReportHeaders (Maybe Text)
319+rhCurrency
320+ = lens _rhCurrency (\ s a -> s{_rhCurrency = a})
321+
322+-- | The type of the header; one of DIMENSION, METRIC_TALLY, METRIC_RATIO, or
323+-- METRIC_CURRENCY.
324+rhType :: Lens' ReportHeaders (Maybe Text)
325+rhType = lens _rhType (\ s a -> s{_rhType = a})
326+
327+instance FromJSON ReportHeaders where
328+ parseJSON
329+ = withObject "ReportHeaders"
330+ (\ o ->
331+ ReportHeaders <$>
332+ (o .:? "name") <*> (o .:? "currency") <*>
333+ (o .:? "type"))
334+
335+instance ToJSON ReportHeaders where
336+ toJSON ReportHeaders{..}
337+ = object
338+ (catMaybes
339+ [("name" .=) <$> _rhName,
340+ ("currency" .=) <$> _rhCurrency,
341+ ("type" .=) <$> _rhType])
342+
286343--
287344-- /See:/ 'alerts' smart constructor.
288345data Alerts = Alerts
@@ -679,7 +736,7 @@ data Report = Report
679736 , _rWarnings :: !(Maybe [Text])
680737 , _rRows :: !(Maybe [[Text]])
681738 , _rTotals :: !(Maybe [Text])
682− , _rHeaders :: !(Maybe [ReportHeadersItem])
739+ , _rHeaders :: !(Maybe [ReportHeaders])
683740 , _rTotalMatchedRows :: !(Maybe Int64)
684741 } deriving (Eq,Read,Show,Data,Typeable,Generic)
685742
@@ -751,7 +808,7 @@ rTotals
751808-- | The header information of the columns requested in the report. This is a
752809-- list of headers; one for each dimension in the request, followed by one
753810-- for each metric in the request.
754−rHeaders :: Lens' Report [ReportHeadersItem]
811+rHeaders :: Lens' Report [ReportHeaders]
755812rHeaders
756813 = lens _rHeaders (\ s a -> s{_rHeaders = a}) .
757814 _Default
@@ -924,6 +981,83 @@ instance ToJSON AdClient where
924981 ("id" .=) <$> _adId,
925982 ("productCode" .=) <$> _adProductCode])
926983
984+-- | The targeting information of this custom channel, if activated.
985+--
986+-- /See:/ 'customChannelTargetingInfo' smart constructor.
987+data CustomChannelTargetingInfo = CustomChannelTargetingInfo
988+ { _cctiLocation :: !(Maybe Text)
989+ , _cctiSiteLanguage :: !(Maybe Text)
990+ , _cctiAdsAppearOn :: !(Maybe Text)
991+ , _cctiDescription :: !(Maybe Text)
992+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
993+
994+-- | Creates a value of 'CustomChannelTargetingInfo' with the minimum fields required to make a request.
995+--
996+-- Use one of the following lenses to modify other fields as desired:
997+--
998+-- * 'cctiLocation'
999+--
1000+-- * 'cctiSiteLanguage'
1001+--
1002+-- * 'cctiAdsAppearOn'
1003+--
1004+-- * 'cctiDescription'
1005+customChannelTargetingInfo
1006+ :: CustomChannelTargetingInfo
1007+customChannelTargetingInfo =
1008+ CustomChannelTargetingInfo
1009+ { _cctiLocation = Nothing
1010+ , _cctiSiteLanguage = Nothing
1011+ , _cctiAdsAppearOn = Nothing
1012+ , _cctiDescription = Nothing
1013+ }
1014+
1015+-- | The locations in which ads appear. (Only valid for content and mobile
1016+-- content ads). Acceptable values for content ads are: TOP_LEFT,
1017+-- TOP_CENTER, TOP_RIGHT, MIDDLE_LEFT, MIDDLE_CENTER, MIDDLE_RIGHT,
1018+-- BOTTOM_LEFT, BOTTOM_CENTER, BOTTOM_RIGHT, MULTIPLE_LOCATIONS. Acceptable
1019+-- values for mobile content ads are: TOP, MIDDLE, BOTTOM,
1020+-- MULTIPLE_LOCATIONS.
1021+cctiLocation :: Lens' CustomChannelTargetingInfo (Maybe Text)
1022+cctiLocation
1023+ = lens _cctiLocation (\ s a -> s{_cctiLocation = a})
1024+
1025+-- | The language of the sites ads will be displayed on.
1026+cctiSiteLanguage :: Lens' CustomChannelTargetingInfo (Maybe Text)
1027+cctiSiteLanguage
1028+ = lens _cctiSiteLanguage
1029+ (\ s a -> s{_cctiSiteLanguage = a})
1030+
1031+-- | The name used to describe this channel externally.
1032+cctiAdsAppearOn :: Lens' CustomChannelTargetingInfo (Maybe Text)
1033+cctiAdsAppearOn
1034+ = lens _cctiAdsAppearOn
1035+ (\ s a -> s{_cctiAdsAppearOn = a})
1036+
1037+-- | The external description of the channel.
1038+cctiDescription :: Lens' CustomChannelTargetingInfo (Maybe Text)
1039+cctiDescription
1040+ = lens _cctiDescription
1041+ (\ s a -> s{_cctiDescription = a})
1042+
1043+instance FromJSON CustomChannelTargetingInfo where
1044+ parseJSON
1045+ = withObject "CustomChannelTargetingInfo"
1046+ (\ o ->
1047+ CustomChannelTargetingInfo <$>
1048+ (o .:? "location") <*> (o .:? "siteLanguage") <*>
1049+ (o .:? "adsAppearOn")
1050+ <*> (o .:? "description"))
1051+
1052+instance ToJSON CustomChannelTargetingInfo where
1053+ toJSON CustomChannelTargetingInfo{..}
1054+ = object
1055+ (catMaybes
1056+ [("location" .=) <$> _cctiLocation,
1057+ ("siteLanguage" .=) <$> _cctiSiteLanguage,
1058+ ("adsAppearOn" .=) <$> _cctiAdsAppearOn,
1059+ ("description" .=) <$> _cctiDescription])
1060+
9271061--
9281062-- /See:/ 'preferredDeals' smart constructor.
9291063data PreferredDeals = PreferredDeals
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Sum.hs+29
@@ -16,3 +16,32 @@
1616module Network.Google.AdExchangeSeller.Types.Sum where
1717
1818import Network.Google.Prelude
19+
20+-- | Data format for the response.
21+data Alt
22+ = CSV
23+ -- ^ @csv@
24+ -- Responses with Content-Type of text\/csv
25+ | JSON
26+ -- ^ @json@
27+ -- Responses with Content-Type of application\/json
28+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
29+
30+instance Hashable Alt
31+
32+instance FromText Alt where
33+ fromText = \case
34+ "csv" -> Just CSV
35+ "json" -> Just JSON
36+ _ -> Nothing
37+
38+instance ToText Alt where
39+ toText = \case
40+ CSV -> "csv"
41+ JSON -> "json"
42+
43+instance FromJSON Alt where
44+ parseJSON = parseJSONText "Alt"
45+
46+instance ToJSON Alt where
47+ toJSON = toJSONText
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Adclients/List.hs+98−96
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,170 +20,171 @@
1920-- | List all ad clients in this Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsAdclientsList@.
22−module AdExchangeSeller.Accounts.Adclients.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Adclients.List
2324 (
2425 -- * REST Resource
25− AccountsAdclientsListAPI
26+ AccountsAdclientsListResource
2627
2728 -- * Creating a Request
28− , accountsAdclientsList
29− , AccountsAdclientsList
29+ , accountsAdclientsList'
30+ , AccountsAdclientsList'
3031
3132 -- * Request Lenses
32− , aalQuotaUser
33− , aalPrettyPrint
34− , aalUserIp
35− , aalAccountId
36− , aalKey
37− , aalPageToken
38− , aalOauthToken
39− , aalMaxResults
40− , aalFields
41− , aalAlt
33+ , aQuotaUser
34+ , aPrettyPrint
35+ , aUserIp
36+ , aAccountId
37+ , aKey
38+ , aPageToken
39+ , aOauthToken
40+ , aMaxResults
41+ , aFields
42+ , aAlt
4243 ) where
4344
4445import Network.Google.AdExchangeSeller.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangesellerAccountsAdclientsList@ which the
48−-- 'AccountsAdclientsList' request conforms to.
49−type AccountsAdclientsListAPI =
49+-- 'AccountsAdclientsList'' request conforms to.
50+type AccountsAdclientsListResource =
5051 "accounts" :>
5152 Capture "accountId" Text :>
5253 "adclients" :>
53− QueryParam "pageToken" Text :>
54− QueryParam "maxResults" Word32 :>
55− Get '[JSON] AdClients
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "pageToken" Text :>
59+ QueryParam "oauth_token" Text :>
60+ QueryParam "maxResults" Word32 :>
61+ QueryParam "fields" Text :>
62+ QueryParam "alt" Alt :> Get '[JSON] AdClients
5663
5764-- | List all ad clients in this Ad Exchange account.
5865--
59−-- /See:/ 'accountsAdclientsList' smart constructor.
60−data AccountsAdclientsList = AccountsAdclientsList
61− { _aalQuotaUser :: !(Maybe Text)
62− , _aalPrettyPrint :: !Bool
63− , _aalUserIp :: !(Maybe Text)
64− , _aalAccountId :: !Text
65− , _aalKey :: !(Maybe Text)
66− , _aalPageToken :: !(Maybe Text)
67− , _aalOauthToken :: !(Maybe Text)
68− , _aalMaxResults :: !(Maybe Word32)
69− , _aalFields :: !(Maybe Text)
70− , _aalAlt :: !Text
66+-- /See:/ 'accountsAdclientsList'' smart constructor.
67+data AccountsAdclientsList' = AccountsAdclientsList'
68+ { _aQuotaUser :: !(Maybe Text)
69+ , _aPrettyPrint :: !Bool
70+ , _aUserIp :: !(Maybe Text)
71+ , _aAccountId :: !Text
72+ , _aKey :: !(Maybe Text)
73+ , _aPageToken :: !(Maybe Text)
74+ , _aOauthToken :: !(Maybe Text)
75+ , _aMaxResults :: !(Maybe Word32)
76+ , _aFields :: !(Maybe Text)
77+ , _aAlt :: !Alt
7178 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7279
7380-- | Creates a value of 'AccountsAdclientsList'' with the minimum fields required to make a request.
7481--
7582-- Use one of the following lenses to modify other fields as desired:
7683--
77−-- * 'aalQuotaUser'
84+-- * 'aQuotaUser'
7885--
79−-- * 'aalPrettyPrint'
86+-- * 'aPrettyPrint'
8087--
81−-- * 'aalUserIp'
88+-- * 'aUserIp'
8289--
83−-- * 'aalAccountId'
90+-- * 'aAccountId'
8491--
85−-- * 'aalKey'
92+-- * 'aKey'
8693--
87−-- * 'aalPageToken'
94+-- * 'aPageToken'
8895--
89−-- * 'aalOauthToken'
96+-- * 'aOauthToken'
9097--
91−-- * 'aalMaxResults'
98+-- * 'aMaxResults'
9299--
93−-- * 'aalFields'
100+-- * 'aFields'
94101--
95−-- * 'aalAlt'
96−accountsAdclientsList
102+-- * 'aAlt'
103+accountsAdclientsList'
97104 :: Text -- ^ 'accountId'
98− -> AccountsAdclientsList
99−accountsAdclientsList pAalAccountId_ =
100− AccountsAdclientsList
101− { _aalQuotaUser = Nothing
102− , _aalPrettyPrint = True
103− , _aalUserIp = Nothing
104− , _aalAccountId = pAalAccountId_
105− , _aalKey = Nothing
106− , _aalPageToken = Nothing
107− , _aalOauthToken = Nothing
108− , _aalMaxResults = Nothing
109− , _aalFields = Nothing
110− , _aalAlt = "json"
105+ -> AccountsAdclientsList'
106+accountsAdclientsList' pAAccountId_ =
107+ AccountsAdclientsList'
108+ { _aQuotaUser = Nothing
109+ , _aPrettyPrint = True
110+ , _aUserIp = Nothing
111+ , _aAccountId = pAAccountId_
112+ , _aKey = Nothing
113+ , _aPageToken = Nothing
114+ , _aOauthToken = Nothing
115+ , _aMaxResults = Nothing
116+ , _aFields = Nothing
117+ , _aAlt = JSON
111118 }
112119
113120-- | Available to use for quota purposes for server-side applications. Can be
114121-- any arbitrary string assigned to a user, but should not exceed 40
115122-- characters. Overrides userIp if both are provided.
116−aalQuotaUser :: Lens' AccountsAdclientsList' (Maybe Text)
117−aalQuotaUser
118− = lens _aalQuotaUser (\ s a -> s{_aalQuotaUser = a})
123+aQuotaUser :: Lens' AccountsAdclientsList' (Maybe Text)
124+aQuotaUser
125+ = lens _aQuotaUser (\ s a -> s{_aQuotaUser = a})
119126
120127-- | Returns response with indentations and line breaks.
121−aalPrettyPrint :: Lens' AccountsAdclientsList' Bool
122−aalPrettyPrint
123− = lens _aalPrettyPrint
124− (\ s a -> s{_aalPrettyPrint = a})
128+aPrettyPrint :: Lens' AccountsAdclientsList' Bool
129+aPrettyPrint
130+ = lens _aPrettyPrint (\ s a -> s{_aPrettyPrint = a})
125131
126132-- | IP address of the site where the request originates. Use this if you
127133-- want to enforce per-user limits.
128−aalUserIp :: Lens' AccountsAdclientsList' (Maybe Text)
129−aalUserIp
130− = lens _aalUserIp (\ s a -> s{_aalUserIp = a})
134+aUserIp :: Lens' AccountsAdclientsList' (Maybe Text)
135+aUserIp = lens _aUserIp (\ s a -> s{_aUserIp = a})
131136
132137-- | Account to which the ad client belongs.
133−aalAccountId :: Lens' AccountsAdclientsList' Text
134−aalAccountId
135− = lens _aalAccountId (\ s a -> s{_aalAccountId = a})
138+aAccountId :: Lens' AccountsAdclientsList' Text
139+aAccountId
140+ = lens _aAccountId (\ s a -> s{_aAccountId = a})
136141
137142-- | API key. Your API key identifies your project and provides you with API
138143-- access, quota, and reports. Required unless you provide an OAuth 2.0
139144-- token.
140−aalKey :: Lens' AccountsAdclientsList' (Maybe Text)
141−aalKey = lens _aalKey (\ s a -> s{_aalKey = a})
145+aKey :: Lens' AccountsAdclientsList' (Maybe Text)
146+aKey = lens _aKey (\ s a -> s{_aKey = a})
142147
143148-- | A continuation token, used to page through ad clients. To retrieve the
144149-- next page, set this parameter to the value of \"nextPageToken\" from the
145150-- previous response.
146−aalPageToken :: Lens' AccountsAdclientsList' (Maybe Text)
147−aalPageToken
148− = lens _aalPageToken (\ s a -> s{_aalPageToken = a})
151+aPageToken :: Lens' AccountsAdclientsList' (Maybe Text)
152+aPageToken
153+ = lens _aPageToken (\ s a -> s{_aPageToken = a})
149154
150155-- | OAuth 2.0 token for the current user.
151−aalOauthToken :: Lens' AccountsAdclientsList' (Maybe Text)
152−aalOauthToken
153− = lens _aalOauthToken
154− (\ s a -> s{_aalOauthToken = a})
156+aOauthToken :: Lens' AccountsAdclientsList' (Maybe Text)
157+aOauthToken
158+ = lens _aOauthToken (\ s a -> s{_aOauthToken = a})
155159
156160-- | The maximum number of ad clients to include in the response, used for
157161-- paging.
158−aalMaxResults :: Lens' AccountsAdclientsList' (Maybe Word32)
159−aalMaxResults
160− = lens _aalMaxResults
161− (\ s a -> s{_aalMaxResults = a})
162+aMaxResults :: Lens' AccountsAdclientsList' (Maybe Word32)
163+aMaxResults
164+ = lens _aMaxResults (\ s a -> s{_aMaxResults = a})
162165
163166-- | Selector specifying which fields to include in a partial response.
164−aalFields :: Lens' AccountsAdclientsList' (Maybe Text)
165−aalFields
166− = lens _aalFields (\ s a -> s{_aalFields = a})
167+aFields :: Lens' AccountsAdclientsList' (Maybe Text)
168+aFields = lens _aFields (\ s a -> s{_aFields = a})
167169
168170-- | Data format for the response.
169−aalAlt :: Lens' AccountsAdclientsList' Text
170−aalAlt = lens _aalAlt (\ s a -> s{_aalAlt = a})
171+aAlt :: Lens' AccountsAdclientsList' Alt
172+aAlt = lens _aAlt (\ s a -> s{_aAlt = a})
171173
172174instance GoogleRequest AccountsAdclientsList' where
173175 type Rs AccountsAdclientsList' = AdClients
174176 request = requestWithRoute defReq adExchangeSellerURL
175− requestWithRoute r u AccountsAdclientsList{..}
176− = go _aalQuotaUser _aalPrettyPrint _aalUserIp
177− _aalAccountId
178− _aalKey
179− _aalPageToken
180− _aalOauthToken
181− _aalMaxResults
182− _aalFields
183− _aalAlt
177+ requestWithRoute r u AccountsAdclientsList'{..}
178+ = go _aQuotaUser (Just _aPrettyPrint) _aUserIp
179+ _aAccountId
180+ _aKey
181+ _aPageToken
182+ _aOauthToken
183+ _aMaxResults
184+ _aFields
185+ (Just _aAlt)
184186 where go
185187 = clientWithRoute
186− (Proxy :: Proxy AccountsAdclientsListAPI)
188+ (Proxy :: Proxy AccountsAdclientsListResource)
187189 r
188190 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Alerts/List.hs+93−79
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,149 +20,162 @@
1920-- | List the alerts for this Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsAlertsList@.
22−module AdExchangeSeller.Accounts.Alerts.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Alerts.List
2324 (
2425 -- * REST Resource
25− AccountsAlertsListAPI
26+ AccountsAlertsListResource
2627
2728 -- * Creating a Request
28− , accountsAlertsList
29− , AccountsAlertsList
29+ , accountsAlertsList'
30+ , AccountsAlertsList'
3031
3132 -- * Request Lenses
32− , aQuotaUser
33− , aPrettyPrint
34− , aUserIp
35− , aLocale
36− , aAccountId
37− , aKey
38− , aOauthToken
39− , aFields
40− , aAlt
33+ , aalQuotaUser
34+ , aalPrettyPrint
35+ , aalUserIp
36+ , aalLocale
37+ , aalAccountId
38+ , aalKey
39+ , aalOauthToken
40+ , aalFields
41+ , aalAlt
4142 ) where
4243
4344import Network.Google.AdExchangeSeller.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangesellerAccountsAlertsList@ which the
47−-- 'AccountsAlertsList' request conforms to.
48−type AccountsAlertsListAPI =
48+-- 'AccountsAlertsList'' request conforms to.
49+type AccountsAlertsListResource =
4950 "accounts" :>
5051 Capture "accountId" Text :>
5152 "alerts" :>
52− QueryParam "locale" Text :> Get '[JSON] Alerts
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "locale" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Alerts
5361
5462-- | List the alerts for this Ad Exchange account.
5563--
56−-- /See:/ 'accountsAlertsList' smart constructor.
57−data AccountsAlertsList = AccountsAlertsList
58− { _aQuotaUser :: !(Maybe Text)
59− , _aPrettyPrint :: !Bool
60− , _aUserIp :: !(Maybe Text)
61− , _aLocale :: !(Maybe Text)
62− , _aAccountId :: !Text
63− , _aKey :: !(Maybe Text)
64− , _aOauthToken :: !(Maybe Text)
65− , _aFields :: !(Maybe Text)
66− , _aAlt :: !Text
64+-- /See:/ 'accountsAlertsList'' smart constructor.
65+data AccountsAlertsList' = AccountsAlertsList'
66+ { _aalQuotaUser :: !(Maybe Text)
67+ , _aalPrettyPrint :: !Bool
68+ , _aalUserIp :: !(Maybe Text)
69+ , _aalLocale :: !(Maybe Text)
70+ , _aalAccountId :: !Text
71+ , _aalKey :: !(Maybe Text)
72+ , _aalOauthToken :: !(Maybe Text)
73+ , _aalFields :: !(Maybe Text)
74+ , _aalAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'AccountsAlertsList'' with the minimum fields required to make a request.
7078--
7179-- Use one of the following lenses to modify other fields as desired:
7280--
73−-- * 'aQuotaUser'
81+-- * 'aalQuotaUser'
7482--
75−-- * 'aPrettyPrint'
83+-- * 'aalPrettyPrint'
7684--
77−-- * 'aUserIp'
85+-- * 'aalUserIp'
7886--
79−-- * 'aLocale'
87+-- * 'aalLocale'
8088--
81−-- * 'aAccountId'
89+-- * 'aalAccountId'
8290--
83−-- * 'aKey'
91+-- * 'aalKey'
8492--
85−-- * 'aOauthToken'
93+-- * 'aalOauthToken'
8694--
87−-- * 'aFields'
95+-- * 'aalFields'
8896--
89−-- * 'aAlt'
90−accountsAlertsList
97+-- * 'aalAlt'
98+accountsAlertsList'
9199 :: Text -- ^ 'accountId'
92− -> AccountsAlertsList
93−accountsAlertsList pAAccountId_ =
94− AccountsAlertsList
95− { _aQuotaUser = Nothing
96− , _aPrettyPrint = True
97− , _aUserIp = Nothing
98− , _aLocale = Nothing
99− , _aAccountId = pAAccountId_
100− , _aKey = Nothing
101− , _aOauthToken = Nothing
102− , _aFields = Nothing
103− , _aAlt = "json"
100+ -> AccountsAlertsList'
101+accountsAlertsList' pAalAccountId_ =
102+ AccountsAlertsList'
103+ { _aalQuotaUser = Nothing
104+ , _aalPrettyPrint = True
105+ , _aalUserIp = Nothing
106+ , _aalLocale = Nothing
107+ , _aalAccountId = pAalAccountId_
108+ , _aalKey = Nothing
109+ , _aalOauthToken = Nothing
110+ , _aalFields = Nothing
111+ , _aalAlt = JSON
104112 }
105113
106114-- | Available to use for quota purposes for server-side applications. Can be
107115-- any arbitrary string assigned to a user, but should not exceed 40
108116-- characters. Overrides userIp if both are provided.
109−aQuotaUser :: Lens' AccountsAlertsList' (Maybe Text)
110−aQuotaUser
111− = lens _aQuotaUser (\ s a -> s{_aQuotaUser = a})
117+aalQuotaUser :: Lens' AccountsAlertsList' (Maybe Text)
118+aalQuotaUser
119+ = lens _aalQuotaUser (\ s a -> s{_aalQuotaUser = a})
112120
113121-- | Returns response with indentations and line breaks.
114−aPrettyPrint :: Lens' AccountsAlertsList' Bool
115−aPrettyPrint
116− = lens _aPrettyPrint (\ s a -> s{_aPrettyPrint = a})
122+aalPrettyPrint :: Lens' AccountsAlertsList' Bool
123+aalPrettyPrint
124+ = lens _aalPrettyPrint
125+ (\ s a -> s{_aalPrettyPrint = a})
117126
118127-- | IP address of the site where the request originates. Use this if you
119128-- want to enforce per-user limits.
120−aUserIp :: Lens' AccountsAlertsList' (Maybe Text)
121−aUserIp = lens _aUserIp (\ s a -> s{_aUserIp = a})
129+aalUserIp :: Lens' AccountsAlertsList' (Maybe Text)
130+aalUserIp
131+ = lens _aalUserIp (\ s a -> s{_aalUserIp = a})
122132
123133-- | The locale to use for translating alert messages. The account locale
124134-- will be used if this is not supplied. The AdSense default (English) will
125135-- be used if the supplied locale is invalid or unsupported.
126−aLocale :: Lens' AccountsAlertsList' (Maybe Text)
127−aLocale = lens _aLocale (\ s a -> s{_aLocale = a})
136+aalLocale :: Lens' AccountsAlertsList' (Maybe Text)
137+aalLocale
138+ = lens _aalLocale (\ s a -> s{_aalLocale = a})
128139
129140-- | Account owning the alerts.
130−aAccountId :: Lens' AccountsAlertsList' Text
131−aAccountId
132− = lens _aAccountId (\ s a -> s{_aAccountId = a})
141+aalAccountId :: Lens' AccountsAlertsList' Text
142+aalAccountId
143+ = lens _aalAccountId (\ s a -> s{_aalAccountId = a})
133144
134145-- | API key. Your API key identifies your project and provides you with API
135146-- access, quota, and reports. Required unless you provide an OAuth 2.0
136147-- token.
137−aKey :: Lens' AccountsAlertsList' (Maybe Text)
138−aKey = lens _aKey (\ s a -> s{_aKey = a})
148+aalKey :: Lens' AccountsAlertsList' (Maybe Text)
149+aalKey = lens _aalKey (\ s a -> s{_aalKey = a})
139150
140151-- | OAuth 2.0 token for the current user.
141−aOauthToken :: Lens' AccountsAlertsList' (Maybe Text)
142−aOauthToken
143− = lens _aOauthToken (\ s a -> s{_aOauthToken = a})
152+aalOauthToken :: Lens' AccountsAlertsList' (Maybe Text)
153+aalOauthToken
154+ = lens _aalOauthToken
155+ (\ s a -> s{_aalOauthToken = a})
144156
145157-- | Selector specifying which fields to include in a partial response.
146−aFields :: Lens' AccountsAlertsList' (Maybe Text)
147−aFields = lens _aFields (\ s a -> s{_aFields = a})
158+aalFields :: Lens' AccountsAlertsList' (Maybe Text)
159+aalFields
160+ = lens _aalFields (\ s a -> s{_aalFields = a})
148161
149162-- | Data format for the response.
150−aAlt :: Lens' AccountsAlertsList' Text
151−aAlt = lens _aAlt (\ s a -> s{_aAlt = a})
163+aalAlt :: Lens' AccountsAlertsList' Alt
164+aalAlt = lens _aalAlt (\ s a -> s{_aalAlt = a})
152165
153166instance GoogleRequest AccountsAlertsList' where
154167 type Rs AccountsAlertsList' = Alerts
155168 request = requestWithRoute defReq adExchangeSellerURL
156− requestWithRoute r u AccountsAlertsList{..}
157− = go _aQuotaUser _aPrettyPrint _aUserIp _aLocale
158− _aAccountId
159− _aKey
160− _aOauthToken
161− _aFields
162− _aAlt
169+ requestWithRoute r u AccountsAlertsList'{..}
170+ = go _aalQuotaUser (Just _aalPrettyPrint) _aalUserIp
171+ _aalLocale
172+ _aalAccountId
173+ _aalKey
174+ _aalOauthToken
175+ _aalFields
176+ (Just _aalAlt)
163177 where go
164178 = clientWithRoute
165− (Proxy :: Proxy AccountsAlertsListAPI)
179+ (Proxy :: Proxy AccountsAlertsListResource)
166180 r
167181 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Customchannels/Get.hs+27−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get the specified custom channel from the specified ad client.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsCustomchannelsGet@.
22−module AdExchangeSeller.Accounts.Customchannels.Get
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Customchannels.Get
2324 (
2425 -- * REST Resource
25− AccountsCustomchannelsGetAPI
26+ AccountsCustomchannelsGetResource
2627
2728 -- * Creating a Request
28− , accountsCustomchannelsGet
29− , AccountsCustomchannelsGet
29+ , accountsCustomchannelsGet'
30+ , AccountsCustomchannelsGet'
3031
3132 -- * Request Lenses
3233 , acgQuotaUser
@@ -45,20 +46,26 @@ import Network.Google.AdExchangeSeller.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangesellerAccountsCustomchannelsGet@ which the
48−-- 'AccountsCustomchannelsGet' request conforms to.
49−type AccountsCustomchannelsGetAPI =
49+-- 'AccountsCustomchannelsGet'' request conforms to.
50+type AccountsCustomchannelsGetResource =
5051 "accounts" :>
5152 Capture "accountId" Text :>
5253 "adclients" :>
5354 Capture "adClientId" Text :>
5455 "customchannels" :>
5556 Capture "customChannelId" Text :>
56− Get '[JSON] CustomChannel
57+ QueryParam "quotaUser" Text :>
58+ QueryParam "prettyPrint" Bool :>
59+ QueryParam "userIp" Text :>
60+ QueryParam "key" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "fields" Text :>
63+ QueryParam "alt" Alt :> Get '[JSON] CustomChannel
5764
5865-- | Get the specified custom channel from the specified ad client.
5966--
60−-- /See:/ 'accountsCustomchannelsGet' smart constructor.
61−data AccountsCustomchannelsGet = AccountsCustomchannelsGet
67+-- /See:/ 'accountsCustomchannelsGet'' smart constructor.
68+data AccountsCustomchannelsGet' = AccountsCustomchannelsGet'
6269 { _acgQuotaUser :: !(Maybe Text)
6370 , _acgPrettyPrint :: !Bool
6471 , _acgCustomChannelId :: !Text
@@ -68,7 +75,7 @@ data AccountsCustomchannelsGet = AccountsCustomchannelsGet
6875 , _acgKey :: !(Maybe Text)
6976 , _acgOauthToken :: !(Maybe Text)
7077 , _acgFields :: !(Maybe Text)
71− , _acgAlt :: !Text
78+ , _acgAlt :: !Alt
7279 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7380
7481-- | Creates a value of 'AccountsCustomchannelsGet'' with the minimum fields required to make a request.
@@ -94,13 +101,13 @@ data AccountsCustomchannelsGet = AccountsCustomchannelsGet
94101-- * 'acgFields'
95102--
96103-- * 'acgAlt'
97−accountsCustomchannelsGet
104+accountsCustomchannelsGet'
98105 :: Text -- ^ 'customChannelId'
99106 -> Text -- ^ 'adClientId'
100107 -> Text -- ^ 'accountId'
101− -> AccountsCustomchannelsGet
102−accountsCustomchannelsGet pAcgCustomChannelId_ pAcgAdClientId_ pAcgAccountId_ =
103− AccountsCustomchannelsGet
108+ -> AccountsCustomchannelsGet'
109+accountsCustomchannelsGet' pAcgCustomChannelId_ pAcgAdClientId_ pAcgAccountId_ =
110+ AccountsCustomchannelsGet'
104111 { _acgQuotaUser = Nothing
105112 , _acgPrettyPrint = True
106113 , _acgCustomChannelId = pAcgCustomChannelId_
@@ -110,7 +117,7 @@ accountsCustomchannelsGet pAcgCustomChannelId_ pAcgAdClientId_ pAcgAccountId_ =
110117 , _acgKey = Nothing
111118 , _acgOauthToken = Nothing
112119 , _acgFields = Nothing
113− , _acgAlt = "json"
120+ , _acgAlt = JSON
114121 }
115122
116123-- | Available to use for quota purposes for server-side applications. Can be
@@ -167,15 +174,15 @@ acgFields
167174 = lens _acgFields (\ s a -> s{_acgFields = a})
168175
169176-- | Data format for the response.
170−acgAlt :: Lens' AccountsCustomchannelsGet' Text
177+acgAlt :: Lens' AccountsCustomchannelsGet' Alt
171178acgAlt = lens _acgAlt (\ s a -> s{_acgAlt = a})
172179
173180instance GoogleRequest AccountsCustomchannelsGet'
174181 where
175182 type Rs AccountsCustomchannelsGet' = CustomChannel
176183 request = requestWithRoute defReq adExchangeSellerURL
177− requestWithRoute r u AccountsCustomchannelsGet{..}
178− = go _acgQuotaUser _acgPrettyPrint
184+ requestWithRoute r u AccountsCustomchannelsGet'{..}
185+ = go _acgQuotaUser (Just _acgPrettyPrint)
179186 _acgCustomChannelId
180187 _acgUserIp
181188 _acgAdClientId
@@ -183,9 +190,9 @@ instance GoogleRequest AccountsCustomchannelsGet'
183190 _acgKey
184191 _acgOauthToken
185192 _acgFields
186− _acgAlt
193+ (Just _acgAlt)
187194 where go
188195 = clientWithRoute
189− (Proxy :: Proxy AccountsCustomchannelsGetAPI)
196+ (Proxy :: Proxy AccountsCustomchannelsGetResource)
190197 r
191198 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Customchannels/List.hs+30−22
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- account.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsCustomchannelsList@.
23−module AdExchangeSeller.Accounts.Customchannels.List
24+module Network.Google.Resource.AdExchangeSeller.Accounts.Customchannels.List
2425 (
2526 -- * REST Resource
26− AccountsCustomchannelsListAPI
27+ AccountsCustomchannelsListResource
2728
2829 -- * Creating a Request
29− , accountsCustomchannelsList
30− , AccountsCustomchannelsList
30+ , accountsCustomchannelsList'
31+ , AccountsCustomchannelsList'
3132
3233 -- * Request Lenses
3334 , aclQuotaUser
@@ -47,22 +48,29 @@ import Network.Google.AdExchangeSeller.Types
4748import Network.Google.Prelude
4849
4950-- | A resource alias for @AdexchangesellerAccountsCustomchannelsList@ which the
50−-- 'AccountsCustomchannelsList' request conforms to.
51−type AccountsCustomchannelsListAPI =
51+-- 'AccountsCustomchannelsList'' request conforms to.
52+type AccountsCustomchannelsListResource =
5253 "accounts" :>
5354 Capture "accountId" Text :>
5455 "adclients" :>
5556 Capture "adClientId" Text :>
5657 "customchannels" :>
57− QueryParam "pageToken" Text :>
58− QueryParam "maxResults" Word32 :>
59− Get '[JSON] CustomChannels
58+ QueryParam "quotaUser" Text :>
59+ QueryParam "prettyPrint" Bool :>
60+ QueryParam "userIp" Text :>
61+ QueryParam "key" Text :>
62+ QueryParam "pageToken" Text :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "maxResults" Word32 :>
65+ QueryParam "fields" Text :>
66+ QueryParam "alt" Alt :>
67+ Get '[JSON] CustomChannels
6068
6169-- | List all custom channels in the specified ad client for this Ad Exchange
6270-- account.
6371--
64−-- /See:/ 'accountsCustomchannelsList' smart constructor.
65−data AccountsCustomchannelsList = AccountsCustomchannelsList
72+-- /See:/ 'accountsCustomchannelsList'' smart constructor.
73+data AccountsCustomchannelsList' = AccountsCustomchannelsList'
6674 { _aclQuotaUser :: !(Maybe Text)
6775 , _aclPrettyPrint :: !Bool
6876 , _aclUserIp :: !(Maybe Text)
@@ -73,7 +81,7 @@ data AccountsCustomchannelsList = AccountsCustomchannelsList
7381 , _aclOauthToken :: !(Maybe Text)
7482 , _aclMaxResults :: !(Maybe Word32)
7583 , _aclFields :: !(Maybe Text)
76− , _aclAlt :: !Text
84+ , _aclAlt :: !Alt
7785 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7886
7987-- | Creates a value of 'AccountsCustomchannelsList'' with the minimum fields required to make a request.
@@ -101,12 +109,12 @@ data AccountsCustomchannelsList = AccountsCustomchannelsList
101109-- * 'aclFields'
102110--
103111-- * 'aclAlt'
104−accountsCustomchannelsList
112+accountsCustomchannelsList'
105113 :: Text -- ^ 'adClientId'
106114 -> Text -- ^ 'accountId'
107− -> AccountsCustomchannelsList
108−accountsCustomchannelsList pAclAdClientId_ pAclAccountId_ =
109− AccountsCustomchannelsList
115+ -> AccountsCustomchannelsList'
116+accountsCustomchannelsList' pAclAdClientId_ pAclAccountId_ =
117+ AccountsCustomchannelsList'
110118 { _aclQuotaUser = Nothing
111119 , _aclPrettyPrint = True
112120 , _aclUserIp = Nothing
@@ -117,7 +125,7 @@ accountsCustomchannelsList pAclAdClientId_ pAclAccountId_ =
117125 , _aclOauthToken = Nothing
118126 , _aclMaxResults = Nothing
119127 , _aclFields = Nothing
120− , _aclAlt = "json"
128+ , _aclAlt = JSON
121129 }
122130
123131-- | Available to use for quota purposes for server-side applications. Can be
@@ -182,15 +190,15 @@ aclFields
182190 = lens _aclFields (\ s a -> s{_aclFields = a})
183191
184192-- | Data format for the response.
185−aclAlt :: Lens' AccountsCustomchannelsList' Text
193+aclAlt :: Lens' AccountsCustomchannelsList' Alt
186194aclAlt = lens _aclAlt (\ s a -> s{_aclAlt = a})
187195
188196instance GoogleRequest AccountsCustomchannelsList'
189197 where
190198 type Rs AccountsCustomchannelsList' = CustomChannels
191199 request = requestWithRoute defReq adExchangeSellerURL
192− requestWithRoute r u AccountsCustomchannelsList{..}
193− = go _aclQuotaUser _aclPrettyPrint _aclUserIp
200+ requestWithRoute r u AccountsCustomchannelsList'{..}
201+ = go _aclQuotaUser (Just _aclPrettyPrint) _aclUserIp
194202 _aclAdClientId
195203 _aclAccountId
196204 _aclKey
@@ -198,9 +206,9 @@ instance GoogleRequest AccountsCustomchannelsList'
198206 _aclOauthToken
199207 _aclMaxResults
200208 _aclFields
201− _aclAlt
209+ (Just _aclAlt)
202210 where go
203211 = clientWithRoute
204− (Proxy :: Proxy AccountsCustomchannelsListAPI)
212+ (Proxy :: Proxy AccountsCustomchannelsListResource)
205213 r
206214 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Get.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get information about the selected Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsGet@.
22−module AdExchangeSeller.Accounts.Get
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Get
2324 (
2425 -- * REST Resource
25− AccountsGetAPI
26+ AccountsGetResource
2627
2728 -- * Creating a Request
28− , accountsGet
29− , AccountsGet
29+ , accountsGet'
30+ , AccountsGet'
3031
3132 -- * Request Lenses
3233 , agQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdExchangeSeller.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangesellerAccountsGet@ which the
46−-- 'AccountsGet' request conforms to.
47−type AccountsGetAPI =
47+-- 'AccountsGet'' request conforms to.
48+type AccountsGetResource =
4849 "accounts" :>
49− Capture "accountId" Text :> Get '[JSON] Account
50+ Capture "accountId" Text :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] Account
5058
5159-- | Get information about the selected Ad Exchange account.
5260--
53−-- /See:/ 'accountsGet' smart constructor.
54−data AccountsGet = AccountsGet
61+-- /See:/ 'accountsGet'' smart constructor.
62+data AccountsGet' = AccountsGet'
5563 { _agQuotaUser :: !(Maybe Text)
5664 , _agPrettyPrint :: !Bool
5765 , _agUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data AccountsGet = AccountsGet
5967 , _agKey :: !(Maybe Text)
6068 , _agOauthToken :: !(Maybe Text)
6169 , _agFields :: !(Maybe Text)
62− , _agAlt :: !Text
70+ , _agAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'AccountsGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data AccountsGet = AccountsGet
8189-- * 'agFields'
8290--
8391-- * 'agAlt'
84−accountsGet
92+accountsGet'
8593 :: Text -- ^ 'accountId'
86− -> AccountsGet
87−accountsGet pAgAccountId_ =
88− AccountsGet
94+ -> AccountsGet'
95+accountsGet' pAgAccountId_ =
96+ AccountsGet'
8997 { _agQuotaUser = Nothing
9098 , _agPrettyPrint = True
9199 , _agUserIp = Nothing
@@ -93,7 +101,7 @@ accountsGet pAgAccountId_ =
93101 , _agKey = Nothing
94102 , _agOauthToken = Nothing
95103 , _agFields = Nothing
96− , _agAlt = "json"
104+ , _agAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -135,18 +143,21 @@ agFields :: Lens' AccountsGet' (Maybe Text)
135143agFields = lens _agFields (\ s a -> s{_agFields = a})
136144
137145-- | Data format for the response.
138−agAlt :: Lens' AccountsGet' Text
146+agAlt :: Lens' AccountsGet' Alt
139147agAlt = lens _agAlt (\ s a -> s{_agAlt = a})
140148
141149instance GoogleRequest AccountsGet' where
142150 type Rs AccountsGet' = Account
143151 request = requestWithRoute defReq adExchangeSellerURL
144− requestWithRoute r u AccountsGet{..}
145− = go _agQuotaUser _agPrettyPrint _agUserIp
152+ requestWithRoute r u AccountsGet'{..}
153+ = go _agQuotaUser (Just _agPrettyPrint) _agUserIp
146154 _agAccountId
147155 _agKey
148156 _agOauthToken
149157 _agFields
150− _agAlt
158+ (Just _agAlt)
151159 where go
152− = clientWithRoute (Proxy :: Proxy AccountsGetAPI) r u
160+ = clientWithRoute
161+ (Proxy :: Proxy AccountsGetResource)
162+ r
163+ u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/List.hs+32−21
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List all accounts available to this Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsList@.
22−module AdExchangeSeller.Accounts.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.List
2324 (
2425 -- * REST Resource
25− AccountsListAPI
26+ AccountsListResource
2627
2728 -- * Creating a Request
28− , accountsList
29− , AccountsList
29+ , accountsList'
30+ , AccountsList'
3031
3132 -- * Request Lenses
3233 , alQuotaUser
@@ -44,16 +45,23 @@ import Network.Google.AdExchangeSeller.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangesellerAccountsList@ which the
47−-- 'AccountsList' request conforms to.
48−type AccountsListAPI =
48+-- 'AccountsList'' request conforms to.
49+type AccountsListResource =
4950 "accounts" :>
50− QueryParam "pageToken" Text :>
51− QueryParam "maxResults" Int32 :> Get '[JSON] Accounts
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "pageToken" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "maxResults" Int32 :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :> Get '[JSON] Accounts
5260
5361-- | List all accounts available to this Ad Exchange account.
5462--
55−-- /See:/ 'accountsList' smart constructor.
56−data AccountsList = AccountsList
63+-- /See:/ 'accountsList'' smart constructor.
64+data AccountsList' = AccountsList'
5765 { _alQuotaUser :: !(Maybe Text)
5866 , _alPrettyPrint :: !Bool
5967 , _alUserIp :: !(Maybe Text)
@@ -62,7 +70,7 @@ data AccountsList = AccountsList
6270 , _alOauthToken :: !(Maybe Text)
6371 , _alMaxResults :: !(Maybe Int32)
6472 , _alFields :: !(Maybe Text)
65− , _alAlt :: !Text
73+ , _alAlt :: !Alt
6674 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6775
6876-- | Creates a value of 'AccountsList'' with the minimum fields required to make a request.
@@ -86,10 +94,10 @@ data AccountsList = AccountsList
8694-- * 'alFields'
8795--
8896-- * 'alAlt'
89−accountsList
90− :: AccountsList
91−accountsList =
92− AccountsList
97+accountsList'
98+ :: AccountsList'
99+accountsList' =
100+ AccountsList'
93101 { _alQuotaUser = Nothing
94102 , _alPrettyPrint = True
95103 , _alUserIp = Nothing
@@ -98,7 +106,7 @@ accountsList =
98106 , _alOauthToken = Nothing
99107 , _alMaxResults = Nothing
100108 , _alFields = Nothing
101− , _alAlt = "json"
109+ , _alAlt = JSON
102110 }
103111
104112-- | Available to use for quota purposes for server-side applications. Can be
@@ -148,19 +156,22 @@ alFields :: Lens' AccountsList' (Maybe Text)
148156alFields = lens _alFields (\ s a -> s{_alFields = a})
149157
150158-- | Data format for the response.
151−alAlt :: Lens' AccountsList' Text
159+alAlt :: Lens' AccountsList' Alt
152160alAlt = lens _alAlt (\ s a -> s{_alAlt = a})
153161
154162instance GoogleRequest AccountsList' where
155163 type Rs AccountsList' = Accounts
156164 request = requestWithRoute defReq adExchangeSellerURL
157− requestWithRoute r u AccountsList{..}
158− = go _alQuotaUser _alPrettyPrint _alUserIp _alKey
165+ requestWithRoute r u AccountsList'{..}
166+ = go _alQuotaUser (Just _alPrettyPrint) _alUserIp
167+ _alKey
159168 _alPageToken
160169 _alOauthToken
161170 _alMaxResults
162171 _alFields
163− _alAlt
172+ (Just _alAlt)
164173 where go
165− = clientWithRoute (Proxy :: Proxy AccountsListAPI) r
174+ = clientWithRoute
175+ (Proxy :: Proxy AccountsListResource)
176+ r
166177 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Metadata/Dimensions/List.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- account.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsMetadataDimensionsList@.
23−module AdExchangeSeller.Accounts.Metadata.Dimensions.List
24+module Network.Google.Resource.AdExchangeSeller.Accounts.Metadata.Dimensions.List
2425 (
2526 -- * REST Resource
26− AccountsMetadataDimensionsListAPI
27+ AccountsMetadataDimensionsListResource
2728
2829 -- * Creating a Request
29− , accountsMetadataDimensionsList
30− , AccountsMetadataDimensionsList
30+ , accountsMetadataDimensionsList'
31+ , AccountsMetadataDimensionsList'
3132
3233 -- * Request Lenses
3334 , amdlQuotaUser
@@ -44,17 +45,25 @@ import Network.Google.AdExchangeSeller.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangesellerAccountsMetadataDimensionsList@ which the
47−-- 'AccountsMetadataDimensionsList' request conforms to.
48−type AccountsMetadataDimensionsListAPI =
48+-- 'AccountsMetadataDimensionsList'' request conforms to.
49+type AccountsMetadataDimensionsListResource =
4950 "accounts" :>
5051 Capture "accountId" Text :>
51− "metadata" :> "dimensions" :> Get '[JSON] Metadata
52+ "metadata" :>
53+ "dimensions" :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Metadata
5261
5362-- | List the metadata for the dimensions available to this AdExchange
5463-- account.
5564--
56−-- /See:/ 'accountsMetadataDimensionsList' smart constructor.
57−data AccountsMetadataDimensionsList = AccountsMetadataDimensionsList
65+-- /See:/ 'accountsMetadataDimensionsList'' smart constructor.
66+data AccountsMetadataDimensionsList' = AccountsMetadataDimensionsList'
5867 { _amdlQuotaUser :: !(Maybe Text)
5968 , _amdlPrettyPrint :: !Bool
6069 , _amdlUserIp :: !(Maybe Text)
@@ -62,7 +71,7 @@ data AccountsMetadataDimensionsList = AccountsMetadataDimensionsList
6271 , _amdlKey :: !(Maybe Text)
6372 , _amdlOauthToken :: !(Maybe Text)
6473 , _amdlFields :: !(Maybe Text)
65− , _amdlAlt :: !Text
74+ , _amdlAlt :: !Alt
6675 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6776
6877-- | Creates a value of 'AccountsMetadataDimensionsList'' with the minimum fields required to make a request.
@@ -84,11 +93,11 @@ data AccountsMetadataDimensionsList = AccountsMetadataDimensionsList
8493-- * 'amdlFields'
8594--
8695-- * 'amdlAlt'
87−accountsMetadataDimensionsList
96+accountsMetadataDimensionsList'
8897 :: Text -- ^ 'accountId'
89− -> AccountsMetadataDimensionsList
90−accountsMetadataDimensionsList pAmdlAccountId_ =
91− AccountsMetadataDimensionsList
98+ -> AccountsMetadataDimensionsList'
99+accountsMetadataDimensionsList' pAmdlAccountId_ =
100+ AccountsMetadataDimensionsList'
92101 { _amdlQuotaUser = Nothing
93102 , _amdlPrettyPrint = True
94103 , _amdlUserIp = Nothing
@@ -96,7 +105,7 @@ accountsMetadataDimensionsList pAmdlAccountId_ =
96105 , _amdlKey = Nothing
97106 , _amdlOauthToken = Nothing
98107 , _amdlFields = Nothing
99− , _amdlAlt = "json"
108+ , _amdlAlt = JSON
100109 }
101110
102111-- | Available to use for quota purposes for server-side applications. Can be
@@ -143,7 +152,7 @@ amdlFields
143152 = lens _amdlFields (\ s a -> s{_amdlFields = a})
144153
145154-- | Data format for the response.
146−amdlAlt :: Lens' AccountsMetadataDimensionsList' Text
155+amdlAlt :: Lens' AccountsMetadataDimensionsList' Alt
147156amdlAlt = lens _amdlAlt (\ s a -> s{_amdlAlt = a})
148157
149158instance GoogleRequest
@@ -151,15 +160,17 @@ instance GoogleRequest
151160 type Rs AccountsMetadataDimensionsList' = Metadata
152161 request = requestWithRoute defReq adExchangeSellerURL
153162 requestWithRoute r u
154− AccountsMetadataDimensionsList{..}
155− = go _amdlQuotaUser _amdlPrettyPrint _amdlUserIp
163+ AccountsMetadataDimensionsList'{..}
164+ = go _amdlQuotaUser (Just _amdlPrettyPrint)
165+ _amdlUserIp
156166 _amdlAccountId
157167 _amdlKey
158168 _amdlOauthToken
159169 _amdlFields
160− _amdlAlt
170+ (Just _amdlAlt)
161171 where go
162172 = clientWithRoute
163− (Proxy :: Proxy AccountsMetadataDimensionsListAPI)
173+ (Proxy ::
174+ Proxy AccountsMetadataDimensionsListResource)
164175 r
165176 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Metadata/Metrics/List.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List the metadata for the metrics available to this AdExchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsMetadataMetricsList@.
22−module AdExchangeSeller.Accounts.Metadata.Metrics.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Metadata.Metrics.List
2324 (
2425 -- * REST Resource
25− AccountsMetadataMetricsListAPI
26+ AccountsMetadataMetricsListResource
2627
2728 -- * Creating a Request
28− , accountsMetadataMetricsList
29− , AccountsMetadataMetricsList
29+ , accountsMetadataMetricsList'
30+ , AccountsMetadataMetricsList'
3031
3132 -- * Request Lenses
3233 , ammlQuotaUser
@@ -43,16 +44,24 @@ import Network.Google.AdExchangeSeller.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangesellerAccountsMetadataMetricsList@ which the
46−-- 'AccountsMetadataMetricsList' request conforms to.
47−type AccountsMetadataMetricsListAPI =
47+-- 'AccountsMetadataMetricsList'' request conforms to.
48+type AccountsMetadataMetricsListResource =
4849 "accounts" :>
4950 Capture "accountId" Text :>
50− "metadata" :> "metrics" :> Get '[JSON] Metadata
51+ "metadata" :>
52+ "metrics" :>
53+ QueryParam "quotaUser" Text :>
54+ QueryParam "prettyPrint" Bool :>
55+ QueryParam "userIp" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "oauth_token" Text :>
58+ QueryParam "fields" Text :>
59+ QueryParam "alt" Alt :> Get '[JSON] Metadata
5160
5261-- | List the metadata for the metrics available to this AdExchange account.
5362--
54−-- /See:/ 'accountsMetadataMetricsList' smart constructor.
55−data AccountsMetadataMetricsList = AccountsMetadataMetricsList
63+-- /See:/ 'accountsMetadataMetricsList'' smart constructor.
64+data AccountsMetadataMetricsList' = AccountsMetadataMetricsList'
5665 { _ammlQuotaUser :: !(Maybe Text)
5766 , _ammlPrettyPrint :: !Bool
5867 , _ammlUserIp :: !(Maybe Text)
@@ -60,7 +69,7 @@ data AccountsMetadataMetricsList = AccountsMetadataMetricsList
6069 , _ammlKey :: !(Maybe Text)
6170 , _ammlOauthToken :: !(Maybe Text)
6271 , _ammlFields :: !(Maybe Text)
63− , _ammlAlt :: !Text
72+ , _ammlAlt :: !Alt
6473 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6574
6675-- | Creates a value of 'AccountsMetadataMetricsList'' with the minimum fields required to make a request.
@@ -82,11 +91,11 @@ data AccountsMetadataMetricsList = AccountsMetadataMetricsList
8291-- * 'ammlFields'
8392--
8493-- * 'ammlAlt'
85−accountsMetadataMetricsList
94+accountsMetadataMetricsList'
8695 :: Text -- ^ 'accountId'
87− -> AccountsMetadataMetricsList
88−accountsMetadataMetricsList pAmmlAccountId_ =
89− AccountsMetadataMetricsList
96+ -> AccountsMetadataMetricsList'
97+accountsMetadataMetricsList' pAmmlAccountId_ =
98+ AccountsMetadataMetricsList'
9099 { _ammlQuotaUser = Nothing
91100 , _ammlPrettyPrint = True
92101 , _ammlUserIp = Nothing
@@ -94,7 +103,7 @@ accountsMetadataMetricsList pAmmlAccountId_ =
94103 , _ammlKey = Nothing
95104 , _ammlOauthToken = Nothing
96105 , _ammlFields = Nothing
97− , _ammlAlt = "json"
106+ , _ammlAlt = JSON
98107 }
99108
100109-- | Available to use for quota purposes for server-side applications. Can be
@@ -141,22 +150,23 @@ ammlFields
141150 = lens _ammlFields (\ s a -> s{_ammlFields = a})
142151
143152-- | Data format for the response.
144−ammlAlt :: Lens' AccountsMetadataMetricsList' Text
153+ammlAlt :: Lens' AccountsMetadataMetricsList' Alt
145154ammlAlt = lens _ammlAlt (\ s a -> s{_ammlAlt = a})
146155
147156instance GoogleRequest AccountsMetadataMetricsList'
148157 where
149158 type Rs AccountsMetadataMetricsList' = Metadata
150159 request = requestWithRoute defReq adExchangeSellerURL
151− requestWithRoute r u AccountsMetadataMetricsList{..}
152− = go _ammlQuotaUser _ammlPrettyPrint _ammlUserIp
160+ requestWithRoute r u AccountsMetadataMetricsList'{..}
161+ = go _ammlQuotaUser (Just _ammlPrettyPrint)
162+ _ammlUserIp
153163 _ammlAccountId
154164 _ammlKey
155165 _ammlOauthToken
156166 _ammlFields
157− _ammlAlt
167+ (Just _ammlAlt)
158168 where go
159169 = clientWithRoute
160− (Proxy :: Proxy AccountsMetadataMetricsListAPI)
170+ (Proxy :: Proxy AccountsMetadataMetricsListResource)
161171 r
162172 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Preferreddeals/Get.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get information about the selected Ad Exchange Preferred Deal.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsPreferreddealsGet@.
22−module AdExchangeSeller.Accounts.Preferreddeals.Get
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Preferreddeals.Get
2324 (
2425 -- * REST Resource
25− AccountsPreferreddealsGetAPI
26+ AccountsPreferreddealsGetResource
2627
2728 -- * Creating a Request
28− , accountsPreferreddealsGet
29− , AccountsPreferreddealsGet
29+ , accountsPreferreddealsGet'
30+ , AccountsPreferreddealsGet'
3031
3132 -- * Request Lenses
3233 , apgQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdExchangeSeller.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @AdexchangesellerAccountsPreferreddealsGet@ which the
47−-- 'AccountsPreferreddealsGet' request conforms to.
48−type AccountsPreferreddealsGetAPI =
48+-- 'AccountsPreferreddealsGet'' request conforms to.
49+type AccountsPreferreddealsGetResource =
4950 "accounts" :>
5051 Capture "accountId" Text :>
5152 "preferreddeals" :>
52− Capture "dealId" Text :> Get '[JSON] PreferredDeal
53+ Capture "dealId" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] PreferredDeal
5361
5462-- | Get information about the selected Ad Exchange Preferred Deal.
5563--
56−-- /See:/ 'accountsPreferreddealsGet' smart constructor.
57−data AccountsPreferreddealsGet = AccountsPreferreddealsGet
64+-- /See:/ 'accountsPreferreddealsGet'' smart constructor.
65+data AccountsPreferreddealsGet' = AccountsPreferreddealsGet'
5866 { _apgQuotaUser :: !(Maybe Text)
5967 , _apgPrettyPrint :: !Bool
6068 , _apgUserIp :: !(Maybe Text)
@@ -63,7 +71,7 @@ data AccountsPreferreddealsGet = AccountsPreferreddealsGet
6371 , _apgKey :: !(Maybe Text)
6472 , _apgOauthToken :: !(Maybe Text)
6573 , _apgFields :: !(Maybe Text)
66− , _apgAlt :: !Text
74+ , _apgAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'AccountsPreferreddealsGet'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data AccountsPreferreddealsGet = AccountsPreferreddealsGet
8795-- * 'apgFields'
8896--
8997-- * 'apgAlt'
90−accountsPreferreddealsGet
98+accountsPreferreddealsGet'
9199 :: Text -- ^ 'dealId'
92100 -> Text -- ^ 'accountId'
93− -> AccountsPreferreddealsGet
94−accountsPreferreddealsGet pApgDealId_ pApgAccountId_ =
95− AccountsPreferreddealsGet
101+ -> AccountsPreferreddealsGet'
102+accountsPreferreddealsGet' pApgDealId_ pApgAccountId_ =
103+ AccountsPreferreddealsGet'
96104 { _apgQuotaUser = Nothing
97105 , _apgPrettyPrint = True
98106 , _apgUserIp = Nothing
@@ -101,7 +109,7 @@ accountsPreferreddealsGet pApgDealId_ pApgAccountId_ =
101109 , _apgKey = Nothing
102110 , _apgOauthToken = Nothing
103111 , _apgFields = Nothing
104− , _apgAlt = "json"
112+ , _apgAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -151,23 +159,23 @@ apgFields
151159 = lens _apgFields (\ s a -> s{_apgFields = a})
152160
153161-- | Data format for the response.
154−apgAlt :: Lens' AccountsPreferreddealsGet' Text
162+apgAlt :: Lens' AccountsPreferreddealsGet' Alt
155163apgAlt = lens _apgAlt (\ s a -> s{_apgAlt = a})
156164
157165instance GoogleRequest AccountsPreferreddealsGet'
158166 where
159167 type Rs AccountsPreferreddealsGet' = PreferredDeal
160168 request = requestWithRoute defReq adExchangeSellerURL
161− requestWithRoute r u AccountsPreferreddealsGet{..}
162− = go _apgQuotaUser _apgPrettyPrint _apgUserIp
169+ requestWithRoute r u AccountsPreferreddealsGet'{..}
170+ = go _apgQuotaUser (Just _apgPrettyPrint) _apgUserIp
163171 _apgDealId
164172 _apgAccountId
165173 _apgKey
166174 _apgOauthToken
167175 _apgFields
168− _apgAlt
176+ (Just _apgAlt)
169177 where go
170178 = clientWithRoute
171− (Proxy :: Proxy AccountsPreferreddealsGetAPI)
179+ (Proxy :: Proxy AccountsPreferreddealsGetResource)
172180 r
173181 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Preferreddeals/List.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List the preferred deals for this Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsPreferreddealsList@.
22−module AdExchangeSeller.Accounts.Preferreddeals.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Preferreddeals.List
2324 (
2425 -- * REST Resource
25− AccountsPreferreddealsListAPI
26+ AccountsPreferreddealsListResource
2627
2728 -- * Creating a Request
28− , accountsPreferreddealsList
29− , AccountsPreferreddealsList
29+ , accountsPreferreddealsList'
30+ , AccountsPreferreddealsList'
3031
3132 -- * Request Lenses
3233 , aplQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdExchangeSeller.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @AdexchangesellerAccountsPreferreddealsList@ which the
46−-- 'AccountsPreferreddealsList' request conforms to.
47−type AccountsPreferreddealsListAPI =
47+-- 'AccountsPreferreddealsList'' request conforms to.
48+type AccountsPreferreddealsListResource =
4849 "accounts" :>
4950 Capture "accountId" Text :>
50− "preferreddeals" :> Get '[JSON] PreferredDeals
51+ "preferreddeals" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Get '[JSON] PreferredDeals
5159
5260-- | List the preferred deals for this Ad Exchange account.
5361--
54−-- /See:/ 'accountsPreferreddealsList' smart constructor.
55−data AccountsPreferreddealsList = AccountsPreferreddealsList
62+-- /See:/ 'accountsPreferreddealsList'' smart constructor.
63+data AccountsPreferreddealsList' = AccountsPreferreddealsList'
5664 { _aplQuotaUser :: !(Maybe Text)
5765 , _aplPrettyPrint :: !Bool
5866 , _aplUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data AccountsPreferreddealsList = AccountsPreferreddealsList
6068 , _aplKey :: !(Maybe Text)
6169 , _aplOauthToken :: !(Maybe Text)
6270 , _aplFields :: !(Maybe Text)
63− , _aplAlt :: !Text
71+ , _aplAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'AccountsPreferreddealsList'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data AccountsPreferreddealsList = AccountsPreferreddealsList
8290-- * 'aplFields'
8391--
8492-- * 'aplAlt'
85−accountsPreferreddealsList
93+accountsPreferreddealsList'
8694 :: Text -- ^ 'accountId'
87− -> AccountsPreferreddealsList
88−accountsPreferreddealsList pAplAccountId_ =
89− AccountsPreferreddealsList
95+ -> AccountsPreferreddealsList'
96+accountsPreferreddealsList' pAplAccountId_ =
97+ AccountsPreferreddealsList'
9098 { _aplQuotaUser = Nothing
9199 , _aplPrettyPrint = True
92100 , _aplUserIp = Nothing
@@ -94,7 +102,7 @@ accountsPreferreddealsList pAplAccountId_ =
94102 , _aplKey = Nothing
95103 , _aplOauthToken = Nothing
96104 , _aplFields = Nothing
97− , _aplAlt = "json"
105+ , _aplAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,22 +147,22 @@ aplFields
139147 = lens _aplFields (\ s a -> s{_aplFields = a})
140148
141149-- | Data format for the response.
142−aplAlt :: Lens' AccountsPreferreddealsList' Text
150+aplAlt :: Lens' AccountsPreferreddealsList' Alt
143151aplAlt = lens _aplAlt (\ s a -> s{_aplAlt = a})
144152
145153instance GoogleRequest AccountsPreferreddealsList'
146154 where
147155 type Rs AccountsPreferreddealsList' = PreferredDeals
148156 request = requestWithRoute defReq adExchangeSellerURL
149− requestWithRoute r u AccountsPreferreddealsList{..}
150− = go _aplQuotaUser _aplPrettyPrint _aplUserIp
157+ requestWithRoute r u AccountsPreferreddealsList'{..}
158+ = go _aplQuotaUser (Just _aplPrettyPrint) _aplUserIp
151159 _aplAccountId
152160 _aplKey
153161 _aplOauthToken
154162 _aplFields
155− _aplAlt
163+ (Just _aplAlt)
156164 where go
157165 = clientWithRoute
158− (Proxy :: Proxy AccountsPreferreddealsListAPI)
166+ (Proxy :: Proxy AccountsPreferreddealsListResource)
159167 r
160168 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Generate.hs+37−28
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -21,14 +22,14 @@
2122-- format specify \"alt=csv\" as a query parameter.
2223--
2324-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsReportsGenerate@.
24−module AdExchangeSeller.Accounts.Reports.Generate
25+module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Generate
2526 (
2627 -- * REST Resource
27− AccountsReportsGenerateAPI
28+ AccountsReportsGenerateResource
2829
2930 -- * Creating a Request
30− , accountsReportsGenerate
31− , AccountsReportsGenerate
31+ , accountsReportsGenerate'
32+ , AccountsReportsGenerate'
3233
3334 -- * Request Lenses
3435 , argQuotaUser
@@ -54,27 +55,35 @@ import Network.Google.AdExchangeSeller.Types
5455import Network.Google.Prelude
5556
5657-- | A resource alias for @AdexchangesellerAccountsReportsGenerate@ which the
57−-- 'AccountsReportsGenerate' request conforms to.
58−type AccountsReportsGenerateAPI =
58+-- 'AccountsReportsGenerate'' request conforms to.
59+type AccountsReportsGenerateResource =
5960 "accounts" :>
6061 Capture "accountId" Text :>
6162 "reports" :>
62− QueryParams "dimension" Text :>
63− QueryParam "locale" Text :>
64− QueryParam "endDate" Text :>
65− QueryParam "startDate" Text :>
66− QueryParams "metric" Text :>
67− QueryParams "sort" Text :>
68− QueryParams "filter" Text :>
69− QueryParam "startIndex" Word32 :>
70− QueryParam "maxResults" Word32 :> Get '[JSON] Report
63+ QueryParam "quotaUser" Text :>
64+ QueryParam "prettyPrint" Bool :>
65+ QueryParam "userIp" Text :>
66+ QueryParams "dimension" Text :>
67+ QueryParam "locale" Text :>
68+ QueryParam "endDate" Text :>
69+ QueryParam "startDate" Text :>
70+ QueryParams "metric" Text :>
71+ QueryParam "key" Text :>
72+ QueryParams "sort" Text :>
73+ QueryParams "filter" Text :>
74+ QueryParam "oauth_token" Text :>
75+ QueryParam "startIndex" Word32 :>
76+ QueryParam "maxResults" Word32 :>
77+ QueryParam "fields" Text :>
78+ QueryParam "alt" Alt :>
79+ Get '[JSON] Report
7180
7281-- | Generate an Ad Exchange report based on the report request sent in the
7382-- query parameters. Returns the result as JSON; to retrieve output in CSV
7483-- format specify \"alt=csv\" as a query parameter.
7584--
76−-- /See:/ 'accountsReportsGenerate' smart constructor.
77−data AccountsReportsGenerate = AccountsReportsGenerate
85+-- /See:/ 'accountsReportsGenerate'' smart constructor.
86+data AccountsReportsGenerate' = AccountsReportsGenerate'
7887 { _argQuotaUser :: !(Maybe Text)
7988 , _argPrettyPrint :: !Bool
8089 , _argUserIp :: !(Maybe Text)
@@ -91,7 +100,7 @@ data AccountsReportsGenerate = AccountsReportsGenerate
91100 , _argStartIndex :: !(Maybe Word32)
92101 , _argMaxResults :: !(Maybe Word32)
93102 , _argFields :: !(Maybe Text)
94− , _argAlt :: !Text
103+ , _argAlt :: !Alt
95104 } deriving (Eq,Read,Show,Data,Typeable,Generic)
96105
97106-- | Creates a value of 'AccountsReportsGenerate'' with the minimum fields required to make a request.
@@ -131,13 +140,13 @@ data AccountsReportsGenerate = AccountsReportsGenerate
131140-- * 'argFields'
132141--
133142-- * 'argAlt'
134−accountsReportsGenerate
143+accountsReportsGenerate'
135144 :: Text -- ^ 'endDate'
136145 -> Text -- ^ 'startDate'
137146 -> Text -- ^ 'accountId'
138− -> AccountsReportsGenerate
139−accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =
140− AccountsReportsGenerate
147+ -> AccountsReportsGenerate'
148+accountsReportsGenerate' pArgEndDate_ pArgStartDate_ pArgAccountId_ =
149+ AccountsReportsGenerate'
141150 { _argQuotaUser = Nothing
142151 , _argPrettyPrint = True
143152 , _argUserIp = Nothing
@@ -154,7 +163,7 @@ accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =
154163 , _argStartIndex = Nothing
155164 , _argMaxResults = Nothing
156165 , _argFields = Nothing
157− , _argAlt = "json"
166+ , _argAlt = JSON
158167 }
159168
160169-- | Available to use for quota purposes for server-side applications. Can be
@@ -249,14 +258,14 @@ argFields
249258 = lens _argFields (\ s a -> s{_argFields = a})
250259
251260-- | Data format for the response.
252−argAlt :: Lens' AccountsReportsGenerate' Text
261+argAlt :: Lens' AccountsReportsGenerate' Alt
253262argAlt = lens _argAlt (\ s a -> s{_argAlt = a})
254263
255264instance GoogleRequest AccountsReportsGenerate' where
256265 type Rs AccountsReportsGenerate' = Report
257266 request = requestWithRoute defReq adExchangeSellerURL
258− requestWithRoute r u AccountsReportsGenerate{..}
259− = go _argQuotaUser _argPrettyPrint _argUserIp
267+ requestWithRoute r u AccountsReportsGenerate'{..}
268+ = go _argQuotaUser (Just _argPrettyPrint) _argUserIp
260269 _argDimension
261270 _argLocale
262271 (Just _argEndDate)
@@ -270,9 +279,9 @@ instance GoogleRequest AccountsReportsGenerate' where
270279 _argStartIndex
271280 _argMaxResults
272281 _argFields
273− _argAlt
282+ (Just _argAlt)
274283 where go
275284 = clientWithRoute
276− (Proxy :: Proxy AccountsReportsGenerateAPI)
285+ (Proxy :: Proxy AccountsReportsGenerateResource)
277286 r
278287 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Saved/Generate.hs+32−22
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- query parameters.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsReportsSavedGenerate@.
23−module AdExchangeSeller.Accounts.Reports.Saved.Generate
24+module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Saved.Generate
2425 (
2526 -- * REST Resource
26− AccountsReportsSavedGenerateAPI
27+ AccountsReportsSavedGenerateResource
2728
2829 -- * Creating a Request
29− , accountsReportsSavedGenerate
30− , AccountsReportsSavedGenerate
30+ , accountsReportsSavedGenerate'
31+ , AccountsReportsSavedGenerate'
3132
3233 -- * Request Lenses
3334 , arsgQuotaUser
@@ -48,21 +49,28 @@ import Network.Google.AdExchangeSeller.Types
4849import Network.Google.Prelude
4950
5051-- | A resource alias for @AdexchangesellerAccountsReportsSavedGenerate@ which the
51−-- 'AccountsReportsSavedGenerate' request conforms to.
52−type AccountsReportsSavedGenerateAPI =
52+-- 'AccountsReportsSavedGenerate'' request conforms to.
53+type AccountsReportsSavedGenerateResource =
5354 "accounts" :>
5455 Capture "accountId" Text :>
5556 "reports" :>
5657 Capture "savedReportId" Text :>
57− QueryParam "locale" Text :>
58− QueryParam "startIndex" Int32 :>
59− QueryParam "maxResults" Int32 :> Get '[JSON] Report
58+ QueryParam "quotaUser" Text :>
59+ QueryParam "prettyPrint" Bool :>
60+ QueryParam "userIp" Text :>
61+ QueryParam "locale" Text :>
62+ QueryParam "key" Text :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "startIndex" Int32 :>
65+ QueryParam "maxResults" Int32 :>
66+ QueryParam "fields" Text :>
67+ QueryParam "alt" Alt :> Get '[JSON] Report
6068
6169-- | Generate an Ad Exchange report based on the saved report ID sent in the
6270-- query parameters.
6371--
64−-- /See:/ 'accountsReportsSavedGenerate' smart constructor.
65−data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate
72+-- /See:/ 'accountsReportsSavedGenerate'' smart constructor.
73+data AccountsReportsSavedGenerate' = AccountsReportsSavedGenerate'
6674 { _arsgQuotaUser :: !(Maybe Text)
6775 , _arsgPrettyPrint :: !Bool
6876 , _arsgUserIp :: !(Maybe Text)
@@ -74,7 +82,7 @@ data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate
7482 , _arsgStartIndex :: !(Maybe Int32)
7583 , _arsgMaxResults :: !(Maybe Int32)
7684 , _arsgFields :: !(Maybe Text)
77− , _arsgAlt :: !Text
85+ , _arsgAlt :: !Alt
7886 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7987
8088-- | Creates a value of 'AccountsReportsSavedGenerate'' with the minimum fields required to make a request.
@@ -104,12 +112,12 @@ data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate
104112-- * 'arsgFields'
105113--
106114-- * 'arsgAlt'
107−accountsReportsSavedGenerate
115+accountsReportsSavedGenerate'
108116 :: Text -- ^ 'savedReportId'
109117 -> Text -- ^ 'accountId'
110− -> AccountsReportsSavedGenerate
111−accountsReportsSavedGenerate pArsgSavedReportId_ pArsgAccountId_ =
112− AccountsReportsSavedGenerate
118+ -> AccountsReportsSavedGenerate'
119+accountsReportsSavedGenerate' pArsgSavedReportId_ pArsgAccountId_ =
120+ AccountsReportsSavedGenerate'
113121 { _arsgQuotaUser = Nothing
114122 , _arsgPrettyPrint = True
115123 , _arsgUserIp = Nothing
@@ -121,7 +129,7 @@ accountsReportsSavedGenerate pArsgSavedReportId_ pArsgAccountId_ =
121129 , _arsgStartIndex = Nothing
122130 , _arsgMaxResults = Nothing
123131 , _arsgFields = Nothing
124− , _arsgAlt = "json"
132+ , _arsgAlt = JSON
125133 }
126134
127135-- | Available to use for quota purposes for server-side applications. Can be
@@ -192,15 +200,17 @@ arsgFields
192200 = lens _arsgFields (\ s a -> s{_arsgFields = a})
193201
194202-- | Data format for the response.
195−arsgAlt :: Lens' AccountsReportsSavedGenerate' Text
203+arsgAlt :: Lens' AccountsReportsSavedGenerate' Alt
196204arsgAlt = lens _arsgAlt (\ s a -> s{_arsgAlt = a})
197205
198206instance GoogleRequest AccountsReportsSavedGenerate'
199207 where
200208 type Rs AccountsReportsSavedGenerate' = Report
201209 request = requestWithRoute defReq adExchangeSellerURL
202− requestWithRoute r u AccountsReportsSavedGenerate{..}
203− = go _arsgQuotaUser _arsgPrettyPrint _arsgUserIp
210+ requestWithRoute r u
211+ AccountsReportsSavedGenerate'{..}
212+ = go _arsgQuotaUser (Just _arsgPrettyPrint)
213+ _arsgUserIp
204214 _arsgLocale
205215 _arsgSavedReportId
206216 _arsgAccountId
@@ -209,9 +219,9 @@ instance GoogleRequest AccountsReportsSavedGenerate'
209219 _arsgStartIndex
210220 _arsgMaxResults
211221 _arsgFields
212− _arsgAlt
222+ (Just _arsgAlt)
213223 where go
214224 = clientWithRoute
215− (Proxy :: Proxy AccountsReportsSavedGenerateAPI)
225+ (Proxy :: Proxy AccountsReportsSavedGenerateResource)
216226 r
217227 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Saved/List.hs+30−22
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List all saved reports in this Ad Exchange account.
2021--
2122-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsReportsSavedList@.
22−module AdExchangeSeller.Accounts.Reports.Saved.List
23+module Network.Google.Resource.AdExchangeSeller.Accounts.Reports.Saved.List
2324 (
2425 -- * REST Resource
25− AccountsReportsSavedListAPI
26+ AccountsReportsSavedListResource
2627
2728 -- * Creating a Request
28− , accountsReportsSavedList
29− , AccountsReportsSavedList
29+ , accountsReportsSavedList'
30+ , AccountsReportsSavedList'
3031
3132 -- * Request Lenses
3233 , arslQuotaUser
@@ -45,20 +46,26 @@ import Network.Google.AdExchangeSeller.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @AdexchangesellerAccountsReportsSavedList@ which the
48−-- 'AccountsReportsSavedList' request conforms to.
49−type AccountsReportsSavedListAPI =
49+-- 'AccountsReportsSavedList'' request conforms to.
50+type AccountsReportsSavedListResource =
5051 "accounts" :>
5152 Capture "accountId" Text :>
5253 "reports" :>
5354 "saved" :>
54− QueryParam "pageToken" Text :>
55− QueryParam "maxResults" Int32 :>
56− Get '[JSON] SavedReports
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "userIp" Text :>
58+ QueryParam "key" Text :>
59+ QueryParam "pageToken" Text :>
60+ QueryParam "oauth_token" Text :>
61+ QueryParam "maxResults" Int32 :>
62+ QueryParam "fields" Text :>
63+ QueryParam "alt" Alt :> Get '[JSON] SavedReports
5764
5865-- | List all saved reports in this Ad Exchange account.
5966--
60−-- /See:/ 'accountsReportsSavedList' smart constructor.
61−data AccountsReportsSavedList = AccountsReportsSavedList
67+-- /See:/ 'accountsReportsSavedList'' smart constructor.
68+data AccountsReportsSavedList' = AccountsReportsSavedList'
6269 { _arslQuotaUser :: !(Maybe Text)
6370 , _arslPrettyPrint :: !Bool
6471 , _arslUserIp :: !(Maybe Text)
@@ -68,7 +75,7 @@ data AccountsReportsSavedList = AccountsReportsSavedList
6875 , _arslOauthToken :: !(Maybe Text)
6976 , _arslMaxResults :: !(Maybe Int32)
7077 , _arslFields :: !(Maybe Text)
71− , _arslAlt :: !Text
78+ , _arslAlt :: !Alt
7279 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7380
7481-- | Creates a value of 'AccountsReportsSavedList'' with the minimum fields required to make a request.
@@ -94,11 +101,11 @@ data AccountsReportsSavedList = AccountsReportsSavedList
94101-- * 'arslFields'
95102--
96103-- * 'arslAlt'
97−accountsReportsSavedList
104+accountsReportsSavedList'
98105 :: Text -- ^ 'accountId'
99− -> AccountsReportsSavedList
100−accountsReportsSavedList pArslAccountId_ =
101− AccountsReportsSavedList
106+ -> AccountsReportsSavedList'
107+accountsReportsSavedList' pArslAccountId_ =
108+ AccountsReportsSavedList'
102109 { _arslQuotaUser = Nothing
103110 , _arslPrettyPrint = True
104111 , _arslUserIp = Nothing
@@ -108,7 +115,7 @@ accountsReportsSavedList pArslAccountId_ =
108115 , _arslOauthToken = Nothing
109116 , _arslMaxResults = Nothing
110117 , _arslFields = Nothing
111− , _arslAlt = "json"
118+ , _arslAlt = JSON
112119 }
113120
114121-- | Available to use for quota purposes for server-side applications. Can be
@@ -170,24 +177,25 @@ arslFields
170177 = lens _arslFields (\ s a -> s{_arslFields = a})
171178
172179-- | Data format for the response.
173−arslAlt :: Lens' AccountsReportsSavedList' Text
180+arslAlt :: Lens' AccountsReportsSavedList' Alt
174181arslAlt = lens _arslAlt (\ s a -> s{_arslAlt = a})
175182
176183instance GoogleRequest AccountsReportsSavedList'
177184 where
178185 type Rs AccountsReportsSavedList' = SavedReports
179186 request = requestWithRoute defReq adExchangeSellerURL
180− requestWithRoute r u AccountsReportsSavedList{..}
181− = go _arslQuotaUser _arslPrettyPrint _arslUserIp
187+ requestWithRoute r u AccountsReportsSavedList'{..}
188+ = go _arslQuotaUser (Just _arslPrettyPrint)
189+ _arslUserIp
182190 _arslAccountId
183191 _arslKey
184192 _arslPageToken
185193 _arslOauthToken
186194 _arslMaxResults
187195 _arslFields
188− _arslAlt
196+ (Just _arslAlt)
189197 where go
190198 = clientWithRoute
191− (Proxy :: Proxy AccountsReportsSavedListAPI)
199+ (Proxy :: Proxy AccountsReportsSavedListResource)
192200 r
193201 u
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/URLchannels/List.hs+29−22
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- account.
2122--
2223-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> for @AdexchangesellerAccountsURLchannelsList@.
23−module AdExchangeSeller.Accounts.URLchannels.List
24+module Network.Google.Resource.AdExchangeSeller.Accounts.URLchannels.List
2425 (
2526 -- * REST Resource
26− AccountsUrlchannelsListAPI
27+ AccountsUrlchannelsListResource
2728
2829 -- * Creating a Request
29− , accountsURLchannelsList
30− , AccountsURLchannelsList
30+ , accountsURLchannelsList'
31+ , AccountsURLchannelsList'
3132
3233 -- * Request Lenses
3334 , aulQuotaUser
@@ -47,22 +48,28 @@ import Network.Google.AdExchangeSeller.Types
4748import Network.Google.Prelude
4849
4950-- | A resource alias for @AdexchangesellerAccountsURLchannelsList@ which the
50−-- 'AccountsURLchannelsList' request conforms to.
51−type AccountsUrlchannelsListAPI =
51+-- 'AccountsURLchannelsList'' request conforms to.
52+type AccountsUrlchannelsListResource =
5253 "accounts" :>
5354 Capture "accountId" Text :>
5455 "adclients" :>
5556 Capture "adClientId" Text :>
5657 "urlchannels" :>
57− QueryParam "pageToken" Text :>
58− QueryParam "maxResults" Word32 :>
59− Get '[JSON] URLChannels
58+ QueryParam "quotaUser" Text :>
59+ QueryParam "prettyPrint" Bool :>
60+ QueryParam "userIp" Text :>
61+ QueryParam "key" Text :>
62+ QueryParam "pageToken" Text :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "maxResults" Word32 :>
65+ QueryParam "fields" Text :>
66+ QueryParam "alt" Alt :> Get '[JSON] URLChannels
6067
6168-- | List all URL channels in the specified ad client for this Ad Exchange
6269-- account.
6370--
64−-- /See:/ 'accountsURLchannelsList' smart constructor.
65−data AccountsURLchannelsList = AccountsURLchannelsList
71+-- /See:/ 'accountsURLchannelsList'' smart constructor.
72+data AccountsURLchannelsList' = AccountsURLchannelsList'
6673 { _aulQuotaUser :: !(Maybe Text)
6774 , _aulPrettyPrint :: !Bool
6875 , _aulUserIp :: !(Maybe Text)
@@ -73,7 +80,7 @@ data AccountsURLchannelsList = AccountsURLchannelsList
7380 , _aulOauthToken :: !(Maybe Text)
7481 , _aulMaxResults :: !(Maybe Word32)
7582 , _aulFields :: !(Maybe Text)
76− , _aulAlt :: !Text
83+ , _aulAlt :: !Alt
7784 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7885
7986-- | Creates a value of 'AccountsURLchannelsList'' with the minimum fields required to make a request.
@@ -101,12 +108,12 @@ data AccountsURLchannelsList = AccountsURLchannelsList
101108-- * 'aulFields'
102109--
103110-- * 'aulAlt'
104−accountsURLchannelsList
111+accountsURLchannelsList'
105112 :: Text -- ^ 'adClientId'
106113 -> Text -- ^ 'accountId'
107− -> AccountsURLchannelsList
108−accountsURLchannelsList pAulAdClientId_ pAulAccountId_ =
109− AccountsURLchannelsList
114+ -> AccountsURLchannelsList'
115+accountsURLchannelsList' pAulAdClientId_ pAulAccountId_ =
116+ AccountsURLchannelsList'
110117 { _aulQuotaUser = Nothing
111118 , _aulPrettyPrint = True
112119 , _aulUserIp = Nothing
@@ -117,7 +124,7 @@ accountsURLchannelsList pAulAdClientId_ pAulAccountId_ =
117124 , _aulOauthToken = Nothing
118125 , _aulMaxResults = Nothing
119126 , _aulFields = Nothing
120− , _aulAlt = "json"
127+ , _aulAlt = JSON
121128 }
122129
123130-- | Available to use for quota purposes for server-side applications. Can be
@@ -182,14 +189,14 @@ aulFields
182189 = lens _aulFields (\ s a -> s{_aulFields = a})
183190
184191-- | Data format for the response.
185−aulAlt :: Lens' AccountsURLchannelsList' Text
192+aulAlt :: Lens' AccountsURLchannelsList' Alt
186193aulAlt = lens _aulAlt (\ s a -> s{_aulAlt = a})
187194
188195instance GoogleRequest AccountsURLchannelsList' where
189196 type Rs AccountsURLchannelsList' = URLChannels
190197 request = requestWithRoute defReq adExchangeSellerURL
191− requestWithRoute r u AccountsURLchannelsList{..}
192− = go _aulQuotaUser _aulPrettyPrint _aulUserIp
198+ requestWithRoute r u AccountsURLchannelsList'{..}
199+ = go _aulQuotaUser (Just _aulPrettyPrint) _aulUserIp
193200 _aulAdClientId
194201 _aulAccountId
195202 _aulKey
@@ -197,9 +204,9 @@ instance GoogleRequest AccountsURLchannelsList' where
197204 _aulOauthToken
198205 _aulMaxResults
199206 _aulFields
200− _aulAlt
207+ (Just _aulAlt)
201208 where go
202209 = clientWithRoute
203− (Proxy :: Proxy AccountsUrlchannelsListAPI)
210+ (Proxy :: Proxy AccountsUrlchannelsListResource)
204211 r
205212 u
gogol-admin-datatransfer/gen/Network/Google/AdminDataTransfer.hs+12−6
@@ -28,19 +28,19 @@ module Network.Google.AdminDataTransfer
2828 -- * REST Resources
2929
3030 -- ** DatatransferApplicationsGet
31− , module Datatransfer.Applications.Get
31+ , module Network.Google.Resource.Datatransfer.Applications.Get
3232
3333 -- ** DatatransferApplicationsList
34− , module Datatransfer.Applications.List
34+ , module Network.Google.Resource.Datatransfer.Applications.List
3535
3636 -- ** DatatransferTransfersGet
37− , module Datatransfer.Transfers.Get
37+ , module Network.Google.Resource.Datatransfer.Transfers.Get
3838
3939 -- ** DatatransferTransfersInsert
40− , module Datatransfer.Transfers.Insert
40+ , module Network.Google.Resource.Datatransfer.Transfers.Insert
4141
4242 -- ** DatatransferTransfersList
43− , module Datatransfer.Transfers.List
43+ , module Network.Google.Resource.Datatransfer.Transfers.List
4444
4545 -- * Types
4646
@@ -87,6 +87,9 @@ module Network.Google.AdminDataTransfer
8787 , dtlrKind
8888 , dtlrDataTransfers
8989
90+ -- ** Alt
91+ , Alt (..)
92+
9093 -- ** ApplicationDataTransfer
9194 , ApplicationDataTransfer
9295 , applicationDataTransfer
@@ -108,7 +111,10 @@ TODO
108111-}
109112
110113type AdminDataTransferAPI =
111− Transfers :<|> Applications
114+ TransfersInsertResource :<|> TransfersListResource
115+ :<|> TransfersGetResource
116+ :<|> ApplicationsListResource
117+ :<|> ApplicationsGetResource
112118
113119adminDataTransferAPI :: Proxy AdminDataTransferAPI
114120adminDataTransferAPI = Proxy
gogol-admin-datatransfer/gen/Network/Google/AdminDataTransfer/Types.hs+4−1
@@ -60,6 +60,9 @@ module Network.Google.AdminDataTransfer.Types
6060 , dtlrKind
6161 , dtlrDataTransfers
6262
63+ -- * Alt
64+ , Alt (..)
65+
6366 -- * ApplicationDataTransfer
6467 , ApplicationDataTransfer
6568 , applicationDataTransfer
@@ -73,7 +76,7 @@ import Network.Google.AdminDataTransfer.Types.Sum
7376import Network.Google.Prelude
7477
7578-- | URL referring to version 'datatransfer_v1' of the Admin Data Transfer API.
76−adminDataTransferURL :: BaseURL
79+adminDataTransferURL :: BaseUrl
7780adminDataTransferURL
7881 = BaseUrl Https
7982 "https://www.googleapis.com/admin/datatransfer/v1/"
gogol-admin-datatransfer/gen/Network/Google/AdminDataTransfer/Types/Sum.hs+24
@@ -16,3 +16,27 @@
1616module Network.Google.AdminDataTransfer.Types.Sum where
1717
1818import Network.Google.Prelude
19+
20+-- | Data format for the response.
21+data Alt
22+ = JSON
23+ -- ^ @json@
24+ -- Responses with Content-Type of application\/json
25+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
26+
27+instance Hashable Alt
28+
29+instance FromText Alt where
30+ fromText = \case
31+ "json" -> Just JSON
32+ _ -> Nothing
33+
34+instance ToText Alt where
35+ toText = \case
36+ JSON -> "json"
37+
38+instance FromJSON Alt where
39+ parseJSON = parseJSONText "Alt"
40+
41+instance ToJSON Alt where
42+ toJSON = toJSONText
gogol-admin-datatransfer/gen/Network/Google/Resource/Datatransfer/Applications/Get.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves information about an application for the given application ID.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> for @DatatransferApplicationsGet@.
22−module Datatransfer.Applications.Get
23+module Network.Google.Resource.Datatransfer.Applications.Get
2324 (
2425 -- * REST Resource
25− ApplicationsGetAPI
26+ ApplicationsGetResource
2627
2728 -- * Creating a Request
28− , applicationsGet
29− , ApplicationsGet
29+ , applicationsGet'
30+ , ApplicationsGet'
3031
3132 -- * Request Lenses
3233 , agQuotaUser
@@ -43,16 +44,22 @@ import Network.Google.AdminDataTransfer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DatatransferApplicationsGet@ which the
46−-- 'ApplicationsGet' request conforms to.
47−type ApplicationsGetAPI =
47+-- 'ApplicationsGet'' request conforms to.
48+type ApplicationsGetResource =
4849 "applications" :>
4950 Capture "applicationId" Int64 :>
50− Get '[JSON] Application
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] Application
5158
5259-- | Retrieves information about an application for the given application ID.
5360--
54−-- /See:/ 'applicationsGet' smart constructor.
55−data ApplicationsGet = ApplicationsGet
61+-- /See:/ 'applicationsGet'' smart constructor.
62+data ApplicationsGet' = ApplicationsGet'
5663 { _agQuotaUser :: !(Maybe Text)
5764 , _agPrettyPrint :: !Bool
5865 , _agUserIp :: !(Maybe Text)
@@ -60,7 +67,7 @@ data ApplicationsGet = ApplicationsGet
6067 , _agKey :: !(Maybe Text)
6168 , _agOauthToken :: !(Maybe Text)
6269 , _agFields :: !(Maybe Text)
63− , _agAlt :: !Text
70+ , _agAlt :: !Alt
6471 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6572
6673-- | Creates a value of 'ApplicationsGet'' with the minimum fields required to make a request.
@@ -82,11 +89,11 @@ data ApplicationsGet = ApplicationsGet
8289-- * 'agFields'
8390--
8491-- * 'agAlt'
85−applicationsGet
92+applicationsGet'
8693 :: Int64 -- ^ 'applicationId'
87− -> ApplicationsGet
88−applicationsGet pAgApplicationId_ =
89− ApplicationsGet
94+ -> ApplicationsGet'
95+applicationsGet' pAgApplicationId_ =
96+ ApplicationsGet'
9097 { _agQuotaUser = Nothing
9198 , _agPrettyPrint = True
9299 , _agUserIp = Nothing
@@ -94,7 +101,7 @@ applicationsGet pAgApplicationId_ =
94101 , _agKey = Nothing
95102 , _agOauthToken = Nothing
96103 , _agFields = Nothing
97− , _agAlt = "json"
104+ , _agAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -137,21 +144,22 @@ agFields :: Lens' ApplicationsGet' (Maybe Text)
137144agFields = lens _agFields (\ s a -> s{_agFields = a})
138145
139146-- | Data format for the response.
140−agAlt :: Lens' ApplicationsGet' Text
147+agAlt :: Lens' ApplicationsGet' Alt
141148agAlt = lens _agAlt (\ s a -> s{_agAlt = a})
142149
143150instance GoogleRequest ApplicationsGet' where
144151 type Rs ApplicationsGet' = Application
145152 request
146153 = requestWithRoute defReq adminDataTransferURL
147− requestWithRoute r u ApplicationsGet{..}
148− = go _agQuotaUser _agPrettyPrint _agUserIp
154+ requestWithRoute r u ApplicationsGet'{..}
155+ = go _agQuotaUser (Just _agPrettyPrint) _agUserIp
149156 _agApplicationId
150157 _agKey
151158 _agOauthToken
152159 _agFields
153− _agAlt
160+ (Just _agAlt)
154161 where go
155− = clientWithRoute (Proxy :: Proxy ApplicationsGetAPI)
162+ = clientWithRoute
163+ (Proxy :: Proxy ApplicationsGetResource)
156164 r
157165 u
gogol-admin-datatransfer/gen/Network/Google/Resource/Datatransfer/Applications/List.hs+31−23
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Lists the applications available for data transfer for a customer.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> for @DatatransferApplicationsList@.
22−module Datatransfer.Applications.List
23+module Network.Google.Resource.Datatransfer.Applications.List
2324 (
2425 -- * REST Resource
25− ApplicationsListAPI
26+ ApplicationsListResource
2627
2728 -- * Creating a Request
28− , applicationsList
29− , ApplicationsList
29+ , applicationsList'
30+ , ApplicationsList'
3031
3132 -- * Request Lenses
3233 , alQuotaUser
@@ -45,18 +46,25 @@ import Network.Google.AdminDataTransfer.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DatatransferApplicationsList@ which the
48−-- 'ApplicationsList' request conforms to.
49−type ApplicationsListAPI =
49+-- 'ApplicationsList'' request conforms to.
50+type ApplicationsListResource =
5051 "applications" :>
51− QueryParam "customerId" Text :>
52− QueryParam "pageToken" Text :>
53− QueryParam "maxResults" Word32 :>
54− Get '[JSON] ApplicationsListResponse
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "customerId" Text :>
56+ QueryParam "key" Text :>
57+ QueryParam "pageToken" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "maxResults" Word32 :>
60+ QueryParam "fields" Text :>
61+ QueryParam "alt" Alt :>
62+ Get '[JSON] ApplicationsListResponse
5563
5664-- | Lists the applications available for data transfer for a customer.
5765--
58−-- /See:/ 'applicationsList' smart constructor.
59−data ApplicationsList = ApplicationsList
66+-- /See:/ 'applicationsList'' smart constructor.
67+data ApplicationsList' = ApplicationsList'
6068 { _alQuotaUser :: !(Maybe Text)
6169 , _alPrettyPrint :: !Bool
6270 , _alUserIp :: !(Maybe Text)
@@ -66,7 +74,7 @@ data ApplicationsList = ApplicationsList
6674 , _alOauthToken :: !(Maybe Text)
6775 , _alMaxResults :: !(Maybe Word32)
6876 , _alFields :: !(Maybe Text)
69− , _alAlt :: !Text
77+ , _alAlt :: !Alt
7078 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7179
7280-- | Creates a value of 'ApplicationsList'' with the minimum fields required to make a request.
@@ -92,10 +100,10 @@ data ApplicationsList = ApplicationsList
92100-- * 'alFields'
93101--
94102-- * 'alAlt'
95−applicationsList
96− :: ApplicationsList
97−applicationsList =
98− ApplicationsList
103+applicationsList'
104+ :: ApplicationsList'
105+applicationsList' =
106+ ApplicationsList'
99107 { _alQuotaUser = Nothing
100108 , _alPrettyPrint = True
101109 , _alUserIp = Nothing
@@ -105,7 +113,7 @@ applicationsList =
105113 , _alOauthToken = Nothing
106114 , _alMaxResults = Nothing
107115 , _alFields = Nothing
108− , _alAlt = "json"
116+ , _alAlt = JSON
109117 }
110118
111119-- | Available to use for quota purposes for server-side applications. Can be
@@ -157,24 +165,24 @@ alFields :: Lens' ApplicationsList' (Maybe Text)
157165alFields = lens _alFields (\ s a -> s{_alFields = a})
158166
159167-- | Data format for the response.
160−alAlt :: Lens' ApplicationsList' Text
168+alAlt :: Lens' ApplicationsList' Alt
161169alAlt = lens _alAlt (\ s a -> s{_alAlt = a})
162170
163171instance GoogleRequest ApplicationsList' where
164172 type Rs ApplicationsList' = ApplicationsListResponse
165173 request
166174 = requestWithRoute defReq adminDataTransferURL
167− requestWithRoute r u ApplicationsList{..}
168− = go _alQuotaUser _alPrettyPrint _alUserIp
175+ requestWithRoute r u ApplicationsList'{..}
176+ = go _alQuotaUser (Just _alPrettyPrint) _alUserIp
169177 _alCustomerId
170178 _alKey
171179 _alPageToken
172180 _alOauthToken
173181 _alMaxResults
174182 _alFields
175− _alAlt
183+ (Just _alAlt)
176184 where go
177185 = clientWithRoute
178− (Proxy :: Proxy ApplicationsListAPI)
186+ (Proxy :: Proxy ApplicationsListResource)
179187 r
180188 u
gogol-admin-datatransfer/gen/Network/Google/Resource/Datatransfer/Transfers/Get.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves a data transfer request by its resource ID.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> for @DatatransferTransfersGet@.
22−module Datatransfer.Transfers.Get
23+module Network.Google.Resource.Datatransfer.Transfers.Get
2324 (
2425 -- * REST Resource
25− TransfersGetAPI
26+ TransfersGetResource
2627
2728 -- * Creating a Request
28− , transfersGet
29− , TransfersGet
29+ , transfersGet'
30+ , TransfersGet'
3031
3132 -- * Request Lenses
3233 , tgQuotaUser
@@ -43,16 +44,22 @@ import Network.Google.AdminDataTransfer.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DatatransferTransfersGet@ which the
46−-- 'TransfersGet' request conforms to.
47−type TransfersGetAPI =
47+-- 'TransfersGet'' request conforms to.
48+type TransfersGetResource =
4849 "transfers" :>
4950 Capture "dataTransferId" Text :>
50− Get '[JSON] DataTransfer
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] DataTransfer
5158
5259-- | Retrieves a data transfer request by its resource ID.
5360--
54−-- /See:/ 'transfersGet' smart constructor.
55−data TransfersGet = TransfersGet
61+-- /See:/ 'transfersGet'' smart constructor.
62+data TransfersGet' = TransfersGet'
5663 { _tgQuotaUser :: !(Maybe Text)
5764 , _tgPrettyPrint :: !Bool
5865 , _tgUserIp :: !(Maybe Text)
@@ -60,7 +67,7 @@ data TransfersGet = TransfersGet
6067 , _tgOauthToken :: !(Maybe Text)
6168 , _tgDataTransferId :: !Text
6269 , _tgFields :: !(Maybe Text)
63− , _tgAlt :: !Text
70+ , _tgAlt :: !Alt
6471 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6572
6673-- | Creates a value of 'TransfersGet'' with the minimum fields required to make a request.
@@ -82,11 +89,11 @@ data TransfersGet = TransfersGet
8289-- * 'tgFields'
8390--
8491-- * 'tgAlt'
85−transfersGet
92+transfersGet'
8693 :: Text -- ^ 'dataTransferId'
87− -> TransfersGet
88−transfersGet pTgDataTransferId_ =
89− TransfersGet
94+ -> TransfersGet'
95+transfersGet' pTgDataTransferId_ =
96+ TransfersGet'
9097 { _tgQuotaUser = Nothing
9198 , _tgPrettyPrint = True
9299 , _tgUserIp = Nothing
@@ -94,7 +101,7 @@ transfersGet pTgDataTransferId_ =
94101 , _tgOauthToken = Nothing
95102 , _tgDataTransferId = pTgDataTransferId_
96103 , _tgFields = Nothing
97− , _tgAlt = "json"
104+ , _tgAlt = JSON
98105 }
99106
100107-- | Available to use for quota purposes for server-side applications. Can be
@@ -138,19 +145,22 @@ tgFields :: Lens' TransfersGet' (Maybe Text)
138145tgFields = lens _tgFields (\ s a -> s{_tgFields = a})
139146
140147-- | Data format for the response.
141−tgAlt :: Lens' TransfersGet' Text
148+tgAlt :: Lens' TransfersGet' Alt
142149tgAlt = lens _tgAlt (\ s a -> s{_tgAlt = a})
143150
144151instance GoogleRequest TransfersGet' where
145152 type Rs TransfersGet' = DataTransfer
146153 request
147154 = requestWithRoute defReq adminDataTransferURL
148− requestWithRoute r u TransfersGet{..}
149− = go _tgQuotaUser _tgPrettyPrint _tgUserIp _tgKey
155+ requestWithRoute r u TransfersGet'{..}
156+ = go _tgQuotaUser (Just _tgPrettyPrint) _tgUserIp
157+ _tgKey
150158 _tgOauthToken
151159 _tgDataTransferId
152160 _tgFields
153− _tgAlt
161+ (Just _tgAlt)
154162 where go
155− = clientWithRoute (Proxy :: Proxy TransfersGetAPI) r
163+ = clientWithRoute
164+ (Proxy :: Proxy TransfersGetResource)
165+ r
156166 u
gogol-admin-datatransfer/gen/Network/Google/Resource/Datatransfer/Transfers/Insert.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Inserts a data transfer request.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> for @DatatransferTransfersInsert@.
22−module Datatransfer.Transfers.Insert
23+module Network.Google.Resource.Datatransfer.Transfers.Insert
2324 (
2425 -- * REST Resource
25− TransfersInsertAPI
26+ TransfersInsertResource
2627
2728 -- * Creating a Request
28− , transfersInsert
29− , TransfersInsert
29+ , transfersInsert'
30+ , TransfersInsert'
3031
3132 -- * Request Lenses
3233 , tiQuotaUser
@@ -42,21 +43,28 @@ import Network.Google.AdminDataTransfer.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @DatatransferTransfersInsert@ which the
45−-- 'TransfersInsert' request conforms to.
46−type TransfersInsertAPI =
47− "transfers" :> Post '[JSON] DataTransfer
46+-- 'TransfersInsert'' request conforms to.
47+type TransfersInsertResource =
48+ "transfers" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Post '[JSON] DataTransfer
4856
4957-- | Inserts a data transfer request.
5058--
51−-- /See:/ 'transfersInsert' smart constructor.
52−data TransfersInsert = TransfersInsert
59+-- /See:/ 'transfersInsert'' smart constructor.
60+data TransfersInsert' = TransfersInsert'
5361 { _tiQuotaUser :: !(Maybe Text)
5462 , _tiPrettyPrint :: !Bool
5563 , _tiUserIp :: !(Maybe Text)
5664 , _tiKey :: !(Maybe Text)
5765 , _tiOauthToken :: !(Maybe Text)
5866 , _tiFields :: !(Maybe Text)
59− , _tiAlt :: !Text
67+ , _tiAlt :: !Alt
6068 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6169
6270-- | Creates a value of 'TransfersInsert'' with the minimum fields required to make a request.
@@ -76,17 +84,17 @@ data TransfersInsert = TransfersInsert
7684-- * 'tiFields'
7785--
7886-- * 'tiAlt'
79−transfersInsert
80− :: TransfersInsert
81−transfersInsert =
82− TransfersInsert
87+transfersInsert'
88+ :: TransfersInsert'
89+transfersInsert' =
90+ TransfersInsert'
8391 { _tiQuotaUser = Nothing
8492 , _tiPrettyPrint = True
8593 , _tiUserIp = Nothing
8694 , _tiKey = Nothing
8795 , _tiOauthToken = Nothing
8896 , _tiFields = Nothing
89− , _tiAlt = "json"
97+ , _tiAlt = JSON
9098 }
9199
92100-- | Available to use for quota purposes for server-side applications. Can be
@@ -123,19 +131,21 @@ tiFields :: Lens' TransfersInsert' (Maybe Text)
123131tiFields = lens _tiFields (\ s a -> s{_tiFields = a})
124132
125133-- | Data format for the response.
126−tiAlt :: Lens' TransfersInsert' Text
134+tiAlt :: Lens' TransfersInsert' Alt
127135tiAlt = lens _tiAlt (\ s a -> s{_tiAlt = a})
128136
129137instance GoogleRequest TransfersInsert' where
130138 type Rs TransfersInsert' = DataTransfer
131139 request
132140 = requestWithRoute defReq adminDataTransferURL
133− requestWithRoute r u TransfersInsert{..}
134− = go _tiQuotaUser _tiPrettyPrint _tiUserIp _tiKey
141+ requestWithRoute r u TransfersInsert'{..}
142+ = go _tiQuotaUser (Just _tiPrettyPrint) _tiUserIp
143+ _tiKey
135144 _tiOauthToken
136145 _tiFields
137− _tiAlt
146+ (Just _tiAlt)
138147 where go
139− = clientWithRoute (Proxy :: Proxy TransfersInsertAPI)
148+ = clientWithRoute
149+ (Proxy :: Proxy TransfersInsertResource)
140150 r
141151 u
gogol-admin-datatransfer/gen/Network/Google/Resource/Datatransfer/Transfers/List.hs+35−25
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- status.
2122--
2223-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> for @DatatransferTransfersList@.
23−module Datatransfer.Transfers.List
24+module Network.Google.Resource.Datatransfer.Transfers.List
2425 (
2526 -- * REST Resource
26− TransfersListAPI
27+ TransfersListResource
2728
2829 -- * Creating a Request
29− , transfersList
30− , TransfersList
30+ , transfersList'
31+ , TransfersList'
3132
3233 -- * Request Lenses
3334 , tlStatus
@@ -49,22 +50,29 @@ import Network.Google.AdminDataTransfer.Types
4950import Network.Google.Prelude
5051
5152-- | A resource alias for @DatatransferTransfersList@ which the
52−-- 'TransfersList' request conforms to.
53−type TransfersListAPI =
53+-- 'TransfersList'' request conforms to.
54+type TransfersListResource =
5455 "transfers" :>
5556 QueryParam "status" Text :>
56− QueryParam "oldOwnerUserId" Text :>
57− QueryParam "newOwnerUserId" Text :>
58− QueryParam "customerId" Text :>
59− QueryParam "pageToken" Text :>
60− QueryParam "maxResults" Int32 :>
61− Get '[JSON] DataTransfersListResponse
57+ QueryParam "quotaUser" Text :>
58+ QueryParam "prettyPrint" Bool :>
59+ QueryParam "oldOwnerUserId" Text :>
60+ QueryParam "userIp" Text :>
61+ QueryParam "newOwnerUserId" Text :>
62+ QueryParam "customerId" Text :>
63+ QueryParam "key" Text :>
64+ QueryParam "pageToken" Text :>
65+ QueryParam "oauth_token" Text :>
66+ QueryParam "maxResults" Int32 :>
67+ QueryParam "fields" Text :>
68+ QueryParam "alt" Alt :>
69+ Get '[JSON] DataTransfersListResponse
6270
6371-- | Lists the transfers for a customer by source user, destination user, or
6472-- status.
6573--
66−-- /See:/ 'transfersList' smart constructor.
67−data TransfersList = TransfersList
74+-- /See:/ 'transfersList'' smart constructor.
75+data TransfersList' = TransfersList'
6876 { _tlStatus :: !(Maybe Text)
6977 , _tlQuotaUser :: !(Maybe Text)
7078 , _tlPrettyPrint :: !Bool
@@ -77,7 +85,7 @@ data TransfersList = TransfersList
7785 , _tlOauthToken :: !(Maybe Text)
7886 , _tlMaxResults :: !(Maybe Int32)
7987 , _tlFields :: !(Maybe Text)
80− , _tlAlt :: !Text
88+ , _tlAlt :: !Alt
8189 } deriving (Eq,Read,Show,Data,Typeable,Generic)
8290
8391-- | Creates a value of 'TransfersList'' with the minimum fields required to make a request.
@@ -109,10 +117,10 @@ data TransfersList = TransfersList
109117-- * 'tlFields'
110118--
111119-- * 'tlAlt'
112−transfersList
113− :: TransfersList
114−transfersList =
115− TransfersList
120+transfersList'
121+ :: TransfersList'
122+transfersList' =
123+ TransfersList'
116124 { _tlStatus = Nothing
117125 , _tlQuotaUser = Nothing
118126 , _tlPrettyPrint = True
@@ -125,7 +133,7 @@ transfersList =
125133 , _tlOauthToken = Nothing
126134 , _tlMaxResults = Nothing
127135 , _tlFields = Nothing
128− , _tlAlt = "json"
136+ , _tlAlt = JSON
129137 }
130138
131139-- | Status of the transfer.
@@ -193,15 +201,15 @@ tlFields :: Lens' TransfersList' (Maybe Text)
193201tlFields = lens _tlFields (\ s a -> s{_tlFields = a})
194202
195203-- | Data format for the response.
196−tlAlt :: Lens' TransfersList' Text
204+tlAlt :: Lens' TransfersList' Alt
197205tlAlt = lens _tlAlt (\ s a -> s{_tlAlt = a})
198206
199207instance GoogleRequest TransfersList' where
200208 type Rs TransfersList' = DataTransfersListResponse
201209 request
202210 = requestWithRoute defReq adminDataTransferURL
203− requestWithRoute r u TransfersList{..}
204− = go _tlStatus _tlQuotaUser _tlPrettyPrint
211+ requestWithRoute r u TransfersList'{..}
212+ = go _tlStatus _tlQuotaUser (Just _tlPrettyPrint)
205213 _tlOldOwnerUserId
206214 _tlUserIp
207215 _tlNewOwnerUserId
@@ -211,7 +219,9 @@ instance GoogleRequest TransfersList' where
211219 _tlOauthToken
212220 _tlMaxResults
213221 _tlFields
214− _tlAlt
222+ (Just _tlAlt)
215223 where go
216− = clientWithRoute (Proxy :: Proxy TransfersListAPI) r
224+ = clientWithRoute
225+ (Proxy :: Proxy TransfersListResource)
226+ r
217227 u
gogol-admin-directory/gen/Network/Google/AdminDirectory.hs+278−107
@@ -29,205 +29,205 @@ module Network.Google.AdminDirectory
2929 -- * REST Resources
3030
3131 -- ** AdminChannelsStop
32− , module Admin.Channels.Stop
32+ , module Network.Google.Resource.Admin.Channels.Stop
3333
3434 -- ** DirectoryAspsDelete
35− , module Directory.Asps.Delete
35+ , module Network.Google.Resource.Directory.Asps.Delete
3636
3737 -- ** DirectoryAspsGet
38− , module Directory.Asps.Get
38+ , module Network.Google.Resource.Directory.Asps.Get
3939
4040 -- ** DirectoryAspsList
41− , module Directory.Asps.List
41+ , module Network.Google.Resource.Directory.Asps.List
4242
4343 -- ** DirectoryChromeosdevicesGet
44− , module Directory.Chromeosdevices.Get
44+ , module Network.Google.Resource.Directory.Chromeosdevices.Get
4545
4646 -- ** DirectoryChromeosdevicesList
47− , module Directory.Chromeosdevices.List
47+ , module Network.Google.Resource.Directory.Chromeosdevices.List
4848
4949 -- ** DirectoryChromeosdevicesPatch
50− , module Directory.Chromeosdevices.Patch
50+ , module Network.Google.Resource.Directory.Chromeosdevices.Patch
5151
5252 -- ** DirectoryChromeosdevicesUpdate
53− , module Directory.Chromeosdevices.Update
53+ , module Network.Google.Resource.Directory.Chromeosdevices.Update
5454
5555 -- ** DirectoryGroupsAliasesDelete
56− , module Directory.Groups.Aliases.Delete
56+ , module Network.Google.Resource.Directory.Groups.Aliases.Delete
5757
5858 -- ** DirectoryGroupsAliasesInsert
59− , module Directory.Groups.Aliases.Insert
59+ , module Network.Google.Resource.Directory.Groups.Aliases.Insert
6060
6161 -- ** DirectoryGroupsAliasesList
62− , module Directory.Groups.Aliases.List
62+ , module Network.Google.Resource.Directory.Groups.Aliases.List
6363
6464 -- ** DirectoryGroupsDelete
65− , module Directory.Groups.Delete
65+ , module Network.Google.Resource.Directory.Groups.Delete
6666
6767 -- ** DirectoryGroupsGet
68− , module Directory.Groups.Get
68+ , module Network.Google.Resource.Directory.Groups.Get
6969
7070 -- ** DirectoryGroupsInsert
71− , module Directory.Groups.Insert
71+ , module Network.Google.Resource.Directory.Groups.Insert
7272
7373 -- ** DirectoryGroupsList
74− , module Directory.Groups.List
74+ , module Network.Google.Resource.Directory.Groups.List
7575
7676 -- ** DirectoryGroupsPatch
77− , module Directory.Groups.Patch
77+ , module Network.Google.Resource.Directory.Groups.Patch
7878
7979 -- ** DirectoryGroupsUpdate
80− , module Directory.Groups.Update
80+ , module Network.Google.Resource.Directory.Groups.Update
8181
8282 -- ** DirectoryMembersDelete
83− , module Directory.Members.Delete
83+ , module Network.Google.Resource.Directory.Members.Delete
8484
8585 -- ** DirectoryMembersGet
86− , module Directory.Members.Get
86+ , module Network.Google.Resource.Directory.Members.Get
8787
8888 -- ** DirectoryMembersInsert
89− , module Directory.Members.Insert
89+ , module Network.Google.Resource.Directory.Members.Insert
9090
9191 -- ** DirectoryMembersList
92− , module Directory.Members.List
92+ , module Network.Google.Resource.Directory.Members.List
9393
9494 -- ** DirectoryMembersPatch
95− , module Directory.Members.Patch
95+ , module Network.Google.Resource.Directory.Members.Patch
9696
9797 -- ** DirectoryMembersUpdate
98− , module Directory.Members.Update
98+ , module Network.Google.Resource.Directory.Members.Update
9999
100100 -- ** DirectoryMobiledevicesAction
101− , module Directory.Mobiledevices.Action
101+ , module Network.Google.Resource.Directory.Mobiledevices.Action
102102
103103 -- ** DirectoryMobiledevicesDelete
104− , module Directory.Mobiledevices.Delete
104+ , module Network.Google.Resource.Directory.Mobiledevices.Delete
105105
106106 -- ** DirectoryMobiledevicesGet
107− , module Directory.Mobiledevices.Get
107+ , module Network.Google.Resource.Directory.Mobiledevices.Get
108108
109109 -- ** DirectoryMobiledevicesList
110− , module Directory.Mobiledevices.List
110+ , module Network.Google.Resource.Directory.Mobiledevices.List
111111
112112 -- ** DirectoryNotificationsDelete
113− , module Directory.Notifications.Delete
113+ , module Network.Google.Resource.Directory.Notifications.Delete
114114
115115 -- ** DirectoryNotificationsGet
116− , module Directory.Notifications.Get
116+ , module Network.Google.Resource.Directory.Notifications.Get
117117
118118 -- ** DirectoryNotificationsList
119− , module Directory.Notifications.List
119+ , module Network.Google.Resource.Directory.Notifications.List
120120
121121 -- ** DirectoryNotificationsPatch
122− , module Directory.Notifications.Patch
122+ , module Network.Google.Resource.Directory.Notifications.Patch
123123
124124 -- ** DirectoryNotificationsUpdate
125− , module Directory.Notifications.Update
125+ , module Network.Google.Resource.Directory.Notifications.Update
126126
127127 -- ** DirectoryOrgunitsDelete
128− , module Directory.Orgunits.Delete
128+ , module Network.Google.Resource.Directory.Orgunits.Delete
129129
130130 -- ** DirectoryOrgunitsGet
131− , module Directory.Orgunits.Get
131+ , module Network.Google.Resource.Directory.Orgunits.Get
132132
133133 -- ** DirectoryOrgunitsInsert
134− , module Directory.Orgunits.Insert
134+ , module Network.Google.Resource.Directory.Orgunits.Insert
135135
136136 -- ** DirectoryOrgunitsList
137− , module Directory.Orgunits.List
137+ , module Network.Google.Resource.Directory.Orgunits.List
138138
139139 -- ** DirectoryOrgunitsPatch
140− , module Directory.Orgunits.Patch
140+ , module Network.Google.Resource.Directory.Orgunits.Patch
141141
142142 -- ** DirectoryOrgunitsUpdate
143− , module Directory.Orgunits.Update
143+ , module Network.Google.Resource.Directory.Orgunits.Update
144144
145145 -- ** DirectorySchemasDelete
146− , module Directory.Schemas.Delete
146+ , module Network.Google.Resource.Directory.Schemas.Delete
147147
148148 -- ** DirectorySchemasGet
149− , module Directory.Schemas.Get
149+ , module Network.Google.Resource.Directory.Schemas.Get
150150
151151 -- ** DirectorySchemasInsert
152− , module Directory.Schemas.Insert
152+ , module Network.Google.Resource.Directory.Schemas.Insert
153153
154154 -- ** DirectorySchemasList
155− , module Directory.Schemas.List
155+ , module Network.Google.Resource.Directory.Schemas.List
156156
157157 -- ** DirectorySchemasPatch
158− , module Directory.Schemas.Patch
158+ , module Network.Google.Resource.Directory.Schemas.Patch
159159
160160 -- ** DirectorySchemasUpdate
161− , module Directory.Schemas.Update
161+ , module Network.Google.Resource.Directory.Schemas.Update
162162
163163 -- ** DirectoryTokensDelete
164− , module Directory.Tokens.Delete
164+ , module Network.Google.Resource.Directory.Tokens.Delete
165165
166166 -- ** DirectoryTokensGet
167− , module Directory.Tokens.Get
167+ , module Network.Google.Resource.Directory.Tokens.Get
168168
169169 -- ** DirectoryTokensList
170− , module Directory.Tokens.List
170+ , module Network.Google.Resource.Directory.Tokens.List
171171
172172 -- ** DirectoryUsersAliasesDelete
173− , module Directory.Users.Aliases.Delete
173+ , module Network.Google.Resource.Directory.Users.Aliases.Delete
174174
175175 -- ** DirectoryUsersAliasesInsert
176− , module Directory.Users.Aliases.Insert
176+ , module Network.Google.Resource.Directory.Users.Aliases.Insert
177177
178178 -- ** DirectoryUsersAliasesList
179− , module Directory.Users.Aliases.List
179+ , module Network.Google.Resource.Directory.Users.Aliases.List
180180
181181 -- ** DirectoryUsersAliasesWatch
182− , module Directory.Users.Aliases.Watch
182+ , module Network.Google.Resource.Directory.Users.Aliases.Watch
183183
184184 -- ** DirectoryUsersDelete
185− , module Directory.Users.Delete
185+ , module Network.Google.Resource.Directory.Users.Delete
186186
187187 -- ** DirectoryUsersGet
188− , module Directory.Users.Get
188+ , module Network.Google.Resource.Directory.Users.Get
189189
190190 -- ** DirectoryUsersInsert
191− , module Directory.Users.Insert
191+ , module Network.Google.Resource.Directory.Users.Insert
192192
193193 -- ** DirectoryUsersList
194− , module Directory.Users.List
194+ , module Network.Google.Resource.Directory.Users.List
195195
196196 -- ** DirectoryUsersMakeAdmin
197− , module Directory.Users.MakeAdmin
197+ , module Network.Google.Resource.Directory.Users.MakeAdmin
198198
199199 -- ** DirectoryUsersPatch
200− , module Directory.Users.Patch
200+ , module Network.Google.Resource.Directory.Users.Patch
201201
202202 -- ** DirectoryUsersPhotosDelete
203− , module Directory.Users.Photos.Delete
203+ , module Network.Google.Resource.Directory.Users.Photos.Delete
204204
205205 -- ** DirectoryUsersPhotosGet
206− , module Directory.Users.Photos.Get
206+ , module Network.Google.Resource.Directory.Users.Photos.Get
207207
208208 -- ** DirectoryUsersPhotosPatch
209− , module Directory.Users.Photos.Patch
209+ , module Network.Google.Resource.Directory.Users.Photos.Patch
210210
211211 -- ** DirectoryUsersPhotosUpdate
212− , module Directory.Users.Photos.Update
212+ , module Network.Google.Resource.Directory.Users.Photos.Update
213213
214214 -- ** DirectoryUsersUndelete
215− , module Directory.Users.Undelete
215+ , module Network.Google.Resource.Directory.Users.Undelete
216216
217217 -- ** DirectoryUsersUpdate
218− , module Directory.Users.Update
218+ , module Network.Google.Resource.Directory.Users.Update
219219
220220 -- ** DirectoryUsersWatch
221− , module Directory.Users.Watch
221+ , module Network.Google.Resource.Directory.Users.Watch
222222
223223 -- ** DirectoryVerificationCodesGenerate
224− , module Directory.VerificationCodes.Generate
224+ , module Network.Google.Resource.Directory.VerificationCodes.Generate
225225
226226 -- ** DirectoryVerificationCodesInvalidate
227− , module Directory.VerificationCodes.Invalidate
227+ , module Network.Google.Resource.Directory.VerificationCodes.Invalidate
228228
229229 -- ** DirectoryVerificationCodesList
230− , module Directory.VerificationCodes.List
230+ , module Network.Google.Resource.Directory.VerificationCodes.List
231231
232232 -- * Types
233233
@@ -271,6 +271,12 @@ module Network.Google.AdminDirectory
271271 , userMakeAdmin
272272 , umaStatus
273273
274+ -- ** DirectoryUsersListViewType
275+ , DirectoryUsersListViewType (..)
276+
277+ -- ** DirectoryChromeosdevicesListProjection
278+ , DirectoryChromeosdevicesListProjection (..)
279+
274280 -- ** UserAddress
275281 , UserAddress
276282 , userAddress
@@ -288,6 +294,9 @@ module Network.Google.AdminDirectory
288294 , uaCustomType
289295 , uaSourceIsStructured
290296
297+ -- ** DirectoryUsersWatchOrderBy
298+ , DirectoryUsersWatchOrderBy (..)
299+
291300 -- ** Group
292301 , Group
293302 , group'
@@ -302,6 +311,15 @@ module Network.Google.AdminDirectory
302311 , groId
303312 , groDescription
304313
314+ -- ** ChromeOsDeviceActiveTimeRanges
315+ , ChromeOsDeviceActiveTimeRanges
316+ , chromeOsDeviceActiveTimeRanges
317+ , codatrDate
318+ , codatrActiveTime
319+
320+ -- ** DirectoryUsersWatchViewType
321+ , DirectoryUsersWatchViewType (..)
322+
305323 -- ** Asp
306324 , Asp
307325 , asp
@@ -368,6 +386,9 @@ module Network.Google.AdminDirectory
368386 , uiType
369387 , uiCustomType
370388
389+ -- ** DirectoryMobiledevicesListOrderBy
390+ , DirectoryMobiledevicesListOrderBy (..)
391+
371392 -- ** Notification
372393 , Notification
373394 , notification
@@ -380,6 +401,19 @@ module Network.Google.AdminDirectory
380401 , nNotificationId
381402 , nSendTime
382403
404+ -- ** DirectoryUsersListSortOrder
405+ , DirectoryUsersListSortOrder (..)
406+
407+ -- ** DirectoryUsersAliasesListEvent
408+ , DirectoryUsersAliasesListEvent (..)
409+
410+ -- ** UserCustomSchemas
411+ , UserCustomSchemas
412+ , userCustomSchemas
413+
414+ -- ** DirectoryUsersGetViewType
415+ , DirectoryUsersGetViewType (..)
416+
383417 -- ** Aliases
384418 , Aliases
385419 , aliases
@@ -406,6 +440,12 @@ module Network.Google.AdminDirectory
406440 , tokAnonymous
407441 , tokUserKey
408442
443+ -- ** ChromeOsDeviceRecentUsers
444+ , ChromeOsDeviceRecentUsers
445+ , chromeOsDeviceRecentUsers
446+ , codruEmail
447+ , codruType
448+
409449 -- ** UserUndelete
410450 , UserUndelete
411451 , userUndelete
@@ -450,6 +490,9 @@ module Network.Google.AdminDirectory
450490 , aliId
451491 , aliPrimaryEmail
452492
493+ -- ** DirectoryUsersAliasesWatchEvent
494+ , DirectoryUsersAliasesWatchEvent (..)
495+
453496 -- ** UserName
454497 , UserName
455498 , userName
@@ -457,6 +500,21 @@ module Network.Google.AdminDirectory
457500 , unFullName
458501 , unFamilyName
459502
503+ -- ** DirectoryUsersWatchSortOrder
504+ , DirectoryUsersWatchSortOrder (..)
505+
506+ -- ** DirectoryMobiledevicesGetProjection
507+ , DirectoryMobiledevicesGetProjection (..)
508+
509+ -- ** MobileDeviceApplications
510+ , MobileDeviceApplications
511+ , mobileDeviceApplications
512+ , mdaVersionCode
513+ , mdaVersionName
514+ , mdaPackageName
515+ , mdaDisplayName
516+ , mdaPermission
517+
460518 -- ** User
461519 , User
462520 , user
@@ -505,6 +563,24 @@ module Network.Google.AdminDirectory
505563 , schSchemaId
506564 , schFields
507565
566+ -- ** DirectoryMobiledevicesListSortOrder
567+ , DirectoryMobiledevicesListSortOrder (..)
568+
569+ -- ** DirectoryUsersListOrderBy
570+ , DirectoryUsersListOrderBy (..)
571+
572+ -- ** DirectoryOrgunitsListType
573+ , DirectoryOrgunitsListType (..)
574+
575+ -- ** DirectoryUsersListProjection
576+ , DirectoryUsersListProjection (..)
577+
578+ -- ** DirectoryChromeosdevicesUpdateProjection
579+ , DirectoryChromeosdevicesUpdateProjection (..)
580+
581+ -- ** DirectoryUsersWatchProjection
582+ , DirectoryUsersWatchProjection (..)
583+
508584 -- ** OrgUnits
509585 , OrgUnits
510586 , orgUnits
@@ -512,6 +588,10 @@ module Network.Google.AdminDirectory
512588 , oKind
513589 , oOrganizationUnits
514590
591+ -- ** ChannelParams
592+ , ChannelParams
593+ , channelParams
594+
515595 -- ** VerificationCodes
516596 , VerificationCodes
517597 , verificationCodes
@@ -526,6 +606,9 @@ module Network.Google.AdminDirectory
526606 , urType
527607 , urCustomType
528608
609+ -- ** DirectoryChromeosdevicesListOrderBy
610+ , DirectoryChromeosdevicesListOrderBy (..)
611+
529612 -- ** UserWebsite
530613 , UserWebsite
531614 , userWebsite
@@ -569,6 +652,12 @@ module Network.Google.AdminDirectory
569652 , upId
570653 , upPrimaryEmail
571654
655+ -- ** DirectoryUsersListEvent
656+ , DirectoryUsersListEvent (..)
657+
658+ -- ** DirectoryMobiledevicesListProjection
659+ , DirectoryMobiledevicesListProjection (..)
660+
572661 -- ** UserEmail
573662 , UserEmail
574663 , userEmail
@@ -587,45 +676,60 @@ module Network.Google.AdminDirectory
587676 , memId
588677 , memType
589678
679+ -- ** DirectoryUsersGetProjection
680+ , DirectoryUsersGetProjection (..)
681+
590682 -- ** MobileDevice
591683 , MobileDevice
592684 , mobileDevice
593− , mobEmail
594− , mobStatus
595− , mobEtag
596− , mobResourceId
597− , mobBuildNumber
598− , mobManagedAccountIsOnOwnerProfile
599− , mobLastSync
600− , mobOtherAccountsInfo
601− , mobKind
602− , mobAdbStatus
603− , mobNetworkOperator
604− , mobKernelVersion
605− , mobOs
606− , mobName
607− , mobModel
608− , mobDeveloperOptionsStatus
609− , mobUnknownSourcesStatus
610− , mobMeid
611− , mobDeviceId
612− , mobFirstSync
613− , mobUserAgent
614− , mobImei
615− , mobType
616− , mobWifiMacAddress
617− , mobSerialNumber
618− , mobHardwareId
619− , mobBasebandVersion
620− , mobSupportsWorkProfile
621− , mobDeviceCompromisedStatus
622− , mobApplications
623− , mobDefaultLanguage
685+ , mddEmail
686+ , mddStatus
687+ , mddEtag
688+ , mddResourceId
689+ , mddBuildNumber
690+ , mddManagedAccountIsOnOwnerProfile
691+ , mddLastSync
692+ , mddOtherAccountsInfo
693+ , mddKind
694+ , mddAdbStatus
695+ , mddNetworkOperator
696+ , mddKernelVersion
697+ , mddOs
698+ , mddName
699+ , mddModel
700+ , mddDeveloperOptionsStatus
701+ , mddUnknownSourcesStatus
702+ , mddMeid
703+ , mddDeviceId
704+ , mddFirstSync
705+ , mddUserAgent
706+ , mddImei
707+ , mddType
708+ , mddWifiMacAddress
709+ , mddSerialNumber
710+ , mddHardwareId
711+ , mddBasebandVersion
712+ , mddSupportsWorkProfile
713+ , mddDeviceCompromisedStatus
714+ , mddApplications
715+ , mddDefaultLanguage
716+
717+ -- ** DirectoryChromeosdevicesGetProjection
718+ , DirectoryChromeosdevicesGetProjection (..)
719+
720+ -- ** DirectoryChromeosdevicesPatchProjection
721+ , DirectoryChromeosdevicesPatchProjection (..)
624722
625723 -- ** UserCustomProperties
626724 , UserCustomProperties
627725 , userCustomProperties
628726
727+ -- ** SchemaFieldSpecNumericIndexingSpec
728+ , SchemaFieldSpecNumericIndexingSpec
729+ , schemaFieldSpecNumericIndexingSpec
730+ , sfsnisMaxValue
731+ , sfsnisMinValue
732+
629733 -- ** MobileDeviceAction
630734 , MobileDeviceAction
631735 , mobileDeviceAction
@@ -644,6 +748,9 @@ module Network.Google.AdminDirectory
644748 , sfsFieldName
645749 , sfsMultiValued
646750
751+ -- ** DirectoryUsersWatchEvent
752+ , DirectoryUsersWatchEvent (..)
753+
647754 -- ** Notifications
648755 , Notifications
649756 , notifications
@@ -653,6 +760,9 @@ module Network.Google.AdminDirectory
653760 , notItems
654761 , notUnreadNotificationsCount
655762
763+ -- ** DirectoryChromeosdevicesListSortOrder
764+ , DirectoryChromeosdevicesListSortOrder (..)
765+
656766 -- ** UserExternalId
657767 , UserExternalId
658768 , userExternalId
@@ -667,6 +777,9 @@ module Network.Google.AdminDirectory
667777 , aaKind
668778 , aaItems
669779
780+ -- ** Alt
781+ , Alt (..)
782+
670783 -- ** ChromeOsDevices
671784 , ChromeOsDevices
672785 , chromeOsDevices
@@ -751,15 +864,73 @@ TODO
751864-}
752865
753866type AdminDirectoryAPI =
754− Groups :<|> Users :<|> Schemas :<|> Tokens :<|>
755− Channels
756− :<|> Members
757− :<|> Mobiledevices
758− :<|> Orgunits
759− :<|> VerificationCodes
760− :<|> Notifications
761− :<|> Chromeosdevices
762− :<|> Asps
867+ GroupsAliasesInsertResource :<|>
868+ GroupsAliasesListResource
869+ :<|> GroupsAliasesDeleteResource
870+ :<|> GroupsInsertResource
871+ :<|> GroupsListResource
872+ :<|> GroupsPatchResource
873+ :<|> GroupsGetResource
874+ :<|> GroupsDeleteResource
875+ :<|> GroupsUpdateResource
876+ :<|> UsersAliasesInsertResource
877+ :<|> UsersAliasesListResource
878+ :<|> UsersAliasesDeleteResource
879+ :<|> UsersAliasesWatchResource
880+ :<|> UsersPhotosPatchResource
881+ :<|> UsersPhotosGetResource
882+ :<|> UsersPhotosDeleteResource
883+ :<|> UsersPhotosUpdateResource
884+ :<|> UsersInsertResource
885+ :<|> UsersListResource
886+ :<|> UsersUndeleteResource
887+ :<|> UsersPatchResource
888+ :<|> UsersGetResource
889+ :<|> UsersMakeAdminResource
890+ :<|> UsersDeleteResource
891+ :<|> UsersUpdateResource
892+ :<|> UsersWatchResource
893+ :<|> SchemasInsertResource
894+ :<|> SchemasListResource
895+ :<|> SchemasPatchResource
896+ :<|> SchemasGetResource
897+ :<|> SchemasDeleteResource
898+ :<|> SchemasUpdateResource
899+ :<|> TokensListResource
900+ :<|> TokensGetResource
901+ :<|> TokensDeleteResource
902+ :<|> ChannelsStopResource
903+ :<|> MembersInsertResource
904+ :<|> MembersListResource
905+ :<|> MembersPatchResource
906+ :<|> MembersGetResource
907+ :<|> MembersDeleteResource
908+ :<|> MembersUpdateResource
909+ :<|> MobiledevicesListResource
910+ :<|> MobiledevicesGetResource
911+ :<|> MobiledevicesActionResource
912+ :<|> MobiledevicesDeleteResource
913+ :<|> OrgunitsInsertResource
914+ :<|> OrgunitsListResource
915+ :<|> OrgunitsPatchResource
916+ :<|> OrgunitsGetResource
917+ :<|> OrgunitsDeleteResource
918+ :<|> OrgunitsUpdateResource
919+ :<|> VerificationCodesListResource
920+ :<|> VerificationCodesGenerateResource
921+ :<|> VerificationCodesInvalidateResource
922+ :<|> NotificationsListResource
923+ :<|> NotificationsPatchResource
924+ :<|> NotificationsGetResource
925+ :<|> NotificationsDeleteResource
926+ :<|> NotificationsUpdateResource
927+ :<|> ChromeosdevicesListResource
928+ :<|> ChromeosdevicesPatchResource
929+ :<|> ChromeosdevicesGetResource
930+ :<|> ChromeosdevicesUpdateResource
931+ :<|> AspsListResource
932+ :<|> AspsGetResource
933+ :<|> AspsDeleteResource
763934
764935adminDirectoryAPI :: Proxy AdminDirectoryAPI
765936adminDirectoryAPI = Proxy
gogol-admin-directory/gen/Network/Google/AdminDirectory/Types.hs+145−32
@@ -57,6 +57,12 @@ module Network.Google.AdminDirectory.Types
5757 , userMakeAdmin
5858 , umaStatus
5959
60+ -- * DirectoryUsersListViewType
61+ , DirectoryUsersListViewType (..)
62+
63+ -- * DirectoryChromeosdevicesListProjection
64+ , DirectoryChromeosdevicesListProjection (..)
65+
6066 -- * UserAddress
6167 , UserAddress
6268 , userAddress
@@ -74,6 +80,9 @@ module Network.Google.AdminDirectory.Types
7480 , uaCustomType
7581 , uaSourceIsStructured
7682
83+ -- * DirectoryUsersWatchOrderBy
84+ , DirectoryUsersWatchOrderBy (..)
85+
7786 -- * Group
7887 , Group
7988 , group'
@@ -88,6 +97,15 @@ module Network.Google.AdminDirectory.Types
8897 , groId
8998 , groDescription
9099
100+ -- * ChromeOsDeviceActiveTimeRanges
101+ , ChromeOsDeviceActiveTimeRanges
102+ , chromeOsDeviceActiveTimeRanges
103+ , codatrDate
104+ , codatrActiveTime
105+
106+ -- * DirectoryUsersWatchViewType
107+ , DirectoryUsersWatchViewType (..)
108+
91109 -- * Asp
92110 , Asp
93111 , asp
@@ -154,6 +172,9 @@ module Network.Google.AdminDirectory.Types
154172 , uiType
155173 , uiCustomType
156174
175+ -- * DirectoryMobiledevicesListOrderBy
176+ , DirectoryMobiledevicesListOrderBy (..)
177+
157178 -- * Notification
158179 , Notification
159180 , notification
@@ -166,6 +187,19 @@ module Network.Google.AdminDirectory.Types
166187 , nNotificationId
167188 , nSendTime
168189
190+ -- * DirectoryUsersListSortOrder
191+ , DirectoryUsersListSortOrder (..)
192+
193+ -- * DirectoryUsersAliasesListEvent
194+ , DirectoryUsersAliasesListEvent (..)
195+
196+ -- * UserCustomSchemas
197+ , UserCustomSchemas
198+ , userCustomSchemas
199+
200+ -- * DirectoryUsersGetViewType
201+ , DirectoryUsersGetViewType (..)
202+
169203 -- * Aliases
170204 , Aliases
171205 , aliases
@@ -192,6 +226,12 @@ module Network.Google.AdminDirectory.Types
192226 , tokAnonymous
193227 , tokUserKey
194228
229+ -- * ChromeOsDeviceRecentUsers
230+ , ChromeOsDeviceRecentUsers
231+ , chromeOsDeviceRecentUsers
232+ , codruEmail
233+ , codruType
234+
195235 -- * UserUndelete
196236 , UserUndelete
197237 , userUndelete
@@ -236,6 +276,9 @@ module Network.Google.AdminDirectory.Types
236276 , aliId
237277 , aliPrimaryEmail
238278
279+ -- * DirectoryUsersAliasesWatchEvent
280+ , DirectoryUsersAliasesWatchEvent (..)
281+
239282 -- * UserName
240283 , UserName
241284 , userName
@@ -243,6 +286,21 @@ module Network.Google.AdminDirectory.Types
243286 , unFullName
244287 , unFamilyName
245288
289+ -- * DirectoryUsersWatchSortOrder
290+ , DirectoryUsersWatchSortOrder (..)
291+
292+ -- * DirectoryMobiledevicesGetProjection
293+ , DirectoryMobiledevicesGetProjection (..)
294+
295+ -- * MobileDeviceApplications
296+ , MobileDeviceApplications
297+ , mobileDeviceApplications
298+ , mdaVersionCode
299+ , mdaVersionName
300+ , mdaPackageName
301+ , mdaDisplayName
302+ , mdaPermission
303+
246304 -- * User
247305 , User
248306 , user
@@ -291,6 +349,24 @@ module Network.Google.AdminDirectory.Types
291349 , schSchemaId
292350 , schFields
293351
352+ -- * DirectoryMobiledevicesListSortOrder
353+ , DirectoryMobiledevicesListSortOrder (..)
354+
355+ -- * DirectoryUsersListOrderBy
356+ , DirectoryUsersListOrderBy (..)
357+
358+ -- * DirectoryOrgunitsListType
359+ , DirectoryOrgunitsListType (..)
360+
361+ -- * DirectoryUsersListProjection
362+ , DirectoryUsersListProjection (..)
363+
364+ -- * DirectoryChromeosdevicesUpdateProjection
365+ , DirectoryChromeosdevicesUpdateProjection (..)
366+
367+ -- * DirectoryUsersWatchProjection
368+ , DirectoryUsersWatchProjection (..)
369+
294370 -- * OrgUnits
295371 , OrgUnits
296372 , orgUnits
@@ -298,6 +374,10 @@ module Network.Google.AdminDirectory.Types
298374 , oKind
299375 , oOrganizationUnits
300376
377+ -- * ChannelParams
378+ , ChannelParams
379+ , channelParams
380+
301381 -- * VerificationCodes
302382 , VerificationCodes
303383 , verificationCodes
@@ -312,6 +392,9 @@ module Network.Google.AdminDirectory.Types
312392 , urType
313393 , urCustomType
314394
395+ -- * DirectoryChromeosdevicesListOrderBy
396+ , DirectoryChromeosdevicesListOrderBy (..)
397+
315398 -- * UserWebsite
316399 , UserWebsite
317400 , userWebsite
@@ -355,6 +438,12 @@ module Network.Google.AdminDirectory.Types
355438 , upId
356439 , upPrimaryEmail
357440
441+ -- * DirectoryUsersListEvent
442+ , DirectoryUsersListEvent (..)
443+
444+ -- * DirectoryMobiledevicesListProjection
445+ , DirectoryMobiledevicesListProjection (..)
446+
358447 -- * UserEmail
359448 , UserEmail
360449 , userEmail
@@ -373,45 +462,60 @@ module Network.Google.AdminDirectory.Types
373462 , memId
374463 , memType
375464
465+ -- * DirectoryUsersGetProjection
466+ , DirectoryUsersGetProjection (..)
467+
376468 -- * MobileDevice
377469 , MobileDevice
378470 , mobileDevice
379− , mobEmail
380− , mobStatus
381− , mobEtag
382− , mobResourceId
383− , mobBuildNumber
384− , mobManagedAccountIsOnOwnerProfile
385− , mobLastSync
386− , mobOtherAccountsInfo
387− , mobKind
388− , mobAdbStatus
389− , mobNetworkOperator
390− , mobKernelVersion
391− , mobOs
392− , mobName
393− , mobModel
394− , mobDeveloperOptionsStatus
395− , mobUnknownSourcesStatus
396− , mobMeid
397− , mobDeviceId
398− , mobFirstSync
399− , mobUserAgent
400− , mobImei
401− , mobType
402− , mobWifiMacAddress
403− , mobSerialNumber
404− , mobHardwareId
405− , mobBasebandVersion
406− , mobSupportsWorkProfile
407− , mobDeviceCompromisedStatus
408− , mobApplications
409− , mobDefaultLanguage
471+ , mddEmail
472+ , mddStatus
473+ , mddEtag
474+ , mddResourceId
475+ , mddBuildNumber
476+ , mddManagedAccountIsOnOwnerProfile
477+ , mddLastSync
478+ , mddOtherAccountsInfo
479+ , mddKind
480+ , mddAdbStatus
481+ , mddNetworkOperator
482+ , mddKernelVersion
483+ , mddOs
484+ , mddName
485+ , mddModel
486+ , mddDeveloperOptionsStatus
487+ , mddUnknownSourcesStatus
488+ , mddMeid
489+ , mddDeviceId
490+ , mddFirstSync
491+ , mddUserAgent
492+ , mddImei
493+ , mddType
494+ , mddWifiMacAddress
495+ , mddSerialNumber
496+ , mddHardwareId
497+ , mddBasebandVersion
498+ , mddSupportsWorkProfile
499+ , mddDeviceCompromisedStatus
500+ , mddApplications
501+ , mddDefaultLanguage
502+
503+ -- * DirectoryChromeosdevicesGetProjection
504+ , DirectoryChromeosdevicesGetProjection (..)
505+
506+ -- * DirectoryChromeosdevicesPatchProjection
507+ , DirectoryChromeosdevicesPatchProjection (..)
410508
411509 -- * UserCustomProperties
412510 , UserCustomProperties
413511 , userCustomProperties
414512
513+ -- * SchemaFieldSpecNumericIndexingSpec
514+ , SchemaFieldSpecNumericIndexingSpec
515+ , schemaFieldSpecNumericIndexingSpec
516+ , sfsnisMaxValue
517+ , sfsnisMinValue
518+
415519 -- * MobileDeviceAction
416520 , MobileDeviceAction
417521 , mobileDeviceAction
@@ -430,6 +534,9 @@ module Network.Google.AdminDirectory.Types
430534 , sfsFieldName
431535 , sfsMultiValued
432536
537+ -- * DirectoryUsersWatchEvent
538+ , DirectoryUsersWatchEvent (..)
539+
433540 -- * Notifications
434541 , Notifications
435542 , notifications
@@ -439,6 +546,9 @@ module Network.Google.AdminDirectory.Types
439546 , notItems
440547 , notUnreadNotificationsCount
441548
549+ -- * DirectoryChromeosdevicesListSortOrder
550+ , DirectoryChromeosdevicesListSortOrder (..)
551+
442552 -- * UserExternalId
443553 , UserExternalId
444554 , userExternalId
@@ -453,6 +563,9 @@ module Network.Google.AdminDirectory.Types
453563 , aaKind
454564 , aaItems
455565
566+ -- * Alt
567+ , Alt (..)
568+
456569 -- * ChromeOsDevices
457570 , ChromeOsDevices
458571 , chromeOsDevices
@@ -467,7 +580,7 @@ import Network.Google.AdminDirectory.Types.Sum
467580import Network.Google.Prelude
468581
469582-- | URL referring to version 'directory_v1' of the Admin Directory API.
470−adminDirectoryURL :: BaseURL
583+adminDirectoryURL :: BaseUrl
471584adminDirectoryURL
472585 = BaseUrl Https
473586 "https://www.googleapis.com/admin/directory/v1/"
gogol-admin-directory/gen/Network/Google/AdminDirectory/Types/Product.hs+525−246
@@ -676,6 +676,54 @@ instance ToJSON Group where
676676 ("id" .=) <$> _groId,
677677 ("description" .=) <$> _groDescription])
678678
679+--
680+-- /See:/ 'chromeOsDeviceActiveTimeRanges' smart constructor.
681+data ChromeOsDeviceActiveTimeRanges = ChromeOsDeviceActiveTimeRanges
682+ { _codatrDate :: !(Maybe UTCTime)
683+ , _codatrActiveTime :: !(Maybe Int32)
684+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
685+
686+-- | Creates a value of 'ChromeOsDeviceActiveTimeRanges' with the minimum fields required to make a request.
687+--
688+-- Use one of the following lenses to modify other fields as desired:
689+--
690+-- * 'codatrDate'
691+--
692+-- * 'codatrActiveTime'
693+chromeOsDeviceActiveTimeRanges
694+ :: ChromeOsDeviceActiveTimeRanges
695+chromeOsDeviceActiveTimeRanges =
696+ ChromeOsDeviceActiveTimeRanges
697+ { _codatrDate = Nothing
698+ , _codatrActiveTime = Nothing
699+ }
700+
701+-- | Date of usage
702+codatrDate :: Lens' ChromeOsDeviceActiveTimeRanges (Maybe UTCTime)
703+codatrDate
704+ = lens _codatrDate (\ s a -> s{_codatrDate = a})
705+
706+-- | Duration in milliseconds
707+codatrActiveTime :: Lens' ChromeOsDeviceActiveTimeRanges (Maybe Int32)
708+codatrActiveTime
709+ = lens _codatrActiveTime
710+ (\ s a -> s{_codatrActiveTime = a})
711+
712+instance FromJSON ChromeOsDeviceActiveTimeRanges
713+ where
714+ parseJSON
715+ = withObject "ChromeOsDeviceActiveTimeRanges"
716+ (\ o ->
717+ ChromeOsDeviceActiveTimeRanges <$>
718+ (o .:? "date") <*> (o .:? "activeTime"))
719+
720+instance ToJSON ChromeOsDeviceActiveTimeRanges where
721+ toJSON ChromeOsDeviceActiveTimeRanges{..}
722+ = object
723+ (catMaybes
724+ [("date" .=) <$> _codatrDate,
725+ ("activeTime" .=) <$> _codatrActiveTime])
726+
679727-- | The template that returns individual ASP (Access Code) data.
680728--
681729-- /See:/ 'asp' smart constructor.
@@ -844,14 +892,14 @@ data ChromeOsDevice = ChromeOsDevice
844892 , _codAnnotatedUser :: !(Maybe Text)
845893 , _codPlatformVersion :: !(Maybe Text)
846894 , _codLastSync :: !(Maybe UTCTime)
847− , _codActiveTimeRanges :: !(Maybe [ChromeOsDeviceActiveTimeRangesItem])
895+ , _codActiveTimeRanges :: !(Maybe [ChromeOsDeviceActiveTimeRanges])
848896 , _codKind :: !Text
849897 , _codEthernetMacAddress :: !(Maybe Text)
850898 , _codLastEnrollmentTime :: !(Maybe UTCTime)
851899 , _codAnnotatedLocation :: !(Maybe Text)
852900 , _codMacAddress :: !(Maybe Text)
853901 , _codOrgUnitPath :: !(Maybe Text)
854− , _codRecentUsers :: !(Maybe [ChromeOsDeviceRecentUsersItem])
902+ , _codRecentUsers :: !(Maybe [ChromeOsDeviceRecentUsers])
855903 , _codSupportEndDate :: !(Maybe UTCTime)
856904 , _codModel :: !(Maybe Text)
857905 , _codWillAutoRenew :: !(Maybe Bool)
@@ -978,7 +1026,7 @@ codLastSync
9781026 = lens _codLastSync (\ s a -> s{_codLastSync = a})
9791027
9801028-- | List of active time ranges (Read-only)
981−codActiveTimeRanges :: Lens' ChromeOsDevice [ChromeOsDeviceActiveTimeRangesItem]
1029+codActiveTimeRanges :: Lens' ChromeOsDevice [ChromeOsDeviceActiveTimeRanges]
9821030codActiveTimeRanges
9831031 = lens _codActiveTimeRanges
9841032 (\ s a -> s{_codActiveTimeRanges = a})
@@ -1021,7 +1069,7 @@ codOrgUnitPath
10211069
10221070-- | List of recent device users, in descending order by last login time
10231071-- (Read-only)
1024−codRecentUsers :: Lens' ChromeOsDevice [ChromeOsDeviceRecentUsersItem]
1072+codRecentUsers :: Lens' ChromeOsDevice [ChromeOsDeviceRecentUsers]
10251073codRecentUsers
10261074 = lens _codRecentUsers
10271075 (\ s a -> s{_codRecentUsers = a})
@@ -1438,6 +1486,27 @@ instance ToJSON Notification where
14381486 ("notificationId" .=) <$> _nNotificationId,
14391487 ("sendTime" .=) <$> _nSendTime])
14401488
1489+-- | Custom fields of the user.
1490+--
1491+-- /See:/ 'userCustomSchemas' smart constructor.
1492+data UserCustomSchemas =
1493+ UserCustomSchemas
1494+ deriving (Eq,Read,Show,Data,Typeable,Generic)
1495+
1496+-- | Creates a value of 'UserCustomSchemas' with the minimum fields required to make a request.
1497+--
1498+userCustomSchemas
1499+ :: UserCustomSchemas
1500+userCustomSchemas = UserCustomSchemas
1501+
1502+instance FromJSON UserCustomSchemas where
1503+ parseJSON
1504+ = withObject "UserCustomSchemas"
1505+ (\ o -> pure UserCustomSchemas)
1506+
1507+instance ToJSON UserCustomSchemas where
1508+ toJSON = const (Object mempty)
1509+
14411510-- | JSON response template to list aliases in Directory API.
14421511--
14431512-- /See:/ 'aliases' smart constructor.
@@ -1669,6 +1738,52 @@ instance ToJSON Token where
16691738 ("anonymous" .=) <$> _tokAnonymous,
16701739 ("userKey" .=) <$> _tokUserKey])
16711740
1741+--
1742+-- /See:/ 'chromeOsDeviceRecentUsers' smart constructor.
1743+data ChromeOsDeviceRecentUsers = ChromeOsDeviceRecentUsers
1744+ { _codruEmail :: !(Maybe Text)
1745+ , _codruType :: !(Maybe Text)
1746+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1747+
1748+-- | Creates a value of 'ChromeOsDeviceRecentUsers' with the minimum fields required to make a request.
1749+--
1750+-- Use one of the following lenses to modify other fields as desired:
1751+--
1752+-- * 'codruEmail'
1753+--
1754+-- * 'codruType'
1755+chromeOsDeviceRecentUsers
1756+ :: ChromeOsDeviceRecentUsers
1757+chromeOsDeviceRecentUsers =
1758+ ChromeOsDeviceRecentUsers
1759+ { _codruEmail = Nothing
1760+ , _codruType = Nothing
1761+ }
1762+
1763+-- | Email address of the user. Present only if the user type is managed
1764+codruEmail :: Lens' ChromeOsDeviceRecentUsers (Maybe Text)
1765+codruEmail
1766+ = lens _codruEmail (\ s a -> s{_codruEmail = a})
1767+
1768+-- | The type of the user
1769+codruType :: Lens' ChromeOsDeviceRecentUsers (Maybe Text)
1770+codruType
1771+ = lens _codruType (\ s a -> s{_codruType = a})
1772+
1773+instance FromJSON ChromeOsDeviceRecentUsers where
1774+ parseJSON
1775+ = withObject "ChromeOsDeviceRecentUsers"
1776+ (\ o ->
1777+ ChromeOsDeviceRecentUsers <$>
1778+ (o .:? "email") <*> (o .:? "type"))
1779+
1780+instance ToJSON ChromeOsDeviceRecentUsers where
1781+ toJSON ChromeOsDeviceRecentUsers{..}
1782+ = object
1783+ (catMaybes
1784+ [("email" .=) <$> _codruEmail,
1785+ ("type" .=) <$> _codruType])
1786+
16721787-- | JSON request template to undelete a user in Directory API.
16731788--
16741789-- /See:/ 'userUndelete' smart constructor.
@@ -2111,6 +2226,92 @@ instance ToJSON UserName where
21112226 ("fullName" .=) <$> _unFullName,
21122227 ("familyName" .=) <$> _unFamilyName])
21132228
2229+--
2230+-- /See:/ 'mobileDeviceApplications' smart constructor.
2231+data MobileDeviceApplications = MobileDeviceApplications
2232+ { _mdaVersionCode :: !(Maybe Int32)
2233+ , _mdaVersionName :: !(Maybe Text)
2234+ , _mdaPackageName :: !(Maybe Text)
2235+ , _mdaDisplayName :: !(Maybe Text)
2236+ , _mdaPermission :: !(Maybe [Text])
2237+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2238+
2239+-- | Creates a value of 'MobileDeviceApplications' with the minimum fields required to make a request.
2240+--
2241+-- Use one of the following lenses to modify other fields as desired:
2242+--
2243+-- * 'mdaVersionCode'
2244+--
2245+-- * 'mdaVersionName'
2246+--
2247+-- * 'mdaPackageName'
2248+--
2249+-- * 'mdaDisplayName'
2250+--
2251+-- * 'mdaPermission'
2252+mobileDeviceApplications
2253+ :: MobileDeviceApplications
2254+mobileDeviceApplications =
2255+ MobileDeviceApplications
2256+ { _mdaVersionCode = Nothing
2257+ , _mdaVersionName = Nothing
2258+ , _mdaPackageName = Nothing
2259+ , _mdaDisplayName = Nothing
2260+ , _mdaPermission = Nothing
2261+ }
2262+
2263+-- | Version code of application
2264+mdaVersionCode :: Lens' MobileDeviceApplications (Maybe Int32)
2265+mdaVersionCode
2266+ = lens _mdaVersionCode
2267+ (\ s a -> s{_mdaVersionCode = a})
2268+
2269+-- | Version name of application
2270+mdaVersionName :: Lens' MobileDeviceApplications (Maybe Text)
2271+mdaVersionName
2272+ = lens _mdaVersionName
2273+ (\ s a -> s{_mdaVersionName = a})
2274+
2275+-- | Package name of application
2276+mdaPackageName :: Lens' MobileDeviceApplications (Maybe Text)
2277+mdaPackageName
2278+ = lens _mdaPackageName
2279+ (\ s a -> s{_mdaPackageName = a})
2280+
2281+-- | Display name of application
2282+mdaDisplayName :: Lens' MobileDeviceApplications (Maybe Text)
2283+mdaDisplayName
2284+ = lens _mdaDisplayName
2285+ (\ s a -> s{_mdaDisplayName = a})
2286+
2287+-- | List of Permissions for application
2288+mdaPermission :: Lens' MobileDeviceApplications [Text]
2289+mdaPermission
2290+ = lens _mdaPermission
2291+ (\ s a -> s{_mdaPermission = a})
2292+ . _Default
2293+ . _Coerce
2294+
2295+instance FromJSON MobileDeviceApplications where
2296+ parseJSON
2297+ = withObject "MobileDeviceApplications"
2298+ (\ o ->
2299+ MobileDeviceApplications <$>
2300+ (o .:? "versionCode") <*> (o .:? "versionName") <*>
2301+ (o .:? "packageName")
2302+ <*> (o .:? "displayName")
2303+ <*> (o .:? "permission" .!= mempty))
2304+
2305+instance ToJSON MobileDeviceApplications where
2306+ toJSON MobileDeviceApplications{..}
2307+ = object
2308+ (catMaybes
2309+ [("versionCode" .=) <$> _mdaVersionCode,
2310+ ("versionName" .=) <$> _mdaVersionName,
2311+ ("packageName" .=) <$> _mdaPackageName,
2312+ ("displayName" .=) <$> _mdaDisplayName,
2313+ ("permission" .=) <$> _mdaPermission])
2314+
21142315-- | JSON template for User object in Directory API.
21152316--
21162317-- /See:/ 'user' smart constructor.
@@ -2120,15 +2321,15 @@ data User = User
21202321 , _useThumbnailPhotoEtag :: !(Maybe Text)
21212322 , _useEtag :: !(Maybe Text)
21222323 , _useIpWhitelisted :: !(Maybe Bool)
2123− , _useRelations :: !(Maybe JSON)
2324+ , _useRelations :: !(Maybe JSONValue)
21242325 , _useHashFunction :: !(Maybe Text)
21252326 , _useKind :: !Text
21262327 , _useChangePasswordAtNextLogin :: !(Maybe Bool)
2127− , _useWebsites :: !(Maybe JSON)
2128− , _useAddresses :: !(Maybe JSON)
2328+ , _useWebsites :: !(Maybe JSONValue)
2329+ , _useAddresses :: !(Maybe JSONValue)
21292330 , _useAliases :: !(Maybe [Text])
21302331 , _useThumbnailPhotoUrl :: !(Maybe Text)
2131− , _useExternalIds :: !(Maybe JSON)
2332+ , _useExternalIds :: !(Maybe JSONValue)
21322333 , _useSuspended :: !(Maybe Bool)
21332334 , _useAgreedToTerms :: !(Maybe Bool)
21342335 , _useDeletionTime :: !(Maybe UTCTime)
@@ -2136,16 +2337,16 @@ data User = User
21362337 , _useOrgUnitPath :: !(Maybe Text)
21372338 , _useCustomerId :: !(Maybe Text)
21382339 , _useIncludeInGlobalAddressList :: !(Maybe Bool)
2139− , _usePhones :: !(Maybe JSON)
2340+ , _usePhones :: !(Maybe JSONValue)
21402341 , _useName :: !(Maybe (Maybe UserName))
21412342 , _usePassword :: !(Maybe Text)
2142− , _useEmails :: !(Maybe JSON)
2143− , _useIms :: !(Maybe JSON)
2343+ , _useEmails :: !(Maybe JSONValue)
2344+ , _useIms :: !(Maybe JSONValue)
21442345 , _useIsAdmin :: !(Maybe Bool)
21452346 , _useId :: !(Maybe Text)
2146− , _useOrganizations :: !(Maybe JSON)
2347+ , _useOrganizations :: !(Maybe JSONValue)
21472348 , _usePrimaryEmail :: !(Maybe Text)
2148− , _useNotes :: !(Maybe JSON)
2349+ , _useNotes :: !(Maybe JSONValue)
21492350 , _useIsDelegatedAdmin :: !(Maybe Bool)
21502351 , _useIsMailboxSetup :: !(Maybe Bool)
21512352 , _useCustomSchemas :: !(Maybe UserCustomSchemas)
@@ -2294,7 +2495,7 @@ useIpWhitelisted
22942495 = lens _useIpWhitelisted
22952496 (\ s a -> s{_useIpWhitelisted = a})
22962497
2297−useRelations :: Lens' User (Maybe JSON)
2498+useRelations :: Lens' User (Maybe JSONValue)
22982499useRelations
22992500 = lens _useRelations (\ s a -> s{_useRelations = a})
23002501
@@ -2314,11 +2515,11 @@ useChangePasswordAtNextLogin
23142515 = lens _useChangePasswordAtNextLogin
23152516 (\ s a -> s{_useChangePasswordAtNextLogin = a})
23162517
2317−useWebsites :: Lens' User (Maybe JSON)
2518+useWebsites :: Lens' User (Maybe JSONValue)
23182519useWebsites
23192520 = lens _useWebsites (\ s a -> s{_useWebsites = a})
23202521
2321−useAddresses :: Lens' User (Maybe JSON)
2522+useAddresses :: Lens' User (Maybe JSONValue)
23222523useAddresses
23232524 = lens _useAddresses (\ s a -> s{_useAddresses = a})
23242525
@@ -2335,7 +2536,7 @@ useThumbnailPhotoUrl
23352536 = lens _useThumbnailPhotoUrl
23362537 (\ s a -> s{_useThumbnailPhotoUrl = a})
23372538
2338−useExternalIds :: Lens' User (Maybe JSON)
2539+useExternalIds :: Lens' User (Maybe JSONValue)
23392540useExternalIds
23402541 = lens _useExternalIds
23412542 (\ s a -> s{_useExternalIds = a})
@@ -2382,7 +2583,7 @@ useIncludeInGlobalAddressList
23822583 = lens _useIncludeInGlobalAddressList
23832584 (\ s a -> s{_useIncludeInGlobalAddressList = a})
23842585
2385−usePhones :: Lens' User (Maybe JSON)
2586+usePhones :: Lens' User (Maybe JSONValue)
23862587usePhones
23872588 = lens _usePhones (\ s a -> s{_usePhones = a})
23882589
@@ -2395,11 +2596,11 @@ usePassword :: Lens' User (Maybe Text)
23952596usePassword
23962597 = lens _usePassword (\ s a -> s{_usePassword = a})
23972598
2398−useEmails :: Lens' User (Maybe JSON)
2599+useEmails :: Lens' User (Maybe JSONValue)
23992600useEmails
24002601 = lens _useEmails (\ s a -> s{_useEmails = a})
24012602
2402−useIms :: Lens' User (Maybe JSON)
2603+useIms :: Lens' User (Maybe JSONValue)
24032604useIms = lens _useIms (\ s a -> s{_useIms = a})
24042605
24052606-- | Boolean indicating if the user is admin (Read-only)
@@ -2411,7 +2612,7 @@ useIsAdmin
24112612useId :: Lens' User (Maybe Text)
24122613useId = lens _useId (\ s a -> s{_useId = a})
24132614
2414−useOrganizations :: Lens' User (Maybe JSON)
2615+useOrganizations :: Lens' User (Maybe JSONValue)
24152616useOrganizations
24162617 = lens _useOrganizations
24172618 (\ s a -> s{_useOrganizations = a})
@@ -2422,7 +2623,7 @@ usePrimaryEmail
24222623 = lens _usePrimaryEmail
24232624 (\ s a -> s{_usePrimaryEmail = a})
24242625
2425−useNotes :: Lens' User (Maybe JSON)
2626+useNotes :: Lens' User (Maybe JSONValue)
24262627useNotes = lens _useNotes (\ s a -> s{_useNotes = a})
24272628
24282629-- | Boolean indicating if the user is delegated admin (Read-only)
@@ -2670,6 +2871,27 @@ instance ToJSON OrgUnits where
26702871 [("etag" .=) <$> _oEtag, Just ("kind" .= _oKind),
26712872 ("organizationUnits" .=) <$> _oOrganizationUnits])
26722873
2874+-- | Additional parameters controlling delivery channel behavior. Optional.
2875+--
2876+-- /See:/ 'channelParams' smart constructor.
2877+data ChannelParams =
2878+ ChannelParams
2879+ deriving (Eq,Read,Show,Data,Typeable,Generic)
2880+
2881+-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
2882+--
2883+channelParams
2884+ :: ChannelParams
2885+channelParams = ChannelParams
2886+
2887+instance FromJSON ChannelParams where
2888+ parseJSON
2889+ = withObject "ChannelParams"
2890+ (\ o -> pure ChannelParams)
2891+
2892+instance ToJSON ChannelParams where
2893+ toJSON = const (Object mempty)
2894+
26732895-- | JSON response template for List verification codes operation in
26742896-- Directory API.
26752897--
@@ -3340,314 +3562,314 @@ instance ToJSON Member where
33403562--
33413563-- /See:/ 'mobileDevice' smart constructor.
33423564data MobileDevice = MobileDevice
3343− { _mobEmail :: !(Maybe [Text])
3344− , _mobStatus :: !(Maybe Text)
3345− , _mobEtag :: !(Maybe Text)
3346− , _mobResourceId :: !(Maybe Text)
3347− , _mobBuildNumber :: !(Maybe Text)
3348− , _mobManagedAccountIsOnOwnerProfile :: !(Maybe Bool)
3349− , _mobLastSync :: !(Maybe UTCTime)
3350− , _mobOtherAccountsInfo :: !(Maybe [Text])
3351− , _mobKind :: !Text
3352− , _mobAdbStatus :: !(Maybe Bool)
3353− , _mobNetworkOperator :: !(Maybe Text)
3354− , _mobKernelVersion :: !(Maybe Text)
3355− , _mobOs :: !(Maybe Text)
3356− , _mobName :: !(Maybe [Text])
3357− , _mobModel :: !(Maybe Text)
3358− , _mobDeveloperOptionsStatus :: !(Maybe Bool)
3359− , _mobUnknownSourcesStatus :: !(Maybe Bool)
3360− , _mobMeid :: !(Maybe Text)
3361− , _mobDeviceId :: !(Maybe Text)
3362− , _mobFirstSync :: !(Maybe UTCTime)
3363− , _mobUserAgent :: !(Maybe Text)
3364− , _mobImei :: !(Maybe Text)
3365− , _mobType :: !(Maybe Text)
3366− , _mobWifiMacAddress :: !(Maybe Text)
3367− , _mobSerialNumber :: !(Maybe Text)
3368− , _mobHardwareId :: !(Maybe Text)
3369− , _mobBasebandVersion :: !(Maybe Text)
3370− , _mobSupportsWorkProfile :: !(Maybe Bool)
3371− , _mobDeviceCompromisedStatus :: !(Maybe Text)
3372− , _mobApplications :: !(Maybe [MobileDeviceApplicationsItem])
3373− , _mobDefaultLanguage :: !(Maybe Text)
3565+ { _mddEmail :: !(Maybe [Text])
3566+ , _mddStatus :: !(Maybe Text)
3567+ , _mddEtag :: !(Maybe Text)
3568+ , _mddResourceId :: !(Maybe Text)
3569+ , _mddBuildNumber :: !(Maybe Text)
3570+ , _mddManagedAccountIsOnOwnerProfile :: !(Maybe Bool)
3571+ , _mddLastSync :: !(Maybe UTCTime)
3572+ , _mddOtherAccountsInfo :: !(Maybe [Text])
3573+ , _mddKind :: !Text
3574+ , _mddAdbStatus :: !(Maybe Bool)
3575+ , _mddNetworkOperator :: !(Maybe Text)
3576+ , _mddKernelVersion :: !(Maybe Text)
3577+ , _mddOs :: !(Maybe Text)
3578+ , _mddName :: !(Maybe [Text])
3579+ , _mddModel :: !(Maybe Text)
3580+ , _mddDeveloperOptionsStatus :: !(Maybe Bool)
3581+ , _mddUnknownSourcesStatus :: !(Maybe Bool)
3582+ , _mddMeid :: !(Maybe Text)
3583+ , _mddDeviceId :: !(Maybe Text)
3584+ , _mddFirstSync :: !(Maybe UTCTime)
3585+ , _mddUserAgent :: !(Maybe Text)
3586+ , _mddImei :: !(Maybe Text)
3587+ , _mddType :: !(Maybe Text)
3588+ , _mddWifiMacAddress :: !(Maybe Text)
3589+ , _mddSerialNumber :: !(Maybe Text)
3590+ , _mddHardwareId :: !(Maybe Text)
3591+ , _mddBasebandVersion :: !(Maybe Text)
3592+ , _mddSupportsWorkProfile :: !(Maybe Bool)
3593+ , _mddDeviceCompromisedStatus :: !(Maybe Text)
3594+ , _mddApplications :: !(Maybe [MobileDeviceApplications])
3595+ , _mddDefaultLanguage :: !(Maybe Text)
33743596 } deriving (Eq,Read,Show,Data,Typeable,Generic)
33753597
33763598-- | Creates a value of 'MobileDevice' with the minimum fields required to make a request.
33773599--
33783600-- Use one of the following lenses to modify other fields as desired:
33793601--
3380−-- * 'mobEmail'
3602+-- * 'mddEmail'
33813603--
3382−-- * 'mobStatus'
3604+-- * 'mddStatus'
33833605--
3384−-- * 'mobEtag'
3606+-- * 'mddEtag'
33853607--
3386−-- * 'mobResourceId'
3608+-- * 'mddResourceId'
33873609--
3388−-- * 'mobBuildNumber'
3610+-- * 'mddBuildNumber'
33893611--
3390−-- * 'mobManagedAccountIsOnOwnerProfile'
3612+-- * 'mddManagedAccountIsOnOwnerProfile'
33913613--
3392−-- * 'mobLastSync'
3614+-- * 'mddLastSync'
33933615--
3394−-- * 'mobOtherAccountsInfo'
3616+-- * 'mddOtherAccountsInfo'
33953617--
3396−-- * 'mobKind'
3618+-- * 'mddKind'
33973619--
3398−-- * 'mobAdbStatus'
3620+-- * 'mddAdbStatus'
33993621--
3400−-- * 'mobNetworkOperator'
3622+-- * 'mddNetworkOperator'
34013623--
3402−-- * 'mobKernelVersion'
3624+-- * 'mddKernelVersion'
34033625--
3404−-- * 'mobOs'
3626+-- * 'mddOs'
34053627--
3406−-- * 'mobName'
3628+-- * 'mddName'
34073629--
3408−-- * 'mobModel'
3630+-- * 'mddModel'
34093631--
3410−-- * 'mobDeveloperOptionsStatus'
3632+-- * 'mddDeveloperOptionsStatus'
34113633--
3412−-- * 'mobUnknownSourcesStatus'
3634+-- * 'mddUnknownSourcesStatus'
34133635--
3414−-- * 'mobMeid'
3636+-- * 'mddMeid'
34153637--
3416−-- * 'mobDeviceId'
3638+-- * 'mddDeviceId'
34173639--
3418−-- * 'mobFirstSync'
3640+-- * 'mddFirstSync'
34193641--
3420−-- * 'mobUserAgent'
3642+-- * 'mddUserAgent'
34213643--
3422−-- * 'mobImei'
3644+-- * 'mddImei'
34233645--
3424−-- * 'mobType'
3646+-- * 'mddType'
34253647--
3426−-- * 'mobWifiMacAddress'
3648+-- * 'mddWifiMacAddress'
34273649--
3428−-- * 'mobSerialNumber'
3650+-- * 'mddSerialNumber'
34293651--
3430−-- * 'mobHardwareId'
3652+-- * 'mddHardwareId'
34313653--
3432−-- * 'mobBasebandVersion'
3654+-- * 'mddBasebandVersion'
34333655--
3434−-- * 'mobSupportsWorkProfile'
3656+-- * 'mddSupportsWorkProfile'
34353657--
3436−-- * 'mobDeviceCompromisedStatus'
3658+-- * 'mddDeviceCompromisedStatus'
34373659--
3438−-- * 'mobApplications'
3660+-- * 'mddApplications'
34393661--
3440−-- * 'mobDefaultLanguage'
3662+-- * 'mddDefaultLanguage'
34413663mobileDevice
34423664 :: MobileDevice
34433665mobileDevice =
34443666 MobileDevice
3445− { _mobEmail = Nothing
3446− , _mobStatus = Nothing
3447− , _mobEtag = Nothing
3448− , _mobResourceId = Nothing
3449− , _mobBuildNumber = Nothing
3450− , _mobManagedAccountIsOnOwnerProfile = Nothing
3451− , _mobLastSync = Nothing
3452− , _mobOtherAccountsInfo = Nothing
3453− , _mobKind = "admin#directory#mobiledevice"
3454− , _mobAdbStatus = Nothing
3455− , _mobNetworkOperator = Nothing
3456− , _mobKernelVersion = Nothing
3457− , _mobOs = Nothing
3458− , _mobName = Nothing
3459− , _mobModel = Nothing
3460− , _mobDeveloperOptionsStatus = Nothing
3461− , _mobUnknownSourcesStatus = Nothing
3462− , _mobMeid = Nothing
3463− , _mobDeviceId = Nothing
3464− , _mobFirstSync = Nothing
3465− , _mobUserAgent = Nothing
3466− , _mobImei = Nothing
3467− , _mobType = Nothing
3468− , _mobWifiMacAddress = Nothing
3469− , _mobSerialNumber = Nothing
3470− , _mobHardwareId = Nothing
3471− , _mobBasebandVersion = Nothing
3472− , _mobSupportsWorkProfile = Nothing
3473− , _mobDeviceCompromisedStatus = Nothing
3474− , _mobApplications = Nothing
3475− , _mobDefaultLanguage = Nothing
3667+ { _mddEmail = Nothing
3668+ , _mddStatus = Nothing
3669+ , _mddEtag = Nothing
3670+ , _mddResourceId = Nothing
3671+ , _mddBuildNumber = Nothing
3672+ , _mddManagedAccountIsOnOwnerProfile = Nothing
3673+ , _mddLastSync = Nothing
3674+ , _mddOtherAccountsInfo = Nothing
3675+ , _mddKind = "admin#directory#mobiledevice"
3676+ , _mddAdbStatus = Nothing
3677+ , _mddNetworkOperator = Nothing
3678+ , _mddKernelVersion = Nothing
3679+ , _mddOs = Nothing
3680+ , _mddName = Nothing
3681+ , _mddModel = Nothing
3682+ , _mddDeveloperOptionsStatus = Nothing
3683+ , _mddUnknownSourcesStatus = Nothing
3684+ , _mddMeid = Nothing
3685+ , _mddDeviceId = Nothing
3686+ , _mddFirstSync = Nothing
3687+ , _mddUserAgent = Nothing
3688+ , _mddImei = Nothing
3689+ , _mddType = Nothing
3690+ , _mddWifiMacAddress = Nothing
3691+ , _mddSerialNumber = Nothing
3692+ , _mddHardwareId = Nothing
3693+ , _mddBasebandVersion = Nothing
3694+ , _mddSupportsWorkProfile = Nothing
3695+ , _mddDeviceCompromisedStatus = Nothing
3696+ , _mddApplications = Nothing
3697+ , _mddDefaultLanguage = Nothing
34763698 }
34773699
34783700-- | List of owner user\'s email addresses (Read-only)
3479−mobEmail :: Lens' MobileDevice [Text]
3480−mobEmail
3481− = lens _mobEmail (\ s a -> s{_mobEmail = a}) .
3701+mddEmail :: Lens' MobileDevice [Text]
3702+mddEmail
3703+ = lens _mddEmail (\ s a -> s{_mddEmail = a}) .
34823704 _Default
34833705 . _Coerce
34843706
34853707-- | Status of the device (Read-only)
3486−mobStatus :: Lens' MobileDevice (Maybe Text)
3487−mobStatus
3488− = lens _mobStatus (\ s a -> s{_mobStatus = a})
3708+mddStatus :: Lens' MobileDevice (Maybe Text)
3709+mddStatus
3710+ = lens _mddStatus (\ s a -> s{_mddStatus = a})
34893711
34903712-- | ETag of the resource.
3491−mobEtag :: Lens' MobileDevice (Maybe Text)
3492−mobEtag = lens _mobEtag (\ s a -> s{_mobEtag = a})
3713+mddEtag :: Lens' MobileDevice (Maybe Text)
3714+mddEtag = lens _mddEtag (\ s a -> s{_mddEtag = a})
34933715
34943716-- | Unique identifier of Mobile Device (Read-only)
3495−mobResourceId :: Lens' MobileDevice (Maybe Text)
3496−mobResourceId
3497− = lens _mobResourceId
3498− (\ s a -> s{_mobResourceId = a})
3717+mddResourceId :: Lens' MobileDevice (Maybe Text)
3718+mddResourceId
3719+ = lens _mddResourceId
3720+ (\ s a -> s{_mddResourceId = a})
34993721
35003722-- | Mobile Device Build number (Read-only)
3501−mobBuildNumber :: Lens' MobileDevice (Maybe Text)
3502−mobBuildNumber
3503− = lens _mobBuildNumber
3504− (\ s a -> s{_mobBuildNumber = a})
3723+mddBuildNumber :: Lens' MobileDevice (Maybe Text)
3724+mddBuildNumber
3725+ = lens _mddBuildNumber
3726+ (\ s a -> s{_mddBuildNumber = a})
35053727
35063728-- | Boolean indicating if this account is on owner\/primary profile or not
35073729-- (Read-only)
3508−mobManagedAccountIsOnOwnerProfile :: Lens' MobileDevice (Maybe Bool)
3509−mobManagedAccountIsOnOwnerProfile
3510− = lens _mobManagedAccountIsOnOwnerProfile
3511− (\ s a -> s{_mobManagedAccountIsOnOwnerProfile = a})
3730+mddManagedAccountIsOnOwnerProfile :: Lens' MobileDevice (Maybe Bool)
3731+mddManagedAccountIsOnOwnerProfile
3732+ = lens _mddManagedAccountIsOnOwnerProfile
3733+ (\ s a -> s{_mddManagedAccountIsOnOwnerProfile = a})
35123734
35133735-- | Date and time the device was last synchronized with the policy settings
35143736-- in the Google Apps administrator control panel (Read-only)
3515−mobLastSync :: Lens' MobileDevice (Maybe UTCTime)
3516−mobLastSync
3517− = lens _mobLastSync (\ s a -> s{_mobLastSync = a})
3737+mddLastSync :: Lens' MobileDevice (Maybe UTCTime)
3738+mddLastSync
3739+ = lens _mddLastSync (\ s a -> s{_mddLastSync = a})
35183740
35193741-- | List of accounts added on device (Read-only)
3520−mobOtherAccountsInfo :: Lens' MobileDevice [Text]
3521−mobOtherAccountsInfo
3522− = lens _mobOtherAccountsInfo
3523− (\ s a -> s{_mobOtherAccountsInfo = a})
3742+mddOtherAccountsInfo :: Lens' MobileDevice [Text]
3743+mddOtherAccountsInfo
3744+ = lens _mddOtherAccountsInfo
3745+ (\ s a -> s{_mddOtherAccountsInfo = a})
35243746 . _Default
35253747 . _Coerce
35263748
35273749-- | Kind of resource this is.
3528−mobKind :: Lens' MobileDevice Text
3529−mobKind = lens _mobKind (\ s a -> s{_mobKind = a})
3750+mddKind :: Lens' MobileDevice Text
3751+mddKind = lens _mddKind (\ s a -> s{_mddKind = a})
35303752
35313753-- | Adb (USB debugging) enabled or disabled on device (Read-only)
3532−mobAdbStatus :: Lens' MobileDevice (Maybe Bool)
3533−mobAdbStatus
3534− = lens _mobAdbStatus (\ s a -> s{_mobAdbStatus = a})
3754+mddAdbStatus :: Lens' MobileDevice (Maybe Bool)
3755+mddAdbStatus
3756+ = lens _mddAdbStatus (\ s a -> s{_mddAdbStatus = a})
35353757
35363758-- | Mobile Device mobile or network operator (if available) (Read-only)
3537−mobNetworkOperator :: Lens' MobileDevice (Maybe Text)
3538−mobNetworkOperator
3539− = lens _mobNetworkOperator
3540− (\ s a -> s{_mobNetworkOperator = a})
3759+mddNetworkOperator :: Lens' MobileDevice (Maybe Text)
3760+mddNetworkOperator
3761+ = lens _mddNetworkOperator
3762+ (\ s a -> s{_mddNetworkOperator = a})
35413763
35423764-- | Mobile Device Kernel version (Read-only)
3543−mobKernelVersion :: Lens' MobileDevice (Maybe Text)
3544−mobKernelVersion
3545− = lens _mobKernelVersion
3546− (\ s a -> s{_mobKernelVersion = a})
3765+mddKernelVersion :: Lens' MobileDevice (Maybe Text)
3766+mddKernelVersion
3767+ = lens _mddKernelVersion
3768+ (\ s a -> s{_mddKernelVersion = a})
35473769
35483770-- | Name of the mobile operating system
3549−mobOs :: Lens' MobileDevice (Maybe Text)
3550−mobOs = lens _mobOs (\ s a -> s{_mobOs = a})
3771+mddOs :: Lens' MobileDevice (Maybe Text)
3772+mddOs = lens _mddOs (\ s a -> s{_mddOs = a})
35513773
35523774-- | List of owner user\'s names (Read-only)
3553−mobName :: Lens' MobileDevice [Text]
3554−mobName
3555− = lens _mobName (\ s a -> s{_mobName = a}) . _Default
3775+mddName :: Lens' MobileDevice [Text]
3776+mddName
3777+ = lens _mddName (\ s a -> s{_mddName = a}) . _Default
35563778 . _Coerce
35573779
35583780-- | Name of the model of the device
3559−mobModel :: Lens' MobileDevice (Maybe Text)
3560−mobModel = lens _mobModel (\ s a -> s{_mobModel = a})
3781+mddModel :: Lens' MobileDevice (Maybe Text)
3782+mddModel = lens _mddModel (\ s a -> s{_mddModel = a})
35613783
35623784-- | Developer options enabled or disabled on device (Read-only)
3563−mobDeveloperOptionsStatus :: Lens' MobileDevice (Maybe Bool)
3564−mobDeveloperOptionsStatus
3565− = lens _mobDeveloperOptionsStatus
3566− (\ s a -> s{_mobDeveloperOptionsStatus = a})
3785+mddDeveloperOptionsStatus :: Lens' MobileDevice (Maybe Bool)
3786+mddDeveloperOptionsStatus
3787+ = lens _mddDeveloperOptionsStatus
3788+ (\ s a -> s{_mddDeveloperOptionsStatus = a})
35673789
35683790-- | Unknown sources enabled or disabled on device (Read-only)
3569−mobUnknownSourcesStatus :: Lens' MobileDevice (Maybe Bool)
3570−mobUnknownSourcesStatus
3571− = lens _mobUnknownSourcesStatus
3572− (\ s a -> s{_mobUnknownSourcesStatus = a})
3791+mddUnknownSourcesStatus :: Lens' MobileDevice (Maybe Bool)
3792+mddUnknownSourcesStatus
3793+ = lens _mddUnknownSourcesStatus
3794+ (\ s a -> s{_mddUnknownSourcesStatus = a})
35733795
35743796-- | Mobile Device MEID number (Read-only)
3575−mobMeid :: Lens' MobileDevice (Maybe Text)
3576−mobMeid = lens _mobMeid (\ s a -> s{_mobMeid = a})
3797+mddMeid :: Lens' MobileDevice (Maybe Text)
3798+mddMeid = lens _mddMeid (\ s a -> s{_mddMeid = a})
35773799
35783800-- | Mobile Device serial number (Read-only)
3579−mobDeviceId :: Lens' MobileDevice (Maybe Text)
3580−mobDeviceId
3581− = lens _mobDeviceId (\ s a -> s{_mobDeviceId = a})
3801+mddDeviceId :: Lens' MobileDevice (Maybe Text)
3802+mddDeviceId
3803+ = lens _mddDeviceId (\ s a -> s{_mddDeviceId = a})
35823804
35833805-- | Date and time the device was first synchronized with the policy settings
35843806-- in the Google Apps administrator control panel (Read-only)
3585−mobFirstSync :: Lens' MobileDevice (Maybe UTCTime)
3586−mobFirstSync
3587− = lens _mobFirstSync (\ s a -> s{_mobFirstSync = a})
3807+mddFirstSync :: Lens' MobileDevice (Maybe UTCTime)
3808+mddFirstSync
3809+ = lens _mddFirstSync (\ s a -> s{_mddFirstSync = a})
35883810
35893811-- | Mobile Device user agent
3590−mobUserAgent :: Lens' MobileDevice (Maybe Text)
3591−mobUserAgent
3592− = lens _mobUserAgent (\ s a -> s{_mobUserAgent = a})
3812+mddUserAgent :: Lens' MobileDevice (Maybe Text)
3813+mddUserAgent
3814+ = lens _mddUserAgent (\ s a -> s{_mddUserAgent = a})
35933815
35943816-- | Mobile Device IMEI number (Read-only)
3595−mobImei :: Lens' MobileDevice (Maybe Text)
3596−mobImei = lens _mobImei (\ s a -> s{_mobImei = a})
3817+mddImei :: Lens' MobileDevice (Maybe Text)
3818+mddImei = lens _mddImei (\ s a -> s{_mddImei = a})
35973819
35983820-- | The type of device (Read-only)
3599−mobType :: Lens' MobileDevice (Maybe Text)
3600−mobType = lens _mobType (\ s a -> s{_mobType = a})
3821+mddType :: Lens' MobileDevice (Maybe Text)
3822+mddType = lens _mddType (\ s a -> s{_mddType = a})
36013823
36023824-- | Mobile Device WiFi MAC address (Read-only)
3603−mobWifiMacAddress :: Lens' MobileDevice (Maybe Text)
3604−mobWifiMacAddress
3605− = lens _mobWifiMacAddress
3606− (\ s a -> s{_mobWifiMacAddress = a})
3825+mddWifiMacAddress :: Lens' MobileDevice (Maybe Text)
3826+mddWifiMacAddress
3827+ = lens _mddWifiMacAddress
3828+ (\ s a -> s{_mddWifiMacAddress = a})
36073829
36083830-- | Mobile Device SSN or Serial Number (Read-only)
3609−mobSerialNumber :: Lens' MobileDevice (Maybe Text)
3610−mobSerialNumber
3611− = lens _mobSerialNumber
3612− (\ s a -> s{_mobSerialNumber = a})
3831+mddSerialNumber :: Lens' MobileDevice (Maybe Text)
3832+mddSerialNumber
3833+ = lens _mddSerialNumber
3834+ (\ s a -> s{_mddSerialNumber = a})
36133835
36143836-- | Mobile Device Hardware Id (Read-only)
3615−mobHardwareId :: Lens' MobileDevice (Maybe Text)
3616−mobHardwareId
3617− = lens _mobHardwareId
3618− (\ s a -> s{_mobHardwareId = a})
3837+mddHardwareId :: Lens' MobileDevice (Maybe Text)
3838+mddHardwareId
3839+ = lens _mddHardwareId
3840+ (\ s a -> s{_mddHardwareId = a})
36193841
36203842-- | Mobile Device Baseband version (Read-only)
3621−mobBasebandVersion :: Lens' MobileDevice (Maybe Text)
3622−mobBasebandVersion
3623− = lens _mobBasebandVersion
3624− (\ s a -> s{_mobBasebandVersion = a})
3843+mddBasebandVersion :: Lens' MobileDevice (Maybe Text)
3844+mddBasebandVersion
3845+ = lens _mddBasebandVersion
3846+ (\ s a -> s{_mddBasebandVersion = a})
36253847
36263848-- | Work profile supported on device (Read-only)
3627−mobSupportsWorkProfile :: Lens' MobileDevice (Maybe Bool)
3628−mobSupportsWorkProfile
3629− = lens _mobSupportsWorkProfile
3630− (\ s a -> s{_mobSupportsWorkProfile = a})
3849+mddSupportsWorkProfile :: Lens' MobileDevice (Maybe Bool)
3850+mddSupportsWorkProfile
3851+ = lens _mddSupportsWorkProfile
3852+ (\ s a -> s{_mddSupportsWorkProfile = a})
36313853
36323854-- | Mobile Device compromised status (Read-only)
3633−mobDeviceCompromisedStatus :: Lens' MobileDevice (Maybe Text)
3634−mobDeviceCompromisedStatus
3635− = lens _mobDeviceCompromisedStatus
3636− (\ s a -> s{_mobDeviceCompromisedStatus = a})
3855+mddDeviceCompromisedStatus :: Lens' MobileDevice (Maybe Text)
3856+mddDeviceCompromisedStatus
3857+ = lens _mddDeviceCompromisedStatus
3858+ (\ s a -> s{_mddDeviceCompromisedStatus = a})
36373859
36383860-- | List of applications installed on Mobile Device
3639−mobApplications :: Lens' MobileDevice [MobileDeviceApplicationsItem]
3640−mobApplications
3641− = lens _mobApplications
3642− (\ s a -> s{_mobApplications = a})
3861+mddApplications :: Lens' MobileDevice [MobileDeviceApplications]
3862+mddApplications
3863+ = lens _mddApplications
3864+ (\ s a -> s{_mddApplications = a})
36433865 . _Default
36443866 . _Coerce
36453867
36463868-- | The default locale used on the Mobile Device (Read-only)
3647−mobDefaultLanguage :: Lens' MobileDevice (Maybe Text)
3648−mobDefaultLanguage
3649− = lens _mobDefaultLanguage
3650− (\ s a -> s{_mobDefaultLanguage = a})
3869+mddDefaultLanguage :: Lens' MobileDevice (Maybe Text)
3870+mddDefaultLanguage
3871+ = lens _mddDefaultLanguage
3872+ (\ s a -> s{_mddDefaultLanguage = a})
36513873
36523874instance FromJSON MobileDevice where
36533875 parseJSON
@@ -3689,40 +3911,40 @@ instance ToJSON MobileDevice where
36893911 toJSON MobileDevice{..}
36903912 = object
36913913 (catMaybes
3692− [("email" .=) <$> _mobEmail,
3693− ("status" .=) <$> _mobStatus,
3694− ("etag" .=) <$> _mobEtag,
3695− ("resourceId" .=) <$> _mobResourceId,
3696− ("buildNumber" .=) <$> _mobBuildNumber,
3914+ [("email" .=) <$> _mddEmail,
3915+ ("status" .=) <$> _mddStatus,
3916+ ("etag" .=) <$> _mddEtag,
3917+ ("resourceId" .=) <$> _mddResourceId,
3918+ ("buildNumber" .=) <$> _mddBuildNumber,
36973919 ("managedAccountIsOnOwnerProfile" .=) <$>
3698− _mobManagedAccountIsOnOwnerProfile,
3699− ("lastSync" .=) <$> _mobLastSync,
3700− ("otherAccountsInfo" .=) <$> _mobOtherAccountsInfo,
3701− Just ("kind" .= _mobKind),
3702− ("adbStatus" .=) <$> _mobAdbStatus,
3703− ("networkOperator" .=) <$> _mobNetworkOperator,
3704− ("kernelVersion" .=) <$> _mobKernelVersion,
3705− ("os" .=) <$> _mobOs, ("name" .=) <$> _mobName,
3706− ("model" .=) <$> _mobModel,
3920+ _mddManagedAccountIsOnOwnerProfile,
3921+ ("lastSync" .=) <$> _mddLastSync,
3922+ ("otherAccountsInfo" .=) <$> _mddOtherAccountsInfo,
3923+ Just ("kind" .= _mddKind),
3924+ ("adbStatus" .=) <$> _mddAdbStatus,
3925+ ("networkOperator" .=) <$> _mddNetworkOperator,
3926+ ("kernelVersion" .=) <$> _mddKernelVersion,
3927+ ("os" .=) <$> _mddOs, ("name" .=) <$> _mddName,
3928+ ("model" .=) <$> _mddModel,
37073929 ("developerOptionsStatus" .=) <$>
3708− _mobDeveloperOptionsStatus,
3930+ _mddDeveloperOptionsStatus,
37093931 ("unknownSourcesStatus" .=) <$>
3710− _mobUnknownSourcesStatus,
3711− ("meid" .=) <$> _mobMeid,
3712− ("deviceId" .=) <$> _mobDeviceId,
3713− ("firstSync" .=) <$> _mobFirstSync,
3714− ("userAgent" .=) <$> _mobUserAgent,
3715− ("imei" .=) <$> _mobImei, ("type" .=) <$> _mobType,
3716− ("wifiMacAddress" .=) <$> _mobWifiMacAddress,
3717− ("serialNumber" .=) <$> _mobSerialNumber,
3718− ("hardwareId" .=) <$> _mobHardwareId,
3719− ("basebandVersion" .=) <$> _mobBasebandVersion,
3932+ _mddUnknownSourcesStatus,
3933+ ("meid" .=) <$> _mddMeid,
3934+ ("deviceId" .=) <$> _mddDeviceId,
3935+ ("firstSync" .=) <$> _mddFirstSync,
3936+ ("userAgent" .=) <$> _mddUserAgent,
3937+ ("imei" .=) <$> _mddImei, ("type" .=) <$> _mddType,
3938+ ("wifiMacAddress" .=) <$> _mddWifiMacAddress,
3939+ ("serialNumber" .=) <$> _mddSerialNumber,
3940+ ("hardwareId" .=) <$> _mddHardwareId,
3941+ ("basebandVersion" .=) <$> _mddBasebandVersion,
37203942 ("supportsWorkProfile" .=) <$>
3721− _mobSupportsWorkProfile,
3943+ _mddSupportsWorkProfile,
37223944 ("deviceCompromisedStatus" .=) <$>
3723− _mobDeviceCompromisedStatus,
3724− ("applications" .=) <$> _mobApplications,
3725− ("defaultLanguage" .=) <$> _mobDefaultLanguage])
3945+ _mddDeviceCompromisedStatus,
3946+ ("applications" .=) <$> _mddApplications,
3947+ ("defaultLanguage" .=) <$> _mddDefaultLanguage])
37263948
37273949-- | JSON template for a set of custom properties (i.e. all fields in a
37283950-- particular schema)
@@ -3746,6 +3968,63 @@ instance FromJSON UserCustomProperties where
37463968instance ToJSON UserCustomProperties where
37473969 toJSON = const (Object mempty)
37483970
3971+-- | Indexing spec for a numeric field. By default, only exact match queries
3972+-- will be supported for numeric fields. Setting the numericIndexingSpec
3973+-- allows range queries to be supported.
3974+--
3975+-- /See:/ 'schemaFieldSpecNumericIndexingSpec' smart constructor.
3976+data SchemaFieldSpecNumericIndexingSpec = SchemaFieldSpecNumericIndexingSpec
3977+ { _sfsnisMaxValue :: !(Maybe Double)
3978+ , _sfsnisMinValue :: !(Maybe Double)
3979+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
3980+
3981+-- | Creates a value of 'SchemaFieldSpecNumericIndexingSpec' with the minimum fields required to make a request.
3982+--
3983+-- Use one of the following lenses to modify other fields as desired:
3984+--
3985+-- * 'sfsnisMaxValue'
3986+--
3987+-- * 'sfsnisMinValue'
3988+schemaFieldSpecNumericIndexingSpec
3989+ :: SchemaFieldSpecNumericIndexingSpec
3990+schemaFieldSpecNumericIndexingSpec =
3991+ SchemaFieldSpecNumericIndexingSpec
3992+ { _sfsnisMaxValue = Nothing
3993+ , _sfsnisMinValue = Nothing
3994+ }
3995+
3996+-- | Maximum value of this field. This is meant to be indicative rather than
3997+-- enforced. Values outside this range will still be indexed, but search
3998+-- may not be as performant.
3999+sfsnisMaxValue :: Lens' SchemaFieldSpecNumericIndexingSpec (Maybe Double)
4000+sfsnisMaxValue
4001+ = lens _sfsnisMaxValue
4002+ (\ s a -> s{_sfsnisMaxValue = a})
4003+
4004+-- | Minimum value of this field. This is meant to be indicative rather than
4005+-- enforced. Values outside this range will still be indexed, but search
4006+-- may not be as performant.
4007+sfsnisMinValue :: Lens' SchemaFieldSpecNumericIndexingSpec (Maybe Double)
4008+sfsnisMinValue
4009+ = lens _sfsnisMinValue
4010+ (\ s a -> s{_sfsnisMinValue = a})
4011+
4012+instance FromJSON SchemaFieldSpecNumericIndexingSpec
4013+ where
4014+ parseJSON
4015+ = withObject "SchemaFieldSpecNumericIndexingSpec"
4016+ (\ o ->
4017+ SchemaFieldSpecNumericIndexingSpec <$>
4018+ (o .:? "maxValue") <*> (o .:? "minValue"))
4019+
4020+instance ToJSON SchemaFieldSpecNumericIndexingSpec
4021+ where
4022+ toJSON SchemaFieldSpecNumericIndexingSpec{..}
4023+ = object
4024+ (catMaybes
4025+ [("maxValue" .=) <$> _sfsnisMaxValue,
4026+ ("minValue" .=) <$> _sfsnisMinValue])
4027+
37494028-- | JSON request template for firing commands on Mobile Device in Directory
37504029-- Devices API.
37514030--
gogol-admin-directory/gen/Network/Google/AdminDirectory/Types/Sum.hs+867
@@ -16,3 +16,870 @@
1616module Network.Google.AdminDirectory.Types.Sum where
1717
1818import Network.Google.Prelude
19+
20+-- | Whether to fetch the ADMIN_VIEW or DOMAIN_PUBLIC view of the user.
21+data DirectoryUsersListViewType
22+ = AdminView
23+ -- ^ @admin_view@
24+ -- Fetches the ADMIN_VIEW of the user.
25+ | DomainPublic
26+ -- ^ @domain_public@
27+ -- Fetches the DOMAIN_PUBLIC view of the user.
28+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
29+
30+instance Hashable DirectoryUsersListViewType
31+
32+instance FromText DirectoryUsersListViewType where
33+ fromText = \case
34+ "admin_view" -> Just AdminView
35+ "domain_public" -> Just DomainPublic
36+ _ -> Nothing
37+
38+instance ToText DirectoryUsersListViewType where
39+ toText = \case
40+ AdminView -> "admin_view"
41+ DomainPublic -> "domain_public"
42+
43+instance FromJSON DirectoryUsersListViewType where
44+ parseJSON = parseJSONText "DirectoryUsersListViewType"
45+
46+instance ToJSON DirectoryUsersListViewType where
47+ toJSON = toJSONText
48+
49+-- | Restrict information returned to a set of selected fields.
50+data DirectoryChromeosdevicesListProjection
51+ = Basic
52+ -- ^ @BASIC@
53+ -- Includes only the basic metadata fields (e.g., deviceId, serialNumber,
54+ -- status, and user)
55+ | Full
56+ -- ^ @FULL@
57+ -- Includes all metadata fields
58+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
59+
60+instance Hashable DirectoryChromeosdevicesListProjection
61+
62+instance FromText DirectoryChromeosdevicesListProjection where
63+ fromText = \case
64+ "BASIC" -> Just Basic
65+ "FULL" -> Just Full
66+ _ -> Nothing
67+
68+instance ToText DirectoryChromeosdevicesListProjection where
69+ toText = \case
70+ Basic -> "BASIC"
71+ Full -> "FULL"
72+
73+instance FromJSON DirectoryChromeosdevicesListProjection where
74+ parseJSON = parseJSONText "DirectoryChromeosdevicesListProjection"
75+
76+instance ToJSON DirectoryChromeosdevicesListProjection where
77+ toJSON = toJSONText
78+
79+-- | Column to use for sorting results
80+data DirectoryUsersWatchOrderBy
81+ = Email
82+ -- ^ @email@
83+ -- Primary email of the user.
84+ | FamilyName
85+ -- ^ @familyName@
86+ -- User\'s family name.
87+ | GivenName
88+ -- ^ @givenName@
89+ -- User\'s given name.
90+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
91+
92+instance Hashable DirectoryUsersWatchOrderBy
93+
94+instance FromText DirectoryUsersWatchOrderBy where
95+ fromText = \case
96+ "email" -> Just Email
97+ "familyName" -> Just FamilyName
98+ "givenName" -> Just GivenName
99+ _ -> Nothing
100+
101+instance ToText DirectoryUsersWatchOrderBy where
102+ toText = \case
103+ Email -> "email"
104+ FamilyName -> "familyName"
105+ GivenName -> "givenName"
106+
107+instance FromJSON DirectoryUsersWatchOrderBy where
108+ parseJSON = parseJSONText "DirectoryUsersWatchOrderBy"
109+
110+instance ToJSON DirectoryUsersWatchOrderBy where
111+ toJSON = toJSONText
112+
113+-- | Whether to fetch the ADMIN_VIEW or DOMAIN_PUBLIC view of the user.
114+data DirectoryUsersWatchViewType
115+ = DUWVTAdminView
116+ -- ^ @admin_view@
117+ -- Fetches the ADMIN_VIEW of the user.
118+ | DUWVTDomainPublic
119+ -- ^ @domain_public@
120+ -- Fetches the DOMAIN_PUBLIC view of the user.
121+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
122+
123+instance Hashable DirectoryUsersWatchViewType
124+
125+instance FromText DirectoryUsersWatchViewType where
126+ fromText = \case
127+ "admin_view" -> Just DUWVTAdminView
128+ "domain_public" -> Just DUWVTDomainPublic
129+ _ -> Nothing
130+
131+instance ToText DirectoryUsersWatchViewType where
132+ toText = \case
133+ DUWVTAdminView -> "admin_view"
134+ DUWVTDomainPublic -> "domain_public"
135+
136+instance FromJSON DirectoryUsersWatchViewType where
137+ parseJSON = parseJSONText "DirectoryUsersWatchViewType"
138+
139+instance ToJSON DirectoryUsersWatchViewType where
140+ toJSON = toJSONText
141+
142+-- | Column to use for sorting results
143+data DirectoryMobiledevicesListOrderBy
144+ = DMLOBDeviceId
145+ -- ^ @deviceId@
146+ -- Mobile Device serial number.
147+ | DMLOBEmail
148+ -- ^ @email@
149+ -- Owner user email.
150+ | DMLOBLastSync
151+ -- ^ @lastSync@
152+ -- Last policy settings sync date time of the device.
153+ | DMLOBModel
154+ -- ^ @model@
155+ -- Mobile Device model.
156+ | DMLOBName
157+ -- ^ @name@
158+ -- Owner user name.
159+ | DMLOBOS
160+ -- ^ @os@
161+ -- Mobile operating system.
162+ | DMLOBStatus
163+ -- ^ @status@
164+ -- Status of the device.
165+ | DMLOBType
166+ -- ^ @type@
167+ -- Type of the device.
168+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
169+
170+instance Hashable DirectoryMobiledevicesListOrderBy
171+
172+instance FromText DirectoryMobiledevicesListOrderBy where
173+ fromText = \case
174+ "deviceId" -> Just DMLOBDeviceId
175+ "email" -> Just DMLOBEmail
176+ "lastSync" -> Just DMLOBLastSync
177+ "model" -> Just DMLOBModel
178+ "name" -> Just DMLOBName
179+ "os" -> Just DMLOBOS
180+ "status" -> Just DMLOBStatus
181+ "type" -> Just DMLOBType
182+ _ -> Nothing
183+
184+instance ToText DirectoryMobiledevicesListOrderBy where
185+ toText = \case
186+ DMLOBDeviceId -> "deviceId"
187+ DMLOBEmail -> "email"
188+ DMLOBLastSync -> "lastSync"
189+ DMLOBModel -> "model"
190+ DMLOBName -> "name"
191+ DMLOBOS -> "os"
192+ DMLOBStatus -> "status"
193+ DMLOBType -> "type"
194+
195+instance FromJSON DirectoryMobiledevicesListOrderBy where
196+ parseJSON = parseJSONText "DirectoryMobiledevicesListOrderBy"
197+
198+instance ToJSON DirectoryMobiledevicesListOrderBy where
199+ toJSON = toJSONText
200+
201+-- | Whether to return results in ascending or descending order.
202+data DirectoryUsersListSortOrder
203+ = Ascending
204+ -- ^ @ASCENDING@
205+ -- Ascending order.
206+ | Descending
207+ -- ^ @DESCENDING@
208+ -- Descending order.
209+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
210+
211+instance Hashable DirectoryUsersListSortOrder
212+
213+instance FromText DirectoryUsersListSortOrder where
214+ fromText = \case
215+ "ASCENDING" -> Just Ascending
216+ "DESCENDING" -> Just Descending
217+ _ -> Nothing
218+
219+instance ToText DirectoryUsersListSortOrder where
220+ toText = \case
221+ Ascending -> "ASCENDING"
222+ Descending -> "DESCENDING"
223+
224+instance FromJSON DirectoryUsersListSortOrder where
225+ parseJSON = parseJSONText "DirectoryUsersListSortOrder"
226+
227+instance ToJSON DirectoryUsersListSortOrder where
228+ toJSON = toJSONText
229+
230+-- | Event on which subscription is intended (if subscribing)
231+data DirectoryUsersAliasesListEvent
232+ = Add
233+ -- ^ @add@
234+ -- Alias Created Event
235+ | Delete
236+ -- ^ @delete@
237+ -- Alias Deleted Event
238+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
239+
240+instance Hashable DirectoryUsersAliasesListEvent
241+
242+instance FromText DirectoryUsersAliasesListEvent where
243+ fromText = \case
244+ "add" -> Just Add
245+ "delete" -> Just Delete
246+ _ -> Nothing
247+
248+instance ToText DirectoryUsersAliasesListEvent where
249+ toText = \case
250+ Add -> "add"
251+ Delete -> "delete"
252+
253+instance FromJSON DirectoryUsersAliasesListEvent where
254+ parseJSON = parseJSONText "DirectoryUsersAliasesListEvent"
255+
256+instance ToJSON DirectoryUsersAliasesListEvent where
257+ toJSON = toJSONText
258+
259+-- | Whether to fetch the ADMIN_VIEW or DOMAIN_PUBLIC view of the user.
260+data DirectoryUsersGetViewType
261+ = DUGVTAdminView
262+ -- ^ @admin_view@
263+ -- Fetches the ADMIN_VIEW of the user.
264+ | DUGVTDomainPublic
265+ -- ^ @domain_public@
266+ -- Fetches the DOMAIN_PUBLIC view of the user.
267+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
268+
269+instance Hashable DirectoryUsersGetViewType
270+
271+instance FromText DirectoryUsersGetViewType where
272+ fromText = \case
273+ "admin_view" -> Just DUGVTAdminView
274+ "domain_public" -> Just DUGVTDomainPublic
275+ _ -> Nothing
276+
277+instance ToText DirectoryUsersGetViewType where
278+ toText = \case
279+ DUGVTAdminView -> "admin_view"
280+ DUGVTDomainPublic -> "domain_public"
281+
282+instance FromJSON DirectoryUsersGetViewType where
283+ parseJSON = parseJSONText "DirectoryUsersGetViewType"
284+
285+instance ToJSON DirectoryUsersGetViewType where
286+ toJSON = toJSONText
287+
288+-- | Event on which subscription is intended (if subscribing)
289+data DirectoryUsersAliasesWatchEvent
290+ = DUAWEAdd
291+ -- ^ @add@
292+ -- Alias Created Event
293+ | DUAWEDelete
294+ -- ^ @delete@
295+ -- Alias Deleted Event
296+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
297+
298+instance Hashable DirectoryUsersAliasesWatchEvent
299+
300+instance FromText DirectoryUsersAliasesWatchEvent where
301+ fromText = \case
302+ "add" -> Just DUAWEAdd
303+ "delete" -> Just DUAWEDelete
304+ _ -> Nothing
305+
306+instance ToText DirectoryUsersAliasesWatchEvent where
307+ toText = \case
308+ DUAWEAdd -> "add"
309+ DUAWEDelete -> "delete"
310+
311+instance FromJSON DirectoryUsersAliasesWatchEvent where
312+ parseJSON = parseJSONText "DirectoryUsersAliasesWatchEvent"
313+
314+instance ToJSON DirectoryUsersAliasesWatchEvent where
315+ toJSON = toJSONText
316+
317+-- | Whether to return results in ascending or descending order.
318+data DirectoryUsersWatchSortOrder
319+ = DUWSOAscending
320+ -- ^ @ASCENDING@
321+ -- Ascending order.
322+ | DUWSODescending
323+ -- ^ @DESCENDING@
324+ -- Descending order.
325+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
326+
327+instance Hashable DirectoryUsersWatchSortOrder
328+
329+instance FromText DirectoryUsersWatchSortOrder where
330+ fromText = \case
331+ "ASCENDING" -> Just DUWSOAscending
332+ "DESCENDING" -> Just DUWSODescending
333+ _ -> Nothing
334+
335+instance ToText DirectoryUsersWatchSortOrder where
336+ toText = \case
337+ DUWSOAscending -> "ASCENDING"
338+ DUWSODescending -> "DESCENDING"
339+
340+instance FromJSON DirectoryUsersWatchSortOrder where
341+ parseJSON = parseJSONText "DirectoryUsersWatchSortOrder"
342+
343+instance ToJSON DirectoryUsersWatchSortOrder where
344+ toJSON = toJSONText
345+
346+-- | Restrict information returned to a set of selected fields.
347+data DirectoryMobiledevicesGetProjection
348+ = DMGPBasic
349+ -- ^ @BASIC@
350+ -- Includes only the basic metadata fields (e.g., deviceId, model, status,
351+ -- type, and status)
352+ | DMGPFull
353+ -- ^ @FULL@
354+ -- Includes all metadata fields
355+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
356+
357+instance Hashable DirectoryMobiledevicesGetProjection
358+
359+instance FromText DirectoryMobiledevicesGetProjection where
360+ fromText = \case
361+ "BASIC" -> Just DMGPBasic
362+ "FULL" -> Just DMGPFull
363+ _ -> Nothing
364+
365+instance ToText DirectoryMobiledevicesGetProjection where
366+ toText = \case
367+ DMGPBasic -> "BASIC"
368+ DMGPFull -> "FULL"
369+
370+instance FromJSON DirectoryMobiledevicesGetProjection where
371+ parseJSON = parseJSONText "DirectoryMobiledevicesGetProjection"
372+
373+instance ToJSON DirectoryMobiledevicesGetProjection where
374+ toJSON = toJSONText
375+
376+-- | Whether to return results in ascending or descending order. Only of use
377+-- when orderBy is also used
378+data DirectoryMobiledevicesListSortOrder
379+ = DMLSOAscending
380+ -- ^ @ASCENDING@
381+ -- Ascending order.
382+ | DMLSODescending
383+ -- ^ @DESCENDING@
384+ -- Descending order.
385+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
386+
387+instance Hashable DirectoryMobiledevicesListSortOrder
388+
389+instance FromText DirectoryMobiledevicesListSortOrder where
390+ fromText = \case
391+ "ASCENDING" -> Just DMLSOAscending
392+ "DESCENDING" -> Just DMLSODescending
393+ _ -> Nothing
394+
395+instance ToText DirectoryMobiledevicesListSortOrder where
396+ toText = \case
397+ DMLSOAscending -> "ASCENDING"
398+ DMLSODescending -> "DESCENDING"
399+
400+instance FromJSON DirectoryMobiledevicesListSortOrder where
401+ parseJSON = parseJSONText "DirectoryMobiledevicesListSortOrder"
402+
403+instance ToJSON DirectoryMobiledevicesListSortOrder where
404+ toJSON = toJSONText
405+
406+-- | Column to use for sorting results
407+data DirectoryUsersListOrderBy
408+ = DULOBEmail
409+ -- ^ @email@
410+ -- Primary email of the user.
411+ | DULOBFamilyName
412+ -- ^ @familyName@
413+ -- User\'s family name.
414+ | DULOBGivenName
415+ -- ^ @givenName@
416+ -- User\'s given name.
417+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
418+
419+instance Hashable DirectoryUsersListOrderBy
420+
421+instance FromText DirectoryUsersListOrderBy where
422+ fromText = \case
423+ "email" -> Just DULOBEmail
424+ "familyName" -> Just DULOBFamilyName
425+ "givenName" -> Just DULOBGivenName
426+ _ -> Nothing
427+
428+instance ToText DirectoryUsersListOrderBy where
429+ toText = \case
430+ DULOBEmail -> "email"
431+ DULOBFamilyName -> "familyName"
432+ DULOBGivenName -> "givenName"
433+
434+instance FromJSON DirectoryUsersListOrderBy where
435+ parseJSON = parseJSONText "DirectoryUsersListOrderBy"
436+
437+instance ToJSON DirectoryUsersListOrderBy where
438+ toJSON = toJSONText
439+
440+-- | Whether to return all sub-organizations or just immediate children
441+data DirectoryOrgunitsListType
442+ = All
443+ -- ^ @all@
444+ -- All sub-organization units.
445+ | Children
446+ -- ^ @children@
447+ -- Immediate children only (default).
448+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
449+
450+instance Hashable DirectoryOrgunitsListType
451+
452+instance FromText DirectoryOrgunitsListType where
453+ fromText = \case
454+ "all" -> Just All
455+ "children" -> Just Children
456+ _ -> Nothing
457+
458+instance ToText DirectoryOrgunitsListType where
459+ toText = \case
460+ All -> "all"
461+ Children -> "children"
462+
463+instance FromJSON DirectoryOrgunitsListType where
464+ parseJSON = parseJSONText "DirectoryOrgunitsListType"
465+
466+instance ToJSON DirectoryOrgunitsListType where
467+ toJSON = toJSONText
468+
469+-- | What subset of fields to fetch for this user.
470+data DirectoryUsersListProjection
471+ = DULPBasic
472+ -- ^ @basic@
473+ -- Do not include any custom fields for the user.
474+ | DULPCustom
475+ -- ^ @custom@
476+ -- Include custom fields from schemas mentioned in customFieldMask.
477+ | DULPFull
478+ -- ^ @full@
479+ -- Include all fields associated with this user.
480+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
481+
482+instance Hashable DirectoryUsersListProjection
483+
484+instance FromText DirectoryUsersListProjection where
485+ fromText = \case
486+ "basic" -> Just DULPBasic
487+ "custom" -> Just DULPCustom
488+ "full" -> Just DULPFull
489+ _ -> Nothing
490+
491+instance ToText DirectoryUsersListProjection where
492+ toText = \case
493+ DULPBasic -> "basic"
494+ DULPCustom -> "custom"
495+ DULPFull -> "full"
496+
497+instance FromJSON DirectoryUsersListProjection where
498+ parseJSON = parseJSONText "DirectoryUsersListProjection"
499+
500+instance ToJSON DirectoryUsersListProjection where
501+ toJSON = toJSONText
502+
503+-- | Restrict information returned to a set of selected fields.
504+data DirectoryChromeosdevicesUpdateProjection
505+ = DCUPBasic
506+ -- ^ @BASIC@
507+ -- Includes only the basic metadata fields (e.g., deviceId, serialNumber,
508+ -- status, and user)
509+ | DCUPFull
510+ -- ^ @FULL@
511+ -- Includes all metadata fields
512+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
513+
514+instance Hashable DirectoryChromeosdevicesUpdateProjection
515+
516+instance FromText DirectoryChromeosdevicesUpdateProjection where
517+ fromText = \case
518+ "BASIC" -> Just DCUPBasic
519+ "FULL" -> Just DCUPFull
520+ _ -> Nothing
521+
522+instance ToText DirectoryChromeosdevicesUpdateProjection where
523+ toText = \case
524+ DCUPBasic -> "BASIC"
525+ DCUPFull -> "FULL"
526+
527+instance FromJSON DirectoryChromeosdevicesUpdateProjection where
528+ parseJSON = parseJSONText "DirectoryChromeosdevicesUpdateProjection"
529+
530+instance ToJSON DirectoryChromeosdevicesUpdateProjection where
531+ toJSON = toJSONText
532+
533+-- | What subset of fields to fetch for this user.
534+data DirectoryUsersWatchProjection
535+ = DUWPBasic
536+ -- ^ @basic@
537+ -- Do not include any custom fields for the user.
538+ | DUWPCustom
539+ -- ^ @custom@
540+ -- Include custom fields from schemas mentioned in customFieldMask.
541+ | DUWPFull
542+ -- ^ @full@
543+ -- Include all fields associated with this user.
544+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
545+
546+instance Hashable DirectoryUsersWatchProjection
547+
548+instance FromText DirectoryUsersWatchProjection where
549+ fromText = \case
550+ "basic" -> Just DUWPBasic
551+ "custom" -> Just DUWPCustom
552+ "full" -> Just DUWPFull
553+ _ -> Nothing
554+
555+instance ToText DirectoryUsersWatchProjection where
556+ toText = \case
557+ DUWPBasic -> "basic"
558+ DUWPCustom -> "custom"
559+ DUWPFull -> "full"
560+
561+instance FromJSON DirectoryUsersWatchProjection where
562+ parseJSON = parseJSONText "DirectoryUsersWatchProjection"
563+
564+instance ToJSON DirectoryUsersWatchProjection where
565+ toJSON = toJSONText
566+
567+-- | Column to use for sorting results
568+data DirectoryChromeosdevicesListOrderBy
569+ = AnnotatedLocation
570+ -- ^ @annotatedLocation@
571+ -- Chromebook location as annotated by the administrator.
572+ | AnnotatedUser
573+ -- ^ @annotatedUser@
574+ -- Chromebook user as annotated by administrator.
575+ | LastSync
576+ -- ^ @lastSync@
577+ -- Chromebook last sync.
578+ | Notes
579+ -- ^ @notes@
580+ -- Chromebook notes as annotated by the administrator.
581+ | SerialNumber
582+ -- ^ @serialNumber@
583+ -- Chromebook Serial Number.
584+ | Status
585+ -- ^ @status@
586+ -- Chromebook status.
587+ | SupportEndDate
588+ -- ^ @supportEndDate@
589+ -- Chromebook support end date.
590+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
591+
592+instance Hashable DirectoryChromeosdevicesListOrderBy
593+
594+instance FromText DirectoryChromeosdevicesListOrderBy where
595+ fromText = \case
596+ "annotatedLocation" -> Just AnnotatedLocation
597+ "annotatedUser" -> Just AnnotatedUser
598+ "lastSync" -> Just LastSync
599+ "notes" -> Just Notes
600+ "serialNumber" -> Just SerialNumber
601+ "status" -> Just Status
602+ "supportEndDate" -> Just SupportEndDate
603+ _ -> Nothing
604+
605+instance ToText DirectoryChromeosdevicesListOrderBy where
606+ toText = \case
607+ AnnotatedLocation -> "annotatedLocation"
608+ AnnotatedUser -> "annotatedUser"
609+ LastSync -> "lastSync"
610+ Notes -> "notes"
611+ SerialNumber -> "serialNumber"
612+ Status -> "status"
613+ SupportEndDate -> "supportEndDate"
614+
615+instance FromJSON DirectoryChromeosdevicesListOrderBy where
616+ parseJSON = parseJSONText "DirectoryChromeosdevicesListOrderBy"
617+
618+instance ToJSON DirectoryChromeosdevicesListOrderBy where
619+ toJSON = toJSONText
620+
621+-- | Event on which subscription is intended (if subscribing)
622+data DirectoryUsersListEvent
623+ = DULEAdd
624+ -- ^ @add@
625+ -- User Created Event
626+ | DULEDelete
627+ -- ^ @delete@
628+ -- User Deleted Event
629+ | DULEMakeAdmin
630+ -- ^ @makeAdmin@
631+ -- User Admin Status Change Event
632+ | DULEUndelete
633+ -- ^ @undelete@
634+ -- User Undeleted Event
635+ | DULEUpdate
636+ -- ^ @update@
637+ -- User Updated Event
638+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
639+
640+instance Hashable DirectoryUsersListEvent
641+
642+instance FromText DirectoryUsersListEvent where
643+ fromText = \case
644+ "add" -> Just DULEAdd
645+ "delete" -> Just DULEDelete
646+ "makeAdmin" -> Just DULEMakeAdmin
647+ "undelete" -> Just DULEUndelete
648+ "update" -> Just DULEUpdate
649+ _ -> Nothing
650+
651+instance ToText DirectoryUsersListEvent where
652+ toText = \case
653+ DULEAdd -> "add"
654+ DULEDelete -> "delete"
655+ DULEMakeAdmin -> "makeAdmin"
656+ DULEUndelete -> "undelete"
657+ DULEUpdate -> "update"
658+
659+instance FromJSON DirectoryUsersListEvent where
660+ parseJSON = parseJSONText "DirectoryUsersListEvent"
661+
662+instance ToJSON DirectoryUsersListEvent where
663+ toJSON = toJSONText
664+
665+-- | Restrict information returned to a set of selected fields.
666+data DirectoryMobiledevicesListProjection
667+ = DMLPBasic
668+ -- ^ @BASIC@
669+ -- Includes only the basic metadata fields (e.g., deviceId, model, status,
670+ -- type, and status)
671+ | DMLPFull
672+ -- ^ @FULL@
673+ -- Includes all metadata fields
674+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
675+
676+instance Hashable DirectoryMobiledevicesListProjection
677+
678+instance FromText DirectoryMobiledevicesListProjection where
679+ fromText = \case
680+ "BASIC" -> Just DMLPBasic
681+ "FULL" -> Just DMLPFull
682+ _ -> Nothing
683+
684+instance ToText DirectoryMobiledevicesListProjection where
685+ toText = \case
686+ DMLPBasic -> "BASIC"
687+ DMLPFull -> "FULL"
688+
689+instance FromJSON DirectoryMobiledevicesListProjection where
690+ parseJSON = parseJSONText "DirectoryMobiledevicesListProjection"
691+
692+instance ToJSON DirectoryMobiledevicesListProjection where
693+ toJSON = toJSONText
694+
695+-- | What subset of fields to fetch for this user.
696+data DirectoryUsersGetProjection
697+ = DUGPBasic
698+ -- ^ @basic@
699+ -- Do not include any custom fields for the user.
700+ | DUGPCustom
701+ -- ^ @custom@
702+ -- Include custom fields from schemas mentioned in customFieldMask.
703+ | DUGPFull
704+ -- ^ @full@
705+ -- Include all fields associated with this user.
706+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
707+
708+instance Hashable DirectoryUsersGetProjection
709+
710+instance FromText DirectoryUsersGetProjection where
711+ fromText = \case
712+ "basic" -> Just DUGPBasic
713+ "custom" -> Just DUGPCustom
714+ "full" -> Just DUGPFull
715+ _ -> Nothing
716+
717+instance ToText DirectoryUsersGetProjection where
718+ toText = \case
719+ DUGPBasic -> "basic"
720+ DUGPCustom -> "custom"
721+ DUGPFull -> "full"
722+
723+instance FromJSON DirectoryUsersGetProjection where
724+ parseJSON = parseJSONText "DirectoryUsersGetProjection"
725+
726+instance ToJSON DirectoryUsersGetProjection where
727+ toJSON = toJSONText
728+
729+-- | Restrict information returned to a set of selected fields.
730+data DirectoryChromeosdevicesGetProjection
731+ = DCGPBasic
732+ -- ^ @BASIC@
733+ -- Includes only the basic metadata fields (e.g., deviceId, serialNumber,
734+ -- status, and user)
735+ | DCGPFull
736+ -- ^ @FULL@
737+ -- Includes all metadata fields
738+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
739+
740+instance Hashable DirectoryChromeosdevicesGetProjection
741+
742+instance FromText DirectoryChromeosdevicesGetProjection where
743+ fromText = \case
744+ "BASIC" -> Just DCGPBasic
745+ "FULL" -> Just DCGPFull
746+ _ -> Nothing
747+
748+instance ToText DirectoryChromeosdevicesGetProjection where
749+ toText = \case
750+ DCGPBasic -> "BASIC"
751+ DCGPFull -> "FULL"
752+
753+instance FromJSON DirectoryChromeosdevicesGetProjection where
754+ parseJSON = parseJSONText "DirectoryChromeosdevicesGetProjection"
755+
756+instance ToJSON DirectoryChromeosdevicesGetProjection where
757+ toJSON = toJSONText
758+
759+-- | Restrict information returned to a set of selected fields.
760+data DirectoryChromeosdevicesPatchProjection
761+ = DCPPBasic
762+ -- ^ @BASIC@
763+ -- Includes only the basic metadata fields (e.g., deviceId, serialNumber,
764+ -- status, and user)
765+ | DCPPFull
766+ -- ^ @FULL@
767+ -- Includes all metadata fields
768+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
769+
770+instance Hashable DirectoryChromeosdevicesPatchProjection
771+
772+instance FromText DirectoryChromeosdevicesPatchProjection where
773+ fromText = \case
774+ "BASIC" -> Just DCPPBasic
775+ "FULL" -> Just DCPPFull
776+ _ -> Nothing
777+
778+instance ToText DirectoryChromeosdevicesPatchProjection where
779+ toText = \case
780+ DCPPBasic -> "BASIC"
781+ DCPPFull -> "FULL"
782+
783+instance FromJSON DirectoryChromeosdevicesPatchProjection where
784+ parseJSON = parseJSONText "DirectoryChromeosdevicesPatchProjection"
785+
786+instance ToJSON DirectoryChromeosdevicesPatchProjection where
787+ toJSON = toJSONText
788+
789+-- | Event on which subscription is intended (if subscribing)
790+data DirectoryUsersWatchEvent
791+ = DUWEAdd
792+ -- ^ @add@
793+ -- User Created Event
794+ | DUWEDelete
795+ -- ^ @delete@
796+ -- User Deleted Event
797+ | DUWEMakeAdmin
798+ -- ^ @makeAdmin@
799+ -- User Admin Status Change Event
800+ | DUWEUndelete
801+ -- ^ @undelete@
802+ -- User Undeleted Event
803+ | DUWEUpdate
804+ -- ^ @update@
805+ -- User Updated Event
806+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
807+
808+instance Hashable DirectoryUsersWatchEvent
809+
810+instance FromText DirectoryUsersWatchEvent where
811+ fromText = \case
812+ "add" -> Just DUWEAdd
813+ "delete" -> Just DUWEDelete
814+ "makeAdmin" -> Just DUWEMakeAdmin
815+ "undelete" -> Just DUWEUndelete
816+ "update" -> Just DUWEUpdate
817+ _ -> Nothing
818+
819+instance ToText DirectoryUsersWatchEvent where
820+ toText = \case
821+ DUWEAdd -> "add"
822+ DUWEDelete -> "delete"
823+ DUWEMakeAdmin -> "makeAdmin"
824+ DUWEUndelete -> "undelete"
825+ DUWEUpdate -> "update"
826+
827+instance FromJSON DirectoryUsersWatchEvent where
828+ parseJSON = parseJSONText "DirectoryUsersWatchEvent"
829+
830+instance ToJSON DirectoryUsersWatchEvent where
831+ toJSON = toJSONText
832+
833+-- | Whether to return results in ascending or descending order. Only of use
834+-- when orderBy is also used
835+data DirectoryChromeosdevicesListSortOrder
836+ = DCLSOAscending
837+ -- ^ @ASCENDING@
838+ -- Ascending order.
839+ | DCLSODescending
840+ -- ^ @DESCENDING@
841+ -- Descending order.
842+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
843+
844+instance Hashable DirectoryChromeosdevicesListSortOrder
845+
846+instance FromText DirectoryChromeosdevicesListSortOrder where
847+ fromText = \case
848+ "ASCENDING" -> Just DCLSOAscending
849+ "DESCENDING" -> Just DCLSODescending
850+ _ -> Nothing
851+
852+instance ToText DirectoryChromeosdevicesListSortOrder where
853+ toText = \case
854+ DCLSOAscending -> "ASCENDING"
855+ DCLSODescending -> "DESCENDING"
856+
857+instance FromJSON DirectoryChromeosdevicesListSortOrder where
858+ parseJSON = parseJSONText "DirectoryChromeosdevicesListSortOrder"
859+
860+instance ToJSON DirectoryChromeosdevicesListSortOrder where
861+ toJSON = toJSONText
862+
863+-- | Data format for the response.
864+data Alt
865+ = JSON
866+ -- ^ @json@
867+ -- Responses with Content-Type of application\/json
868+ deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
869+
870+instance Hashable Alt
871+
872+instance FromText Alt where
873+ fromText = \case
874+ "json" -> Just JSON
875+ _ -> Nothing
876+
877+instance ToText Alt where
878+ toText = \case
879+ JSON -> "json"
880+
881+instance FromJSON Alt where
882+ parseJSON = parseJSONText "Alt"
883+
884+instance ToJSON Alt where
885+ toJSON = toJSONText
gogol-admin-directory/gen/Network/Google/Resource/Admin/Channels/Stop.hs+32−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Stop watching resources through this channel
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @AdminChannelsStop@.
22−module Admin.Channels.Stop
23+module Network.Google.Resource.Admin.Channels.Stop
2324 (
2425 -- * REST Resource
25− ChannelsStopAPI
26+ ChannelsStopResource
2627
2728 -- * Creating a Request
28− , channelsStop
29− , ChannelsStop
29+ , channelsStop'
30+ , ChannelsStop'
3031
3132 -- * Request Lenses
3233 , csQuotaUser
@@ -42,23 +43,31 @@ import Network.Google.AdminDirectory.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @AdminChannelsStop@ which the
45−-- 'ChannelsStop' request conforms to.
46−type ChannelsStopAPI =
46+-- 'ChannelsStop'' request conforms to.
47+type ChannelsStopResource =
4748 "admin" :>
4849 "directory_v1" :>
49− "channels" :> "stop" :> Post '[JSON] ()
50+ "channels" :>
51+ "stop" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Post '[JSON] ()
5059
5160-- | Stop watching resources through this channel
5261--
53−-- /See:/ 'channelsStop' smart constructor.
54−data ChannelsStop = ChannelsStop
62+-- /See:/ 'channelsStop'' smart constructor.
63+data ChannelsStop' = ChannelsStop'
5564 { _csQuotaUser :: !(Maybe Text)
5665 , _csPrettyPrint :: !Bool
5766 , _csUserIp :: !(Maybe Text)
5867 , _csKey :: !(Maybe Text)
5968 , _csOauthToken :: !(Maybe Text)
6069 , _csFields :: !(Maybe Text)
61− , _csAlt :: !Text
70+ , _csAlt :: !Alt
6271 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6372
6473-- | Creates a value of 'ChannelsStop'' with the minimum fields required to make a request.
@@ -78,17 +87,17 @@ data ChannelsStop = ChannelsStop
7887-- * 'csFields'
7988--
8089-- * 'csAlt'
81−channelsStop
82− :: ChannelsStop
83−channelsStop =
84− ChannelsStop
90+channelsStop'
91+ :: ChannelsStop'
92+channelsStop' =
93+ ChannelsStop'
8594 { _csQuotaUser = Nothing
8695 , _csPrettyPrint = True
8796 , _csUserIp = Nothing
8897 , _csKey = Nothing
8998 , _csOauthToken = Nothing
9099 , _csFields = Nothing
91− , _csAlt = "json"
100+ , _csAlt = JSON
92101 }
93102
94103-- | Available to use for quota purposes for server-side applications. Can be
@@ -125,17 +134,20 @@ csFields :: Lens' ChannelsStop' (Maybe Text)
125134csFields = lens _csFields (\ s a -> s{_csFields = a})
126135
127136-- | Data format for the response.
128−csAlt :: Lens' ChannelsStop' Text
137+csAlt :: Lens' ChannelsStop' Alt
129138csAlt = lens _csAlt (\ s a -> s{_csAlt = a})
130139
131140instance GoogleRequest ChannelsStop' where
132141 type Rs ChannelsStop' = ()
133142 request = requestWithRoute defReq adminDirectoryURL
134− requestWithRoute r u ChannelsStop{..}
135− = go _csQuotaUser _csPrettyPrint _csUserIp _csKey
143+ requestWithRoute r u ChannelsStop'{..}
144+ = go _csQuotaUser (Just _csPrettyPrint) _csUserIp
145+ _csKey
136146 _csOauthToken
137147 _csFields
138− _csAlt
148+ (Just _csAlt)
139149 where go
140− = clientWithRoute (Proxy :: Proxy ChannelsStopAPI) r
150+ = clientWithRoute
151+ (Proxy :: Proxy ChannelsStopResource)
152+ r
141153 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/Delete.hs+32−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Delete an ASP issued by a user.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryAspsDelete@.
22−module Directory.Asps.Delete
23+module Network.Google.Resource.Directory.Asps.Delete
2324 (
2425 -- * REST Resource
25− AspsDeleteAPI
26+ AspsDeleteResource
2627
2728 -- * Creating a Request
28− , aspsDelete
29− , AspsDelete
29+ , aspsDelete'
30+ , AspsDelete'
3031
3132 -- * Request Lenses
3233 , adQuotaUser
@@ -44,16 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryAspsDelete@ which the
47−-- 'AspsDelete' request conforms to.
48−type AspsDeleteAPI =
48+-- 'AspsDelete'' request conforms to.
49+type AspsDeleteResource =
4950 "users" :>
5051 Capture "userKey" Text :>
51− "asps" :> Capture "codeId" Int32 :> Delete '[JSON] ()
52+ "asps" :>
53+ Capture "codeId" Int32 :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Delete '[JSON] ()
5261
5362-- | Delete an ASP issued by a user.
5463--
55−-- /See:/ 'aspsDelete' smart constructor.
56−data AspsDelete = AspsDelete
64+-- /See:/ 'aspsDelete'' smart constructor.
65+data AspsDelete' = AspsDelete'
5766 { _adQuotaUser :: !(Maybe Text)
5867 , _adPrettyPrint :: !Bool
5968 , _adCodeId :: !Int32
@@ -62,7 +71,7 @@ data AspsDelete = AspsDelete
6271 , _adOauthToken :: !(Maybe Text)
6372 , _adUserKey :: !Text
6473 , _adFields :: !(Maybe Text)
65− , _adAlt :: !Text
74+ , _adAlt :: !Alt
6675 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6776
6877-- | Creates a value of 'AspsDelete'' with the minimum fields required to make a request.
@@ -86,12 +95,12 @@ data AspsDelete = AspsDelete
8695-- * 'adFields'
8796--
8897-- * 'adAlt'
89−aspsDelete
98+aspsDelete'
9099 :: Int32 -- ^ 'codeId'
91100 -> Text -- ^ 'userKey'
92− -> AspsDelete
93−aspsDelete pAdCodeId_ pAdUserKey_ =
94− AspsDelete
101+ -> AspsDelete'
102+aspsDelete' pAdCodeId_ pAdUserKey_ =
103+ AspsDelete'
95104 { _adQuotaUser = Nothing
96105 , _adPrettyPrint = True
97106 , _adCodeId = pAdCodeId_
@@ -100,7 +109,7 @@ aspsDelete pAdCodeId_ pAdUserKey_ =
100109 , _adOauthToken = Nothing
101110 , _adUserKey = pAdUserKey_
102111 , _adFields = Nothing
103− , _adAlt = "json"
112+ , _adAlt = JSON
104113 }
105114
106115-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,18 +156,21 @@ adFields :: Lens' AspsDelete' (Maybe Text)
147156adFields = lens _adFields (\ s a -> s{_adFields = a})
148157
149158-- | Data format for the response.
150−adAlt :: Lens' AspsDelete' Text
159+adAlt :: Lens' AspsDelete' Alt
151160adAlt = lens _adAlt (\ s a -> s{_adAlt = a})
152161
153162instance GoogleRequest AspsDelete' where
154163 type Rs AspsDelete' = ()
155164 request = requestWithRoute defReq adminDirectoryURL
156− requestWithRoute r u AspsDelete{..}
157− = go _adQuotaUser _adPrettyPrint _adCodeId _adUserIp
165+ requestWithRoute r u AspsDelete'{..}
166+ = go _adQuotaUser (Just _adPrettyPrint) _adCodeId
167+ _adUserIp
158168 _adKey
159169 _adOauthToken
160170 _adUserKey
161171 _adFields
162− _adAlt
172+ (Just _adAlt)
163173 where go
164− = clientWithRoute (Proxy :: Proxy AspsDeleteAPI) r u
174+ = clientWithRoute (Proxy :: Proxy AspsDeleteResource)
175+ r
176+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/Get.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Get information about an ASP issued by a user.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryAspsGet@.
22−module Directory.Asps.Get
23+module Network.Google.Resource.Directory.Asps.Get
2324 (
2425 -- * REST Resource
25− AspsGetAPI
26+ AspsGetResource
2627
2728 -- * Creating a Request
28− , aspsGet
29− , AspsGet
29+ , aspsGet'
30+ , AspsGet'
3031
3132 -- * Request Lenses
3233 , agQuotaUser
@@ -44,16 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryAspsGet@ which the
47−-- 'AspsGet' request conforms to.
48−type AspsGetAPI =
48+-- 'AspsGet'' request conforms to.
49+type AspsGetResource =
4950 "users" :>
5051 Capture "userKey" Text :>
51− "asps" :> Capture "codeId" Int32 :> Get '[JSON] Asp
52+ "asps" :>
53+ Capture "codeId" Int32 :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Asp
5261
5362-- | Get information about an ASP issued by a user.
5463--
55−-- /See:/ 'aspsGet' smart constructor.
56−data AspsGet = AspsGet
64+-- /See:/ 'aspsGet'' smart constructor.
65+data AspsGet' = AspsGet'
5766 { _agQuotaUser :: !(Maybe Text)
5867 , _agPrettyPrint :: !Bool
5968 , _agCodeId :: !Int32
@@ -62,7 +71,7 @@ data AspsGet = AspsGet
6271 , _agOauthToken :: !(Maybe Text)
6372 , _agUserKey :: !Text
6473 , _agFields :: !(Maybe Text)
65− , _agAlt :: !Text
74+ , _agAlt :: !Alt
6675 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6776
6877-- | Creates a value of 'AspsGet'' with the minimum fields required to make a request.
@@ -86,12 +95,12 @@ data AspsGet = AspsGet
8695-- * 'agFields'
8796--
8897-- * 'agAlt'
89−aspsGet
98+aspsGet'
9099 :: Int32 -- ^ 'codeId'
91100 -> Text -- ^ 'userKey'
92− -> AspsGet
93−aspsGet pAgCodeId_ pAgUserKey_ =
94− AspsGet
101+ -> AspsGet'
102+aspsGet' pAgCodeId_ pAgUserKey_ =
103+ AspsGet'
95104 { _agQuotaUser = Nothing
96105 , _agPrettyPrint = True
97106 , _agCodeId = pAgCodeId_
@@ -100,7 +109,7 @@ aspsGet pAgCodeId_ pAgUserKey_ =
100109 , _agOauthToken = Nothing
101110 , _agUserKey = pAgUserKey_
102111 , _agFields = Nothing
103− , _agAlt = "json"
112+ , _agAlt = JSON
104113 }
105114
106115-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,18 +156,20 @@ agFields :: Lens' AspsGet' (Maybe Text)
147156agFields = lens _agFields (\ s a -> s{_agFields = a})
148157
149158-- | Data format for the response.
150−agAlt :: Lens' AspsGet' Text
159+agAlt :: Lens' AspsGet' Alt
151160agAlt = lens _agAlt (\ s a -> s{_agAlt = a})
152161
153162instance GoogleRequest AspsGet' where
154163 type Rs AspsGet' = Asp
155164 request = requestWithRoute defReq adminDirectoryURL
156− requestWithRoute r u AspsGet{..}
157− = go _agQuotaUser _agPrettyPrint _agCodeId _agUserIp
165+ requestWithRoute r u AspsGet'{..}
166+ = go _agQuotaUser (Just _agPrettyPrint) _agCodeId
167+ _agUserIp
158168 _agKey
159169 _agOauthToken
160170 _agUserKey
161171 _agFields
162− _agAlt
172+ (Just _agAlt)
163173 where go
164− = clientWithRoute (Proxy :: Proxy AspsGetAPI) r u
174+ = clientWithRoute (Proxy :: Proxy AspsGetResource) r
175+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Asps/List.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List the ASPs issued by a user.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryAspsList@.
22−module Directory.Asps.List
23+module Network.Google.Resource.Directory.Asps.List
2324 (
2425 -- * REST Resource
25− AspsListAPI
26+ AspsListResource
2627
2728 -- * Creating a Request
28− , aspsList
29− , AspsList
29+ , aspsList'
30+ , AspsList'
3031
3132 -- * Request Lenses
3233 , alQuotaUser
@@ -43,15 +44,23 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryAspsList@ which the
46−-- 'AspsList' request conforms to.
47−type AspsListAPI =
47+-- 'AspsList'' request conforms to.
48+type AspsListResource =
4849 "users" :>
49− Capture "userKey" Text :> "asps" :> Get '[JSON] Asps
50+ Capture "userKey" Text :>
51+ "asps" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Get '[JSON] Asps
5059
5160-- | List the ASPs issued by a user.
5261--
53−-- /See:/ 'aspsList' smart constructor.
54−data AspsList = AspsList
62+-- /See:/ 'aspsList'' smart constructor.
63+data AspsList' = AspsList'
5564 { _alQuotaUser :: !(Maybe Text)
5665 , _alPrettyPrint :: !Bool
5766 , _alUserIp :: !(Maybe Text)
@@ -59,7 +68,7 @@ data AspsList = AspsList
5968 , _alOauthToken :: !(Maybe Text)
6069 , _alUserKey :: !Text
6170 , _alFields :: !(Maybe Text)
62− , _alAlt :: !Text
71+ , _alAlt :: !Alt
6372 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6473
6574-- | Creates a value of 'AspsList'' with the minimum fields required to make a request.
@@ -81,11 +90,11 @@ data AspsList = AspsList
8190-- * 'alFields'
8291--
8392-- * 'alAlt'
84−aspsList
93+aspsList'
8594 :: Text -- ^ 'userKey'
86− -> AspsList
87−aspsList pAlUserKey_ =
88− AspsList
95+ -> AspsList'
96+aspsList' pAlUserKey_ =
97+ AspsList'
8998 { _alQuotaUser = Nothing
9099 , _alPrettyPrint = True
91100 , _alUserIp = Nothing
@@ -93,7 +102,7 @@ aspsList pAlUserKey_ =
93102 , _alOauthToken = Nothing
94103 , _alUserKey = pAlUserKey_
95104 , _alFields = Nothing
96− , _alAlt = "json"
105+ , _alAlt = JSON
97106 }
98107
99108-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,17 +145,19 @@ alFields :: Lens' AspsList' (Maybe Text)
136145alFields = lens _alFields (\ s a -> s{_alFields = a})
137146
138147-- | Data format for the response.
139−alAlt :: Lens' AspsList' Text
148+alAlt :: Lens' AspsList' Alt
140149alAlt = lens _alAlt (\ s a -> s{_alAlt = a})
141150
142151instance GoogleRequest AspsList' where
143152 type Rs AspsList' = Asps
144153 request = requestWithRoute defReq adminDirectoryURL
145− requestWithRoute r u AspsList{..}
146− = go _alQuotaUser _alPrettyPrint _alUserIp _alKey
154+ requestWithRoute r u AspsList'{..}
155+ = go _alQuotaUser (Just _alPrettyPrint) _alUserIp
156+ _alKey
147157 _alOauthToken
148158 _alUserKey
149159 _alFields
150− _alAlt
160+ (Just _alAlt)
151161 where go
152− = clientWithRoute (Proxy :: Proxy AspsListAPI) r u
162+ = clientWithRoute (Proxy :: Proxy AspsListResource) r
163+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Chromeosdevices/Get.hs+32−23
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve Chrome OS Device
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryChromeosdevicesGet@.
22−module Directory.Chromeosdevices.Get
23+module Network.Google.Resource.Directory.Chromeosdevices.Get
2324 (
2425 -- * REST Resource
25− ChromeosdevicesGetAPI
26+ ChromeosdevicesGetResource
2627
2728 -- * Creating a Request
28− , chromeosdevicesGet
29− , ChromeosdevicesGet
29+ , chromeosdevicesGet'
30+ , ChromeosdevicesGet'
3031
3132 -- * Request Lenses
3233 , cgQuotaUser
@@ -45,30 +46,38 @@ import Network.Google.AdminDirectory.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DirectoryChromeosdevicesGet@ which the
48−-- 'ChromeosdevicesGet' request conforms to.
49−type ChromeosdevicesGetAPI =
49+-- 'ChromeosdevicesGet'' request conforms to.
50+type ChromeosdevicesGetResource =
5051 "customer" :>
5152 Capture "customerId" Text :>
5253 "devices" :>
5354 "chromeos" :>
5455 Capture "deviceId" Text :>
55− QueryParam "projection" Text :>
56− Get '[JSON] ChromeOsDevice
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "projection"
61+ DirectoryChromeosdevicesGetProjection
62+ :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :> Get '[JSON] ChromeOsDevice
5766
5867-- | Retrieve Chrome OS Device
5968--
60−-- /See:/ 'chromeosdevicesGet' smart constructor.
61−data ChromeosdevicesGet = ChromeosdevicesGet
69+-- /See:/ 'chromeosdevicesGet'' smart constructor.
70+data ChromeosdevicesGet' = ChromeosdevicesGet'
6271 { _cgQuotaUser :: !(Maybe Text)
6372 , _cgPrettyPrint :: !Bool
6473 , _cgUserIp :: !(Maybe Text)
6574 , _cgCustomerId :: !Text
6675 , _cgKey :: !(Maybe Text)
6776 , _cgDeviceId :: !Text
68− , _cgProjection :: !(Maybe Text)
77+ , _cgProjection :: !(Maybe DirectoryChromeosdevicesGetProjection)
6978 , _cgOauthToken :: !(Maybe Text)
7079 , _cgFields :: !(Maybe Text)
71− , _cgAlt :: !Text
80+ , _cgAlt :: !Alt
7281 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7382
7483-- | Creates a value of 'ChromeosdevicesGet'' with the minimum fields required to make a request.
@@ -94,12 +103,12 @@ data ChromeosdevicesGet = ChromeosdevicesGet
94103-- * 'cgFields'
95104--
96105-- * 'cgAlt'
97−chromeosdevicesGet
106+chromeosdevicesGet'
98107 :: Text -- ^ 'customerId'
99108 -> Text -- ^ 'deviceId'
100− -> ChromeosdevicesGet
101−chromeosdevicesGet pCgCustomerId_ pCgDeviceId_ =
102− ChromeosdevicesGet
109+ -> ChromeosdevicesGet'
110+chromeosdevicesGet' pCgCustomerId_ pCgDeviceId_ =
111+ ChromeosdevicesGet'
103112 { _cgQuotaUser = Nothing
104113 , _cgPrettyPrint = True
105114 , _cgUserIp = Nothing
@@ -109,7 +118,7 @@ chromeosdevicesGet pCgCustomerId_ pCgDeviceId_ =
109118 , _cgProjection = Nothing
110119 , _cgOauthToken = Nothing
111120 , _cgFields = Nothing
112− , _cgAlt = "json"
121+ , _cgAlt = JSON
113122 }
114123
115124-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,7 +156,7 @@ cgDeviceId
147156 = lens _cgDeviceId (\ s a -> s{_cgDeviceId = a})
148157
149158-- | Restrict information returned to a set of selected fields.
150−cgProjection :: Lens' ChromeosdevicesGet' (Maybe Text)
159+cgProjection :: Lens' ChromeosdevicesGet' (Maybe DirectoryChromeosdevicesGetProjection)
151160cgProjection
152161 = lens _cgProjection (\ s a -> s{_cgProjection = a})
153162
@@ -161,23 +170,23 @@ cgFields :: Lens' ChromeosdevicesGet' (Maybe Text)
161170cgFields = lens _cgFields (\ s a -> s{_cgFields = a})
162171
163172-- | Data format for the response.
164−cgAlt :: Lens' ChromeosdevicesGet' Text
173+cgAlt :: Lens' ChromeosdevicesGet' Alt
165174cgAlt = lens _cgAlt (\ s a -> s{_cgAlt = a})
166175
167176instance GoogleRequest ChromeosdevicesGet' where
168177 type Rs ChromeosdevicesGet' = ChromeOsDevice
169178 request = requestWithRoute defReq adminDirectoryURL
170− requestWithRoute r u ChromeosdevicesGet{..}
171− = go _cgQuotaUser _cgPrettyPrint _cgUserIp
179+ requestWithRoute r u ChromeosdevicesGet'{..}
180+ = go _cgQuotaUser (Just _cgPrettyPrint) _cgUserIp
172181 _cgCustomerId
173182 _cgKey
174183 _cgDeviceId
175184 _cgProjection
176185 _cgOauthToken
177186 _cgFields
178− _cgAlt
187+ (Just _cgAlt)
179188 where go
180189 = clientWithRoute
181− (Proxy :: Proxy ChromeosdevicesGetAPI)
190+ (Proxy :: Proxy ChromeosdevicesGetResource)
182191 r
183192 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Chromeosdevices/List.hs+47−32
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve all Chrome OS Devices of a customer (paginated)
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryChromeosdevicesList@.
22−module Directory.Chromeosdevices.List
23+module Network.Google.Resource.Directory.Chromeosdevices.List
2324 (
2425 -- * REST Resource
25− ChromeosdevicesListAPI
26+ ChromeosdevicesListResource
2627
2728 -- * Creating a Request
28− , chromeosdevicesList
29− , ChromeosdevicesList
29+ , chromeosdevicesList'
30+ , ChromeosdevicesList'
3031
3132 -- * Request Lenses
3233 , clQuotaUser
@@ -49,38 +50,51 @@ import Network.Google.AdminDirectory.Types
4950import Network.Google.Prelude
5051
5152-- | A resource alias for @DirectoryChromeosdevicesList@ which the
52−-- 'ChromeosdevicesList' request conforms to.
53−type ChromeosdevicesListAPI =
53+-- 'ChromeosdevicesList'' request conforms to.
54+type ChromeosdevicesListResource =
5455 "customer" :>
5556 Capture "customerId" Text :>
5657 "devices" :>
5758 "chromeos" :>
58− QueryParam "orderBy" Text :>
59− QueryParam "sortOrder" Text :>
60− QueryParam "query" Text :>
61− QueryParam "projection" Text :>
62− QueryParam "pageToken" Text :>
63− QueryParam "maxResults" Int32 :>
64− Get '[JSON] ChromeOsDevices
59+ QueryParam "quotaUser" Text :>
60+ QueryParam "prettyPrint" Bool :>
61+ QueryParam "orderBy"
62+ DirectoryChromeosdevicesListOrderBy
63+ :>
64+ QueryParam "userIp" Text :>
65+ QueryParam "sortOrder"
66+ DirectoryChromeosdevicesListSortOrder
67+ :>
68+ QueryParam "key" Text :>
69+ QueryParam "query" Text :>
70+ QueryParam "projection"
71+ DirectoryChromeosdevicesListProjection
72+ :>
73+ QueryParam "pageToken" Text :>
74+ QueryParam "oauth_token" Text :>
75+ QueryParam "maxResults" Int32 :>
76+ QueryParam "fields" Text :>
77+ QueryParam "alt" Alt :>
78+ Get '[JSON] ChromeOsDevices
6579
6680-- | Retrieve all Chrome OS Devices of a customer (paginated)
6781--
68−-- /See:/ 'chromeosdevicesList' smart constructor.
69−data ChromeosdevicesList = ChromeosdevicesList
82+-- /See:/ 'chromeosdevicesList'' smart constructor.
83+data ChromeosdevicesList' = ChromeosdevicesList'
7084 { _clQuotaUser :: !(Maybe Text)
7185 , _clPrettyPrint :: !Bool
72− , _clOrderBy :: !(Maybe Text)
86+ , _clOrderBy :: !(Maybe DirectoryChromeosdevicesListOrderBy)
7387 , _clUserIp :: !(Maybe Text)
7488 , _clCustomerId :: !Text
75− , _clSortOrder :: !(Maybe Text)
89+ , _clSortOrder :: !(Maybe DirectoryChromeosdevicesListSortOrder)
7690 , _clKey :: !(Maybe Text)
7791 , _clQuery :: !(Maybe Text)
78− , _clProjection :: !(Maybe Text)
92+ , _clProjection :: !(Maybe DirectoryChromeosdevicesListProjection)
7993 , _clPageToken :: !(Maybe Text)
8094 , _clOauthToken :: !(Maybe Text)
8195 , _clMaxResults :: !(Maybe Int32)
8296 , _clFields :: !(Maybe Text)
83− , _clAlt :: !Text
97+ , _clAlt :: !Alt
8498 } deriving (Eq,Read,Show,Data,Typeable,Generic)
8599
86100-- | Creates a value of 'ChromeosdevicesList'' with the minimum fields required to make a request.
@@ -114,11 +128,11 @@ data ChromeosdevicesList = ChromeosdevicesList
114128-- * 'clFields'
115129--
116130-- * 'clAlt'
117−chromeosdevicesList
131+chromeosdevicesList'
118132 :: Text -- ^ 'customerId'
119− -> ChromeosdevicesList
120−chromeosdevicesList pClCustomerId_ =
121− ChromeosdevicesList
133+ -> ChromeosdevicesList'
134+chromeosdevicesList' pClCustomerId_ =
135+ ChromeosdevicesList'
122136 { _clQuotaUser = Nothing
123137 , _clPrettyPrint = True
124138 , _clOrderBy = Nothing
@@ -132,7 +146,7 @@ chromeosdevicesList pClCustomerId_ =
132146 , _clOauthToken = Nothing
133147 , _clMaxResults = Nothing
134148 , _clFields = Nothing
135− , _clAlt = "json"
149+ , _clAlt = JSON
136150 }
137151
138152-- | Available to use for quota purposes for server-side applications. Can be
@@ -149,7 +163,7 @@ clPrettyPrint
149163 (\ s a -> s{_clPrettyPrint = a})
150164
151165-- | Column to use for sorting results
152−clOrderBy :: Lens' ChromeosdevicesList' (Maybe Text)
166+clOrderBy :: Lens' ChromeosdevicesList' (Maybe DirectoryChromeosdevicesListOrderBy)
153167clOrderBy
154168 = lens _clOrderBy (\ s a -> s{_clOrderBy = a})
155169
@@ -165,7 +179,7 @@ clCustomerId
165179
166180-- | Whether to return results in ascending or descending order. Only of use
167181-- when orderBy is also used
168−clSortOrder :: Lens' ChromeosdevicesList' (Maybe Text)
182+clSortOrder :: Lens' ChromeosdevicesList' (Maybe DirectoryChromeosdevicesListSortOrder)
169183clSortOrder
170184 = lens _clSortOrder (\ s a -> s{_clSortOrder = a})
171185
@@ -181,7 +195,7 @@ clQuery :: Lens' ChromeosdevicesList' (Maybe Text)
181195clQuery = lens _clQuery (\ s a -> s{_clQuery = a})
182196
183197-- | Restrict information returned to a set of selected fields.
184−clProjection :: Lens' ChromeosdevicesList' (Maybe Text)
198+clProjection :: Lens' ChromeosdevicesList' (Maybe DirectoryChromeosdevicesListProjection)
185199clProjection
186200 = lens _clProjection (\ s a -> s{_clProjection = a})
187201
@@ -205,14 +219,15 @@ clFields :: Lens' ChromeosdevicesList' (Maybe Text)
205219clFields = lens _clFields (\ s a -> s{_clFields = a})
206220
207221-- | Data format for the response.
208−clAlt :: Lens' ChromeosdevicesList' Text
222+clAlt :: Lens' ChromeosdevicesList' Alt
209223clAlt = lens _clAlt (\ s a -> s{_clAlt = a})
210224
211225instance GoogleRequest ChromeosdevicesList' where
212226 type Rs ChromeosdevicesList' = ChromeOsDevices
213227 request = requestWithRoute defReq adminDirectoryURL
214− requestWithRoute r u ChromeosdevicesList{..}
215− = go _clQuotaUser _clPrettyPrint _clOrderBy _clUserIp
228+ requestWithRoute r u ChromeosdevicesList'{..}
229+ = go _clQuotaUser (Just _clPrettyPrint) _clOrderBy
230+ _clUserIp
216231 _clCustomerId
217232 _clSortOrder
218233 _clKey
@@ -222,9 +237,9 @@ instance GoogleRequest ChromeosdevicesList' where
222237 _clOauthToken
223238 _clMaxResults
224239 _clFields
225− _clAlt
240+ (Just _clAlt)
226241 where go
227242 = clientWithRoute
228− (Proxy :: Proxy ChromeosdevicesListAPI)
243+ (Proxy :: Proxy ChromeosdevicesListResource)
229244 r
230245 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Chromeosdevices/Patch.hs+33−23
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update Chrome OS Device. This method supports patch semantics.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryChromeosdevicesPatch@.
22−module Directory.Chromeosdevices.Patch
23+module Network.Google.Resource.Directory.Chromeosdevices.Patch
2324 (
2425 -- * REST Resource
25− ChromeosdevicesPatchAPI
26+ ChromeosdevicesPatchResource
2627
2728 -- * Creating a Request
28− , chromeosdevicesPatch
29− , ChromeosdevicesPatch
29+ , chromeosdevicesPatch'
30+ , ChromeosdevicesPatch'
3031
3132 -- * Request Lenses
3233 , cpQuotaUser
@@ -45,30 +46,39 @@ import Network.Google.AdminDirectory.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DirectoryChromeosdevicesPatch@ which the
48−-- 'ChromeosdevicesPatch' request conforms to.
49−type ChromeosdevicesPatchAPI =
49+-- 'ChromeosdevicesPatch'' request conforms to.
50+type ChromeosdevicesPatchResource =
5051 "customer" :>
5152 Capture "customerId" Text :>
5253 "devices" :>
5354 "chromeos" :>
5455 Capture "deviceId" Text :>
55− QueryParam "projection" Text :>
56− Patch '[JSON] ChromeOsDevice
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "projection"
61+ DirectoryChromeosdevicesPatchProjection
62+ :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :>
66+ Patch '[JSON] ChromeOsDevice
5767
5868-- | Update Chrome OS Device. This method supports patch semantics.
5969--
60−-- /See:/ 'chromeosdevicesPatch' smart constructor.
61−data ChromeosdevicesPatch = ChromeosdevicesPatch
70+-- /See:/ 'chromeosdevicesPatch'' smart constructor.
71+data ChromeosdevicesPatch' = ChromeosdevicesPatch'
6272 { _cpQuotaUser :: !(Maybe Text)
6373 , _cpPrettyPrint :: !Bool
6474 , _cpUserIp :: !(Maybe Text)
6575 , _cpCustomerId :: !Text
6676 , _cpKey :: !(Maybe Text)
6777 , _cpDeviceId :: !Text
68− , _cpProjection :: !(Maybe Text)
78+ , _cpProjection :: !(Maybe DirectoryChromeosdevicesPatchProjection)
6979 , _cpOauthToken :: !(Maybe Text)
7080 , _cpFields :: !(Maybe Text)
71− , _cpAlt :: !Text
81+ , _cpAlt :: !Alt
7282 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7383
7484-- | Creates a value of 'ChromeosdevicesPatch'' with the minimum fields required to make a request.
@@ -94,12 +104,12 @@ data ChromeosdevicesPatch = ChromeosdevicesPatch
94104-- * 'cpFields'
95105--
96106-- * 'cpAlt'
97−chromeosdevicesPatch
107+chromeosdevicesPatch'
98108 :: Text -- ^ 'customerId'
99109 -> Text -- ^ 'deviceId'
100− -> ChromeosdevicesPatch
101−chromeosdevicesPatch pCpCustomerId_ pCpDeviceId_ =
102− ChromeosdevicesPatch
110+ -> ChromeosdevicesPatch'
111+chromeosdevicesPatch' pCpCustomerId_ pCpDeviceId_ =
112+ ChromeosdevicesPatch'
103113 { _cpQuotaUser = Nothing
104114 , _cpPrettyPrint = True
105115 , _cpUserIp = Nothing
@@ -109,7 +119,7 @@ chromeosdevicesPatch pCpCustomerId_ pCpDeviceId_ =
109119 , _cpProjection = Nothing
110120 , _cpOauthToken = Nothing
111121 , _cpFields = Nothing
112− , _cpAlt = "json"
122+ , _cpAlt = JSON
113123 }
114124
115125-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,7 +157,7 @@ cpDeviceId
147157 = lens _cpDeviceId (\ s a -> s{_cpDeviceId = a})
148158
149159-- | Restrict information returned to a set of selected fields.
150−cpProjection :: Lens' ChromeosdevicesPatch' (Maybe Text)
160+cpProjection :: Lens' ChromeosdevicesPatch' (Maybe DirectoryChromeosdevicesPatchProjection)
151161cpProjection
152162 = lens _cpProjection (\ s a -> s{_cpProjection = a})
153163
@@ -161,23 +171,23 @@ cpFields :: Lens' ChromeosdevicesPatch' (Maybe Text)
161171cpFields = lens _cpFields (\ s a -> s{_cpFields = a})
162172
163173-- | Data format for the response.
164−cpAlt :: Lens' ChromeosdevicesPatch' Text
174+cpAlt :: Lens' ChromeosdevicesPatch' Alt
165175cpAlt = lens _cpAlt (\ s a -> s{_cpAlt = a})
166176
167177instance GoogleRequest ChromeosdevicesPatch' where
168178 type Rs ChromeosdevicesPatch' = ChromeOsDevice
169179 request = requestWithRoute defReq adminDirectoryURL
170− requestWithRoute r u ChromeosdevicesPatch{..}
171− = go _cpQuotaUser _cpPrettyPrint _cpUserIp
180+ requestWithRoute r u ChromeosdevicesPatch'{..}
181+ = go _cpQuotaUser (Just _cpPrettyPrint) _cpUserIp
172182 _cpCustomerId
173183 _cpKey
174184 _cpDeviceId
175185 _cpProjection
176186 _cpOauthToken
177187 _cpFields
178− _cpAlt
188+ (Just _cpAlt)
179189 where go
180190 = clientWithRoute
181− (Proxy :: Proxy ChromeosdevicesPatchAPI)
191+ (Proxy :: Proxy ChromeosdevicesPatchResource)
182192 r
183193 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Chromeosdevices/Update.hs+32−23
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update Chrome OS Device
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryChromeosdevicesUpdate@.
22−module Directory.Chromeosdevices.Update
23+module Network.Google.Resource.Directory.Chromeosdevices.Update
2324 (
2425 -- * REST Resource
25− ChromeosdevicesUpdateAPI
26+ ChromeosdevicesUpdateResource
2627
2728 -- * Creating a Request
28− , chromeosdevicesUpdate
29− , ChromeosdevicesUpdate
29+ , chromeosdevicesUpdate'
30+ , ChromeosdevicesUpdate'
3031
3132 -- * Request Lenses
3233 , cuQuotaUser
@@ -45,30 +46,38 @@ import Network.Google.AdminDirectory.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DirectoryChromeosdevicesUpdate@ which the
48−-- 'ChromeosdevicesUpdate' request conforms to.
49−type ChromeosdevicesUpdateAPI =
49+-- 'ChromeosdevicesUpdate'' request conforms to.
50+type ChromeosdevicesUpdateResource =
5051 "customer" :>
5152 Capture "customerId" Text :>
5253 "devices" :>
5354 "chromeos" :>
5455 Capture "deviceId" Text :>
55− QueryParam "projection" Text :>
56− Put '[JSON] ChromeOsDevice
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "projection"
61+ DirectoryChromeosdevicesUpdateProjection
62+ :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :> Put '[JSON] ChromeOsDevice
5766
5867-- | Update Chrome OS Device
5968--
60−-- /See:/ 'chromeosdevicesUpdate' smart constructor.
61−data ChromeosdevicesUpdate = ChromeosdevicesUpdate
69+-- /See:/ 'chromeosdevicesUpdate'' smart constructor.
70+data ChromeosdevicesUpdate' = ChromeosdevicesUpdate'
6271 { _cuQuotaUser :: !(Maybe Text)
6372 , _cuPrettyPrint :: !Bool
6473 , _cuUserIp :: !(Maybe Text)
6574 , _cuCustomerId :: !Text
6675 , _cuKey :: !(Maybe Text)
6776 , _cuDeviceId :: !Text
68− , _cuProjection :: !(Maybe Text)
77+ , _cuProjection :: !(Maybe DirectoryChromeosdevicesUpdateProjection)
6978 , _cuOauthToken :: !(Maybe Text)
7079 , _cuFields :: !(Maybe Text)
71− , _cuAlt :: !Text
80+ , _cuAlt :: !Alt
7281 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7382
7483-- | Creates a value of 'ChromeosdevicesUpdate'' with the minimum fields required to make a request.
@@ -94,12 +103,12 @@ data ChromeosdevicesUpdate = ChromeosdevicesUpdate
94103-- * 'cuFields'
95104--
96105-- * 'cuAlt'
97−chromeosdevicesUpdate
106+chromeosdevicesUpdate'
98107 :: Text -- ^ 'customerId'
99108 -> Text -- ^ 'deviceId'
100− -> ChromeosdevicesUpdate
101−chromeosdevicesUpdate pCuCustomerId_ pCuDeviceId_ =
102− ChromeosdevicesUpdate
109+ -> ChromeosdevicesUpdate'
110+chromeosdevicesUpdate' pCuCustomerId_ pCuDeviceId_ =
111+ ChromeosdevicesUpdate'
103112 { _cuQuotaUser = Nothing
104113 , _cuPrettyPrint = True
105114 , _cuUserIp = Nothing
@@ -109,7 +118,7 @@ chromeosdevicesUpdate pCuCustomerId_ pCuDeviceId_ =
109118 , _cuProjection = Nothing
110119 , _cuOauthToken = Nothing
111120 , _cuFields = Nothing
112− , _cuAlt = "json"
121+ , _cuAlt = JSON
113122 }
114123
115124-- | Available to use for quota purposes for server-side applications. Can be
@@ -147,7 +156,7 @@ cuDeviceId
147156 = lens _cuDeviceId (\ s a -> s{_cuDeviceId = a})
148157
149158-- | Restrict information returned to a set of selected fields.
150−cuProjection :: Lens' ChromeosdevicesUpdate' (Maybe Text)
159+cuProjection :: Lens' ChromeosdevicesUpdate' (Maybe DirectoryChromeosdevicesUpdateProjection)
151160cuProjection
152161 = lens _cuProjection (\ s a -> s{_cuProjection = a})
153162
@@ -161,23 +170,23 @@ cuFields :: Lens' ChromeosdevicesUpdate' (Maybe Text)
161170cuFields = lens _cuFields (\ s a -> s{_cuFields = a})
162171
163172-- | Data format for the response.
164−cuAlt :: Lens' ChromeosdevicesUpdate' Text
173+cuAlt :: Lens' ChromeosdevicesUpdate' Alt
165174cuAlt = lens _cuAlt (\ s a -> s{_cuAlt = a})
166175
167176instance GoogleRequest ChromeosdevicesUpdate' where
168177 type Rs ChromeosdevicesUpdate' = ChromeOsDevice
169178 request = requestWithRoute defReq adminDirectoryURL
170− requestWithRoute r u ChromeosdevicesUpdate{..}
171− = go _cuQuotaUser _cuPrettyPrint _cuUserIp
179+ requestWithRoute r u ChromeosdevicesUpdate'{..}
180+ = go _cuQuotaUser (Just _cuPrettyPrint) _cuUserIp
172181 _cuCustomerId
173182 _cuKey
174183 _cuDeviceId
175184 _cuProjection
176185 _cuOauthToken
177186 _cuFields
178− _cuAlt
187+ (Just _cuAlt)
179188 where go
180189 = clientWithRoute
181− (Proxy :: Proxy ChromeosdevicesUpdateAPI)
190+ (Proxy :: Proxy ChromeosdevicesUpdateResource)
182191 r
183192 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/Delete.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Remove a alias for the group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsAliasesDelete@.
22−module Directory.Groups.Aliases.Delete
23+module Network.Google.Resource.Directory.Groups.Aliases.Delete
2324 (
2425 -- * REST Resource
25− GroupsAliasesDeleteAPI
26+ GroupsAliasesDeleteResource
2627
2728 -- * Creating a Request
28− , groupsAliasesDelete
29− , GroupsAliasesDelete
29+ , groupsAliasesDelete'
30+ , GroupsAliasesDelete'
3031
3132 -- * Request Lenses
3233 , gadQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryGroupsAliasesDelete@ which the
47−-- 'GroupsAliasesDelete' request conforms to.
48−type GroupsAliasesDeleteAPI =
48+-- 'GroupsAliasesDelete'' request conforms to.
49+type GroupsAliasesDeleteResource =
4950 "groups" :>
5051 Capture "groupKey" Text :>
5152 "aliases" :>
52− Capture "alias" Text :> Delete '[JSON] ()
53+ Capture "alias" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Delete '[JSON] ()
5361
5462-- | Remove a alias for the group
5563--
56−-- /See:/ 'groupsAliasesDelete' smart constructor.
57−data GroupsAliasesDelete = GroupsAliasesDelete
64+-- /See:/ 'groupsAliasesDelete'' smart constructor.
65+data GroupsAliasesDelete' = GroupsAliasesDelete'
5866 { _gadQuotaUser :: !(Maybe Text)
5967 , _gadPrettyPrint :: !Bool
6068 , _gadUserIp :: !(Maybe Text)
@@ -63,7 +71,7 @@ data GroupsAliasesDelete = GroupsAliasesDelete
6371 , _gadKey :: !(Maybe Text)
6472 , _gadOauthToken :: !(Maybe Text)
6573 , _gadFields :: !(Maybe Text)
66− , _gadAlt :: !Text
74+ , _gadAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'GroupsAliasesDelete'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data GroupsAliasesDelete = GroupsAliasesDelete
8795-- * 'gadFields'
8896--
8997-- * 'gadAlt'
90−groupsAliasesDelete
98+groupsAliasesDelete'
9199 :: Text -- ^ 'groupKey'
92100 -> Text -- ^ 'alias'
93− -> GroupsAliasesDelete
94−groupsAliasesDelete pGadGroupKey_ pGadAlias_ =
95− GroupsAliasesDelete
101+ -> GroupsAliasesDelete'
102+groupsAliasesDelete' pGadGroupKey_ pGadAlias_ =
103+ GroupsAliasesDelete'
96104 { _gadQuotaUser = Nothing
97105 , _gadPrettyPrint = True
98106 , _gadUserIp = Nothing
@@ -101,7 +109,7 @@ groupsAliasesDelete pGadGroupKey_ pGadAlias_ =
101109 , _gadKey = Nothing
102110 , _gadOauthToken = Nothing
103111 , _gadFields = Nothing
104− , _gadAlt = "json"
112+ , _gadAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,22 +158,22 @@ gadFields
150158 = lens _gadFields (\ s a -> s{_gadFields = a})
151159
152160-- | Data format for the response.
153−gadAlt :: Lens' GroupsAliasesDelete' Text
161+gadAlt :: Lens' GroupsAliasesDelete' Alt
154162gadAlt = lens _gadAlt (\ s a -> s{_gadAlt = a})
155163
156164instance GoogleRequest GroupsAliasesDelete' where
157165 type Rs GroupsAliasesDelete' = ()
158166 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u GroupsAliasesDelete{..}
160− = go _gadQuotaUser _gadPrettyPrint _gadUserIp
167+ requestWithRoute r u GroupsAliasesDelete'{..}
168+ = go _gadQuotaUser (Just _gadPrettyPrint) _gadUserIp
161169 _gadGroupKey
162170 _gadAlias
163171 _gadKey
164172 _gadOauthToken
165173 _gadFields
166− _gadAlt
174+ (Just _gadAlt)
167175 where go
168176 = clientWithRoute
169− (Proxy :: Proxy GroupsAliasesDeleteAPI)
177+ (Proxy :: Proxy GroupsAliasesDeleteResource)
170178 r
171179 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/Insert.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Add a alias for the group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsAliasesInsert@.
22−module Directory.Groups.Aliases.Insert
23+module Network.Google.Resource.Directory.Groups.Aliases.Insert
2324 (
2425 -- * REST Resource
25− GroupsAliasesInsertAPI
26+ GroupsAliasesInsertResource
2627
2728 -- * Creating a Request
28− , groupsAliasesInsert
29− , GroupsAliasesInsert
29+ , groupsAliasesInsert'
30+ , GroupsAliasesInsert'
3031
3132 -- * Request Lenses
3233 , gaiQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsAliasesInsert@ which the
46−-- 'GroupsAliasesInsert' request conforms to.
47−type GroupsAliasesInsertAPI =
47+-- 'GroupsAliasesInsert'' request conforms to.
48+type GroupsAliasesInsertResource =
4849 "groups" :>
4950 Capture "groupKey" Text :>
50− "aliases" :> Post '[JSON] Alias
51+ "aliases" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Post '[JSON] Alias
5159
5260-- | Add a alias for the group
5361--
54−-- /See:/ 'groupsAliasesInsert' smart constructor.
55−data GroupsAliasesInsert = GroupsAliasesInsert
62+-- /See:/ 'groupsAliasesInsert'' smart constructor.
63+data GroupsAliasesInsert' = GroupsAliasesInsert'
5664 { _gaiQuotaUser :: !(Maybe Text)
5765 , _gaiPrettyPrint :: !Bool
5866 , _gaiUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data GroupsAliasesInsert = GroupsAliasesInsert
6068 , _gaiKey :: !(Maybe Text)
6169 , _gaiOauthToken :: !(Maybe Text)
6270 , _gaiFields :: !(Maybe Text)
63− , _gaiAlt :: !Text
71+ , _gaiAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'GroupsAliasesInsert'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data GroupsAliasesInsert = GroupsAliasesInsert
8290-- * 'gaiFields'
8391--
8492-- * 'gaiAlt'
85−groupsAliasesInsert
93+groupsAliasesInsert'
8694 :: Text -- ^ 'groupKey'
87− -> GroupsAliasesInsert
88−groupsAliasesInsert pGaiGroupKey_ =
89− GroupsAliasesInsert
95+ -> GroupsAliasesInsert'
96+groupsAliasesInsert' pGaiGroupKey_ =
97+ GroupsAliasesInsert'
9098 { _gaiQuotaUser = Nothing
9199 , _gaiPrettyPrint = True
92100 , _gaiUserIp = Nothing
@@ -94,7 +102,7 @@ groupsAliasesInsert pGaiGroupKey_ =
94102 , _gaiKey = Nothing
95103 , _gaiOauthToken = Nothing
96104 , _gaiFields = Nothing
97− , _gaiAlt = "json"
105+ , _gaiAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,21 +147,21 @@ gaiFields
139147 = lens _gaiFields (\ s a -> s{_gaiFields = a})
140148
141149-- | Data format for the response.
142−gaiAlt :: Lens' GroupsAliasesInsert' Text
150+gaiAlt :: Lens' GroupsAliasesInsert' Alt
143151gaiAlt = lens _gaiAlt (\ s a -> s{_gaiAlt = a})
144152
145153instance GoogleRequest GroupsAliasesInsert' where
146154 type Rs GroupsAliasesInsert' = Alias
147155 request = requestWithRoute defReq adminDirectoryURL
148− requestWithRoute r u GroupsAliasesInsert{..}
149− = go _gaiQuotaUser _gaiPrettyPrint _gaiUserIp
156+ requestWithRoute r u GroupsAliasesInsert'{..}
157+ = go _gaiQuotaUser (Just _gaiPrettyPrint) _gaiUserIp
150158 _gaiGroupKey
151159 _gaiKey
152160 _gaiOauthToken
153161 _gaiFields
154− _gaiAlt
162+ (Just _gaiAlt)
155163 where go
156164 = clientWithRoute
157− (Proxy :: Proxy GroupsAliasesInsertAPI)
165+ (Proxy :: Proxy GroupsAliasesInsertResource)
158166 r
159167 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Aliases/List.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | List all aliases for a group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsAliasesList@.
22−module Directory.Groups.Aliases.List
23+module Network.Google.Resource.Directory.Groups.Aliases.List
2324 (
2425 -- * REST Resource
25− GroupsAliasesListAPI
26+ GroupsAliasesListResource
2627
2728 -- * Creating a Request
28− , groupsAliasesList
29− , GroupsAliasesList
29+ , groupsAliasesList'
30+ , GroupsAliasesList'
3031
3132 -- * Request Lenses
3233 , galQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsAliasesList@ which the
46−-- 'GroupsAliasesList' request conforms to.
47−type GroupsAliasesListAPI =
47+-- 'GroupsAliasesList'' request conforms to.
48+type GroupsAliasesListResource =
4849 "groups" :>
4950 Capture "groupKey" Text :>
50− "aliases" :> Get '[JSON] Aliases
51+ "aliases" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Get '[JSON] Aliases
5159
5260-- | List all aliases for a group
5361--
54−-- /See:/ 'groupsAliasesList' smart constructor.
55−data GroupsAliasesList = GroupsAliasesList
62+-- /See:/ 'groupsAliasesList'' smart constructor.
63+data GroupsAliasesList' = GroupsAliasesList'
5664 { _galQuotaUser :: !(Maybe Text)
5765 , _galPrettyPrint :: !Bool
5866 , _galUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data GroupsAliasesList = GroupsAliasesList
6068 , _galKey :: !(Maybe Text)
6169 , _galOauthToken :: !(Maybe Text)
6270 , _galFields :: !(Maybe Text)
63− , _galAlt :: !Text
71+ , _galAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'GroupsAliasesList'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data GroupsAliasesList = GroupsAliasesList
8290-- * 'galFields'
8391--
8492-- * 'galAlt'
85−groupsAliasesList
93+groupsAliasesList'
8694 :: Text -- ^ 'groupKey'
87− -> GroupsAliasesList
88−groupsAliasesList pGalGroupKey_ =
89− GroupsAliasesList
95+ -> GroupsAliasesList'
96+groupsAliasesList' pGalGroupKey_ =
97+ GroupsAliasesList'
9098 { _galQuotaUser = Nothing
9199 , _galPrettyPrint = True
92100 , _galUserIp = Nothing
@@ -94,7 +102,7 @@ groupsAliasesList pGalGroupKey_ =
94102 , _galKey = Nothing
95103 , _galOauthToken = Nothing
96104 , _galFields = Nothing
97− , _galAlt = "json"
105+ , _galAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -139,21 +147,21 @@ galFields
139147 = lens _galFields (\ s a -> s{_galFields = a})
140148
141149-- | Data format for the response.
142−galAlt :: Lens' GroupsAliasesList' Text
150+galAlt :: Lens' GroupsAliasesList' Alt
143151galAlt = lens _galAlt (\ s a -> s{_galAlt = a})
144152
145153instance GoogleRequest GroupsAliasesList' where
146154 type Rs GroupsAliasesList' = Aliases
147155 request = requestWithRoute defReq adminDirectoryURL
148− requestWithRoute r u GroupsAliasesList{..}
149− = go _galQuotaUser _galPrettyPrint _galUserIp
156+ requestWithRoute r u GroupsAliasesList'{..}
157+ = go _galQuotaUser (Just _galPrettyPrint) _galUserIp
150158 _galGroupKey
151159 _galKey
152160 _galOauthToken
153161 _galFields
154− _galAlt
162+ (Just _galAlt)
155163 where go
156164 = clientWithRoute
157− (Proxy :: Proxy GroupsAliasesListAPI)
165+ (Proxy :: Proxy GroupsAliasesListResource)
158166 r
159167 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Delete.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Delete Group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsDelete@.
22−module Directory.Groups.Delete
23+module Network.Google.Resource.Directory.Groups.Delete
2324 (
2425 -- * REST Resource
25− GroupsDeleteAPI
26+ GroupsDeleteResource
2627
2728 -- * Creating a Request
28− , groupsDelete
29− , GroupsDelete
29+ , groupsDelete'
30+ , GroupsDelete'
3031
3132 -- * Request Lenses
3233 , gdQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsDelete@ which the
46−-- 'GroupsDelete' request conforms to.
47−type GroupsDeleteAPI =
47+-- 'GroupsDelete'' request conforms to.
48+type GroupsDeleteResource =
4849 "groups" :>
49− Capture "groupKey" Text :> Delete '[JSON] ()
50+ Capture "groupKey" Text :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Delete '[JSON] ()
5058
5159-- | Delete Group
5260--
53−-- /See:/ 'groupsDelete' smart constructor.
54−data GroupsDelete = GroupsDelete
61+-- /See:/ 'groupsDelete'' smart constructor.
62+data GroupsDelete' = GroupsDelete'
5563 { _gdQuotaUser :: !(Maybe Text)
5664 , _gdPrettyPrint :: !Bool
5765 , _gdUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data GroupsDelete = GroupsDelete
5967 , _gdKey :: !(Maybe Text)
6068 , _gdOauthToken :: !(Maybe Text)
6169 , _gdFields :: !(Maybe Text)
62− , _gdAlt :: !Text
70+ , _gdAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'GroupsDelete'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data GroupsDelete = GroupsDelete
8189-- * 'gdFields'
8290--
8391-- * 'gdAlt'
84−groupsDelete
92+groupsDelete'
8593 :: Text -- ^ 'groupKey'
86− -> GroupsDelete
87−groupsDelete pGdGroupKey_ =
88− GroupsDelete
94+ -> GroupsDelete'
95+groupsDelete' pGdGroupKey_ =
96+ GroupsDelete'
8997 { _gdQuotaUser = Nothing
9098 , _gdPrettyPrint = True
9199 , _gdUserIp = Nothing
@@ -93,7 +101,7 @@ groupsDelete pGdGroupKey_ =
93101 , _gdKey = Nothing
94102 , _gdOauthToken = Nothing
95103 , _gdFields = Nothing
96− , _gdAlt = "json"
104+ , _gdAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -135,19 +143,21 @@ gdFields :: Lens' GroupsDelete' (Maybe Text)
135143gdFields = lens _gdFields (\ s a -> s{_gdFields = a})
136144
137145-- | Data format for the response.
138−gdAlt :: Lens' GroupsDelete' Text
146+gdAlt :: Lens' GroupsDelete' Alt
139147gdAlt = lens _gdAlt (\ s a -> s{_gdAlt = a})
140148
141149instance GoogleRequest GroupsDelete' where
142150 type Rs GroupsDelete' = ()
143151 request = requestWithRoute defReq adminDirectoryURL
144− requestWithRoute r u GroupsDelete{..}
145− = go _gdQuotaUser _gdPrettyPrint _gdUserIp
152+ requestWithRoute r u GroupsDelete'{..}
153+ = go _gdQuotaUser (Just _gdPrettyPrint) _gdUserIp
146154 _gdGroupKey
147155 _gdKey
148156 _gdOauthToken
149157 _gdFields
150− _gdAlt
158+ (Just _gdAlt)
151159 where go
152− = clientWithRoute (Proxy :: Proxy GroupsDeleteAPI) r
160+ = clientWithRoute
161+ (Proxy :: Proxy GroupsDeleteResource)
162+ r
153163 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Get.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve Group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsGet@.
22−module Directory.Groups.Get
23+module Network.Google.Resource.Directory.Groups.Get
2324 (
2425 -- * REST Resource
25− GroupsGetAPI
26+ GroupsGetResource
2627
2728 -- * Creating a Request
28− , groupsGet
29− , GroupsGet
29+ , groupsGet'
30+ , GroupsGet'
3031
3132 -- * Request Lenses
3233 , ggQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsGet@ which the
46−-- 'GroupsGet' request conforms to.
47−type GroupsGetAPI =
47+-- 'GroupsGet'' request conforms to.
48+type GroupsGetResource =
4849 "groups" :>
49− Capture "groupKey" Text :> Get '[JSON] Group
50+ Capture "groupKey" Text :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Get '[JSON] Group
5058
5159-- | Retrieve Group
5260--
53−-- /See:/ 'groupsGet' smart constructor.
54−data GroupsGet = GroupsGet
61+-- /See:/ 'groupsGet'' smart constructor.
62+data GroupsGet' = GroupsGet'
5563 { _ggQuotaUser :: !(Maybe Text)
5664 , _ggPrettyPrint :: !Bool
5765 , _ggUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data GroupsGet = GroupsGet
5967 , _ggKey :: !(Maybe Text)
6068 , _ggOauthToken :: !(Maybe Text)
6169 , _ggFields :: !(Maybe Text)
62− , _ggAlt :: !Text
70+ , _ggAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'GroupsGet'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data GroupsGet = GroupsGet
8189-- * 'ggFields'
8290--
8391-- * 'ggAlt'
84−groupsGet
92+groupsGet'
8593 :: Text -- ^ 'groupKey'
86− -> GroupsGet
87−groupsGet pGgGroupKey_ =
88− GroupsGet
94+ -> GroupsGet'
95+groupsGet' pGgGroupKey_ =
96+ GroupsGet'
8997 { _ggQuotaUser = Nothing
9098 , _ggPrettyPrint = True
9199 , _ggUserIp = Nothing
@@ -93,7 +101,7 @@ groupsGet pGgGroupKey_ =
93101 , _ggKey = Nothing
94102 , _ggOauthToken = Nothing
95103 , _ggFields = Nothing
96− , _ggAlt = "json"
104+ , _ggAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -135,18 +143,20 @@ ggFields :: Lens' GroupsGet' (Maybe Text)
135143ggFields = lens _ggFields (\ s a -> s{_ggFields = a})
136144
137145-- | Data format for the response.
138−ggAlt :: Lens' GroupsGet' Text
146+ggAlt :: Lens' GroupsGet' Alt
139147ggAlt = lens _ggAlt (\ s a -> s{_ggAlt = a})
140148
141149instance GoogleRequest GroupsGet' where
142150 type Rs GroupsGet' = Group
143151 request = requestWithRoute defReq adminDirectoryURL
144− requestWithRoute r u GroupsGet{..}
145− = go _ggQuotaUser _ggPrettyPrint _ggUserIp
152+ requestWithRoute r u GroupsGet'{..}
153+ = go _ggQuotaUser (Just _ggPrettyPrint) _ggUserIp
146154 _ggGroupKey
147155 _ggKey
148156 _ggOauthToken
149157 _ggFields
150− _ggAlt
158+ (Just _ggAlt)
151159 where go
152− = clientWithRoute (Proxy :: Proxy GroupsGetAPI) r u
160+ = clientWithRoute (Proxy :: Proxy GroupsGetResource)
161+ r
162+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Insert.hs+31−19
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Create Group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsInsert@.
22−module Directory.Groups.Insert
23+module Network.Google.Resource.Directory.Groups.Insert
2324 (
2425 -- * REST Resource
25− GroupsInsertAPI
26+ GroupsInsertResource
2627
2728 -- * Creating a Request
28− , groupsInsert
29− , GroupsInsert
29+ , groupsInsert'
30+ , GroupsInsert'
3031
3132 -- * Request Lenses
3233 , giQuotaUser
@@ -42,20 +43,28 @@ import Network.Google.AdminDirectory.Types
4243import Network.Google.Prelude
4344
4445-- | A resource alias for @DirectoryGroupsInsert@ which the
45−-- 'GroupsInsert' request conforms to.
46−type GroupsInsertAPI = "groups" :> Post '[JSON] Group
46+-- 'GroupsInsert'' request conforms to.
47+type GroupsInsertResource =
48+ "groups" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Text :>
53+ QueryParam "oauth_token" Text :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" Alt :> Post '[JSON] Group
4756
4857-- | Create Group
4958--
50−-- /See:/ 'groupsInsert' smart constructor.
51−data GroupsInsert = GroupsInsert
59+-- /See:/ 'groupsInsert'' smart constructor.
60+data GroupsInsert' = GroupsInsert'
5261 { _giQuotaUser :: !(Maybe Text)
5362 , _giPrettyPrint :: !Bool
5463 , _giUserIp :: !(Maybe Text)
5564 , _giKey :: !(Maybe Text)
5665 , _giOauthToken :: !(Maybe Text)
5766 , _giFields :: !(Maybe Text)
58− , _giAlt :: !Text
67+ , _giAlt :: !Alt
5968 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6069
6170-- | Creates a value of 'GroupsInsert'' with the minimum fields required to make a request.
@@ -75,17 +84,17 @@ data GroupsInsert = GroupsInsert
7584-- * 'giFields'
7685--
7786-- * 'giAlt'
78−groupsInsert
79− :: GroupsInsert
80−groupsInsert =
81− GroupsInsert
87+groupsInsert'
88+ :: GroupsInsert'
89+groupsInsert' =
90+ GroupsInsert'
8291 { _giQuotaUser = Nothing
8392 , _giPrettyPrint = True
8493 , _giUserIp = Nothing
8594 , _giKey = Nothing
8695 , _giOauthToken = Nothing
8796 , _giFields = Nothing
88− , _giAlt = "json"
97+ , _giAlt = JSON
8998 }
9099
91100-- | Available to use for quota purposes for server-side applications. Can be
@@ -122,17 +131,20 @@ giFields :: Lens' GroupsInsert' (Maybe Text)
122131giFields = lens _giFields (\ s a -> s{_giFields = a})
123132
124133-- | Data format for the response.
125−giAlt :: Lens' GroupsInsert' Text
134+giAlt :: Lens' GroupsInsert' Alt
126135giAlt = lens _giAlt (\ s a -> s{_giAlt = a})
127136
128137instance GoogleRequest GroupsInsert' where
129138 type Rs GroupsInsert' = Group
130139 request = requestWithRoute defReq adminDirectoryURL
131− requestWithRoute r u GroupsInsert{..}
132− = go _giQuotaUser _giPrettyPrint _giUserIp _giKey
140+ requestWithRoute r u GroupsInsert'{..}
141+ = go _giQuotaUser (Just _giPrettyPrint) _giUserIp
142+ _giKey
133143 _giOauthToken
134144 _giFields
135− _giAlt
145+ (Just _giAlt)
136146 where go
137− = clientWithRoute (Proxy :: Proxy GroupsInsertAPI) r
147+ = clientWithRoute
148+ (Proxy :: Proxy GroupsInsertResource)
149+ r
138150 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/List.hs+35−24
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve all groups in a domain (paginated)
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsList@.
22−module Directory.Groups.List
23+module Network.Google.Resource.Directory.Groups.List
2324 (
2425 -- * REST Resource
25− GroupsListAPI
26+ GroupsListResource
2627
2728 -- * Creating a Request
28− , groupsList
29− , GroupsList
29+ , groupsList'
30+ , GroupsList'
3031
3132 -- * Request Lenses
3233 , glQuotaUser
@@ -47,19 +48,26 @@ import Network.Google.AdminDirectory.Types
4748import Network.Google.Prelude
4849
4950-- | A resource alias for @DirectoryGroupsList@ which the
50−-- 'GroupsList' request conforms to.
51−type GroupsListAPI =
51+-- 'GroupsList'' request conforms to.
52+type GroupsListResource =
5253 "groups" :>
53− QueryParam "domain" Text :>
54− QueryParam "customer" Text :>
55− QueryParam "pageToken" Text :>
56− QueryParam "userKey" Text :>
57− QueryParam "maxResults" Int32 :> Get '[JSON] Groups
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "domain" Text :>
58+ QueryParam "customer" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "pageToken" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "userKey" Text :>
63+ QueryParam "maxResults" Int32 :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :> Get '[JSON] Groups
5866
5967-- | Retrieve all groups in a domain (paginated)
6068--
61−-- /See:/ 'groupsList' smart constructor.
62−data GroupsList = GroupsList
69+-- /See:/ 'groupsList'' smart constructor.
70+data GroupsList' = GroupsList'
6371 { _glQuotaUser :: !(Maybe Text)
6472 , _glPrettyPrint :: !Bool
6573 , _glUserIp :: !(Maybe Text)
@@ -71,7 +79,7 @@ data GroupsList = GroupsList
7179 , _glUserKey :: !(Maybe Text)
7280 , _glMaxResults :: !(Maybe Int32)
7381 , _glFields :: !(Maybe Text)
74− , _glAlt :: !Text
82+ , _glAlt :: !Alt
7583 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7684
7785-- | Creates a value of 'GroupsList'' with the minimum fields required to make a request.
@@ -101,10 +109,10 @@ data GroupsList = GroupsList
101109-- * 'glFields'
102110--
103111-- * 'glAlt'
104−groupsList
105− :: GroupsList
106−groupsList =
107− GroupsList
112+groupsList'
113+ :: GroupsList'
114+groupsList' =
115+ GroupsList'
108116 { _glQuotaUser = Nothing
109117 , _glPrettyPrint = True
110118 , _glUserIp = Nothing
@@ -116,7 +124,7 @@ groupsList =
116124 , _glUserKey = Nothing
117125 , _glMaxResults = Nothing
118126 , _glFields = Nothing
119− , _glAlt = "json"
127+ , _glAlt = JSON
120128 }
121129
122130-- | Available to use for quota purposes for server-side applications. Can be
@@ -181,14 +189,15 @@ glFields :: Lens' GroupsList' (Maybe Text)
181189glFields = lens _glFields (\ s a -> s{_glFields = a})
182190
183191-- | Data format for the response.
184−glAlt :: Lens' GroupsList' Text
192+glAlt :: Lens' GroupsList' Alt
185193glAlt = lens _glAlt (\ s a -> s{_glAlt = a})
186194
187195instance GoogleRequest GroupsList' where
188196 type Rs GroupsList' = Groups
189197 request = requestWithRoute defReq adminDirectoryURL
190− requestWithRoute r u GroupsList{..}
191− = go _glQuotaUser _glPrettyPrint _glUserIp _glDomain
198+ requestWithRoute r u GroupsList'{..}
199+ = go _glQuotaUser (Just _glPrettyPrint) _glUserIp
200+ _glDomain
192201 _glCustomer
193202 _glKey
194203 _glPageToken
@@ -196,6 +205,8 @@ instance GoogleRequest GroupsList' where
196205 _glUserKey
197206 _glMaxResults
198207 _glFields
199− _glAlt
208+ (Just _glAlt)
200209 where go
201− = clientWithRoute (Proxy :: Proxy GroupsListAPI) r u
210+ = clientWithRoute (Proxy :: Proxy GroupsListResource)
211+ r
212+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Patch.hs+31−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update Group. This method supports patch semantics.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsPatch@.
22−module Directory.Groups.Patch
23+module Network.Google.Resource.Directory.Groups.Patch
2324 (
2425 -- * REST Resource
25− GroupsPatchAPI
26+ GroupsPatchResource
2627
2728 -- * Creating a Request
28− , groupsPatch
29− , GroupsPatch
29+ , groupsPatch'
30+ , GroupsPatch'
3031
3132 -- * Request Lenses
3233 , gpQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsPatch@ which the
46−-- 'GroupsPatch' request conforms to.
47−type GroupsPatchAPI =
47+-- 'GroupsPatch'' request conforms to.
48+type GroupsPatchResource =
4849 "groups" :>
49− Capture "groupKey" Text :> Patch '[JSON] Group
50+ Capture "groupKey" Text :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Patch '[JSON] Group
5058
5159-- | Update Group. This method supports patch semantics.
5260--
53−-- /See:/ 'groupsPatch' smart constructor.
54−data GroupsPatch = GroupsPatch
61+-- /See:/ 'groupsPatch'' smart constructor.
62+data GroupsPatch' = GroupsPatch'
5563 { _gpQuotaUser :: !(Maybe Text)
5664 , _gpPrettyPrint :: !Bool
5765 , _gpUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data GroupsPatch = GroupsPatch
5967 , _gpKey :: !(Maybe Text)
6068 , _gpOauthToken :: !(Maybe Text)
6169 , _gpFields :: !(Maybe Text)
62− , _gpAlt :: !Text
70+ , _gpAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'GroupsPatch'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data GroupsPatch = GroupsPatch
8189-- * 'gpFields'
8290--
8391-- * 'gpAlt'
84−groupsPatch
92+groupsPatch'
8593 :: Text -- ^ 'groupKey'
86− -> GroupsPatch
87−groupsPatch pGpGroupKey_ =
88− GroupsPatch
94+ -> GroupsPatch'
95+groupsPatch' pGpGroupKey_ =
96+ GroupsPatch'
8997 { _gpQuotaUser = Nothing
9098 , _gpPrettyPrint = True
9199 , _gpUserIp = Nothing
@@ -93,7 +101,7 @@ groupsPatch pGpGroupKey_ =
93101 , _gpKey = Nothing
94102 , _gpOauthToken = Nothing
95103 , _gpFields = Nothing
96− , _gpAlt = "json"
104+ , _gpAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,18 +144,21 @@ gpFields :: Lens' GroupsPatch' (Maybe Text)
136144gpFields = lens _gpFields (\ s a -> s{_gpFields = a})
137145
138146-- | Data format for the response.
139−gpAlt :: Lens' GroupsPatch' Text
147+gpAlt :: Lens' GroupsPatch' Alt
140148gpAlt = lens _gpAlt (\ s a -> s{_gpAlt = a})
141149
142150instance GoogleRequest GroupsPatch' where
143151 type Rs GroupsPatch' = Group
144152 request = requestWithRoute defReq adminDirectoryURL
145− requestWithRoute r u GroupsPatch{..}
146− = go _gpQuotaUser _gpPrettyPrint _gpUserIp
153+ requestWithRoute r u GroupsPatch'{..}
154+ = go _gpQuotaUser (Just _gpPrettyPrint) _gpUserIp
147155 _gpGroupKey
148156 _gpKey
149157 _gpOauthToken
150158 _gpFields
151− _gpAlt
159+ (Just _gpAlt)
152160 where go
153− = clientWithRoute (Proxy :: Proxy GroupsPatchAPI) r u
161+ = clientWithRoute
162+ (Proxy :: Proxy GroupsPatchResource)
163+ r
164+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Groups/Update.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update Group
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryGroupsUpdate@.
22−module Directory.Groups.Update
23+module Network.Google.Resource.Directory.Groups.Update
2324 (
2425 -- * REST Resource
25− GroupsUpdateAPI
26+ GroupsUpdateResource
2627
2728 -- * Creating a Request
28− , groupsUpdate
29− , GroupsUpdate
29+ , groupsUpdate'
30+ , GroupsUpdate'
3031
3132 -- * Request Lenses
3233 , guQuotaUser
@@ -43,15 +44,22 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryGroupsUpdate@ which the
46−-- 'GroupsUpdate' request conforms to.
47−type GroupsUpdateAPI =
47+-- 'GroupsUpdate'' request conforms to.
48+type GroupsUpdateResource =
4849 "groups" :>
49− Capture "groupKey" Text :> Put '[JSON] Group
50+ Capture "groupKey" Text :>
51+ QueryParam "quotaUser" Text :>
52+ QueryParam "prettyPrint" Bool :>
53+ QueryParam "userIp" Text :>
54+ QueryParam "key" Text :>
55+ QueryParam "oauth_token" Text :>
56+ QueryParam "fields" Text :>
57+ QueryParam "alt" Alt :> Put '[JSON] Group
5058
5159-- | Update Group
5260--
53−-- /See:/ 'groupsUpdate' smart constructor.
54−data GroupsUpdate = GroupsUpdate
61+-- /See:/ 'groupsUpdate'' smart constructor.
62+data GroupsUpdate' = GroupsUpdate'
5563 { _guQuotaUser :: !(Maybe Text)
5664 , _guPrettyPrint :: !Bool
5765 , _guUserIp :: !(Maybe Text)
@@ -59,7 +67,7 @@ data GroupsUpdate = GroupsUpdate
5967 , _guKey :: !(Maybe Text)
6068 , _guOauthToken :: !(Maybe Text)
6169 , _guFields :: !(Maybe Text)
62− , _guAlt :: !Text
70+ , _guAlt :: !Alt
6371 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6472
6573-- | Creates a value of 'GroupsUpdate'' with the minimum fields required to make a request.
@@ -81,11 +89,11 @@ data GroupsUpdate = GroupsUpdate
8189-- * 'guFields'
8290--
8391-- * 'guAlt'
84−groupsUpdate
92+groupsUpdate'
8593 :: Text -- ^ 'groupKey'
86− -> GroupsUpdate
87−groupsUpdate pGuGroupKey_ =
88− GroupsUpdate
94+ -> GroupsUpdate'
95+groupsUpdate' pGuGroupKey_ =
96+ GroupsUpdate'
8997 { _guQuotaUser = Nothing
9098 , _guPrettyPrint = True
9199 , _guUserIp = Nothing
@@ -93,7 +101,7 @@ groupsUpdate pGuGroupKey_ =
93101 , _guKey = Nothing
94102 , _guOauthToken = Nothing
95103 , _guFields = Nothing
96− , _guAlt = "json"
104+ , _guAlt = JSON
97105 }
98106
99107-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,19 +144,21 @@ guFields :: Lens' GroupsUpdate' (Maybe Text)
136144guFields = lens _guFields (\ s a -> s{_guFields = a})
137145
138146-- | Data format for the response.
139−guAlt :: Lens' GroupsUpdate' Text
147+guAlt :: Lens' GroupsUpdate' Alt
140148guAlt = lens _guAlt (\ s a -> s{_guAlt = a})
141149
142150instance GoogleRequest GroupsUpdate' where
143151 type Rs GroupsUpdate' = Group
144152 request = requestWithRoute defReq adminDirectoryURL
145− requestWithRoute r u GroupsUpdate{..}
146− = go _guQuotaUser _guPrettyPrint _guUserIp
153+ requestWithRoute r u GroupsUpdate'{..}
154+ = go _guQuotaUser (Just _guPrettyPrint) _guUserIp
147155 _guGroupKey
148156 _guKey
149157 _guOauthToken
150158 _guFields
151− _guAlt
159+ (Just _guAlt)
152160 where go
153− = clientWithRoute (Proxy :: Proxy GroupsUpdateAPI) r
161+ = clientWithRoute
162+ (Proxy :: Proxy GroupsUpdateResource)
163+ r
154164 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Delete.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Remove membership.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersDelete@.
22−module Directory.Members.Delete
23+module Network.Google.Resource.Directory.Members.Delete
2324 (
2425 -- * REST Resource
25− MembersDeleteAPI
26+ MembersDeleteResource
2627
2728 -- * Creating a Request
28− , membersDelete
29− , MembersDelete
29+ , membersDelete'
30+ , MembersDelete'
3031
3132 -- * Request Lenses
3233 , mdQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryMembersDelete@ which the
47−-- 'MembersDelete' request conforms to.
48−type MembersDeleteAPI =
48+-- 'MembersDelete'' request conforms to.
49+type MembersDeleteResource =
4950 "groups" :>
5051 Capture "groupKey" Text :>
5152 "members" :>
52− Capture "memberKey" Text :> Delete '[JSON] ()
53+ Capture "memberKey" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Delete '[JSON] ()
5361
5462-- | Remove membership.
5563--
56−-- /See:/ 'membersDelete' smart constructor.
57−data MembersDelete = MembersDelete
64+-- /See:/ 'membersDelete'' smart constructor.
65+data MembersDelete' = MembersDelete'
5866 { _mdQuotaUser :: !(Maybe Text)
5967 , _mdMemberKey :: !Text
6068 , _mdPrettyPrint :: !Bool
@@ -63,7 +71,7 @@ data MembersDelete = MembersDelete
6371 , _mdKey :: !(Maybe Text)
6472 , _mdOauthToken :: !(Maybe Text)
6573 , _mdFields :: !(Maybe Text)
66− , _mdAlt :: !Text
74+ , _mdAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'MembersDelete'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data MembersDelete = MembersDelete
8795-- * 'mdFields'
8896--
8997-- * 'mdAlt'
90−membersDelete
98+membersDelete'
9199 :: Text -- ^ 'memberKey'
92100 -> Text -- ^ 'groupKey'
93− -> MembersDelete
94−membersDelete pMdMemberKey_ pMdGroupKey_ =
95− MembersDelete
101+ -> MembersDelete'
102+membersDelete' pMdMemberKey_ pMdGroupKey_ =
103+ MembersDelete'
96104 { _mdQuotaUser = Nothing
97105 , _mdMemberKey = pMdMemberKey_
98106 , _mdPrettyPrint = True
@@ -101,7 +109,7 @@ membersDelete pMdMemberKey_ pMdGroupKey_ =
101109 , _mdKey = Nothing
102110 , _mdOauthToken = Nothing
103111 , _mdFields = Nothing
104− , _mdAlt = "json"
112+ , _mdAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -148,20 +156,22 @@ mdFields :: Lens' MembersDelete' (Maybe Text)
148156mdFields = lens _mdFields (\ s a -> s{_mdFields = a})
149157
150158-- | Data format for the response.
151−mdAlt :: Lens' MembersDelete' Text
159+mdAlt :: Lens' MembersDelete' Alt
152160mdAlt = lens _mdAlt (\ s a -> s{_mdAlt = a})
153161
154162instance GoogleRequest MembersDelete' where
155163 type Rs MembersDelete' = ()
156164 request = requestWithRoute defReq adminDirectoryURL
157− requestWithRoute r u MembersDelete{..}
158− = go _mdQuotaUser _mdMemberKey _mdPrettyPrint
165+ requestWithRoute r u MembersDelete'{..}
166+ = go _mdQuotaUser _mdMemberKey (Just _mdPrettyPrint)
159167 _mdUserIp
160168 _mdGroupKey
161169 _mdKey
162170 _mdOauthToken
163171 _mdFields
164− _mdAlt
172+ (Just _mdAlt)
165173 where go
166− = clientWithRoute (Proxy :: Proxy MembersDeleteAPI) r
174+ = clientWithRoute
175+ (Proxy :: Proxy MembersDeleteResource)
176+ r
167177 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Get.hs+96−82
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,148 +20,161 @@
1920-- | Retrieve Group Member
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersGet@.
22−module Directory.Members.Get
23+module Network.Google.Resource.Directory.Members.Get
2324 (
2425 -- * REST Resource
25− MembersGetAPI
26+ MembersGetResource
2627
2728 -- * Creating a Request
28− , membersGet
29− , MembersGet
29+ , membersGet'
30+ , MembersGet'
3031
3132 -- * Request Lenses
32− , mgQuotaUser
33− , mgMemberKey
34− , mgPrettyPrint
35− , mgUserIp
36− , mgGroupKey
37− , mgKey
38− , mgOauthToken
39− , mgFields
40− , mgAlt
33+ , memQuotaUser
34+ , memMemberKey
35+ , memPrettyPrint
36+ , memUserIp
37+ , memGroupKey
38+ , memKey
39+ , memOauthToken
40+ , memFields
41+ , memAlt
4142 ) where
4243
4344import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryMembersGet@ which the
47−-- 'MembersGet' request conforms to.
48−type MembersGetAPI =
48+-- 'MembersGet'' request conforms to.
49+type MembersGetResource =
4950 "groups" :>
5051 Capture "groupKey" Text :>
5152 "members" :>
52− Capture "memberKey" Text :> Get '[JSON] Member
53+ Capture "memberKey" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Member
5361
5462-- | Retrieve Group Member
5563--
56−-- /See:/ 'membersGet' smart constructor.
57−data MembersGet = MembersGet
58− { _mgQuotaUser :: !(Maybe Text)
59− , _mgMemberKey :: !Text
60− , _mgPrettyPrint :: !Bool
61− , _mgUserIp :: !(Maybe Text)
62− , _mgGroupKey :: !Text
63− , _mgKey :: !(Maybe Text)
64− , _mgOauthToken :: !(Maybe Text)
65− , _mgFields :: !(Maybe Text)
66− , _mgAlt :: !Text
64+-- /See:/ 'membersGet'' smart constructor.
65+data MembersGet' = MembersGet'
66+ { _memQuotaUser :: !(Maybe Text)
67+ , _memMemberKey :: !Text
68+ , _memPrettyPrint :: !Bool
69+ , _memUserIp :: !(Maybe Text)
70+ , _memGroupKey :: !Text
71+ , _memKey :: !(Maybe Text)
72+ , _memOauthToken :: !(Maybe Text)
73+ , _memFields :: !(Maybe Text)
74+ , _memAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'MembersGet'' with the minimum fields required to make a request.
7078--
7179-- Use one of the following lenses to modify other fields as desired:
7280--
73−-- * 'mgQuotaUser'
81+-- * 'memQuotaUser'
7482--
75−-- * 'mgMemberKey'
83+-- * 'memMemberKey'
7684--
77−-- * 'mgPrettyPrint'
85+-- * 'memPrettyPrint'
7886--
79−-- * 'mgUserIp'
87+-- * 'memUserIp'
8088--
81−-- * 'mgGroupKey'
89+-- * 'memGroupKey'
8290--
83−-- * 'mgKey'
91+-- * 'memKey'
8492--
85−-- * 'mgOauthToken'
93+-- * 'memOauthToken'
8694--
87−-- * 'mgFields'
95+-- * 'memFields'
8896--
89−-- * 'mgAlt'
90−membersGet
97+-- * 'memAlt'
98+membersGet'
9199 :: Text -- ^ 'memberKey'
92100 -> Text -- ^ 'groupKey'
93− -> MembersGet
94−membersGet pMgMemberKey_ pMgGroupKey_ =
95− MembersGet
96− { _mgQuotaUser = Nothing
97− , _mgMemberKey = pMgMemberKey_
98− , _mgPrettyPrint = True
99− , _mgUserIp = Nothing
100− , _mgGroupKey = pMgGroupKey_
101− , _mgKey = Nothing
102− , _mgOauthToken = Nothing
103− , _mgFields = Nothing
104− , _mgAlt = "json"
101+ -> MembersGet'
102+membersGet' pMemMemberKey_ pMemGroupKey_ =
103+ MembersGet'
104+ { _memQuotaUser = Nothing
105+ , _memMemberKey = pMemMemberKey_
106+ , _memPrettyPrint = True
107+ , _memUserIp = Nothing
108+ , _memGroupKey = pMemGroupKey_
109+ , _memKey = Nothing
110+ , _memOauthToken = Nothing
111+ , _memFields = Nothing
112+ , _memAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
108116-- any arbitrary string assigned to a user, but should not exceed 40
109117-- characters. Overrides userIp if both are provided.
110−mgQuotaUser :: Lens' MembersGet' (Maybe Text)
111−mgQuotaUser
112− = lens _mgQuotaUser (\ s a -> s{_mgQuotaUser = a})
118+memQuotaUser :: Lens' MembersGet' (Maybe Text)
119+memQuotaUser
120+ = lens _memQuotaUser (\ s a -> s{_memQuotaUser = a})
113121
114122-- | Email or immutable Id of the member
115−mgMemberKey :: Lens' MembersGet' Text
116−mgMemberKey
117− = lens _mgMemberKey (\ s a -> s{_mgMemberKey = a})
123+memMemberKey :: Lens' MembersGet' Text
124+memMemberKey
125+ = lens _memMemberKey (\ s a -> s{_memMemberKey = a})
118126
119127-- | Returns response with indentations and line breaks.
120−mgPrettyPrint :: Lens' MembersGet' Bool
121−mgPrettyPrint
122− = lens _mgPrettyPrint
123− (\ s a -> s{_mgPrettyPrint = a})
128+memPrettyPrint :: Lens' MembersGet' Bool
129+memPrettyPrint
130+ = lens _memPrettyPrint
131+ (\ s a -> s{_memPrettyPrint = a})
124132
125133-- | IP address of the site where the request originates. Use this if you
126134-- want to enforce per-user limits.
127−mgUserIp :: Lens' MembersGet' (Maybe Text)
128−mgUserIp = lens _mgUserIp (\ s a -> s{_mgUserIp = a})
135+memUserIp :: Lens' MembersGet' (Maybe Text)
136+memUserIp
137+ = lens _memUserIp (\ s a -> s{_memUserIp = a})
129138
130139-- | Email or immutable Id of the group
131−mgGroupKey :: Lens' MembersGet' Text
132−mgGroupKey
133− = lens _mgGroupKey (\ s a -> s{_mgGroupKey = a})
140+memGroupKey :: Lens' MembersGet' Text
141+memGroupKey
142+ = lens _memGroupKey (\ s a -> s{_memGroupKey = a})
134143
135144-- | API key. Your API key identifies your project and provides you with API
136145-- access, quota, and reports. Required unless you provide an OAuth 2.0
137146-- token.
138−mgKey :: Lens' MembersGet' (Maybe Text)
139−mgKey = lens _mgKey (\ s a -> s{_mgKey = a})
147+memKey :: Lens' MembersGet' (Maybe Text)
148+memKey = lens _memKey (\ s a -> s{_memKey = a})
140149
141150-- | OAuth 2.0 token for the current user.
142−mgOauthToken :: Lens' MembersGet' (Maybe Text)
143−mgOauthToken
144− = lens _mgOauthToken (\ s a -> s{_mgOauthToken = a})
151+memOauthToken :: Lens' MembersGet' (Maybe Text)
152+memOauthToken
153+ = lens _memOauthToken
154+ (\ s a -> s{_memOauthToken = a})
145155
146156-- | Selector specifying which fields to include in a partial response.
147−mgFields :: Lens' MembersGet' (Maybe Text)
148−mgFields = lens _mgFields (\ s a -> s{_mgFields = a})
157+memFields :: Lens' MembersGet' (Maybe Text)
158+memFields
159+ = lens _memFields (\ s a -> s{_memFields = a})
149160
150161-- | Data format for the response.
151−mgAlt :: Lens' MembersGet' Text
152−mgAlt = lens _mgAlt (\ s a -> s{_mgAlt = a})
162+memAlt :: Lens' MembersGet' Alt
163+memAlt = lens _memAlt (\ s a -> s{_memAlt = a})
153164
154165instance GoogleRequest MembersGet' where
155166 type Rs MembersGet' = Member
156167 request = requestWithRoute defReq adminDirectoryURL
157− requestWithRoute r u MembersGet{..}
158− = go _mgQuotaUser _mgMemberKey _mgPrettyPrint
159− _mgUserIp
160− _mgGroupKey
161− _mgKey
162− _mgOauthToken
163− _mgFields
164− _mgAlt
168+ requestWithRoute r u MembersGet'{..}
169+ = go _memQuotaUser _memMemberKey
170+ (Just _memPrettyPrint)
171+ _memUserIp
172+ _memGroupKey
173+ _memKey
174+ _memOauthToken
175+ _memFields
176+ (Just _memAlt)
165177 where go
166− = clientWithRoute (Proxy :: Proxy MembersGetAPI) r u
178+ = clientWithRoute (Proxy :: Proxy MembersGetResource)
179+ r
180+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Insert.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Add user to the specified group.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersInsert@.
22−module Directory.Members.Insert
23+module Network.Google.Resource.Directory.Members.Insert
2324 (
2425 -- * REST Resource
25− MembersInsertAPI
26+ MembersInsertResource
2627
2728 -- * Creating a Request
28− , membersInsert
29− , MembersInsert
29+ , membersInsert'
30+ , MembersInsert'
3031
3132 -- * Request Lenses
3233 , miQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryMembersInsert@ which the
46−-- 'MembersInsert' request conforms to.
47−type MembersInsertAPI =
47+-- 'MembersInsert'' request conforms to.
48+type MembersInsertResource =
4849 "groups" :>
4950 Capture "groupKey" Text :>
50− "members" :> Post '[JSON] Member
51+ "members" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Post '[JSON] Member
5159
5260-- | Add user to the specified group.
5361--
54−-- /See:/ 'membersInsert' smart constructor.
55−data MembersInsert = MembersInsert
62+-- /See:/ 'membersInsert'' smart constructor.
63+data MembersInsert' = MembersInsert'
5664 { _miQuotaUser :: !(Maybe Text)
5765 , _miPrettyPrint :: !Bool
5866 , _miUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data MembersInsert = MembersInsert
6068 , _miKey :: !(Maybe Text)
6169 , _miOauthToken :: !(Maybe Text)
6270 , _miFields :: !(Maybe Text)
63− , _miAlt :: !Text
71+ , _miAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'MembersInsert'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data MembersInsert = MembersInsert
8290-- * 'miFields'
8391--
8492-- * 'miAlt'
85−membersInsert
93+membersInsert'
8694 :: Text -- ^ 'groupKey'
87− -> MembersInsert
88−membersInsert pMiGroupKey_ =
89− MembersInsert
95+ -> MembersInsert'
96+membersInsert' pMiGroupKey_ =
97+ MembersInsert'
9098 { _miQuotaUser = Nothing
9199 , _miPrettyPrint = True
92100 , _miUserIp = Nothing
@@ -94,7 +102,7 @@ membersInsert pMiGroupKey_ =
94102 , _miKey = Nothing
95103 , _miOauthToken = Nothing
96104 , _miFields = Nothing
97− , _miAlt = "json"
105+ , _miAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,19 +144,21 @@ miFields :: Lens' MembersInsert' (Maybe Text)
136144miFields = lens _miFields (\ s a -> s{_miFields = a})
137145
138146-- | Data format for the response.
139−miAlt :: Lens' MembersInsert' Text
147+miAlt :: Lens' MembersInsert' Alt
140148miAlt = lens _miAlt (\ s a -> s{_miAlt = a})
141149
142150instance GoogleRequest MembersInsert' where
143151 type Rs MembersInsert' = Member
144152 request = requestWithRoute defReq adminDirectoryURL
145− requestWithRoute r u MembersInsert{..}
146− = go _miQuotaUser _miPrettyPrint _miUserIp
153+ requestWithRoute r u MembersInsert'{..}
154+ = go _miQuotaUser (Just _miPrettyPrint) _miUserIp
147155 _miGroupKey
148156 _miKey
149157 _miOauthToken
150158 _miFields
151− _miAlt
159+ (Just _miAlt)
152160 where go
153− = clientWithRoute (Proxy :: Proxy MembersInsertAPI) r
161+ = clientWithRoute
162+ (Proxy :: Proxy MembersInsertResource)
163+ r
154164 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/List.hs+34−22
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve all members in a group (paginated)
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersList@.
22−module Directory.Members.List
23+module Network.Google.Resource.Directory.Members.List
2324 (
2425 -- * REST Resource
25− MembersListAPI
26+ MembersListResource
2627
2728 -- * Creating a Request
28− , membersList
29− , MembersList
29+ , membersList'
30+ , MembersList'
3031
3132 -- * Request Lenses
3233 , mlQuotaUser
@@ -46,19 +47,26 @@ import Network.Google.AdminDirectory.Types
4647import Network.Google.Prelude
4748
4849-- | A resource alias for @DirectoryMembersList@ which the
49−-- 'MembersList' request conforms to.
50−type MembersListAPI =
50+-- 'MembersList'' request conforms to.
51+type MembersListResource =
5152 "groups" :>
5253 Capture "groupKey" Text :>
5354 "members" :>
54− QueryParam "roles" Text :>
55− QueryParam "pageToken" Text :>
56− QueryParam "maxResults" Int32 :> Get '[JSON] Members
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "roles" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "pageToken" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "maxResults" Int32 :>
63+ QueryParam "fields" Text :>
64+ QueryParam "alt" Alt :> Get '[JSON] Members
5765
5866-- | Retrieve all members in a group (paginated)
5967--
60−-- /See:/ 'membersList' smart constructor.
61−data MembersList = MembersList
68+-- /See:/ 'membersList'' smart constructor.
69+data MembersList' = MembersList'
6270 { _mlQuotaUser :: !(Maybe Text)
6371 , _mlRoles :: !(Maybe Text)
6472 , _mlPrettyPrint :: !Bool
@@ -69,7 +77,7 @@ data MembersList = MembersList
6977 , _mlOauthToken :: !(Maybe Text)
7078 , _mlMaxResults :: !(Maybe Int32)
7179 , _mlFields :: !(Maybe Text)
72− , _mlAlt :: !Text
80+ , _mlAlt :: !Alt
7381 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7482
7583-- | Creates a value of 'MembersList'' with the minimum fields required to make a request.
@@ -97,11 +105,11 @@ data MembersList = MembersList
97105-- * 'mlFields'
98106--
99107-- * 'mlAlt'
100−membersList
108+membersList'
101109 :: Text -- ^ 'groupKey'
102− -> MembersList
103−membersList pMlGroupKey_ =
104− MembersList
110+ -> MembersList'
111+membersList' pMlGroupKey_ =
112+ MembersList'
105113 { _mlQuotaUser = Nothing
106114 , _mlRoles = Nothing
107115 , _mlPrettyPrint = True
@@ -112,7 +120,7 @@ membersList pMlGroupKey_ =
112120 , _mlOauthToken = Nothing
113121 , _mlMaxResults = Nothing
114122 , _mlFields = Nothing
115− , _mlAlt = "json"
123+ , _mlAlt = JSON
116124 }
117125
118126-- | Available to use for quota purposes for server-side applications. Can be
@@ -168,20 +176,24 @@ mlFields :: Lens' MembersList' (Maybe Text)
168176mlFields = lens _mlFields (\ s a -> s{_mlFields = a})
169177
170178-- | Data format for the response.
171−mlAlt :: Lens' MembersList' Text
179+mlAlt :: Lens' MembersList' Alt
172180mlAlt = lens _mlAlt (\ s a -> s{_mlAlt = a})
173181
174182instance GoogleRequest MembersList' where
175183 type Rs MembersList' = Members
176184 request = requestWithRoute defReq adminDirectoryURL
177− requestWithRoute r u MembersList{..}
178− = go _mlQuotaUser _mlRoles _mlPrettyPrint _mlUserIp
185+ requestWithRoute r u MembersList'{..}
186+ = go _mlQuotaUser _mlRoles (Just _mlPrettyPrint)
187+ _mlUserIp
179188 _mlGroupKey
180189 _mlKey
181190 _mlPageToken
182191 _mlOauthToken
183192 _mlMaxResults
184193 _mlFields
185− _mlAlt
194+ (Just _mlAlt)
186195 where go
187− = clientWithRoute (Proxy :: Proxy MembersListAPI) r u
196+ = clientWithRoute
197+ (Proxy :: Proxy MembersListResource)
198+ r
199+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Patch.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -20,14 +21,14 @@
2021-- patch semantics.
2122--
2223-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersPatch@.
23−module Directory.Members.Patch
24+module Network.Google.Resource.Directory.Members.Patch
2425 (
2526 -- * REST Resource
26− MembersPatchAPI
27+ MembersPatchResource
2728
2829 -- * Creating a Request
29− , membersPatch
30− , MembersPatch
30+ , membersPatch'
31+ , MembersPatch'
3132
3233 -- * Request Lenses
3334 , mpQuotaUser
@@ -45,18 +46,25 @@ import Network.Google.AdminDirectory.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DirectoryMembersPatch@ which the
48−-- 'MembersPatch' request conforms to.
49−type MembersPatchAPI =
49+-- 'MembersPatch'' request conforms to.
50+type MembersPatchResource =
5051 "groups" :>
5152 Capture "groupKey" Text :>
5253 "members" :>
53− Capture "memberKey" Text :> Patch '[JSON] Member
54+ Capture "memberKey" Text :>
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "userIp" Text :>
58+ QueryParam "key" Text :>
59+ QueryParam "oauth_token" Text :>
60+ QueryParam "fields" Text :>
61+ QueryParam "alt" Alt :> Patch '[JSON] Member
5462
5563-- | Update membership of a user in the specified group. This method supports
5664-- patch semantics.
5765--
58−-- /See:/ 'membersPatch' smart constructor.
59−data MembersPatch = MembersPatch
66+-- /See:/ 'membersPatch'' smart constructor.
67+data MembersPatch' = MembersPatch'
6068 { _mpQuotaUser :: !(Maybe Text)
6169 , _mpMemberKey :: !Text
6270 , _mpPrettyPrint :: !Bool
@@ -65,7 +73,7 @@ data MembersPatch = MembersPatch
6573 , _mpKey :: !(Maybe Text)
6674 , _mpOauthToken :: !(Maybe Text)
6775 , _mpFields :: !(Maybe Text)
68− , _mpAlt :: !Text
76+ , _mpAlt :: !Alt
6977 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7078
7179-- | Creates a value of 'MembersPatch'' with the minimum fields required to make a request.
@@ -89,12 +97,12 @@ data MembersPatch = MembersPatch
8997-- * 'mpFields'
9098--
9199-- * 'mpAlt'
92−membersPatch
100+membersPatch'
93101 :: Text -- ^ 'memberKey'
94102 -> Text -- ^ 'groupKey'
95− -> MembersPatch
96−membersPatch pMpMemberKey_ pMpGroupKey_ =
97− MembersPatch
103+ -> MembersPatch'
104+membersPatch' pMpMemberKey_ pMpGroupKey_ =
105+ MembersPatch'
98106 { _mpQuotaUser = Nothing
99107 , _mpMemberKey = pMpMemberKey_
100108 , _mpPrettyPrint = True
@@ -103,7 +111,7 @@ membersPatch pMpMemberKey_ pMpGroupKey_ =
103111 , _mpKey = Nothing
104112 , _mpOauthToken = Nothing
105113 , _mpFields = Nothing
106− , _mpAlt = "json"
114+ , _mpAlt = JSON
107115 }
108116
109117-- | Available to use for quota purposes for server-side applications. Can be
@@ -152,20 +160,22 @@ mpFields :: Lens' MembersPatch' (Maybe Text)
152160mpFields = lens _mpFields (\ s a -> s{_mpFields = a})
153161
154162-- | Data format for the response.
155−mpAlt :: Lens' MembersPatch' Text
163+mpAlt :: Lens' MembersPatch' Alt
156164mpAlt = lens _mpAlt (\ s a -> s{_mpAlt = a})
157165
158166instance GoogleRequest MembersPatch' where
159167 type Rs MembersPatch' = Member
160168 request = requestWithRoute defReq adminDirectoryURL
161− requestWithRoute r u MembersPatch{..}
162− = go _mpQuotaUser _mpMemberKey _mpPrettyPrint
169+ requestWithRoute r u MembersPatch'{..}
170+ = go _mpQuotaUser _mpMemberKey (Just _mpPrettyPrint)
163171 _mpUserIp
164172 _mpGroupKey
165173 _mpKey
166174 _mpOauthToken
167175 _mpFields
168− _mpAlt
176+ (Just _mpAlt)
169177 where go
170− = clientWithRoute (Proxy :: Proxy MembersPatchAPI) r
178+ = clientWithRoute
179+ (Proxy :: Proxy MembersPatchResource)
180+ r
171181 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Members/Update.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Update membership of a user in the specified group.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMembersUpdate@.
22−module Directory.Members.Update
23+module Network.Google.Resource.Directory.Members.Update
2324 (
2425 -- * REST Resource
25− MembersUpdateAPI
26+ MembersUpdateResource
2627
2728 -- * Creating a Request
28− , membersUpdate
29− , MembersUpdate
29+ , membersUpdate'
30+ , MembersUpdate'
3031
3132 -- * Request Lenses
3233 , muQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryMembersUpdate@ which the
47−-- 'MembersUpdate' request conforms to.
48−type MembersUpdateAPI =
48+-- 'MembersUpdate'' request conforms to.
49+type MembersUpdateResource =
4950 "groups" :>
5051 Capture "groupKey" Text :>
5152 "members" :>
52− Capture "memberKey" Text :> Put '[JSON] Member
53+ Capture "memberKey" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Put '[JSON] Member
5361
5462-- | Update membership of a user in the specified group.
5563--
56−-- /See:/ 'membersUpdate' smart constructor.
57−data MembersUpdate = MembersUpdate
64+-- /See:/ 'membersUpdate'' smart constructor.
65+data MembersUpdate' = MembersUpdate'
5866 { _muQuotaUser :: !(Maybe Text)
5967 , _muMemberKey :: !Text
6068 , _muPrettyPrint :: !Bool
@@ -63,7 +71,7 @@ data MembersUpdate = MembersUpdate
6371 , _muKey :: !(Maybe Text)
6472 , _muOauthToken :: !(Maybe Text)
6573 , _muFields :: !(Maybe Text)
66− , _muAlt :: !Text
74+ , _muAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'MembersUpdate'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data MembersUpdate = MembersUpdate
8795-- * 'muFields'
8896--
8997-- * 'muAlt'
90−membersUpdate
98+membersUpdate'
9199 :: Text -- ^ 'memberKey'
92100 -> Text -- ^ 'groupKey'
93− -> MembersUpdate
94−membersUpdate pMuMemberKey_ pMuGroupKey_ =
95− MembersUpdate
101+ -> MembersUpdate'
102+membersUpdate' pMuMemberKey_ pMuGroupKey_ =
103+ MembersUpdate'
96104 { _muQuotaUser = Nothing
97105 , _muMemberKey = pMuMemberKey_
98106 , _muPrettyPrint = True
@@ -101,7 +109,7 @@ membersUpdate pMuMemberKey_ pMuGroupKey_ =
101109 , _muKey = Nothing
102110 , _muOauthToken = Nothing
103111 , _muFields = Nothing
104− , _muAlt = "json"
112+ , _muAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,20 +158,22 @@ muFields :: Lens' MembersUpdate' (Maybe Text)
150158muFields = lens _muFields (\ s a -> s{_muFields = a})
151159
152160-- | Data format for the response.
153−muAlt :: Lens' MembersUpdate' Text
161+muAlt :: Lens' MembersUpdate' Alt
154162muAlt = lens _muAlt (\ s a -> s{_muAlt = a})
155163
156164instance GoogleRequest MembersUpdate' where
157165 type Rs MembersUpdate' = Member
158166 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u MembersUpdate{..}
160− = go _muQuotaUser _muMemberKey _muPrettyPrint
167+ requestWithRoute r u MembersUpdate'{..}
168+ = go _muQuotaUser _muMemberKey (Just _muPrettyPrint)
161169 _muUserIp
162170 _muGroupKey
163171 _muKey
164172 _muOauthToken
165173 _muFields
166− _muAlt
174+ (Just _muAlt)
167175 where go
168− = clientWithRoute (Proxy :: Proxy MembersUpdateAPI) r
176+ = clientWithRoute
177+ (Proxy :: Proxy MembersUpdateResource)
178+ r
169179 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Mobiledevices/Action.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Take action on Mobile Device
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMobiledevicesAction@.
22−module Directory.Mobiledevices.Action
23+module Network.Google.Resource.Directory.Mobiledevices.Action
2324 (
2425 -- * REST Resource
25− MobiledevicesActionAPI
26+ MobiledevicesActionResource
2627
2728 -- * Creating a Request
28− , mobiledevicesAction
29− , MobiledevicesAction
29+ , mobiledevicesAction'
30+ , MobiledevicesAction'
3031
3132 -- * Request Lenses
3233 , maQuotaUser
@@ -44,19 +45,26 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryMobiledevicesAction@ which the
47−-- 'MobiledevicesAction' request conforms to.
48−type MobiledevicesActionAPI =
48+-- 'MobiledevicesAction'' request conforms to.
49+type MobiledevicesActionResource =
4950 "customer" :>
5051 Capture "customerId" Text :>
5152 "devices" :>
5253 "mobile" :>
5354 Capture "resourceId" Text :>
54− "action" :> Post '[JSON] ()
55+ "action" :>
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "oauth_token" Text :>
61+ QueryParam "fields" Text :>
62+ QueryParam "alt" Alt :> Post '[JSON] ()
5563
5664-- | Take action on Mobile Device
5765--
58−-- /See:/ 'mobiledevicesAction' smart constructor.
59−data MobiledevicesAction = MobiledevicesAction
66+-- /See:/ 'mobiledevicesAction'' smart constructor.
67+data MobiledevicesAction' = MobiledevicesAction'
6068 { _maQuotaUser :: !(Maybe Text)
6169 , _maResourceId :: !Text
6270 , _maPrettyPrint :: !Bool
@@ -65,7 +73,7 @@ data MobiledevicesAction = MobiledevicesAction
6573 , _maKey :: !(Maybe Text)
6674 , _maOauthToken :: !(Maybe Text)
6775 , _maFields :: !(Maybe Text)
68− , _maAlt :: !Text
76+ , _maAlt :: !Alt
6977 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7078
7179-- | Creates a value of 'MobiledevicesAction'' with the minimum fields required to make a request.
@@ -89,12 +97,12 @@ data MobiledevicesAction = MobiledevicesAction
8997-- * 'maFields'
9098--
9199-- * 'maAlt'
92−mobiledevicesAction
100+mobiledevicesAction'
93101 :: Text -- ^ 'resourceId'
94102 -> Text -- ^ 'customerId'
95− -> MobiledevicesAction
96−mobiledevicesAction pMaResourceId_ pMaCustomerId_ =
97− MobiledevicesAction
103+ -> MobiledevicesAction'
104+mobiledevicesAction' pMaResourceId_ pMaCustomerId_ =
105+ MobiledevicesAction'
98106 { _maQuotaUser = Nothing
99107 , _maResourceId = pMaResourceId_
100108 , _maPrettyPrint = True
@@ -103,7 +111,7 @@ mobiledevicesAction pMaResourceId_ pMaCustomerId_ =
103111 , _maKey = Nothing
104112 , _maOauthToken = Nothing
105113 , _maFields = Nothing
106− , _maAlt = "json"
114+ , _maAlt = JSON
107115 }
108116
109117-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,22 +158,22 @@ maFields :: Lens' MobiledevicesAction' (Maybe Text)
150158maFields = lens _maFields (\ s a -> s{_maFields = a})
151159
152160-- | Data format for the response.
153−maAlt :: Lens' MobiledevicesAction' Text
161+maAlt :: Lens' MobiledevicesAction' Alt
154162maAlt = lens _maAlt (\ s a -> s{_maAlt = a})
155163
156164instance GoogleRequest MobiledevicesAction' where
157165 type Rs MobiledevicesAction' = ()
158166 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u MobiledevicesAction{..}
160− = go _maQuotaUser _maResourceId _maPrettyPrint
167+ requestWithRoute r u MobiledevicesAction'{..}
168+ = go _maQuotaUser _maResourceId (Just _maPrettyPrint)
161169 _maUserIp
162170 _maCustomerId
163171 _maKey
164172 _maOauthToken
165173 _maFields
166− _maAlt
174+ (Just _maAlt)
167175 where go
168176 = clientWithRoute
169− (Proxy :: Proxy MobiledevicesActionAPI)
177+ (Proxy :: Proxy MobiledevicesActionResource)
170178 r
171179 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Mobiledevices/Delete.hs+96−87
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,157 +20,165 @@
1920-- | Delete Mobile Device
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMobiledevicesDelete@.
22−module Directory.Mobiledevices.Delete
23+module Network.Google.Resource.Directory.Mobiledevices.Delete
2324 (
2425 -- * REST Resource
25− MobiledevicesDeleteAPI
26+ MobiledevicesDeleteResource
2627
2728 -- * Creating a Request
28− , mobiledevicesDelete
29− , MobiledevicesDelete
29+ , mobiledevicesDelete'
30+ , MobiledevicesDelete'
3031
3132 -- * Request Lenses
32− , mddQuotaUser
33− , mddResourceId
34− , mddPrettyPrint
35− , mddUserIp
36− , mddCustomerId
37− , mddKey
38− , mddOauthToken
39− , mddFields
40− , mddAlt
33+ , mobQuotaUser
34+ , mobResourceId
35+ , mobPrettyPrint
36+ , mobUserIp
37+ , mobCustomerId
38+ , mobKey
39+ , mobOauthToken
40+ , mobFields
41+ , mobAlt
4142 ) where
4243
4344import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryMobiledevicesDelete@ which the
47−-- 'MobiledevicesDelete' request conforms to.
48−type MobiledevicesDeleteAPI =
48+-- 'MobiledevicesDelete'' request conforms to.
49+type MobiledevicesDeleteResource =
4950 "customer" :>
5051 Capture "customerId" Text :>
5152 "devices" :>
5253 "mobile" :>
53− Capture "resourceId" Text :> Delete '[JSON] ()
54+ Capture "resourceId" Text :>
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "userIp" Text :>
58+ QueryParam "key" Text :>
59+ QueryParam "oauth_token" Text :>
60+ QueryParam "fields" Text :>
61+ QueryParam "alt" Alt :> Delete '[JSON] ()
5462
5563-- | Delete Mobile Device
5664--
57−-- /See:/ 'mobiledevicesDelete' smart constructor.
58−data MobiledevicesDelete = MobiledevicesDelete
59− { _mddQuotaUser :: !(Maybe Text)
60− , _mddResourceId :: !Text
61− , _mddPrettyPrint :: !Bool
62− , _mddUserIp :: !(Maybe Text)
63− , _mddCustomerId :: !Text
64− , _mddKey :: !(Maybe Text)
65− , _mddOauthToken :: !(Maybe Text)
66− , _mddFields :: !(Maybe Text)
67− , _mddAlt :: !Text
65+-- /See:/ 'mobiledevicesDelete'' smart constructor.
66+data MobiledevicesDelete' = MobiledevicesDelete'
67+ { _mobQuotaUser :: !(Maybe Text)
68+ , _mobResourceId :: !Text
69+ , _mobPrettyPrint :: !Bool
70+ , _mobUserIp :: !(Maybe Text)
71+ , _mobCustomerId :: !Text
72+ , _mobKey :: !(Maybe Text)
73+ , _mobOauthToken :: !(Maybe Text)
74+ , _mobFields :: !(Maybe Text)
75+ , _mobAlt :: !Alt
6876 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6977
7078-- | Creates a value of 'MobiledevicesDelete'' with the minimum fields required to make a request.
7179--
7280-- Use one of the following lenses to modify other fields as desired:
7381--
74−-- * 'mddQuotaUser'
82+-- * 'mobQuotaUser'
7583--
76−-- * 'mddResourceId'
84+-- * 'mobResourceId'
7785--
78−-- * 'mddPrettyPrint'
86+-- * 'mobPrettyPrint'
7987--
80−-- * 'mddUserIp'
88+-- * 'mobUserIp'
8189--
82−-- * 'mddCustomerId'
90+-- * 'mobCustomerId'
8391--
84−-- * 'mddKey'
92+-- * 'mobKey'
8593--
86−-- * 'mddOauthToken'
94+-- * 'mobOauthToken'
8795--
88−-- * 'mddFields'
96+-- * 'mobFields'
8997--
90−-- * 'mddAlt'
91−mobiledevicesDelete
98+-- * 'mobAlt'
99+mobiledevicesDelete'
92100 :: Text -- ^ 'resourceId'
93101 -> Text -- ^ 'customerId'
94− -> MobiledevicesDelete
95−mobiledevicesDelete pMddResourceId_ pMddCustomerId_ =
96− MobiledevicesDelete
97− { _mddQuotaUser = Nothing
98− , _mddResourceId = pMddResourceId_
99− , _mddPrettyPrint = True
100− , _mddUserIp = Nothing
101− , _mddCustomerId = pMddCustomerId_
102− , _mddKey = Nothing
103− , _mddOauthToken = Nothing
104− , _mddFields = Nothing
105− , _mddAlt = "json"
102+ -> MobiledevicesDelete'
103+mobiledevicesDelete' pMobResourceId_ pMobCustomerId_ =
104+ MobiledevicesDelete'
105+ { _mobQuotaUser = Nothing
106+ , _mobResourceId = pMobResourceId_
107+ , _mobPrettyPrint = True
108+ , _mobUserIp = Nothing
109+ , _mobCustomerId = pMobCustomerId_
110+ , _mobKey = Nothing
111+ , _mobOauthToken = Nothing
112+ , _mobFields = Nothing
113+ , _mobAlt = JSON
106114 }
107115
108116-- | Available to use for quota purposes for server-side applications. Can be
109117-- any arbitrary string assigned to a user, but should not exceed 40
110118-- characters. Overrides userIp if both are provided.
111−mddQuotaUser :: Lens' MobiledevicesDelete' (Maybe Text)
112−mddQuotaUser
113− = lens _mddQuotaUser (\ s a -> s{_mddQuotaUser = a})
119+mobQuotaUser :: Lens' MobiledevicesDelete' (Maybe Text)
120+mobQuotaUser
121+ = lens _mobQuotaUser (\ s a -> s{_mobQuotaUser = a})
114122
115123-- | Immutable id of Mobile Device
116−mddResourceId :: Lens' MobiledevicesDelete' Text
117−mddResourceId
118− = lens _mddResourceId
119− (\ s a -> s{_mddResourceId = a})
124+mobResourceId :: Lens' MobiledevicesDelete' Text
125+mobResourceId
126+ = lens _mobResourceId
127+ (\ s a -> s{_mobResourceId = a})
120128
121129-- | Returns response with indentations and line breaks.
122−mddPrettyPrint :: Lens' MobiledevicesDelete' Bool
123−mddPrettyPrint
124− = lens _mddPrettyPrint
125− (\ s a -> s{_mddPrettyPrint = a})
130+mobPrettyPrint :: Lens' MobiledevicesDelete' Bool
131+mobPrettyPrint
132+ = lens _mobPrettyPrint
133+ (\ s a -> s{_mobPrettyPrint = a})
126134
127135-- | IP address of the site where the request originates. Use this if you
128136-- want to enforce per-user limits.
129−mddUserIp :: Lens' MobiledevicesDelete' (Maybe Text)
130−mddUserIp
131− = lens _mddUserIp (\ s a -> s{_mddUserIp = a})
137+mobUserIp :: Lens' MobiledevicesDelete' (Maybe Text)
138+mobUserIp
139+ = lens _mobUserIp (\ s a -> s{_mobUserIp = a})
132140
133141-- | Immutable id of the Google Apps account
134−mddCustomerId :: Lens' MobiledevicesDelete' Text
135−mddCustomerId
136− = lens _mddCustomerId
137− (\ s a -> s{_mddCustomerId = a})
142+mobCustomerId :: Lens' MobiledevicesDelete' Text
143+mobCustomerId
144+ = lens _mobCustomerId
145+ (\ s a -> s{_mobCustomerId = a})
138146
139147-- | API key. Your API key identifies your project and provides you with API
140148-- access, quota, and reports. Required unless you provide an OAuth 2.0
141149-- token.
142−mddKey :: Lens' MobiledevicesDelete' (Maybe Text)
143−mddKey = lens _mddKey (\ s a -> s{_mddKey = a})
150+mobKey :: Lens' MobiledevicesDelete' (Maybe Text)
151+mobKey = lens _mobKey (\ s a -> s{_mobKey = a})
144152
145153-- | OAuth 2.0 token for the current user.
146−mddOauthToken :: Lens' MobiledevicesDelete' (Maybe Text)
147−mddOauthToken
148− = lens _mddOauthToken
149− (\ s a -> s{_mddOauthToken = a})
154+mobOauthToken :: Lens' MobiledevicesDelete' (Maybe Text)
155+mobOauthToken
156+ = lens _mobOauthToken
157+ (\ s a -> s{_mobOauthToken = a})
150158
151159-- | Selector specifying which fields to include in a partial response.
152−mddFields :: Lens' MobiledevicesDelete' (Maybe Text)
153−mddFields
154− = lens _mddFields (\ s a -> s{_mddFields = a})
160+mobFields :: Lens' MobiledevicesDelete' (Maybe Text)
161+mobFields
162+ = lens _mobFields (\ s a -> s{_mobFields = a})
155163
156164-- | Data format for the response.
157−mddAlt :: Lens' MobiledevicesDelete' Text
158−mddAlt = lens _mddAlt (\ s a -> s{_mddAlt = a})
165+mobAlt :: Lens' MobiledevicesDelete' Alt
166+mobAlt = lens _mobAlt (\ s a -> s{_mobAlt = a})
159167
160168instance GoogleRequest MobiledevicesDelete' where
161169 type Rs MobiledevicesDelete' = ()
162170 request = requestWithRoute defReq adminDirectoryURL
163− requestWithRoute r u MobiledevicesDelete{..}
164− = go _mddQuotaUser _mddResourceId _mddPrettyPrint
165− _mddUserIp
166− _mddCustomerId
167− _mddKey
168− _mddOauthToken
169− _mddFields
170− _mddAlt
171+ requestWithRoute r u MobiledevicesDelete'{..}
172+ = go _mobQuotaUser _mobResourceId
173+ (Just _mobPrettyPrint)
174+ _mobUserIp
175+ _mobCustomerId
176+ _mobKey
177+ _mobOauthToken
178+ _mobFields
179+ (Just _mobAlt)
171180 where go
172181 = clientWithRoute
173− (Proxy :: Proxy MobiledevicesDeleteAPI)
182+ (Proxy :: Proxy MobiledevicesDeleteResource)
174183 r
175184 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Mobiledevices/Get.hs+100−97
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,171 +20,173 @@
1920-- | Retrieve Mobile Device
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMobiledevicesGet@.
22−module Directory.Mobiledevices.Get
23+module Network.Google.Resource.Directory.Mobiledevices.Get
2324 (
2425 -- * REST Resource
25− MobiledevicesGetAPI
26+ MobiledevicesGetResource
2627
2728 -- * Creating a Request
28− , mobiledevicesGet
29− , MobiledevicesGet
29+ , mobiledevicesGet'
30+ , MobiledevicesGet'
3031
3132 -- * Request Lenses
32− , mggQuotaUser
33− , mggResourceId
34− , mggPrettyPrint
35− , mggUserIp
36− , mggCustomerId
37− , mggKey
38− , mggProjection
39− , mggOauthToken
40− , mggFields
41− , mggAlt
33+ , mgQuotaUser
34+ , mgResourceId
35+ , mgPrettyPrint
36+ , mgUserIp
37+ , mgCustomerId
38+ , mgKey
39+ , mgProjection
40+ , mgOauthToken
41+ , mgFields
42+ , mgAlt
4243 ) where
4344
4445import Network.Google.AdminDirectory.Types
4546import Network.Google.Prelude
4647
4748-- | A resource alias for @DirectoryMobiledevicesGet@ which the
48−-- 'MobiledevicesGet' request conforms to.
49−type MobiledevicesGetAPI =
49+-- 'MobiledevicesGet'' request conforms to.
50+type MobiledevicesGetResource =
5051 "customer" :>
5152 Capture "customerId" Text :>
5253 "devices" :>
5354 "mobile" :>
5455 Capture "resourceId" Text :>
55− QueryParam "projection" Text :>
56− Get '[JSON] MobileDevice
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "userIp" Text :>
59+ QueryParam "key" Text :>
60+ QueryParam "projection"
61+ DirectoryMobiledevicesGetProjection
62+ :>
63+ QueryParam "oauth_token" Text :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" Alt :> Get '[JSON] MobileDevice
5766
5867-- | Retrieve Mobile Device
5968--
60−-- /See:/ 'mobiledevicesGet' smart constructor.
61−data MobiledevicesGet = MobiledevicesGet
62− { _mggQuotaUser :: !(Maybe Text)
63− , _mggResourceId :: !Text
64− , _mggPrettyPrint :: !Bool
65− , _mggUserIp :: !(Maybe Text)
66− , _mggCustomerId :: !Text
67− , _mggKey :: !(Maybe Text)
68− , _mggProjection :: !(Maybe Text)
69− , _mggOauthToken :: !(Maybe Text)
70− , _mggFields :: !(Maybe Text)
71− , _mggAlt :: !Text
69+-- /See:/ 'mobiledevicesGet'' smart constructor.
70+data MobiledevicesGet' = MobiledevicesGet'
71+ { _mgQuotaUser :: !(Maybe Text)
72+ , _mgResourceId :: !Text
73+ , _mgPrettyPrint :: !Bool
74+ , _mgUserIp :: !(Maybe Text)
75+ , _mgCustomerId :: !Text
76+ , _mgKey :: !(Maybe Text)
77+ , _mgProjection :: !(Maybe DirectoryMobiledevicesGetProjection)
78+ , _mgOauthToken :: !(Maybe Text)
79+ , _mgFields :: !(Maybe Text)
80+ , _mgAlt :: !Alt
7281 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7382
7483-- | Creates a value of 'MobiledevicesGet'' with the minimum fields required to make a request.
7584--
7685-- Use one of the following lenses to modify other fields as desired:
7786--
78−-- * 'mggQuotaUser'
87+-- * 'mgQuotaUser'
7988--
80−-- * 'mggResourceId'
89+-- * 'mgResourceId'
8190--
82−-- * 'mggPrettyPrint'
91+-- * 'mgPrettyPrint'
8392--
84−-- * 'mggUserIp'
93+-- * 'mgUserIp'
8594--
86−-- * 'mggCustomerId'
95+-- * 'mgCustomerId'
8796--
88−-- * 'mggKey'
97+-- * 'mgKey'
8998--
90−-- * 'mggProjection'
99+-- * 'mgProjection'
91100--
92−-- * 'mggOauthToken'
101+-- * 'mgOauthToken'
93102--
94−-- * 'mggFields'
103+-- * 'mgFields'
95104--
96−-- * 'mggAlt'
97−mobiledevicesGet
105+-- * 'mgAlt'
106+mobiledevicesGet'
98107 :: Text -- ^ 'resourceId'
99108 -> Text -- ^ 'customerId'
100− -> MobiledevicesGet
101−mobiledevicesGet pMggResourceId_ pMggCustomerId_ =
102− MobiledevicesGet
103− { _mggQuotaUser = Nothing
104− , _mggResourceId = pMggResourceId_
105− , _mggPrettyPrint = True
106− , _mggUserIp = Nothing
107− , _mggCustomerId = pMggCustomerId_
108− , _mggKey = Nothing
109− , _mggProjection = Nothing
110− , _mggOauthToken = Nothing
111− , _mggFields = Nothing
112− , _mggAlt = "json"
109+ -> MobiledevicesGet'
110+mobiledevicesGet' pMgResourceId_ pMgCustomerId_ =
111+ MobiledevicesGet'
112+ { _mgQuotaUser = Nothing
113+ , _mgResourceId = pMgResourceId_
114+ , _mgPrettyPrint = True
115+ , _mgUserIp = Nothing
116+ , _mgCustomerId = pMgCustomerId_
117+ , _mgKey = Nothing
118+ , _mgProjection = Nothing
119+ , _mgOauthToken = Nothing
120+ , _mgFields = Nothing
121+ , _mgAlt = JSON
113122 }
114123
115124-- | Available to use for quota purposes for server-side applications. Can be
116125-- any arbitrary string assigned to a user, but should not exceed 40
117126-- characters. Overrides userIp if both are provided.
118−mggQuotaUser :: Lens' MobiledevicesGet' (Maybe Text)
119−mggQuotaUser
120− = lens _mggQuotaUser (\ s a -> s{_mggQuotaUser = a})
127+mgQuotaUser :: Lens' MobiledevicesGet' (Maybe Text)
128+mgQuotaUser
129+ = lens _mgQuotaUser (\ s a -> s{_mgQuotaUser = a})
121130
122131-- | Immutable id of Mobile Device
123−mggResourceId :: Lens' MobiledevicesGet' Text
124−mggResourceId
125− = lens _mggResourceId
126− (\ s a -> s{_mggResourceId = a})
132+mgResourceId :: Lens' MobiledevicesGet' Text
133+mgResourceId
134+ = lens _mgResourceId (\ s a -> s{_mgResourceId = a})
127135
128136-- | Returns response with indentations and line breaks.
129−mggPrettyPrint :: Lens' MobiledevicesGet' Bool
130−mggPrettyPrint
131− = lens _mggPrettyPrint
132− (\ s a -> s{_mggPrettyPrint = a})
137+mgPrettyPrint :: Lens' MobiledevicesGet' Bool
138+mgPrettyPrint
139+ = lens _mgPrettyPrint
140+ (\ s a -> s{_mgPrettyPrint = a})
133141
134142-- | IP address of the site where the request originates. Use this if you
135143-- want to enforce per-user limits.
136−mggUserIp :: Lens' MobiledevicesGet' (Maybe Text)
137−mggUserIp
138− = lens _mggUserIp (\ s a -> s{_mggUserIp = a})
144+mgUserIp :: Lens' MobiledevicesGet' (Maybe Text)
145+mgUserIp = lens _mgUserIp (\ s a -> s{_mgUserIp = a})
139146
140147-- | Immutable id of the Google Apps account
141−mggCustomerId :: Lens' MobiledevicesGet' Text
142−mggCustomerId
143− = lens _mggCustomerId
144− (\ s a -> s{_mggCustomerId = a})
148+mgCustomerId :: Lens' MobiledevicesGet' Text
149+mgCustomerId
150+ = lens _mgCustomerId (\ s a -> s{_mgCustomerId = a})
145151
146152-- | API key. Your API key identifies your project and provides you with API
147153-- access, quota, and reports. Required unless you provide an OAuth 2.0
148154-- token.
149−mggKey :: Lens' MobiledevicesGet' (Maybe Text)
150−mggKey = lens _mggKey (\ s a -> s{_mggKey = a})
155+mgKey :: Lens' MobiledevicesGet' (Maybe Text)
156+mgKey = lens _mgKey (\ s a -> s{_mgKey = a})
151157
152158-- | Restrict information returned to a set of selected fields.
153−mggProjection :: Lens' MobiledevicesGet' (Maybe Text)
154−mggProjection
155− = lens _mggProjection
156− (\ s a -> s{_mggProjection = a})
159+mgProjection :: Lens' MobiledevicesGet' (Maybe DirectoryMobiledevicesGetProjection)
160+mgProjection
161+ = lens _mgProjection (\ s a -> s{_mgProjection = a})
157162
158163-- | OAuth 2.0 token for the current user.
159−mggOauthToken :: Lens' MobiledevicesGet' (Maybe Text)
160−mggOauthToken
161− = lens _mggOauthToken
162− (\ s a -> s{_mggOauthToken = a})
164+mgOauthToken :: Lens' MobiledevicesGet' (Maybe Text)
165+mgOauthToken
166+ = lens _mgOauthToken (\ s a -> s{_mgOauthToken = a})
163167
164168-- | Selector specifying which fields to include in a partial response.
165−mggFields :: Lens' MobiledevicesGet' (Maybe Text)
166−mggFields
167− = lens _mggFields (\ s a -> s{_mggFields = a})
169+mgFields :: Lens' MobiledevicesGet' (Maybe Text)
170+mgFields = lens _mgFields (\ s a -> s{_mgFields = a})
168171
169172-- | Data format for the response.
170−mggAlt :: Lens' MobiledevicesGet' Text
171−mggAlt = lens _mggAlt (\ s a -> s{_mggAlt = a})
173+mgAlt :: Lens' MobiledevicesGet' Alt
174+mgAlt = lens _mgAlt (\ s a -> s{_mgAlt = a})
172175
173176instance GoogleRequest MobiledevicesGet' where
174177 type Rs MobiledevicesGet' = MobileDevice
175178 request = requestWithRoute defReq adminDirectoryURL
176− requestWithRoute r u MobiledevicesGet{..}
177− = go _mggQuotaUser _mggResourceId _mggPrettyPrint
178− _mggUserIp
179− _mggCustomerId
180− _mggKey
181− _mggProjection
182− _mggOauthToken
183− _mggFields
184− _mggAlt
179+ requestWithRoute r u MobiledevicesGet'{..}
180+ = go _mgQuotaUser _mgResourceId (Just _mgPrettyPrint)
181+ _mgUserIp
182+ _mgCustomerId
183+ _mgKey
184+ _mgProjection
185+ _mgOauthToken
186+ _mgFields
187+ (Just _mgAlt)
185188 where go
186189 = clientWithRoute
187− (Proxy :: Proxy MobiledevicesGetAPI)
190+ (Proxy :: Proxy MobiledevicesGetResource)
188191 r
189192 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Mobiledevices/List.hs+47−32
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve all Mobile Devices of a customer (paginated)
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryMobiledevicesList@.
22−module Directory.Mobiledevices.List
23+module Network.Google.Resource.Directory.Mobiledevices.List
2324 (
2425 -- * REST Resource
25− MobiledevicesListAPI
26+ MobiledevicesListResource
2627
2728 -- * Creating a Request
28− , mobiledevicesList
29− , MobiledevicesList
29+ , mobiledevicesList'
30+ , MobiledevicesList'
3031
3132 -- * Request Lenses
3233 , mQuotaUser
@@ -49,38 +50,51 @@ import Network.Google.AdminDirectory.Types
4950import Network.Google.Prelude
5051
5152-- | A resource alias for @DirectoryMobiledevicesList@ which the
52−-- 'MobiledevicesList' request conforms to.
53−type MobiledevicesListAPI =
53+-- 'MobiledevicesList'' request conforms to.
54+type MobiledevicesListResource =
5455 "customer" :>
5556 Capture "customerId" Text :>
5657 "devices" :>
5758 "mobile" :>
58− QueryParam "orderBy" Text :>
59− QueryParam "sortOrder" Text :>
60− QueryParam "query" Text :>
61− QueryParam "projection" Text :>
62− QueryParam "pageToken" Text :>
63− QueryParam "maxResults" Int32 :>
64− Get '[JSON] MobileDevices
59+ QueryParam "quotaUser" Text :>
60+ QueryParam "prettyPrint" Bool :>
61+ QueryParam "orderBy"
62+ DirectoryMobiledevicesListOrderBy
63+ :>
64+ QueryParam "userIp" Text :>
65+ QueryParam "sortOrder"
66+ DirectoryMobiledevicesListSortOrder
67+ :>
68+ QueryParam "key" Text :>
69+ QueryParam "query" Text :>
70+ QueryParam "projection"
71+ DirectoryMobiledevicesListProjection
72+ :>
73+ QueryParam "pageToken" Text :>
74+ QueryParam "oauth_token" Text :>
75+ QueryParam "maxResults" Int32 :>
76+ QueryParam "fields" Text :>
77+ QueryParam "alt" Alt :>
78+ Get '[JSON] MobileDevices
6579
6680-- | Retrieve all Mobile Devices of a customer (paginated)
6781--
68−-- /See:/ 'mobiledevicesList' smart constructor.
69−data MobiledevicesList = MobiledevicesList
82+-- /See:/ 'mobiledevicesList'' smart constructor.
83+data MobiledevicesList' = MobiledevicesList'
7084 { _mQuotaUser :: !(Maybe Text)
7185 , _mPrettyPrint :: !Bool
72− , _mOrderBy :: !(Maybe Text)
86+ , _mOrderBy :: !(Maybe DirectoryMobiledevicesListOrderBy)
7387 , _mUserIp :: !(Maybe Text)
7488 , _mCustomerId :: !Text
75− , _mSortOrder :: !(Maybe Text)
89+ , _mSortOrder :: !(Maybe DirectoryMobiledevicesListSortOrder)
7690 , _mKey :: !(Maybe Text)
7791 , _mQuery :: !(Maybe Text)
78− , _mProjection :: !(Maybe Text)
92+ , _mProjection :: !(Maybe DirectoryMobiledevicesListProjection)
7993 , _mPageToken :: !(Maybe Text)
8094 , _mOauthToken :: !(Maybe Text)
8195 , _mMaxResults :: !(Maybe Int32)
8296 , _mFields :: !(Maybe Text)
83− , _mAlt :: !Text
97+ , _mAlt :: !Alt
8498 } deriving (Eq,Read,Show,Data,Typeable,Generic)
8599
86100-- | Creates a value of 'MobiledevicesList'' with the minimum fields required to make a request.
@@ -114,11 +128,11 @@ data MobiledevicesList = MobiledevicesList
114128-- * 'mFields'
115129--
116130-- * 'mAlt'
117−mobiledevicesList
131+mobiledevicesList'
118132 :: Text -- ^ 'customerId'
119− -> MobiledevicesList
120−mobiledevicesList pMCustomerId_ =
121− MobiledevicesList
133+ -> MobiledevicesList'
134+mobiledevicesList' pMCustomerId_ =
135+ MobiledevicesList'
122136 { _mQuotaUser = Nothing
123137 , _mPrettyPrint = True
124138 , _mOrderBy = Nothing
@@ -132,7 +146,7 @@ mobiledevicesList pMCustomerId_ =
132146 , _mOauthToken = Nothing
133147 , _mMaxResults = Nothing
134148 , _mFields = Nothing
135− , _mAlt = "json"
149+ , _mAlt = JSON
136150 }
137151
138152-- | Available to use for quota purposes for server-side applications. Can be
@@ -148,7 +162,7 @@ mPrettyPrint
148162 = lens _mPrettyPrint (\ s a -> s{_mPrettyPrint = a})
149163
150164-- | Column to use for sorting results
151−mOrderBy :: Lens' MobiledevicesList' (Maybe Text)
165+mOrderBy :: Lens' MobiledevicesList' (Maybe DirectoryMobiledevicesListOrderBy)
152166mOrderBy = lens _mOrderBy (\ s a -> s{_mOrderBy = a})
153167
154168-- | IP address of the site where the request originates. Use this if you
@@ -163,7 +177,7 @@ mCustomerId
163177
164178-- | Whether to return results in ascending or descending order. Only of use
165179-- when orderBy is also used
166−mSortOrder :: Lens' MobiledevicesList' (Maybe Text)
180+mSortOrder :: Lens' MobiledevicesList' (Maybe DirectoryMobiledevicesListSortOrder)
167181mSortOrder
168182 = lens _mSortOrder (\ s a -> s{_mSortOrder = a})
169183
@@ -179,7 +193,7 @@ mQuery :: Lens' MobiledevicesList' (Maybe Text)
179193mQuery = lens _mQuery (\ s a -> s{_mQuery = a})
180194
181195-- | Restrict information returned to a set of selected fields.
182−mProjection :: Lens' MobiledevicesList' (Maybe Text)
196+mProjection :: Lens' MobiledevicesList' (Maybe DirectoryMobiledevicesListProjection)
183197mProjection
184198 = lens _mProjection (\ s a -> s{_mProjection = a})
185199
@@ -203,14 +217,15 @@ mFields :: Lens' MobiledevicesList' (Maybe Text)
203217mFields = lens _mFields (\ s a -> s{_mFields = a})
204218
205219-- | Data format for the response.
206−mAlt :: Lens' MobiledevicesList' Text
220+mAlt :: Lens' MobiledevicesList' Alt
207221mAlt = lens _mAlt (\ s a -> s{_mAlt = a})
208222
209223instance GoogleRequest MobiledevicesList' where
210224 type Rs MobiledevicesList' = MobileDevices
211225 request = requestWithRoute defReq adminDirectoryURL
212− requestWithRoute r u MobiledevicesList{..}
213− = go _mQuotaUser _mPrettyPrint _mOrderBy _mUserIp
226+ requestWithRoute r u MobiledevicesList'{..}
227+ = go _mQuotaUser (Just _mPrettyPrint) _mOrderBy
228+ _mUserIp
214229 _mCustomerId
215230 _mSortOrder
216231 _mKey
@@ -220,9 +235,9 @@ instance GoogleRequest MobiledevicesList' where
220235 _mOauthToken
221236 _mMaxResults
222237 _mFields
223− _mAlt
238+ (Just _mAlt)
224239 where go
225240 = clientWithRoute
226− (Proxy :: Proxy MobiledevicesListAPI)
241+ (Proxy :: Proxy MobiledevicesListResource)
227242 r
228243 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Delete.hs+28−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Deletes a notification
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryNotificationsDelete@.
22−module Directory.Notifications.Delete
23+module Network.Google.Resource.Directory.Notifications.Delete
2324 (
2425 -- * REST Resource
25− NotificationsDeleteAPI
26+ NotificationsDeleteResource
2627
2728 -- * Creating a Request
28− , notificationsDelete
29− , NotificationsDelete
29+ , notificationsDelete'
30+ , NotificationsDelete'
3031
3132 -- * Request Lenses
3233 , ndQuotaUser
@@ -44,17 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryNotificationsDelete@ which the
47−-- 'NotificationsDelete' request conforms to.
48−type NotificationsDeleteAPI =
48+-- 'NotificationsDelete'' request conforms to.
49+type NotificationsDeleteResource =
4950 "customer" :>
5051 Capture "customer" Text :>
5152 "notifications" :>
52− Capture "notificationId" Text :> Delete '[JSON] ()
53+ Capture "notificationId" Text :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Delete '[JSON] ()
5361
5462-- | Deletes a notification
5563--
56−-- /See:/ 'notificationsDelete' smart constructor.
57−data NotificationsDelete = NotificationsDelete
64+-- /See:/ 'notificationsDelete'' smart constructor.
65+data NotificationsDelete' = NotificationsDelete'
5866 { _ndQuotaUser :: !(Maybe Text)
5967 , _ndPrettyPrint :: !Bool
6068 , _ndUserIp :: !(Maybe Text)
@@ -63,7 +71,7 @@ data NotificationsDelete = NotificationsDelete
6371 , _ndNotificationId :: !Text
6472 , _ndOauthToken :: !(Maybe Text)
6573 , _ndFields :: !(Maybe Text)
66− , _ndAlt :: !Text
74+ , _ndAlt :: !Alt
6775 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6876
6977-- | Creates a value of 'NotificationsDelete'' with the minimum fields required to make a request.
@@ -87,12 +95,12 @@ data NotificationsDelete = NotificationsDelete
8795-- * 'ndFields'
8896--
8997-- * 'ndAlt'
90−notificationsDelete
98+notificationsDelete'
9199 :: Text -- ^ 'customer'
92100 -> Text -- ^ 'notificationId'
93− -> NotificationsDelete
94−notificationsDelete pNdCustomer_ pNdNotificationId_ =
95− NotificationsDelete
101+ -> NotificationsDelete'
102+notificationsDelete' pNdCustomer_ pNdNotificationId_ =
103+ NotificationsDelete'
96104 { _ndQuotaUser = Nothing
97105 , _ndPrettyPrint = True
98106 , _ndUserIp = Nothing
@@ -101,7 +109,7 @@ notificationsDelete pNdCustomer_ pNdNotificationId_ =
101109 , _ndNotificationId = pNdNotificationId_
102110 , _ndOauthToken = Nothing
103111 , _ndFields = Nothing
104− , _ndAlt = "json"
112+ , _ndAlt = JSON
105113 }
106114
107115-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,22 +158,22 @@ ndFields :: Lens' NotificationsDelete' (Maybe Text)
150158ndFields = lens _ndFields (\ s a -> s{_ndFields = a})
151159
152160-- | Data format for the response.
153−ndAlt :: Lens' NotificationsDelete' Text
161+ndAlt :: Lens' NotificationsDelete' Alt
154162ndAlt = lens _ndAlt (\ s a -> s{_ndAlt = a})
155163
156164instance GoogleRequest NotificationsDelete' where
157165 type Rs NotificationsDelete' = ()
158166 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u NotificationsDelete{..}
160− = go _ndQuotaUser _ndPrettyPrint _ndUserIp
167+ requestWithRoute r u NotificationsDelete'{..}
168+ = go _ndQuotaUser (Just _ndPrettyPrint) _ndUserIp
161169 _ndCustomer
162170 _ndKey
163171 _ndNotificationId
164172 _ndOauthToken
165173 _ndFields
166− _ndAlt
174+ (Just _ndAlt)
167175 where go
168176 = clientWithRoute
169− (Proxy :: Proxy NotificationsDeleteAPI)
177+ (Proxy :: Proxy NotificationsDeleteResource)
170178 r
171179 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Get.hs+27−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves a notification.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryNotificationsGet@.
22−module Directory.Notifications.Get
23+module Network.Google.Resource.Directory.Notifications.Get
2324 (
2425 -- * REST Resource
25− NotificationsGetAPI
26+ NotificationsGetResource
2627
2728 -- * Creating a Request
28− , notificationsGet
29− , NotificationsGet
29+ , notificationsGet'
30+ , NotificationsGet'
3031
3132 -- * Request Lenses
3233 , ngQuotaUser
@@ -44,18 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryNotificationsGet@ which the
47−-- 'NotificationsGet' request conforms to.
48−type NotificationsGetAPI =
48+-- 'NotificationsGet'' request conforms to.
49+type NotificationsGetResource =
4950 "customer" :>
5051 Capture "customer" Text :>
5152 "notifications" :>
5253 Capture "notificationId" Text :>
53− Get '[JSON] Notification
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] Notification
5461
5562-- | Retrieves a notification.
5663--
57−-- /See:/ 'notificationsGet' smart constructor.
58−data NotificationsGet = NotificationsGet
64+-- /See:/ 'notificationsGet'' smart constructor.
65+data NotificationsGet' = NotificationsGet'
5966 { _ngQuotaUser :: !(Maybe Text)
6067 , _ngPrettyPrint :: !Bool
6168 , _ngUserIp :: !(Maybe Text)
@@ -64,7 +71,7 @@ data NotificationsGet = NotificationsGet
6471 , _ngNotificationId :: !Text
6572 , _ngOauthToken :: !(Maybe Text)
6673 , _ngFields :: !(Maybe Text)
67− , _ngAlt :: !Text
74+ , _ngAlt :: !Alt
6875 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6976
7077-- | Creates a value of 'NotificationsGet'' with the minimum fields required to make a request.
@@ -88,12 +95,12 @@ data NotificationsGet = NotificationsGet
8895-- * 'ngFields'
8996--
9097-- * 'ngAlt'
91−notificationsGet
98+notificationsGet'
9299 :: Text -- ^ 'customer'
93100 -> Text -- ^ 'notificationId'
94− -> NotificationsGet
95−notificationsGet pNgCustomer_ pNgNotificationId_ =
96− NotificationsGet
101+ -> NotificationsGet'
102+notificationsGet' pNgCustomer_ pNgNotificationId_ =
103+ NotificationsGet'
97104 { _ngQuotaUser = Nothing
98105 , _ngPrettyPrint = True
99106 , _ngUserIp = Nothing
@@ -102,7 +109,7 @@ notificationsGet pNgCustomer_ pNgNotificationId_ =
102109 , _ngNotificationId = pNgNotificationId_
103110 , _ngOauthToken = Nothing
104111 , _ngFields = Nothing
105− , _ngAlt = "json"
112+ , _ngAlt = JSON
106113 }
107114
108115-- | Available to use for quota purposes for server-side applications. Can be
@@ -151,22 +158,22 @@ ngFields :: Lens' NotificationsGet' (Maybe Text)
151158ngFields = lens _ngFields (\ s a -> s{_ngFields = a})
152159
153160-- | Data format for the response.
154−ngAlt :: Lens' NotificationsGet' Text
161+ngAlt :: Lens' NotificationsGet' Alt
155162ngAlt = lens _ngAlt (\ s a -> s{_ngAlt = a})
156163
157164instance GoogleRequest NotificationsGet' where
158165 type Rs NotificationsGet' = Notification
159166 request = requestWithRoute defReq adminDirectoryURL
160− requestWithRoute r u NotificationsGet{..}
161− = go _ngQuotaUser _ngPrettyPrint _ngUserIp
167+ requestWithRoute r u NotificationsGet'{..}
168+ = go _ngQuotaUser (Just _ngPrettyPrint) _ngUserIp
162169 _ngCustomer
163170 _ngKey
164171 _ngNotificationId
165172 _ngOauthToken
166173 _ngFields
167− _ngAlt
174+ (Just _ngAlt)
168175 where go
169176 = clientWithRoute
170− (Proxy :: Proxy NotificationsGetAPI)
177+ (Proxy :: Proxy NotificationsGetResource)
171178 r
172179 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/List.hs+30−23
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieves a list of notifications.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryNotificationsList@.
22−module Directory.Notifications.List
23+module Network.Google.Resource.Directory.Notifications.List
2324 (
2425 -- * REST Resource
25− NotificationsListAPI
26+ NotificationsListResource
2627
2728 -- * Creating a Request
28− , notificationsList
29− , NotificationsList
29+ , notificationsList'
30+ , NotificationsList'
3031
3132 -- * Request Lenses
3233 , nlQuotaUser
@@ -46,20 +47,26 @@ import Network.Google.AdminDirectory.Types
4647import Network.Google.Prelude
4748
4849-- | A resource alias for @DirectoryNotificationsList@ which the
49−-- 'NotificationsList' request conforms to.
50−type NotificationsListAPI =
50+-- 'NotificationsList'' request conforms to.
51+type NotificationsListResource =
5152 "customer" :>
5253 Capture "customer" Text :>
5354 "notifications" :>
54− QueryParam "language" Text :>
55− QueryParam "pageToken" Text :>
56− QueryParam "maxResults" Word32 :>
57− Get '[JSON] Notifications
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "userIp" Text :>
58+ QueryParam "key" Text :>
59+ QueryParam "language" Text :>
60+ QueryParam "pageToken" Text :>
61+ QueryParam "oauth_token" Text :>
62+ QueryParam "maxResults" Word32 :>
63+ QueryParam "fields" Text :>
64+ QueryParam "alt" Alt :> Get '[JSON] Notifications
5865
5966-- | Retrieves a list of notifications.
6067--
61−-- /See:/ 'notificationsList' smart constructor.
62−data NotificationsList = NotificationsList
68+-- /See:/ 'notificationsList'' smart constructor.
69+data NotificationsList' = NotificationsList'
6370 { _nlQuotaUser :: !(Maybe Text)
6471 , _nlPrettyPrint :: !Bool
6572 , _nlUserIp :: !(Maybe Text)
@@ -70,7 +77,7 @@ data NotificationsList = NotificationsList
7077 , _nlOauthToken :: !(Maybe Text)
7178 , _nlMaxResults :: !(Maybe Word32)
7279 , _nlFields :: !(Maybe Text)
73− , _nlAlt :: !Text
80+ , _nlAlt :: !Alt
7481 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7582
7683-- | Creates a value of 'NotificationsList'' with the minimum fields required to make a request.
@@ -98,11 +105,11 @@ data NotificationsList = NotificationsList
98105-- * 'nlFields'
99106--
100107-- * 'nlAlt'
101−notificationsList
108+notificationsList'
102109 :: Text -- ^ 'customer'
103− -> NotificationsList
104−notificationsList pNlCustomer_ =
105− NotificationsList
110+ -> NotificationsList'
111+notificationsList' pNlCustomer_ =
112+ NotificationsList'
106113 { _nlQuotaUser = Nothing
107114 , _nlPrettyPrint = True
108115 , _nlUserIp = Nothing
@@ -113,7 +120,7 @@ notificationsList pNlCustomer_ =
113120 , _nlOauthToken = Nothing
114121 , _nlMaxResults = Nothing
115122 , _nlFields = Nothing
116− , _nlAlt = "json"
123+ , _nlAlt = JSON
117124 }
118125
119126-- | Available to use for quota purposes for server-side applications. Can be
@@ -171,14 +178,14 @@ nlFields :: Lens' NotificationsList' (Maybe Text)
171178nlFields = lens _nlFields (\ s a -> s{_nlFields = a})
172179
173180-- | Data format for the response.
174−nlAlt :: Lens' NotificationsList' Text
181+nlAlt :: Lens' NotificationsList' Alt
175182nlAlt = lens _nlAlt (\ s a -> s{_nlAlt = a})
176183
177184instance GoogleRequest NotificationsList' where
178185 type Rs NotificationsList' = Notifications
179186 request = requestWithRoute defReq adminDirectoryURL
180− requestWithRoute r u NotificationsList{..}
181− = go _nlQuotaUser _nlPrettyPrint _nlUserIp
187+ requestWithRoute r u NotificationsList'{..}
188+ = go _nlQuotaUser (Just _nlPrettyPrint) _nlUserIp
182189 _nlCustomer
183190 _nlKey
184191 _nlLanguage
@@ -186,9 +193,9 @@ instance GoogleRequest NotificationsList' where
186193 _nlOauthToken
187194 _nlMaxResults
188195 _nlFields
189− _nlAlt
196+ (Just _nlAlt)
190197 where go
191198 = clientWithRoute
192− (Proxy :: Proxy NotificationsListAPI)
199+ (Proxy :: Proxy NotificationsListResource)
193200 r
194201 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Patch.hs+27−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Updates a notification. This method supports patch semantics.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryNotificationsPatch@.
22−module Directory.Notifications.Patch
23+module Network.Google.Resource.Directory.Notifications.Patch
2324 (
2425 -- * REST Resource
25− NotificationsPatchAPI
26+ NotificationsPatchResource
2627
2728 -- * Creating a Request
28− , notificationsPatch
29− , NotificationsPatch
29+ , notificationsPatch'
30+ , NotificationsPatch'
3031
3132 -- * Request Lenses
3233 , npQuotaUser
@@ -44,18 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryNotificationsPatch@ which the
47−-- 'NotificationsPatch' request conforms to.
48−type NotificationsPatchAPI =
48+-- 'NotificationsPatch'' request conforms to.
49+type NotificationsPatchResource =
4950 "customer" :>
5051 Capture "customer" Text :>
5152 "notifications" :>
5253 Capture "notificationId" Text :>
53− Patch '[JSON] Notification
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Patch '[JSON] Notification
5461
5562-- | Updates a notification. This method supports patch semantics.
5663--
57−-- /See:/ 'notificationsPatch' smart constructor.
58−data NotificationsPatch = NotificationsPatch
64+-- /See:/ 'notificationsPatch'' smart constructor.
65+data NotificationsPatch' = NotificationsPatch'
5966 { _npQuotaUser :: !(Maybe Text)
6067 , _npPrettyPrint :: !Bool
6168 , _npUserIp :: !(Maybe Text)
@@ -64,7 +71,7 @@ data NotificationsPatch = NotificationsPatch
6471 , _npNotificationId :: !Text
6572 , _npOauthToken :: !(Maybe Text)
6673 , _npFields :: !(Maybe Text)
67− , _npAlt :: !Text
74+ , _npAlt :: !Alt
6875 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6976
7077-- | Creates a value of 'NotificationsPatch'' with the minimum fields required to make a request.
@@ -88,12 +95,12 @@ data NotificationsPatch = NotificationsPatch
8895-- * 'npFields'
8996--
9097-- * 'npAlt'
91−notificationsPatch
98+notificationsPatch'
9299 :: Text -- ^ 'customer'
93100 -> Text -- ^ 'notificationId'
94− -> NotificationsPatch
95−notificationsPatch pNpCustomer_ pNpNotificationId_ =
96− NotificationsPatch
101+ -> NotificationsPatch'
102+notificationsPatch' pNpCustomer_ pNpNotificationId_ =
103+ NotificationsPatch'
97104 { _npQuotaUser = Nothing
98105 , _npPrettyPrint = True
99106 , _npUserIp = Nothing
@@ -102,7 +109,7 @@ notificationsPatch pNpCustomer_ pNpNotificationId_ =
102109 , _npNotificationId = pNpNotificationId_
103110 , _npOauthToken = Nothing
104111 , _npFields = Nothing
105− , _npAlt = "json"
112+ , _npAlt = JSON
106113 }
107114
108115-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,22 +157,22 @@ npFields :: Lens' NotificationsPatch' (Maybe Text)
150157npFields = lens _npFields (\ s a -> s{_npFields = a})
151158
152159-- | Data format for the response.
153−npAlt :: Lens' NotificationsPatch' Text
160+npAlt :: Lens' NotificationsPatch' Alt
154161npAlt = lens _npAlt (\ s a -> s{_npAlt = a})
155162
156163instance GoogleRequest NotificationsPatch' where
157164 type Rs NotificationsPatch' = Notification
158165 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u NotificationsPatch{..}
160− = go _npQuotaUser _npPrettyPrint _npUserIp
166+ requestWithRoute r u NotificationsPatch'{..}
167+ = go _npQuotaUser (Just _npPrettyPrint) _npUserIp
161168 _npCustomer
162169 _npKey
163170 _npNotificationId
164171 _npOauthToken
165172 _npFields
166− _npAlt
173+ (Just _npAlt)
167174 where go
168175 = clientWithRoute
169− (Proxy :: Proxy NotificationsPatchAPI)
176+ (Proxy :: Proxy NotificationsPatchResource)
170177 r
171178 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Notifications/Update.hs+27−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Updates a notification.
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryNotificationsUpdate@.
22−module Directory.Notifications.Update
23+module Network.Google.Resource.Directory.Notifications.Update
2324 (
2425 -- * REST Resource
25− NotificationsUpdateAPI
26+ NotificationsUpdateResource
2627
2728 -- * Creating a Request
28− , notificationsUpdate
29− , NotificationsUpdate
29+ , notificationsUpdate'
30+ , NotificationsUpdate'
3031
3132 -- * Request Lenses
3233 , nuQuotaUser
@@ -44,18 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryNotificationsUpdate@ which the
47−-- 'NotificationsUpdate' request conforms to.
48−type NotificationsUpdateAPI =
48+-- 'NotificationsUpdate'' request conforms to.
49+type NotificationsUpdateResource =
4950 "customer" :>
5051 Capture "customer" Text :>
5152 "notifications" :>
5253 Capture "notificationId" Text :>
53− Put '[JSON] Notification
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Put '[JSON] Notification
5461
5562-- | Updates a notification.
5663--
57−-- /See:/ 'notificationsUpdate' smart constructor.
58−data NotificationsUpdate = NotificationsUpdate
64+-- /See:/ 'notificationsUpdate'' smart constructor.
65+data NotificationsUpdate' = NotificationsUpdate'
5966 { _nuQuotaUser :: !(Maybe Text)
6067 , _nuPrettyPrint :: !Bool
6168 , _nuUserIp :: !(Maybe Text)
@@ -64,7 +71,7 @@ data NotificationsUpdate = NotificationsUpdate
6471 , _nuNotificationId :: !Text
6572 , _nuOauthToken :: !(Maybe Text)
6673 , _nuFields :: !(Maybe Text)
67− , _nuAlt :: !Text
74+ , _nuAlt :: !Alt
6875 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6976
7077-- | Creates a value of 'NotificationsUpdate'' with the minimum fields required to make a request.
@@ -88,12 +95,12 @@ data NotificationsUpdate = NotificationsUpdate
8895-- * 'nuFields'
8996--
9097-- * 'nuAlt'
91−notificationsUpdate
98+notificationsUpdate'
9299 :: Text -- ^ 'customer'
93100 -> Text -- ^ 'notificationId'
94− -> NotificationsUpdate
95−notificationsUpdate pNuCustomer_ pNuNotificationId_ =
96− NotificationsUpdate
101+ -> NotificationsUpdate'
102+notificationsUpdate' pNuCustomer_ pNuNotificationId_ =
103+ NotificationsUpdate'
97104 { _nuQuotaUser = Nothing
98105 , _nuPrettyPrint = True
99106 , _nuUserIp = Nothing
@@ -102,7 +109,7 @@ notificationsUpdate pNuCustomer_ pNuNotificationId_ =
102109 , _nuNotificationId = pNuNotificationId_
103110 , _nuOauthToken = Nothing
104111 , _nuFields = Nothing
105− , _nuAlt = "json"
112+ , _nuAlt = JSON
106113 }
107114
108115-- | Available to use for quota purposes for server-side applications. Can be
@@ -150,22 +157,22 @@ nuFields :: Lens' NotificationsUpdate' (Maybe Text)
150157nuFields = lens _nuFields (\ s a -> s{_nuFields = a})
151158
152159-- | Data format for the response.
153−nuAlt :: Lens' NotificationsUpdate' Text
160+nuAlt :: Lens' NotificationsUpdate' Alt
154161nuAlt = lens _nuAlt (\ s a -> s{_nuAlt = a})
155162
156163instance GoogleRequest NotificationsUpdate' where
157164 type Rs NotificationsUpdate' = Notification
158165 request = requestWithRoute defReq adminDirectoryURL
159− requestWithRoute r u NotificationsUpdate{..}
160− = go _nuQuotaUser _nuPrettyPrint _nuUserIp
166+ requestWithRoute r u NotificationsUpdate'{..}
167+ = go _nuQuotaUser (Just _nuPrettyPrint) _nuUserIp
161168 _nuCustomer
162169 _nuKey
163170 _nuNotificationId
164171 _nuOauthToken
165172 _nuFields
166− _nuAlt
173+ (Just _nuAlt)
167174 where go
168175 = clientWithRoute
169− (Proxy :: Proxy NotificationsUpdateAPI)
176+ (Proxy :: Proxy NotificationsUpdateResource)
170177 r
171178 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/Delete.hs+30−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Remove Organization Unit
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryOrgunitsDelete@.
22−module Directory.Orgunits.Delete
23+module Network.Google.Resource.Directory.Orgunits.Delete
2324 (
2425 -- * REST Resource
25− OrgunitsDeleteAPI
26+ OrgunitsDeleteResource
2627
2728 -- * Creating a Request
28− , orgunitsDelete
29− , OrgunitsDelete
29+ , orgunitsDelete'
30+ , OrgunitsDelete'
3031
3132 -- * Request Lenses
3233 , odQuotaUser
@@ -44,16 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryOrgunitsDelete@ which the
47−-- 'OrgunitsDelete' request conforms to.
48−type OrgunitsDeleteAPI =
48+-- 'OrgunitsDelete'' request conforms to.
49+type OrgunitsDeleteResource =
4950 "customer" :>
5051 Capture "customerId" Text :>
51− "orgunits{" :> "orgUnitPath*}" :> Delete '[JSON] ()
52+ "orgunits{" :>
53+ "orgUnitPath*}" :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Delete '[JSON] ()
5261
5362-- | Remove Organization Unit
5463--
55−-- /See:/ 'orgunitsDelete' smart constructor.
56−data OrgunitsDelete = OrgunitsDelete
64+-- /See:/ 'orgunitsDelete'' smart constructor.
65+data OrgunitsDelete' = OrgunitsDelete'
5766 { _odQuotaUser :: !(Maybe Text)
5867 , _odPrettyPrint :: !Bool
5968 , _odUserIp :: !(Maybe Text)
@@ -62,7 +71,7 @@ data OrgunitsDelete = OrgunitsDelete
6271 , _odKey :: !(Maybe Text)
6372 , _odOauthToken :: !(Maybe Text)
6473 , _odFields :: !(Maybe Text)
65− , _odAlt :: !Text
74+ , _odAlt :: !Alt
6675 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6776
6877-- | Creates a value of 'OrgunitsDelete'' with the minimum fields required to make a request.
@@ -86,12 +95,12 @@ data OrgunitsDelete = OrgunitsDelete
8695-- * 'odFields'
8796--
8897-- * 'odAlt'
89−orgunitsDelete
98+orgunitsDelete'
9099 :: Text -- ^ 'orgUnitPath'
91100 -> Text -- ^ 'customerId'
92− -> OrgunitsDelete
93−orgunitsDelete pOdOrgUnitPath_ pOdCustomerId_ =
94− OrgunitsDelete
101+ -> OrgunitsDelete'
102+orgunitsDelete' pOdOrgUnitPath_ pOdCustomerId_ =
103+ OrgunitsDelete'
95104 { _odQuotaUser = Nothing
96105 , _odPrettyPrint = True
97106 , _odUserIp = Nothing
@@ -100,7 +109,7 @@ orgunitsDelete pOdOrgUnitPath_ pOdCustomerId_ =
100109 , _odKey = Nothing
101110 , _odOauthToken = Nothing
102111 , _odFields = Nothing
103− , _odAlt = "json"
112+ , _odAlt = JSON
104113 }
105114
106115-- | Available to use for quota purposes for server-side applications. Can be
@@ -148,21 +157,22 @@ odFields :: Lens' OrgunitsDelete' (Maybe Text)
148157odFields = lens _odFields (\ s a -> s{_odFields = a})
149158
150159-- | Data format for the response.
151−odAlt :: Lens' OrgunitsDelete' Text
160+odAlt :: Lens' OrgunitsDelete' Alt
152161odAlt = lens _odAlt (\ s a -> s{_odAlt = a})
153162
154163instance GoogleRequest OrgunitsDelete' where
155164 type Rs OrgunitsDelete' = ()
156165 request = requestWithRoute defReq adminDirectoryURL
157− requestWithRoute r u OrgunitsDelete{..}
158− = go _odQuotaUser _odPrettyPrint _odUserIp
166+ requestWithRoute r u OrgunitsDelete'{..}
167+ = go _odQuotaUser (Just _odPrettyPrint) _odUserIp
159168 _odOrgUnitPath
160169 _odCustomerId
161170 _odKey
162171 _odOauthToken
163172 _odFields
164− _odAlt
173+ (Just _odAlt)
165174 where go
166− = clientWithRoute (Proxy :: Proxy OrgunitsDeleteAPI)
175+ = clientWithRoute
176+ (Proxy :: Proxy OrgunitsDeleteResource)
167177 r
168178 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/Get.hs+32−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Retrieve Organization Unit
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryOrgunitsGet@.
22−module Directory.Orgunits.Get
23+module Network.Google.Resource.Directory.Orgunits.Get
2324 (
2425 -- * REST Resource
25− OrgunitsGetAPI
26+ OrgunitsGetResource
2627
2728 -- * Creating a Request
28− , orgunitsGet
29− , OrgunitsGet
29+ , orgunitsGet'
30+ , OrgunitsGet'
3031
3132 -- * Request Lenses
3233 , ogQuotaUser
@@ -44,16 +45,24 @@ import Network.Google.AdminDirectory.Types
4445import Network.Google.Prelude
4546
4647-- | A resource alias for @DirectoryOrgunitsGet@ which the
47−-- 'OrgunitsGet' request conforms to.
48−type OrgunitsGetAPI =
48+-- 'OrgunitsGet'' request conforms to.
49+type OrgunitsGetResource =
4950 "customer" :>
5051 Capture "customerId" Text :>
51− "orgunits{" :> "orgUnitPath*}" :> Get '[JSON] OrgUnit
52+ "orgunits{" :>
53+ "orgUnitPath*}" :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "userIp" Text :>
57+ QueryParam "key" Text :>
58+ QueryParam "oauth_token" Text :>
59+ QueryParam "fields" Text :>
60+ QueryParam "alt" Alt :> Get '[JSON] OrgUnit
5261
5362-- | Retrieve Organization Unit
5463--
55−-- /See:/ 'orgunitsGet' smart constructor.
56−data OrgunitsGet = OrgunitsGet
64+-- /See:/ 'orgunitsGet'' smart constructor.
65+data OrgunitsGet' = OrgunitsGet'
5766 { _ogQuotaUser :: !(Maybe Text)
5867 , _ogPrettyPrint :: !Bool
5968 , _ogUserIp :: !(Maybe Text)
@@ -62,7 +71,7 @@ data OrgunitsGet = OrgunitsGet
6271 , _ogKey :: !(Maybe Text)
6372 , _ogOauthToken :: !(Maybe Text)
6473 , _ogFields :: !(Maybe Text)
65− , _ogAlt :: !Text
74+ , _ogAlt :: !Alt
6675 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6776
6877-- | Creates a value of 'OrgunitsGet'' with the minimum fields required to make a request.
@@ -86,12 +95,12 @@ data OrgunitsGet = OrgunitsGet
8695-- * 'ogFields'
8796--
8897-- * 'ogAlt'
89−orgunitsGet
98+orgunitsGet'
9099 :: Text -- ^ 'orgUnitPath'
91100 -> Text -- ^ 'customerId'
92− -> OrgunitsGet
93−orgunitsGet pOgOrgUnitPath_ pOgCustomerId_ =
94− OrgunitsGet
101+ -> OrgunitsGet'
102+orgunitsGet' pOgOrgUnitPath_ pOgCustomerId_ =
103+ OrgunitsGet'
95104 { _ogQuotaUser = Nothing
96105 , _ogPrettyPrint = True
97106 , _ogUserIp = Nothing
@@ -100,7 +109,7 @@ orgunitsGet pOgOrgUnitPath_ pOgCustomerId_ =
100109 , _ogKey = Nothing
101110 , _ogOauthToken = Nothing
102111 , _ogFields = Nothing
103− , _ogAlt = "json"
112+ , _ogAlt = JSON
104113 }
105114
106115-- | Available to use for quota purposes for server-side applications. Can be
@@ -148,19 +157,22 @@ ogFields :: Lens' OrgunitsGet' (Maybe Text)
148157ogFields = lens _ogFields (\ s a -> s{_ogFields = a})
149158
150159-- | Data format for the response.
151−ogAlt :: Lens' OrgunitsGet' Text
160+ogAlt :: Lens' OrgunitsGet' Alt
152161ogAlt = lens _ogAlt (\ s a -> s{_ogAlt = a})
153162
154163instance GoogleRequest OrgunitsGet' where
155164 type Rs OrgunitsGet' = OrgUnit
156165 request = requestWithRoute defReq adminDirectoryURL
157− requestWithRoute r u OrgunitsGet{..}
158− = go _ogQuotaUser _ogPrettyPrint _ogUserIp
166+ requestWithRoute r u OrgunitsGet'{..}
167+ = go _ogQuotaUser (Just _ogPrettyPrint) _ogUserIp
159168 _ogOrgUnitPath
160169 _ogCustomerId
161170 _ogKey
162171 _ogOauthToken
163172 _ogFields
164− _ogAlt
173+ (Just _ogAlt)
165174 where go
166− = clientWithRoute (Proxy :: Proxy OrgunitsGetAPI) r u
175+ = clientWithRoute
176+ (Proxy :: Proxy OrgunitsGetResource)
177+ r
178+ u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/Insert.hs+29−20
@@ -1,6 +1,7 @@
11{-# LANGUAGE DataKinds #-}
22{-# LANGUAGE DeriveDataTypeable #-}
33{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
45{-# LANGUAGE RecordWildCards #-}
56{-# LANGUAGE TypeFamilies #-}
67{-# LANGUAGE TypeOperators #-}
@@ -19,14 +20,14 @@
1920-- | Add Organization Unit
2021--
2122-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> for @DirectoryOrgunitsInsert@.
22−module Directory.Orgunits.Insert
23+module Network.Google.Resource.Directory.Orgunits.Insert
2324 (
2425 -- * REST Resource
25− OrgunitsInsertAPI
26+ OrgunitsInsertResource
2627
2728 -- * Creating a Request
28− , orgunitsInsert
29− , OrgunitsInsert
29+ , orgunitsInsert'
30+ , OrgunitsInsert'
3031
3132 -- * Request Lenses
3233 , oiQuotaUser
@@ -43,16 +44,23 @@ import Network.Google.AdminDirectory.Types
4344import Network.Google.Prelude
4445
4546-- | A resource alias for @DirectoryOrgunitsInsert@ which the
46−-- 'OrgunitsInsert' request conforms to.
47−type OrgunitsInsertAPI =
47+-- 'OrgunitsInsert'' request conforms to.
48+type OrgunitsInsertResource =
4849 "customer" :>
4950 Capture "customerId" Text :>
50− "orgunits" :> Post '[JSON] OrgUnit
51+ "orgunits" :>
52+ QueryParam "quotaUser" Text :>
53+ QueryParam "prettyPrint" Bool :>
54+ QueryParam "userIp" Text :>
55+ QueryParam "key" Text :>
56+ QueryParam "oauth_token" Text :>
57+ QueryParam "fields" Text :>
58+ QueryParam "alt" Alt :> Post '[JSON] OrgUnit
5159
5260-- | Add Organization Unit
5361--
54−-- /See:/ 'orgunitsInsert' smart constructor.
55−data OrgunitsInsert = OrgunitsInsert
62+-- /See:/ 'orgunitsInsert'' smart constructor.
63+data OrgunitsInsert' = OrgunitsInsert'
5664 { _oiQuotaUser :: !(Maybe Text)
5765 , _oiPrettyPrint :: !Bool
5866 , _oiUserIp :: !(Maybe Text)
@@ -60,7 +68,7 @@ data OrgunitsInsert = OrgunitsInsert
6068 , _oiKey :: !(Maybe Text)
6169 , _oiOauthToken :: !(Maybe Text)
6270 , _oiFields :: !(Maybe Text)
63− , _oiAlt :: !Text
71+ , _oiAlt :: !Alt
6472 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6573
6674-- | Creates a value of 'OrgunitsInsert'' with the minimum fields required to make a request.
@@ -82,11 +90,11 @@ data OrgunitsInsert = OrgunitsInsert
8290-- * 'oiFields'
8391--
8492-- * 'oiAlt'
85−orgunitsInsert
93+orgunitsInsert'
8694 :: Text -- ^ 'customerId'
87− -> OrgunitsInsert
88−orgunitsInsert pOiCustomerId_ =
89− OrgunitsInsert
95+ -> OrgunitsInsert'
96+orgunitsInsert' pOiCustomerId_ =
97+ OrgunitsInsert'
9098 { _oiQuotaUser = Nothing
9199 , _oiPrettyPrint = True
92100 , _oiUserIp = Nothing
@@ -94,7 +102,7 @@ orgunitsInsert pOiCustomerId_ =
94102 , _oiKey = Nothing
95103 , _oiOauthToken = Nothing
96104 , _oiFields = Nothing
97− , _oiAlt = "json"
105+ , _oiAlt = JSON
98106 }
99107
100108-- | Available to use for quota purposes for server-side applications. Can be
@@ -136,20 +144,21 @@ oiFields :: Lens' OrgunitsInsert' (Maybe Text)
136144oiFields = lens _oiFields (\ s a -> s{_oiFields = a})
137145
138146-- | Data format for the response.
139−oiAlt :: Lens' OrgunitsInsert' Text
147+oiAlt :: Lens' OrgunitsInsert' Alt
140148oiAlt = lens _oiAlt (\ s a -> s{_oiAlt = a})
141149
142150instance GoogleRequest OrgunitsInsert' where
143151 type Rs OrgunitsInsert' = OrgUnit
144152 request = requestWithRoute defReq adminDirectoryURL
145− requestWithRoute r u OrgunitsInsert{..}
146− = go _oiQuotaUser _oiPrettyPrint _oiUserIp
153+ requestWithRoute r u OrgunitsInsert'{..}
154+ = go _oiQuotaUser (Just _oiPrettyPrint) _oiUserIp
147155 _oiCustomerId
148156 _oiKey
149157 _oiOauthToken
150158 _oiFields
151− _oiAlt
159+ (Just _oiAlt)
152160 where go
153− = clientWithRoute (Proxy :: Proxy OrgunitsInsertAPI)
161+ = clientWithRoute
162+ (Proxy :: Proxy OrgunitsInsertResource)
154163 r
155164 u
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/List.hs+33−23
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/Patch.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Orgunits/Update.hs+31−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Delete.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Get.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Insert.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/List.hs+31−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Patch.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Schemas/Update.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/Delete.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/Get.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Tokens/List.hs+31−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Delete.hs+28−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Insert.hs+29−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/List.hs+30−22
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Aliases/Watch.hs+30−22
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Delete.hs+32−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Get.hs+39−28
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Insert.hs+32−19
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/List.hs+57−43
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/MakeAdmin.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Patch.hs+31−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Delete.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Get.hs+31−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Patch.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Photos/Update.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Undelete.hs+81−73
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Update.hs+86−71
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/Users/Watch.hs+58−44
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/Generate.hs+30−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/Invalidate.hs+29−20
This diff is too big to show here.
gogol-admin-directory/gen/Network/Google/Resource/Directory/VerificationCodes/List.hs+29−20
This diff is too big to show here.
gogol-admin-emailmigration/gen/Network/Google/AdminEmailMigration.hs+5−2
This diff is too big to show here.
gogol-admin-emailmigration/gen/Network/Google/AdminEmailMigration/Types.hs+4−1
This diff is too big to show here.
gogol-admin-emailmigration/gen/Network/Google/AdminEmailMigration/Types/Sum.hs+24
This diff is too big to show here.
gogol-admin-emailmigration/gen/Network/Google/Resource/EmailMigration/Mail/Insert.hs+32−20
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/AdminReports.hs+84−7
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/AdminReports/Types.hs+76−1
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/AdminReports/Types/Product.hs+600−6
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/AdminReports/Types/Sum.hs+24
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/Resource/Admin/Channels/Stop.hs+32−20
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/Resource/Reports/Activities/List.hs+37−28
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/Resource/Reports/Activities/Watch.hs+37−28
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/Resource/Reports/CustomerUsageReports/Get.hs+31−23
This diff is too big to show here.
gogol-admin-reports/gen/Network/Google/Resource/Reports/UserUsageReport/Get.hs+34−25
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/AdSenseHost.hs+102−30
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+51−1
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Product.hs+379−2
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Sum.hs+73
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adclients/Get.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adclients/List.hs+103−96
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/Delete.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/Get.hs+29−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/GetAdCode.hs+29−21
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/Insert.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/List.hs+123−115
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/Patch.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Adunits/Update.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Get.hs+31−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/List.hs+85−78
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Accounts/Reports/Generate.hs+37−28
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Adclients/Get.hs+30−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Adclients/List.hs+97−83
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Associationsessions/Start.hs+37−27
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Associationsessions/Verify.hs+29−21
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/Delete.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/Get.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/Insert.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/List.hs+29−22
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/Patch.hs+28−21
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Customchannels/Update.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/Reports/Generate.hs+37−28
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLchannels/Delete.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLchannels/Insert.hs+28−20
This diff is too big to show here.
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLchannels/List.hs+30−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/AdSense.hs+139−45
This diff is too big to show here.
gogol-adsense/gen/Network/Google/AdSense/Types.hs+64−1
This diff is too big to show here.
gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+529−2
This diff is too big to show here.
gogol-adsense/gen/Network/Google/AdSense/Types/Sum.hs+29
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Adclients/List.hs+99−96
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Adunits/Customchannels/List.hs+32−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Adunits/Get.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Adunits/GetAdCode.hs+29−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Adunits/List.hs+123−115
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs+96−79
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Customchannels/Adunits/List.hs+31−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Customchannels/Get.hs+27−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Customchannels/List.hs+113−105
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Get.hs+32−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/List.hs+93−86
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+40−31
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs+33−23
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs+30−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs+29−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLchannels/List.hs+29−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Adclients/List.hs+97−83
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Adunits/Customchannels/List.hs+113−105
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Adunits/Get.hs+96−86
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Adunits/GetAdCode.hs+29−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Adunits/List.hs+112−101
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/Delete.hs+31−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/List.hs+30−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Customchannels/Adunits/List.hs+30−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Customchannels/Get.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Customchannels/List.hs+29−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs+30−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs+30−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Payments/List.hs+31−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+42−32
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs+31−23
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs+30−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs+28−20
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs+30−22
This diff is too big to show here.
gogol-adsense/gen/Network/Google/Resource/AdSense/URLchannels/List.hs+30−22
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Affiliates.hs+137−13
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Affiliates/Types.hs+119−1
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Affiliates/Types/Product.hs+472−12
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Affiliates/Types/Sum.hs+758
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Advertisers/Get.hs+33−25
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Advertisers/List.hs+44−33
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/CcOffers/List.hs+34−23
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Events/List.hs+60−46
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Links/Get.hs+35−24
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Links/Insert.hs+37−24
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Links/List.hs+58−44
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Publishers/Get.hs+35−25
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Publishers/List.hs+44−33
This diff is too big to show here.
gogol-affiliates/gen/Network/Google/Resource/Gan/Reports/Get.hs+54−43
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Analytics.hs+515−79
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Analytics/Types.hs+361−1
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+3076−87
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Analytics/Types/Sum.hs+124
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Ga/Get.hs+49−36
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Mcf/Get.hs+45−31
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Realtime/Get.hs+36−26
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountSummaries/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Delete.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Insert.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Update.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Accounts/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDataSources/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Insert.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Patch.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Update.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Get.hs+27−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Insert.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Patch.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Update.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Delete.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Get.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Insert.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Update.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Delete.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Insert.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/List.hs+29−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Update.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Get.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Insert.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/List.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Update.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Delete.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Insert.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileFilterLinks/Update.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Delete.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Insert.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProfileUserLinks/Update.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Delete.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Insert.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Profiles/Update.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Segments/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Insert.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/List.hs+31−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/DeleteUploadData.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/Get.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/List.hs+30−21
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Delete.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Get.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Insert.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Patch.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Update.hs+30−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Webproperties/Get.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Webproperties/Insert.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Webproperties/List.hs+29−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Webproperties/Patch.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Webproperties/Update.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebpropertyUserLinks/Delete.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebpropertyUserLinks/Insert.hs+28−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebpropertyUserLinks/List.hs+30−22
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebpropertyUserLinks/Update.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Metadata/Columns/List.hs+29−20
This diff is too big to show here.
gogol-analytics/gen/Network/Google/Resource/Analytics/Provisioning/CreateAccountTicket.hs+30−20
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue.hs+34−9
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue/Types.hs+19−1
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue/Types/Product.hs+145
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue/Types/Sum.hs+24
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Taskqueues/Get.hs+31−20
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Delete.hs+32−20
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Get.hs+30−20
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Insert.hs+31−20
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Lease.hs+126−113
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/List.hs+90−82
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Patch.hs+30−21
This diff is too big to show here.
gogol-appengine-taskqueue/gen/Network/Google/Resource/Taskqueue/Tasks/Update.hs+31−21
This diff is too big to show here.
gogol-appengine/gen/Network/Google/AppEngine.hs+59−12
This diff is too big to show here.
gogol-appengine/gen/Network/Google/AppEngine/Types.hs+37−1
This diff is too big to show here.
gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+213−2
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Get.hs+34−19
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Delete.hs+33−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Get.hs+34−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/List.hs+35−20
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Patch.hs+34−19
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Create.hs+34−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Delete.hs+34−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/Get.hs+34−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/List.hs+37−21
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/Get.hs+33−18
This diff is too big to show here.
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/List.hs+35−21
This diff is too big to show here.
gogol-apps-activity/gen/Network/Google/AppsActivity.hs+20−2
This diff is too big to show here.
gogol-apps-activity/gen/Network/Google/AppsActivity/Types.hs+19−1
This diff is too big to show here.
gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Product.hs+8−8
This diff is too big to show here.
gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Sum.hs+248
This diff is too big to show here.
gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+41−30
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+177−42
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+105−1
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+667
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Sum.hs+166
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Delete.hs+31−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Get.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+30−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+31−22
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+31−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+31−22
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Delete.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Get.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Insert.hs+29−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/List.hs+38−27
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Patch.hs+30−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Update.hs+29−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Watch.hs+38−26
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Clear.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Delete.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Get.hs+83−74
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Insert.hs+30−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Patch.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Update.hs+29−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Channels/Stop.hs+32−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Colors/Get.hs+76−63
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Delete.hs+30−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Get.hs+32−23
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Import.hs+92−88
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Insert.hs+118−104
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Instances.hs+176−161
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+58−38
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Move.hs+30−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Patch.hs+34−24
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/QuickAdd.hs+31−22
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Update.hs+33−24
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+62−40
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Freebusy/Query.hs+31−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Get.hs+32−20
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/List.hs+31−21
This diff is too big to show here.
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Watch.hs+31−21
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/AppsLicensing.hs+18−8
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/AppsLicensing/Types.hs+4−1
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/AppsLicensing/Types/Sum.hs+24
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Delete.hs+29−20
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Get.hs+27−20
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Insert.hs+29−20
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProduct.hs+33−23
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProductAndSku.hs+31−23
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Patch.hs+28−20
This diff is too big to show here.
gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Update.hs+27−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/AppsReseller.hs+74−30
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/AppsReseller/Types.hs+47−16
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Product.hs+323−108
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Sum.hs+63
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Get.hs+30−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Insert.hs+30−21
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Patch.hs+29−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Update.hs+29−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Activate.hs+28−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs+28−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs+29−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs+28−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs+33−23
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Get.hs+27−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs+28−21
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/List.hs+32−25
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/StartPaidService.hs+30−20
This diff is too big to show here.
gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Suspend.hs+91−81
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/AppsTasks.hs+38−15
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/AppsTasks/Types.hs+11−1
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/AppsTasks/Types/Product.hs+57−2
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/AppsTasks/Types/Sum.hs+24
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/Delete.hs+83−76
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/Get.hs+82−76
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/Insert.hs+77−64
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/List.hs+97−87
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/Patch.hs+86−76
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasklists/Update.hs+83−76
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Clear.hs+32−20
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Delete.hs+96−80
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Get.hs+31−20
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Insert.hs+104−88
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+41−29
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Move.hs+31−20
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Patch.hs+32−20
This diff is too big to show here.
gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Update.hs+96−80
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/BigQuery.hs+115−23
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+75−1
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+597−16
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/BigQuery/Types/Sum.hs+92
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Delete.hs+30−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Get.hs+32−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Insert.hs+30−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/List.hs+33−23
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Patch.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Datasets/Update.hs+30−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Cancel.hs+32−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Get.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/GetQueryResults.hs+33−24
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Insert.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/List.hs+39−28
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Query.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Projects/List.hs+32−22
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tabledata/InsertAll.hs+29−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tabledata/List.hs+33−23
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Delete.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Get.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Insert.hs+31−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/List.hs+32−22
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Patch.hs+32−20
This diff is too big to show here.
gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Update.hs+31−20
This diff is too big to show here.
gogol-billing/gen/Network/Google/Billing.hs+11−6
This diff is too big to show here.
gogol-billing/gen/Network/Google/Billing/Types.hs+1−1
This diff is too big to show here.
gogol-billing/gen/Network/Google/Resource/Cloudbilling/BillingAccounts/Get.hs+34−18
This diff is too big to show here.
gogol-billing/gen/Network/Google/Resource/Cloudbilling/BillingAccounts/List.hs+34−20
This diff is too big to show here.
gogol-billing/gen/Network/Google/Resource/Cloudbilling/BillingAccounts/Projects/List.hs+36−20
This diff is too big to show here.
gogol-billing/gen/Network/Google/Resource/Cloudbilling/Projects/GetBillingInfo.hs+34−18
This diff is too big to show here.
gogol-billing/gen/Network/Google/Resource/Cloudbilling/Projects/UpdateBillingInfo.hs+34−18
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Blogger.hs+257−38
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Blogger/Types.hs+192−1
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+910−4
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Blogger/Types/Sum.hs+769−2
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/BlogUserInfos/Get.hs+29−21
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/Get.hs+33−23
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/GetByURL.hs+34−23
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/ListByUser.hs+39−30
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Approve.hs+30−20
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Delete.hs+30−20
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Get.hs+34−22
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/List.hs+42−31
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/ListByBlog.hs+38−28
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/MarkAsSpam.hs+29−20
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/RemoveContent.hs+28−20
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/PageViews/Get.hs+32−22
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Delete.hs+97−79
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Get.hs+101−86
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Insert.hs+32−20
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/List.hs+39−29
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Patch.hs+114−95
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Publish.hs+95−85
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Revert.hs+96−79
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Update.hs+113−95
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/Get.hs+29−21
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/List.hs+48−36
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Delete.hs+92−85
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Get.hs+125−121
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/GetByPath.hs+34−24
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Insert.hs+115−104
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/List.hs+47−37
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Patch.hs+135−131
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Publish.hs+105−95
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Revert.hs+91−85
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Search.hs+37−25
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Update.hs+136−131
This diff is too big to show here.
gogol-blogger/gen/Network/Google/Resource/Blogger/Users/Get.hs+31−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Books.hs+591−51
This diff is too big to show here.
gogol-books/gen/Network/Google/Books/Types.hs+504−1
This diff is too big to show here.
gogol-books/gen/Network/Google/Books/Types/Product.hs+3912−68
This diff is too big to show here.
gogol-books/gen/Network/Google/Books/Types/Sum.hs+713
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Bookshelves/Get.hs+30−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Bookshelves/List.hs+30−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Bookshelves/Volumes/List.hs+31−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Cloudloading/AddBook.hs+32−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Cloudloading/DeleteBook.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Cloudloading/UpdateBook.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Dictionary/ListOfflineMetadata.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/Get.hs+35−26
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/List.hs+39−31
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/Get.hs+31−21
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/List.hs+34−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/VolumeAnnotations/Get.hs+31−22
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Layers/VolumeAnnotations/List.hs+44−33
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Myconfig/GetUserSettings.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Myconfig/ReleaseDownloadAccess.hs+33−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Myconfig/RequestAccess.hs+39−27
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Myconfig/SyncVolumeLicenses.hs+38−28
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Myconfig/UpdateUserSettings.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Annotations/Delete.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Annotations/Insert.hs+30−22
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Annotations/List.hs+38−30
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Annotations/Summary.hs+31−22
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Annotations/Update.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/AddVolume.hs+36−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/ClearVolumes.hs+30−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/Get.hs+28−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/List.hs+29−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/MoveVolume.hs+32−22
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/RemoveVolume.hs+36−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Bookshelves/Volumes/List.hs+41−29
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Readingpositions/Get.hs+30−22
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Mylibrary/Readingpositions/SetPosition.hs+37−26
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Onboarding/ListCategories.hs+28−20
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Onboarding/ListCategoryVolumes.hs+38−26
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Promooffer/Accept.hs+36−27
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Promooffer/Dismiss.hs+35−26
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Promooffer/Get.hs+36−25
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Associated/List.hs+39−27
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Get.hs+37−27
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/List.hs+61−45
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Mybooks/List.hs+41−29
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Recommended/List.hs+34−24
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Recommended/Rate.hs+38−27
This diff is too big to show here.
gogol-books/gen/Network/Google/Resource/Books/Volumes/Useruploaded/List.hs+37−27
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/CivicInfo.hs+35−6
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+24−1
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+45
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Sum.hs+268
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Divisions/Search.hs+31−21
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/ElectionQuery.hs+30−20
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/VoterInfoQuery.hs+31−23
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByAddress.hs+43−28
This diff is too big to show here.
gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByDivision.hs+42−27
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Classroom.hs+46−24
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Classroom/Types.hs+1−1
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/Create.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/Delete.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/List.hs+34−20
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Create.hs+35−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Delete.hs+34−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Get.hs+35−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/List.hs+38−21
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Patch.hs+35−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Create.hs+33−19
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Delete.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Get.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/List.hs+34−20
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Create.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Delete.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Get.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/List.hs+34−20
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Update.hs+35−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Accept.hs+33−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Create.hs+34−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Delete.hs+32−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Get.hs+34−18
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/List.hs+37−22
This diff is too big to show here.
gogol-classroom/gen/Network/Google/Resource/Classroom/UserProfiles/Get.hs+34−18
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/ComputeAutoscaler.hs+55−11
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/ComputeAutoscaler/Types.hs+37−1
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/ComputeAutoscaler/Types/Product.hs+249−4
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/ComputeAutoscaler/Types/Sum.hs+24
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Delete.hs+29−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Get.hs+30−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Insert.hs+29−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/List.hs+33−23
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Patch.hs+29−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Update.hs+29−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Delete.hs+28−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Get.hs+28−20
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/List.hs+30−23
This diff is too big to show here.
gogol-compute-autoscaler/gen/Network/Google/Resource/Autoscaler/Zones/List.hs+33−23
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/ComputeUserAccounts.hs+67−19
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/ComputeUserAccounts/Types.hs+35−1
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/ComputeUserAccounts/Types/Product.hs+198−4
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/ComputeUserAccounts/Types/Sum.hs+131
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/GlobalAccountsOperations/Delete.hs+30−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/GlobalAccountsOperations/Get.hs+29−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/GlobalAccountsOperations/List.hs+33−24
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/AddMember.hs+29−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/Delete.hs+31−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/Get.hs+31−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/Insert.hs+32−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/List.hs+33−24
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Groups/RemoveMember.hs+28−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Linux/GetAuthorizedKeysView.hs+31−22
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Linux/GetLinuxAccountViews.hs+35−25
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/AddPublicKey.hs+29−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/Delete.hs+32−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/Get.hs+31−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/Insert.hs+33−20
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/List.hs+33−24
This diff is too big to show here.
gogol-compute-useraccounts/gen/Network/Google/Resource/Clouduseraccounts/Users/RemovePublicKey.hs+29−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Compute.hs+841−233
This diff is too big to show here.
gogol-compute/gen/Network/Google/Compute/Types.hs+494−30
This diff is too big to show here.
gogol-compute/gen/Network/Google/Compute/Types/Product.hs+2844−355
This diff is too big to show here.
gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+2351
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/AggregatedList.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Delete.hs+102−88
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Get.hs+103−88
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Insert.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Addresses/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/AggregatedList.hs+116−97
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Delete.hs+97−93
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Get.hs+98−93
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Insert.hs+92−84
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/List.hs+121−112
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Patch.hs+29−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Update.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/GetHealth.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Patch.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Update.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/AggregatedList.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/Get.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/List.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/AggregatedList.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/CreateSnapshot.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/Delete.hs+32−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/Get.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/Insert.hs+32−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Disks/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Delete.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Get.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Insert.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Patch.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Update.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/AggregatedList.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/SetTarget.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Insert.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/List.hs+30−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Insert.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/List.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/SetTarget.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/AggregatedList.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/List.hs+30−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Patch.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Update.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Images/Delete.hs+91−78
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Images/Deprecate.hs+93−80
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Images/Get.hs+98−80
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Images/Insert.hs+88−73
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Images/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AbandonInstances.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AggregatedList.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/DeleteInstances.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Get.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Insert.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/List.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/ListManagedInstances.hs+31−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/RecreateInstances.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Resize.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetInstanceTemplate.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetTargetPools.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AddInstances.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AggregatedList.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Get.hs+100−94
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/ListInstances.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/RemoveInstances.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/SetNamedPorts.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/AddAccessConfig.hs+29−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/AggregatedList.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/AttachDisk.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Delete.hs+96−92
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/DeleteAccessConfig.hs+30−22
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/DetachDisk.hs+28−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Get.hs+99−92
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/GetSerialPortOutput.hs+31−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Insert.hs+90−84
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/List.hs+121−112
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Reset.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetDiskAutoDelete.hs+30−22
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetMetadata.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetScheduling.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetTags.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Start.hs+103−88
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Instances/Stop.hs+99−93
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Licenses/Get.hs+32−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/AggregatedList.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/Get.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Networks/Delete.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Networks/Get.hs+32−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Networks/Insert.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Networks/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/Get.hs+32−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveDisk.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveInstance.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetCommonInstanceMetadata.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetUsageExportBucket.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/List.hs+30−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Regions/Get.hs+91−85
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Regions/List.hs+34−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Routes/Delete.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Routes/Get.hs+95−80
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Routes/Insert.hs+32−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Routes/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/Delete.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/Get.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/SetURLMap.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/AggregatedList.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Delete.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Get.hs+27−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddHealthCheck.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddInstance.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AggregatedList.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Get.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/GetHealth.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/List.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveHealthCheck.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveInstance.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/SetBackup.hs+29−21
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/AggregatedList.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Insert.hs+29−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/List.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Delete.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Get.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Insert.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/List.hs+33−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Patch.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Update.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Validate.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/AggregatedList.hs+32−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Get.hs+30−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Insert.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/List.hs+31−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/Delete.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/Get.hs+28−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/List.hs+30−23
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Zones/Get.hs+31−20
This diff is too big to show here.
gogol-compute/gen/Network/Google/Resource/Compute/Zones/List.hs+33−23
This diff is too big to show here.
gogol-container/gen/Network/Google/Container.hs+29−9
This diff is too big to show here.
gogol-container/gen/Network/Google/Container/Types.hs+13−1
This diff is too big to show here.
gogol-container/gen/Network/Google/Container/Types/Product.hs+6−6
This diff is too big to show here.
gogol-container/gen/Network/Google/Container/Types/Sum.hs+117
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Clusters/List.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Operations/List.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Create.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Delete.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Get.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/List.hs+30−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/Get.hs+29−20
This diff is too big to show here.
gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/List.hs+30−20
This diff is too big to show here.
gogol-customsearch/gen/Network/Google/CustomSearch.hs+100−2
This diff is too big to show here.
gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+99−1
This diff is too big to show here.
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+524−6
This diff is too big to show here.
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+547−2
This diff is too big to show here.
gogol-customsearch/gen/Network/Google/Resource/Search/Cse/List.hs+118−77
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Dataflow.hs+113−9
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+97−1
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+540−14
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Create.hs+34−19
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Get.hs+34−18
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/GetMetrics.hs+34−18
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/List.hs+35−21
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Messages/List.hs+39−23
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Update.hs+33−18
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/Lease.hs+33−18
This diff is too big to show here.
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/ReportStatus.hs+35−18
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Datastore.hs+47−7
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Datastore/Types.hs+35−1
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+39−18
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Datastore/Types/Sum.hs+311
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/AllocateIds.hs+30−20
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/BeginTransaction.hs+29−20
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Commit.hs+30−20
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Lookup.hs+30−20
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/Rollback.hs+29−20
This diff is too big to show here.
gogol-datastore/gen/Network/Google/Resource/Datastore/Datasets/RunQuery.hs+29−20
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Debugger.hs+21−9
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Debugger/Types.hs+5−1
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+22
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Controller/Debuggees/Breakpoints/List.hs+35−19
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Controller/Debuggees/Breakpoints/Update.hs+34−18
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Controller/Debuggees/Register.hs+33−18
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Debugger/Debuggees/Breakpoints/Delete.hs+34−18
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Debugger/Debuggees/Breakpoints/Get.hs+34−18
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Debugger/Debuggees/Breakpoints/List.hs+40−23
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Debugger/Debuggees/Breakpoints/Set.hs+35−18
This diff is too big to show here.
gogol-debugger/gen/Network/Google/Resource/Clouddebugger/Debugger/Debuggees/List.hs+34−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/DeploymentManager.hs+71−15
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types.hs+47−1
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types/Product.hs+196−2
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types/Sum.hs+186
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs+29−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs+30−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs+30−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs+33−23
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs+45−32
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs+45−32
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs+31−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs+34−23
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs+30−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs+33−23
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs+31−20
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs+34−23
This diff is too big to show here.
gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Types/List.hs+34−23
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/DFAReporting.hs+1129−348
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/DFAReporting/Types.hs+744−102
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+2006−871
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+7381
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountActiveAdSummaries/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/List.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/Get.hs+92−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Insert.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/List.hs+47−33
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Patch.hs+30−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProfiles/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Get.hs+95−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/List.hs+45−31
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Patch.hs+94−79
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Get.hs+96−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Insert.hs+85−77
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/List.hs+351−319
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Patch.hs+94−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Update.hs+84−74
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Get.hs+92−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/List.hs+42−30
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Patch.hs+28−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Get.hs+90−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Insert.hs+85−74
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/List.hs+210−192
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Patch.hs+89−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Update.hs+85−77
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Browsers/List.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/Insert.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/List.hs+38−25
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Get.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Insert.hs+30−22
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/List.hs+212−193
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Patch.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/List.hs+46−33
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Cities/List.hs+120−116
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/List.hs+42−30
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Patch.hs+28−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/List.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeAssets/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/List.hs+43−30
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Patch.hs+29−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/List.hs+43−31
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Patch.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/List.hs+44−32
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Patch.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Get.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Insert.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/List.hs+61−41
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Patch.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DimensionValues/Query.hs+30−22
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/List.hs+45−31
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/List.hs+53−37
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Delete.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Insert.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/List.hs+52−36
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Patch.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/List.hs+45−33
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Generatetag.hs+31−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Get.hs+89−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/List.hs+57−40
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Patch.hs+29−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Delete.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Insert.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/List.hs+51−35
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Patch.hs+31−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Update.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/List.hs+31−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Patch.hs+30−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/List.hs+46−32
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Patch.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Metros/List.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/List.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/List.hs+46−33
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/Get.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/List.hs+45−31
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Get.hs+92−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/List.hs+76−47
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Patch.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Delete.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/List.hs+42−30
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Patch.hs+29−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Update.hs+27−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Generatetags.hs+36−25
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Get.hs+91−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/List.hs+329−284
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Patch.hs+90−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/List.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/List.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/Get.hs+95−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/List.hs+152−142
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Regions/List.hs+86−72
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Patch.hs+30−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Update.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Get.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/List.hs+45−32
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Patch.hs+28−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Update.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/CompatibleFields/Query.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Delete.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/List.hs+41−29
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Insert.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/List.hs+131−118
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Patch.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Run.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Update.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Insert.hs+31−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/List.hs+241−219
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Patch.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Update.hs+88−74
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Insert.hs+88−72
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/List.hs+118−112
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Subaccounts/Get.hs+90−86
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Subaccounts/Insert.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Subaccounts/List.hs+140−128
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Subaccounts/Patch.hs+28−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Subaccounts/Update.hs+82−77
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/List.hs+46−31
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProfiles/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProfiles/List.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/Get.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/List.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/Get.hs+96−84
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/List.hs+30−21
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Delete.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Get.hs+30−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Insert.hs+29−20
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/List.hs+46−32
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Patch.hs+93−79
This diff is too big to show here.
gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Update.hs+29−20
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Discovery.hs+134−3
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Discovery/Types.hs+131−1
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+928−2
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Discovery/Types/Sum.hs+24
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/GetRest.hs+32−20
This diff is too big to show here.
gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/List.hs+31−21
This diff is too big to show here.
gogol-dns/gen/Network/Google/DNS.hs+23−11
This diff is too big to show here.
gogol-dns/gen/Network/Google/DNS/Types.hs+7−1
This diff is too big to show here.
gogol-dns/gen/Network/Google/DNS/Types/Sum.hs+47
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/Changes/Create.hs+31−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/Changes/Get.hs+31−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/Changes/List.hs+39−27
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Create.hs+28−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Delete.hs+28−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Get.hs+29−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/List.hs+31−23
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/Projects/Get.hs+32−20
This diff is too big to show here.
gogol-dns/gen/Network/Google/Resource/DNS/ResourceRecordSets/List.hs+33−24
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids.hs+60−9
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types.hs+46−1
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Product.hs+28−28
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Sum.hs+2272
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Lineitems/Downloadlineitems.hs+29−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Lineitems/Uploadlineitems.hs+29−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Queries/Createquery.hs+29−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Queries/Deletequery.hs+29−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Queries/Getquery.hs+30−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Queries/Listqueries.hs+30−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Queries/Runquery.hs+31−20
This diff is too big to show here.
gogol-doubleclick-bids/gen/Network/Google/Resource/Doubleclickbidmanager/Reports/Listreports.hs+30−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+60−11
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+42−1
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+347−6
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Sum.hs+24
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Get.hs+38−28
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Insert.hs+29−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Patch.hs+36−27
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Update.hs+29−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/UpdateAvailability.hs+30−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Generate.hs+30−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Get.hs+30−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/GetFile.hs+29−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Request.hs+30−20
This diff is too big to show here.
gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/SavedColumns/List.hs+29−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Drive.hs+281−70
This diff is too big to show here.
gogol-drive/gen/Network/Google/Drive/Types.hs+163−1
This diff is too big to show here.
gogol-drive/gen/Network/Google/Drive/Types/Product.hs+1122−14
This diff is too big to show here.
gogol-drive/gen/Network/Google/Drive/Types/Sum.hs+310
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/About/Get.hs+104−95
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Apps/Get.hs+82−72
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Apps/List.hs+32−23
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Changes/Get.hs+87−74
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs+137−122
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+35−26
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Channels/Stop.hs+32−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Children/Delete.hs+94−82
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Children/Get.hs+31−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Children/Insert.hs+82−74
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Children/List.hs+118−106
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Delete.hs+90−84
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Get.hs+101−94
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Insert.hs+82−76
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/List.hs+125−115
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Patch.hs+31−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Update.hs+30−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs+39−29
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Delete.hs+33−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/EmptyTrash.hs+31−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/GenerateIds.hs+29−21
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs+34−25
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Insert.hs+41−30
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs+41−30
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Patch.hs+47−34
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Touch.hs+84−71
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Trash.hs+88−72
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Untrash.hs+81−72
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs+211−203
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+35−25
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Parents/Delete.hs+95−80
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Parents/Get.hs+96−80
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Parents/Insert.hs+87−72
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Parents/List.hs+88−72
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Delete.hs+94−85
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Get.hs+30−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/GetIdForEmail.hs+29−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Insert.hs+100−96
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/List.hs+30−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Patch.hs+103−91
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Update.hs+103−91
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Delete.hs+99−95
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Get.hs+101−95
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Insert.hs+29−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/List.hs+82−78
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Patch.hs+100−96
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Properties/Update.hs+99−95
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Get.hs+96−79
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Update.hs+90−86
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Delete.hs+103−88
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Get.hs+31−21
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Insert.hs+31−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/List.hs+125−108
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Patch.hs+31−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Update.hs+103−88
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Delete.hs+90−85
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Get.hs+96−85
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/List.hs+83−76
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Patch.hs+30−20
This diff is too big to show here.
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Update.hs+90−85
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Fitness.hs+42−14
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Fitness/Types.hs+16−1
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+8−8
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+178
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Create.hs+29−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Datasets/Delete.hs+31−22
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Datasets/Get.hs+30−21
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Datasets/Patch.hs+30−21
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Delete.hs+28−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Get.hs+29−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/List.hs+29−21
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Patch.hs+28−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Update.hs+29−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Dataset/Aggregate.hs+29−20
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Delete.hs+28−21
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/List.hs+33−24
This diff is too big to show here.
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Update.hs+28−21
This diff is too big to show here.
gogol-fonts/gen/Network/Google/Fonts.hs+12−2
This diff is too big to show here.
gogol-fonts/gen/Network/Google/Fonts/Types.hs+11−1
This diff is too big to show here.
gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+22
This diff is too big to show here.
gogol-fonts/gen/Network/Google/Fonts/Types/Sum.hs+68
This diff is too big to show here.
gogol-fonts/gen/Network/Google/Resource/Webfonts/Webfonts/List.hs+33−22
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/FreebaseSearch.hs+40−3
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types.hs+38−1
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+147−2
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Sum.hs+210
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/Method/Freebase/Reconcile.hs+35−25
This diff is too big to show here.
gogol-freebasesearch/gen/Network/Google/Method/Freebase/Search.hs+83−56
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/FusionTables.hs+93−41
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+29−7
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+202−45
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/FusionTables/Types/Sum.hs+29
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Delete.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Get.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Insert.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/List.hs+32−22
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Patch.hs+32−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Update.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/Sql.hs+31−21
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SqlGet.hs+33−21
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Delete.hs+32−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Get.hs+30−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Insert.hs+32−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/List.hs+32−22
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Patch.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Update.hs+32−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Copy.hs+31−21
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Delete.hs+85−78
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Get.hs+83−76
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+33−24
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportTable.hs+31−22
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Insert.hs+80−67
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/List.hs+97−87
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Patch.hs+30−21
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+32−24
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Update.hs+94−87
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Delete.hs+90−80
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Get.hs+31−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/List.hs+32−23
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Delete.hs+30−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Get.hs+98−86
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Insert.hs+30−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/List.hs+105−89
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Patch.hs+30−20
This diff is too big to show here.
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Update.hs+96−82
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/GamesAppState.hs+13−6
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/GamesAppState/Types.hs+4−1
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/GamesAppState/Types/Sum.hs+24
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/Resource/Appstate/States/Clear.hs+31−21
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/Resource/Appstate/States/Delete.hs+30−20
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/Resource/Appstate/States/Get.hs+30−20
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/Resource/Appstate/States/List.hs+29−20
This diff is too big to show here.
gogol-games-appstate/gen/Network/Google/Resource/Appstate/States/Update.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/GamesConfiguration.hs+32−15
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types.hs+7−1
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Sum.hs+53
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Delete.hs+30−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Get.hs+30−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Insert.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/List.hs+31−22
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Patch.hs+30−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Update.hs+30−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/ImageConfigurations/Upload.hs+35−24
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Delete.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Get.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Insert.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/List.hs+31−22
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Patch.hs+29−20
This diff is too big to show here.
gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Update.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/GamesManagement.hs+63−32
This diff is too big to show here.
gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+10−1
This diff is too big to show here.
gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+50
This diff is too big to show here.
gogol-games-management/gen/Network/Google/GamesManagement/Types/Sum.hs+24
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/Reset.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetAll.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetAllForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetMultipleForAllPlayers.hs+28−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Applications/ListHidden.hs+30−22
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/Reset.hs+33−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetAll.hs+31−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetAllForAllPlayers.hs+28−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetMultipleForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Players/Hide.hs+31−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Players/Unhide.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/Reset.hs+33−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetAll.hs+31−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetAllForAllPlayers.hs+28−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetMultipleForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Rooms/Reset.hs+32−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Rooms/ResetForAllPlayers.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/Reset.hs+32−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetAll.hs+31−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetAllForAllPlayers.hs+28−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetForAllPlayers.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetMultipleForAllPlayers.hs+29−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/TurnBasedMatches/Reset.hs+30−20
This diff is too big to show here.
gogol-games-management/gen/Network/Google/Resource/GamesManagement/TurnBasedMatches/ResetForAllPlayers.hs+28−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Games.hs+148−65
This diff is too big to show here.
gogol-games/gen/Network/Google/Games/Types.hs+46−1
This diff is too big to show here.
gogol-games/gen/Network/Google/Games/Types/Product.hs+102
This diff is too big to show here.
gogol-games/gen/Network/Google/Games/Types/Sum.hs+355
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/AchievementDefinitions/List.hs+32−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/Increment.hs+29−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/List.hs+35−26
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/Reveal.hs+30−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/SetStepsAtLeast.hs+29−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/Unlock.hs+30−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Achievements/UpdateMultiple.hs+29−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Applications/Get.hs+34−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Applications/Played.hs+30−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Events/ListByPlayer.hs+32−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Events/ListDefinitions.hs+32−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Events/Record.hs+32−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Leaderboards/Get.hs+29−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Leaderboards/List.hs+32−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Metagame/GetMetagameConfig.hs+29−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Metagame/ListCategoriesByPlayer.hs+39−27
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Players/Get.hs+31−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Players/List.hs+38−27
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Remove.hs+30−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Update.hs+29−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/QuestMilestones/Claim.hs+28−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Quests/Accept.hs+31−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Quests/List.hs+34−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Revisions/Check.hs+86−76
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Create.hs+88−73
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Decline.hs+31−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Dismiss.hs+88−76
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Get.hs+30−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Join.hs+31−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/Leave.hs+91−84
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/List.hs+100−91
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Rooms/ReportStatus.hs+29−20
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Scores/Get.hs+143−134
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Scores/List.hs+137−120
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Scores/ListWindow.hs+43−33
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Scores/Submit.hs+110−104
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Scores/SubmitMultiple.hs+30−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Snapshots/Get.hs+96−81
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/Snapshots/List.hs+34−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Cancel.hs+88−78
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Create.hs+85−79
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Decline.hs+87−87
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Dismiss.hs+88−71
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Finish.hs+29−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Get.hs+30−22
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Join.hs+29−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Leave.hs+96−85
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/LeaveTurn.hs+31−23
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/List.hs+32−24
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Rematch.hs+30−21
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Sync.hs+32−24
This diff is too big to show here.
gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/TakeTurn.hs+29−21
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Genomics.hs+200−70
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Genomics/Types.hs+82−1
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+213−28
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+637
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Create.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Delete.hs+28−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Get.hs+27−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Patch.hs+27−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Search.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Update.hs+27−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/BatchCreate.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Create.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Delete.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Get.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Patch.hs+28−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Search.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Annotations/Update.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Create.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Delete.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Get.hs+32−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Patch.hs+31−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Search.hs+31−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Callsets/Update.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Create.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Delete.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Get.hs+32−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/List.hs+33−23
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Patch.hs+31−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Undelete.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Datasets/Update.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Experimental/Jobs/Create.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Jobs/Cancel.hs+32−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Jobs/Get.hs+31−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Jobs/Search.hs+33−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Align.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Call.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Coveragebuckets/List.hs+36−26
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Delete.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Export.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Get.hs+83−78
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Import.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Patch.hs+28−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Search.hs+78−64
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Readgroupsets/Update.hs+28−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Reads/Search.hs+78−65
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/References/Bases/List.hs+32−24
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/References/Get.hs+88−75
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/References/Search.hs+78−65
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Referencesets/Get.hs+82−78
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Referencesets/Search.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Create.hs+78−65
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Delete.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Get.hs+88−73
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Search.hs+31−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Update.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Create.hs+74−64
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Delete.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Export.hs+30−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Get.hs+85−78
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/ImportVariants.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/MergeVariants.hs+29−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Patch.hs+28−20
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Search.hs+73−68
This diff is too big to show here.
gogol-genomics/gen/Network/Google/Resource/Genomics/Variantsets/Update.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Gmail.hs+94−33
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Gmail/Types.hs+31−1
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+8−8
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Gmail/Types/Sum.hs+300
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Create.hs+28−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Delete.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Get.hs+32−23
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/List.hs+31−22
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Send.hs+30−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Update.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/GetProfile.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/History/List.hs+32−24
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Create.hs+28−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Delete.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Get.hs+30−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/List.hs+30−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Patch.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Update.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Attachments/Get.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Delete.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Get.hs+32−25
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Import.hs+37−27
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Insert.hs+34−25
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/List.hs+34−25
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Modify.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Send.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Trash.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Untrash.hs+28−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Stop.hs+32−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Delete.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Get.hs+33−25
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/List.hs+34−25
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Modify.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Trash.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Untrash.hs+29−20
This diff is too big to show here.
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Watch.hs+31−20
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsMigration.hs+5−2
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsMigration/Types.hs+4−1
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsMigration/Types/Sum.hs+24
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsSettings.hs+9−4
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsSettings/Types.hs+4−1
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/GroupsSettings/Types/Sum.hs+29
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/Resource/GroupsMigration/Archive/Insert.hs+31−20
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hs+31−20
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs+32−20
This diff is too big to show here.
gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs+31−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit.hs+49−13
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+25−1
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+190−6
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Sum.hs+24
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/CreateAuthURI.hs+30−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/DeleteAccount.hs+78−68
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/DownloadAccount.hs+77−68
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/GetAccountInfo.hs+29−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/GetOobConfirmationCode.hs+29−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/GetPublicKeys.hs+30−21
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/GetRecaptchaParam.hs+30−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/ResetPassword.hs+30−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/SetAccountInfo.hs+29−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/UploadAccount.hs+30−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/VerifyAssertion.hs+29−20
This diff is too big to show here.
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/Relyingparty/VerifyPassword.hs+29−20
This diff is too big to show here.
gogol-latencytest/gen/Network/Google/LatencyTest.hs+8−3
This diff is too big to show here.
gogol-latencytest/gen/Network/Google/LatencyTest/Types.hs+4−1
This diff is too big to show here.
gogol-latencytest/gen/Network/Google/LatencyTest/Types/Sum.hs+24
This diff is too big to show here.
gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updateaggregatedstats.hs+74−64
This diff is too big to show here.
gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updatestats.hs+72−65
This diff is too big to show here.
gogol-logging/gen/Network/Google/Logging.hs+61−21
This diff is too big to show here.
gogol-logging/gen/Network/Google/Logging/Types.hs+21−1
This diff is too big to show here.
gogol-logging/gen/Network/Google/Logging/Types/Product.hs+125−2
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Indexes/List.hs+38−22
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/List.hs+34−20
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Create.hs+35−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Delete.hs+35−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Get.hs+34−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/List.hs+36−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/LogServices/Sinks/Update.hs+35−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Delete.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Entries/Write.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/List.hs+36−22
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Create.hs+34−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Delete.hs+34−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Get.hs+34−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/List.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Sinks/Update.hs+34−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Create.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Delete.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Get.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/List.hs+33−18
This diff is too big to show here.
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Update.hs+33−18
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate.hs+32−15
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types.hs+10−1
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Sum.hs+112
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/CustomFieldDef/List.hs+29−20
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Get.hs+31−20
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Insert.hs+40−28
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/List.hs+34−24
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Patch.hs+43−32
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Update.hs+43−31
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Location/List.hs+34−23
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Get.hs+32−20
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Patch.hs+35−24
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Update.hs+33−23
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Team/List.hs+31−23
This diff is too big to show here.
gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Worker/List.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/MapEngine.hs+374−137
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/MapEngine/Types.hs+221−58
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/MapEngine/Types/Product.hs+537−467
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/MapEngine/Types/Sum.hs+1660
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Assets/Get.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Assets/List.hs+45−34
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Assets/Parents/List.hs+103−94
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Assets/Permissions/List.hs+85−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/CancelProcessing.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Create.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Delete.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Get.hs+33−22
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/GetPublished.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/List.hs+49−36
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/ListPublished.hs+32−23
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Parents/List.hs+106−94
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Patch.hs+88−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Permissions/BatchDelete.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Permissions/BatchUpdate.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Permissions/List.hs+85−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Process.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Publish.hs+89−86
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Layers/Unpublish.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Create.hs+31−19
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Delete.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Get.hs+32−22
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/GetPublished.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/List.hs+201−183
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/ListPublished.hs+32−23
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Patch.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Permissions/BatchDelete.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Permissions/BatchUpdate.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Permissions/List.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Publish.hs+90−84
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Maps/Unpublish.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Projects/Icons/Create.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Projects/Icons/Get.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Projects/Icons/List.hs+30−22
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Projects/List.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/CancelProcessing.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Create.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Delete.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Get.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/List.hs+49−36
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Parents/List.hs+32−22
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Patch.hs+84−77
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Permissions/BatchDelete.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Permissions/BatchUpdate.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Permissions/List.hs+31−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Process.hs+86−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Rasters/BatchDelete.hs+30−21
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Rasters/BatchInsert.hs+30−21
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/RasterCollections/Rasters/List.hs+44−33
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Delete.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Files/Insert.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Get.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/List.hs+50−36
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Parents/List.hs+103−94
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Patch.hs+82−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Permissions/BatchDelete.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Permissions/BatchUpdate.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Permissions/List.hs+85−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Process.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Rasters/Upload.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Create.hs+31−19
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Delete.hs+32−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Features/BatchDelete.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Features/BatchInsert.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Features/BatchPatch.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Features/Get.hs+34−23
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Features/List.hs+40−30
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Files/Insert.hs+29−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Get.hs+33−22
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/List.hs+49−36
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Parents/List.hs+103−94
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Patch.hs+85−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Permissions/BatchDelete.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Permissions/BatchUpdate.hs+30−20
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Permissions/List.hs+85−75
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Process.hs+81−72
This diff is too big to show here.
gogol-maps-engine/gen/Network/Google/Resource/Mapsengine/Tables/Upload.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Mirror.hs+53−28
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Mirror/Types.hs+7−1
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Mirror/Types/Sum.hs+55
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Accounts/Insert.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Delete.hs+31−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Get.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Insert.hs+30−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/List.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Patch.hs+31−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Update.hs+30−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Locations/Get.hs+31−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Locations/List.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Settings/Get.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Delete.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Insert.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/List.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Update.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Delete.hs+28−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Get.hs+28−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Insert.hs+28−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/List.hs+29−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Delete.hs+31−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Get.hs+32−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Insert.hs+30−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/List.hs+38−28
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Patch.hs+31−20
This diff is too big to show here.
gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Update.hs+30−20
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Monitoring.hs+29−8
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+18−1
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+44
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Monitoring/Types/Sum.hs+98
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/MetricDescriptors/Create.hs+28−20
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/MetricDescriptors/Delete.hs+28−20
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/MetricDescriptors/List.hs+31−23
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/Timeseries/List.hs+41−29
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/Timeseries/Write.hs+30−20
This diff is too big to show here.
gogol-monitoring/gen/Network/Google/Resource/Cloudmonitoring/TimeseriesDescriptors/List.hs+41−29
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/Method/OAuth2/GetCertForOpenIdConnect.hs+30−20
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/Method/OAuth2/Tokeninfo.hs+32−22
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/OAuth2.hs+20−6
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+14−1
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+77−2
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/OAuth2/Types/Sum.hs+24
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/Resource/OAuth2/Userinfo/Get.hs+33−20
This diff is too big to show here.
gogol-oauth2/gen/Network/Google/Resource/OAuth2/Userinfo/V2/Me/Get.hs+31−20
This diff is too big to show here.
gogol-pagespeed/gen/Network/Google/PageSpeed.hs+78−2
This diff is too big to show here.
gogol-pagespeed/gen/Network/Google/PageSpeed/Types.hs+77−1
This diff is too big to show here.
gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+633−2
This diff is too big to show here.
gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Sum.hs+53
This diff is too big to show here.
gogol-pagespeed/gen/Network/Google/Resource/Pagespeedonline/Pagespeedapi/Runpagespeed.hs+37−26
This diff is too big to show here.
gogol-partners/gen/Network/Google/Partners.hs+15−8
This diff is too big to show here.
gogol-partners/gen/Network/Google/Partners/Types.hs+5−1
This diff is too big to show here.
gogol-partners/gen/Network/Google/Partners/Types/Product.hs+22
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/ClientMessages/Log.hs+32−18
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/Companies/Get.hs+65−38
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/Companies/Leads/Create.hs+33−18
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/Companies/List.hs+108−57
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/UserEvents/Log.hs+35−18
This diff is too big to show here.
gogol-partners/gen/Network/Google/Resource/Partners/UserStates/List.hs+55−35
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/PlayDeveloper.hs+157−54
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/PlayDeveloper/Types.hs+54−1
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/PlayDeveloper/Types/Product.hs+43
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/PlayDeveloper/Types/Sum.hs+551
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/Delete.hs+112−104
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/Deleteall.hs+105−95
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/Get.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/List.hs+106−95
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/Patch.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apklistings/Update.hs+113−103
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apks/Addexternallyhosted.hs+30−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apks/List.hs+97−87
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Apks/Upload.hs+97−87
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Commit.hs+33−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Delete.hs+33−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Details/Get.hs+30−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Details/Patch.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Details/Update.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Expansionfiles/Get.hs+34−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Expansionfiles/Patch.hs+35−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Expansionfiles/Update.hs+109−106
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Expansionfiles/Upload.hs+35−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Get.hs+30−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Images/Delete.hs+123−104
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Images/Deleteall.hs+117−104
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Images/List.hs+36−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Images/Upload.hs+35−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Insert.hs+32−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/Delete.hs+103−95
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/Deleteall.hs+95−86
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/Get.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/List.hs+30−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/Patch.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Listings/Update.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Testers/Get.hs+34−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Testers/Patch.hs+34−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Testers/Update.hs+34−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Tracks/Get.hs+34−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Tracks/List.hs+31−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Tracks/Patch.hs+32−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Tracks/Update.hs+34−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Edits/Validate.hs+31−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Entitlements/List.hs+33−24
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Batch.hs+30−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Delete.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Get.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Insert.hs+28−21
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/List.hs+32−23
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Patch.hs+28−21
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Inappproducts/Update.hs+28−21
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Products/Get.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Subscriptions/Cancel.hs+31−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Subscriptions/Defer.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Subscriptions/Get.hs+29−20
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Subscriptions/Refund.hs+99−94
This diff is too big to show here.
gogol-play-developer/gen/Network/Google/Resource/Androidpublisher/Purchases/Subscriptions/Revoke.hs+105−88
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/PlayEnterprise.hs+101−58
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/PlayEnterprise/Types.hs+4−1
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/PlayEnterprise/Types/Sum.hs+24
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/Delete.hs+93−87
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/Get.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/Insert.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/List.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/Patch.hs+28−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collections/Update.hs+93−87
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collectionviewers/Delete.hs+105−91
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collectionviewers/Get.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collectionviewers/List.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collectionviewers/Patch.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Collectionviewers/Update.hs+105−91
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Devices/Get.hs+31−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Devices/GetState.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Devices/List.hs+33−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Devices/SetState.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/Delete.hs+87−75
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/Enroll.hs+28−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/Get.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/Insert.hs+28−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/List.hs+87−74
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/SendTestPushNotification.hs+29−21
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/SetAccount.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Enterprises/Unenroll.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Entitlements/Delete.hs+100−95
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Entitlements/Get.hs+98−95
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Entitlements/List.hs+91−81
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Entitlements/Patch.hs+29−21
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Entitlements/Update.hs+112−103
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Grouplicenses/Get.hs+28−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Grouplicenses/List.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Grouplicenseusers/List.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Installs/Delete.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Installs/Get.hs+32−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Installs/List.hs+32−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Installs/Patch.hs+31−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Installs/Update.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Permissions/Get.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/Approve.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/GenerateApprovalURL.hs+29−21
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/Get.hs+31−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/GetAppRestrictionsSchema.hs+30−21
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/GetPermissions.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Products/UpdatePermissions.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/GenerateToken.hs+29−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/Get.hs+31−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/GetAvailableProductSet.hs+28−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/List.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/RevokeToken.hs+30−20
This diff is too big to show here.
gogol-play-enterprise/gen/Network/Google/Resource/Androidenterprise/Users/SetAvailableProductSet.hs+28−20
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner.hs+15−8
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types.hs+1−1
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Avails/List.hs+39−24
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/Get.hs+35−18
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/List.hs+41−24
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/Get.hs+33−18
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/List.hs+38−23
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/Country/Get.hs+35−18
This diff is too big to show here.
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/List.hs+40−25
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/PlusDomains.hs+367−43
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+329−21
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+2525−149
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Sum.hs+188
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Get.hs+30−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Insert.hs+29−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/List.hs+110−101
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Audiences/List.hs+100−89
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/AddPeople.hs+28−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Get.hs+84−76
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Insert.hs+87−71
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/List.hs+101−96
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Patch.hs+31−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Remove.hs+31−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/RemovePeople.hs+28−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Update.hs+31−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Get.hs+83−73
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Insert.hs+29−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/List.hs+117−101
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Media/Insert.hs+35−23
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/Get.hs+31−20
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/List.hs+40−29
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByActivity.hs+36−26
This diff is too big to show here.
gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByCircle.hs+30−22
This diff is too big to show here.
gogol-plus/gen/Network/Google/Plus.hs+322−32
This diff is too big to show here.
gogol-plus/gen/Network/Google/Plus/Types.hs+302−21
This diff is too big to show here.
gogol-plus/gen/Network/Google/Plus/Types/Product.hs+2261−142
This diff is too big to show here.
gogol-plus/gen/Network/Google/Plus/Types/Sum.hs+245
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Activities/Get.hs+30−20
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Activities/List.hs+34−26
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Activities/Search.hs+36−28
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Comments/Get.hs+32−20
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Comments/List.hs+35−26
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Moments/Insert.hs+34−24
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/Moments/List.hs+38−28
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/People/Get.hs+31−20
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/People/List.hs+39−29
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/People/ListByActivity.hs+36−26
This diff is too big to show here.
gogol-plus/gen/Network/Google/Resource/Plus/People/Search.hs+34−24
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Prediction.hs+127−9
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Prediction/Types.hs+111−1
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+892−10
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Prediction/Types/Sum.hs+24
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Hostedmodels/Predict.hs+29−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Analyze.hs+30−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Delete.hs+29−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Get.hs+29−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Insert.hs+29−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/List.hs+30−21
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Predict.hs+30−20
This diff is too big to show here.
gogol-prediction/gen/Network/Google/Resource/Prediction/Trainedmodels/Update.hs+29−20
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+32−15
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+5−1
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+22
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beaconinfo/Getforobserved.hs+33−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Activate.hs+33−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/BatchDelete.hs+35−19
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/Create.hs+33−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/Delete.hs+32−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/List.hs+33−19
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Deactivate.hs+142−124
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Decommission.hs+138−128
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Diagnostics/List.hs+35−21
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Get.hs+35−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/List.hs+38−21
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Register.hs+33−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Update.hs+35−18
This diff is too big to show here.
gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Namespaces/List.hs+34−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/PubSub.hs+49−21
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/PubSub/Types.hs+9−1
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+56
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Acknowledge.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Create.hs+34−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Delete.hs+32−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Get.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/GetIAMPolicy.hs+34−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/List.hs+34−20
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyAckDeadline.hs+32−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyPushConfig.hs+32−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Pull.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/SetIAMPolicy.hs+34−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/TestIAMPermissions.hs+35−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Create.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Delete.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Get.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/GetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/List.hs+34−20
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Publish.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/SetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Subscriptions/List.hs+37−20
This diff is too big to show here.
gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/TestIAMPermissions.hs+34−18
This diff is too big to show here.
gogol-qpxexpress/gen/Network/Google/QPXExpress.hs+5−2
This diff is too big to show here.
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+4−1
This diff is too big to show here.
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Sum.hs+24
This diff is too big to show here.
gogol-qpxexpress/gen/Network/Google/Resource/QPXExpress/Trips/Search.hs+33−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/InstanceGroupsUpdater.hs+81−11
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/InstanceGroupsUpdater/Types.hs+62−1
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/InstanceGroupsUpdater/Types/Product.hs+490−2
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/InstanceGroupsUpdater/Types/Sum.hs+24
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Cancel.hs+29−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Get.hs+28−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Insert.hs+28−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/List.hs+31−23
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/ListInstanceUpdates.hs+32−23
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Pause.hs+29−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Resume.hs+28−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/RollingUpdates/Rollback.hs+29−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/ZoneOperations/Get.hs+28−20
This diff is too big to show here.
gogol-replicapool-updater/gen/Network/Google/Resource/Replicapoolupdater/ZoneOperations/List.hs+30−23
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/InstanceGroupsManager.hs+61−13
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/InstanceGroupsManager/Types.hs+38−1
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/InstanceGroupsManager/Types/Product.hs+200−6
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/InstanceGroupsManager/Types/Sum.hs+157
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/AbandonInstances.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/Delete.hs+28−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/DeleteInstances.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/Get.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/Insert.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/List.hs+32−23
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/RecreateInstances.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/Resize.hs+29−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/SetInstanceTemplate.hs+30−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/InstanceGroupManagers/SetTargetPools.hs+28−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/ZoneOperations/Get.hs+28−20
This diff is too big to show here.
gogol-replicapool/gen/Network/Google/Resource/Replicapool/ZoneOperations/List.hs+30−23
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/Get.hs+32−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/GetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/List.hs+35−21
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/SetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/TestIAMPermissions.hs+34−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Organizations/Update.hs+32−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/Create.hs+34−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/Delete.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/Get.hs+35−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/GetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/List.hs+37−21
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/SetIAMPolicy.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/TestIAMPermissions.hs+33−18
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/Undelete.hs+141−124
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/Resource/Cloudresourcemanager/Projects/Update.hs+139−127
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+35−16
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types.hs+5−1
This diff is too big to show here.
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+29
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/InstanceGroups.hs+60−12
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/InstanceGroups/Types.hs+39−1
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/InstanceGroups/Types/Product.hs+219−2
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/InstanceGroups/Types/Sum.hs+84
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneOperations/Get.hs+28−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneOperations/List.hs+30−23
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/AddResources.hs+28−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/Delete.hs+29−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/Get.hs+30−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/GetService.hs+29−21
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/Insert.hs+29−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/List.hs+31−22
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/ListResources.hs+43−30
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/RemoveResources.hs+28−20
This diff is too big to show here.
gogol-resourceviews/gen/Network/Google/Resource/Resourceviews/ZoneViews/SetService.hs+28−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Acknowledge.hs+28−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Advancetestorder.hs+29−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancel.hs+93−86
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancellineitem.hs+95−79
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Createtestorder.hs+81−74
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Custombatch.hs+75−68
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Get.hs+92−86
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Getbymerchantorderid.hs+96−83
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Gettestordertemplate.hs+100−85
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/List.hs+40−30
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Refund.hs+31−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Returnlineitem.hs+29−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Shiplineitems.hs+28−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Updatemerchantorderid.hs+28−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Updateshipment.hs+29−20
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/ShoppingContent.hs+63−36
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/ShoppingContent/Types.hs+33−21
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/ShoppingContent/Types/Product.hs+146−151
This diff is too big to show here.
gogol-shopping-content/gen/Network/Google/ShoppingContent/Types/Sum.hs+150
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Delete.hs+29−20
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Get.hs+30−20
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/GetToken.hs+30−21
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Insert.hs+30−21
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/List.hs+30−20
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Patch.hs+29−20
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Update.hs+29−20
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/SiteVerification.hs+30−8
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/SiteVerification/Types.hs+16−1
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/SiteVerification/Types/Product.hs+108
This diff is too big to show here.
gogol-siteverification/gen/Network/Google/SiteVerification/Types/Sum.hs+24
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrum.hs+31−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrumBatch.hs+29−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Init.hs+30−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/NotifySpectrumUse.hs+29−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Register.hs+32−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/VerifyDevice.hs+29−20
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Spectrum.hs+15−7
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Spectrum/Types.hs+4−1
This diff is too big to show here.
gogol-spectrum/gen/Network/Google/Spectrum/Types/Sum.hs+29
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/BackupRuns/Delete.hs+28−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/BackupRuns/Get.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/BackupRuns/List.hs+31−22
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/Delete.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/Get.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/Insert.hs+91−85
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/List.hs+32−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/Patch.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Databases/Update.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Flags/List.hs+31−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Clone.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Delete.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Export.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Get.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Import.hs+94−79
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Insert.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/List.hs+33−22
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Patch.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/PromoteReplica.hs+28−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/ResetSSLConfig.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Restart.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/RestoreBackup.hs+28−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/StartReplica.hs+88−85
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/StopReplica.hs+93−85
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Instances/Update.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Operations/Get.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Operations/List.hs+33−23
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/SSLCerts/CreateEphemeral.hs+29−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/SSLCerts/Delete.hs+28−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/SSLCerts/Get.hs+31−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/SSLCerts/Insert.hs+30−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/SSLCerts/List.hs+31−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Tiers/List.hs+31−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Users/Delete.hs+33−21
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Users/Insert.hs+32−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Users/List.hs+31−20
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/Resource/Sql/Users/Update.hs+33−21
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/SQLAdmin.hs+113−62
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+41−21
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+286−146
This diff is too big to show here.
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types/Sum.hs+24
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/GetGoogleServiceAccount.hs+34−19
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/GoogleServiceAccounts/Get.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Create.hs+34−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Get.hs+34−19
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/List.hs+35−21
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Patch.hs+34−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Cancel.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Delete.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Get.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/List.hs+35−21
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Pause.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Resume.hs+33−18
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+36−14
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+13−1
This diff is too big to show here.
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+71−2
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Delete.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Get.hs+29−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Insert.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/List.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Patch.hs+29−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Update.hs+29−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Delete.hs+31−22
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Get.hs+35−24
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Insert.hs+36−23
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/List.hs+38−25
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Patch.hs+35−24
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Update.hs+36−24
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Channels/Stop.hs+32−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Delete.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Get.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Insert.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/List.hs+31−22
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Patch.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Update.hs+30−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Delete.hs+29−20
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Get.hs+30−21
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Insert.hs+30−21
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/List.hs+30−21
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Patch.hs+30−21
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Update.hs+30−21
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Compose.hs+30−22
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Copy.hs+56−36
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Delete.hs+34−24
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Get.hs+38−27
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Insert.hs+39−27
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/List.hs+40−27
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Patch.hs+40−28
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/Update.hs+39−27
This diff is too big to show here.
gogol-storage/gen/Network/Google/Resource/Storage/Objects/WatchAll.hs+39−28
This diff is too big to show here.
gogol-storage/gen/Network/Google/Storage.hs+187−38
This diff is too big to show here.
gogol-storage/gen/Network/Google/Storage/Types.hs+121−1
This diff is too big to show here.
gogol-storage/gen/Network/Google/Storage/Types/Product.hs+652−6
This diff is too big to show here.
gogol-storage/gen/Network/Google/Storage/Types/Sum.hs+376
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Create.hs+85−79
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Delete.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Create.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Delete.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Entities/List.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Get.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/List.hs+31−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Update.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Get.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/List.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MACros/Create.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MACros/Delete.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MACros/Get.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MACros/List.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MACros/Update.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Move_folders/Update.hs+31−22
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Create.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Delete.hs+31−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Get.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/List.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Rules/Update.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Create.hs+98−89
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Delete.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Get.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/List.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Update.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Create.hs+98−88
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Delete.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Get.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/List.hs+31−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Update.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Update.hs+29−21
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Create.hs+98−88
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Delete.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Get.hs+30−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/List.hs+99−88
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Update.hs+106−106
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Create.hs+98−89
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Delete.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Get.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/List.hs+107−95
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Publish.hs+31−21
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Restore.hs+31−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Undelete.hs+107−98
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Update.hs+117−102
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Get.hs+31−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/List.hs+32−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Create.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Delete.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Get.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/List.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Update.hs+28−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Update.hs+29−20
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/TagManager.hs+138−58
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+32−5
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+44−43
This diff is too big to show here.
gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+526
This diff is too big to show here.
gogol-translate/gen/Network/Google/Resource/Language/Detections/List.hs+30−21
This diff is too big to show here.
gogol-translate/gen/Network/Google/Resource/Language/Languages/List.hs+32−21
This diff is too big to show here.
gogol-translate/gen/Network/Google/Resource/Language/Translations/List.hs+36−27
This diff is too big to show here.
gogol-translate/gen/Network/Google/Translate.hs+18−4
This diff is too big to show here.
gogol-translate/gen/Network/Google/Translate/Types.hs+14−1
This diff is too big to show here.
gogol-translate/gen/Network/Google/Translate/Types/Product.hs+59−2
This diff is too big to show here.
gogol-translate/gen/Network/Google/Translate/Types/Sum.hs+53
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Get.hs+33−23
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Insert.hs+31−19
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/List.hs+33−24
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/URLShortener.hs+15−4
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/URLShortener/Types.hs+10−1
This diff is too big to show here.
gogol-urlshortener/gen/Network/Google/URLShortener/Types/Sum.hs+87
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Searchanalytics/Query.hs+30−20
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Delete.hs+95−82
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Get.hs+31−20
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/List.hs+97−83
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Submit.hs+29−20
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Add.hs+31−20
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Delete.hs+85−77
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Get.hs+81−77
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/List.hs+76−64
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorscounts/Query.hs+39−27
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/Get.hs+41−28
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/List.hs+41−28
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/MarkAsFixed.hs+40−27
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/WebmasterTools.hs+53−17
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+28−1
This diff is too big to show here.
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+354
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/BatchReportDefinitions/List.hs+30−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/BatchReports/List.hs+29−22
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/Delete.hs+29−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/Insert.hs+28−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/List.hs+31−22
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Delete.hs+31−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Insert.hs+30−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/List.hs+33−22
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Update.hs+30−21
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Reports/Query.hs+41−30
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics.hs+60−12
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+42−1
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Product.hs+302−8
This diff is too big to show here.
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Sum.hs+29
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Activities/Insert.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Activities/List.hs+37−28
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Delete.hs+31−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Download.hs+121−106
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Insert.hs+31−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/List.hs+123−109
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Update.hs+112−99
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelBanners/Insert.hs+29−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Delete.hs+29−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Insert.hs+31−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/List.hs+35−26
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Update.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Channels/List.hs+176−170
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Channels/Update.hs+96−82
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Insert.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/List.hs+55−40
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Update.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Delete.hs+82−77
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Insert.hs+81−76
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/List.hs+135−123
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/MarkAsSpam.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/SetModerationStatus.hs+35−25
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Update.hs+83−76
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/GuideCategories/List.hs+33−24
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/I18nLanguages/List.hs+31−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/I18nRegions/List.hs+32−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Bind.hs+34−25
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Bind_direct.hs+34−25
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Control.hs+36−27
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Delete.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Insert.hs+31−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/List.hs+41−30
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Transition.hs+39−27
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Update.hs+31−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Delete.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Insert.hs+31−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/List.hs+37−27
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Update.hs+31−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/PlaylistItems/Delete.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/PlaylistItems/Insert.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/PlaylistItems/List.hs+36−27
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/PlaylistItems/Update.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Playlists/Delete.hs+30−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Playlists/Insert.hs+32−23
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Playlists/List.hs+40−29
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Playlists/Update.hs+31−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Search/List.hs+413−363
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/Delete.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/Insert.hs+29−20
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/List.hs+174−165
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Thumbnails/Set.hs+32−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/VideoAbuseReportReasons/List.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/VideoCategories/List.hs+33−24
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Delete.hs+31−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/GetRating.hs+31−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Insert.hs+36−25
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/List.hs+45−35
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Rate.hs+93−86
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/ReportAbuse.hs+28−21
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Update.hs+32−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Watermarks/Set.hs+31−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/Resource/YouTube/Watermarks/Unset.hs+30−22
This diff is too big to show here.
gogol-youtube/gen/Network/Google/YouTube.hs+653−160
This diff is too big to show here.
gogol-youtube/gen/Network/Google/YouTube/Types.hs+530−79
This diff is too big to show here.
gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+925−756
This diff is too big to show here.
gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+5904
This diff is too big to show here.