25137ca · gogol · git.iko.soy

git.iko.soy/gogol

Regenerating all services

commit25137ca2cd371fd2b313e4d41e7ef9ae2aad15a9 authorBrendan Hay <brendan.g.hay@gmail.com> dateMon 5 Oct 2015, 11:15 (11 years ago) parent47fe2cd

474 files changed+7427−7427

compare with develop

unifiedsplit

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer.hs+48−48

@@ -999,54 +999,54 @@ module Network.Google.AdExchangeBuyer

999999 , dtgfptFixedPrices

10001000 ) where

10011001

1002−import Network.Google.AdExchangeBuyer.Types

1003−import Network.Google.Prelude

1004−import Network.Google.Resource.AdExchangeBuyer.Accounts.Get

1005−import Network.Google.Resource.AdExchangeBuyer.Accounts.List

1006−import Network.Google.Resource.AdExchangeBuyer.Accounts.Patch

1007−import Network.Google.Resource.AdExchangeBuyer.Accounts.Update

1008−import Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get

1009−import Network.Google.Resource.AdExchangeBuyer.BillingInfo.List

1010−import Network.Google.Resource.AdExchangeBuyer.Budget.Get

1011−import Network.Google.Resource.AdExchangeBuyer.Budget.Patch

1012−import Network.Google.Resource.AdExchangeBuyer.Budget.Update

1013−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Delete

1014−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Get

1015−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Insert

1016−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.List

1017−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Patch

1018−import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Update

1019−import Network.Google.Resource.AdExchangeBuyer.Creatives.Get

1020−import Network.Google.Resource.AdExchangeBuyer.Creatives.Insert

1021−import Network.Google.Resource.AdExchangeBuyer.Creatives.List

1022−import Network.Google.Resource.AdExchangeBuyer.Deals.Get

1023−import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete

1024−import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert

1025−import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List

1026−import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update

1027−import Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert

1028−import Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List

1029−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Get

1030−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Search

1031−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Get

1032−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Insert

1033−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Patch

1034−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Search

1035−import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Update

1036−import Network.Google.Resource.AdExchangeBuyer.NegotiationRounds.Insert

1037−import Network.Google.Resource.AdExchangeBuyer.Negotiations.Get

1038−import Network.Google.Resource.AdExchangeBuyer.Negotiations.Insert

1039−import Network.Google.Resource.AdExchangeBuyer.Negotiations.List

1040−import Network.Google.Resource.AdExchangeBuyer.Offers.Get

1041−import Network.Google.Resource.AdExchangeBuyer.Offers.Insert

1042−import Network.Google.Resource.AdExchangeBuyer.Offers.List

1043−import Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List

1044−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete

1045−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get

1046−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert

1047−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List

1048−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch

1049−import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update

1002+import Network.Google.Prelude

1003+import Network.Google.AdExchangeBuyer.Types

1004+import Network.Google.Resource.AdExchangeBuyer.Accounts.Get

1005+import Network.Google.Resource.AdExchangeBuyer.Accounts.List

1006+import Network.Google.Resource.AdExchangeBuyer.Accounts.Patch

1007+import Network.Google.Resource.AdExchangeBuyer.Accounts.Update

1008+import Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get

1009+import Network.Google.Resource.AdExchangeBuyer.BillingInfo.List

1010+import Network.Google.Resource.AdExchangeBuyer.Budget.Get

1011+import Network.Google.Resource.AdExchangeBuyer.Budget.Patch

1012+import Network.Google.Resource.AdExchangeBuyer.Budget.Update

1013+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Delete

1014+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Get

1015+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Insert

1016+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.List

1017+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Patch

1018+import Network.Google.Resource.AdExchangeBuyer.ClientAccess.Update

1019+import Network.Google.Resource.AdExchangeBuyer.Creatives.Get

1020+import Network.Google.Resource.AdExchangeBuyer.Creatives.Insert

1021+import Network.Google.Resource.AdExchangeBuyer.Creatives.List

1022+import Network.Google.Resource.AdExchangeBuyer.Deals.Get

1023+import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete

1024+import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert

1025+import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List

1026+import Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update

1027+import Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert

1028+import Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List

1029+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Get

1030+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Search

1031+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Get

1032+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Insert

1033+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Patch

1034+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Search

1035+import Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Update

1036+import Network.Google.Resource.AdExchangeBuyer.NegotiationRounds.Insert

1037+import Network.Google.Resource.AdExchangeBuyer.Negotiations.Get

1038+import Network.Google.Resource.AdExchangeBuyer.Negotiations.Insert

1039+import Network.Google.Resource.AdExchangeBuyer.Negotiations.List

1040+import Network.Google.Resource.AdExchangeBuyer.Offers.Get

1041+import Network.Google.Resource.AdExchangeBuyer.Offers.Insert

1042+import Network.Google.Resource.AdExchangeBuyer.Offers.List

1043+import Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List

1044+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete

1045+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get

1046+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert

1047+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List

1048+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch

1049+import Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update

10501050

10511051{- $resources

10521052TODO

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+3−3

@@ -848,9 +848,9 @@ module Network.Google.AdExchangeBuyer.Types

848848 , dtgfptFixedPrices

849849 ) where

850850

851−import Network.Google.AdExchangeBuyer.Types.Product

852−import Network.Google.AdExchangeBuyer.Types.Sum

853−import Network.Google.Prelude

851+import Network.Google.AdExchangeBuyer.Types.Product

852+import Network.Google.AdExchangeBuyer.Types.Sum

853+import Network.Google.Prelude

854854

855855-- | URL referring to version 'v1.4' of the Ad Exchange Buyer API.

856856adExchangeBuyerURL :: BaseUrl

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs+448−448

@@ -17,15 +17,15 @@

1717--

1818module Network.Google.AdExchangeBuyer.Types.Product where

1919

20−import Network.Google.AdExchangeBuyer.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.AdExchangeBuyer.Types.Sum

21+import Network.Google.Prelude

2222

2323--

2424-- /See:/ 'brandDTO' smart constructor.

2525data BrandDTO = BrandDTO

2626 { _bdtoAdvertiserId :: !(Maybe Int64)

27− , _bdtoName :: !(Maybe Text)

28− , _bdtoId :: !(Maybe Int64)

27+ , _bdtoName :: !(Maybe Text)

28+ , _bdtoId :: !(Maybe Int64)

2929 } deriving (Eq,Show,Data,Typeable,Generic)

3030

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

@@ -39,7 +39,7 @@ data BrandDTO = BrandDTO

3939-- * 'bdtoId'

4040brandDTO

4141 :: BrandDTO

42−brandDTO =

42+brandDTO =

4343 BrandDTO

4444 { _bdtoAdvertiserId = Nothing

4545 , _bdtoName = Nothing

@@ -77,13 +77,13 @@ instance ToJSON BrandDTO where

7777--

7878-- /See:/ 'marketplaceNote' smart constructor.

7979data MarketplaceNote = MarketplaceNote

80− { _mnNote :: !(Maybe Text)

81− , _mnKind :: !Text

82− , _mnTimestampMs :: !(Maybe Int64)

83− , _mnDealId :: !(Maybe Text)

84− , _mnNoteId :: !(Maybe Text)

85− , _mnCreatorRole :: !(Maybe Text)

86− , _mnOrderId :: !(Maybe Text)

80+ { _mnNote :: !(Maybe Text)

81+ , _mnKind :: !Text

82+ , _mnTimestampMs :: !(Maybe Int64)

83+ , _mnDealId :: !(Maybe Text)

84+ , _mnNoteId :: !(Maybe Text)

85+ , _mnCreatorRole :: !(Maybe Text)

86+ , _mnOrderId :: !(Maybe Text)

8787 , _mnOrderRevisionNumber :: !(Maybe Int64)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

@@ -108,7 +108,7 @@ data MarketplaceNote = MarketplaceNote

108108-- * 'mnOrderRevisionNumber'

109109marketplaceNote

110110 :: MarketplaceNote

111−marketplaceNote =

111+marketplaceNote =

112112 MarketplaceNote

113113 { _mnNote = Nothing

114114 , _mnKind = "adexchangebuyer#marketplaceNote"

@@ -193,18 +193,18 @@ instance ToJSON MarketplaceNote where

193193--

194194-- /See:/ 'creativeNATiveAd' smart constructor.

195195data CreativeNATiveAd = CreativeNATiveAd

196− { _cnataImage :: !(Maybe CreativeNATiveAdImage)

197− , _cnataAppIcon :: !(Maybe CreativeNATiveAdAppIcon)

198− , _cnataClickTrackingURL :: !(Maybe Text)

199− , _cnataBody :: !(Maybe Text)

200− , _cnataHeadline :: !(Maybe Text)

196+ { _cnataImage :: !(Maybe CreativeNATiveAdImage)

197+ , _cnataAppIcon :: !(Maybe CreativeNATiveAdAppIcon)

198+ , _cnataClickTrackingURL :: !(Maybe Text)

199+ , _cnataBody :: !(Maybe Text)

200+ , _cnataHeadline :: !(Maybe Text)

201201 , _cnataImpressionTrackingURL :: !(Maybe [Text])

202− , _cnataCallToAction :: !(Maybe Text)

203− , _cnataStore :: !(Maybe Text)

204− , _cnataPrice :: !(Maybe Text)

205− , _cnataAdvertiser :: !(Maybe Text)

206− , _cnataStarRating :: !(Maybe Double)

207− , _cnataLogo :: !(Maybe CreativeNATiveAdLogo)

202+ , _cnataCallToAction :: !(Maybe Text)

203+ , _cnataStore :: !(Maybe Text)

204+ , _cnataPrice :: !(Maybe Text)

205+ , _cnataAdvertiser :: !(Maybe Text)

206+ , _cnataStarRating :: !(Maybe Double)

207+ , _cnataLogo :: !(Maybe CreativeNATiveAdLogo)

208208 } deriving (Eq,Show,Data,Typeable,Generic)

209209

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

@@ -236,7 +236,7 @@ data CreativeNATiveAd = CreativeNATiveAd

236236-- * 'cnataLogo'

237237creativeNATiveAd

238238 :: CreativeNATiveAd

239−creativeNATiveAd =

239+creativeNATiveAd =

240240 CreativeNATiveAd

241241 { _cnataImage = Nothing

242242 , _cnataAppIcon = Nothing

@@ -367,7 +367,7 @@ newtype EditAllOrderDealsResponse = EditAllOrderDealsResponse

367367-- * 'eaodrDeals'

368368editAllOrderDealsResponse

369369 :: EditAllOrderDealsResponse

370−editAllOrderDealsResponse =

370+editAllOrderDealsResponse =

371371 EditAllOrderDealsResponse

372372 { _eaodrDeals = Nothing

373373 }

@@ -397,8 +397,8 @@ instance ToJSON EditAllOrderDealsResponse where

397397-- /See:/ 'creativesList' smart constructor.

398398data CreativesList = CreativesList

399399 { _clNextPageToken :: !(Maybe Text)

400− , _clKind :: !Text

401− , _clItems :: !(Maybe [Creative])

400+ , _clKind :: !Text

401+ , _clItems :: !(Maybe [Creative])

402402 } deriving (Eq,Show,Data,Typeable,Generic)

403403

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

@@ -412,7 +412,7 @@ data CreativesList = CreativesList

412412-- * 'clItems'

413413creativesList

414414 :: CreativesList

415−creativesList =

415+creativesList =

416416 CreativesList

417417 { _clNextPageToken = Nothing

418418 , _clKind = "adexchangebuyer#creativesList"

@@ -455,9 +455,9 @@ instance ToJSON CreativesList where

455455--

456456-- /See:/ 'creativeServingRestrictionsItemContextsItem' smart constructor.

457457data CreativeServingRestrictionsItemContextsItem = CreativeServingRestrictionsItemContextsItem

458− { _csriciPlatform :: !(Maybe [Text])

459− , _csriciContextType :: !(Maybe Text)

460− , _csriciAuctionType :: !(Maybe [Text])

458+ { _csriciPlatform :: !(Maybe [Text])

459+ , _csriciContextType :: !(Maybe Text)

460+ , _csriciAuctionType :: !(Maybe [Text])

461461 , _csriciGeoCriteriaId :: !(Maybe [Int32])

462462 } deriving (Eq,Show,Data,Typeable,Generic)

463463

@@ -474,7 +474,7 @@ data CreativeServingRestrictionsItemContextsItem = CreativeServingRestrictionsIt

474474-- * 'csriciGeoCriteriaId'

475475creativeServingRestrictionsItemContextsItem

476476 :: CreativeServingRestrictionsItemContextsItem

477−creativeServingRestrictionsItemContextsItem =

477+creativeServingRestrictionsItemContextsItem =

478478 CreativeServingRestrictionsItemContextsItem

479479 { _csriciPlatform = Nothing

480480 , _csriciContextType = Nothing

@@ -541,33 +541,33 @@ instance ToJSON

541541--

542542-- /See:/ 'termsDTO' smart constructor.

543543data TermsDTO = TermsDTO

544− { _tdtoFinalizeAutomatically :: !(Maybe Bool)

545− , _tdtoBuyerBillingType :: !(Maybe Text)

546− , _tdtoTargetingAllAdSlots :: !(Maybe Bool)

547− , _tdtoURLs :: !(Maybe [Text])

548− , _tdtoEndDate :: !(Maybe DateTime)

549− , _tdtoCpm :: !(Maybe MoneyDTO)

550− , _tdtoEstimatedSpend :: !(Maybe MoneyDTO)

551− , _tdtoAdvertisers :: !(Maybe [AdvertiserDTO])

544+ { _tdtoFinalizeAutomatically :: !(Maybe Bool)

545+ , _tdtoBuyerBillingType :: !(Maybe Text)

546+ , _tdtoTargetingAllAdSlots :: !(Maybe Bool)

547+ , _tdtoURLs :: !(Maybe [Text])

548+ , _tdtoEndDate :: !(Maybe DateTime)

549+ , _tdtoCpm :: !(Maybe MoneyDTO)

550+ , _tdtoEstimatedSpend :: !(Maybe MoneyDTO)

551+ , _tdtoAdvertisers :: !(Maybe [AdvertiserDTO])

552552 , _tdtoEstimatedImpressionsPerDay :: !(Maybe Int64)

553− , _tdtoMonetizerType :: !(Maybe Text)

553+ , _tdtoMonetizerType :: !(Maybe Text)

554554 , _tdtoAudienceSegmentDescription :: !(Maybe Text)

555− , _tdtoCreativeReviewPolicy :: !(Maybe Text)

556− , _tdtoMinimumTrueLooks :: !(Maybe Int64)

557− , _tdtoStartDate :: !(Maybe DateTime)

558− , _tdtoCreativeBlockingLevel :: !(Maybe Text)

559− , _tdtoSemiTransparent :: !(Maybe Bool)

560− , _tdtoAudienceSegment :: !(Maybe AudienceSegment)

561− , _tdtoDealPremium :: !(Maybe MoneyDTO)

562− , _tdtoIsReservation :: !(Maybe Bool)

563− , _tdtoAdSlots :: !(Maybe [AdSlotDTO])

564− , _tdtoTermsAttributes :: !(Maybe [Text])

565− , _tdtoInventorySegmentTargeting :: !(Maybe InventorySegmentTargeting)

566− , _tdtoDescriptiveName :: !(Maybe Text)

567− , _tdtoMinimumSpendMicros :: !(Maybe Int64)

568− , _tdtoTargetByDealId :: !(Maybe Bool)

569− , _tdtoBillingTerms :: !(Maybe Text)

570− , _tdtoDescription :: !(Maybe Text)

555+ , _tdtoCreativeReviewPolicy :: !(Maybe Text)

556+ , _tdtoMinimumTrueLooks :: !(Maybe Int64)

557+ , _tdtoStartDate :: !(Maybe DateTime)

558+ , _tdtoCreativeBlockingLevel :: !(Maybe Text)

559+ , _tdtoSemiTransparent :: !(Maybe Bool)

560+ , _tdtoAudienceSegment :: !(Maybe AudienceSegment)

561+ , _tdtoDealPremium :: !(Maybe MoneyDTO)

562+ , _tdtoIsReservation :: !(Maybe Bool)

563+ , _tdtoAdSlots :: !(Maybe [AdSlotDTO])

564+ , _tdtoTermsAttributes :: !(Maybe [Text])

565+ , _tdtoInventorySegmentTargeting :: !(Maybe InventorySegmentTargeting)

566+ , _tdtoDescriptiveName :: !(Maybe Text)

567+ , _tdtoMinimumSpendMicros :: !(Maybe Int64)

568+ , _tdtoTargetByDealId :: !(Maybe Bool)

569+ , _tdtoBillingTerms :: !(Maybe Text)

570+ , _tdtoDescription :: !(Maybe Text)

571571 } deriving (Eq,Show,Data,Typeable,Generic)

572572

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

@@ -629,7 +629,7 @@ data TermsDTO = TermsDTO

629629-- * 'tdtoDescription'

630630termsDTO

631631 :: TermsDTO

632−termsDTO =

632+termsDTO =

633633 TermsDTO

634634 { _tdtoFinalizeAutomatically = Nothing

635635 , _tdtoBuyerBillingType = Nothing

@@ -911,7 +911,7 @@ newtype CreateOrdersResponse = CreateOrdersResponse

911911-- * 'corOrders'

912912createOrdersResponse

913913 :: CreateOrdersResponse

914−createOrdersResponse =

914+createOrdersResponse =

915915 CreateOrdersResponse

916916 { _corOrders = Nothing

917917 }

@@ -936,9 +936,9 @@ instance ToJSON CreateOrdersResponse where

936936--

937937-- /See:/ 'accountBidderLocationItem' smart constructor.

938938data AccountBidderLocationItem = AccountBidderLocationItem

939− { _abliURL :: !(Maybe Text)

939+ { _abliURL :: !(Maybe Text)

940940 , _abliMaximumQps :: !(Maybe Int32)

941− , _abliRegion :: !(Maybe Text)

941+ , _abliRegion :: !(Maybe Text)

942942 } deriving (Eq,Show,Data,Typeable,Generic)

943943

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

@@ -952,7 +952,7 @@ data AccountBidderLocationItem = AccountBidderLocationItem

952952-- * 'abliRegion'

953953accountBidderLocationItem

954954 :: AccountBidderLocationItem

955−accountBidderLocationItem =

955+accountBidderLocationItem =

956956 AccountBidderLocationItem

957957 { _abliURL = Nothing

958958 , _abliMaximumQps = Nothing

@@ -996,7 +996,7 @@ instance ToJSON AccountBidderLocationItem where

996996-- /See:/ 'privateData' smart constructor.

997997data PrivateData = PrivateData

998998 { _pdReferencePayload :: !(Maybe Word8)

999− , _pdReferenceId :: !(Maybe Text)

999+ , _pdReferenceId :: !(Maybe Text)

10001000 } deriving (Eq,Show,Data,Typeable,Generic)

10011001

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

@@ -1008,7 +1008,7 @@ data PrivateData = PrivateData

10081008-- * 'pdReferenceId'

10091009privateData

10101010 :: PrivateData

1011−privateData =

1011+privateData =

10121012 PrivateData

10131013 { _pdReferencePayload = Nothing

10141014 , _pdReferenceId = Nothing

@@ -1043,11 +1043,11 @@ instance ToJSON PrivateData where

10431043-- /See:/ 'budget' smart constructor.

10441044data Budget = Budget

10451045 { _bCurrencyCode :: !(Maybe Text)

1046− , _bKind :: !Text

1046+ , _bKind :: !Text

10471047 , _bBudgetAmount :: !(Maybe Int64)

1048− , _bAccountId :: !(Maybe Int64)

1049− , _bId :: !(Maybe Text)

1050− , _bBillingId :: !(Maybe Int64)

1048+ , _bAccountId :: !(Maybe Int64)

1049+ , _bId :: !(Maybe Text)

1050+ , _bBillingId :: !(Maybe Int64)

10511051 } deriving (Eq,Show,Data,Typeable,Generic)

10521052

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

@@ -1067,7 +1067,7 @@ data Budget = Budget

10671067-- * 'bBillingId'

10681068budget

10691069 :: Budget

1070−budget =

1070+budget =

10711071 Budget

10721072 { _bCurrencyCode = Nothing

10731073 , _bKind = "adexchangebuyer#budget"

@@ -1144,7 +1144,7 @@ newtype AddOrderNotesRequest = AddOrderNotesRequest

11441144-- * 'aonrNotes'

11451145addOrderNotesRequest

11461146 :: AddOrderNotesRequest

1147−addOrderNotesRequest =

1147+addOrderNotesRequest =

11481148 AddOrderNotesRequest

11491149 { _aonrNotes = Nothing

11501150 }

@@ -1179,7 +1179,7 @@ newtype GetFinalizedNegotiationByExternalDealIdRequest = GetFinalizedNegotiation

11791179-- * 'gfnbedirIncludePrivateAuctions'

11801180getFinalizedNegotiationByExternalDealIdRequest

11811181 :: GetFinalizedNegotiationByExternalDealIdRequest

1182−getFinalizedNegotiationByExternalDealIdRequest =

1182+getFinalizedNegotiationByExternalDealIdRequest =

11831183 GetFinalizedNegotiationByExternalDealIdRequest

11841184 { _gfnbedirIncludePrivateAuctions = Nothing

11851185 }

@@ -1211,8 +1211,8 @@ instance ToJSON

12111211-- /See:/ 'deliveryControlFrequencyCap' smart constructor.

12121212data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap

12131213 { _dcfcMaxImpressions :: !(Maybe Int32)

1214− , _dcfcNumTimeUnits :: !(Maybe Int32)

1215− , _dcfcTimeUnitType :: !(Maybe Text)

1214+ , _dcfcNumTimeUnits :: !(Maybe Int32)

1215+ , _dcfcTimeUnitType :: !(Maybe Text)

12161216 } deriving (Eq,Show,Data,Typeable,Generic)

12171217

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

@@ -1226,7 +1226,7 @@ data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap

12261226-- * 'dcfcTimeUnitType'

12271227deliveryControlFrequencyCap

12281228 :: DeliveryControlFrequencyCap

1229−deliveryControlFrequencyCap =

1229+deliveryControlFrequencyCap =

12301230 DeliveryControlFrequencyCap

12311231 { _dcfcMaxImpressions = Nothing

12321232 , _dcfcNumTimeUnits = Nothing

@@ -1268,10 +1268,10 @@ instance ToJSON DeliveryControlFrequencyCap where

12681268-- /See:/ 'dealPartyDTO' smart constructor.

12691269data DealPartyDTO = DealPartyDTO

12701270 { _dpdtoBuyerSellerRole :: !(Maybe Text)

1271− , _dpdtoCustomerId :: !(Maybe Int32)

1272− , _dpdtoName :: !(Maybe Text)

1273− , _dpdtoWebProperty :: !(Maybe WebPropertyDTO)

1274− , _dpdtoBuyer :: !(Maybe BuyerDTO)

1271+ , _dpdtoCustomerId :: !(Maybe Int32)

1272+ , _dpdtoName :: !(Maybe Text)

1273+ , _dpdtoWebProperty :: !(Maybe WebPropertyDTO)

1274+ , _dpdtoBuyer :: !(Maybe BuyerDTO)

12751275 } deriving (Eq,Show,Data,Typeable,Generic)

12761276

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

@@ -1289,7 +1289,7 @@ data DealPartyDTO = DealPartyDTO

12891289-- * 'dpdtoBuyer'

12901290dealPartyDTO

12911291 :: DealPartyDTO

1292−dealPartyDTO =

1292+dealPartyDTO =

12931293 DealPartyDTO

12941294 { _dpdtoBuyerSellerRole = Nothing

12951295 , _dpdtoCustomerId = Nothing

@@ -1344,7 +1344,7 @@ instance ToJSON DealPartyDTO where

13441344--

13451345-- /See:/ 'getNegotiationsResponse' smart constructor.

13461346data GetNegotiationsResponse = GetNegotiationsResponse

1347− { _gnrKind :: !Text

1347+ { _gnrKind :: !Text

13481348 , _gnrNegotiations :: !(Maybe [NegotiationDTO])

13491349 } deriving (Eq,Show,Data,Typeable,Generic)

13501350

@@ -1357,7 +1357,7 @@ data GetNegotiationsResponse = GetNegotiationsResponse

13571357-- * 'gnrNegotiations'

13581358getNegotiationsResponse

13591359 :: GetNegotiationsResponse

1360−getNegotiationsResponse =

1360+getNegotiationsResponse =

13611361 GetNegotiationsResponse

13621362 { _gnrKind = "adexchangebuyer#negotiationsList"

13631363 , _gnrNegotiations = Nothing

@@ -1392,7 +1392,7 @@ instance ToJSON GetNegotiationsResponse where

13921392-- /See:/ 'marketplaceDealParty' smart constructor.

13931393data MarketplaceDealParty = MarketplaceDealParty

13941394 { _mdpSeller :: !(Maybe Seller)

1395− , _mdpBuyer :: !(Maybe Buyer)

1395+ , _mdpBuyer :: !(Maybe Buyer)

13961396 } deriving (Eq,Show,Data,Typeable,Generic)

13971397

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

@@ -1404,7 +1404,7 @@ data MarketplaceDealParty = MarketplaceDealParty

14041404-- * 'mdpBuyer'

14051405marketplaceDealParty

14061406 :: MarketplaceDealParty

1407−marketplaceDealParty =

1407+marketplaceDealParty =

14081408 MarketplaceDealParty

14091409 { _mdpSeller = Nothing

14101410 , _mdpBuyer = Nothing

@@ -1448,7 +1448,7 @@ newtype GetOrderNotesResponse = GetOrderNotesResponse

14481448-- * 'gonrNotes'

14491449getOrderNotesResponse

14501450 :: GetOrderNotesResponse

1451−getOrderNotesResponse =

1451+getOrderNotesResponse =

14521452 GetOrderNotesResponse

14531453 { _gonrNotes = Nothing

14541454 }

@@ -1474,7 +1474,7 @@ instance ToJSON GetOrderNotesResponse where

14741474-- /See:/ 'ruleKeyValuePair' smart constructor.

14751475data RuleKeyValuePair = RuleKeyValuePair

14761476 { _rkvpKeyName :: !(Maybe Text)

1477− , _rkvpValue :: !(Maybe Text)

1477+ , _rkvpValue :: !(Maybe Text)

14781478 } deriving (Eq,Show,Data,Typeable,Generic)

14791479

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

@@ -1486,7 +1486,7 @@ data RuleKeyValuePair = RuleKeyValuePair

14861486-- * 'rkvpValue'

14871487ruleKeyValuePair

14881488 :: RuleKeyValuePair

1489−ruleKeyValuePair =

1489+ruleKeyValuePair =

14901490 RuleKeyValuePair

14911491 { _rkvpKeyName = Nothing

14921492 , _rkvpValue = Nothing

@@ -1527,7 +1527,7 @@ newtype GetOrdersResponse = GetOrdersResponse

15271527-- * 'gorOrders'

15281528getOrdersResponse

15291529 :: GetOrdersResponse

1530−getOrdersResponse =

1530+getOrdersResponse =

15311531 GetOrdersResponse

15321532 { _gorOrders = Nothing

15331533 }

@@ -1552,7 +1552,7 @@ instance ToJSON GetOrdersResponse where

15521552--

15531553-- /See:/ 'creativeServingRestrictionsItemDisApprovalReasonsItem' smart constructor.

15541554data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRestrictionsItemDisApprovalReasonsItem

1555− { _csridariReason :: !(Maybe Text)

1555+ { _csridariReason :: !(Maybe Text)

15561556 , _csridariDetails :: !(Maybe [Text])

15571557 } deriving (Eq,Show,Data,Typeable,Generic)

15581558

@@ -1565,7 +1565,7 @@ data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRest

15651565-- * 'csridariDetails'

15661566creativeServingRestrictionsItemDisApprovalReasonsItem

15671567 :: CreativeServingRestrictionsItemDisApprovalReasonsItem

1568−creativeServingRestrictionsItemDisApprovalReasonsItem =

1568+creativeServingRestrictionsItemDisApprovalReasonsItem =

15691569 CreativeServingRestrictionsItemDisApprovalReasonsItem

15701570 { _csridariReason = Nothing

15711571 , _csridariDetails = Nothing

@@ -1611,7 +1611,7 @@ instance ToJSON

16111611--

16121612-- /See:/ 'accountsList' smart constructor.

16131613data AccountsList = AccountsList

1614− { _alKind :: !Text

1614+ { _alKind :: !Text

16151615 , _alItems :: !(Maybe [Account])

16161616 } deriving (Eq,Show,Data,Typeable,Generic)

16171617

@@ -1624,7 +1624,7 @@ data AccountsList = AccountsList

16241624-- * 'alItems'

16251625accountsList

16261626 :: AccountsList

1627−accountsList =

1627+accountsList =

16281628 AccountsList

16291629 { _alKind = "adexchangebuyer#accountsList"

16301630 , _alItems = Nothing

@@ -1659,7 +1659,7 @@ instance ToJSON AccountsList where

16591659-- /See:/ 'createOrdersRequest' smart constructor.

16601660data CreateOrdersRequest = CreateOrdersRequest

16611661 { _cWebPropertyCode :: !(Maybe Text)

1662− , _cOrders :: !(Maybe [MarketplaceOrder])

1662+ , _cOrders :: !(Maybe [MarketplaceOrder])

16631663 } deriving (Eq,Show,Data,Typeable,Generic)

16641664

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

@@ -1671,7 +1671,7 @@ data CreateOrdersRequest = CreateOrdersRequest

16711671-- * 'cOrders'

16721672createOrdersRequest

16731673 :: CreateOrdersRequest

1674−createOrdersRequest =

1674+createOrdersRequest =

16751675 CreateOrdersRequest

16761676 { _cWebPropertyCode = Nothing

16771677 , _cOrders = Nothing

@@ -1707,7 +1707,7 @@ instance ToJSON CreateOrdersRequest where

17071707-- /See:/ 'adSize' smart constructor.

17081708data AdSize = AdSize

17091709 { _asHeight :: !(Maybe Int32)

1710− , _asWidth :: !(Maybe Int32)

1710+ , _asWidth :: !(Maybe Int32)

17111711 } deriving (Eq,Show,Data,Typeable,Generic)

17121712

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

@@ -1719,7 +1719,7 @@ data AdSize = AdSize

17191719-- * 'asWidth'

17201720adSize

17211721 :: AdSize

1722−adSize =

1722+adSize =

17231723 AdSize

17241724 { _asHeight = Nothing

17251725 , _asWidth = Nothing

@@ -1747,7 +1747,7 @@ instance ToJSON AdSize where

17471747--

17481748-- /See:/ 'creativeCorrectionsItem' smart constructor.

17491749data CreativeCorrectionsItem = CreativeCorrectionsItem

1750− { _cciReason :: !(Maybe Text)

1750+ { _cciReason :: !(Maybe Text)

17511751 , _cciDetails :: !(Maybe [Text])

17521752 } deriving (Eq,Show,Data,Typeable,Generic)

17531753

@@ -1760,7 +1760,7 @@ data CreativeCorrectionsItem = CreativeCorrectionsItem

17601760-- * 'cciDetails'

17611761creativeCorrectionsItem

17621762 :: CreativeCorrectionsItem

1763−creativeCorrectionsItem =

1763+creativeCorrectionsItem =

17641764 CreativeCorrectionsItem

17651765 { _cciReason = Nothing

17661766 , _cciDetails = Nothing

@@ -1795,7 +1795,7 @@ instance ToJSON CreativeCorrectionsItem where

17951795--

17961796-- /See:/ 'addOrderDealsResponse' smart constructor.

17971797data AddOrderDealsResponse = AddOrderDealsResponse

1798− { _aodrDeals :: !(Maybe [MarketplaceDeal])

1798+ { _aodrDeals :: !(Maybe [MarketplaceDeal])

17991799 , _aodrOrderRevisionNumber :: !(Maybe Int64)

18001800 } deriving (Eq,Show,Data,Typeable,Generic)

18011801

@@ -1808,7 +1808,7 @@ data AddOrderDealsResponse = AddOrderDealsResponse

18081808-- * 'aodrOrderRevisionNumber'

18091809addOrderDealsResponse

18101810 :: AddOrderDealsResponse

1811−addOrderDealsResponse =

1811+addOrderDealsResponse =

18121812 AddOrderDealsResponse

18131813 { _aodrDeals = Nothing

18141814 , _aodrOrderRevisionNumber = Nothing

@@ -1846,7 +1846,7 @@ instance ToJSON AddOrderDealsResponse where

18461846--

18471847-- /See:/ 'deliveryControl' smart constructor.

18481848data DeliveryControl = DeliveryControl

1849− { _dcFrequencyCaps :: !(Maybe [DeliveryControlFrequencyCap])

1849+ { _dcFrequencyCaps :: !(Maybe [DeliveryControlFrequencyCap])

18501850 , _dcDeliveryRateType :: !(Maybe Text)

18511851 } deriving (Eq,Show,Data,Typeable,Generic)

18521852

@@ -1859,7 +1859,7 @@ data DeliveryControl = DeliveryControl

18591859-- * 'dcDeliveryRateType'

18601860deliveryControl

18611861 :: DeliveryControl

1862−deliveryControl =

1862+deliveryControl =

18631863 DeliveryControl

18641864 { _dcFrequencyCaps = Nothing

18651865 , _dcDeliveryRateType = Nothing

@@ -1915,7 +1915,7 @@ data PricePerBuyer = PricePerBuyer

19151915-- * 'ppbBuyer'

19161916pricePerBuyer

19171917 :: PricePerBuyer

1918−pricePerBuyer =

1918+pricePerBuyer =

19191919 PricePerBuyer

19201920 { _ppbPrice = Nothing

19211921 , _ppbBuyer = Nothing

@@ -1949,31 +1949,31 @@ instance ToJSON PricePerBuyer where

19491949--

19501950-- /See:/ 'creative' smart constructor.

19511951data Creative = Creative

1952− { _cAttribute :: !(Maybe [Int32])

1953− , _cNATiveAd :: !(Maybe CreativeNATiveAd)

1954− , _cHeight :: !(Maybe Int32)

1955− , _cBuyerCreativeId :: !(Maybe Text)

1956− , _cAdvertiserName :: !(Maybe Text)

1957− , _cAgencyId :: !(Maybe Int64)

1958− , _cCorrections :: !(Maybe [CreativeCorrectionsItem])

1959− , _cProductCategories :: !(Maybe [Int32])

1960− , _cKind :: !Text

1961− , _cHTMLSnippet :: !(Maybe Text)

1962− , _cAdvertiserId :: !(Maybe [Int64])

1963− , _cRestrictedCategories :: !(Maybe [Int32])

1964− , _cDealsStatus :: !(Maybe Text)

1965− , _cWidth :: !(Maybe Int32)

1966− , _cClickThroughURL :: !(Maybe [Text])

1967− , _cVendorType :: !(Maybe [Int32])

1968− , _cAccountId :: !(Maybe Int32)

1952+ { _cAttribute :: !(Maybe [Int32])

1953+ , _cNATiveAd :: !(Maybe CreativeNATiveAd)

1954+ , _cHeight :: !(Maybe Int32)

1955+ , _cBuyerCreativeId :: !(Maybe Text)

1956+ , _cAdvertiserName :: !(Maybe Text)

1957+ , _cAgencyId :: !(Maybe Int64)

1958+ , _cCorrections :: !(Maybe [CreativeCorrectionsItem])

1959+ , _cProductCategories :: !(Maybe [Int32])

1960+ , _cKind :: !Text

1961+ , _cHTMLSnippet :: !(Maybe Text)

1962+ , _cAdvertiserId :: !(Maybe [Int64])

1963+ , _cRestrictedCategories :: !(Maybe [Int32])

1964+ , _cDealsStatus :: !(Maybe Text)

1965+ , _cWidth :: !(Maybe Int32)

1966+ , _cClickThroughURL :: !(Maybe [Text])

1967+ , _cVendorType :: !(Maybe [Int32])

1968+ , _cAccountId :: !(Maybe Int32)

19691969 , _cImpressionTrackingURL :: !(Maybe [Text])

1970− , _cFilteringReasons :: !(Maybe CreativeFilteringReasons)

1971− , _cVersion :: !(Maybe Int32)

1972− , _cSensitiveCategories :: !(Maybe [Int32])

1973− , _cVideoURL :: !(Maybe Text)

1974− , _cAPIUploadTimestamp :: !(Maybe DateTime')

1975− , _cServingRestrictions :: !(Maybe [CreativeServingRestrictionsItem])

1976− , _cOpenAuctionStatus :: !(Maybe Text)

1970+ , _cFilteringReasons :: !(Maybe CreativeFilteringReasons)

1971+ , _cVersion :: !(Maybe Int32)

1972+ , _cSensitiveCategories :: !(Maybe [Int32])

1973+ , _cVideoURL :: !(Maybe Text)

1974+ , _cAPIUploadTimestamp :: !(Maybe DateTime')

1975+ , _cServingRestrictions :: !(Maybe [CreativeServingRestrictionsItem])

1976+ , _cOpenAuctionStatus :: !(Maybe Text)

19771977 } deriving (Eq,Show,Data,Typeable,Generic)

19781978

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

@@ -2031,7 +2031,7 @@ data Creative = Creative

20312031-- * 'cOpenAuctionStatus'

20322032creative

20332033 :: Creative

2034−creative =

2034+creative =

20352035 Creative

20362036 { _cAttribute = Nothing

20372037 , _cNATiveAd = Nothing

@@ -2300,11 +2300,11 @@ instance ToJSON Creative where

23002300--

23012301-- /See:/ 'targetingValueDayPartTargetingDayPart' smart constructor.

23022302data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart

2303− { _tvdptdpEndHour :: !(Maybe Int32)

2304− , _tvdptdpStartHour :: !(Maybe Int32)

2303+ { _tvdptdpEndHour :: !(Maybe Int32)

2304+ , _tvdptdpStartHour :: !(Maybe Int32)

23052305 , _tvdptdpStartMinute :: !(Maybe Int32)

2306− , _tvdptdpDayOfWeek :: !(Maybe Text)

2307− , _tvdptdpEndMinute :: !(Maybe Int32)

2306+ , _tvdptdpDayOfWeek :: !(Maybe Text)

2307+ , _tvdptdpEndMinute :: !(Maybe Int32)

23082308 } deriving (Eq,Show,Data,Typeable,Generic)

23092309

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

@@ -2322,7 +2322,7 @@ data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPa

23222322-- * 'tvdptdpEndMinute'

23232323targetingValueDayPartTargetingDayPart

23242324 :: TargetingValueDayPartTargetingDayPart

2325−targetingValueDayPartTargetingDayPart =

2325+targetingValueDayPartTargetingDayPart =

23262326 TargetingValueDayPartTargetingDayPart

23272327 { _tvdptdpEndHour = Nothing

23282328 , _tvdptdpStartHour = Nothing

@@ -2381,7 +2381,7 @@ instance ToJSON TargetingValueDayPartTargetingDayPart

23812381--

23822382-- /See:/ 'pretargetingConfigList' smart constructor.

23832383data PretargetingConfigList = PretargetingConfigList

2384− { _pclKind :: !Text

2384+ { _pclKind :: !Text

23852385 , _pclItems :: !(Maybe [PretargetingConfig])

23862386 } deriving (Eq,Show,Data,Typeable,Generic)

23872387

@@ -2394,7 +2394,7 @@ data PretargetingConfigList = PretargetingConfigList

23942394-- * 'pclItems'

23952395pretargetingConfigList

23962396 :: PretargetingConfigList

2397−pretargetingConfigList =

2397+pretargetingConfigList =

23982398 PretargetingConfigList

23992399 { _pclKind = "adexchangebuyer#pretargetingConfigList"

24002400 , _pclItems = Nothing

@@ -2430,13 +2430,13 @@ instance ToJSON PretargetingConfigList where

24302430--

24312431-- /See:/ 'buyerDTO' smart constructor.

24322432data BuyerDTO = BuyerDTO

2433− { _buySponsorAccountId :: !(Maybe Int32)

2433+ { _buySponsorAccountId :: !(Maybe Int32)

24342434 , _buyEnabledForInterestTargetingDeals :: !(Maybe Bool)

2435− , _buyCustomerId :: !(Maybe Int32)

2436− , _buyEnabledForPreferredDeals :: !(Maybe Bool)

2437− , _buyAccountId :: !(Maybe Int32)

2438− , _buyDisplayName :: !(Maybe Text)

2439− , _buyId :: !(Maybe Int32)

2435+ , _buyCustomerId :: !(Maybe Int32)

2436+ , _buyEnabledForPreferredDeals :: !(Maybe Bool)

2437+ , _buyAccountId :: !(Maybe Int32)

2438+ , _buyDisplayName :: !(Maybe Text)

2439+ , _buyId :: !(Maybe Int32)

24402440 } deriving (Eq,Show,Data,Typeable,Generic)

24412441

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

@@ -2458,7 +2458,7 @@ data BuyerDTO = BuyerDTO

24582458-- * 'buyId'

24592459buyerDTO

24602460 :: BuyerDTO

2461−buyerDTO =

2461+buyerDTO =

24622462 BuyerDTO

24632463 { _buySponsorAccountId = Nothing

24642464 , _buyEnabledForInterestTargetingDeals = Nothing

@@ -2533,11 +2533,11 @@ instance ToJSON BuyerDTO where

25332533-- /See:/ 'adSlotDTO' smart constructor.

25342534data AdSlotDTO = AdSlotDTO

25352535 { _asdtoWebPropertyId :: !(Maybe Int32)

2536− , _asdtoSize :: !(Maybe Text)

2537− , _asdtoChannelCode :: !(Maybe Text)

2538− , _asdtoChannelId :: !(Maybe Int32)

2539− , _asdtoName :: !(Maybe Text)

2540− , _asdtoDescription :: !(Maybe Text)

2536+ , _asdtoSize :: !(Maybe Text)

2537+ , _asdtoChannelCode :: !(Maybe Text)

2538+ , _asdtoChannelId :: !(Maybe Int32)

2539+ , _asdtoName :: !(Maybe Text)

2540+ , _asdtoDescription :: !(Maybe Text)

25412541 } deriving (Eq,Show,Data,Typeable,Generic)

25422542

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

@@ -2557,7 +2557,7 @@ data AdSlotDTO = AdSlotDTO

25572557-- * 'asdtoDescription'

25582558adSlotDTO

25592559 :: AdSlotDTO

2560−adSlotDTO =

2560+adSlotDTO =

25612561 AdSlotDTO

25622562 { _asdtoWebPropertyId = Nothing

25632563 , _asdtoSize = Nothing

@@ -2630,7 +2630,7 @@ newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPrice

26302630-- * 'dtngfptFixedPrices'

26312631dealTermsNonGuaranteedFixedPriceTerms

26322632 :: DealTermsNonGuaranteedFixedPriceTerms

2633−dealTermsNonGuaranteedFixedPriceTerms =

2633+dealTermsNonGuaranteedFixedPriceTerms =

26342634 DealTermsNonGuaranteedFixedPriceTerms

26352635 { _dtngfptFixedPrices = Nothing

26362636 }

@@ -2662,28 +2662,28 @@ instance ToJSON DealTermsNonGuaranteedFixedPriceTerms

26622662--

26632663-- /See:/ 'performanceReport' smart constructor.

26642664data PerformanceReport = PerformanceReport

2665− { _prFilteredBidRate :: !(Maybe Double)

2666− , _prKind :: !Text

2667− , _prLatency95thPercentile :: !(Maybe Double)

2665+ { _prFilteredBidRate :: !(Maybe Double)

2666+ , _prKind :: !Text

2667+ , _prLatency95thPercentile :: !(Maybe Double)

26682668 , _prCookieMatcherStatusRate :: !(Maybe [JSONValue])

2669− , _prHostedMatchStatusRate :: !(Maybe [JSONValue])

2669+ , _prHostedMatchStatusRate :: !(Maybe [JSONValue])

26702670 , _prUnsuccessfulRequestRate :: !(Maybe Double)

2671− , _prBidRequestRate :: !(Maybe Double)

2672− , _prQuotaThrottledLimit :: !(Maybe Double)

2673− , _prQuotaConfiguredLimit :: !(Maybe Double)

2674− , _prSuccessfulRequestRate :: !(Maybe Double)

2675− , _prLatency85thPercentile :: !(Maybe Double)

2676− , _prCalloutStatusRate :: !(Maybe [JSONValue])

2677− , _prLatency50thPercentile :: !(Maybe Double)

2678− , _prBidRate :: !(Maybe Double)

2679− , _prCreativeStatusRate :: !(Maybe [JSONValue])

2680− , _prNoQuotaInRegion :: !(Maybe Double)

2681− , _prRegion :: !(Maybe Text)

2682− , _prInventoryMatchRate :: !(Maybe Double)

2683− , _prPixelMatchResponses :: !(Maybe Double)

2684− , _prTimestamp :: !(Maybe Int64)

2685− , _prPixelMatchRequests :: !(Maybe Double)

2686− , _prOutOfQuota :: !(Maybe Double)

2671+ , _prBidRequestRate :: !(Maybe Double)

2672+ , _prQuotaThrottledLimit :: !(Maybe Double)

2673+ , _prQuotaConfiguredLimit :: !(Maybe Double)

2674+ , _prSuccessfulRequestRate :: !(Maybe Double)

2675+ , _prLatency85thPercentile :: !(Maybe Double)

2676+ , _prCalloutStatusRate :: !(Maybe [JSONValue])

2677+ , _prLatency50thPercentile :: !(Maybe Double)

2678+ , _prBidRate :: !(Maybe Double)

2679+ , _prCreativeStatusRate :: !(Maybe [JSONValue])

2680+ , _prNoQuotaInRegion :: !(Maybe Double)

2681+ , _prRegion :: !(Maybe Text)

2682+ , _prInventoryMatchRate :: !(Maybe Double)

2683+ , _prPixelMatchResponses :: !(Maybe Double)

2684+ , _prTimestamp :: !(Maybe Int64)

2685+ , _prPixelMatchRequests :: !(Maybe Double)

2686+ , _prOutOfQuota :: !(Maybe Double)

26872687 } deriving (Eq,Show,Data,Typeable,Generic)

26882688

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

@@ -2735,7 +2735,7 @@ data PerformanceReport = PerformanceReport

27352735-- * 'prOutOfQuota'

27362736performanceReport

27372737 :: PerformanceReport

2738−performanceReport =

2738+performanceReport =

27392739 PerformanceReport

27402740 { _prFilteredBidRate = Nothing

27412741 , _prKind = "adexchangebuyer#performanceReport"

@@ -2972,7 +2972,7 @@ instance ToJSON PerformanceReport where

29722972-- /See:/ 'pretargetingConfigExcludedPlacementsItem' smart constructor.

29732973data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacementsItem

29742974 { _pcepiToken :: !(Maybe Text)

2975− , _pcepiType :: !(Maybe Text)

2975+ , _pcepiType :: !(Maybe Text)

29762976 } deriving (Eq,Show,Data,Typeable,Generic)

29772977

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

@@ -2984,7 +2984,7 @@ data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacem

29842984-- * 'pcepiType'

29852985pretargetingConfigExcludedPlacementsItem

29862986 :: PretargetingConfigExcludedPlacementsItem

2987−pretargetingConfigExcludedPlacementsItem =

2987+pretargetingConfigExcludedPlacementsItem =

29882988 PretargetingConfigExcludedPlacementsItem

29892989 { _pcepiToken = Nothing

29902990 , _pcepiType = Nothing

@@ -3022,7 +3022,7 @@ instance ToJSON

30223022--

30233023-- /See:/ 'seller' smart constructor.

30243024data Seller = Seller

3025− { _sAccountId :: !(Maybe Text)

3025+ { _sAccountId :: !(Maybe Text)

30263026 , _sSubAccountId :: !(Maybe Text)

30273027 } deriving (Eq,Show,Data,Typeable,Generic)

30283028

@@ -3035,7 +3035,7 @@ data Seller = Seller

30353035-- * 'sSubAccountId'

30363036seller

30373037 :: Seller

3038−seller =

3038+seller =

30393039 Seller

30403040 { _sAccountId = Nothing

30413041 , _sSubAccountId = Nothing

@@ -3071,14 +3071,14 @@ instance ToJSON Seller where

30713071--

30723072-- /See:/ 'account' smart constructor.

30733073data Account = Account

3074− { _aMaximumTotalQps :: !(Maybe Int32)

3075− , _aKind :: !Text

3076− , _aCookieMatchingURL :: !(Maybe Text)

3074+ { _aMaximumTotalQps :: !(Maybe Int32)

3075+ , _aKind :: !Text

3076+ , _aCookieMatchingURL :: !(Maybe Text)

30773077 , _aMaximumActiveCreatives :: !(Maybe Int32)

3078− , _aCookieMatchingNid :: !(Maybe Text)

3079− , _aNumberActiveCreatives :: !(Maybe Int32)

3080− , _aId :: !(Maybe Int32)

3081− , _aBidderLocation :: !(Maybe [AccountBidderLocationItem])

3078+ , _aCookieMatchingNid :: !(Maybe Text)

3079+ , _aNumberActiveCreatives :: !(Maybe Int32)

3080+ , _aId :: !(Maybe Int32)

3081+ , _aBidderLocation :: !(Maybe [AccountBidderLocationItem])

30823082 } deriving (Eq,Show,Data,Typeable,Generic)

30833083

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

@@ -3102,7 +3102,7 @@ data Account = Account

31023102-- * 'aBidderLocation'

31033103account

31043104 :: Account

3105−account =

3105+account =

31063106 Account

31073107 { _aMaximumTotalQps = Nothing

31083108 , _aKind = "adexchangebuyer#account"

@@ -3199,8 +3199,8 @@ instance ToJSON Account where

31993199--

32003200-- /See:/ 'deleteOrderDealsRequest' smart constructor.

32013201data DeleteOrderDealsRequest = DeleteOrderDealsRequest

3202− { _dodrUpdateAction :: !(Maybe Text)

3203− , _dodrDealIds :: !(Maybe [Text])

3202+ { _dodrUpdateAction :: !(Maybe Text)

3203+ , _dodrDealIds :: !(Maybe [Text])

32043204 , _dodrOrderRevisionNumber :: !(Maybe Int64)

32053205 } deriving (Eq,Show,Data,Typeable,Generic)

32063206

@@ -3215,7 +3215,7 @@ data DeleteOrderDealsRequest = DeleteOrderDealsRequest

32153215-- * 'dodrOrderRevisionNumber'

32163216deleteOrderDealsRequest

32173217 :: DeleteOrderDealsRequest

3218−deleteOrderDealsRequest =

3218+deleteOrderDealsRequest =

32193219 DeleteOrderDealsRequest

32203220 { _dodrUpdateAction = Nothing

32213221 , _dodrDealIds = Nothing

@@ -3262,7 +3262,7 @@ instance ToJSON DeleteOrderDealsRequest where

32623262-- /See:/ 'contactInformation' smart constructor.

32633263data ContactInformation = ContactInformation

32643264 { _ciEmail :: !(Maybe Text)

3265− , _ciName :: !(Maybe Text)

3265+ , _ciName :: !(Maybe Text)

32663266 } deriving (Eq,Show,Data,Typeable,Generic)

32673267

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

@@ -3274,7 +3274,7 @@ data ContactInformation = ContactInformation

32743274-- * 'ciName'

32753275contactInformation

32763276 :: ContactInformation

3277−contactInformation =

3277+contactInformation =

32783278 ContactInformation

32793279 { _ciEmail = Nothing

32803280 , _ciName = Nothing

@@ -3306,8 +3306,8 @@ instance ToJSON ContactInformation where

33063306-- /See:/ 'creativeNATiveAdLogo' smart constructor.

33073307data CreativeNATiveAdLogo = CreativeNATiveAdLogo

33083308 { _cnatalHeight :: !(Maybe Int32)

3309− , _cnatalURL :: !(Maybe Text)

3310− , _cnatalWidth :: !(Maybe Int32)

3309+ , _cnatalURL :: !(Maybe Text)

3310+ , _cnatalWidth :: !(Maybe Int32)

33113311 } deriving (Eq,Show,Data,Typeable,Generic)

33123312

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

@@ -3321,7 +3321,7 @@ data CreativeNATiveAdLogo = CreativeNATiveAdLogo

33213321-- * 'cnatalWidth'

33223322creativeNATiveAdLogo

33233323 :: CreativeNATiveAdLogo

3324−creativeNATiveAdLogo =

3324+creativeNATiveAdLogo =

33253325 CreativeNATiveAdLogo

33263326 { _cnatalHeight = Nothing

33273327 , _cnatalURL = Nothing

@@ -3369,7 +3369,7 @@ newtype GetOrderDealsResponse = GetOrderDealsResponse

33693369-- * 'godrDeals'

33703370getOrderDealsResponse

33713371 :: GetOrderDealsResponse

3372−getOrderDealsResponse =

3372+getOrderDealsResponse =

33733373 GetOrderDealsResponse

33743374 { _godrDeals = Nothing

33753375 }

@@ -3397,7 +3397,7 @@ instance ToJSON GetOrderDealsResponse where

33973397--

33983398-- /See:/ 'performanceReportList' smart constructor.

33993399data PerformanceReportList = PerformanceReportList

3400− { _prlKind :: !Text

3400+ { _prlKind :: !Text

34013401 , _prlPerformanceReport :: !(Maybe [PerformanceReport])

34023402 } deriving (Eq,Show,Data,Typeable,Generic)

34033403

@@ -3410,7 +3410,7 @@ data PerformanceReportList = PerformanceReportList

34103410-- * 'prlPerformanceReport'

34113411performanceReportList

34123412 :: PerformanceReportList

3413−performanceReportList =

3413+performanceReportList =

34143414 PerformanceReportList

34153415 { _prlKind = "adexchangebuyer#performanceReportList"

34163416 , _prlPerformanceReport = Nothing

@@ -3447,28 +3447,28 @@ instance ToJSON PerformanceReportList where

34473447--

34483448-- /See:/ 'pretargetingConfig' smart constructor.

34493449data PretargetingConfig = PretargetingConfig

3450− { _pcPlatforms :: !(Maybe [Text])

3451− , _pcMobileCarriers :: !(Maybe [Int64])

3452− , _pcVendorTypes :: !(Maybe [Int64])

3453− , _pcExcludedGeoCriteriaIds :: !(Maybe [Int64])

3454− , _pcSupportedCreativeAttributes :: !(Maybe [Int64])

3455− , _pcUserLists :: !(Maybe [Int64])

3456− , _pcKind :: !Text

3457− , _pcExcludedPlacements :: !(Maybe [PretargetingConfigExcludedPlacementsItem])

3458− , _pcMobileDevices :: !(Maybe [Int64])

3459− , _pcLanguages :: !(Maybe [Text])

3460− , _pcVerticals :: !(Maybe [Int64])

3461− , _pcConfigId :: !(Maybe Int64)

3462− , _pcPlacements :: !(Maybe [PretargetingConfigPlacementsItem])

3463− , _pcExcludedUserLists :: !(Maybe [Int64])

3464− , _pcConfigName :: !(Maybe Text)

3465− , _pcGeoCriteriaIds :: !(Maybe [Int64])

3466− , _pcDimensions :: !(Maybe [PretargetingConfigDimensionsItem])

3467− , _pcExcludedVerticals :: !(Maybe [Int64])

3468− , _pcCreativeType :: !(Maybe [Text])

3469− , _pcIsActive :: !(Maybe Bool)

3470− , _pcExcludedContentLabels :: !(Maybe [Int64])

3471− , _pcBillingId :: !(Maybe Int64)

3450+ { _pcPlatforms :: !(Maybe [Text])

3451+ , _pcMobileCarriers :: !(Maybe [Int64])

3452+ , _pcVendorTypes :: !(Maybe [Int64])

3453+ , _pcExcludedGeoCriteriaIds :: !(Maybe [Int64])

3454+ , _pcSupportedCreativeAttributes :: !(Maybe [Int64])

3455+ , _pcUserLists :: !(Maybe [Int64])

3456+ , _pcKind :: !Text

3457+ , _pcExcludedPlacements :: !(Maybe [PretargetingConfigExcludedPlacementsItem])

3458+ , _pcMobileDevices :: !(Maybe [Int64])

3459+ , _pcLanguages :: !(Maybe [Text])

3460+ , _pcVerticals :: !(Maybe [Int64])

3461+ , _pcConfigId :: !(Maybe Int64)

3462+ , _pcPlacements :: !(Maybe [PretargetingConfigPlacementsItem])

3463+ , _pcExcludedUserLists :: !(Maybe [Int64])

3464+ , _pcConfigName :: !(Maybe Text)

3465+ , _pcGeoCriteriaIds :: !(Maybe [Int64])

3466+ , _pcDimensions :: !(Maybe [PretargetingConfigDimensionsItem])

3467+ , _pcExcludedVerticals :: !(Maybe [Int64])

3468+ , _pcCreativeType :: !(Maybe [Text])

3469+ , _pcIsActive :: !(Maybe Bool)

3470+ , _pcExcludedContentLabels :: !(Maybe [Int64])

3471+ , _pcBillingId :: !(Maybe Int64)

34723472 , _pcMobileOperatingSystemVersions :: !(Maybe [Int64])

34733473 } deriving (Eq,Show,Data,Typeable,Generic)

34743474

@@ -3523,7 +3523,7 @@ data PretargetingConfig = PretargetingConfig

35233523-- * 'pcMobileOperatingSystemVersions'

35243524pretargetingConfig

35253525 :: PretargetingConfig

3526−pretargetingConfig =

3526+pretargetingConfig =

35273527 PretargetingConfig

35283528 { _pcPlatforms = Nothing

35293529 , _pcMobileCarriers = Nothing

@@ -3798,7 +3798,7 @@ instance ToJSON PretargetingConfig where

37983798-- /See:/ 'creativeFilteringReasons' smart constructor.

37993799data CreativeFilteringReasons = CreativeFilteringReasons

38003800 { _cfrReasons :: !(Maybe [CreativeFilteringReasonsReasonsItem])

3801− , _cfrDate :: !(Maybe Text)

3801+ , _cfrDate :: !(Maybe Text)

38023802 } deriving (Eq,Show,Data,Typeable,Generic)

38033803

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

@@ -3810,7 +3810,7 @@ data CreativeFilteringReasons = CreativeFilteringReasons

38103810-- * 'cfrDate'

38113811creativeFilteringReasons

38123812 :: CreativeFilteringReasons

3813−creativeFilteringReasons =

3813+creativeFilteringReasons =

38143814 CreativeFilteringReasons

38153815 { _cfrReasons = Nothing

38163816 , _cfrDate = Nothing

@@ -3845,8 +3845,8 @@ instance ToJSON CreativeFilteringReasons where

38453845--

38463846-- /See:/ 'targetingValueCreativeSize' smart constructor.

38473847data TargetingValueCreativeSize = TargetingValueCreativeSize

3848− { _tvcsSize :: !(Maybe TargetingValueSize)

3849− , _tvcsCompanionSizes :: !(Maybe [TargetingValueSize])

3848+ { _tvcsSize :: !(Maybe TargetingValueSize)

3849+ , _tvcsCompanionSizes :: !(Maybe [TargetingValueSize])

38503850 , _tvcsCreativeSizeType :: !(Maybe Text)

38513851 } deriving (Eq,Show,Data,Typeable,Generic)

38523852

@@ -3861,7 +3861,7 @@ data TargetingValueCreativeSize = TargetingValueCreativeSize

38613861-- * 'tvcsCreativeSizeType'

38623862targetingValueCreativeSize

38633863 :: TargetingValueCreativeSize

3864−targetingValueCreativeSize =

3864+targetingValueCreativeSize =

38653865 TargetingValueCreativeSize

38663866 { _tvcsSize = Nothing

38673867 , _tvcsCompanionSizes = Nothing

@@ -3906,21 +3906,21 @@ instance ToJSON TargetingValueCreativeSize where

39063906--

39073907-- /See:/ 'negotiationDTO' smart constructor.

39083908data NegotiationDTO = NegotiationDTO

3909− { _ndtoNegotiationState :: !(Maybe Text)

3910− , _ndtoExternalDealId :: !(Maybe Int64)

3911− , _ndtoStatus :: !(Maybe Text)

3912− , _ndtoDealType :: !(Maybe Text)

3913− , _ndtoNegotiationRounds :: !(Maybe [NegotiationRoundDTO])

3914− , _ndtoKind :: !Text

3915− , _ndtoBilledBuyer :: !(Maybe DealPartyDTO)

3916− , _ndtoBuyerEmailContacts :: !(Maybe [Text])

3917− , _ndtoStats :: !(Maybe StatsDTO)

3918− , _ndtoSeller :: !(Maybe DealPartyDTO)

3919− , _ndtoLabelNames :: !(Maybe [Text])

3920− , _ndtoOfferId :: !(Maybe Int64)

3921− , _ndtoNegotiationId :: !(Maybe Int64)

3909+ { _ndtoNegotiationState :: !(Maybe Text)

3910+ , _ndtoExternalDealId :: !(Maybe Int64)

3911+ , _ndtoStatus :: !(Maybe Text)

3912+ , _ndtoDealType :: !(Maybe Text)

3913+ , _ndtoNegotiationRounds :: !(Maybe [NegotiationRoundDTO])

3914+ , _ndtoKind :: !Text

3915+ , _ndtoBilledBuyer :: !(Maybe DealPartyDTO)

3916+ , _ndtoBuyerEmailContacts :: !(Maybe [Text])

3917+ , _ndtoStats :: !(Maybe StatsDTO)

3918+ , _ndtoSeller :: !(Maybe DealPartyDTO)

3919+ , _ndtoLabelNames :: !(Maybe [Text])

3920+ , _ndtoOfferId :: !(Maybe Int64)

3921+ , _ndtoNegotiationId :: !(Maybe Int64)

39223922 , _ndtoSellerEmailContacts :: !(Maybe [Text])

3923− , _ndtoBuyer :: !(Maybe DealPartyDTO)

3923+ , _ndtoBuyer :: !(Maybe DealPartyDTO)

39243924 } deriving (Eq,Show,Data,Typeable,Generic)

39253925

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

@@ -3958,7 +3958,7 @@ data NegotiationDTO = NegotiationDTO

39583958-- * 'ndtoBuyer'

39593959negotiationDTO

39603960 :: NegotiationDTO

3961−negotiationDTO =

3961+negotiationDTO =

39623962 NegotiationDTO

39633963 { _ndtoNegotiationState = Nothing

39643964 , _ndtoExternalDealId = Nothing

@@ -4112,20 +4112,20 @@ instance ToJSON NegotiationDTO where

41124112--

41134113-- /See:/ 'offerDTO' smart constructor.

41144114data OfferDTO = OfferDTO

4115− { _odtoCreator :: !(Maybe DealPartyDTO)

4116− , _odtoStatus :: !(Maybe Text)

4117− , _odtoOfferState :: !(Maybe Text)

4118− , _odtoPointOfContact :: !(Maybe Text)

4119− , _odtoTerms :: !(Maybe TermsDTO)

4120− , _odtoKind :: !Text

4121− , _odtoBilledBuyer :: !(Maybe DealPartyDTO)

4122− , _odtoOpenToDealParties :: !(Maybe [DealPartyDTO])

4123− , _odtoEmailContacts :: !(Maybe [Text])

4124− , _odtoLabelNames :: !(Maybe [Text])

4125− , _odtoOfferId :: !(Maybe Int64)

4115+ { _odtoCreator :: !(Maybe DealPartyDTO)

4116+ , _odtoStatus :: !(Maybe Text)

4117+ , _odtoOfferState :: !(Maybe Text)

4118+ , _odtoPointOfContact :: !(Maybe Text)

4119+ , _odtoTerms :: !(Maybe TermsDTO)

4120+ , _odtoKind :: !Text

4121+ , _odtoBilledBuyer :: !(Maybe DealPartyDTO)

4122+ , _odtoOpenToDealParties :: !(Maybe [DealPartyDTO])

4123+ , _odtoEmailContacts :: !(Maybe [Text])

4124+ , _odtoLabelNames :: !(Maybe [Text])

4125+ , _odtoOfferId :: !(Maybe Int64)

41264126 , _odtoClosedToDealParties :: !(Maybe [DealPartyDTO])

4127− , _odtoAnonymous :: !(Maybe Bool)

4128− , _odtoIsOpen :: !(Maybe Bool)

4127+ , _odtoAnonymous :: !(Maybe Bool)

4128+ , _odtoIsOpen :: !(Maybe Bool)

41294129 } deriving (Eq,Show,Data,Typeable,Generic)

41304130

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

@@ -4161,7 +4161,7 @@ data OfferDTO = OfferDTO

41614161-- * 'odtoIsOpen'

41624162offerDTO

41634163 :: OfferDTO

4164−offerDTO =

4164+offerDTO =

41654165 OfferDTO

41664166 { _odtoCreator = Nothing

41674167 , _odtoStatus = Nothing

@@ -4306,9 +4306,9 @@ instance ToJSON OfferDTO where

43064306--

43074307-- /See:/ 'audienceSegment' smart constructor.

43084308data AudienceSegment = AudienceSegment

4309− { _asNumCookies :: !(Maybe Int64)

4310− , _asName :: !(Maybe Text)

4311− , _asId :: !(Maybe Int64)

4309+ { _asNumCookies :: !(Maybe Int64)

4310+ , _asName :: !(Maybe Text)

4311+ , _asId :: !(Maybe Int64)

43124312 , _asDescription :: !(Maybe Text)

43134313 } deriving (Eq,Show,Data,Typeable,Generic)

43144314

@@ -4325,7 +4325,7 @@ data AudienceSegment = AudienceSegment

43254325-- * 'asDescription'

43264326audienceSegment

43274327 :: AudienceSegment

4328−audienceSegment =

4328+audienceSegment =

43294329 AudienceSegment

43304330 { _asNumCookies = Nothing

43314331 , _asName = Nothing

@@ -4370,7 +4370,7 @@ instance ToJSON AudienceSegment where

43704370--

43714371-- /See:/ 'billingInfoList' smart constructor.

43724372data BillingInfoList = BillingInfoList

4373− { _bilKind :: !Text

4373+ { _bilKind :: !Text

43744374 , _bilItems :: !(Maybe [BillingInfo])

43754375 } deriving (Eq,Show,Data,Typeable,Generic)

43764376

@@ -4383,7 +4383,7 @@ data BillingInfoList = BillingInfoList

43834383-- * 'bilItems'

43844384billingInfoList

43854385 :: BillingInfoList

4386−billingInfoList =

4386+billingInfoList =

43874387 BillingInfoList

43884388 { _bilKind = "adexchangebuyer#billingInfoList"

43894389 , _bilItems = Nothing

@@ -4425,23 +4425,23 @@ instance ToJSON BillingInfoList where

44254425--

44264426-- /See:/ 'marketplaceOffer' smart constructor.

44274427data MarketplaceOffer = MarketplaceOffer

4428− { _moState :: !(Maybe Text)

4429− , _moWebPropertyCode :: !(Maybe Text)

4430− , _moCreationTimeMs :: !(Maybe Int64)

4431− , _moTerms :: !(Maybe DealTerms)

4432− , _moLastUpdateTimeMs :: !(Maybe Int64)

4433− , _moKind :: !Text

4434− , _moRevisionNumber :: !(Maybe Int64)

4428+ { _moState :: !(Maybe Text)

4429+ , _moWebPropertyCode :: !(Maybe Text)

4430+ , _moCreationTimeMs :: !(Maybe Int64)

4431+ , _moTerms :: !(Maybe DealTerms)

4432+ , _moLastUpdateTimeMs :: !(Maybe Int64)

4433+ , _moKind :: !Text

4434+ , _moRevisionNumber :: !(Maybe Int64)

44354435 , _moHasCreatorSignedOff :: !(Maybe Bool)

4436− , _moFlightStartTimeMs :: !(Maybe Int64)

4437− , _moSharedTargetings :: !(Maybe [SharedTargeting])

4438− , _moSeller :: !(Maybe Seller)

4439− , _moSyndicationProduct :: !(Maybe Text)

4440− , _moFlightEndTimeMs :: !(Maybe Int64)

4441− , _moName :: !(Maybe Text)

4442− , _moCreatorContacts :: !(Maybe [ContactInformation])

4443− , _moOfferId :: !(Maybe Text)

4444− , _moLabels :: !(Maybe [MarketplaceLabel])

4436+ , _moFlightStartTimeMs :: !(Maybe Int64)

4437+ , _moSharedTargetings :: !(Maybe [SharedTargeting])

4438+ , _moSeller :: !(Maybe Seller)

4439+ , _moSyndicationProduct :: !(Maybe Text)

4440+ , _moFlightEndTimeMs :: !(Maybe Int64)

4441+ , _moName :: !(Maybe Text)

4442+ , _moCreatorContacts :: !(Maybe [ContactInformation])

4443+ , _moOfferId :: !(Maybe Text)

4444+ , _moLabels :: !(Maybe [MarketplaceLabel])

44454445 } deriving (Eq,Show,Data,Typeable,Generic)

44464446

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

@@ -4483,7 +4483,7 @@ data MarketplaceOffer = MarketplaceOffer

44834483-- * 'moLabels'

44844484marketplaceOffer

44854485 :: MarketplaceOffer

4486−marketplaceOffer =

4486+marketplaceOffer =

44874487 MarketplaceOffer

44884488 { _moState = Nothing

44894489 , _moWebPropertyCode = Nothing

@@ -4668,7 +4668,7 @@ newtype AddOrderNotesResponse = AddOrderNotesResponse

46684668-- * 'aNotes'

46694669addOrderNotesResponse

46704670 :: AddOrderNotesResponse

4671−addOrderNotesResponse =

4671+addOrderNotesResponse =

46724672 AddOrderNotesResponse

46734673 { _aNotes = Nothing

46744674 }

@@ -4692,7 +4692,7 @@ instance ToJSON AddOrderNotesResponse where

46924692-- /See:/ 'targetingValueSize' smart constructor.

46934693data TargetingValueSize = TargetingValueSize

46944694 { _tvsHeight :: !(Maybe Int32)

4695− , _tvsWidth :: !(Maybe Int32)

4695+ , _tvsWidth :: !(Maybe Int32)

46964696 } deriving (Eq,Show,Data,Typeable,Generic)

46974697

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

@@ -4704,7 +4704,7 @@ data TargetingValueSize = TargetingValueSize

47044704-- * 'tvsWidth'

47054705targetingValueSize

47064706 :: TargetingValueSize

4707−targetingValueSize =

4707+targetingValueSize =

47084708 TargetingValueSize

47094709 { _tvsHeight = Nothing

47104710 , _tvsWidth = Nothing

@@ -4736,8 +4736,8 @@ instance ToJSON TargetingValueSize where

47364736--

47374737-- /See:/ 'getNegotiationsRequest' smart constructor.

47384738data GetNegotiationsRequest = GetNegotiationsRequest

4739− { _gnrSinceTimestampMillis :: !(Maybe Int64)

4740− , _gnrFinalized :: !(Maybe Bool)

4739+ { _gnrSinceTimestampMillis :: !(Maybe Int64)

4740+ , _gnrFinalized :: !(Maybe Bool)

47414741 , _gnrIncludePrivateAuctions :: !(Maybe Bool)

47424742 } deriving (Eq,Show,Data,Typeable,Generic)

47434743

@@ -4752,7 +4752,7 @@ data GetNegotiationsRequest = GetNegotiationsRequest

47524752-- * 'gnrIncludePrivateAuctions'

47534753getNegotiationsRequest

47544754 :: GetNegotiationsRequest

4755−getNegotiationsRequest =

4755+getNegotiationsRequest =

47564756 GetNegotiationsRequest

47574757 { _gnrSinceTimestampMillis = Nothing

47584758 , _gnrFinalized = Nothing

@@ -4796,7 +4796,7 @@ instance ToJSON GetNegotiationsRequest where

47964796-- /See:/ 'moneyDTO' smart constructor.

47974797data MoneyDTO = MoneyDTO

47984798 { _mdtoCurrencyCode :: !(Maybe Text)

4799− , _mdtoMicros :: !(Maybe Int64)

4799+ , _mdtoMicros :: !(Maybe Int64)

48004800 } deriving (Eq,Show,Data,Typeable,Generic)

48014801

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

@@ -4808,7 +4808,7 @@ data MoneyDTO = MoneyDTO

48084808-- * 'mdtoMicros'

48094809moneyDTO

48104810 :: MoneyDTO

4811−moneyDTO =

4811+moneyDTO =

48124812 MoneyDTO

48134813 { _mdtoCurrencyCode = Nothing

48144814 , _mdtoMicros = Nothing

@@ -4850,7 +4850,7 @@ newtype GetNegotiationByIdRequest = GetNegotiationByIdRequest

48504850-- * 'gnbirIncludePrivateAuctions'

48514851getNegotiationByIdRequest

48524852 :: GetNegotiationByIdRequest

4853−getNegotiationByIdRequest =

4853+getNegotiationByIdRequest =

48544854 GetNegotiationByIdRequest

48554855 { _gnbirIncludePrivateAuctions = Nothing

48564856 }

@@ -4877,7 +4877,7 @@ instance ToJSON GetNegotiationByIdRequest where

48774877--

48784878-- /See:/ 'listOffersResponse' smart constructor.

48794879data ListOffersResponse = ListOffersResponse

4880− { _lorKind :: !Text

4880+ { _lorKind :: !Text

48814881 , _lorOffers :: !(Maybe [OfferDTO])

48824882 } deriving (Eq,Show,Data,Typeable,Generic)

48834883

@@ -4890,7 +4890,7 @@ data ListOffersResponse = ListOffersResponse

48904890-- * 'lorOffers'

48914891listOffersResponse

48924892 :: ListOffersResponse

4893−listOffersResponse =

4893+listOffersResponse =

48944894 ListOffersResponse

48954895 { _lorKind = "adexchangebuyer#offersList"

48964896 , _lorOffers = Nothing

@@ -4924,7 +4924,7 @@ instance ToJSON ListOffersResponse where

49244924-- /See:/ 'pretargetingConfigDimensionsItem' smart constructor.

49254925data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem

49264926 { _pcdiHeight :: !(Maybe Int64)

4927− , _pcdiWidth :: !(Maybe Int64)

4927+ , _pcdiWidth :: !(Maybe Int64)

49284928 } deriving (Eq,Show,Data,Typeable,Generic)

49294929

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

@@ -4936,7 +4936,7 @@ data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem

49364936-- * 'pcdiWidth'

49374937pretargetingConfigDimensionsItem

49384938 :: PretargetingConfigDimensionsItem

4939−pretargetingConfigDimensionsItem =

4939+pretargetingConfigDimensionsItem =

49404940 PretargetingConfigDimensionsItem

49414941 { _pcdiHeight = Nothing

49424942 , _pcdiWidth = Nothing

@@ -4973,8 +4973,8 @@ instance ToJSON PretargetingConfigDimensionsItem

49734973data AdvertiserDTO = AdvertiserDTO

49744974 { _adtoStatus :: !(Maybe Text)

49754975 , _adtoBrands :: !(Maybe [BrandDTO])

4976− , _adtoName :: !(Maybe Text)

4977− , _adtoId :: !(Maybe Int64)

4976+ , _adtoName :: !(Maybe Text)

4977+ , _adtoId :: !(Maybe Int64)

49784978 } deriving (Eq,Show,Data,Typeable,Generic)

49794979

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

@@ -4990,7 +4990,7 @@ data AdvertiserDTO = AdvertiserDTO

49904990-- * 'adtoId'

49914991advertiserDTO

49924992 :: AdvertiserDTO

4993−advertiserDTO =

4993+advertiserDTO =

49944994 AdvertiserDTO

49954995 { _adtoStatus = Nothing

49964996 , _adtoBrands = Nothing

@@ -5044,7 +5044,7 @@ newtype ListClientAccessCapabilitiesResponse = ListClientAccessCapabilitiesRespo

50445044-- * 'lcacrClientAccessPermissions'

50455045listClientAccessCapabilitiesResponse

50465046 :: ListClientAccessCapabilitiesResponse

5047−listClientAccessCapabilitiesResponse =

5047+listClientAccessCapabilitiesResponse =

50485048 ListClientAccessCapabilitiesResponse

50495049 { _lcacrClientAccessPermissions = Nothing

50505050 }

@@ -5075,9 +5075,9 @@ instance ToJSON ListClientAccessCapabilitiesResponse

50755075--

50765076-- /See:/ 'targetingValue' smart constructor.

50775077data TargetingValue = TargetingValue

5078− { _tvCreativeSizeValue :: !(Maybe TargetingValueCreativeSize)

5079− , _tvStringValue :: !(Maybe Text)

5080− , _tvLongValue :: !(Maybe Int64)

5078+ { _tvCreativeSizeValue :: !(Maybe TargetingValueCreativeSize)

5079+ , _tvStringValue :: !(Maybe Text)

5080+ , _tvLongValue :: !(Maybe Int64)

50815081 , _tvDayPartTargetingValue :: !(Maybe TargetingValueDayPartTargeting)

50825082 } deriving (Eq,Show,Data,Typeable,Generic)

50835083

@@ -5094,7 +5094,7 @@ data TargetingValue = TargetingValue

50945094-- * 'tvDayPartTargetingValue'

50955095targetingValue

50965096 :: TargetingValue

5097−targetingValue =

5097+targetingValue =

50985098 TargetingValue

50995099 { _tvCreativeSizeValue = Nothing

51005100 , _tvStringValue = Nothing

@@ -5150,8 +5150,8 @@ instance ToJSON TargetingValue where

51505150-- /See:/ 'creativeNATiveAdAppIcon' smart constructor.

51515151data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon

51525152 { _cnataaiHeight :: !(Maybe Int32)

5153− , _cnataaiURL :: !(Maybe Text)

5154− , _cnataaiWidth :: !(Maybe Int32)

5153+ , _cnataaiURL :: !(Maybe Text)

5154+ , _cnataaiWidth :: !(Maybe Int32)

51555155 } deriving (Eq,Show,Data,Typeable,Generic)

51565156

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

@@ -5165,7 +5165,7 @@ data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon

51655165-- * 'cnataaiWidth'

51665166creativeNATiveAdAppIcon

51675167 :: CreativeNATiveAdAppIcon

5168−creativeNATiveAdAppIcon =

5168+creativeNATiveAdAppIcon =

51695169 CreativeNATiveAdAppIcon

51705170 { _cnataaiHeight = Nothing

51715171 , _cnataaiURL = Nothing

@@ -5217,7 +5217,7 @@ data Price = Price

52175217-- * 'pAmountMicros'

52185218price

52195219 :: Price

5220−price =

5220+price =

52215221 Price

52225222 { _pCurrencyCode = Nothing

52235223 , _pAmountMicros = Nothing

@@ -5252,9 +5252,9 @@ instance ToJSON Price where

52525252--

52535253-- /See:/ 'editAllOrderDealsRequest' smart constructor.

52545254data EditAllOrderDealsRequest = EditAllOrderDealsRequest

5255− { _eUpdateAction :: !(Maybe Text)

5256− , _eDeals :: !(Maybe [MarketplaceDeal])

5257− , _eOrder :: !(Maybe MarketplaceOrder)

5255+ { _eUpdateAction :: !(Maybe Text)

5256+ , _eDeals :: !(Maybe [MarketplaceDeal])

5257+ , _eOrder :: !(Maybe MarketplaceOrder)

52585258 , _eOrderRevisionNumber :: !(Maybe Int64)

52595259 } deriving (Eq,Show,Data,Typeable,Generic)

52605260

@@ -5271,7 +5271,7 @@ data EditAllOrderDealsRequest = EditAllOrderDealsRequest

52715271-- * 'eOrderRevisionNumber'

52725272editAllOrderDealsRequest

52735273 :: EditAllOrderDealsRequest

5274−editAllOrderDealsRequest =

5274+editAllOrderDealsRequest =

52755275 EditAllOrderDealsRequest

52765276 { _eUpdateAction = Nothing

52775277 , _eDeals = Nothing

@@ -5335,10 +5335,10 @@ instance ToJSON EditAllOrderDealsRequest where

53355335--

53365336-- /See:/ 'billingInfo' smart constructor.

53375337data BillingInfo = BillingInfo

5338− { _biKind :: !Text

5338+ { _biKind :: !Text

53395339 , _biAccountName :: !(Maybe Text)

5340− , _biAccountId :: !(Maybe Int32)

5341− , _biBillingId :: !(Maybe [Text])

5340+ , _biAccountId :: !(Maybe Int32)

5341+ , _biBillingId :: !(Maybe [Text])

53425342 } deriving (Eq,Show,Data,Typeable,Generic)

53435343

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

@@ -5354,7 +5354,7 @@ data BillingInfo = BillingInfo

53545354-- * 'biBillingId'

53555355billingInfo

53565356 :: BillingInfo

5357−billingInfo =

5357+billingInfo =

53585358 BillingInfo

53595359 { _biKind = "adexchangebuyer#billingInfo"

53605360 , _biAccountName = Nothing

@@ -5409,7 +5409,7 @@ instance ToJSON BillingInfo where

54095409-- /See:/ 'targetingValueDayPartTargeting' smart constructor.

54105410data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting

54115411 { _tvdptTimeZoneType :: !(Maybe Text)

5412− , _tvdptDayParts :: !(Maybe [TargetingValueDayPartTargetingDayPart])

5412+ , _tvdptDayParts :: !(Maybe [TargetingValueDayPartTargetingDayPart])

54135413 } deriving (Eq,Show,Data,Typeable,Generic)

54145414

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

@@ -5421,7 +5421,7 @@ data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting

54215421-- * 'tvdptDayParts'

54225422targetingValueDayPartTargeting

54235423 :: TargetingValueDayPartTargeting

5424−targetingValueDayPartTargeting =

5424+targetingValueDayPartTargeting =

54255425 TargetingValueDayPartTargeting

54265426 { _tvdptTimeZoneType = Nothing

54275427 , _tvdptDayParts = Nothing

@@ -5458,7 +5458,7 @@ instance ToJSON TargetingValueDayPartTargeting where

54585458--

54595459-- /See:/ 'sharedTargeting' smart constructor.

54605460data SharedTargeting = SharedTargeting

5461− { _stKey :: !(Maybe Text)

5461+ { _stKey :: !(Maybe Text)

54625462 , _stExclusions :: !(Maybe [TargetingValue])

54635463 , _stInclusions :: !(Maybe [TargetingValue])

54645464 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -5474,7 +5474,7 @@ data SharedTargeting = SharedTargeting

54745474-- * 'stInclusions'

54755475sharedTargeting

54765476 :: SharedTargeting

5477−sharedTargeting =

5477+sharedTargeting =

54785478 SharedTargeting

54795479 { _stKey = Nothing

54805480 , _stExclusions = Nothing

@@ -5528,7 +5528,7 @@ newtype ListClientAccessCapabilitiesRequest = ListClientAccessCapabilitiesReques

55285528-- * 'lcacrSponsorAccountId'

55295529listClientAccessCapabilitiesRequest

55305530 :: ListClientAccessCapabilitiesRequest

5531−listClientAccessCapabilitiesRequest =

5531+listClientAccessCapabilitiesRequest =

55325532 ListClientAccessCapabilitiesRequest

55335533 { _lcacrSponsorAccountId = Nothing

55345534 }

@@ -5556,42 +5556,42 @@ instance ToJSON ListClientAccessCapabilitiesRequest

55565556--

55575557-- /See:/ 'inventorySegmentTargeting' smart constructor.

55585558data InventorySegmentTargeting = InventorySegmentTargeting

5559− { _istNegativeVideoDurationSegments :: !(Maybe [Int64])

5560− , _istNegativeIcmBrands :: !(Maybe [Int64])

5561− , _istNegativeKeyValues :: !(Maybe [RuleKeyValuePair])

5562− , _istPositiveAudienceSegments :: !(Maybe [Int64])

5563− , _istPositiveXfpPlacements :: !(Maybe [Int64])

5564− , _istNegativeXfpAdSlots :: !(Maybe [Int64])

5559+ { _istNegativeVideoDurationSegments :: !(Maybe [Int64])

5560+ , _istNegativeIcmBrands :: !(Maybe [Int64])

5561+ , _istNegativeKeyValues :: !(Maybe [RuleKeyValuePair])

5562+ , _istPositiveAudienceSegments :: !(Maybe [Int64])

5563+ , _istPositiveXfpPlacements :: !(Maybe [Int64])

5564+ , _istNegativeXfpAdSlots :: !(Maybe [Int64])

55655565 , _istPositiveOperatingSystemVersions :: !(Maybe [Int64])

5566− , _istPositiveSizes :: !(Maybe [Int64])

5567− , _istPositiveDeviceCategories :: !(Maybe [Int64])

5568− , _istPositiveLocations :: !(Maybe [Int64])

5569− , _istNegativeAdSizes :: !(Maybe [AdSize])

5570− , _istPositiveOperatingSystems :: !(Maybe [Int64])

5571− , _istPositiveSiteURLs :: !(Maybe [Text])

5572− , _istNegativeInventorySlots :: !(Maybe [Text])

5566+ , _istPositiveSizes :: !(Maybe [Int64])

5567+ , _istPositiveDeviceCategories :: !(Maybe [Int64])

5568+ , _istPositiveLocations :: !(Maybe [Int64])

5569+ , _istNegativeAdSizes :: !(Maybe [AdSize])

5570+ , _istPositiveOperatingSystems :: !(Maybe [Int64])

5571+ , _istPositiveSiteURLs :: !(Maybe [Text])

5572+ , _istNegativeInventorySlots :: !(Maybe [Text])

55735573 , _istNegativeVideoAdPositionSegments :: !(Maybe [Text])

5574− , _istPositiveAdTypeSegments :: !(Maybe [Text])

5575− , _istPositiveIcmInterests :: !(Maybe [Int64])

5576− , _istPositiveMobileApps :: !(Maybe [Text])

5577− , _istPositiveKeyValues :: !(Maybe [RuleKeyValuePair])

5578− , _istPositiveIcmBrands :: !(Maybe [Int64])

5579− , _istPositiveVideoDurationSegments :: !(Maybe [Int64])

5580− , _istNegativeAudienceSegments :: !(Maybe [Int64])

5581− , _istNegativeXfpPlacements :: !(Maybe [Int64])

5582− , _istPositiveXfpAdSlots :: !(Maybe [Int64])

5574+ , _istPositiveAdTypeSegments :: !(Maybe [Text])

5575+ , _istPositiveIcmInterests :: !(Maybe [Int64])

5576+ , _istPositiveMobileApps :: !(Maybe [Text])

5577+ , _istPositiveKeyValues :: !(Maybe [RuleKeyValuePair])

5578+ , _istPositiveIcmBrands :: !(Maybe [Int64])

5579+ , _istPositiveVideoDurationSegments :: !(Maybe [Int64])

5580+ , _istNegativeAudienceSegments :: !(Maybe [Int64])

5581+ , _istNegativeXfpPlacements :: !(Maybe [Int64])

5582+ , _istPositiveXfpAdSlots :: !(Maybe [Int64])

55835583 , _istNegativeOperatingSystemVersions :: !(Maybe [Int64])

5584− , _istNegativeSizes :: !(Maybe [Int64])

5585− , _istNegativeLocations :: !(Maybe [Int64])

5586− , _istNegativeDeviceCategories :: !(Maybe [Int64])

5587− , _istNegativeOperatingSystems :: !(Maybe [Int64])

5588− , _istPositiveAdSizes :: !(Maybe [AdSize])

5589− , _istNegativeSiteURLs :: !(Maybe [Text])

5590− , _istNegativeAdTypeSegments :: !(Maybe [Text])

5584+ , _istNegativeSizes :: !(Maybe [Int64])

5585+ , _istNegativeLocations :: !(Maybe [Int64])

5586+ , _istNegativeDeviceCategories :: !(Maybe [Int64])

5587+ , _istNegativeOperatingSystems :: !(Maybe [Int64])

5588+ , _istPositiveAdSizes :: !(Maybe [AdSize])

5589+ , _istNegativeSiteURLs :: !(Maybe [Text])

5590+ , _istNegativeAdTypeSegments :: !(Maybe [Text])

55915591 , _istPositiveVideoAdPositionSegments :: !(Maybe [Text])

5592− , _istPositiveInventorySlots :: !(Maybe [Text])

5593− , _istNegativeMobileApps :: !(Maybe [Text])

5594− , _istNegativeIcmInterests :: !(Maybe [Int64])

5592+ , _istPositiveInventorySlots :: !(Maybe [Text])

5593+ , _istNegativeMobileApps :: !(Maybe [Text])

5594+ , _istNegativeIcmInterests :: !(Maybe [Int64])

55955595 } deriving (Eq,Show,Data,Typeable,Generic)

55965596

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

@@ -5671,7 +5671,7 @@ data InventorySegmentTargeting = InventorySegmentTargeting

56715671-- * 'istNegativeIcmInterests'

56725672inventorySegmentTargeting

56735673 :: InventorySegmentTargeting

5674−inventorySegmentTargeting =

5674+inventorySegmentTargeting =

56755675 InventorySegmentTargeting

56765676 { _istNegativeVideoDurationSegments = Nothing

56775677 , _istNegativeIcmBrands = Nothing

@@ -6076,8 +6076,8 @@ instance ToJSON InventorySegmentTargeting where

60766076-- /See:/ 'creativeNATiveAdImage' smart constructor.

60776077data CreativeNATiveAdImage = CreativeNATiveAdImage

60786078 { _cnataiHeight :: !(Maybe Int32)

6079− , _cnataiURL :: !(Maybe Text)

6080− , _cnataiWidth :: !(Maybe Int32)

6079+ , _cnataiURL :: !(Maybe Text)

6080+ , _cnataiWidth :: !(Maybe Int32)

60816081 } deriving (Eq,Show,Data,Typeable,Generic)

60826082

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

@@ -6091,7 +6091,7 @@ data CreativeNATiveAdImage = CreativeNATiveAdImage

60916091-- * 'cnataiWidth'

60926092creativeNATiveAdImage

60936093 :: CreativeNATiveAdImage

6094−creativeNATiveAdImage =

6094+creativeNATiveAdImage =

60956095 CreativeNATiveAdImage

60966096 { _cnataiHeight = Nothing

60976097 , _cnataiURL = Nothing

@@ -6130,11 +6130,11 @@ instance ToJSON CreativeNATiveAdImage where

61306130-- /See:/ 'webPropertyDTO' smart constructor.

61316131data WebPropertyDTO = WebPropertyDTO

61326132 { _wpdtoEnabledForPreferredDeals :: !(Maybe Bool)

6133− , _wpdtoSyndicationProduct :: !(Maybe Text)

6134− , _wpdtoName :: !(Maybe Text)

6135− , _wpdtoPropertyCode :: !(Maybe Text)

6136− , _wpdtoId :: !(Maybe Int32)

6137− , _wpdtoSiteURLs :: !(Maybe [Text])

6133+ , _wpdtoSyndicationProduct :: !(Maybe Text)

6134+ , _wpdtoName :: !(Maybe Text)

6135+ , _wpdtoPropertyCode :: !(Maybe Text)

6136+ , _wpdtoId :: !(Maybe Int32)

6137+ , _wpdtoSiteURLs :: !(Maybe [Text])

61386138 , _wpdtoAllowInterestTargetedAds :: !(Maybe Bool)

61396139 } deriving (Eq,Show,Data,Typeable,Generic)

61406140

@@ -6157,7 +6157,7 @@ data WebPropertyDTO = WebPropertyDTO

61576157-- * 'wpdtoAllowInterestTargetedAds'

61586158webPropertyDTO

61596159 :: WebPropertyDTO

6160−webPropertyDTO =

6160+webPropertyDTO =

61616161 WebPropertyDTO

61626162 { _wpdtoEnabledForPreferredDeals = Nothing

61636163 , _wpdtoSyndicationProduct = Nothing

@@ -6243,7 +6243,7 @@ newtype ListOffersRequest = ListOffersRequest

62436243-- * 'lorSinceTimestampMillis'

62446244listOffersRequest

62456245 :: ListOffersRequest

6246−listOffersRequest =

6246+listOffersRequest =

62476247 ListOffersRequest

62486248 { _lorSinceTimestampMillis = Nothing

62496249 }

@@ -6270,7 +6270,7 @@ instance ToJSON ListOffersRequest where

62706270-- /See:/ 'clientAccessCapabilities' smart constructor.

62716271data ClientAccessCapabilities = ClientAccessCapabilities

62726272 { _cacClientAccountId :: !(Maybe Int64)

6273− , _cacCapabilities :: !(Maybe [Int32])

6273+ , _cacCapabilities :: !(Maybe [Int32])

62746274 } deriving (Eq,Show,Data,Typeable,Generic)

62756275

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

@@ -6282,7 +6282,7 @@ data ClientAccessCapabilities = ClientAccessCapabilities

62826282-- * 'cacCapabilities'

62836283clientAccessCapabilities

62846284 :: ClientAccessCapabilities

6285−clientAccessCapabilities =

6285+clientAccessCapabilities =

62866286 ClientAccessCapabilities

62876287 { _cacClientAccountId = Nothing

62886288 , _cacCapabilities = Nothing

@@ -6318,8 +6318,8 @@ instance ToJSON ClientAccessCapabilities where

63186318--

63196319-- /See:/ 'creativeServingRestrictionsItem' smart constructor.

63206320data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem

6321− { _csriContexts :: !(Maybe [CreativeServingRestrictionsItemContextsItem])

6322− , _csriReason :: !(Maybe Text)

6321+ { _csriContexts :: !(Maybe [CreativeServingRestrictionsItemContextsItem])

6322+ , _csriReason :: !(Maybe Text)

63236323 , _csriDisApprovalReasons :: !(Maybe [CreativeServingRestrictionsItemDisApprovalReasonsItem])

63246324 } deriving (Eq,Show,Data,Typeable,Generic)

63256325

@@ -6334,7 +6334,7 @@ data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem

63346334-- * 'csriDisApprovalReasons'

63356335creativeServingRestrictionsItem

63366336 :: CreativeServingRestrictionsItem

6337−creativeServingRestrictionsItem =

6337+creativeServingRestrictionsItem =

63386338 CreativeServingRestrictionsItem

63396339 { _csriContexts = Nothing

63406340 , _csriReason = Nothing

@@ -6387,7 +6387,7 @@ instance ToJSON CreativeServingRestrictionsItem where

63876387--

63886388-- /See:/ 'deleteOrderDealsResponse' smart constructor.

63896389data DeleteOrderDealsResponse = DeleteOrderDealsResponse

6390− { _dDeals :: !(Maybe [MarketplaceDeal])

6390+ { _dDeals :: !(Maybe [MarketplaceDeal])

63916391 , _dOrderRevisionNumber :: !(Maybe Int64)

63926392 } deriving (Eq,Show,Data,Typeable,Generic)

63936393

@@ -6400,7 +6400,7 @@ data DeleteOrderDealsResponse = DeleteOrderDealsResponse

64006400-- * 'dOrderRevisionNumber'

64016401deleteOrderDealsResponse

64026402 :: DeleteOrderDealsResponse

6403−deleteOrderDealsResponse =

6403+deleteOrderDealsResponse =

64046404 DeleteOrderDealsResponse

64056405 { _dDeals = Nothing

64066406 , _dOrderRevisionNumber = Nothing

@@ -6438,7 +6438,7 @@ instance ToJSON DeleteOrderDealsResponse where

64386438-- /See:/ 'pretargetingConfigPlacementsItem' smart constructor.

64396439data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem

64406440 { _pcpiToken :: !(Maybe Text)

6441− , _pcpiType :: !(Maybe Text)

6441+ , _pcpiType :: !(Maybe Text)

64426442 } deriving (Eq,Show,Data,Typeable,Generic)

64436443

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

@@ -6450,7 +6450,7 @@ data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem

64506450-- * 'pcpiType'

64516451pretargetingConfigPlacementsItem

64526452 :: PretargetingConfigPlacementsItem

6453−pretargetingConfigPlacementsItem =

6453+pretargetingConfigPlacementsItem =

64546454 PretargetingConfigPlacementsItem

64556455 { _pcpiToken = Nothing

64566456 , _pcpiType = Nothing

@@ -6488,25 +6488,25 @@ instance ToJSON PretargetingConfigPlacementsItem

64886488--

64896489-- /See:/ 'marketplaceDeal' smart constructor.

64906490data MarketplaceDeal = MarketplaceDeal

6491− { _mdExternalDealId :: !(Maybe Text)

6492− , _mdBuyerPrivateData :: !(Maybe PrivateData)

6493− , _mdWebPropertyCode :: !(Maybe Text)

6494− , _mdCreationTimeMs :: !(Maybe Int64)

6495− , _mdTerms :: !(Maybe DealTerms)

6496− , _mdOfferRevisionNumber :: !(Maybe Int64)

6497− , _mdLastUpdateTimeMs :: !(Maybe Int64)

6498− , _mdKind :: !Text

6499− , _mdDeliveryControl :: !(Maybe DeliveryControl)

6500− , _mdFlightStartTimeMs :: !(Maybe Int64)

6501− , _mdSharedTargetings :: !(Maybe [SharedTargeting])

6502− , _mdDealId :: !(Maybe Text)

6491+ { _mdExternalDealId :: !(Maybe Text)

6492+ , _mdBuyerPrivateData :: !(Maybe PrivateData)

6493+ , _mdWebPropertyCode :: !(Maybe Text)

6494+ , _mdCreationTimeMs :: !(Maybe Int64)

6495+ , _mdTerms :: !(Maybe DealTerms)

6496+ , _mdOfferRevisionNumber :: !(Maybe Int64)

6497+ , _mdLastUpdateTimeMs :: !(Maybe Int64)

6498+ , _mdKind :: !Text

6499+ , _mdDeliveryControl :: !(Maybe DeliveryControl)

6500+ , _mdFlightStartTimeMs :: !(Maybe Int64)

6501+ , _mdSharedTargetings :: !(Maybe [SharedTargeting])

6502+ , _mdDealId :: !(Maybe Text)

65036503 , _mdInventoryDescription :: !(Maybe Text)

6504− , _mdSyndicationProduct :: !(Maybe Text)

6505− , _mdFlightEndTimeMs :: !(Maybe Int64)

6506− , _mdName :: !(Maybe Text)

6507− , _mdSellerContacts :: !(Maybe [ContactInformation])

6508− , _mdOfferId :: !(Maybe Text)

6509− , _mdOrderId :: !(Maybe Text)

6504+ , _mdSyndicationProduct :: !(Maybe Text)

6505+ , _mdFlightEndTimeMs :: !(Maybe Int64)

6506+ , _mdName :: !(Maybe Text)

6507+ , _mdSellerContacts :: !(Maybe [ContactInformation])

6508+ , _mdOfferId :: !(Maybe Text)

6509+ , _mdOrderId :: !(Maybe Text)

65106510 } deriving (Eq,Show,Data,Typeable,Generic)

65116511

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

@@ -6552,7 +6552,7 @@ data MarketplaceDeal = MarketplaceDeal

65526552-- * 'mdOrderId'

65536553marketplaceDeal

65546554 :: MarketplaceDeal

6555−marketplaceDeal =

6555+marketplaceDeal =

65566556 MarketplaceDeal

65576557 { _mdExternalDealId = Nothing

65586558 , _mdBuyerPrivateData = Nothing

@@ -6756,7 +6756,7 @@ newtype GetOffersResponse = GetOffersResponse

67566756-- * 'gorOffers'

67576757getOffersResponse

67586758 :: GetOffersResponse

6759−getOffersResponse =

6759+getOffersResponse =

67606760 GetOffersResponse

67616761 { _gorOffers = Nothing

67626762 }

@@ -6781,12 +6781,12 @@ instance ToJSON GetOffersResponse where

67816781--

67826782-- /See:/ 'statsDTO' smart constructor.

67836783data StatsDTO = StatsDTO

6784− { _sdtoBids :: !(Maybe Int64)

6785− , _sdtoSpend :: !(Maybe MoneyDTO)

6784+ { _sdtoBids :: !(Maybe Int64)

6785+ , _sdtoSpend :: !(Maybe MoneyDTO)

67866786 , _sdtoImpressions :: !(Maybe Int64)

6787− , _sdtoGoodBids :: !(Maybe Int64)

6788− , _sdtoRevenue :: !(Maybe MoneyDTO)

6789− , _sdtoRequests :: !(Maybe Int64)

6787+ , _sdtoGoodBids :: !(Maybe Int64)

6788+ , _sdtoRevenue :: !(Maybe MoneyDTO)

6789+ , _sdtoRequests :: !(Maybe Int64)

67906790 } deriving (Eq,Show,Data,Typeable,Generic)

67916791

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

@@ -6806,7 +6806,7 @@ data StatsDTO = StatsDTO

68066806-- * 'sdtoRequests'

68076807statsDTO

68086808 :: StatsDTO

6809−statsDTO =

6809+statsDTO =

68106810 StatsDTO

68116811 { _sdtoBids = Nothing

68126812 , _sdtoSpend = Nothing

@@ -6866,7 +6866,7 @@ instance ToJSON StatsDTO where

68666866-- /See:/ 'dealTermsNonGuaranteedAuctionTerms' smart constructor.

68676867data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms

68686868 { _dtngatReservePricePerBuyers :: !(Maybe [PricePerBuyer])

6869− , _dtngatPrivateAuctionId :: !(Maybe Text)

6869+ , _dtngatPrivateAuctionId :: !(Maybe Text)

68706870 } deriving (Eq,Show,Data,Typeable,Generic)

68716871

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

@@ -6878,7 +6878,7 @@ data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms

68786878-- * 'dtngatPrivateAuctionId'

68796879dealTermsNonGuaranteedAuctionTerms

68806880 :: DealTermsNonGuaranteedAuctionTerms

6881−dealTermsNonGuaranteedAuctionTerms =

6881+dealTermsNonGuaranteedAuctionTerms =

68826882 DealTermsNonGuaranteedAuctionTerms

68836883 { _dtngatReservePricePerBuyers = Nothing

68846884 , _dtngatPrivateAuctionId = Nothing

@@ -6920,7 +6920,7 @@ instance ToJSON DealTermsNonGuaranteedAuctionTerms

69206920-- /See:/ 'creativeFilteringReasonsReasonsItem' smart constructor.

69216921data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem

69226922 { _cfrriFilteringStatus :: !(Maybe Int32)

6923− , _cfrriFilteringCount :: !(Maybe Int64)

6923+ , _cfrriFilteringCount :: !(Maybe Int64)

69246924 } deriving (Eq,Show,Data,Typeable,Generic)

69256925

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

@@ -6932,7 +6932,7 @@ data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem

69326932-- * 'cfrriFilteringCount'

69336933creativeFilteringReasonsReasonsItem

69346934 :: CreativeFilteringReasonsReasonsItem

6935−creativeFilteringReasonsReasonsItem =

6935+creativeFilteringReasonsReasonsItem =

69366936 CreativeFilteringReasonsReasonsItem

69376937 { _cfrriFilteringStatus = Nothing

69386938 , _cfrriFilteringCount = Nothing

@@ -6972,15 +6972,15 @@ instance ToJSON CreativeFilteringReasonsReasonsItem

69726972--

69736973-- /See:/ 'negotiationRoundDTO' smart constructor.

69746974data NegotiationRoundDTO = NegotiationRoundDTO

6975− { _nrdtoTerms :: !(Maybe TermsDTO)

6976− , _nrdtoKind :: !Text

6975+ { _nrdtoTerms :: !(Maybe TermsDTO)

6976+ , _nrdtoKind :: !Text

69776977 , _nrdtoOriginatorRole :: !(Maybe Text)

6978− , _nrdtoAction :: !(Maybe Text)

6979− , _nrdtoDBmPartnerId :: !(Maybe Int64)

6980− , _nrdtoNotes :: !(Maybe Text)

6981− , _nrdtoNegotiationId :: !(Maybe Int64)

6982− , _nrdtoEditHistory :: !(Maybe EditHistoryDTO)

6983− , _nrdtoRoundNumber :: !(Maybe Int64)

6978+ , _nrdtoAction :: !(Maybe Text)

6979+ , _nrdtoDBmPartnerId :: !(Maybe Int64)

6980+ , _nrdtoNotes :: !(Maybe Text)

6981+ , _nrdtoNegotiationId :: !(Maybe Int64)

6982+ , _nrdtoEditHistory :: !(Maybe EditHistoryDTO)

6983+ , _nrdtoRoundNumber :: !(Maybe Int64)

69846984 } deriving (Eq,Show,Data,Typeable,Generic)

69856985

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

@@ -7006,7 +7006,7 @@ data NegotiationRoundDTO = NegotiationRoundDTO

70067006-- * 'nrdtoRoundNumber'

70077007negotiationRoundDTO

70087008 :: NegotiationRoundDTO

7009−negotiationRoundDTO =

7009+negotiationRoundDTO =

70107010 NegotiationRoundDTO

70117011 { _nrdtoTerms = Nothing

70127012 , _nrdtoKind = "adexchangebuyer#negotiationRound"

@@ -7101,9 +7101,9 @@ instance ToJSON NegotiationRoundDTO where

71017101-- /See:/ 'dealTerms' smart constructor.

71027102data DealTerms = DealTerms

71037103 { _dtNonGuaranteedFixedPriceTerms :: !(Maybe DealTermsNonGuaranteedFixedPriceTerms)

7104− , _dtNonGuaranteedAuctionTerms :: !(Maybe DealTermsNonGuaranteedAuctionTerms)

7105− , _dtGuaranteedFixedPriceTerms :: !(Maybe DealTermsGuaranteedFixedPriceTerms)

7106− , _dtDescription :: !(Maybe Text)

7104+ , _dtNonGuaranteedAuctionTerms :: !(Maybe DealTermsNonGuaranteedAuctionTerms)

7105+ , _dtGuaranteedFixedPriceTerms :: !(Maybe DealTermsGuaranteedFixedPriceTerms)

7106+ , _dtDescription :: !(Maybe Text)

71077107 } deriving (Eq,Show,Data,Typeable,Generic)

71087108

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

@@ -7119,7 +7119,7 @@ data DealTerms = DealTerms

71197119-- * 'dtDescription'

71207120dealTerms

71217121 :: DealTerms

7122−dealTerms =

7122+dealTerms =

71237123 DealTerms

71247124 { _dtNonGuaranteedFixedPriceTerms = Nothing

71257125 , _dtNonGuaranteedAuctionTerms = Nothing

@@ -7176,12 +7176,12 @@ instance ToJSON DealTerms where

71767176--

71777177-- /See:/ 'dateTime' smart constructor.

71787178data DateTime = DateTime

7179− { _dtSecond :: !(Maybe Int32)

7180− , _dtDay :: !(Maybe Int32)

7181− , _dtYear :: !(Maybe Int32)

7182− , _dtHour :: !(Maybe Int32)

7183− , _dtMonth :: !(Maybe Int32)

7184− , _dtMinute :: !(Maybe Int32)

7179+ { _dtSecond :: !(Maybe Int32)

7180+ , _dtDay :: !(Maybe Int32)

7181+ , _dtYear :: !(Maybe Int32)

7182+ , _dtHour :: !(Maybe Int32)

7183+ , _dtMonth :: !(Maybe Int32)

7184+ , _dtMinute :: !(Maybe Int32)

71857185 , _dtTimeZoneId :: !(Maybe Text)

71867186 } deriving (Eq,Show,Data,Typeable,Generic)

71877187

@@ -7204,7 +7204,7 @@ data DateTime = DateTime

72047204-- * 'dtTimeZoneId'

72057205dateTime

72067206 :: DateTime

7207−dateTime =

7207+dateTime =

72087208 DateTime

72097209 { _dtSecond = Nothing

72107210 , _dtDay = Nothing

@@ -7262,9 +7262,9 @@ instance ToJSON DateTime where

72627262-- /See:/ 'marketplaceLabel' smart constructor.

72637263data MarketplaceLabel = MarketplaceLabel

72647264 { _mlDeprecatedMarketplaceDealParty :: !(Maybe MarketplaceDealParty)

7265− , _mlAccountId :: !(Maybe Text)

7266− , _mlCreateTimeMs :: !(Maybe Int64)

7267− , _mlLabel :: !(Maybe Text)

7265+ , _mlAccountId :: !(Maybe Text)

7266+ , _mlCreateTimeMs :: !(Maybe Int64)

7267+ , _mlLabel :: !(Maybe Text)

72687268 } deriving (Eq,Show,Data,Typeable,Generic)

72697269

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

@@ -7280,7 +7280,7 @@ data MarketplaceLabel = MarketplaceLabel

72807280-- * 'mlLabel'

72817281marketplaceLabel

72827282 :: MarketplaceLabel

7283−marketplaceLabel =

7283+marketplaceLabel =

72847284 MarketplaceLabel

72857285 { _mlDeprecatedMarketplaceDealParty = Nothing

72867286 , _mlAccountId = Nothing

@@ -7333,9 +7333,9 @@ instance ToJSON MarketplaceLabel where

73337333-- /See:/ 'editHistoryDTO' smart constructor.

73347334data EditHistoryDTO = EditHistoryDTO

73357335 { _ehdtoLastUpdatedByLoginName :: !(Maybe Text)

7336− , _ehdtoCreatedByLoginName :: !(Maybe Text)

7337− , _ehdtoLastUpdateTimeStamp :: !(Maybe Int64)

7338− , _ehdtoCreatedTimeStamp :: !(Maybe Int64)

7336+ , _ehdtoCreatedByLoginName :: !(Maybe Text)

7337+ , _ehdtoLastUpdateTimeStamp :: !(Maybe Int64)

7338+ , _ehdtoCreatedTimeStamp :: !(Maybe Int64)

73397339 } deriving (Eq,Show,Data,Typeable,Generic)

73407340

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

@@ -7351,7 +7351,7 @@ data EditHistoryDTO = EditHistoryDTO

73517351-- * 'ehdtoCreatedTimeStamp'

73527352editHistoryDTO

73537353 :: EditHistoryDTO

7354−editHistoryDTO =

7354+editHistoryDTO =

73557355 EditHistoryDTO

73567356 { _ehdtoLastUpdatedByLoginName = Nothing

73577357 , _ehdtoCreatedByLoginName = Nothing

@@ -7414,7 +7414,7 @@ newtype Buyer = Buyer

74147414-- * 'bbAccountId'

74157415buyer

74167416 :: Buyer

7417−buyer =

7417+buyer =

74187418 Buyer

74197419 { _bbAccountId = Nothing

74207420 }

@@ -7444,26 +7444,26 @@ instance ToJSON Buyer where

74447444--

74457445-- /See:/ 'marketplaceOrder' smart constructor.

74467446data MarketplaceOrder = MarketplaceOrder

7447− { _marBuyerPrivateData :: !(Maybe PrivateData)

7448− , _marIsSetupComplete :: !(Maybe Bool)

7449− , _marBuyerContacts :: !(Maybe [ContactInformation])

7450− , _marKind :: !Text

7451− , _marOriginatorRole :: !(Maybe Text)

7452− , _marRevisionNumber :: !(Maybe Int64)

7453− , _marBilledBuyer :: !(Maybe Buyer)

7454− , _marIsRenegotiating :: !(Maybe Bool)

7455− , _marHasSellerSignedOff :: !(Maybe Bool)

7456− , _marSeller :: !(Maybe Seller)

7457− , _marOrderState :: !(Maybe Text)

7458− , _marName :: !(Maybe Text)

7459− , _marSellerContacts :: !(Maybe [ContactInformation])

7460− , _marLastUpdaterRole :: !(Maybe Text)

7461− , _marLabels :: !(Maybe [MarketplaceLabel])

7462− , _marRevisionTimeMs :: !(Maybe Int64)

7463− , _marOrderId :: !(Maybe Text)

7447+ { _marBuyerPrivateData :: !(Maybe PrivateData)

7448+ , _marIsSetupComplete :: !(Maybe Bool)

7449+ , _marBuyerContacts :: !(Maybe [ContactInformation])

7450+ , _marKind :: !Text

7451+ , _marOriginatorRole :: !(Maybe Text)

7452+ , _marRevisionNumber :: !(Maybe Int64)

7453+ , _marBilledBuyer :: !(Maybe Buyer)

7454+ , _marIsRenegotiating :: !(Maybe Bool)

7455+ , _marHasSellerSignedOff :: !(Maybe Bool)

7456+ , _marSeller :: !(Maybe Seller)

7457+ , _marOrderState :: !(Maybe Text)

7458+ , _marName :: !(Maybe Text)

7459+ , _marSellerContacts :: !(Maybe [ContactInformation])

7460+ , _marLastUpdaterRole :: !(Maybe Text)

7461+ , _marLabels :: !(Maybe [MarketplaceLabel])

7462+ , _marRevisionTimeMs :: !(Maybe Int64)

7463+ , _marOrderId :: !(Maybe Text)

74647464 , _marLastUpdaterOrCommentorRole :: !(Maybe Text)

7465− , _marHasBuyerSignedOff :: !(Maybe Bool)

7466− , _marBuyer :: !(Maybe Buyer)

7465+ , _marHasBuyerSignedOff :: !(Maybe Bool)

7466+ , _marBuyer :: !(Maybe Buyer)

74677467 } deriving (Eq,Show,Data,Typeable,Generic)

74687468

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

@@ -7511,7 +7511,7 @@ data MarketplaceOrder = MarketplaceOrder

75117511-- * 'marBuyer'

75127512marketplaceOrder

75137513 :: MarketplaceOrder

7514−marketplaceOrder =

7514+marketplaceOrder =

75157515 MarketplaceOrder

75167516 { _marBuyerPrivateData = Nothing

75177517 , _marIsSetupComplete = Nothing

@@ -7714,8 +7714,8 @@ instance ToJSON MarketplaceOrder where

77147714--

77157715-- /See:/ 'addOrderDealsRequest' smart constructor.

77167716data AddOrderDealsRequest = AddOrderDealsRequest

7717− { _aUpdateAction :: !(Maybe Text)

7718− , _aDeals :: !(Maybe [MarketplaceDeal])

7717+ { _aUpdateAction :: !(Maybe Text)

7718+ , _aDeals :: !(Maybe [MarketplaceDeal])

77197719 , _aOrderRevisionNumber :: !(Maybe Int64)

77207720 } deriving (Eq,Show,Data,Typeable,Generic)

77217721

@@ -7730,7 +7730,7 @@ data AddOrderDealsRequest = AddOrderDealsRequest

77307730-- * 'aOrderRevisionNumber'

77317731addOrderDealsRequest

77327732 :: AddOrderDealsRequest

7733−addOrderDealsRequest =

7733+addOrderDealsRequest =

77347734 AddOrderDealsRequest

77357735 { _aUpdateAction = Nothing

77367736 , _aDeals = Nothing

@@ -7775,9 +7775,9 @@ instance ToJSON AddOrderDealsRequest where

77757775--

77767776-- /See:/ 'dealTermsGuaranteedFixedPriceTerms' smart constructor.

77777777data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms

7778− { _dtgfptGuaranteedLooks :: !(Maybe Int64)

7778+ { _dtgfptGuaranteedLooks :: !(Maybe Int64)

77797779 , _dtgfptGuaranteedImpressions :: !(Maybe Int64)

7780− , _dtgfptFixedPrices :: !(Maybe [PricePerBuyer])

7780+ , _dtgfptFixedPrices :: !(Maybe [PricePerBuyer])

77817781 } deriving (Eq,Show,Data,Typeable,Generic)

77827782

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

@@ -7791,7 +7791,7 @@ data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms

77917791-- * 'dtgfptFixedPrices'

77927792dealTermsGuaranteedFixedPriceTerms

77937793 :: DealTermsGuaranteedFixedPriceTerms

7794−dealTermsGuaranteedFixedPriceTerms =

7794+dealTermsGuaranteedFixedPriceTerms =

77957795 DealTermsGuaranteedFixedPriceTerms

77967796 { _dtgfptGuaranteedLooks = Nothing

77977797 , _dtgfptGuaranteedImpressions = Nothing

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.AdExchangeBuyer.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121-- | The proposed action to take on the order.

2222data MarketplaceOrdersUpdateUpdateAction

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Accounts.Get

4242 , agFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerAccountsGet@ which the

4949-- 'AccountsGet'' request conforms to.

@@ -62,13 +62,13 @@ type AccountsGetResource =

6262--

6363-- /See:/ 'accountsGet'' smart constructor.

6464data AccountsGet' = AccountsGet'

65− { _agQuotaUser :: !(Maybe Text)

65+ { _agQuotaUser :: !(Maybe Text)

6666 , _agPrettyPrint :: !Bool

67− , _agUserIP :: !(Maybe Text)

68− , _agKey :: !(Maybe Key)

69− , _agId :: !Int32

70− , _agOAuthToken :: !(Maybe OAuthToken)

71− , _agFields :: !(Maybe Text)

67+ , _agUserIP :: !(Maybe Text)

68+ , _agKey :: !(Maybe Key)

69+ , _agId :: !Int32

70+ , _agOAuthToken :: !(Maybe OAuthToken)

71+ , _agFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data AccountsGet' = AccountsGet'

9191accountsGet'

9292 :: Int32 -- ^ 'id'

9393 -> AccountsGet'

94−accountsGet' pAgId_ =

94+accountsGet' pAgId_ =

9595 AccountsGet'

9696 { _agQuotaUser = Nothing

9797 , _agPrettyPrint = True

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

@@ -41,8 +41,8 @@ module Network.Google.Resource.AdExchangeBuyer.Accounts.List

4141 , alFields

4242 ) where

4343

44−import Network.Google.AdExchangeBuyer.Types

45−import Network.Google.Prelude

44+import Network.Google.AdExchangeBuyer.Types

45+import Network.Google.Prelude

4646

4747-- | A resource alias for @AdexchangebuyerAccountsList@ which the

4848-- 'AccountsList'' request conforms to.

@@ -60,12 +60,12 @@ type AccountsListResource =

6060--

6161-- /See:/ 'accountsList'' smart constructor.

6262data AccountsList' = AccountsList'

63− { _alQuotaUser :: !(Maybe Text)

63+ { _alQuotaUser :: !(Maybe Text)

6464 , _alPrettyPrint :: !Bool

65− , _alUserIP :: !(Maybe Text)

66− , _alKey :: !(Maybe Key)

67− , _alOAuthToken :: !(Maybe OAuthToken)

68− , _alFields :: !(Maybe Text)

65+ , _alUserIP :: !(Maybe Text)

66+ , _alKey :: !(Maybe Key)

67+ , _alOAuthToken :: !(Maybe OAuthToken)

68+ , _alFields :: !(Maybe Text)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

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

@@ -85,7 +85,7 @@ data AccountsList' = AccountsList'

8585-- * 'alFields'

8686accountsList'

8787 :: AccountsList'

88−accountsList' =

88+accountsList' =

8989 AccountsList'

9090 { _alQuotaUser = Nothing

9191 , _alPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.Accounts.Patch

4343 , apFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerAccountsPatch@ which the

5050-- 'AccountsPatch'' request conforms to.

@@ -64,14 +64,14 @@ type AccountsPatchResource =

6464--

6565-- /See:/ 'accountsPatch'' smart constructor.

6666data AccountsPatch' = AccountsPatch'

67− { _apQuotaUser :: !(Maybe Text)

67+ { _apQuotaUser :: !(Maybe Text)

6868 , _apPrettyPrint :: !Bool

69− , _apUserIP :: !(Maybe Text)

70− , _apPayload :: !Account

71− , _apKey :: !(Maybe Key)

72− , _apId :: !Int32

73− , _apOAuthToken :: !(Maybe OAuthToken)

74− , _apFields :: !(Maybe Text)

69+ , _apUserIP :: !(Maybe Text)

70+ , _apPayload :: !Account

71+ , _apKey :: !(Maybe Key)

72+ , _apId :: !Int32

73+ , _apOAuthToken :: !(Maybe OAuthToken)

74+ , _apFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -97,7 +97,7 @@ accountsPatch'

9797 :: Account -- ^ 'payload'

9898 -> Int32 -- ^ 'id'

9999 -> AccountsPatch'

100−accountsPatch' pApPayload_ pApId_ =

100+accountsPatch' pApPayload_ pApId_ =

101101 AccountsPatch'

102102 { _apQuotaUser = Nothing

103103 , _apPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.Accounts.Update

4343 , auFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerAccountsUpdate@ which the

5050-- 'AccountsUpdate'' request conforms to.

@@ -64,14 +64,14 @@ type AccountsUpdateResource =

6464--

6565-- /See:/ 'accountsUpdate'' smart constructor.

6666data AccountsUpdate' = AccountsUpdate'

67− { _auQuotaUser :: !(Maybe Text)

67+ { _auQuotaUser :: !(Maybe Text)

6868 , _auPrettyPrint :: !Bool

69− , _auUserIP :: !(Maybe Text)

70− , _auPayload :: !Account

71− , _auKey :: !(Maybe Key)

72− , _auId :: !Int32

73− , _auOAuthToken :: !(Maybe OAuthToken)

74− , _auFields :: !(Maybe Text)

69+ , _auUserIP :: !(Maybe Text)

70+ , _auPayload :: !Account

71+ , _auKey :: !(Maybe Key)

72+ , _auId :: !Int32

73+ , _auOAuthToken :: !(Maybe OAuthToken)

74+ , _auFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -97,7 +97,7 @@ accountsUpdate'

9797 :: Account -- ^ 'payload'

9898 -> Int32 -- ^ 'id'

9999 -> AccountsUpdate'

100−accountsUpdate' pAuPayload_ pAuId_ =

100+accountsUpdate' pAuPayload_ pAuId_ =

101101 AccountsUpdate'

102102 { _auQuotaUser = Nothing

103103 , _auPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.BillingInfo.Get

4242 , bigFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerBillingInfoGet@ which the

4949-- 'BillingInfoGet'' request conforms to.

@@ -62,13 +62,13 @@ type BillingInfoGetResource =

6262--

6363-- /See:/ 'billingInfoGet'' smart constructor.

6464data BillingInfoGet' = BillingInfoGet'

65− { _bigQuotaUser :: !(Maybe Text)

65+ { _bigQuotaUser :: !(Maybe Text)

6666 , _bigPrettyPrint :: !Bool

67− , _bigUserIP :: !(Maybe Text)

68− , _bigAccountId :: !Int32

69− , _bigKey :: !(Maybe Key)

70− , _bigOAuthToken :: !(Maybe OAuthToken)

71− , _bigFields :: !(Maybe Text)

67+ , _bigUserIP :: !(Maybe Text)

68+ , _bigAccountId :: !Int32

69+ , _bigKey :: !(Maybe Key)

70+ , _bigOAuthToken :: !(Maybe OAuthToken)

71+ , _bigFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data BillingInfoGet' = BillingInfoGet'

9191billingInfoGet'

9292 :: Int32 -- ^ 'accountId'

9393 -> BillingInfoGet'

94−billingInfoGet' pBigAccountId_ =

94+billingInfoGet' pBigAccountId_ =

9595 BillingInfoGet'

9696 { _bigQuotaUser = Nothing

9797 , _bigPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.BillingInfo.List

4242 , bilFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerBillingInfoList@ which the

4949-- 'BillingInfoList'' request conforms to.

@@ -63,12 +63,12 @@ type BillingInfoListResource =

6363--

6464-- /See:/ 'billingInfoList'' smart constructor.

6565data BillingInfoList' = BillingInfoList'

66− { _bilQuotaUser :: !(Maybe Text)

66+ { _bilQuotaUser :: !(Maybe Text)

6767 , _bilPrettyPrint :: !Bool

68− , _bilUserIP :: !(Maybe Text)

69− , _bilKey :: !(Maybe Key)

70− , _bilOAuthToken :: !(Maybe OAuthToken)

71− , _bilFields :: !(Maybe Text)

68+ , _bilUserIP :: !(Maybe Text)

69+ , _bilKey :: !(Maybe Key)

70+ , _bilOAuthToken :: !(Maybe OAuthToken)

71+ , _bilFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -88,7 +88,7 @@ data BillingInfoList' = BillingInfoList'

8888-- * 'bilFields'

8989billingInfoList'

9090 :: BillingInfoList'

91−billingInfoList' =

91+billingInfoList' =

9292 BillingInfoList'

9393 { _bilQuotaUser = Nothing

9494 , _bilPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.Budget.Get

4444 , bgFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerBudgetGet@ which the

5151-- 'BudgetGet'' request conforms to.

@@ -66,14 +66,14 @@ type BudgetGetResource =

6666--

6767-- /See:/ 'budgetGet'' smart constructor.

6868data BudgetGet' = BudgetGet'

69− { _bgQuotaUser :: !(Maybe Text)

69+ { _bgQuotaUser :: !(Maybe Text)

7070 , _bgPrettyPrint :: !Bool

71− , _bgUserIP :: !(Maybe Text)

72− , _bgAccountId :: !Int64

73− , _bgKey :: !(Maybe Key)

74− , _bgOAuthToken :: !(Maybe OAuthToken)

75− , _bgBillingId :: !Int64

76− , _bgFields :: !(Maybe Text)

71+ , _bgUserIP :: !(Maybe Text)

72+ , _bgAccountId :: !Int64

73+ , _bgKey :: !(Maybe Key)

74+ , _bgOAuthToken :: !(Maybe OAuthToken)

75+ , _bgBillingId :: !Int64

76+ , _bgFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ budgetGet'

9999 :: Int64 -- ^ 'accountId'

100100 -> Int64 -- ^ 'billingId'

101101 -> BudgetGet'

102−budgetGet' pBgAccountId_ pBgBillingId_ =

102+budgetGet' pBgAccountId_ pBgBillingId_ =

103103 BudgetGet'

104104 { _bgQuotaUser = Nothing

105105 , _bgPrettyPrint = True

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

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdExchangeBuyer.Budget.Patch

4646 , bpFields

4747 ) where

4848

49−import Network.Google.AdExchangeBuyer.Types

50−import Network.Google.Prelude

49+import Network.Google.AdExchangeBuyer.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdexchangebuyerBudgetPatch@ which the

5353-- 'BudgetPatch'' request conforms to.

@@ -70,15 +70,15 @@ type BudgetPatchResource =

7070--

7171-- /See:/ 'budgetPatch'' smart constructor.

7272data BudgetPatch' = BudgetPatch'

73− { _bpQuotaUser :: !(Maybe Text)

73+ { _bpQuotaUser :: !(Maybe Text)

7474 , _bpPrettyPrint :: !Bool

75− , _bpUserIP :: !(Maybe Text)

76− , _bpPayload :: !Budget

77− , _bpAccountId :: !Int64

78− , _bpKey :: !(Maybe Key)

79− , _bpOAuthToken :: !(Maybe OAuthToken)

80− , _bpBillingId :: !Int64

81− , _bpFields :: !(Maybe Text)

75+ , _bpUserIP :: !(Maybe Text)

76+ , _bpPayload :: !Budget

77+ , _bpAccountId :: !Int64

78+ , _bpKey :: !(Maybe Key)

79+ , _bpOAuthToken :: !(Maybe OAuthToken)

80+ , _bpBillingId :: !Int64

81+ , _bpFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ budgetPatch'

107107 -> Int64 -- ^ 'accountId'

108108 -> Int64 -- ^ 'billingId'

109109 -> BudgetPatch'

110−budgetPatch' pBpPayload_ pBpAccountId_ pBpBillingId_ =

110+budgetPatch' pBpPayload_ pBpAccountId_ pBpBillingId_ =

111111 BudgetPatch'

112112 { _bpQuotaUser = Nothing

113113 , _bpPrettyPrint = True

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

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdExchangeBuyer.Budget.Update

4545 , buFields

4646 ) where

4747

48−import Network.Google.AdExchangeBuyer.Types

49−import Network.Google.Prelude

48+import Network.Google.AdExchangeBuyer.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdexchangebuyerBudgetUpdate@ which the

5252-- 'BudgetUpdate'' request conforms to.

@@ -68,15 +68,15 @@ type BudgetUpdateResource =

6868--

6969-- /See:/ 'budgetUpdate'' smart constructor.

7070data BudgetUpdate' = BudgetUpdate'

71− { _buQuotaUser :: !(Maybe Text)

71+ { _buQuotaUser :: !(Maybe Text)

7272 , _buPrettyPrint :: !Bool

73− , _buUserIP :: !(Maybe Text)

74− , _buPayload :: !Budget

75− , _buAccountId :: !Int64

76− , _buKey :: !(Maybe Key)

77− , _buOAuthToken :: !(Maybe OAuthToken)

78− , _buBillingId :: !Int64

79− , _buFields :: !(Maybe Text)

73+ , _buUserIP :: !(Maybe Text)

74+ , _buPayload :: !Budget

75+ , _buAccountId :: !Int64

76+ , _buKey :: !(Maybe Key)

77+ , _buOAuthToken :: !(Maybe OAuthToken)

78+ , _buBillingId :: !Int64

79+ , _buFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ budgetUpdate'

105105 -> Int64 -- ^ 'accountId'

106106 -> Int64 -- ^ 'billingId'

107107 -> BudgetUpdate'

108−budgetUpdate' pBuPayload_ pBuAccountId_ pBuBillingId_ =

108+budgetUpdate' pBuPayload_ pBuAccountId_ pBuBillingId_ =

109109 BudgetUpdate'

110110 { _buQuotaUser = Nothing

111111 , _buPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.Delete

4343 , cadFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerClientAccessDelete@ which the

5050-- 'ClientAccessDelete'' request conforms to.

@@ -63,14 +63,14 @@ type ClientAccessDeleteResource =

6363--

6464-- /See:/ 'clientAccessDelete'' smart constructor.

6565data ClientAccessDelete' = ClientAccessDelete'

66− { _cadQuotaUser :: !(Maybe Text)

67− , _cadPrettyPrint :: !Bool

68− , _cadUserIP :: !(Maybe Text)

66+ { _cadQuotaUser :: !(Maybe Text)

67+ , _cadPrettyPrint :: !Bool

68+ , _cadUserIP :: !(Maybe Text)

6969 , _cadSponsorAccountId :: !Int32

70− , _cadKey :: !(Maybe Key)

71− , _cadClientAccountId :: !Int64

72− , _cadOAuthToken :: !(Maybe OAuthToken)

73− , _cadFields :: !(Maybe Text)

70+ , _cadKey :: !(Maybe Key)

71+ , _cadClientAccountId :: !Int64

72+ , _cadOAuthToken :: !(Maybe OAuthToken)

73+ , _cadFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -96,7 +96,7 @@ clientAccessDelete'

9696 :: Int32 -- ^ 'sponsorAccountId'

9797 -> Int64 -- ^ 'clientAccountId'

9898 -> ClientAccessDelete'

99−clientAccessDelete' pCadSponsorAccountId_ pCadClientAccountId_ =

99+clientAccessDelete' pCadSponsorAccountId_ pCadClientAccountId_ =

100100 ClientAccessDelete'

101101 { _cadQuotaUser = Nothing

102102 , _cadPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.Get

4343 , cagFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerClientAccessGet@ which the

5050-- 'ClientAccessGet'' request conforms to.

@@ -64,14 +64,14 @@ type ClientAccessGetResource =

6464--

6565-- /See:/ 'clientAccessGet'' smart constructor.

6666data ClientAccessGet' = ClientAccessGet'

67− { _cagQuotaUser :: !(Maybe Text)

68− , _cagPrettyPrint :: !Bool

69− , _cagUserIP :: !(Maybe Text)

67+ { _cagQuotaUser :: !(Maybe Text)

68+ , _cagPrettyPrint :: !Bool

69+ , _cagUserIP :: !(Maybe Text)

7070 , _cagSponsorAccountId :: !Int32

71− , _cagKey :: !(Maybe Key)

72− , _cagClientAccountId :: !Int64

73− , _cagOAuthToken :: !(Maybe OAuthToken)

74− , _cagFields :: !(Maybe Text)

71+ , _cagKey :: !(Maybe Key)

72+ , _cagClientAccountId :: !Int64

73+ , _cagOAuthToken :: !(Maybe OAuthToken)

74+ , _cagFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -97,7 +97,7 @@ clientAccessGet'

9797 :: Int32 -- ^ 'sponsorAccountId'

9898 -> Int64 -- ^ 'clientAccountId'

9999 -> ClientAccessGet'

100−clientAccessGet' pCagSponsorAccountId_ pCagClientAccountId_ =

100+clientAccessGet' pCagSponsorAccountId_ pCagClientAccountId_ =

101101 ClientAccessGet'

102102 { _cagQuotaUser = Nothing

103103 , _cagPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.Insert

4444 , caiFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerClientAccessInsert@ which the

5151-- 'ClientAccessInsert'' request conforms to.

@@ -66,15 +66,15 @@ type ClientAccessInsertResource =

6666--

6767-- /See:/ 'clientAccessInsert'' smart constructor.

6868data ClientAccessInsert' = ClientAccessInsert'

69− { _caiQuotaUser :: !(Maybe Text)

70− , _caiPrettyPrint :: !Bool

71− , _caiUserIP :: !(Maybe Text)

69+ { _caiQuotaUser :: !(Maybe Text)

70+ , _caiPrettyPrint :: !Bool

71+ , _caiUserIP :: !(Maybe Text)

7272 , _caiSponsorAccountId :: !(Maybe Int32)

73− , _caiPayload :: !ClientAccessCapabilities

74− , _caiKey :: !(Maybe Key)

75− , _caiClientAccountId :: !(Maybe Int64)

76− , _caiOAuthToken :: !(Maybe OAuthToken)

77− , _caiFields :: !(Maybe Text)

73+ , _caiPayload :: !ClientAccessCapabilities

74+ , _caiKey :: !(Maybe Key)

75+ , _caiClientAccountId :: !(Maybe Int64)

76+ , _caiOAuthToken :: !(Maybe OAuthToken)

77+ , _caiFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -101,7 +101,7 @@ data ClientAccessInsert' = ClientAccessInsert'

101101clientAccessInsert'

102102 :: ClientAccessCapabilities -- ^ 'payload'

103103 -> ClientAccessInsert'

104−clientAccessInsert' pCaiPayload_ =

104+clientAccessInsert' pCaiPayload_ =

105105 ClientAccessInsert'

106106 { _caiQuotaUser = Nothing

107107 , _caiPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.List

4242 , calFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerClientAccessList@ which the

4949-- 'ClientAccessList'' request conforms to.

@@ -62,13 +62,13 @@ type ClientAccessListResource =

6262--

6363-- /See:/ 'clientAccessList'' smart constructor.

6464data ClientAccessList' = ClientAccessList'

65− { _calQuotaUser :: !(Maybe Text)

65+ { _calQuotaUser :: !(Maybe Text)

6666 , _calPrettyPrint :: !Bool

67− , _calUserIP :: !(Maybe Text)

68− , _calPayload :: !ListClientAccessCapabilitiesRequest

69− , _calKey :: !(Maybe Key)

70− , _calOAuthToken :: !(Maybe OAuthToken)

71− , _calFields :: !(Maybe Text)

67+ , _calUserIP :: !(Maybe Text)

68+ , _calPayload :: !ListClientAccessCapabilitiesRequest

69+ , _calKey :: !(Maybe Key)

70+ , _calOAuthToken :: !(Maybe OAuthToken)

71+ , _calFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data ClientAccessList' = ClientAccessList'

9191clientAccessList'

9292 :: ListClientAccessCapabilitiesRequest -- ^ 'payload'

9393 -> ClientAccessList'

94−clientAccessList' pCalPayload_ =

94+clientAccessList' pCalPayload_ =

9595 ClientAccessList'

9696 { _calQuotaUser = Nothing

9797 , _calPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.Patch

4444 , capFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerClientAccessPatch@ which the

5151-- 'ClientAccessPatch'' request conforms to.

@@ -66,15 +66,15 @@ type ClientAccessPatchResource =

6666--

6767-- /See:/ 'clientAccessPatch'' smart constructor.

6868data ClientAccessPatch' = ClientAccessPatch'

69− { _capQuotaUser :: !(Maybe Text)

70− , _capPrettyPrint :: !Bool

71− , _capUserIP :: !(Maybe Text)

69+ { _capQuotaUser :: !(Maybe Text)

70+ , _capPrettyPrint :: !Bool

71+ , _capUserIP :: !(Maybe Text)

7272 , _capSponsorAccountId :: !Int32

73− , _capPayload :: !ClientAccessCapabilities

74− , _capKey :: !(Maybe Key)

75− , _capClientAccountId :: !Int64

76− , _capOAuthToken :: !(Maybe OAuthToken)

77− , _capFields :: !(Maybe Text)

73+ , _capPayload :: !ClientAccessCapabilities

74+ , _capKey :: !(Maybe Key)

75+ , _capClientAccountId :: !Int64

76+ , _capOAuthToken :: !(Maybe OAuthToken)

77+ , _capFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -103,7 +103,7 @@ clientAccessPatch'

103103 -> ClientAccessCapabilities -- ^ 'payload'

104104 -> Int64 -- ^ 'clientAccountId'

105105 -> ClientAccessPatch'

106−clientAccessPatch' pCapSponsorAccountId_ pCapPayload_ pCapClientAccountId_ =

106+clientAccessPatch' pCapSponsorAccountId_ pCapPayload_ pCapClientAccountId_ =

107107 ClientAccessPatch'

108108 { _capQuotaUser = Nothing

109109 , _capPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.ClientAccess.Update

4444 , cauFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerClientAccessUpdate@ which the

5151-- 'ClientAccessUpdate'' request conforms to.

@@ -66,15 +66,15 @@ type ClientAccessUpdateResource =

6666--

6767-- /See:/ 'clientAccessUpdate'' smart constructor.

6868data ClientAccessUpdate' = ClientAccessUpdate'

69− { _cauQuotaUser :: !(Maybe Text)

70− , _cauPrettyPrint :: !Bool

71− , _cauUserIP :: !(Maybe Text)

69+ { _cauQuotaUser :: !(Maybe Text)

70+ , _cauPrettyPrint :: !Bool

71+ , _cauUserIP :: !(Maybe Text)

7272 , _cauSponsorAccountId :: !Int32

73− , _cauPayload :: !ClientAccessCapabilities

74− , _cauKey :: !(Maybe Key)

75− , _cauClientAccountId :: !Int64

76− , _cauOAuthToken :: !(Maybe OAuthToken)

77− , _cauFields :: !(Maybe Text)

73+ , _cauPayload :: !ClientAccessCapabilities

74+ , _cauKey :: !(Maybe Key)

75+ , _cauClientAccountId :: !Int64

76+ , _cauOAuthToken :: !(Maybe OAuthToken)

77+ , _cauFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -103,7 +103,7 @@ clientAccessUpdate'

103103 -> ClientAccessCapabilities -- ^ 'payload'

104104 -> Int64 -- ^ 'clientAccountId'

105105 -> ClientAccessUpdate'

106−clientAccessUpdate' pCauSponsorAccountId_ pCauPayload_ pCauClientAccountId_ =

106+clientAccessUpdate' pCauSponsorAccountId_ pCauPayload_ pCauClientAccountId_ =

107107 ClientAccessUpdate'

108108 { _cauQuotaUser = Nothing

109109 , _cauPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.Creatives.Get

4444 , cgFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerCreativesGet@ which the

5151-- 'CreativesGet'' request conforms to.

@@ -66,14 +66,14 @@ type CreativesGetResource =

6666--

6767-- /See:/ 'creativesGet'' smart constructor.

6868data CreativesGet' = CreativesGet'

69− { _cgQuotaUser :: !(Maybe Text)

70− , _cgPrettyPrint :: !Bool

69+ { _cgQuotaUser :: !(Maybe Text)

70+ , _cgPrettyPrint :: !Bool

7171 , _cgBuyerCreativeId :: !Text

72− , _cgUserIP :: !(Maybe Text)

73− , _cgAccountId :: !Int32

74− , _cgKey :: !(Maybe Key)

75− , _cgOAuthToken :: !(Maybe OAuthToken)

76− , _cgFields :: !(Maybe Text)

72+ , _cgUserIP :: !(Maybe Text)

73+ , _cgAccountId :: !Int32

74+ , _cgKey :: !(Maybe Key)

75+ , _cgOAuthToken :: !(Maybe OAuthToken)

76+ , _cgFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ creativesGet'

9999 :: Text -- ^ 'buyerCreativeId'

100100 -> Int32 -- ^ 'accountId'

101101 -> CreativesGet'

102−creativesGet' pCgBuyerCreativeId_ pCgAccountId_ =

102+creativesGet' pCgBuyerCreativeId_ pCgAccountId_ =

103103 CreativesGet'

104104 { _cgQuotaUser = Nothing

105105 , _cgPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Creatives.Insert

4242 , ciFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerCreativesInsert@ which the

4949-- 'CreativesInsert'' request conforms to.

@@ -62,13 +62,13 @@ type CreativesInsertResource =

6262--

6363-- /See:/ 'creativesInsert'' smart constructor.

6464data CreativesInsert' = CreativesInsert'

65− { _ciQuotaUser :: !(Maybe Text)

65+ { _ciQuotaUser :: !(Maybe Text)

6666 , _ciPrettyPrint :: !Bool

67− , _ciUserIP :: !(Maybe Text)

68− , _ciPayload :: !Creative

69− , _ciKey :: !(Maybe Key)

70− , _ciOAuthToken :: !(Maybe OAuthToken)

71− , _ciFields :: !(Maybe Text)

67+ , _ciUserIP :: !(Maybe Text)

68+ , _ciPayload :: !Creative

69+ , _ciKey :: !(Maybe Key)

70+ , _ciOAuthToken :: !(Maybe OAuthToken)

71+ , _ciFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data CreativesInsert' = CreativesInsert'

9191creativesInsert'

9292 :: Creative -- ^ 'payload'

9393 -> CreativesInsert'

94−creativesInsert' pCiPayload_ =

94+creativesInsert' pCiPayload_ =

9595 CreativesInsert'

9696 { _ciQuotaUser = Nothing

9797 , _ciPrettyPrint = True

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

@@ -48,8 +48,8 @@ module Network.Google.Resource.AdExchangeBuyer.Creatives.List

4848 , clFields

4949 ) where

5050

51−import Network.Google.AdExchangeBuyer.Types

52−import Network.Google.Prelude

51+import Network.Google.AdExchangeBuyer.Types

52+import Network.Google.Prelude

5353

5454-- | A resource alias for @AdexchangebuyerCreativesList@ which the

5555-- 'CreativesList'' request conforms to.

@@ -79,18 +79,18 @@ type CreativesListResource =

7979--

8080-- /See:/ 'creativesList'' smart constructor.

8181data CreativesList' = CreativesList'

82− { _clQuotaUser :: !(Maybe Text)

83− , _clPrettyPrint :: !Bool

84− , _clBuyerCreativeId :: !(Maybe [Text])

85− , _clUserIP :: !(Maybe Text)

82+ { _clQuotaUser :: !(Maybe Text)

83+ , _clPrettyPrint :: !Bool

84+ , _clBuyerCreativeId :: !(Maybe [Text])

85+ , _clUserIP :: !(Maybe Text)

8686 , _clOpenAuctionStatusFilter :: !(Maybe CreativesListOpenAuctionStatusFilter)

87− , _clAccountId :: !(Maybe [Int32])

88− , _clKey :: !(Maybe Key)

89− , _clPageToken :: !(Maybe Text)

90− , _clDealsStatusFilter :: !(Maybe CreativesListDealsStatusFilter)

91− , _clOAuthToken :: !(Maybe OAuthToken)

92− , _clMaxResults :: !(Maybe Word32)

93− , _clFields :: !(Maybe Text)

87+ , _clAccountId :: !(Maybe [Int32])

88+ , _clKey :: !(Maybe Key)

89+ , _clPageToken :: !(Maybe Text)

90+ , _clDealsStatusFilter :: !(Maybe CreativesListDealsStatusFilter)

91+ , _clOAuthToken :: !(Maybe OAuthToken)

92+ , _clMaxResults :: !(Maybe Word32)

93+ , _clFields :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

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

@@ -122,7 +122,7 @@ data CreativesList' = CreativesList'

122122-- * 'clFields'

123123creativesList'

124124 :: CreativesList'

125−creativesList' =

125+creativesList' =

126126 CreativesList'

127127 { _clQuotaUser = Nothing

128128 , _clPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.Deals.Get

4343 , dgFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerDealsGet@ which the

5050-- 'DealsGet'' request conforms to.

@@ -66,14 +66,14 @@ type DealsGetResource =

6666--

6767-- /See:/ 'dealsGet'' smart constructor.

6868data DealsGet' = DealsGet'

69− { _dgQuotaUser :: !(Maybe Text)

69+ { _dgQuotaUser :: !(Maybe Text)

7070 , _dgPrettyPrint :: !Bool

71− , _dgUserIP :: !(Maybe Text)

72− , _dgPayload :: !GetFinalizedNegotiationByExternalDealIdRequest

73− , _dgDealId :: !Int64

74− , _dgKey :: !(Maybe Key)

75− , _dgOAuthToken :: !(Maybe OAuthToken)

76− , _dgFields :: !(Maybe Text)

71+ , _dgUserIP :: !(Maybe Text)

72+ , _dgPayload :: !GetFinalizedNegotiationByExternalDealIdRequest

73+ , _dgDealId :: !Int64

74+ , _dgKey :: !(Maybe Key)

75+ , _dgOAuthToken :: !(Maybe OAuthToken)

76+ , _dgFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ dealsGet'

9999 :: GetFinalizedNegotiationByExternalDealIdRequest -- ^ 'payload'

100100 -> Int64 -- ^ 'dealId'

101101 -> DealsGet'

102−dealsGet' pDgPayload_ pDgDealId_ =

102+dealsGet' pDgPayload_ pDgDealId_ =

103103 DealsGet'

104104 { _dgQuotaUser = Nothing

105105 , _dgPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Delete

4343 , mddFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerMarketplaceDealsDelete@ which the

5050-- 'MarketplaceDealsDelete'' request conforms to.

@@ -67,14 +67,14 @@ type MarketplaceDealsDeleteResource =

6767--

6868-- /See:/ 'marketplaceDealsDelete'' smart constructor.

6969data MarketplaceDealsDelete' = MarketplaceDealsDelete'

70− { _mddQuotaUser :: !(Maybe Text)

70+ { _mddQuotaUser :: !(Maybe Text)

7171 , _mddPrettyPrint :: !Bool

72− , _mddUserIP :: !(Maybe Text)

73− , _mddPayload :: !DeleteOrderDealsRequest

74− , _mddKey :: !(Maybe Key)

75− , _mddOAuthToken :: !(Maybe OAuthToken)

76− , _mddOrderId :: !Text

77− , _mddFields :: !(Maybe Text)

72+ , _mddUserIP :: !(Maybe Text)

73+ , _mddPayload :: !DeleteOrderDealsRequest

74+ , _mddKey :: !(Maybe Key)

75+ , _mddOAuthToken :: !(Maybe OAuthToken)

76+ , _mddOrderId :: !Text

77+ , _mddFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ marketplaceDealsDelete'

100100 :: DeleteOrderDealsRequest -- ^ 'payload'

101101 -> Text -- ^ 'orderId'

102102 -> MarketplaceDealsDelete'

103−marketplaceDealsDelete' pMddPayload_ pMddOrderId_ =

103+marketplaceDealsDelete' pMddPayload_ pMddOrderId_ =

104104 MarketplaceDealsDelete'

105105 { _mddQuotaUser = Nothing

106106 , _mddPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Insert

4343 , mdiFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerMarketplaceDealsInsert@ which the

5050-- 'MarketplaceDealsInsert'' request conforms to.

@@ -67,14 +67,14 @@ type MarketplaceDealsInsertResource =

6767--

6868-- /See:/ 'marketplaceDealsInsert'' smart constructor.

6969data MarketplaceDealsInsert' = MarketplaceDealsInsert'

70− { _mdiQuotaUser :: !(Maybe Text)

70+ { _mdiQuotaUser :: !(Maybe Text)

7171 , _mdiPrettyPrint :: !Bool

72− , _mdiUserIP :: !(Maybe Text)

73− , _mdiPayload :: !AddOrderDealsRequest

74− , _mdiKey :: !(Maybe Key)

75− , _mdiOAuthToken :: !(Maybe OAuthToken)

76− , _mdiOrderId :: !Text

77− , _mdiFields :: !(Maybe Text)

72+ , _mdiUserIP :: !(Maybe Text)

73+ , _mdiPayload :: !AddOrderDealsRequest

74+ , _mdiKey :: !(Maybe Key)

75+ , _mdiOAuthToken :: !(Maybe OAuthToken)

76+ , _mdiOrderId :: !Text

77+ , _mdiFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ marketplaceDealsInsert'

100100 :: AddOrderDealsRequest -- ^ 'payload'

101101 -> Text -- ^ 'orderId'

102102 -> MarketplaceDealsInsert'

103−marketplaceDealsInsert' pMdiPayload_ pMdiOrderId_ =

103+marketplaceDealsInsert' pMdiPayload_ pMdiOrderId_ =

104104 MarketplaceDealsInsert'

105105 { _mdiQuotaUser = Nothing

106106 , _mdiPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.List

4242 , mdlFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceDealsList@ which the

4949-- 'MarketplaceDealsList'' request conforms to.

@@ -64,13 +64,13 @@ type MarketplaceDealsListResource =

6464--

6565-- /See:/ 'marketplaceDealsList'' smart constructor.

6666data MarketplaceDealsList' = MarketplaceDealsList'

67− { _mdlQuotaUser :: !(Maybe Text)

67+ { _mdlQuotaUser :: !(Maybe Text)

6868 , _mdlPrettyPrint :: !Bool

69− , _mdlUserIP :: !(Maybe Text)

70− , _mdlKey :: !(Maybe Key)

71− , _mdlOAuthToken :: !(Maybe OAuthToken)

72− , _mdlOrderId :: !Text

73− , _mdlFields :: !(Maybe Text)

69+ , _mdlUserIP :: !(Maybe Text)

70+ , _mdlKey :: !(Maybe Key)

71+ , _mdlOAuthToken :: !(Maybe OAuthToken)

72+ , _mdlOrderId :: !Text

73+ , _mdlFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data MarketplaceDealsList' = MarketplaceDealsList'

9393marketplaceDealsList'

9494 :: Text -- ^ 'orderId'

9595 -> MarketplaceDealsList'

96−marketplaceDealsList' pMdlOrderId_ =

96+marketplaceDealsList' pMdlOrderId_ =

9797 MarketplaceDealsList'

9898 { _mdlQuotaUser = Nothing

9999 , _mdlPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceDeals.Update

4343 , mduFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerMarketplaceDealsUpdate@ which the

5050-- 'MarketplaceDealsUpdate'' request conforms to.

@@ -67,14 +67,14 @@ type MarketplaceDealsUpdateResource =

6767--

6868-- /See:/ 'marketplaceDealsUpdate'' smart constructor.

6969data MarketplaceDealsUpdate' = MarketplaceDealsUpdate'

70− { _mduQuotaUser :: !(Maybe Text)

70+ { _mduQuotaUser :: !(Maybe Text)

7171 , _mduPrettyPrint :: !Bool

72− , _mduUserIP :: !(Maybe Text)

73− , _mduPayload :: !EditAllOrderDealsRequest

74− , _mduKey :: !(Maybe Key)

75− , _mduOAuthToken :: !(Maybe OAuthToken)

76− , _mduOrderId :: !Text

77− , _mduFields :: !(Maybe Text)

72+ , _mduUserIP :: !(Maybe Text)

73+ , _mduPayload :: !EditAllOrderDealsRequest

74+ , _mduKey :: !(Maybe Key)

75+ , _mduOAuthToken :: !(Maybe OAuthToken)

76+ , _mduOrderId :: !Text

77+ , _mduFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ marketplaceDealsUpdate'

100100 :: EditAllOrderDealsRequest -- ^ 'payload'

101101 -> Text -- ^ 'orderId'

102102 -> MarketplaceDealsUpdate'

103−marketplaceDealsUpdate' pMduPayload_ pMduOrderId_ =

103+marketplaceDealsUpdate' pMduPayload_ pMduOrderId_ =

104104 MarketplaceDealsUpdate'

105105 { _mduQuotaUser = Nothing

106106 , _mduPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.Insert

4343 , mniFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerMarketplaceNotesInsert@ which the

5050-- 'MarketplaceNotesInsert'' request conforms to.

@@ -67,14 +67,14 @@ type MarketplaceNotesInsertResource =

6767--

6868-- /See:/ 'marketplaceNotesInsert'' smart constructor.

6969data MarketplaceNotesInsert' = MarketplaceNotesInsert'

70− { _mniQuotaUser :: !(Maybe Text)

70+ { _mniQuotaUser :: !(Maybe Text)

7171 , _mniPrettyPrint :: !Bool

72− , _mniUserIP :: !(Maybe Text)

73− , _mniPayload :: !AddOrderNotesRequest

74− , _mniKey :: !(Maybe Key)

75− , _mniOAuthToken :: !(Maybe OAuthToken)

76− , _mniOrderId :: !Text

77− , _mniFields :: !(Maybe Text)

72+ , _mniUserIP :: !(Maybe Text)

73+ , _mniPayload :: !AddOrderNotesRequest

74+ , _mniKey :: !(Maybe Key)

75+ , _mniOAuthToken :: !(Maybe OAuthToken)

76+ , _mniOrderId :: !Text

77+ , _mniFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ marketplaceNotesInsert'

100100 :: AddOrderNotesRequest -- ^ 'payload'

101101 -> Text -- ^ 'orderId'

102102 -> MarketplaceNotesInsert'

103−marketplaceNotesInsert' pMniPayload_ pMniOrderId_ =

103+marketplaceNotesInsert' pMniPayload_ pMniOrderId_ =

104104 MarketplaceNotesInsert'

105105 { _mniQuotaUser = Nothing

106106 , _mniPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceNotes.List

4242 , mnlFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceNotesList@ which the

4949-- 'MarketplaceNotesList'' request conforms to.

@@ -64,13 +64,13 @@ type MarketplaceNotesListResource =

6464--

6565-- /See:/ 'marketplaceNotesList'' smart constructor.

6666data MarketplaceNotesList' = MarketplaceNotesList'

67− { _mnlQuotaUser :: !(Maybe Text)

67+ { _mnlQuotaUser :: !(Maybe Text)

6868 , _mnlPrettyPrint :: !Bool

69− , _mnlUserIP :: !(Maybe Text)

70− , _mnlKey :: !(Maybe Key)

71− , _mnlOAuthToken :: !(Maybe OAuthToken)

72− , _mnlOrderId :: !Text

73− , _mnlFields :: !(Maybe Text)

69+ , _mnlUserIP :: !(Maybe Text)

70+ , _mnlKey :: !(Maybe Key)

71+ , _mnlOAuthToken :: !(Maybe OAuthToken)

72+ , _mnlOrderId :: !Text

73+ , _mnlFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data MarketplaceNotesList' = MarketplaceNotesList'

9393marketplaceNotesList'

9494 :: Text -- ^ 'orderId'

9595 -> MarketplaceNotesList'

96−marketplaceNotesList' pMnlOrderId_ =

96+marketplaceNotesList' pMnlOrderId_ =

9797 MarketplaceNotesList'

9898 { _mnlQuotaUser = Nothing

9999 , _mnlPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Get

4242 , mogFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceOffersGet@ which the

4949-- 'MarketplaceOffersGet'' request conforms to.

@@ -63,13 +63,13 @@ type MarketplaceOffersGetResource =

6363--

6464-- /See:/ 'marketplaceOffersGet'' smart constructor.

6565data MarketplaceOffersGet' = MarketplaceOffersGet'

66− { _mogQuotaUser :: !(Maybe Text)

66+ { _mogQuotaUser :: !(Maybe Text)

6767 , _mogPrettyPrint :: !Bool

68− , _mogUserIP :: !(Maybe Text)

69− , _mogKey :: !(Maybe Key)

70− , _mogOfferId :: !Text

71− , _mogOAuthToken :: !(Maybe OAuthToken)

72− , _mogFields :: !(Maybe Text)

68+ , _mogUserIP :: !(Maybe Text)

69+ , _mogKey :: !(Maybe Key)

70+ , _mogOfferId :: !Text

71+ , _mogOAuthToken :: !(Maybe OAuthToken)

72+ , _mogFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data MarketplaceOffersGet' = MarketplaceOffersGet'

9292marketplaceOffersGet'

9393 :: Text -- ^ 'offerId'

9494 -> MarketplaceOffersGet'

95−marketplaceOffersGet' pMogOfferId_ =

95+marketplaceOffersGet' pMogOfferId_ =

9696 MarketplaceOffersGet'

9797 { _mogQuotaUser = Nothing

9898 , _mogPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOffers.Search

4242 , mosFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceOffersSearch@ which the

4949-- 'MarketplaceOffersSearch'' request conforms to.

@@ -64,13 +64,13 @@ type MarketplaceOffersSearchResource =

6464--

6565-- /See:/ 'marketplaceOffersSearch'' smart constructor.

6666data MarketplaceOffersSearch' = MarketplaceOffersSearch'

67− { _mosQuotaUser :: !(Maybe Text)

67+ { _mosQuotaUser :: !(Maybe Text)

6868 , _mosPrettyPrint :: !Bool

69− , _mosUserIP :: !(Maybe Text)

70− , _mosKey :: !(Maybe Key)

71− , _mosPqlQuery :: !(Maybe Text)

72− , _mosOAuthToken :: !(Maybe OAuthToken)

73− , _mosFields :: !(Maybe Text)

69+ , _mosUserIP :: !(Maybe Text)

70+ , _mosKey :: !(Maybe Key)

71+ , _mosPqlQuery :: !(Maybe Text)

72+ , _mosOAuthToken :: !(Maybe OAuthToken)

73+ , _mosFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -92,7 +92,7 @@ data MarketplaceOffersSearch' = MarketplaceOffersSearch'

9292-- * 'mosFields'

9393marketplaceOffersSearch'

9494 :: MarketplaceOffersSearch'

95−marketplaceOffersSearch' =

95+marketplaceOffersSearch' =

9696 MarketplaceOffersSearch'

9797 { _mosQuotaUser = Nothing

9898 , _mosPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Get

4242 , mFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceOrdersGet@ which the

4949-- 'MarketplaceOrdersGet'' request conforms to.

@@ -63,13 +63,13 @@ type MarketplaceOrdersGetResource =

6363--

6464-- /See:/ 'marketplaceOrdersGet'' smart constructor.

6565data MarketplaceOrdersGet' = MarketplaceOrdersGet'

66− { _mQuotaUser :: !(Maybe Text)

66+ { _mQuotaUser :: !(Maybe Text)

6767 , _mPrettyPrint :: !Bool

68− , _mUserIP :: !(Maybe Text)

69− , _mKey :: !(Maybe Key)

70− , _mOAuthToken :: !(Maybe OAuthToken)

71− , _mOrderId :: !Text

72− , _mFields :: !(Maybe Text)

68+ , _mUserIP :: !(Maybe Text)

69+ , _mKey :: !(Maybe Key)

70+ , _mOAuthToken :: !(Maybe OAuthToken)

71+ , _mOrderId :: !Text

72+ , _mFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data MarketplaceOrdersGet' = MarketplaceOrdersGet'

9292marketplaceOrdersGet'

9393 :: Text -- ^ 'orderId'

9494 -> MarketplaceOrdersGet'

95−marketplaceOrdersGet' pMOrderId_ =

95+marketplaceOrdersGet' pMOrderId_ =

9696 MarketplaceOrdersGet'

9797 { _mQuotaUser = Nothing

9898 , _mPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Insert

4242 , moiFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceOrdersInsert@ which the

4949-- 'MarketplaceOrdersInsert'' request conforms to.

@@ -64,13 +64,13 @@ type MarketplaceOrdersInsertResource =

6464--

6565-- /See:/ 'marketplaceOrdersInsert'' smart constructor.

6666data MarketplaceOrdersInsert' = MarketplaceOrdersInsert'

67− { _moiQuotaUser :: !(Maybe Text)

67+ { _moiQuotaUser :: !(Maybe Text)

6868 , _moiPrettyPrint :: !Bool

69− , _moiUserIP :: !(Maybe Text)

70− , _moiPayload :: !CreateOrdersRequest

71− , _moiKey :: !(Maybe Key)

72− , _moiOAuthToken :: !(Maybe OAuthToken)

73− , _moiFields :: !(Maybe Text)

69+ , _moiUserIP :: !(Maybe Text)

70+ , _moiPayload :: !CreateOrdersRequest

71+ , _moiKey :: !(Maybe Key)

72+ , _moiOAuthToken :: !(Maybe OAuthToken)

73+ , _moiFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data MarketplaceOrdersInsert' = MarketplaceOrdersInsert'

9393marketplaceOrdersInsert'

9494 :: CreateOrdersRequest -- ^ 'payload'

9595 -> MarketplaceOrdersInsert'

96−marketplaceOrdersInsert' pMoiPayload_ =

96+marketplaceOrdersInsert' pMoiPayload_ =

9797 MarketplaceOrdersInsert'

9898 { _moiQuotaUser = Nothing

9999 , _moiPrettyPrint = True

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

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Patch

4545 , mopFields

4646 ) where

4747

48−import Network.Google.AdExchangeBuyer.Types

49−import Network.Google.Prelude

48+import Network.Google.AdExchangeBuyer.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdexchangebuyerMarketplaceOrdersPatch@ which the

5252-- 'MarketplaceOrdersPatch'' request conforms to.

@@ -71,16 +71,16 @@ type MarketplaceOrdersPatchResource =

7171--

7272-- /See:/ 'marketplaceOrdersPatch'' smart constructor.

7373data MarketplaceOrdersPatch' = MarketplaceOrdersPatch'

74− { _mopQuotaUser :: !(Maybe Text)

75− , _mopUpdateAction :: !MarketplaceOrdersPatchUpdateAction

76− , _mopPrettyPrint :: !Bool

77− , _mopUserIP :: !(Maybe Text)

74+ { _mopQuotaUser :: !(Maybe Text)

75+ , _mopUpdateAction :: !MarketplaceOrdersPatchUpdateAction

76+ , _mopPrettyPrint :: !Bool

77+ , _mopUserIP :: !(Maybe Text)

7878 , _mopRevisionNumber :: !Int64

79− , _mopPayload :: !MarketplaceOrder

80− , _mopKey :: !(Maybe Key)

81− , _mopOAuthToken :: !(Maybe OAuthToken)

82− , _mopOrderId :: !Text

83− , _mopFields :: !(Maybe Text)

79+ , _mopPayload :: !MarketplaceOrder

80+ , _mopKey :: !(Maybe Key)

81+ , _mopOAuthToken :: !(Maybe OAuthToken)

82+ , _mopOrderId :: !Text

83+ , _mopFields :: !(Maybe Text)

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

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

@@ -112,7 +112,7 @@ marketplaceOrdersPatch'

112112 -> MarketplaceOrder -- ^ 'payload'

113113 -> Text -- ^ 'orderId'

114114 -> MarketplaceOrdersPatch'

115−marketplaceOrdersPatch' pMopUpdateAction_ pMopRevisionNumber_ pMopPayload_ pMopOrderId_ =

115+marketplaceOrdersPatch' pMopUpdateAction_ pMopRevisionNumber_ pMopPayload_ pMopOrderId_ =

116116 MarketplaceOrdersPatch'

117117 { _mopQuotaUser = Nothing

118118 , _mopUpdateAction = pMopUpdateAction_

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Search

4242 , marFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerMarketplaceOrdersSearch@ which the

4949-- 'MarketplaceOrdersSearch'' request conforms to.

@@ -64,13 +64,13 @@ type MarketplaceOrdersSearchResource =

6464--

6565-- /See:/ 'marketplaceOrdersSearch'' smart constructor.

6666data MarketplaceOrdersSearch' = MarketplaceOrdersSearch'

67− { _marQuotaUser :: !(Maybe Text)

67+ { _marQuotaUser :: !(Maybe Text)

6868 , _marPrettyPrint :: !Bool

69− , _marUserIP :: !(Maybe Text)

70− , _marKey :: !(Maybe Key)

71− , _marPqlQuery :: !(Maybe Text)

72− , _marOAuthToken :: !(Maybe OAuthToken)

73− , _marFields :: !(Maybe Text)

69+ , _marUserIP :: !(Maybe Text)

70+ , _marKey :: !(Maybe Key)

71+ , _marPqlQuery :: !(Maybe Text)

72+ , _marOAuthToken :: !(Maybe OAuthToken)

73+ , _marFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -92,7 +92,7 @@ data MarketplaceOrdersSearch' = MarketplaceOrdersSearch'

9292-- * 'marFields'

9393marketplaceOrdersSearch'

9494 :: MarketplaceOrdersSearch'

95−marketplaceOrdersSearch' =

95+marketplaceOrdersSearch' =

9696 MarketplaceOrdersSearch'

9797 { _marQuotaUser = Nothing

9898 , _marPrettyPrint = True

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

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdExchangeBuyer.MarketplaceOrders.Update

4545 , mouFields

4646 ) where

4747

48−import Network.Google.AdExchangeBuyer.Types

49−import Network.Google.Prelude

48+import Network.Google.AdExchangeBuyer.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdexchangebuyerMarketplaceOrdersUpdate@ which the

5252-- 'MarketplaceOrdersUpdate'' request conforms to.

@@ -71,16 +71,16 @@ type MarketplaceOrdersUpdateResource =

7171--

7272-- /See:/ 'marketplaceOrdersUpdate'' smart constructor.

7373data MarketplaceOrdersUpdate' = MarketplaceOrdersUpdate'

74− { _mouQuotaUser :: !(Maybe Text)

75− , _mouUpdateAction :: !MarketplaceOrdersUpdateUpdateAction

76− , _mouPrettyPrint :: !Bool

77− , _mouUserIP :: !(Maybe Text)

74+ { _mouQuotaUser :: !(Maybe Text)

75+ , _mouUpdateAction :: !MarketplaceOrdersUpdateUpdateAction

76+ , _mouPrettyPrint :: !Bool

77+ , _mouUserIP :: !(Maybe Text)

7878 , _mouRevisionNumber :: !Int64

79− , _mouPayload :: !MarketplaceOrder

80− , _mouKey :: !(Maybe Key)

81− , _mouOAuthToken :: !(Maybe OAuthToken)

82− , _mouOrderId :: !Text

83− , _mouFields :: !(Maybe Text)

79+ , _mouPayload :: !MarketplaceOrder

80+ , _mouKey :: !(Maybe Key)

81+ , _mouOAuthToken :: !(Maybe OAuthToken)

82+ , _mouOrderId :: !Text

83+ , _mouFields :: !(Maybe Text)

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

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

@@ -112,7 +112,7 @@ marketplaceOrdersUpdate'

112112 -> MarketplaceOrder -- ^ 'payload'

113113 -> Text -- ^ 'orderId'

114114 -> MarketplaceOrdersUpdate'

115−marketplaceOrdersUpdate' pMouUpdateAction_ pMouRevisionNumber_ pMouPayload_ pMouOrderId_ =

115+marketplaceOrdersUpdate' pMouUpdateAction_ pMouRevisionNumber_ pMouPayload_ pMouOrderId_ =

116116 MarketplaceOrdersUpdate'

117117 { _mouQuotaUser = Nothing

118118 , _mouUpdateAction = pMouUpdateAction_

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.NegotiationRounds.Insert

4343 , nriFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerNegotiationRoundsInsert@ which the

5050-- 'NegotiationRoundsInsert'' request conforms to.

@@ -66,14 +66,14 @@ type NegotiationRoundsInsertResource =

6666--

6767-- /See:/ 'negotiationRoundsInsert'' smart constructor.

6868data NegotiationRoundsInsert' = NegotiationRoundsInsert'

69− { _nriQuotaUser :: !(Maybe Text)

70− , _nriPrettyPrint :: !Bool

71− , _nriUserIP :: !(Maybe Text)

72− , _nriPayload :: !NegotiationRoundDTO

73− , _nriKey :: !(Maybe Key)

74− , _nriOAuthToken :: !(Maybe OAuthToken)

69+ { _nriQuotaUser :: !(Maybe Text)

70+ , _nriPrettyPrint :: !Bool

71+ , _nriUserIP :: !(Maybe Text)

72+ , _nriPayload :: !NegotiationRoundDTO

73+ , _nriKey :: !(Maybe Key)

74+ , _nriOAuthToken :: !(Maybe OAuthToken)

7575 , _nriNegotiationId :: !Int64

76− , _nriFields :: !(Maybe Text)

76+ , _nriFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ negotiationRoundsInsert'

9999 :: NegotiationRoundDTO -- ^ 'payload'

100100 -> Int64 -- ^ 'negotiationId'

101101 -> NegotiationRoundsInsert'

102−negotiationRoundsInsert' pNriPayload_ pNriNegotiationId_ =

102+negotiationRoundsInsert' pNriPayload_ pNriNegotiationId_ =

103103 NegotiationRoundsInsert'

104104 { _nriQuotaUser = Nothing

105105 , _nriPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.Negotiations.Get

4343 , ngFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerNegotiationsGet@ which the

5050-- 'NegotiationsGet'' request conforms to.

@@ -65,14 +65,14 @@ type NegotiationsGetResource =

6565--

6666-- /See:/ 'negotiationsGet'' smart constructor.

6767data NegotiationsGet' = NegotiationsGet'

68− { _ngQuotaUser :: !(Maybe Text)

69− , _ngPrettyPrint :: !Bool

70− , _ngUserIP :: !(Maybe Text)

71− , _ngPayload :: !GetNegotiationByIdRequest

72− , _ngKey :: !(Maybe Key)

73− , _ngOAuthToken :: !(Maybe OAuthToken)

68+ { _ngQuotaUser :: !(Maybe Text)

69+ , _ngPrettyPrint :: !Bool

70+ , _ngUserIP :: !(Maybe Text)

71+ , _ngPayload :: !GetNegotiationByIdRequest

72+ , _ngKey :: !(Maybe Key)

73+ , _ngOAuthToken :: !(Maybe OAuthToken)

7474 , _ngNegotiationId :: !Int64

75− , _ngFields :: !(Maybe Text)

75+ , _ngFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ negotiationsGet'

9898 :: GetNegotiationByIdRequest -- ^ 'payload'

9999 -> Int64 -- ^ 'negotiationId'

100100 -> NegotiationsGet'

101−negotiationsGet' pNgPayload_ pNgNegotiationId_ =

101+negotiationsGet' pNgPayload_ pNgNegotiationId_ =

102102 NegotiationsGet'

103103 { _ngQuotaUser = Nothing

104104 , _ngPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Negotiations.Insert

4242 , niFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerNegotiationsInsert@ which the

4949-- 'NegotiationsInsert'' request conforms to.

@@ -63,13 +63,13 @@ type NegotiationsInsertResource =

6363--

6464-- /See:/ 'negotiationsInsert'' smart constructor.

6565data NegotiationsInsert' = NegotiationsInsert'

66− { _niQuotaUser :: !(Maybe Text)

66+ { _niQuotaUser :: !(Maybe Text)

6767 , _niPrettyPrint :: !Bool

68− , _niUserIP :: !(Maybe Text)

69− , _niPayload :: !NegotiationDTO

70− , _niKey :: !(Maybe Key)

71− , _niOAuthToken :: !(Maybe OAuthToken)

72− , _niFields :: !(Maybe Text)

68+ , _niUserIP :: !(Maybe Text)

69+ , _niPayload :: !NegotiationDTO

70+ , _niKey :: !(Maybe Key)

71+ , _niOAuthToken :: !(Maybe OAuthToken)

72+ , _niFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data NegotiationsInsert' = NegotiationsInsert'

9292negotiationsInsert'

9393 :: NegotiationDTO -- ^ 'payload'

9494 -> NegotiationsInsert'

95−negotiationsInsert' pNiPayload_ =

95+negotiationsInsert' pNiPayload_ =

9696 NegotiationsInsert'

9797 { _niQuotaUser = Nothing

9898 , _niPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Negotiations.List

4242 , nlFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerNegotiationsList@ which the

4949-- 'NegotiationsList'' request conforms to.

@@ -63,13 +63,13 @@ type NegotiationsListResource =

6363--

6464-- /See:/ 'negotiationsList'' smart constructor.

6565data NegotiationsList' = NegotiationsList'

66− { _nlQuotaUser :: !(Maybe Text)

66+ { _nlQuotaUser :: !(Maybe Text)

6767 , _nlPrettyPrint :: !Bool

68− , _nlUserIP :: !(Maybe Text)

69− , _nlPayload :: !GetNegotiationsRequest

70− , _nlKey :: !(Maybe Key)

71− , _nlOAuthToken :: !(Maybe OAuthToken)

72− , _nlFields :: !(Maybe Text)

68+ , _nlUserIP :: !(Maybe Text)

69+ , _nlPayload :: !GetNegotiationsRequest

70+ , _nlKey :: !(Maybe Key)

71+ , _nlOAuthToken :: !(Maybe OAuthToken)

72+ , _nlFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data NegotiationsList' = NegotiationsList'

9292negotiationsList'

9393 :: GetNegotiationsRequest -- ^ 'payload'

9494 -> NegotiationsList'

95−negotiationsList' pNlPayload_ =

95+negotiationsList' pNlPayload_ =

9696 NegotiationsList'

9797 { _nlQuotaUser = Nothing

9898 , _nlPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Offers.Get

4242 , ogFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerOffersGet@ which the

4949-- 'OffersGet'' request conforms to.

@@ -62,13 +62,13 @@ type OffersGetResource =

6262--

6363-- /See:/ 'offersGet'' smart constructor.

6464data OffersGet' = OffersGet'

65− { _ogQuotaUser :: !(Maybe Text)

65+ { _ogQuotaUser :: !(Maybe Text)

6666 , _ogPrettyPrint :: !Bool

67− , _ogUserIP :: !(Maybe Text)

68− , _ogKey :: !(Maybe Key)

69− , _ogOfferId :: !Int64

70− , _ogOAuthToken :: !(Maybe OAuthToken)

71− , _ogFields :: !(Maybe Text)

67+ , _ogUserIP :: !(Maybe Text)

68+ , _ogKey :: !(Maybe Key)

69+ , _ogOfferId :: !Int64

70+ , _ogOAuthToken :: !(Maybe OAuthToken)

71+ , _ogFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data OffersGet' = OffersGet'

9191offersGet'

9292 :: Int64 -- ^ 'offerId'

9393 -> OffersGet'

94−offersGet' pOgOfferId_ =

94+offersGet' pOgOfferId_ =

9595 OffersGet'

9696 { _ogQuotaUser = Nothing

9797 , _ogPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Offers.Insert

4242 , oiFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerOffersInsert@ which the

4949-- 'OffersInsert'' request conforms to.

@@ -62,13 +62,13 @@ type OffersInsertResource =

6262--

6363-- /See:/ 'offersInsert'' smart constructor.

6464data OffersInsert' = OffersInsert'

65− { _oiQuotaUser :: !(Maybe Text)

65+ { _oiQuotaUser :: !(Maybe Text)

6666 , _oiPrettyPrint :: !Bool

67− , _oiUserIP :: !(Maybe Text)

68− , _oiPayload :: !OfferDTO

69− , _oiKey :: !(Maybe Key)

70− , _oiOAuthToken :: !(Maybe OAuthToken)

71− , _oiFields :: !(Maybe Text)

67+ , _oiUserIP :: !(Maybe Text)

68+ , _oiPayload :: !OfferDTO

69+ , _oiKey :: !(Maybe Key)

70+ , _oiOAuthToken :: !(Maybe OAuthToken)

71+ , _oiFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data OffersInsert' = OffersInsert'

9191offersInsert'

9292 :: OfferDTO -- ^ 'payload'

9393 -> OffersInsert'

94−offersInsert' pOiPayload_ =

94+offersInsert' pOiPayload_ =

9595 OffersInsert'

9696 { _oiQuotaUser = Nothing

9797 , _oiPrettyPrint = True

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

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdExchangeBuyer.Offers.List

4242 , olFields

4343 ) where

4444

45−import Network.Google.AdExchangeBuyer.Types

46−import Network.Google.Prelude

45+import Network.Google.AdExchangeBuyer.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdexchangebuyerOffersList@ which the

4949-- 'OffersList'' request conforms to.

@@ -63,13 +63,13 @@ type OffersListResource =

6363--

6464-- /See:/ 'offersList'' smart constructor.

6565data OffersList' = OffersList'

66− { _olQuotaUser :: !(Maybe Text)

66+ { _olQuotaUser :: !(Maybe Text)

6767 , _olPrettyPrint :: !Bool

68− , _olUserIP :: !(Maybe Text)

69− , _olPayload :: !ListOffersRequest

70− , _olKey :: !(Maybe Key)

71− , _olOAuthToken :: !(Maybe OAuthToken)

72− , _olFields :: !(Maybe Text)

68+ , _olUserIP :: !(Maybe Text)

69+ , _olPayload :: !ListOffersRequest

70+ , _olKey :: !(Maybe Key)

71+ , _olOAuthToken :: !(Maybe OAuthToken)

72+ , _olFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data OffersList' = OffersList'

9292offersList'

9393 :: ListOffersRequest -- ^ 'payload'

9494 -> OffersList'

95−offersList' pOlPayload_ =

95+offersList' pOlPayload_ =

9696 OffersList'

9797 { _olQuotaUser = Nothing

9898 , _olPrettyPrint = True

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

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdExchangeBuyer.PerformanceReport.List

4646 , prlFields

4747 ) where

4848

49−import Network.Google.AdExchangeBuyer.Types

50−import Network.Google.Prelude

49+import Network.Google.AdExchangeBuyer.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdexchangebuyerPerformanceReportList@ which the

5353-- 'PerformanceReportList'' request conforms to.

@@ -71,17 +71,17 @@ type PerformanceReportListResource =

7171--

7272-- /See:/ 'performanceReportList'' smart constructor.

7373data PerformanceReportList' = PerformanceReportList'

74− { _prlQuotaUser :: !(Maybe Text)

75− , _prlPrettyPrint :: !Bool

76− , _prlUserIP :: !(Maybe Text)

77− , _prlAccountId :: !Int64

78− , _prlKey :: !(Maybe Key)

79− , _prlPageToken :: !(Maybe Text)

80− , _prlOAuthToken :: !(Maybe OAuthToken)

81− , _prlEndDateTime :: !Text

82− , _prlMaxResults :: !(Maybe Word32)

74+ { _prlQuotaUser :: !(Maybe Text)

75+ , _prlPrettyPrint :: !Bool

76+ , _prlUserIP :: !(Maybe Text)

77+ , _prlAccountId :: !Int64

78+ , _prlKey :: !(Maybe Key)

79+ , _prlPageToken :: !(Maybe Text)

80+ , _prlOAuthToken :: !(Maybe OAuthToken)

81+ , _prlEndDateTime :: !Text

82+ , _prlMaxResults :: !(Maybe Word32)

8383 , _prlStartDateTime :: !Text

84− , _prlFields :: !(Maybe Text)

84+ , _prlFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -114,7 +114,7 @@ performanceReportList'

114114 -> Text -- ^ 'endDateTime'

115115 -> Text -- ^ 'startDateTime'

116116 -> PerformanceReportList'

117−performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =

117+performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =

118118 PerformanceReportList'

119119 { _prlQuotaUser = Nothing

120120 , _prlPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Delete

4343 , pcdFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerPretargetingConfigDelete@ which the

5050-- 'PretargetingConfigDelete'' request conforms to.

@@ -64,14 +64,14 @@ type PretargetingConfigDeleteResource =

6464--

6565-- /See:/ 'pretargetingConfigDelete'' smart constructor.

6666data PretargetingConfigDelete' = PretargetingConfigDelete'

67− { _pcdQuotaUser :: !(Maybe Text)

67+ { _pcdQuotaUser :: !(Maybe Text)

6868 , _pcdPrettyPrint :: !Bool

69− , _pcdUserIP :: !(Maybe Text)

70− , _pcdAccountId :: !Int64

71− , _pcdKey :: !(Maybe Key)

72− , _pcdConfigId :: !Int64

73− , _pcdOAuthToken :: !(Maybe OAuthToken)

74− , _pcdFields :: !(Maybe Text)

69+ , _pcdUserIP :: !(Maybe Text)

70+ , _pcdAccountId :: !Int64

71+ , _pcdKey :: !(Maybe Key)

72+ , _pcdConfigId :: !Int64

73+ , _pcdOAuthToken :: !(Maybe OAuthToken)

74+ , _pcdFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -97,7 +97,7 @@ pretargetingConfigDelete'

9797 :: Int64 -- ^ 'accountId'

9898 -> Int64 -- ^ 'configId'

9999 -> PretargetingConfigDelete'

100−pretargetingConfigDelete' pPcdAccountId_ pPcdConfigId_ =

100+pretargetingConfigDelete' pPcdAccountId_ pPcdConfigId_ =

101101 PretargetingConfigDelete'

102102 { _pcdQuotaUser = Nothing

103103 , _pcdPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Get

4343 , pcgFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerPretargetingConfigGet@ which the

5050-- 'PretargetingConfigGet'' request conforms to.

@@ -65,14 +65,14 @@ type PretargetingConfigGetResource =

6565--

6666-- /See:/ 'pretargetingConfigGet'' smart constructor.

6767data PretargetingConfigGet' = PretargetingConfigGet'

68− { _pcgQuotaUser :: !(Maybe Text)

68+ { _pcgQuotaUser :: !(Maybe Text)

6969 , _pcgPrettyPrint :: !Bool

70− , _pcgUserIP :: !(Maybe Text)

71− , _pcgAccountId :: !Int64

72− , _pcgKey :: !(Maybe Key)

73− , _pcgConfigId :: !Int64

74− , _pcgOAuthToken :: !(Maybe OAuthToken)

75− , _pcgFields :: !(Maybe Text)

70+ , _pcgUserIP :: !(Maybe Text)

71+ , _pcgAccountId :: !Int64

72+ , _pcgKey :: !(Maybe Key)

73+ , _pcgConfigId :: !Int64

74+ , _pcgOAuthToken :: !(Maybe OAuthToken)

75+ , _pcgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ pretargetingConfigGet'

9898 :: Int64 -- ^ 'accountId'

9999 -> Int64 -- ^ 'configId'

100100 -> PretargetingConfigGet'

101−pretargetingConfigGet' pPcgAccountId_ pPcgConfigId_ =

101+pretargetingConfigGet' pPcgAccountId_ pPcgConfigId_ =

102102 PretargetingConfigGet'

103103 { _pcgQuotaUser = Nothing

104104 , _pcgPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Insert

4343 , pciFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerPretargetingConfigInsert@ which the

5050-- 'PretargetingConfigInsert'' request conforms to.

@@ -65,14 +65,14 @@ type PretargetingConfigInsertResource =

6565--

6666-- /See:/ 'pretargetingConfigInsert'' smart constructor.

6767data PretargetingConfigInsert' = PretargetingConfigInsert'

68− { _pciQuotaUser :: !(Maybe Text)

68+ { _pciQuotaUser :: !(Maybe Text)

6969 , _pciPrettyPrint :: !Bool

70− , _pciUserIP :: !(Maybe Text)

71− , _pciPayload :: !PretargetingConfig

72− , _pciAccountId :: !Int64

73− , _pciKey :: !(Maybe Key)

74− , _pciOAuthToken :: !(Maybe OAuthToken)

75− , _pciFields :: !(Maybe Text)

70+ , _pciUserIP :: !(Maybe Text)

71+ , _pciPayload :: !PretargetingConfig

72+ , _pciAccountId :: !Int64

73+ , _pciKey :: !(Maybe Key)

74+ , _pciOAuthToken :: !(Maybe OAuthToken)

75+ , _pciFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ pretargetingConfigInsert'

9898 :: PretargetingConfig -- ^ 'payload'

9999 -> Int64 -- ^ 'accountId'

100100 -> PretargetingConfigInsert'

101−pretargetingConfigInsert' pPciPayload_ pPciAccountId_ =

101+pretargetingConfigInsert' pPciPayload_ pPciAccountId_ =

102102 PretargetingConfigInsert'

103103 { _pciQuotaUser = Nothing

104104 , _pciPrettyPrint = True

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

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.List

4343 , pclFields

4444 ) where

4545

46−import Network.Google.AdExchangeBuyer.Types

47−import Network.Google.Prelude

46+import Network.Google.AdExchangeBuyer.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdexchangebuyerPretargetingConfigList@ which the

5050-- 'PretargetingConfigList'' request conforms to.

@@ -65,13 +65,13 @@ type PretargetingConfigListResource =

6565--

6666-- /See:/ 'pretargetingConfigList'' smart constructor.

6767data PretargetingConfigList' = PretargetingConfigList'

68− { _pclQuotaUser :: !(Maybe Text)

68+ { _pclQuotaUser :: !(Maybe Text)

6969 , _pclPrettyPrint :: !Bool

70− , _pclUserIP :: !(Maybe Text)

71− , _pclAccountId :: !Int64

72− , _pclKey :: !(Maybe Key)

73− , _pclOAuthToken :: !(Maybe OAuthToken)

74− , _pclFields :: !(Maybe Text)

70+ , _pclUserIP :: !(Maybe Text)

71+ , _pclAccountId :: !Int64

72+ , _pclKey :: !(Maybe Key)

73+ , _pclOAuthToken :: !(Maybe OAuthToken)

74+ , _pclFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -94,7 +94,7 @@ data PretargetingConfigList' = PretargetingConfigList'

9494pretargetingConfigList'

9595 :: Int64 -- ^ 'accountId'

9696 -> PretargetingConfigList'

97−pretargetingConfigList' pPclAccountId_ =

97+pretargetingConfigList' pPclAccountId_ =

9898 PretargetingConfigList'

9999 { _pclQuotaUser = Nothing

100100 , _pclPrettyPrint = True

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

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Patch

4545 , pcpFields

4646 ) where

4747

48−import Network.Google.AdExchangeBuyer.Types

49−import Network.Google.Prelude

48+import Network.Google.AdExchangeBuyer.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdexchangebuyerPretargetingConfigPatch@ which the

5252-- 'PretargetingConfigPatch'' request conforms to.

@@ -69,15 +69,15 @@ type PretargetingConfigPatchResource =

6969--

7070-- /See:/ 'pretargetingConfigPatch'' smart constructor.

7171data PretargetingConfigPatch' = PretargetingConfigPatch'

72− { _pcpQuotaUser :: !(Maybe Text)

72+ { _pcpQuotaUser :: !(Maybe Text)

7373 , _pcpPrettyPrint :: !Bool

74− , _pcpUserIP :: !(Maybe Text)

75− , _pcpPayload :: !PretargetingConfig

76− , _pcpAccountId :: !Int64

77− , _pcpKey :: !(Maybe Key)

78− , _pcpConfigId :: !Int64

79− , _pcpOAuthToken :: !(Maybe OAuthToken)

80− , _pcpFields :: !(Maybe Text)

74+ , _pcpUserIP :: !(Maybe Text)

75+ , _pcpPayload :: !PretargetingConfig

76+ , _pcpAccountId :: !Int64

77+ , _pcpKey :: !(Maybe Key)

78+ , _pcpConfigId :: !Int64

79+ , _pcpOAuthToken :: !(Maybe OAuthToken)

80+ , _pcpFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ pretargetingConfigPatch'

106106 -> Int64 -- ^ 'accountId'

107107 -> Int64 -- ^ 'configId'

108108 -> PretargetingConfigPatch'

109−pretargetingConfigPatch' pPcpPayload_ pPcpAccountId_ pPcpConfigId_ =

109+pretargetingConfigPatch' pPcpPayload_ pPcpAccountId_ pPcpConfigId_ =

110110 PretargetingConfigPatch'

111111 { _pcpQuotaUser = Nothing

112112 , _pcpPrettyPrint = True

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdExchangeBuyer.PretargetingConfig.Update

4444 , pcuFields

4545 ) where

4646

47−import Network.Google.AdExchangeBuyer.Types

48−import Network.Google.Prelude

47+import Network.Google.AdExchangeBuyer.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdexchangebuyerPretargetingConfigUpdate@ which the

5151-- 'PretargetingConfigUpdate'' request conforms to.

@@ -67,15 +67,15 @@ type PretargetingConfigUpdateResource =

6767--

6868-- /See:/ 'pretargetingConfigUpdate'' smart constructor.

6969data PretargetingConfigUpdate' = PretargetingConfigUpdate'

70− { _pcuQuotaUser :: !(Maybe Text)

70+ { _pcuQuotaUser :: !(Maybe Text)

7171 , _pcuPrettyPrint :: !Bool

72− , _pcuUserIP :: !(Maybe Text)

73− , _pcuPayload :: !PretargetingConfig

74− , _pcuAccountId :: !Int64

75− , _pcuKey :: !(Maybe Key)

76− , _pcuConfigId :: !Int64

77− , _pcuOAuthToken :: !(Maybe OAuthToken)

78− , _pcuFields :: !(Maybe Text)

72+ , _pcuUserIP :: !(Maybe Text)

73+ , _pcuPayload :: !PretargetingConfig

74+ , _pcuAccountId :: !Int64

75+ , _pcuKey :: !(Maybe Key)

76+ , _pcuConfigId :: !Int64

77+ , _pcuOAuthToken :: !(Maybe OAuthToken)

78+ , _pcuFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ pretargetingConfigUpdate'

104104 -> Int64 -- ^ 'accountId'

105105 -> Int64 -- ^ 'configId'

106106 -> PretargetingConfigUpdate'

107−pretargetingConfigUpdate' pPcuPayload_ pPcuAccountId_ pPcuConfigId_ =

107+pretargetingConfigUpdate' pPcuPayload_ pPcuAccountId_ pPcuConfigId_ =

108108 PretargetingConfigUpdate'

109109 { _pcuQuotaUser = Nothing

110110 , _pcuPrettyPrint = True

gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+3−3

@@ -1517,7 +1517,7 @@ instance FromJSON UserCustomSchemas where

15171517 (\ o -> pure UserCustomSchemas)

15181518

15191519instance ToJSON UserCustomSchemas where

1520− toJSON = const (Object mempty)

1520+ toJSON = const emptyObject

15211521

15221522-- | JSON response template to list aliases in Directory API.

15231523--

@@ -2964,7 +2964,7 @@ instance FromJSON ChannelParams where

29642964 (\ o -> pure ChannelParams)

29652965

29662966instance ToJSON ChannelParams where

2967− toJSON = const (Object mempty)

2967+ toJSON = const emptyObject

29682968

29692969-- | JSON template for an organization entry.

29702970--

@@ -3976,7 +3976,7 @@ instance FromJSON UserCustomProperties where

39763976 (\ o -> pure UserCustomProperties)

39773977

39783978instance ToJSON UserCustomProperties where

3979− toJSON = const (Object mempty)

3979+ toJSON = const emptyObject

39803980

39813981-- | Template for notifications list response.

39823982--

gogol-admin-emailmigration/gen/Network/Google/EmailMigration.hs+3−3

@@ -46,9 +46,9 @@ module Network.Google.EmailMigration

4646 , miIsSent

4747 ) where

4848

49−import Network.Google.EmailMigration.Types

50−import Network.Google.Prelude

51−import Network.Google.Resource.EmailMigration.Mail.Insert

49+import Network.Google.Prelude

50+import Network.Google.EmailMigration.Types

51+import Network.Google.Resource.EmailMigration.Mail.Insert

5252

5353{- $resources

5454TODO

gogol-admin-emailmigration/gen/Network/Google/EmailMigration/Types.hs+3−3

@@ -32,9 +32,9 @@ module Network.Google.EmailMigration.Types

3232 , miIsSent

3333 ) where

3434

35−import Network.Google.EmailMigration.Types.Product

36−import Network.Google.EmailMigration.Types.Sum

37−import Network.Google.Prelude

35+import Network.Google.EmailMigration.Types.Product

36+import Network.Google.EmailMigration.Types.Sum

37+import Network.Google.Prelude

3838

3939-- | URL referring to version 'email_migration_v2' of the Email Migration API v2.

4040emailMigrationURL :: BaseUrl

gogol-admin-emailmigration/gen/Network/Google/EmailMigration/Types/Product.hs+10−10

@@ -17,22 +17,22 @@

1717--

1818module Network.Google.EmailMigration.Types.Product where

1919

20−import Network.Google.EmailMigration.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.EmailMigration.Types.Sum

21+import Network.Google.Prelude

2222

2323-- | JSON template for MailItem object in Email Migration API.

2424--

2525-- /See:/ 'mailItem' smart constructor.

2626data MailItem = MailItem

2727 { _miIsDeleted :: !(Maybe Bool)

28− , _miIsDraft :: !(Maybe Bool)

28+ , _miIsDraft :: !(Maybe Bool)

2929 , _miIsStarred :: !(Maybe Bool)

30− , _miKind :: !Text

31− , _miIsUnread :: !(Maybe Bool)

32− , _miLabels :: !(Maybe [Text])

33− , _miIsInbox :: !(Maybe Bool)

34− , _miIsTrash :: !(Maybe Bool)

35− , _miIsSent :: !(Maybe Bool)

30+ , _miKind :: !Text

31+ , _miIsUnread :: !(Maybe Bool)

32+ , _miLabels :: !(Maybe [Text])

33+ , _miIsInbox :: !(Maybe Bool)

34+ , _miIsTrash :: !(Maybe Bool)

35+ , _miIsSent :: !(Maybe Bool)

3636 } deriving (Eq,Show,Data,Typeable,Generic)

3737

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

@@ -58,7 +58,7 @@ data MailItem = MailItem

5858-- * 'miIsSent'

5959mailItem

6060 :: MailItem

61−mailItem =

61+mailItem =

6262 MailItem

6363 { _miIsDeleted = Nothing

6464 , _miIsDraft = Nothing

gogol-admin-emailmigration/gen/Network/Google/EmailMigration/Types/Sum.hs+1−1

@@ -16,4 +16,4 @@

1616--

1717module Network.Google.EmailMigration.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

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

@@ -44,8 +44,8 @@ module Network.Google.Resource.EmailMigration.Mail.Insert

4444 , miFields

4545 ) where

4646

47−import Network.Google.EmailMigration.Types

48−import Network.Google.Prelude

47+import Network.Google.EmailMigration.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @EmailMigrationMailInsert@ which the

5151-- 'MailInsert'' request conforms to.

@@ -66,15 +66,15 @@ type MailInsertResource =

6666--

6767-- /See:/ 'mailInsert'' smart constructor.

6868data MailInsert' = MailInsert'

69− { _miQuotaUser :: !(Maybe Text)

69+ { _miQuotaUser :: !(Maybe Text)

7070 , _miPrettyPrint :: !Bool

71− , _miUserIP :: !(Maybe Text)

72− , _miPayload :: !MailItem

73− , _miMedia :: !Body

74− , _miKey :: !(Maybe Key)

75− , _miOAuthToken :: !(Maybe OAuthToken)

76− , _miUserKey :: !Text

77− , _miFields :: !(Maybe Text)

71+ , _miUserIP :: !(Maybe Text)

72+ , _miPayload :: !MailItem

73+ , _miMedia :: !Body

74+ , _miKey :: !(Maybe Key)

75+ , _miOAuthToken :: !(Maybe OAuthToken)

76+ , _miUserKey :: !Text

77+ , _miFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -103,7 +103,7 @@ mailInsert'

103103 -> Body -- ^ 'media'

104104 -> Text -- ^ 'userKey'

105105 -> MailInsert'

106−mailInsert' pMiPayload_ pMiMedia_ pMiUserKey_ =

106+mailInsert' pMiPayload_ pMiMedia_ pMiUserKey_ =

107107 MailInsert'

108108 { _miQuotaUser = Nothing

109109 , _miPrettyPrint = True

gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+2−2

@@ -291,7 +291,7 @@ instance FromJSON

291291

292292instance ToJSON UsageReportParametersItemMsgValueItem

293293 where

294− toJSON = const (Object mempty)

294+ toJSON = const emptyObject

295295

296296-- | JSON template for a collection of activites.

297297--

@@ -755,7 +755,7 @@ instance FromJSON ChannelParams where

755755 (\ o -> pure ChannelParams)

756756

757757instance ToJSON ChannelParams where

758− toJSON = const (Object mempty)

758+ toJSON = const emptyObject

759759

760760-- | JSON template for the activity resource.

761761--

gogol-adsense/gen/Network/Google/AdSense.hs+40−40

@@ -401,46 +401,46 @@ module Network.Google.AdSense

401401 , payItems

402402 ) where

403403

404−import Network.Google.AdSense.Types

405−import Network.Google.Prelude

406−import Network.Google.Resource.AdSense.Accounts.AdClients.List

407−import Network.Google.Resource.AdSense.Accounts.AdUnits.CustomChannels.List

408−import Network.Google.Resource.AdSense.Accounts.AdUnits.Get

409−import Network.Google.Resource.AdSense.Accounts.AdUnits.GetAdCode

410−import Network.Google.Resource.AdSense.Accounts.AdUnits.List

411−import Network.Google.Resource.AdSense.Accounts.Alerts.Delete

412−import Network.Google.Resource.AdSense.Accounts.Alerts.List

413−import Network.Google.Resource.AdSense.Accounts.CustomChannels.AdUnits.List

414−import Network.Google.Resource.AdSense.Accounts.CustomChannels.Get

415−import Network.Google.Resource.AdSense.Accounts.CustomChannels.List

416−import Network.Google.Resource.AdSense.Accounts.Get

417−import Network.Google.Resource.AdSense.Accounts.List

418−import Network.Google.Resource.AdSense.Accounts.Payments.List

419−import Network.Google.Resource.AdSense.Accounts.Reports.Generate

420−import Network.Google.Resource.AdSense.Accounts.Reports.Saved.Generate

421−import Network.Google.Resource.AdSense.Accounts.Reports.Saved.List

422−import Network.Google.Resource.AdSense.Accounts.Savedadstyles.Get

423−import Network.Google.Resource.AdSense.Accounts.Savedadstyles.List

424−import Network.Google.Resource.AdSense.Accounts.URLChannels.List

425−import Network.Google.Resource.AdSense.AdClients.List

426−import Network.Google.Resource.AdSense.AdUnits.CustomChannels.List

427−import Network.Google.Resource.AdSense.AdUnits.Get

428−import Network.Google.Resource.AdSense.AdUnits.GetAdCode

429−import Network.Google.Resource.AdSense.AdUnits.List

430−import Network.Google.Resource.AdSense.Alerts.Delete

431−import Network.Google.Resource.AdSense.Alerts.List

432−import Network.Google.Resource.AdSense.CustomChannels.AdUnits.List

433−import Network.Google.Resource.AdSense.CustomChannels.Get

434−import Network.Google.Resource.AdSense.CustomChannels.List

435−import Network.Google.Resource.AdSense.Metadata.Dimensions.List

436−import Network.Google.Resource.AdSense.Metadata.Metrics.List

437−import Network.Google.Resource.AdSense.Payments.List

438−import Network.Google.Resource.AdSense.Reports.Generate

439−import Network.Google.Resource.AdSense.Reports.Saved.Generate

440−import Network.Google.Resource.AdSense.Reports.Saved.List

441−import Network.Google.Resource.AdSense.Savedadstyles.Get

442−import Network.Google.Resource.AdSense.Savedadstyles.List

443−import Network.Google.Resource.AdSense.URLChannels.List

404+import Network.Google.Prelude

405+import Network.Google.AdSense.Types

406+import Network.Google.Resource.AdSense.Accounts.AdClients.List

407+import Network.Google.Resource.AdSense.Accounts.AdUnits.CustomChannels.List

408+import Network.Google.Resource.AdSense.Accounts.AdUnits.Get

409+import Network.Google.Resource.AdSense.Accounts.AdUnits.GetAdCode

410+import Network.Google.Resource.AdSense.Accounts.AdUnits.List

411+import Network.Google.Resource.AdSense.Accounts.Alerts.Delete

412+import Network.Google.Resource.AdSense.Accounts.Alerts.List

413+import Network.Google.Resource.AdSense.Accounts.CustomChannels.AdUnits.List

414+import Network.Google.Resource.AdSense.Accounts.CustomChannels.Get

415+import Network.Google.Resource.AdSense.Accounts.CustomChannels.List

416+import Network.Google.Resource.AdSense.Accounts.Get

417+import Network.Google.Resource.AdSense.Accounts.List

418+import Network.Google.Resource.AdSense.Accounts.Payments.List

419+import Network.Google.Resource.AdSense.Accounts.Reports.Generate

420+import Network.Google.Resource.AdSense.Accounts.Reports.Saved.Generate

421+import Network.Google.Resource.AdSense.Accounts.Reports.Saved.List

422+import Network.Google.Resource.AdSense.Accounts.Savedadstyles.Get

423+import Network.Google.Resource.AdSense.Accounts.Savedadstyles.List

424+import Network.Google.Resource.AdSense.Accounts.URLChannels.List

425+import Network.Google.Resource.AdSense.AdClients.List

426+import Network.Google.Resource.AdSense.AdUnits.CustomChannels.List

427+import Network.Google.Resource.AdSense.AdUnits.Get

428+import Network.Google.Resource.AdSense.AdUnits.GetAdCode

429+import Network.Google.Resource.AdSense.AdUnits.List

430+import Network.Google.Resource.AdSense.Alerts.Delete

431+import Network.Google.Resource.AdSense.Alerts.List

432+import Network.Google.Resource.AdSense.CustomChannels.AdUnits.List

433+import Network.Google.Resource.AdSense.CustomChannels.Get

434+import Network.Google.Resource.AdSense.CustomChannels.List

435+import Network.Google.Resource.AdSense.Metadata.Dimensions.List

436+import Network.Google.Resource.AdSense.Metadata.Metrics.List

437+import Network.Google.Resource.AdSense.Payments.List

438+import Network.Google.Resource.AdSense.Reports.Generate

439+import Network.Google.Resource.AdSense.Reports.Saved.Generate

440+import Network.Google.Resource.AdSense.Reports.Saved.List

441+import Network.Google.Resource.AdSense.Savedadstyles.Get

442+import Network.Google.Resource.AdSense.Savedadstyles.List

443+import Network.Google.Resource.AdSense.URLChannels.List

444444

445445{- $resources

446446TODO

gogol-adsense/gen/Network/Google/AdSense/Types.hs+3−3

@@ -275,9 +275,9 @@ module Network.Google.AdSense.Types

275275 , payItems

276276 ) where

277277

278−import Network.Google.AdSense.Types.Product

279−import Network.Google.AdSense.Types.Sum

280−import Network.Google.Prelude

278+import Network.Google.AdSense.Types.Product

279+import Network.Google.AdSense.Types.Sum

280+import Network.Google.Prelude

281281

282282-- | URL referring to version 'v1.4' of the AdSense Management API.

283283adSenseURL :: BaseUrl

gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+133−133

@@ -17,16 +17,16 @@

1717--

1818module Network.Google.AdSense.Types.Product where

1919

20−import Network.Google.AdSense.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.AdSense.Types.Sum

21+import Network.Google.Prelude

2222

2323--

2424-- /See:/ 'adClients' smart constructor.

2525data AdClients = AdClients

26− { _acEtag :: !(Maybe Text)

26+ { _acEtag :: !(Maybe Text)

2727 , _acNextPageToken :: !(Maybe Text)

28− , _acKind :: !Text

29− , _acItems :: !(Maybe [AdClient])

28+ , _acKind :: !Text

29+ , _acItems :: !(Maybe [AdClient])

3030 } deriving (Eq,Show,Data,Typeable,Generic)

3131

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

@@ -42,7 +42,7 @@ data AdClients = AdClients

4242-- * 'acItems'

4343adClients

4444 :: AdClients

45−adClients =

45+adClients =

4646 AdClients

4747 { _acEtag = Nothing

4848 , _acNextPageToken = Nothing

@@ -91,13 +91,13 @@ instance ToJSON AdClients where

9191--

9292-- /See:/ 'reportingMetadataEntry' smart constructor.

9393data ReportingMetadataEntry = ReportingMetadataEntry

94− { _rmeKind :: !Text

95− , _rmeRequiredMetrics :: !(Maybe [Text])

96− , _rmeCompatibleMetrics :: !(Maybe [Text])

97− , _rmeRequiredDimensions :: !(Maybe [Text])

98− , _rmeId :: !(Maybe Text)

94+ { _rmeKind :: !Text

95+ , _rmeRequiredMetrics :: !(Maybe [Text])

96+ , _rmeCompatibleMetrics :: !(Maybe [Text])

97+ , _rmeRequiredDimensions :: !(Maybe [Text])

98+ , _rmeId :: !(Maybe Text)

9999 , _rmeCompatibleDimensions :: !(Maybe [Text])

100− , _rmeSupportedProducts :: !(Maybe [Text])

100+ , _rmeSupportedProducts :: !(Maybe [Text])

101101 } deriving (Eq,Show,Data,Typeable,Generic)

102102

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

@@ -119,7 +119,7 @@ data ReportingMetadataEntry = ReportingMetadataEntry

119119-- * 'rmeSupportedProducts'

120120reportingMetadataEntry

121121 :: ReportingMetadataEntry

122−reportingMetadataEntry =

122+reportingMetadataEntry =

123123 ReportingMetadataEntry

124124 { _rmeKind = "adsense#reportingMetadataEntry"

125125 , _rmeRequiredMetrics = Nothing

@@ -218,9 +218,9 @@ instance ToJSON ReportingMetadataEntry where

218218--

219219-- /See:/ 'adsenseReportsGenerateResponseHeadersItem' smart constructor.

220220data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseHeadersItem

221− { _argrhiName :: !(Maybe Text)

221+ { _argrhiName :: !(Maybe Text)

222222 , _argrhiCurrency :: !(Maybe Text)

223− , _argrhiType :: !(Maybe Text)

223+ , _argrhiType :: !(Maybe Text)

224224 } deriving (Eq,Show,Data,Typeable,Generic)

225225

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

@@ -234,7 +234,7 @@ data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseH

234234-- * 'argrhiType'

235235adsenseReportsGenerateResponseHeadersItem

236236 :: AdsenseReportsGenerateResponseHeadersItem

237−adsenseReportsGenerateResponseHeadersItem =

237+adsenseReportsGenerateResponseHeadersItem =

238238 AdsenseReportsGenerateResponseHeadersItem

239239 { _argrhiName = Nothing

240240 , _argrhiCurrency = Nothing

@@ -282,10 +282,10 @@ instance ToJSON

282282-- /See:/ 'payment' smart constructor.

283283data Payment = Payment

284284 { _pPaymentAmountCurrencyCode :: !(Maybe Text)

285− , _pKind :: !Text

286− , _pPaymentDate :: !(Maybe Text)

287− , _pId :: !(Maybe Text)

288− , _pPaymentAmount :: !(Maybe Text)

285+ , _pKind :: !Text

286+ , _pPaymentDate :: !(Maybe Text)

287+ , _pId :: !(Maybe Text)

288+ , _pPaymentAmount :: !(Maybe Text)

289289 } deriving (Eq,Show,Data,Typeable,Generic)

290290

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

@@ -303,7 +303,7 @@ data Payment = Payment

303303-- * 'pPaymentAmount'

304304payment

305305 :: Payment

306−payment =

306+payment =

307307 Payment

308308 { _pPaymentAmountCurrencyCode = Nothing

309309 , _pKind = "adsense#payment"

@@ -363,10 +363,10 @@ instance ToJSON Payment where

363363--

364364-- /See:/ 'accounts' smart constructor.

365365data Accounts = Accounts

366− { _aEtag :: !(Maybe Text)

366+ { _aEtag :: !(Maybe Text)

367367 , _aNextPageToken :: !(Maybe Text)

368− , _aKind :: !Text

369− , _aItems :: !(Maybe [Account])

368+ , _aKind :: !Text

369+ , _aItems :: !(Maybe [Account])

370370 } deriving (Eq,Show,Data,Typeable,Generic)

371371

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

@@ -382,7 +382,7 @@ data Accounts = Accounts

382382-- * 'aItems'

383383accounts

384384 :: Accounts

385−accounts =

385+accounts =

386386 Accounts

387387 { _aEtag = Nothing

388388 , _aNextPageToken = Nothing

@@ -431,7 +431,7 @@ instance ToJSON Accounts where

431431--

432432-- /See:/ 'alerts' smart constructor.

433433data Alerts = Alerts

434− { _aleKind :: !Text

434+ { _aleKind :: !Text

435435 , _aleItems :: !(Maybe [Alert])

436436 } deriving (Eq,Show,Data,Typeable,Generic)

437437

@@ -444,7 +444,7 @@ data Alerts = Alerts

444444-- * 'aleItems'

445445alerts

446446 :: Alerts

447−alerts =

447+alerts =

448448 Alerts

449449 { _aleKind = "adsense#alerts"

450450 , _aleItems = Nothing

@@ -479,10 +479,10 @@ instance ToJSON Alerts where

479479--

480480-- /See:/ 'savedReports' smart constructor.

481481data SavedReports = SavedReports

482− { _srEtag :: !(Maybe Text)

482+ { _srEtag :: !(Maybe Text)

483483 , _srNextPageToken :: !(Maybe Text)

484− , _srKind :: !Text

485− , _srItems :: !(Maybe [SavedReport])

484+ , _srKind :: !Text

485+ , _srItems :: !(Maybe [SavedReport])

486486 } deriving (Eq,Show,Data,Typeable,Generic)

487487

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

@@ -498,7 +498,7 @@ data SavedReports = SavedReports

498498-- * 'srItems'

499499savedReports

500500 :: SavedReports

501−savedReports =

501+savedReports =

502502 SavedReports

503503 { _srEtag = Nothing

504504 , _srNextPageToken = Nothing

@@ -548,10 +548,10 @@ instance ToJSON SavedReports where

548548--

549549-- /See:/ 'adUnits' smart constructor.

550550data AdUnits = AdUnits

551− { _auEtag :: !(Maybe Text)

551+ { _auEtag :: !(Maybe Text)

552552 , _auNextPageToken :: !(Maybe Text)

553− , _auKind :: !Text

554− , _auItems :: !(Maybe [AdUnit])

553+ , _auKind :: !Text

554+ , _auItems :: !(Maybe [AdUnit])

555555 } deriving (Eq,Show,Data,Typeable,Generic)

556556

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

@@ -567,7 +567,7 @@ data AdUnits = AdUnits

567567-- * 'auItems'

568568adUnits

569569 :: AdUnits

570−adUnits =

570+adUnits =

571571 AdUnits

572572 { _auEtag = Nothing

573573 , _auNextPageToken = Nothing

@@ -618,7 +618,7 @@ instance ToJSON AdUnits where

618618data SavedReport = SavedReport

619619 { _sKind :: !Text

620620 , _sName :: !(Maybe Text)

621− , _sId :: !(Maybe Text)

621+ , _sId :: !(Maybe Text)

622622 } deriving (Eq,Show,Data,Typeable,Generic)

623623

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

@@ -632,7 +632,7 @@ data SavedReport = SavedReport

632632-- * 'sId'

633633savedReport

634634 :: SavedReport

635−savedReport =

635+savedReport =

636636 SavedReport

637637 { _sKind = "adsense#savedReport"

638638 , _sName = Nothing

@@ -670,10 +670,10 @@ instance ToJSON SavedReport where

670670--

671671-- /See:/ 'urlChannels' smart constructor.

672672data URLChannels = URLChannels

673− { _ucEtag :: !(Maybe Text)

673+ { _ucEtag :: !(Maybe Text)

674674 , _ucNextPageToken :: !(Maybe Text)

675− , _ucKind :: !Text

676− , _ucItems :: !(Maybe [URLChannel])

675+ , _ucKind :: !Text

676+ , _ucItems :: !(Maybe [URLChannel])

677677 } deriving (Eq,Show,Data,Typeable,Generic)

678678

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

@@ -689,7 +689,7 @@ data URLChannels = URLChannels

689689-- * 'ucItems'

690690urlChannels

691691 :: URLChannels

692−urlChannels =

692+urlChannels =

693693 URLChannels

694694 { _ucEtag = Nothing

695695 , _ucNextPageToken = Nothing

@@ -739,10 +739,10 @@ instance ToJSON URLChannels where

739739--

740740-- /See:/ 'customChannels' smart constructor.

741741data CustomChannels = CustomChannels

742− { _ccEtag :: !(Maybe Text)

742+ { _ccEtag :: !(Maybe Text)

743743 , _ccNextPageToken :: !(Maybe Text)

744− , _ccKind :: !Text

745− , _ccItems :: !(Maybe [CustomChannel])

744+ , _ccKind :: !Text

745+ , _ccItems :: !(Maybe [CustomChannel])

746746 } deriving (Eq,Show,Data,Typeable,Generic)

747747

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

@@ -758,7 +758,7 @@ data CustomChannels = CustomChannels

758758-- * 'ccItems'

759759customChannels

760760 :: CustomChannels

761−customChannels =

761+customChannels =

762762 CustomChannels

763763 { _ccEtag = Nothing

764764 , _ccNextPageToken = Nothing

@@ -808,16 +808,16 @@ instance ToJSON CustomChannels where

808808--

809809-- /See:/ 'adUnit' smart constructor.

810810data AdUnit = AdUnit

811− { _auuStatus :: !(Maybe Text)

811+ { _auuStatus :: !(Maybe Text)

812812 , _auuMobileContentAdsSettings :: !(Maybe AdUnitMobileContentAdsSettings)

813− , _auuKind :: !Text

814− , _auuFeedAdsSettings :: !(Maybe AdUnitFeedAdsSettings)

815− , _auuCustomStyle :: !(Maybe AdStyle)

816− , _auuSavedStyleId :: !(Maybe Text)

817− , _auuName :: !(Maybe Text)

818− , _auuContentAdsSettings :: !(Maybe AdUnitContentAdsSettings)

819− , _auuCode :: !(Maybe Text)

820− , _auuId :: !(Maybe Text)

813+ , _auuKind :: !Text

814+ , _auuFeedAdsSettings :: !(Maybe AdUnitFeedAdsSettings)

815+ , _auuCustomStyle :: !(Maybe AdStyle)

816+ , _auuSavedStyleId :: !(Maybe Text)

817+ , _auuName :: !(Maybe Text)

818+ , _auuContentAdsSettings :: !(Maybe AdUnitContentAdsSettings)

819+ , _auuCode :: !(Maybe Text)

820+ , _auuId :: !(Maybe Text)

821821 } deriving (Eq,Show,Data,Typeable,Generic)

822822

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

@@ -845,7 +845,7 @@ data AdUnit = AdUnit

845845-- * 'auuId'

846846adUnit

847847 :: AdUnit

848−adUnit =

848+adUnit =

849849 AdUnit

850850 { _auuStatus = Nothing

851851 , _auuMobileContentAdsSettings = Nothing

@@ -951,11 +951,11 @@ instance ToJSON AdUnit where

951951-- /See:/ 'alert' smart constructor.

952952data Alert = Alert

953953 { _aaIsDismissible :: !(Maybe Bool)

954− , _aaKind :: !Text

955− , _aaSeverity :: !(Maybe Text)

956− , _aaId :: !(Maybe Text)

957− , _aaType :: !(Maybe Text)

958− , _aaMessage :: !(Maybe Text)

954+ , _aaKind :: !Text

955+ , _aaSeverity :: !(Maybe Text)

956+ , _aaId :: !(Maybe Text)

957+ , _aaType :: !(Maybe Text)

958+ , _aaMessage :: !(Maybe Text)

959959 } deriving (Eq,Show,Data,Typeable,Generic)

960960

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

@@ -975,7 +975,7 @@ data Alert = Alert

975975-- * 'aaMessage'

976976alert

977977 :: Alert

978−alert =

978+alert =

979979 Alert

980980 { _aaIsDismissible = Nothing

981981 , _aaKind = "adsense#alert"

@@ -1042,7 +1042,7 @@ instance ToJSON Alert where

10421042--

10431043-- /See:/ 'adStyleFont' smart constructor.

10441044data AdStyleFont = AdStyleFont

1045− { _asfSize :: !(Maybe Text)

1045+ { _asfSize :: !(Maybe Text)

10461046 , _asfFamily :: !(Maybe Text)

10471047 } deriving (Eq,Show,Data,Typeable,Generic)

10481048

@@ -1055,7 +1055,7 @@ data AdStyleFont = AdStyleFont

10551055-- * 'asfFamily'

10561056adStyleFont

10571057 :: AdStyleFont

1058−adStyleFont =

1058+adStyleFont =

10591059 AdStyleFont

10601060 { _asfSize = Nothing

10611061 , _asfFamily = Nothing

@@ -1086,11 +1086,11 @@ instance ToJSON AdStyleFont where

10861086--

10871087-- /See:/ 'account' smart constructor.

10881088data Account = Account

1089− { _accKind :: !Text

1090− , _accPremium :: !(Maybe Bool)

1091− , _accName :: !(Maybe Text)

1092− , _accId :: !(Maybe Text)

1093− , _accTimezone :: !(Maybe Text)

1089+ { _accKind :: !Text

1090+ , _accPremium :: !(Maybe Bool)

1091+ , _accName :: !(Maybe Text)

1092+ , _accId :: !(Maybe Text)

1093+ , _accTimezone :: !(Maybe Text)

10941094 , _accSubAccounts :: !(Maybe [Account])

10951095 } deriving (Eq,Show,Data,Typeable,Generic)

10961096

@@ -1111,7 +1111,7 @@ data Account = Account

11111111-- * 'accSubAccounts'

11121112account

11131113 :: Account

1114−account =

1114+account =

11151115 Account

11161116 { _accKind = "adsense#account"

11171117 , _accPremium = Nothing

@@ -1177,10 +1177,10 @@ instance ToJSON Account where

11771177--

11781178-- /See:/ 'adUnitMobileContentAdsSettings' smart constructor.

11791179data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

1180− { _aumcasSize :: !(Maybe Text)

1180+ { _aumcasSize :: !(Maybe Text)

11811181 , _aumcasScriptingLanguage :: !(Maybe Text)

1182− , _aumcasMarkupLanguage :: !(Maybe Text)

1183− , _aumcasType :: !(Maybe Text)

1182+ , _aumcasMarkupLanguage :: !(Maybe Text)

1183+ , _aumcasType :: !(Maybe Text)

11841184 } deriving (Eq,Show,Data,Typeable,Generic)

11851185

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

@@ -1196,7 +1196,7 @@ data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

11961196-- * 'aumcasType'

11971197adUnitMobileContentAdsSettings

11981198 :: AdUnitMobileContentAdsSettings

1199−adUnitMobileContentAdsSettings =

1199+adUnitMobileContentAdsSettings =

12001200 AdUnitMobileContentAdsSettings

12011201 { _aumcasSize = Nothing

12021202 , _aumcasScriptingLanguage = Nothing

@@ -1249,10 +1249,10 @@ instance ToJSON AdUnitMobileContentAdsSettings where

12491249--

12501250-- /See:/ 'savedAdStyles' smart constructor.

12511251data SavedAdStyles = SavedAdStyles

1252− { _sasEtag :: !(Maybe Text)

1252+ { _sasEtag :: !(Maybe Text)

12531253 , _sasNextPageToken :: !(Maybe Text)

1254− , _sasKind :: !Text

1255− , _sasItems :: !(Maybe [SavedAdStyle])

1254+ , _sasKind :: !Text

1255+ , _sasItems :: !(Maybe [SavedAdStyle])

12561256 } deriving (Eq,Show,Data,Typeable,Generic)

12571257

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

@@ -1268,7 +1268,7 @@ data SavedAdStyles = SavedAdStyles

12681268-- * 'sasItems'

12691269savedAdStyles

12701270 :: SavedAdStyles

1271−savedAdStyles =

1271+savedAdStyles =

12721272 SavedAdStyles

12731273 { _sasEtag = Nothing

12741274 , _sasNextPageToken = Nothing

@@ -1322,10 +1322,10 @@ instance ToJSON SavedAdStyles where

13221322--

13231323-- /See:/ 'adStyleColors' smart constructor.

13241324data AdStyleColors = AdStyleColors

1325− { _ascText :: !(Maybe Text)

1326− , _ascURL :: !(Maybe Text)

1327− , _ascBOrder :: !(Maybe Text)

1328− , _ascTitle :: !(Maybe Text)

1325+ { _ascText :: !(Maybe Text)

1326+ , _ascURL :: !(Maybe Text)

1327+ , _ascBOrder :: !(Maybe Text)

1328+ , _ascTitle :: !(Maybe Text)

13291329 , _ascBackgRound :: !(Maybe Text)

13301330 } deriving (Eq,Show,Data,Typeable,Generic)

13311331

@@ -1344,7 +1344,7 @@ data AdStyleColors = AdStyleColors

13441344-- * 'ascBackgRound'

13451345adStyleColors

13461346 :: AdStyleColors

1347−adStyleColors =

1347+adStyleColors =

13481348 AdStyleColors

13491349 { _ascText = Nothing

13501350 , _ascURL = Nothing

@@ -1399,8 +1399,8 @@ instance ToJSON AdStyleColors where

13991399-- /See:/ 'adUnitContentAdsSettingsBackupOption' smart constructor.

14001400data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

14011401 { _aucasboColor :: !(Maybe Text)

1402− , _aucasboURL :: !(Maybe Text)

1403− , _aucasboType :: !(Maybe Text)

1402+ , _aucasboURL :: !(Maybe Text)

1403+ , _aucasboType :: !(Maybe Text)

14041404 } deriving (Eq,Show,Data,Typeable,Generic)

14051405

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

@@ -1414,7 +1414,7 @@ data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

14141414-- * 'aucasboType'

14151415adUnitContentAdsSettingsBackupOption

14161416 :: AdUnitContentAdsSettingsBackupOption

1417−adUnitContentAdsSettingsBackupOption =

1417+adUnitContentAdsSettingsBackupOption =

14181418 AdUnitContentAdsSettingsBackupOption

14191419 { _aucasboColor = Nothing

14201420 , _aucasboURL = Nothing

@@ -1456,12 +1456,12 @@ instance ToJSON AdUnitContentAdsSettingsBackupOption

14561456--

14571457-- /See:/ 'adClient' smart constructor.

14581458data AdClient = AdClient

1459− { _adKind :: !Text

1460− , _adArcOptIn :: !(Maybe Bool)

1459+ { _adKind :: !Text

1460+ , _adArcOptIn :: !(Maybe Bool)

14611461 , _adSupportsReporting :: !(Maybe Bool)

1462− , _adId :: !(Maybe Text)

1463− , _adProductCode :: !(Maybe Text)

1464− , _adArcReviewMode :: !(Maybe Text)

1462+ , _adId :: !(Maybe Text)

1463+ , _adProductCode :: !(Maybe Text)

1464+ , _adArcReviewMode :: !(Maybe Text)

14651465 } deriving (Eq,Show,Data,Typeable,Generic)

14661466

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

@@ -1481,7 +1481,7 @@ data AdClient = AdClient

14811481-- * 'adArcReviewMode'

14821482adClient

14831483 :: AdClient

1484−adClient =

1484+adClient =

14851485 AdClient

14861486 { _adKind = "adsense#adClient"

14871487 , _adArcOptIn = Nothing

@@ -1550,10 +1550,10 @@ instance ToJSON AdClient where

15501550--

15511551-- /See:/ 'savedAdStyle' smart constructor.

15521552data SavedAdStyle = SavedAdStyle

1553− { _savKind :: !Text

1554− , _savName :: !(Maybe Text)

1553+ { _savKind :: !Text

1554+ , _savName :: !(Maybe Text)

15551555 , _savAdStyle :: !(Maybe AdStyle)

1556− , _savId :: !(Maybe Text)

1556+ , _savId :: !(Maybe Text)

15571557 } deriving (Eq,Show,Data,Typeable,Generic)

15581558

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

@@ -1569,7 +1569,7 @@ data SavedAdStyle = SavedAdStyle

15691569-- * 'savId'

15701570savedAdStyle

15711571 :: SavedAdStyle

1572−savedAdStyle =

1572+savedAdStyle =

15731573 SavedAdStyle

15741574 { _savKind = "adsense#savedAdStyle"

15751575 , _savName = Nothing

@@ -1618,10 +1618,10 @@ instance ToJSON SavedAdStyle where

16181618--

16191619-- /See:/ 'customChannelTargetingInfo' smart constructor.

16201620data CustomChannelTargetingInfo = CustomChannelTargetingInfo

1621− { _cctiLocation :: !(Maybe Text)

1621+ { _cctiLocation :: !(Maybe Text)

16221622 , _cctiSiteLanguage :: !(Maybe Text)

1623− , _cctiAdsAppearOn :: !(Maybe Text)

1624− , _cctiDescription :: !(Maybe Text)

1623+ , _cctiAdsAppearOn :: !(Maybe Text)

1624+ , _cctiDescription :: !(Maybe Text)

16251625 } deriving (Eq,Show,Data,Typeable,Generic)

16261626

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

@@ -1637,7 +1637,7 @@ data CustomChannelTargetingInfo = CustomChannelTargetingInfo

16371637-- * 'cctiDescription'

16381638customChannelTargetingInfo

16391639 :: CustomChannelTargetingInfo

1640−customChannelTargetingInfo =

1640+customChannelTargetingInfo =

16411641 CustomChannelTargetingInfo

16421642 { _cctiLocation = Nothing

16431643 , _cctiSiteLanguage = Nothing

@@ -1695,9 +1695,9 @@ instance ToJSON CustomChannelTargetingInfo where

16951695-- /See:/ 'adStyle' smart constructor.

16961696data AdStyle = AdStyle

16971697 { _asCorners :: !(Maybe Text)

1698− , _asKind :: !Text

1699− , _asFont :: !(Maybe AdStyleFont)

1700− , _asColors :: !(Maybe AdStyleColors)

1698+ , _asKind :: !Text

1699+ , _asFont :: !(Maybe AdStyleFont)

1700+ , _asColors :: !(Maybe AdStyleColors)

17011701 } deriving (Eq,Show,Data,Typeable,Generic)

17021702

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

@@ -1713,7 +1713,7 @@ data AdStyle = AdStyle

17131713-- * 'asColors'

17141714adStyle

17151715 :: AdStyle

1716−adStyle =

1716+adStyle =

17171717 AdStyle

17181718 { _asCorners = Nothing

17191719 , _asKind = "adsense#adStyle"

@@ -1762,9 +1762,9 @@ instance ToJSON AdStyle where

17621762--

17631763-- /See:/ 'adUnitFeedAdsSettings' smart constructor.

17641764data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings

1765− { _aufasFrequency :: !(Maybe Int32)

1766− , _aufasAdPosition :: !(Maybe Text)

1767− , _aufasType :: !(Maybe Text)

1765+ { _aufasFrequency :: !(Maybe Int32)

1766+ , _aufasAdPosition :: !(Maybe Text)

1767+ , _aufasType :: !(Maybe Text)

17681768 , _aufasMinimumWordCount :: !(Maybe Int32)

17691769 } deriving (Eq,Show,Data,Typeable,Generic)

17701770

@@ -1781,7 +1781,7 @@ data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings

17811781-- * 'aufasMinimumWordCount'

17821782adUnitFeedAdsSettings

17831783 :: AdUnitFeedAdsSettings

1784−adUnitFeedAdsSettings =

1784+adUnitFeedAdsSettings =

17851785 AdUnitFeedAdsSettings

17861786 { _aufasFrequency = Nothing

17871787 , _aufasAdPosition = Nothing

@@ -1834,7 +1834,7 @@ instance ToJSON AdUnitFeedAdsSettings where

18341834--

18351835-- /See:/ 'metadata' smart constructor.

18361836data Metadata = Metadata

1837− { _mKind :: !Text

1837+ { _mKind :: !Text

18381838 , _mItems :: !(Maybe [ReportingMetadataEntry])

18391839 } deriving (Eq,Show,Data,Typeable,Generic)

18401840

@@ -1847,7 +1847,7 @@ data Metadata = Metadata

18471847-- * 'mItems'

18481848metadata

18491849 :: Metadata

1850−metadata =

1850+metadata =

18511851 Metadata

18521852 { _mKind = "adsense#metadata"

18531853 , _mItems = Nothing

@@ -1880,10 +1880,10 @@ instance ToJSON Metadata where

18801880-- /See:/ 'customChannel' smart constructor.

18811881data CustomChannel = CustomChannel

18821882 { _cTargetingInfo :: !(Maybe CustomChannelTargetingInfo)

1883− , _cKind :: !Text

1884− , _cName :: !(Maybe Text)

1885− , _cCode :: !(Maybe Text)

1886− , _cId :: !(Maybe Text)

1883+ , _cKind :: !Text

1884+ , _cName :: !(Maybe Text)

1885+ , _cCode :: !(Maybe Text)

1886+ , _cId :: !(Maybe Text)

18871887 } deriving (Eq,Show,Data,Typeable,Generic)

18881888

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

@@ -1901,7 +1901,7 @@ data CustomChannel = CustomChannel

19011901-- * 'cId'

19021902customChannel

19031903 :: CustomChannel

1904−customChannel =

1904+customChannel =

19051905 CustomChannel

19061906 { _cTargetingInfo = Nothing

19071907 , _cKind = "adsense#customChannel"

@@ -1956,8 +1956,8 @@ instance ToJSON CustomChannel where

19561956--

19571957-- /See:/ 'urlChannel' smart constructor.

19581958data URLChannel = URLChannel

1959− { _urlcKind :: !Text

1960− , _urlcId :: !(Maybe Text)

1959+ { _urlcKind :: !Text

1960+ , _urlcId :: !(Maybe Text)

19611961 , _urlcURLPattern :: !(Maybe Text)

19621962 } deriving (Eq,Show,Data,Typeable,Generic)

19631963

@@ -1972,7 +1972,7 @@ data URLChannel = URLChannel

19721972-- * 'urlcURLPattern'

19731973urlChannel

19741974 :: URLChannel

1975−urlChannel =

1975+urlChannel =

19761976 URLChannel

19771977 { _urlcKind = "adsense#urlChannel"

19781978 , _urlcId = Nothing

@@ -2015,7 +2015,7 @@ instance ToJSON URLChannel where

20152015--

20162016-- /See:/ 'adCode' smart constructor.

20172017data AdCode = AdCode

2018− { _addKind :: !Text

2018+ { _addKind :: !Text

20192019 , _addAdCode :: !(Maybe Text)

20202020 } deriving (Eq,Show,Data,Typeable,Generic)

20212021

@@ -2028,7 +2028,7 @@ data AdCode = AdCode

20282028-- * 'addAdCode'

20292029adCode

20302030 :: AdCode

2031−adCode =

2031+adCode =

20322032 AdCode

20332033 { _addKind = "adsense#adCode"

20342034 , _addAdCode = Nothing

@@ -2061,14 +2061,14 @@ instance ToJSON AdCode where

20612061--

20622062-- /See:/ 'adsenseReportsGenerateResponse' smart constructor.

20632063data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse

2064− { _argrKind :: !Text

2065− , _argrAverages :: !(Maybe [Text])

2066− , _argrEndDate :: !(Maybe Text)

2067− , _argrWarnings :: !(Maybe [Text])

2068− , _argrRows :: !(Maybe [[Text]])

2069− , _argrTotals :: !(Maybe [Text])

2070− , _argrStartDate :: !(Maybe Text)

2071− , _argrHeaders :: !(Maybe [AdsenseReportsGenerateResponseHeadersItem])

2064+ { _argrKind :: !Text

2065+ , _argrAverages :: !(Maybe [Text])

2066+ , _argrEndDate :: !(Maybe Text)

2067+ , _argrWarnings :: !(Maybe [Text])

2068+ , _argrRows :: !(Maybe [[Text]])

2069+ , _argrTotals :: !(Maybe [Text])

2070+ , _argrStartDate :: !(Maybe Text)

2071+ , _argrHeaders :: !(Maybe [AdsenseReportsGenerateResponseHeadersItem])

20722072 , _argrTotalMatchedRows :: !(Maybe Int64)

20732073 } deriving (Eq,Show,Data,Typeable,Generic)

20742074

@@ -2095,7 +2095,7 @@ data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse

20952095-- * 'argrTotalMatchedRows'

20962096adsenseReportsGenerateResponse

20972097 :: AdsenseReportsGenerateResponse

2098−adsenseReportsGenerateResponse =

2098+adsenseReportsGenerateResponse =

20992099 AdsenseReportsGenerateResponse

21002100 { _argrKind = "adsense#report"

21012101 , _argrAverages = Nothing

@@ -2209,8 +2209,8 @@ instance ToJSON AdsenseReportsGenerateResponse where

22092209-- /See:/ 'adUnitContentAdsSettings' smart constructor.

22102210data AdUnitContentAdsSettings = AdUnitContentAdsSettings

22112211 { _aucasBackupOption :: !(Maybe AdUnitContentAdsSettingsBackupOption)

2212− , _aucasSize :: !(Maybe Text)

2213− , _aucasType :: !(Maybe Text)

2212+ , _aucasSize :: !(Maybe Text)

2213+ , _aucasType :: !(Maybe Text)

22142214 } deriving (Eq,Show,Data,Typeable,Generic)

22152215

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

@@ -2224,7 +2224,7 @@ data AdUnitContentAdsSettings = AdUnitContentAdsSettings

22242224-- * 'aucasType'

22252225adUnitContentAdsSettings

22262226 :: AdUnitContentAdsSettings

2227−adUnitContentAdsSettings =

2227+adUnitContentAdsSettings =

22282228 AdUnitContentAdsSettings

22292229 { _aucasBackupOption = Nothing

22302230 , _aucasSize = Nothing

@@ -2266,7 +2266,7 @@ instance ToJSON AdUnitContentAdsSettings where

22662266--

22672267-- /See:/ 'payments' smart constructor.

22682268data Payments = Payments

2269− { _payKind :: !Text

2269+ { _payKind :: !Text

22702270 , _payItems :: !(Maybe [Payment])

22712271 } deriving (Eq,Show,Data,Typeable,Generic)

22722272

@@ -2279,7 +2279,7 @@ data Payments = Payments

22792279-- * 'payItems'

22802280payments

22812281 :: Payments

2282−payments =

2282+payments =

22832283 Payments

22842284 { _payKind = "adsense#payments"

22852285 , _payItems = Nothing

gogol-adsense/gen/Network/Google/AdSense/Types/Sum.hs+1−1

@@ -16,4 +16,4 @@

1616--

1717module Network.Google.AdSense.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdSense.Accounts.AdClients.List

4444 , aaclFields

4545 ) where

4646

47−import Network.Google.AdSense.Types

48−import Network.Google.Prelude

47+import Network.Google.AdSense.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdsenseAccountsAdClientsList@ which the

5151-- 'AccountsAdClientsList'' request conforms to.

@@ -67,15 +67,15 @@ type AccountsAdClientsListResource =

6767--

6868-- /See:/ 'accountsAdClientsList'' smart constructor.

6969data AccountsAdClientsList' = AccountsAdClientsList'

70− { _aaclQuotaUser :: !(Maybe Text)

70+ { _aaclQuotaUser :: !(Maybe Text)

7171 , _aaclPrettyPrint :: !Bool

72− , _aaclUserIP :: !(Maybe Text)

73− , _aaclAccountId :: !Text

74− , _aaclKey :: !(Maybe Key)

75− , _aaclPageToken :: !(Maybe Text)

76− , _aaclOAuthToken :: !(Maybe OAuthToken)

77− , _aaclMaxResults :: !(Maybe Int32)

78− , _aaclFields :: !(Maybe Text)

72+ , _aaclUserIP :: !(Maybe Text)

73+ , _aaclAccountId :: !Text

74+ , _aaclKey :: !(Maybe Key)

75+ , _aaclPageToken :: !(Maybe Text)

76+ , _aaclOAuthToken :: !(Maybe OAuthToken)

77+ , _aaclMaxResults :: !(Maybe Int32)

78+ , _aaclFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -102,7 +102,7 @@ data AccountsAdClientsList' = AccountsAdClientsList'

102102accountsAdClientsList'

103103 :: Text -- ^ 'accountId'

104104 -> AccountsAdClientsList'

105−accountsAdClientsList' pAaclAccountId_ =

105+accountsAdClientsList' pAaclAccountId_ =

106106 AccountsAdClientsList'

107107 { _aaclQuotaUser = Nothing

108108 , _aaclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.Accounts.AdUnits.CustomChannels.List

4646 , aaucclFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseAccountsAdUnitsCustomChannelsList@ which the

5353-- 'AccountsAdUnitsCustomChannelsList'' request conforms to.

@@ -74,17 +74,17 @@ type AccountsAdUnitsCustomChannelsListResource =

7474--

7575-- /See:/ 'accountsAdUnitsCustomChannelsList'' smart constructor.

7676data AccountsAdUnitsCustomChannelsList' = AccountsAdUnitsCustomChannelsList'

77− { _aaucclQuotaUser :: !(Maybe Text)

77+ { _aaucclQuotaUser :: !(Maybe Text)

7878 , _aaucclPrettyPrint :: !Bool

79− , _aaucclUserIP :: !(Maybe Text)

80− , _aaucclAdUnitId :: !Text

81− , _aaucclAdClientId :: !Text

82− , _aaucclAccountId :: !Text

83− , _aaucclKey :: !(Maybe Key)

84− , _aaucclPageToken :: !(Maybe Text)

85− , _aaucclOAuthToken :: !(Maybe OAuthToken)

86− , _aaucclMaxResults :: !(Maybe Int32)

87− , _aaucclFields :: !(Maybe Text)

79+ , _aaucclUserIP :: !(Maybe Text)

80+ , _aaucclAdUnitId :: !Text

81+ , _aaucclAdClientId :: !Text

82+ , _aaucclAccountId :: !Text

83+ , _aaucclKey :: !(Maybe Key)

84+ , _aaucclPageToken :: !(Maybe Text)

85+ , _aaucclOAuthToken :: !(Maybe OAuthToken)

86+ , _aaucclMaxResults :: !(Maybe Int32)

87+ , _aaucclFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -117,7 +117,7 @@ accountsAdUnitsCustomChannelsList'

117117 -> Text -- ^ 'adClientId'

118118 -> Text -- ^ 'accountId'

119119 -> AccountsAdUnitsCustomChannelsList'

120−accountsAdUnitsCustomChannelsList' pAaucclAdUnitId_ pAaucclAdClientId_ pAaucclAccountId_ =

120+accountsAdUnitsCustomChannelsList' pAaucclAdUnitId_ pAaucclAdClientId_ pAaucclAccountId_ =

121121 AccountsAdUnitsCustomChannelsList'

122122 { _aaucclQuotaUser = Nothing

123123 , _aaucclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/Get.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.Accounts.AdUnits.Get

4545 , aaugFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseAccountsAdUnitsGet@ which the

5252-- 'AccountsAdUnitsGet'' request conforms to.

@@ -70,15 +70,15 @@ type AccountsAdUnitsGetResource =

7070--

7171-- /See:/ 'accountsAdUnitsGet'' smart constructor.

7272data AccountsAdUnitsGet' = AccountsAdUnitsGet'

73− { _aaugQuotaUser :: !(Maybe Text)

73+ { _aaugQuotaUser :: !(Maybe Text)

7474 , _aaugPrettyPrint :: !Bool

75− , _aaugUserIP :: !(Maybe Text)

76− , _aaugAdUnitId :: !Text

77− , _aaugAdClientId :: !Text

78− , _aaugAccountId :: !Text

79− , _aaugKey :: !(Maybe Key)

80− , _aaugOAuthToken :: !(Maybe OAuthToken)

81− , _aaugFields :: !(Maybe Text)

75+ , _aaugUserIP :: !(Maybe Text)

76+ , _aaugAdUnitId :: !Text

77+ , _aaugAdClientId :: !Text

78+ , _aaugAccountId :: !Text

79+ , _aaugKey :: !(Maybe Key)

80+ , _aaugOAuthToken :: !(Maybe OAuthToken)

81+ , _aaugFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ accountsAdUnitsGet'

107107 -> Text -- ^ 'adClientId'

108108 -> Text -- ^ 'accountId'

109109 -> AccountsAdUnitsGet'

110−accountsAdUnitsGet' pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =

110+accountsAdUnitsGet' pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =

111111 AccountsAdUnitsGet'

112112 { _aaugQuotaUser = Nothing

113113 , _aaugPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/GetAdCode.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdSense.Accounts.AdUnits.GetAdCode

4444 , aaugacFields

4545 ) where

4646

47−import Network.Google.AdSense.Types

48−import Network.Google.Prelude

47+import Network.Google.AdSense.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdsenseAccountsAdUnitsGetAdCode@ which the

5151-- 'AccountsAdUnitsGetAdCode'' request conforms to.

@@ -69,15 +69,15 @@ type AccountsAdUnitsGetAdCodeResource =

6969--

7070-- /See:/ 'accountsAdUnitsGetAdCode'' smart constructor.

7171data AccountsAdUnitsGetAdCode' = AccountsAdUnitsGetAdCode'

72− { _aaugacQuotaUser :: !(Maybe Text)

72+ { _aaugacQuotaUser :: !(Maybe Text)

7373 , _aaugacPrettyPrint :: !Bool

74− , _aaugacUserIP :: !(Maybe Text)

75− , _aaugacAdUnitId :: !Text

76− , _aaugacAdClientId :: !Text

77− , _aaugacAccountId :: !Text

78− , _aaugacKey :: !(Maybe Key)

79− , _aaugacOAuthToken :: !(Maybe OAuthToken)

80− , _aaugacFields :: !(Maybe Text)

74+ , _aaugacUserIP :: !(Maybe Text)

75+ , _aaugacAdUnitId :: !Text

76+ , _aaugacAdClientId :: !Text

77+ , _aaugacAccountId :: !Text

78+ , _aaugacKey :: !(Maybe Key)

79+ , _aaugacOAuthToken :: !(Maybe OAuthToken)

80+ , _aaugacFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ accountsAdUnitsGetAdCode'

106106 -> Text -- ^ 'adClientId'

107107 -> Text -- ^ 'accountId'

108108 -> AccountsAdUnitsGetAdCode'

109−accountsAdUnitsGetAdCode' pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =

109+accountsAdUnitsGetAdCode' pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =

110110 AccountsAdUnitsGetAdCode'

111111 { _aaugacQuotaUser = Nothing

112112 , _aaugacPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.Accounts.AdUnits.List

4646 , aaulFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseAccountsAdUnitsList@ which the

5353-- 'AccountsAdUnitsList'' request conforms to.

@@ -72,17 +72,17 @@ type AccountsAdUnitsListResource =

7272--

7373-- /See:/ 'accountsAdUnitsList'' smart constructor.

7474data AccountsAdUnitsList' = AccountsAdUnitsList'

75− { _aaulQuotaUser :: !(Maybe Text)

76− , _aaulPrettyPrint :: !Bool

75+ { _aaulQuotaUser :: !(Maybe Text)

76+ , _aaulPrettyPrint :: !Bool

7777 , _aaulIncludeInactive :: !(Maybe Bool)

78− , _aaulUserIP :: !(Maybe Text)

79− , _aaulAdClientId :: !Text

80− , _aaulAccountId :: !Text

81− , _aaulKey :: !(Maybe Key)

82− , _aaulPageToken :: !(Maybe Text)

83− , _aaulOAuthToken :: !(Maybe OAuthToken)

84− , _aaulMaxResults :: !(Maybe Int32)

85− , _aaulFields :: !(Maybe Text)

78+ , _aaulUserIP :: !(Maybe Text)

79+ , _aaulAdClientId :: !Text

80+ , _aaulAccountId :: !Text

81+ , _aaulKey :: !(Maybe Key)

82+ , _aaulPageToken :: !(Maybe Text)

83+ , _aaulOAuthToken :: !(Maybe OAuthToken)

84+ , _aaulMaxResults :: !(Maybe Int32)

85+ , _aaulFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ accountsAdUnitsList'

114114 :: Text -- ^ 'adClientId'

115115 -> Text -- ^ 'accountId'

116116 -> AccountsAdUnitsList'

117−accountsAdUnitsList' pAaulAdClientId_ pAaulAccountId_ =

117+accountsAdUnitsList' pAaulAdClientId_ pAaulAccountId_ =

118118 AccountsAdUnitsList'

119119 { _aaulQuotaUser = Nothing

120120 , _aaulPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs+10−10

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdSense.Accounts.Alerts.Delete

4444 , aadFields

4545 ) where

4646

47−import Network.Google.AdSense.Types

48−import Network.Google.Prelude

47+import Network.Google.AdSense.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdsenseAccountsAlertsDelete@ which the

5151-- 'AccountsAlertsDelete'' request conforms to.

@@ -67,14 +67,14 @@ type AccountsAlertsDeleteResource =

6767--

6868-- /See:/ 'accountsAlertsDelete'' smart constructor.

6969data AccountsAlertsDelete' = AccountsAlertsDelete'

70− { _aadQuotaUser :: !(Maybe Text)

70+ { _aadQuotaUser :: !(Maybe Text)

7171 , _aadPrettyPrint :: !Bool

72− , _aadUserIP :: !(Maybe Text)

73− , _aadAlertId :: !Text

74− , _aadAccountId :: !Text

75− , _aadKey :: !(Maybe Key)

76− , _aadOAuthToken :: !(Maybe OAuthToken)

77− , _aadFields :: !(Maybe Text)

72+ , _aadUserIP :: !(Maybe Text)

73+ , _aadAlertId :: !Text

74+ , _aadAccountId :: !Text

75+ , _aadKey :: !(Maybe Key)

76+ , _aadOAuthToken :: !(Maybe OAuthToken)

77+ , _aadFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ accountsAlertsDelete'

100100 :: Text -- ^ 'alertId'

101101 -> Text -- ^ 'accountId'

102102 -> AccountsAlertsDelete'

103−accountsAlertsDelete' pAadAlertId_ pAadAccountId_ =

103+accountsAlertsDelete' pAadAlertId_ pAadAccountId_ =

104104 AccountsAlertsDelete'

105105 { _aadQuotaUser = Nothing

106106 , _aadPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Accounts.Alerts.List

4343 , aalFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAccountsAlertsList@ which the

5050-- 'AccountsAlertsList'' request conforms to.

@@ -65,14 +65,14 @@ type AccountsAlertsListResource =

6565--

6666-- /See:/ 'accountsAlertsList'' smart constructor.

6767data AccountsAlertsList' = AccountsAlertsList'

68− { _aalQuotaUser :: !(Maybe Text)

68+ { _aalQuotaUser :: !(Maybe Text)

6969 , _aalPrettyPrint :: !Bool

70− , _aalUserIP :: !(Maybe Text)

71− , _aalLocale :: !(Maybe Text)

72− , _aalAccountId :: !Text

73− , _aalKey :: !(Maybe Key)

74− , _aalOAuthToken :: !(Maybe OAuthToken)

75− , _aalFields :: !(Maybe Text)

70+ , _aalUserIP :: !(Maybe Text)

71+ , _aalLocale :: !(Maybe Text)

72+ , _aalAccountId :: !Text

73+ , _aalKey :: !(Maybe Key)

74+ , _aalOAuthToken :: !(Maybe OAuthToken)

75+ , _aalFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -97,7 +97,7 @@ data AccountsAlertsList' = AccountsAlertsList'

9797accountsAlertsList'

9898 :: Text -- ^ 'accountId'

9999 -> AccountsAlertsList'

100−accountsAlertsList' pAalAccountId_ =

100+accountsAlertsList' pAalAccountId_ =

101101 AccountsAlertsList'

102102 { _aalQuotaUser = Nothing

103103 , _aalPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.AdSense.Accounts.CustomChannels.AdUnits.List

4747 , accaulFields

4848 ) where

4949

50−import Network.Google.AdSense.Types

51−import Network.Google.Prelude

50+import Network.Google.AdSense.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AdsenseAccountsCustomChannelsAdUnitsList@ which the

5454-- 'AccountsCustomChannelsAdUnitsList'' request conforms to.

@@ -76,18 +76,18 @@ type AccountsCustomChannelsAdUnitsListResource =

7676--

7777-- /See:/ 'accountsCustomChannelsAdUnitsList'' smart constructor.

7878data AccountsCustomChannelsAdUnitsList' = AccountsCustomChannelsAdUnitsList'

79− { _accaulQuotaUser :: !(Maybe Text)

80− , _accaulPrettyPrint :: !Bool

79+ { _accaulQuotaUser :: !(Maybe Text)

80+ , _accaulPrettyPrint :: !Bool

8181 , _accaulIncludeInactive :: !(Maybe Bool)

8282 , _accaulCustomChannelId :: !Text

83− , _accaulUserIP :: !(Maybe Text)

84− , _accaulAdClientId :: !Text

85− , _accaulAccountId :: !Text

86− , _accaulKey :: !(Maybe Key)

87− , _accaulPageToken :: !(Maybe Text)

88− , _accaulOAuthToken :: !(Maybe OAuthToken)

89− , _accaulMaxResults :: !(Maybe Int32)

90− , _accaulFields :: !(Maybe Text)

83+ , _accaulUserIP :: !(Maybe Text)

84+ , _accaulAdClientId :: !Text

85+ , _accaulAccountId :: !Text

86+ , _accaulKey :: !(Maybe Key)

87+ , _accaulPageToken :: !(Maybe Text)

88+ , _accaulOAuthToken :: !(Maybe OAuthToken)

89+ , _accaulMaxResults :: !(Maybe Int32)

90+ , _accaulFields :: !(Maybe Text)

9191 } deriving (Eq,Show,Data,Typeable,Generic)

9292

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

@@ -122,7 +122,7 @@ accountsCustomChannelsAdUnitsList'

122122 -> Text -- ^ 'adClientId'

123123 -> Text -- ^ 'accountId'

124124 -> AccountsCustomChannelsAdUnitsList'

125−accountsCustomChannelsAdUnitsList' pAccaulCustomChannelId_ pAccaulAdClientId_ pAccaulAccountId_ =

125+accountsCustomChannelsAdUnitsList' pAccaulCustomChannelId_ pAccaulAdClientId_ pAccaulAccountId_ =

126126 AccountsCustomChannelsAdUnitsList'

127127 { _accaulQuotaUser = Nothing

128128 , _accaulPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/Get.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.Accounts.CustomChannels.Get

4545 , accgFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseAccountsCustomChannelsGet@ which the

5252-- 'AccountsCustomChannelsGet'' request conforms to.

@@ -71,15 +71,15 @@ type AccountsCustomChannelsGetResource =

7171--

7272-- /See:/ 'accountsCustomChannelsGet'' smart constructor.

7373data AccountsCustomChannelsGet' = AccountsCustomChannelsGet'

74− { _accgQuotaUser :: !(Maybe Text)

75− , _accgPrettyPrint :: !Bool

74+ { _accgQuotaUser :: !(Maybe Text)

75+ , _accgPrettyPrint :: !Bool

7676 , _accgCustomChannelId :: !Text

77− , _accgUserIP :: !(Maybe Text)

78− , _accgAdClientId :: !Text

79− , _accgAccountId :: !Text

80− , _accgKey :: !(Maybe Key)

81− , _accgOAuthToken :: !(Maybe OAuthToken)

82− , _accgFields :: !(Maybe Text)

77+ , _accgUserIP :: !(Maybe Text)

78+ , _accgAdClientId :: !Text

79+ , _accgAccountId :: !Text

80+ , _accgKey :: !(Maybe Key)

81+ , _accgOAuthToken :: !(Maybe OAuthToken)

82+ , _accgFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -108,7 +108,7 @@ accountsCustomChannelsGet'

108108 -> Text -- ^ 'adClientId'

109109 -> Text -- ^ 'accountId'

110110 -> AccountsCustomChannelsGet'

111−accountsCustomChannelsGet' pAccgCustomChannelId_ pAccgAdClientId_ pAccgAccountId_ =

111+accountsCustomChannelsGet' pAccgCustomChannelId_ pAccgAdClientId_ pAccgAccountId_ =

112112 AccountsCustomChannelsGet'

113113 { _accgQuotaUser = Nothing

114114 , _accgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.Accounts.CustomChannels.List

4646 , acclFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseAccountsCustomChannelsList@ which the

5353-- 'AccountsCustomChannelsList'' request conforms to.

@@ -73,16 +73,16 @@ type AccountsCustomChannelsListResource =

7373--

7474-- /See:/ 'accountsCustomChannelsList'' smart constructor.

7575data AccountsCustomChannelsList' = AccountsCustomChannelsList'

76− { _acclQuotaUser :: !(Maybe Text)

76+ { _acclQuotaUser :: !(Maybe Text)

7777 , _acclPrettyPrint :: !Bool

78− , _acclUserIP :: !(Maybe Text)

79− , _acclAdClientId :: !Text

80− , _acclAccountId :: !Text

81− , _acclKey :: !(Maybe Key)

82− , _acclPageToken :: !(Maybe Text)

83− , _acclOAuthToken :: !(Maybe OAuthToken)

84− , _acclMaxResults :: !(Maybe Int32)

85− , _acclFields :: !(Maybe Text)

78+ , _acclUserIP :: !(Maybe Text)

79+ , _acclAdClientId :: !Text

80+ , _acclAccountId :: !Text

81+ , _acclKey :: !(Maybe Key)

82+ , _acclPageToken :: !(Maybe Text)

83+ , _acclOAuthToken :: !(Maybe OAuthToken)

84+ , _acclMaxResults :: !(Maybe Int32)

85+ , _acclFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -112,7 +112,7 @@ accountsCustomChannelsList'

112112 :: Text -- ^ 'adClientId'

113113 -> Text -- ^ 'accountId'

114114 -> AccountsCustomChannelsList'

115−accountsCustomChannelsList' pAcclAdClientId_ pAcclAccountId_ =

115+accountsCustomChannelsList' pAcclAdClientId_ pAcclAccountId_ =

116116 AccountsCustomChannelsList'

117117 { _acclQuotaUser = Nothing

118118 , _acclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Accounts.Get

4343 , agFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAccountsGet@ which the

5050-- 'AccountsGet'' request conforms to.

@@ -64,14 +64,14 @@ type AccountsGetResource =

6464--

6565-- /See:/ 'accountsGet'' smart constructor.

6666data AccountsGet' = AccountsGet'

67− { _agQuotaUser :: !(Maybe Text)

67+ { _agQuotaUser :: !(Maybe Text)

6868 , _agPrettyPrint :: !Bool

69− , _agUserIP :: !(Maybe Text)

70− , _agTree :: !(Maybe Bool)

71− , _agAccountId :: !Text

72− , _agKey :: !(Maybe Key)

73− , _agOAuthToken :: !(Maybe OAuthToken)

74− , _agFields :: !(Maybe Text)

69+ , _agUserIP :: !(Maybe Text)

70+ , _agTree :: !(Maybe Bool)

71+ , _agAccountId :: !Text

72+ , _agKey :: !(Maybe Key)

73+ , _agOAuthToken :: !(Maybe OAuthToken)

74+ , _agFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -96,7 +96,7 @@ data AccountsGet' = AccountsGet'

9696accountsGet'

9797 :: Text -- ^ 'accountId'

9898 -> AccountsGet'

99−accountsGet' pAgAccountId_ =

99+accountsGet' pAgAccountId_ =

100100 AccountsGet'

101101 { _agQuotaUser = Nothing

102102 , _agPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Accounts.List

4343 , alFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAccountsList@ which the

5050-- 'AccountsList'' request conforms to.

@@ -64,14 +64,14 @@ type AccountsListResource =

6464--

6565-- /See:/ 'accountsList'' smart constructor.

6666data AccountsList' = AccountsList'

67− { _alQuotaUser :: !(Maybe Text)

67+ { _alQuotaUser :: !(Maybe Text)

6868 , _alPrettyPrint :: !Bool

69− , _alUserIP :: !(Maybe Text)

70− , _alKey :: !(Maybe Key)

71− , _alPageToken :: !(Maybe Text)

72− , _alOAuthToken :: !(Maybe OAuthToken)

73− , _alMaxResults :: !(Maybe Int32)

74− , _alFields :: !(Maybe Text)

69+ , _alUserIP :: !(Maybe Text)

70+ , _alKey :: !(Maybe Key)

71+ , _alPageToken :: !(Maybe Text)

72+ , _alOAuthToken :: !(Maybe OAuthToken)

73+ , _alMaxResults :: !(Maybe Int32)

74+ , _alFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -95,7 +95,7 @@ data AccountsList' = AccountsList'

9595-- * 'alFields'

9696accountsList'

9797 :: AccountsList'

98−accountsList' =

98+accountsList' =

9999 AccountsList'

100100 { _alQuotaUser = Nothing

101101 , _alPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdSense.Accounts.Payments.List

4242 , aplFields

4343 ) where

4444

45−import Network.Google.AdSense.Types

46−import Network.Google.Prelude

45+import Network.Google.AdSense.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdsenseAccountsPaymentsList@ which the

4949-- 'AccountsPaymentsList'' request conforms to.

@@ -63,13 +63,13 @@ type AccountsPaymentsListResource =

6363--

6464-- /See:/ 'accountsPaymentsList'' smart constructor.

6565data AccountsPaymentsList' = AccountsPaymentsList'

66− { _aplQuotaUser :: !(Maybe Text)

66+ { _aplQuotaUser :: !(Maybe Text)

6767 , _aplPrettyPrint :: !Bool

68− , _aplUserIP :: !(Maybe Text)

69− , _aplAccountId :: !Text

70− , _aplKey :: !(Maybe Key)

71− , _aplOAuthToken :: !(Maybe OAuthToken)

72− , _aplFields :: !(Maybe Text)

68+ , _aplUserIP :: !(Maybe Text)

69+ , _aplAccountId :: !Text

70+ , _aplKey :: !(Maybe Key)

71+ , _aplOAuthToken :: !(Maybe OAuthToken)

72+ , _aplFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data AccountsPaymentsList' = AccountsPaymentsList'

9292accountsPaymentsList'

9393 :: Text -- ^ 'accountId'

9494 -> AccountsPaymentsList'

95−accountsPaymentsList' pAplAccountId_ =

95+accountsPaymentsList' pAplAccountId_ =

9696 AccountsPaymentsList'

9797 { _aplQuotaUser = Nothing

9898 , _aplPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+20−20

@@ -55,8 +55,8 @@ module Network.Google.Resource.AdSense.Accounts.Reports.Generate

5555 , argFields

5656 ) where

5757

58−import Network.Google.AdSense.Types

59−import Network.Google.Prelude

58+import Network.Google.AdSense.Types

59+import Network.Google.Prelude

6060

6161-- | A resource alias for @AdsenseAccountsReportsGenerate@ which the

6262-- 'AccountsReportsGenerate'' request conforms to.

@@ -116,24 +116,24 @@ type AccountsReportsGenerateResource =

116116--

117117-- /See:/ 'accountsReportsGenerate'' smart constructor.

118118data AccountsReportsGenerate' = AccountsReportsGenerate'

119− { _argQuotaUser :: !(Maybe Text)

120− , _argPrettyPrint :: !Bool

121− , _argUserIP :: !(Maybe Text)

122− , _argDimension :: !(Maybe [Text])

123− , _argLocale :: !(Maybe Text)

124− , _argEndDate :: !Text

125− , _argStartDate :: !Text

126− , _argAccountId :: !Text

127− , _argMetric :: !(Maybe [Text])

128− , _argKey :: !(Maybe Key)

129− , _argCurrency :: !(Maybe Text)

130− , _argSort :: !(Maybe [Text])

131− , _argFilter :: !(Maybe [Text])

132− , _argOAuthToken :: !(Maybe OAuthToken)

133− , _argStartIndex :: !(Maybe Int32)

119+ { _argQuotaUser :: !(Maybe Text)

120+ , _argPrettyPrint :: !Bool

121+ , _argUserIP :: !(Maybe Text)

122+ , _argDimension :: !(Maybe [Text])

123+ , _argLocale :: !(Maybe Text)

124+ , _argEndDate :: !Text

125+ , _argStartDate :: !Text

126+ , _argAccountId :: !Text

127+ , _argMetric :: !(Maybe [Text])

128+ , _argKey :: !(Maybe Key)

129+ , _argCurrency :: !(Maybe Text)

130+ , _argSort :: !(Maybe [Text])

131+ , _argFilter :: !(Maybe [Text])

132+ , _argOAuthToken :: !(Maybe OAuthToken)

133+ , _argStartIndex :: !(Maybe Int32)

134134 , _argUseTimezoneReporting :: !(Maybe Bool)

135− , _argMaxResults :: !(Maybe Int32)

136− , _argFields :: !(Maybe Text)

135+ , _argMaxResults :: !(Maybe Int32)

136+ , _argFields :: !(Maybe Text)

137137 } deriving (Eq,Show,Data,Typeable,Generic)

138138

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

@@ -180,7 +180,7 @@ accountsReportsGenerate'

180180 -> Text -- ^ 'startDate'

181181 -> Text -- ^ 'accountId'

182182 -> AccountsReportsGenerate'

183−accountsReportsGenerate' pArgEndDate_ pArgStartDate_ pArgAccountId_ =

183+accountsReportsGenerate' pArgEndDate_ pArgStartDate_ pArgAccountId_ =

184184 AccountsReportsGenerate'

185185 { _argQuotaUser = Nothing

186186 , _argPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.AdSense.Accounts.Reports.Saved.Generate

4747 , arsgFields

4848 ) where

4949

50−import Network.Google.AdSense.Types

51−import Network.Google.Prelude

50+import Network.Google.AdSense.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AdsenseAccountsReportsSavedGenerate@ which the

5454-- 'AccountsReportsSavedGenerate'' request conforms to.

@@ -74,17 +74,17 @@ type AccountsReportsSavedGenerateResource =

7474--

7575-- /See:/ 'accountsReportsSavedGenerate'' smart constructor.

7676data AccountsReportsSavedGenerate' = AccountsReportsSavedGenerate'

77− { _arsgQuotaUser :: !(Maybe Text)

78− , _arsgPrettyPrint :: !Bool

79− , _arsgUserIP :: !(Maybe Text)

80− , _arsgLocale :: !(Maybe Text)

77+ { _arsgQuotaUser :: !(Maybe Text)

78+ , _arsgPrettyPrint :: !Bool

79+ , _arsgUserIP :: !(Maybe Text)

80+ , _arsgLocale :: !(Maybe Text)

8181 , _arsgSavedReportId :: !Text

82− , _arsgAccountId :: !Text

83− , _arsgKey :: !(Maybe Key)

84− , _arsgOAuthToken :: !(Maybe OAuthToken)

85− , _arsgStartIndex :: !(Maybe Int32)

86− , _arsgMaxResults :: !(Maybe Int32)

87− , _arsgFields :: !(Maybe Text)

82+ , _arsgAccountId :: !Text

83+ , _arsgKey :: !(Maybe Key)

84+ , _arsgOAuthToken :: !(Maybe OAuthToken)

85+ , _arsgStartIndex :: !(Maybe Int32)

86+ , _arsgMaxResults :: !(Maybe Int32)

87+ , _arsgFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -116,7 +116,7 @@ accountsReportsSavedGenerate'

116116 :: Text -- ^ 'savedReportId'

117117 -> Text -- ^ 'accountId'

118118 -> AccountsReportsSavedGenerate'

119−accountsReportsSavedGenerate' pArsgSavedReportId_ pArsgAccountId_ =

119+accountsReportsSavedGenerate' pArsgSavedReportId_ pArsgAccountId_ =

120120 AccountsReportsSavedGenerate'

121121 { _arsgQuotaUser = Nothing

122122 , _arsgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdSense.Accounts.Reports.Saved.List

4444 , arslFields

4545 ) where

4646

47−import Network.Google.AdSense.Types

48−import Network.Google.Prelude

47+import Network.Google.AdSense.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdsenseAccountsReportsSavedList@ which the

5151-- 'AccountsReportsSavedList'' request conforms to.

@@ -69,15 +69,15 @@ type AccountsReportsSavedListResource =

6969--

7070-- /See:/ 'accountsReportsSavedList'' smart constructor.

7171data AccountsReportsSavedList' = AccountsReportsSavedList'

72− { _arslQuotaUser :: !(Maybe Text)

72+ { _arslQuotaUser :: !(Maybe Text)

7373 , _arslPrettyPrint :: !Bool

74− , _arslUserIP :: !(Maybe Text)

75− , _arslAccountId :: !Text

76− , _arslKey :: !(Maybe Key)

77− , _arslPageToken :: !(Maybe Text)

78− , _arslOAuthToken :: !(Maybe OAuthToken)

79− , _arslMaxResults :: !(Maybe Int32)

80− , _arslFields :: !(Maybe Text)

74+ , _arslUserIP :: !(Maybe Text)

75+ , _arslAccountId :: !Text

76+ , _arslKey :: !(Maybe Key)

77+ , _arslPageToken :: !(Maybe Text)

78+ , _arslOAuthToken :: !(Maybe OAuthToken)

79+ , _arslMaxResults :: !(Maybe Int32)

80+ , _arslFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -104,7 +104,7 @@ data AccountsReportsSavedList' = AccountsReportsSavedList'

104104accountsReportsSavedList'

105105 :: Text -- ^ 'accountId'

106106 -> AccountsReportsSavedList'

107−accountsReportsSavedList' pArslAccountId_ =

107+accountsReportsSavedList' pArslAccountId_ =

108108 AccountsReportsSavedList'

109109 { _arslQuotaUser = Nothing

110110 , _arslPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Accounts.Savedadstyles.Get

4343 , asgFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAccountsSavedadstylesGet@ which the

5050-- 'AccountsSavedadstylesGet'' request conforms to.

@@ -65,14 +65,14 @@ type AccountsSavedadstylesGetResource =

6565--

6666-- /See:/ 'accountsSavedadstylesGet'' smart constructor.

6767data AccountsSavedadstylesGet' = AccountsSavedadstylesGet'

68− { _asgQuotaUser :: !(Maybe Text)

69− , _asgPrettyPrint :: !Bool

68+ { _asgQuotaUser :: !(Maybe Text)

69+ , _asgPrettyPrint :: !Bool

7070 , _asgSavedAdStyleId :: !Text

71− , _asgUserIP :: !(Maybe Text)

72− , _asgAccountId :: !Text

73− , _asgKey :: !(Maybe Key)

74− , _asgOAuthToken :: !(Maybe OAuthToken)

75− , _asgFields :: !(Maybe Text)

71+ , _asgUserIP :: !(Maybe Text)

72+ , _asgAccountId :: !Text

73+ , _asgKey :: !(Maybe Key)

74+ , _asgOAuthToken :: !(Maybe OAuthToken)

75+ , _asgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ accountsSavedadstylesGet'

9898 :: Text -- ^ 'savedAdStyleId'

9999 -> Text -- ^ 'accountId'

100100 -> AccountsSavedadstylesGet'

101−accountsSavedadstylesGet' pAsgSavedAdStyleId_ pAsgAccountId_ =

101+accountsSavedadstylesGet' pAsgSavedAdStyleId_ pAsgAccountId_ =

102102 AccountsSavedadstylesGet'

103103 { _asgQuotaUser = Nothing

104104 , _asgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.AdSense.Accounts.Savedadstyles.List

4444 , aslFields

4545 ) where

4646

47−import Network.Google.AdSense.Types

48−import Network.Google.Prelude

47+import Network.Google.AdSense.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AdsenseAccountsSavedadstylesList@ which the

5151-- 'AccountsSavedadstylesList'' request conforms to.

@@ -67,15 +67,15 @@ type AccountsSavedadstylesListResource =

6767--

6868-- /See:/ 'accountsSavedadstylesList'' smart constructor.

6969data AccountsSavedadstylesList' = AccountsSavedadstylesList'

70− { _aslQuotaUser :: !(Maybe Text)

70+ { _aslQuotaUser :: !(Maybe Text)

7171 , _aslPrettyPrint :: !Bool

72− , _aslUserIP :: !(Maybe Text)

73− , _aslAccountId :: !Text

74− , _aslKey :: !(Maybe Key)

75− , _aslPageToken :: !(Maybe Text)

76− , _aslOAuthToken :: !(Maybe OAuthToken)

77− , _aslMaxResults :: !(Maybe Int32)

78− , _aslFields :: !(Maybe Text)

72+ , _aslUserIP :: !(Maybe Text)

73+ , _aslAccountId :: !Text

74+ , _aslKey :: !(Maybe Key)

75+ , _aslPageToken :: !(Maybe Text)

76+ , _aslOAuthToken :: !(Maybe OAuthToken)

77+ , _aslMaxResults :: !(Maybe Int32)

78+ , _aslFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -102,7 +102,7 @@ data AccountsSavedadstylesList' = AccountsSavedadstylesList'

102102accountsSavedadstylesList'

103103 :: Text -- ^ 'accountId'

104104 -> AccountsSavedadstylesList'

105−accountsSavedadstylesList' pAslAccountId_ =

105+accountsSavedadstylesList' pAslAccountId_ =

106106 AccountsSavedadstylesList'

107107 { _aslQuotaUser = Nothing

108108 , _aslPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.Accounts.URLChannels.List

4646 , auclFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseAccountsURLChannelsList@ which the

5353-- 'AccountsURLChannelsList'' request conforms to.

@@ -73,16 +73,16 @@ type AccountsURLChannelsListResource =

7373--

7474-- /See:/ 'accountsURLChannelsList'' smart constructor.

7575data AccountsURLChannelsList' = AccountsURLChannelsList'

76− { _auclQuotaUser :: !(Maybe Text)

76+ { _auclQuotaUser :: !(Maybe Text)

7777 , _auclPrettyPrint :: !Bool

78− , _auclUserIP :: !(Maybe Text)

79− , _auclAdClientId :: !Text

80− , _auclAccountId :: !Text

81− , _auclKey :: !(Maybe Key)

82− , _auclPageToken :: !(Maybe Text)

83− , _auclOAuthToken :: !(Maybe OAuthToken)

84− , _auclMaxResults :: !(Maybe Int32)

85− , _auclFields :: !(Maybe Text)

78+ , _auclUserIP :: !(Maybe Text)

79+ , _auclAdClientId :: !Text

80+ , _auclAccountId :: !Text

81+ , _auclKey :: !(Maybe Key)

82+ , _auclPageToken :: !(Maybe Text)

83+ , _auclOAuthToken :: !(Maybe OAuthToken)

84+ , _auclMaxResults :: !(Maybe Int32)

85+ , _auclFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -112,7 +112,7 @@ accountsURLChannelsList'

112112 :: Text -- ^ 'adClientId'

113113 -> Text -- ^ 'accountId'

114114 -> AccountsURLChannelsList'

115−accountsURLChannelsList' pAuclAdClientId_ pAuclAccountId_ =

115+accountsURLChannelsList' pAuclAdClientId_ pAuclAccountId_ =

116116 AccountsURLChannelsList'

117117 { _auclQuotaUser = Nothing

118118 , _auclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/AdClients/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.AdClients.List

4343 , aclFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAdClientsList@ which the

5050-- 'AdClientsList'' request conforms to.

@@ -64,14 +64,14 @@ type AdClientsListResource =

6464--

6565-- /See:/ 'adClientsList'' smart constructor.

6666data AdClientsList' = AdClientsList'

67− { _aclQuotaUser :: !(Maybe Text)

67+ { _aclQuotaUser :: !(Maybe Text)

6868 , _aclPrettyPrint :: !Bool

69− , _aclUserIP :: !(Maybe Text)

70− , _aclKey :: !(Maybe Key)

71− , _aclPageToken :: !(Maybe Text)

72− , _aclOAuthToken :: !(Maybe OAuthToken)

73− , _aclMaxResults :: !(Maybe Int32)

74− , _aclFields :: !(Maybe Text)

69+ , _aclUserIP :: !(Maybe Text)

70+ , _aclKey :: !(Maybe Key)

71+ , _aclPageToken :: !(Maybe Text)

72+ , _aclOAuthToken :: !(Maybe OAuthToken)

73+ , _aclMaxResults :: !(Maybe Int32)

74+ , _aclFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -95,7 +95,7 @@ data AdClientsList' = AdClientsList'

9595-- * 'aclFields'

9696adClientsList'

9797 :: AdClientsList'

98−adClientsList' =

98+adClientsList' =

9999 AdClientsList'

100100 { _aclQuotaUser = Nothing

101101 , _aclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.AdUnits.CustomChannels.List

4545 , aucclFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseAdUnitsCustomChannelsList@ which the

5252-- 'AdUnitsCustomChannelsList'' request conforms to.

@@ -71,16 +71,16 @@ type AdUnitsCustomChannelsListResource =

7171--

7272-- /See:/ 'adUnitsCustomChannelsList'' smart constructor.

7373data AdUnitsCustomChannelsList' = AdUnitsCustomChannelsList'

74− { _aucclQuotaUser :: !(Maybe Text)

74+ { _aucclQuotaUser :: !(Maybe Text)

7575 , _aucclPrettyPrint :: !Bool

76− , _aucclUserIP :: !(Maybe Text)

77− , _aucclAdUnitId :: !Text

78− , _aucclAdClientId :: !Text

79− , _aucclKey :: !(Maybe Key)

80− , _aucclPageToken :: !(Maybe Text)

81− , _aucclOAuthToken :: !(Maybe OAuthToken)

82− , _aucclMaxResults :: !(Maybe Int32)

83− , _aucclFields :: !(Maybe Text)

76+ , _aucclUserIP :: !(Maybe Text)

77+ , _aucclAdUnitId :: !Text

78+ , _aucclAdClientId :: !Text

79+ , _aucclKey :: !(Maybe Key)

80+ , _aucclPageToken :: !(Maybe Text)

81+ , _aucclOAuthToken :: !(Maybe OAuthToken)

82+ , _aucclMaxResults :: !(Maybe Int32)

83+ , _aucclFields :: !(Maybe Text)

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

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

@@ -110,7 +110,7 @@ adUnitsCustomChannelsList'

110110 :: Text -- ^ 'adUnitId'

111111 -> Text -- ^ 'adClientId'

112112 -> AdUnitsCustomChannelsList'

113−adUnitsCustomChannelsList' pAucclAdUnitId_ pAucclAdClientId_ =

113+adUnitsCustomChannelsList' pAucclAdUnitId_ pAucclAdClientId_ =

114114 AdUnitsCustomChannelsList'

115115 { _aucclQuotaUser = Nothing

116116 , _aucclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.AdUnits.Get

4343 , augFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAdUnitsGet@ which the

5050-- 'AdUnitsGet'' request conforms to.

@@ -65,14 +65,14 @@ type AdUnitsGetResource =

6565--

6666-- /See:/ 'adUnitsGet'' smart constructor.

6767data AdUnitsGet' = AdUnitsGet'

68− { _augQuotaUser :: !(Maybe Text)

68+ { _augQuotaUser :: !(Maybe Text)

6969 , _augPrettyPrint :: !Bool

70− , _augUserIP :: !(Maybe Text)

71− , _augAdUnitId :: !Text

72− , _augAdClientId :: !Text

73− , _augKey :: !(Maybe Key)

74− , _augOAuthToken :: !(Maybe OAuthToken)

75− , _augFields :: !(Maybe Text)

70+ , _augUserIP :: !(Maybe Text)

71+ , _augAdUnitId :: !Text

72+ , _augAdClientId :: !Text

73+ , _augKey :: !(Maybe Key)

74+ , _augOAuthToken :: !(Maybe OAuthToken)

75+ , _augFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ adUnitsGet'

9898 :: Text -- ^ 'adUnitId'

9999 -> Text -- ^ 'adClientId'

100100 -> AdUnitsGet'

101−adUnitsGet' pAugAdUnitId_ pAugAdClientId_ =

101+adUnitsGet' pAugAdUnitId_ pAugAdClientId_ =

102102 AdUnitsGet'

103103 { _augQuotaUser = Nothing

104104 , _augPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/GetAdCode.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.AdUnits.GetAdCode

4343 , augacFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAdUnitsGetAdCode@ which the

5050-- 'AdUnitsGetAdCode'' request conforms to.

@@ -66,14 +66,14 @@ type AdUnitsGetAdCodeResource =

6666--

6767-- /See:/ 'adUnitsGetAdCode'' smart constructor.

6868data AdUnitsGetAdCode' = AdUnitsGetAdCode'

69− { _augacQuotaUser :: !(Maybe Text)

69+ { _augacQuotaUser :: !(Maybe Text)

7070 , _augacPrettyPrint :: !Bool

71− , _augacUserIP :: !(Maybe Text)

72− , _augacAdUnitId :: !Text

73− , _augacAdClientId :: !Text

74− , _augacKey :: !(Maybe Key)

75− , _augacOAuthToken :: !(Maybe OAuthToken)

76− , _augacFields :: !(Maybe Text)

71+ , _augacUserIP :: !(Maybe Text)

72+ , _augacAdUnitId :: !Text

73+ , _augacAdClientId :: !Text

74+ , _augacKey :: !(Maybe Key)

75+ , _augacOAuthToken :: !(Maybe OAuthToken)

76+ , _augacFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ adUnitsGetAdCode'

9999 :: Text -- ^ 'adUnitId'

100100 -> Text -- ^ 'adClientId'

101101 -> AdUnitsGetAdCode'

102−adUnitsGetAdCode' pAugacAdUnitId_ pAugacAdClientId_ =

102+adUnitsGetAdCode' pAugacAdUnitId_ pAugacAdClientId_ =

103103 AdUnitsGetAdCode'

104104 { _augacQuotaUser = Nothing

105105 , _augacPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.AdUnits.List

4545 , aulFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseAdUnitsList@ which the

5252-- 'AdUnitsList'' request conforms to.

@@ -69,16 +69,16 @@ type AdUnitsListResource =

6969--

7070-- /See:/ 'adUnitsList'' smart constructor.

7171data AdUnitsList' = AdUnitsList'

72− { _aulQuotaUser :: !(Maybe Text)

73− , _aulPrettyPrint :: !Bool

72+ { _aulQuotaUser :: !(Maybe Text)

73+ , _aulPrettyPrint :: !Bool

7474 , _aulIncludeInactive :: !(Maybe Bool)

75− , _aulUserIP :: !(Maybe Text)

76− , _aulAdClientId :: !Text

77− , _aulKey :: !(Maybe Key)

78− , _aulPageToken :: !(Maybe Text)

79− , _aulOAuthToken :: !(Maybe OAuthToken)

80− , _aulMaxResults :: !(Maybe Int32)

81− , _aulFields :: !(Maybe Text)

75+ , _aulUserIP :: !(Maybe Text)

76+ , _aulAdClientId :: !Text

77+ , _aulKey :: !(Maybe Key)

78+ , _aulPageToken :: !(Maybe Text)

79+ , _aulOAuthToken :: !(Maybe OAuthToken)

80+ , _aulMaxResults :: !(Maybe Int32)

81+ , _aulFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ data AdUnitsList' = AdUnitsList'

107107adUnitsList'

108108 :: Text -- ^ 'adClientId'

109109 -> AdUnitsList'

110−adUnitsList' pAulAdClientId_ =

110+adUnitsList' pAulAdClientId_ =

111111 AdUnitsList'

112112 { _aulQuotaUser = Nothing

113113 , _aulPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/Delete.hs+9−9

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Alerts.Delete

4343 , adFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseAlertsDelete@ which the

5050-- 'AlertsDelete'' request conforms to.

@@ -64,13 +64,13 @@ type AlertsDeleteResource =

6464--

6565-- /See:/ 'alertsDelete'' smart constructor.

6666data AlertsDelete' = AlertsDelete'

67− { _adQuotaUser :: !(Maybe Text)

67+ { _adQuotaUser :: !(Maybe Text)

6868 , _adPrettyPrint :: !Bool

69− , _adUserIP :: !(Maybe Text)

70− , _adAlertId :: !Text

71− , _adKey :: !(Maybe Key)

72− , _adOAuthToken :: !(Maybe OAuthToken)

73− , _adFields :: !(Maybe Text)

69+ , _adUserIP :: !(Maybe Text)

70+ , _adAlertId :: !Text

71+ , _adKey :: !(Maybe Key)

72+ , _adOAuthToken :: !(Maybe OAuthToken)

73+ , _adFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data AlertsDelete' = AlertsDelete'

9393alertsDelete'

9494 :: Text -- ^ 'alertId'

9595 -> AlertsDelete'

96−alertsDelete' pAdAlertId_ =

96+alertsDelete' pAdAlertId_ =

9797 AlertsDelete'

9898 { _adQuotaUser = Nothing

9999 , _adPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/List.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdSense.Alerts.List

4242 , aFields

4343 ) where

4444

45−import Network.Google.AdSense.Types

46−import Network.Google.Prelude

45+import Network.Google.AdSense.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdsenseAlertsList@ which the

4949-- 'AlertsList'' request conforms to.

@@ -62,13 +62,13 @@ type AlertsListResource =

6262--

6363-- /See:/ 'alertsList'' smart constructor.

6464data AlertsList' = AlertsList'

65− { _aQuotaUser :: !(Maybe Text)

65+ { _aQuotaUser :: !(Maybe Text)

6666 , _aPrettyPrint :: !Bool

67− , _aUserIP :: !(Maybe Text)

68− , _aLocale :: !(Maybe Text)

69− , _aKey :: !(Maybe Key)

70− , _aOAuthToken :: !(Maybe OAuthToken)

71− , _aFields :: !(Maybe Text)

67+ , _aUserIP :: !(Maybe Text)

68+ , _aLocale :: !(Maybe Text)

69+ , _aKey :: !(Maybe Key)

70+ , _aOAuthToken :: !(Maybe OAuthToken)

71+ , _aFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -90,7 +90,7 @@ data AlertsList' = AlertsList'

9090-- * 'aFields'

9191alertsList'

9292 :: AlertsList'

93−alertsList' =

93+alertsList' =

9494 AlertsList'

9595 { _aQuotaUser = Nothing

9696 , _aPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.CustomChannels.AdUnits.List

4646 , ccaulFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseCustomChannelsAdUnitsList@ which the

5353-- 'CustomChannelsAdUnitsList'' request conforms to.

@@ -72,17 +72,17 @@ type CustomChannelsAdUnitsListResource =

7272--

7373-- /See:/ 'customChannelsAdUnitsList'' smart constructor.

7474data CustomChannelsAdUnitsList' = CustomChannelsAdUnitsList'

75− { _ccaulQuotaUser :: !(Maybe Text)

76− , _ccaulPrettyPrint :: !Bool

75+ { _ccaulQuotaUser :: !(Maybe Text)

76+ , _ccaulPrettyPrint :: !Bool

7777 , _ccaulIncludeInactive :: !(Maybe Bool)

7878 , _ccaulCustomChannelId :: !Text

79− , _ccaulUserIP :: !(Maybe Text)

80− , _ccaulAdClientId :: !Text

81− , _ccaulKey :: !(Maybe Key)

82− , _ccaulPageToken :: !(Maybe Text)

83− , _ccaulOAuthToken :: !(Maybe OAuthToken)

84− , _ccaulMaxResults :: !(Maybe Int32)

85− , _ccaulFields :: !(Maybe Text)

79+ , _ccaulUserIP :: !(Maybe Text)

80+ , _ccaulAdClientId :: !Text

81+ , _ccaulKey :: !(Maybe Key)

82+ , _ccaulPageToken :: !(Maybe Text)

83+ , _ccaulOAuthToken :: !(Maybe OAuthToken)

84+ , _ccaulMaxResults :: !(Maybe Int32)

85+ , _ccaulFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ customChannelsAdUnitsList'

114114 :: Text -- ^ 'customChannelId'

115115 -> Text -- ^ 'adClientId'

116116 -> CustomChannelsAdUnitsList'

117−customChannelsAdUnitsList' pCcaulCustomChannelId_ pCcaulAdClientId_ =

117+customChannelsAdUnitsList' pCcaulCustomChannelId_ pCcaulAdClientId_ =

118118 CustomChannelsAdUnitsList'

119119 { _ccaulQuotaUser = Nothing

120120 , _ccaulPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.CustomChannels.Get

4343 , ccgFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseCustomChannelsGet@ which the

5050-- 'CustomChannelsGet'' request conforms to.

@@ -65,14 +65,14 @@ type CustomChannelsGetResource =

6565--

6666-- /See:/ 'customChannelsGet'' smart constructor.

6767data CustomChannelsGet' = CustomChannelsGet'

68− { _ccgQuotaUser :: !(Maybe Text)

69− , _ccgPrettyPrint :: !Bool

68+ { _ccgQuotaUser :: !(Maybe Text)

69+ , _ccgPrettyPrint :: !Bool

7070 , _ccgCustomChannelId :: !Text

71− , _ccgUserIP :: !(Maybe Text)

72− , _ccgAdClientId :: !Text

73− , _ccgKey :: !(Maybe Key)

74− , _ccgOAuthToken :: !(Maybe OAuthToken)

75− , _ccgFields :: !(Maybe Text)

71+ , _ccgUserIP :: !(Maybe Text)

72+ , _ccgAdClientId :: !Text

73+ , _ccgKey :: !(Maybe Key)

74+ , _ccgOAuthToken :: !(Maybe OAuthToken)

75+ , _ccgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ customChannelsGet'

9898 :: Text -- ^ 'customChannelId'

9999 -> Text -- ^ 'adClientId'

100100 -> CustomChannelsGet'

101−customChannelsGet' pCcgCustomChannelId_ pCcgAdClientId_ =

101+customChannelsGet' pCcgCustomChannelId_ pCcgAdClientId_ =

102102 CustomChannelsGet'

103103 { _ccgQuotaUser = Nothing

104104 , _ccgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/List.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.CustomChannels.List

4545 , cclFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseCustomChannelsList@ which the

5252-- 'CustomChannelsList'' request conforms to.

@@ -70,15 +70,15 @@ type CustomChannelsListResource =

7070--

7171-- /See:/ 'customChannelsList'' smart constructor.

7272data CustomChannelsList' = CustomChannelsList'

73− { _cclQuotaUser :: !(Maybe Text)

73+ { _cclQuotaUser :: !(Maybe Text)

7474 , _cclPrettyPrint :: !Bool

75− , _cclUserIP :: !(Maybe Text)

76− , _cclAdClientId :: !Text

77− , _cclKey :: !(Maybe Key)

78− , _cclPageToken :: !(Maybe Text)

79− , _cclOAuthToken :: !(Maybe OAuthToken)

80− , _cclMaxResults :: !(Maybe Int32)

81− , _cclFields :: !(Maybe Text)

75+ , _cclUserIP :: !(Maybe Text)

76+ , _cclAdClientId :: !Text

77+ , _cclKey :: !(Maybe Key)

78+ , _cclPageToken :: !(Maybe Text)

79+ , _cclOAuthToken :: !(Maybe OAuthToken)

80+ , _cclMaxResults :: !(Maybe Int32)

81+ , _cclFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -105,7 +105,7 @@ data CustomChannelsList' = CustomChannelsList'

105105customChannelsList'

106106 :: Text -- ^ 'adClientId'

107107 -> CustomChannelsList'

108−customChannelsList' pCclAdClientId_ =

108+customChannelsList' pCclAdClientId_ =

109109 CustomChannelsList'

110110 { _cclQuotaUser = Nothing

111111 , _cclPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs+8−8

@@ -41,8 +41,8 @@ module Network.Google.Resource.AdSense.Metadata.Dimensions.List

4141 , mdlFields

4242 ) where

4343

44−import Network.Google.AdSense.Types

45−import Network.Google.Prelude

44+import Network.Google.AdSense.Types

45+import Network.Google.Prelude

4646

4747-- | A resource alias for @AdsenseMetadataDimensionsList@ which the

4848-- 'MetadataDimensionsList'' request conforms to.

@@ -61,12 +61,12 @@ type MetadataDimensionsListResource =

6161--

6262-- /See:/ 'metadataDimensionsList'' smart constructor.

6363data MetadataDimensionsList' = MetadataDimensionsList'

64− { _mdlQuotaUser :: !(Maybe Text)

64+ { _mdlQuotaUser :: !(Maybe Text)

6565 , _mdlPrettyPrint :: !Bool

66− , _mdlUserIP :: !(Maybe Text)

67− , _mdlKey :: !(Maybe Key)

68− , _mdlOAuthToken :: !(Maybe OAuthToken)

69− , _mdlFields :: !(Maybe Text)

66+ , _mdlUserIP :: !(Maybe Text)

67+ , _mdlKey :: !(Maybe Key)

68+ , _mdlOAuthToken :: !(Maybe OAuthToken)

69+ , _mdlFields :: !(Maybe Text)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

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

@@ -86,7 +86,7 @@ data MetadataDimensionsList' = MetadataDimensionsList'

8686-- * 'mdlFields'

8787metadataDimensionsList'

8888 :: MetadataDimensionsList'

89−metadataDimensionsList' =

89+metadataDimensionsList' =

9090 MetadataDimensionsList'

9191 { _mdlQuotaUser = Nothing

9292 , _mdlPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs+8−8

@@ -41,8 +41,8 @@ module Network.Google.Resource.AdSense.Metadata.Metrics.List

4141 , mmlFields

4242 ) where

4343

44−import Network.Google.AdSense.Types

45−import Network.Google.Prelude

44+import Network.Google.AdSense.Types

45+import Network.Google.Prelude

4646

4747-- | A resource alias for @AdsenseMetadataMetricsList@ which the

4848-- 'MetadataMetricsList'' request conforms to.

@@ -61,12 +61,12 @@ type MetadataMetricsListResource =

6161--

6262-- /See:/ 'metadataMetricsList'' smart constructor.

6363data MetadataMetricsList' = MetadataMetricsList'

64− { _mmlQuotaUser :: !(Maybe Text)

64+ { _mmlQuotaUser :: !(Maybe Text)

6565 , _mmlPrettyPrint :: !Bool

66− , _mmlUserIP :: !(Maybe Text)

67− , _mmlKey :: !(Maybe Key)

68− , _mmlOAuthToken :: !(Maybe OAuthToken)

69− , _mmlFields :: !(Maybe Text)

66+ , _mmlUserIP :: !(Maybe Text)

67+ , _mmlKey :: !(Maybe Key)

68+ , _mmlOAuthToken :: !(Maybe OAuthToken)

69+ , _mmlFields :: !(Maybe Text)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

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

@@ -86,7 +86,7 @@ data MetadataMetricsList' = MetadataMetricsList'

8686-- * 'mmlFields'

8787metadataMetricsList'

8888 :: MetadataMetricsList'

89−metadataMetricsList' =

89+metadataMetricsList' =

9090 MetadataMetricsList'

9191 { _mmlQuotaUser = Nothing

9292 , _mmlPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Payments/List.hs+8−8

@@ -41,8 +41,8 @@ module Network.Google.Resource.AdSense.Payments.List

4141 , plFields

4242 ) where

4343

44−import Network.Google.AdSense.Types

45−import Network.Google.Prelude

44+import Network.Google.AdSense.Types

45+import Network.Google.Prelude

4646

4747-- | A resource alias for @AdsensePaymentsList@ which the

4848-- 'PaymentsList'' request conforms to.

@@ -60,12 +60,12 @@ type PaymentsListResource =

6060--

6161-- /See:/ 'paymentsList'' smart constructor.

6262data PaymentsList' = PaymentsList'

63− { _plQuotaUser :: !(Maybe Text)

63+ { _plQuotaUser :: !(Maybe Text)

6464 , _plPrettyPrint :: !Bool

65− , _plUserIP :: !(Maybe Text)

66− , _plKey :: !(Maybe Key)

67− , _plOAuthToken :: !(Maybe OAuthToken)

68− , _plFields :: !(Maybe Text)

65+ , _plUserIP :: !(Maybe Text)

66+ , _plKey :: !(Maybe Key)

67+ , _plOAuthToken :: !(Maybe OAuthToken)

68+ , _plFields :: !(Maybe Text)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

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

@@ -85,7 +85,7 @@ data PaymentsList' = PaymentsList'

8585-- * 'plFields'

8686paymentsList'

8787 :: PaymentsList'

88−paymentsList' =

88+paymentsList' =

8989 PaymentsList'

9090 { _plQuotaUser = Nothing

9191 , _plPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+20−20

@@ -55,8 +55,8 @@ module Network.Google.Resource.AdSense.Reports.Generate

5555 , rgFields

5656 ) where

5757

58−import Network.Google.AdSense.Types

59−import Network.Google.Prelude

58+import Network.Google.AdSense.Types

59+import Network.Google.Prelude

6060

6161-- | A resource alias for @AdsenseReportsGenerate@ which the

6262-- 'ReportsGenerate'' request conforms to.

@@ -113,24 +113,24 @@ type ReportsGenerateResource =

113113--

114114-- /See:/ 'reportsGenerate'' smart constructor.

115115data ReportsGenerate' = ReportsGenerate'

116− { _rgQuotaUser :: !(Maybe Text)

117− , _rgPrettyPrint :: !Bool

118− , _rgUserIP :: !(Maybe Text)

119− , _rgDimension :: !(Maybe [Text])

120− , _rgLocale :: !(Maybe Text)

121− , _rgEndDate :: !Text

122− , _rgStartDate :: !Text

123− , _rgAccountId :: !(Maybe [Text])

124− , _rgMetric :: !(Maybe [Text])

125− , _rgKey :: !(Maybe Key)

126− , _rgCurrency :: !(Maybe Text)

127− , _rgSort :: !(Maybe [Text])

128− , _rgFilter :: !(Maybe [Text])

129− , _rgOAuthToken :: !(Maybe OAuthToken)

130− , _rgStartIndex :: !(Maybe Int32)

116+ { _rgQuotaUser :: !(Maybe Text)

117+ , _rgPrettyPrint :: !Bool

118+ , _rgUserIP :: !(Maybe Text)

119+ , _rgDimension :: !(Maybe [Text])

120+ , _rgLocale :: !(Maybe Text)

121+ , _rgEndDate :: !Text

122+ , _rgStartDate :: !Text

123+ , _rgAccountId :: !(Maybe [Text])

124+ , _rgMetric :: !(Maybe [Text])

125+ , _rgKey :: !(Maybe Key)

126+ , _rgCurrency :: !(Maybe Text)

127+ , _rgSort :: !(Maybe [Text])

128+ , _rgFilter :: !(Maybe [Text])

129+ , _rgOAuthToken :: !(Maybe OAuthToken)

130+ , _rgStartIndex :: !(Maybe Int32)

131131 , _rgUseTimezoneReporting :: !(Maybe Bool)

132− , _rgMaxResults :: !(Maybe Int32)

133− , _rgFields :: !(Maybe Text)

132+ , _rgMaxResults :: !(Maybe Int32)

133+ , _rgFields :: !(Maybe Text)

134134 } deriving (Eq,Show,Data,Typeable,Generic)

135135

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

@@ -176,7 +176,7 @@ reportsGenerate'

176176 :: Text -- ^ 'endDate'

177177 -> Text -- ^ 'startDate'

178178 -> ReportsGenerate'

179−reportsGenerate' pRgEndDate_ pRgStartDate_ =

179+reportsGenerate' pRgEndDate_ pRgStartDate_ =

180180 ReportsGenerate'

181181 { _rgQuotaUser = Nothing

182182 , _rgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.AdSense.Reports.Saved.Generate

4646 , rsgFields

4747 ) where

4848

49−import Network.Google.AdSense.Types

50−import Network.Google.Prelude

49+import Network.Google.AdSense.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AdsenseReportsSavedGenerate@ which the

5353-- 'ReportsSavedGenerate'' request conforms to.

@@ -71,16 +71,16 @@ type ReportsSavedGenerateResource =

7171--

7272-- /See:/ 'reportsSavedGenerate'' smart constructor.

7373data ReportsSavedGenerate' = ReportsSavedGenerate'

74− { _rsgQuotaUser :: !(Maybe Text)

75− , _rsgPrettyPrint :: !Bool

76− , _rsgUserIP :: !(Maybe Text)

77− , _rsgLocale :: !(Maybe Text)

74+ { _rsgQuotaUser :: !(Maybe Text)

75+ , _rsgPrettyPrint :: !Bool

76+ , _rsgUserIP :: !(Maybe Text)

77+ , _rsgLocale :: !(Maybe Text)

7878 , _rsgSavedReportId :: !Text

79− , _rsgKey :: !(Maybe Key)

80− , _rsgOAuthToken :: !(Maybe OAuthToken)

81− , _rsgStartIndex :: !(Maybe Int32)

82− , _rsgMaxResults :: !(Maybe Int32)

83− , _rsgFields :: !(Maybe Text)

79+ , _rsgKey :: !(Maybe Key)

80+ , _rsgOAuthToken :: !(Maybe OAuthToken)

81+ , _rsgStartIndex :: !(Maybe Int32)

82+ , _rsgMaxResults :: !(Maybe Int32)

83+ , _rsgFields :: !(Maybe Text)

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

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

@@ -109,7 +109,7 @@ data ReportsSavedGenerate' = ReportsSavedGenerate'

109109reportsSavedGenerate'

110110 :: Text -- ^ 'savedReportId'

111111 -> ReportsSavedGenerate'

112−reportsSavedGenerate' pRsgSavedReportId_ =

112+reportsSavedGenerate' pRsgSavedReportId_ =

113113 ReportsSavedGenerate'

114114 { _rsgQuotaUser = Nothing

115115 , _rsgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Reports.Saved.List

4343 , rslFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseReportsSavedList@ which the

5050-- 'ReportsSavedList'' request conforms to.

@@ -65,14 +65,14 @@ type ReportsSavedListResource =

6565--

6666-- /See:/ 'reportsSavedList'' smart constructor.

6767data ReportsSavedList' = ReportsSavedList'

68− { _rslQuotaUser :: !(Maybe Text)

68+ { _rslQuotaUser :: !(Maybe Text)

6969 , _rslPrettyPrint :: !Bool

70− , _rslUserIP :: !(Maybe Text)

71− , _rslKey :: !(Maybe Key)

72− , _rslPageToken :: !(Maybe Text)

73− , _rslOAuthToken :: !(Maybe OAuthToken)

74− , _rslMaxResults :: !(Maybe Int32)

75− , _rslFields :: !(Maybe Text)

70+ , _rslUserIP :: !(Maybe Text)

71+ , _rslKey :: !(Maybe Key)

72+ , _rslPageToken :: !(Maybe Text)

73+ , _rslOAuthToken :: !(Maybe OAuthToken)

74+ , _rslMaxResults :: !(Maybe Int32)

75+ , _rslFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -96,7 +96,7 @@ data ReportsSavedList' = ReportsSavedList'

9696-- * 'rslFields'

9797reportsSavedList'

9898 :: ReportsSavedList'

99−reportsSavedList' =

99+reportsSavedList' =

100100 ReportsSavedList'

101101 { _rslQuotaUser = Nothing

102102 , _rslPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.AdSense.Savedadstyles.Get

4242 , sgFields

4343 ) where

4444

45−import Network.Google.AdSense.Types

46−import Network.Google.Prelude

45+import Network.Google.AdSense.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AdsenseSavedadstylesGet@ which the

4949-- 'SavedadstylesGet'' request conforms to.

@@ -62,13 +62,13 @@ type SavedadstylesGetResource =

6262--

6363-- /See:/ 'savedadstylesGet'' smart constructor.

6464data SavedadstylesGet' = SavedadstylesGet'

65− { _sgQuotaUser :: !(Maybe Text)

66− , _sgPrettyPrint :: !Bool

65+ { _sgQuotaUser :: !(Maybe Text)

66+ , _sgPrettyPrint :: !Bool

6767 , _sgSavedAdStyleId :: !Text

68− , _sgUserIP :: !(Maybe Text)

69− , _sgKey :: !(Maybe Key)

70− , _sgOAuthToken :: !(Maybe OAuthToken)

71− , _sgFields :: !(Maybe Text)

68+ , _sgUserIP :: !(Maybe Text)

69+ , _sgKey :: !(Maybe Key)

70+ , _sgOAuthToken :: !(Maybe OAuthToken)

71+ , _sgFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data SavedadstylesGet' = SavedadstylesGet'

9191savedadstylesGet'

9292 :: Text -- ^ 'savedAdStyleId'

9393 -> SavedadstylesGet'

94−savedadstylesGet' pSgSavedAdStyleId_ =

94+savedadstylesGet' pSgSavedAdStyleId_ =

9595 SavedadstylesGet'

9696 { _sgQuotaUser = Nothing

9797 , _sgPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.AdSense.Savedadstyles.List

4343 , slFields

4444 ) where

4545

46−import Network.Google.AdSense.Types

47−import Network.Google.Prelude

46+import Network.Google.AdSense.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AdsenseSavedadstylesList@ which the

5050-- 'SavedadstylesList'' request conforms to.

@@ -64,14 +64,14 @@ type SavedadstylesListResource =

6464--

6565-- /See:/ 'savedadstylesList'' smart constructor.

6666data SavedadstylesList' = SavedadstylesList'

67− { _slQuotaUser :: !(Maybe Text)

67+ { _slQuotaUser :: !(Maybe Text)

6868 , _slPrettyPrint :: !Bool

69− , _slUserIP :: !(Maybe Text)

70− , _slKey :: !(Maybe Key)

71− , _slPageToken :: !(Maybe Text)

72− , _slOAuthToken :: !(Maybe OAuthToken)

73− , _slMaxResults :: !(Maybe Int32)

74− , _slFields :: !(Maybe Text)

69+ , _slUserIP :: !(Maybe Text)

70+ , _slKey :: !(Maybe Key)

71+ , _slPageToken :: !(Maybe Text)

72+ , _slOAuthToken :: !(Maybe OAuthToken)

73+ , _slMaxResults :: !(Maybe Int32)

74+ , _slFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -95,7 +95,7 @@ data SavedadstylesList' = SavedadstylesList'

9595-- * 'slFields'

9696savedadstylesList'

9797 :: SavedadstylesList'

98−savedadstylesList' =

98+savedadstylesList' =

9999 SavedadstylesList'

100100 { _slQuotaUser = Nothing

101101 , _slPrettyPrint = True

gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.AdSense.URLChannels.List

4545 , uclFields

4646 ) where

4747

48−import Network.Google.AdSense.Types

49−import Network.Google.Prelude

48+import Network.Google.AdSense.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AdsenseURLChannelsList@ which the

5252-- 'URLChannelsList'' request conforms to.

@@ -69,15 +69,15 @@ type URLChannelsListResource =

6969--

7070-- /See:/ 'urlChannelsList'' smart constructor.

7171data URLChannelsList' = URLChannelsList'

72− { _uclQuotaUser :: !(Maybe Text)

72+ { _uclQuotaUser :: !(Maybe Text)

7373 , _uclPrettyPrint :: !Bool

74− , _uclUserIP :: !(Maybe Text)

75− , _uclAdClientId :: !Text

76− , _uclKey :: !(Maybe Key)

77− , _uclPageToken :: !(Maybe Text)

78− , _uclOAuthToken :: !(Maybe OAuthToken)

79− , _uclMaxResults :: !(Maybe Int32)

80− , _uclFields :: !(Maybe Text)

74+ , _uclUserIP :: !(Maybe Text)

75+ , _uclAdClientId :: !Text

76+ , _uclKey :: !(Maybe Key)

77+ , _uclPageToken :: !(Maybe Text)

78+ , _uclOAuthToken :: !(Maybe OAuthToken)

79+ , _uclMaxResults :: !(Maybe Int32)

80+ , _uclFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -104,7 +104,7 @@ data URLChannelsList' = URLChannelsList'

104104urlChannelsList'

105105 :: Text -- ^ 'adClientId'

106106 -> URLChannelsList'

107−urlChannelsList' pUclAdClientId_ =

107+urlChannelsList' pUclAdClientId_ =

108108 URLChannelsList'

109109 { _uclQuotaUser = Nothing

110110 , _uclPrettyPrint = True

gogol-analytics/gen/Network/Google/Analytics.hs+80−80

@@ -1246,86 +1246,86 @@ module Network.Google.Analytics

12461246 , columnAttributes

12471247 ) where

12481248

1249−import Network.Google.Analytics.Types

1250−import Network.Google.Prelude

1251−import Network.Google.Resource.Analytics.Data.Ga.Get

1252−import Network.Google.Resource.Analytics.Data.Mcf.Get

1253−import Network.Google.Resource.Analytics.Data.Realtime.Get

1254−import Network.Google.Resource.Analytics.Management.Accounts.List

1255−import Network.Google.Resource.Analytics.Management.AccountSummaries.List

1256−import Network.Google.Resource.Analytics.Management.AccountUserLinks.Delete

1257−import Network.Google.Resource.Analytics.Management.AccountUserLinks.Insert

1258−import Network.Google.Resource.Analytics.Management.AccountUserLinks.List

1259−import Network.Google.Resource.Analytics.Management.AccountUserLinks.Update

1260−import Network.Google.Resource.Analytics.Management.CustomDataSources.List

1261−import Network.Google.Resource.Analytics.Management.CustomDimensions.Get

1262−import Network.Google.Resource.Analytics.Management.CustomDimensions.Insert

1263−import Network.Google.Resource.Analytics.Management.CustomDimensions.List

1264−import Network.Google.Resource.Analytics.Management.CustomDimensions.Patch

1265−import Network.Google.Resource.Analytics.Management.CustomDimensions.Update

1266−import Network.Google.Resource.Analytics.Management.CustomMetrics.Get

1267−import Network.Google.Resource.Analytics.Management.CustomMetrics.Insert

1268−import Network.Google.Resource.Analytics.Management.CustomMetrics.List

1269−import Network.Google.Resource.Analytics.Management.CustomMetrics.Patch

1270−import Network.Google.Resource.Analytics.Management.CustomMetrics.Update

1271−import Network.Google.Resource.Analytics.Management.Experiments.Delete

1272−import Network.Google.Resource.Analytics.Management.Experiments.Get

1273−import Network.Google.Resource.Analytics.Management.Experiments.Insert

1274−import Network.Google.Resource.Analytics.Management.Experiments.List

1275−import Network.Google.Resource.Analytics.Management.Experiments.Patch

1276−import Network.Google.Resource.Analytics.Management.Experiments.Update

1277−import Network.Google.Resource.Analytics.Management.Filters.Delete

1278−import Network.Google.Resource.Analytics.Management.Filters.Get

1279−import Network.Google.Resource.Analytics.Management.Filters.Insert

1280−import Network.Google.Resource.Analytics.Management.Filters.List

1281−import Network.Google.Resource.Analytics.Management.Filters.Patch

1282−import Network.Google.Resource.Analytics.Management.Filters.Update

1283−import Network.Google.Resource.Analytics.Management.Goals.Get

1284−import Network.Google.Resource.Analytics.Management.Goals.Insert

1285−import Network.Google.Resource.Analytics.Management.Goals.List

1286−import Network.Google.Resource.Analytics.Management.Goals.Patch

1287−import Network.Google.Resource.Analytics.Management.Goals.Update

1288−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Delete

1289−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Get

1290−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Insert

1291−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.List

1292−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Patch

1293−import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Update

1294−import Network.Google.Resource.Analytics.Management.ProFiles.Delete

1295−import Network.Google.Resource.Analytics.Management.ProFiles.Get

1296−import Network.Google.Resource.Analytics.Management.ProFiles.Insert

1297−import Network.Google.Resource.Analytics.Management.ProFiles.List

1298−import Network.Google.Resource.Analytics.Management.ProFiles.Patch

1299−import Network.Google.Resource.Analytics.Management.ProFiles.Update

1300−import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Delete

1301−import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Insert

1302−import Network.Google.Resource.Analytics.Management.ProFileUserLinks.List

1303−import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Update

1304−import Network.Google.Resource.Analytics.Management.Segments.List

1305−import Network.Google.Resource.Analytics.Management.UnSampledReports.Get

1306−import Network.Google.Resource.Analytics.Management.UnSampledReports.Insert

1307−import Network.Google.Resource.Analytics.Management.UnSampledReports.List

1308−import Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData

1309−import Network.Google.Resource.Analytics.Management.Uploads.Get

1310−import Network.Google.Resource.Analytics.Management.Uploads.List

1311−import Network.Google.Resource.Analytics.Management.Uploads.UploadData

1312−import Network.Google.Resource.Analytics.Management.WebProperties.Get

1313−import Network.Google.Resource.Analytics.Management.WebProperties.Insert

1314−import Network.Google.Resource.Analytics.Management.WebProperties.List

1315−import Network.Google.Resource.Analytics.Management.WebProperties.Patch

1316−import Network.Google.Resource.Analytics.Management.WebProperties.Update

1317−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Delete

1318−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Get

1319−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Insert

1320−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.List

1321−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Patch

1322−import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Update

1323−import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Delete

1324−import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Insert

1325−import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.List

1326−import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Update

1327−import Network.Google.Resource.Analytics.Metadata.Columns.List

1328−import Network.Google.Resource.Analytics.Provisioning.CreateAccountTicket

1249+import Network.Google.Prelude

1250+import Network.Google.Analytics.Types

1251+import Network.Google.Resource.Analytics.Data.Ga.Get

1252+import Network.Google.Resource.Analytics.Data.Mcf.Get

1253+import Network.Google.Resource.Analytics.Data.Realtime.Get

1254+import Network.Google.Resource.Analytics.Management.AccountSummaries.List

1255+import Network.Google.Resource.Analytics.Management.AccountUserLinks.Delete

1256+import Network.Google.Resource.Analytics.Management.AccountUserLinks.Insert

1257+import Network.Google.Resource.Analytics.Management.AccountUserLinks.List

1258+import Network.Google.Resource.Analytics.Management.AccountUserLinks.Update

1259+import Network.Google.Resource.Analytics.Management.Accounts.List

1260+import Network.Google.Resource.Analytics.Management.CustomDataSources.List

1261+import Network.Google.Resource.Analytics.Management.CustomDimensions.Get

1262+import Network.Google.Resource.Analytics.Management.CustomDimensions.Insert

1263+import Network.Google.Resource.Analytics.Management.CustomDimensions.List

1264+import Network.Google.Resource.Analytics.Management.CustomDimensions.Patch

1265+import Network.Google.Resource.Analytics.Management.CustomDimensions.Update

1266+import Network.Google.Resource.Analytics.Management.CustomMetrics.Get

1267+import Network.Google.Resource.Analytics.Management.CustomMetrics.Insert

1268+import Network.Google.Resource.Analytics.Management.CustomMetrics.List

1269+import Network.Google.Resource.Analytics.Management.CustomMetrics.Patch

1270+import Network.Google.Resource.Analytics.Management.CustomMetrics.Update

1271+import Network.Google.Resource.Analytics.Management.Experiments.Delete

1272+import Network.Google.Resource.Analytics.Management.Experiments.Get

1273+import Network.Google.Resource.Analytics.Management.Experiments.Insert

1274+import Network.Google.Resource.Analytics.Management.Experiments.List

1275+import Network.Google.Resource.Analytics.Management.Experiments.Patch

1276+import Network.Google.Resource.Analytics.Management.Experiments.Update

1277+import Network.Google.Resource.Analytics.Management.Filters.Delete

1278+import Network.Google.Resource.Analytics.Management.Filters.Get

1279+import Network.Google.Resource.Analytics.Management.Filters.Insert

1280+import Network.Google.Resource.Analytics.Management.Filters.List

1281+import Network.Google.Resource.Analytics.Management.Filters.Patch

1282+import Network.Google.Resource.Analytics.Management.Filters.Update

1283+import Network.Google.Resource.Analytics.Management.Goals.Get

1284+import Network.Google.Resource.Analytics.Management.Goals.Insert

1285+import Network.Google.Resource.Analytics.Management.Goals.List

1286+import Network.Google.Resource.Analytics.Management.Goals.Patch

1287+import Network.Google.Resource.Analytics.Management.Goals.Update

1288+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Delete

1289+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Get

1290+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Insert

1291+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.List

1292+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Patch

1293+import Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Update

1294+import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Delete

1295+import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Insert

1296+import Network.Google.Resource.Analytics.Management.ProFileUserLinks.List

1297+import Network.Google.Resource.Analytics.Management.ProFileUserLinks.Update

1298+import Network.Google.Resource.Analytics.Management.ProFiles.Delete

1299+import Network.Google.Resource.Analytics.Management.ProFiles.Get

1300+import Network.Google.Resource.Analytics.Management.ProFiles.Insert

1301+import Network.Google.Resource.Analytics.Management.ProFiles.List

1302+import Network.Google.Resource.Analytics.Management.ProFiles.Patch

1303+import Network.Google.Resource.Analytics.Management.ProFiles.Update

1304+import Network.Google.Resource.Analytics.Management.Segments.List

1305+import Network.Google.Resource.Analytics.Management.UnSampledReports.Get

1306+import Network.Google.Resource.Analytics.Management.UnSampledReports.Insert

1307+import Network.Google.Resource.Analytics.Management.UnSampledReports.List

1308+import Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData

1309+import Network.Google.Resource.Analytics.Management.Uploads.Get

1310+import Network.Google.Resource.Analytics.Management.Uploads.List

1311+import Network.Google.Resource.Analytics.Management.Uploads.UploadData

1312+import Network.Google.Resource.Analytics.Management.WebProperties.Get

1313+import Network.Google.Resource.Analytics.Management.WebProperties.Insert

1314+import Network.Google.Resource.Analytics.Management.WebProperties.List

1315+import Network.Google.Resource.Analytics.Management.WebProperties.Patch

1316+import Network.Google.Resource.Analytics.Management.WebProperties.Update

1317+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Delete

1318+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Get

1319+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Insert

1320+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.List

1321+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Patch

1322+import Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Update

1323+import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Delete

1324+import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Insert

1325+import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.List

1326+import Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Update

1327+import Network.Google.Resource.Analytics.Metadata.Columns.List

1328+import Network.Google.Resource.Analytics.Provisioning.CreateAccountTicket

13291329

13301330{- $resources

13311331TODO

gogol-analytics/gen/Network/Google/Analytics/Types.hs+3−3

@@ -1001,9 +1001,9 @@ module Network.Google.Analytics.Types

10011001 , columnAttributes

10021002 ) where

10031003

1004−import Network.Google.Analytics.Types.Product

1005−import Network.Google.Analytics.Types.Sum

1006−import Network.Google.Prelude

1004+import Network.Google.Analytics.Types.Product

1005+import Network.Google.Analytics.Types.Sum

1006+import Network.Google.Prelude

10071007

10081008-- | URL referring to version 'v3' of the Google Analytics API.

10091009analyticsURL :: BaseUrl

gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+534−534

@@ -17,8 +17,8 @@

1717--

1818module Network.Google.Analytics.Types.Product where

1919

20−import Network.Google.Analytics.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.Analytics.Types.Sum

21+import Network.Google.Prelude

2222

2323-- | An unsampled report collection lists Analytics unsampled reports to

2424-- which the user has access. Each view (profile) can have a set of

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

2727--

2828-- /See:/ 'unSampledReports' smart constructor.

2929data UnSampledReports = UnSampledReports

30− { _usrNextLink :: !(Maybe Text)

30+ { _usrNextLink :: !(Maybe Text)

3131 , _usrItemsPerPage :: !(Maybe Int32)

32− , _usrKind :: !Text

33− , _usrUsername :: !(Maybe Text)

34− , _usrItems :: !(Maybe [UnSampledReport])

32+ , _usrKind :: !Text

33+ , _usrUsername :: !(Maybe Text)

34+ , _usrItems :: !(Maybe [UnSampledReport])

3535 , _usrTotalResults :: !(Maybe Int32)

36− , _usrStartIndex :: !(Maybe Int32)

36+ , _usrStartIndex :: !(Maybe Int32)

3737 , _usrPreviousLink :: !(Maybe Text)

3838 } deriving (Eq,Show,Data,Typeable,Generic)

3939

@@ -58,7 +58,7 @@ data UnSampledReports = UnSampledReports

5858-- * 'usrPreviousLink'

5959unSampledReports

6060 :: UnSampledReports

61−unSampledReports =

61+unSampledReports =

6262 UnSampledReports

6363 { _usrNextLink = Nothing

6464 , _usrItemsPerPage = Nothing

@@ -149,8 +149,8 @@ instance ToJSON UnSampledReports where

149149--

150150-- /See:/ 'goalURLDestinationDetailsStepsItem' smart constructor.

151151data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem

152− { _guddsiURL :: !(Maybe Text)

153− , _guddsiName :: !(Maybe Text)

152+ { _guddsiURL :: !(Maybe Text)

153+ , _guddsiName :: !(Maybe Text)

154154 , _guddsiNumber :: !(Maybe Int32)

155155 } deriving (Eq,Show,Data,Typeable,Generic)

156156

@@ -165,7 +165,7 @@ data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem

165165-- * 'guddsiNumber'

166166goalURLDestinationDetailsStepsItem

167167 :: GoalURLDestinationDetailsStepsItem

168−goalURLDestinationDetailsStepsItem =

168+goalURLDestinationDetailsStepsItem =

169169 GoalURLDestinationDetailsStepsItem

170170 { _guddsiURL = Nothing

171171 , _guddsiName = Nothing

@@ -209,17 +209,17 @@ instance ToJSON GoalURLDestinationDetailsStepsItem

209209--

210210-- /See:/ 'gaDataQuery' smart constructor.

211211data GaDataQuery = GaDataQuery

212− { _gdqMetrics :: !(Maybe [Text])

212+ { _gdqMetrics :: !(Maybe [Text])

213213 , _gdqSamplingLevel :: !(Maybe Text)

214− , _gdqFilters :: !(Maybe Text)

215− , _gdqIds :: !(Maybe Text)

216− , _gdqEndDate :: !(Maybe Text)

217− , _gdqSort :: !(Maybe [Text])

218− , _gdqDimensions :: !(Maybe Text)

219− , _gdqStartIndex :: !(Maybe Int32)

220− , _gdqMaxResults :: !(Maybe Int32)

221− , _gdqSegment :: !(Maybe Text)

222− , _gdqStartDate :: !(Maybe Text)

214+ , _gdqFilters :: !(Maybe Text)

215+ , _gdqIds :: !(Maybe Text)

216+ , _gdqEndDate :: !(Maybe Text)

217+ , _gdqSort :: !(Maybe [Text])

218+ , _gdqDimensions :: !(Maybe Text)

219+ , _gdqStartIndex :: !(Maybe Int32)

220+ , _gdqMaxResults :: !(Maybe Int32)

221+ , _gdqSegment :: !(Maybe Text)

222+ , _gdqStartDate :: !(Maybe Text)

223223 } deriving (Eq,Show,Data,Typeable,Generic)

224224

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

@@ -249,7 +249,7 @@ data GaDataQuery = GaDataQuery

249249-- * 'gdqStartDate'

250250gaDataQuery

251251 :: GaDataQuery

252−gaDataQuery =

252+gaDataQuery =

253253 GaDataQuery

254254 { _gdqMetrics = Nothing

255255 , _gdqSamplingLevel = Nothing

@@ -371,7 +371,7 @@ newtype GaDataDataTableRowsItem = GaDataDataTableRowsItem

371371-- * 'gddtriC'

372372gaDataDataTableRowsItem

373373 :: GaDataDataTableRowsItem

374−gaDataDataTableRowsItem =

374+gaDataDataTableRowsItem =

375375 GaDataDataTableRowsItem

376376 { _gddtriC = Nothing

377377 }

@@ -395,25 +395,25 @@ instance ToJSON GaDataDataTableRowsItem where

395395--

396396-- /See:/ 'unSampledReport' smart constructor.

397397data UnSampledReport = UnSampledReport

398− { _uDownloadType :: !(Maybe Text)

399− , _uStatus :: !(Maybe Text)

400− , _uMetrics :: !(Maybe Text)

401− , _uDriveDownloadDetails :: !(Maybe UnSampledReportDriveDownloadDetails)

402− , _uWebPropertyId :: !(Maybe Text)

403− , _uKind :: !Text

404− , _uCreated :: !(Maybe DateTime')

405− , _uFilters :: !(Maybe Text)

406− , _uProFileId :: !(Maybe Text)

407− , _uEndDate :: !(Maybe Text)

408− , _uSelfLink :: !(Maybe Text)

409− , _uAccountId :: !(Maybe Text)

410− , _uId :: !(Maybe Text)

411− , _uUpdated :: !(Maybe DateTime')

412− , _uTitle :: !(Maybe Text)

413− , _uDimensions :: !(Maybe Text)

414− , _uSegment :: !(Maybe Text)

398+ { _uDownloadType :: !(Maybe Text)

399+ , _uStatus :: !(Maybe Text)

400+ , _uMetrics :: !(Maybe Text)

401+ , _uDriveDownloadDetails :: !(Maybe UnSampledReportDriveDownloadDetails)

402+ , _uWebPropertyId :: !(Maybe Text)

403+ , _uKind :: !Text

404+ , _uCreated :: !(Maybe DateTime')

405+ , _uFilters :: !(Maybe Text)

406+ , _uProFileId :: !(Maybe Text)

407+ , _uEndDate :: !(Maybe Text)

408+ , _uSelfLink :: !(Maybe Text)

409+ , _uAccountId :: !(Maybe Text)

410+ , _uId :: !(Maybe Text)

411+ , _uUpdated :: !(Maybe DateTime')

412+ , _uTitle :: !(Maybe Text)

413+ , _uDimensions :: !(Maybe Text)

414+ , _uSegment :: !(Maybe Text)

415415 , _uCloudStorageDownloadDetails :: !(Maybe UnSampledReportCloudStorageDownloadDetails)

416− , _uStartDate :: !(Maybe Text)

416+ , _uStartDate :: !(Maybe Text)

417417 } deriving (Eq,Show,Data,Typeable,Generic)

418418

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

@@ -459,7 +459,7 @@ data UnSampledReport = UnSampledReport

459459-- * 'uStartDate'

460460unSampledReport

461461 :: UnSampledReport

462−unSampledReport =

462+unSampledReport =

463463 UnSampledReport

464464 { _uDownloadType = Nothing

465465 , _uStatus = Nothing

@@ -630,8 +630,8 @@ instance ToJSON UnSampledReport where

630630-- /See:/ 'mcfDataColumnHeadersItem' smart constructor.

631631data McfDataColumnHeadersItem = McfDataColumnHeadersItem

632632 { _mdchiColumnType :: !(Maybe Text)

633− , _mdchiName :: !(Maybe Text)

634− , _mdchiDataType :: !(Maybe Text)

633+ , _mdchiName :: !(Maybe Text)

634+ , _mdchiDataType :: !(Maybe Text)

635635 } deriving (Eq,Show,Data,Typeable,Generic)

636636

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

@@ -645,7 +645,7 @@ data McfDataColumnHeadersItem = McfDataColumnHeadersItem

645645-- * 'mdchiDataType'

646646mcfDataColumnHeadersItem

647647 :: McfDataColumnHeadersItem

648−mcfDataColumnHeadersItem =

648+mcfDataColumnHeadersItem =

649649 McfDataColumnHeadersItem

650650 { _mdchiColumnType = Nothing

651651 , _mdchiName = Nothing

@@ -692,7 +692,7 @@ instance ToJSON McfDataColumnHeadersItem where

692692--

693693-- /See:/ 'gaDataTotalsForAllResults' smart constructor.

694694data GaDataTotalsForAllResults =

695− GaDataTotalsForAllResults

695+ GaDataTotalsForAllResults

696696 deriving (Eq,Show,Data,Typeable,Generic)

697697

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

@@ -707,7 +707,7 @@ instance FromJSON GaDataTotalsForAllResults where

707707 (\ o -> pure GaDataTotalsForAllResults)

708708

709709instance ToJSON GaDataTotalsForAllResults where

710− toJSON = const (Object mempty)

710+ toJSON = const emptyObject

711711

712712-- | Parent link for this view (profile). Points to the web property to which

713713-- this view (profile) belongs.

@@ -727,7 +727,7 @@ data ProFileParentLink = ProFileParentLink

727727-- * 'pfplType'

728728proFileParentLink

729729 :: ProFileParentLink

730−proFileParentLink =

730+proFileParentLink =

731731 ProFileParentLink

732732 { _pfplHref = Nothing

733733 , _pfplType = "analytics#webproperty"

@@ -769,7 +769,7 @@ newtype GaDataDataTableRowsItemCItem = GaDataDataTableRowsItemCItem

769769-- * 'gddtriciV'

770770gaDataDataTableRowsItemCItem

771771 :: GaDataDataTableRowsItemCItem

772−gaDataDataTableRowsItemCItem =

772+gaDataDataTableRowsItemCItem =

773773 GaDataDataTableRowsItemCItem

774774 { _gddtriciV = Nothing

775775 }

@@ -791,7 +791,7 @@ instance ToJSON GaDataDataTableRowsItemCItem where

791791--

792792-- /See:/ 'entityUserLinkPermissions' smart constructor.

793793data EntityUserLinkPermissions = EntityUserLinkPermissions

794− { _eulpLocal :: !(Maybe [Text])

794+ { _eulpLocal :: !(Maybe [Text])

795795 , _eulpEffective :: !(Maybe [Text])

796796 } deriving (Eq,Show,Data,Typeable,Generic)

797797

@@ -804,7 +804,7 @@ data EntityUserLinkPermissions = EntityUserLinkPermissions

804804-- * 'eulpEffective'

805805entityUserLinkPermissions

806806 :: EntityUserLinkPermissions

807−entityUserLinkPermissions =

807+entityUserLinkPermissions =

808808 EntityUserLinkPermissions

809809 { _eulpLocal = Nothing

810810 , _eulpEffective = Nothing

@@ -850,12 +850,12 @@ instance ToJSON EntityUserLinkPermissions where

850850--

851851-- /See:/ 'realtimeDataProFileInfo' smart constructor.

852852data RealtimeDataProFileInfo = RealtimeDataProFileInfo

853− { _rdpfiWebPropertyId :: !(Maybe Text)

854− , _rdpfiProFileId :: !(Maybe Text)

855− , _rdpfiProFileName :: !(Maybe Text)

856− , _rdpfiAccountId :: !(Maybe Text)

853+ { _rdpfiWebPropertyId :: !(Maybe Text)

854+ , _rdpfiProFileId :: !(Maybe Text)

855+ , _rdpfiProFileName :: !(Maybe Text)

856+ , _rdpfiAccountId :: !(Maybe Text)

857857 , _rdpfiInternalWebPropertyId :: !(Maybe Text)

858− , _rdpfiTableId :: !(Maybe Text)

858+ , _rdpfiTableId :: !(Maybe Text)

859859 } deriving (Eq,Show,Data,Typeable,Generic)

860860

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

@@ -875,7 +875,7 @@ data RealtimeDataProFileInfo = RealtimeDataProFileInfo

875875-- * 'rdpfiTableId'

876876realtimeDataProFileInfo

877877 :: RealtimeDataProFileInfo

878−realtimeDataProFileInfo =

878+realtimeDataProFileInfo =

879879 RealtimeDataProFileInfo

880880 { _rdpfiWebPropertyId = Nothing

881881 , _rdpfiProFileId = Nothing

@@ -947,7 +947,7 @@ instance ToJSON RealtimeDataProFileInfo where

947947-- /See:/ 'mcfDataRowsItemItemConversionPathValueItem' smart constructor.

948948data McfDataRowsItemItemConversionPathValueItem = McfDataRowsItemItemConversionPathValueItem

949949 { _mdriicpviInteractionType :: !(Maybe Text)

950− , _mdriicpviNodeValue :: !(Maybe Text)

950+ , _mdriicpviNodeValue :: !(Maybe Text)

951951 } deriving (Eq,Show,Data,Typeable,Generic)

952952

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

@@ -959,7 +959,7 @@ data McfDataRowsItemItemConversionPathValueItem = McfDataRowsItemItemConversionP

959959-- * 'mdriicpviNodeValue'

960960mcfDataRowsItemItemConversionPathValueItem

961961 :: McfDataRowsItemItemConversionPathValueItem

962−mcfDataRowsItemItemConversionPathValueItem =

962+mcfDataRowsItemItemConversionPathValueItem =

963963 McfDataRowsItemItemConversionPathValueItem

964964 { _mdriicpviInteractionType = Nothing

965965 , _mdriicpviNodeValue = Nothing

@@ -1001,11 +1001,11 @@ instance ToJSON

10011001--

10021002-- /See:/ 'filterExpression' smart constructor.

10031003data FilterExpression = FilterExpression

1004− { _feFieldIndex :: !(Maybe Int32)

1005− , _feField :: !(Maybe Text)

1006− , _feKind :: !Text

1007− , _feMatchType :: !(Maybe Text)

1008− , _feCaseSensitive :: !(Maybe Bool)

1004+ { _feFieldIndex :: !(Maybe Int32)

1005+ , _feField :: !(Maybe Text)

1006+ , _feKind :: !Text

1007+ , _feMatchType :: !(Maybe Text)

1008+ , _feCaseSensitive :: !(Maybe Bool)

10091009 , _feExpressionValue :: !(Maybe Text)

10101010 } deriving (Eq,Show,Data,Typeable,Generic)

10111011

@@ -1026,7 +1026,7 @@ data FilterExpression = FilterExpression

10261026-- * 'feExpressionValue'

10271027filterExpression

10281028 :: FilterExpression

1029−filterExpression =

1029+filterExpression =

10301030 FilterExpression

10311031 { _feFieldIndex = Nothing

10321032 , _feField = Nothing

@@ -1123,13 +1123,13 @@ instance ToJSON FilterExpression where

11231123--

11241124-- /See:/ 'proFileRef' smart constructor.

11251125data ProFileRef = ProFileRef

1126− { _pfrWebPropertyId :: !(Maybe Text)

1127− , _pfrKind :: !Text

1128− , _pfrHref :: !(Maybe Text)

1129− , _pfrAccountId :: !(Maybe Text)

1130− , _pfrName :: !(Maybe Text)

1126+ { _pfrWebPropertyId :: !(Maybe Text)

1127+ , _pfrKind :: !Text

1128+ , _pfrHref :: !(Maybe Text)

1129+ , _pfrAccountId :: !(Maybe Text)

1130+ , _pfrName :: !(Maybe Text)

11311131 , _pfrInternalWebPropertyId :: !(Maybe Text)

1132− , _pfrId :: !(Maybe Text)

1132+ , _pfrId :: !(Maybe Text)

11331133 } deriving (Eq,Show,Data,Typeable,Generic)

11341134

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

@@ -1151,7 +1151,7 @@ data ProFileRef = ProFileRef

11511151-- * 'pfrId'

11521152proFileRef

11531153 :: ProFileRef

1154−proFileRef =

1154+proFileRef =

11551155 ProFileRef

11561156 { _pfrWebPropertyId = Nothing

11571157 , _pfrKind = "analytics#profileRef"

@@ -1228,13 +1228,13 @@ instance ToJSON ProFileRef where

12281228--

12291229-- /See:/ 'accounts' smart constructor.

12301230data Accounts = Accounts

1231− { _aNextLink :: !(Maybe Text)

1231+ { _aNextLink :: !(Maybe Text)

12321232 , _aItemsPerPage :: !(Maybe Int32)

1233− , _aKind :: !Text

1234− , _aUsername :: !(Maybe Text)

1235− , _aItems :: !(Maybe [Account])

1233+ , _aKind :: !Text

1234+ , _aUsername :: !(Maybe Text)

1235+ , _aItems :: !(Maybe [Account])

12361236 , _aTotalResults :: !(Maybe Int32)

1237− , _aStartIndex :: !(Maybe Int32)

1237+ , _aStartIndex :: !(Maybe Int32)

12381238 , _aPreviousLink :: !(Maybe Text)

12391239 } deriving (Eq,Show,Data,Typeable,Generic)

12401240

@@ -1259,7 +1259,7 @@ data Accounts = Accounts

12591259-- * 'aPreviousLink'

12601260accounts

12611261 :: Accounts

1262−accounts =

1262+accounts =

12631263 Accounts

12641264 { _aNextLink = Nothing

12651265 , _aItemsPerPage = Nothing

@@ -1352,13 +1352,13 @@ instance ToJSON Accounts where

13521352--

13531353-- /See:/ 'experiments' smart constructor.

13541354data Experiments = Experiments

1355− { _eNextLink :: !(Maybe Text)

1355+ { _eNextLink :: !(Maybe Text)

13561356 , _eItemsPerPage :: !(Maybe Int32)

1357− , _eKind :: !Text

1358− , _eUsername :: !(Maybe Text)

1359− , _eItems :: !(Maybe [Experiment])

1357+ , _eKind :: !Text

1358+ , _eUsername :: !(Maybe Text)

1359+ , _eItems :: !(Maybe [Experiment])

13601360 , _eTotalResults :: !(Maybe Int32)

1361− , _eStartIndex :: !(Maybe Int32)

1361+ , _eStartIndex :: !(Maybe Int32)

13621362 , _ePreviousLink :: !(Maybe Text)

13631363 } deriving (Eq,Show,Data,Typeable,Generic)

13641364

@@ -1383,7 +1383,7 @@ data Experiments = Experiments

13831383-- * 'ePreviousLink'

13841384experiments

13851385 :: Experiments

1386−experiments =

1386+experiments =

13871387 Experiments

13881388 { _eNextLink = Nothing

13891389 , _eItemsPerPage = Nothing

@@ -1487,7 +1487,7 @@ data ExperimentParentLink = ExperimentParentLink

14871487-- * 'eplType'

14881488experimentParentLink

14891489 :: ExperimentParentLink

1490−experimentParentLink =

1490+experimentParentLink =

14911491 ExperimentParentLink

14921492 { _eplHref = Nothing

14931493 , _eplType = "analytics#profile"

@@ -1531,7 +1531,7 @@ newtype UnSampledReportDriveDownloadDetails = UnSampledReportDriveDownloadDetail

15311531-- * 'usrdddDocumentId'

15321532unSampledReportDriveDownloadDetails

15331533 :: UnSampledReportDriveDownloadDetails

1534−unSampledReportDriveDownloadDetails =

1534+unSampledReportDriveDownloadDetails =

15351535 UnSampledReportDriveDownloadDetails

15361536 { _usrdddDocumentId = Nothing

15371537 }

@@ -1561,12 +1561,12 @@ instance ToJSON UnSampledReportDriveDownloadDetails

15611561--

15621562-- /See:/ 'mcfDataProFileInfo' smart constructor.

15631563data McfDataProFileInfo = McfDataProFileInfo

1564− { _mdpfiWebPropertyId :: !(Maybe Text)

1565− , _mdpfiProFileId :: !(Maybe Text)

1566− , _mdpfiProFileName :: !(Maybe Text)

1567− , _mdpfiAccountId :: !(Maybe Text)

1564+ { _mdpfiWebPropertyId :: !(Maybe Text)

1565+ , _mdpfiProFileId :: !(Maybe Text)

1566+ , _mdpfiProFileName :: !(Maybe Text)

1567+ , _mdpfiAccountId :: !(Maybe Text)

15681568 , _mdpfiInternalWebPropertyId :: !(Maybe Text)

1569− , _mdpfiTableId :: !(Maybe Text)

1569+ , _mdpfiTableId :: !(Maybe Text)

15701570 } deriving (Eq,Show,Data,Typeable,Generic)

15711571

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

@@ -1586,7 +1586,7 @@ data McfDataProFileInfo = McfDataProFileInfo

15861586-- * 'mdpfiTableId'

15871587mcfDataProFileInfo

15881588 :: McfDataProFileInfo

1589−mcfDataProFileInfo =

1589+mcfDataProFileInfo =

15901590 McfDataProFileInfo

15911591 { _mdpfiWebPropertyId = Nothing

15921592 , _mdpfiProFileId = Nothing

@@ -1660,13 +1660,13 @@ instance ToJSON McfDataProFileInfo where

16601660--

16611661-- /See:/ 'customDataSources' smart constructor.

16621662data CustomDataSources = CustomDataSources

1663− { _cdsNextLink :: !(Maybe Text)

1663+ { _cdsNextLink :: !(Maybe Text)

16641664 , _cdsItemsPerPage :: !(Maybe Int32)

1665− , _cdsKind :: !Text

1666− , _cdsUsername :: !(Maybe Text)

1667− , _cdsItems :: !(Maybe [CustomDataSource])

1665+ , _cdsKind :: !Text

1666+ , _cdsUsername :: !(Maybe Text)

1667+ , _cdsItems :: !(Maybe [CustomDataSource])

16681668 , _cdsTotalResults :: !(Maybe Int32)

1669− , _cdsStartIndex :: !(Maybe Int32)

1669+ , _cdsStartIndex :: !(Maybe Int32)

16701670 , _cdsPreviousLink :: !(Maybe Text)

16711671 } deriving (Eq,Show,Data,Typeable,Generic)

16721672

@@ -1691,7 +1691,7 @@ data CustomDataSources = CustomDataSources

16911691-- * 'cdsPreviousLink'

16921692customDataSources

16931693 :: CustomDataSources

1694−customDataSources =

1694+customDataSources =

16951695 CustomDataSources

16961696 { _cdsNextLink = Nothing

16971697 , _cdsItemsPerPage = Nothing

@@ -1797,7 +1797,7 @@ data WebPropertyChildLink = WebPropertyChildLink

17971797-- * 'wpclType'

17981798webPropertyChildLink

17991799 :: WebPropertyChildLink

1800−webPropertyChildLink =

1800+webPropertyChildLink =

18011801 WebPropertyChildLink

18021802 { _wpclHref = Nothing

18031803 , _wpclType = "analytics#profiles"

@@ -1830,21 +1830,21 @@ instance ToJSON WebPropertyChildLink where

18301830--

18311831-- /See:/ 'mcfData' smart constructor.

18321832data McfData = McfData

1833− { _mdNextLink :: !(Maybe Text)

1834− , _mdSampleSpace :: !(Maybe Int64)

1835− , _mdItemsPerPage :: !(Maybe Int32)

1836− , _mdProFileInfo :: !(Maybe McfDataProFileInfo)

1837− , _mdKind :: !Text

1838− , _mdSampleSize :: !(Maybe Int64)

1839− , _mdRows :: !(Maybe [[McfDataRowsItemItem]])

1840− , _mdSelfLink :: !(Maybe Text)

1841− , _mdQuery :: !(Maybe McfDataQuery)

1842− , _mdColumnHeaders :: !(Maybe [McfDataColumnHeadersItem])

1843− , _mdId :: !(Maybe Text)

1844− , _mdTotalResults :: !(Maybe Int32)

1833+ { _mdNextLink :: !(Maybe Text)

1834+ , _mdSampleSpace :: !(Maybe Int64)

1835+ , _mdItemsPerPage :: !(Maybe Int32)

1836+ , _mdProFileInfo :: !(Maybe McfDataProFileInfo)

1837+ , _mdKind :: !Text

1838+ , _mdSampleSize :: !(Maybe Int64)

1839+ , _mdRows :: !(Maybe [[McfDataRowsItemItem]])

1840+ , _mdSelfLink :: !(Maybe Text)

1841+ , _mdQuery :: !(Maybe McfDataQuery)

1842+ , _mdColumnHeaders :: !(Maybe [McfDataColumnHeadersItem])

1843+ , _mdId :: !(Maybe Text)

1844+ , _mdTotalResults :: !(Maybe Int32)

18451845 , _mdContainsSampledData :: !(Maybe Bool)

18461846 , _mdTotalsForAllResults :: !(Maybe McfDataTotalsForAllResults)

1847− , _mdPreviousLink :: !(Maybe Text)

1847+ , _mdPreviousLink :: !(Maybe Text)

18481848 } deriving (Eq,Show,Data,Typeable,Generic)

18491849

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

@@ -1882,7 +1882,7 @@ data McfData = McfData

18821882-- * 'mdPreviousLink'

18831883mcfData

18841884 :: McfData

1885−mcfData =

1885+mcfData =

18861886 McfData

18871887 { _mdNextLink = Nothing

18881888 , _mdSampleSpace = Nothing

@@ -2041,8 +2041,8 @@ instance ToJSON McfData where

20412041-- /See:/ 'userRef' smart constructor.

20422042data UserRef = UserRef

20432043 { _urEmail :: !(Maybe Text)

2044− , _urKind :: !Text

2045− , _urId :: !(Maybe Text)

2044+ , _urKind :: !Text

2045+ , _urId :: !(Maybe Text)

20462046 } deriving (Eq,Show,Data,Typeable,Generic)

20472047

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

@@ -2056,7 +2056,7 @@ data UserRef = UserRef

20562056-- * 'urId'

20572057userRef

20582058 :: UserRef

2059−userRef =

2059+userRef =

20602060 UserRef

20612061 { _urEmail = Nothing

20622062 , _urKind = "analytics#userRef"

@@ -2095,7 +2095,7 @@ instance ToJSON UserRef where

20952095-- /See:/ 'goalVisitNumPagesDetails' smart constructor.

20962096data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails

20972097 { _gvnpdComparisonValue :: !(Maybe Int64)

2098− , _gvnpdComparisonType :: !(Maybe Text)

2098+ , _gvnpdComparisonType :: !(Maybe Text)

20992099 } deriving (Eq,Show,Data,Typeable,Generic)

21002100

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

@@ -2107,7 +2107,7 @@ data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails

21072107-- * 'gvnpdComparisonType'

21082108goalVisitNumPagesDetails

21092109 :: GoalVisitNumPagesDetails

2110−goalVisitNumPagesDetails =

2110+goalVisitNumPagesDetails =

21112111 GoalVisitNumPagesDetails

21122112 { _gvnpdComparisonValue = Nothing

21132113 , _gvnpdComparisonType = Nothing

@@ -2145,8 +2145,8 @@ instance ToJSON GoalVisitNumPagesDetails where

21452145-- /See:/ 'realtimeDataColumnHeadersItem' smart constructor.

21462146data RealtimeDataColumnHeadersItem = RealtimeDataColumnHeadersItem

21472147 { _rdchiColumnType :: !(Maybe Text)

2148− , _rdchiName :: !(Maybe Text)

2149− , _rdchiDataType :: !(Maybe Text)

2148+ , _rdchiName :: !(Maybe Text)

2149+ , _rdchiDataType :: !(Maybe Text)

21502150 } deriving (Eq,Show,Data,Typeable,Generic)

21512151

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

@@ -2160,7 +2160,7 @@ data RealtimeDataColumnHeadersItem = RealtimeDataColumnHeadersItem

21602160-- * 'rdchiDataType'

21612161realtimeDataColumnHeadersItem

21622162 :: RealtimeDataColumnHeadersItem

2163−realtimeDataColumnHeadersItem =

2163+realtimeDataColumnHeadersItem =

21642164 RealtimeDataColumnHeadersItem

21652165 { _rdchiColumnType = Nothing

21662166 , _rdchiName = Nothing

@@ -2209,7 +2209,7 @@ data AccountRef = AccountRef

22092209 { _arKind :: !Text

22102210 , _arHref :: !(Maybe Text)

22112211 , _arName :: !(Maybe Text)

2212− , _arId :: !(Maybe Text)

2212+ , _arId :: !(Maybe Text)

22132213 } deriving (Eq,Show,Data,Typeable,Generic)

22142214

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

@@ -2225,7 +2225,7 @@ data AccountRef = AccountRef

22252225-- * 'arId'

22262226accountRef

22272227 :: AccountRef

2228−accountRef =

2228+accountRef =

22292229 AccountRef

22302230 { _arKind = "analytics#accountRef"

22312231 , _arHref = Nothing

@@ -2271,12 +2271,12 @@ instance ToJSON AccountRef where

22712271--

22722272-- /See:/ 'entityAdWordsLinks' smart constructor.

22732273data EntityAdWordsLinks = EntityAdWordsLinks

2274− { _eawlNextLink :: !(Maybe Text)

2274+ { _eawlNextLink :: !(Maybe Text)

22752275 , _eawlItemsPerPage :: !(Maybe Int32)

2276− , _eawlKind :: !Text

2277− , _eawlItems :: !(Maybe [EntityAdWordsLink])

2276+ , _eawlKind :: !Text

2277+ , _eawlItems :: !(Maybe [EntityAdWordsLink])

22782278 , _eawlTotalResults :: !(Maybe Int32)

2279− , _eawlStartIndex :: !(Maybe Int32)

2279+ , _eawlStartIndex :: !(Maybe Int32)

22802280 , _eawlPreviousLink :: !(Maybe Text)

22812281 } deriving (Eq,Show,Data,Typeable,Generic)

22822282

@@ -2299,7 +2299,7 @@ data EntityAdWordsLinks = EntityAdWordsLinks

22992299-- * 'eawlPreviousLink'

23002300entityAdWordsLinks

23012301 :: EntityAdWordsLinks

2302−entityAdWordsLinks =

2302+entityAdWordsLinks =

23032303 EntityAdWordsLinks

23042304 { _eawlNextLink = Nothing

23052305 , _eawlItemsPerPage = Nothing

@@ -2385,13 +2385,13 @@ instance ToJSON EntityAdWordsLinks where

23852385--

23862386-- /See:/ 'proFiles' smart constructor.

23872387data ProFiles = ProFiles

2388− { _pfNextLink :: !(Maybe Text)

2388+ { _pfNextLink :: !(Maybe Text)

23892389 , _pfItemsPerPage :: !(Maybe Int32)

2390− , _pfKind :: !Text

2391− , _pfUsername :: !(Maybe Text)

2392− , _pfItems :: !(Maybe [ProFile])

2390+ , _pfKind :: !Text

2391+ , _pfUsername :: !(Maybe Text)

2392+ , _pfItems :: !(Maybe [ProFile])

23932393 , _pfTotalResults :: !(Maybe Int32)

2394− , _pfStartIndex :: !(Maybe Int32)

2394+ , _pfStartIndex :: !(Maybe Int32)

23952395 , _pfPreviousLink :: !(Maybe Text)

23962396 } deriving (Eq,Show,Data,Typeable,Generic)

23972397

@@ -2416,7 +2416,7 @@ data ProFiles = ProFiles

24162416-- * 'pfPreviousLink'

24172417proFiles

24182418 :: ProFiles

2419−proFiles =

2419+proFiles =

24202420 ProFiles

24212421 { _pfNextLink = Nothing

24222422 , _pfItemsPerPage = Nothing

@@ -2516,7 +2516,7 @@ newtype AnalyticsDataimportDeleteUploadDataRequest = AnalyticsDataimportDeleteUp

25162516-- * 'addudrCustomDataImportUids'

25172517analyticsDataimportDeleteUploadDataRequest

25182518 :: AnalyticsDataimportDeleteUploadDataRequest

2519−analyticsDataimportDeleteUploadDataRequest =

2519+analyticsDataimportDeleteUploadDataRequest =

25202520 AnalyticsDataimportDeleteUploadDataRequest

25212521 { _addudrCustomDataImportUids = Nothing

25222522 }

@@ -2551,12 +2551,12 @@ instance ToJSON

25512551-- /See:/ 'entityAdWordsLink' smart constructor.

25522552data EntityAdWordsLink = EntityAdWordsLink

25532553 { _entAdWordsAccounts :: !(Maybe [AdWordsAccount])

2554− , _entProFileIds :: !(Maybe [Text])

2555− , _entKind :: !Text

2556− , _entSelfLink :: !(Maybe Text)

2557− , _entName :: !(Maybe Text)

2558− , _entId :: !(Maybe Text)

2559− , _entEntity :: !(Maybe EntityAdWordsLinkEntity)

2554+ , _entProFileIds :: !(Maybe [Text])

2555+ , _entKind :: !Text

2556+ , _entSelfLink :: !(Maybe Text)

2557+ , _entName :: !(Maybe Text)

2558+ , _entId :: !(Maybe Text)

2559+ , _entEntity :: !(Maybe EntityAdWordsLinkEntity)

25602560 } deriving (Eq,Show,Data,Typeable,Generic)

25612561

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

@@ -2578,7 +2578,7 @@ data EntityAdWordsLink = EntityAdWordsLink

25782578-- * 'entEntity'

25792579entityAdWordsLink

25802580 :: EntityAdWordsLink

2581−entityAdWordsLink =

2581+entityAdWordsLink =

25822582 EntityAdWordsLink

25832583 { _entAdWordsAccounts = Nothing

25842584 , _entProFileIds = Nothing

@@ -2656,9 +2656,9 @@ instance ToJSON EntityAdWordsLink where

26562656--

26572657-- /See:/ 'filterSearchAndReplaceDetails' smart constructor.

26582658data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails

2659− { _fsardFieldIndex :: !(Maybe Int32)

2660− , _fsardField :: !(Maybe Text)

2661− , _fsardSearchString :: !(Maybe Text)

2659+ { _fsardFieldIndex :: !(Maybe Int32)

2660+ , _fsardField :: !(Maybe Text)

2661+ , _fsardSearchString :: !(Maybe Text)

26622662 , _fsardReplaceString :: !(Maybe Text)

26632663 , _fsardCaseSensitive :: !(Maybe Bool)

26642664 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2678,7 +2678,7 @@ data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails

26782678-- * 'fsardCaseSensitive'

26792679filterSearchAndReplaceDetails

26802680 :: FilterSearchAndReplaceDetails

2681−filterSearchAndReplaceDetails =

2681+filterSearchAndReplaceDetails =

26822682 FilterSearchAndReplaceDetails

26832683 { _fsardFieldIndex = Nothing

26842684 , _fsardField = Nothing

@@ -2751,7 +2751,7 @@ newtype ProFilePermissions = ProFilePermissions

27512751-- * 'pfpEffective'

27522752proFilePermissions

27532753 :: ProFilePermissions

2754−proFilePermissions =

2754+proFilePermissions =

27552755 ProFilePermissions

27562756 { _pfpEffective = Nothing

27572757 }

@@ -2781,30 +2781,30 @@ instance ToJSON ProFilePermissions where

27812781--

27822782-- /See:/ 'proFile' smart constructor.

27832783data ProFile = ProFile

2784− { _pParentLink :: !(Maybe ProFileParentLink)

2785− , _pECommerceTracking :: !(Maybe Bool)

2786− , _pSiteSearchCategoryParameters :: !(Maybe Text)

2787− , _pWebPropertyId :: !(Maybe Text)

2788− , _pChildLink :: !(Maybe ProFileChildLink)

2789− , _pSiteSearchQueryParameters :: !(Maybe Text)

2790− , _pKind :: !Text

2791− , _pDefaultPage :: !(Maybe Text)

2792− , _pCreated :: !(Maybe DateTime')

2793− , _pSelfLink :: !(Maybe Text)

2794− , _pAccountId :: !(Maybe Text)

2795− , _pName :: !(Maybe Text)

2796− , _pCurrency :: !(Maybe Text)

2797− , _pInternalWebPropertyId :: !(Maybe Text)

2798− , _pId :: !(Maybe Text)

2799− , _pUpdated :: !(Maybe DateTime')

2800− , _pPermissions :: !(Maybe ProFilePermissions)

2801− , _pWebsiteURL :: !(Maybe Text)

2802− , _pType :: !(Maybe Text)

2784+ { _pParentLink :: !(Maybe ProFileParentLink)

2785+ , _pECommerceTracking :: !(Maybe Bool)

2786+ , _pSiteSearchCategoryParameters :: !(Maybe Text)

2787+ , _pWebPropertyId :: !(Maybe Text)

2788+ , _pChildLink :: !(Maybe ProFileChildLink)

2789+ , _pSiteSearchQueryParameters :: !(Maybe Text)

2790+ , _pKind :: !Text

2791+ , _pDefaultPage :: !(Maybe Text)

2792+ , _pCreated :: !(Maybe DateTime')

2793+ , _pSelfLink :: !(Maybe Text)

2794+ , _pAccountId :: !(Maybe Text)

2795+ , _pName :: !(Maybe Text)

2796+ , _pCurrency :: !(Maybe Text)

2797+ , _pInternalWebPropertyId :: !(Maybe Text)

2798+ , _pId :: !(Maybe Text)

2799+ , _pUpdated :: !(Maybe DateTime')

2800+ , _pPermissions :: !(Maybe ProFilePermissions)

2801+ , _pWebsiteURL :: !(Maybe Text)

2802+ , _pType :: !(Maybe Text)

28032803 , _pStripSiteSearchCategoryParameters :: !(Maybe Bool)

2804− , _pTimezone :: !(Maybe Text)

2805− , _pExcludeQueryParameters :: !(Maybe Text)

2806− , _pEnhancedECommerceTracking :: !(Maybe Bool)

2807− , _pStripSiteSearchQueryParameters :: !(Maybe Bool)

2804+ , _pTimezone :: !(Maybe Text)

2805+ , _pExcludeQueryParameters :: !(Maybe Text)

2806+ , _pEnhancedECommerceTracking :: !(Maybe Bool)

2807+ , _pStripSiteSearchQueryParameters :: !(Maybe Bool)

28082808 } deriving (Eq,Show,Data,Typeable,Generic)

28092809

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

@@ -2860,7 +2860,7 @@ data ProFile = ProFile

28602860-- * 'pStripSiteSearchQueryParameters'

28612861proFile

28622862 :: ProFile

2863−proFile =

2863+proFile =

28642864 ProFile

28652865 { _pParentLink = Nothing

28662866 , _pECommerceTracking = Nothing

@@ -3096,13 +3096,13 @@ instance ToJSON ProFile where

30963096--

30973097-- /See:/ 'accountSummaries' smart constructor.

30983098data AccountSummaries = AccountSummaries

3099− { _asNextLink :: !(Maybe Text)

3099+ { _asNextLink :: !(Maybe Text)

31003100 , _asItemsPerPage :: !(Maybe Int32)

3101− , _asKind :: !Text

3102− , _asUsername :: !(Maybe Text)

3103− , _asItems :: !(Maybe [AccountSummary])

3101+ , _asKind :: !Text

3102+ , _asUsername :: !(Maybe Text)

3103+ , _asItems :: !(Maybe [AccountSummary])

31043104 , _asTotalResults :: !(Maybe Int32)

3105− , _asStartIndex :: !(Maybe Int32)

3105+ , _asStartIndex :: !(Maybe Int32)

31063106 , _asPreviousLink :: !(Maybe Text)

31073107 } deriving (Eq,Show,Data,Typeable,Generic)

31083108

@@ -3127,7 +3127,7 @@ data AccountSummaries = AccountSummaries

31273127-- * 'asPreviousLink'

31283128accountSummaries

31293129 :: AccountSummaries

3130−accountSummaries =

3130+accountSummaries =

31313131 AccountSummaries

31323132 { _asNextLink = Nothing

31333133 , _asItemsPerPage = Nothing

@@ -3217,7 +3217,7 @@ instance ToJSON AccountSummaries where

32173217--

32183218-- /See:/ 'goalEventDetails' smart constructor.

32193219data GoalEventDetails = GoalEventDetails

3220− { _gedUseEventValue :: !(Maybe Bool)

3220+ { _gedUseEventValue :: !(Maybe Bool)

32213221 , _gedEventConditions :: !(Maybe [GoalEventDetailsEventConditionsItem])

32223222 } deriving (Eq,Show,Data,Typeable,Generic)

32233223

@@ -3230,7 +3230,7 @@ data GoalEventDetails = GoalEventDetails

32303230-- * 'gedEventConditions'

32313231goalEventDetails

32323232 :: GoalEventDetails

3233−goalEventDetails =

3233+goalEventDetails =

32343234 GoalEventDetails

32353235 { _gedUseEventValue = Nothing

32363236 , _gedEventConditions = Nothing

@@ -3270,13 +3270,13 @@ instance ToJSON GoalEventDetails where

32703270--

32713271-- /See:/ 'webPropertySummary' smart constructor.

32723272data WebPropertySummary = WebPropertySummary

3273− { _wpsKind :: !Text

3274− , _wpsProFiles :: !(Maybe [ProFileSummary])

3275− , _wpsName :: !(Maybe Text)

3273+ { _wpsKind :: !Text

3274+ , _wpsProFiles :: !(Maybe [ProFileSummary])

3275+ , _wpsName :: !(Maybe Text)

32763276 , _wpsInternalWebPropertyId :: !(Maybe Text)

3277− , _wpsId :: !(Maybe Text)

3278− , _wpsWebsiteURL :: !(Maybe Text)

3279− , _wpsLevel :: !(Maybe Text)

3277+ , _wpsId :: !(Maybe Text)

3278+ , _wpsWebsiteURL :: !(Maybe Text)

3279+ , _wpsLevel :: !(Maybe Text)

32803280 } deriving (Eq,Show,Data,Typeable,Generic)

32813281

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

@@ -3298,7 +3298,7 @@ data WebPropertySummary = WebPropertySummary

32983298-- * 'wpsLevel'

32993299webPropertySummary

33003300 :: WebPropertySummary

3301−webPropertySummary =

3301+webPropertySummary =

33023302 WebPropertySummary

33033303 { _wpsKind = "analytics#webPropertySummary"

33043304 , _wpsProFiles = Nothing

@@ -3375,13 +3375,13 @@ instance ToJSON WebPropertySummary where

33753375--

33763376-- /See:/ 'filters' smart constructor.

33773377data Filters = Filters

3378− { _fNextLink :: !(Maybe Text)

3378+ { _fNextLink :: !(Maybe Text)

33793379 , _fItemsPerPage :: !(Maybe Int32)

3380− , _fKind :: !Text

3381− , _fUsername :: !(Maybe Text)

3382− , _fItems :: !(Maybe [Filter])

3380+ , _fKind :: !Text

3381+ , _fUsername :: !(Maybe Text)

3382+ , _fItems :: !(Maybe [Filter])

33833383 , _fTotalResults :: !(Maybe Int32)

3384− , _fStartIndex :: !(Maybe Int32)

3384+ , _fStartIndex :: !(Maybe Int32)

33853385 , _fPreviousLink :: !(Maybe Text)

33863386 } deriving (Eq,Show,Data,Typeable,Generic)

33873387

@@ -3406,7 +3406,7 @@ data Filters = Filters

34063406-- * 'fPreviousLink'

34073407filters

34083408 :: Filters

3409−filters =

3409+filters =

34103410 Filters

34113411 { _fNextLink = Nothing

34123412 , _fItemsPerPage = Nothing

@@ -3496,22 +3496,22 @@ instance ToJSON Filters where

34963496--

34973497-- /See:/ 'gaData' smart constructor.

34983498data GaData = GaData

3499− { _gdNextLink :: !(Maybe Text)

3500− , _gdSampleSpace :: !(Maybe Int64)

3501− , _gdItemsPerPage :: !(Maybe Int32)

3502− , _gdProFileInfo :: !(Maybe GaDataProFileInfo)

3503− , _gdKind :: !Text

3504− , _gdSampleSize :: !(Maybe Int64)

3505− , _gdRows :: !(Maybe [[Text]])

3506− , _gdSelfLink :: !(Maybe Text)

3507− , _gdQuery :: !(Maybe GaDataQuery)

3508− , _gdColumnHeaders :: !(Maybe [GaDataColumnHeadersItem])

3509− , _gdId :: !(Maybe Text)

3510− , _gdTotalResults :: !(Maybe Int32)

3511− , _gdDataTable :: !(Maybe GaDataDataTable)

3499+ { _gdNextLink :: !(Maybe Text)

3500+ , _gdSampleSpace :: !(Maybe Int64)

3501+ , _gdItemsPerPage :: !(Maybe Int32)

3502+ , _gdProFileInfo :: !(Maybe GaDataProFileInfo)

3503+ , _gdKind :: !Text

3504+ , _gdSampleSize :: !(Maybe Int64)

3505+ , _gdRows :: !(Maybe [[Text]])

3506+ , _gdSelfLink :: !(Maybe Text)

3507+ , _gdQuery :: !(Maybe GaDataQuery)

3508+ , _gdColumnHeaders :: !(Maybe [GaDataColumnHeadersItem])

3509+ , _gdId :: !(Maybe Text)

3510+ , _gdTotalResults :: !(Maybe Int32)

3511+ , _gdDataTable :: !(Maybe GaDataDataTable)

35123512 , _gdContainsSampledData :: !(Maybe Bool)

35133513 , _gdTotalsForAllResults :: !(Maybe GaDataTotalsForAllResults)

3514− , _gdPreviousLink :: !(Maybe Text)

3514+ , _gdPreviousLink :: !(Maybe Text)

35153515 } deriving (Eq,Show,Data,Typeable,Generic)

35163516

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

@@ -3551,7 +3551,7 @@ data GaData = GaData

35513551-- * 'gdPreviousLink'

35523552gaData

35533553 :: GaData

3554−gaData =

3554+gaData =

35553555 GaData

35563556 { _gdNextLink = Nothing

35573557 , _gdSampleSpace = Nothing

@@ -3718,7 +3718,7 @@ instance ToJSON GaData where

37183718--

37193719-- /See:/ 'realtimeDataTotalsForAllResults' smart constructor.

37203720data RealtimeDataTotalsForAllResults =

3721− RealtimeDataTotalsForAllResults

3721+ RealtimeDataTotalsForAllResults

37223722 deriving (Eq,Show,Data,Typeable,Generic)

37233723

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

@@ -3734,26 +3734,26 @@ instance FromJSON RealtimeDataTotalsForAllResults

37343734 (\ o -> pure RealtimeDataTotalsForAllResults)

37353735

37363736instance ToJSON RealtimeDataTotalsForAllResults where

3737− toJSON = const (Object mempty)

3737+ toJSON = const emptyObject

37383738

37393739-- | JSON template for an Analytics custom data source.

37403740--

37413741-- /See:/ 'customDataSource' smart constructor.

37423742data CustomDataSource = CustomDataSource

3743− { _cParentLink :: !(Maybe CustomDataSourceParentLink)

3744− , _cWebPropertyId :: !(Maybe Text)

3745− , _cChildLink :: !(Maybe CustomDataSourceChildLink)

3746− , _cKind :: !Text

3747− , _cCreated :: !(Maybe DateTime')

3748− , _cUploadType :: !(Maybe Text)

3743+ { _cParentLink :: !(Maybe CustomDataSourceParentLink)

3744+ , _cWebPropertyId :: !(Maybe Text)

3745+ , _cChildLink :: !(Maybe CustomDataSourceChildLink)

3746+ , _cKind :: !Text

3747+ , _cCreated :: !(Maybe DateTime')

3748+ , _cUploadType :: !(Maybe Text)

37493749 , _cImportBehavior :: !(Maybe Text)

3750− , _cSelfLink :: !(Maybe Text)

3751− , _cAccountId :: !(Maybe Text)

3752− , _cName :: !(Maybe Text)

3753− , _cId :: !(Maybe Text)

3754− , _cUpdated :: !(Maybe DateTime')

3755− , _cType :: !(Maybe Text)

3756− , _cDescription :: !(Maybe Text)

3750+ , _cSelfLink :: !(Maybe Text)

3751+ , _cAccountId :: !(Maybe Text)

3752+ , _cName :: !(Maybe Text)

3753+ , _cId :: !(Maybe Text)

3754+ , _cUpdated :: !(Maybe DateTime')

3755+ , _cType :: !(Maybe Text)

3756+ , _cDescription :: !(Maybe Text)

37573757 , _cProFilesLinked :: !(Maybe [Text])

37583758 } deriving (Eq,Show,Data,Typeable,Generic)

37593759

@@ -3792,7 +3792,7 @@ data CustomDataSource = CustomDataSource

37923792-- * 'cProFilesLinked'

37933793customDataSource

37943794 :: CustomDataSource

3795−customDataSource =

3795+customDataSource =

37963796 CustomDataSource

37973797 { _cParentLink = Nothing

37983798 , _cWebPropertyId = Nothing

@@ -3930,12 +3930,12 @@ instance ToJSON CustomDataSource where

39303930--

39313931-- /See:/ 'webPropertyRef' smart constructor.

39323932data WebPropertyRef = WebPropertyRef

3933− { _wprKind :: !Text

3934− , _wprHref :: !(Maybe Text)

3935− , _wprAccountId :: !(Maybe Text)

3936− , _wprName :: !(Maybe Text)

3933+ { _wprKind :: !Text

3934+ , _wprHref :: !(Maybe Text)

3935+ , _wprAccountId :: !(Maybe Text)

3936+ , _wprName :: !(Maybe Text)

39373937 , _wprInternalWebPropertyId :: !(Maybe Text)

3938− , _wprId :: !(Maybe Text)

3938+ , _wprId :: !(Maybe Text)

39393939 } deriving (Eq,Show,Data,Typeable,Generic)

39403940

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

@@ -3955,7 +3955,7 @@ data WebPropertyRef = WebPropertyRef

39553955-- * 'wprId'

39563956webPropertyRef

39573957 :: WebPropertyRef

3958−webPropertyRef =

3958+webPropertyRef =

39593959 WebPropertyRef

39603960 { _wprKind = "analytics#webPropertyRef"

39613961 , _wprHref = Nothing

@@ -4021,13 +4021,13 @@ instance ToJSON WebPropertyRef where

40214021--

40224022-- /See:/ 'goals' smart constructor.

40234023data Goals = Goals

4024− { _gNextLink :: !(Maybe Text)

4024+ { _gNextLink :: !(Maybe Text)

40254025 , _gItemsPerPage :: !(Maybe Int32)

4026− , _gKind :: !Text

4027− , _gUsername :: !(Maybe Text)

4028− , _gItems :: !(Maybe [Goal])

4026+ , _gKind :: !Text

4027+ , _gUsername :: !(Maybe Text)

4028+ , _gItems :: !(Maybe [Goal])

40294029 , _gTotalResults :: !(Maybe Int32)

4030− , _gStartIndex :: !(Maybe Int32)

4030+ , _gStartIndex :: !(Maybe Int32)

40314031 , _gPreviousLink :: !(Maybe Text)

40324032 } deriving (Eq,Show,Data,Typeable,Generic)

40334033

@@ -4052,7 +4052,7 @@ data Goals = Goals

40524052-- * 'gPreviousLink'

40534053goals

40544054 :: Goals

4055−goals =

4055+goals =

40564056 Goals

40574057 { _gNextLink = Nothing

40584058 , _gItemsPerPage = Nothing

@@ -4144,7 +4144,7 @@ instance ToJSON Goals where

41444144--

41454145-- /See:/ 'mcfDataRowsItemItem' smart constructor.

41464146data McfDataRowsItemItem = McfDataRowsItemItem

4147− { _mdriiPrimitiveValue :: !(Maybe Text)

4147+ { _mdriiPrimitiveValue :: !(Maybe Text)

41484148 , _mdriiConversionPathValue :: !(Maybe [McfDataRowsItemItemConversionPathValueItem])

41494149 } deriving (Eq,Show,Data,Typeable,Generic)

41504150

@@ -4157,7 +4157,7 @@ data McfDataRowsItemItem = McfDataRowsItemItem

41574157-- * 'mdriiConversionPathValue'

41584158mcfDataRowsItemItem

41594159 :: McfDataRowsItemItem

4160−mcfDataRowsItemItem =

4160+mcfDataRowsItemItem =

41614161 McfDataRowsItemItem

41624162 { _mdriiPrimitiveValue = Nothing

41634163 , _mdriiConversionPathValue = Nothing

@@ -4208,7 +4208,7 @@ newtype AccountPermissions = AccountPermissions

42084208-- * 'apEffective'

42094209accountPermissions

42104210 :: AccountPermissions

4211−accountPermissions =

4211+accountPermissions =

42124212 AccountPermissions

42134213 { _apEffective = Nothing

42144214 }

@@ -4238,8 +4238,8 @@ instance ToJSON AccountPermissions where

42384238--

42394239-- /See:/ 'entityUserLinkEntity' smart constructor.

42404240data EntityUserLinkEntity = EntityUserLinkEntity

4241− { _euleProFileRef :: !(Maybe ProFileRef)

4242− , _euleAccountRef :: !(Maybe AccountRef)

4241+ { _euleProFileRef :: !(Maybe ProFileRef)

4242+ , _euleAccountRef :: !(Maybe AccountRef)

42434243 , _euleWebPropertyRef :: !(Maybe WebPropertyRef)

42444244 } deriving (Eq,Show,Data,Typeable,Generic)

42454245

@@ -4254,7 +4254,7 @@ data EntityUserLinkEntity = EntityUserLinkEntity

42544254-- * 'euleWebPropertyRef'

42554255entityUserLinkEntity

42564256 :: EntityUserLinkEntity

4257−entityUserLinkEntity =

4257+entityUserLinkEntity =

42584258 EntityUserLinkEntity

42594259 { _euleProFileRef = Nothing

42604260 , _euleAccountRef = Nothing

@@ -4299,13 +4299,13 @@ instance ToJSON EntityUserLinkEntity where

42994299--

43004300-- /See:/ 'account' smart constructor.

43014301data Account = Account

4302− { _accChildLink :: !(Maybe AccountChildLink)

4303− , _accKind :: !Text

4304− , _accCreated :: !(Maybe DateTime')

4305− , _accSelfLink :: !(Maybe Text)

4306− , _accName :: !(Maybe Text)

4307− , _accId :: !(Maybe Text)

4308− , _accUpdated :: !(Maybe DateTime')

4302+ { _accChildLink :: !(Maybe AccountChildLink)

4303+ , _accKind :: !Text

4304+ , _accCreated :: !(Maybe DateTime')

4305+ , _accSelfLink :: !(Maybe Text)

4306+ , _accName :: !(Maybe Text)

4307+ , _accId :: !(Maybe Text)

4308+ , _accUpdated :: !(Maybe DateTime')

43094309 , _accPermissions :: !(Maybe AccountPermissions)

43104310 } deriving (Eq,Show,Data,Typeable,Generic)

43114311

@@ -4330,7 +4330,7 @@ data Account = Account

43304330-- * 'accPermissions'

43314331account

43324332 :: Account

4333−account =

4333+account =

43344334 Account

43354335 { _accChildLink = Nothing

43364336 , _accKind = "analytics#account"

@@ -4413,34 +4413,34 @@ instance ToJSON Account where

44134413--

44144414-- /See:/ 'experiment' smart constructor.

44154415data Experiment = Experiment

4416− { _expParentLink :: !(Maybe ExperimentParentLink)

4417− , _expEqualWeighting :: !(Maybe Bool)

4418− , _expStatus :: !(Maybe Text)

4419− , _expWebPropertyId :: !(Maybe Text)

4420− , _expStartTime :: !(Maybe DateTime')

4421− , _expSnippet :: !(Maybe Text)

4422− , _expKind :: !Text

4423− , _expCreated :: !(Maybe DateTime')

4424− , _expReasonExperimentEnded :: !(Maybe Text)

4425− , _expTrafficCoverage :: !(Maybe Double)

4426− , _expEditableInGaUi :: !(Maybe Bool)

4427− , _expMinimumExperimentLengthInDays :: !(Maybe Int32)

4428− , _expProFileId :: !(Maybe Text)

4429− , _expOptimizationType :: !(Maybe Text)

4430− , _expSelfLink :: !(Maybe Text)

4431− , _expAccountId :: !(Maybe Text)

4432− , _expName :: !(Maybe Text)

4433− , _expWinnerFound :: !(Maybe Bool)

4434− , _expEndTime :: !(Maybe DateTime')

4435− , _expVariations :: !(Maybe [ExperimentVariationsItem])

4436− , _expInternalWebPropertyId :: !(Maybe Text)

4437− , _expId :: !(Maybe Text)

4438− , _expUpdated :: !(Maybe DateTime')

4416+ { _expParentLink :: !(Maybe ExperimentParentLink)

4417+ , _expEqualWeighting :: !(Maybe Bool)

4418+ , _expStatus :: !(Maybe Text)

4419+ , _expWebPropertyId :: !(Maybe Text)

4420+ , _expStartTime :: !(Maybe DateTime')

4421+ , _expSnippet :: !(Maybe Text)

4422+ , _expKind :: !Text

4423+ , _expCreated :: !(Maybe DateTime')

4424+ , _expReasonExperimentEnded :: !(Maybe Text)

4425+ , _expTrafficCoverage :: !(Maybe Double)

4426+ , _expEditableInGaUi :: !(Maybe Bool)

4427+ , _expMinimumExperimentLengthInDays :: !(Maybe Int32)

4428+ , _expProFileId :: !(Maybe Text)

4429+ , _expOptimizationType :: !(Maybe Text)

4430+ , _expSelfLink :: !(Maybe Text)

4431+ , _expAccountId :: !(Maybe Text)

4432+ , _expName :: !(Maybe Text)

4433+ , _expWinnerFound :: !(Maybe Bool)

4434+ , _expEndTime :: !(Maybe DateTime')

4435+ , _expVariations :: !(Maybe [ExperimentVariationsItem])

4436+ , _expInternalWebPropertyId :: !(Maybe Text)

4437+ , _expId :: !(Maybe Text)

4438+ , _expUpdated :: !(Maybe DateTime')

44394439 , _expRewriteVariationURLsAsOriginal :: !(Maybe Bool)

4440− , _expObjectiveMetric :: !(Maybe Text)

4441− , _expWinnerConfidenceLevel :: !(Maybe Double)

4442− , _expServingFramework :: !(Maybe Text)

4443− , _expDescription :: !(Maybe Text)

4440+ , _expObjectiveMetric :: !(Maybe Text)

4441+ , _expWinnerConfidenceLevel :: !(Maybe Double)

4442+ , _expServingFramework :: !(Maybe Text)

4443+ , _expDescription :: !(Maybe Text)

44444444 } deriving (Eq,Show,Data,Typeable,Generic)

44454445

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

@@ -4504,7 +4504,7 @@ data Experiment = Experiment

45044504-- * 'expDescription'

45054505experiment

45064506 :: Experiment

4507−experiment =

4507+experiment =

45084508 Experiment

45094509 { _expParentLink = Nothing

45104510 , _expEqualWeighting = Nothing

@@ -4822,12 +4822,12 @@ instance ToJSON Experiment where

48224822--

48234823-- /See:/ 'entityUserLinks' smart constructor.

48244824data EntityUserLinks = EntityUserLinks

4825− { _eulNextLink :: !(Maybe Text)

4825+ { _eulNextLink :: !(Maybe Text)

48264826 , _eulItemsPerPage :: !(Maybe Int32)

4827− , _eulKind :: !Text

4828− , _eulItems :: !(Maybe [EntityUserLink])

4827+ , _eulKind :: !Text

4828+ , _eulItems :: !(Maybe [EntityUserLink])

48294829 , _eulTotalResults :: !(Maybe Int32)

4830− , _eulStartIndex :: !(Maybe Int32)

4830+ , _eulStartIndex :: !(Maybe Int32)

48314831 , _eulPreviousLink :: !(Maybe Text)

48324832 } deriving (Eq,Show,Data,Typeable,Generic)

48334833

@@ -4850,7 +4850,7 @@ data EntityUserLinks = EntityUserLinks

48504850-- * 'eulPreviousLink'

48514851entityUserLinks

48524852 :: EntityUserLinks

4853−entityUserLinks =

4853+entityUserLinks =

48544854 EntityUserLinks

48554855 { _eulNextLink = Nothing

48564856 , _eulItemsPerPage = Nothing

@@ -4935,8 +4935,8 @@ instance ToJSON EntityUserLinks where

49354935-- /See:/ 'adWordsAccount' smart constructor.

49364936data AdWordsAccount = AdWordsAccount

49374937 { _awaAutoTaggingEnabled :: !(Maybe Bool)

4938− , _awaKind :: !Text

4939− , _awaCustomerId :: !(Maybe Text)

4938+ , _awaKind :: !Text

4939+ , _awaCustomerId :: !(Maybe Text)

49404940 } deriving (Eq,Show,Data,Typeable,Generic)

49414941

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

@@ -4950,7 +4950,7 @@ data AdWordsAccount = AdWordsAccount

49504950-- * 'awaCustomerId'

49514951adWordsAccount

49524952 :: AdWordsAccount

4953−adWordsAccount =

4953+adWordsAccount =

49544954 AdWordsAccount

49554955 { _awaAutoTaggingEnabled = Nothing

49564956 , _awaKind = "analytics#adWordsAccount"

@@ -4996,11 +4996,11 @@ instance ToJSON AdWordsAccount where

49964996--

49974997-- /See:/ 'filterRef' smart constructor.

49984998data FilterRef = FilterRef

4999− { _frKind :: !Text

5000− , _frHref :: !(Maybe Text)

4999+ { _frKind :: !Text

5000+ , _frHref :: !(Maybe Text)

50015001 , _frAccountId :: !(Maybe Text)

5002− , _frName :: !(Maybe Text)

5003− , _frId :: !(Maybe Text)

5002+ , _frName :: !(Maybe Text)

5003+ , _frId :: !(Maybe Text)

50045004 } deriving (Eq,Show,Data,Typeable,Generic)

50055005

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

@@ -5018,7 +5018,7 @@ data FilterRef = FilterRef

50185018-- * 'frId'

50195019filterRef

50205020 :: FilterRef

5021−filterRef =

5021+filterRef =

50225022 FilterRef

50235023 { _frKind = "analytics#filterRef"

50245024 , _frHref = Nothing

@@ -5072,7 +5072,7 @@ instance ToJSON FilterRef where

50725072-- /See:/ 'goalVisitTimeOnSiteDetails' smart constructor.

50735073data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails

50745074 { _gvtosdComparisonValue :: !(Maybe Int64)

5075− , _gvtosdComparisonType :: !(Maybe Text)

5075+ , _gvtosdComparisonType :: !(Maybe Text)

50765076 } deriving (Eq,Show,Data,Typeable,Generic)

50775077

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

@@ -5084,7 +5084,7 @@ data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails

50845084-- * 'gvtosdComparisonType'

50855085goalVisitTimeOnSiteDetails

50865086 :: GoalVisitTimeOnSiteDetails

5087−goalVisitTimeOnSiteDetails =

5087+goalVisitTimeOnSiteDetails =

50885088 GoalVisitTimeOnSiteDetails

50895089 { _gvtosdComparisonValue = Nothing

50905090 , _gvtosdComparisonType = Nothing

@@ -5123,13 +5123,13 @@ instance ToJSON GoalVisitTimeOnSiteDetails where

51235123--

51245124-- /See:/ 'webProperties' smart constructor.

51255125data WebProperties = WebProperties

5126− { _wpNextLink :: !(Maybe Text)

5126+ { _wpNextLink :: !(Maybe Text)

51275127 , _wpItemsPerPage :: !(Maybe Int32)

5128− , _wpKind :: !Text

5129− , _wpUsername :: !(Maybe Text)

5130− , _wpItems :: !(Maybe [WebProperty])

5128+ , _wpKind :: !Text

5129+ , _wpUsername :: !(Maybe Text)

5130+ , _wpItems :: !(Maybe [WebProperty])

51315131 , _wpTotalResults :: !(Maybe Int32)

5132− , _wpStartIndex :: !(Maybe Int32)

5132+ , _wpStartIndex :: !(Maybe Int32)

51335133 , _wpPreviousLink :: !(Maybe Text)

51345134 } deriving (Eq,Show,Data,Typeable,Generic)

51355135

@@ -5154,7 +5154,7 @@ data WebProperties = WebProperties

51545154-- * 'wpPreviousLink'

51555155webProperties

51565156 :: WebProperties

5157−webProperties =

5157+webProperties =

51585158 WebProperties

51595159 { _wpNextLink = Nothing

51605160 , _wpItemsPerPage = Nothing

@@ -5246,13 +5246,13 @@ instance ToJSON WebProperties where

52465246--

52475247-- /See:/ 'customMetrics' smart constructor.

52485248data CustomMetrics = CustomMetrics

5249− { _cmNextLink :: !(Maybe Text)

5249+ { _cmNextLink :: !(Maybe Text)

52505250 , _cmItemsPerPage :: !(Maybe Int32)

5251− , _cmKind :: !Text

5252− , _cmUsername :: !(Maybe Text)

5253− , _cmItems :: !(Maybe [CustomMetric])

5251+ , _cmKind :: !Text

5252+ , _cmUsername :: !(Maybe Text)

5253+ , _cmItems :: !(Maybe [CustomMetric])

52545254 , _cmTotalResults :: !(Maybe Int32)

5255− , _cmStartIndex :: !(Maybe Int32)

5255+ , _cmStartIndex :: !(Maybe Int32)

52565256 , _cmPreviousLink :: !(Maybe Text)

52575257 } deriving (Eq,Show,Data,Typeable,Generic)

52585258

@@ -5277,7 +5277,7 @@ data CustomMetrics = CustomMetrics

52775277-- * 'cmPreviousLink'

52785278customMetrics

52795279 :: CustomMetrics

5280−customMetrics =

5280+customMetrics =

52815281 CustomMetrics

52825282 { _cmNextLink = Nothing

52835283 , _cmItemsPerPage = Nothing

@@ -5367,18 +5367,18 @@ instance ToJSON CustomMetrics where

53675367--

53685368-- /See:/ 'filterAdvancedDetails' smart constructor.

53695369data FilterAdvancedDetails = FilterAdvancedDetails

5370− { _fadExtractA :: !(Maybe Text)

5371− , _fadFieldARequired :: !(Maybe Bool)

5372− , _fadFieldA :: !(Maybe Text)

5373− , _fadFieldBIndex :: !(Maybe Int32)

5374− , _fadOutputToField :: !(Maybe Text)

5375− , _fadOutputConstructor :: !(Maybe Text)

5376− , _fadExtractB :: !(Maybe Text)

5377− , _fadFieldAIndex :: !(Maybe Int32)

5378− , _fadCaseSensitive :: !(Maybe Bool)

5379− , _fadOutputToFieldIndex :: !(Maybe Int32)

5380− , _fadFieldB :: !(Maybe Text)

5381− , _fadFieldBRequired :: !(Maybe Bool)

5370+ { _fadExtractA :: !(Maybe Text)

5371+ , _fadFieldARequired :: !(Maybe Bool)

5372+ , _fadFieldA :: !(Maybe Text)

5373+ , _fadFieldBIndex :: !(Maybe Int32)

5374+ , _fadOutputToField :: !(Maybe Text)

5375+ , _fadOutputConstructor :: !(Maybe Text)

5376+ , _fadExtractB :: !(Maybe Text)

5377+ , _fadFieldAIndex :: !(Maybe Int32)

5378+ , _fadCaseSensitive :: !(Maybe Bool)

5379+ , _fadOutputToFieldIndex :: !(Maybe Int32)

5380+ , _fadFieldB :: !(Maybe Text)

5381+ , _fadFieldBRequired :: !(Maybe Bool)

53825382 , _fadOverrideOutputField :: !(Maybe Bool)

53835383 } deriving (Eq,Show,Data,Typeable,Generic)

53845384

@@ -5413,7 +5413,7 @@ data FilterAdvancedDetails = FilterAdvancedDetails

54135413-- * 'fadOverrideOutputField'

54145414filterAdvancedDetails

54155415 :: FilterAdvancedDetails

5416−filterAdvancedDetails =

5416+filterAdvancedDetails =

54175417 FilterAdvancedDetails

54185418 { _fadExtractA = Nothing

54195419 , _fadFieldARequired = Nothing

@@ -5550,7 +5550,7 @@ instance ToJSON FilterAdvancedDetails where

55505550-- /See:/ 'filterUppercaseDetails' smart constructor.

55515551data FilterUppercaseDetails = FilterUppercaseDetails

55525552 { _fudFieldIndex :: !(Maybe Int32)

5553− , _fudField :: !(Maybe Text)

5553+ , _fudField :: !(Maybe Text)

55545554 } deriving (Eq,Show,Data,Typeable,Generic)

55555555

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

@@ -5562,7 +5562,7 @@ data FilterUppercaseDetails = FilterUppercaseDetails

55625562-- * 'fudField'

55635563filterUppercaseDetails

55645564 :: FilterUppercaseDetails

5565−filterUppercaseDetails =

5565+filterUppercaseDetails =

55665566 FilterUppercaseDetails

55675567 { _fudFieldIndex = Nothing

55685568 , _fudField = Nothing

@@ -5609,7 +5609,7 @@ data CustomDataSourceChildLink = CustomDataSourceChildLink

56095609-- * 'cdsclType'

56105610customDataSourceChildLink

56115611 :: CustomDataSourceChildLink

5612−customDataSourceChildLink =

5612+customDataSourceChildLink =

56135613 CustomDataSourceChildLink

56145614 { _cdsclHref = Nothing

56155615 , _cdsclType = Nothing

@@ -5658,7 +5658,7 @@ data FilterParentLink = FilterParentLink

56585658-- * 'fplType'

56595659filterParentLink

56605660 :: FilterParentLink

5661−filterParentLink =

5661+filterParentLink =

56625662 FilterParentLink

56635663 { _fplHref = Nothing

56645664 , _fplType = "analytics#account"

@@ -5691,14 +5691,14 @@ instance ToJSON FilterParentLink where

56915691--

56925692-- /See:/ 'realtimeData' smart constructor.

56935693data RealtimeData = RealtimeData

5694− { _rdProFileInfo :: !(Maybe RealtimeDataProFileInfo)

5695− , _rdKind :: !Text

5696− , _rdRows :: !(Maybe [[Text]])

5697− , _rdSelfLink :: !(Maybe Text)

5698− , _rdQuery :: !(Maybe RealtimeDataQuery)

5699− , _rdColumnHeaders :: !(Maybe [RealtimeDataColumnHeadersItem])

5700− , _rdId :: !(Maybe Text)

5701− , _rdTotalResults :: !(Maybe Int32)

5694+ { _rdProFileInfo :: !(Maybe RealtimeDataProFileInfo)

5695+ , _rdKind :: !Text

5696+ , _rdRows :: !(Maybe [[Text]])

5697+ , _rdSelfLink :: !(Maybe Text)

5698+ , _rdQuery :: !(Maybe RealtimeDataQuery)

5699+ , _rdColumnHeaders :: !(Maybe [RealtimeDataColumnHeadersItem])

5700+ , _rdId :: !(Maybe Text)

5701+ , _rdTotalResults :: !(Maybe Int32)

57025702 , _rdTotalsForAllResults :: !(Maybe RealtimeDataTotalsForAllResults)

57035703 } deriving (Eq,Show,Data,Typeable,Generic)

57045704

@@ -5725,7 +5725,7 @@ data RealtimeData = RealtimeData

57255725-- * 'rdTotalsForAllResults'

57265726realtimeData

57275727 :: RealtimeData

5728−realtimeData =

5728+realtimeData =

57295729 RealtimeData

57305730 { _rdProFileInfo = Nothing

57315731 , _rdKind = "analytics#realtimeData"

@@ -5827,21 +5827,21 @@ instance ToJSON RealtimeData where

58275827--

58285828-- /See:/ 'customMetric' smart constructor.

58295829data CustomMetric = CustomMetric

5830− { _cusParentLink :: !(Maybe CustomMetricParentLink)

5830+ { _cusParentLink :: !(Maybe CustomMetricParentLink)

58315831 , _cusWebPropertyId :: !(Maybe Text)

5832− , _cusKind :: !Text

5833− , _cusMaxValue :: !(Maybe Text)

5834− , _cusCreated :: !(Maybe DateTime')

5835− , _cusMinValue :: !(Maybe Text)

5836− , _cusActive :: !(Maybe Bool)

5837− , _cusSelfLink :: !(Maybe Text)

5838− , _cusAccountId :: !(Maybe Text)

5839− , _cusName :: !(Maybe Text)

5840− , _cusScope :: !(Maybe Text)

5841− , _cusId :: !(Maybe Text)

5842− , _cusUpdated :: !(Maybe DateTime')

5843− , _cusType :: !(Maybe Text)

5844− , _cusIndex :: !(Maybe Int32)

5832+ , _cusKind :: !Text

5833+ , _cusMaxValue :: !(Maybe Text)

5834+ , _cusCreated :: !(Maybe DateTime')

5835+ , _cusMinValue :: !(Maybe Text)

5836+ , _cusActive :: !(Maybe Bool)

5837+ , _cusSelfLink :: !(Maybe Text)

5838+ , _cusAccountId :: !(Maybe Text)

5839+ , _cusName :: !(Maybe Text)

5840+ , _cusScope :: !(Maybe Text)

5841+ , _cusId :: !(Maybe Text)

5842+ , _cusUpdated :: !(Maybe DateTime')

5843+ , _cusType :: !(Maybe Text)

5844+ , _cusIndex :: !(Maybe Int32)

58455845 } deriving (Eq,Show,Data,Typeable,Generic)

58465846

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

@@ -5879,7 +5879,7 @@ data CustomMetric = CustomMetric

58795879-- * 'cusIndex'

58805880customMetric

58815881 :: CustomMetric

5882−customMetric =

5882+customMetric =

58835883 CustomMetric

58845884 { _cusParentLink = Nothing

58855885 , _cusWebPropertyId = Nothing

@@ -6018,7 +6018,7 @@ instance ToJSON CustomMetric where

60186018data ProFileSummary = ProFileSummary

60196019 { _pfsKind :: !Text

60206020 , _pfsName :: !(Maybe Text)

6021− , _pfsId :: !(Maybe Text)

6021+ , _pfsId :: !(Maybe Text)

60226022 , _pfsType :: !(Maybe Text)

60236023 } deriving (Eq,Show,Data,Typeable,Generic)

60246024

@@ -6035,7 +6035,7 @@ data ProFileSummary = ProFileSummary

60356035-- * 'pfsType'

60366036proFileSummary

60376037 :: ProFileSummary

6038−proFileSummary =

6038+proFileSummary =

60396039 ProFileSummary

60406040 { _pfsKind = "analytics#profileSummary"

60416041 , _pfsName = Nothing

@@ -6094,7 +6094,7 @@ data CustomDimensionParentLink = CustomDimensionParentLink

60946094-- * 'cdplType'

60956095customDimensionParentLink

60966096 :: CustomDimensionParentLink

6097−customDimensionParentLink =

6097+customDimensionParentLink =

60986098 CustomDimensionParentLink

60996099 { _cdplHref = Nothing

61006100 , _cdplType = "analytics#webproperty"

@@ -6127,22 +6127,22 @@ instance ToJSON CustomDimensionParentLink where

61276127--

61286128-- /See:/ 'webProperty' smart constructor.

61296129data WebProperty = WebProperty

6130− { _wParentLink :: !(Maybe WebPropertyParentLink)

6131− , _wChildLink :: !(Maybe WebPropertyChildLink)

6132− , _wDefaultProFileId :: !(Maybe Int64)

6133− , _wKind :: !Text

6134− , _wCreated :: !(Maybe DateTime')

6135− , _wSelfLink :: !(Maybe Text)

6136− , _wAccountId :: !(Maybe Text)

6137− , _wName :: !(Maybe Text)

6130+ { _wParentLink :: !(Maybe WebPropertyParentLink)

6131+ , _wChildLink :: !(Maybe WebPropertyChildLink)

6132+ , _wDefaultProFileId :: !(Maybe Int64)

6133+ , _wKind :: !Text

6134+ , _wCreated :: !(Maybe DateTime')

6135+ , _wSelfLink :: !(Maybe Text)

6136+ , _wAccountId :: !(Maybe Text)

6137+ , _wName :: !(Maybe Text)

61386138 , _wInternalWebPropertyId :: !(Maybe Text)

6139− , _wId :: !(Maybe Text)

6140− , _wUpdated :: !(Maybe DateTime')

6141− , _wProFileCount :: !(Maybe Int32)

6142− , _wPermissions :: !(Maybe WebPropertyPermissions)

6143− , _wWebsiteURL :: !(Maybe Text)

6144− , _wIndustryVertical :: !(Maybe Text)

6145− , _wLevel :: !(Maybe Text)

6139+ , _wId :: !(Maybe Text)

6140+ , _wUpdated :: !(Maybe DateTime')

6141+ , _wProFileCount :: !(Maybe Int32)

6142+ , _wPermissions :: !(Maybe WebPropertyPermissions)

6143+ , _wWebsiteURL :: !(Maybe Text)

6144+ , _wIndustryVertical :: !(Maybe Text)

6145+ , _wLevel :: !(Maybe Text)

61466146 } deriving (Eq,Show,Data,Typeable,Generic)

61476147

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

@@ -6182,7 +6182,7 @@ data WebProperty = WebProperty

61826182-- * 'wLevel'

61836183webProperty

61846184 :: WebProperty

6185−webProperty =

6185+webProperty =

61866186 WebProperty

61876187 { _wParentLink = Nothing

61886188 , _wChildLink = Nothing

@@ -6342,7 +6342,7 @@ newtype WebPropertyPermissions = WebPropertyPermissions

63426342-- * 'wppEffective'

63436343webPropertyPermissions

63446344 :: WebPropertyPermissions

6345−webPropertyPermissions =

6345+webPropertyPermissions =

63466346 WebPropertyPermissions

63476347 { _wppEffective = Nothing

63486348 }

@@ -6373,12 +6373,12 @@ instance ToJSON WebPropertyPermissions where

63736373--

63746374-- /See:/ 'entityUserLink' smart constructor.

63756375data EntityUserLink = EntityUserLink

6376− { _euluKind :: !Text

6377− , _euluUserRef :: !(Maybe UserRef)

6378− , _euluSelfLink :: !(Maybe Text)

6379− , _euluId :: !(Maybe Text)

6376+ { _euluKind :: !Text

6377+ , _euluUserRef :: !(Maybe UserRef)

6378+ , _euluSelfLink :: !(Maybe Text)

6379+ , _euluId :: !(Maybe Text)

63806380 , _euluPermissions :: !(Maybe EntityUserLinkPermissions)

6381− , _euluEntity :: !(Maybe EntityUserLinkEntity)

6381+ , _euluEntity :: !(Maybe EntityUserLinkEntity)

63826382 } deriving (Eq,Show,Data,Typeable,Generic)

63836383

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

@@ -6398,7 +6398,7 @@ data EntityUserLink = EntityUserLink

63986398-- * 'euluEntity'

63996399entityUserLink

64006400 :: EntityUserLink

6401−entityUserLink =

6401+entityUserLink =

64026402 EntityUserLink

64036403 { _euluKind = "analytics#entityUserLink"

64046404 , _euluUserRef = Nothing

@@ -6479,7 +6479,7 @@ data CustomDataSourceParentLink = CustomDataSourceParentLink

64796479-- * 'cdsplType'

64806480customDataSourceParentLink

64816481 :: CustomDataSourceParentLink

6482−customDataSourceParentLink =

6482+customDataSourceParentLink =

64836483 CustomDataSourceParentLink

64846484 { _cdsplHref = Nothing

64856485 , _cdsplType = "analytics#webproperty"

@@ -6513,11 +6513,11 @@ instance ToJSON CustomDataSourceParentLink where

65136513--

65146514-- /See:/ 'goalEventDetailsEventConditionsItem' smart constructor.

65156515data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem

6516− { _gedeciMatchType :: !(Maybe Text)

6517− , _gedeciExpression :: !(Maybe Text)

6516+ { _gedeciMatchType :: !(Maybe Text)

6517+ , _gedeciExpression :: !(Maybe Text)

65186518 , _gedeciComparisonValue :: !(Maybe Int64)

6519− , _gedeciType :: !(Maybe Text)

6520− , _gedeciComparisonType :: !(Maybe Text)

6519+ , _gedeciType :: !(Maybe Text)

6520+ , _gedeciComparisonType :: !(Maybe Text)

65216521 } deriving (Eq,Show,Data,Typeable,Generic)

65226522

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

@@ -6535,7 +6535,7 @@ data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem

65356535-- * 'gedeciComparisonType'

65366536goalEventDetailsEventConditionsItem

65376537 :: GoalEventDetailsEventConditionsItem

6538−goalEventDetailsEventConditionsItem =

6538+goalEventDetailsEventConditionsItem =

65396539 GoalEventDetailsEventConditionsItem

65406540 { _gedeciMatchType = Nothing

65416541 , _gedeciExpression = Nothing

@@ -6602,17 +6602,17 @@ instance ToJSON GoalEventDetailsEventConditionsItem

66026602--

66036603-- /See:/ 'mcfDataQuery' smart constructor.

66046604data McfDataQuery = McfDataQuery

6605− { _mdqMetrics :: !(Maybe [Text])

6605+ { _mdqMetrics :: !(Maybe [Text])

66066606 , _mdqSamplingLevel :: !(Maybe Text)

6607− , _mdqFilters :: !(Maybe Text)

6608− , _mdqIds :: !(Maybe Text)

6609− , _mdqEndDate :: !(Maybe Text)

6610− , _mdqSort :: !(Maybe [Text])

6611− , _mdqDimensions :: !(Maybe Text)

6612− , _mdqStartIndex :: !(Maybe Int32)

6613− , _mdqMaxResults :: !(Maybe Int32)

6614− , _mdqSegment :: !(Maybe Text)

6615− , _mdqStartDate :: !(Maybe Text)

6607+ , _mdqFilters :: !(Maybe Text)

6608+ , _mdqIds :: !(Maybe Text)

6609+ , _mdqEndDate :: !(Maybe Text)

6610+ , _mdqSort :: !(Maybe [Text])

6611+ , _mdqDimensions :: !(Maybe Text)

6612+ , _mdqStartIndex :: !(Maybe Int32)

6613+ , _mdqMaxResults :: !(Maybe Int32)

6614+ , _mdqSegment :: !(Maybe Text)

6615+ , _mdqStartDate :: !(Maybe Text)

66166616 } deriving (Eq,Show,Data,Typeable,Generic)

66176617

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

@@ -6642,7 +6642,7 @@ data McfDataQuery = McfDataQuery

66426642-- * 'mdqStartDate'

66436643mcfDataQuery

66446644 :: McfDataQuery

6645−mcfDataQuery =

6645+mcfDataQuery =

66466646 McfDataQuery

66476647 { _mdqMetrics = Nothing

66486648 , _mdqSamplingLevel = Nothing

@@ -6755,24 +6755,24 @@ instance ToJSON McfDataQuery where

67556755--

67566756-- /See:/ 'goal' smart constructor.

67576757data Goal = Goal

6758− { _goaParentLink :: !(Maybe GoalParentLink)

6759− , _goaWebPropertyId :: !(Maybe Text)

6760− , _goaKind :: !Text

6761− , _goaCreated :: !(Maybe DateTime')

6762− , _goaValue :: !(Maybe Float)

6763− , _goaProFileId :: !(Maybe Text)

6764− , _goaEventDetails :: !(Maybe GoalEventDetails)

6765− , _goaActive :: !(Maybe Bool)

6766− , _goaSelfLink :: !(Maybe Text)

6758+ { _goaParentLink :: !(Maybe GoalParentLink)

6759+ , _goaWebPropertyId :: !(Maybe Text)

6760+ , _goaKind :: !Text

6761+ , _goaCreated :: !(Maybe DateTime')

6762+ , _goaValue :: !(Maybe Float)

6763+ , _goaProFileId :: !(Maybe Text)

6764+ , _goaEventDetails :: !(Maybe GoalEventDetails)

6765+ , _goaActive :: !(Maybe Bool)

6766+ , _goaSelfLink :: !(Maybe Text)

67676767 , _goaVisitTimeOnSiteDetails :: !(Maybe GoalVisitTimeOnSiteDetails)

6768− , _goaAccountId :: !(Maybe Text)

6769− , _goaName :: !(Maybe Text)

6770− , _goaInternalWebPropertyId :: !(Maybe Text)

6771− , _goaId :: !(Maybe Text)

6772− , _goaURLDestinationDetails :: !(Maybe GoalURLDestinationDetails)

6773− , _goaVisitNumPagesDetails :: !(Maybe GoalVisitNumPagesDetails)

6774− , _goaUpdated :: !(Maybe DateTime')

6775− , _goaType :: !(Maybe Text)

6768+ , _goaAccountId :: !(Maybe Text)

6769+ , _goaName :: !(Maybe Text)

6770+ , _goaInternalWebPropertyId :: !(Maybe Text)

6771+ , _goaId :: !(Maybe Text)

6772+ , _goaURLDestinationDetails :: !(Maybe GoalURLDestinationDetails)

6773+ , _goaVisitNumPagesDetails :: !(Maybe GoalVisitNumPagesDetails)

6774+ , _goaUpdated :: !(Maybe DateTime')

6775+ , _goaType :: !(Maybe Text)

67766776 } deriving (Eq,Show,Data,Typeable,Generic)

67776777

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

@@ -6816,7 +6816,7 @@ data Goal = Goal

68166816-- * 'goaType'

68176817goal

68186818 :: Goal

6819−goal =

6819+goal =

68206820 Goal

68216821 { _goaParentLink = Nothing

68226822 , _goaWebPropertyId = Nothing

@@ -6992,11 +6992,11 @@ instance ToJSON Goal where

69926992-- /See:/ 'accountTicket' smart constructor.

69936993data AccountTicket = AccountTicket

69946994 { _atRedirectURI :: !(Maybe Text)

6995− , _atKind :: !Text

6996− , _atProFile :: !(Maybe ProFile)

6997− , _atAccount :: !(Maybe Account)

6995+ , _atKind :: !Text

6996+ , _atProFile :: !(Maybe ProFile)

6997+ , _atAccount :: !(Maybe Account)

69986998 , _atWebProperty :: !(Maybe WebProperty)

6999− , _atId :: !(Maybe Text)

6999+ , _atId :: !(Maybe Text)

70007000 } deriving (Eq,Show,Data,Typeable,Generic)

70017001

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

@@ -7016,7 +7016,7 @@ data AccountTicket = AccountTicket

70167016-- * 'atId'

70177017accountTicket

70187018 :: AccountTicket

7019−accountTicket =

7019+accountTicket =

70207020 AccountTicket

70217021 { _atRedirectURI = Nothing

70227022 , _atKind = "analytics#accountTicket"

@@ -7085,10 +7085,10 @@ instance ToJSON AccountTicket where

70857085--

70867086-- /See:/ 'accountSummary' smart constructor.

70877087data AccountSummary = AccountSummary

7088− { _assKind :: !Text

7088+ { _assKind :: !Text

70897089 , _assWebProperties :: !(Maybe [WebPropertySummary])

7090− , _assName :: !(Maybe Text)

7091− , _assId :: !(Maybe Text)

7090+ , _assName :: !(Maybe Text)

7091+ , _assId :: !(Maybe Text)

70927092 } deriving (Eq,Show,Data,Typeable,Generic)

70937093

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

@@ -7104,7 +7104,7 @@ data AccountSummary = AccountSummary

71047104-- * 'assId'

71057105accountSummary

71067106 :: AccountSummary

7107−accountSummary =

7107+accountSummary =

71087108 AccountSummary

71097109 { _assKind = "analytics#accountSummary"

71107110 , _assWebProperties = Nothing

@@ -7154,10 +7154,10 @@ instance ToJSON AccountSummary where

71547154--

71557155-- /See:/ 'realtimeDataQuery' smart constructor.

71567156data RealtimeDataQuery = RealtimeDataQuery

7157− { _rdqMetrics :: !(Maybe [Text])

7158− , _rdqFilters :: !(Maybe Text)

7159− , _rdqIds :: !(Maybe Text)

7160− , _rdqSort :: !(Maybe [Text])

7157+ { _rdqMetrics :: !(Maybe [Text])

7158+ , _rdqFilters :: !(Maybe Text)

7159+ , _rdqIds :: !(Maybe Text)

7160+ , _rdqSort :: !(Maybe [Text])

71617161 , _rdqDimensions :: !(Maybe Text)

71627162 , _rdqMaxResults :: !(Maybe Int32)

71637163 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -7179,7 +7179,7 @@ data RealtimeDataQuery = RealtimeDataQuery

71797179-- * 'rdqMaxResults'

71807180realtimeDataQuery

71817181 :: RealtimeDataQuery

7182−realtimeDataQuery =

7182+realtimeDataQuery =

71837183 RealtimeDataQuery

71847184 { _rdqMetrics = Nothing

71857185 , _rdqFilters = Nothing

@@ -7248,10 +7248,10 @@ instance ToJSON RealtimeDataQuery where

72487248--

72497249-- /See:/ 'columns' smart constructor.

72507250data Columns = Columns

7251− { _colEtag :: !(Maybe Text)

7252− , _colKind :: !Text

7253− , _colItems :: !(Maybe [Column])

7254− , _colTotalResults :: !(Maybe Int32)

7251+ { _colEtag :: !(Maybe Text)

7252+ , _colKind :: !Text

7253+ , _colItems :: !(Maybe [Column])

7254+ , _colTotalResults :: !(Maybe Int32)

72557255 , _colAttributeNames :: !(Maybe [Text])

72567256 } deriving (Eq,Show,Data,Typeable,Generic)

72577257

@@ -7270,7 +7270,7 @@ data Columns = Columns

72707270-- * 'colAttributeNames'

72717271columns

72727272 :: Columns

7273−columns =

7273+columns =

72747274 Columns

72757275 { _colEtag = Nothing

72767276 , _colKind = "analytics#columns"

@@ -7334,7 +7334,7 @@ instance ToJSON Columns where

73347334-- /See:/ 'filterLowercaseDetails' smart constructor.

73357335data FilterLowercaseDetails = FilterLowercaseDetails

73367336 { _fldFieldIndex :: !(Maybe Int32)

7337− , _fldField :: !(Maybe Text)

7337+ , _fldField :: !(Maybe Text)

73387338 } deriving (Eq,Show,Data,Typeable,Generic)

73397339

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

@@ -7346,7 +7346,7 @@ data FilterLowercaseDetails = FilterLowercaseDetails

73467346-- * 'fldField'

73477347filterLowercaseDetails

73487348 :: FilterLowercaseDetails

7349−filterLowercaseDetails =

7349+filterLowercaseDetails =

73507350 FilterLowercaseDetails

73517351 { _fldFieldIndex = Nothing

73527352 , _fldField = Nothing

@@ -7381,20 +7381,20 @@ instance ToJSON FilterLowercaseDetails where

73817381--

73827382-- /See:/ 'filter'' smart constructor.

73837383data Filter = Filter

7384− { _filParentLink :: !(Maybe FilterParentLink)

7385− , _filAdvancedDetails :: !(Maybe FilterAdvancedDetails)

7386− , _filUppercaseDetails :: !(Maybe FilterUppercaseDetails)

7387− , _filLowercaseDetails :: !(Maybe FilterLowercaseDetails)

7388− , _filKind :: !Text

7389− , _filCreated :: !(Maybe DateTime')

7390− , _filIncludeDetails :: !(Maybe FilterExpression)

7391− , _filExcludeDetails :: !(Maybe FilterExpression)

7392− , _filSelfLink :: !(Maybe Text)

7393− , _filAccountId :: !(Maybe Text)

7394− , _filName :: !(Maybe Text)

7395− , _filId :: !(Maybe Text)

7396− , _filUpdated :: !(Maybe DateTime')

7397− , _filType :: !(Maybe Text)

7384+ { _filParentLink :: !(Maybe FilterParentLink)

7385+ , _filAdvancedDetails :: !(Maybe FilterAdvancedDetails)

7386+ , _filUppercaseDetails :: !(Maybe FilterUppercaseDetails)

7387+ , _filLowercaseDetails :: !(Maybe FilterLowercaseDetails)

7388+ , _filKind :: !Text

7389+ , _filCreated :: !(Maybe DateTime')

7390+ , _filIncludeDetails :: !(Maybe FilterExpression)

7391+ , _filExcludeDetails :: !(Maybe FilterExpression)

7392+ , _filSelfLink :: !(Maybe Text)

7393+ , _filAccountId :: !(Maybe Text)

7394+ , _filName :: !(Maybe Text)

7395+ , _filId :: !(Maybe Text)

7396+ , _filUpdated :: !(Maybe DateTime')

7397+ , _filType :: !(Maybe Text)

73987398 , _filSearchAndReplaceDetails :: !(Maybe FilterSearchAndReplaceDetails)

73997399 } deriving (Eq,Show,Data,Typeable,Generic)

74007400

@@ -7433,7 +7433,7 @@ data Filter = Filter

74337433-- * 'filSearchAndReplaceDetails'

74347434filter'

74357435 :: Filter

7436−filter' =

7436+filter' =

74377437 Filter

74387438 { _filParentLink = Nothing

74397439 , _filAdvancedDetails = Nothing

@@ -7580,12 +7580,12 @@ instance ToJSON Filter where

75807580--

75817581-- /See:/ 'uploads' smart constructor.

75827582data Uploads = Uploads

7583− { _uplNextLink :: !(Maybe Text)

7583+ { _uplNextLink :: !(Maybe Text)

75847584 , _uplItemsPerPage :: !(Maybe Int32)

7585− , _uplKind :: !Text

7586− , _uplItems :: !(Maybe [Upload])

7585+ , _uplKind :: !Text

7586+ , _uplItems :: !(Maybe [Upload])

75877587 , _uplTotalResults :: !(Maybe Int32)

7588− , _uplStartIndex :: !(Maybe Int32)

7588+ , _uplStartIndex :: !(Maybe Int32)

75897589 , _uplPreviousLink :: !(Maybe Text)

75907590 } deriving (Eq,Show,Data,Typeable,Generic)

75917591

@@ -7608,7 +7608,7 @@ data Uploads = Uploads

76087608-- * 'uplPreviousLink'

76097609uploads

76107610 :: Uploads

7611−uploads =

7611+uploads =

76127612 Uploads

76137613 { _uplNextLink = Nothing

76147614 , _uplItemsPerPage = Nothing

@@ -7694,13 +7694,13 @@ instance ToJSON Uploads where

76947694--

76957695-- /See:/ 'customDimensions' smart constructor.

76967696data CustomDimensions = CustomDimensions

7697− { _cdNextLink :: !(Maybe Text)

7697+ { _cdNextLink :: !(Maybe Text)

76987698 , _cdItemsPerPage :: !(Maybe Int32)

7699− , _cdKind :: !Text

7700− , _cdUsername :: !(Maybe Text)

7701− , _cdItems :: !(Maybe [CustomDimension])

7699+ , _cdKind :: !Text

7700+ , _cdUsername :: !(Maybe Text)

7701+ , _cdItems :: !(Maybe [CustomDimension])

77027702 , _cdTotalResults :: !(Maybe Int32)

7703− , _cdStartIndex :: !(Maybe Int32)

7703+ , _cdStartIndex :: !(Maybe Int32)

77047704 , _cdPreviousLink :: !(Maybe Text)

77057705 } deriving (Eq,Show,Data,Typeable,Generic)

77067706

@@ -7725,7 +7725,7 @@ data CustomDimensions = CustomDimensions

77257725-- * 'cdPreviousLink'

77267726customDimensions

77277727 :: CustomDimensions

7728−customDimensions =

7728+customDimensions =

77297729 CustomDimensions

77307730 { _cdNextLink = Nothing

77317731 , _cdItemsPerPage = Nothing

@@ -7817,13 +7817,13 @@ instance ToJSON CustomDimensions where

78177817--

78187818-- /See:/ 'segments' smart constructor.

78197819data Segments = Segments

7820− { _sNextLink :: !(Maybe Text)

7820+ { _sNextLink :: !(Maybe Text)

78217821 , _sItemsPerPage :: !(Maybe Int32)

7822− , _sKind :: !Text

7823− , _sUsername :: !(Maybe Text)

7824− , _sItems :: !(Maybe [Segment])

7822+ , _sKind :: !Text

7823+ , _sUsername :: !(Maybe Text)

7824+ , _sItems :: !(Maybe [Segment])

78257825 , _sTotalResults :: !(Maybe Int32)

7826− , _sStartIndex :: !(Maybe Int32)

7826+ , _sStartIndex :: !(Maybe Int32)

78277827 , _sPreviousLink :: !(Maybe Text)

78287828 } deriving (Eq,Show,Data,Typeable,Generic)

78297829

@@ -7848,7 +7848,7 @@ data Segments = Segments

78487848-- * 'sPreviousLink'

78497849segments

78507850 :: Segments

7851−segments =

7851+segments =

78527852 Segments

78537853 { _sNextLink = Nothing

78547854 , _sItemsPerPage = Nothing

@@ -7950,7 +7950,7 @@ data GaDataDataTable = GaDataDataTable

79507950-- * 'gddtRows'

79517951gaDataDataTable

79527952 :: GaDataDataTable

7953−gaDataDataTable =

7953+gaDataDataTable =

79547954 GaDataDataTable

79557955 { _gddtCols = Nothing

79567956 , _gddtRows = Nothing

@@ -7997,7 +7997,7 @@ newtype EntityAdWordsLinkEntity = EntityAdWordsLinkEntity

79977997-- * 'eawleWebPropertyRef'

79987998entityAdWordsLinkEntity

79997999 :: EntityAdWordsLinkEntity

8000−entityAdWordsLinkEntity =

8000+entityAdWordsLinkEntity =

80018001 EntityAdWordsLinkEntity

80028002 { _eawleWebPropertyRef = Nothing

80038003 }

@@ -8023,10 +8023,10 @@ instance ToJSON EntityAdWordsLinkEntity where

80238023--

80248024-- /See:/ 'goalURLDestinationDetails' smart constructor.

80258025data GoalURLDestinationDetails = GoalURLDestinationDetails

8026− { _guddURL :: !(Maybe Text)

8027− , _guddMatchType :: !(Maybe Text)

8028− , _guddSteps :: !(Maybe [GoalURLDestinationDetailsStepsItem])

8029− , _guddCaseSensitive :: !(Maybe Bool)

8026+ { _guddURL :: !(Maybe Text)

8027+ , _guddMatchType :: !(Maybe Text)

8028+ , _guddSteps :: !(Maybe [GoalURLDestinationDetailsStepsItem])

8029+ , _guddCaseSensitive :: !(Maybe Bool)

80308030 , _guddFirstStepRequired :: !(Maybe Bool)

80318031 } deriving (Eq,Show,Data,Typeable,Generic)

80328032

@@ -8045,7 +8045,7 @@ data GoalURLDestinationDetails = GoalURLDestinationDetails

80458045-- * 'guddFirstStepRequired'

80468046goalURLDestinationDetails

80478047 :: GoalURLDestinationDetails

8048−goalURLDestinationDetails =

8048+goalURLDestinationDetails =

80498049 GoalURLDestinationDetails

80508050 { _guddURL = Nothing

80518051 , _guddMatchType = Nothing

@@ -8110,13 +8110,13 @@ instance ToJSON GoalURLDestinationDetails where

81108110--

81118111-- /See:/ 'proFileFilterLinks' smart constructor.

81128112data ProFileFilterLinks = ProFileFilterLinks

8113− { _pfflNextLink :: !(Maybe Text)

8113+ { _pfflNextLink :: !(Maybe Text)

81148114 , _pfflItemsPerPage :: !(Maybe Int32)

8115− , _pfflKind :: !Text

8116− , _pfflUsername :: !(Maybe Text)

8117− , _pfflItems :: !(Maybe [ProFileFilterLink])

8115+ , _pfflKind :: !Text

8116+ , _pfflUsername :: !(Maybe Text)

8117+ , _pfflItems :: !(Maybe [ProFileFilterLink])

81188118 , _pfflTotalResults :: !(Maybe Int32)

8119− , _pfflStartIndex :: !(Maybe Int32)

8119+ , _pfflStartIndex :: !(Maybe Int32)

81208120 , _pfflPreviousLink :: !(Maybe Text)

81218121 } deriving (Eq,Show,Data,Typeable,Generic)

81228122

@@ -8141,7 +8141,7 @@ data ProFileFilterLinks = ProFileFilterLinks

81418141-- * 'pfflPreviousLink'

81428142proFileFilterLinks

81438143 :: ProFileFilterLinks

8144−proFileFilterLinks =

8144+proFileFilterLinks =

81458145 ProFileFilterLinks

81468146 { _pfflNextLink = Nothing

81478147 , _pfflItemsPerPage = Nothing

@@ -8247,7 +8247,7 @@ data WebPropertyParentLink = WebPropertyParentLink

82478247-- * 'wpplType'

82488248webPropertyParentLink

82498249 :: WebPropertyParentLink

8250−webPropertyParentLink =

8250+webPropertyParentLink =

82518251 WebPropertyParentLink

82528252 { _wpplHref = Nothing

82538253 , _wpplType = "analytics#account"

@@ -8281,12 +8281,12 @@ instance ToJSON WebPropertyParentLink where

82818281--

82828282-- /See:/ 'gaDataProFileInfo' smart constructor.

82838283data GaDataProFileInfo = GaDataProFileInfo

8284− { _gdpfiWebPropertyId :: !(Maybe Text)

8285− , _gdpfiProFileId :: !(Maybe Text)

8286− , _gdpfiProFileName :: !(Maybe Text)

8287− , _gdpfiAccountId :: !(Maybe Text)

8284+ { _gdpfiWebPropertyId :: !(Maybe Text)

8285+ , _gdpfiProFileId :: !(Maybe Text)

8286+ , _gdpfiProFileName :: !(Maybe Text)

8287+ , _gdpfiAccountId :: !(Maybe Text)

82888288 , _gdpfiInternalWebPropertyId :: !(Maybe Text)

8289− , _gdpfiTableId :: !(Maybe Text)

8289+ , _gdpfiTableId :: !(Maybe Text)

82908290 } deriving (Eq,Show,Data,Typeable,Generic)

82918291

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

@@ -8306,7 +8306,7 @@ data GaDataProFileInfo = GaDataProFileInfo

83068306-- * 'gdpfiTableId'

83078307gaDataProFileInfo

83088308 :: GaDataProFileInfo

8309−gaDataProFileInfo =

8309+gaDataProFileInfo =

83108310 GaDataProFileInfo

83118311 { _gdpfiWebPropertyId = Nothing

83128312 , _gdpfiProFileId = Nothing

@@ -8378,12 +8378,12 @@ instance ToJSON GaDataProFileInfo where

83788378--

83798379-- /See:/ 'upload' smart constructor.

83808380data Upload = Upload

8381− { _uuStatus :: !(Maybe Text)

8382− , _uuKind :: !Text

8381+ { _uuStatus :: !(Maybe Text)

8382+ , _uuKind :: !Text

83838383 , _uuCustomDataSourceId :: !(Maybe Text)

8384− , _uuAccountId :: !(Maybe Int64)

8385− , _uuId :: !(Maybe Text)

8386− , _uuErrors :: !(Maybe [Text])

8384+ , _uuAccountId :: !(Maybe Int64)

8385+ , _uuId :: !(Maybe Text)

8386+ , _uuErrors :: !(Maybe [Text])

83878387 } deriving (Eq,Show,Data,Typeable,Generic)

83888388

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

@@ -8403,7 +8403,7 @@ data Upload = Upload

84038403-- * 'uuErrors'

84048404upload

84058405 :: Upload

8406−upload =

8406+upload =

84078407 Upload

84088408 { _uuStatus = Nothing

84098409 , _uuKind = "analytics#upload"

@@ -8470,18 +8470,18 @@ instance ToJSON Upload where

84708470--

84718471-- /See:/ 'customDimension' smart constructor.

84728472data CustomDimension = CustomDimension

8473− { _cddParentLink :: !(Maybe CustomDimensionParentLink)

8473+ { _cddParentLink :: !(Maybe CustomDimensionParentLink)

84748474 , _cddWebPropertyId :: !(Maybe Text)

8475− , _cddKind :: !Text

8476− , _cddCreated :: !(Maybe DateTime')

8477− , _cddActive :: !(Maybe Bool)

8478− , _cddSelfLink :: !(Maybe Text)

8479− , _cddAccountId :: !(Maybe Text)

8480− , _cddName :: !(Maybe Text)

8481− , _cddScope :: !(Maybe Text)

8482− , _cddId :: !(Maybe Text)

8483− , _cddUpdated :: !(Maybe DateTime')

8484− , _cddIndex :: !(Maybe Int32)

8475+ , _cddKind :: !Text

8476+ , _cddCreated :: !(Maybe DateTime')

8477+ , _cddActive :: !(Maybe Bool)

8478+ , _cddSelfLink :: !(Maybe Text)

8479+ , _cddAccountId :: !(Maybe Text)

8480+ , _cddName :: !(Maybe Text)

8481+ , _cddScope :: !(Maybe Text)

8482+ , _cddId :: !(Maybe Text)

8483+ , _cddUpdated :: !(Maybe DateTime')

8484+ , _cddIndex :: !(Maybe Int32)

84858485 } deriving (Eq,Show,Data,Typeable,Generic)

84868486

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

@@ -8513,7 +8513,7 @@ data CustomDimension = CustomDimension

85138513-- * 'cddIndex'

85148514customDimension

85158515 :: CustomDimension

8516−customDimension =

8516+customDimension =

85178517 CustomDimension

85188518 { _cddParentLink = Nothing

85198519 , _cddWebPropertyId = Nothing

@@ -8627,14 +8627,14 @@ instance ToJSON CustomDimension where

86278627-- /See:/ 'segment' smart constructor.

86288628data Segment = Segment

86298629 { _segDefinition :: !(Maybe Text)

8630− , _segKind :: !Text

8631− , _segCreated :: !(Maybe DateTime')

8632− , _segSelfLink :: !(Maybe Text)

8633− , _segName :: !(Maybe Text)

8634− , _segId :: !(Maybe Text)

8635− , _segUpdated :: !(Maybe DateTime')

8636− , _segType :: !(Maybe Text)

8637− , _segSegmentId :: !(Maybe Text)

8630+ , _segKind :: !Text

8631+ , _segCreated :: !(Maybe DateTime')

8632+ , _segSelfLink :: !(Maybe Text)

8633+ , _segName :: !(Maybe Text)

8634+ , _segId :: !(Maybe Text)

8635+ , _segUpdated :: !(Maybe DateTime')

8636+ , _segType :: !(Maybe Text)

8637+ , _segSegmentId :: !(Maybe Text)

86388638 } deriving (Eq,Show,Data,Typeable,Generic)

86398639

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

@@ -8660,7 +8660,7 @@ data Segment = Segment

86608660-- * 'segSegmentId'

86618661segment

86628662 :: Segment

8663−segment =

8663+segment =

86648664 Segment

86658665 { _segDefinition = Nothing

86668666 , _segKind = "analytics#segment"

@@ -8764,7 +8764,7 @@ data AccountChildLink = AccountChildLink

87648764-- * 'aclType'

87658765accountChildLink

87668766 :: AccountChildLink

8767−accountChildLink =

8767+accountChildLink =

87688768 AccountChildLink

87698769 { _aclHref = Nothing

87708770 , _aclType = "analytics#webproperties"

@@ -8798,11 +8798,11 @@ instance ToJSON AccountChildLink where

87988798-- /See:/ 'proFileFilterLink' smart constructor.

87998799data ProFileFilterLink = ProFileFilterLink

88008800 { _proProFileRef :: !(Maybe ProFileRef)

8801− , _proKind :: !Text

8802− , _proFilterRef :: !(Maybe FilterRef)

8803− , _proSelfLink :: !(Maybe Text)

8804− , _proId :: !(Maybe Text)

8805− , _proRank :: !(Maybe Int32)

8801+ , _proKind :: !Text

8802+ , _proFilterRef :: !(Maybe FilterRef)

8803+ , _proSelfLink :: !(Maybe Text)

8804+ , _proId :: !(Maybe Text)

8805+ , _proRank :: !(Maybe Int32)

88068806 } deriving (Eq,Show,Data,Typeable,Generic)

88078807

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

@@ -8822,7 +8822,7 @@ data ProFileFilterLink = ProFileFilterLink

88228822-- * 'proRank'

88238823proFileFilterLink

88248824 :: ProFileFilterLink

8825−proFileFilterLink =

8825+proFileFilterLink =

88268826 ProFileFilterLink

88278827 { _proProFileRef = Nothing

88288828 , _proKind = "analytics#profileFilterLink"

@@ -8910,7 +8910,7 @@ data CustomMetricParentLink = CustomMetricParentLink

89108910-- * 'cmplType'

89118911customMetricParentLink

89128912 :: CustomMetricParentLink

8913−customMetricParentLink =

8913+customMetricParentLink =

89148914 CustomMetricParentLink

89158915 { _cmplHref = Nothing

89168916 , _cmplType = "analytics#webproperty"

@@ -8943,9 +8943,9 @@ instance ToJSON CustomMetricParentLink where

89438943--

89448944-- /See:/ 'column' smart constructor.

89458945data Column = Column

8946− { _ccKind :: !Text

8946+ { _ccKind :: !Text

89478947 , _ccAttributes :: !(Maybe ColumnAttributes)

8948− , _ccId :: !(Maybe Text)

8948+ , _ccId :: !(Maybe Text)

89498949 } deriving (Eq,Show,Data,Typeable,Generic)

89508950

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

@@ -8959,7 +8959,7 @@ data Column = Column

89598959-- * 'ccId'

89608960column

89618961 :: Column

8962−column =

8962+column =

89638963 Column

89648964 { _ccKind = "analytics#column"

89658965 , _ccAttributes = Nothing

@@ -8999,8 +8999,8 @@ instance ToJSON Column where

89998999--

90009000-- /See:/ 'gaDataDataTableColsItem' smart constructor.

90019001data GaDataDataTableColsItem = GaDataDataTableColsItem

9002− { _gddtciId :: !(Maybe Text)

9003− , _gddtciType :: !(Maybe Text)

9002+ { _gddtciId :: !(Maybe Text)

9003+ , _gddtciType :: !(Maybe Text)

90049004 , _gddtciLabel :: !(Maybe Text)

90059005 } deriving (Eq,Show,Data,Typeable,Generic)

90069006

@@ -9015,7 +9015,7 @@ data GaDataDataTableColsItem = GaDataDataTableColsItem

90159015-- * 'gddtciLabel'

90169016gaDataDataTableColsItem

90179017 :: GaDataDataTableColsItem

9018−gaDataDataTableColsItem =

9018+gaDataDataTableColsItem =

90199019 GaDataDataTableColsItem

90209020 { _gddtciId = Nothing

90219021 , _gddtciType = Nothing

@@ -9053,9 +9053,9 @@ instance ToJSON GaDataDataTableColsItem where

90539053data ExperimentVariationsItem = ExperimentVariationsItem

90549054 { _eviStatus :: !(Maybe Text)

90559055 , _eviWeight :: !(Maybe Double)

9056− , _eviURL :: !(Maybe Text)

9057− , _eviWon :: !(Maybe Bool)

9058− , _eviName :: !(Maybe Text)

9056+ , _eviURL :: !(Maybe Text)

9057+ , _eviWon :: !(Maybe Bool)

9058+ , _eviName :: !(Maybe Text)

90599059 } deriving (Eq,Show,Data,Typeable,Generic)

90609060

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

@@ -9073,7 +9073,7 @@ data ExperimentVariationsItem = ExperimentVariationsItem

90739073-- * 'eviName'

90749074experimentVariationsItem

90759075 :: ExperimentVariationsItem

9076−experimentVariationsItem =

9076+experimentVariationsItem =

90779077 ExperimentVariationsItem

90789078 { _eviStatus = Nothing

90799079 , _eviWeight = Nothing

@@ -9136,7 +9136,7 @@ instance ToJSON ExperimentVariationsItem where

91369136--

91379137-- /See:/ 'mcfDataTotalsForAllResults' smart constructor.

91389138data McfDataTotalsForAllResults =

9139− McfDataTotalsForAllResults

9139+ McfDataTotalsForAllResults

91409140 deriving (Eq,Show,Data,Typeable,Generic)

91419141

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

@@ -9151,7 +9151,7 @@ instance FromJSON McfDataTotalsForAllResults where

91519151 (\ o -> pure McfDataTotalsForAllResults)

91529152

91539153instance ToJSON McfDataTotalsForAllResults where

9154− toJSON = const (Object mempty)

9154+ toJSON = const emptyObject

91559155

91569156-- | Download details for a file stored in Google Cloud Storage.

91579157--

@@ -9170,7 +9170,7 @@ data UnSampledReportCloudStorageDownloadDetails = UnSampledReportCloudStorageDow

91709170-- * 'usrcsddBucketId'

91719171unSampledReportCloudStorageDownloadDetails

91729172 :: UnSampledReportCloudStorageDownloadDetails

9173−unSampledReportCloudStorageDownloadDetails =

9173+unSampledReportCloudStorageDownloadDetails =

91749174 UnSampledReportCloudStorageDownloadDetails

91759175 { _usrcsddObjectId = Nothing

91769176 , _usrcsddBucketId = Nothing

@@ -9223,7 +9223,7 @@ data ProFileChildLink = ProFileChildLink

92239223-- * 'pfclType'

92249224proFileChildLink

92259225 :: ProFileChildLink

9226−proFileChildLink =

9226+proFileChildLink =

92279227 ProFileChildLink

92289228 { _pfclHref = Nothing

92299229 , _pfclType = "analytics#goals"

@@ -9256,8 +9256,8 @@ instance ToJSON ProFileChildLink where

92569256-- /See:/ 'gaDataColumnHeadersItem' smart constructor.

92579257data GaDataColumnHeadersItem = GaDataColumnHeadersItem

92589258 { _gdchiColumnType :: !(Maybe Text)

9259− , _gdchiName :: !(Maybe Text)

9260− , _gdchiDataType :: !(Maybe Text)

9259+ , _gdchiName :: !(Maybe Text)

9260+ , _gdchiDataType :: !(Maybe Text)

92619261 } deriving (Eq,Show,Data,Typeable,Generic)

92629262

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

@@ -9271,7 +9271,7 @@ data GaDataColumnHeadersItem = GaDataColumnHeadersItem

92719271-- * 'gdchiDataType'

92729272gaDataColumnHeadersItem

92739273 :: GaDataColumnHeadersItem

9274−gaDataColumnHeadersItem =

9274+gaDataColumnHeadersItem =

92759275 GaDataColumnHeadersItem

92769276 { _gdchiColumnType = Nothing

92779277 , _gdchiName = Nothing

@@ -9331,7 +9331,7 @@ data GoalParentLink = GoalParentLink

93319331-- * 'gplType'

93329332goalParentLink

93339333 :: GoalParentLink

9334−goalParentLink =

9334+goalParentLink =

93359335 GoalParentLink

93369336 { _gplHref = Nothing

93379337 , _gplType = "analytics#profile"

@@ -9364,7 +9364,7 @@ instance ToJSON GoalParentLink where

93649364--

93659365-- /See:/ 'columnAttributes' smart constructor.

93669366data ColumnAttributes =

9367− ColumnAttributes

9367+ ColumnAttributes

93689368 deriving (Eq,Show,Data,Typeable,Generic)

93699369

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

@@ -9379,4 +9379,4 @@ instance FromJSON ColumnAttributes where

93799379 (\ o -> pure ColumnAttributes)

93809380

93819381instance ToJSON ColumnAttributes where

9382− toJSON = const (Object mempty)

9382+ toJSON = const emptyObject

gogol-analytics/gen/Network/Google/Analytics/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.Analytics.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121-- | The desired sampling level.

2222data DataGaGetSamplingLevel

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Ga/Get.hs+20−20

@@ -53,8 +53,8 @@ module Network.Google.Resource.Analytics.Data.Ga.Get

5353 , dggFields

5454 ) where

5555

56−import Network.Google.Analytics.Types

57−import Network.Google.Prelude

56+import Network.Google.Analytics.Types

57+import Network.Google.Prelude

5858

5959-- | A resource alias for @AnalyticsDataGaGet@ which the

6060-- 'DataGaGet'' request conforms to.

@@ -87,24 +87,24 @@ type DataGaGetResource =

8787--

8888-- /See:/ 'dataGaGet'' smart constructor.

8989data DataGaGet' = DataGaGet'

90− { _dggQuotaUser :: !(Maybe Text)

91− , _dggMetrics :: !Text

92− , _dggPrettyPrint :: !Bool

90+ { _dggQuotaUser :: !(Maybe Text)

91+ , _dggMetrics :: !Text

92+ , _dggPrettyPrint :: !Bool

9393 , _dggSamplingLevel :: !(Maybe DataGaGetSamplingLevel)

94− , _dggUserIP :: !(Maybe Text)

95− , _dggFilters :: !(Maybe Text)

96− , _dggIds :: !Text

97− , _dggEndDate :: !Text

98− , _dggKey :: !(Maybe Key)

99− , _dggOutput :: !(Maybe DataGaGetOutput)

100− , _dggSort :: !(Maybe Text)

101− , _dggDimensions :: !(Maybe Text)

102− , _dggOAuthToken :: !(Maybe OAuthToken)

103− , _dggStartIndex :: !(Maybe Int32)

104− , _dggMaxResults :: !(Maybe Int32)

105− , _dggSegment :: !(Maybe Text)

106− , _dggStartDate :: !Text

107− , _dggFields :: !(Maybe Text)

94+ , _dggUserIP :: !(Maybe Text)

95+ , _dggFilters :: !(Maybe Text)

96+ , _dggIds :: !Text

97+ , _dggEndDate :: !Text

98+ , _dggKey :: !(Maybe Key)

99+ , _dggOutput :: !(Maybe DataGaGetOutput)

100+ , _dggSort :: !(Maybe Text)

101+ , _dggDimensions :: !(Maybe Text)

102+ , _dggOAuthToken :: !(Maybe OAuthToken)

103+ , _dggStartIndex :: !(Maybe Int32)

104+ , _dggMaxResults :: !(Maybe Int32)

105+ , _dggSegment :: !(Maybe Text)

106+ , _dggStartDate :: !Text

107+ , _dggFields :: !(Maybe Text)

108108 } deriving (Eq,Show,Data,Typeable,Generic)

109109

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

@@ -152,7 +152,7 @@ dataGaGet'

152152 -> Text -- ^ 'end-date'

153153 -> Text -- ^ 'start-date'

154154 -> DataGaGet'

155−dataGaGet' pDggMetrics_ pDggIds_ pDggEndDate_ pDggStartDate_ =

155+dataGaGet' pDggMetrics_ pDggIds_ pDggEndDate_ pDggStartDate_ =

156156 DataGaGet'

157157 { _dggQuotaUser = Nothing

158158 , _dggMetrics = pDggMetrics_

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Mcf/Get.hs+18−18

@@ -51,8 +51,8 @@ module Network.Google.Resource.Analytics.Data.Mcf.Get

5151 , dmgFields

5252 ) where

5353

54−import Network.Google.Analytics.Types

55−import Network.Google.Prelude

54+import Network.Google.Analytics.Types

55+import Network.Google.Prelude

5656

5757-- | A resource alias for @AnalyticsDataMcfGet@ which the

5858-- 'DataMcfGet'' request conforms to.

@@ -82,22 +82,22 @@ type DataMcfGetResource =

8282--

8383-- /See:/ 'dataMcfGet'' smart constructor.

8484data DataMcfGet' = DataMcfGet'

85− { _dmgQuotaUser :: !(Maybe Text)

86− , _dmgMetrics :: !Text

87− , _dmgPrettyPrint :: !Bool

85+ { _dmgQuotaUser :: !(Maybe Text)

86+ , _dmgMetrics :: !Text

87+ , _dmgPrettyPrint :: !Bool

8888 , _dmgSamplingLevel :: !(Maybe DataMcfGetSamplingLevel)

89− , _dmgUserIP :: !(Maybe Text)

90− , _dmgFilters :: !(Maybe Text)

91− , _dmgIds :: !Text

92− , _dmgEndDate :: !Text

93− , _dmgKey :: !(Maybe Key)

94− , _dmgSort :: !(Maybe Text)

95− , _dmgDimensions :: !(Maybe Text)

96− , _dmgOAuthToken :: !(Maybe OAuthToken)

97− , _dmgStartIndex :: !(Maybe Int32)

98− , _dmgMaxResults :: !(Maybe Int32)

99− , _dmgStartDate :: !Text

100− , _dmgFields :: !(Maybe Text)

89+ , _dmgUserIP :: !(Maybe Text)

90+ , _dmgFilters :: !(Maybe Text)

91+ , _dmgIds :: !Text

92+ , _dmgEndDate :: !Text

93+ , _dmgKey :: !(Maybe Key)

94+ , _dmgSort :: !(Maybe Text)

95+ , _dmgDimensions :: !(Maybe Text)

96+ , _dmgOAuthToken :: !(Maybe OAuthToken)

97+ , _dmgStartIndex :: !(Maybe Int32)

98+ , _dmgMaxResults :: !(Maybe Int32)

99+ , _dmgStartDate :: !Text

100+ , _dmgFields :: !(Maybe Text)

101101 } deriving (Eq,Show,Data,Typeable,Generic)

102102

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

@@ -141,7 +141,7 @@ dataMcfGet'

141141 -> Text -- ^ 'end-date'

142142 -> Text -- ^ 'start-date'

143143 -> DataMcfGet'

144−dataMcfGet' pDmgMetrics_ pDmgIds_ pDmgEndDate_ pDmgStartDate_ =

144+dataMcfGet' pDmgMetrics_ pDmgIds_ pDmgEndDate_ pDmgStartDate_ =

145145 DataMcfGet'

146146 { _dmgQuotaUser = Nothing

147147 , _dmgMetrics = pDmgMetrics_

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Realtime/Get.hs+14−14

@@ -47,8 +47,8 @@ module Network.Google.Resource.Analytics.Data.Realtime.Get

4747 , drgFields

4848 ) where

4949

50−import Network.Google.Analytics.Types

51−import Network.Google.Prelude

50+import Network.Google.Analytics.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AnalyticsDataRealtimeGet@ which the

5454-- 'DataRealtimeGet'' request conforms to.

@@ -74,18 +74,18 @@ type DataRealtimeGetResource =

7474--

7575-- /See:/ 'dataRealtimeGet'' smart constructor.

7676data DataRealtimeGet' = DataRealtimeGet'

77− { _drgQuotaUser :: !(Maybe Text)

78− , _drgMetrics :: !Text

77+ { _drgQuotaUser :: !(Maybe Text)

78+ , _drgMetrics :: !Text

7979 , _drgPrettyPrint :: !Bool

80− , _drgUserIP :: !(Maybe Text)

81− , _drgFilters :: !(Maybe Text)

82− , _drgIds :: !Text

83− , _drgKey :: !(Maybe Key)

84− , _drgSort :: !(Maybe Text)

85− , _drgDimensions :: !(Maybe Text)

86− , _drgOAuthToken :: !(Maybe OAuthToken)

87− , _drgMaxResults :: !(Maybe Int32)

88− , _drgFields :: !(Maybe Text)

80+ , _drgUserIP :: !(Maybe Text)

81+ , _drgFilters :: !(Maybe Text)

82+ , _drgIds :: !Text

83+ , _drgKey :: !(Maybe Key)

84+ , _drgSort :: !(Maybe Text)

85+ , _drgDimensions :: !(Maybe Text)

86+ , _drgOAuthToken :: !(Maybe OAuthToken)

87+ , _drgMaxResults :: !(Maybe Int32)

88+ , _drgFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -119,7 +119,7 @@ dataRealtimeGet'

119119 :: Text -- ^ 'metrics'

120120 -> Text -- ^ 'ids'

121121 -> DataRealtimeGet'

122−dataRealtimeGet' pDrgMetrics_ pDrgIds_ =

122+dataRealtimeGet' pDrgMetrics_ pDrgIds_ =

123123 DataRealtimeGet'

124124 { _drgQuotaUser = Nothing

125125 , _drgMetrics = pDrgMetrics_

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountSummaries/List.hs+10−10

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.AccountSummaries.List

4444 , maslFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementAccountSummariesList@ which the

5151-- 'ManagementAccountSummariesList'' request conforms to.

@@ -68,14 +68,14 @@ type ManagementAccountSummariesListResource =

6868--

6969-- /See:/ 'managementAccountSummariesList'' smart constructor.

7070data ManagementAccountSummariesList' = ManagementAccountSummariesList'

71− { _maslQuotaUser :: !(Maybe Text)

71+ { _maslQuotaUser :: !(Maybe Text)

7272 , _maslPrettyPrint :: !Bool

73− , _maslUserIP :: !(Maybe Text)

74− , _maslKey :: !(Maybe Key)

75− , _maslOAuthToken :: !(Maybe OAuthToken)

76− , _maslStartIndex :: !(Maybe Int32)

77− , _maslMaxResults :: !(Maybe Int32)

78− , _maslFields :: !(Maybe Text)

73+ , _maslUserIP :: !(Maybe Text)

74+ , _maslKey :: !(Maybe Key)

75+ , _maslOAuthToken :: !(Maybe OAuthToken)

76+ , _maslStartIndex :: !(Maybe Int32)

77+ , _maslMaxResults :: !(Maybe Int32)

78+ , _maslFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -99,7 +99,7 @@ data ManagementAccountSummariesList' = ManagementAccountSummariesList'

9999-- * 'maslFields'

100100managementAccountSummariesList'

101101 :: ManagementAccountSummariesList'

102−managementAccountSummariesList' =

102+managementAccountSummariesList' =

103103 ManagementAccountSummariesList'

104104 { _maslQuotaUser = Nothing

105105 , _maslPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.AccountUserLinks.Delete

4343 , mauldFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementAccountUserLinksDelete@ which the

5050-- 'ManagementAccountUserLinksDelete'' request conforms to.

@@ -66,14 +66,14 @@ type ManagementAccountUserLinksDeleteResource =

6666--

6767-- /See:/ 'managementAccountUserLinksDelete'' smart constructor.

6868data ManagementAccountUserLinksDelete' = ManagementAccountUserLinksDelete'

69− { _mauldQuotaUser :: !(Maybe Text)

69+ { _mauldQuotaUser :: !(Maybe Text)

7070 , _mauldPrettyPrint :: !Bool

71− , _mauldUserIP :: !(Maybe Text)

72− , _mauldAccountId :: !Text

73− , _mauldKey :: !(Maybe Key)

74− , _mauldLinkId :: !Text

75− , _mauldOAuthToken :: !(Maybe OAuthToken)

76− , _mauldFields :: !(Maybe Text)

71+ , _mauldUserIP :: !(Maybe Text)

72+ , _mauldAccountId :: !Text

73+ , _mauldKey :: !(Maybe Key)

74+ , _mauldLinkId :: !Text

75+ , _mauldOAuthToken :: !(Maybe OAuthToken)

76+ , _mauldFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ managementAccountUserLinksDelete'

9999 :: Text -- ^ 'accountId'

100100 -> Text -- ^ 'linkId'

101101 -> ManagementAccountUserLinksDelete'

102−managementAccountUserLinksDelete' pMauldAccountId_ pMauldLinkId_ =

102+managementAccountUserLinksDelete' pMauldAccountId_ pMauldLinkId_ =

103103 ManagementAccountUserLinksDelete'

104104 { _mauldQuotaUser = Nothing

105105 , _mauldPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Insert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.AccountUserLinks.Insert

4343 , mauliFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementAccountUserLinksInsert@ which the

5050-- 'ManagementAccountUserLinksInsert'' request conforms to.

@@ -67,14 +67,14 @@ type ManagementAccountUserLinksInsertResource =

6767--

6868-- /See:/ 'managementAccountUserLinksInsert'' smart constructor.

6969data ManagementAccountUserLinksInsert' = ManagementAccountUserLinksInsert'

70− { _mauliQuotaUser :: !(Maybe Text)

70+ { _mauliQuotaUser :: !(Maybe Text)

7171 , _mauliPrettyPrint :: !Bool

72− , _mauliUserIP :: !(Maybe Text)

73− , _mauliPayload :: !EntityUserLink

74− , _mauliAccountId :: !Text

75− , _mauliKey :: !(Maybe Key)

76− , _mauliOAuthToken :: !(Maybe OAuthToken)

77− , _mauliFields :: !(Maybe Text)

72+ , _mauliUserIP :: !(Maybe Text)

73+ , _mauliPayload :: !EntityUserLink

74+ , _mauliAccountId :: !Text

75+ , _mauliKey :: !(Maybe Key)

76+ , _mauliOAuthToken :: !(Maybe OAuthToken)

77+ , _mauliFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ managementAccountUserLinksInsert'

100100 :: EntityUserLink -- ^ 'payload'

101101 -> Text -- ^ 'accountId'

102102 -> ManagementAccountUserLinksInsert'

103−managementAccountUserLinksInsert' pMauliPayload_ pMauliAccountId_ =

103+managementAccountUserLinksInsert' pMauliPayload_ pMauliAccountId_ =

104104 ManagementAccountUserLinksInsert'

105105 { _mauliQuotaUser = Nothing

106106 , _mauliPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.AccountUserLinks.List

4444 , maullFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementAccountUserLinksList@ which the

5151-- 'ManagementAccountUserLinksList'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementAccountUserLinksListResource =

6969--

7070-- /See:/ 'managementAccountUserLinksList'' smart constructor.

7171data ManagementAccountUserLinksList' = ManagementAccountUserLinksList'

72− { _maullQuotaUser :: !(Maybe Text)

72+ { _maullQuotaUser :: !(Maybe Text)

7373 , _maullPrettyPrint :: !Bool

74− , _maullUserIP :: !(Maybe Text)

75− , _maullAccountId :: !Text

76− , _maullKey :: !(Maybe Key)

77− , _maullOAuthToken :: !(Maybe OAuthToken)

78− , _maullStartIndex :: !(Maybe Int32)

79− , _maullMaxResults :: !(Maybe Int32)

80− , _maullFields :: !(Maybe Text)

74+ , _maullUserIP :: !(Maybe Text)

75+ , _maullAccountId :: !Text

76+ , _maullKey :: !(Maybe Key)

77+ , _maullOAuthToken :: !(Maybe OAuthToken)

78+ , _maullStartIndex :: !(Maybe Int32)

79+ , _maullMaxResults :: !(Maybe Int32)

80+ , _maullFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -104,7 +104,7 @@ data ManagementAccountUserLinksList' = ManagementAccountUserLinksList'

104104managementAccountUserLinksList'

105105 :: Text -- ^ 'accountId'

106106 -> ManagementAccountUserLinksList'

107−managementAccountUserLinksList' pMaullAccountId_ =

107+managementAccountUserLinksList' pMaullAccountId_ =

108108 ManagementAccountUserLinksList'

109109 { _maullQuotaUser = Nothing

110110 , _maullPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.AccountUserLinks.Update

4444 , mauluFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementAccountUserLinksUpdate@ which the

5151-- 'ManagementAccountUserLinksUpdate'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementAccountUserLinksUpdateResource =

6969--

7070-- /See:/ 'managementAccountUserLinksUpdate'' smart constructor.

7171data ManagementAccountUserLinksUpdate' = ManagementAccountUserLinksUpdate'

72− { _mauluQuotaUser :: !(Maybe Text)

72+ { _mauluQuotaUser :: !(Maybe Text)

7373 , _mauluPrettyPrint :: !Bool

74− , _mauluUserIP :: !(Maybe Text)

75− , _mauluPayload :: !EntityUserLink

76− , _mauluAccountId :: !Text

77− , _mauluKey :: !(Maybe Key)

78− , _mauluLinkId :: !Text

79− , _mauluOAuthToken :: !(Maybe OAuthToken)

80− , _mauluFields :: !(Maybe Text)

74+ , _mauluUserIP :: !(Maybe Text)

75+ , _mauluPayload :: !EntityUserLink

76+ , _mauluAccountId :: !Text

77+ , _mauluKey :: !(Maybe Key)

78+ , _mauluLinkId :: !Text

79+ , _mauluOAuthToken :: !(Maybe OAuthToken)

80+ , _mauluFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementAccountUserLinksUpdate'

106106 -> Text -- ^ 'accountId'

107107 -> Text -- ^ 'linkId'

108108 -> ManagementAccountUserLinksUpdate'

109−managementAccountUserLinksUpdate' pMauluPayload_ pMauluAccountId_ pMauluLinkId_ =

109+managementAccountUserLinksUpdate' pMauluPayload_ pMauluAccountId_ pMauluLinkId_ =

110110 ManagementAccountUserLinksUpdate'

111111 { _mauluQuotaUser = Nothing

112112 , _mauluPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Accounts/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.Accounts.List

4343 , malFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementAccountsList@ which the

5050-- 'ManagementAccountsList'' request conforms to.

@@ -65,14 +65,14 @@ type ManagementAccountsListResource =

6565--

6666-- /See:/ 'managementAccountsList'' smart constructor.

6767data ManagementAccountsList' = ManagementAccountsList'

68− { _malQuotaUser :: !(Maybe Text)

68+ { _malQuotaUser :: !(Maybe Text)

6969 , _malPrettyPrint :: !Bool

70− , _malUserIP :: !(Maybe Text)

71− , _malKey :: !(Maybe Key)

72− , _malOAuthToken :: !(Maybe OAuthToken)

73− , _malStartIndex :: !(Maybe Int32)

74− , _malMaxResults :: !(Maybe Int32)

75− , _malFields :: !(Maybe Text)

70+ , _malUserIP :: !(Maybe Text)

71+ , _malKey :: !(Maybe Key)

72+ , _malOAuthToken :: !(Maybe OAuthToken)

73+ , _malStartIndex :: !(Maybe Int32)

74+ , _malMaxResults :: !(Maybe Int32)

75+ , _malFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -96,7 +96,7 @@ data ManagementAccountsList' = ManagementAccountsList'

9696-- * 'malFields'

9797managementAccountsList'

9898 :: ManagementAccountsList'

99−managementAccountsList' =

99+managementAccountsList' =

100100 ManagementAccountsList'

101101 { _malQuotaUser = Nothing

102102 , _malPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDataSources/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.CustomDataSources.List

4545 , mcdslFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementCustomDataSourcesList@ which the

5252-- 'ManagementCustomDataSourcesList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementCustomDataSourcesListResource =

7272--

7373-- /See:/ 'managementCustomDataSourcesList'' smart constructor.

7474data ManagementCustomDataSourcesList' = ManagementCustomDataSourcesList'

75− { _mcdslQuotaUser :: !(Maybe Text)

76− , _mcdslPrettyPrint :: !Bool

75+ { _mcdslQuotaUser :: !(Maybe Text)

76+ , _mcdslPrettyPrint :: !Bool

7777 , _mcdslWebPropertyId :: !Text

78− , _mcdslUserIP :: !(Maybe Text)

79− , _mcdslAccountId :: !Text

80− , _mcdslKey :: !(Maybe Key)

81− , _mcdslOAuthToken :: !(Maybe OAuthToken)

82− , _mcdslStartIndex :: !(Maybe Int32)

83− , _mcdslMaxResults :: !(Maybe Int32)

84− , _mcdslFields :: !(Maybe Text)

78+ , _mcdslUserIP :: !(Maybe Text)

79+ , _mcdslAccountId :: !Text

80+ , _mcdslKey :: !(Maybe Key)

81+ , _mcdslOAuthToken :: !(Maybe OAuthToken)

82+ , _mcdslStartIndex :: !(Maybe Int32)

83+ , _mcdslMaxResults :: !(Maybe Int32)

84+ , _mcdslFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementCustomDataSourcesList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementCustomDataSourcesList'

114−managementCustomDataSourcesList' pMcdslWebPropertyId_ pMcdslAccountId_ =

114+managementCustomDataSourcesList' pMcdslWebPropertyId_ pMcdslAccountId_ =

115115 ManagementCustomDataSourcesList'

116116 { _mcdslQuotaUser = Nothing

117117 , _mcdslPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.CustomDimensions.Get

4444 , mcdgFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementCustomDimensionsGet@ which the

5151-- 'ManagementCustomDimensionsGet'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementCustomDimensionsGetResource =

7070--

7171-- /See:/ 'managementCustomDimensionsGet'' smart constructor.

7272data ManagementCustomDimensionsGet' = ManagementCustomDimensionsGet'

73− { _mcdgQuotaUser :: !(Maybe Text)

74− , _mcdgPrettyPrint :: !Bool

75− , _mcdgWebPropertyId :: !Text

76− , _mcdgUserIP :: !(Maybe Text)

77− , _mcdgAccountId :: !Text

78− , _mcdgKey :: !(Maybe Key)

79− , _mcdgOAuthToken :: !(Maybe OAuthToken)

73+ { _mcdgQuotaUser :: !(Maybe Text)

74+ , _mcdgPrettyPrint :: !Bool

75+ , _mcdgWebPropertyId :: !Text

76+ , _mcdgUserIP :: !(Maybe Text)

77+ , _mcdgAccountId :: !Text

78+ , _mcdgKey :: !(Maybe Key)

79+ , _mcdgOAuthToken :: !(Maybe OAuthToken)

8080 , _mcdgCustomDimensionId :: !Text

81− , _mcdgFields :: !(Maybe Text)

81+ , _mcdgFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementCustomDimensionsGet'

107107 -> Text -- ^ 'accountId'

108108 -> Text -- ^ 'customDimensionId'

109109 -> ManagementCustomDimensionsGet'

110−managementCustomDimensionsGet' pMcdgWebPropertyId_ pMcdgAccountId_ pMcdgCustomDimensionId_ =

110+managementCustomDimensionsGet' pMcdgWebPropertyId_ pMcdgAccountId_ pMcdgCustomDimensionId_ =

111111 ManagementCustomDimensionsGet'

112112 { _mcdgQuotaUser = Nothing

113113 , _mcdgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.CustomDimensions.Insert

4444 , mcdiFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementCustomDimensionsInsert@ which the

5151-- 'ManagementCustomDimensionsInsert'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementCustomDimensionsInsertResource =

7070--

7171-- /See:/ 'managementCustomDimensionsInsert'' smart constructor.

7272data ManagementCustomDimensionsInsert' = ManagementCustomDimensionsInsert'

73− { _mcdiQuotaUser :: !(Maybe Text)

74− , _mcdiPrettyPrint :: !Bool

73+ { _mcdiQuotaUser :: !(Maybe Text)

74+ , _mcdiPrettyPrint :: !Bool

7575 , _mcdiWebPropertyId :: !Text

76− , _mcdiUserIP :: !(Maybe Text)

77− , _mcdiPayload :: !CustomDimension

78− , _mcdiAccountId :: !Text

79− , _mcdiKey :: !(Maybe Key)

80− , _mcdiOAuthToken :: !(Maybe OAuthToken)

81− , _mcdiFields :: !(Maybe Text)

76+ , _mcdiUserIP :: !(Maybe Text)

77+ , _mcdiPayload :: !CustomDimension

78+ , _mcdiAccountId :: !Text

79+ , _mcdiKey :: !(Maybe Key)

80+ , _mcdiOAuthToken :: !(Maybe OAuthToken)

81+ , _mcdiFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementCustomDimensionsInsert'

107107 -> CustomDimension -- ^ 'payload'

108108 -> Text -- ^ 'accountId'

109109 -> ManagementCustomDimensionsInsert'

110−managementCustomDimensionsInsert' pMcdiWebPropertyId_ pMcdiPayload_ pMcdiAccountId_ =

110+managementCustomDimensionsInsert' pMcdiWebPropertyId_ pMcdiPayload_ pMcdiAccountId_ =

111111 ManagementCustomDimensionsInsert'

112112 { _mcdiQuotaUser = Nothing

113113 , _mcdiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.CustomDimensions.List

4545 , mcdlFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementCustomDimensionsList@ which the

5252-- 'ManagementCustomDimensionsList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementCustomDimensionsListResource =

7272--

7373-- /See:/ 'managementCustomDimensionsList'' smart constructor.

7474data ManagementCustomDimensionsList' = ManagementCustomDimensionsList'

75− { _mcdlQuotaUser :: !(Maybe Text)

76− , _mcdlPrettyPrint :: !Bool

75+ { _mcdlQuotaUser :: !(Maybe Text)

76+ , _mcdlPrettyPrint :: !Bool

7777 , _mcdlWebPropertyId :: !Text

78− , _mcdlUserIP :: !(Maybe Text)

79− , _mcdlAccountId :: !Text

80− , _mcdlKey :: !(Maybe Key)

81− , _mcdlOAuthToken :: !(Maybe OAuthToken)

82− , _mcdlStartIndex :: !(Maybe Int32)

83− , _mcdlMaxResults :: !(Maybe Int32)

84− , _mcdlFields :: !(Maybe Text)

78+ , _mcdlUserIP :: !(Maybe Text)

79+ , _mcdlAccountId :: !Text

80+ , _mcdlKey :: !(Maybe Key)

81+ , _mcdlOAuthToken :: !(Maybe OAuthToken)

82+ , _mcdlStartIndex :: !(Maybe Int32)

83+ , _mcdlMaxResults :: !(Maybe Int32)

84+ , _mcdlFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementCustomDimensionsList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementCustomDimensionsList'

114−managementCustomDimensionsList' pMcdlWebPropertyId_ pMcdlAccountId_ =

114+managementCustomDimensionsList' pMcdlWebPropertyId_ pMcdlAccountId_ =

115115 ManagementCustomDimensionsList'

116116 { _mcdlQuotaUser = Nothing

117117 , _mcdlPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Patch.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.Analytics.Management.CustomDimensions.Patch

4747 , mcdpFields

4848 ) where

4949

50−import Network.Google.Analytics.Types

51−import Network.Google.Prelude

50+import Network.Google.Analytics.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AnalyticsManagementCustomDimensionsPatch@ which the

5454-- 'ManagementCustomDimensionsPatch'' request conforms to.

@@ -76,17 +76,17 @@ type ManagementCustomDimensionsPatchResource =

7676--

7777-- /See:/ 'managementCustomDimensionsPatch'' smart constructor.

7878data ManagementCustomDimensionsPatch' = ManagementCustomDimensionsPatch'

79− { _mcdpQuotaUser :: !(Maybe Text)

80− , _mcdpPrettyPrint :: !Bool

81− , _mcdpWebPropertyId :: !Text

79+ { _mcdpQuotaUser :: !(Maybe Text)

80+ , _mcdpPrettyPrint :: !Bool

81+ , _mcdpWebPropertyId :: !Text

8282 , _mcdpIgnoreCustomDataSourceLinks :: !Bool

83− , _mcdpUserIP :: !(Maybe Text)

84− , _mcdpPayload :: !CustomDimension

85− , _mcdpAccountId :: !Text

86− , _mcdpKey :: !(Maybe Key)

87− , _mcdpOAuthToken :: !(Maybe OAuthToken)

88− , _mcdpCustomDimensionId :: !Text

89− , _mcdpFields :: !(Maybe Text)

83+ , _mcdpUserIP :: !(Maybe Text)

84+ , _mcdpPayload :: !CustomDimension

85+ , _mcdpAccountId :: !Text

86+ , _mcdpKey :: !(Maybe Key)

87+ , _mcdpOAuthToken :: !(Maybe OAuthToken)

88+ , _mcdpCustomDimensionId :: !Text

89+ , _mcdpFields :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

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

@@ -120,7 +120,7 @@ managementCustomDimensionsPatch'

120120 -> Text -- ^ 'accountId'

121121 -> Text -- ^ 'customDimensionId'

122122 -> ManagementCustomDimensionsPatch'

123−managementCustomDimensionsPatch' pMcdpWebPropertyId_ pMcdpPayload_ pMcdpAccountId_ pMcdpCustomDimensionId_ =

123+managementCustomDimensionsPatch' pMcdpWebPropertyId_ pMcdpPayload_ pMcdpAccountId_ pMcdpCustomDimensionId_ =

124124 ManagementCustomDimensionsPatch'

125125 { _mcdpQuotaUser = Nothing

126126 , _mcdpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.CustomDimensions.Update

4646 , mcduFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementCustomDimensionsUpdate@ which the

5353-- 'ManagementCustomDimensionsUpdate'' request conforms to.

@@ -74,17 +74,17 @@ type ManagementCustomDimensionsUpdateResource =

7474--

7575-- /See:/ 'managementCustomDimensionsUpdate'' smart constructor.

7676data ManagementCustomDimensionsUpdate' = ManagementCustomDimensionsUpdate'

77− { _mcduQuotaUser :: !(Maybe Text)

78− , _mcduPrettyPrint :: !Bool

79− , _mcduWebPropertyId :: !Text

77+ { _mcduQuotaUser :: !(Maybe Text)

78+ , _mcduPrettyPrint :: !Bool

79+ , _mcduWebPropertyId :: !Text

8080 , _mcduIgnoreCustomDataSourceLinks :: !Bool

81− , _mcduUserIP :: !(Maybe Text)

82− , _mcduPayload :: !CustomDimension

83− , _mcduAccountId :: !Text

84− , _mcduKey :: !(Maybe Key)

85− , _mcduOAuthToken :: !(Maybe OAuthToken)

86− , _mcduCustomDimensionId :: !Text

87− , _mcduFields :: !(Maybe Text)

81+ , _mcduUserIP :: !(Maybe Text)

82+ , _mcduPayload :: !CustomDimension

83+ , _mcduAccountId :: !Text

84+ , _mcduKey :: !(Maybe Key)

85+ , _mcduOAuthToken :: !(Maybe OAuthToken)

86+ , _mcduCustomDimensionId :: !Text

87+ , _mcduFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -118,7 +118,7 @@ managementCustomDimensionsUpdate'

118118 -> Text -- ^ 'accountId'

119119 -> Text -- ^ 'customDimensionId'

120120 -> ManagementCustomDimensionsUpdate'

121−managementCustomDimensionsUpdate' pMcduWebPropertyId_ pMcduPayload_ pMcduAccountId_ pMcduCustomDimensionId_ =

121+managementCustomDimensionsUpdate' pMcduWebPropertyId_ pMcduPayload_ pMcduAccountId_ pMcduCustomDimensionId_ =

122122 ManagementCustomDimensionsUpdate'

123123 { _mcduQuotaUser = Nothing

124124 , _mcduPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.CustomMetrics.Get

4444 , mcmgFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementCustomMetricsGet@ which the

5151-- 'ManagementCustomMetricsGet'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementCustomMetricsGetResource =

7070--

7171-- /See:/ 'managementCustomMetricsGet'' smart constructor.

7272data ManagementCustomMetricsGet' = ManagementCustomMetricsGet'

73− { _mcmgQuotaUser :: !(Maybe Text)

74− , _mcmgPrettyPrint :: !Bool

73+ { _mcmgQuotaUser :: !(Maybe Text)

74+ , _mcmgPrettyPrint :: !Bool

7575 , _mcmgCustomMetricId :: !Text

76− , _mcmgWebPropertyId :: !Text

77− , _mcmgUserIP :: !(Maybe Text)

78− , _mcmgAccountId :: !Text

79− , _mcmgKey :: !(Maybe Key)

80− , _mcmgOAuthToken :: !(Maybe OAuthToken)

81− , _mcmgFields :: !(Maybe Text)

76+ , _mcmgWebPropertyId :: !Text

77+ , _mcmgUserIP :: !(Maybe Text)

78+ , _mcmgAccountId :: !Text

79+ , _mcmgKey :: !(Maybe Key)

80+ , _mcmgOAuthToken :: !(Maybe OAuthToken)

81+ , _mcmgFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementCustomMetricsGet'

107107 -> Text -- ^ 'webPropertyId'

108108 -> Text -- ^ 'accountId'

109109 -> ManagementCustomMetricsGet'

110−managementCustomMetricsGet' pMcmgCustomMetricId_ pMcmgWebPropertyId_ pMcmgAccountId_ =

110+managementCustomMetricsGet' pMcmgCustomMetricId_ pMcmgWebPropertyId_ pMcmgAccountId_ =

111111 ManagementCustomMetricsGet'

112112 { _mcmgQuotaUser = Nothing

113113 , _mcmgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.CustomMetrics.Insert

4444 , mcmiFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementCustomMetricsInsert@ which the

5151-- 'ManagementCustomMetricsInsert'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementCustomMetricsInsertResource =

7070--

7171-- /See:/ 'managementCustomMetricsInsert'' smart constructor.

7272data ManagementCustomMetricsInsert' = ManagementCustomMetricsInsert'

73− { _mcmiQuotaUser :: !(Maybe Text)

74− , _mcmiPrettyPrint :: !Bool

73+ { _mcmiQuotaUser :: !(Maybe Text)

74+ , _mcmiPrettyPrint :: !Bool

7575 , _mcmiWebPropertyId :: !Text

76− , _mcmiUserIP :: !(Maybe Text)

77− , _mcmiPayload :: !CustomMetric

78− , _mcmiAccountId :: !Text

79− , _mcmiKey :: !(Maybe Key)

80− , _mcmiOAuthToken :: !(Maybe OAuthToken)

81− , _mcmiFields :: !(Maybe Text)

76+ , _mcmiUserIP :: !(Maybe Text)

77+ , _mcmiPayload :: !CustomMetric

78+ , _mcmiAccountId :: !Text

79+ , _mcmiKey :: !(Maybe Key)

80+ , _mcmiOAuthToken :: !(Maybe OAuthToken)

81+ , _mcmiFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementCustomMetricsInsert'

107107 -> CustomMetric -- ^ 'payload'

108108 -> Text -- ^ 'accountId'

109109 -> ManagementCustomMetricsInsert'

110−managementCustomMetricsInsert' pMcmiWebPropertyId_ pMcmiPayload_ pMcmiAccountId_ =

110+managementCustomMetricsInsert' pMcmiWebPropertyId_ pMcmiPayload_ pMcmiAccountId_ =

111111 ManagementCustomMetricsInsert'

112112 { _mcmiQuotaUser = Nothing

113113 , _mcmiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.CustomMetrics.List

4545 , mcmlFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementCustomMetricsList@ which the

5252-- 'ManagementCustomMetricsList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementCustomMetricsListResource =

7272--

7373-- /See:/ 'managementCustomMetricsList'' smart constructor.

7474data ManagementCustomMetricsList' = ManagementCustomMetricsList'

75− { _mcmlQuotaUser :: !(Maybe Text)

76− , _mcmlPrettyPrint :: !Bool

75+ { _mcmlQuotaUser :: !(Maybe Text)

76+ , _mcmlPrettyPrint :: !Bool

7777 , _mcmlWebPropertyId :: !Text

78− , _mcmlUserIP :: !(Maybe Text)

79− , _mcmlAccountId :: !Text

80− , _mcmlKey :: !(Maybe Key)

81− , _mcmlOAuthToken :: !(Maybe OAuthToken)

82− , _mcmlStartIndex :: !(Maybe Int32)

83− , _mcmlMaxResults :: !(Maybe Int32)

84− , _mcmlFields :: !(Maybe Text)

78+ , _mcmlUserIP :: !(Maybe Text)

79+ , _mcmlAccountId :: !Text

80+ , _mcmlKey :: !(Maybe Key)

81+ , _mcmlOAuthToken :: !(Maybe OAuthToken)

82+ , _mcmlStartIndex :: !(Maybe Int32)

83+ , _mcmlMaxResults :: !(Maybe Int32)

84+ , _mcmlFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementCustomMetricsList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementCustomMetricsList'

114−managementCustomMetricsList' pMcmlWebPropertyId_ pMcmlAccountId_ =

114+managementCustomMetricsList' pMcmlWebPropertyId_ pMcmlAccountId_ =

115115 ManagementCustomMetricsList'

116116 { _mcmlQuotaUser = Nothing

117117 , _mcmlPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Patch.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.CustomMetrics.Patch

4646 , mcmpFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementCustomMetricsPatch@ which the

5353-- 'ManagementCustomMetricsPatch'' request conforms to.

@@ -74,17 +74,17 @@ type ManagementCustomMetricsPatchResource =

7474--

7575-- /See:/ 'managementCustomMetricsPatch'' smart constructor.

7676data ManagementCustomMetricsPatch' = ManagementCustomMetricsPatch'

77− { _mcmpQuotaUser :: !(Maybe Text)

78− , _mcmpPrettyPrint :: !Bool

79− , _mcmpCustomMetricId :: !Text

80− , _mcmpWebPropertyId :: !Text

77+ { _mcmpQuotaUser :: !(Maybe Text)

78+ , _mcmpPrettyPrint :: !Bool

79+ , _mcmpCustomMetricId :: !Text

80+ , _mcmpWebPropertyId :: !Text

8181 , _mcmpIgnoreCustomDataSourceLinks :: !Bool

82− , _mcmpUserIP :: !(Maybe Text)

83− , _mcmpPayload :: !CustomMetric

84− , _mcmpAccountId :: !Text

85− , _mcmpKey :: !(Maybe Key)

86− , _mcmpOAuthToken :: !(Maybe OAuthToken)

87− , _mcmpFields :: !(Maybe Text)

82+ , _mcmpUserIP :: !(Maybe Text)

83+ , _mcmpPayload :: !CustomMetric

84+ , _mcmpAccountId :: !Text

85+ , _mcmpKey :: !(Maybe Key)

86+ , _mcmpOAuthToken :: !(Maybe OAuthToken)

87+ , _mcmpFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -118,7 +118,7 @@ managementCustomMetricsPatch'

118118 -> CustomMetric -- ^ 'payload'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementCustomMetricsPatch'

121−managementCustomMetricsPatch' pMcmpCustomMetricId_ pMcmpWebPropertyId_ pMcmpPayload_ pMcmpAccountId_ =

121+managementCustomMetricsPatch' pMcmpCustomMetricId_ pMcmpWebPropertyId_ pMcmpPayload_ pMcmpAccountId_ =

122122 ManagementCustomMetricsPatch'

123123 { _mcmpQuotaUser = Nothing

124124 , _mcmpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.CustomMetrics.Update

4646 , mcmuFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementCustomMetricsUpdate@ which the

5353-- 'ManagementCustomMetricsUpdate'' request conforms to.

@@ -74,17 +74,17 @@ type ManagementCustomMetricsUpdateResource =

7474--

7575-- /See:/ 'managementCustomMetricsUpdate'' smart constructor.

7676data ManagementCustomMetricsUpdate' = ManagementCustomMetricsUpdate'

77− { _mcmuQuotaUser :: !(Maybe Text)

78− , _mcmuPrettyPrint :: !Bool

79− , _mcmuCustomMetricId :: !Text

80− , _mcmuWebPropertyId :: !Text

77+ { _mcmuQuotaUser :: !(Maybe Text)

78+ , _mcmuPrettyPrint :: !Bool

79+ , _mcmuCustomMetricId :: !Text

80+ , _mcmuWebPropertyId :: !Text

8181 , _mcmuIgnoreCustomDataSourceLinks :: !Bool

82− , _mcmuUserIP :: !(Maybe Text)

83− , _mcmuPayload :: !CustomMetric

84− , _mcmuAccountId :: !Text

85− , _mcmuKey :: !(Maybe Key)

86− , _mcmuOAuthToken :: !(Maybe OAuthToken)

87− , _mcmuFields :: !(Maybe Text)

82+ , _mcmuUserIP :: !(Maybe Text)

83+ , _mcmuPayload :: !CustomMetric

84+ , _mcmuAccountId :: !Text

85+ , _mcmuKey :: !(Maybe Key)

86+ , _mcmuOAuthToken :: !(Maybe OAuthToken)

87+ , _mcmuFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -118,7 +118,7 @@ managementCustomMetricsUpdate'

118118 -> CustomMetric -- ^ 'payload'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementCustomMetricsUpdate'

121−managementCustomMetricsUpdate' pMcmuCustomMetricId_ pMcmuWebPropertyId_ pMcmuPayload_ pMcmuAccountId_ =

121+managementCustomMetricsUpdate' pMcmuCustomMetricId_ pMcmuWebPropertyId_ pMcmuPayload_ pMcmuAccountId_ =

122122 ManagementCustomMetricsUpdate'

123123 { _mcmuQuotaUser = Nothing

124124 , _mcmuPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Delete.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.Delete

4545 , medFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementExperimentsDelete@ which the

5252-- 'ManagementExperimentsDelete'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementExperimentsDeleteResource =

7272--

7373-- /See:/ 'managementExperimentsDelete'' smart constructor.

7474data ManagementExperimentsDelete' = ManagementExperimentsDelete'

75− { _medQuotaUser :: !(Maybe Text)

76− , _medPrettyPrint :: !Bool

75+ { _medQuotaUser :: !(Maybe Text)

76+ , _medPrettyPrint :: !Bool

7777 , _medWebPropertyId :: !Text

78− , _medUserIP :: !(Maybe Text)

79− , _medProFileId :: !Text

80− , _medAccountId :: !Text

81− , _medExperimentId :: !Text

82− , _medKey :: !(Maybe Key)

83− , _medOAuthToken :: !(Maybe OAuthToken)

84− , _medFields :: !(Maybe Text)

78+ , _medUserIP :: !(Maybe Text)

79+ , _medProFileId :: !Text

80+ , _medAccountId :: !Text

81+ , _medExperimentId :: !Text

82+ , _medKey :: !(Maybe Key)

83+ , _medOAuthToken :: !(Maybe OAuthToken)

84+ , _medFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementExperimentsDelete'

113113 -> Text -- ^ 'accountId'

114114 -> Text -- ^ 'experimentId'

115115 -> ManagementExperimentsDelete'

116−managementExperimentsDelete' pMedWebPropertyId_ pMedProFileId_ pMedAccountId_ pMedExperimentId_ =

116+managementExperimentsDelete' pMedWebPropertyId_ pMedProFileId_ pMedAccountId_ pMedExperimentId_ =

117117 ManagementExperimentsDelete'

118118 { _medQuotaUser = Nothing

119119 , _medPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.Get

4545 , megFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementExperimentsGet@ which the

5252-- 'ManagementExperimentsGet'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementExperimentsGetResource =

7373--

7474-- /See:/ 'managementExperimentsGet'' smart constructor.

7575data ManagementExperimentsGet' = ManagementExperimentsGet'

76− { _megQuotaUser :: !(Maybe Text)

77− , _megPrettyPrint :: !Bool

76+ { _megQuotaUser :: !(Maybe Text)

77+ , _megPrettyPrint :: !Bool

7878 , _megWebPropertyId :: !Text

79− , _megUserIP :: !(Maybe Text)

80− , _megProFileId :: !Text

81− , _megAccountId :: !Text

82− , _megExperimentId :: !Text

83− , _megKey :: !(Maybe Key)

84− , _megOAuthToken :: !(Maybe OAuthToken)

85− , _megFields :: !(Maybe Text)

79+ , _megUserIP :: !(Maybe Text)

80+ , _megProFileId :: !Text

81+ , _megAccountId :: !Text

82+ , _megExperimentId :: !Text

83+ , _megKey :: !(Maybe Key)

84+ , _megOAuthToken :: !(Maybe OAuthToken)

85+ , _megFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementExperimentsGet'

114114 -> Text -- ^ 'accountId'

115115 -> Text -- ^ 'experimentId'

116116 -> ManagementExperimentsGet'

117−managementExperimentsGet' pMegWebPropertyId_ pMegProFileId_ pMegAccountId_ pMegExperimentId_ =

117+managementExperimentsGet' pMegWebPropertyId_ pMegProFileId_ pMegAccountId_ pMegExperimentId_ =

118118 ManagementExperimentsGet'

119119 { _megQuotaUser = Nothing

120120 , _megPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Insert.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.Insert

4545 , meiFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementExperimentsInsert@ which the

5252-- 'ManagementExperimentsInsert'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementExperimentsInsertResource =

7373--

7474-- /See:/ 'managementExperimentsInsert'' smart constructor.

7575data ManagementExperimentsInsert' = ManagementExperimentsInsert'

76− { _meiQuotaUser :: !(Maybe Text)

77− , _meiPrettyPrint :: !Bool

76+ { _meiQuotaUser :: !(Maybe Text)

77+ , _meiPrettyPrint :: !Bool

7878 , _meiWebPropertyId :: !Text

79− , _meiUserIP :: !(Maybe Text)

80− , _meiProFileId :: !Text

81− , _meiPayload :: !Experiment

82− , _meiAccountId :: !Text

83− , _meiKey :: !(Maybe Key)

84− , _meiOAuthToken :: !(Maybe OAuthToken)

85− , _meiFields :: !(Maybe Text)

79+ , _meiUserIP :: !(Maybe Text)

80+ , _meiProFileId :: !Text

81+ , _meiPayload :: !Experiment

82+ , _meiAccountId :: !Text

83+ , _meiKey :: !(Maybe Key)

84+ , _meiOAuthToken :: !(Maybe OAuthToken)

85+ , _meiFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementExperimentsInsert'

114114 -> Experiment -- ^ 'payload'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementExperimentsInsert'

117−managementExperimentsInsert' pMeiWebPropertyId_ pMeiProFileId_ pMeiPayload_ pMeiAccountId_ =

117+managementExperimentsInsert' pMeiWebPropertyId_ pMeiProFileId_ pMeiPayload_ pMeiAccountId_ =

118118 ManagementExperimentsInsert'

119119 { _meiQuotaUser = Nothing

120120 , _meiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.List

4646 , melFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementExperimentsList@ which the

5353-- 'ManagementExperimentsList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementExperimentsListResource =

7575--

7676-- /See:/ 'managementExperimentsList'' smart constructor.

7777data ManagementExperimentsList' = ManagementExperimentsList'

78− { _melQuotaUser :: !(Maybe Text)

79− , _melPrettyPrint :: !Bool

78+ { _melQuotaUser :: !(Maybe Text)

79+ , _melPrettyPrint :: !Bool

8080 , _melWebPropertyId :: !Text

81− , _melUserIP :: !(Maybe Text)

82− , _melProFileId :: !Text

83− , _melAccountId :: !Text

84− , _melKey :: !(Maybe Key)

85− , _melOAuthToken :: !(Maybe OAuthToken)

86− , _melStartIndex :: !(Maybe Int32)

87− , _melMaxResults :: !(Maybe Int32)

88− , _melFields :: !(Maybe Text)

81+ , _melUserIP :: !(Maybe Text)

82+ , _melProFileId :: !Text

83+ , _melAccountId :: !Text

84+ , _melKey :: !(Maybe Key)

85+ , _melOAuthToken :: !(Maybe OAuthToken)

86+ , _melStartIndex :: !(Maybe Int32)

87+ , _melMaxResults :: !(Maybe Int32)

88+ , _melFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementExperimentsList'

118118 -> Text -- ^ 'profileId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementExperimentsList'

121−managementExperimentsList' pMelWebPropertyId_ pMelProFileId_ pMelAccountId_ =

121+managementExperimentsList' pMelWebPropertyId_ pMelProFileId_ pMelAccountId_ =

122122 ManagementExperimentsList'

123123 { _melQuotaUser = Nothing

124124 , _melPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Patch.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.Patch

4646 , mepFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementExperimentsPatch@ which the

5353-- 'ManagementExperimentsPatch'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementExperimentsPatchResource =

7575--

7676-- /See:/ 'managementExperimentsPatch'' smart constructor.

7777data ManagementExperimentsPatch' = ManagementExperimentsPatch'

78− { _mepQuotaUser :: !(Maybe Text)

79− , _mepPrettyPrint :: !Bool

78+ { _mepQuotaUser :: !(Maybe Text)

79+ , _mepPrettyPrint :: !Bool

8080 , _mepWebPropertyId :: !Text

81− , _mepUserIP :: !(Maybe Text)

82− , _mepProFileId :: !Text

83− , _mepPayload :: !Experiment

84− , _mepAccountId :: !Text

85− , _mepExperimentId :: !Text

86− , _mepKey :: !(Maybe Key)

87− , _mepOAuthToken :: !(Maybe OAuthToken)

88− , _mepFields :: !(Maybe Text)

81+ , _mepUserIP :: !(Maybe Text)

82+ , _mepProFileId :: !Text

83+ , _mepPayload :: !Experiment

84+ , _mepAccountId :: !Text

85+ , _mepExperimentId :: !Text

86+ , _mepKey :: !(Maybe Key)

87+ , _mepOAuthToken :: !(Maybe OAuthToken)

88+ , _mepFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -120,7 +120,7 @@ managementExperimentsPatch'

120120 -> Text -- ^ 'accountId'

121121 -> Text -- ^ 'experimentId'

122122 -> ManagementExperimentsPatch'

123−managementExperimentsPatch' pMepWebPropertyId_ pMepProFileId_ pMepPayload_ pMepAccountId_ pMepExperimentId_ =

123+managementExperimentsPatch' pMepWebPropertyId_ pMepProFileId_ pMepPayload_ pMepAccountId_ pMepExperimentId_ =

124124 ManagementExperimentsPatch'

125125 { _mepQuotaUser = Nothing

126126 , _mepPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Experiments.Update

4646 , meuFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementExperimentsUpdate@ which the

5353-- 'ManagementExperimentsUpdate'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementExperimentsUpdateResource =

7575--

7676-- /See:/ 'managementExperimentsUpdate'' smart constructor.

7777data ManagementExperimentsUpdate' = ManagementExperimentsUpdate'

78− { _meuQuotaUser :: !(Maybe Text)

79− , _meuPrettyPrint :: !Bool

78+ { _meuQuotaUser :: !(Maybe Text)

79+ , _meuPrettyPrint :: !Bool

8080 , _meuWebPropertyId :: !Text

81− , _meuUserIP :: !(Maybe Text)

82− , _meuProFileId :: !Text

83− , _meuPayload :: !Experiment

84− , _meuAccountId :: !Text

85− , _meuExperimentId :: !Text

86− , _meuKey :: !(Maybe Key)

87− , _meuOAuthToken :: !(Maybe OAuthToken)

88− , _meuFields :: !(Maybe Text)

81+ , _meuUserIP :: !(Maybe Text)

82+ , _meuProFileId :: !Text

83+ , _meuPayload :: !Experiment

84+ , _meuAccountId :: !Text

85+ , _meuExperimentId :: !Text

86+ , _meuKey :: !(Maybe Key)

87+ , _meuOAuthToken :: !(Maybe OAuthToken)

88+ , _meuFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -120,7 +120,7 @@ managementExperimentsUpdate'

120120 -> Text -- ^ 'accountId'

121121 -> Text -- ^ 'experimentId'

122122 -> ManagementExperimentsUpdate'

123−managementExperimentsUpdate' pMeuWebPropertyId_ pMeuProFileId_ pMeuPayload_ pMeuAccountId_ pMeuExperimentId_ =

123+managementExperimentsUpdate' pMeuWebPropertyId_ pMeuProFileId_ pMeuPayload_ pMeuAccountId_ pMeuExperimentId_ =

124124 ManagementExperimentsUpdate'

125125 { _meuQuotaUser = Nothing

126126 , _meuPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.Filters.Delete

4343 , mfdFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementFiltersDelete@ which the

5050-- 'ManagementFiltersDelete'' request conforms to.

@@ -66,14 +66,14 @@ type ManagementFiltersDeleteResource =

6666--

6767-- /See:/ 'managementFiltersDelete'' smart constructor.

6868data ManagementFiltersDelete' = ManagementFiltersDelete'

69− { _mfdQuotaUser :: !(Maybe Text)

69+ { _mfdQuotaUser :: !(Maybe Text)

7070 , _mfdPrettyPrint :: !Bool

71− , _mfdFilterId :: !Text

72− , _mfdUserIP :: !(Maybe Text)

73− , _mfdAccountId :: !Text

74− , _mfdKey :: !(Maybe Key)

75− , _mfdOAuthToken :: !(Maybe OAuthToken)

76− , _mfdFields :: !(Maybe Text)

71+ , _mfdFilterId :: !Text

72+ , _mfdUserIP :: !(Maybe Text)

73+ , _mfdAccountId :: !Text

74+ , _mfdKey :: !(Maybe Key)

75+ , _mfdOAuthToken :: !(Maybe OAuthToken)

76+ , _mfdFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ managementFiltersDelete'

9999 :: Text -- ^ 'filterId'

100100 -> Text -- ^ 'accountId'

101101 -> ManagementFiltersDelete'

102−managementFiltersDelete' pMfdFilterId_ pMfdAccountId_ =

102+managementFiltersDelete' pMfdFilterId_ pMfdAccountId_ =

103103 ManagementFiltersDelete'

104104 { _mfdQuotaUser = Nothing

105105 , _mfdPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.Filters.Get

4343 , mfgFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementFiltersGet@ which the

5050-- 'ManagementFiltersGet'' request conforms to.

@@ -66,14 +66,14 @@ type ManagementFiltersGetResource =

6666--

6767-- /See:/ 'managementFiltersGet'' smart constructor.

6868data ManagementFiltersGet' = ManagementFiltersGet'

69− { _mfgQuotaUser :: !(Maybe Text)

69+ { _mfgQuotaUser :: !(Maybe Text)

7070 , _mfgPrettyPrint :: !Bool

71− , _mfgFilterId :: !Text

72− , _mfgUserIP :: !(Maybe Text)

73− , _mfgAccountId :: !Text

74− , _mfgKey :: !(Maybe Key)

75− , _mfgOAuthToken :: !(Maybe OAuthToken)

76− , _mfgFields :: !(Maybe Text)

71+ , _mfgFilterId :: !Text

72+ , _mfgUserIP :: !(Maybe Text)

73+ , _mfgAccountId :: !Text

74+ , _mfgKey :: !(Maybe Key)

75+ , _mfgOAuthToken :: !(Maybe OAuthToken)

76+ , _mfgFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ managementFiltersGet'

9999 :: Text -- ^ 'filterId'

100100 -> Text -- ^ 'accountId'

101101 -> ManagementFiltersGet'

102−managementFiltersGet' pMfgFilterId_ pMfgAccountId_ =

102+managementFiltersGet' pMfgFilterId_ pMfgAccountId_ =

103103 ManagementFiltersGet'

104104 { _mfgQuotaUser = Nothing

105105 , _mfgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Insert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.Filters.Insert

4343 , mfiFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementFiltersInsert@ which the

5050-- 'ManagementFiltersInsert'' request conforms to.

@@ -66,14 +66,14 @@ type ManagementFiltersInsertResource =

6666--

6767-- /See:/ 'managementFiltersInsert'' smart constructor.

6868data ManagementFiltersInsert' = ManagementFiltersInsert'

69− { _mfiQuotaUser :: !(Maybe Text)

69+ { _mfiQuotaUser :: !(Maybe Text)

7070 , _mfiPrettyPrint :: !Bool

71− , _mfiUserIP :: !(Maybe Text)

72− , _mfiPayload :: !Filter

73− , _mfiAccountId :: !Text

74− , _mfiKey :: !(Maybe Key)

75− , _mfiOAuthToken :: !(Maybe OAuthToken)

76− , _mfiFields :: !(Maybe Text)

71+ , _mfiUserIP :: !(Maybe Text)

72+ , _mfiPayload :: !Filter

73+ , _mfiAccountId :: !Text

74+ , _mfiKey :: !(Maybe Key)

75+ , _mfiOAuthToken :: !(Maybe OAuthToken)

76+ , _mfiFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ managementFiltersInsert'

9999 :: Filter -- ^ 'payload'

100100 -> Text -- ^ 'accountId'

101101 -> ManagementFiltersInsert'

102−managementFiltersInsert' pMfiPayload_ pMfiAccountId_ =

102+managementFiltersInsert' pMfiPayload_ pMfiAccountId_ =

103103 ManagementFiltersInsert'

104104 { _mfiQuotaUser = Nothing

105105 , _mfiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.Filters.List

4444 , mflFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementFiltersList@ which the

5151-- 'ManagementFiltersList'' request conforms to.

@@ -68,15 +68,15 @@ type ManagementFiltersListResource =

6868--

6969-- /See:/ 'managementFiltersList'' smart constructor.

7070data ManagementFiltersList' = ManagementFiltersList'

71− { _mflQuotaUser :: !(Maybe Text)

71+ { _mflQuotaUser :: !(Maybe Text)

7272 , _mflPrettyPrint :: !Bool

73− , _mflUserIP :: !(Maybe Text)

74− , _mflAccountId :: !Text

75− , _mflKey :: !(Maybe Key)

76− , _mflOAuthToken :: !(Maybe OAuthToken)

77− , _mflStartIndex :: !(Maybe Int32)

78− , _mflMaxResults :: !(Maybe Int32)

79− , _mflFields :: !(Maybe Text)

73+ , _mflUserIP :: !(Maybe Text)

74+ , _mflAccountId :: !Text

75+ , _mflKey :: !(Maybe Key)

76+ , _mflOAuthToken :: !(Maybe OAuthToken)

77+ , _mflStartIndex :: !(Maybe Int32)

78+ , _mflMaxResults :: !(Maybe Int32)

79+ , _mflFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -103,7 +103,7 @@ data ManagementFiltersList' = ManagementFiltersList'

103103managementFiltersList'

104104 :: Text -- ^ 'accountId'

105105 -> ManagementFiltersList'

106−managementFiltersList' pMflAccountId_ =

106+managementFiltersList' pMflAccountId_ =

107107 ManagementFiltersList'

108108 { _mflQuotaUser = Nothing

109109 , _mflPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Patch.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.Filters.Patch

4444 , mfpFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementFiltersPatch@ which the

5151-- 'ManagementFiltersPatch'' request conforms to.

@@ -68,15 +68,15 @@ type ManagementFiltersPatchResource =

6868--

6969-- /See:/ 'managementFiltersPatch'' smart constructor.

7070data ManagementFiltersPatch' = ManagementFiltersPatch'

71− { _mfpQuotaUser :: !(Maybe Text)

71+ { _mfpQuotaUser :: !(Maybe Text)

7272 , _mfpPrettyPrint :: !Bool

73− , _mfpFilterId :: !Text

74− , _mfpUserIP :: !(Maybe Text)

75− , _mfpPayload :: !Filter

76− , _mfpAccountId :: !Text

77− , _mfpKey :: !(Maybe Key)

78− , _mfpOAuthToken :: !(Maybe OAuthToken)

79− , _mfpFields :: !(Maybe Text)

73+ , _mfpFilterId :: !Text

74+ , _mfpUserIP :: !(Maybe Text)

75+ , _mfpPayload :: !Filter

76+ , _mfpAccountId :: !Text

77+ , _mfpKey :: !(Maybe Key)

78+ , _mfpOAuthToken :: !(Maybe OAuthToken)

79+ , _mfpFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ managementFiltersPatch'

105105 -> Filter -- ^ 'payload'

106106 -> Text -- ^ 'accountId'

107107 -> ManagementFiltersPatch'

108−managementFiltersPatch' pMfpFilterId_ pMfpPayload_ pMfpAccountId_ =

108+managementFiltersPatch' pMfpFilterId_ pMfpPayload_ pMfpAccountId_ =

109109 ManagementFiltersPatch'

110110 { _mfpQuotaUser = Nothing

111111 , _mfpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.Filters.Update

4444 , mfuFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementFiltersUpdate@ which the

5151-- 'ManagementFiltersUpdate'' request conforms to.

@@ -68,15 +68,15 @@ type ManagementFiltersUpdateResource =

6868--

6969-- /See:/ 'managementFiltersUpdate'' smart constructor.

7070data ManagementFiltersUpdate' = ManagementFiltersUpdate'

71− { _mfuQuotaUser :: !(Maybe Text)

71+ { _mfuQuotaUser :: !(Maybe Text)

7272 , _mfuPrettyPrint :: !Bool

73− , _mfuFilterId :: !Text

74− , _mfuUserIP :: !(Maybe Text)

75− , _mfuPayload :: !Filter

76− , _mfuAccountId :: !Text

77− , _mfuKey :: !(Maybe Key)

78− , _mfuOAuthToken :: !(Maybe OAuthToken)

79− , _mfuFields :: !(Maybe Text)

73+ , _mfuFilterId :: !Text

74+ , _mfuUserIP :: !(Maybe Text)

75+ , _mfuPayload :: !Filter

76+ , _mfuAccountId :: !Text

77+ , _mfuKey :: !(Maybe Key)

78+ , _mfuOAuthToken :: !(Maybe OAuthToken)

79+ , _mfuFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ managementFiltersUpdate'

105105 -> Filter -- ^ 'payload'

106106 -> Text -- ^ 'accountId'

107107 -> ManagementFiltersUpdate'

108−managementFiltersUpdate' pMfuFilterId_ pMfuPayload_ pMfuAccountId_ =

108+managementFiltersUpdate' pMfuFilterId_ pMfuPayload_ pMfuAccountId_ =

109109 ManagementFiltersUpdate'

110110 { _mfuQuotaUser = Nothing

111111 , _mfuPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Goals.Get

4545 , mggFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementGoalsGet@ which the

5252-- 'ManagementGoalsGet'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementGoalsGetResource =

7272--

7373-- /See:/ 'managementGoalsGet'' smart constructor.

7474data ManagementGoalsGet' = ManagementGoalsGet'

75− { _mggQuotaUser :: !(Maybe Text)

76− , _mggPrettyPrint :: !Bool

75+ { _mggQuotaUser :: !(Maybe Text)

76+ , _mggPrettyPrint :: !Bool

7777 , _mggWebPropertyId :: !Text

78− , _mggGoalId :: !Text

79− , _mggUserIP :: !(Maybe Text)

80− , _mggProFileId :: !Text

81− , _mggAccountId :: !Text

82− , _mggKey :: !(Maybe Key)

83− , _mggOAuthToken :: !(Maybe OAuthToken)

84− , _mggFields :: !(Maybe Text)

78+ , _mggGoalId :: !Text

79+ , _mggUserIP :: !(Maybe Text)

80+ , _mggProFileId :: !Text

81+ , _mggAccountId :: !Text

82+ , _mggKey :: !(Maybe Key)

83+ , _mggOAuthToken :: !(Maybe OAuthToken)

84+ , _mggFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementGoalsGet'

113113 -> Text -- ^ 'profileId'

114114 -> Text -- ^ 'accountId'

115115 -> ManagementGoalsGet'

116−managementGoalsGet' pMggWebPropertyId_ pMggGoalId_ pMggProFileId_ pMggAccountId_ =

116+managementGoalsGet' pMggWebPropertyId_ pMggGoalId_ pMggProFileId_ pMggAccountId_ =

117117 ManagementGoalsGet'

118118 { _mggQuotaUser = Nothing

119119 , _mggPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Insert.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Goals.Insert

4545 , mgiFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementGoalsInsert@ which the

5252-- 'ManagementGoalsInsert'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementGoalsInsertResource =

7272--

7373-- /See:/ 'managementGoalsInsert'' smart constructor.

7474data ManagementGoalsInsert' = ManagementGoalsInsert'

75− { _mgiQuotaUser :: !(Maybe Text)

76− , _mgiPrettyPrint :: !Bool

75+ { _mgiQuotaUser :: !(Maybe Text)

76+ , _mgiPrettyPrint :: !Bool

7777 , _mgiWebPropertyId :: !Text

78− , _mgiUserIP :: !(Maybe Text)

79− , _mgiProFileId :: !Text

80− , _mgiPayload :: !Goal

81− , _mgiAccountId :: !Text

82− , _mgiKey :: !(Maybe Key)

83− , _mgiOAuthToken :: !(Maybe OAuthToken)

84− , _mgiFields :: !(Maybe Text)

78+ , _mgiUserIP :: !(Maybe Text)

79+ , _mgiProFileId :: !Text

80+ , _mgiPayload :: !Goal

81+ , _mgiAccountId :: !Text

82+ , _mgiKey :: !(Maybe Key)

83+ , _mgiOAuthToken :: !(Maybe OAuthToken)

84+ , _mgiFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementGoalsInsert'

113113 -> Goal -- ^ 'payload'

114114 -> Text -- ^ 'accountId'

115115 -> ManagementGoalsInsert'

116−managementGoalsInsert' pMgiWebPropertyId_ pMgiProFileId_ pMgiPayload_ pMgiAccountId_ =

116+managementGoalsInsert' pMgiWebPropertyId_ pMgiProFileId_ pMgiPayload_ pMgiAccountId_ =

117117 ManagementGoalsInsert'

118118 { _mgiQuotaUser = Nothing

119119 , _mgiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Goals.List

4646 , mglFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementGoalsList@ which the

5353-- 'ManagementGoalsList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementGoalsListResource =

7575--

7676-- /See:/ 'managementGoalsList'' smart constructor.

7777data ManagementGoalsList' = ManagementGoalsList'

78− { _mglQuotaUser :: !(Maybe Text)

79− , _mglPrettyPrint :: !Bool

78+ { _mglQuotaUser :: !(Maybe Text)

79+ , _mglPrettyPrint :: !Bool

8080 , _mglWebPropertyId :: !Text

81− , _mglUserIP :: !(Maybe Text)

82− , _mglProFileId :: !Text

83− , _mglAccountId :: !Text

84− , _mglKey :: !(Maybe Key)

85− , _mglOAuthToken :: !(Maybe OAuthToken)

86− , _mglStartIndex :: !(Maybe Int32)

87− , _mglMaxResults :: !(Maybe Int32)

88− , _mglFields :: !(Maybe Text)

81+ , _mglUserIP :: !(Maybe Text)

82+ , _mglProFileId :: !Text

83+ , _mglAccountId :: !Text

84+ , _mglKey :: !(Maybe Key)

85+ , _mglOAuthToken :: !(Maybe OAuthToken)

86+ , _mglStartIndex :: !(Maybe Int32)

87+ , _mglMaxResults :: !(Maybe Int32)

88+ , _mglFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementGoalsList'

118118 -> Text -- ^ 'profileId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementGoalsList'

121−managementGoalsList' pMglWebPropertyId_ pMglProFileId_ pMglAccountId_ =

121+managementGoalsList' pMglWebPropertyId_ pMglProFileId_ pMglAccountId_ =

122122 ManagementGoalsList'

123123 { _mglQuotaUser = Nothing

124124 , _mglPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Patch.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.Analytics.Management.Goals.Patch

4747 , mgpFields

4848 ) where

4949

50−import Network.Google.Analytics.Types

51−import Network.Google.Prelude

50+import Network.Google.Analytics.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AnalyticsManagementGoalsPatch@ which the

5454-- 'ManagementGoalsPatch'' request conforms to.

@@ -76,17 +76,17 @@ type ManagementGoalsPatchResource =

7676--

7777-- /See:/ 'managementGoalsPatch'' smart constructor.

7878data ManagementGoalsPatch' = ManagementGoalsPatch'

79− { _mgpQuotaUser :: !(Maybe Text)

80− , _mgpPrettyPrint :: !Bool

79+ { _mgpQuotaUser :: !(Maybe Text)

80+ , _mgpPrettyPrint :: !Bool

8181 , _mgpWebPropertyId :: !Text

82− , _mgpGoalId :: !Text

83− , _mgpUserIP :: !(Maybe Text)

84− , _mgpProFileId :: !Text

85− , _mgpPayload :: !Goal

86− , _mgpAccountId :: !Text

87− , _mgpKey :: !(Maybe Key)

88− , _mgpOAuthToken :: !(Maybe OAuthToken)

89− , _mgpFields :: !(Maybe Text)

82+ , _mgpGoalId :: !Text

83+ , _mgpUserIP :: !(Maybe Text)

84+ , _mgpProFileId :: !Text

85+ , _mgpPayload :: !Goal

86+ , _mgpAccountId :: !Text

87+ , _mgpKey :: !(Maybe Key)

88+ , _mgpOAuthToken :: !(Maybe OAuthToken)

89+ , _mgpFields :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

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

@@ -121,7 +121,7 @@ managementGoalsPatch'

121121 -> Goal -- ^ 'payload'

122122 -> Text -- ^ 'accountId'

123123 -> ManagementGoalsPatch'

124−managementGoalsPatch' pMgpWebPropertyId_ pMgpGoalId_ pMgpProFileId_ pMgpPayload_ pMgpAccountId_ =

124+managementGoalsPatch' pMgpWebPropertyId_ pMgpGoalId_ pMgpProFileId_ pMgpPayload_ pMgpAccountId_ =

125125 ManagementGoalsPatch'

126126 { _mgpQuotaUser = Nothing

127127 , _mgpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Goals.Update

4646 , mguFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementGoalsUpdate@ which the

5353-- 'ManagementGoalsUpdate'' request conforms to.

@@ -74,17 +74,17 @@ type ManagementGoalsUpdateResource =

7474--

7575-- /See:/ 'managementGoalsUpdate'' smart constructor.

7676data ManagementGoalsUpdate' = ManagementGoalsUpdate'

77− { _mguQuotaUser :: !(Maybe Text)

78− , _mguPrettyPrint :: !Bool

77+ { _mguQuotaUser :: !(Maybe Text)

78+ , _mguPrettyPrint :: !Bool

7979 , _mguWebPropertyId :: !Text

80− , _mguGoalId :: !Text

81− , _mguUserIP :: !(Maybe Text)

82− , _mguProFileId :: !Text

83− , _mguPayload :: !Goal

84− , _mguAccountId :: !Text

85− , _mguKey :: !(Maybe Key)

86− , _mguOAuthToken :: !(Maybe OAuthToken)

87− , _mguFields :: !(Maybe Text)

80+ , _mguGoalId :: !Text

81+ , _mguUserIP :: !(Maybe Text)

82+ , _mguProFileId :: !Text

83+ , _mguPayload :: !Goal

84+ , _mguAccountId :: !Text

85+ , _mguKey :: !(Maybe Key)

86+ , _mguOAuthToken :: !(Maybe OAuthToken)

87+ , _mguFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -119,7 +119,7 @@ managementGoalsUpdate'

119119 -> Goal -- ^ 'payload'

120120 -> Text -- ^ 'accountId'

121121 -> ManagementGoalsUpdate'

122−managementGoalsUpdate' pMguWebPropertyId_ pMguGoalId_ pMguProFileId_ pMguPayload_ pMguAccountId_ =

122+managementGoalsUpdate' pMguWebPropertyId_ pMguGoalId_ pMguProFileId_ pMguPayload_ pMguAccountId_ =

123123 ManagementGoalsUpdate'

124124 { _mguQuotaUser = Nothing

125125 , _mguPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Delete.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Delete

4545 , mpffldFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFileFilterLinksDelete@ which the

5252-- 'ManagementProFileFilterLinksDelete'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementProFileFilterLinksDeleteResource =

7272--

7373-- /See:/ 'managementProFileFilterLinksDelete'' smart constructor.

7474data ManagementProFileFilterLinksDelete' = ManagementProFileFilterLinksDelete'

75− { _mpffldQuotaUser :: !(Maybe Text)

76− , _mpffldPrettyPrint :: !Bool

75+ { _mpffldQuotaUser :: !(Maybe Text)

76+ , _mpffldPrettyPrint :: !Bool

7777 , _mpffldWebPropertyId :: !Text

78− , _mpffldUserIP :: !(Maybe Text)

79− , _mpffldProFileId :: !Text

80− , _mpffldAccountId :: !Text

81− , _mpffldKey :: !(Maybe Key)

82− , _mpffldLinkId :: !Text

83− , _mpffldOAuthToken :: !(Maybe OAuthToken)

84− , _mpffldFields :: !(Maybe Text)

78+ , _mpffldUserIP :: !(Maybe Text)

79+ , _mpffldProFileId :: !Text

80+ , _mpffldAccountId :: !Text

81+ , _mpffldKey :: !(Maybe Key)

82+ , _mpffldLinkId :: !Text

83+ , _mpffldOAuthToken :: !(Maybe OAuthToken)

84+ , _mpffldFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementProFileFilterLinksDelete'

113113 -> Text -- ^ 'accountId'

114114 -> Text -- ^ 'linkId'

115115 -> ManagementProFileFilterLinksDelete'

116−managementProFileFilterLinksDelete' pMpffldWebPropertyId_ pMpffldProFileId_ pMpffldAccountId_ pMpffldLinkId_ =

116+managementProFileFilterLinksDelete' pMpffldWebPropertyId_ pMpffldProFileId_ pMpffldAccountId_ pMpffldLinkId_ =

117117 ManagementProFileFilterLinksDelete'

118118 { _mpffldQuotaUser = Nothing

119119 , _mpffldPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Get

4545 , mpfflgFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFileFilterLinksGet@ which the

5252-- 'ManagementProFileFilterLinksGet'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementProFileFilterLinksGetResource =

7373--

7474-- /See:/ 'managementProFileFilterLinksGet'' smart constructor.

7575data ManagementProFileFilterLinksGet' = ManagementProFileFilterLinksGet'

76− { _mpfflgQuotaUser :: !(Maybe Text)

77− , _mpfflgPrettyPrint :: !Bool

76+ { _mpfflgQuotaUser :: !(Maybe Text)

77+ , _mpfflgPrettyPrint :: !Bool

7878 , _mpfflgWebPropertyId :: !Text

79− , _mpfflgUserIP :: !(Maybe Text)

80− , _mpfflgProFileId :: !Text

81− , _mpfflgAccountId :: !Text

82− , _mpfflgKey :: !(Maybe Key)

83− , _mpfflgLinkId :: !Text

84− , _mpfflgOAuthToken :: !(Maybe OAuthToken)

85− , _mpfflgFields :: !(Maybe Text)

79+ , _mpfflgUserIP :: !(Maybe Text)

80+ , _mpfflgProFileId :: !Text

81+ , _mpfflgAccountId :: !Text

82+ , _mpfflgKey :: !(Maybe Key)

83+ , _mpfflgLinkId :: !Text

84+ , _mpfflgOAuthToken :: !(Maybe OAuthToken)

85+ , _mpfflgFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementProFileFilterLinksGet'

114114 -> Text -- ^ 'accountId'

115115 -> Text -- ^ 'linkId'

116116 -> ManagementProFileFilterLinksGet'

117−managementProFileFilterLinksGet' pMpfflgWebPropertyId_ pMpfflgProFileId_ pMpfflgAccountId_ pMpfflgLinkId_ =

117+managementProFileFilterLinksGet' pMpfflgWebPropertyId_ pMpfflgProFileId_ pMpfflgAccountId_ pMpfflgLinkId_ =

118118 ManagementProFileFilterLinksGet'

119119 { _mpfflgQuotaUser = Nothing

120120 , _mpfflgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Insert.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Insert

4545 , mpffliFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFileFilterLinksInsert@ which the

5252-- 'ManagementProFileFilterLinksInsert'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementProFileFilterLinksInsertResource =

7373--

7474-- /See:/ 'managementProFileFilterLinksInsert'' smart constructor.

7575data ManagementProFileFilterLinksInsert' = ManagementProFileFilterLinksInsert'

76− { _mpffliQuotaUser :: !(Maybe Text)

77− , _mpffliPrettyPrint :: !Bool

76+ { _mpffliQuotaUser :: !(Maybe Text)

77+ , _mpffliPrettyPrint :: !Bool

7878 , _mpffliWebPropertyId :: !Text

79− , _mpffliUserIP :: !(Maybe Text)

80− , _mpffliProFileId :: !Text

81− , _mpffliPayload :: !ProFileFilterLink

82− , _mpffliAccountId :: !Text

83− , _mpffliKey :: !(Maybe Key)

84− , _mpffliOAuthToken :: !(Maybe OAuthToken)

85− , _mpffliFields :: !(Maybe Text)

79+ , _mpffliUserIP :: !(Maybe Text)

80+ , _mpffliProFileId :: !Text

81+ , _mpffliPayload :: !ProFileFilterLink

82+ , _mpffliAccountId :: !Text

83+ , _mpffliKey :: !(Maybe Key)

84+ , _mpffliOAuthToken :: !(Maybe OAuthToken)

85+ , _mpffliFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementProFileFilterLinksInsert'

114114 -> ProFileFilterLink -- ^ 'payload'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementProFileFilterLinksInsert'

117−managementProFileFilterLinksInsert' pMpffliWebPropertyId_ pMpffliProFileId_ pMpffliPayload_ pMpffliAccountId_ =

117+managementProFileFilterLinksInsert' pMpffliWebPropertyId_ pMpffliProFileId_ pMpffliPayload_ pMpffliAccountId_ =

118118 ManagementProFileFilterLinksInsert'

119119 { _mpffliQuotaUser = Nothing

120120 , _mpffliPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.List

4646 , mpffllFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementProFileFilterLinksList@ which the

5353-- 'ManagementProFileFilterLinksList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementProFileFilterLinksListResource =

7575--

7676-- /See:/ 'managementProFileFilterLinksList'' smart constructor.

7777data ManagementProFileFilterLinksList' = ManagementProFileFilterLinksList'

78− { _mpffllQuotaUser :: !(Maybe Text)

79− , _mpffllPrettyPrint :: !Bool

78+ { _mpffllQuotaUser :: !(Maybe Text)

79+ , _mpffllPrettyPrint :: !Bool

8080 , _mpffllWebPropertyId :: !Text

81− , _mpffllUserIP :: !(Maybe Text)

82− , _mpffllProFileId :: !Text

83− , _mpffllAccountId :: !Text

84− , _mpffllKey :: !(Maybe Key)

85− , _mpffllOAuthToken :: !(Maybe OAuthToken)

86− , _mpffllStartIndex :: !(Maybe Int32)

87− , _mpffllMaxResults :: !(Maybe Int32)

88− , _mpffllFields :: !(Maybe Text)

81+ , _mpffllUserIP :: !(Maybe Text)

82+ , _mpffllProFileId :: !Text

83+ , _mpffllAccountId :: !Text

84+ , _mpffllKey :: !(Maybe Key)

85+ , _mpffllOAuthToken :: !(Maybe OAuthToken)

86+ , _mpffllStartIndex :: !(Maybe Int32)

87+ , _mpffllMaxResults :: !(Maybe Int32)

88+ , _mpffllFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementProFileFilterLinksList'

118118 -> Text -- ^ 'profileId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementProFileFilterLinksList'

121−managementProFileFilterLinksList' pMpffllWebPropertyId_ pMpffllProFileId_ pMpffllAccountId_ =

121+managementProFileFilterLinksList' pMpffllWebPropertyId_ pMpffllProFileId_ pMpffllAccountId_ =

122122 ManagementProFileFilterLinksList'

123123 { _mpffllQuotaUser = Nothing

124124 , _mpffllPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Patch.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Patch

4747 , mpfflpFields

4848 ) where

4949

50−import Network.Google.Analytics.Types

51−import Network.Google.Prelude

50+import Network.Google.Analytics.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @AnalyticsManagementProFileFilterLinksPatch@ which the

5454-- 'ManagementProFileFilterLinksPatch'' request conforms to.

@@ -77,17 +77,17 @@ type ManagementProFileFilterLinksPatchResource =

7777--

7878-- /See:/ 'managementProFileFilterLinksPatch'' smart constructor.

7979data ManagementProFileFilterLinksPatch' = ManagementProFileFilterLinksPatch'

80− { _mpfflpQuotaUser :: !(Maybe Text)

81− , _mpfflpPrettyPrint :: !Bool

80+ { _mpfflpQuotaUser :: !(Maybe Text)

81+ , _mpfflpPrettyPrint :: !Bool

8282 , _mpfflpWebPropertyId :: !Text

83− , _mpfflpUserIP :: !(Maybe Text)

84− , _mpfflpProFileId :: !Text

85− , _mpfflpPayload :: !ProFileFilterLink

86− , _mpfflpAccountId :: !Text

87− , _mpfflpKey :: !(Maybe Key)

88− , _mpfflpLinkId :: !Text

89− , _mpfflpOAuthToken :: !(Maybe OAuthToken)

90− , _mpfflpFields :: !(Maybe Text)

83+ , _mpfflpUserIP :: !(Maybe Text)

84+ , _mpfflpProFileId :: !Text

85+ , _mpfflpPayload :: !ProFileFilterLink

86+ , _mpfflpAccountId :: !Text

87+ , _mpfflpKey :: !(Maybe Key)

88+ , _mpfflpLinkId :: !Text

89+ , _mpfflpOAuthToken :: !(Maybe OAuthToken)

90+ , _mpfflpFields :: !(Maybe Text)

9191 } deriving (Eq,Show,Data,Typeable,Generic)

9292

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

@@ -122,7 +122,7 @@ managementProFileFilterLinksPatch'

122122 -> Text -- ^ 'accountId'

123123 -> Text -- ^ 'linkId'

124124 -> ManagementProFileFilterLinksPatch'

125−managementProFileFilterLinksPatch' pMpfflpWebPropertyId_ pMpfflpProFileId_ pMpfflpPayload_ pMpfflpAccountId_ pMpfflpLinkId_ =

125+managementProFileFilterLinksPatch' pMpfflpWebPropertyId_ pMpfflpProFileId_ pMpfflpPayload_ pMpfflpAccountId_ pMpfflpLinkId_ =

126126 ManagementProFileFilterLinksPatch'

127127 { _mpfflpQuotaUser = Nothing

128128 , _mpfflpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.ProFileFilterLinks.Update

4646 , mpffluFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementProFileFilterLinksUpdate@ which the

5353-- 'ManagementProFileFilterLinksUpdate'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementProFileFilterLinksUpdateResource =

7575--

7676-- /See:/ 'managementProFileFilterLinksUpdate'' smart constructor.

7777data ManagementProFileFilterLinksUpdate' = ManagementProFileFilterLinksUpdate'

78− { _mpffluQuotaUser :: !(Maybe Text)

79− , _mpffluPrettyPrint :: !Bool

78+ { _mpffluQuotaUser :: !(Maybe Text)

79+ , _mpffluPrettyPrint :: !Bool

8080 , _mpffluWebPropertyId :: !Text

81− , _mpffluUserIP :: !(Maybe Text)

82− , _mpffluProFileId :: !Text

83− , _mpffluPayload :: !ProFileFilterLink

84− , _mpffluAccountId :: !Text

85− , _mpffluKey :: !(Maybe Key)

86− , _mpffluLinkId :: !Text

87− , _mpffluOAuthToken :: !(Maybe OAuthToken)

88− , _mpffluFields :: !(Maybe Text)

81+ , _mpffluUserIP :: !(Maybe Text)

82+ , _mpffluProFileId :: !Text

83+ , _mpffluPayload :: !ProFileFilterLink

84+ , _mpffluAccountId :: !Text

85+ , _mpffluKey :: !(Maybe Key)

86+ , _mpffluLinkId :: !Text

87+ , _mpffluOAuthToken :: !(Maybe OAuthToken)

88+ , _mpffluFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -120,7 +120,7 @@ managementProFileFilterLinksUpdate'

120120 -> Text -- ^ 'accountId'

121121 -> Text -- ^ 'linkId'

122122 -> ManagementProFileFilterLinksUpdate'

123−managementProFileFilterLinksUpdate' pMpffluWebPropertyId_ pMpffluProFileId_ pMpffluPayload_ pMpffluAccountId_ pMpffluLinkId_ =

123+managementProFileFilterLinksUpdate' pMpffluWebPropertyId_ pMpffluProFileId_ pMpffluPayload_ pMpffluAccountId_ pMpffluLinkId_ =

124124 ManagementProFileFilterLinksUpdate'

125125 { _mpffluQuotaUser = Nothing

126126 , _mpffluPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Delete.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFileUserLinks.Delete

4545 , mpfuldFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFileUserLinksDelete@ which the

5252-- 'ManagementProFileUserLinksDelete'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementProFileUserLinksDeleteResource =

7272--

7373-- /See:/ 'managementProFileUserLinksDelete'' smart constructor.

7474data ManagementProFileUserLinksDelete' = ManagementProFileUserLinksDelete'

75− { _mpfuldQuotaUser :: !(Maybe Text)

76− , _mpfuldPrettyPrint :: !Bool

75+ { _mpfuldQuotaUser :: !(Maybe Text)

76+ , _mpfuldPrettyPrint :: !Bool

7777 , _mpfuldWebPropertyId :: !Text

78− , _mpfuldUserIP :: !(Maybe Text)

79− , _mpfuldProFileId :: !Text

80− , _mpfuldAccountId :: !Text

81− , _mpfuldKey :: !(Maybe Key)

82− , _mpfuldLinkId :: !Text

83− , _mpfuldOAuthToken :: !(Maybe OAuthToken)

84− , _mpfuldFields :: !(Maybe Text)

78+ , _mpfuldUserIP :: !(Maybe Text)

79+ , _mpfuldProFileId :: !Text

80+ , _mpfuldAccountId :: !Text

81+ , _mpfuldKey :: !(Maybe Key)

82+ , _mpfuldLinkId :: !Text

83+ , _mpfuldOAuthToken :: !(Maybe OAuthToken)

84+ , _mpfuldFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementProFileUserLinksDelete'

113113 -> Text -- ^ 'accountId'

114114 -> Text -- ^ 'linkId'

115115 -> ManagementProFileUserLinksDelete'

116−managementProFileUserLinksDelete' pMpfuldWebPropertyId_ pMpfuldProFileId_ pMpfuldAccountId_ pMpfuldLinkId_ =

116+managementProFileUserLinksDelete' pMpfuldWebPropertyId_ pMpfuldProFileId_ pMpfuldAccountId_ pMpfuldLinkId_ =

117117 ManagementProFileUserLinksDelete'

118118 { _mpfuldQuotaUser = Nothing

119119 , _mpfuldPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Insert.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFileUserLinks.Insert

4545 , mpfuliFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFileUserLinksInsert@ which the

5252-- 'ManagementProFileUserLinksInsert'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementProFileUserLinksInsertResource =

7373--

7474-- /See:/ 'managementProFileUserLinksInsert'' smart constructor.

7575data ManagementProFileUserLinksInsert' = ManagementProFileUserLinksInsert'

76− { _mpfuliQuotaUser :: !(Maybe Text)

77− , _mpfuliPrettyPrint :: !Bool

76+ { _mpfuliQuotaUser :: !(Maybe Text)

77+ , _mpfuliPrettyPrint :: !Bool

7878 , _mpfuliWebPropertyId :: !Text

79− , _mpfuliUserIP :: !(Maybe Text)

80− , _mpfuliProFileId :: !Text

81− , _mpfuliPayload :: !EntityUserLink

82− , _mpfuliAccountId :: !Text

83− , _mpfuliKey :: !(Maybe Key)

84− , _mpfuliOAuthToken :: !(Maybe OAuthToken)

85− , _mpfuliFields :: !(Maybe Text)

79+ , _mpfuliUserIP :: !(Maybe Text)

80+ , _mpfuliProFileId :: !Text

81+ , _mpfuliPayload :: !EntityUserLink

82+ , _mpfuliAccountId :: !Text

83+ , _mpfuliKey :: !(Maybe Key)

84+ , _mpfuliOAuthToken :: !(Maybe OAuthToken)

85+ , _mpfuliFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementProFileUserLinksInsert'

114114 -> EntityUserLink -- ^ 'payload'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementProFileUserLinksInsert'

117−managementProFileUserLinksInsert' pMpfuliWebPropertyId_ pMpfuliProFileId_ pMpfuliPayload_ pMpfuliAccountId_ =

117+managementProFileUserLinksInsert' pMpfuliWebPropertyId_ pMpfuliProFileId_ pMpfuliPayload_ pMpfuliAccountId_ =

118118 ManagementProFileUserLinksInsert'

119119 { _mpfuliQuotaUser = Nothing

120120 , _mpfuliPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.ProFileUserLinks.List

4646 , mpfullFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementProFileUserLinksList@ which the

5353-- 'ManagementProFileUserLinksList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementProFileUserLinksListResource =

7575--

7676-- /See:/ 'managementProFileUserLinksList'' smart constructor.

7777data ManagementProFileUserLinksList' = ManagementProFileUserLinksList'

78− { _mpfullQuotaUser :: !(Maybe Text)

79− , _mpfullPrettyPrint :: !Bool

78+ { _mpfullQuotaUser :: !(Maybe Text)

79+ , _mpfullPrettyPrint :: !Bool

8080 , _mpfullWebPropertyId :: !Text

81− , _mpfullUserIP :: !(Maybe Text)

82− , _mpfullProFileId :: !Text

83− , _mpfullAccountId :: !Text

84− , _mpfullKey :: !(Maybe Key)

85− , _mpfullOAuthToken :: !(Maybe OAuthToken)

86− , _mpfullStartIndex :: !(Maybe Int32)

87− , _mpfullMaxResults :: !(Maybe Int32)

88− , _mpfullFields :: !(Maybe Text)

81+ , _mpfullUserIP :: !(Maybe Text)

82+ , _mpfullProFileId :: !Text

83+ , _mpfullAccountId :: !Text

84+ , _mpfullKey :: !(Maybe Key)

85+ , _mpfullOAuthToken :: !(Maybe OAuthToken)

86+ , _mpfullStartIndex :: !(Maybe Int32)

87+ , _mpfullMaxResults :: !(Maybe Int32)

88+ , _mpfullFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementProFileUserLinksList'

118118 -> Text -- ^ 'profileId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementProFileUserLinksList'

121−managementProFileUserLinksList' pMpfullWebPropertyId_ pMpfullProFileId_ pMpfullAccountId_ =

121+managementProFileUserLinksList' pMpfullWebPropertyId_ pMpfullProFileId_ pMpfullAccountId_ =

122122 ManagementProFileUserLinksList'

123123 { _mpfullQuotaUser = Nothing

124124 , _mpfullPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.ProFileUserLinks.Update

4646 , mpfuluFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementProFileUserLinksUpdate@ which the

5353-- 'ManagementProFileUserLinksUpdate'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementProFileUserLinksUpdateResource =

7575--

7676-- /See:/ 'managementProFileUserLinksUpdate'' smart constructor.

7777data ManagementProFileUserLinksUpdate' = ManagementProFileUserLinksUpdate'

78− { _mpfuluQuotaUser :: !(Maybe Text)

79− , _mpfuluPrettyPrint :: !Bool

78+ { _mpfuluQuotaUser :: !(Maybe Text)

79+ , _mpfuluPrettyPrint :: !Bool

8080 , _mpfuluWebPropertyId :: !Text

81− , _mpfuluUserIP :: !(Maybe Text)

82− , _mpfuluProFileId :: !Text

83− , _mpfuluPayload :: !EntityUserLink

84− , _mpfuluAccountId :: !Text

85− , _mpfuluKey :: !(Maybe Key)

86− , _mpfuluLinkId :: !Text

87− , _mpfuluOAuthToken :: !(Maybe OAuthToken)

88− , _mpfuluFields :: !(Maybe Text)

81+ , _mpfuluUserIP :: !(Maybe Text)

82+ , _mpfuluProFileId :: !Text

83+ , _mpfuluPayload :: !EntityUserLink

84+ , _mpfuluAccountId :: !Text

85+ , _mpfuluKey :: !(Maybe Key)

86+ , _mpfuluLinkId :: !Text

87+ , _mpfuluOAuthToken :: !(Maybe OAuthToken)

88+ , _mpfuluFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -120,7 +120,7 @@ managementProFileUserLinksUpdate'

120120 -> Text -- ^ 'accountId'

121121 -> Text -- ^ 'linkId'

122122 -> ManagementProFileUserLinksUpdate'

123−managementProFileUserLinksUpdate' pMpfuluWebPropertyId_ pMpfuluProFileId_ pMpfuluPayload_ pMpfuluAccountId_ pMpfuluLinkId_ =

123+managementProFileUserLinksUpdate' pMpfuluWebPropertyId_ pMpfuluProFileId_ pMpfuluPayload_ pMpfuluAccountId_ pMpfuluLinkId_ =

124124 ManagementProFileUserLinksUpdate'

125125 { _mpfuluQuotaUser = Nothing

126126 , _mpfuluPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Delete.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.Delete

4444 , mpfdFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementProFilesDelete@ which the

5151-- 'ManagementProFilesDelete'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementProFilesDeleteResource =

6969--

7070-- /See:/ 'managementProFilesDelete'' smart constructor.

7171data ManagementProFilesDelete' = ManagementProFilesDelete'

72− { _mpfdQuotaUser :: !(Maybe Text)

73− , _mpfdPrettyPrint :: !Bool

72+ { _mpfdQuotaUser :: !(Maybe Text)

73+ , _mpfdPrettyPrint :: !Bool

7474 , _mpfdWebPropertyId :: !Text

75− , _mpfdUserIP :: !(Maybe Text)

76− , _mpfdProFileId :: !Text

77− , _mpfdAccountId :: !Text

78− , _mpfdKey :: !(Maybe Key)

79− , _mpfdOAuthToken :: !(Maybe OAuthToken)

80− , _mpfdFields :: !(Maybe Text)

75+ , _mpfdUserIP :: !(Maybe Text)

76+ , _mpfdProFileId :: !Text

77+ , _mpfdAccountId :: !Text

78+ , _mpfdKey :: !(Maybe Key)

79+ , _mpfdOAuthToken :: !(Maybe OAuthToken)

80+ , _mpfdFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementProFilesDelete'

106106 -> Text -- ^ 'profileId'

107107 -> Text -- ^ 'accountId'

108108 -> ManagementProFilesDelete'

109−managementProFilesDelete' pMpfdWebPropertyId_ pMpfdProFileId_ pMpfdAccountId_ =

109+managementProFilesDelete' pMpfdWebPropertyId_ pMpfdProFileId_ pMpfdAccountId_ =

110110 ManagementProFilesDelete'

111111 { _mpfdQuotaUser = Nothing

112112 , _mpfdPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.Get

4444 , mpfgFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementProFilesGet@ which the

5151-- 'ManagementProFilesGet'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementProFilesGetResource =

6969--

7070-- /See:/ 'managementProFilesGet'' smart constructor.

7171data ManagementProFilesGet' = ManagementProFilesGet'

72− { _mpfgQuotaUser :: !(Maybe Text)

73− , _mpfgPrettyPrint :: !Bool

72+ { _mpfgQuotaUser :: !(Maybe Text)

73+ , _mpfgPrettyPrint :: !Bool

7474 , _mpfgWebPropertyId :: !Text

75− , _mpfgUserIP :: !(Maybe Text)

76− , _mpfgProFileId :: !Text

77− , _mpfgAccountId :: !Text

78− , _mpfgKey :: !(Maybe Key)

79− , _mpfgOAuthToken :: !(Maybe OAuthToken)

80− , _mpfgFields :: !(Maybe Text)

75+ , _mpfgUserIP :: !(Maybe Text)

76+ , _mpfgProFileId :: !Text

77+ , _mpfgAccountId :: !Text

78+ , _mpfgKey :: !(Maybe Key)

79+ , _mpfgOAuthToken :: !(Maybe OAuthToken)

80+ , _mpfgFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementProFilesGet'

106106 -> Text -- ^ 'profileId'

107107 -> Text -- ^ 'accountId'

108108 -> ManagementProFilesGet'

109−managementProFilesGet' pMpfgWebPropertyId_ pMpfgProFileId_ pMpfgAccountId_ =

109+managementProFilesGet' pMpfgWebPropertyId_ pMpfgProFileId_ pMpfgAccountId_ =

110110 ManagementProFilesGet'

111111 { _mpfgQuotaUser = Nothing

112112 , _mpfgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.Insert

4444 , mpfiFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementProFilesInsert@ which the

5151-- 'ManagementProFilesInsert'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementProFilesInsertResource =

6969--

7070-- /See:/ 'managementProFilesInsert'' smart constructor.

7171data ManagementProFilesInsert' = ManagementProFilesInsert'

72− { _mpfiQuotaUser :: !(Maybe Text)

73− , _mpfiPrettyPrint :: !Bool

72+ { _mpfiQuotaUser :: !(Maybe Text)

73+ , _mpfiPrettyPrint :: !Bool

7474 , _mpfiWebPropertyId :: !Text

75− , _mpfiUserIP :: !(Maybe Text)

76− , _mpfiPayload :: !ProFile

77− , _mpfiAccountId :: !Text

78− , _mpfiKey :: !(Maybe Key)

79− , _mpfiOAuthToken :: !(Maybe OAuthToken)

80− , _mpfiFields :: !(Maybe Text)

75+ , _mpfiUserIP :: !(Maybe Text)

76+ , _mpfiPayload :: !ProFile

77+ , _mpfiAccountId :: !Text

78+ , _mpfiKey :: !(Maybe Key)

79+ , _mpfiOAuthToken :: !(Maybe OAuthToken)

80+ , _mpfiFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementProFilesInsert'

106106 -> ProFile -- ^ 'payload'

107107 -> Text -- ^ 'accountId'

108108 -> ManagementProFilesInsert'

109−managementProFilesInsert' pMpfiWebPropertyId_ pMpfiPayload_ pMpfiAccountId_ =

109+managementProFilesInsert' pMpfiWebPropertyId_ pMpfiPayload_ pMpfiAccountId_ =

110110 ManagementProFilesInsert'

111111 { _mpfiQuotaUser = Nothing

112112 , _mpfiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.List

4545 , mpflFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFilesList@ which the

5252-- 'ManagementProFilesList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementProFilesListResource =

7272--

7373-- /See:/ 'managementProFilesList'' smart constructor.

7474data ManagementProFilesList' = ManagementProFilesList'

75− { _mpflQuotaUser :: !(Maybe Text)

76− , _mpflPrettyPrint :: !Bool

75+ { _mpflQuotaUser :: !(Maybe Text)

76+ , _mpflPrettyPrint :: !Bool

7777 , _mpflWebPropertyId :: !Text

78− , _mpflUserIP :: !(Maybe Text)

79− , _mpflAccountId :: !Text

80− , _mpflKey :: !(Maybe Key)

81− , _mpflOAuthToken :: !(Maybe OAuthToken)

82− , _mpflStartIndex :: !(Maybe Int32)

83− , _mpflMaxResults :: !(Maybe Int32)

84− , _mpflFields :: !(Maybe Text)

78+ , _mpflUserIP :: !(Maybe Text)

79+ , _mpflAccountId :: !Text

80+ , _mpflKey :: !(Maybe Key)

81+ , _mpflOAuthToken :: !(Maybe OAuthToken)

82+ , _mpflStartIndex :: !(Maybe Int32)

83+ , _mpflMaxResults :: !(Maybe Int32)

84+ , _mpflFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementProFilesList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementProFilesList'

114−managementProFilesList' pMpflWebPropertyId_ pMpflAccountId_ =

114+managementProFilesList' pMpflWebPropertyId_ pMpflAccountId_ =

115115 ManagementProFilesList'

116116 { _mpflQuotaUser = Nothing

117117 , _mpflPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Patch.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.Patch

4646 , mpfpFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementProFilesPatch@ which the

5353-- 'ManagementProFilesPatch'' request conforms to.

@@ -74,16 +74,16 @@ type ManagementProFilesPatchResource =

7474--

7575-- /See:/ 'managementProFilesPatch'' smart constructor.

7676data ManagementProFilesPatch' = ManagementProFilesPatch'

77− { _mpfpQuotaUser :: !(Maybe Text)

78− , _mpfpPrettyPrint :: !Bool

77+ { _mpfpQuotaUser :: !(Maybe Text)

78+ , _mpfpPrettyPrint :: !Bool

7979 , _mpfpWebPropertyId :: !Text

80− , _mpfpUserIP :: !(Maybe Text)

81− , _mpfpProFileId :: !Text

82− , _mpfpPayload :: !ProFile

83− , _mpfpAccountId :: !Text

84− , _mpfpKey :: !(Maybe Key)

85− , _mpfpOAuthToken :: !(Maybe OAuthToken)

86− , _mpfpFields :: !(Maybe Text)

80+ , _mpfpUserIP :: !(Maybe Text)

81+ , _mpfpProFileId :: !Text

82+ , _mpfpPayload :: !ProFile

83+ , _mpfpAccountId :: !Text

84+ , _mpfpKey :: !(Maybe Key)

85+ , _mpfpOAuthToken :: !(Maybe OAuthToken)

86+ , _mpfpFields :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

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

@@ -115,7 +115,7 @@ managementProFilesPatch'

115115 -> ProFile -- ^ 'payload'

116116 -> Text -- ^ 'accountId'

117117 -> ManagementProFilesPatch'

118−managementProFilesPatch' pMpfpWebPropertyId_ pMpfpProFileId_ pMpfpPayload_ pMpfpAccountId_ =

118+managementProFilesPatch' pMpfpWebPropertyId_ pMpfpProFileId_ pMpfpPayload_ pMpfpAccountId_ =

119119 ManagementProFilesPatch'

120120 { _mpfpQuotaUser = Nothing

121121 , _mpfpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Update.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.ProFiles.Update

4545 , mpfuFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementProFilesUpdate@ which the

5252-- 'ManagementProFilesUpdate'' request conforms to.

@@ -71,16 +71,16 @@ type ManagementProFilesUpdateResource =

7171--

7272-- /See:/ 'managementProFilesUpdate'' smart constructor.

7373data ManagementProFilesUpdate' = ManagementProFilesUpdate'

74− { _mpfuQuotaUser :: !(Maybe Text)

75− , _mpfuPrettyPrint :: !Bool

74+ { _mpfuQuotaUser :: !(Maybe Text)

75+ , _mpfuPrettyPrint :: !Bool

7676 , _mpfuWebPropertyId :: !Text

77− , _mpfuUserIP :: !(Maybe Text)

78− , _mpfuProFileId :: !Text

79− , _mpfuPayload :: !ProFile

80− , _mpfuAccountId :: !Text

81− , _mpfuKey :: !(Maybe Key)

82− , _mpfuOAuthToken :: !(Maybe OAuthToken)

83− , _mpfuFields :: !(Maybe Text)

77+ , _mpfuUserIP :: !(Maybe Text)

78+ , _mpfuProFileId :: !Text

79+ , _mpfuPayload :: !ProFile

80+ , _mpfuAccountId :: !Text

81+ , _mpfuKey :: !(Maybe Key)

82+ , _mpfuOAuthToken :: !(Maybe OAuthToken)

83+ , _mpfuFields :: !(Maybe Text)

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

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

@@ -112,7 +112,7 @@ managementProFilesUpdate'

112112 -> ProFile -- ^ 'payload'

113113 -> Text -- ^ 'accountId'

114114 -> ManagementProFilesUpdate'

115−managementProFilesUpdate' pMpfuWebPropertyId_ pMpfuProFileId_ pMpfuPayload_ pMpfuAccountId_ =

115+managementProFilesUpdate' pMpfuWebPropertyId_ pMpfuProFileId_ pMpfuPayload_ pMpfuAccountId_ =

116116 ManagementProFilesUpdate'

117117 { _mpfuQuotaUser = Nothing

118118 , _mpfuPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Segments/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.Segments.List

4343 , mslFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementSegmentsList@ which the

5050-- 'ManagementSegmentsList'' request conforms to.

@@ -65,14 +65,14 @@ type ManagementSegmentsListResource =

6565--

6666-- /See:/ 'managementSegmentsList'' smart constructor.

6767data ManagementSegmentsList' = ManagementSegmentsList'

68− { _mslQuotaUser :: !(Maybe Text)

68+ { _mslQuotaUser :: !(Maybe Text)

6969 , _mslPrettyPrint :: !Bool

70− , _mslUserIP :: !(Maybe Text)

71− , _mslKey :: !(Maybe Key)

72− , _mslOAuthToken :: !(Maybe OAuthToken)

73− , _mslStartIndex :: !(Maybe Int32)

74− , _mslMaxResults :: !(Maybe Int32)

75− , _mslFields :: !(Maybe Text)

70+ , _mslUserIP :: !(Maybe Text)

71+ , _mslKey :: !(Maybe Key)

72+ , _mslOAuthToken :: !(Maybe OAuthToken)

73+ , _mslStartIndex :: !(Maybe Int32)

74+ , _mslMaxResults :: !(Maybe Int32)

75+ , _mslFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -96,7 +96,7 @@ data ManagementSegmentsList' = ManagementSegmentsList'

9696-- * 'mslFields'

9797managementSegmentsList'

9898 :: ManagementSegmentsList'

99−managementSegmentsList' =

99+managementSegmentsList' =

100100 ManagementSegmentsList'

101101 { _mslQuotaUser = Nothing

102102 , _mslPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.UnSampledReports.Get

4545 , musrgFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementUnSampledReportsGet@ which the

5252-- 'ManagementUnSampledReportsGet'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementUnSampledReportsGetResource =

7373--

7474-- /See:/ 'managementUnSampledReportsGet'' smart constructor.

7575data ManagementUnSampledReportsGet' = ManagementUnSampledReportsGet'

76− { _musrgQuotaUser :: !(Maybe Text)

77− , _musrgPrettyPrint :: !Bool

78− , _musrgWebPropertyId :: !Text

79− , _musrgUserIP :: !(Maybe Text)

80− , _musrgProFileId :: !Text

81− , _musrgAccountId :: !Text

82− , _musrgKey :: !(Maybe Key)

76+ { _musrgQuotaUser :: !(Maybe Text)

77+ , _musrgPrettyPrint :: !Bool

78+ , _musrgWebPropertyId :: !Text

79+ , _musrgUserIP :: !(Maybe Text)

80+ , _musrgProFileId :: !Text

81+ , _musrgAccountId :: !Text

82+ , _musrgKey :: !(Maybe Key)

8383 , _musrgUnSampledReportId :: !Text

84− , _musrgOAuthToken :: !(Maybe OAuthToken)

85− , _musrgFields :: !(Maybe Text)

84+ , _musrgOAuthToken :: !(Maybe OAuthToken)

85+ , _musrgFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementUnSampledReportsGet'

114114 -> Text -- ^ 'accountId'

115115 -> Text -- ^ 'unsampledReportId'

116116 -> ManagementUnSampledReportsGet'

117−managementUnSampledReportsGet' pMusrgWebPropertyId_ pMusrgProFileId_ pMusrgAccountId_ pMusrgUnSampledReportId_ =

117+managementUnSampledReportsGet' pMusrgWebPropertyId_ pMusrgProFileId_ pMusrgAccountId_ pMusrgUnSampledReportId_ =

118118 ManagementUnSampledReportsGet'

119119 { _musrgQuotaUser = Nothing

120120 , _musrgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.UnSampledReports.Insert

4545 , musriFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementUnSampledReportsInsert@ which the

5252-- 'ManagementUnSampledReportsInsert'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementUnSampledReportsInsertResource =

7373--

7474-- /See:/ 'managementUnSampledReportsInsert'' smart constructor.

7575data ManagementUnSampledReportsInsert' = ManagementUnSampledReportsInsert'

76− { _musriQuotaUser :: !(Maybe Text)

77− , _musriPrettyPrint :: !Bool

76+ { _musriQuotaUser :: !(Maybe Text)

77+ , _musriPrettyPrint :: !Bool

7878 , _musriWebPropertyId :: !Text

79− , _musriUserIP :: !(Maybe Text)

80− , _musriProFileId :: !Text

81− , _musriPayload :: !UnSampledReport

82− , _musriAccountId :: !Text

83− , _musriKey :: !(Maybe Key)

84− , _musriOAuthToken :: !(Maybe OAuthToken)

85− , _musriFields :: !(Maybe Text)

79+ , _musriUserIP :: !(Maybe Text)

80+ , _musriProFileId :: !Text

81+ , _musriPayload :: !UnSampledReport

82+ , _musriAccountId :: !Text

83+ , _musriKey :: !(Maybe Key)

84+ , _musriOAuthToken :: !(Maybe OAuthToken)

85+ , _musriFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementUnSampledReportsInsert'

114114 -> UnSampledReport -- ^ 'payload'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementUnSampledReportsInsert'

117−managementUnSampledReportsInsert' pMusriWebPropertyId_ pMusriProFileId_ pMusriPayload_ pMusriAccountId_ =

117+managementUnSampledReportsInsert' pMusriWebPropertyId_ pMusriProFileId_ pMusriPayload_ pMusriAccountId_ =

118118 ManagementUnSampledReportsInsert'

119119 { _musriQuotaUser = Nothing

120120 , _musriPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.UnSampledReports.List

4646 , musrlFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementUnSampledReportsList@ which the

5353-- 'ManagementUnSampledReportsList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementUnSampledReportsListResource =

7575--

7676-- /See:/ 'managementUnSampledReportsList'' smart constructor.

7777data ManagementUnSampledReportsList' = ManagementUnSampledReportsList'

78− { _musrlQuotaUser :: !(Maybe Text)

79− , _musrlPrettyPrint :: !Bool

78+ { _musrlQuotaUser :: !(Maybe Text)

79+ , _musrlPrettyPrint :: !Bool

8080 , _musrlWebPropertyId :: !Text

81− , _musrlUserIP :: !(Maybe Text)

82− , _musrlProFileId :: !Text

83− , _musrlAccountId :: !Text

84− , _musrlKey :: !(Maybe Key)

85− , _musrlOAuthToken :: !(Maybe OAuthToken)

86− , _musrlStartIndex :: !(Maybe Int32)

87− , _musrlMaxResults :: !(Maybe Int32)

88− , _musrlFields :: !(Maybe Text)

81+ , _musrlUserIP :: !(Maybe Text)

82+ , _musrlProFileId :: !Text

83+ , _musrlAccountId :: !Text

84+ , _musrlKey :: !(Maybe Key)

85+ , _musrlOAuthToken :: !(Maybe OAuthToken)

86+ , _musrlStartIndex :: !(Maybe Int32)

87+ , _musrlMaxResults :: !(Maybe Int32)

88+ , _musrlFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementUnSampledReportsList'

118118 -> Text -- ^ 'profileId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementUnSampledReportsList'

121−managementUnSampledReportsList' pMusrlWebPropertyId_ pMusrlProFileId_ pMusrlAccountId_ =

121+managementUnSampledReportsList' pMusrlWebPropertyId_ pMusrlProFileId_ pMusrlAccountId_ =

122122 ManagementUnSampledReportsList'

123123 { _musrlQuotaUser = Nothing

124124 , _musrlPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/DeleteUploadData.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData

4545 , mududFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementUploadsDeleteUploadData@ which the

5252-- 'ManagementUploadsDeleteUploadData'' request conforms to.

@@ -74,16 +74,16 @@ type ManagementUploadsDeleteUploadDataResource =

7474--

7575-- /See:/ 'managementUploadsDeleteUploadData'' smart constructor.

7676data ManagementUploadsDeleteUploadData' = ManagementUploadsDeleteUploadData'

77− { _mududQuotaUser :: !(Maybe Text)

78− , _mududPrettyPrint :: !Bool

79− , _mududWebPropertyId :: !Text

80− , _mududUserIP :: !(Maybe Text)

77+ { _mududQuotaUser :: !(Maybe Text)

78+ , _mududPrettyPrint :: !Bool

79+ , _mududWebPropertyId :: !Text

80+ , _mududUserIP :: !(Maybe Text)

8181 , _mududCustomDataSourceId :: !Text

82− , _mududPayload :: !AnalyticsDataimportDeleteUploadDataRequest

83− , _mududAccountId :: !Text

84− , _mududKey :: !(Maybe Key)

85− , _mududOAuthToken :: !(Maybe OAuthToken)

86− , _mududFields :: !(Maybe Text)

82+ , _mududPayload :: !AnalyticsDataimportDeleteUploadDataRequest

83+ , _mududAccountId :: !Text

84+ , _mududKey :: !(Maybe Key)

85+ , _mududOAuthToken :: !(Maybe OAuthToken)

86+ , _mududFields :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

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

@@ -115,7 +115,7 @@ managementUploadsDeleteUploadData'

115115 -> AnalyticsDataimportDeleteUploadDataRequest -- ^ 'payload'

116116 -> Text -- ^ 'accountId'

117117 -> ManagementUploadsDeleteUploadData'

118−managementUploadsDeleteUploadData' pMududWebPropertyId_ pMududCustomDataSourceId_ pMududPayload_ pMududAccountId_ =

118+managementUploadsDeleteUploadData' pMududWebPropertyId_ pMududCustomDataSourceId_ pMududPayload_ pMududAccountId_ =

119119 ManagementUploadsDeleteUploadData'

120120 { _mududQuotaUser = Nothing

121121 , _mududPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Uploads.Get

4545 , mugFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementUploadsGet@ which the

5252-- 'ManagementUploadsGet'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementUploadsGetResource =

7373--

7474-- /See:/ 'managementUploadsGet'' smart constructor.

7575data ManagementUploadsGet' = ManagementUploadsGet'

76− { _mugQuotaUser :: !(Maybe Text)

77− , _mugPrettyPrint :: !Bool

78− , _mugWebPropertyId :: !Text

79− , _mugUserIP :: !(Maybe Text)

76+ { _mugQuotaUser :: !(Maybe Text)

77+ , _mugPrettyPrint :: !Bool

78+ , _mugWebPropertyId :: !Text

79+ , _mugUserIP :: !(Maybe Text)

8080 , _mugCustomDataSourceId :: !Text

81− , _mugAccountId :: !Text

82− , _mugKey :: !(Maybe Key)

83− , _mugOAuthToken :: !(Maybe OAuthToken)

84− , _mugUploadId :: !Text

85− , _mugFields :: !(Maybe Text)

81+ , _mugAccountId :: !Text

82+ , _mugKey :: !(Maybe Key)

83+ , _mugOAuthToken :: !(Maybe OAuthToken)

84+ , _mugUploadId :: !Text

85+ , _mugFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementUploadsGet'

114114 -> Text -- ^ 'accountId'

115115 -> Text -- ^ 'uploadId'

116116 -> ManagementUploadsGet'

117−managementUploadsGet' pMugWebPropertyId_ pMugCustomDataSourceId_ pMugAccountId_ pMugUploadId_ =

117+managementUploadsGet' pMugWebPropertyId_ pMugCustomDataSourceId_ pMugAccountId_ pMugUploadId_ =

118118 ManagementUploadsGet'

119119 { _mugQuotaUser = Nothing

120120 , _mugPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/List.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.Uploads.List

4646 , mulFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementUploadsList@ which the

5353-- 'ManagementUploadsList'' request conforms to.

@@ -75,17 +75,17 @@ type ManagementUploadsListResource =

7575--

7676-- /See:/ 'managementUploadsList'' smart constructor.

7777data ManagementUploadsList' = ManagementUploadsList'

78− { _mulQuotaUser :: !(Maybe Text)

79− , _mulPrettyPrint :: !Bool

80− , _mulWebPropertyId :: !Text

81− , _mulUserIP :: !(Maybe Text)

78+ { _mulQuotaUser :: !(Maybe Text)

79+ , _mulPrettyPrint :: !Bool

80+ , _mulWebPropertyId :: !Text

81+ , _mulUserIP :: !(Maybe Text)

8282 , _mulCustomDataSourceId :: !Text

83− , _mulAccountId :: !Text

84− , _mulKey :: !(Maybe Key)

85− , _mulOAuthToken :: !(Maybe OAuthToken)

86− , _mulStartIndex :: !(Maybe Int32)

87− , _mulMaxResults :: !(Maybe Int32)

88− , _mulFields :: !(Maybe Text)

83+ , _mulAccountId :: !Text

84+ , _mulKey :: !(Maybe Key)

85+ , _mulOAuthToken :: !(Maybe OAuthToken)

86+ , _mulStartIndex :: !(Maybe Int32)

87+ , _mulMaxResults :: !(Maybe Int32)

88+ , _mulFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ managementUploadsList'

118118 -> Text -- ^ 'customDataSourceId'

119119 -> Text -- ^ 'accountId'

120120 -> ManagementUploadsList'

121−managementUploadsList' pMulWebPropertyId_ pMulCustomDataSourceId_ pMulAccountId_ =

121+managementUploadsList' pMulWebPropertyId_ pMulCustomDataSourceId_ pMulAccountId_ =

122122 ManagementUploadsList'

123123 { _mulQuotaUser = Nothing

124124 , _mulPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.Uploads.UploadData

4545 , muudFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementUploadsUploadData@ which the

5252-- 'ManagementUploadsUploadData'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementUploadsUploadDataResource =

7373--

7474-- /See:/ 'managementUploadsUploadData'' smart constructor.

7575data ManagementUploadsUploadData' = ManagementUploadsUploadData'

76− { _muudQuotaUser :: !(Maybe Text)

77− , _muudPrettyPrint :: !Bool

78− , _muudWebPropertyId :: !Text

79− , _muudUserIP :: !(Maybe Text)

76+ { _muudQuotaUser :: !(Maybe Text)

77+ , _muudPrettyPrint :: !Bool

78+ , _muudWebPropertyId :: !Text

79+ , _muudUserIP :: !(Maybe Text)

8080 , _muudCustomDataSourceId :: !Text

81− , _muudMedia :: !Body

82− , _muudAccountId :: !Text

83− , _muudKey :: !(Maybe Key)

84− , _muudOAuthToken :: !(Maybe OAuthToken)

85− , _muudFields :: !(Maybe Text)

81+ , _muudMedia :: !Body

82+ , _muudAccountId :: !Text

83+ , _muudKey :: !(Maybe Key)

84+ , _muudOAuthToken :: !(Maybe OAuthToken)

85+ , _muudFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementUploadsUploadData'

114114 -> Body -- ^ 'media'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementUploadsUploadData'

117−managementUploadsUploadData' pMuudWebPropertyId_ pMuudCustomDataSourceId_ pMuudMedia_ pMuudAccountId_ =

117+managementUploadsUploadData' pMuudWebPropertyId_ pMuudCustomDataSourceId_ pMuudMedia_ pMuudAccountId_ =

118118 ManagementUploadsUploadData'

119119 { _muudQuotaUser = Nothing

120120 , _muudPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Analytics.Management.WebProperties.Get

4343 , mwpgFields

4444 ) where

4545

46−import Network.Google.Analytics.Types

47−import Network.Google.Prelude

46+import Network.Google.Analytics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @AnalyticsManagementWebPropertiesGet@ which the

5050-- 'ManagementWebPropertiesGet'' request conforms to.

@@ -66,14 +66,14 @@ type ManagementWebPropertiesGetResource =

6666--

6767-- /See:/ 'managementWebPropertiesGet'' smart constructor.

6868data ManagementWebPropertiesGet' = ManagementWebPropertiesGet'

69− { _mwpgQuotaUser :: !(Maybe Text)

70− , _mwpgPrettyPrint :: !Bool

69+ { _mwpgQuotaUser :: !(Maybe Text)

70+ , _mwpgPrettyPrint :: !Bool

7171 , _mwpgWebPropertyId :: !Text

72− , _mwpgUserIP :: !(Maybe Text)

73− , _mwpgAccountId :: !Text

74− , _mwpgKey :: !(Maybe Key)

75− , _mwpgOAuthToken :: !(Maybe OAuthToken)

76− , _mwpgFields :: !(Maybe Text)

72+ , _mwpgUserIP :: !(Maybe Text)

73+ , _mwpgAccountId :: !Text

74+ , _mwpgKey :: !(Maybe Key)

75+ , _mwpgOAuthToken :: !(Maybe OAuthToken)

76+ , _mwpgFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ managementWebPropertiesGet'

9999 :: Text -- ^ 'webPropertyId'

100100 -> Text -- ^ 'accountId'

101101 -> ManagementWebPropertiesGet'

102−managementWebPropertiesGet' pMwpgWebPropertyId_ pMwpgAccountId_ =

102+managementWebPropertiesGet' pMwpgWebPropertyId_ pMwpgAccountId_ =

103103 ManagementWebPropertiesGet'

104104 { _mwpgQuotaUser = Nothing

105105 , _mwpgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Insert.hs+10−10

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.WebProperties.Insert

4545 , mwpiFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementWebPropertiesInsert@ which the

5252-- 'ManagementWebPropertiesInsert'' request conforms to.

@@ -71,14 +71,14 @@ type ManagementWebPropertiesInsertResource =

7171--

7272-- /See:/ 'managementWebPropertiesInsert'' smart constructor.

7373data ManagementWebPropertiesInsert' = ManagementWebPropertiesInsert'

74− { _mwpiQuotaUser :: !(Maybe Text)

74+ { _mwpiQuotaUser :: !(Maybe Text)

7575 , _mwpiPrettyPrint :: !Bool

76− , _mwpiUserIP :: !(Maybe Text)

77− , _mwpiPayload :: !WebProperty

78− , _mwpiAccountId :: !Text

79− , _mwpiKey :: !(Maybe Key)

80− , _mwpiOAuthToken :: !(Maybe OAuthToken)

81− , _mwpiFields :: !(Maybe Text)

76+ , _mwpiUserIP :: !(Maybe Text)

77+ , _mwpiPayload :: !WebProperty

78+ , _mwpiAccountId :: !Text

79+ , _mwpiKey :: !(Maybe Key)

80+ , _mwpiOAuthToken :: !(Maybe OAuthToken)

81+ , _mwpiFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -104,7 +104,7 @@ managementWebPropertiesInsert'

104104 :: WebProperty -- ^ 'payload'

105105 -> Text -- ^ 'accountId'

106106 -> ManagementWebPropertiesInsert'

107−managementWebPropertiesInsert' pMwpiPayload_ pMwpiAccountId_ =

107+managementWebPropertiesInsert' pMwpiPayload_ pMwpiAccountId_ =

108108 ManagementWebPropertiesInsert'

109109 { _mwpiQuotaUser = Nothing

110110 , _mwpiPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebProperties.List

4444 , mwplFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertiesList@ which the

5151-- 'ManagementWebPropertiesList'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementWebPropertiesListResource =

6969--

7070-- /See:/ 'managementWebPropertiesList'' smart constructor.

7171data ManagementWebPropertiesList' = ManagementWebPropertiesList'

72− { _mwplQuotaUser :: !(Maybe Text)

72+ { _mwplQuotaUser :: !(Maybe Text)

7373 , _mwplPrettyPrint :: !Bool

74− , _mwplUserIP :: !(Maybe Text)

75− , _mwplAccountId :: !Text

76− , _mwplKey :: !(Maybe Key)

77− , _mwplOAuthToken :: !(Maybe OAuthToken)

78− , _mwplStartIndex :: !(Maybe Int32)

79− , _mwplMaxResults :: !(Maybe Int32)

80− , _mwplFields :: !(Maybe Text)

74+ , _mwplUserIP :: !(Maybe Text)

75+ , _mwplAccountId :: !Text

76+ , _mwplKey :: !(Maybe Key)

77+ , _mwplOAuthToken :: !(Maybe OAuthToken)

78+ , _mwplStartIndex :: !(Maybe Int32)

79+ , _mwplMaxResults :: !(Maybe Int32)

80+ , _mwplFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -104,7 +104,7 @@ data ManagementWebPropertiesList' = ManagementWebPropertiesList'

104104managementWebPropertiesList'

105105 :: Text -- ^ 'accountId'

106106 -> ManagementWebPropertiesList'

107−managementWebPropertiesList' pMwplAccountId_ =

107+managementWebPropertiesList' pMwplAccountId_ =

108108 ManagementWebPropertiesList'

109109 { _mwplQuotaUser = Nothing

110110 , _mwplPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Patch.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebProperties.Patch

4444 , mwppFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertiesPatch@ which the

5151-- 'ManagementWebPropertiesPatch'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementWebPropertiesPatchResource =

6969--

7070-- /See:/ 'managementWebPropertiesPatch'' smart constructor.

7171data ManagementWebPropertiesPatch' = ManagementWebPropertiesPatch'

72− { _mwppQuotaUser :: !(Maybe Text)

73− , _mwppPrettyPrint :: !Bool

72+ { _mwppQuotaUser :: !(Maybe Text)

73+ , _mwppPrettyPrint :: !Bool

7474 , _mwppWebPropertyId :: !Text

75− , _mwppUserIP :: !(Maybe Text)

76− , _mwppPayload :: !WebProperty

77− , _mwppAccountId :: !Text

78− , _mwppKey :: !(Maybe Key)

79− , _mwppOAuthToken :: !(Maybe OAuthToken)

80− , _mwppFields :: !(Maybe Text)

75+ , _mwppUserIP :: !(Maybe Text)

76+ , _mwppPayload :: !WebProperty

77+ , _mwppAccountId :: !Text

78+ , _mwppKey :: !(Maybe Key)

79+ , _mwppOAuthToken :: !(Maybe OAuthToken)

80+ , _mwppFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementWebPropertiesPatch'

106106 -> WebProperty -- ^ 'payload'

107107 -> Text -- ^ 'accountId'

108108 -> ManagementWebPropertiesPatch'

109−managementWebPropertiesPatch' pMwppWebPropertyId_ pMwppPayload_ pMwppAccountId_ =

109+managementWebPropertiesPatch' pMwppWebPropertyId_ pMwppPayload_ pMwppAccountId_ =

110110 ManagementWebPropertiesPatch'

111111 { _mwppQuotaUser = Nothing

112112 , _mwppPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebProperties.Update

4444 , mwpuFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertiesUpdate@ which the

5151-- 'ManagementWebPropertiesUpdate'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementWebPropertiesUpdateResource =

6969--

7070-- /See:/ 'managementWebPropertiesUpdate'' smart constructor.

7171data ManagementWebPropertiesUpdate' = ManagementWebPropertiesUpdate'

72− { _mwpuQuotaUser :: !(Maybe Text)

73− , _mwpuPrettyPrint :: !Bool

72+ { _mwpuQuotaUser :: !(Maybe Text)

73+ , _mwpuPrettyPrint :: !Bool

7474 , _mwpuWebPropertyId :: !Text

75− , _mwpuUserIP :: !(Maybe Text)

76− , _mwpuPayload :: !WebProperty

77− , _mwpuAccountId :: !Text

78− , _mwpuKey :: !(Maybe Key)

79− , _mwpuOAuthToken :: !(Maybe OAuthToken)

80− , _mwpuFields :: !(Maybe Text)

75+ , _mwpuUserIP :: !(Maybe Text)

76+ , _mwpuPayload :: !WebProperty

77+ , _mwpuAccountId :: !Text

78+ , _mwpuKey :: !(Maybe Key)

79+ , _mwpuOAuthToken :: !(Maybe OAuthToken)

80+ , _mwpuFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementWebPropertiesUpdate'

106106 -> WebProperty -- ^ 'payload'

107107 -> Text -- ^ 'accountId'

108108 -> ManagementWebPropertiesUpdate'

109−managementWebPropertiesUpdate' pMwpuWebPropertyId_ pMwpuPayload_ pMwpuAccountId_ =

109+managementWebPropertiesUpdate' pMwpuWebPropertyId_ pMwpuPayload_ pMwpuAccountId_ =

110110 ManagementWebPropertiesUpdate'

111111 { _mwpuQuotaUser = Nothing

112112 , _mwpuPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Delete.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Dele

4444 , mwpawldFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksDelete@ which the

5151-- 'ManagementWebPropertyAdWordsLinksDelete'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementWebPropertyAdWordsLinksDeleteResource

7070--

7171-- /See:/ 'managementWebPropertyAdWordsLinksDelete'' smart constructor.

7272data ManagementWebPropertyAdWordsLinksDelete' = ManagementWebPropertyAdWordsLinksDelete'

73− { _mwpawldQuotaUser :: !(Maybe Text)

74− , _mwpawldPrettyPrint :: !Bool

75− , _mwpawldWebPropertyId :: !Text

76− , _mwpawldUserIP :: !(Maybe Text)

77− , _mwpawldAccountId :: !Text

78− , _mwpawldKey :: !(Maybe Key)

73+ { _mwpawldQuotaUser :: !(Maybe Text)

74+ , _mwpawldPrettyPrint :: !Bool

75+ , _mwpawldWebPropertyId :: !Text

76+ , _mwpawldUserIP :: !(Maybe Text)

77+ , _mwpawldAccountId :: !Text

78+ , _mwpawldKey :: !(Maybe Key)

7979 , _mwpawldWebPropertyAdWordsLinkId :: !Text

80− , _mwpawldOAuthToken :: !(Maybe OAuthToken)

81− , _mwpawldFields :: !(Maybe Text)

80+ , _mwpawldOAuthToken :: !(Maybe OAuthToken)

81+ , _mwpawldFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementWebPropertyAdWordsLinksDelete'

107107 -> Text -- ^ 'accountId'

108108 -> Text -- ^ 'webPropertyAdWordsLinkId'

109109 -> ManagementWebPropertyAdWordsLinksDelete'

110−managementWebPropertyAdWordsLinksDelete' pMwpawldWebPropertyId_ pMwpawldAccountId_ pMwpawldWebPropertyAdWordsLinkId_ =

110+managementWebPropertyAdWordsLinksDelete' pMwpawldWebPropertyId_ pMwpawldAccountId_ pMwpawldWebPropertyAdWordsLinkId_ =

111111 ManagementWebPropertyAdWordsLinksDelete'

112112 { _mwpawldQuotaUser = Nothing

113113 , _mwpawldPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Get

4444 , mwpawlgFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksGet@ which the

5151-- 'ManagementWebPropertyAdWordsLinksGet'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementWebPropertyAdWordsLinksGetResource =

7070--

7171-- /See:/ 'managementWebPropertyAdWordsLinksGet'' smart constructor.

7272data ManagementWebPropertyAdWordsLinksGet' = ManagementWebPropertyAdWordsLinksGet'

73− { _mwpawlgQuotaUser :: !(Maybe Text)

74− , _mwpawlgPrettyPrint :: !Bool

75− , _mwpawlgWebPropertyId :: !Text

76− , _mwpawlgUserIP :: !(Maybe Text)

77− , _mwpawlgAccountId :: !Text

78− , _mwpawlgKey :: !(Maybe Key)

73+ { _mwpawlgQuotaUser :: !(Maybe Text)

74+ , _mwpawlgPrettyPrint :: !Bool

75+ , _mwpawlgWebPropertyId :: !Text

76+ , _mwpawlgUserIP :: !(Maybe Text)

77+ , _mwpawlgAccountId :: !Text

78+ , _mwpawlgKey :: !(Maybe Key)

7979 , _mwpawlgWebPropertyAdWordsLinkId :: !Text

80− , _mwpawlgOAuthToken :: !(Maybe OAuthToken)

81− , _mwpawlgFields :: !(Maybe Text)

80+ , _mwpawlgOAuthToken :: !(Maybe OAuthToken)

81+ , _mwpawlgFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementWebPropertyAdWordsLinksGet'

107107 -> Text -- ^ 'accountId'

108108 -> Text -- ^ 'webPropertyAdWordsLinkId'

109109 -> ManagementWebPropertyAdWordsLinksGet'

110−managementWebPropertyAdWordsLinksGet' pMwpawlgWebPropertyId_ pMwpawlgAccountId_ pMwpawlgWebPropertyAdWordsLinkId_ =

110+managementWebPropertyAdWordsLinksGet' pMwpawlgWebPropertyId_ pMwpawlgAccountId_ pMwpawlgWebPropertyAdWordsLinkId_ =

111111 ManagementWebPropertyAdWordsLinksGet'

112112 { _mwpawlgQuotaUser = Nothing

113113 , _mwpawlgPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Inse

4444 , mwpawliFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksInsert@ which the

5151-- 'ManagementWebPropertyAdWordsLinksInsert'' request conforms to.

@@ -71,15 +71,15 @@ type ManagementWebPropertyAdWordsLinksInsertResource

7171--

7272-- /See:/ 'managementWebPropertyAdWordsLinksInsert'' smart constructor.

7373data ManagementWebPropertyAdWordsLinksInsert' = ManagementWebPropertyAdWordsLinksInsert'

74− { _mwpawliQuotaUser :: !(Maybe Text)

75− , _mwpawliPrettyPrint :: !Bool

74+ { _mwpawliQuotaUser :: !(Maybe Text)

75+ , _mwpawliPrettyPrint :: !Bool

7676 , _mwpawliWebPropertyId :: !Text

77− , _mwpawliUserIP :: !(Maybe Text)

78− , _mwpawliPayload :: !EntityAdWordsLink

79− , _mwpawliAccountId :: !Text

80− , _mwpawliKey :: !(Maybe Key)

81− , _mwpawliOAuthToken :: !(Maybe OAuthToken)

82− , _mwpawliFields :: !(Maybe Text)

77+ , _mwpawliUserIP :: !(Maybe Text)

78+ , _mwpawliPayload :: !EntityAdWordsLink

79+ , _mwpawliAccountId :: !Text

80+ , _mwpawliKey :: !(Maybe Key)

81+ , _mwpawliOAuthToken :: !(Maybe OAuthToken)

82+ , _mwpawliFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -108,7 +108,7 @@ managementWebPropertyAdWordsLinksInsert'

108108 -> EntityAdWordsLink -- ^ 'payload'

109109 -> Text -- ^ 'accountId'

110110 -> ManagementWebPropertyAdWordsLinksInsert'

111−managementWebPropertyAdWordsLinksInsert' pMwpawliWebPropertyId_ pMwpawliPayload_ pMwpawliAccountId_ =

111+managementWebPropertyAdWordsLinksInsert' pMwpawliWebPropertyId_ pMwpawliPayload_ pMwpawliAccountId_ =

112112 ManagementWebPropertyAdWordsLinksInsert'

113113 { _mwpawliQuotaUser = Nothing

114114 , _mwpawliPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.List

4545 , mwpawllFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksList@ which the

5252-- 'ManagementWebPropertyAdWordsLinksList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementWebPropertyAdWordsLinksListResource =

7272--

7373-- /See:/ 'managementWebPropertyAdWordsLinksList'' smart constructor.

7474data ManagementWebPropertyAdWordsLinksList' = ManagementWebPropertyAdWordsLinksList'

75− { _mwpawllQuotaUser :: !(Maybe Text)

76− , _mwpawllPrettyPrint :: !Bool

75+ { _mwpawllQuotaUser :: !(Maybe Text)

76+ , _mwpawllPrettyPrint :: !Bool

7777 , _mwpawllWebPropertyId :: !Text

78− , _mwpawllUserIP :: !(Maybe Text)

79− , _mwpawllAccountId :: !Text

80− , _mwpawllKey :: !(Maybe Key)

81− , _mwpawllOAuthToken :: !(Maybe OAuthToken)

82− , _mwpawllStartIndex :: !(Maybe Int32)

83− , _mwpawllMaxResults :: !(Maybe Int32)

84− , _mwpawllFields :: !(Maybe Text)

78+ , _mwpawllUserIP :: !(Maybe Text)

79+ , _mwpawllAccountId :: !Text

80+ , _mwpawllKey :: !(Maybe Key)

81+ , _mwpawllOAuthToken :: !(Maybe OAuthToken)

82+ , _mwpawllStartIndex :: !(Maybe Int32)

83+ , _mwpawllMaxResults :: !(Maybe Int32)

84+ , _mwpawllFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementWebPropertyAdWordsLinksList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementWebPropertyAdWordsLinksList'

114−managementWebPropertyAdWordsLinksList' pMwpawllWebPropertyId_ pMwpawllAccountId_ =

114+managementWebPropertyAdWordsLinksList' pMwpawllWebPropertyId_ pMwpawllAccountId_ =

115115 ManagementWebPropertyAdWordsLinksList'

116116 { _mwpawllQuotaUser = Nothing

117117 , _mwpawllPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Patch.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Patc

4646 , mwpawlpFields

4747 ) where

4848

49−import Network.Google.Analytics.Types

50−import Network.Google.Prelude

49+import Network.Google.Analytics.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksPatch@ which the

5353-- 'ManagementWebPropertyAdWordsLinksPatch'' request conforms to.

@@ -74,16 +74,16 @@ type ManagementWebPropertyAdWordsLinksPatchResource =

7474--

7575-- /See:/ 'managementWebPropertyAdWordsLinksPatch'' smart constructor.

7676data ManagementWebPropertyAdWordsLinksPatch' = ManagementWebPropertyAdWordsLinksPatch'

77− { _mwpawlpQuotaUser :: !(Maybe Text)

78− , _mwpawlpPrettyPrint :: !Bool

79− , _mwpawlpWebPropertyId :: !Text

80− , _mwpawlpUserIP :: !(Maybe Text)

81− , _mwpawlpPayload :: !EntityAdWordsLink

82− , _mwpawlpAccountId :: !Text

83− , _mwpawlpKey :: !(Maybe Key)

77+ { _mwpawlpQuotaUser :: !(Maybe Text)

78+ , _mwpawlpPrettyPrint :: !Bool

79+ , _mwpawlpWebPropertyId :: !Text

80+ , _mwpawlpUserIP :: !(Maybe Text)

81+ , _mwpawlpPayload :: !EntityAdWordsLink

82+ , _mwpawlpAccountId :: !Text

83+ , _mwpawlpKey :: !(Maybe Key)

8484 , _mwpawlpWebPropertyAdWordsLinkId :: !Text

85− , _mwpawlpOAuthToken :: !(Maybe OAuthToken)

86− , _mwpawlpFields :: !(Maybe Text)

85+ , _mwpawlpOAuthToken :: !(Maybe OAuthToken)

86+ , _mwpawlpFields :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

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

@@ -115,7 +115,7 @@ managementWebPropertyAdWordsLinksPatch'

115115 -> Text -- ^ 'accountId'

116116 -> Text -- ^ 'webPropertyAdWordsLinkId'

117117 -> ManagementWebPropertyAdWordsLinksPatch'

118−managementWebPropertyAdWordsLinksPatch' pMwpawlpWebPropertyId_ pMwpawlpPayload_ pMwpawlpAccountId_ pMwpawlpWebPropertyAdWordsLinkId_ =

118+managementWebPropertyAdWordsLinksPatch' pMwpawlpWebPropertyId_ pMwpawlpPayload_ pMwpawlpAccountId_ pMwpawlpWebPropertyAdWordsLinkId_ =

119119 ManagementWebPropertyAdWordsLinksPatch'

120120 { _mwpawlpQuotaUser = Nothing

121121 , _mwpawlpPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Update.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyAdWordsLinks.Upda

4545 , mwpawluFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementWebPropertyAdWordsLinksUpdate@ which the

5252-- 'ManagementWebPropertyAdWordsLinksUpdate'' request conforms to.

@@ -73,16 +73,16 @@ type ManagementWebPropertyAdWordsLinksUpdateResource

7373--

7474-- /See:/ 'managementWebPropertyAdWordsLinksUpdate'' smart constructor.

7575data ManagementWebPropertyAdWordsLinksUpdate' = ManagementWebPropertyAdWordsLinksUpdate'

76− { _mwpawluQuotaUser :: !(Maybe Text)

77− , _mwpawluPrettyPrint :: !Bool

78− , _mwpawluWebPropertyId :: !Text

79− , _mwpawluUserIP :: !(Maybe Text)

80− , _mwpawluPayload :: !EntityAdWordsLink

81− , _mwpawluAccountId :: !Text

82− , _mwpawluKey :: !(Maybe Key)

76+ { _mwpawluQuotaUser :: !(Maybe Text)

77+ , _mwpawluPrettyPrint :: !Bool

78+ , _mwpawluWebPropertyId :: !Text

79+ , _mwpawluUserIP :: !(Maybe Text)

80+ , _mwpawluPayload :: !EntityAdWordsLink

81+ , _mwpawluAccountId :: !Text

82+ , _mwpawluKey :: !(Maybe Key)

8383 , _mwpawluWebPropertyAdWordsLinkId :: !Text

84− , _mwpawluOAuthToken :: !(Maybe OAuthToken)

85− , _mwpawluFields :: !(Maybe Text)

84+ , _mwpawluOAuthToken :: !(Maybe OAuthToken)

85+ , _mwpawluFields :: !(Maybe Text)

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

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

@@ -114,7 +114,7 @@ managementWebPropertyAdWordsLinksUpdate'

114114 -> Text -- ^ 'accountId'

115115 -> Text -- ^ 'webPropertyAdWordsLinkId'

116116 -> ManagementWebPropertyAdWordsLinksUpdate'

117−managementWebPropertyAdWordsLinksUpdate' pMwpawluWebPropertyId_ pMwpawluPayload_ pMwpawluAccountId_ pMwpawluWebPropertyAdWordsLinkId_ =

117+managementWebPropertyAdWordsLinksUpdate' pMwpawluWebPropertyId_ pMwpawluPayload_ pMwpawluAccountId_ pMwpawluWebPropertyAdWordsLinkId_ =

118118 ManagementWebPropertyAdWordsLinksUpdate'

119119 { _mwpawluQuotaUser = Nothing

120120 , _mwpawluPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Delete.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Delete

4444 , mwpuldFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertyUserLinksDelete@ which the

5151-- 'ManagementWebPropertyUserLinksDelete'' request conforms to.

@@ -69,15 +69,15 @@ type ManagementWebPropertyUserLinksDeleteResource =

6969--

7070-- /See:/ 'managementWebPropertyUserLinksDelete'' smart constructor.

7171data ManagementWebPropertyUserLinksDelete' = ManagementWebPropertyUserLinksDelete'

72− { _mwpuldQuotaUser :: !(Maybe Text)

73− , _mwpuldPrettyPrint :: !Bool

72+ { _mwpuldQuotaUser :: !(Maybe Text)

73+ , _mwpuldPrettyPrint :: !Bool

7474 , _mwpuldWebPropertyId :: !Text

75− , _mwpuldUserIP :: !(Maybe Text)

76− , _mwpuldAccountId :: !Text

77− , _mwpuldKey :: !(Maybe Key)

78− , _mwpuldLinkId :: !Text

79− , _mwpuldOAuthToken :: !(Maybe OAuthToken)

80− , _mwpuldFields :: !(Maybe Text)

75+ , _mwpuldUserIP :: !(Maybe Text)

76+ , _mwpuldAccountId :: !Text

77+ , _mwpuldKey :: !(Maybe Key)

78+ , _mwpuldLinkId :: !Text

79+ , _mwpuldOAuthToken :: !(Maybe OAuthToken)

80+ , _mwpuldFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ managementWebPropertyUserLinksDelete'

106106 -> Text -- ^ 'accountId'

107107 -> Text -- ^ 'linkId'

108108 -> ManagementWebPropertyUserLinksDelete'

109−managementWebPropertyUserLinksDelete' pMwpuldWebPropertyId_ pMwpuldAccountId_ pMwpuldLinkId_ =

109+managementWebPropertyUserLinksDelete' pMwpuldWebPropertyId_ pMwpuldAccountId_ pMwpuldLinkId_ =

110110 ManagementWebPropertyUserLinksDelete'

111111 { _mwpuldQuotaUser = Nothing

112112 , _mwpuldPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Insert

4444 , mwpuliFields

4545 ) where

4646

47−import Network.Google.Analytics.Types

48−import Network.Google.Prelude

47+import Network.Google.Analytics.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @AnalyticsManagementWebPropertyUserLinksInsert@ which the

5151-- 'ManagementWebPropertyUserLinksInsert'' request conforms to.

@@ -70,15 +70,15 @@ type ManagementWebPropertyUserLinksInsertResource =

7070--

7171-- /See:/ 'managementWebPropertyUserLinksInsert'' smart constructor.

7272data ManagementWebPropertyUserLinksInsert' = ManagementWebPropertyUserLinksInsert'

73− { _mwpuliQuotaUser :: !(Maybe Text)

74− , _mwpuliPrettyPrint :: !Bool

73+ { _mwpuliQuotaUser :: !(Maybe Text)

74+ , _mwpuliPrettyPrint :: !Bool

7575 , _mwpuliWebPropertyId :: !Text

76− , _mwpuliUserIP :: !(Maybe Text)

77− , _mwpuliPayload :: !EntityUserLink

78− , _mwpuliAccountId :: !Text

79− , _mwpuliKey :: !(Maybe Key)

80− , _mwpuliOAuthToken :: !(Maybe OAuthToken)

81− , _mwpuliFields :: !(Maybe Text)

76+ , _mwpuliUserIP :: !(Maybe Text)

77+ , _mwpuliPayload :: !EntityUserLink

78+ , _mwpuliAccountId :: !Text

79+ , _mwpuliKey :: !(Maybe Key)

80+ , _mwpuliOAuthToken :: !(Maybe OAuthToken)

81+ , _mwpuliFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ managementWebPropertyUserLinksInsert'

107107 -> EntityUserLink -- ^ 'payload'

108108 -> Text -- ^ 'accountId'

109109 -> ManagementWebPropertyUserLinksInsert'

110−managementWebPropertyUserLinksInsert' pMwpuliWebPropertyId_ pMwpuliPayload_ pMwpuliAccountId_ =

110+managementWebPropertyUserLinksInsert' pMwpuliWebPropertyId_ pMwpuliPayload_ pMwpuliAccountId_ =

111111 ManagementWebPropertyUserLinksInsert'

112112 { _mwpuliQuotaUser = Nothing

113113 , _mwpuliPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.List

4545 , mwpullFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementWebPropertyUserLinksList@ which the

5252-- 'ManagementWebPropertyUserLinksList'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementWebPropertyUserLinksListResource =

7272--

7373-- /See:/ 'managementWebPropertyUserLinksList'' smart constructor.

7474data ManagementWebPropertyUserLinksList' = ManagementWebPropertyUserLinksList'

75− { _mwpullQuotaUser :: !(Maybe Text)

76− , _mwpullPrettyPrint :: !Bool

75+ { _mwpullQuotaUser :: !(Maybe Text)

76+ , _mwpullPrettyPrint :: !Bool

7777 , _mwpullWebPropertyId :: !Text

78− , _mwpullUserIP :: !(Maybe Text)

79− , _mwpullAccountId :: !Text

80− , _mwpullKey :: !(Maybe Key)

81− , _mwpullOAuthToken :: !(Maybe OAuthToken)

82− , _mwpullStartIndex :: !(Maybe Int32)

83− , _mwpullMaxResults :: !(Maybe Int32)

84− , _mwpullFields :: !(Maybe Text)

78+ , _mwpullUserIP :: !(Maybe Text)

79+ , _mwpullAccountId :: !Text

80+ , _mwpullKey :: !(Maybe Key)

81+ , _mwpullOAuthToken :: !(Maybe OAuthToken)

82+ , _mwpullStartIndex :: !(Maybe Int32)

83+ , _mwpullMaxResults :: !(Maybe Int32)

84+ , _mwpullFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -111,7 +111,7 @@ managementWebPropertyUserLinksList'

111111 :: Text -- ^ 'webPropertyId'

112112 -> Text -- ^ 'accountId'

113113 -> ManagementWebPropertyUserLinksList'

114−managementWebPropertyUserLinksList' pMwpullWebPropertyId_ pMwpullAccountId_ =

114+managementWebPropertyUserLinksList' pMwpullWebPropertyId_ pMwpullAccountId_ =

115115 ManagementWebPropertyUserLinksList'

116116 { _mwpullQuotaUser = Nothing

117117 , _mwpullPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Update.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Analytics.Management.WebPropertyUserLinks.Update

4545 , mwpuluFields

4646 ) where

4747

48−import Network.Google.Analytics.Types

49−import Network.Google.Prelude

48+import Network.Google.Analytics.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @AnalyticsManagementWebPropertyUserLinksUpdate@ which the

5252-- 'ManagementWebPropertyUserLinksUpdate'' request conforms to.

@@ -72,16 +72,16 @@ type ManagementWebPropertyUserLinksUpdateResource =

7272--

7373-- /See:/ 'managementWebPropertyUserLinksUpdate'' smart constructor.

7474data ManagementWebPropertyUserLinksUpdate' = ManagementWebPropertyUserLinksUpdate'

75− { _mwpuluQuotaUser :: !(Maybe Text)

76− , _mwpuluPrettyPrint :: !Bool

75+ { _mwpuluQuotaUser :: !(Maybe Text)

76+ , _mwpuluPrettyPrint :: !Bool

7777 , _mwpuluWebPropertyId :: !Text

78− , _mwpuluUserIP :: !(Maybe Text)

79− , _mwpuluPayload :: !EntityUserLink

80− , _mwpuluAccountId :: !Text

81− , _mwpuluKey :: !(Maybe Key)

82− , _mwpuluLinkId :: !Text

83− , _mwpuluOAuthToken :: !(Maybe OAuthToken)

84− , _mwpuluFields :: !(Maybe Text)

78+ , _mwpuluUserIP :: !(Maybe Text)

79+ , _mwpuluPayload :: !EntityUserLink

80+ , _mwpuluAccountId :: !Text

81+ , _mwpuluKey :: !(Maybe Key)

82+ , _mwpuluLinkId :: !Text

83+ , _mwpuluOAuthToken :: !(Maybe OAuthToken)

84+ , _mwpuluFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ managementWebPropertyUserLinksUpdate'

113113 -> Text -- ^ 'accountId'

114114 -> Text -- ^ 'linkId'

115115 -> ManagementWebPropertyUserLinksUpdate'

116−managementWebPropertyUserLinksUpdate' pMwpuluWebPropertyId_ pMwpuluPayload_ pMwpuluAccountId_ pMwpuluLinkId_ =

116+managementWebPropertyUserLinksUpdate' pMwpuluWebPropertyId_ pMwpuluPayload_ pMwpuluAccountId_ pMwpuluLinkId_ =

117117 ManagementWebPropertyUserLinksUpdate'

118118 { _mwpuluQuotaUser = Nothing

119119 , _mwpuluPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Metadata/Columns/List.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.Analytics.Metadata.Columns.List

4242 , mclFields

4343 ) where

4444

45−import Network.Google.Analytics.Types

46−import Network.Google.Prelude

45+import Network.Google.Analytics.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AnalyticsMetadataColumnsList@ which the

4949-- 'MetadataColumnsList'' request conforms to.

@@ -63,13 +63,13 @@ type MetadataColumnsListResource =

6363--

6464-- /See:/ 'metadataColumnsList'' smart constructor.

6565data MetadataColumnsList' = MetadataColumnsList'

66− { _mclQuotaUser :: !(Maybe Text)

66+ { _mclQuotaUser :: !(Maybe Text)

6767 , _mclPrettyPrint :: !Bool

68− , _mclUserIP :: !(Maybe Text)

69− , _mclKey :: !(Maybe Key)

70− , _mclOAuthToken :: !(Maybe OAuthToken)

71− , _mclReportType :: !Text

72− , _mclFields :: !(Maybe Text)

68+ , _mclUserIP :: !(Maybe Text)

69+ , _mclKey :: !(Maybe Key)

70+ , _mclOAuthToken :: !(Maybe OAuthToken)

71+ , _mclReportType :: !Text

72+ , _mclFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data MetadataColumnsList' = MetadataColumnsList'

9292metadataColumnsList'

9393 :: Text -- ^ 'reportType'

9494 -> MetadataColumnsList'

95−metadataColumnsList' pMclReportType_ =

95+metadataColumnsList' pMclReportType_ =

9696 MetadataColumnsList'

9797 { _mclQuotaUser = Nothing

9898 , _mclPrettyPrint = False

gogol-analytics/gen/Network/Google/Resource/Analytics/Provisioning/CreateAccountTicket.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.Analytics.Provisioning.CreateAccountTicket

4242 , pcatFields

4343 ) where

4444

45−import Network.Google.Analytics.Types

46−import Network.Google.Prelude

45+import Network.Google.Analytics.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @AnalyticsProvisioningCreateAccountTicket@ which the

4949-- 'ProvisioningCreateAccountTicket'' request conforms to.

@@ -64,13 +64,13 @@ type ProvisioningCreateAccountTicketResource =

6464--

6565-- /See:/ 'provisioningCreateAccountTicket'' smart constructor.

6666data ProvisioningCreateAccountTicket' = ProvisioningCreateAccountTicket'

67− { _pcatQuotaUser :: !(Maybe Text)

67+ { _pcatQuotaUser :: !(Maybe Text)

6868 , _pcatPrettyPrint :: !Bool

69− , _pcatUserIP :: !(Maybe Text)

70− , _pcatPayload :: !AccountTicket

71− , _pcatKey :: !(Maybe Key)

72− , _pcatOAuthToken :: !(Maybe OAuthToken)

73− , _pcatFields :: !(Maybe Text)

69+ , _pcatUserIP :: !(Maybe Text)

70+ , _pcatPayload :: !AccountTicket

71+ , _pcatKey :: !(Maybe Key)

72+ , _pcatOAuthToken :: !(Maybe OAuthToken)

73+ , _pcatFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data ProvisioningCreateAccountTicket' = ProvisioningCreateAccountTicket'

9393provisioningCreateAccountTicket'

9494 :: AccountTicket -- ^ 'payload'

9595 -> ProvisioningCreateAccountTicket'

96−provisioningCreateAccountTicket' pPcatPayload_ =

96+provisioningCreateAccountTicket' pPcatPayload_ =

9797 ProvisioningCreateAccountTicket'

9898 { _pcatQuotaUser = Nothing

9999 , _pcatPrettyPrint = False

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+2−2

@@ -39,7 +39,7 @@ instance FromJSON InAppProductListings where

3939 (\ o -> pure InAppProductListings)

4040

4141instance ToJSON InAppProductListings where

42− toJSON = const (Object mempty)

42+ toJSON = const emptyObject

4343

4444--

4545-- /See:/ 'inAppProductsUpdateResponse' smart constructor.

@@ -1271,7 +1271,7 @@ instance FromJSON InAppProductPrices where

12711271 (\ o -> pure InAppProductPrices)

12721272

12731273instance ToJSON InAppProductPrices where

1274− toJSON = const (Object mempty)

1274+ toJSON = const emptyObject

12751275

12761276--

12771277-- /See:/ 'inAppProductsBatchRequest' smart constructor.

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+9−9

@@ -140,7 +140,7 @@ instance FromJSON OperationSchema where

140140 (\ o -> pure OperationSchema)

141141

142142instance ToJSON OperationSchema where

143− toJSON = const (Object mempty)

143+ toJSON = const emptyObject

144144

145145-- | Configuration for traffic splitting for versions within a single module.

146146-- Traffic splitting allows traffic directed to the module to be assigned

@@ -686,7 +686,7 @@ instance FromJSON VersionEnvVariables where

686686 (\ o -> pure VersionEnvVariables)

687687

688688instance ToJSON VersionEnvVariables where

689− toJSON = const (Object mempty)

689+ toJSON = const emptyObject

690690

691691-- | An Application contains the top-level configuration of an App Engine

692692-- application.

@@ -799,7 +799,7 @@ instance FromJSON VersionBetaSettings where

799799 (\ o -> pure VersionBetaSettings)

800800

801801instance ToJSON VersionBetaSettings where

802− toJSON = const (Object mempty)

802+ toJSON = const emptyObject

803803

804804-- | This resource represents a long-running operation that is the result of

805805-- a network API call.

@@ -976,7 +976,7 @@ instance FromJSON StaticDirectoryHandlerHTTPHeaders

976976

977977instance ToJSON StaticDirectoryHandlerHTTPHeaders

978978 where

979− toJSON = const (Object mempty)

979+ toJSON = const emptyObject

980980

981981-- | Response message for \`Versions.ListVersions\`.

982982--

@@ -1340,7 +1340,7 @@ instance FromJSON StatusDetailsItem where

13401340 (\ o -> pure StatusDetailsItem)

13411341

13421342instance ToJSON StatusDetailsItem where

1343− toJSON = const (Object mempty)

1343+ toJSON = const emptyObject

13441344

13451345-- | Used to specify extra network settings (for VM runtimes only).

13461346--

@@ -1425,7 +1425,7 @@ instance FromJSON StaticFilesHandlerHTTPHeaders where

14251425 (\ o -> pure StaticFilesHandlerHTTPHeaders)

14261426

14271427instance ToJSON StaticFilesHandlerHTTPHeaders where

1428− toJSON = const (Object mempty)

1428+ toJSON = const emptyObject

14291429

14301430-- | Used to specify how many machine resources an app version needs.

14311431--

@@ -1503,7 +1503,7 @@ instance FromJSON DeploymentFiles where

15031503 (\ o -> pure DeploymentFiles)

15041504

15051505instance ToJSON DeploymentFiles where

1506− toJSON = const (Object mempty)

1506+ toJSON = const emptyObject

15071507

15081508-- | Target scaling by CPU usage.

15091509--

@@ -1582,7 +1582,7 @@ instance FromJSON TrafficSplitAllocations where

15821582 (\ o -> pure TrafficSplitAllocations)

15831583

15841584instance ToJSON TrafficSplitAllocations where

1585− toJSON = const (Object mempty)

1585+ toJSON = const emptyObject

15861586

15871587-- | A module with manual scaling runs continuously, allowing you to perform

15881588-- complex initialization and rely on the state of its memory over time.

@@ -2452,7 +2452,7 @@ instance FromJSON OperationResponse where

24522452 (\ o -> pure OperationResponse)

24532453

24542454instance ToJSON OperationResponse where

2455− toJSON = const (Object mempty)

2455+ toJSON = const emptyObject

24562456

24572457-- | A Docker (container) image which should be used to start the

24582458-- application.

gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+8−8

@@ -887,7 +887,7 @@ instance FromJSON ColorsEvent where

887887 = withObject "ColorsEvent" (\ o -> pure ColorsEvent)

888888

889889instance ToJSON ColorsEvent where

890− toJSON = const (Object mempty)

890+ toJSON = const emptyObject

891891

892892--

893893-- /See:/ 'settings' smart constructor.

@@ -1558,7 +1558,7 @@ instance FromJSON FreeBusyResponseGroups where

15581558 (\ o -> pure FreeBusyResponseGroups)

15591559

15601560instance ToJSON FreeBusyResponseGroups where

1561− toJSON = const (Object mempty)

1561+ toJSON = const emptyObject

15621562

15631563-- | Information about the event\'s reminders for the authenticated user.

15641564--

@@ -1634,7 +1634,7 @@ instance FromJSON ColorsCalendar where

16341634 (\ o -> pure ColorsCalendar)

16351635

16361636instance ToJSON ColorsCalendar where

1637− toJSON = const (Object mempty)

1637+ toJSON = const emptyObject

16381638

16391639--

16401640-- /See:/ 'calendarNotification' smart constructor.

@@ -1711,7 +1711,7 @@ instance FromJSON EventExtendedPropertiesPrivate

17111711 (\ o -> pure EventExtendedPropertiesPrivate)

17121712

17131713instance ToJSON EventExtendedPropertiesPrivate where

1714− toJSON = const (Object mempty)

1714+ toJSON = const emptyObject

17151715

17161716-- | Additional parameters controlling delivery channel behavior. Optional.

17171717--

@@ -1732,7 +1732,7 @@ instance FromJSON ChannelParams where

17321732 (\ o -> pure ChannelParams)

17331733

17341734instance ToJSON ChannelParams where

1735− toJSON = const (Object mempty)

1735+ toJSON = const emptyObject

17361736

17371737--

17381738-- /See:/ 'events' smart constructor.

@@ -2673,7 +2673,7 @@ instance FromJSON EventGadgetPreferences where

26732673 (\ o -> pure EventGadgetPreferences)

26742674

26752675instance ToJSON EventGadgetPreferences where

2676− toJSON = const (Object mempty)

2676+ toJSON = const emptyObject

26772677

26782678--

26792679-- /See:/ 'freeBusyRequest' smart constructor.

@@ -2875,7 +2875,7 @@ instance FromJSON EventExtendedPropertiesShared where

28752875 (\ o -> pure EventExtendedPropertiesShared)

28762876

28772877instance ToJSON EventExtendedPropertiesShared where

2878− toJSON = const (Object mempty)

2878+ toJSON = const emptyObject

28792879

28802880-- | List of free\/busy information for calendars.

28812881--

@@ -2896,7 +2896,7 @@ instance FromJSON FreeBusyResponseCalendars where

28962896 (\ o -> pure FreeBusyResponseCalendars)

28972897

28982898instance ToJSON FreeBusyResponseCalendars where

2899− toJSON = const (Object mempty)

2899+ toJSON = const emptyObject

29002900

29012901--

29022902-- /See:/ 'acl' smart constructor.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Patch.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Calendar.Calendars.Patch

4343 , cpFields

4444 ) where

4545

46−import Network.Google.AppsCalendar.Types

47−import Network.Google.Prelude

46+import Network.Google.AppsCalendar.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @CalendarCalendarsPatch@ which the

5050-- 'CalendarsPatch'' request conforms to.

@@ -64,14 +64,14 @@ type CalendarsPatchResource =

6464--

6565-- /See:/ 'calendarsPatch'' smart constructor.

6666data CalendarsPatch' = CalendarsPatch'

67− { _cpQuotaUser :: !(Maybe Text)

68− , _cpCalendarId :: !Text

67+ { _cpQuotaUser :: !(Maybe Text)

68+ , _cpCalendarId :: !Text

6969 , _cpPrettyPrint :: !Bool

70− , _cpUserIP :: !(Maybe Text)

71− , _cpPayload :: !Calendar

72− , _cpKey :: !(Maybe Key)

73− , _cpOAuthToken :: !(Maybe OAuthToken)

74− , _cpFields :: !(Maybe Text)

70+ , _cpUserIP :: !(Maybe Text)

71+ , _cpPayload :: !Calendar

72+ , _cpKey :: !(Maybe Key)

73+ , _cpOAuthToken :: !(Maybe OAuthToken)

74+ , _cpFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -97,7 +97,7 @@ calendarsPatch'

9797 :: Text -- ^ 'calendarId'

9898 -> Calendar -- ^ 'payload'

9999 -> CalendarsPatch'

100−calendarsPatch' pCpCalendarId_ pCpPayload_ =

100+calendarsPatch' pCpCalendarId_ pCpPayload_ =

101101 CalendarsPatch'

102102 { _cpQuotaUser = Nothing

103103 , _cpCalendarId = pCpCalendarId_

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+2−2

@@ -2845,7 +2845,7 @@ instance FromJSON JSONObject where

28452845 = withObject "JSONObject" (\ o -> pure JSONObject)

28462846

28472847instance ToJSON JSONObject where

2848− toJSON = const (Object mempty)

2848+ toJSON = const emptyObject

28492849

28502850--

28512851-- /See:/ 'jobConfigurationQuery' smart constructor.

@@ -3185,7 +3185,7 @@ instance FromJSON

31853185

31863186instance ToJSON JobConfigurationQueryTableDefinitions

31873187 where

3188− toJSON = const (Object mempty)

3188+ toJSON = const emptyObject

31893189

31903190--

31913191-- /See:/ 'tableCell' smart constructor.

gogol-blogger/gen/Network/Google/Blogger.hs+35−35

@@ -480,41 +480,41 @@ module Network.Google.Blogger

480480 , piiURL

481481 ) where

482482

483−import Network.Google.Blogger.Types

484−import Network.Google.Prelude

485−import Network.Google.Resource.Blogger.Blogs.Get

486−import Network.Google.Resource.Blogger.Blogs.GetByURL

487−import Network.Google.Resource.Blogger.Blogs.ListByUser

488−import Network.Google.Resource.Blogger.BlogUserInfos.Get

489−import Network.Google.Resource.Blogger.Comments.Approve

490−import Network.Google.Resource.Blogger.Comments.Delete

491−import Network.Google.Resource.Blogger.Comments.Get

492−import Network.Google.Resource.Blogger.Comments.List

493−import Network.Google.Resource.Blogger.Comments.ListByBlog

494−import Network.Google.Resource.Blogger.Comments.MarkAsSpam

495−import Network.Google.Resource.Blogger.Comments.RemoveContent

496−import Network.Google.Resource.Blogger.Pages.Delete

497−import Network.Google.Resource.Blogger.Pages.Get

498−import Network.Google.Resource.Blogger.Pages.Insert

499−import Network.Google.Resource.Blogger.Pages.List

500−import Network.Google.Resource.Blogger.Pages.Patch

501−import Network.Google.Resource.Blogger.Pages.Publish

502−import Network.Google.Resource.Blogger.Pages.Revert

503−import Network.Google.Resource.Blogger.Pages.Update

504−import Network.Google.Resource.Blogger.PageViews.Get

505−import Network.Google.Resource.Blogger.Posts.Delete

506−import Network.Google.Resource.Blogger.Posts.Get

507−import Network.Google.Resource.Blogger.Posts.GetByPath

508−import Network.Google.Resource.Blogger.Posts.Insert

509−import Network.Google.Resource.Blogger.Posts.List

510−import Network.Google.Resource.Blogger.Posts.Patch

511−import Network.Google.Resource.Blogger.Posts.Publish

512−import Network.Google.Resource.Blogger.Posts.Revert

513−import Network.Google.Resource.Blogger.Posts.Search

514−import Network.Google.Resource.Blogger.Posts.Update

515−import Network.Google.Resource.Blogger.PostUserInfos.Get

516−import Network.Google.Resource.Blogger.PostUserInfos.List

517−import Network.Google.Resource.Blogger.Users.Get

483+import Network.Google.Prelude

484+import Network.Google.Blogger.Types

485+import Network.Google.Resource.Blogger.BlogUserInfos.Get

486+import Network.Google.Resource.Blogger.Blogs.Get

487+import Network.Google.Resource.Blogger.Blogs.GetByURL

488+import Network.Google.Resource.Blogger.Blogs.ListByUser

489+import Network.Google.Resource.Blogger.Comments.Approve

490+import Network.Google.Resource.Blogger.Comments.Delete

491+import Network.Google.Resource.Blogger.Comments.Get

492+import Network.Google.Resource.Blogger.Comments.List

493+import Network.Google.Resource.Blogger.Comments.ListByBlog

494+import Network.Google.Resource.Blogger.Comments.MarkAsSpam

495+import Network.Google.Resource.Blogger.Comments.RemoveContent

496+import Network.Google.Resource.Blogger.PageViews.Get

497+import Network.Google.Resource.Blogger.Pages.Delete

498+import Network.Google.Resource.Blogger.Pages.Get

499+import Network.Google.Resource.Blogger.Pages.Insert

500+import Network.Google.Resource.Blogger.Pages.List

501+import Network.Google.Resource.Blogger.Pages.Patch

502+import Network.Google.Resource.Blogger.Pages.Publish

503+import Network.Google.Resource.Blogger.Pages.Revert

504+import Network.Google.Resource.Blogger.Pages.Update

505+import Network.Google.Resource.Blogger.PostUserInfos.Get

506+import Network.Google.Resource.Blogger.PostUserInfos.List

507+import Network.Google.Resource.Blogger.Posts.Delete

508+import Network.Google.Resource.Blogger.Posts.Get

509+import Network.Google.Resource.Blogger.Posts.GetByPath

510+import Network.Google.Resource.Blogger.Posts.Insert

511+import Network.Google.Resource.Blogger.Posts.List

512+import Network.Google.Resource.Blogger.Posts.Patch

513+import Network.Google.Resource.Blogger.Posts.Publish

514+import Network.Google.Resource.Blogger.Posts.Revert

515+import Network.Google.Resource.Blogger.Posts.Search

516+import Network.Google.Resource.Blogger.Posts.Update

517+import Network.Google.Resource.Blogger.Users.Get

518518

519519{- $resources

520520TODO

gogol-blogger/gen/Network/Google/Blogger/Types.hs+3−3

@@ -370,9 +370,9 @@ module Network.Google.Blogger.Types

370370 , piiURL

371371 ) where

372372

373−import Network.Google.Blogger.Types.Product

374−import Network.Google.Blogger.Types.Sum

375−import Network.Google.Prelude

373+import Network.Google.Blogger.Types.Product

374+import Network.Google.Blogger.Types.Sum

375+import Network.Google.Prelude

376376

377377-- | URL referring to version 'v3' of the Blogger API.

378378bloggerURL :: BaseUrl

gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+141−141

@@ -17,15 +17,15 @@

1717--

1818module Network.Google.Blogger.Types.Product where

1919

20−import Network.Google.Blogger.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.Blogger.Types.Sum

21+import Network.Google.Prelude

2222

2323--

2424-- /See:/ 'postUserInfo' smart constructor.

2525data PostUserInfo = PostUserInfo

2626 { _puiPostUserInfo :: !(Maybe PostPerUserInfo)

27− , _puiPost :: !(Maybe Post')

28− , _puiKind :: !Text

27+ , _puiPost :: !(Maybe Post')

28+ , _puiKind :: !Text

2929 } deriving (Eq,Show,Data,Typeable,Generic)

3030

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

@@ -39,7 +39,7 @@ data PostUserInfo = PostUserInfo

3939-- * 'puiKind'

4040postUserInfo

4141 :: PostUserInfo

42−postUserInfo =

42+postUserInfo =

4343 PostUserInfo

4444 { _puiPostUserInfo = Nothing

4545 , _puiPost = Nothing

@@ -89,7 +89,7 @@ newtype PostAuthorImage = PostAuthorImage

8989-- * 'paiURL'

9090postAuthorImage

9191 :: PostAuthorImage

92−postAuthorImage =

92+postAuthorImage =

9393 PostAuthorImage

9494 { _paiURL = Nothing

9595 }

@@ -110,10 +110,10 @@ instance ToJSON PostAuthorImage where

110110--

111111-- /See:/ 'postList' smart constructor.

112112data PostList = PostList

113− { _plEtag :: !(Maybe Text)

113+ { _plEtag :: !(Maybe Text)

114114 , _plNextPageToken :: !(Maybe Text)

115− , _plKind :: !Text

116− , _plItems :: !(Maybe [Post'])

115+ , _plKind :: !Text

116+ , _plItems :: !(Maybe [Post'])

117117 } deriving (Eq,Show,Data,Typeable,Generic)

118118

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

@@ -129,7 +129,7 @@ data PostList = PostList

129129-- * 'plItems'

130130postList

131131 :: PostList

132−postList =

132+postList =

133133 PostList

134134 { _plEtag = Nothing

135135 , _plNextPageToken = Nothing

@@ -188,7 +188,7 @@ newtype CommentInReplyTo = CommentInReplyTo

188188-- * 'cirtId'

189189commentInReplyTo

190190 :: CommentInReplyTo

191−commentInReplyTo =

191+commentInReplyTo =

192192 CommentInReplyTo

193193 { _cirtId = Nothing

194194 }

@@ -220,7 +220,7 @@ newtype CommentBlog = CommentBlog

220220-- * 'cbId'

221221commentBlog

222222 :: CommentBlog

223−commentBlog =

223+commentBlog =

224224 CommentBlog

225225 { _cbId = Nothing

226226 }

@@ -241,7 +241,7 @@ instance ToJSON CommentBlog where

241241--

242242-- /See:/ 'pageviews' smart constructor.

243243data Pageviews = Pageviews

244− { _pKind :: !Text

244+ { _pKind :: !Text

245245 , _pCounts :: !(Maybe [PageviewsCountsItem])

246246 , _pBlogId :: !(Maybe Text)

247247 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -257,7 +257,7 @@ data Pageviews = Pageviews

257257-- * 'pBlogId'

258258pageviews

259259 :: Pageviews

260−pageviews =

260+pageviews =

261261 Pageviews

262262 { _pKind = "blogger#page_views"

263263 , _pCounts = Nothing

@@ -299,9 +299,9 @@ instance ToJSON Pageviews where

299299-- /See:/ 'postLocation' smart constructor.

300300data PostLocation = PostLocation

301301 { _plSpan :: !(Maybe Text)

302− , _plLat :: !(Maybe Double)

302+ , _plLat :: !(Maybe Double)

303303 , _plName :: !(Maybe Text)

304− , _plLng :: !(Maybe Double)

304+ , _plLng :: !(Maybe Double)

305305 } deriving (Eq,Show,Data,Typeable,Generic)

306306

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

@@ -317,7 +317,7 @@ data PostLocation = PostLocation

317317-- * 'plLng'

318318postLocation

319319 :: PostLocation

320−postLocation =

320+postLocation =

321321 PostLocation

322322 { _plSpan = Nothing

323323 , _plLat = Nothing

@@ -361,8 +361,8 @@ instance ToJSON PostLocation where

361361-- /See:/ 'blogPosts' smart constructor.

362362data BlogPosts = BlogPosts

363363 { _bpTotalItems :: !(Maybe Int32)

364− , _bpItems :: !(Maybe [Post'])

365− , _bpSelfLink :: !(Maybe Text)

364+ , _bpItems :: !(Maybe [Post'])

365+ , _bpSelfLink :: !(Maybe Text)

366366 } deriving (Eq,Show,Data,Typeable,Generic)

367367

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

@@ -376,7 +376,7 @@ data BlogPosts = BlogPosts

376376-- * 'bpSelfLink'

377377blogPosts

378378 :: BlogPosts

379−blogPosts =

379+blogPosts =

380380 BlogPosts

381381 { _bpTotalItems = Nothing

382382 , _bpItems = Nothing

@@ -418,25 +418,25 @@ instance ToJSON BlogPosts where

418418--

419419-- /See:/ 'post' smart constructor.

420420data Post' = Post'

421− { _posImages :: !(Maybe [PostImagesItem])

422− , _posStatus :: !(Maybe Text)

423− , _posEtag :: !(Maybe Text)

421+ { _posImages :: !(Maybe [PostImagesItem])

422+ , _posStatus :: !(Maybe Text)

423+ , _posEtag :: !(Maybe Text)

424424 , _posReaderComments :: !(Maybe Text)

425− , _posLocation :: !(Maybe PostLocation)

426− , _posKind :: !Text

427− , _posPublished :: !(Maybe DateTime')

428− , _posURL :: !(Maybe Text)

429− , _posBlog :: !(Maybe PostBlog)

425+ , _posLocation :: !(Maybe PostLocation)

426+ , _posKind :: !Text

427+ , _posPublished :: !(Maybe DateTime')

428+ , _posURL :: !(Maybe Text)

429+ , _posBlog :: !(Maybe PostBlog)

430430 , _posCustomMetaData :: !(Maybe Text)

431− , _posContent :: !(Maybe Text)

432− , _posReplies :: !(Maybe PostReplies)

433− , _posSelfLink :: !(Maybe Text)

434− , _posAuthor :: !(Maybe PostAuthor)

435− , _posId :: !(Maybe Text)

436− , _posLabels :: !(Maybe [Text])

437− , _posUpdated :: !(Maybe DateTime')

438− , _posTitleLink :: !(Maybe Text)

439− , _posTitle :: !(Maybe Text)

431+ , _posContent :: !(Maybe Text)

432+ , _posReplies :: !(Maybe PostReplies)

433+ , _posSelfLink :: !(Maybe Text)

434+ , _posAuthor :: !(Maybe PostAuthor)

435+ , _posId :: !(Maybe Text)

436+ , _posLabels :: !(Maybe [Text])

437+ , _posUpdated :: !(Maybe DateTime')

438+ , _posTitleLink :: !(Maybe Text)

439+ , _posTitle :: !(Maybe Text)

440440 } deriving (Eq,Show,Data,Typeable,Generic)

441441

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

@@ -482,7 +482,7 @@ data Post' = Post'

482482-- * 'posTitle'

483483post

484484 :: Post'

485−post =

485+post =

486486 Post'

487487 { _posImages = Nothing

488488 , _posStatus = Nothing

@@ -651,18 +651,18 @@ instance ToJSON Post' where

651651--

652652-- /See:/ 'page' smart constructor.

653653data Page = Page

654− { _pagStatus :: !(Maybe Text)

655− , _pagEtag :: !(Maybe Text)

656− , _pagKind :: !Text

654+ { _pagStatus :: !(Maybe Text)

655+ , _pagEtag :: !(Maybe Text)

656+ , _pagKind :: !Text

657657 , _pagPublished :: !(Maybe DateTime')

658− , _pagURL :: !(Maybe Text)

659− , _pagBlog :: !(Maybe PageBlog)

660− , _pagContent :: !(Maybe Text)

661− , _pagSelfLink :: !(Maybe Text)

662− , _pagAuthor :: !(Maybe PageAuthor)

663− , _pagId :: !(Maybe Text)

664− , _pagUpdated :: !(Maybe DateTime')

665− , _pagTitle :: !(Maybe Text)

658+ , _pagURL :: !(Maybe Text)

659+ , _pagBlog :: !(Maybe PageBlog)

660+ , _pagContent :: !(Maybe Text)

661+ , _pagSelfLink :: !(Maybe Text)

662+ , _pagAuthor :: !(Maybe PageAuthor)

663+ , _pagId :: !(Maybe Text)

664+ , _pagUpdated :: !(Maybe DateTime')

665+ , _pagTitle :: !(Maybe Text)

666666 } deriving (Eq,Show,Data,Typeable,Generic)

667667

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

@@ -694,7 +694,7 @@ data Page = Page

694694-- * 'pagTitle'

695695page

696696 :: Page

697−page =

697+page =

698698 Page

699699 { _pagStatus = Nothing

700700 , _pagEtag = Nothing

@@ -802,8 +802,8 @@ instance ToJSON Page where

802802--

803803-- /See:/ 'blogLocale' smart constructor.

804804data BlogLocale = BlogLocale

805− { _blVariant :: !(Maybe Text)

806− , _blCountry :: !(Maybe Text)

805+ { _blVariant :: !(Maybe Text)

806+ , _blCountry :: !(Maybe Text)

807807 , _blLanguage :: !(Maybe Text)

808808 } deriving (Eq,Show,Data,Typeable,Generic)

809809

@@ -818,7 +818,7 @@ data BlogLocale = BlogLocale

818818-- * 'blLanguage'

819819blogLocale

820820 :: BlogLocale

821−blogLocale =

821+blogLocale =

822822 BlogLocale

823823 { _blVariant = Nothing

824824 , _blCountry = Nothing

@@ -860,10 +860,10 @@ instance ToJSON BlogLocale where

860860--

861861-- /See:/ 'pageAuthor' smart constructor.

862862data PageAuthor = PageAuthor

863− { _paImage :: !(Maybe PageAuthorImage)

864− , _paURL :: !(Maybe Text)

863+ { _paImage :: !(Maybe PageAuthorImage)

864+ , _paURL :: !(Maybe Text)

865865 , _paDisplayName :: !(Maybe Text)

866− , _paId :: !(Maybe Text)

866+ , _paId :: !(Maybe Text)

867867 } deriving (Eq,Show,Data,Typeable,Generic)

868868

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

@@ -879,7 +879,7 @@ data PageAuthor = PageAuthor

879879-- * 'paId'

880880pageAuthor

881881 :: PageAuthor

882−pageAuthor =

882+pageAuthor =

883883 PageAuthor

884884 { _paImage = Nothing

885885 , _paURL = Nothing

@@ -925,19 +925,19 @@ instance ToJSON PageAuthor where

925925--

926926-- /See:/ 'blog' smart constructor.

927927data Blog = Blog

928− { _bStatus :: !(Maybe Text)

929− , _bKind :: !Text

930− , _bPages :: !(Maybe BlogPages)

931− , _bLocale :: !(Maybe BlogLocale)

932− , _bPublished :: !(Maybe DateTime')

933− , _bURL :: !(Maybe Text)

928+ { _bStatus :: !(Maybe Text)

929+ , _bKind :: !Text

930+ , _bPages :: !(Maybe BlogPages)

931+ , _bLocale :: !(Maybe BlogLocale)

932+ , _bPublished :: !(Maybe DateTime')

933+ , _bURL :: !(Maybe Text)

934934 , _bCustomMetaData :: !(Maybe Text)

935− , _bSelfLink :: !(Maybe Text)

936− , _bName :: !(Maybe Text)

937− , _bId :: !(Maybe Text)

938− , _bUpdated :: !(Maybe DateTime')

939− , _bPosts :: !(Maybe BlogPosts)

940− , _bDescription :: !(Maybe Text)

935+ , _bSelfLink :: !(Maybe Text)

936+ , _bName :: !(Maybe Text)

937+ , _bId :: !(Maybe Text)

938+ , _bUpdated :: !(Maybe DateTime')

939+ , _bPosts :: !(Maybe BlogPosts)

940+ , _bDescription :: !(Maybe Text)

941941 } deriving (Eq,Show,Data,Typeable,Generic)

942942

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

@@ -971,7 +971,7 @@ data Blog = Blog

971971-- * 'bDescription'

972972blog

973973 :: Blog

974−blog =

974+blog =

975975 Blog

976976 { _bStatus = Nothing

977977 , _bKind = "blogger#blog"

@@ -1087,7 +1087,7 @@ instance ToJSON Blog where

10871087-- /See:/ 'blogPages' smart constructor.

10881088data BlogPages = BlogPages

10891089 { _bpsTotalItems :: !(Maybe Int32)

1090− , _bpsSelfLink :: !(Maybe Text)

1090+ , _bpsSelfLink :: !(Maybe Text)

10911091 } deriving (Eq,Show,Data,Typeable,Generic)

10921092

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

@@ -1099,7 +1099,7 @@ data BlogPages = BlogPages

10991099-- * 'bpsSelfLink'

11001100blogPages

11011101 :: BlogPages

1102−blogPages =

1102+blogPages =

11031103 BlogPages

11041104 { _bpsTotalItems = Nothing

11051105 , _bpsSelfLink = Nothing

@@ -1144,7 +1144,7 @@ newtype PostBlog = PostBlog

11441144-- * 'pbId'

11451145postBlog

11461146 :: PostBlog

1147−postBlog =

1147+postBlog =

11481148 PostBlog

11491149 { _pbId = Nothing

11501150 }

@@ -1165,10 +1165,10 @@ instance ToJSON PostBlog where

11651165--

11661166-- /See:/ 'pageList' smart constructor.

11671167data PageList = PageList

1168− { _pllEtag :: !(Maybe Text)

1168+ { _pllEtag :: !(Maybe Text)

11691169 , _pllNextPageToken :: !(Maybe Text)

1170− , _pllKind :: !Text

1171− , _pllItems :: !(Maybe [Page])

1170+ , _pllKind :: !Text

1171+ , _pllItems :: !(Maybe [Page])

11721172 } deriving (Eq,Show,Data,Typeable,Generic)

11731173

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

@@ -1184,7 +1184,7 @@ data PageList = PageList

11841184-- * 'pllItems'

11851185pageList

11861186 :: PageList

1187−pageList =

1187+pageList =

11881188 PageList

11891189 { _pllEtag = Nothing

11901190 , _pllNextPageToken = Nothing

@@ -1235,8 +1235,8 @@ instance ToJSON PageList where

12351235--

12361236-- /See:/ 'userLocale' smart constructor.

12371237data UserLocale = UserLocale

1238− { _ulVariant :: !(Maybe Text)

1239− , _ulCountry :: !(Maybe Text)

1238+ { _ulVariant :: !(Maybe Text)

1239+ , _ulCountry :: !(Maybe Text)

12401240 , _ulLanguage :: !(Maybe Text)

12411241 } deriving (Eq,Show,Data,Typeable,Generic)

12421242

@@ -1251,7 +1251,7 @@ data UserLocale = UserLocale

12511251-- * 'ulLanguage'

12521252userLocale

12531253 :: UserLocale

1254−userLocale =

1254+userLocale =

12551255 UserLocale

12561256 { _ulVariant = Nothing

12571257 , _ulCountry = Nothing

@@ -1303,7 +1303,7 @@ newtype CommentAuthorImage = CommentAuthorImage

13031303-- * 'caiURL'

13041304commentAuthorImage

13051305 :: CommentAuthorImage

1306−commentAuthorImage =

1306+commentAuthorImage =

13071307 CommentAuthorImage

13081308 { _caiURL = Nothing

13091309 }

@@ -1324,15 +1324,15 @@ instance ToJSON CommentAuthorImage where

13241324--

13251325-- /See:/ 'user' smart constructor.

13261326data User = User

1327− { _uBlogs :: !(Maybe UserBlogs)

1328− , _uKind :: !Text

1329− , _uCreated :: !(Maybe DateTime')

1330− , _uLocale :: !(Maybe UserLocale)

1331− , _uURL :: !(Maybe Text)

1332− , _uSelfLink :: !(Maybe Text)

1333− , _uAbout :: !(Maybe Text)

1327+ { _uBlogs :: !(Maybe UserBlogs)

1328+ , _uKind :: !Text

1329+ , _uCreated :: !(Maybe DateTime')

1330+ , _uLocale :: !(Maybe UserLocale)

1331+ , _uURL :: !(Maybe Text)

1332+ , _uSelfLink :: !(Maybe Text)

1333+ , _uAbout :: !(Maybe Text)

13341334 , _uDisplayName :: !(Maybe Text)

1335− , _uId :: !(Maybe Text)

1335+ , _uId :: !(Maybe Text)

13361336 } deriving (Eq,Show,Data,Typeable,Generic)

13371337

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

@@ -1358,7 +1358,7 @@ data User = User

13581358-- * 'uId'

13591359user

13601360 :: User

1361−user =

1361+user =

13621362 User

13631363 { _uBlogs = Nothing

13641364 , _uKind = "blogger#user"

@@ -1451,7 +1451,7 @@ newtype UserBlogs = UserBlogs

14511451-- * 'ubSelfLink'

14521452userBlogs

14531453 :: UserBlogs

1454−userBlogs =

1454+userBlogs =

14551455 UserBlogs

14561456 { _ubSelfLink = Nothing

14571457 }

@@ -1476,8 +1476,8 @@ instance ToJSON UserBlogs where

14761476-- /See:/ 'postReplies' smart constructor.

14771477data PostReplies = PostReplies

14781478 { _prTotalItems :: !(Maybe Int64)

1479− , _prItems :: !(Maybe [Comment])

1480− , _prSelfLink :: !(Maybe Text)

1479+ , _prItems :: !(Maybe [Comment])

1480+ , _prSelfLink :: !(Maybe Text)

14811481 } deriving (Eq,Show,Data,Typeable,Generic)

14821482

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

@@ -1491,7 +1491,7 @@ data PostReplies = PostReplies

14911491-- * 'prSelfLink'

14921492postReplies

14931493 :: PostReplies

1494−postReplies =

1494+postReplies =

14951495 PostReplies

14961496 { _prTotalItems = Nothing

14971497 , _prItems = Nothing

@@ -1533,8 +1533,8 @@ instance ToJSON PostReplies where

15331533--

15341534-- /See:/ 'blogList' smart constructor.

15351535data BlogList = BlogList

1536− { _blKind :: !Text

1537− , _blItems :: !(Maybe [Blog])

1536+ { _blKind :: !Text

1537+ , _blItems :: !(Maybe [Blog])

15381538 , _blBlogUserInfos :: !(Maybe [BlogUserInfo])

15391539 } deriving (Eq,Show,Data,Typeable,Generic)

15401540

@@ -1549,7 +1549,7 @@ data BlogList = BlogList

15491549-- * 'blBlogUserInfos'

15501550blogList

15511551 :: BlogList

1552−blogList =

1552+blogList =

15531553 BlogList

15541554 { _blKind = "blogger#blogList"

15551555 , _blItems = Nothing

@@ -1604,7 +1604,7 @@ newtype PageBlog = PageBlog

16041604-- * 'pId'

16051605pageBlog

16061606 :: PageBlog

1607−pageBlog =

1607+pageBlog =

16081608 PageBlog

16091609 { _pId = Nothing

16101610 }

@@ -1626,10 +1626,10 @@ instance ToJSON PageBlog where

16261626--

16271627-- /See:/ 'postAuthor' smart constructor.

16281628data PostAuthor = PostAuthor

1629− { _paaImage :: !(Maybe PostAuthorImage)

1630− , _paaURL :: !(Maybe Text)

1629+ { _paaImage :: !(Maybe PostAuthorImage)

1630+ , _paaURL :: !(Maybe Text)

16311631 , _paaDisplayName :: !(Maybe Text)

1632− , _paaId :: !(Maybe Text)

1632+ , _paaId :: !(Maybe Text)

16331633 } deriving (Eq,Show,Data,Typeable,Generic)

16341634

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

@@ -1645,7 +1645,7 @@ data PostAuthor = PostAuthor

16451645-- * 'paaId'

16461646postAuthor

16471647 :: PostAuthor

1648−postAuthor =

1648+postAuthor =

16491649 PostAuthor

16501650 { _paaImage = Nothing

16511651 , _paaURL = Nothing

@@ -1691,11 +1691,11 @@ instance ToJSON PostAuthor where

16911691--

16921692-- /See:/ 'postPerUserInfo' smart constructor.

16931693data PostPerUserInfo = PostPerUserInfo

1694− { _ppuiKind :: !Text

1695− , _ppuiBlogId :: !(Maybe Text)

1696− , _ppuiUserId :: !(Maybe Text)

1694+ { _ppuiKind :: !Text

1695+ , _ppuiBlogId :: !(Maybe Text)

1696+ , _ppuiUserId :: !(Maybe Text)

16971697 , _ppuiHasEditAccess :: !(Maybe Bool)

1698− , _ppuiPostId :: !(Maybe Text)

1698+ , _ppuiPostId :: !(Maybe Text)

16991699 } deriving (Eq,Show,Data,Typeable,Generic)

17001700

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

@@ -1713,7 +1713,7 @@ data PostPerUserInfo = PostPerUserInfo

17131713-- * 'ppuiPostId'

17141714postPerUserInfo

17151715 :: PostPerUserInfo

1716−postPerUserInfo =

1716+postPerUserInfo =

17171717 PostPerUserInfo

17181718 { _ppuiKind = "blogger#postPerUserInfo"

17191719 , _ppuiBlogId = Nothing

@@ -1772,7 +1772,7 @@ instance ToJSON PostPerUserInfo where

17721772-- /See:/ 'pageviewsCountsItem' smart constructor.

17731773data PageviewsCountsItem = PageviewsCountsItem

17741774 { _pciTimeRange :: !(Maybe Text)

1775− , _pciCount :: !(Maybe Int64)

1775+ , _pciCount :: !(Maybe Int64)

17761776 } deriving (Eq,Show,Data,Typeable,Generic)

17771777

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

@@ -1784,7 +1784,7 @@ data PageviewsCountsItem = PageviewsCountsItem

17841784-- * 'pciCount'

17851785pageviewsCountsItem

17861786 :: PageviewsCountsItem

1787−pageviewsCountsItem =

1787+pageviewsCountsItem =

17881788 PageviewsCountsItem

17891789 { _pciTimeRange = Nothing

17901790 , _pciCount = Nothing

@@ -1816,16 +1816,16 @@ instance ToJSON PageviewsCountsItem where

18161816--

18171817-- /See:/ 'comment' smart constructor.

18181818data Comment = Comment

1819− { _cStatus :: !(Maybe Text)

1820− , _cPost :: !(Maybe CommentPost)

1821− , _cKind :: !Text

1819+ { _cStatus :: !(Maybe Text)

1820+ , _cPost :: !(Maybe CommentPost)

1821+ , _cKind :: !Text

18221822 , _cPublished :: !(Maybe DateTime')

1823− , _cBlog :: !(Maybe CommentBlog)

1824− , _cContent :: !(Maybe Text)

1825− , _cSelfLink :: !(Maybe Text)

1826− , _cAuthor :: !(Maybe CommentAuthor)

1827− , _cId :: !(Maybe Text)

1828− , _cUpdated :: !(Maybe DateTime')

1823+ , _cBlog :: !(Maybe CommentBlog)

1824+ , _cContent :: !(Maybe Text)

1825+ , _cSelfLink :: !(Maybe Text)

1826+ , _cAuthor :: !(Maybe CommentAuthor)

1827+ , _cId :: !(Maybe Text)

1828+ , _cUpdated :: !(Maybe DateTime')

18291829 , _cInReplyTo :: !(Maybe CommentInReplyTo)

18301830 } deriving (Eq,Show,Data,Typeable,Generic)

18311831

@@ -1856,7 +1856,7 @@ data Comment = Comment

18561856-- * 'cInReplyTo'

18571857comment

18581858 :: Comment

1859−comment =

1859+comment =

18601860 Comment

18611861 { _cStatus = Nothing

18621862 , _cPost = Nothing

@@ -1964,7 +1964,7 @@ newtype CommentPost = CommentPost

19641964-- * 'cpId'

19651965commentPost

19661966 :: CommentPost

1967−commentPost =

1967+commentPost =

19681968 CommentPost

19691969 { _cpId = Nothing

19701970 }

@@ -1986,10 +1986,10 @@ instance ToJSON CommentPost where

19861986-- /See:/ 'blogPerUserInfo' smart constructor.

19871987data BlogPerUserInfo = BlogPerUserInfo

19881988 { _bpuiPhotosAlbumKey :: !(Maybe Text)

1989− , _bpuiKind :: !Text

1990− , _bpuiBlogId :: !(Maybe Text)

1991− , _bpuiUserId :: !(Maybe Text)

1992− , _bpuiRole :: !(Maybe Text)

1989+ , _bpuiKind :: !Text

1990+ , _bpuiBlogId :: !(Maybe Text)

1991+ , _bpuiUserId :: !(Maybe Text)

1992+ , _bpuiRole :: !(Maybe Text)

19931993 , _bpuiHasAdminAccess :: !(Maybe Bool)

19941994 } deriving (Eq,Show,Data,Typeable,Generic)

19951995

@@ -2010,7 +2010,7 @@ data BlogPerUserInfo = BlogPerUserInfo

20102010-- * 'bpuiHasAdminAccess'

20112011blogPerUserInfo

20122012 :: BlogPerUserInfo

2013−blogPerUserInfo =

2013+blogPerUserInfo =

20142014 BlogPerUserInfo

20152015 { _bpuiPhotosAlbumKey = Nothing

20162016 , _bpuiKind = "blogger#blogPerUserInfo"

@@ -2078,8 +2078,8 @@ instance ToJSON BlogPerUserInfo where

20782078-- /See:/ 'postUserInfosList' smart constructor.

20792079data PostUserInfosList = PostUserInfosList

20802080 { _puilNextPageToken :: !(Maybe Text)

2081− , _puilKind :: !Text

2082− , _puilItems :: !(Maybe [PostUserInfo])

2081+ , _puilKind :: !Text

2082+ , _puilItems :: !(Maybe [PostUserInfo])

20832083 } deriving (Eq,Show,Data,Typeable,Generic)

20842084

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

@@ -2093,7 +2093,7 @@ data PostUserInfosList = PostUserInfosList

20932093-- * 'puilItems'

20942094postUserInfosList

20952095 :: PostUserInfosList

2096−postUserInfosList =

2096+postUserInfosList =

20972097 PostUserInfosList

20982098 { _puilNextPageToken = Nothing

20992099 , _puilKind = "blogger#postUserInfosList"

@@ -2138,10 +2138,10 @@ instance ToJSON PostUserInfosList where

21382138--

21392139-- /See:/ 'commentAuthor' smart constructor.

21402140data CommentAuthor = CommentAuthor

2141− { _caImage :: !(Maybe CommentAuthorImage)

2142− , _caURL :: !(Maybe Text)

2141+ { _caImage :: !(Maybe CommentAuthorImage)

2142+ , _caURL :: !(Maybe Text)

21432143 , _caDisplayName :: !(Maybe Text)

2144− , _caId :: !(Maybe Text)

2144+ , _caId :: !(Maybe Text)

21452145 } deriving (Eq,Show,Data,Typeable,Generic)

21462146

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

@@ -2157,7 +2157,7 @@ data CommentAuthor = CommentAuthor

21572157-- * 'caId'

21582158commentAuthor

21592159 :: CommentAuthor

2160−commentAuthor =

2160+commentAuthor =

21612161 CommentAuthor

21622162 { _caImage = Nothing

21632163 , _caURL = Nothing

@@ -2203,8 +2203,8 @@ instance ToJSON CommentAuthor where

22032203--

22042204-- /See:/ 'blogUserInfo' smart constructor.

22052205data BlogUserInfo = BlogUserInfo

2206− { _buiKind :: !Text

2207− , _buiBlog :: !(Maybe Blog)

2206+ { _buiKind :: !Text

2207+ , _buiBlog :: !(Maybe Blog)

22082208 , _buiBlogUserInfo :: !(Maybe BlogPerUserInfo)

22092209 } deriving (Eq,Show,Data,Typeable,Generic)

22102210

@@ -2219,7 +2219,7 @@ data BlogUserInfo = BlogUserInfo

22192219-- * 'buiBlogUserInfo'

22202220blogUserInfo

22212221 :: BlogUserInfo

2222−blogUserInfo =

2222+blogUserInfo =

22232223 BlogUserInfo

22242224 { _buiKind = "blogger#blogUserInfo"

22252225 , _buiBlog = Nothing

@@ -2270,7 +2270,7 @@ newtype PageAuthorImage = PageAuthorImage

22702270-- * 'pURL'

22712271pageAuthorImage

22722272 :: PageAuthorImage

2273−pageAuthorImage =

2273+pageAuthorImage =

22742274 PageAuthorImage

22752275 { _pURL = Nothing

22762276 }

@@ -2291,10 +2291,10 @@ instance ToJSON PageAuthorImage where

22912291--

22922292-- /See:/ 'commentList' smart constructor.

22932293data CommentList = CommentList

2294− { _clEtag :: !(Maybe Text)

2294+ { _clEtag :: !(Maybe Text)

22952295 , _clNextPageToken :: !(Maybe Text)

2296− , _clKind :: !Text

2297− , _clItems :: !(Maybe [Comment])

2296+ , _clKind :: !Text

2297+ , _clItems :: !(Maybe [Comment])

22982298 , _clPrevPageToken :: !(Maybe Text)

22992299 } deriving (Eq,Show,Data,Typeable,Generic)

23002300

@@ -2313,7 +2313,7 @@ data CommentList = CommentList

23132313-- * 'clPrevPageToken'

23142314commentList

23152315 :: CommentList

2316−commentList =

2316+commentList =

23172317 CommentList

23182318 { _clEtag = Nothing

23192319 , _clNextPageToken = Nothing

@@ -2380,7 +2380,7 @@ newtype PostImagesItem = PostImagesItem

23802380-- * 'piiURL'

23812381postImagesItem

23822382 :: PostImagesItem

2383−postImagesItem =

2383+postImagesItem =

23842384 PostImagesItem

23852385 { _piiURL = Nothing

23862386 }

gogol-blogger/gen/Network/Google/Blogger/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.Blogger.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121-- | Sort search results

2222data PostsListOrderBy

gogol-blogger/gen/Network/Google/Resource/Blogger/BlogUserInfos/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.BlogUserInfos.Get

4444 , buigFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerBlogUserInfosGet@ which the

5151-- 'BlogUserInfosGet'' request conforms to.

@@ -67,15 +67,15 @@ type BlogUserInfosGetResource =

6767--

6868-- /See:/ 'blogUserInfosGet'' smart constructor.

6969data BlogUserInfosGet' = BlogUserInfosGet'

70− { _buigQuotaUser :: !(Maybe Text)

70+ { _buigQuotaUser :: !(Maybe Text)

7171 , _buigPrettyPrint :: !Bool

72− , _buigUserIP :: !(Maybe Text)

73− , _buigBlogId :: !Text

74− , _buigUserId :: !Text

75− , _buigKey :: !(Maybe Key)

76− , _buigMaxPosts :: !(Maybe Word32)

77− , _buigOAuthToken :: !(Maybe OAuthToken)

78− , _buigFields :: !(Maybe Text)

72+ , _buigUserIP :: !(Maybe Text)

73+ , _buigBlogId :: !Text

74+ , _buigUserId :: !Text

75+ , _buigKey :: !(Maybe Key)

76+ , _buigMaxPosts :: !(Maybe Word32)

77+ , _buigOAuthToken :: !(Maybe OAuthToken)

78+ , _buigFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -103,7 +103,7 @@ blogUserInfosGet'

103103 :: Text -- ^ 'blogId'

104104 -> Text -- ^ 'userId'

105105 -> BlogUserInfosGet'

106−blogUserInfosGet' pBuigBlogId_ pBuigUserId_ =

106+blogUserInfosGet' pBuigBlogId_ pBuigUserId_ =

107107 BlogUserInfosGet'

108108 { _buigQuotaUser = Nothing

109109 , _buigPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Blogs.Get

4444 , bgFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerBlogsGet@ which the

5151-- 'BlogsGet'' request conforms to.

@@ -66,15 +66,15 @@ type BlogsGetResource =

6666--

6767-- /See:/ 'blogsGet'' smart constructor.

6868data BlogsGet' = BlogsGet'

69− { _bgQuotaUser :: !(Maybe Text)

69+ { _bgQuotaUser :: !(Maybe Text)

7070 , _bgPrettyPrint :: !Bool

71− , _bgUserIP :: !(Maybe Text)

72− , _bgBlogId :: !Text

73− , _bgKey :: !(Maybe Key)

74− , _bgMaxPosts :: !(Maybe Word32)

75− , _bgView :: !(Maybe BlogsGetView)

76− , _bgOAuthToken :: !(Maybe OAuthToken)

77− , _bgFields :: !(Maybe Text)

71+ , _bgUserIP :: !(Maybe Text)

72+ , _bgBlogId :: !Text

73+ , _bgKey :: !(Maybe Key)

74+ , _bgMaxPosts :: !(Maybe Word32)

75+ , _bgView :: !(Maybe BlogsGetView)

76+ , _bgOAuthToken :: !(Maybe OAuthToken)

77+ , _bgFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -101,7 +101,7 @@ data BlogsGet' = BlogsGet'

101101blogsGet'

102102 :: Text -- ^ 'blogId'

103103 -> BlogsGet'

104−blogsGet' pBgBlogId_ =

104+blogsGet' pBgBlogId_ =

105105 BlogsGet'

106106 { _bgQuotaUser = Nothing

107107 , _bgPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/GetByURL.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Blogs.GetByURL

4343 , bgbuFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerBlogsGetByURL@ which the

5050-- 'BlogsGetByURL'' request conforms to.

@@ -65,14 +65,14 @@ type BlogsGetByURLResource =

6565--

6666-- /See:/ 'blogsGetByURL'' smart constructor.

6767data BlogsGetByURL' = BlogsGetByURL'

68− { _bgbuQuotaUser :: !(Maybe Text)

68+ { _bgbuQuotaUser :: !(Maybe Text)

6969 , _bgbuPrettyPrint :: !Bool

70− , _bgbuUserIP :: !(Maybe Text)

71− , _bgbuURL :: !Text

72− , _bgbuKey :: !(Maybe Key)

73− , _bgbuView :: !(Maybe BlogsGetByURLView)

74− , _bgbuOAuthToken :: !(Maybe OAuthToken)

75− , _bgbuFields :: !(Maybe Text)

70+ , _bgbuUserIP :: !(Maybe Text)

71+ , _bgbuURL :: !Text

72+ , _bgbuKey :: !(Maybe Key)

73+ , _bgbuView :: !(Maybe BlogsGetByURLView)

74+ , _bgbuOAuthToken :: !(Maybe OAuthToken)

75+ , _bgbuFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -97,7 +97,7 @@ data BlogsGetByURL' = BlogsGetByURL'

9797blogsGetByURL'

9898 :: Text -- ^ 'url'

9999 -> BlogsGetByURL'

100−blogsGetByURL' pBgbuURL_ =

100+blogsGetByURL' pBgbuURL_ =

101101 BlogsGetByURL'

102102 { _bgbuQuotaUser = Nothing

103103 , _bgbuPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/ListByUser.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Blogger.Blogs.ListByUser

4646 , blbuFields

4747 ) where

4848

49−import Network.Google.Blogger.Types

50−import Network.Google.Prelude

49+import Network.Google.Blogger.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @BloggerBlogsListByUser@ which the

5353-- 'BlogsListByUser'' request conforms to.

@@ -71,17 +71,17 @@ type BlogsListByUserResource =

7171--

7272-- /See:/ 'blogsListByUser'' smart constructor.

7373data BlogsListByUser' = BlogsListByUser'

74− { _blbuStatus :: ![BlogsListByUserStatus]

75− , _blbuQuotaUser :: !(Maybe Text)

76− , _blbuPrettyPrint :: !Bool

77− , _blbuUserIP :: !(Maybe Text)

74+ { _blbuStatus :: ![BlogsListByUserStatus]

75+ , _blbuQuotaUser :: !(Maybe Text)

76+ , _blbuPrettyPrint :: !Bool

77+ , _blbuUserIP :: !(Maybe Text)

7878 , _blbuFetchUserInfo :: !(Maybe Bool)

79− , _blbuUserId :: !Text

80− , _blbuRole :: !(Maybe [BlogsListByUserRole])

81− , _blbuKey :: !(Maybe Key)

82− , _blbuView :: !(Maybe BlogsListByUserView)

83− , _blbuOAuthToken :: !(Maybe OAuthToken)

84− , _blbuFields :: !(Maybe Text)

79+ , _blbuUserId :: !Text

80+ , _blbuRole :: !(Maybe [BlogsListByUserRole])

81+ , _blbuKey :: !(Maybe Key)

82+ , _blbuView :: !(Maybe BlogsListByUserView)

83+ , _blbuOAuthToken :: !(Maybe OAuthToken)

84+ , _blbuFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -112,7 +112,7 @@ data BlogsListByUser' = BlogsListByUser'

112112blogsListByUser'

113113 :: Text -- ^ 'userId'

114114 -> BlogsListByUser'

115−blogsListByUser' pBlbuUserId_ =

115+blogsListByUser' pBlbuUserId_ =

116116 BlogsListByUser'

117117 { _blbuStatus = [BLBUSLive]

118118 , _blbuQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Approve.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Comments.Approve

4444 , caFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerCommentsApprove@ which the

5151-- 'CommentsApprove'' request conforms to.

@@ -69,15 +69,15 @@ type CommentsApproveResource =

6969--

7070-- /See:/ 'commentsApprove'' smart constructor.

7171data CommentsApprove' = CommentsApprove'

72− { _caQuotaUser :: !(Maybe Text)

72+ { _caQuotaUser :: !(Maybe Text)

7373 , _caPrettyPrint :: !Bool

74− , _caUserIP :: !(Maybe Text)

75− , _caBlogId :: !Text

76− , _caKey :: !(Maybe Key)

77− , _caPostId :: !Text

78− , _caOAuthToken :: !(Maybe OAuthToken)

79− , _caCommentId :: !Text

80− , _caFields :: !(Maybe Text)

74+ , _caUserIP :: !(Maybe Text)

75+ , _caBlogId :: !Text

76+ , _caKey :: !(Maybe Key)

77+ , _caPostId :: !Text

78+ , _caOAuthToken :: !(Maybe OAuthToken)

79+ , _caCommentId :: !Text

80+ , _caFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ commentsApprove'

106106 -> Text -- ^ 'postId'

107107 -> Text -- ^ 'commentId'

108108 -> CommentsApprove'

109−commentsApprove' pCaBlogId_ pCaPostId_ pCaCommentId_ =

109+commentsApprove' pCaBlogId_ pCaPostId_ pCaCommentId_ =

110110 CommentsApprove'

111111 { _caQuotaUser = Nothing

112112 , _caPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Delete.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Comments.Delete

4444 , cdFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerCommentsDelete@ which the

5151-- 'CommentsDelete'' request conforms to.

@@ -68,15 +68,15 @@ type CommentsDeleteResource =

6868--

6969-- /See:/ 'commentsDelete'' smart constructor.

7070data CommentsDelete' = CommentsDelete'

71− { _cdQuotaUser :: !(Maybe Text)

71+ { _cdQuotaUser :: !(Maybe Text)

7272 , _cdPrettyPrint :: !Bool

73− , _cdUserIP :: !(Maybe Text)

74− , _cdBlogId :: !Text

75− , _cdKey :: !(Maybe Key)

76− , _cdPostId :: !Text

77− , _cdOAuthToken :: !(Maybe OAuthToken)

78− , _cdCommentId :: !Text

79− , _cdFields :: !(Maybe Text)

73+ , _cdUserIP :: !(Maybe Text)

74+ , _cdBlogId :: !Text

75+ , _cdKey :: !(Maybe Key)

76+ , _cdPostId :: !Text

77+ , _cdOAuthToken :: !(Maybe OAuthToken)

78+ , _cdCommentId :: !Text

79+ , _cdFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ commentsDelete'

105105 -> Text -- ^ 'postId'

106106 -> Text -- ^ 'commentId'

107107 -> CommentsDelete'

108−commentsDelete' pCdBlogId_ pCdPostId_ pCdCommentId_ =

108+commentsDelete' pCdBlogId_ pCdPostId_ pCdCommentId_ =

109109 CommentsDelete'

110110 { _cdQuotaUser = Nothing

111111 , _cdPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Get.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.Blogger.Comments.Get

4545 , cgFields

4646 ) where

4747

48−import Network.Google.Blogger.Types

49−import Network.Google.Prelude

48+import Network.Google.Blogger.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @BloggerCommentsGet@ which the

5252-- 'CommentsGet'' request conforms to.

@@ -70,16 +70,16 @@ type CommentsGetResource =

7070--

7171-- /See:/ 'commentsGet'' smart constructor.

7272data CommentsGet' = CommentsGet'

73− { _cgQuotaUser :: !(Maybe Text)

73+ { _cgQuotaUser :: !(Maybe Text)

7474 , _cgPrettyPrint :: !Bool

75− , _cgUserIP :: !(Maybe Text)

76− , _cgBlogId :: !Text

77− , _cgKey :: !(Maybe Key)

78− , _cgView :: !(Maybe CommentsGetView)

79− , _cgPostId :: !Text

80− , _cgOAuthToken :: !(Maybe OAuthToken)

81− , _cgCommentId :: !Text

82− , _cgFields :: !(Maybe Text)

75+ , _cgUserIP :: !(Maybe Text)

76+ , _cgBlogId :: !Text

77+ , _cgKey :: !(Maybe Key)

78+ , _cgView :: !(Maybe CommentsGetView)

79+ , _cgPostId :: !Text

80+ , _cgOAuthToken :: !(Maybe OAuthToken)

81+ , _cgCommentId :: !Text

82+ , _cgFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -110,7 +110,7 @@ commentsGet'

110110 -> Text -- ^ 'postId'

111111 -> Text -- ^ 'commentId'

112112 -> CommentsGet'

113−commentsGet' pCgBlogId_ pCgPostId_ pCgCommentId_ =

113+commentsGet' pCgBlogId_ pCgPostId_ pCgCommentId_ =

114114 CommentsGet'

115115 { _cgQuotaUser = Nothing

116116 , _cgPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/List.hs+16−16

@@ -50,8 +50,8 @@ module Network.Google.Resource.Blogger.Comments.List

5050 , clFields

5151 ) where

5252

53−import Network.Google.Blogger.Types

54−import Network.Google.Prelude

53+import Network.Google.Blogger.Types

54+import Network.Google.Prelude

5555

5656-- | A resource alias for @BloggerCommentsList@ which the

5757-- 'CommentsList'' request conforms to.

@@ -81,21 +81,21 @@ type CommentsListResource =

8181--

8282-- /See:/ 'commentsList'' smart constructor.

8383data CommentsList' = CommentsList'

84− { _clStatus :: !(Maybe [CommentsListStatus])

85− , _clQuotaUser :: !(Maybe Text)

84+ { _clStatus :: !(Maybe [CommentsListStatus])

85+ , _clQuotaUser :: !(Maybe Text)

8686 , _clPrettyPrint :: !Bool

87− , _clUserIP :: !(Maybe Text)

88− , _clEndDate :: !(Maybe DateTime')

89− , _clBlogId :: !Text

90− , _clStartDate :: !(Maybe DateTime')

91− , _clKey :: !(Maybe Key)

87+ , _clUserIP :: !(Maybe Text)

88+ , _clEndDate :: !(Maybe DateTime')

89+ , _clBlogId :: !Text

90+ , _clStartDate :: !(Maybe DateTime')

91+ , _clKey :: !(Maybe Key)

9292 , _clFetchBodies :: !(Maybe Bool)

93− , _clView :: !(Maybe CommentsListView)

94− , _clPostId :: !Text

95− , _clPageToken :: !(Maybe Text)

96− , _clOAuthToken :: !(Maybe OAuthToken)

97− , _clMaxResults :: !(Maybe Word32)

98− , _clFields :: !(Maybe Text)

93+ , _clView :: !(Maybe CommentsListView)

94+ , _clPostId :: !Text

95+ , _clPageToken :: !(Maybe Text)

96+ , _clOAuthToken :: !(Maybe OAuthToken)

97+ , _clMaxResults :: !(Maybe Word32)

98+ , _clFields :: !(Maybe Text)

9999 } deriving (Eq,Show,Data,Typeable,Generic)

100100

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

@@ -135,7 +135,7 @@ commentsList'

135135 :: Text -- ^ 'blogId'

136136 -> Text -- ^ 'postId'

137137 -> CommentsList'

138−commentsList' pClBlogId_ pClPostId_ =

138+commentsList' pClBlogId_ pClPostId_ =

139139 CommentsList'

140140 { _clStatus = Nothing

141141 , _clQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/ListByBlog.hs+14−14

@@ -48,8 +48,8 @@ module Network.Google.Resource.Blogger.Comments.ListByBlog

4848 , clbbFields

4949 ) where

5050

51−import Network.Google.Blogger.Types

52−import Network.Google.Prelude

51+import Network.Google.Blogger.Types

52+import Network.Google.Prelude

5353

5454-- | A resource alias for @BloggerCommentsListByBlog@ which the

5555-- 'CommentsListByBlog'' request conforms to.

@@ -76,19 +76,19 @@ type CommentsListByBlogResource =

7676--

7777-- /See:/ 'commentsListByBlog'' smart constructor.

7878data CommentsListByBlog' = CommentsListByBlog'

79− { _clbbStatus :: !(Maybe [CommentsListByBlogStatus])

80− , _clbbQuotaUser :: !(Maybe Text)

79+ { _clbbStatus :: !(Maybe [CommentsListByBlogStatus])

80+ , _clbbQuotaUser :: !(Maybe Text)

8181 , _clbbPrettyPrint :: !Bool

82− , _clbbUserIP :: !(Maybe Text)

83− , _clbbEndDate :: !(Maybe DateTime')

84− , _clbbBlogId :: !Text

85− , _clbbStartDate :: !(Maybe DateTime')

86− , _clbbKey :: !(Maybe Key)

82+ , _clbbUserIP :: !(Maybe Text)

83+ , _clbbEndDate :: !(Maybe DateTime')

84+ , _clbbBlogId :: !Text

85+ , _clbbStartDate :: !(Maybe DateTime')

86+ , _clbbKey :: !(Maybe Key)

8787 , _clbbFetchBodies :: !(Maybe Bool)

88− , _clbbPageToken :: !(Maybe Text)

89− , _clbbOAuthToken :: !(Maybe OAuthToken)

90− , _clbbMaxResults :: !(Maybe Word32)

91− , _clbbFields :: !(Maybe Text)

88+ , _clbbPageToken :: !(Maybe Text)

89+ , _clbbOAuthToken :: !(Maybe OAuthToken)

90+ , _clbbMaxResults :: !(Maybe Word32)

91+ , _clbbFields :: !(Maybe Text)

9292 } deriving (Eq,Show,Data,Typeable,Generic)

9393

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

@@ -123,7 +123,7 @@ data CommentsListByBlog' = CommentsListByBlog'

123123commentsListByBlog'

124124 :: Text -- ^ 'blogId'

125125 -> CommentsListByBlog'

126−commentsListByBlog' pClbbBlogId_ =

126+commentsListByBlog' pClbbBlogId_ =

127127 CommentsListByBlog'

128128 { _clbbStatus = Nothing

129129 , _clbbQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/MarkAsSpam.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Comments.MarkAsSpam

4444 , cmasFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerCommentsMarkAsSpam@ which the

5151-- 'CommentsMarkAsSpam'' request conforms to.

@@ -69,15 +69,15 @@ type CommentsMarkAsSpamResource =

6969--

7070-- /See:/ 'commentsMarkAsSpam'' smart constructor.

7171data CommentsMarkAsSpam' = CommentsMarkAsSpam'

72− { _cmasQuotaUser :: !(Maybe Text)

72+ { _cmasQuotaUser :: !(Maybe Text)

7373 , _cmasPrettyPrint :: !Bool

74− , _cmasUserIP :: !(Maybe Text)

75− , _cmasBlogId :: !Text

76− , _cmasKey :: !(Maybe Key)

77− , _cmasPostId :: !Text

78− , _cmasOAuthToken :: !(Maybe OAuthToken)

79− , _cmasCommentId :: !Text

80− , _cmasFields :: !(Maybe Text)

74+ , _cmasUserIP :: !(Maybe Text)

75+ , _cmasBlogId :: !Text

76+ , _cmasKey :: !(Maybe Key)

77+ , _cmasPostId :: !Text

78+ , _cmasOAuthToken :: !(Maybe OAuthToken)

79+ , _cmasCommentId :: !Text

80+ , _cmasFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ commentsMarkAsSpam'

106106 -> Text -- ^ 'postId'

107107 -> Text -- ^ 'commentId'

108108 -> CommentsMarkAsSpam'

109−commentsMarkAsSpam' pCmasBlogId_ pCmasPostId_ pCmasCommentId_ =

109+commentsMarkAsSpam' pCmasBlogId_ pCmasPostId_ pCmasCommentId_ =

110110 CommentsMarkAsSpam'

111111 { _cmasQuotaUser = Nothing

112112 , _cmasPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/RemoveContent.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Comments.RemoveContent

4444 , crcFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerCommentsRemoveContent@ which the

5151-- 'CommentsRemoveContent'' request conforms to.

@@ -69,15 +69,15 @@ type CommentsRemoveContentResource =

6969--

7070-- /See:/ 'commentsRemoveContent'' smart constructor.

7171data CommentsRemoveContent' = CommentsRemoveContent'

72− { _crcQuotaUser :: !(Maybe Text)

72+ { _crcQuotaUser :: !(Maybe Text)

7373 , _crcPrettyPrint :: !Bool

74− , _crcUserIP :: !(Maybe Text)

75− , _crcBlogId :: !Text

76− , _crcKey :: !(Maybe Key)

77− , _crcPostId :: !Text

78− , _crcOAuthToken :: !(Maybe OAuthToken)

79− , _crcCommentId :: !Text

80− , _crcFields :: !(Maybe Text)

74+ , _crcUserIP :: !(Maybe Text)

75+ , _crcBlogId :: !Text

76+ , _crcKey :: !(Maybe Key)

77+ , _crcPostId :: !Text

78+ , _crcOAuthToken :: !(Maybe OAuthToken)

79+ , _crcCommentId :: !Text

80+ , _crcFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ commentsRemoveContent'

106106 -> Text -- ^ 'postId'

107107 -> Text -- ^ 'commentId'

108108 -> CommentsRemoveContent'

109−commentsRemoveContent' pCrcBlogId_ pCrcPostId_ pCrcCommentId_ =

109+commentsRemoveContent' pCrcBlogId_ pCrcPostId_ pCrcCommentId_ =

110110 CommentsRemoveContent'

111111 { _crcQuotaUser = Nothing

112112 , _crcPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/PageViews/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.PageViews.Get

4343 , pvgFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPageViewsGet@ which the

5050-- 'PageViewsGet'' request conforms to.

@@ -65,14 +65,14 @@ type PageViewsGetResource =

6565--

6666-- /See:/ 'pageViewsGet'' smart constructor.

6767data PageViewsGet' = PageViewsGet'

68− { _pvgQuotaUser :: !(Maybe Text)

68+ { _pvgQuotaUser :: !(Maybe Text)

6969 , _pvgPrettyPrint :: !Bool

70− , _pvgUserIP :: !(Maybe Text)

71− , _pvgBlogId :: !Text

72− , _pvgKey :: !(Maybe Key)

73− , _pvgRange :: !(Maybe [PageViewsGetRange])

74− , _pvgOAuthToken :: !(Maybe OAuthToken)

75− , _pvgFields :: !(Maybe Text)

70+ , _pvgUserIP :: !(Maybe Text)

71+ , _pvgBlogId :: !Text

72+ , _pvgKey :: !(Maybe Key)

73+ , _pvgRange :: !(Maybe [PageViewsGetRange])

74+ , _pvgOAuthToken :: !(Maybe OAuthToken)

75+ , _pvgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -97,7 +97,7 @@ data PageViewsGet' = PageViewsGet'

9797pageViewsGet'

9898 :: Text -- ^ 'blogId'

9999 -> PageViewsGet'

100−pageViewsGet' pPvgBlogId_ =

100+pageViewsGet' pPvgBlogId_ =

101101 PageViewsGet'

102102 { _pvgQuotaUser = Nothing

103103 , _pvgPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Pages.Delete

4343 , pddFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPagesDelete@ which the

5050-- 'PagesDelete'' request conforms to.

@@ -65,14 +65,14 @@ type PagesDeleteResource =

6565--

6666-- /See:/ 'pagesDelete'' smart constructor.

6767data PagesDelete' = PagesDelete'

68− { _pddQuotaUser :: !(Maybe Text)

68+ { _pddQuotaUser :: !(Maybe Text)

6969 , _pddPrettyPrint :: !Bool

70− , _pddUserIP :: !(Maybe Text)

71− , _pddBlogId :: !Text

72− , _pddPageId :: !Text

73− , _pddKey :: !(Maybe Key)

74− , _pddOAuthToken :: !(Maybe OAuthToken)

75− , _pddFields :: !(Maybe Text)

70+ , _pddUserIP :: !(Maybe Text)

71+ , _pddBlogId :: !Text

72+ , _pddPageId :: !Text

73+ , _pddKey :: !(Maybe Key)

74+ , _pddOAuthToken :: !(Maybe OAuthToken)

75+ , _pddFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ pagesDelete'

9898 :: Text -- ^ 'blogId'

9999 -> Text -- ^ 'pageId'

100100 -> PagesDelete'

101−pagesDelete' pPddBlogId_ pPddPageId_ =

101+pagesDelete' pPddBlogId_ pPddPageId_ =

102102 PagesDelete'

103103 { _pddQuotaUser = Nothing

104104 , _pddPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Pages.Get

4444 , pggFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerPagesGet@ which the

5151-- 'PagesGet'' request conforms to.

@@ -67,15 +67,15 @@ type PagesGetResource =

6767--

6868-- /See:/ 'pagesGet'' smart constructor.

6969data PagesGet' = PagesGet'

70− { _pggQuotaUser :: !(Maybe Text)

70+ { _pggQuotaUser :: !(Maybe Text)

7171 , _pggPrettyPrint :: !Bool

72− , _pggUserIP :: !(Maybe Text)

73− , _pggBlogId :: !Text

74− , _pggPageId :: !Text

75− , _pggKey :: !(Maybe Key)

76− , _pggView :: !(Maybe PagesGetView)

77− , _pggOAuthToken :: !(Maybe OAuthToken)

78− , _pggFields :: !(Maybe Text)

72+ , _pggUserIP :: !(Maybe Text)

73+ , _pggBlogId :: !Text

74+ , _pggPageId :: !Text

75+ , _pggKey :: !(Maybe Key)

76+ , _pggView :: !(Maybe PagesGetView)

77+ , _pggOAuthToken :: !(Maybe OAuthToken)

78+ , _pggFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -103,7 +103,7 @@ pagesGet'

103103 :: Text -- ^ 'blogId'

104104 -> Text -- ^ 'pageId'

105105 -> PagesGet'

106−pagesGet' pPggBlogId_ pPggPageId_ =

106+pagesGet' pPggBlogId_ pPggPageId_ =

107107 PagesGet'

108108 { _pggQuotaUser = Nothing

109109 , _pggPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Insert.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Blogger.Pages.Insert

4444 , piFields

4545 ) where

4646

47−import Network.Google.Blogger.Types

48−import Network.Google.Prelude

47+import Network.Google.Blogger.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @BloggerPagesInsert@ which the

5151-- 'PagesInsert'' request conforms to.

@@ -67,15 +67,15 @@ type PagesInsertResource =

6767--

6868-- /See:/ 'pagesInsert'' smart constructor.

6969data PagesInsert' = PagesInsert'

70− { _piQuotaUser :: !(Maybe Text)

70+ { _piQuotaUser :: !(Maybe Text)

7171 , _piPrettyPrint :: !Bool

72− , _piIsDraft :: !(Maybe Bool)

73− , _piUserIP :: !(Maybe Text)

74− , _piBlogId :: !Text

75− , _piPayload :: !Page

76− , _piKey :: !(Maybe Key)

77− , _piOAuthToken :: !(Maybe OAuthToken)

78− , _piFields :: !(Maybe Text)

72+ , _piIsDraft :: !(Maybe Bool)

73+ , _piUserIP :: !(Maybe Text)

74+ , _piBlogId :: !Text

75+ , _piPayload :: !Page

76+ , _piKey :: !(Maybe Key)

77+ , _piOAuthToken :: !(Maybe OAuthToken)

78+ , _piFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -103,7 +103,7 @@ pagesInsert'

103103 :: Text -- ^ 'blogId'

104104 -> Page -- ^ 'payload'

105105 -> PagesInsert'

106−pagesInsert' pPiBlogId_ pPiPayload_ =

106+pagesInsert' pPiBlogId_ pPiPayload_ =

107107 PagesInsert'

108108 { _piQuotaUser = Nothing

109109 , _piPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/List.hs+13−13

@@ -47,8 +47,8 @@ module Network.Google.Resource.Blogger.Pages.List

4747 , plFields

4848 ) where

4949

50−import Network.Google.Blogger.Types

51−import Network.Google.Prelude

50+import Network.Google.Blogger.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @BloggerPagesList@ which the

5454-- 'PagesList'' request conforms to.

@@ -74,18 +74,18 @@ type PagesListResource =

7474--

7575-- /See:/ 'pagesList'' smart constructor.

7676data PagesList' = PagesList'

77− { _plStatus :: !(Maybe [PagesListStatus])

78− , _plQuotaUser :: !(Maybe Text)

77+ { _plStatus :: !(Maybe [PagesListStatus])

78+ , _plQuotaUser :: !(Maybe Text)

7979 , _plPrettyPrint :: !Bool

80− , _plUserIP :: !(Maybe Text)

81− , _plBlogId :: !Text

82− , _plKey :: !(Maybe Key)

80+ , _plUserIP :: !(Maybe Text)

81+ , _plBlogId :: !Text

82+ , _plKey :: !(Maybe Key)

8383 , _plFetchBodies :: !(Maybe Bool)

84− , _plView :: !(Maybe PagesListView)

85− , _plPageToken :: !(Maybe Text)

86− , _plOAuthToken :: !(Maybe OAuthToken)

87− , _plMaxResults :: !(Maybe Word32)

88− , _plFields :: !(Maybe Text)

84+ , _plView :: !(Maybe PagesListView)

85+ , _plPageToken :: !(Maybe Text)

86+ , _plOAuthToken :: !(Maybe OAuthToken)

87+ , _plMaxResults :: !(Maybe Word32)

88+ , _plFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -118,7 +118,7 @@ data PagesList' = PagesList'

118118pagesList'

119119 :: Text -- ^ 'blogId'

120120 -> PagesList'

121−pagesList' pPlBlogId_ =

121+pagesList' pPlBlogId_ =

122122 PagesList'

123123 { _plStatus = Nothing

124124 , _plQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Patch.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Blogger.Pages.Patch

4646 , pagaFields

4747 ) where

4848

49−import Network.Google.Blogger.Types

50−import Network.Google.Prelude

49+import Network.Google.Blogger.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @BloggerPagesPatch@ which the

5353-- 'PagesPatch'' request conforms to.

@@ -71,17 +71,17 @@ type PagesPatchResource =

7171--

7272-- /See:/ 'pagesPatch'' smart constructor.

7373data PagesPatch' = PagesPatch'

74− { _pagaQuotaUser :: !(Maybe Text)

74+ { _pagaQuotaUser :: !(Maybe Text)

7575 , _pagaPrettyPrint :: !Bool

76− , _pagaUserIP :: !(Maybe Text)

77− , _pagaBlogId :: !Text

78− , _pagaPageId :: !Text

79− , _pagaPayload :: !Page

80− , _pagaKey :: !(Maybe Key)

81− , _pagaRevert :: !(Maybe Bool)

82− , _pagaOAuthToken :: !(Maybe OAuthToken)

83− , _pagaPublish :: !(Maybe Bool)

84− , _pagaFields :: !(Maybe Text)

76+ , _pagaUserIP :: !(Maybe Text)

77+ , _pagaBlogId :: !Text

78+ , _pagaPageId :: !Text

79+ , _pagaPayload :: !Page

80+ , _pagaKey :: !(Maybe Key)

81+ , _pagaRevert :: !(Maybe Bool)

82+ , _pagaOAuthToken :: !(Maybe OAuthToken)

83+ , _pagaPublish :: !(Maybe Bool)

84+ , _pagaFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -114,7 +114,7 @@ pagesPatch'

114114 -> Text -- ^ 'pageId'

115115 -> Page -- ^ 'payload'

116116 -> PagesPatch'

117−pagesPatch' pPagaBlogId_ pPagaPageId_ pPagaPayload_ =

117+pagesPatch' pPagaBlogId_ pPagaPageId_ pPagaPayload_ =

118118 PagesPatch'

119119 { _pagaQuotaUser = Nothing

120120 , _pagaPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Publish.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Pages.Publish

4343 , pppFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPagesPublish@ which the

5050-- 'PagesPublish'' request conforms to.

@@ -66,14 +66,14 @@ type PagesPublishResource =

6666--

6767-- /See:/ 'pagesPublish'' smart constructor.

6868data PagesPublish' = PagesPublish'

69− { _pppQuotaUser :: !(Maybe Text)

69+ { _pppQuotaUser :: !(Maybe Text)

7070 , _pppPrettyPrint :: !Bool

71− , _pppUserIP :: !(Maybe Text)

72− , _pppBlogId :: !Text

73− , _pppPageId :: !Text

74− , _pppKey :: !(Maybe Key)

75− , _pppOAuthToken :: !(Maybe OAuthToken)

76− , _pppFields :: !(Maybe Text)

71+ , _pppUserIP :: !(Maybe Text)

72+ , _pppBlogId :: !Text

73+ , _pppPageId :: !Text

74+ , _pppKey :: !(Maybe Key)

75+ , _pppOAuthToken :: !(Maybe OAuthToken)

76+ , _pppFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ pagesPublish'

9999 :: Text -- ^ 'blogId'

100100 -> Text -- ^ 'pageId'

101101 -> PagesPublish'

102−pagesPublish' pPppBlogId_ pPppPageId_ =

102+pagesPublish' pPppBlogId_ pPppPageId_ =

103103 PagesPublish'

104104 { _pppQuotaUser = Nothing

105105 , _pppPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Revert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Pages.Revert

4343 , pagFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPagesRevert@ which the

5050-- 'PagesRevert'' request conforms to.

@@ -66,14 +66,14 @@ type PagesRevertResource =

6666--

6767-- /See:/ 'pagesRevert'' smart constructor.

6868data PagesRevert' = PagesRevert'

69− { _pagQuotaUser :: !(Maybe Text)

69+ { _pagQuotaUser :: !(Maybe Text)

7070 , _pagPrettyPrint :: !Bool

71− , _pagUserIP :: !(Maybe Text)

72− , _pagBlogId :: !Text

73− , _pagPageId :: !Text

74− , _pagKey :: !(Maybe Key)

75− , _pagOAuthToken :: !(Maybe OAuthToken)

76− , _pagFields :: !(Maybe Text)

71+ , _pagUserIP :: !(Maybe Text)

72+ , _pagBlogId :: !Text

73+ , _pagPageId :: !Text

74+ , _pagKey :: !(Maybe Key)

75+ , _pagOAuthToken :: !(Maybe OAuthToken)

76+ , _pagFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ pagesRevert'

9999 :: Text -- ^ 'blogId'

100100 -> Text -- ^ 'pageId'

101101 -> PagesRevert'

102−pagesRevert' pPagBlogId_ pPagPageId_ =

102+pagesRevert' pPagBlogId_ pPagPageId_ =

103103 PagesRevert'

104104 { _pagQuotaUser = Nothing

105105 , _pagPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Update.hs+13−13

@@ -46,8 +46,8 @@ module Network.Google.Resource.Blogger.Pages.Update

4646 , puuFields

4747 ) where

4848

49−import Network.Google.Blogger.Types

50−import Network.Google.Prelude

49+import Network.Google.Blogger.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @BloggerPagesUpdate@ which the

5353-- 'PagesUpdate'' request conforms to.

@@ -71,17 +71,17 @@ type PagesUpdateResource =

7171--

7272-- /See:/ 'pagesUpdate'' smart constructor.

7373data PagesUpdate' = PagesUpdate'

74− { _puuQuotaUser :: !(Maybe Text)

74+ { _puuQuotaUser :: !(Maybe Text)

7575 , _puuPrettyPrint :: !Bool

76− , _puuUserIP :: !(Maybe Text)

77− , _puuBlogId :: !Text

78− , _puuPageId :: !Text

79− , _puuPayload :: !Page

80− , _puuKey :: !(Maybe Key)

81− , _puuRevert :: !(Maybe Bool)

82− , _puuOAuthToken :: !(Maybe OAuthToken)

83− , _puuPublish :: !(Maybe Bool)

84− , _puuFields :: !(Maybe Text)

76+ , _puuUserIP :: !(Maybe Text)

77+ , _puuBlogId :: !Text

78+ , _puuPageId :: !Text

79+ , _puuPayload :: !Page

80+ , _puuKey :: !(Maybe Key)

81+ , _puuRevert :: !(Maybe Bool)

82+ , _puuOAuthToken :: !(Maybe OAuthToken)

83+ , _puuPublish :: !(Maybe Bool)

84+ , _puuFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -114,7 +114,7 @@ pagesUpdate'

114114 -> Text -- ^ 'pageId'

115115 -> Page -- ^ 'payload'

116116 -> PagesUpdate'

117−pagesUpdate' pPuuBlogId_ pPuuPageId_ pPuuPayload_ =

117+pagesUpdate' pPuuBlogId_ pPuuPageId_ pPuuPayload_ =

118118 PagesUpdate'

119119 { _puuQuotaUser = Nothing

120120 , _puuPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/Get.hs+11−11

@@ -47,8 +47,8 @@ module Network.Google.Resource.Blogger.PostUserInfos.Get

4747 , puigFields

4848 ) where

4949

50−import Network.Google.Blogger.Types

51−import Network.Google.Prelude

50+import Network.Google.Blogger.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @BloggerPostUserInfosGet@ which the

5454-- 'PostUserInfosGet'' request conforms to.

@@ -75,16 +75,16 @@ type PostUserInfosGetResource =

7575--

7676-- /See:/ 'postUserInfosGet'' smart constructor.

7777data PostUserInfosGet' = PostUserInfosGet'

78− { _puigQuotaUser :: !(Maybe Text)

78+ { _puigQuotaUser :: !(Maybe Text)

7979 , _puigPrettyPrint :: !Bool

80− , _puigUserIP :: !(Maybe Text)

81− , _puigBlogId :: !Text

80+ , _puigUserIP :: !(Maybe Text)

81+ , _puigBlogId :: !Text

8282 , _puigMaxComments :: !(Maybe Word32)

83− , _puigUserId :: !Text

84− , _puigKey :: !(Maybe Key)

85− , _puigPostId :: !Text

86− , _puigOAuthToken :: !(Maybe OAuthToken)

87− , _puigFields :: !(Maybe Text)

83+ , _puigUserId :: !Text

84+ , _puigKey :: !(Maybe Key)

85+ , _puigPostId :: !Text

86+ , _puigOAuthToken :: !(Maybe OAuthToken)

87+ , _puigFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -115,7 +115,7 @@ postUserInfosGet'

115115 -> Text -- ^ 'userId'

116116 -> Text -- ^ 'postId'

117117 -> PostUserInfosGet'

118−postUserInfosGet' pPuigBlogId_ pPuigUserId_ pPuigPostId_ =

118+postUserInfosGet' pPuigBlogId_ pPuigUserId_ pPuigPostId_ =

119119 PostUserInfosGet'

120120 { _puigQuotaUser = Nothing

121121 , _puigPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/List.hs+18−18

@@ -54,8 +54,8 @@ module Network.Google.Resource.Blogger.PostUserInfos.List

5454 , puilFields

5555 ) where

5656

57−import Network.Google.Blogger.Types

58−import Network.Google.Prelude

57+import Network.Google.Blogger.Types

58+import Network.Google.Prelude

5959

6060-- | A resource alias for @BloggerPostUserInfosList@ which the

6161-- 'PostUserInfosList'' request conforms to.

@@ -90,23 +90,23 @@ type PostUserInfosListResource =

9090--

9191-- /See:/ 'postUserInfosList'' smart constructor.

9292data PostUserInfosList' = PostUserInfosList'

93− { _puilStatus :: !(Maybe [PostUserInfosListStatus])

94− , _puilQuotaUser :: !(Maybe Text)

93+ { _puilStatus :: !(Maybe [PostUserInfosListStatus])

94+ , _puilQuotaUser :: !(Maybe Text)

9595 , _puilPrettyPrint :: !Bool

96− , _puilOrderBy :: !PostUserInfosListOrderBy

97− , _puilUserIP :: !(Maybe Text)

98− , _puilEndDate :: !(Maybe DateTime')

99− , _puilBlogId :: !Text

100− , _puilUserId :: !Text

101− , _puilStartDate :: !(Maybe DateTime')

102− , _puilKey :: !(Maybe Key)

96+ , _puilOrderBy :: !PostUserInfosListOrderBy

97+ , _puilUserIP :: !(Maybe Text)

98+ , _puilEndDate :: !(Maybe DateTime')

99+ , _puilBlogId :: !Text

100+ , _puilUserId :: !Text

101+ , _puilStartDate :: !(Maybe DateTime')

102+ , _puilKey :: !(Maybe Key)

103103 , _puilFetchBodies :: !Bool

104− , _puilView :: !(Maybe PostUserInfosListView)

105− , _puilLabels :: !(Maybe Text)

106− , _puilPageToken :: !(Maybe Text)

107− , _puilOAuthToken :: !(Maybe OAuthToken)

108− , _puilMaxResults :: !(Maybe Word32)

109− , _puilFields :: !(Maybe Text)

104+ , _puilView :: !(Maybe PostUserInfosListView)

105+ , _puilLabels :: !(Maybe Text)

106+ , _puilPageToken :: !(Maybe Text)

107+ , _puilOAuthToken :: !(Maybe OAuthToken)

108+ , _puilMaxResults :: !(Maybe Word32)

109+ , _puilFields :: !(Maybe Text)

110110 } deriving (Eq,Show,Data,Typeable,Generic)

111111

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

@@ -150,7 +150,7 @@ postUserInfosList'

150150 :: Text -- ^ 'blogId'

151151 -> Text -- ^ 'userId'

152152 -> PostUserInfosList'

153−postUserInfosList' pPuilBlogId_ pPuilUserId_ =

153+postUserInfosList' pPuilBlogId_ pPuilUserId_ =

154154 PostUserInfosList'

155155 { _puilStatus = Nothing

156156 , _puilQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Posts.Delete

4343 , pdFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPostsDelete@ which the

5050-- 'PostsDelete'' request conforms to.

@@ -65,14 +65,14 @@ type PostsDeleteResource =

6565--

6666-- /See:/ 'postsDelete'' smart constructor.

6767data PostsDelete' = PostsDelete'

68− { _pdQuotaUser :: !(Maybe Text)

68+ { _pdQuotaUser :: !(Maybe Text)

6969 , _pdPrettyPrint :: !Bool

70− , _pdUserIP :: !(Maybe Text)

71− , _pdBlogId :: !Text

72− , _pdKey :: !(Maybe Key)

73− , _pdPostId :: !Text

74− , _pdOAuthToken :: !(Maybe OAuthToken)

75− , _pdFields :: !(Maybe Text)

70+ , _pdUserIP :: !(Maybe Text)

71+ , _pdBlogId :: !Text

72+ , _pdKey :: !(Maybe Key)

73+ , _pdPostId :: !Text

74+ , _pdOAuthToken :: !(Maybe OAuthToken)

75+ , _pdFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ postsDelete'

9898 :: Text -- ^ 'blogId'

9999 -> Text -- ^ 'postId'

100100 -> PostsDelete'

101−postsDelete' pPdBlogId_ pPdPostId_ =

101+postsDelete' pPdBlogId_ pPdPostId_ =

102102 PostsDelete'

103103 { _pdQuotaUser = Nothing

104104 , _pdPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Get.hs+12−12

@@ -47,8 +47,8 @@ module Network.Google.Resource.Blogger.Posts.Get

4747 , pgFields

4848 ) where

4949

50−import Network.Google.Blogger.Types

51−import Network.Google.Prelude

50+import Network.Google.Blogger.Types

51+import Network.Google.Prelude

5252

5353-- | A resource alias for @BloggerPostsGet@ which the

5454-- 'PostsGet'' request conforms to.

@@ -73,18 +73,18 @@ type PostsGetResource =

7373--

7474-- /See:/ 'postsGet'' smart constructor.

7575data PostsGet' = PostsGet'

76− { _pgFetchBody :: !Bool

77− , _pgQuotaUser :: !(Maybe Text)

76+ { _pgFetchBody :: !Bool

77+ , _pgQuotaUser :: !(Maybe Text)

7878 , _pgPrettyPrint :: !Bool

79− , _pgUserIP :: !(Maybe Text)

79+ , _pgUserIP :: !(Maybe Text)

8080 , _pgFetchImages :: !(Maybe Bool)

81− , _pgBlogId :: !Text

81+ , _pgBlogId :: !Text

8282 , _pgMaxComments :: !(Maybe Word32)

83− , _pgKey :: !(Maybe Key)

84− , _pgView :: !(Maybe PostsGetView)

85− , _pgPostId :: !Text

86− , _pgOAuthToken :: !(Maybe OAuthToken)

87− , _pgFields :: !(Maybe Text)

83+ , _pgKey :: !(Maybe Key)

84+ , _pgView :: !(Maybe PostsGetView)

85+ , _pgPostId :: !Text

86+ , _pgOAuthToken :: !(Maybe OAuthToken)

87+ , _pgFields :: !(Maybe Text)

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

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

@@ -118,7 +118,7 @@ postsGet'

118118 :: Text -- ^ 'blogId'

119119 -> Text -- ^ 'postId'

120120 -> PostsGet'

121−postsGet' pPgBlogId_ pPgPostId_ =

121+postsGet' pPgBlogId_ pPgPostId_ =

122122 PostsGet'

123123 { _pgFetchBody = True

124124 , _pgQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/GetByPath.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.Blogger.Posts.GetByPath

4545 , pgbpFields

4646 ) where

4747

48−import Network.Google.Blogger.Types

49−import Network.Google.Prelude

48+import Network.Google.Blogger.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @BloggerPostsGetByPath@ which the

5252-- 'PostsGetByPath'' request conforms to.

@@ -70,16 +70,16 @@ type PostsGetByPathResource =

7070--

7171-- /See:/ 'postsGetByPath'' smart constructor.

7272data PostsGetByPath' = PostsGetByPath'

73− { _pgbpQuotaUser :: !(Maybe Text)

73+ { _pgbpQuotaUser :: !(Maybe Text)

7474 , _pgbpPrettyPrint :: !Bool

75− , _pgbpPath :: !Text

76− , _pgbpUserIP :: !(Maybe Text)

77− , _pgbpBlogId :: !Text

75+ , _pgbpPath :: !Text

76+ , _pgbpUserIP :: !(Maybe Text)

77+ , _pgbpBlogId :: !Text

7878 , _pgbpMaxComments :: !(Maybe Word32)

79− , _pgbpKey :: !(Maybe Key)

80− , _pgbpView :: !(Maybe PostsGetByPathView)

81− , _pgbpOAuthToken :: !(Maybe OAuthToken)

82− , _pgbpFields :: !(Maybe Text)

79+ , _pgbpKey :: !(Maybe Key)

80+ , _pgbpView :: !(Maybe PostsGetByPathView)

81+ , _pgbpOAuthToken :: !(Maybe OAuthToken)

82+ , _pgbpFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -109,7 +109,7 @@ postsGetByPath'

109109 :: Text -- ^ 'path'

110110 -> Text -- ^ 'blogId'

111111 -> PostsGetByPath'

112−postsGetByPath' pPgbpPath_ pPgbpBlogId_ =

112+postsGetByPath' pPgbpPath_ pPgbpBlogId_ =

113113 PostsGetByPath'

114114 { _pgbpQuotaUser = Nothing

115115 , _pgbpPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Insert.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.Blogger.Posts.Insert

4646 , piiFields

4747 ) where

4848

49−import Network.Google.Blogger.Types

50−import Network.Google.Prelude

49+import Network.Google.Blogger.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @BloggerPostsInsert@ which the

5353-- 'PostsInsert'' request conforms to.

@@ -71,17 +71,17 @@ type PostsInsertResource =

7171--

7272-- /See:/ 'postsInsert'' smart constructor.

7373data PostsInsert' = PostsInsert'

74− { _piiFetchBody :: !Bool

75− , _piiQuotaUser :: !(Maybe Text)

74+ { _piiFetchBody :: !Bool

75+ , _piiQuotaUser :: !(Maybe Text)

7676 , _piiPrettyPrint :: !Bool

77− , _piiIsDraft :: !(Maybe Bool)

78− , _piiUserIP :: !(Maybe Text)

77+ , _piiIsDraft :: !(Maybe Bool)

78+ , _piiUserIP :: !(Maybe Text)

7979 , _piiFetchImages :: !(Maybe Bool)

80− , _piiBlogId :: !Text

81− , _piiPayload :: !Post'

82− , _piiKey :: !(Maybe Key)

83− , _piiOAuthToken :: !(Maybe OAuthToken)

84− , _piiFields :: !(Maybe Text)

80+ , _piiBlogId :: !Text

81+ , _piiPayload :: !Post'

82+ , _piiKey :: !(Maybe Key)

83+ , _piiOAuthToken :: !(Maybe OAuthToken)

84+ , _piiFields :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

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

@@ -113,7 +113,7 @@ postsInsert'

113113 :: Text -- ^ 'blogId'

114114 -> Post' -- ^ 'payload'

115115 -> PostsInsert'

116−postsInsert' pPiiBlogId_ pPiiPayload_ =

116+postsInsert' pPiiBlogId_ pPiiPayload_ =

117117 PostsInsert'

118118 { _piiFetchBody = True

119119 , _piiQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/List.hs+17−17

@@ -52,8 +52,8 @@ module Network.Google.Resource.Blogger.Posts.List

5252 , pllFields

5353 ) where

5454

55−import Network.Google.Blogger.Types

56−import Network.Google.Prelude

55+import Network.Google.Blogger.Types

56+import Network.Google.Prelude

5757

5858-- | A resource alias for @BloggerPostsList@ which the

5959-- 'PostsList'' request conforms to.

@@ -84,23 +84,23 @@ type PostsListResource =

8484--

8585-- /See:/ 'postsList'' smart constructor.

8686data PostsList' = PostsList'

87− { _pllStatus :: !(Maybe [PostsListStatus])

88− , _pllQuotaUser :: !(Maybe Text)

87+ { _pllStatus :: !(Maybe [PostsListStatus])

88+ , _pllQuotaUser :: !(Maybe Text)

8989 , _pllPrettyPrint :: !Bool

90− , _pllOrderBy :: !PostsListOrderBy

91− , _pllUserIP :: !(Maybe Text)

90+ , _pllOrderBy :: !PostsListOrderBy

91+ , _pllUserIP :: !(Maybe Text)

9292 , _pllFetchImages :: !(Maybe Bool)

93− , _pllEndDate :: !(Maybe DateTime')

94− , _pllBlogId :: !Text

95− , _pllStartDate :: !(Maybe DateTime')

96− , _pllKey :: !(Maybe Key)

93+ , _pllEndDate :: !(Maybe DateTime')

94+ , _pllBlogId :: !Text

95+ , _pllStartDate :: !(Maybe DateTime')

96+ , _pllKey :: !(Maybe Key)

9797 , _pllFetchBodies :: !Bool

98− , _pllView :: !(Maybe PostsListView)

99− , _pllLabels :: !(Maybe Text)

100− , _pllPageToken :: !(Maybe Text)

101− , _pllOAuthToken :: !(Maybe OAuthToken)

102− , _pllMaxResults :: !(Maybe Word32)

103− , _pllFields :: !(Maybe Text)

98+ , _pllView :: !(Maybe PostsListView)

99+ , _pllLabels :: !(Maybe Text)

100+ , _pllPageToken :: !(Maybe Text)

101+ , _pllOAuthToken :: !(Maybe OAuthToken)

102+ , _pllMaxResults :: !(Maybe Word32)

103+ , _pllFields :: !(Maybe Text)

104104 } deriving (Eq,Show,Data,Typeable,Generic)

105105

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

@@ -143,7 +143,7 @@ data PostsList' = PostsList'

143143postsList'

144144 :: Text -- ^ 'blogId'

145145 -> PostsList'

146−postsList' pPllBlogId_ =

146+postsList' pPllBlogId_ =

147147 PostsList'

148148 { _pllStatus = Nothing

149149 , _pllQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Patch.hs+14−14

@@ -49,8 +49,8 @@ module Network.Google.Resource.Blogger.Posts.Patch

4949 , ppFields

5050 ) where

5151

52−import Network.Google.Blogger.Types

53−import Network.Google.Prelude

52+import Network.Google.Blogger.Types

53+import Network.Google.Prelude

5454

5555-- | A resource alias for @BloggerPostsPatch@ which the

5656-- 'PostsPatch'' request conforms to.

@@ -78,20 +78,20 @@ type PostsPatchResource =

7878--

7979-- /See:/ 'postsPatch'' smart constructor.

8080data PostsPatch' = PostsPatch'

81− { _ppFetchBody :: !Bool

82− , _ppQuotaUser :: !(Maybe Text)

81+ { _ppFetchBody :: !Bool

82+ , _ppQuotaUser :: !(Maybe Text)

8383 , _ppPrettyPrint :: !Bool

84− , _ppUserIP :: !(Maybe Text)

84+ , _ppUserIP :: !(Maybe Text)

8585 , _ppFetchImages :: !(Maybe Bool)

86− , _ppBlogId :: !Text

87− , _ppPayload :: !Post'

86+ , _ppBlogId :: !Text

87+ , _ppPayload :: !Post'

8888 , _ppMaxComments :: !(Maybe Word32)

89− , _ppKey :: !(Maybe Key)

90− , _ppRevert :: !(Maybe Bool)

91− , _ppPostId :: !Text

92− , _ppOAuthToken :: !(Maybe OAuthToken)

93− , _ppPublish :: !(Maybe Bool)

94− , _ppFields :: !(Maybe Text)

89+ , _ppKey :: !(Maybe Key)

90+ , _ppRevert :: !(Maybe Bool)

91+ , _ppPostId :: !Text

92+ , _ppOAuthToken :: !(Maybe OAuthToken)

93+ , _ppPublish :: !(Maybe Bool)

94+ , _ppFields :: !(Maybe Text)

9595 } deriving (Eq,Show,Data,Typeable,Generic)

9696

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

@@ -130,7 +130,7 @@ postsPatch'

130130 -> Post' -- ^ 'payload'

131131 -> Text -- ^ 'postId'

132132 -> PostsPatch'

133−postsPatch' pPpBlogId_ pPpPayload_ pPpPostId_ =

133+postsPatch' pPpBlogId_ pPpPayload_ pPpPostId_ =

134134 PostsPatch'

135135 { _ppFetchBody = True

136136 , _ppQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Publish.hs+10−10

@@ -45,8 +45,8 @@ module Network.Google.Resource.Blogger.Posts.Publish

4545 , posFields

4646 ) where

4747

48−import Network.Google.Blogger.Types

49−import Network.Google.Prelude

48+import Network.Google.Blogger.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @BloggerPostsPublish@ which the

5252-- 'PostsPublish'' request conforms to.

@@ -70,15 +70,15 @@ type PostsPublishResource =

7070--

7171-- /See:/ 'postsPublish'' smart constructor.

7272data PostsPublish' = PostsPublish'

73− { _posQuotaUser :: !(Maybe Text)

73+ { _posQuotaUser :: !(Maybe Text)

7474 , _posPrettyPrint :: !Bool

7575 , _posPublishDate :: !(Maybe DateTime')

76− , _posUserIP :: !(Maybe Text)

77− , _posBlogId :: !Text

78− , _posKey :: !(Maybe Key)

79− , _posPostId :: !Text

80− , _posOAuthToken :: !(Maybe OAuthToken)

81− , _posFields :: !(Maybe Text)

76+ , _posUserIP :: !(Maybe Text)

77+ , _posBlogId :: !Text

78+ , _posKey :: !(Maybe Key)

79+ , _posPostId :: !Text

80+ , _posOAuthToken :: !(Maybe OAuthToken)

81+ , _posFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -106,7 +106,7 @@ postsPublish'

106106 :: Text -- ^ 'blogId'

107107 -> Text -- ^ 'postId'

108108 -> PostsPublish'

109−postsPublish' pPosBlogId_ pPosPostId_ =

109+postsPublish' pPosBlogId_ pPosPostId_ =

110110 PostsPublish'

111111 { _posQuotaUser = Nothing

112112 , _posPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Revert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Blogger.Posts.Revert

4343 , prFields

4444 ) where

4545

46−import Network.Google.Blogger.Types

47−import Network.Google.Prelude

46+import Network.Google.Blogger.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @BloggerPostsRevert@ which the

5050-- 'PostsRevert'' request conforms to.

@@ -66,14 +66,14 @@ type PostsRevertResource =

6666--

6767-- /See:/ 'postsRevert'' smart constructor.

6868data PostsRevert' = PostsRevert'

69− { _prQuotaUser :: !(Maybe Text)

69+ { _prQuotaUser :: !(Maybe Text)

7070 , _prPrettyPrint :: !Bool

71− , _prUserIP :: !(Maybe Text)

72− , _prBlogId :: !Text

73− , _prKey :: !(Maybe Key)

74− , _prPostId :: !Text

75− , _prOAuthToken :: !(Maybe OAuthToken)

76− , _prFields :: !(Maybe Text)

71+ , _prUserIP :: !(Maybe Text)

72+ , _prBlogId :: !Text

73+ , _prKey :: !(Maybe Key)

74+ , _prPostId :: !Text

75+ , _prOAuthToken :: !(Maybe OAuthToken)

76+ , _prFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ postsRevert'

9999 :: Text -- ^ 'blogId'

100100 -> Text -- ^ 'postId'

101101 -> PostsRevert'

102−postsRevert' pPrBlogId_ pPrPostId_ =

102+postsRevert' pPrBlogId_ pPrPostId_ =

103103 PostsRevert'

104104 { _prQuotaUser = Nothing

105105 , _prPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Search.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.Blogger.Posts.Search

4545 , psFields

4646 ) where

4747

48−import Network.Google.Blogger.Types

49−import Network.Google.Prelude

48+import Network.Google.Blogger.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @BloggerPostsSearch@ which the

5252-- 'PostsSearch'' request conforms to.

@@ -70,16 +70,16 @@ type PostsSearchResource =

7070--

7171-- /See:/ 'postsSearch'' smart constructor.

7272data PostsSearch' = PostsSearch'

73− { _psQuotaUser :: !(Maybe Text)

73+ { _psQuotaUser :: !(Maybe Text)

7474 , _psPrettyPrint :: !Bool

75− , _psOrderBy :: !PostsSearchOrderBy

76− , _psUserIP :: !(Maybe Text)

77− , _psBlogId :: !Text

78− , _psQ :: !Text

79− , _psKey :: !(Maybe Key)

75+ , _psOrderBy :: !PostsSearchOrderBy

76+ , _psUserIP :: !(Maybe Text)

77+ , _psBlogId :: !Text

78+ , _psQ :: !Text

79+ , _psKey :: !(Maybe Key)

8080 , _psFetchBodies :: !Bool

81− , _psOAuthToken :: !(Maybe OAuthToken)

82− , _psFields :: !(Maybe Text)

81+ , _psOAuthToken :: !(Maybe OAuthToken)

82+ , _psFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -109,7 +109,7 @@ postsSearch'

109109 :: Text -- ^ 'blogId'

110110 -> Text -- ^ 'q'

111111 -> PostsSearch'

112−postsSearch' pPsBlogId_ pPsQ_ =

112+postsSearch' pPsBlogId_ pPsQ_ =

113113 PostsSearch'

114114 { _psQuotaUser = Nothing

115115 , _psPrettyPrint = True

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Update.hs+14−14

@@ -49,8 +49,8 @@ module Network.Google.Resource.Blogger.Posts.Update

4949 , puFields

5050 ) where

5151

52−import Network.Google.Blogger.Types

53−import Network.Google.Prelude

52+import Network.Google.Blogger.Types

53+import Network.Google.Prelude

5454

5555-- | A resource alias for @BloggerPostsUpdate@ which the

5656-- 'PostsUpdate'' request conforms to.

@@ -77,20 +77,20 @@ type PostsUpdateResource =

7777--

7878-- /See:/ 'postsUpdate'' smart constructor.

7979data PostsUpdate' = PostsUpdate'

80− { _puFetchBody :: !Bool

81− , _puQuotaUser :: !(Maybe Text)

80+ { _puFetchBody :: !Bool

81+ , _puQuotaUser :: !(Maybe Text)

8282 , _puPrettyPrint :: !Bool

83− , _puUserIP :: !(Maybe Text)

83+ , _puUserIP :: !(Maybe Text)

8484 , _puFetchImages :: !(Maybe Bool)

85− , _puBlogId :: !Text

86− , _puPayload :: !Post'

85+ , _puBlogId :: !Text

86+ , _puPayload :: !Post'

8787 , _puMaxComments :: !(Maybe Word32)

88− , _puKey :: !(Maybe Key)

89− , _puRevert :: !(Maybe Bool)

90− , _puPostId :: !Text

91− , _puOAuthToken :: !(Maybe OAuthToken)

92− , _puPublish :: !(Maybe Bool)

93− , _puFields :: !(Maybe Text)

88+ , _puKey :: !(Maybe Key)

89+ , _puRevert :: !(Maybe Bool)

90+ , _puPostId :: !Text

91+ , _puOAuthToken :: !(Maybe OAuthToken)

92+ , _puPublish :: !(Maybe Bool)

93+ , _puFields :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

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

@@ -129,7 +129,7 @@ postsUpdate'

129129 -> Post' -- ^ 'payload'

130130 -> Text -- ^ 'postId'

131131 -> PostsUpdate'

132−postsUpdate' pPuBlogId_ pPuPayload_ pPuPostId_ =

132+postsUpdate' pPuBlogId_ pPuPayload_ pPuPostId_ =

133133 PostsUpdate'

134134 { _puFetchBody = True

135135 , _puQuotaUser = Nothing

gogol-blogger/gen/Network/Google/Resource/Blogger/Users/Get.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.Blogger.Users.Get

4242 , ugFields

4343 ) where

4444

45−import Network.Google.Blogger.Types

46−import Network.Google.Prelude

45+import Network.Google.Blogger.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @BloggerUsersGet@ which the

4949-- 'UsersGet'' request conforms to.

@@ -62,13 +62,13 @@ type UsersGetResource =

6262--

6363-- /See:/ 'usersGet'' smart constructor.

6464data UsersGet' = UsersGet'

65− { _ugQuotaUser :: !(Maybe Text)

65+ { _ugQuotaUser :: !(Maybe Text)

6666 , _ugPrettyPrint :: !Bool

67− , _ugUserIP :: !(Maybe Text)

68− , _ugUserId :: !Text

69− , _ugKey :: !(Maybe Key)

70− , _ugOAuthToken :: !(Maybe OAuthToken)

71− , _ugFields :: !(Maybe Text)

67+ , _ugUserIP :: !(Maybe Text)

68+ , _ugUserId :: !Text

69+ , _ugKey :: !(Maybe Key)

70+ , _ugOAuthToken :: !(Maybe OAuthToken)

71+ , _ugFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data UsersGet' = UsersGet'

9191usersGet'

9292 :: Text -- ^ 'userId'

9393 -> UsersGet'

94−usersGet' pUgUserId_ =

94+usersGet' pUgUserId_ =

9595 UsersGet'

9696 { _ugQuotaUser = Nothing

9797 , _ugPrettyPrint = True

gogol-civicinfo/gen/Network/Google/CivicInfo.hs+7−7

@@ -270,13 +270,13 @@ module Network.Google.CivicInfo

270270 , offParty

271271 ) where

272272

273−import Network.Google.CivicInfo.Types

274−import Network.Google.Prelude

275−import Network.Google.Resource.CivicInfo.Divisions.Search

276−import Network.Google.Resource.CivicInfo.Elections.ElectionQuery

277−import Network.Google.Resource.CivicInfo.Elections.VoterInfoQuery

278−import Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByAddress

279−import Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByDivision

273+import Network.Google.Prelude

274+import Network.Google.CivicInfo.Types

275+import Network.Google.Resource.CivicInfo.Divisions.Search

276+import Network.Google.Resource.CivicInfo.Elections.ElectionQuery

277+import Network.Google.Resource.CivicInfo.Elections.VoterInfoQuery

278+import Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByAddress

279+import Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByDivision

280280

281281{- $resources

282282TODO

gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+3−3

@@ -244,9 +244,9 @@ module Network.Google.CivicInfo.Types

244244 , offParty

245245 ) where

246246

247−import Network.Google.CivicInfo.Types.Product

248−import Network.Google.CivicInfo.Types.Sum

249−import Network.Google.Prelude

247+import Network.Google.CivicInfo.Types.Product

248+import Network.Google.CivicInfo.Types.Sum

249+import Network.Google.Prelude

250250

251251-- | URL referring to version 'v2' of the Google Civic Information API.

252252civicInfoURL :: BaseUrl

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+128−128

@@ -17,14 +17,14 @@

1717--

1818module Network.Google.CivicInfo.Types.Product where

1919

20−import Network.Google.CivicInfo.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.CivicInfo.Types.Sum

21+import Network.Google.Prelude

2222

2323-- | Political geographic divisions that contain the requested address.

2424--

2525-- /See:/ 'representativeInfoResponseDivisions' smart constructor.

2626data RepresentativeInfoResponseDivisions =

27− RepresentativeInfoResponseDivisions

27+ RepresentativeInfoResponseDivisions

2828 deriving (Eq,Show,Data,Typeable,Generic)

2929

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

@@ -41,23 +41,23 @@ instance FromJSON RepresentativeInfoResponseDivisions

4141

4242instance ToJSON RepresentativeInfoResponseDivisions

4343 where

44− toJSON = const (Object mempty)

44+ toJSON = const emptyObject

4545

4646-- | The result of a voter info lookup query.

4747--

4848-- /See:/ 'voterInfoResponse' smart constructor.

4949data VoterInfoResponse = VoterInfoResponse

50− { _virOtherElections :: !(Maybe [Election])

51− , _virContests :: !(Maybe [Contest])

52− , _virState :: !(Maybe [AdministrationRegion])

53− , _virKind :: !Text

50+ { _virOtherElections :: !(Maybe [Election])

51+ , _virContests :: !(Maybe [Contest])

52+ , _virState :: !(Maybe [AdministrationRegion])

53+ , _virKind :: !Text

5454 , _virDropOffLocations :: !(Maybe [PollingLocation])

55− , _virElection :: !(Maybe Election)

56− , _virNormalizedInput :: !(Maybe SimpleAddressType)

57− , _virMailOnly :: !(Maybe Bool)

58− , _virEarlyVoteSites :: !(Maybe [PollingLocation])

55+ , _virElection :: !(Maybe Election)

56+ , _virNormalizedInput :: !(Maybe SimpleAddressType)

57+ , _virMailOnly :: !(Maybe Bool)

58+ , _virEarlyVoteSites :: !(Maybe [PollingLocation])

5959 , _virPollingLocations :: !(Maybe [PollingLocation])

60− , _virPrecinctId :: !(Maybe Text)

60+ , _virPrecinctId :: !(Maybe Text)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

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

@@ -87,7 +87,7 @@ data VoterInfoResponse = VoterInfoResponse

8787-- * 'virPrecinctId'

8888voterInfoResponse

8989 :: VoterInfoResponse

90−voterInfoResponse =

90+voterInfoResponse =

9191 VoterInfoResponse

9292 { _virOtherElections = Nothing

9393 , _virContests = Nothing

@@ -224,14 +224,14 @@ instance ToJSON VoterInfoResponse where

224224-- /See:/ 'pollingLocation' smart constructor.

225225data PollingLocation = PollingLocation

226226 { _plVoterServices :: !(Maybe Text)

227− , _plEndDate :: !(Maybe Text)

228− , _plSources :: !(Maybe [Source])

229− , _plAddress :: !(Maybe SimpleAddressType)

230− , _plStartDate :: !(Maybe Text)

231− , _plPollingHours :: !(Maybe Text)

232− , _plName :: !(Maybe Text)

233− , _plId :: !(Maybe Text)

234− , _plNotes :: !(Maybe Text)

227+ , _plEndDate :: !(Maybe Text)

228+ , _plSources :: !(Maybe [Source])

229+ , _plAddress :: !(Maybe SimpleAddressType)

230+ , _plStartDate :: !(Maybe Text)

231+ , _plPollingHours :: !(Maybe Text)

232+ , _plName :: !(Maybe Text)

233+ , _plId :: !(Maybe Text)

234+ , _plNotes :: !(Maybe Text)

235235 } deriving (Eq,Show,Data,Typeable,Generic)

236236

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

@@ -257,7 +257,7 @@ data PollingLocation = PollingLocation

257257-- * 'plNotes'

258258pollingLocation

259259 :: PollingLocation

260−pollingLocation =

260+pollingLocation =

261261 PollingLocation

262262 { _plVoterServices = Nothing

263263 , _plEndDate = Nothing

@@ -354,9 +354,9 @@ instance ToJSON PollingLocation where

354354--

355355-- /See:/ 'geographicDivision' smart constructor.

356356data GeographicDivision = GeographicDivision

357− { _gdName :: !(Maybe Text)

357+ { _gdName :: !(Maybe Text)

358358 , _gdOfficeIndices :: !(Maybe [Word32])

359− , _gdAlsoKnownAs :: !(Maybe [Text])

359+ , _gdAlsoKnownAs :: !(Maybe [Text])

360360 } deriving (Eq,Show,Data,Typeable,Generic)

361361

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

@@ -370,7 +370,7 @@ data GeographicDivision = GeographicDivision

370370-- * 'gdAlsoKnownAs'

371371geographicDivision

372372 :: GeographicDivision

373−geographicDivision =

373+geographicDivision =

374374 GeographicDivision

375375 { _gdName = Nothing

376376 , _gdOfficeIndices = Nothing

@@ -427,14 +427,14 @@ instance ToJSON GeographicDivision where

427427--

428428-- /See:/ 'candidate' smart constructor.

429429data Candidate = Candidate

430− { _cEmail :: !(Maybe Text)

431− , _cPhone :: !(Maybe Text)

432− , _cPhotoURL :: !(Maybe Text)

433− , _cChannels :: !(Maybe [Channel])

434− , _cCandidateURL :: !(Maybe Text)

430+ { _cEmail :: !(Maybe Text)

431+ , _cPhone :: !(Maybe Text)

432+ , _cPhotoURL :: !(Maybe Text)

433+ , _cChannels :: !(Maybe [Channel])

434+ , _cCandidateURL :: !(Maybe Text)

435435 , _cOrderOnBallot :: !(Maybe Int64)

436− , _cName :: !(Maybe Text)

437− , _cParty :: !(Maybe Text)

436+ , _cName :: !(Maybe Text)

437+ , _cParty :: !(Maybe Text)

438438 } deriving (Eq,Show,Data,Typeable,Generic)

439439

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

@@ -458,7 +458,7 @@ data Candidate = Candidate

458458-- * 'cParty'

459459candidate

460460 :: Candidate

461−candidate =

461+candidate =

462462 Candidate

463463 { _cEmail = Nothing

464464 , _cPhone = Nothing

@@ -538,12 +538,12 @@ instance ToJSON Candidate where

538538--

539539-- /See:/ 'office' smart constructor.

540540data Office = Office

541− { _oDivisionId :: !(Maybe Text)

542− , _oRoles :: !(Maybe [Text])

541+ { _oDivisionId :: !(Maybe Text)

542+ , _oRoles :: !(Maybe [Text])

543543 , _oOfficialIndices :: !(Maybe [Word32])

544− , _oSources :: !(Maybe [Source])

545− , _oName :: !(Maybe Text)

546− , _oLevels :: !(Maybe [Text])

544+ , _oSources :: !(Maybe [Source])

545+ , _oName :: !(Maybe Text)

546+ , _oLevels :: !(Maybe [Text])

547547 } deriving (Eq,Show,Data,Typeable,Generic)

548548

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

@@ -563,7 +563,7 @@ data Office = Office

563563-- * 'oLevels'

564564office

565565 :: Office

566−office =

566+office =

567567 Office

568568 { _oDivisionId = Nothing

569569 , _oRoles = Nothing

@@ -643,7 +643,7 @@ instance ToJSON Office where

643643--

644644-- /See:/ 'channel' smart constructor.

645645data Channel = Channel

646− { _cId :: !(Maybe Text)

646+ { _cId :: !(Maybe Text)

647647 , _cType :: !(Maybe Text)

648648 } deriving (Eq,Show,Data,Typeable,Generic)

649649

@@ -656,7 +656,7 @@ data Channel = Channel

656656-- * 'cType'

657657channel

658658 :: Channel

659−channel =

659+channel =

660660 Channel

661661 { _cId = Nothing

662662 , _cType = Nothing

@@ -688,9 +688,9 @@ instance ToJSON Channel where

688688-- /See:/ 'election' smart constructor.

689689data Election = Election

690690 { _eOcdDivisionId :: !(Maybe Text)

691− , _eElectionDay :: !(Maybe Text)

692− , _eName :: !(Maybe Text)

693− , _eId :: !(Maybe Int64)

691+ , _eElectionDay :: !(Maybe Text)

692+ , _eName :: !(Maybe Text)

693+ , _eId :: !(Maybe Int64)

694694 } deriving (Eq,Show,Data,Typeable,Generic)

695695

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

@@ -706,7 +706,7 @@ data Election = Election

706706-- * 'eId'

707707election

708708 :: Election

709−election =

709+election =

710710 Election

711711 { _eOcdDivisionId = Nothing

712712 , _eElectionDay = Nothing

@@ -758,11 +758,11 @@ instance ToJSON Election where

758758--

759759-- /See:/ 'representativeInfoResponse' smart constructor.

760760data RepresentativeInfoResponse = RepresentativeInfoResponse

761− { _rirKind :: !Text

761+ { _rirKind :: !Text

762762 , _rirNormalizedInput :: !(Maybe SimpleAddressType)

763− , _rirOfficials :: !(Maybe [Official])

764− , _rirDivisions :: !(Maybe RepresentativeInfoResponseDivisions)

765− , _rirOffices :: !(Maybe [Office])

763+ , _rirOfficials :: !(Maybe [Official])

764+ , _rirDivisions :: !(Maybe RepresentativeInfoResponseDivisions)

765+ , _rirOffices :: !(Maybe [Office])

766766 } deriving (Eq,Show,Data,Typeable,Generic)

767767

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

@@ -780,7 +780,7 @@ data RepresentativeInfoResponse = RepresentativeInfoResponse

780780-- * 'rirOffices'

781781representativeInfoResponse

782782 :: RepresentativeInfoResponse

783−representativeInfoResponse =

783+representativeInfoResponse =

784784 RepresentativeInfoResponse

785785 { _rirKind = "civicinfo#representativeInfoResponse"

786786 , _rirNormalizedInput = Nothing

@@ -849,8 +849,8 @@ instance ToJSON RepresentativeInfoResponse where

849849-- /See:/ 'divisionSearchResult' smart constructor.

850850data DivisionSearchResult = DivisionSearchResult

851851 { _dsrAliases :: !(Maybe [Text])

852− , _dsrName :: !(Maybe Text)

853− , _dsrOcdId :: !(Maybe Text)

852+ , _dsrName :: !(Maybe Text)

853+ , _dsrOcdId :: !(Maybe Text)

854854 } deriving (Eq,Show,Data,Typeable,Generic)

855855

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

@@ -864,7 +864,7 @@ data DivisionSearchResult = DivisionSearchResult

864864-- * 'dsrOcdId'

865865divisionSearchResult

866866 :: DivisionSearchResult

867−divisionSearchResult =

867+divisionSearchResult =

868868 DivisionSearchResult

869869 { _dsrAliases = Nothing

870870 , _dsrName = Nothing

@@ -912,19 +912,19 @@ instance ToJSON DivisionSearchResult where

912912--

913913-- /See:/ 'administrativeBody' smart constructor.

914914data AdministrativeBody = AdministrativeBody

915− { _abCorrespondenceAddress :: !(Maybe SimpleAddressType)

916− , _abAbsenteeVotingInfoURL :: !(Maybe Text)

917− , _abHoursOfOperation :: !(Maybe Text)

918− , _abBallotInfoURL :: !(Maybe Text)

919− , _abPhysicalAddress :: !(Maybe SimpleAddressType)

915+ { _abCorrespondenceAddress :: !(Maybe SimpleAddressType)

916+ , _abAbsenteeVotingInfoURL :: !(Maybe Text)

917+ , _abHoursOfOperation :: !(Maybe Text)

918+ , _abBallotInfoURL :: !(Maybe Text)

919+ , _abPhysicalAddress :: !(Maybe SimpleAddressType)

920920 , _abElectionRegistrationConfirmationURL :: !(Maybe Text)

921− , _abElectionInfoURL :: !(Maybe Text)

922− , _abVotingLocationFinderURL :: !(Maybe Text)

923− , _abElectionOfficials :: !(Maybe [ElectionOfficial])

924− , _abName :: !(Maybe Text)

925− , _abElectionRulesURL :: !(Maybe Text)

926− , _abVoterServices :: !(Maybe [Text])

927− , _abElectionRegistrationURL :: !(Maybe Text)

921+ , _abElectionInfoURL :: !(Maybe Text)

922+ , _abVotingLocationFinderURL :: !(Maybe Text)

923+ , _abElectionOfficials :: !(Maybe [ElectionOfficial])

924+ , _abName :: !(Maybe Text)

925+ , _abElectionRulesURL :: !(Maybe Text)

926+ , _abVoterServices :: !(Maybe [Text])

927+ , _abElectionRegistrationURL :: !(Maybe Text)

928928 } deriving (Eq,Show,Data,Typeable,Generic)

929929

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

@@ -958,7 +958,7 @@ data AdministrativeBody = AdministrativeBody

958958-- * 'abElectionRegistrationURL'

959959administrativeBody

960960 :: AdministrativeBody

961−administrativeBody =

961+administrativeBody =

962962 AdministrativeBody

963963 { _abCorrespondenceAddress = Nothing

964964 , _abAbsenteeVotingInfoURL = Nothing

@@ -1109,29 +1109,29 @@ instance ToJSON AdministrativeBody where

11091109-- /See:/ 'contest' smart constructor.

11101110data Contest = Contest

11111111 { _conReferendumPassageThreshold :: !(Maybe Text)

1112− , _conRoles :: !(Maybe [Text])

1113− , _conReferendumURL :: !(Maybe Text)

1114− , _conReferendumEffectOfAbstain :: !(Maybe Text)

1115− , _conReferendumSubtitle :: !(Maybe Text)

1116− , _conNumberVotingFor :: !(Maybe Int64)

1117− , _conOffice :: !(Maybe Text)

1118− , _conReferendumConStatement :: !(Maybe Text)

1119− , _conSources :: !(Maybe [Source])

1120− , _conReferendumProStatement :: !(Maybe Text)

1121− , _conReferendumBallotResponses :: !(Maybe [Text])

1122− , _conNumberElected :: !(Maybe Int64)

1123− , _conSpecial :: !(Maybe Text)

1124− , _conReferendumText :: !(Maybe Text)

1125− , _conPrimaryParty :: !(Maybe Text)

1126− , _conId :: !(Maybe Text)

1127− , _conType :: !(Maybe Text)

1128− , _conElectorateSpecifications :: !(Maybe Text)

1129− , _conReferendumBrief :: !(Maybe Text)

1130− , _conDistrict :: !(Maybe ElectoralDistrict)

1131− , _conLevel :: !(Maybe [Text])

1132− , _conCandidates :: !(Maybe [Candidate])

1133− , _conReferendumTitle :: !(Maybe Text)

1134− , _conBallotPlacement :: !(Maybe Int64)

1112+ , _conRoles :: !(Maybe [Text])

1113+ , _conReferendumURL :: !(Maybe Text)

1114+ , _conReferendumEffectOfAbstain :: !(Maybe Text)

1115+ , _conReferendumSubtitle :: !(Maybe Text)

1116+ , _conNumberVotingFor :: !(Maybe Int64)

1117+ , _conOffice :: !(Maybe Text)

1118+ , _conReferendumConStatement :: !(Maybe Text)

1119+ , _conSources :: !(Maybe [Source])

1120+ , _conReferendumProStatement :: !(Maybe Text)

1121+ , _conReferendumBallotResponses :: !(Maybe [Text])

1122+ , _conNumberElected :: !(Maybe Int64)

1123+ , _conSpecial :: !(Maybe Text)

1124+ , _conReferendumText :: !(Maybe Text)

1125+ , _conPrimaryParty :: !(Maybe Text)

1126+ , _conId :: !(Maybe Text)

1127+ , _conType :: !(Maybe Text)

1128+ , _conElectorateSpecifications :: !(Maybe Text)

1129+ , _conReferendumBrief :: !(Maybe Text)

1130+ , _conDistrict :: !(Maybe ElectoralDistrict)

1131+ , _conLevel :: !(Maybe [Text])

1132+ , _conCandidates :: !(Maybe [Candidate])

1133+ , _conReferendumTitle :: !(Maybe Text)

1134+ , _conBallotPlacement :: !(Maybe Int64)

11351135 } deriving (Eq,Show,Data,Typeable,Generic)

11361136

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

@@ -1187,7 +1187,7 @@ data Contest = Contest

11871187-- * 'conBallotPlacement'

11881188contest

11891189 :: Contest

1190−contest =

1190+contest =

11911191 Contest

11921192 { _conReferendumPassageThreshold = Nothing

11931193 , _conRoles = Nothing

@@ -1456,7 +1456,7 @@ instance ToJSON Contest where

14561456-- /See:/ 'divisionSearchResponse' smart constructor.

14571457data DivisionSearchResponse = DivisionSearchResponse

14581458 { _dsrResults :: !(Maybe [DivisionSearchResult])

1459− , _dsrKind :: !Text

1459+ , _dsrKind :: !Text

14601460 } deriving (Eq,Show,Data,Typeable,Generic)

14611461

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

@@ -1468,7 +1468,7 @@ data DivisionSearchResponse = DivisionSearchResponse

14681468-- * 'dsrKind'

14691469divisionSearchResponse

14701470 :: DivisionSearchResponse

1471−divisionSearchResponse =

1471+divisionSearchResponse =

14721472 DivisionSearchResponse

14731473 { _dsrResults = Nothing

14741474 , _dsrKind = "civicinfo#divisionSearchResponse"

@@ -1505,7 +1505,7 @@ instance ToJSON DivisionSearchResponse where

15051505--

15061506-- /See:/ 'representativeInfoDataDivisions' smart constructor.

15071507data RepresentativeInfoDataDivisions =

1508− RepresentativeInfoDataDivisions

1508+ RepresentativeInfoDataDivisions

15091509 deriving (Eq,Show,Data,Typeable,Generic)

15101510

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

@@ -1521,17 +1521,17 @@ instance FromJSON RepresentativeInfoDataDivisions

15211521 (\ o -> pure RepresentativeInfoDataDivisions)

15221522

15231523instance ToJSON RepresentativeInfoDataDivisions where

1524− toJSON = const (Object mempty)

1524+ toJSON = const emptyObject

15251525

15261526-- | Information about individual election officials.

15271527--

15281528-- /See:/ 'electionOfficial' smart constructor.

15291529data ElectionOfficial = ElectionOfficial

1530− { _eoFaxNumber :: !(Maybe Text)

1531− , _eoName :: !(Maybe Text)

1530+ { _eoFaxNumber :: !(Maybe Text)

1531+ , _eoName :: !(Maybe Text)

15321532 , _eoOfficePhoneNumber :: !(Maybe Text)

1533− , _eoEmailAddress :: !(Maybe Text)

1534− , _eoTitle :: !(Maybe Text)

1533+ , _eoEmailAddress :: !(Maybe Text)

1534+ , _eoTitle :: !(Maybe Text)

15351535 } deriving (Eq,Show,Data,Typeable,Generic)

15361536

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

@@ -1549,7 +1549,7 @@ data ElectionOfficial = ElectionOfficial

15491549-- * 'eoTitle'

15501550electionOfficial

15511551 :: ElectionOfficial

1552−electionOfficial =

1552+electionOfficial =

15531553 ElectionOfficial

15541554 { _eoFaxNumber = Nothing

15551555 , _eoName = Nothing

@@ -1608,7 +1608,7 @@ instance ToJSON ElectionOfficial where

16081608data RepresentativeInfoData = RepresentativeInfoData

16091609 { _ridOfficials :: !(Maybe [Official])

16101610 , _ridDivisions :: !(Maybe RepresentativeInfoDataDivisions)

1611− , _ridOffices :: !(Maybe [Office])

1611+ , _ridOffices :: !(Maybe [Office])

16121612 } deriving (Eq,Show,Data,Typeable,Generic)

16131613

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

@@ -1622,7 +1622,7 @@ data RepresentativeInfoData = RepresentativeInfoData

16221622-- * 'ridOffices'

16231623representativeInfoData

16241624 :: RepresentativeInfoData

1625−representativeInfoData =

1625+representativeInfoData =

16261626 RepresentativeInfoData

16271627 { _ridOfficials = Nothing

16281628 , _ridDivisions = Nothing

@@ -1672,7 +1672,7 @@ instance ToJSON RepresentativeInfoData where

16721672--

16731673-- /See:/ 'source' smart constructor.

16741674data Source = Source

1675− { _sName :: !(Maybe Text)

1675+ { _sName :: !(Maybe Text)

16761676 , _sOfficial :: !(Maybe Bool)

16771677 } deriving (Eq,Show,Data,Typeable,Generic)

16781678

@@ -1685,7 +1685,7 @@ data Source = Source

16851685-- * 'sOfficial'

16861686source

16871687 :: Source

1688−source =

1688+source =

16891689 Source

16901690 { _sName = Nothing

16911691 , _sOfficial = Nothing

@@ -1717,9 +1717,9 @@ instance ToJSON Source where

17171717--

17181718-- /See:/ 'electoralDistrict' smart constructor.

17191719data ElectoralDistrict = ElectoralDistrict

1720− { _edName :: !(Maybe Text)

1720+ { _edName :: !(Maybe Text)

17211721 , _edScope :: !(Maybe Text)

1722− , _edId :: !(Maybe Text)

1722+ , _edId :: !(Maybe Text)

17231723 } deriving (Eq,Show,Data,Typeable,Generic)

17241724

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

@@ -1733,7 +1733,7 @@ data ElectoralDistrict = ElectoralDistrict

17331733-- * 'edId'

17341734electoralDistrict

17351735 :: ElectoralDistrict

1736−electoralDistrict =

1736+electoralDistrict =

17371737 ElectoralDistrict

17381738 { _edName = Nothing

17391739 , _edScope = Nothing

@@ -1775,12 +1775,12 @@ instance ToJSON ElectoralDistrict where

17751775--

17761776-- /See:/ 'simpleAddressType' smart constructor.

17771777data SimpleAddressType = SimpleAddressType

1778− { _satLine2 :: !(Maybe Text)

1779− , _satState :: !(Maybe Text)

1780− , _satLine3 :: !(Maybe Text)

1781− , _satZip :: !(Maybe Text)

1782− , _satCity :: !(Maybe Text)

1783− , _satLine1 :: !(Maybe Text)

1778+ { _satLine2 :: !(Maybe Text)

1779+ , _satState :: !(Maybe Text)

1780+ , _satLine3 :: !(Maybe Text)

1781+ , _satZip :: !(Maybe Text)

1782+ , _satCity :: !(Maybe Text)

1783+ , _satLine1 :: !(Maybe Text)

17841784 , _satLocationName :: !(Maybe Text)

17851785 } deriving (Eq,Show,Data,Typeable,Generic)

17861786

@@ -1803,7 +1803,7 @@ data SimpleAddressType = SimpleAddressType

18031803-- * 'satLocationName'

18041804simpleAddressType

18051805 :: SimpleAddressType

1806−simpleAddressType =

1806+simpleAddressType =

18071807 SimpleAddressType

18081808 { _satLine2 = Nothing

18091809 , _satState = Nothing

@@ -1870,11 +1870,11 @@ instance ToJSON SimpleAddressType where

18701870--

18711871-- /See:/ 'administrationRegion' smart constructor.

18721872data AdministrationRegion = AdministrationRegion

1873− { _arLocalJurisdiction :: !(Maybe AdministrationRegion)

1874− , _arSources :: !(Maybe [Source])

1875− , _arName :: !(Maybe Text)

1873+ { _arLocalJurisdiction :: !(Maybe AdministrationRegion)

1874+ , _arSources :: !(Maybe [Source])

1875+ , _arName :: !(Maybe Text)

18761876 , _arElectionAdministrationBody :: !(Maybe AdministrativeBody)

1877− , _arId :: !(Maybe Text)

1877+ , _arId :: !(Maybe Text)

18781878 } deriving (Eq,Show,Data,Typeable,Generic)

18791879

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

@@ -1892,7 +1892,7 @@ data AdministrationRegion = AdministrationRegion

18921892-- * 'arId'

18931893administrationRegion

18941894 :: AdministrationRegion

1895−administrationRegion =

1895+administrationRegion =

18961896 AdministrationRegion

18971897 { _arLocalJurisdiction = Nothing

18981898 , _arSources = Nothing

@@ -1958,7 +1958,7 @@ instance ToJSON AdministrationRegion where

19581958--

19591959-- /See:/ 'electionsQueryResponse' smart constructor.

19601960data ElectionsQueryResponse = ElectionsQueryResponse

1961− { _eqrKind :: !Text

1961+ { _eqrKind :: !Text

19621962 , _eqrElections :: !(Maybe [Election])

19631963 } deriving (Eq,Show,Data,Typeable,Generic)

19641964

@@ -1971,7 +1971,7 @@ data ElectionsQueryResponse = ElectionsQueryResponse

19711971-- * 'eqrElections'

19721972electionsQueryResponse

19731973 :: ElectionsQueryResponse

1974−electionsQueryResponse =

1974+electionsQueryResponse =

19751975 ElectionsQueryResponse

19761976 { _eqrKind = "civicinfo#electionsQueryResponse"

19771977 , _eqrElections = Nothing

@@ -2009,13 +2009,13 @@ instance ToJSON ElectionsQueryResponse where

20092009-- /See:/ 'official' smart constructor.

20102010data Official = Official

20112011 { _offPhotoURL :: !(Maybe Text)

2012− , _offURLs :: !(Maybe [Text])

2012+ , _offURLs :: !(Maybe [Text])

20132013 , _offChannels :: !(Maybe [Channel])

2014− , _offAddress :: !(Maybe [SimpleAddressType])

2015− , _offPhones :: !(Maybe [Text])

2016− , _offName :: !(Maybe Text)

2017− , _offEmails :: !(Maybe [Text])

2018− , _offParty :: !(Maybe Text)

2014+ , _offAddress :: !(Maybe [SimpleAddressType])

2015+ , _offPhones :: !(Maybe [Text])

2016+ , _offName :: !(Maybe Text)

2017+ , _offEmails :: !(Maybe [Text])

2018+ , _offParty :: !(Maybe Text)

20192019 } deriving (Eq,Show,Data,Typeable,Generic)

20202020

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

@@ -2039,7 +2039,7 @@ data Official = Official

20392039-- * 'offParty'

20402040official

20412041 :: Official

2042−official =

2042+official =

20432043 Official

20442044 { _offPhotoURL = Nothing

20452045 , _offURLs = Nothing

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.CivicInfo.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121-- | A list of office levels to filter by. Only offices that serve at least

2222-- one of these levels will be returned. Divisions that don\'t contain a

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Divisions/Search.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.CivicInfo.Divisions.Search

4242 , dsFields

4343 ) where

4444

45−import Network.Google.CivicInfo.Types

46−import Network.Google.Prelude

45+import Network.Google.CivicInfo.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @CivicInfoDivisionsSearch@ which the

4949-- 'DivisionsSearch'' request conforms to.

@@ -63,13 +63,13 @@ type DivisionsSearchResource =

6363--

6464-- /See:/ 'divisionsSearch'' smart constructor.

6565data DivisionsSearch' = DivisionsSearch'

66− { _dsQuotaUser :: !(Maybe Text)

66+ { _dsQuotaUser :: !(Maybe Text)

6767 , _dsPrettyPrint :: !Bool

68− , _dsUserIP :: !(Maybe Text)

69− , _dsKey :: !(Maybe Key)

70− , _dsQuery :: !(Maybe Text)

71− , _dsOAuthToken :: !(Maybe OAuthToken)

72− , _dsFields :: !(Maybe Text)

68+ , _dsUserIP :: !(Maybe Text)

69+ , _dsKey :: !(Maybe Key)

70+ , _dsQuery :: !(Maybe Text)

71+ , _dsOAuthToken :: !(Maybe OAuthToken)

72+ , _dsFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -91,7 +91,7 @@ data DivisionsSearch' = DivisionsSearch'

9191-- * 'dsFields'

9292divisionsSearch'

9393 :: DivisionsSearch'

94−divisionsSearch' =

94+divisionsSearch' =

9595 DivisionsSearch'

9696 { _dsQuotaUser = Nothing

9797 , _dsPrettyPrint = True

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/ElectionQuery.hs+8−8

@@ -41,8 +41,8 @@ module Network.Google.Resource.CivicInfo.Elections.ElectionQuery

4141 , eeqFields

4242 ) where

4343

44−import Network.Google.CivicInfo.Types

45−import Network.Google.Prelude

44+import Network.Google.CivicInfo.Types

45+import Network.Google.Prelude

4646

4747-- | A resource alias for @CivicInfoElectionsElectionQuery@ which the

4848-- 'ElectionsElectionQuery'' request conforms to.

@@ -61,12 +61,12 @@ type ElectionsElectionQueryResource =

6161--

6262-- /See:/ 'electionsElectionQuery'' smart constructor.

6363data ElectionsElectionQuery' = ElectionsElectionQuery'

64− { _eeqQuotaUser :: !(Maybe Text)

64+ { _eeqQuotaUser :: !(Maybe Text)

6565 , _eeqPrettyPrint :: !Bool

66− , _eeqUserIP :: !(Maybe Text)

67− , _eeqKey :: !(Maybe Key)

68− , _eeqOAuthToken :: !(Maybe OAuthToken)

69− , _eeqFields :: !(Maybe Text)

66+ , _eeqUserIP :: !(Maybe Text)

67+ , _eeqKey :: !(Maybe Key)

68+ , _eeqOAuthToken :: !(Maybe OAuthToken)

69+ , _eeqFields :: !(Maybe Text)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

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

@@ -86,7 +86,7 @@ data ElectionsElectionQuery' = ElectionsElectionQuery'

8686-- * 'eeqFields'

8787electionsElectionQuery'

8888 :: ElectionsElectionQuery'

89−electionsElectionQuery' =

89+electionsElectionQuery' =

9090 ElectionsElectionQuery'

9191 { _eeqQuotaUser = Nothing

9292 , _eeqPrettyPrint = True

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/VoterInfoQuery.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.CivicInfo.Elections.VoterInfoQuery

4545 , eviqFields

4646 ) where

4747

48−import Network.Google.CivicInfo.Types

49−import Network.Google.Prelude

48+import Network.Google.CivicInfo.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @CivicInfoElectionsVoterInfoQuery@ which the

5252-- 'ElectionsVoterInfoQuery'' request conforms to.

@@ -69,15 +69,15 @@ type ElectionsVoterInfoQueryResource =

6969--

7070-- /See:/ 'electionsVoterInfoQuery'' smart constructor.

7171data ElectionsVoterInfoQuery' = ElectionsVoterInfoQuery'

72− { _eviqQuotaUser :: !(Maybe Text)

73− , _eviqPrettyPrint :: !Bool

74− , _eviqUserIP :: !(Maybe Text)

75− , _eviqElectionId :: !Int64

76− , _eviqAddress :: !Text

77− , _eviqKey :: !(Maybe Key)

72+ { _eviqQuotaUser :: !(Maybe Text)

73+ , _eviqPrettyPrint :: !Bool

74+ , _eviqUserIP :: !(Maybe Text)

75+ , _eviqElectionId :: !Int64

76+ , _eviqAddress :: !Text

77+ , _eviqKey :: !(Maybe Key)

7878 , _eviqOfficialOnly :: !Bool

79− , _eviqOAuthToken :: !(Maybe OAuthToken)

80− , _eviqFields :: !(Maybe Text)

79+ , _eviqOAuthToken :: !(Maybe OAuthToken)

80+ , _eviqFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -104,7 +104,7 @@ data ElectionsVoterInfoQuery' = ElectionsVoterInfoQuery'

104104electionsVoterInfoQuery'

105105 :: Text -- ^ 'address'

106106 -> ElectionsVoterInfoQuery'

107−electionsVoterInfoQuery' pEviqAddress_ =

107+electionsVoterInfoQuery' pEviqAddress_ =

108108 ElectionsVoterInfoQuery'

109109 { _eviqQuotaUser = Nothing

110110 , _eviqPrettyPrint = True

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByAddress.hs+12−12

@@ -46,8 +46,8 @@ module Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByAdd

4646 , rribaFields

4747 ) where

4848

49−import Network.Google.CivicInfo.Types

50−import Network.Google.Prelude

49+import Network.Google.CivicInfo.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @CivicInfoRepresentativesRepresentativeInfoByAddress@ which the

5353-- 'RepresentativesRepresentativeInfoByAddress'' request conforms to.

@@ -76,16 +76,16 @@ type RepresentativesRepresentativeInfoByAddressResource

7676--

7777-- /See:/ 'representativesRepresentativeInfoByAddress'' smart constructor.

7878data RepresentativesRepresentativeInfoByAddress' = RepresentativesRepresentativeInfoByAddress'

79− { _rribaQuotaUser :: !(Maybe Text)

80− , _rribaRoles :: !(Maybe [RepresentativesRepresentativeInfoByAddressRoles])

81− , _rribaPrettyPrint :: !Bool

82− , _rribaUserIP :: !(Maybe Text)

83− , _rribaAddress :: !(Maybe Text)

84− , _rribaKey :: !(Maybe Key)

79+ { _rribaQuotaUser :: !(Maybe Text)

80+ , _rribaRoles :: !(Maybe [RepresentativesRepresentativeInfoByAddressRoles])

81+ , _rribaPrettyPrint :: !Bool

82+ , _rribaUserIP :: !(Maybe Text)

83+ , _rribaAddress :: !(Maybe Text)

84+ , _rribaKey :: !(Maybe Key)

8585 , _rribaIncludeOffices :: !Bool

86− , _rribaLevels :: !(Maybe [RepresentativesRepresentativeInfoByAddressLevels])

87− , _rribaOAuthToken :: !(Maybe OAuthToken)

88− , _rribaFields :: !(Maybe Text)

86+ , _rribaLevels :: !(Maybe [RepresentativesRepresentativeInfoByAddressLevels])

87+ , _rribaOAuthToken :: !(Maybe OAuthToken)

88+ , _rribaFields :: !(Maybe Text)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

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

@@ -113,7 +113,7 @@ data RepresentativesRepresentativeInfoByAddress' = RepresentativesRepresentative

113113-- * 'rribaFields'

114114representativesRepresentativeInfoByAddress'

115115 :: RepresentativesRepresentativeInfoByAddress'

116−representativesRepresentativeInfoByAddress' =

116+representativesRepresentativeInfoByAddress' =

117117 RepresentativesRepresentativeInfoByAddress'

118118 { _rribaQuotaUser = Nothing

119119 , _rribaRoles = Nothing

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByDivision.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.CivicInfo.Representatives.RepresentativeInfoByDiv

4545 , rribdFields

4646 ) where

4747

48−import Network.Google.CivicInfo.Types

49−import Network.Google.Prelude

48+import Network.Google.CivicInfo.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @CivicInfoRepresentativesRepresentativeInfoByDivision@ which the

5252-- 'RepresentativesRepresentativeInfoByDivision'' request conforms to.

@@ -74,16 +74,16 @@ type RepresentativesRepresentativeInfoByDivisionResource

7474--

7575-- /See:/ 'representativesRepresentativeInfoByDivision'' smart constructor.

7676data RepresentativesRepresentativeInfoByDivision' = RepresentativesRepresentativeInfoByDivision'

77− { _rribdQuotaUser :: !(Maybe Text)

78− , _rribdRoles :: !(Maybe [RepresentativesRepresentativeInfoByDivisionRoles])

77+ { _rribdQuotaUser :: !(Maybe Text)

78+ , _rribdRoles :: !(Maybe [RepresentativesRepresentativeInfoByDivisionRoles])

7979 , _rribdPrettyPrint :: !Bool

80− , _rribdUserIP :: !(Maybe Text)

81− , _rribdKey :: !(Maybe Key)

82− , _rribdRecursive :: !(Maybe Bool)

83− , _rribdOcdId :: !Text

84− , _rribdLevels :: !(Maybe [RepresentativesRepresentativeInfoByDivisionLevels])

85− , _rribdOAuthToken :: !(Maybe OAuthToken)

86− , _rribdFields :: !(Maybe Text)

80+ , _rribdUserIP :: !(Maybe Text)

81+ , _rribdKey :: !(Maybe Key)

82+ , _rribdRecursive :: !(Maybe Bool)

83+ , _rribdOcdId :: !Text

84+ , _rribdLevels :: !(Maybe [RepresentativesRepresentativeInfoByDivisionLevels])

85+ , _rribdOAuthToken :: !(Maybe OAuthToken)

86+ , _rribdFields :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

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

@@ -112,7 +112,7 @@ data RepresentativesRepresentativeInfoByDivision' = RepresentativesRepresentativ

112112representativesRepresentativeInfoByDivision'

113113 :: Text -- ^ 'ocdId'

114114 -> RepresentativesRepresentativeInfoByDivision'

115−representativesRepresentativeInfoByDivision' pRribdOcdId_ =

115+representativesRepresentativeInfoByDivision' pRribdOcdId_ =

116116 RepresentativesRepresentativeInfoByDivision'

117117 { _rribdQuotaUser = Nothing

118118 , _rribdRoles = Nothing

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+1−1

@@ -93,7 +93,7 @@ instance FromJSON Empty where

9393 parseJSON = withObject "Empty" (\ o -> pure Empty)

9494

9595instance ToJSON Empty where

96− toJSON = const (Object mempty)

96+ toJSON = const emptyObject

9797

9898-- | Global user permission description.

9999--

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+14−14

@@ -176,7 +176,7 @@ instance FromJSON MachineTypeAggregatedListItems

176176 (\ o -> pure MachineTypeAggregatedListItems)

177177

178178instance ToJSON MachineTypeAggregatedListItems where

179− toJSON = const (Object mempty)

179+ toJSON = const emptyObject

180180

181181-- | [Output Only] A map of scoped disk type lists.

182182--

@@ -197,7 +197,7 @@ instance FromJSON DiskTypeAggregatedListItems where

197197 (\ o -> pure DiskTypeAggregatedListItems)

198198

199199instance ToJSON DiskTypeAggregatedListItems where

200− toJSON = const (Object mempty)

200+ toJSON = const emptyObject

201201

202202-- | Contains a list of Firewall resources.

203203--

@@ -444,7 +444,7 @@ instance FromJSON AutoscalerAggregatedListItems where

444444 (\ o -> pure AutoscalerAggregatedListItems)

445445

446446instance ToJSON AutoscalerAggregatedListItems where

447− toJSON = const (Object mempty)

447+ toJSON = const emptyObject

448448

449449--

450450-- /See:/ 'instanceGroupManagersSetInstanceTemplateRequest' smart constructor.

@@ -1741,7 +1741,7 @@ instance FromJSON InstanceGroupAggregatedListItems

17411741

17421742instance ToJSON InstanceGroupAggregatedListItems

17431743 where

1744− toJSON = const (Object mempty)

1744+ toJSON = const emptyObject

17451745

17461746-- | Contains a list of TargetPool resources.

17471747--

@@ -4752,7 +4752,7 @@ instance FromJSON InstanceAggregatedListItems where

47524752 (\ o -> pure InstanceAggregatedListItems)

47534753

47544754instance ToJSON InstanceAggregatedListItems where

4755− toJSON = const (Object mempty)

4755+ toJSON = const emptyObject

47564756

47574757-- | Informational warning which replaces the list of autoscalers when the

47584758-- list is empty.

@@ -6762,7 +6762,7 @@ instance FromJSON TargetInstanceAggregatedListItems

67626762

67636763instance ToJSON TargetInstanceAggregatedListItems

67646764 where

6765− toJSON = const (Object mempty)

6765+ toJSON = const emptyObject

67666766

67676767--

67686768-- /See:/ 'instanceGroupAggregatedList' smart constructor.

@@ -7593,7 +7593,7 @@ instance FromJSON DiskAggregatedListItems where

75937593 (\ o -> pure DiskAggregatedListItems)

75947594

75957595instance ToJSON DiskAggregatedListItems where

7596− toJSON = const (Object mempty)

7596+ toJSON = const emptyObject

75977597

75987598-- | The location in Cloud Storage and naming method of the daily usage

75997599-- report. Contains bucket_name and report_name prefix.

@@ -7838,7 +7838,7 @@ instance FromJSON

78387838

78397839instance ToJSON

78407840 InstanceGroupManagerAggregatedListItems where

7841− toJSON = const (Object mempty)

7841+ toJSON = const emptyObject

78427842

78437843--

78447844-- /See:/ 'instanceGroupManagersDeleteInstancesRequest' smart constructor.

@@ -8170,7 +8170,7 @@ instance FromJSON ForwardingRuleAggregatedListItems

81708170

81718171instance ToJSON ForwardingRuleAggregatedListItems

81728172 where

8173− toJSON = const (Object mempty)

8173+ toJSON = const emptyObject

81748174

81758175-- | [Output Only] A map of scoped operation lists.

81768176--

@@ -8191,7 +8191,7 @@ instance FromJSON OperationAggregatedListItems where

81918191 (\ o -> pure OperationAggregatedListItems)

81928192

81938193instance ToJSON OperationAggregatedListItems where

8194− toJSON = const (Object mempty)

8194+ toJSON = const emptyObject

81958195

81968196--

81978197-- /See:/ 'instanceGroupManagerActionsSummary' smart constructor.

@@ -8504,7 +8504,7 @@ instance FromJSON TargetPoolAggregatedListItems where

85048504 (\ o -> pure TargetPoolAggregatedListItems)

85058505

85068506instance ToJSON TargetPoolAggregatedListItems where

8507− toJSON = const (Object mempty)

8507+ toJSON = const emptyObject

85088508

85098509--

85108510-- /See:/ 'targetInstancesScopedList' smart constructor.

@@ -8576,7 +8576,7 @@ instance FromJSON AddressAggregatedListItems where

85768576 (\ o -> pure AddressAggregatedListItems)

85778577

85788578instance ToJSON AddressAggregatedListItems where

8579− toJSON = const (Object mempty)

8579+ toJSON = const emptyObject

85808580

85818581-- | Contains a list of persistent autoscaler resources.

85828582--

@@ -11275,7 +11275,7 @@ instance FromJSON TargetVPNGatewayAggregatedListItems

1127511275

1127611276instance ToJSON TargetVPNGatewayAggregatedListItems

1127711277 where

11278− toJSON = const (Object mempty)

11278+ toJSON = const emptyObject

1127911279

1128011280-- | Informational warning which replaces the list of addresses when the list

1128111281-- is empty.

@@ -14123,7 +14123,7 @@ instance FromJSON VPNTunnelAggregatedListItems where

1412314123 (\ o -> pure VPNTunnelAggregatedListItems)

1412414124

1412514125instance ToJSON VPNTunnelAggregatedListItems where

14126− toJSON = const (Object mempty)

14126+ toJSON = const emptyObject

1412714127

1412814128-- | A set of instance tags.

1412914129--

gogol-container/gen/Network/Google/Container.hs+10−10

@@ -148,16 +148,16 @@ module Network.Google.Container

148148 , ClusterStatus (..)

149149 ) where

150150

151−import Network.Google.Container.Types

152−import Network.Google.Prelude

153−import Network.Google.Resource.Container.Projects.Clusters.List

154−import Network.Google.Resource.Container.Projects.Operations.List

155−import Network.Google.Resource.Container.Projects.Zones.Clusters.Create

156−import Network.Google.Resource.Container.Projects.Zones.Clusters.Delete

157−import Network.Google.Resource.Container.Projects.Zones.Clusters.Get

158−import Network.Google.Resource.Container.Projects.Zones.Clusters.List

159−import Network.Google.Resource.Container.Projects.Zones.Operations.Get

160−import Network.Google.Resource.Container.Projects.Zones.Operations.List

151+import Network.Google.Prelude

152+import Network.Google.Container.Types

153+import Network.Google.Resource.Container.Projects.Clusters.List

154+import Network.Google.Resource.Container.Projects.Operations.List

155+import Network.Google.Resource.Container.Projects.Zones.Clusters.Create

156+import Network.Google.Resource.Container.Projects.Zones.Clusters.Delete

157+import Network.Google.Resource.Container.Projects.Zones.Clusters.Get

158+import Network.Google.Resource.Container.Projects.Zones.Clusters.List

159+import Network.Google.Resource.Container.Projects.Zones.Operations.Get

160+import Network.Google.Resource.Container.Projects.Zones.Operations.List

161161

162162{- $resources

163163TODO

gogol-container/gen/Network/Google/Container/Types.hs+3−3

@@ -111,9 +111,9 @@ module Network.Google.Container.Types

111111 , ClusterStatus (..)

112112 ) where

113113

114−import Network.Google.Container.Types.Product

115−import Network.Google.Container.Types.Sum

116−import Network.Google.Prelude

114+import Network.Google.Container.Types.Product

115+import Network.Google.Container.Types.Sum

116+import Network.Google.Prelude

117117

118118-- | URL referring to version 'v1beta1' of the Google Container Engine API.

119119containerURL :: BaseUrl

gogol-container/gen/Network/Google/Container/Types/Product.hs+44−44

@@ -17,8 +17,8 @@

1717--

1818module Network.Google.Container.Types.Product where

1919

20−import Network.Google.Container.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.Container.Types.Sum

21+import Network.Google.Prelude

2222

2323--

2424-- /See:/ 'listOperationsResponse' smart constructor.

@@ -33,7 +33,7 @@ newtype ListOperationsResponse = ListOperationsResponse

3333-- * 'lorOperations'

3434listOperationsResponse

3535 :: ListOperationsResponse

36−listOperationsResponse =

36+listOperationsResponse =

3737 ListOperationsResponse

3838 { _lorOperations = Nothing

3939 }

@@ -71,7 +71,7 @@ newtype CreateClusterRequest = CreateClusterRequest

7171-- * 'ccrCluster'

7272createClusterRequest

7373 :: CreateClusterRequest

74−createClusterRequest =

74+createClusterRequest =

7575 CreateClusterRequest

7676 { _ccrCluster = Nothing

7777 }

@@ -93,24 +93,24 @@ instance ToJSON CreateClusterRequest where

9393--

9494-- /See:/ 'cluster' smart constructor.

9595data Cluster = Cluster

96− { _cStatus :: !(Maybe ClusterStatus)

97− , _cNodeConfig :: !(Maybe NodeConfig)

98− , _cNumNodes :: !(Maybe Int32)

99− , _cClusterAPIVersion :: !(Maybe Text)

100− , _cNetwork :: !(Maybe Text)

101− , _cZone :: !(Maybe Text)

102− , _cServicesIPv4CIdR :: !(Maybe Text)

103− , _cMasterAuth :: !(Maybe MasterAuth)

104− , _cSelfLink :: !(Maybe Text)

96+ { _cStatus :: !(Maybe ClusterStatus)

97+ , _cNodeConfig :: !(Maybe NodeConfig)

98+ , _cNumNodes :: !(Maybe Int32)

99+ , _cClusterAPIVersion :: !(Maybe Text)

100+ , _cNetwork :: !(Maybe Text)

101+ , _cZone :: !(Maybe Text)

102+ , _cServicesIPv4CIdR :: !(Maybe Text)

103+ , _cMasterAuth :: !(Maybe MasterAuth)

104+ , _cSelfLink :: !(Maybe Text)

105105 , _cEnableCloudMonitoring :: !(Maybe Bool)

106− , _cName :: !(Maybe Text)

107− , _cStatusMessage :: !(Maybe Text)

108− , _cCreationTimestamp :: !(Maybe Text)

109− , _cContainerIPv4CIdR :: !(Maybe Text)

110− , _cEndpoint :: !(Maybe Text)

111− , _cEnableCloudLogging :: !(Maybe Bool)

112− , _cDescription :: !(Maybe Text)

113− , _cInstanceGroupURLs :: !(Maybe [Text])

106+ , _cName :: !(Maybe Text)

107+ , _cStatusMessage :: !(Maybe Text)

108+ , _cCreationTimestamp :: !(Maybe Text)

109+ , _cContainerIPv4CIdR :: !(Maybe Text)

110+ , _cEndpoint :: !(Maybe Text)

111+ , _cEnableCloudLogging :: !(Maybe Bool)

112+ , _cDescription :: !(Maybe Text)

113+ , _cInstanceGroupURLs :: !(Maybe [Text])

114114 , _cNodeRoutingPrefixSize :: !(Maybe Int32)

115115 } deriving (Eq,Show,Data,Typeable,Generic)

116116

@@ -157,7 +157,7 @@ data Cluster = Cluster

157157-- * 'cNodeRoutingPrefixSize'

158158cluster

159159 :: Cluster

160−cluster =

160+cluster =

161161 Cluster

162162 { _cStatus = Nothing

163163 , _cNodeConfig = Nothing

@@ -373,7 +373,7 @@ newtype ListAggregatedOperationsResponse = ListAggregatedOperationsResponse

373373-- * 'laorOperations'

374374listAggregatedOperationsResponse

375375 :: ListAggregatedOperationsResponse

376−listAggregatedOperationsResponse =

376+listAggregatedOperationsResponse =

377377 ListAggregatedOperationsResponse

378378 { _laorOperations = Nothing

379379 }

@@ -404,8 +404,8 @@ instance ToJSON ListAggregatedOperationsResponse

404404-- /See:/ 'nodeConfig' smart constructor.

405405data NodeConfig = NodeConfig

406406 { _ncServiceAccounts :: !(Maybe [ServiceAccount])

407− , _ncSourceImage :: !(Maybe Text)

408− , _ncMachineType :: !(Maybe Text)

407+ , _ncSourceImage :: !(Maybe Text)

408+ , _ncMachineType :: !(Maybe Text)

409409 } deriving (Eq,Show,Data,Typeable,Generic)

410410

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

@@ -419,7 +419,7 @@ data NodeConfig = NodeConfig

419419-- * 'ncMachineType'

420420nodeConfig

421421 :: NodeConfig

422−nodeConfig =

422+nodeConfig =

423423 NodeConfig

424424 { _ncServiceAccounts = Nothing

425425 , _ncSourceImage = Nothing

@@ -478,14 +478,14 @@ instance ToJSON NodeConfig where

478478--

479479-- /See:/ 'operation' smart constructor.

480480data Operation = Operation

481− { _oStatus :: !(Maybe OperationStatus)

482− , _oZone :: !(Maybe Text)

483− , _oSelfLink :: !(Maybe Text)

484− , _oName :: !(Maybe Text)

481+ { _oStatus :: !(Maybe OperationStatus)

482+ , _oZone :: !(Maybe Text)

483+ , _oSelfLink :: !(Maybe Text)

484+ , _oName :: !(Maybe Text)

485485 , _oOperationType :: !(Maybe OperationOperationType)

486− , _oErrorMessage :: !(Maybe Text)

487− , _oTargetLink :: !(Maybe Text)

488− , _oTarget :: !(Maybe Text)

486+ , _oErrorMessage :: !(Maybe Text)

487+ , _oTargetLink :: !(Maybe Text)

488+ , _oTarget :: !(Maybe Text)

489489 } deriving (Eq,Show,Data,Typeable,Generic)

490490

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

@@ -509,7 +509,7 @@ data Operation = Operation

509509-- * 'oTarget'

510510operation

511511 :: Operation

512−operation =

512+operation =

513513 Operation

514514 { _oStatus = Nothing

515515 , _oZone = Nothing

@@ -590,7 +590,7 @@ instance ToJSON Operation where

590590--

591591-- /See:/ 'serviceAccount' smart constructor.

592592data ServiceAccount = ServiceAccount

593− { _saEmail :: !(Maybe Text)

593+ { _saEmail :: !(Maybe Text)

594594 , _saScopes :: !(Maybe [Text])

595595 } deriving (Eq,Show,Data,Typeable,Generic)

596596

@@ -603,7 +603,7 @@ data ServiceAccount = ServiceAccount

603603-- * 'saScopes'

604604serviceAccount

605605 :: ServiceAccount

606−serviceAccount =

606+serviceAccount =

607607 ServiceAccount

608608 { _saEmail = Nothing

609609 , _saScopes = Nothing

@@ -639,11 +639,11 @@ instance ToJSON ServiceAccount where

639639--

640640-- /See:/ 'masterAuth' smart constructor.

641641data MasterAuth = MasterAuth

642− { _maBearerToken :: !(Maybe Text)

643− , _maClientKey :: !(Maybe Text)

644− , _maUser :: !(Maybe Text)

645− , _maClientCertificate :: !(Maybe Text)

646− , _maPassword :: !(Maybe Text)

642+ { _maBearerToken :: !(Maybe Text)

643+ , _maClientKey :: !(Maybe Text)

644+ , _maUser :: !(Maybe Text)

645+ , _maClientCertificate :: !(Maybe Text)

646+ , _maPassword :: !(Maybe Text)

647647 , _maClusterCaCertificate :: !(Maybe Text)

648648 } deriving (Eq,Show,Data,Typeable,Generic)

649649

@@ -664,7 +664,7 @@ data MasterAuth = MasterAuth

664664-- * 'maClusterCaCertificate'

665665masterAuth

666666 :: MasterAuth

667−masterAuth =

667+masterAuth =

668668 MasterAuth

669669 { _maBearerToken = Nothing

670670 , _maClientKey = Nothing

@@ -751,7 +751,7 @@ newtype ListAggregatedClustersResponse = ListAggregatedClustersResponse

751751-- * 'lacrClusters'

752752listAggregatedClustersResponse

753753 :: ListAggregatedClustersResponse

754−listAggregatedClustersResponse =

754+listAggregatedClustersResponse =

755755 ListAggregatedClustersResponse

756756 { _lacrClusters = Nothing

757757 }

@@ -789,7 +789,7 @@ newtype ListClustersResponse = ListClustersResponse

789789-- * 'lcrClusters'

790790listClustersResponse

791791 :: ListClustersResponse

792−listClustersResponse =

792+listClustersResponse =

793793 ListClustersResponse

794794 { _lcrClusters = Nothing

795795 }

gogol-container/gen/Network/Google/Container/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.Container.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121-- | The operation type.

2222data OperationOperationType

gogol-container/gen/Network/Google/Resource/Container/Projects/Clusters/List.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.Container.Projects.Clusters.List

4242 , pclFields

4343 ) where

4444

45−import Network.Google.Container.Types

46−import Network.Google.Prelude

45+import Network.Google.Container.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @ContainerProjectsClustersList@ which the

4949-- 'ProjectsClustersList'' request conforms to.

@@ -63,13 +63,13 @@ type ProjectsClustersListResource =

6363--

6464-- /See:/ 'projectsClustersList'' smart constructor.

6565data ProjectsClustersList' = ProjectsClustersList'

66− { _pclQuotaUser :: !(Maybe Text)

66+ { _pclQuotaUser :: !(Maybe Text)

6767 , _pclPrettyPrint :: !Bool

68− , _pclUserIP :: !(Maybe Text)

69− , _pclKey :: !(Maybe Key)

70− , _pclProjectId :: !Text

71− , _pclOAuthToken :: !(Maybe OAuthToken)

72− , _pclFields :: !(Maybe Text)

68+ , _pclUserIP :: !(Maybe Text)

69+ , _pclKey :: !(Maybe Key)

70+ , _pclProjectId :: !Text

71+ , _pclOAuthToken :: !(Maybe OAuthToken)

72+ , _pclFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data ProjectsClustersList' = ProjectsClustersList'

9292projectsClustersList'

9393 :: Text -- ^ 'projectId'

9494 -> ProjectsClustersList'

95−projectsClustersList' pPclProjectId_ =

95+projectsClustersList' pPclProjectId_ =

9696 ProjectsClustersList'

9797 { _pclQuotaUser = Nothing

9898 , _pclPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Operations/List.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.Container.Projects.Operations.List

4242 , polFields

4343 ) where

4444

45−import Network.Google.Container.Types

46−import Network.Google.Prelude

45+import Network.Google.Container.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @ContainerProjectsOperationsList@ which the

4949-- 'ProjectsOperationsList'' request conforms to.

@@ -63,13 +63,13 @@ type ProjectsOperationsListResource =

6363--

6464-- /See:/ 'projectsOperationsList'' smart constructor.

6565data ProjectsOperationsList' = ProjectsOperationsList'

66− { _polQuotaUser :: !(Maybe Text)

66+ { _polQuotaUser :: !(Maybe Text)

6767 , _polPrettyPrint :: !Bool

68− , _polUserIP :: !(Maybe Text)

69− , _polKey :: !(Maybe Key)

70− , _polProjectId :: !Text

71− , _polOAuthToken :: !(Maybe OAuthToken)

72− , _polFields :: !(Maybe Text)

68+ , _polUserIP :: !(Maybe Text)

69+ , _polKey :: !(Maybe Key)

70+ , _polProjectId :: !Text

71+ , _polOAuthToken :: !(Maybe OAuthToken)

72+ , _polFields :: !(Maybe Text)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

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

@@ -92,7 +92,7 @@ data ProjectsOperationsList' = ProjectsOperationsList'

9292projectsOperationsList'

9393 :: Text -- ^ 'projectId'

9494 -> ProjectsOperationsList'

95−projectsOperationsList' pPolProjectId_ =

95+projectsOperationsList' pPolProjectId_ =

9696 ProjectsOperationsList'

9797 { _polQuotaUser = Nothing

9898 , _polPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Create.hs+11−11

@@ -51,8 +51,8 @@ module Network.Google.Resource.Container.Projects.Zones.Clusters.Create

5151 , pzccFields

5252 ) where

5353

54−import Network.Google.Container.Types

55−import Network.Google.Prelude

54+import Network.Google.Container.Types

55+import Network.Google.Prelude

5656

5757-- | A resource alias for @ContainerProjectsZonesClustersCreate@ which the

5858-- 'ProjectsZonesClustersCreate'' request conforms to.

@@ -82,15 +82,15 @@ type ProjectsZonesClustersCreateResource =

8282--

8383-- /See:/ 'projectsZonesClustersCreate'' smart constructor.

8484data ProjectsZonesClustersCreate' = ProjectsZonesClustersCreate'

85− { _pzccQuotaUser :: !(Maybe Text)

85+ { _pzccQuotaUser :: !(Maybe Text)

8686 , _pzccPrettyPrint :: !Bool

87− , _pzccUserIP :: !(Maybe Text)

88− , _pzccZoneId :: !Text

89− , _pzccPayload :: !CreateClusterRequest

90− , _pzccKey :: !(Maybe Key)

91− , _pzccProjectId :: !Text

92− , _pzccOAuthToken :: !(Maybe OAuthToken)

93− , _pzccFields :: !(Maybe Text)

87+ , _pzccUserIP :: !(Maybe Text)

88+ , _pzccZoneId :: !Text

89+ , _pzccPayload :: !CreateClusterRequest

90+ , _pzccKey :: !(Maybe Key)

91+ , _pzccProjectId :: !Text

92+ , _pzccOAuthToken :: !(Maybe OAuthToken)

93+ , _pzccFields :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

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

@@ -119,7 +119,7 @@ projectsZonesClustersCreate'

119119 -> CreateClusterRequest -- ^ 'payload'

120120 -> Text -- ^ 'projectId'

121121 -> ProjectsZonesClustersCreate'

122−projectsZonesClustersCreate' pPzccZoneId_ pPzccPayload_ pPzccProjectId_ =

122+projectsZonesClustersCreate' pPzccZoneId_ pPzccPayload_ pPzccProjectId_ =

123123 ProjectsZonesClustersCreate'

124124 { _pzccQuotaUser = Nothing

125125 , _pzccPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Delete.hs+11−11

@@ -46,8 +46,8 @@ module Network.Google.Resource.Container.Projects.Zones.Clusters.Delete

4646 , pzcdFields

4747 ) where

4848

49−import Network.Google.Container.Types

50−import Network.Google.Prelude

49+import Network.Google.Container.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @ContainerProjectsZonesClustersDelete@ which the

5353-- 'ProjectsZonesClustersDelete'' request conforms to.

@@ -71,15 +71,15 @@ type ProjectsZonesClustersDeleteResource =

7171--

7272-- /See:/ 'projectsZonesClustersDelete'' smart constructor.

7373data ProjectsZonesClustersDelete' = ProjectsZonesClustersDelete'

74− { _pzcdQuotaUser :: !(Maybe Text)

74+ { _pzcdQuotaUser :: !(Maybe Text)

7575 , _pzcdPrettyPrint :: !Bool

76− , _pzcdUserIP :: !(Maybe Text)

77− , _pzcdZoneId :: !Text

78− , _pzcdKey :: !(Maybe Key)

79− , _pzcdClusterId :: !Text

80− , _pzcdProjectId :: !Text

81− , _pzcdOAuthToken :: !(Maybe OAuthToken)

82− , _pzcdFields :: !(Maybe Text)

76+ , _pzcdUserIP :: !(Maybe Text)

77+ , _pzcdZoneId :: !Text

78+ , _pzcdKey :: !(Maybe Key)

79+ , _pzcdClusterId :: !Text

80+ , _pzcdProjectId :: !Text

81+ , _pzcdOAuthToken :: !(Maybe OAuthToken)

82+ , _pzcdFields :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

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

@@ -108,7 +108,7 @@ projectsZonesClustersDelete'

108108 -> Text -- ^ 'clusterId'

109109 -> Text -- ^ 'projectId'

110110 -> ProjectsZonesClustersDelete'

111−projectsZonesClustersDelete' pPzcdZoneId_ pPzcdClusterId_ pPzcdProjectId_ =

111+projectsZonesClustersDelete' pPzcdZoneId_ pPzcdClusterId_ pPzcdProjectId_ =

112112 ProjectsZonesClustersDelete'

113113 { _pzcdQuotaUser = Nothing

114114 , _pzcdPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Get.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.Container.Projects.Zones.Clusters.Get

4444 , pzcgFields

4545 ) where

4646

47−import Network.Google.Container.Types

48−import Network.Google.Prelude

47+import Network.Google.Container.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @ContainerProjectsZonesClustersGet@ which the

5151-- 'ProjectsZonesClustersGet'' request conforms to.

@@ -67,15 +67,15 @@ type ProjectsZonesClustersGetResource =

6767--

6868-- /See:/ 'projectsZonesClustersGet'' smart constructor.

6969data ProjectsZonesClustersGet' = ProjectsZonesClustersGet'

70− { _pzcgQuotaUser :: !(Maybe Text)

70+ { _pzcgQuotaUser :: !(Maybe Text)

7171 , _pzcgPrettyPrint :: !Bool

72− , _pzcgUserIP :: !(Maybe Text)

73− , _pzcgZoneId :: !Text

74− , _pzcgKey :: !(Maybe Key)

75− , _pzcgClusterId :: !Text

76− , _pzcgProjectId :: !Text

77− , _pzcgOAuthToken :: !(Maybe OAuthToken)

78− , _pzcgFields :: !(Maybe Text)

72+ , _pzcgUserIP :: !(Maybe Text)

73+ , _pzcgZoneId :: !Text

74+ , _pzcgKey :: !(Maybe Key)

75+ , _pzcgClusterId :: !Text

76+ , _pzcgProjectId :: !Text

77+ , _pzcgOAuthToken :: !(Maybe OAuthToken)

78+ , _pzcgFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ projectsZonesClustersGet'

104104 -> Text -- ^ 'clusterId'

105105 -> Text -- ^ 'projectId'

106106 -> ProjectsZonesClustersGet'

107−projectsZonesClustersGet' pPzcgZoneId_ pPzcgClusterId_ pPzcgProjectId_ =

107+projectsZonesClustersGet' pPzcgZoneId_ pPzcgClusterId_ pPzcgProjectId_ =

108108 ProjectsZonesClustersGet'

109109 { _pzcgQuotaUser = Nothing

110110 , _pzcgPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Container.Projects.Zones.Clusters.List

4343 , pzclFields

4444 ) where

4545

46−import Network.Google.Container.Types

47−import Network.Google.Prelude

46+import Network.Google.Container.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @ContainerProjectsZonesClustersList@ which the

5050-- 'ProjectsZonesClustersList'' request conforms to.

@@ -66,14 +66,14 @@ type ProjectsZonesClustersListResource =

6666--

6767-- /See:/ 'projectsZonesClustersList'' smart constructor.

6868data ProjectsZonesClustersList' = ProjectsZonesClustersList'

69− { _pzclQuotaUser :: !(Maybe Text)

69+ { _pzclQuotaUser :: !(Maybe Text)

7070 , _pzclPrettyPrint :: !Bool

71− , _pzclUserIP :: !(Maybe Text)

72− , _pzclZoneId :: !Text

73− , _pzclKey :: !(Maybe Key)

74− , _pzclProjectId :: !Text

75− , _pzclOAuthToken :: !(Maybe OAuthToken)

76− , _pzclFields :: !(Maybe Text)

71+ , _pzclUserIP :: !(Maybe Text)

72+ , _pzclZoneId :: !Text

73+ , _pzclKey :: !(Maybe Key)

74+ , _pzclProjectId :: !Text

75+ , _pzclOAuthToken :: !(Maybe OAuthToken)

76+ , _pzclFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ projectsZonesClustersList'

9999 :: Text -- ^ 'zoneId'

100100 -> Text -- ^ 'projectId'

101101 -> ProjectsZonesClustersList'

102−projectsZonesClustersList' pPzclZoneId_ pPzclProjectId_ =

102+projectsZonesClustersList' pPzclZoneId_ pPzclProjectId_ =

103103 ProjectsZonesClustersList'

104104 { _pzclQuotaUser = Nothing

105105 , _pzclPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/Get.hs+10−10

@@ -44,8 +44,8 @@ module Network.Google.Resource.Container.Projects.Zones.Operations.Get

4444 , pzogFields

4545 ) where

4646

47−import Network.Google.Container.Types

48−import Network.Google.Prelude

47+import Network.Google.Container.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @ContainerProjectsZonesOperationsGet@ which the

5151-- 'ProjectsZonesOperationsGet'' request conforms to.

@@ -67,15 +67,15 @@ type ProjectsZonesOperationsGetResource =

6767--

6868-- /See:/ 'projectsZonesOperationsGet'' smart constructor.

6969data ProjectsZonesOperationsGet' = ProjectsZonesOperationsGet'

70− { _pzogQuotaUser :: !(Maybe Text)

70+ { _pzogQuotaUser :: !(Maybe Text)

7171 , _pzogPrettyPrint :: !Bool

72− , _pzogUserIP :: !(Maybe Text)

73− , _pzogZoneId :: !Text

74− , _pzogKey :: !(Maybe Key)

75− , _pzogProjectId :: !Text

72+ , _pzogUserIP :: !(Maybe Text)

73+ , _pzogZoneId :: !Text

74+ , _pzogKey :: !(Maybe Key)

75+ , _pzogProjectId :: !Text

7676 , _pzogOperationId :: !Text

77− , _pzogOAuthToken :: !(Maybe OAuthToken)

78− , _pzogFields :: !(Maybe Text)

77+ , _pzogOAuthToken :: !(Maybe OAuthToken)

78+ , _pzogFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ projectsZonesOperationsGet'

104104 -> Text -- ^ 'projectId'

105105 -> Text -- ^ 'operationId'

106106 -> ProjectsZonesOperationsGet'

107−projectsZonesOperationsGet' pPzogZoneId_ pPzogProjectId_ pPzogOperationId_ =

107+projectsZonesOperationsGet' pPzogZoneId_ pPzogProjectId_ pPzogOperationId_ =

108108 ProjectsZonesOperationsGet'

109109 { _pzogQuotaUser = Nothing

110110 , _pzogPrettyPrint = True

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.Container.Projects.Zones.Operations.List

4343 , pzolFields

4444 ) where

4545

46−import Network.Google.Container.Types

47−import Network.Google.Prelude

46+import Network.Google.Container.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @ContainerProjectsZonesOperationsList@ which the

5050-- 'ProjectsZonesOperationsList'' request conforms to.

@@ -66,14 +66,14 @@ type ProjectsZonesOperationsListResource =

6666--

6767-- /See:/ 'projectsZonesOperationsList'' smart constructor.

6868data ProjectsZonesOperationsList' = ProjectsZonesOperationsList'

69− { _pzolQuotaUser :: !(Maybe Text)

69+ { _pzolQuotaUser :: !(Maybe Text)

7070 , _pzolPrettyPrint :: !Bool

71− , _pzolUserIP :: !(Maybe Text)

72− , _pzolZoneId :: !Text

73− , _pzolKey :: !(Maybe Key)

74− , _pzolProjectId :: !Text

75− , _pzolOAuthToken :: !(Maybe OAuthToken)

76− , _pzolFields :: !(Maybe Text)

71+ , _pzolUserIP :: !(Maybe Text)

72+ , _pzolZoneId :: !Text

73+ , _pzolKey :: !(Maybe Key)

74+ , _pzolProjectId :: !Text

75+ , _pzolOAuthToken :: !(Maybe OAuthToken)

76+ , _pzolFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ projectsZonesOperationsList'

9999 :: Text -- ^ 'zoneId'

100100 -> Text -- ^ 'projectId'

101101 -> ProjectsZonesOperationsList'

102−projectsZonesOperationsList' pPzolZoneId_ pPzolProjectId_ =

102+projectsZonesOperationsList' pPzolZoneId_ pPzolProjectId_ =

103103 ProjectsZonesOperationsList'

104104 { _pzolQuotaUser = Nothing

105105 , _pzolPrettyPrint = True

gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+2−2

@@ -133,7 +133,7 @@ instance FromJSON SearchQueries where

133133 (\ o -> pure SearchQueries)

134134

135135instance ToJSON SearchQueries where

136− toJSON = const (Object mempty)

136+ toJSON = const emptyObject

137137

138138--

139139-- /See:/ 'searchURL' smart constructor.

@@ -341,7 +341,7 @@ instance FromJSON ResultPagemap where

341341 (\ o -> pure ResultPagemap)

342342

343343instance ToJSON ResultPagemap where

344− toJSON = const (Object mempty)

344+ toJSON = const emptyObject

345345

346346--

347347-- /See:/ 'result' smart constructor.

gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+24−24

@@ -39,7 +39,7 @@ instance FromJSON JobExecutionInfoStages where

3939 (\ o -> pure JobExecutionInfoStages)

4040

4141instance ToJSON JobExecutionInfoStages where

42− toJSON = const (Object mempty)

42+ toJSON = const emptyObject

4343

4444-- | All configuration data for a particular Computation.

4545--

@@ -585,7 +585,7 @@ instance FromJSON WorkerPoolMetadata where

585585 (\ o -> pure WorkerPoolMetadata)

586586

587587instance ToJSON WorkerPoolMetadata where

588− toJSON = const (Object mempty)

588+ toJSON = const emptyObject

589589

590590-- | Settings for WorkerPool autoscaling.

591591--

@@ -822,7 +822,7 @@ instance FromJSON EnvironmentVersion where

822822 (\ o -> pure EnvironmentVersion)

823823

824824instance ToJSON EnvironmentVersion where

825− toJSON = const (Object mempty)

825+ toJSON = const emptyObject

826826

827827-- | A sink that records can be encoded and written to.

828828--

@@ -993,7 +993,7 @@ instance FromJSON EnvironmentUserAgent where

993993 (\ o -> pure EnvironmentUserAgent)

994994

995995instance ToJSON EnvironmentUserAgent where

996− toJSON = const (Object mempty)

996+ toJSON = const emptyObject

997997

998998-- | Describes the data disk used by a workflow job.

999999--

@@ -1460,7 +1460,7 @@ instance FromJSON MetricStructuredNameContext where

14601460 (\ o -> pure MetricStructuredNameContext)

14611461

14621462instance ToJSON MetricStructuredNameContext where

1463− toJSON = const (Object mempty)

1463+ toJSON = const emptyObject

14641464

14651465-- | Identifies the location of a streaming computation stage, for

14661466-- stage-to-stage communication.

@@ -1855,7 +1855,7 @@ instance FromJSON JobTransformNameMApping where

18551855 (\ o -> pure JobTransformNameMApping)

18561856

18571857instance ToJSON JobTransformNameMApping where

1858− toJSON = const (Object mempty)

1858+ toJSON = const emptyObject

18591859

18601860-- | The source to read from, plus its parameters.

18611861--

@@ -1875,7 +1875,7 @@ instance FromJSON SourceSpec where

18751875 = withObject "SourceSpec" (\ o -> pure SourceSpec)

18761876

18771877instance ToJSON SourceSpec where

1878− toJSON = const (Object mempty)

1878+ toJSON = const emptyObject

18791879

18801880-- | Metadata about a Source useful for automatically optimizing and tuning

18811881-- the pipeline, etc.

@@ -1963,7 +1963,7 @@ instance FromJSON EnvironmentInternalExperiments

19631963 (\ o -> pure EnvironmentInternalExperiments)

19641964

19651965instance ToJSON EnvironmentInternalExperiments where

1966− toJSON = const (Object mempty)

1966+ toJSON = const emptyObject

19671967

19681968-- | Taskrunner configuration settings.

19691969--

@@ -2255,7 +2255,7 @@ instance FromJSON EnvironmentSdkPipelineOptions where

22552255 (\ o -> pure EnvironmentSdkPipelineOptions)

22562256

22572257instance ToJSON EnvironmentSdkPipelineOptions where

2258− toJSON = const (Object mempty)

2258+ toJSON = const emptyObject

22592259

22602260-- | Request to lease WorkItems.

22612261--

@@ -2423,7 +2423,7 @@ instance FromJSON

24232423

24242424instance ToJSON

24252425 TopologyConfigUserStageToComputationNameMap where

2426− toJSON = const (Object mempty)

2426+ toJSON = const emptyObject

24272427

24282428-- | A task which consists of a shell command for the worker to execute.

24292429--

@@ -2490,7 +2490,7 @@ instance FromJSON StatusDetailsItem where

24902490 (\ o -> pure StatusDetailsItem)

24912491

24922492instance ToJSON StatusDetailsItem where

2493− toJSON = const (Object mempty)

2493+ toJSON = const emptyObject

24942494

24952495-- | Named properties associated with the step. Each kind of predefined step

24962496-- has its own required set of properties.

@@ -2512,7 +2512,7 @@ instance FromJSON StepProperties where

25122512 (\ o -> pure StepProperties)

25132513

25142514instance ToJSON StepProperties where

2515− toJSON = const (Object mempty)

2515+ toJSON = const emptyObject

25162516

25172517-- | Global topology of the streaming Dataflow job, including all

25182518-- computations and their sharded locations.

@@ -2709,7 +2709,7 @@ instance FromJSON WorkItemServiceStateHarnessData

27092709 (\ o -> pure WorkItemServiceStateHarnessData)

27102710

27112711instance ToJSON WorkItemServiceStateHarnessData where

2712− toJSON = const (Object mempty)

2712+ toJSON = const emptyObject

27132713

27142714-- | Data disk assignment for a given VM instance.

27152715--

@@ -2961,7 +2961,7 @@ instance FromJSON

29612961

29622962instance ToJSON

29632963 PartialGroupByKeyInstructionInputElementCodec where

2964− toJSON = const (Object mempty)

2964+ toJSON = const emptyObject

29652965

29662966-- | MapTask consists of an ordered set of instructions, each of which

29672967-- describes one particular low-level operation for the worker to perform

@@ -3083,7 +3083,7 @@ instance FromJSON SinkCodec where

30833083 = withObject "SinkCodec" (\ o -> pure SinkCodec)

30843084

30853085instance ToJSON SinkCodec where

3086− toJSON = const (Object mempty)

3086+ toJSON = const emptyObject

30873087

30883088-- | The user function to invoke.

30893089--

@@ -3104,7 +3104,7 @@ instance FromJSON ParDoInstructionUserFn where

31043104 (\ o -> pure ParDoInstructionUserFn)

31053105

31063106instance ToJSON ParDoInstructionUserFn where

3107− toJSON = const (Object mempty)

3107+ toJSON = const emptyObject

31083108

31093109-- | The codec to use to encode data being written via this output.

31103110--

@@ -3125,7 +3125,7 @@ instance FromJSON InstructionOutputCodec where

31253125 (\ o -> pure InstructionOutputCodec)

31263126

31273127instance ToJSON InstructionOutputCodec where

3128− toJSON = const (Object mempty)

3128+ toJSON = const emptyObject

31293129

31303130-- | Describes a stream of data, either as input to be processed or as output

31313131-- of a streaming Dataflow job.

@@ -3224,7 +3224,7 @@ instance FromJSON WorkerPoolPoolArgs where

32243224 (\ o -> pure WorkerPoolPoolArgs)

32253225

32263226instance ToJSON WorkerPoolPoolArgs where

3227− toJSON = const (Object mempty)

3227+ toJSON = const emptyObject

32283228

32293229-- | Identifies the location of a streaming side input.

32303230--

@@ -3506,7 +3506,7 @@ instance FromJSON SeqMapTaskUserFn where

35063506 (\ o -> pure SeqMapTaskUserFn)

35073507

35083508instance ToJSON SeqMapTaskUserFn where

3509− toJSON = const (Object mempty)

3509+ toJSON = const emptyObject

35103510

35113511-- | The value combining function to invoke.

35123512--

@@ -3532,7 +3532,7 @@ instance FromJSON

35323532

35333533instance ToJSON

35343534 PartialGroupByKeyInstructionValueCombiningFn where

3535− toJSON = const (Object mempty)

3535+ toJSON = const emptyObject

35363536

35373537-- | Defines a job to be run by the Dataflow service.

35383538--

@@ -3805,7 +3805,7 @@ instance FromJSON SinkSpec where

38053805 = withObject "SinkSpec" (\ o -> pure SinkSpec)

38063806

38073807instance ToJSON SinkSpec where

3808− toJSON = const (Object mempty)

3808+ toJSON = const emptyObject

38093809

38103810-- | Describes one particular pool of Dataflow workers to be instantiated by

38113811-- the Dataflow service in order to perform the computations required by a

@@ -4934,7 +4934,7 @@ instance FromJSON SourceBaseSpecsItem where

49344934 (\ o -> pure SourceBaseSpecsItem)

49354935

49364936instance ToJSON SourceBaseSpecsItem where

4937− toJSON = const (Object mempty)

4937+ toJSON = const emptyObject

49384938

49394939-- | Describes a particular operation comprising a MapTask.

49404940--

@@ -5066,7 +5066,7 @@ instance FromJSON SideInputInfoKind where

50665066 (\ o -> pure SideInputInfoKind)

50675067

50685068instance ToJSON SideInputInfoKind where

5069− toJSON = const (Object mempty)

5069+ toJSON = const emptyObject

50705070

50715071-- | DEPRECATED in favor of DerivedSource.

50725072--

@@ -5229,7 +5229,7 @@ instance FromJSON SourceCodec where

52295229 = withObject "SourceCodec" (\ o -> pure SourceCodec)

52305230

52315231instance ToJSON SourceCodec where

5232− toJSON = const (Object mempty)

5232+ toJSON = const emptyObject

52335233

52345234-- | State family configuration.

52355235--

gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+1−1

@@ -386,7 +386,7 @@ instance FromJSON EntityProperties where

386386 (\ o -> pure EntityProperties)

387387

388388instance ToJSON EntityProperties where

389− toJSON = const (Object mempty)

389+ toJSON = const emptyObject

390390

391391--

392392-- /See:/ 'beginTransactionRequest' smart constructor.

gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+3−3

@@ -183,7 +183,7 @@ instance FromJSON Empty where

183183 parseJSON = withObject "Empty" (\ o -> pure Empty)

184184

185185instance ToJSON Empty where

186− toJSON = const (Object mempty)

186+ toJSON = const emptyObject

187187

188188-- | The response of updating an active breakpoint. The message is defined to

189189-- allow future extensions.

@@ -206,7 +206,7 @@ instance FromJSON UpdateActiveBreakpointResponse

206206 (\ o -> pure UpdateActiveBreakpointResponse)

207207

208208instance ToJSON UpdateActiveBreakpointResponse where

209− toJSON = const (Object mempty)

209+ toJSON = const emptyObject

210210

211211-- | A SourceContext referring to a Gerrit project.

212212--

@@ -1316,7 +1316,7 @@ instance FromJSON DebuggeeLabels where

13161316 (\ o -> pure DebuggeeLabels)

13171317

13181318instance ToJSON DebuggeeLabels where

1319− toJSON = const (Object mempty)

1319+ toJSON = const emptyObject

13201320

13211321-- | Represents the application to debug. The application may include one or

13221322-- more replicated processes executing the same code. Each of these

gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+9−9

@@ -71,7 +71,7 @@ instance FromJSON RestDescriptionParameters where

7171 (\ o -> pure RestDescriptionParameters)

7272

7373instance ToJSON RestDescriptionParameters where

74− toJSON = const (Object mempty)

74+ toJSON = const emptyObject

7575

7676--

7777-- /See:/ 'restMethod' smart constructor.

@@ -350,7 +350,7 @@ instance FromJSON RestDescriptionAuthOAuth2Scopes

350350 (\ o -> pure RestDescriptionAuthOAuth2Scopes)

351351

352352instance ToJSON RestDescriptionAuthOAuth2Scopes where

353− toJSON = const (Object mempty)

353+ toJSON = const emptyObject

354354

355355-- | API-level methods for this API.

356356--

@@ -371,7 +371,7 @@ instance FromJSON RestDescriptionMethods where

371371 (\ o -> pure RestDescriptionMethods)

372372

373373instance ToJSON RestDescriptionMethods where

374− toJSON = const (Object mempty)

374+ toJSON = const emptyObject

375375

376376--

377377-- /See:/ 'directoryListItemsItem' smart constructor.

@@ -595,7 +595,7 @@ instance FromJSON RestResourceResources where

595595 (\ o -> pure RestResourceResources)

596596

597597instance ToJSON RestResourceResources where

598− toJSON = const (Object mempty)

598+ toJSON = const emptyObject

599599

600600-- | OAuth 2.0 authentication information.

601601--

@@ -796,7 +796,7 @@ instance FromJSON RestResourceMethods where

796796 (\ o -> pure RestResourceMethods)

797797

798798instance ToJSON RestResourceMethods where

799− toJSON = const (Object mempty)

799+ toJSON = const emptyObject

800800

801801-- | Authentication information.

802802--

@@ -1460,7 +1460,7 @@ instance FromJSON RestDescriptionSchemas where

14601460 (\ o -> pure RestDescriptionSchemas)

14611461

14621462instance ToJSON RestDescriptionSchemas where

1463− toJSON = const (Object mempty)

1463+ toJSON = const emptyObject

14641464

14651465--

14661466-- /See:/ 'jsonSchemaVariantMapItem' smart constructor.

@@ -1525,7 +1525,7 @@ instance FromJSON RestDescriptionResources where

15251525 (\ o -> pure RestDescriptionResources)

15261526

15271527instance ToJSON RestDescriptionResources where

1528− toJSON = const (Object mempty)

1528+ toJSON = const emptyObject

15291529

15301530-- | Supported upload protocols.

15311531--

@@ -1633,7 +1633,7 @@ instance FromJSON RestMethodParameters where

16331633 (\ o -> pure RestMethodParameters)

16341634

16351635instance ToJSON RestMethodParameters where

1636− toJSON = const (Object mempty)

1636+ toJSON = const emptyObject

16371637

16381638-- | Media upload parameters.

16391639--

@@ -1716,7 +1716,7 @@ instance FromJSON JSONSchemaProperties where

17161716 (\ o -> pure JSONSchemaProperties)

17171717

17181718instance ToJSON JSONSchemaProperties where

1719− toJSON = const (Object mempty)

1719+ toJSON = const emptyObject

17201720

17211721-- | Supports the Resumable Media Upload protocol.

17221722--

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+1−1

@@ -38,7 +38,7 @@ instance FromJSON ReportRow where

3838 = withObject "ReportRow" (\ o -> pure ReportRow)

3939

4040instance ToJSON ReportRow where

41− toJSON = const (Object mempty)

41+ toJSON = const emptyObject

4242

4343-- | A request object used to create a DoubleClick Search report.

4444--

gogol-drive/gen/Network/Google/Drive/Types/Product.hs+4−4

@@ -725,7 +725,7 @@ instance FromJSON FileOpenWithLinks where

725725 (\ o -> pure FileOpenWithLinks)

726726

727727instance ToJSON FileOpenWithLinks where

728− toJSON = const (Object mempty)

728+ toJSON = const emptyObject

729729

730730--

731731-- /See:/ 'aboutAdditionalRoleInfoItemRoleSetsItem' smart constructor.

@@ -2040,7 +2040,7 @@ instance FromJSON RevisionExportLinks where

20402040 (\ o -> pure RevisionExportLinks)

20412041

20422042instance ToJSON RevisionExportLinks where

2043− toJSON = const (Object mempty)

2043+ toJSON = const emptyObject

20442044

20452045-- | Indexable text attributes for the file (can only be written)

20462046--

@@ -2141,7 +2141,7 @@ instance FromJSON ChannelParams where

21412141 (\ o -> pure ChannelParams)

21422142

21432143instance ToJSON ChannelParams where

2144− toJSON = const (Object mempty)

2144+ toJSON = const emptyObject

21452145

21462146-- | An item with user information and settings.

21472147--

@@ -4520,7 +4520,7 @@ instance FromJSON FileExportLinks where

45204520 (\ o -> pure FileExportLinks)

45214521

45224522instance ToJSON FileExportLinks where

4523− toJSON = const (Object mempty)

4523+ toJSON = const emptyObject

45244524

45254525-- | A JSON representation of a list of comments on a file in Google Drive.

45264526--

gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+1−1

@@ -204,4 +204,4 @@ instance FromJSON WebfontFiles where

204204 (\ o -> pure WebfontFiles)

205205

206206instance ToJSON WebfontFiles where

207− toJSON = const (Object mempty)

207+ toJSON = const emptyObject

gogol-fusiontables/gen/Network/Google/FusionTables.hs+35−35

@@ -333,41 +333,41 @@ module Network.Google.FusionTables

333333 , lsStrokeColor

334334 ) where

335335

336−import Network.Google.FusionTables.Types

337−import Network.Google.Prelude

338−import Network.Google.Resource.FusionTables.Column.Delete

339−import Network.Google.Resource.FusionTables.Column.Get

340−import Network.Google.Resource.FusionTables.Column.Insert

341−import Network.Google.Resource.FusionTables.Column.List

342−import Network.Google.Resource.FusionTables.Column.Patch

343−import Network.Google.Resource.FusionTables.Column.Update

344−import Network.Google.Resource.FusionTables.Query.SQL

345−import Network.Google.Resource.FusionTables.Query.SQLGet

346−import Network.Google.Resource.FusionTables.Style.Delete

347−import Network.Google.Resource.FusionTables.Style.Get

348−import Network.Google.Resource.FusionTables.Style.Insert

349−import Network.Google.Resource.FusionTables.Style.List

350−import Network.Google.Resource.FusionTables.Style.Patch

351−import Network.Google.Resource.FusionTables.Style.Update

352−import Network.Google.Resource.FusionTables.Table.Copy

353−import Network.Google.Resource.FusionTables.Table.Delete

354−import Network.Google.Resource.FusionTables.Table.Get

355−import Network.Google.Resource.FusionTables.Table.ImportRows

356−import Network.Google.Resource.FusionTables.Table.ImportTable

357−import Network.Google.Resource.FusionTables.Table.Insert

358−import Network.Google.Resource.FusionTables.Table.List

359−import Network.Google.Resource.FusionTables.Table.Patch

360−import Network.Google.Resource.FusionTables.Table.ReplaceRows

361−import Network.Google.Resource.FusionTables.Table.Update

362−import Network.Google.Resource.FusionTables.Task.Delete

363−import Network.Google.Resource.FusionTables.Task.Get

364−import Network.Google.Resource.FusionTables.Task.List

365−import Network.Google.Resource.FusionTables.Template.Delete

366−import Network.Google.Resource.FusionTables.Template.Get

367−import Network.Google.Resource.FusionTables.Template.Insert

368−import Network.Google.Resource.FusionTables.Template.List

369−import Network.Google.Resource.FusionTables.Template.Patch

370−import Network.Google.Resource.FusionTables.Template.Update

336+import Network.Google.Prelude

337+import Network.Google.FusionTables.Types

338+import Network.Google.Resource.FusionTables.Column.Delete

339+import Network.Google.Resource.FusionTables.Column.Get

340+import Network.Google.Resource.FusionTables.Column.Insert

341+import Network.Google.Resource.FusionTables.Column.List

342+import Network.Google.Resource.FusionTables.Column.Patch

343+import Network.Google.Resource.FusionTables.Column.Update

344+import Network.Google.Resource.FusionTables.Query.SQL

345+import Network.Google.Resource.FusionTables.Query.SQLGet

346+import Network.Google.Resource.FusionTables.Style.Delete

347+import Network.Google.Resource.FusionTables.Style.Get

348+import Network.Google.Resource.FusionTables.Style.Insert

349+import Network.Google.Resource.FusionTables.Style.List

350+import Network.Google.Resource.FusionTables.Style.Patch

351+import Network.Google.Resource.FusionTables.Style.Update

352+import Network.Google.Resource.FusionTables.Table.Copy

353+import Network.Google.Resource.FusionTables.Table.Delete

354+import Network.Google.Resource.FusionTables.Table.Get

355+import Network.Google.Resource.FusionTables.Table.ImportRows

356+import Network.Google.Resource.FusionTables.Table.ImportTable

357+import Network.Google.Resource.FusionTables.Table.Insert

358+import Network.Google.Resource.FusionTables.Table.List

359+import Network.Google.Resource.FusionTables.Table.Patch

360+import Network.Google.Resource.FusionTables.Table.ReplaceRows

361+import Network.Google.Resource.FusionTables.Table.Update

362+import Network.Google.Resource.FusionTables.Task.Delete

363+import Network.Google.Resource.FusionTables.Task.Get

364+import Network.Google.Resource.FusionTables.Task.List

365+import Network.Google.Resource.FusionTables.Template.Delete

366+import Network.Google.Resource.FusionTables.Template.Get

367+import Network.Google.Resource.FusionTables.Template.Insert

368+import Network.Google.Resource.FusionTables.Template.List

369+import Network.Google.Resource.FusionTables.Template.Patch

370+import Network.Google.Resource.FusionTables.Template.Update

371371

372372{- $resources

373373TODO

gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+3−3

@@ -223,9 +223,9 @@ module Network.Google.FusionTables.Types

223223 , lsStrokeColor

224224 ) where

225225

226−import Network.Google.FusionTables.Types.Product

227−import Network.Google.FusionTables.Types.Sum

228−import Network.Google.Prelude

226+import Network.Google.FusionTables.Types.Product

227+import Network.Google.FusionTables.Types.Sum

228+import Network.Google.Prelude

229229

230230-- | URL referring to version 'v2' of the Fusion Tables API.

231231fusionTablesURL :: BaseUrl

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+110−110

@@ -17,17 +17,17 @@

1717--

1818module Network.Google.FusionTables.Types.Product where

1919

20−import Network.Google.FusionTables.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.FusionTables.Types.Sum

21+import Network.Google.Prelude

2222

2323-- | Represents a list of columns in a table.

2424--

2525-- /See:/ 'columnList' smart constructor.

2626data ColumnList = ColumnList

27− { _clTotalItems :: !(Maybe Int32)

27+ { _clTotalItems :: !(Maybe Int32)

2828 , _clNextPageToken :: !(Maybe Text)

29− , _clKind :: !Text

30− , _clItems :: !(Maybe [Column])

29+ , _clKind :: !Text

30+ , _clItems :: !(Maybe [Column])

3131 } deriving (Eq,Show,Data,Typeable,Generic)

3232

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

@@ -43,7 +43,7 @@ data ColumnList = ColumnList

4343-- * 'clItems'

4444columnList

4545 :: ColumnList

46−columnList =

46+columnList =

4747 ColumnList

4848 { _clTotalItems = Nothing

4949 , _clNextPageToken = Nothing

@@ -96,8 +96,8 @@ instance ToJSON ColumnList where

9696-- /See:/ 'tableList' smart constructor.

9797data TableList = TableList

9898 { _tlNextPageToken :: !(Maybe Text)

99− , _tlKind :: !Text

100− , _tlItems :: !(Maybe [Table])

99+ , _tlKind :: !Text

100+ , _tlItems :: !(Maybe [Table])

101101 } deriving (Eq,Show,Data,Typeable,Generic)

102102

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

@@ -111,7 +111,7 @@ data TableList = TableList

111111-- * 'tlItems'

112112tableList

113113 :: TableList

114−tableList =

114+tableList =

115115 TableList

116116 { _tlNextPageToken = Nothing

117117 , _tlKind = "fusiontables#tableList"

@@ -156,9 +156,9 @@ instance ToJSON TableList where

156156--

157157-- /See:/ 'styleFunction' smart constructor.

158158data StyleFunction = StyleFunction

159− { _sfBuckets :: !(Maybe [Bucket])

160− , _sfKind :: !(Maybe Text)

161− , _sfGradient :: !(Maybe StyleFunctionGradient)

159+ { _sfBuckets :: !(Maybe [Bucket])

160+ , _sfKind :: !(Maybe Text)

161+ , _sfGradient :: !(Maybe StyleFunctionGradient)

162162 , _sfColumnName :: !(Maybe Text)

163163 } deriving (Eq,Show,Data,Typeable,Generic)

164164

@@ -175,7 +175,7 @@ data StyleFunction = StyleFunction

175175-- * 'sfColumnName'

176176styleFunction

177177 :: StyleFunction

178−styleFunction =

178+styleFunction =

179179 StyleFunction

180180 { _sfBuckets = Nothing

181181 , _sfKind = Nothing

@@ -236,7 +236,7 @@ instance ToJSON StyleFunction where

236236-- /See:/ 'columnBaseColumn' smart constructor.

237237data ColumnBaseColumn = ColumnBaseColumn

238238 { _cbcTableIndex :: !(Maybe Int32)

239− , _cbcColumnId :: !(Maybe Int32)

239+ , _cbcColumnId :: !(Maybe Int32)

240240 } deriving (Eq,Show,Data,Typeable,Generic)

241241

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

@@ -248,7 +248,7 @@ data ColumnBaseColumn = ColumnBaseColumn

248248-- * 'cbcColumnId'

249249columnBaseColumn

250250 :: ColumnBaseColumn

251−columnBaseColumn =

251+columnBaseColumn =

252252 ColumnBaseColumn

253253 { _cbcTableIndex = Nothing

254254 , _cbcColumnId = Nothing

@@ -284,8 +284,8 @@ instance ToJSON ColumnBaseColumn where

284284--

285285-- /See:/ 'sQLresponse' smart constructor.

286286data SQLresponse = SQLresponse

287− { _sqlKind :: !Text

288− , _sqlRows :: !(Maybe [[JSONValue]])

287+ { _sqlKind :: !Text

288+ , _sqlRows :: !(Maybe [[JSONValue]])

289289 , _sqlColumns :: !(Maybe [Text])

290290 } deriving (Eq,Show,Data,Typeable,Generic)

291291

@@ -300,7 +300,7 @@ data SQLresponse = SQLresponse

300300-- * 'sqlColumns'

301301sQLresponse

302302 :: SQLresponse

303−sQLresponse =

303+sQLresponse =

304304 SQLresponse

305305 { _sqlKind = "fusiontables#sqlresponse"

306306 , _sqlRows = Nothing

@@ -346,7 +346,7 @@ instance ToJSON SQLresponse where

346346--

347347-- /See:/ 'styleFunctionGradientColorsItem' smart constructor.

348348data StyleFunctionGradientColorsItem = StyleFunctionGradientColorsItem

349− { _sfgciColor :: !(Maybe Text)

349+ { _sfgciColor :: !(Maybe Text)

350350 , _sfgciOpacity :: !(Maybe Double)

351351 } deriving (Eq,Show,Data,Typeable,Generic)

352352

@@ -359,7 +359,7 @@ data StyleFunctionGradientColorsItem = StyleFunctionGradientColorsItem

359359-- * 'sfgciOpacity'

360360styleFunctionGradientColorsItem

361361 :: StyleFunctionGradientColorsItem

362−styleFunctionGradientColorsItem =

362+styleFunctionGradientColorsItem =

363363 StyleFunctionGradientColorsItem

364364 { _sfgciColor = Nothing

365365 , _sfgciOpacity = Nothing

@@ -394,10 +394,10 @@ instance ToJSON StyleFunctionGradientColorsItem where

394394--

395395-- /See:/ 'styleSettingList' smart constructor.

396396data StyleSettingList = StyleSettingList

397− { _sslTotalItems :: !(Maybe Int32)

397+ { _sslTotalItems :: !(Maybe Int32)

398398 , _sslNextPageToken :: !(Maybe Text)

399− , _sslKind :: !Text

400− , _sslItems :: !(Maybe [StyleSetting])

399+ , _sslKind :: !Text

400+ , _sslItems :: !(Maybe [StyleSetting])

401401 } deriving (Eq,Show,Data,Typeable,Generic)

402402

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

@@ -413,7 +413,7 @@ data StyleSettingList = StyleSettingList

413413-- * 'sslItems'

414414styleSettingList

415415 :: StyleSettingList

416−styleSettingList =

416+styleSettingList =

417417 StyleSettingList

418418 { _sslTotalItems = Nothing

419419 , _sslNextPageToken = Nothing

@@ -469,12 +469,12 @@ instance ToJSON StyleSettingList where

469469--

470470-- /See:/ 'bucket' smart constructor.

471471data Bucket = Bucket

472− { _bMax :: !(Maybe Double)

473− , _bColor :: !(Maybe Text)

474− , _bWeight :: !(Maybe Int32)

475− , _bIcon :: !(Maybe Text)

472+ { _bMax :: !(Maybe Double)

473+ , _bColor :: !(Maybe Text)

474+ , _bWeight :: !(Maybe Int32)

475+ , _bIcon :: !(Maybe Text)

476476 , _bOpacity :: !(Maybe Double)

477− , _bMin :: !(Maybe Double)

477+ , _bMin :: !(Maybe Double)

478478 } deriving (Eq,Show,Data,Typeable,Generic)

479479

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

@@ -494,7 +494,7 @@ data Bucket = Bucket

494494-- * 'bMin'

495495bucket

496496 :: Bucket

497−bucket =

497+bucket =

498498 Bucket

499499 { _bMax = Nothing

500500 , _bColor = Nothing

@@ -554,7 +554,7 @@ instance ToJSON Bucket where

554554-- /See:/ 'line' smart constructor.

555555data Line = Line

556556 { _lCoordinates :: !(Maybe [[Double]])

557− , _lType :: !Text

557+ , _lType :: !Text

558558 } deriving (Eq,Show,Data,Typeable,Generic)

559559

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

@@ -566,7 +566,7 @@ data Line = Line

566566-- * 'lType'

567567line

568568 :: Line

569−line =

569+line =

570570 Line

571571 { _lCoordinates = Nothing

572572 , _lType = "LineString"

@@ -604,12 +604,12 @@ instance ToJSON Line where

604604-- /See:/ 'styleSetting' smart constructor.

605605data StyleSetting = StyleSetting

606606 { _ssPolylineOptions :: !(Maybe LineStyle)

607− , _ssPolygonOptions :: !(Maybe PolygonStyle)

608− , _ssMarkerOptions :: !(Maybe PointStyle)

609− , _ssKind :: !Text

610− , _ssName :: !(Maybe Text)

611− , _ssStyleId :: !(Maybe Int32)

612− , _ssTableId :: !(Maybe Text)

607+ , _ssPolygonOptions :: !(Maybe PolygonStyle)

608+ , _ssMarkerOptions :: !(Maybe PointStyle)

609+ , _ssKind :: !Text

610+ , _ssName :: !(Maybe Text)

611+ , _ssStyleId :: !(Maybe Int32)

612+ , _ssTableId :: !(Maybe Text)

613613 } deriving (Eq,Show,Data,Typeable,Generic)

614614

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

@@ -631,7 +631,7 @@ data StyleSetting = StyleSetting

631631-- * 'ssTableId'

632632styleSetting

633633 :: StyleSetting

634−styleSetting =

634+styleSetting =

635635 StyleSetting

636636 { _ssPolylineOptions = Nothing

637637 , _ssPolygonOptions = Nothing

@@ -710,7 +710,7 @@ instance ToJSON StyleSetting where

710710-- /See:/ 'point' smart constructor.

711711data Point = Point

712712 { _pCoordinates :: !(Maybe [Double])

713− , _pType :: !Text

713+ , _pType :: !Text

714714 } deriving (Eq,Show,Data,Typeable,Generic)

715715

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

@@ -722,7 +722,7 @@ data Point = Point

722722-- * 'pType'

723723point

724724 :: Point

725−point =

725+point =

726726 Point

727727 { _pCoordinates = Nothing

728728 , _pType = "Point"

@@ -759,7 +759,7 @@ instance ToJSON Point where

759759-- /See:/ 'polygon' smart constructor.

760760data Polygon = Polygon

761761 { _polCoordinates :: !(Maybe [[[Double]]])

762− , _polType :: !Text

762+ , _polType :: !Text

763763 } deriving (Eq,Show,Data,Typeable,Generic)

764764

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

@@ -771,7 +771,7 @@ data Polygon = Polygon

771771-- * 'polType'

772772polygon

773773 :: Polygon

774−polygon =

774+polygon =

775775 Polygon

776776 { _polCoordinates = Nothing

777777 , _polType = "Polygon"

@@ -808,10 +808,10 @@ instance ToJSON Polygon where

808808--

809809-- /See:/ 'taskList' smart constructor.

810810data TaskList = TaskList

811− { _tTotalItems :: !(Maybe Int32)

811+ { _tTotalItems :: !(Maybe Int32)

812812 , _tNextPageToken :: !(Maybe Text)

813− , _tKind :: !Text

814− , _tItems :: !(Maybe [Task])

813+ , _tKind :: !Text

814+ , _tItems :: !(Maybe [Task])

815815 } deriving (Eq,Show,Data,Typeable,Generic)

816816

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

@@ -827,7 +827,7 @@ data TaskList = TaskList

827827-- * 'tItems'

828828taskList

829829 :: TaskList

830−taskList =

830+taskList =

831831 TaskList

832832 { _tTotalItems = Nothing

833833 , _tNextPageToken = Nothing

@@ -879,8 +879,8 @@ instance ToJSON TaskList where

879879-- /See:/ 'geometry' smart constructor.

880880data Geometry = Geometry

881881 { _gGeometries :: !(Maybe [JSONValue])

882− , _gGeometry :: !(Maybe JSONValue)

883− , _gType :: !Text

882+ , _gGeometry :: !(Maybe JSONValue)

883+ , _gType :: !Text

884884 } deriving (Eq,Show,Data,Typeable,Generic)

885885

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

@@ -894,7 +894,7 @@ data Geometry = Geometry

894894-- * 'gType'

895895geometry

896896 :: Geometry

897−geometry =

897+geometry =

898898 Geometry

899899 { _gGeometries = Nothing

900900 , _gGeometry = Nothing

@@ -937,10 +937,10 @@ instance ToJSON Geometry where

937937--

938938-- /See:/ 'templateList' smart constructor.

939939data TemplateList = TemplateList

940− { _temTotalItems :: !(Maybe Int32)

940+ { _temTotalItems :: !(Maybe Int32)

941941 , _temNextPageToken :: !(Maybe Text)

942− , _temKind :: !Text

943− , _temItems :: !(Maybe [Template])

942+ , _temKind :: !Text

943+ , _temItems :: !(Maybe [Template])

944944 } deriving (Eq,Show,Data,Typeable,Generic)

945945

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

@@ -956,7 +956,7 @@ data TemplateList = TemplateList

956956-- * 'temItems'

957957templateList

958958 :: TemplateList

959−templateList =

959+templateList =

960960 TemplateList

961961 { _temTotalItems = Nothing

962962 , _temNextPageToken = Nothing

@@ -1011,7 +1011,7 @@ instance ToJSON TemplateList where

10111011--

10121012-- /See:/ 'import'' smart constructor.

10131013data Import = Import

1014− { _iKind :: !Text

1014+ { _iKind :: !Text

10151015 , _iNumRowsReceived :: !(Maybe Int64)

10161016 } deriving (Eq,Show,Data,Typeable,Generic)

10171017

@@ -1024,7 +1024,7 @@ data Import = Import

10241024-- * 'iNumRowsReceived'

10251025import'

10261026 :: Import

1027−import' =

1027+import' =

10281028 Import

10291029 { _iKind = "fusiontables#import"

10301030 , _iNumRowsReceived = Nothing

@@ -1062,10 +1062,10 @@ instance ToJSON Import where

10621062-- /See:/ 'task' smart constructor.

10631063data Task = Task

10641064 { _tasProgress :: !(Maybe Text)

1065− , _tasTaskId :: !(Maybe Int64)

1066− , _tasKind :: !Text

1067− , _tasType :: !(Maybe Text)

1068− , _tasStarted :: !(Maybe Bool)

1065+ , _tasTaskId :: !(Maybe Int64)

1066+ , _tasKind :: !Text

1067+ , _tasType :: !(Maybe Text)

1068+ , _tasStarted :: !(Maybe Bool)

10691069 } deriving (Eq,Show,Data,Typeable,Generic)

10701070

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

@@ -1083,7 +1083,7 @@ data Task = Task

10831083-- * 'tasStarted'

10841084task

10851085 :: Task

1086−task =

1086+task =

10871087 Task

10881088 { _tasProgress = Nothing

10891089 , _tasTaskId = Nothing

@@ -1140,11 +1140,11 @@ instance ToJSON Task where

11401140-- /See:/ 'template' smart constructor.

11411141data Template = Template

11421142 { _temeAutomaticColumnNames :: !(Maybe [Text])

1143− , _temeTemplateId :: !(Maybe Int32)

1144− , _temeKind :: !Text

1145− , _temeBody :: !(Maybe Text)

1146− , _temeName :: !(Maybe Text)

1147− , _temeTableId :: !(Maybe Text)

1143+ , _temeTemplateId :: !(Maybe Int32)

1144+ , _temeKind :: !Text

1145+ , _temeBody :: !(Maybe Text)

1146+ , _temeName :: !(Maybe Text)

1147+ , _temeTableId :: !(Maybe Text)

11481148 } deriving (Eq,Show,Data,Typeable,Generic)

11491149

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

@@ -1164,7 +1164,7 @@ data Template = Template

11641164-- * 'temeTableId'

11651165template

11661166 :: Template

1167−template =

1167+template =

11681168 Template

11691169 { _temeAutomaticColumnNames = Nothing

11701170 , _temeTemplateId = Nothing

@@ -1238,7 +1238,7 @@ instance ToJSON Template where

12381238--

12391239-- /See:/ 'pointStyle' smart constructor.

12401240data PointStyle = PointStyle

1241− { _psIconName :: !(Maybe Text)

1241+ { _psIconName :: !(Maybe Text)

12421242 , _psIconStyler :: !(Maybe StyleFunction)

12431243 } deriving (Eq,Show,Data,Typeable,Generic)

12441244

@@ -1251,7 +1251,7 @@ data PointStyle = PointStyle

12511251-- * 'psIconStyler'

12521252pointStyle

12531253 :: PointStyle

1254−pointStyle =

1254+pointStyle =

12551255 PointStyle

12561256 { _psIconName = Nothing

12571257 , _psIconStyler = Nothing

@@ -1286,14 +1286,14 @@ instance ToJSON PointStyle where

12861286--

12871287-- /See:/ 'polygonStyle' smart constructor.

12881288data PolygonStyle = PolygonStyle

1289− { _psFillColorStyler :: !(Maybe StyleFunction)

1290− , _psFillColor :: !(Maybe Text)

1291− , _psStrokeColorStyler :: !(Maybe StyleFunction)

1292− , _psStrokeWeight :: !(Maybe Int32)

1293− , _psStrokeOpacity :: !(Maybe Double)

1294− , _psFillOpacity :: !(Maybe Double)

1289+ { _psFillColorStyler :: !(Maybe StyleFunction)

1290+ , _psFillColor :: !(Maybe Text)

1291+ , _psStrokeColorStyler :: !(Maybe StyleFunction)

1292+ , _psStrokeWeight :: !(Maybe Int32)

1293+ , _psStrokeOpacity :: !(Maybe Double)

1294+ , _psFillOpacity :: !(Maybe Double)

12951295 , _psStrokeWeightStyler :: !(Maybe StyleFunction)

1296− , _psStrokeColor :: !(Maybe Text)

1296+ , _psStrokeColor :: !(Maybe Text)

12971297 } deriving (Eq,Show,Data,Typeable,Generic)

12981298

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

@@ -1317,7 +1317,7 @@ data PolygonStyle = PolygonStyle

13171317-- * 'psStrokeColor'

13181318polygonStyle

13191319 :: PolygonStyle

1320−polygonStyle =

1320+polygonStyle =

13211321 PolygonStyle

13221322 { _psFillColorStyler = Nothing

13231323 , _psFillColor = Nothing

@@ -1411,8 +1411,8 @@ instance ToJSON PolygonStyle where

14111411--

14121412-- /See:/ 'styleFunctionGradient' smart constructor.

14131413data StyleFunctionGradient = StyleFunctionGradient

1414− { _sfgMax :: !(Maybe Double)

1415− , _sfgMin :: !(Maybe Double)

1414+ { _sfgMax :: !(Maybe Double)

1415+ , _sfgMin :: !(Maybe Double)

14161416 , _sfgColors :: !(Maybe [StyleFunctionGradientColorsItem])

14171417 } deriving (Eq,Show,Data,Typeable,Generic)

14181418

@@ -1427,7 +1427,7 @@ data StyleFunctionGradient = StyleFunctionGradient

14271427-- * 'sfgColors'

14281428styleFunctionGradient

14291429 :: StyleFunctionGradient

1430−styleFunctionGradient =

1430+styleFunctionGradient =

14311431 StyleFunctionGradient

14321432 { _sfgMax = Nothing

14331433 , _sfgMin = Nothing

@@ -1470,18 +1470,18 @@ instance ToJSON StyleFunctionGradient where

14701470--

14711471-- /See:/ 'column' smart constructor.

14721472data Column = Column

1473− { _cColumnJSONSchema :: !(Maybe Text)

1474− , _cGraphPredicate :: !(Maybe Text)

1475− , _cKind :: !Text

1476− , _cBaseColumn :: !(Maybe ColumnBaseColumn)

1473+ { _cColumnJSONSchema :: !(Maybe Text)

1474+ , _cGraphPredicate :: !(Maybe Text)

1475+ , _cKind :: !Text

1476+ , _cBaseColumn :: !(Maybe ColumnBaseColumn)

14771477 , _cColumnPropertiesJSON :: !(Maybe Text)

1478− , _cName :: !(Maybe Text)

1479− , _cType :: !(Maybe Text)

1480− , _cFormatPattern :: !(Maybe Text)

1481− , _cColumnId :: !(Maybe Int32)

1482− , _cValidValues :: !(Maybe [Text])

1483− , _cValidateData :: !(Maybe Bool)

1484− , _cDescription :: !(Maybe Text)

1478+ , _cName :: !(Maybe Text)

1479+ , _cType :: !(Maybe Text)

1480+ , _cFormatPattern :: !(Maybe Text)

1481+ , _cColumnId :: !(Maybe Int32)

1482+ , _cValidValues :: !(Maybe [Text])

1483+ , _cValidateData :: !(Maybe Bool)

1484+ , _cDescription :: !(Maybe Text)

14851485 } deriving (Eq,Show,Data,Typeable,Generic)

14861486

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

@@ -1513,7 +1513,7 @@ data Column = Column

15131513-- * 'cDescription'

15141514column

15151515 :: Column

1516−column =

1516+column =

15171517 Column

15181518 { _cColumnJSONSchema = Nothing

15191519 , _cGraphPredicate = Nothing

@@ -1660,19 +1660,19 @@ instance ToJSON Column where

16601660--

16611661-- /See:/ 'table' smart constructor.

16621662data Table = Table

1663− { _tabIsExportable :: !(Maybe Bool)

1664− , _tabKind :: !Text

1663+ { _tabIsExportable :: !(Maybe Bool)

1664+ , _tabKind :: !Text

16651665 , _tabColumnPropertiesJSONSchema :: !(Maybe Text)

1666− , _tabTablePropertiesJSONSchema :: !(Maybe Text)

1667− , _tabName :: !(Maybe Text)

1668− , _tabTablePropertiesJSON :: !(Maybe Text)

1669− , _tabColumns :: !(Maybe [Column])

1670− , _tabBaseTableIds :: !(Maybe [Text])

1671− , _tabTableId :: !(Maybe Text)

1672− , _tabSQL :: !(Maybe Text)

1673− , _tabDescription :: !(Maybe Text)

1674− , _tabAttribution :: !(Maybe Text)

1675− , _tabAttributionLink :: !(Maybe Text)

1666+ , _tabTablePropertiesJSONSchema :: !(Maybe Text)

1667+ , _tabName :: !(Maybe Text)

1668+ , _tabTablePropertiesJSON :: !(Maybe Text)

1669+ , _tabColumns :: !(Maybe [Column])

1670+ , _tabBaseTableIds :: !(Maybe [Text])

1671+ , _tabTableId :: !(Maybe Text)

1672+ , _tabSQL :: !(Maybe Text)

1673+ , _tabDescription :: !(Maybe Text)

1674+ , _tabAttribution :: !(Maybe Text)

1675+ , _tabAttributionLink :: !(Maybe Text)

16761676 } deriving (Eq,Show,Data,Typeable,Generic)

16771677

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

@@ -1706,7 +1706,7 @@ data Table = Table

17061706-- * 'tabAttributionLink'

17071707table

17081708 :: Table

1709−table =

1709+table =

17101710 Table

17111711 { _tabIsExportable = Nothing

17121712 , _tabKind = "fusiontables#table"

@@ -1842,11 +1842,11 @@ instance ToJSON Table where

18421842--

18431843-- /See:/ 'lineStyle' smart constructor.

18441844data LineStyle = LineStyle

1845− { _lsStrokeColorStyler :: !(Maybe StyleFunction)

1846− , _lsStrokeWeight :: !(Maybe Int32)

1847− , _lsStrokeOpacity :: !(Maybe Double)

1845+ { _lsStrokeColorStyler :: !(Maybe StyleFunction)

1846+ , _lsStrokeWeight :: !(Maybe Int32)

1847+ , _lsStrokeOpacity :: !(Maybe Double)

18481848 , _lsStrokeWeightStyler :: !(Maybe StyleFunction)

1849− , _lsStrokeColor :: !(Maybe Text)

1849+ , _lsStrokeColor :: !(Maybe Text)

18501850 } deriving (Eq,Show,Data,Typeable,Generic)

18511851

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

@@ -1864,7 +1864,7 @@ data LineStyle = LineStyle

18641864-- * 'lsStrokeColor'

18651865lineStyle

18661866 :: LineStyle

1867−lineStyle =

1867+lineStyle =

18681868 LineStyle

18691869 { _lsStrokeColorStyler = Nothing

18701870 , _lsStrokeWeight = Nothing

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Sum.hs+1−1

@@ -16,4 +16,4 @@

1616--

1717module Network.Google.FusionTables.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Column.Delete

4343 , cdFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesColumnDelete@ which the

5050-- 'ColumnDelete'' request conforms to.

@@ -65,14 +65,14 @@ type ColumnDeleteResource =

6565--

6666-- /See:/ 'columnDelete'' smart constructor.

6767data ColumnDelete' = ColumnDelete'

68− { _cdQuotaUser :: !(Maybe Text)

68+ { _cdQuotaUser :: !(Maybe Text)

6969 , _cdPrettyPrint :: !Bool

70− , _cdUserIP :: !(Maybe Text)

71− , _cdKey :: !(Maybe Key)

72− , _cdOAuthToken :: !(Maybe OAuthToken)

73− , _cdTableId :: !Text

74− , _cdColumnId :: !Text

75− , _cdFields :: !(Maybe Text)

70+ , _cdUserIP :: !(Maybe Text)

71+ , _cdKey :: !(Maybe Key)

72+ , _cdOAuthToken :: !(Maybe OAuthToken)

73+ , _cdTableId :: !Text

74+ , _cdColumnId :: !Text

75+ , _cdFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ columnDelete'

9898 :: Text -- ^ 'tableId'

9999 -> Text -- ^ 'columnId'

100100 -> ColumnDelete'

101−columnDelete' pCdTableId_ pCdColumnId_ =

101+columnDelete' pCdTableId_ pCdColumnId_ =

102102 ColumnDelete'

103103 { _cdQuotaUser = Nothing

104104 , _cdPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Column.Get

4343 , cgFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesColumnGet@ which the

5050-- 'ColumnGet'' request conforms to.

@@ -65,14 +65,14 @@ type ColumnGetResource =

6565--

6666-- /See:/ 'columnGet'' smart constructor.

6767data ColumnGet' = ColumnGet'

68− { _cgQuotaUser :: !(Maybe Text)

68+ { _cgQuotaUser :: !(Maybe Text)

6969 , _cgPrettyPrint :: !Bool

70− , _cgUserIP :: !(Maybe Text)

71− , _cgKey :: !(Maybe Key)

72− , _cgOAuthToken :: !(Maybe OAuthToken)

73− , _cgTableId :: !Text

74− , _cgColumnId :: !Text

75− , _cgFields :: !(Maybe Text)

70+ , _cgUserIP :: !(Maybe Text)

71+ , _cgKey :: !(Maybe Key)

72+ , _cgOAuthToken :: !(Maybe OAuthToken)

73+ , _cgTableId :: !Text

74+ , _cgColumnId :: !Text

75+ , _cgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ columnGet'

9898 :: Text -- ^ 'tableId'

9999 -> Text -- ^ 'columnId'

100100 -> ColumnGet'

101−columnGet' pCgTableId_ pCgColumnId_ =

101+columnGet' pCgTableId_ pCgColumnId_ =

102102 ColumnGet'

103103 { _cgQuotaUser = Nothing

104104 , _cgPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Insert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Column.Insert

4343 , ciFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesColumnInsert@ which the

5050-- 'ColumnInsert'' request conforms to.

@@ -65,14 +65,14 @@ type ColumnInsertResource =

6565--

6666-- /See:/ 'columnInsert'' smart constructor.

6767data ColumnInsert' = ColumnInsert'

68− { _ciQuotaUser :: !(Maybe Text)

68+ { _ciQuotaUser :: !(Maybe Text)

6969 , _ciPrettyPrint :: !Bool

70− , _ciUserIP :: !(Maybe Text)

71− , _ciPayload :: !Column

72− , _ciKey :: !(Maybe Key)

73− , _ciOAuthToken :: !(Maybe OAuthToken)

74− , _ciTableId :: !Text

75− , _ciFields :: !(Maybe Text)

70+ , _ciUserIP :: !(Maybe Text)

71+ , _ciPayload :: !Column

72+ , _ciKey :: !(Maybe Key)

73+ , _ciOAuthToken :: !(Maybe OAuthToken)

74+ , _ciTableId :: !Text

75+ , _ciFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ columnInsert'

9898 :: Column -- ^ 'payload'

9999 -> Text -- ^ 'tableId'

100100 -> ColumnInsert'

101−columnInsert' pCiPayload_ pCiTableId_ =

101+columnInsert' pCiPayload_ pCiTableId_ =

102102 ColumnInsert'

103103 { _ciQuotaUser = Nothing

104104 , _ciPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Column.List

4444 , clFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesColumnList@ which the

5151-- 'ColumnList'' request conforms to.

@@ -67,15 +67,15 @@ type ColumnListResource =

6767--

6868-- /See:/ 'columnList'' smart constructor.

6969data ColumnList' = ColumnList'

70− { _clQuotaUser :: !(Maybe Text)

70+ { _clQuotaUser :: !(Maybe Text)

7171 , _clPrettyPrint :: !Bool

72− , _clUserIP :: !(Maybe Text)

73− , _clKey :: !(Maybe Key)

74− , _clPageToken :: !(Maybe Text)

75− , _clOAuthToken :: !(Maybe OAuthToken)

76− , _clTableId :: !Text

77− , _clMaxResults :: !(Maybe Word32)

78− , _clFields :: !(Maybe Text)

72+ , _clUserIP :: !(Maybe Text)

73+ , _clKey :: !(Maybe Key)

74+ , _clPageToken :: !(Maybe Text)

75+ , _clOAuthToken :: !(Maybe OAuthToken)

76+ , _clTableId :: !Text

77+ , _clMaxResults :: !(Maybe Word32)

78+ , _clFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -102,7 +102,7 @@ data ColumnList' = ColumnList'

102102columnList'

103103 :: Text -- ^ 'tableId'

104104 -> ColumnList'

105−columnList' pClTableId_ =

105+columnList' pClTableId_ =

106106 ColumnList'

107107 { _clQuotaUser = Nothing

108108 , _clPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Patch.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.FusionTables.Column.Patch

4545 , cpFields

4646 ) where

4747

48−import Network.Google.FusionTables.Types

49−import Network.Google.Prelude

48+import Network.Google.FusionTables.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @FusiontablesColumnPatch@ which the

5252-- 'ColumnPatch'' request conforms to.

@@ -69,15 +69,15 @@ type ColumnPatchResource =

6969--

7070-- /See:/ 'columnPatch'' smart constructor.

7171data ColumnPatch' = ColumnPatch'

72− { _cpQuotaUser :: !(Maybe Text)

72+ { _cpQuotaUser :: !(Maybe Text)

7373 , _cpPrettyPrint :: !Bool

74− , _cpUserIP :: !(Maybe Text)

75− , _cpPayload :: !Column

76− , _cpKey :: !(Maybe Key)

77− , _cpOAuthToken :: !(Maybe OAuthToken)

78− , _cpTableId :: !Text

79− , _cpColumnId :: !Text

80− , _cpFields :: !(Maybe Text)

74+ , _cpUserIP :: !(Maybe Text)

75+ , _cpPayload :: !Column

76+ , _cpKey :: !(Maybe Key)

77+ , _cpOAuthToken :: !(Maybe OAuthToken)

78+ , _cpTableId :: !Text

79+ , _cpColumnId :: !Text

80+ , _cpFields :: !(Maybe Text)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

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

@@ -106,7 +106,7 @@ columnPatch'

106106 -> Text -- ^ 'tableId'

107107 -> Text -- ^ 'columnId'

108108 -> ColumnPatch'

109−columnPatch' pCpPayload_ pCpTableId_ pCpColumnId_ =

109+columnPatch' pCpPayload_ pCpTableId_ pCpColumnId_ =

110110 ColumnPatch'

111111 { _cpQuotaUser = Nothing

112112 , _cpPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Column.Update

4444 , cuFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesColumnUpdate@ which the

5151-- 'ColumnUpdate'' request conforms to.

@@ -67,15 +67,15 @@ type ColumnUpdateResource =

6767--

6868-- /See:/ 'columnUpdate'' smart constructor.

6969data ColumnUpdate' = ColumnUpdate'

70− { _cuQuotaUser :: !(Maybe Text)

70+ { _cuQuotaUser :: !(Maybe Text)

7171 , _cuPrettyPrint :: !Bool

72− , _cuUserIP :: !(Maybe Text)

73− , _cuPayload :: !Column

74− , _cuKey :: !(Maybe Key)

75− , _cuOAuthToken :: !(Maybe OAuthToken)

76− , _cuTableId :: !Text

77− , _cuColumnId :: !Text

78− , _cuFields :: !(Maybe Text)

72+ , _cuUserIP :: !(Maybe Text)

73+ , _cuPayload :: !Column

74+ , _cuKey :: !(Maybe Key)

75+ , _cuOAuthToken :: !(Maybe OAuthToken)

76+ , _cuTableId :: !Text

77+ , _cuColumnId :: !Text

78+ , _cuFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ columnUpdate'

104104 -> Text -- ^ 'tableId'

105105 -> Text -- ^ 'columnId'

106106 -> ColumnUpdate'

107−columnUpdate' pCuPayload_ pCuTableId_ pCuColumnId_ =

107+columnUpdate' pCuPayload_ pCuTableId_ pCuColumnId_ =

108108 ColumnUpdate'

109109 { _cuQuotaUser = Nothing

110110 , _cuPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQL.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.FusionTables.Query.SQL

4545 , qsqlFields

4646 ) where

4747

48−import Network.Google.FusionTables.Types

49−import Network.Google.Prelude

48+import Network.Google.FusionTables.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @FusiontablesQuerySQL@ which the

5252-- 'QuerySQL'' request conforms to.

@@ -80,15 +80,15 @@ type QuerySQLResource =

8080--

8181-- /See:/ 'querySQL'' smart constructor.

8282data QuerySQL' = QuerySQL'

83− { _qsqlTyped :: !(Maybe Bool)

84− , _qsqlQuotaUser :: !(Maybe Text)

83+ { _qsqlTyped :: !(Maybe Bool)

84+ , _qsqlQuotaUser :: !(Maybe Text)

8585 , _qsqlPrettyPrint :: !Bool

86− , _qsqlHdrs :: !(Maybe Bool)

87− , _qsqlUserIP :: !(Maybe Text)

88− , _qsqlKey :: !(Maybe Key)

89− , _qsqlOAuthToken :: !(Maybe OAuthToken)

90− , _qsqlSQL :: !Text

91− , _qsqlFields :: !(Maybe Text)

86+ , _qsqlHdrs :: !(Maybe Bool)

87+ , _qsqlUserIP :: !(Maybe Text)

88+ , _qsqlKey :: !(Maybe Key)

89+ , _qsqlOAuthToken :: !(Maybe OAuthToken)

90+ , _qsqlSQL :: !Text

91+ , _qsqlFields :: !(Maybe Text)

9292 } deriving (Eq,Show,Data,Typeable,Generic)

9393

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

@@ -115,7 +115,7 @@ data QuerySQL' = QuerySQL'

115115querySQL'

116116 :: Text -- ^ 'sql'

117117 -> QuerySQL'

118−querySQL' pQsqlSQL_ =

118+querySQL' pQsqlSQL_ =

119119 QuerySQL'

120120 { _qsqlTyped = Nothing

121121 , _qsqlQuotaUser = Nothing

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQLGet.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Query.SQLGet

4444 , qsqlgFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesQuerySQLGet@ which the

5151-- 'QuerySQLGet'' request conforms to.

@@ -78,15 +78,15 @@ type QuerySQLGetResource =

7878--

7979-- /See:/ 'querySQLGet'' smart constructor.

8080data QuerySQLGet' = QuerySQLGet'

81− { _qsqlgTyped :: !(Maybe Bool)

82− , _qsqlgQuotaUser :: !(Maybe Text)

81+ { _qsqlgTyped :: !(Maybe Bool)

82+ , _qsqlgQuotaUser :: !(Maybe Text)

8383 , _qsqlgPrettyPrint :: !Bool

84− , _qsqlgHdrs :: !(Maybe Bool)

85− , _qsqlgUserIP :: !(Maybe Text)

86− , _qsqlgKey :: !(Maybe Key)

87− , _qsqlgOAuthToken :: !(Maybe OAuthToken)

88− , _qsqlgSQL :: !Text

89− , _qsqlgFields :: !(Maybe Text)

84+ , _qsqlgHdrs :: !(Maybe Bool)

85+ , _qsqlgUserIP :: !(Maybe Text)

86+ , _qsqlgKey :: !(Maybe Key)

87+ , _qsqlgOAuthToken :: !(Maybe OAuthToken)

88+ , _qsqlgSQL :: !Text

89+ , _qsqlgFields :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

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

@@ -113,7 +113,7 @@ data QuerySQLGet' = QuerySQLGet'

113113querySQLGet'

114114 :: Text -- ^ 'sql'

115115 -> QuerySQLGet'

116−querySQLGet' pQsqlgSQL_ =

116+querySQLGet' pQsqlgSQL_ =

117117 QuerySQLGet'

118118 { _qsqlgTyped = Nothing

119119 , _qsqlgQuotaUser = Nothing

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Style.Delete

4343 , sdFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesStyleDelete@ which the

5050-- 'StyleDelete'' request conforms to.

@@ -65,14 +65,14 @@ type StyleDeleteResource =

6565--

6666-- /See:/ 'styleDelete'' smart constructor.

6767data StyleDelete' = StyleDelete'

68− { _sdQuotaUser :: !(Maybe Text)

68+ { _sdQuotaUser :: !(Maybe Text)

6969 , _sdPrettyPrint :: !Bool

70− , _sdUserIP :: !(Maybe Text)

71− , _sdKey :: !(Maybe Key)

72− , _sdStyleId :: !Int32

73− , _sdOAuthToken :: !(Maybe OAuthToken)

74− , _sdTableId :: !Text

75− , _sdFields :: !(Maybe Text)

70+ , _sdUserIP :: !(Maybe Text)

71+ , _sdKey :: !(Maybe Key)

72+ , _sdStyleId :: !Int32

73+ , _sdOAuthToken :: !(Maybe OAuthToken)

74+ , _sdTableId :: !Text

75+ , _sdFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ styleDelete'

9898 :: Int32 -- ^ 'styleId'

9999 -> Text -- ^ 'tableId'

100100 -> StyleDelete'

101−styleDelete' pSdStyleId_ pSdTableId_ =

101+styleDelete' pSdStyleId_ pSdTableId_ =

102102 StyleDelete'

103103 { _sdQuotaUser = Nothing

104104 , _sdPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Style.Get

4343 , sgFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesStyleGet@ which the

5050-- 'StyleGet'' request conforms to.

@@ -65,14 +65,14 @@ type StyleGetResource =

6565--

6666-- /See:/ 'styleGet'' smart constructor.

6767data StyleGet' = StyleGet'

68− { _sgQuotaUser :: !(Maybe Text)

68+ { _sgQuotaUser :: !(Maybe Text)

6969 , _sgPrettyPrint :: !Bool

70− , _sgUserIP :: !(Maybe Text)

71− , _sgKey :: !(Maybe Key)

72− , _sgStyleId :: !Int32

73− , _sgOAuthToken :: !(Maybe OAuthToken)

74− , _sgTableId :: !Text

75− , _sgFields :: !(Maybe Text)

70+ , _sgUserIP :: !(Maybe Text)

71+ , _sgKey :: !(Maybe Key)

72+ , _sgStyleId :: !Int32

73+ , _sgOAuthToken :: !(Maybe OAuthToken)

74+ , _sgTableId :: !Text

75+ , _sgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ styleGet'

9898 :: Int32 -- ^ 'styleId'

9999 -> Text -- ^ 'tableId'

100100 -> StyleGet'

101−styleGet' pSgStyleId_ pSgTableId_ =

101+styleGet' pSgStyleId_ pSgTableId_ =

102102 StyleGet'

103103 { _sgQuotaUser = Nothing

104104 , _sgPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Insert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Style.Insert

4343 , siFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesStyleInsert@ which the

5050-- 'StyleInsert'' request conforms to.

@@ -66,14 +66,14 @@ type StyleInsertResource =

6666--

6767-- /See:/ 'styleInsert'' smart constructor.

6868data StyleInsert' = StyleInsert'

69− { _siQuotaUser :: !(Maybe Text)

69+ { _siQuotaUser :: !(Maybe Text)

7070 , _siPrettyPrint :: !Bool

71− , _siUserIP :: !(Maybe Text)

72− , _siPayload :: !StyleSetting

73− , _siKey :: !(Maybe Key)

74− , _siOAuthToken :: !(Maybe OAuthToken)

75− , _siTableId :: !Text

76− , _siFields :: !(Maybe Text)

71+ , _siUserIP :: !(Maybe Text)

72+ , _siPayload :: !StyleSetting

73+ , _siKey :: !(Maybe Key)

74+ , _siOAuthToken :: !(Maybe OAuthToken)

75+ , _siTableId :: !Text

76+ , _siFields :: !(Maybe Text)

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

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

@@ -99,7 +99,7 @@ styleInsert'

9999 :: StyleSetting -- ^ 'payload'

100100 -> Text -- ^ 'tableId'

101101 -> StyleInsert'

102−styleInsert' pSiPayload_ pSiTableId_ =

102+styleInsert' pSiPayload_ pSiTableId_ =

103103 StyleInsert'

104104 { _siQuotaUser = Nothing

105105 , _siPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Style.List

4444 , slFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesStyleList@ which the

5151-- 'StyleList'' request conforms to.

@@ -68,15 +68,15 @@ type StyleListResource =

6868--

6969-- /See:/ 'styleList'' smart constructor.

7070data StyleList' = StyleList'

71− { _slQuotaUser :: !(Maybe Text)

71+ { _slQuotaUser :: !(Maybe Text)

7272 , _slPrettyPrint :: !Bool

73− , _slUserIP :: !(Maybe Text)

74− , _slKey :: !(Maybe Key)

75− , _slPageToken :: !(Maybe Text)

76− , _slOAuthToken :: !(Maybe OAuthToken)

77− , _slTableId :: !Text

78− , _slMaxResults :: !(Maybe Word32)

79− , _slFields :: !(Maybe Text)

73+ , _slUserIP :: !(Maybe Text)

74+ , _slKey :: !(Maybe Key)

75+ , _slPageToken :: !(Maybe Text)

76+ , _slOAuthToken :: !(Maybe OAuthToken)

77+ , _slTableId :: !Text

78+ , _slMaxResults :: !(Maybe Word32)

79+ , _slFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -103,7 +103,7 @@ data StyleList' = StyleList'

103103styleList'

104104 :: Text -- ^ 'tableId'

105105 -> StyleList'

106−styleList' pSlTableId_ =

106+styleList' pSlTableId_ =

107107 StyleList'

108108 { _slQuotaUser = Nothing

109109 , _slPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Patch.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Style.Patch

4444 , spFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesStylePatch@ which the

5151-- 'StylePatch'' request conforms to.

@@ -68,15 +68,15 @@ type StylePatchResource =

6868--

6969-- /See:/ 'stylePatch'' smart constructor.

7070data StylePatch' = StylePatch'

71− { _spQuotaUser :: !(Maybe Text)

71+ { _spQuotaUser :: !(Maybe Text)

7272 , _spPrettyPrint :: !Bool

73− , _spUserIP :: !(Maybe Text)

74− , _spPayload :: !StyleSetting

75− , _spKey :: !(Maybe Key)

76− , _spStyleId :: !Int32

77− , _spOAuthToken :: !(Maybe OAuthToken)

78− , _spTableId :: !Text

79− , _spFields :: !(Maybe Text)

73+ , _spUserIP :: !(Maybe Text)

74+ , _spPayload :: !StyleSetting

75+ , _spKey :: !(Maybe Key)

76+ , _spStyleId :: !Int32

77+ , _spOAuthToken :: !(Maybe OAuthToken)

78+ , _spTableId :: !Text

79+ , _spFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ stylePatch'

105105 -> Int32 -- ^ 'styleId'

106106 -> Text -- ^ 'tableId'

107107 -> StylePatch'

108−stylePatch' pSpPayload_ pSpStyleId_ pSpTableId_ =

108+stylePatch' pSpPayload_ pSpStyleId_ pSpTableId_ =

109109 StylePatch'

110110 { _spQuotaUser = Nothing

111111 , _spPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Style.Update

4444 , suFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesStyleUpdate@ which the

5151-- 'StyleUpdate'' request conforms to.

@@ -68,15 +68,15 @@ type StyleUpdateResource =

6868--

6969-- /See:/ 'styleUpdate'' smart constructor.

7070data StyleUpdate' = StyleUpdate'

71− { _suQuotaUser :: !(Maybe Text)

71+ { _suQuotaUser :: !(Maybe Text)

7272 , _suPrettyPrint :: !Bool

73− , _suUserIP :: !(Maybe Text)

74− , _suPayload :: !StyleSetting

75− , _suKey :: !(Maybe Key)

76− , _suStyleId :: !Int32

77− , _suOAuthToken :: !(Maybe OAuthToken)

78− , _suTableId :: !Text

79− , _suFields :: !(Maybe Text)

73+ , _suUserIP :: !(Maybe Text)

74+ , _suPayload :: !StyleSetting

75+ , _suKey :: !(Maybe Key)

76+ , _suStyleId :: !Int32

77+ , _suOAuthToken :: !(Maybe OAuthToken)

78+ , _suTableId :: !Text

79+ , _suFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -105,7 +105,7 @@ styleUpdate'

105105 -> Int32 -- ^ 'styleId'

106106 -> Text -- ^ 'tableId'

107107 -> StyleUpdate'

108−styleUpdate' pSuPayload_ pSuStyleId_ pSuTableId_ =

108+styleUpdate' pSuPayload_ pSuStyleId_ pSuTableId_ =

109109 StyleUpdate'

110110 { _suQuotaUser = Nothing

111111 , _suPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Copy.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Table.Copy

4343 , tcFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTableCopy@ which the

5050-- 'TableCopy'' request conforms to.

@@ -65,14 +65,14 @@ type TableCopyResource =

6565--

6666-- /See:/ 'tableCopy'' smart constructor.

6767data TableCopy' = TableCopy'

68− { _tcQuotaUser :: !(Maybe Text)

69− , _tcPrettyPrint :: !Bool

70− , _tcUserIP :: !(Maybe Text)

71− , _tcKey :: !(Maybe Key)

72− , _tcOAuthToken :: !(Maybe OAuthToken)

73− , _tcTableId :: !Text

68+ { _tcQuotaUser :: !(Maybe Text)

69+ , _tcPrettyPrint :: !Bool

70+ , _tcUserIP :: !(Maybe Text)

71+ , _tcKey :: !(Maybe Key)

72+ , _tcOAuthToken :: !(Maybe OAuthToken)

73+ , _tcTableId :: !Text

7474 , _tcCopyPresentation :: !(Maybe Bool)

75− , _tcFields :: !(Maybe Text)

75+ , _tcFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -97,7 +97,7 @@ data TableCopy' = TableCopy'

9797tableCopy'

9898 :: Text -- ^ 'tableId'

9999 -> TableCopy'

100−tableCopy' pTcTableId_ =

100+tableCopy' pTcTableId_ =

101101 TableCopy'

102102 { _tcQuotaUser = Nothing

103103 , _tcPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Delete.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.FusionTables.Table.Delete

4242 , tdFields

4343 ) where

4444

45−import Network.Google.FusionTables.Types

46−import Network.Google.Prelude

45+import Network.Google.FusionTables.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @FusiontablesTableDelete@ which the

4949-- 'TableDelete'' request conforms to.

@@ -62,13 +62,13 @@ type TableDeleteResource =

6262--

6363-- /See:/ 'tableDelete'' smart constructor.

6464data TableDelete' = TableDelete'

65− { _tdQuotaUser :: !(Maybe Text)

65+ { _tdQuotaUser :: !(Maybe Text)

6666 , _tdPrettyPrint :: !Bool

67− , _tdUserIP :: !(Maybe Text)

68− , _tdKey :: !(Maybe Key)

69− , _tdOAuthToken :: !(Maybe OAuthToken)

70− , _tdTableId :: !Text

71− , _tdFields :: !(Maybe Text)

67+ , _tdUserIP :: !(Maybe Text)

68+ , _tdKey :: !(Maybe Key)

69+ , _tdOAuthToken :: !(Maybe OAuthToken)

70+ , _tdTableId :: !Text

71+ , _tdFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data TableDelete' = TableDelete'

9191tableDelete'

9292 :: Text -- ^ 'tableId'

9393 -> TableDelete'

94−tableDelete' pTdTableId_ =

94+tableDelete' pTdTableId_ =

9595 TableDelete'

9696 { _tdQuotaUser = Nothing

9797 , _tdPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Get.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.FusionTables.Table.Get

4242 , ttFields

4343 ) where

4444

45−import Network.Google.FusionTables.Types

46−import Network.Google.Prelude

45+import Network.Google.FusionTables.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @FusiontablesTableGet@ which the

4949-- 'TableGet'' request conforms to.

@@ -62,13 +62,13 @@ type TableGetResource =

6262--

6363-- /See:/ 'tableGet'' smart constructor.

6464data TableGet' = TableGet'

65− { _ttQuotaUser :: !(Maybe Text)

65+ { _ttQuotaUser :: !(Maybe Text)

6666 , _ttPrettyPrint :: !Bool

67− , _ttUserIP :: !(Maybe Text)

68− , _ttKey :: !(Maybe Key)

69− , _ttOAuthToken :: !(Maybe OAuthToken)

70− , _ttTableId :: !Text

71− , _ttFields :: !(Maybe Text)

67+ , _ttUserIP :: !(Maybe Text)

68+ , _ttKey :: !(Maybe Key)

69+ , _ttOAuthToken :: !(Maybe OAuthToken)

70+ , _ttTableId :: !Text

71+ , _ttFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data TableGet' = TableGet'

9191tableGet'

9292 :: Text -- ^ 'tableId'

9393 -> TableGet'

94−tableGet' pTtTableId_ =

94+tableGet' pTtTableId_ =

9595 TableGet'

9696 { _ttQuotaUser = Nothing

9797 , _ttPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+15−15

@@ -48,8 +48,8 @@ module Network.Google.Resource.FusionTables.Table.ImportRows

4848 , tirFields

4949 ) where

5050

51−import Network.Google.FusionTables.Types

52−import Network.Google.Prelude

51+import Network.Google.FusionTables.Types

52+import Network.Google.Prelude

5353

5454-- | A resource alias for @FusiontablesTableImportRows@ which the

5555-- 'TableImportRows'' request conforms to.

@@ -76,19 +76,19 @@ type TableImportRowsResource =

7676--

7777-- /See:/ 'tableImportRows'' smart constructor.

7878data TableImportRows' = TableImportRows'

79− { _tirQuotaUser :: !(Maybe Text)

79+ { _tirQuotaUser :: !(Maybe Text)

8080 , _tirPrettyPrint :: !Bool

81− , _tirUserIP :: !(Maybe Text)

82− , _tirStartLine :: !(Maybe Int32)

83− , _tirEndLine :: !(Maybe Int32)

84− , _tirMedia :: !Body

85− , _tirKey :: !(Maybe Key)

86− , _tirOAuthToken :: !(Maybe OAuthToken)

87− , _tirTableId :: !Text

88− , _tirDelimiter :: !(Maybe Text)

89− , _tirEncoding :: !(Maybe Text)

90− , _tirIsStrict :: !(Maybe Bool)

91− , _tirFields :: !(Maybe Text)

81+ , _tirUserIP :: !(Maybe Text)

82+ , _tirStartLine :: !(Maybe Int32)

83+ , _tirEndLine :: !(Maybe Int32)

84+ , _tirMedia :: !Body

85+ , _tirKey :: !(Maybe Key)

86+ , _tirOAuthToken :: !(Maybe OAuthToken)

87+ , _tirTableId :: !Text

88+ , _tirDelimiter :: !(Maybe Text)

89+ , _tirEncoding :: !(Maybe Text)

90+ , _tirIsStrict :: !(Maybe Bool)

91+ , _tirFields :: !(Maybe Text)

9292 } deriving (Eq,Show,Data,Typeable,Generic)

9393

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

@@ -124,7 +124,7 @@ tableImportRows'

124124 :: Body -- ^ 'media'

125125 -> Text -- ^ 'tableId'

126126 -> TableImportRows'

127−tableImportRows' pTirMedia_ pTirTableId_ =

127+tableImportRows' pTirMedia_ pTirTableId_ =

128128 TableImportRows'

129129 { _tirQuotaUser = Nothing

130130 , _tirPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportTable.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.FusionTables.Table.ImportTable

4545 , titFields

4646 ) where

4747

48−import Network.Google.FusionTables.Types

49−import Network.Google.Prelude

48+import Network.Google.FusionTables.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @FusiontablesTableImportTable@ which the

5252-- 'TableImportTable'' request conforms to.

@@ -69,16 +69,16 @@ type TableImportTableResource =

6969--

7070-- /See:/ 'tableImportTable'' smart constructor.

7171data TableImportTable' = TableImportTable'

72− { _titQuotaUser :: !(Maybe Text)

72+ { _titQuotaUser :: !(Maybe Text)

7373 , _titPrettyPrint :: !Bool

74− , _titUserIP :: !(Maybe Text)

75− , _titMedia :: !Body

76− , _titKey :: !(Maybe Key)

77− , _titName :: !Text

78− , _titOAuthToken :: !(Maybe OAuthToken)

79− , _titDelimiter :: !(Maybe Text)

80− , _titEncoding :: !(Maybe Text)

81− , _titFields :: !(Maybe Text)

74+ , _titUserIP :: !(Maybe Text)

75+ , _titMedia :: !Body

76+ , _titKey :: !(Maybe Key)

77+ , _titName :: !Text

78+ , _titOAuthToken :: !(Maybe OAuthToken)

79+ , _titDelimiter :: !(Maybe Text)

80+ , _titEncoding :: !(Maybe Text)

81+ , _titFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -108,7 +108,7 @@ tableImportTable'

108108 :: Body -- ^ 'media'

109109 -> Text -- ^ 'name'

110110 -> TableImportTable'

111−tableImportTable' pTitMedia_ pTitName_ =

111+tableImportTable' pTitMedia_ pTitName_ =

112112 TableImportTable'

113113 { _titQuotaUser = Nothing

114114 , _titPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Insert.hs+9−9

@@ -42,8 +42,8 @@ module Network.Google.Resource.FusionTables.Table.Insert

4242 , tiiFields

4343 ) where

4444

45−import Network.Google.FusionTables.Types

46−import Network.Google.Prelude

45+import Network.Google.FusionTables.Types

46+import Network.Google.Prelude

4747

4848-- | A resource alias for @FusiontablesTableInsert@ which the

4949-- 'TableInsert'' request conforms to.

@@ -62,13 +62,13 @@ type TableInsertResource =

6262--

6363-- /See:/ 'tableInsert'' smart constructor.

6464data TableInsert' = TableInsert'

65− { _tiiQuotaUser :: !(Maybe Text)

65+ { _tiiQuotaUser :: !(Maybe Text)

6666 , _tiiPrettyPrint :: !Bool

67− , _tiiUserIP :: !(Maybe Text)

68− , _tiiPayload :: !Table

69− , _tiiKey :: !(Maybe Key)

70− , _tiiOAuthToken :: !(Maybe OAuthToken)

71− , _tiiFields :: !(Maybe Text)

67+ , _tiiUserIP :: !(Maybe Text)

68+ , _tiiPayload :: !Table

69+ , _tiiKey :: !(Maybe Key)

70+ , _tiiOAuthToken :: !(Maybe OAuthToken)

71+ , _tiiFields :: !(Maybe Text)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

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

@@ -91,7 +91,7 @@ data TableInsert' = TableInsert'

9191tableInsert'

9292 :: Table -- ^ 'payload'

9393 -> TableInsert'

94−tableInsert' pTiiPayload_ =

94+tableInsert' pTiiPayload_ =

9595 TableInsert'

9696 { _tiiQuotaUser = Nothing

9797 , _tiiPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/List.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Table.List

4343 , tabFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTableList@ which the

5050-- 'TableList'' request conforms to.

@@ -64,14 +64,14 @@ type TableListResource =

6464--

6565-- /See:/ 'tableList'' smart constructor.

6666data TableList' = TableList'

67− { _tabQuotaUser :: !(Maybe Text)

67+ { _tabQuotaUser :: !(Maybe Text)

6868 , _tabPrettyPrint :: !Bool

69− , _tabUserIP :: !(Maybe Text)

70− , _tabKey :: !(Maybe Key)

71− , _tabPageToken :: !(Maybe Text)

72− , _tabOAuthToken :: !(Maybe OAuthToken)

73− , _tabMaxResults :: !(Maybe Word32)

74− , _tabFields :: !(Maybe Text)

69+ , _tabUserIP :: !(Maybe Text)

70+ , _tabKey :: !(Maybe Key)

71+ , _tabPageToken :: !(Maybe Text)

72+ , _tabOAuthToken :: !(Maybe OAuthToken)

73+ , _tabMaxResults :: !(Maybe Word32)

74+ , _tabFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -95,7 +95,7 @@ data TableList' = TableList'

9595-- * 'tabFields'

9696tableList'

9797 :: TableList'

98−tableList' =

98+tableList' =

9999 TableList'

100100 { _tabQuotaUser = Nothing

101101 , _tabPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Patch.hs+11−11

@@ -46,8 +46,8 @@ module Network.Google.Resource.FusionTables.Table.Patch

4646 , tppFields

4747 ) where

4848

49−import Network.Google.FusionTables.Types

50−import Network.Google.Prelude

49+import Network.Google.FusionTables.Types

50+import Network.Google.Prelude

5151

5252-- | A resource alias for @FusiontablesTablePatch@ which the

5353-- 'TablePatch'' request conforms to.

@@ -70,15 +70,15 @@ type TablePatchResource =

7070--

7171-- /See:/ 'tablePatch'' smart constructor.

7272data TablePatch' = TablePatch'

73− { _tppQuotaUser :: !(Maybe Text)

74− , _tppPrettyPrint :: !Bool

75− , _tppUserIP :: !(Maybe Text)

76− , _tppPayload :: !Table

73+ { _tppQuotaUser :: !(Maybe Text)

74+ , _tppPrettyPrint :: !Bool

75+ , _tppUserIP :: !(Maybe Text)

76+ , _tppPayload :: !Table

7777 , _tppReplaceViewDefinition :: !(Maybe Bool)

78− , _tppKey :: !(Maybe Key)

79− , _tppOAuthToken :: !(Maybe OAuthToken)

80− , _tppTableId :: !Text

81− , _tppFields :: !(Maybe Text)

78+ , _tppKey :: !(Maybe Key)

79+ , _tppOAuthToken :: !(Maybe OAuthToken)

80+ , _tppTableId :: !Text

81+ , _tppFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -106,7 +106,7 @@ tablePatch'

106106 :: Table -- ^ 'payload'

107107 -> Text -- ^ 'tableId'

108108 -> TablePatch'

109−tablePatch' pTppPayload_ pTppTableId_ =

109+tablePatch' pTppPayload_ pTppTableId_ =

110110 TablePatch'

111111 { _tppQuotaUser = Nothing

112112 , _tppPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+15−15

@@ -49,8 +49,8 @@ module Network.Google.Resource.FusionTables.Table.ReplaceRows

4949 , trrFields

5050 ) where

5151

52−import Network.Google.FusionTables.Types

53−import Network.Google.Prelude

52+import Network.Google.FusionTables.Types

53+import Network.Google.Prelude

5454

5555-- | A resource alias for @FusiontablesTableReplaceRows@ which the

5656-- 'TableReplaceRows'' request conforms to.

@@ -78,19 +78,19 @@ type TableReplaceRowsResource =

7878--

7979-- /See:/ 'tableReplaceRows'' smart constructor.

8080data TableReplaceRows' = TableReplaceRows'

81− { _trrQuotaUser :: !(Maybe Text)

81+ { _trrQuotaUser :: !(Maybe Text)

8282 , _trrPrettyPrint :: !Bool

83− , _trrUserIP :: !(Maybe Text)

84− , _trrStartLine :: !(Maybe Int32)

85− , _trrEndLine :: !(Maybe Int32)

86− , _trrMedia :: !Body

87− , _trrKey :: !(Maybe Key)

88− , _trrOAuthToken :: !(Maybe OAuthToken)

89− , _trrTableId :: !Text

90− , _trrDelimiter :: !(Maybe Text)

91− , _trrEncoding :: !(Maybe Text)

92− , _trrIsStrict :: !(Maybe Bool)

93− , _trrFields :: !(Maybe Text)

83+ , _trrUserIP :: !(Maybe Text)

84+ , _trrStartLine :: !(Maybe Int32)

85+ , _trrEndLine :: !(Maybe Int32)

86+ , _trrMedia :: !Body

87+ , _trrKey :: !(Maybe Key)

88+ , _trrOAuthToken :: !(Maybe OAuthToken)

89+ , _trrTableId :: !Text

90+ , _trrDelimiter :: !(Maybe Text)

91+ , _trrEncoding :: !(Maybe Text)

92+ , _trrIsStrict :: !(Maybe Bool)

93+ , _trrFields :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

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

@@ -126,7 +126,7 @@ tableReplaceRows'

126126 :: Body -- ^ 'media'

127127 -> Text -- ^ 'tableId'

128128 -> TableReplaceRows'

129−tableReplaceRows' pTrrMedia_ pTrrTableId_ =

129+tableReplaceRows' pTrrMedia_ pTrrTableId_ =

130130 TableReplaceRows'

131131 { _trrQuotaUser = Nothing

132132 , _trrPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Update.hs+11−11

@@ -45,8 +45,8 @@ module Network.Google.Resource.FusionTables.Table.Update

4545 , tuFields

4646 ) where

4747

48−import Network.Google.FusionTables.Types

49−import Network.Google.Prelude

48+import Network.Google.FusionTables.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @FusiontablesTableUpdate@ which the

5252-- 'TableUpdate'' request conforms to.

@@ -68,15 +68,15 @@ type TableUpdateResource =

6868--

6969-- /See:/ 'tableUpdate'' smart constructor.

7070data TableUpdate' = TableUpdate'

71− { _tuQuotaUser :: !(Maybe Text)

72− , _tuPrettyPrint :: !Bool

73− , _tuUserIP :: !(Maybe Text)

74− , _tuPayload :: !Table

71+ { _tuQuotaUser :: !(Maybe Text)

72+ , _tuPrettyPrint :: !Bool

73+ , _tuUserIP :: !(Maybe Text)

74+ , _tuPayload :: !Table

7575 , _tuReplaceViewDefinition :: !(Maybe Bool)

76− , _tuKey :: !(Maybe Key)

77− , _tuOAuthToken :: !(Maybe OAuthToken)

78− , _tuTableId :: !Text

79− , _tuFields :: !(Maybe Text)

76+ , _tuKey :: !(Maybe Key)

77+ , _tuOAuthToken :: !(Maybe OAuthToken)

78+ , _tuTableId :: !Text

79+ , _tuFields :: !(Maybe Text)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

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

@@ -104,7 +104,7 @@ tableUpdate'

104104 :: Table -- ^ 'payload'

105105 -> Text -- ^ 'tableId'

106106 -> TableUpdate'

107−tableUpdate' pTuPayload_ pTuTableId_ =

107+tableUpdate' pTuPayload_ pTuTableId_ =

108108 TableUpdate'

109109 { _tuQuotaUser = Nothing

110110 , _tuPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Delete.hs+10−10

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Task.Delete

4444 , tFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesTaskDelete@ which the

5151-- 'TaskDelete'' request conforms to.

@@ -67,14 +67,14 @@ type TaskDeleteResource =

6767--

6868-- /See:/ 'taskDelete'' smart constructor.

6969data TaskDelete' = TaskDelete'

70− { _tQuotaUser :: !(Maybe Text)

70+ { _tQuotaUser :: !(Maybe Text)

7171 , _tPrettyPrint :: !Bool

72− , _tTaskId :: !Text

73− , _tUserIP :: !(Maybe Text)

74− , _tKey :: !(Maybe Key)

75− , _tOAuthToken :: !(Maybe OAuthToken)

76− , _tTableId :: !Text

77− , _tFields :: !(Maybe Text)

72+ , _tTaskId :: !Text

73+ , _tUserIP :: !(Maybe Text)

74+ , _tKey :: !(Maybe Key)

75+ , _tOAuthToken :: !(Maybe OAuthToken)

76+ , _tTableId :: !Text

77+ , _tFields :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

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

@@ -100,7 +100,7 @@ taskDelete'

100100 :: Text -- ^ 'taskId'

101101 -> Text -- ^ 'tableId'

102102 -> TaskDelete'

103−taskDelete' pTTaskId_ pTTableId_ =

103+taskDelete' pTTaskId_ pTTableId_ =

104104 TaskDelete'

105105 { _tQuotaUser = Nothing

106106 , _tPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Task.Get

4343 , tgFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTaskGet@ which the

5050-- 'TaskGet'' request conforms to.

@@ -65,14 +65,14 @@ type TaskGetResource =

6565--

6666-- /See:/ 'taskGet'' smart constructor.

6767data TaskGet' = TaskGet'

68− { _tgQuotaUser :: !(Maybe Text)

68+ { _tgQuotaUser :: !(Maybe Text)

6969 , _tgPrettyPrint :: !Bool

70− , _tgTaskId :: !Text

71− , _tgUserIP :: !(Maybe Text)

72− , _tgKey :: !(Maybe Key)

73− , _tgOAuthToken :: !(Maybe OAuthToken)

74− , _tgTableId :: !Text

75− , _tgFields :: !(Maybe Text)

70+ , _tgTaskId :: !Text

71+ , _tgUserIP :: !(Maybe Text)

72+ , _tgKey :: !(Maybe Key)

73+ , _tgOAuthToken :: !(Maybe OAuthToken)

74+ , _tgTableId :: !Text

75+ , _tgFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ taskGet'

9898 :: Text -- ^ 'taskId'

9999 -> Text -- ^ 'tableId'

100100 -> TaskGet'

101−taskGet' pTgTaskId_ pTgTableId_ =

101+taskGet' pTgTaskId_ pTgTableId_ =

102102 TaskGet'

103103 { _tgQuotaUser = Nothing

104104 , _tgPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/List.hs+12−12

@@ -45,8 +45,8 @@ module Network.Google.Resource.FusionTables.Task.List

4545 , tlFields

4646 ) where

4747

48−import Network.Google.FusionTables.Types

49−import Network.Google.Prelude

48+import Network.Google.FusionTables.Types

49+import Network.Google.Prelude

5050

5151-- | A resource alias for @FusiontablesTaskList@ which the

5252-- 'TaskList'' request conforms to.

@@ -69,16 +69,16 @@ type TaskListResource =

6969--

7070-- /See:/ 'taskList'' smart constructor.

7171data TaskList' = TaskList'

72− { _tlQuotaUser :: !(Maybe Text)

72+ { _tlQuotaUser :: !(Maybe Text)

7373 , _tlPrettyPrint :: !Bool

74− , _tlUserIP :: !(Maybe Text)

75− , _tlKey :: !(Maybe Key)

76− , _tlPageToken :: !(Maybe Text)

77− , _tlOAuthToken :: !(Maybe OAuthToken)

78− , _tlTableId :: !Text

79− , _tlStartIndex :: !(Maybe Word32)

80− , _tlMaxResults :: !(Maybe Word32)

81− , _tlFields :: !(Maybe Text)

74+ , _tlUserIP :: !(Maybe Text)

75+ , _tlKey :: !(Maybe Key)

76+ , _tlPageToken :: !(Maybe Text)

77+ , _tlOAuthToken :: !(Maybe OAuthToken)

78+ , _tlTableId :: !Text

79+ , _tlStartIndex :: !(Maybe Word32)

80+ , _tlMaxResults :: !(Maybe Word32)

81+ , _tlFields :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

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

@@ -107,7 +107,7 @@ data TaskList' = TaskList'

107107taskList'

108108 :: Text -- ^ 'tableId'

109109 -> TaskList'

110−taskList' pTlTableId_ =

110+taskList' pTlTableId_ =

111111 TaskList'

112112 { _tlQuotaUser = Nothing

113113 , _tlPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Delete.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Template.Delete

4343 , tddFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTemplateDelete@ which the

5050-- 'TemplateDelete'' request conforms to.

@@ -65,14 +65,14 @@ type TemplateDeleteResource =

6565--

6666-- /See:/ 'templateDelete'' smart constructor.

6767data TemplateDelete' = TemplateDelete'

68− { _tddQuotaUser :: !(Maybe Text)

68+ { _tddQuotaUser :: !(Maybe Text)

6969 , _tddPrettyPrint :: !Bool

70− , _tddTemplateId :: !Int32

71− , _tddUserIP :: !(Maybe Text)

72− , _tddKey :: !(Maybe Key)

73− , _tddOAuthToken :: !(Maybe OAuthToken)

74− , _tddTableId :: !Text

75− , _tddFields :: !(Maybe Text)

70+ , _tddTemplateId :: !Int32

71+ , _tddUserIP :: !(Maybe Text)

72+ , _tddKey :: !(Maybe Key)

73+ , _tddOAuthToken :: !(Maybe OAuthToken)

74+ , _tddTableId :: !Text

75+ , _tddFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ templateDelete'

9898 :: Int32 -- ^ 'templateId'

9999 -> Text -- ^ 'tableId'

100100 -> TemplateDelete'

101−templateDelete' pTddTemplateId_ pTddTableId_ =

101+templateDelete' pTddTemplateId_ pTddTableId_ =

102102 TemplateDelete'

103103 { _tddQuotaUser = Nothing

104104 , _tddPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Get.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Template.Get

4343 , tggFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTemplateGet@ which the

5050-- 'TemplateGet'' request conforms to.

@@ -65,14 +65,14 @@ type TemplateGetResource =

6565--

6666-- /See:/ 'templateGet'' smart constructor.

6767data TemplateGet' = TemplateGet'

68− { _tggQuotaUser :: !(Maybe Text)

68+ { _tggQuotaUser :: !(Maybe Text)

6969 , _tggPrettyPrint :: !Bool

70− , _tggTemplateId :: !Int32

71− , _tggUserIP :: !(Maybe Text)

72− , _tggKey :: !(Maybe Key)

73− , _tggOAuthToken :: !(Maybe OAuthToken)

74− , _tggTableId :: !Text

75− , _tggFields :: !(Maybe Text)

70+ , _tggTemplateId :: !Int32

71+ , _tggUserIP :: !(Maybe Text)

72+ , _tggKey :: !(Maybe Key)

73+ , _tggOAuthToken :: !(Maybe OAuthToken)

74+ , _tggTableId :: !Text

75+ , _tggFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ templateGet'

9898 :: Int32 -- ^ 'templateId'

9999 -> Text -- ^ 'tableId'

100100 -> TemplateGet'

101−templateGet' pTggTemplateId_ pTggTableId_ =

101+templateGet' pTggTemplateId_ pTggTableId_ =

102102 TemplateGet'

103103 { _tggQuotaUser = Nothing

104104 , _tggPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Insert.hs+10−10

@@ -43,8 +43,8 @@ module Network.Google.Resource.FusionTables.Template.Insert

4343 , tiFields

4444 ) where

4545

46−import Network.Google.FusionTables.Types

47−import Network.Google.Prelude

46+import Network.Google.FusionTables.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @FusiontablesTemplateInsert@ which the

5050-- 'TemplateInsert'' request conforms to.

@@ -65,14 +65,14 @@ type TemplateInsertResource =

6565--

6666-- /See:/ 'templateInsert'' smart constructor.

6767data TemplateInsert' = TemplateInsert'

68− { _tiQuotaUser :: !(Maybe Text)

68+ { _tiQuotaUser :: !(Maybe Text)

6969 , _tiPrettyPrint :: !Bool

70− , _tiUserIP :: !(Maybe Text)

71− , _tiPayload :: !Template

72− , _tiKey :: !(Maybe Key)

73− , _tiOAuthToken :: !(Maybe OAuthToken)

74− , _tiTableId :: !Text

75− , _tiFields :: !(Maybe Text)

70+ , _tiUserIP :: !(Maybe Text)

71+ , _tiPayload :: !Template

72+ , _tiKey :: !(Maybe Key)

73+ , _tiOAuthToken :: !(Maybe OAuthToken)

74+ , _tiTableId :: !Text

75+ , _tiFields :: !(Maybe Text)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

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

@@ -98,7 +98,7 @@ templateInsert'

9898 :: Template -- ^ 'payload'

9999 -> Text -- ^ 'tableId'

100100 -> TemplateInsert'

101−templateInsert' pTiPayload_ pTiTableId_ =

101+templateInsert' pTiPayload_ pTiTableId_ =

102102 TemplateInsert'

103103 { _tiQuotaUser = Nothing

104104 , _tiPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/List.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Template.List

4444 , tllFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesTemplateList@ which the

5151-- 'TemplateList'' request conforms to.

@@ -67,15 +67,15 @@ type TemplateListResource =

6767--

6868-- /See:/ 'templateList'' smart constructor.

6969data TemplateList' = TemplateList'

70− { _tllQuotaUser :: !(Maybe Text)

70+ { _tllQuotaUser :: !(Maybe Text)

7171 , _tllPrettyPrint :: !Bool

72− , _tllUserIP :: !(Maybe Text)

73− , _tllKey :: !(Maybe Key)

74− , _tllPageToken :: !(Maybe Text)

75− , _tllOAuthToken :: !(Maybe OAuthToken)

76− , _tllTableId :: !Text

77− , _tllMaxResults :: !(Maybe Word32)

78− , _tllFields :: !(Maybe Text)

72+ , _tllUserIP :: !(Maybe Text)

73+ , _tllKey :: !(Maybe Key)

74+ , _tllPageToken :: !(Maybe Text)

75+ , _tllOAuthToken :: !(Maybe OAuthToken)

76+ , _tllTableId :: !Text

77+ , _tllMaxResults :: !(Maybe Word32)

78+ , _tllFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -102,7 +102,7 @@ data TemplateList' = TemplateList'

102102templateList'

103103 :: Text -- ^ 'tableId'

104104 -> TemplateList'

105−templateList' pTllTableId_ =

105+templateList' pTllTableId_ =

106106 TemplateList'

107107 { _tllQuotaUser = Nothing

108108 , _tllPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Patch.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Template.Patch

4444 , tpFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesTemplatePatch@ which the

5151-- 'TemplatePatch'' request conforms to.

@@ -67,15 +67,15 @@ type TemplatePatchResource =

6767--

6868-- /See:/ 'templatePatch'' smart constructor.

6969data TemplatePatch' = TemplatePatch'

70− { _tpQuotaUser :: !(Maybe Text)

70+ { _tpQuotaUser :: !(Maybe Text)

7171 , _tpPrettyPrint :: !Bool

72− , _tpTemplateId :: !Int32

73− , _tpUserIP :: !(Maybe Text)

74− , _tpPayload :: !Template

75− , _tpKey :: !(Maybe Key)

76− , _tpOAuthToken :: !(Maybe OAuthToken)

77− , _tpTableId :: !Text

78− , _tpFields :: !(Maybe Text)

72+ , _tpTemplateId :: !Int32

73+ , _tpUserIP :: !(Maybe Text)

74+ , _tpPayload :: !Template

75+ , _tpKey :: !(Maybe Key)

76+ , _tpOAuthToken :: !(Maybe OAuthToken)

77+ , _tpTableId :: !Text

78+ , _tpFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ templatePatch'

104104 -> Template -- ^ 'payload'

105105 -> Text -- ^ 'tableId'

106106 -> TemplatePatch'

107−templatePatch' pTpTemplateId_ pTpPayload_ pTpTableId_ =

107+templatePatch' pTpTemplateId_ pTpPayload_ pTpTableId_ =

108108 TemplatePatch'

109109 { _tpQuotaUser = Nothing

110110 , _tpPrettyPrint = True

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Update.hs+11−11

@@ -44,8 +44,8 @@ module Network.Google.Resource.FusionTables.Template.Update

4444 , temFields

4545 ) where

4646

47−import Network.Google.FusionTables.Types

48−import Network.Google.Prelude

47+import Network.Google.FusionTables.Types

48+import Network.Google.Prelude

4949

5050-- | A resource alias for @FusiontablesTemplateUpdate@ which the

5151-- 'TemplateUpdate'' request conforms to.

@@ -67,15 +67,15 @@ type TemplateUpdateResource =

6767--

6868-- /See:/ 'templateUpdate'' smart constructor.

6969data TemplateUpdate' = TemplateUpdate'

70− { _temQuotaUser :: !(Maybe Text)

70+ { _temQuotaUser :: !(Maybe Text)

7171 , _temPrettyPrint :: !Bool

72− , _temTemplateId :: !Int32

73− , _temUserIP :: !(Maybe Text)

74− , _temPayload :: !Template

75− , _temKey :: !(Maybe Key)

76− , _temOAuthToken :: !(Maybe OAuthToken)

77− , _temTableId :: !Text

78− , _temFields :: !(Maybe Text)

72+ , _temTemplateId :: !Int32

73+ , _temUserIP :: !(Maybe Text)

74+ , _temPayload :: !Template

75+ , _temKey :: !(Maybe Key)

76+ , _temOAuthToken :: !(Maybe OAuthToken)

77+ , _temTableId :: !Text

78+ , _temFields :: !(Maybe Text)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

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

@@ -104,7 +104,7 @@ templateUpdate'

104104 -> Template -- ^ 'payload'

105105 -> Text -- ^ 'tableId'

106106 -> TemplateUpdate'

107−templateUpdate' pTemTemplateId_ pTemPayload_ pTemTableId_ =

107+templateUpdate' pTemTemplateId_ pTemPayload_ pTemTableId_ =

108108 TemplateUpdate'

109109 { _temQuotaUser = Nothing

110110 , _temPrettyPrint = True

gogol-genomics/gen/Network/Google/Genomics.hs+62−62

@@ -910,68 +910,68 @@ module Network.Google.Genomics

910910 , rsDescription

911911 ) where

912912

913−import Network.Google.Genomics.Types

914−import Network.Google.Prelude

915−import Network.Google.Resource.Genomics.Annotations.BatchCreate

916−import Network.Google.Resource.Genomics.Annotations.Create

917−import Network.Google.Resource.Genomics.Annotations.Delete

918−import Network.Google.Resource.Genomics.Annotations.Get

919−import Network.Google.Resource.Genomics.Annotations.Patch

920−import Network.Google.Resource.Genomics.Annotations.Search

921−import Network.Google.Resource.Genomics.Annotations.Update

922−import Network.Google.Resource.Genomics.AnnotationSets.Create

923−import Network.Google.Resource.Genomics.AnnotationSets.Delete

924−import Network.Google.Resource.Genomics.AnnotationSets.Get

925−import Network.Google.Resource.Genomics.AnnotationSets.Patch

926−import Network.Google.Resource.Genomics.AnnotationSets.Search

927−import Network.Google.Resource.Genomics.AnnotationSets.Update

928−import Network.Google.Resource.Genomics.Callsets.Create

929−import Network.Google.Resource.Genomics.Callsets.Delete

930−import Network.Google.Resource.Genomics.Callsets.Get

931−import Network.Google.Resource.Genomics.Callsets.Patch

932−import Network.Google.Resource.Genomics.Callsets.Search

933−import Network.Google.Resource.Genomics.Callsets.Update

934−import Network.Google.Resource.Genomics.Datasets.Create

935−import Network.Google.Resource.Genomics.Datasets.Delete

936−import Network.Google.Resource.Genomics.Datasets.Get

937−import Network.Google.Resource.Genomics.Datasets.List

938−import Network.Google.Resource.Genomics.Datasets.Patch

939−import Network.Google.Resource.Genomics.Datasets.Undelete

940−import Network.Google.Resource.Genomics.Datasets.Update

941−import Network.Google.Resource.Genomics.Experimental.Jobs.Create

942−import Network.Google.Resource.Genomics.Jobs.Cancel

943−import Network.Google.Resource.Genomics.Jobs.Get

944−import Network.Google.Resource.Genomics.Jobs.Search

945−import Network.Google.Resource.Genomics.Readgroupsets.Align

946−import Network.Google.Resource.Genomics.Readgroupsets.Call

947−import Network.Google.Resource.Genomics.Readgroupsets.Coveragebuckets.List

948−import Network.Google.Resource.Genomics.Readgroupsets.Delete

949−import Network.Google.Resource.Genomics.Readgroupsets.Export

950−import Network.Google.Resource.Genomics.Readgroupsets.Get

951−import Network.Google.Resource.Genomics.Readgroupsets.Import

952−import Network.Google.Resource.Genomics.Readgroupsets.Patch

953−import Network.Google.Resource.Genomics.Readgroupsets.Search

954−import Network.Google.Resource.Genomics.Readgroupsets.Update

955−import Network.Google.Resource.Genomics.Reads.Search

956−import Network.Google.Resource.Genomics.References.Bases.List

957−import Network.Google.Resource.Genomics.References.Get

958−import Network.Google.Resource.Genomics.References.Search

959−import Network.Google.Resource.Genomics.Referencesets.Get

960−import Network.Google.Resource.Genomics.Referencesets.Search

961−import Network.Google.Resource.Genomics.Variants.Create

962−import Network.Google.Resource.Genomics.Variants.Delete

963−import Network.Google.Resource.Genomics.Variants.Get

964−import Network.Google.Resource.Genomics.Variants.Search

965−import Network.Google.Resource.Genomics.Variants.Update

966−import Network.Google.Resource.Genomics.Variantsets.Create

967−import Network.Google.Resource.Genomics.Variantsets.Delete

968−import Network.Google.Resource.Genomics.Variantsets.Export

969−import Network.Google.Resource.Genomics.Variantsets.Get

970−import Network.Google.Resource.Genomics.Variantsets.ImportVariants

971−import Network.Google.Resource.Genomics.Variantsets.MergeVariants

972−import Network.Google.Resource.Genomics.Variantsets.Patch

973−import Network.Google.Resource.Genomics.Variantsets.Search

974−import Network.Google.Resource.Genomics.Variantsets.Update

913+import Network.Google.Prelude

914+import Network.Google.Genomics.Types

915+import Network.Google.Resource.Genomics.AnnotationSets.Create

916+import Network.Google.Resource.Genomics.AnnotationSets.Delete

917+import Network.Google.Resource.Genomics.AnnotationSets.Get

918+import Network.Google.Resource.Genomics.AnnotationSets.Patch

919+import Network.Google.Resource.Genomics.AnnotationSets.Search

920+import Network.Google.Resource.Genomics.AnnotationSets.Update

921+import Network.Google.Resource.Genomics.Annotations.BatchCreate

922+import Network.Google.Resource.Genomics.Annotations.Create

923+import Network.Google.Resource.Genomics.Annotations.Delete

924+import Network.Google.Resource.Genomics.Annotations.Get

925+import Network.Google.Resource.Genomics.Annotations.Patch

926+import Network.Google.Resource.Genomics.Annotations.Search

927+import Network.Google.Resource.Genomics.Annotations.Update

928+import Network.Google.Resource.Genomics.Callsets.Create

929+import Network.Google.Resource.Genomics.Callsets.Delete

930+import Network.Google.Resource.Genomics.Callsets.Get

931+import Network.Google.Resource.Genomics.Callsets.Patch

932+import Network.Google.Resource.Genomics.Callsets.Search

933+import Network.Google.Resource.Genomics.Callsets.Update

934+import Network.Google.Resource.Genomics.Datasets.Create

935+import Network.Google.Resource.Genomics.Datasets.Delete

936+import Network.Google.Resource.Genomics.Datasets.Get

937+import Network.Google.Resource.Genomics.Datasets.List

938+import Network.Google.Resource.Genomics.Datasets.Patch

939+import Network.Google.Resource.Genomics.Datasets.Undelete

940+import Network.Google.Resource.Genomics.Datasets.Update

941+import Network.Google.Resource.Genomics.Experimental.Jobs.Create

942+import Network.Google.Resource.Genomics.Jobs.Cancel

943+import Network.Google.Resource.Genomics.Jobs.Get

944+import Network.Google.Resource.Genomics.Jobs.Search

945+import Network.Google.Resource.Genomics.Readgroupsets.Align

946+import Network.Google.Resource.Genomics.Readgroupsets.Call

947+import Network.Google.Resource.Genomics.Readgroupsets.Coveragebuckets.List

948+import Network.Google.Resource.Genomics.Readgroupsets.Delete

949+import Network.Google.Resource.Genomics.Readgroupsets.Export

950+import Network.Google.Resource.Genomics.Readgroupsets.Get

951+import Network.Google.Resource.Genomics.Readgroupsets.Import

952+import Network.Google.Resource.Genomics.Readgroupsets.Patch

953+import Network.Google.Resource.Genomics.Readgroupsets.Search

954+import Network.Google.Resource.Genomics.Readgroupsets.Update

955+import Network.Google.Resource.Genomics.Reads.Search

956+import Network.Google.Resource.Genomics.References.Bases.List

957+import Network.Google.Resource.Genomics.References.Get

958+import Network.Google.Resource.Genomics.References.Search

959+import Network.Google.Resource.Genomics.Referencesets.Get

960+import Network.Google.Resource.Genomics.Referencesets.Search

961+import Network.Google.Resource.Genomics.Variants.Create

962+import Network.Google.Resource.Genomics.Variants.Delete

963+import Network.Google.Resource.Genomics.Variants.Get

964+import Network.Google.Resource.Genomics.Variants.Search

965+import Network.Google.Resource.Genomics.Variants.Update

966+import Network.Google.Resource.Genomics.Variantsets.Create

967+import Network.Google.Resource.Genomics.Variantsets.Delete

968+import Network.Google.Resource.Genomics.Variantsets.Export

969+import Network.Google.Resource.Genomics.Variantsets.Get

970+import Network.Google.Resource.Genomics.Variantsets.ImportVariants

971+import Network.Google.Resource.Genomics.Variantsets.MergeVariants

972+import Network.Google.Resource.Genomics.Variantsets.Patch

973+import Network.Google.Resource.Genomics.Variantsets.Search

974+import Network.Google.Resource.Genomics.Variantsets.Update

975975

976976{- $resources

977977TODO

gogol-genomics/gen/Network/Google/Genomics/Types.hs+3−3

@@ -719,9 +719,9 @@ module Network.Google.Genomics.Types

719719 , rsDescription

720720 ) where

721721

722−import Network.Google.Genomics.Types.Product

723−import Network.Google.Genomics.Types.Sum

724−import Network.Google.Prelude

722+import Network.Google.Genomics.Types.Product

723+import Network.Google.Genomics.Types.Sum

724+import Network.Google.Prelude

725725

726726-- | URL referring to version 'v1beta2' of the Genomics API.

727727genomicsURL :: BaseUrl

gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+322−322

@@ -17,17 +17,17 @@

1717--

1818module Network.Google.Genomics.Types.Product where

1919

20−import Network.Google.Genomics.Types.Sum

21−import Network.Google.Prelude

20+import Network.Google.Genomics.Types.Sum

21+import Network.Google.Prelude

2222

2323--

2424-- /See:/ 'fastqMetadata' smart constructor.

2525data FastqMetadata = FastqMetadata

26− { _fmPlatformUnit :: !(Maybe Text)

26+ { _fmPlatformUnit :: !(Maybe Text)

2727 , _fmReadGroupName :: !(Maybe Text)

28− , _fmLibraryName :: !(Maybe Text)

29− , _fmPlatformName :: !(Maybe Text)

30− , _fmSampleName :: !(Maybe Text)

28+ , _fmLibraryName :: !(Maybe Text)

29+ , _fmPlatformName :: !(Maybe Text)

30+ , _fmSampleName :: !(Maybe Text)

3131 } deriving (Eq,Show,Data,Typeable,Generic)

3232

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

@@ -45,7 +45,7 @@ data FastqMetadata = FastqMetadata

4545-- * 'fmSampleName'

4646fastqMetadata

4747 :: FastqMetadata

48−fastqMetadata =

48+fastqMetadata =

4949 FastqMetadata

5050 { _fmPlatformUnit = Nothing

5151 , _fmReadGroupName = Nothing

@@ -109,7 +109,7 @@ instance ToJSON FastqMetadata where

109109--

110110-- /See:/ 'callInfo' smart constructor.

111111data CallInfo =

112− CallInfo

112+ CallInfo

113113 deriving (Eq,Show,Data,Typeable,Generic)

114114

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

@@ -123,13 +123,13 @@ instance FromJSON CallInfo where

123123 = withObject "CallInfo" (\ o -> pure CallInfo)

124124

125125instance ToJSON CallInfo where

126− toJSON = const (Object mempty)

126+ toJSON = const emptyObject

127127

128128-- | A string which maps to an array of values.

129129--

130130-- /See:/ 'readInfo' smart constructor.

131131data ReadInfo =

132− ReadInfo

132+ ReadInfo

133133 deriving (Eq,Show,Data,Typeable,Generic)

134134

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

@@ -143,15 +143,15 @@ instance FromJSON ReadInfo where

143143 = withObject "ReadInfo" (\ o -> pure ReadInfo)

144144

145145instance ToJSON ReadInfo where

146− toJSON = const (Object mempty)

146+ toJSON = const emptyObject

147147

148148--

149149-- /See:/ 'readGroupExperiment' smart constructor.

150150data ReadGroupExperiment = ReadGroupExperiment

151− { _rgeInstrumentModel :: !(Maybe Text)

152− , _rgePlatformUnit :: !(Maybe Text)

151+ { _rgeInstrumentModel :: !(Maybe Text)

152+ , _rgePlatformUnit :: !(Maybe Text)

153153 , _rgeSequencingCenter :: !(Maybe Text)

154− , _rgeLibraryId :: !(Maybe Text)

154+ , _rgeLibraryId :: !(Maybe Text)

155155 } deriving (Eq,Show,Data,Typeable,Generic)

156156

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

@@ -167,7 +167,7 @@ data ReadGroupExperiment = ReadGroupExperiment

167167-- * 'rgeLibraryId'

168168readGroupExperiment

169169 :: ReadGroupExperiment

170−readGroupExperiment =

170+readGroupExperiment =

171171 ReadGroupExperiment

172172 { _rgeInstrumentModel = Nothing

173173 , _rgePlatformUnit = Nothing

@@ -226,7 +226,7 @@ instance ToJSON ReadGroupExperiment where

226226-- /See:/ 'keyValue' smart constructor.

227227data KeyValue = KeyValue

228228 { _kvValue :: !(Maybe [Text])

229− , _kvKey :: !(Maybe Text)

229+ , _kvKey :: !(Maybe Text)

230230 } deriving (Eq,Show,Data,Typeable,Generic)

231231

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

@@ -238,7 +238,7 @@ data KeyValue = KeyValue

238238-- * 'kvKey'

239239keyValue

240240 :: KeyValue

241−keyValue =

241+keyValue =

242242 KeyValue

243243 { _kvValue = Nothing

244244 , _kvKey = Nothing

@@ -277,19 +277,19 @@ instance ToJSON KeyValue where

277277--

278278-- /See:/ 'variant' smart constructor.

279279data Variant = Variant

280− { _vVariantSetId :: !(Maybe Text)

281− , _vCreated :: !(Maybe Int64)

282− , _vStart :: !(Maybe Int64)

280+ { _vVariantSetId :: !(Maybe Text)

281+ , _vCreated :: !(Maybe Int64)

282+ , _vStart :: !(Maybe Int64)

283283 , _vAlternateBases :: !(Maybe [Text])

284− , _vReferenceName :: !(Maybe Text)

285− , _vNames :: !(Maybe [Text])

286− , _vEnd :: !(Maybe Int64)

284+ , _vReferenceName :: !(Maybe Text)

285+ , _vNames :: !(Maybe [Text])

286+ , _vEnd :: !(Maybe Int64)

287287 , _vReferenceBases :: !(Maybe Text)

288− , _vId :: !(Maybe Text)

289− , _vQuality :: !(Maybe Double)

290− , _vFilter :: !(Maybe [Text])

291− , _vInfo :: !(Maybe VariantInfo)

292− , _vCalls :: !(Maybe [Call])

288+ , _vId :: !(Maybe Text)

289+ , _vQuality :: !(Maybe Double)

290+ , _vFilter :: !(Maybe [Text])

291+ , _vInfo :: !(Maybe VariantInfo)

292+ , _vCalls :: !(Maybe [Call])

293293 } deriving (Eq,Show,Data,Typeable,Generic)

294294

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

@@ -323,7 +323,7 @@ data Variant = Variant

323323-- * 'vCalls'

324324variant

325325 :: Variant

326−variant =

326+variant =

327327 Variant

328328 { _vVariantSetId = Nothing

329329 , _vCreated = Nothing

@@ -459,14 +459,14 @@ instance ToJSON Variant where

459459--

460460-- /See:/ 'annotation' smart constructor.

461461data Annotation = Annotation

462− { _aVariant :: !(Maybe VariantAnnotation)

462+ { _aVariant :: !(Maybe VariantAnnotation)

463463 , _aAnnotationSetId :: !(Maybe Text)

464− , _aName :: !(Maybe Text)

465− , _aId :: !(Maybe Text)

466− , _aType :: !(Maybe AnnotationType)

467− , _aTranscript :: !(Maybe Transcript)

468− , _aInfo :: !(Maybe AnnotationInfo)

469− , _aPosition :: !(Maybe RangePosition)

464+ , _aName :: !(Maybe Text)

465+ , _aId :: !(Maybe Text)

466+ , _aType :: !(Maybe AnnotationType)

467+ , _aTranscript :: !(Maybe Transcript)

468+ , _aInfo :: !(Maybe AnnotationInfo)

469+ , _aPosition :: !(Maybe RangePosition)

470470 } deriving (Eq,Show,Data,Typeable,Generic)

471471

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

@@ -490,7 +490,7 @@ data Annotation = Annotation

490490-- * 'aPosition'

491491annotation

492492 :: Annotation

493−annotation =

493+annotation =

494494 Annotation

495495 { _aVariant = Nothing

496496 , _aAnnotationSetId = Nothing

@@ -574,7 +574,7 @@ instance ToJSON Annotation where

574574--

575575-- /See:/ 'interleavedFastqSource' smart constructor.

576576data InterleavedFastqSource = InterleavedFastqSource

577− { _ifsMetadata :: !(Maybe FastqMetadata)

577+ { _ifsMetadata :: !(Maybe FastqMetadata)

578578 , _ifsSourceURIs :: !(Maybe [Text])

579579 } deriving (Eq,Show,Data,Typeable,Generic)

580580

@@ -587,7 +587,7 @@ data InterleavedFastqSource = InterleavedFastqSource

587587-- * 'ifsSourceURIs'

588588interleavedFastqSource

589589 :: InterleavedFastqSource

590−interleavedFastqSource =

590+interleavedFastqSource =

591591 InterleavedFastqSource

592592 { _ifsMetadata = Nothing

593593 , _ifsSourceURIs = Nothing

@@ -629,8 +629,8 @@ instance ToJSON InterleavedFastqSource where

629629-- /See:/ 'callReadGroupSetsRequest' smart constructor.

630630data CallReadGroupSetsRequest = CallReadGroupSetsRequest

631631 { _crgsrReadGroupSetId :: !(Maybe Text)

632− , _crgsrDatasetId :: !(Maybe Text)

633− , _crgsrSourceURIs :: !(Maybe [Text])

632+ , _crgsrDatasetId :: !(Maybe Text)

633+ , _crgsrSourceURIs :: !(Maybe [Text])

634634 } deriving (Eq,Show,Data,Typeable,Generic)

635635

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

@@ -644,7 +644,7 @@ data CallReadGroupSetsRequest = CallReadGroupSetsRequest

644644-- * 'crgsrSourceURIs'

645645callReadGroupSetsRequest

646646 :: CallReadGroupSetsRequest

647−callReadGroupSetsRequest =

647+callReadGroupSetsRequest =

648648 CallReadGroupSetsRequest

649649 { _crgsrReadGroupSetId = Nothing

650650 , _crgsrDatasetId = Nothing

@@ -696,7 +696,7 @@ instance ToJSON CallReadGroupSetsRequest where

696696--

697697-- /See:/ 'batchAnnotationsResponseEntry' smart constructor.

698698data BatchAnnotationsResponseEntry = BatchAnnotationsResponseEntry

699− { _bareStatus :: !(Maybe BatchAnnotationsResponseEntryStatus)

699+ { _bareStatus :: !(Maybe BatchAnnotationsResponseEntryStatus)

700700 , _bareAnnotation :: !(Maybe Annotation)

701701 } deriving (Eq,Show,Data,Typeable,Generic)

702702

@@ -709,7 +709,7 @@ data BatchAnnotationsResponseEntry = BatchAnnotationsResponseEntry

709709-- * 'bareAnnotation'

710710batchAnnotationsResponseEntry

711711 :: BatchAnnotationsResponseEntry

712−batchAnnotationsResponseEntry =

712+batchAnnotationsResponseEntry =

713713 BatchAnnotationsResponseEntry

714714 { _bareStatus = Nothing

715715 , _bareAnnotation = Nothing

@@ -744,8 +744,8 @@ instance ToJSON BatchAnnotationsResponseEntry where

744744-- /See:/ 'listBasesResponse' smart constructor.

745745data ListBasesResponse = ListBasesResponse

746746 { _lbrNextPageToken :: !(Maybe Text)

747− , _lbrOffset :: !(Maybe Int64)

748− , _lbrSequence :: !(Maybe Text)

747+ , _lbrOffset :: !(Maybe Int64)

748+ , _lbrSequence :: !(Maybe Text)

749749 } deriving (Eq,Show,Data,Typeable,Generic)

750750

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

@@ -759,7 +759,7 @@ data ListBasesResponse = ListBasesResponse

759759-- * 'lbrSequence'

760760listBasesResponse

761761 :: ListBasesResponse

762−listBasesResponse =

762+listBasesResponse =

763763 ListBasesResponse

764764 { _lbrNextPageToken = Nothing

765765 , _lbrOffset = Nothing

@@ -807,11 +807,11 @@ instance ToJSON ListBasesResponse where

807807--

808808-- /See:/ 'dataset' smart constructor.

809809data Dataset = Dataset

810− { _dIsPublic :: !(Maybe Bool)

810+ { _dIsPublic :: !(Maybe Bool)

811811 , _dProjectNumber :: !(Maybe Int64)

812− , _dName :: !(Maybe Text)

813− , _dId :: !(Maybe Text)

814− , _dCreateTime :: !(Maybe Int64)

812+ , _dName :: !(Maybe Text)

813+ , _dId :: !(Maybe Text)

814+ , _dCreateTime :: !(Maybe Int64)

815815 } deriving (Eq,Show,Data,Typeable,Generic)

816816

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

@@ -829,7 +829,7 @@ data Dataset = Dataset

829829-- * 'dCreateTime'

830830dataset

831831 :: Dataset

832−dataset =

832+dataset =

833833 Dataset

834834 { _dIsPublic = Nothing

835835 , _dProjectNumber = Nothing

@@ -911,23 +911,23 @@ instance ToJSON Dataset where

911911--

912912-- /See:/ 'read'' smart constructor.

913913data Read' = Read'

914− { _rFragmentLength :: !(Maybe Int32)

915− , _rDuplicateFragment :: !(Maybe Bool)

916− , _rReadGroupSetId :: !(Maybe Text)

917− , _rNextMatePosition :: !(Maybe Position)

914+ { _rFragmentLength :: !(Maybe Int32)

915+ , _rDuplicateFragment :: !(Maybe Bool)

916+ , _rReadGroupSetId :: !(Maybe Text)

917+ , _rNextMatePosition :: !(Maybe Position)

918918 , _rFailedVendorQualityChecks :: !(Maybe Bool)

919− , _rAlignment :: !(Maybe LinearAlignment)

920− , _rFragmentName :: !(Maybe Text)

921− , _rNumberReads :: !(Maybe Int32)

922− , _rId :: !(Maybe Text)

923− , _rSecondaryAlignment :: !(Maybe Bool)

924− , _rReadGroupId :: !(Maybe Text)

925− , _rSupplementaryAlignment :: !(Maybe Bool)

926− , _rAlignedSequence :: !(Maybe Text)

927− , _rProperPlacement :: !(Maybe Bool)

928− , _rInfo :: !(Maybe ReadInfo)

929− , _rReadNumber :: !(Maybe Int32)

930− , _rAlignedQuality :: !(Maybe [Int32])

919+ , _rAlignment :: !(Maybe LinearAlignment)

920+ , _rFragmentName :: !(Maybe Text)

921+ , _rNumberReads :: !(Maybe Int32)

922+ , _rId :: !(Maybe Text)

923+ , _rSecondaryAlignment :: !(Maybe Bool)

924+ , _rReadGroupId :: !(Maybe Text)

925+ , _rSupplementaryAlignment :: !(Maybe Bool)

926+ , _rAlignedSequence :: !(Maybe Text)

927+ , _rProperPlacement :: !(Maybe Bool)

928+ , _rInfo :: !(Maybe ReadInfo)

929+ , _rReadNumber :: !(Maybe Int32)

930+ , _rAlignedQuality :: !(Maybe [Int32])

931931 } deriving (Eq,Show,Data,Typeable,Generic)

932932

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

@@ -969,7 +969,7 @@ data Read' = Read'

969969-- * 'rAlignedQuality'

970970read'

971971 :: Read'

972−read' =

972+read' =

973973 Read'

974974 { _rFragmentLength = Nothing

975975 , _rDuplicateFragment = Nothing

@@ -1172,7 +1172,7 @@ instance ToJSON Read' where

11721172-- /See:/ 'transcriptExon' smart constructor.

11731173data TranscriptExon = TranscriptExon

11741174 { _teStart :: !(Maybe Int64)

1175− , _teEnd :: !(Maybe Int64)

1175+ , _teEnd :: !(Maybe Int64)

11761176 , _teFrame :: !(Maybe Int32Value)

11771177 } deriving (Eq,Show,Data,Typeable,Generic)

11781178

@@ -1187,7 +1187,7 @@ data TranscriptExon = TranscriptExon

11871187-- * 'teFrame'

11881188transcriptExon

11891189 :: TranscriptExon

1190−transcriptExon =

1190+transcriptExon =

11911191 TranscriptExon

11921192 { _teStart = Nothing

11931193 , _teEnd = Nothing

@@ -1242,11 +1242,11 @@ instance ToJSON TranscriptExon where

12421242-- /See:/ 'call' smart constructor.

12431243data Call = Call

12441244 { _cGenotypeLikelihood :: !(Maybe [Double])

1245− , _cCallSetName :: !(Maybe Text)

1246− , _cPhaseset :: !(Maybe Text)

1247− , _cCallSetId :: !(Maybe Text)

1248− , _cGenotype :: !(Maybe [Int32])

1249− , _cInfo :: !(Maybe CallInfo)

1245+ , _cCallSetName :: !(Maybe Text)

1246+ , _cPhaseset :: !(Maybe Text)

1247+ , _cCallSetId :: !(Maybe Text)

1248+ , _cGenotype :: !(Maybe [Int32])

1249+ , _cInfo :: !(Maybe CallInfo)

12501250 } deriving (Eq,Show,Data,Typeable,Generic)

12511251

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

@@ -1266,7 +1266,7 @@ data Call = Call

12661266-- * 'cInfo'

12671267call

12681268 :: Call

1269−call =

1269+call =

12701270 Call

12711271 { _cGenotypeLikelihood = Nothing

12721272 , _cCallSetName = Nothing

@@ -1354,10 +1354,10 @@ instance ToJSON Call where

13541354--

13551355-- /See:/ 'queryRange' smart constructor.

13561356data QueryRange = QueryRange

1357− { _qrStart :: !(Maybe Int64)

1358− , _qrReferenceId :: !(Maybe Text)

1357+ { _qrStart :: !(Maybe Int64)

1358+ , _qrReferenceId :: !(Maybe Text)

13591359 , _qrReferenceName :: !(Maybe Text)

1360− , _qrEnd :: !(Maybe Int64)

1360+ , _qrEnd :: !(Maybe Int64)

13611361 } deriving (Eq,Show,Data,Typeable,Generic)

13621362

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

@@ -1373,7 +1373,7 @@ data QueryRange = QueryRange

13731373-- * 'qrEnd'

13741374queryRange

13751375 :: QueryRange

1376−queryRange =

1376+queryRange =

13771377 QueryRange

13781378 { _qrStart = Nothing

13791379 , _qrReferenceId = Nothing

@@ -1439,7 +1439,7 @@ newtype BatchCreateAnnotationsRequest = BatchCreateAnnotationsRequest

14391439-- * 'bcarAnnotations'

14401440batchCreateAnnotationsRequest

14411441 :: BatchCreateAnnotationsRequest

1442−batchCreateAnnotationsRequest =

1442+batchCreateAnnotationsRequest =

14431443 BatchCreateAnnotationsRequest

14441444 { _bcarAnnotations = Nothing

14451445 }

@@ -1478,7 +1478,7 @@ newtype MergeVariantsRequest = MergeVariantsRequest

14781478-- * 'mvrVariants'

14791479mergeVariantsRequest

14801480 :: MergeVariantsRequest

1481−mergeVariantsRequest =

1481+mergeVariantsRequest =

14821482 MergeVariantsRequest

14831483 { _mvrVariants = Nothing

14841484 }

@@ -1507,16 +1507,16 @@ instance ToJSON MergeVariantsRequest where

15071507--

15081508-- /See:/ 'readGroup' smart constructor.

15091509data ReadGroup = ReadGroup

1510− { _rgReferenceSetId :: !(Maybe Text)

1511− , _rgPrograms :: !(Maybe [ReadGroupProgram])

1512− , _rgExperiment :: !(Maybe ReadGroupExperiment)

1513− , _rgName :: !(Maybe Text)

1514− , _rgDatasetId :: !(Maybe Text)

1515− , _rgId :: !(Maybe Text)

1516− , _rgSampleId :: !(Maybe Text)

1510+ { _rgReferenceSetId :: !(Maybe Text)

1511+ , _rgPrograms :: !(Maybe [ReadGroupProgram])

1512+ , _rgExperiment :: !(Maybe ReadGroupExperiment)

1513+ , _rgName :: !(Maybe Text)

1514+ , _rgDatasetId :: !(Maybe Text)

1515+ , _rgId :: !(Maybe Text)

1516+ , _rgSampleId :: !(Maybe Text)

15171517 , _rgPredictedInsertSize :: !(Maybe Int32)

1518− , _rgDescription :: !(Maybe Text)

1519− , _rgInfo :: !(Maybe ReadGroupInfo)

1518+ , _rgDescription :: !(Maybe Text)

1519+ , _rgInfo :: !(Maybe ReadGroupInfo)

15201520 } deriving (Eq,Show,Data,Typeable,Generic)

15211521

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

@@ -1544,7 +1544,7 @@ data ReadGroup = ReadGroup

15441544-- * 'rgInfo'

15451545readGroup

15461546 :: ReadGroup

1547−readGroup =

1547+readGroup =

15481548 ReadGroup

15491549 { _rgReferenceSetId = Nothing

15501550 , _rgPrograms = Nothing

@@ -1656,10 +1656,10 @@ instance ToJSON ReadGroup where

16561656-- /See:/ 'searchReferenceSetsRequest' smart constructor.

16571657data SearchReferenceSetsRequest = SearchReferenceSetsRequest

16581658 { _srsrMD5checksums :: !(Maybe [Text])

1659− , _srsrAccessions :: !(Maybe [Text])

1660− , _srsrPageToken :: !(Maybe Text)

1661− , _srsrAssemblyId :: !(Maybe Text)

1662− , _srsrPageSize :: !(Maybe Int32)

1659+ , _srsrAccessions :: !(Maybe [Text])

1660+ , _srsrPageToken :: !(Maybe Text)

1661+ , _srsrAssemblyId :: !(Maybe Text)

1662+ , _srsrPageSize :: !(Maybe Int32)

16631663 } deriving (Eq,Show,Data,Typeable,Generic)

16641664

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

@@ -1677,7 +1677,7 @@ data SearchReferenceSetsRequest = SearchReferenceSetsRequest

16771677-- * 'srsrPageSize'

16781678searchReferenceSetsRequest

16791679 :: SearchReferenceSetsRequest

1680−searchReferenceSetsRequest =

1680+searchReferenceSetsRequest =

16811681 SearchReferenceSetsRequest

16821682 { _srsrMD5checksums = Nothing

16831683 , _srsrAccessions = Nothing

@@ -1752,7 +1752,7 @@ instance ToJSON SearchReferenceSetsRequest where

17521752-- /See:/ 'searchReferencesResponse' smart constructor.

17531753data SearchReferencesResponse = SearchReferencesResponse

17541754 { _srrNextPageToken :: !(Maybe Text)

1755− , _srrReferences :: !(Maybe [Reference])

1755+ , _srrReferences :: !(Maybe [Reference])

17561756 } deriving (Eq,Show,Data,Typeable,Generic)

17571757

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

@@ -1764,7 +1764,7 @@ data SearchReferencesResponse = SearchReferencesResponse

17641764-- * 'srrReferences'

17651765searchReferencesResponse

17661766 :: SearchReferencesResponse

1767−searchReferencesResponse =

1767+searchReferencesResponse =

17681768 SearchReferencesResponse

17691769 { _srrNextPageToken = Nothing

17701770 , _srrReferences = Nothing

@@ -1807,12 +1807,12 @@ instance ToJSON SearchReferencesResponse where

18071807--

18081808-- /See:/ 'callSet' smart constructor.

18091809data CallSet = CallSet

1810− { _csCreated :: !(Maybe Int64)

1811− , _csName :: !(Maybe Text)

1812− , _csId :: !(Maybe Text)

1813− , _csSampleId :: !(Maybe Text)

1810+ { _csCreated :: !(Maybe Int64)

1811+ , _csName :: !(Maybe Text)

1812+ , _csId :: !(Maybe Text)

1813+ , _csSampleId :: !(Maybe Text)

18141814 , _csVariantSetIds :: !(Maybe [Text])

1815− , _csInfo :: !(Maybe CallSetInfo)

1815+ , _csInfo :: !(Maybe CallSetInfo)

18161816 } deriving (Eq,Show,Data,Typeable,Generic)

18171817

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

@@ -1832,7 +1832,7 @@ data CallSet = CallSet

18321832-- * 'csInfo'

18331833callSet

18341834 :: CallSet

1835−callSet =

1835+callSet =

18361836 CallSet

18371837 { _csCreated = Nothing

18381838 , _csName = Nothing

@@ -1897,7 +1897,7 @@ instance ToJSON CallSet where

18971897--

18981898-- /See:/ 'coverageBucket' smart constructor.

18991899data CoverageBucket = CoverageBucket

1900− { _cbRange :: !(Maybe Range)

1900+ { _cbRange :: !(Maybe Range)

19011901 , _cbMeanCoverage :: !(Maybe Float)

19021902 } deriving (Eq,Show,Data,Typeable,Generic)

19031903

@@ -1910,7 +1910,7 @@ data CoverageBucket = CoverageBucket

19101910-- * 'cbMeanCoverage'

19111911coverageBucket

19121912 :: CoverageBucket

1913−coverageBucket =

1913+coverageBucket =

19141914 CoverageBucket

19151915 { _cbRange = Nothing

19161916 , _cbMeanCoverage = Nothing

@@ -1945,13 +1945,13 @@ instance ToJSON CoverageBucket where

19451945--

19461946-- /See:/ 'variantAnnotation' smart constructor.

19471947data VariantAnnotation = VariantAnnotation

1948− { _vaEffect :: !(Maybe VariantAnnotationEffect)

1948+ { _vaEffect :: !(Maybe VariantAnnotationEffect)

19491949 , _vaClinicalSignificance :: !(Maybe VariantAnnotationClinicalSignificance)

1950− , _vaAlternateBases :: !(Maybe Text)

1951− , _vaGeneId :: !(Maybe Text)

1952− , _vaConditions :: !(Maybe [VariantAnnotationCondition])

1953− , _vaType :: !(Maybe VariantAnnotationType)

1954− , _vaTranscriptIds :: !(Maybe [Text])

1950+ , _vaAlternateBases :: !(Maybe Text)

1951+ , _vaGeneId :: !(Maybe Text)

1952+ , _vaConditions :: !(Maybe [VariantAnnotationCondition])

1953+ , _vaType :: !(Maybe VariantAnnotationType)

1954+ , _vaTranscriptIds :: !(Maybe [Text])

19551955 } deriving (Eq,Show,Data,Typeable,Generic)

19561956

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

@@ -1973,7 +1973,7 @@ data VariantAnnotation = VariantAnnotation

19731973-- * 'vaTranscriptIds'

19741974variantAnnotation

19751975 :: VariantAnnotation

1976−variantAnnotation =

1976+variantAnnotation =

19771977 VariantAnnotation

19781978 { _vaEffect = Nothing

19791979 , _vaClinicalSignificance = Nothing

@@ -2060,9 +2060,9 @@ instance ToJSON VariantAnnotation where

20602060-- /See:/ 'searchReadGroupSetsRequest' smart constructor.

20612061data SearchReadGroupSetsRequest = SearchReadGroupSetsRequest

20622062 { _srgsrDatasetIds :: !(Maybe [Text])

2063− , _srgsrName :: !(Maybe Text)

2064− , _srgsrPageToken :: !(Maybe Text)

2065− , _srgsrPageSize :: !(Maybe Int32)

2063+ , _srgsrName :: !(Maybe Text)

2064+ , _srgsrPageToken :: !(Maybe Text)

2065+ , _srgsrPageSize :: !(Maybe Int32)

20662066 } deriving (Eq,Show,Data,Typeable,Generic)

20672067

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

@@ -2078,7 +2078,7 @@ data SearchReadGroupSetsRequest = SearchReadGroupSetsRequest

20782078-- * 'srgsrPageSize'

20792079searchReadGroupSetsRequest

20802080 :: SearchReadGroupSetsRequest

2081−searchReadGroupSetsRequest =

2081+searchReadGroupSetsRequest =

20822082 SearchReadGroupSetsRequest

20832083 { _srgsrDatasetIds = Nothing

20842084 , _srgsrName = Nothing

@@ -2138,7 +2138,7 @@ instance ToJSON SearchReadGroupSetsRequest where

21382138--

21392139-- /See:/ 'batchAnnotationsResponseEntryStatus' smart constructor.

21402140data BatchAnnotationsResponseEntryStatus = BatchAnnotationsResponseEntryStatus

2141− { _baresCode :: !(Maybe Int32)

2141+ { _baresCode :: !(Maybe Int32)

21422142 , _baresMessage :: !(Maybe Text)

21432143 } deriving (Eq,Show,Data,Typeable,Generic)

21442144

@@ -2151,7 +2151,7 @@ data BatchAnnotationsResponseEntryStatus = BatchAnnotationsResponseEntryStatus

21512151-- * 'baresMessage'

21522152batchAnnotationsResponseEntryStatus

21532153 :: BatchAnnotationsResponseEntryStatus

2154−batchAnnotationsResponseEntryStatus =

2154+batchAnnotationsResponseEntryStatus =

21552155 BatchAnnotationsResponseEntryStatus

21562156 { _baresCode = Nothing

21572157 , _baresMessage = Nothing

@@ -2190,13 +2190,13 @@ instance ToJSON BatchAnnotationsResponseEntryStatus

21902190--

21912191-- /See:/ 'reference' smart constructor.

21922192data Reference = Reference

2193− { _refLength :: !(Maybe Int64)

2193+ { _refLength :: !(Maybe Int64)

21942194 , _refSourceAccessions :: !(Maybe [Text])

2195− , _refMD5checksum :: !(Maybe Text)

2196− , _refName :: !(Maybe Text)

2197− , _refNcbiTaxonId :: !(Maybe Int32)

2198− , _refId :: !(Maybe Text)

2199− , _refSourceURI :: !(Maybe Text)

2195+ , _refMD5checksum :: !(Maybe Text)

2196+ , _refName :: !(Maybe Text)

2197+ , _refNcbiTaxonId :: !(Maybe Int32)

2198+ , _refId :: !(Maybe Text)

2199+ , _refSourceURI :: !(Maybe Text)

22002200 } deriving (Eq,Show,Data,Typeable,Generic)

22012201

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

@@ -2218,7 +2218,7 @@ data Reference = Reference

22182218-- * 'refSourceURI'

22192219reference

22202220 :: Reference

2221−reference =

2221+reference =

22222222 Reference

22232223 { _refLength = Nothing

22242224 , _refSourceAccessions = Nothing

@@ -2310,7 +2310,7 @@ newtype BatchAnnotationsResponse = BatchAnnotationsResponse

23102310-- * 'barEntries'

23112311batchAnnotationsResponse

23122312 :: BatchAnnotationsResponse

2313−batchAnnotationsResponse =

2313+batchAnnotationsResponse =

23142314 BatchAnnotationsResponse

23152315 { _barEntries = Nothing

23162316 }

@@ -2338,7 +2338,7 @@ instance ToJSON BatchAnnotationsResponse where

23382338--

23392339-- /See:/ 'readGroupInfo' smart constructor.

23402340data ReadGroupInfo =

2341− ReadGroupInfo

2341+ ReadGroupInfo

23422342 deriving (Eq,Show,Data,Typeable,Generic)

23432343

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

@@ -2353,17 +2353,17 @@ instance FromJSON ReadGroupInfo where

23532353 (\ o -> pure ReadGroupInfo)

23542354

23552355instance ToJSON ReadGroupInfo where

2356− toJSON = const (Object mempty)

2356+ toJSON = const emptyObject

23572357

23582358-- | The jobs search request.

23592359--

23602360-- /See:/ 'searchJobsRequest' smart constructor.

23612361data SearchJobsRequest = SearchJobsRequest

2362− { _sjrCreatedAfter :: !(Maybe Int64)

2363− , _sjrStatus :: !(Maybe [SearchJobsRequestStatusItem])

2362+ { _sjrCreatedAfter :: !(Maybe Int64)

2363+ , _sjrStatus :: !(Maybe [SearchJobsRequestStatusItem])

23642364 , _sjrProjectNumber :: !(Maybe Int64)

2365− , _sjrPageToken :: !(Maybe Text)

2366− , _sjrPageSize :: !(Maybe Int32)

2365+ , _sjrPageToken :: !(Maybe Text)

2366+ , _sjrPageSize :: !(Maybe Int32)

23672367 , _sjrCreatedBefore :: !(Maybe Int64)

23682368 } deriving (Eq,Show,Data,Typeable,Generic)

23692369

@@ -2384,7 +2384,7 @@ data SearchJobsRequest = SearchJobsRequest

23842384-- * 'sjrCreatedBefore'

23852385searchJobsRequest

23862386 :: SearchJobsRequest

2387−searchJobsRequest =

2387+searchJobsRequest =

23882388 SearchJobsRequest

23892389 { _sjrCreatedAfter = Nothing

23902390 , _sjrStatus = Nothing

@@ -2463,7 +2463,7 @@ instance ToJSON SearchJobsRequest where

24632463-- /See:/ 'searchCallSetsResponse' smart constructor.

24642464data SearchCallSetsResponse = SearchCallSetsResponse

24652465 { _scsrNextPageToken :: !(Maybe Text)

2466− , _scsrCallSets :: !(Maybe [CallSet])

2466+ , _scsrCallSets :: !(Maybe [CallSet])

24672467 } deriving (Eq,Show,Data,Typeable,Generic)

24682468

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

@@ -2475,7 +2475,7 @@ data SearchCallSetsResponse = SearchCallSetsResponse

24752475-- * 'scsrCallSets'

24762476searchCallSetsResponse

24772477 :: SearchCallSetsResponse

2478−searchCallSetsResponse =

2478+searchCallSetsResponse =

24792479 SearchCallSetsResponse

24802480 { _scsrNextPageToken = Nothing

24812481 , _scsrCallSets = Nothing

@@ -2516,12 +2516,12 @@ instance ToJSON SearchCallSetsResponse where

25162516--

25172517-- /See:/ 'experimentalCreateJobRequest' smart constructor.

25182518data ExperimentalCreateJobRequest = ExperimentalCreateJobRequest

2519− { _ecjrGcsOutputPath :: !(Maybe Text)

2520− , _ecjrProjectNumber :: !(Maybe Int64)

2521− , _ecjrAlign :: !(Maybe Bool)

2522− , _ecjrSourceURIs :: !(Maybe [Text])

2519+ { _ecjrGcsOutputPath :: !(Maybe Text)

2520+ , _ecjrProjectNumber :: !(Maybe Int64)

2521+ , _ecjrAlign :: !(Maybe Bool)

2522+ , _ecjrSourceURIs :: !(Maybe [Text])

25232523 , _ecjrPairedSourceURIs :: !(Maybe [Text])

2524− , _ecjrCallVariants :: !(Maybe Bool)

2524+ , _ecjrCallVariants :: !(Maybe Bool)

25252525 } deriving (Eq,Show,Data,Typeable,Generic)

25262526

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

@@ -2541,7 +2541,7 @@ data ExperimentalCreateJobRequest = ExperimentalCreateJobRequest

25412541-- * 'ecjrCallVariants'

25422542experimentalCreateJobRequest

25432543 :: ExperimentalCreateJobRequest

2544−experimentalCreateJobRequest =

2544+experimentalCreateJobRequest =

25452545 ExperimentalCreateJobRequest

25462546 { _ecjrGcsOutputPath = Nothing

25472547 , _ecjrProjectNumber = Nothing

@@ -2627,8 +2627,8 @@ instance ToJSON ExperimentalCreateJobRequest where

26272627-- /See:/ 'jobRequest' smart constructor.

26282628data JobRequest = JobRequest

26292629 { _jrDestination :: !(Maybe [Text])

2630− , _jrSource :: !(Maybe [Text])

2631− , _jrType :: !(Maybe JobRequestType)

2630+ , _jrSource :: !(Maybe [Text])

2631+ , _jrType :: !(Maybe JobRequestType)

26322632 } deriving (Eq,Show,Data,Typeable,Generic)

26332633

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

@@ -2642,7 +2642,7 @@ data JobRequest = JobRequest

26422642-- * 'jrType'

26432643jobRequest

26442644 :: JobRequest

2645−jobRequest =

2645+jobRequest =

26462646 JobRequest

26472647 { _jrDestination = Nothing

26482648 , _jrSource = Nothing

@@ -2691,12 +2691,12 @@ instance ToJSON JobRequest where

26912691--

26922692-- /See:/ 'searchReadsRequest' smart constructor.

26932693data SearchReadsRequest = SearchReadsRequest

2694− { _srrStart :: !(Maybe Int64)

2695− , _srrReadGroupIds :: !(Maybe [Text])

2696− , _srrReferenceName :: !(Maybe Text)

2697− , _srrEnd :: !(Maybe Int64)

2698− , _srrPageToken :: !(Maybe Text)

2699− , _srrPageSize :: !(Maybe Int32)

2694+ { _srrStart :: !(Maybe Int64)

2695+ , _srrReadGroupIds :: !(Maybe [Text])

2696+ , _srrReferenceName :: !(Maybe Text)

2697+ , _srrEnd :: !(Maybe Int64)

2698+ , _srrPageToken :: !(Maybe Text)

2699+ , _srrPageSize :: !(Maybe Int32)

27002700 , _srrReadGroupSetIds :: !(Maybe [Text])

27012701 } deriving (Eq,Show,Data,Typeable,Generic)

27022702

@@ -2719,7 +2719,7 @@ data SearchReadsRequest = SearchReadsRequest

27192719-- * 'srrReadGroupSetIds'

27202720searchReadsRequest

27212721 :: SearchReadsRequest

2722−searchReadsRequest =

2722+searchReadsRequest =

27232723 SearchReadsRequest

27242724 { _srrStart = Nothing

27252725 , _srrReadGroupIds = Nothing

@@ -2809,7 +2809,7 @@ instance ToJSON SearchReadsRequest where

28092809--

28102810-- /See:/ 'variantInfo' smart constructor.

28112811data VariantInfo =

2812− VariantInfo

2812+ VariantInfo

28132813 deriving (Eq,Show,Data,Typeable,Generic)

28142814

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

@@ -2823,15 +2823,15 @@ instance FromJSON VariantInfo where

28232823 = withObject "VariantInfo" (\ o -> pure VariantInfo)

28242824

28252825instance ToJSON VariantInfo where

2826− toJSON = const (Object mempty)

2826+ toJSON = const emptyObject

28272827

28282828-- | The search variant sets request.

28292829--

28302830-- /See:/ 'searchVariantSetsRequest' smart constructor.

28312831data SearchVariantSetsRequest = SearchVariantSetsRequest

28322832 { _svsrDatasetIds :: !(Maybe [Text])

2833− , _svsrPageToken :: !(Maybe Text)

2834− , _svsrPageSize :: !(Maybe Int32)

2833+ , _svsrPageToken :: !(Maybe Text)

2834+ , _svsrPageSize :: !(Maybe Int32)

28352835 } deriving (Eq,Show,Data,Typeable,Generic)

28362836

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

@@ -2845,7 +2845,7 @@ data SearchVariantSetsRequest = SearchVariantSetsRequest

28452845-- * 'svsrPageSize'

28462846searchVariantSetsRequest

28472847 :: SearchVariantSetsRequest

2848−searchVariantSetsRequest =

2848+searchVariantSetsRequest =

28492849 SearchVariantSetsRequest

28502850 { _svsrDatasetIds = Nothing

28512851 , _svsrPageToken = Nothing

@@ -2895,10 +2895,10 @@ instance ToJSON SearchVariantSetsRequest where

28952895-- /See:/ 'readGroupProgram' smart constructor.

28962896data ReadGroupProgram = ReadGroupProgram

28972897 { _rgpPrevProgramId :: !(Maybe Text)

2898− , _rgpName :: !(Maybe Text)

2899− , _rgpVersion :: !(Maybe Text)

2900− , _rgpId :: !(Maybe Text)

2901− , _rgpCommandLine :: !(Maybe Text)

2898+ , _rgpName :: !(Maybe Text)

2899+ , _rgpVersion :: !(Maybe Text)

2900+ , _rgpId :: !(Maybe Text)

2901+ , _rgpCommandLine :: !(Maybe Text)

29022902 } deriving (Eq,Show,Data,Typeable,Generic)

29032903

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

@@ -2916,7 +2916,7 @@ data ReadGroupProgram = ReadGroupProgram

29162916-- * 'rgpCommandLine'

29172917readGroupProgram

29182918 :: ReadGroupProgram

2919−readGroupProgram =

2919+readGroupProgram =

29202920 ReadGroupProgram

29212921 { _rgpPrevProgramId = Nothing

29222922 , _rgpName = Nothing

@@ -2985,7 +2985,7 @@ newtype Int32Value = Int32Value

29852985-- * 'ivValue'

29862986int32Value

29872987 :: Int32Value

2988−int32Value =

2988+int32Value =

29892989 Int32Value

29902990 { _ivValue = Nothing

29912991 }

@@ -3007,7 +3007,7 @@ instance ToJSON Int32Value where

30073007--

30083008-- /See:/ 'annotationInfo' smart constructor.

30093009data AnnotationInfo =

3010− AnnotationInfo

3010+ AnnotationInfo

30113011 deriving (Eq,Show,Data,Typeable,Generic)

30123012

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

@@ -3022,15 +3022,15 @@ instance FromJSON AnnotationInfo where

30223022 (\ o -> pure AnnotationInfo)

30233023

30243024instance ToJSON AnnotationInfo where

3025− toJSON = const (Object mempty)

3025+ toJSON = const emptyObject

30263026

30273027-- | The read group set export request.

30283028--

30293029-- /See:/ 'exportReadGroupSetsRequest' smart constructor.

30303030data ExportReadGroupSetsRequest = ExportReadGroupSetsRequest

3031− { _ergsrReferenceNames :: !(Maybe [Text])

3032− , _ergsrProjectNumber :: !(Maybe Int64)

3033− , _ergsrExportURI :: !(Maybe Text)

3031+ { _ergsrReferenceNames :: !(Maybe [Text])

3032+ , _ergsrProjectNumber :: !(Maybe Int64)

3033+ , _ergsrExportURI :: !(Maybe Text)

30343034 , _ergsrReadGroupSetIds :: !(Maybe [Text])

30353035 } deriving (Eq,Show,Data,Typeable,Generic)

30363036

@@ -3047,7 +3047,7 @@ data ExportReadGroupSetsRequest = ExportReadGroupSetsRequest

30473047-- * 'ergsrReadGroupSetIds'

30483048exportReadGroupSetsRequest

30493049 :: ExportReadGroupSetsRequest

3050−exportReadGroupSetsRequest =

3050+exportReadGroupSetsRequest =

30513051 ExportReadGroupSetsRequest

30523052 { _ergsrReferenceNames = Nothing

30533053 , _ergsrProjectNumber = Nothing

@@ -3110,7 +3110,7 @@ instance ToJSON ExportReadGroupSetsRequest where

31103110--

31113111-- /See:/ 'searchAnnotationsResponse' smart constructor.

31123112data SearchAnnotationsResponse = SearchAnnotationsResponse

3113− { _sarAnnotations :: !(Maybe [Annotation])

3113+ { _sarAnnotations :: !(Maybe [Annotation])

31143114 , _sarNextPageToken :: !(Maybe Text)

31153115 } deriving (Eq,Show,Data,Typeable,Generic)

31163116

@@ -3123,7 +3123,7 @@ data SearchAnnotationsResponse = SearchAnnotationsResponse

31233123-- * 'sarNextPageToken'

31243124searchAnnotationsResponse

31253125 :: SearchAnnotationsResponse

3126−searchAnnotationsResponse =

3126+searchAnnotationsResponse =

31273127 SearchAnnotationsResponse

31283128 { _sarAnnotations = Nothing

31293129 , _sarNextPageToken = Nothing

@@ -3165,11 +3165,11 @@ instance ToJSON SearchAnnotationsResponse where

31653165-- /See:/ 'searchAnnotationSetsRequest' smart constructor.

31663166data SearchAnnotationSetsRequest = SearchAnnotationSetsRequest

31673167 { _sasrReferenceSetId :: !(Maybe Text)

3168− , _sasrTypes :: !(Maybe [SearchAnnotationSetsRequestTypesItem])

3169− , _sasrDatasetIds :: !(Maybe [Text])

3170− , _sasrName :: !(Maybe Text)

3171− , _sasrPageToken :: !(Maybe Text)

3172− , _sasrPageSize :: !(Maybe Int32)

3168+ , _sasrTypes :: !(Maybe [SearchAnnotationSetsRequestTypesItem])

3169+ , _sasrDatasetIds :: !(Maybe [Text])

3170+ , _sasrName :: !(Maybe Text)

3171+ , _sasrPageToken :: !(Maybe Text)

3172+ , _sasrPageSize :: !(Maybe Int32)

31733173 } deriving (Eq,Show,Data,Typeable,Generic)

31743174

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

@@ -3189,7 +3189,7 @@ data SearchAnnotationSetsRequest = SearchAnnotationSetsRequest

31893189-- * 'sasrPageSize'

31903190searchAnnotationSetsRequest

31913191 :: SearchAnnotationSetsRequest

3192−searchAnnotationSetsRequest =

3192+searchAnnotationSetsRequest =

31933193 SearchAnnotationSetsRequest

31943194 { _sasrReferenceSetId = Nothing

31953195 , _sasrTypes = Nothing

@@ -3269,7 +3269,7 @@ instance ToJSON SearchAnnotationSetsRequest where

32693269--

32703270-- /See:/ 'searchVariantsResponse' smart constructor.

32713271data SearchVariantsResponse = SearchVariantsResponse

3272− { _svrVariants :: !(Maybe [Variant])

3272+ { _svrVariants :: !(Maybe [Variant])

32733273 , _svrNextPageToken :: !(Maybe Text)

32743274 } deriving (Eq,Show,Data,Typeable,Generic)

32753275

@@ -3282,7 +3282,7 @@ data SearchVariantsResponse = SearchVariantsResponse

32823282-- * 'svrNextPageToken'

32833283searchVariantsResponse

32843284 :: SearchVariantsResponse

3285−searchVariantsResponse =

3285+searchVariantsResponse =

32863286 SearchVariantsResponse

32873287 { _svrVariants = Nothing

32883288 , _svrNextPageToken = Nothing

@@ -3333,7 +3333,7 @@ newtype ExperimentalCreateJobResponse = ExperimentalCreateJobResponse

33333333-- * 'ecjrJobId'

33343334experimentalCreateJobResponse

33353335 :: ExperimentalCreateJobResponse

3336−experimentalCreateJobResponse =

3336+experimentalCreateJobResponse =

33373337 ExperimentalCreateJobResponse

33383338 { _ecjrJobId = Nothing

33393339 }

@@ -3357,10 +3357,10 @@ instance ToJSON ExperimentalCreateJobResponse where

33573357--

33583358-- /See:/ 'searchCallSetsRequest' smart constructor.

33593359data SearchCallSetsRequest = SearchCallSetsRequest

3360− { _scsrName :: !(Maybe Text)

3361− , _scsrPageToken :: !(Maybe Text)

3360+ { _scsrName :: !(Maybe Text)

3361+ , _scsrPageToken :: !(Maybe Text)

33623362 , _scsrVariantSetIds :: !(Maybe [Text])

3363− , _scsrPageSize :: !(Maybe Int32)

3363+ , _scsrPageSize :: !(Maybe Int32)

33643364 } deriving (Eq,Show,Data,Typeable,Generic)

33653365

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

@@ -3376,7 +3376,7 @@ data SearchCallSetsRequest = SearchCallSetsRequest

33763376-- * 'scsrPageSize'

33773377searchCallSetsRequest

33783378 :: SearchCallSetsRequest

3379−searchCallSetsRequest =

3379+searchCallSetsRequest =

33803380 SearchCallSetsRequest

33813381 { _scsrName = Nothing

33823382 , _scsrPageToken = Nothing

@@ -3435,7 +3435,7 @@ instance ToJSON SearchCallSetsRequest where

34353435-- /See:/ 'searchReadsResponse' smart constructor.

34363436data SearchReadsResponse = SearchReadsResponse

34373437 { _sNextPageToken :: !(Maybe Text)

3438− , _sAlignments :: !(Maybe [Read'])

3438+ , _sAlignments :: !(Maybe [Read'])

34393439 } deriving (Eq,Show,Data,Typeable,Generic)

34403440

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

@@ -3447,7 +3447,7 @@ data SearchReadsResponse = SearchReadsResponse

34473447-- * 'sAlignments'

34483448searchReadsResponse

34493449 :: SearchReadsResponse

3450−searchReadsResponse =

3450+searchReadsResponse =

34513451 SearchReadsResponse

34523452 { _sNextPageToken = Nothing

34533453 , _sAlignments = Nothing

@@ -3491,8 +3491,8 @@ instance ToJSON SearchReadsResponse where

34913491--

34923492-- /See:/ 'pairedFastqSource' smart constructor.

34933493data PairedFastqSource = PairedFastqSource

3494− { _pfsFirstSourceURIs :: !(Maybe [Text])

3495− , _pfsMetadata :: !(Maybe FastqMetadata)

3494+ { _pfsFirstSourceURIs :: !(Maybe [Text])

3495+ , _pfsMetadata :: !(Maybe FastqMetadata)

34963496 , _pfsSecondSourceURIs :: !(Maybe [Text])

34973497 } deriving (Eq,Show,Data,Typeable,Generic)

34983498

@@ -3507,7 +3507,7 @@ data PairedFastqSource = PairedFastqSource

35073507-- * 'pfsSecondSourceURIs'

35083508pairedFastqSource

35093509 :: PairedFastqSource

3510−pairedFastqSource =

3510+pairedFastqSource =

35113511 PairedFastqSource

35123512 { _pfsFirstSourceURIs = Nothing

35133513 , _pfsMetadata = Nothing

@@ -3568,10 +3568,10 @@ instance ToJSON PairedFastqSource where

35683568-- /See:/ 'searchReferencesRequest' smart constructor.

35693569data SearchReferencesRequest = SearchReferencesRequest

35703570 { _sReferenceSetId :: !(Maybe Text)

3571− , _sMD5checksums :: !(Maybe [Text])

3572− , _sAccessions :: !(Maybe [Text])

3573− , _sPageToken :: !(Maybe Text)

3574− , _sPageSize :: !(Maybe Int32)

3571+ , _sMD5checksums :: !(Maybe [Text])

3572+ , _sAccessions :: !(Maybe [Text])

3573+ , _sPageToken :: !(Maybe Text)

3574+ , _sPageSize :: !(Maybe Int32)

35753575 } deriving (Eq,Show,Data,Typeable,Generic)

35763576

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

@@ -3589,7 +3589,7 @@ data SearchReferencesRequest = SearchReferencesRequest

35893589-- * 'sPageSize'

35903590searchReferencesRequest

35913591 :: SearchReferencesRequest

3592−searchReferencesRequest =

3592+searchReferencesRequest =

35933593 SearchReferencesRequest

35943594 { _sReferenceSetId = Nothing

35953595 , _sMD5checksums = Nothing

@@ -3673,7 +3673,7 @@ data SearchReferenceSetsResponse = SearchReferenceSetsResponse

36733673-- * 'srsrReferenceSets'

36743674searchReferenceSetsResponse

36753675 :: SearchReferenceSetsResponse

3676−searchReferenceSetsResponse =

3676+searchReferenceSetsResponse =

36773677 SearchReferenceSetsResponse

36783678 { _srsrNextPageToken = Nothing

36793679 , _srsrReferenceSets = Nothing

@@ -3715,9 +3715,9 @@ instance ToJSON SearchReferenceSetsResponse where

37153715--

37163716-- /See:/ 'range' smart constructor.

37173717data Range = Range

3718− { _rStart :: !(Maybe Int64)

3718+ { _rStart :: !(Maybe Int64)

37193719 , _rReferenceName :: !(Maybe Text)

3720− , _rEnd :: !(Maybe Int64)

3720+ , _rEnd :: !(Maybe Int64)

37213721 } deriving (Eq,Show,Data,Typeable,Generic)

37223722

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

@@ -3731,7 +3731,7 @@ data Range = Range

37313731-- * 'rEnd'

37323732range

37333733 :: Range

3734−range =

3734+range =

37353735 Range

37363736 { _rStart = Nothing

37373737 , _rReferenceName = Nothing

@@ -3779,12 +3779,12 @@ instance ToJSON Range where

37793779-- /See:/ 'readGroupSet' smart constructor.

37803780data ReadGroupSet = ReadGroupSet

37813781 { _rgsReferenceSetId :: !(Maybe Text)

3782− , _rgsName :: !(Maybe Text)

3783− , _rgsDatasetId :: !(Maybe Text)

3784− , _rgsId :: !(Maybe Text)

3785− , _rgsInfo :: !(Maybe ReadGroupSetInfo)

3786− , _rgsReadGroups :: !(Maybe [ReadGroup])

3787− , _rgsFilename :: !(Maybe Text)

3782+ , _rgsName :: !(Maybe Text)

3783+ , _rgsDatasetId :: !(Maybe Text)

3784+ , _rgsId :: !(Maybe Text)

3785+ , _rgsInfo :: !(Maybe ReadGroupSetInfo)

3786+ , _rgsReadGroups :: !(Maybe [ReadGroup])

3787+ , _rgsFilename :: !(Maybe Text)

37883788 } deriving (Eq,Show,Data,Typeable,Generic)

37893789

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

@@ -3806,7 +3806,7 @@ data ReadGroupSet = ReadGroupSet

38063806-- * 'rgsFilename'

38073807readGroupSet

38083808 :: ReadGroupSet

3809−readGroupSet =

3809+readGroupSet =

38103810 ReadGroupSet

38113811 { _rgsReferenceSetId = Nothing

38123812 , _rgsName = Nothing

@@ -3885,14 +3885,14 @@ instance ToJSON ReadGroupSet where

38853885-- /See:/ 'job' smart constructor.

38863886data Job = Job

38873887 { _jDetailedStatus :: !(Maybe Text)

3888− , _jStatus :: !(Maybe JobStatus)

3889− , _jCreated :: !(Maybe Int64)

3890− , _jProjectNumber :: !(Maybe Int64)

3891− , _jWarnings :: !(Maybe [Text])

3892− , _jImportedIds :: !(Maybe [Text])

3893− , _jId :: !(Maybe Text)

3894− , _jErrors :: !(Maybe [Text])

3895− , _jRequest :: !(Maybe JobRequest)

3888+ , _jStatus :: !(Maybe JobStatus)

3889+ , _jCreated :: !(Maybe Int64)

3890+ , _jProjectNumber :: !(Maybe Int64)

3891+ , _jWarnings :: !(Maybe [Text])

3892+ , _jImportedIds :: !(Maybe [Text])

3893+ , _jId :: !(Maybe Text)

3894+ , _jErrors :: !(Maybe [Text])

3895+ , _jRequest :: !(Maybe JobRequest)

38963896 } deriving (Eq,Show,Data,Typeable,Generic)

38973897

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

@@ -3918,7 +3918,7 @@ data Job = Job

39183918-- * 'jRequest'

39193919job

39203920 :: Job

3921−job =

3921+job =

39223922 Job

39233923 { _jDetailedStatus = Nothing

39243924 , _jStatus = Nothing

@@ -4021,7 +4021,7 @@ newtype ExportVariantSetResponse = ExportVariantSetResponse

40214021-- * 'evsrJobId'

40224022exportVariantSetResponse

40234023 :: ExportVariantSetResponse

4024−exportVariantSetResponse =

4024+exportVariantSetResponse =

40254025 ExportVariantSetResponse

40264026 { _evsrJobId = Nothing

40274027 }

@@ -4054,7 +4054,7 @@ newtype AlignReadGroupSetsResponse = AlignReadGroupSetsResponse

40544054-- * 'argsrJobId'

40554055alignReadGroupSetsResponse

40564056 :: AlignReadGroupSetsResponse

4057−alignReadGroupSetsResponse =

4057+alignReadGroupSetsResponse =

40584058 AlignReadGroupSetsResponse

40594059 { _argsrJobId = Nothing

40604060 }

@@ -4088,7 +4088,7 @@ newtype ImportVariantsResponse = ImportVariantsResponse

40884088-- * 'ivrJobId'

40894089importVariantsResponse

40904090 :: ImportVariantsResponse

4091−importVariantsResponse =

4091+importVariantsResponse =

40924092 ImportVariantsResponse

40934093 { _ivrJobId = Nothing

40944094 }

@@ -4109,8 +4109,8 @@ instance ToJSON ImportVariantsResponse where

41094109--

41104110-- /See:/ 'listCoverageBucketsResponse' smart constructor.

41114111data ListCoverageBucketsResponse = ListCoverageBucketsResponse

4112− { _lcbrNextPageToken :: !(Maybe Text)

4113− , _lcbrBucketWidth :: !(Maybe Int64)

4112+ { _lcbrNextPageToken :: !(Maybe Text)

4113+ , _lcbrBucketWidth :: !(Maybe Int64)

41144114 , _lcbrCoverageBuckets :: !(Maybe [CoverageBucket])

41154115 } deriving (Eq,Show,Data,Typeable,Generic)

41164116

@@ -4125,7 +4125,7 @@ data ListCoverageBucketsResponse = ListCoverageBucketsResponse

41254125-- * 'lcbrCoverageBuckets'

41264126listCoverageBucketsResponse

41274127 :: ListCoverageBucketsResponse

4128−listCoverageBucketsResponse =

4128+listCoverageBucketsResponse =

41294129 ListCoverageBucketsResponse

41304130 { _lcbrNextPageToken = Nothing

41314131 , _lcbrBucketWidth = Nothing

@@ -4191,7 +4191,7 @@ newtype ImportReadGroupSetsResponse = ImportReadGroupSetsResponse

41914191-- * 'irgsrJobId'

41924192importReadGroupSetsResponse

41934193 :: ImportReadGroupSetsResponse

4194−importReadGroupSetsResponse =

4194+importReadGroupSetsResponse =

41954195 ImportReadGroupSetsResponse

41964196 { _irgsrJobId = Nothing

41974197 }

@@ -4216,9 +4216,9 @@ instance ToJSON ImportReadGroupSetsResponse where

42164216--

42174217-- /See:/ 'linearAlignment' smart constructor.

42184218data LinearAlignment = LinearAlignment

4219− { _laCigar :: !(Maybe [CigarUnit])

4219+ { _laCigar :: !(Maybe [CigarUnit])

42204220 , _laMAppingQuality :: !(Maybe Int32)

4221− , _laPosition :: !(Maybe Position)

4221+ , _laPosition :: !(Maybe Position)

42224222 } deriving (Eq,Show,Data,Typeable,Generic)

42234223

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

@@ -4232,7 +4232,7 @@ data LinearAlignment = LinearAlignment

42324232-- * 'laPosition'

42334233linearAlignment

42344234 :: LinearAlignment

4235−linearAlignment =

4235+linearAlignment =

42364236 LinearAlignment

42374237 { _laCigar = Nothing

42384238 , _laMAppingQuality = Nothing

@@ -4281,13 +4281,13 @@ instance ToJSON LinearAlignment where

42814281--

42824282-- /See:/ 'metadata' smart constructor.

42834283data Metadata = Metadata

4284− { _mValue :: !(Maybe Text)

4285− , _mKey :: !(Maybe Text)

4286− , _mId :: !(Maybe Text)

4287− , _mType :: !(Maybe MetadataType)

4288− , _mNumber :: !(Maybe Text)

4284+ { _mValue :: !(Maybe Text)

4285+ , _mKey :: !(Maybe Text)

4286+ , _mId :: !(Maybe Text)

4287+ , _mType :: !(Maybe MetadataType)

4288+ , _mNumber :: !(Maybe Text)

42894289 , _mDescription :: !(Maybe Text)

4290− , _mInfo :: !(Maybe MetadataInfo)

4290+ , _mInfo :: !(Maybe MetadataInfo)

42914291 } deriving (Eq,Show,Data,Typeable,Generic)

42924292

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

@@ -4309,7 +4309,7 @@ data Metadata = Metadata

43094309-- * 'mInfo'

43104310metadata

43114311 :: Metadata

4312−metadata =

4312+metadata =

43134313 Metadata

43144314 { _mValue = Nothing

43154315 , _mKey = Nothing

@@ -4388,7 +4388,7 @@ newtype CallReadGroupSetsResponse = CallReadGroupSetsResponse

43884388-- * 'crgsrJobId'

43894389callReadGroupSetsResponse

43904390 :: CallReadGroupSetsResponse

4391−callReadGroupSetsResponse =

4391+callReadGroupSetsResponse =

43924392 CallReadGroupSetsResponse

43934393 { _crgsrJobId = Nothing

43944394 }

@@ -4416,12 +4416,12 @@ instance ToJSON CallReadGroupSetsResponse where

44164416-- /See:/ 'annotationSet' smart constructor.

44174417data AnnotationSet = AnnotationSet

44184418 { _asReferenceSetId :: !(Maybe Text)

4419− , _asName :: !(Maybe Text)

4420− , _asDatasetId :: !(Maybe Text)

4421− , _asId :: !(Maybe Text)

4422− , _asType :: !(Maybe AnnotationSetType)

4423− , _asSourceURI :: !(Maybe Text)

4424− , _asInfo :: !(Maybe AnnotationSetInfo)

4419+ , _asName :: !(Maybe Text)

4420+ , _asDatasetId :: !(Maybe Text)

4421+ , _asId :: !(Maybe Text)

4422+ , _asType :: !(Maybe AnnotationSetType)

4423+ , _asSourceURI :: !(Maybe Text)

4424+ , _asInfo :: !(Maybe AnnotationSetInfo)

44254425 } deriving (Eq,Show,Data,Typeable,Generic)

44264426

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

@@ -4443,7 +4443,7 @@ data AnnotationSet = AnnotationSet

44434443-- * 'asInfo'

44444444annotationSet

44454445 :: AnnotationSet

4446−annotationSet =

4446+annotationSet =

44474447 AnnotationSet

44484448 { _asReferenceSetId = Nothing

44494449 , _asName = Nothing

@@ -4517,10 +4517,10 @@ instance ToJSON AnnotationSet where

45174517--

45184518-- /See:/ 'variantSet' smart constructor.

45194519data VariantSet = VariantSet

4520− { _vsDatasetId :: !(Maybe Text)

4520+ { _vsDatasetId :: !(Maybe Text)

45214521 , _vsReferenceBounds :: !(Maybe [ReferenceBound])

4522− , _vsMetadata :: !(Maybe [Metadata])

4523− , _vsId :: !(Maybe Text)

4522+ , _vsMetadata :: !(Maybe [Metadata])

4523+ , _vsId :: !(Maybe Text)

45244524 } deriving (Eq,Show,Data,Typeable,Generic)

45254525

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

@@ -4536,7 +4536,7 @@ data VariantSet = VariantSet

45364536-- * 'vsId'

45374537variantSet

45384538 :: VariantSet

4539−variantSet =

4539+variantSet =

45404540 VariantSet

45414541 { _vsDatasetId = Nothing

45424542 , _vsReferenceBounds = Nothing

@@ -4593,7 +4593,7 @@ instance ToJSON VariantSet where

45934593-- /See:/ 'listDatasetsResponse' smart constructor.

45944594data ListDatasetsResponse = ListDatasetsResponse

45954595 { _ldrNextPageToken :: !(Maybe Text)

4596− , _ldrDatasets :: !(Maybe [Dataset])

4596+ , _ldrDatasets :: !(Maybe [Dataset])

45974597 } deriving (Eq,Show,Data,Typeable,Generic)

45984598

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

@@ -4605,7 +4605,7 @@ data ListDatasetsResponse = ListDatasetsResponse

46054605-- * 'ldrDatasets'

46064606listDatasetsResponse

46074607 :: ListDatasetsResponse

4608−listDatasetsResponse =

4608+listDatasetsResponse =

46094609 ListDatasetsResponse

46104610 { _ldrNextPageToken = Nothing

46114611 , _ldrDatasets = Nothing

@@ -4646,9 +4646,9 @@ instance ToJSON ListDatasetsResponse where

46464646--

46474647-- /See:/ 'importReadGroupSetsRequest' smart constructor.

46484648data ImportReadGroupSetsRequest = ImportReadGroupSetsRequest

4649− { _irgsrReferenceSetId :: !(Maybe Text)

4650− , _irgsrDatasetId :: !(Maybe Text)

4651− , _irgsrSourceURIs :: !(Maybe [Text])

4649+ { _irgsrReferenceSetId :: !(Maybe Text)

4650+ , _irgsrDatasetId :: !(Maybe Text)

4651+ , _irgsrSourceURIs :: !(Maybe [Text])

46524652 , _irgsrPartitionStrategy :: !(Maybe ImportReadGroupSetsRequestPartitionStrategy)

46534653 } deriving (Eq,Show,Data,Typeable,Generic)

46544654

@@ -4665,7 +4665,7 @@ data ImportReadGroupSetsRequest = ImportReadGroupSetsRequest

46654665-- * 'irgsrPartitionStrategy'

46664666importReadGroupSetsRequest

46674667 :: ImportReadGroupSetsRequest

4668−importReadGroupSetsRequest =

4668+importReadGroupSetsRequest =

46694669 ImportReadGroupSetsRequest

46704670 { _irgsrReferenceSetId = Nothing

46714671 , _irgsrDatasetId = Nothing

@@ -4728,9 +4728,9 @@ instance ToJSON ImportReadGroupSetsRequest where

47284728--

47294729-- /See:/ 'importVariantsRequest' smart constructor.

47304730data ImportVariantsRequest = ImportVariantsRequest

4731− { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)

4731+ { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)

47324732 , _ivrNormalizeReferenceNames :: !(Maybe Bool)

4733− , _ivrSourceURIs :: !(Maybe [Text])

4733+ , _ivrSourceURIs :: !(Maybe [Text])

47344734 } deriving (Eq,Show,Data,Typeable,Generic)

47354735

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

@@ -4744,7 +4744,7 @@ data ImportVariantsRequest = ImportVariantsRequest

47444744-- * 'ivrSourceURIs'

47454745importVariantsRequest

47464746 :: ImportVariantsRequest

4747−importVariantsRequest =

4747+importVariantsRequest =

47484748 ImportVariantsRequest

47494749 { _ivrFormat = Nothing

47504750 , _ivrNormalizeReferenceNames = Nothing

@@ -4802,7 +4802,7 @@ instance ToJSON ImportVariantsRequest where

48024802-- /See:/ 'externalId' smart constructor.

48034803data ExternalId = ExternalId

48044804 { _eiSourceName :: !(Maybe Text)

4805− , _eiId :: !(Maybe Text)

4805+ , _eiId :: !(Maybe Text)

48064806 } deriving (Eq,Show,Data,Typeable,Generic)

48074807

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

@@ -4814,7 +4814,7 @@ data ExternalId = ExternalId

48144814-- * 'eiId'

48154815externalId

48164816 :: ExternalId

4817−externalId =

4817+externalId =

48184818 ExternalId

48194819 { _eiSourceName = Nothing

48204820 , _eiId = Nothing

@@ -4846,8 +4846,8 @@ instance ToJSON ExternalId where

48464846--

48474847-- /See:/ 'cigarUnit' smart constructor.

48484848data CigarUnit = CigarUnit

4849− { _cuOperation :: !(Maybe CigarUnitOperation)

4850− , _cuOperationLength :: !(Maybe Int64)

4849+ { _cuOperation :: !(Maybe CigarUnitOperation)

4850+ , _cuOperationLength :: !(Maybe Int64)

48514851 , _cuReferenceSequence :: !(Maybe Text)

48524852 } deriving (Eq,Show,Data,Typeable,Generic)

48534853

@@ -4862,7 +4862,7 @@ data CigarUnit = CigarUnit

48624862-- * 'cuReferenceSequence'

48634863cigarUnit

48644864 :: CigarUnit

4865−cigarUnit =

4865+cigarUnit =

48664866 CigarUnit

48674867 { _cuOperation = Nothing

48684868 , _cuOperationLength = Nothing

@@ -4908,10 +4908,10 @@ instance ToJSON CigarUnit where

49084908-- /See:/ 'alignReadGroupSetsRequest' smart constructor.

49094909data AlignReadGroupSetsRequest = AlignReadGroupSetsRequest

49104910 { _argsrInterleavedFastqSource :: !(Maybe InterleavedFastqSource)

4911− , _argsrReadGroupSetId :: !(Maybe Text)

4912− , _argsrBamSourceURIs :: !(Maybe [Text])

4913− , _argsrPairedFastqSource :: !(Maybe PairedFastqSource)

4914− , _argsrDatasetId :: !(Maybe Text)

4911+ , _argsrReadGroupSetId :: !(Maybe Text)

4912+ , _argsrBamSourceURIs :: !(Maybe [Text])

4913+ , _argsrPairedFastqSource :: !(Maybe PairedFastqSource)

4914+ , _argsrDatasetId :: !(Maybe Text)

49154915 } deriving (Eq,Show,Data,Typeable,Generic)

49164916

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

@@ -4929,7 +4929,7 @@ data AlignReadGroupSetsRequest = AlignReadGroupSetsRequest

49294929-- * 'argsrDatasetId'

49304930alignReadGroupSetsRequest

49314931 :: AlignReadGroupSetsRequest

4932−alignReadGroupSetsRequest =

4932+alignReadGroupSetsRequest =

49334933 AlignReadGroupSetsRequest

49344934 { _argsrInterleavedFastqSource = Nothing

49354935 , _argsrReadGroupSetId = Nothing

@@ -5010,10 +5010,10 @@ instance ToJSON AlignReadGroupSetsRequest where

50105010-- /See:/ 'exportVariantSetRequest' smart constructor.

50115011data ExportVariantSetRequest = ExportVariantSetRequest

50125012 { _evsrBigqueryDataset :: !(Maybe Text)

5013− , _evsrBigqueryTable :: !(Maybe Text)

5014− , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)

5015− , _evsrProjectNumber :: !(Maybe Int64)

5016− , _evsrCallSetIds :: !(Maybe [Text])

5013+ , _evsrBigqueryTable :: !(Maybe Text)

5014+ , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)

5015+ , _evsrProjectNumber :: !(Maybe Int64)

5016+ , _evsrCallSetIds :: !(Maybe [Text])

50175017 } deriving (Eq,Show,Data,Typeable,Generic)

50185018

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

@@ -5031,7 +5031,7 @@ data ExportVariantSetRequest = ExportVariantSetRequest

50315031-- * 'evsrCallSetIds'

50325032exportVariantSetRequest

50335033 :: ExportVariantSetRequest

5034−exportVariantSetRequest =

5034+exportVariantSetRequest =

50355035 ExportVariantSetRequest

50365036 { _evsrBigqueryDataset = Nothing

50375037 , _evsrBigqueryTable = Nothing

@@ -5111,7 +5111,7 @@ newtype ExportReadGroupSetsResponse = ExportReadGroupSetsResponse

51115111-- * 'ergsrJobId'

51125112exportReadGroupSetsResponse

51135113 :: ExportReadGroupSetsResponse

5114−exportReadGroupSetsResponse =

5114+exportReadGroupSetsResponse =

51155115 ExportReadGroupSetsResponse

51165116 { _ergsrJobId = Nothing

51175117 }

@@ -5134,10 +5134,10 @@ instance ToJSON ExportReadGroupSetsResponse where

51345134--

51355135-- /See:/ 'searchAnnotationsRequest' smart constructor.

51365136data SearchAnnotationsRequest = SearchAnnotationsRequest

5137− { _sarRange :: !(Maybe QueryRange)

5138− , _sarPageToken :: !(Maybe Text)

5137+ { _sarRange :: !(Maybe QueryRange)

5138+ , _sarPageToken :: !(Maybe Text)

51395139 , _sarAnnotationSetIds :: !(Maybe [Text])

5140− , _sarPageSize :: !(Maybe Int32)

5140+ , _sarPageSize :: !(Maybe Int32)

51415141 } deriving (Eq,Show,Data,Typeable,Generic)

51425142

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

@@ -5153,7 +5153,7 @@ data SearchAnnotationsRequest = SearchAnnotationsRequest

51535153-- * 'sarPageSize'

51545154searchAnnotationsRequest

51555155 :: SearchAnnotationsRequest

5156−searchAnnotationsRequest =

5156+searchAnnotationsRequest =

51575157 SearchAnnotationsRequest

51585158 { _sarRange = Nothing

51595159 , _sarPageToken = Nothing

@@ -5211,7 +5211,7 @@ instance ToJSON SearchAnnotationsRequest where

52115211--

52125212-- /See:/ 'metadataInfo' smart constructor.

52135213data MetadataInfo =

5214− MetadataInfo

5214+ MetadataInfo

52155215 deriving (Eq,Show,Data,Typeable,Generic)

52165216

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

@@ -5226,14 +5226,14 @@ instance FromJSON MetadataInfo where

52265226 (\ o -> pure MetadataInfo)

52275227

52285228instance ToJSON MetadataInfo where

5229− toJSON = const (Object mempty)

5229+ toJSON = const emptyObject

52305230

52315231-- | The search variant sets response.

52325232--

52335233-- /See:/ 'searchVariantSetsResponse' smart constructor.

52345234data SearchVariantSetsResponse = SearchVariantSetsResponse

52355235 { _svsrNextPageToken :: !(Maybe Text)

5236− , _svsrVariantSets :: !(Maybe [VariantSet])

5236+ , _svsrVariantSets :: !(Maybe [VariantSet])

52375237 } deriving (Eq,Show,Data,Typeable,Generic)

52385238

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

@@ -5245,7 +5245,7 @@ data SearchVariantSetsResponse = SearchVariantSetsResponse

52455245-- * 'svsrVariantSets'

52465246searchVariantSetsResponse

52475247 :: SearchVariantSetsResponse

5248−searchVariantSetsResponse =

5248+searchVariantSetsResponse =

52495249 SearchVariantSetsResponse

52505250 { _svsrNextPageToken = Nothing

52515251 , _svsrVariantSets = Nothing

@@ -5287,15 +5287,15 @@ instance ToJSON SearchVariantSetsResponse where

52875287--

52885288-- /See:/ 'searchVariantsRequest' smart constructor.

52895289data SearchVariantsRequest = SearchVariantsRequest

5290− { _svrStart :: !(Maybe Int64)

5291− , _svrCallSetIds :: !(Maybe [Text])

5290+ { _svrStart :: !(Maybe Int64)

5291+ , _svrCallSetIds :: !(Maybe [Text])

52925292 , _svrReferenceName :: !(Maybe Text)

5293− , _svrEnd :: !(Maybe Int64)

5294− , _svrMaxCalls :: !(Maybe Int32)

5295− , _svrPageToken :: !(Maybe Text)

5296− , _svrVariantName :: !(Maybe Text)

5293+ , _svrEnd :: !(Maybe Int64)

5294+ , _svrMaxCalls :: !(Maybe Int32)

5295+ , _svrPageToken :: !(Maybe Text)

5296+ , _svrVariantName :: !(Maybe Text)

52975297 , _svrVariantSetIds :: !(Maybe [Text])

5298− , _svrPageSize :: !(Maybe Int32)

5298+ , _svrPageSize :: !(Maybe Int32)

52995299 } deriving (Eq,Show,Data,Typeable,Generic)

53005300

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

@@ -5321,7 +5321,7 @@ data SearchVariantsRequest = SearchVariantsRequest

53215321-- * 'svrPageSize'

53225322searchVariantsRequest

53235323 :: SearchVariantsRequest

5324−searchVariantsRequest =

5324+searchVariantsRequest =

53255325 SearchVariantsRequest

53265326 { _svrStart = Nothing

53275327 , _svrCallSetIds = Nothing

@@ -5430,7 +5430,7 @@ instance ToJSON SearchVariantsRequest where

54305430--

54315431-- /See:/ 'annotationSetInfo' smart constructor.

54325432data AnnotationSetInfo =

5433− AnnotationSetInfo

5433+ AnnotationSetInfo

54345434 deriving (Eq,Show,Data,Typeable,Generic)

54355435

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

@@ -5445,16 +5445,16 @@ instance FromJSON AnnotationSetInfo where

54455445 (\ o -> pure AnnotationSetInfo)

54465446

54475447instance ToJSON AnnotationSetInfo where

5448− toJSON = const (Object mempty)

5448+ toJSON = const emptyObject

54495449

54505450-- |

54515451--

54525452-- /See:/ 'variantAnnotationCondition' smart constructor.

54535453data VariantAnnotationCondition = VariantAnnotationCondition

54545454 { _vacExternalIds :: !(Maybe [ExternalId])

5455− , _vacNames :: !(Maybe [Text])

5456− , _vacConceptId :: !(Maybe Text)

5457− , _vacOmimId :: !(Maybe Text)

5455+ , _vacNames :: !(Maybe [Text])

5456+ , _vacConceptId :: !(Maybe Text)

5457+ , _vacOmimId :: !(Maybe Text)

54585458 } deriving (Eq,Show,Data,Typeable,Generic)

54595459

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

@@ -5470,7 +5470,7 @@ data VariantAnnotationCondition = VariantAnnotationCondition

54705470-- * 'vacOmimId'

54715471variantAnnotationCondition

54725472 :: VariantAnnotationCondition

5473−variantAnnotationCondition =

5473+variantAnnotationCondition =

54745474 VariantAnnotationCondition

54755475 { _vacExternalIds = Nothing

54765476 , _vacNames = Nothing

@@ -5527,7 +5527,7 @@ instance ToJSON VariantAnnotationCondition where

55275527--

55285528-- /See:/ 'searchAnnotationSetsResponse' smart constructor.

55295529data SearchAnnotationSetsResponse = SearchAnnotationSetsResponse

5530− { _sasrNextPageToken :: !(Maybe Text)

5530+ { _sasrNextPageToken :: !(Maybe Text)

55315531 , _sasrAnnotationSets :: !(Maybe [AnnotationSet])

55325532 } deriving (Eq,Show,Data,Typeable,Generic)

55335533

@@ -5540,7 +5540,7 @@ data SearchAnnotationSetsResponse = SearchAnnotationSetsResponse

55405540-- * 'sasrAnnotationSets'

55415541searchAnnotationSetsResponse

55425542 :: SearchAnnotationSetsResponse

5543−searchAnnotationSetsResponse =

5543+searchAnnotationSetsResponse =

55445544 SearchAnnotationSetsResponse

55455545 { _sasrNextPageToken = Nothing

55465546 , _sasrAnnotationSets = Nothing

@@ -5582,7 +5582,7 @@ instance ToJSON SearchAnnotationSetsResponse where

55825582--

55835583-- /See:/ 'callSetInfo' smart constructor.

55845584data CallSetInfo =

5585− CallSetInfo

5585+ CallSetInfo

55865586 deriving (Eq,Show,Data,Typeable,Generic)

55875587

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

@@ -5596,18 +5596,18 @@ instance FromJSON CallSetInfo where

55965596 = withObject "CallSetInfo" (\ o -> pure CallSetInfo)

55975597

55985598instance ToJSON CallSetInfo where

5599− toJSON = const (Object mempty)

5599+ toJSON = const emptyObject

56005600

56015601-- | A 0-based half-open genomic coordinate range over a reference sequence,

56025602-- for representing the position of a genomic resource.

56035603--

56045604-- /See:/ 'rangePosition' smart constructor.

56055605data RangePosition = RangePosition

5606− { _rpStart :: !(Maybe Int64)

5606+ { _rpStart :: !(Maybe Int64)

56075607 , _rpReverseStrand :: !(Maybe Bool)

5608− , _rpReferenceId :: !(Maybe Text)

5608+ , _rpReferenceId :: !(Maybe Text)

56095609 , _rpReferenceName :: !(Maybe Text)

5610− , _rpEnd :: !(Maybe Int64)

5610+ , _rpEnd :: !(Maybe Int64)

56115611 } deriving (Eq,Show,Data,Typeable,Generic)

56125612

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

@@ -5625,7 +5625,7 @@ data RangePosition = RangePosition

56255625-- * 'rpEnd'

56265626rangePosition

56275627 :: RangePosition

5628−rangePosition =

5628+rangePosition =

56295629 RangePosition

56305630 { _rpStart = Nothing

56315631 , _rpReverseStrand = Nothing

@@ -5688,9 +5688,9 @@ instance ToJSON RangePosition where

56885688--

56895689-- /See:/ 'transcript' smart constructor.

56905690data Transcript = Transcript

5691− { _tGeneId :: !(Maybe Text)

5691+ { _tGeneId :: !(Maybe Text)

56925692 , _tCodingSequence :: !(Maybe TranscriptCodingSequence)

5693− , _tExons :: !(Maybe [TranscriptExon])

5693+ , _tExons :: !(Maybe [TranscriptExon])

56945694 } deriving (Eq,Show,Data,Typeable,Generic)

56955695

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

@@ -5704,7 +5704,7 @@ data Transcript = Transcript

57045704-- * 'tExons'

57055705transcript

57065706 :: Transcript

5707−transcript =

5707+transcript =

57085708 Transcript

57095709 { _tGeneId = Nothing

57105710 , _tCodingSequence = Nothing

@@ -5763,7 +5763,7 @@ instance ToJSON Transcript where

57635763-- /See:/ 'transcriptCodingSequence' smart constructor.

57645764data TranscriptCodingSequence = TranscriptCodingSequence

57655765 { _tcsStart :: !(Maybe Int64)

5766− , _tcsEnd :: !(Maybe Int64)

5766+ , _tcsEnd :: !(Maybe Int64)

57675767 } deriving (Eq,Show,Data,Typeable,Generic)

57685768

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

@@ -5775,7 +5775,7 @@ data TranscriptCodingSequence = TranscriptCodingSequence

57755775-- * 'tcsEnd'

57765776transcriptCodingSequence

57775777 :: TranscriptCodingSequence

5778−transcriptCodingSequence =

5778+transcriptCodingSequence =

57795779 TranscriptCodingSequence

57805780 { _tcsStart = Nothing

57815781 , _tcsEnd = Nothing

@@ -5811,7 +5811,7 @@ instance ToJSON TranscriptCodingSequence where

58115811-- /See:/ 'searchJobsResponse' smart constructor.

58125812data SearchJobsResponse = SearchJobsResponse

58135813 { _sjrNextPageToken :: !(Maybe Text)

5814− , _sjrJobs :: !(Maybe [Job])

5814+ , _sjrJobs :: !(Maybe [Job])

58155815 } deriving (Eq,Show,Data,Typeable,Generic)

58165816

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

@@ -5823,7 +5823,7 @@ data SearchJobsResponse = SearchJobsResponse

58235823-- * 'sjrJobs'

58245824searchJobsResponse

58255825 :: SearchJobsResponse

5826−searchJobsResponse =

5826+searchJobsResponse =

58275827 SearchJobsResponse

58285828 { _sjrNextPageToken = Nothing

58295829 , _sjrJobs = Nothing

@@ -5863,7 +5863,7 @@ instance ToJSON SearchJobsResponse where

58635863--

58645864-- /See:/ 'referenceBound' smart constructor.

58655865data ReferenceBound = ReferenceBound

5866− { _rbUpperBound :: !(Maybe Int64)

5866+ { _rbUpperBound :: !(Maybe Int64)

58675867 , _rbReferenceName :: !(Maybe Text)

58685868 } deriving (Eq,Show,Data,Typeable,Generic)

58695869

@@ -5876,7 +5876,7 @@ data ReferenceBound = ReferenceBound

58765876-- * 'rbReferenceName'

58775877referenceBound

58785878 :: ReferenceBound

5879−referenceBound =

5879+referenceBound =

58805880 ReferenceBound

58815881 { _rbUpperBound = Nothing

58825882 , _rbReferenceName = Nothing

@@ -5917,7 +5917,7 @@ instance ToJSON ReferenceBound where

59175917data Position = Position

59185918 { _pReverseStrand :: !(Maybe Bool)

59195919 , _pReferenceName :: !(Maybe Text)

5920− , _pPosition :: !(Maybe Int64)

5920+ , _pPosition :: !(Maybe Int64)

59215921 } deriving (Eq,Show,Data,Typeable,Generic)

59225922

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

@@ -5931,7 +5931,7 @@ data Position = Position

59315931-- * 'pPosition'

59325932position

59335933 :: Position

5934−position =

5934+position =

59355935 Position

59365936 { _pReverseStrand = Nothing

59375937 , _pReferenceName = Nothing

@@ -5990,7 +5990,7 @@ data SearchReadGroupSetsResponse = SearchReadGroupSetsResponse

59905990-- * 'srgsrReadGroupSets'

59915991searchReadGroupSetsResponse

59925992 :: SearchReadGroupSetsResponse

5993−searchReadGroupSetsResponse =

5993+searchReadGroupSetsResponse =

59945994 SearchReadGroupSetsResponse

59955995 { _srgsrNextPageToken = Nothing

59965996 , _srgsrReadGroupSets = Nothing

@@ -6032,7 +6032,7 @@ instance ToJSON SearchReadGroupSetsResponse where

60326032--

60336033-- /See:/ 'readGroupSetInfo' smart constructor.

60346034data ReadGroupSetInfo =

6035− ReadGroupSetInfo

6035+ ReadGroupSetInfo

60366036 deriving (Eq,Show,Data,Typeable,Generic)

60376037

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

@@ -6047,7 +6047,7 @@ instance FromJSON ReadGroupSetInfo where

60476047 (\ o -> pure ReadGroupSetInfo)

60486048

60496049instance ToJSON ReadGroupSetInfo where

6050− toJSON = const (Object mempty)

6050+ toJSON = const emptyObject

60516051

60526052-- | A reference set is a set of references which typically comprise a

60536053-- reference assembly for a species, such as GRCh38 which is representative

@@ -6058,13 +6058,13 @@ instance ToJSON ReadGroupSetInfo where

60586058-- /See:/ 'referenceSet' smart constructor.

60596059data ReferenceSet = ReferenceSet

60606060 { _rsSourceAccessions :: !(Maybe [Text])

6061− , _rsReferenceIds :: !(Maybe [Text])

6062− , _rsMD5checksum :: !(Maybe Text)

6063− , _rsNcbiTaxonId :: !(Maybe Int32)

6064− , _rsId :: !(Maybe Text)

6065− , _rsAssemblyId :: !(Maybe Text)

6066− , _rsSourceURI :: !(Maybe Text)

6067− , _rsDescription :: !(Maybe Text)

6061+ , _rsReferenceIds :: !(Maybe [Text])

6062+ , _rsMD5checksum :: !(Maybe Text)

6063+ , _rsNcbiTaxonId :: !(Maybe Int32)

6064+ , _rsId :: !(Maybe Text)

6065+ , _rsAssemblyId :: !(Maybe Text)

6066+ , _rsSourceURI :: !(Maybe Text)

6067+ , _rsDescription :: !(Maybe Text)

60686068 } deriving (Eq,Show,Data,Typeable,Generic)

60696069

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

@@ -6088,7 +6088,7 @@ data ReferenceSet = ReferenceSet

60886088-- * 'rsDescription'

60896089referenceSet

60906090 :: ReferenceSet

6091−referenceSet =

6091+referenceSet =

60926092 ReferenceSet

60936093 { _rsSourceAccessions = Nothing

60946094 , _rsReferenceIds = Nothing

gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+1−1

@@ -16,7 +16,7 @@

1616--

1717module Network.Google.Genomics.Types.Sum where

1818

19−import Network.Google.Prelude

19+import Network.Google.Prelude

2020

2121data SearchAnnotationSetsRequestTypesItem

2222 = SASRTIGene

gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Create.hs+9−9

@@ -43,8 +43,8 @@ module Network.Google.Resource.Genomics.AnnotationSets.Create

4343 , ascFields

4444 ) where

4545

46−import Network.Google.Genomics.Types

47−import Network.Google.Prelude

46+import Network.Google.Genomics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @GenomicsAnnotationSetsCreate@ which the

5050-- 'AnnotationSetsCreate'' request conforms to.

@@ -65,13 +65,13 @@ type AnnotationSetsCreateResource =

6565--

6666-- /See:/ 'annotationSetsCreate'' smart constructor.

6767data AnnotationSetsCreate' = AnnotationSetsCreate'

68− { _ascQuotaUser :: !(Maybe Text)

68+ { _ascQuotaUser :: !(Maybe Text)

6969 , _ascPrettyPrint :: !Bool

70− , _ascUserIP :: !(Maybe Text)

71− , _ascPayload :: !AnnotationSet

72− , _ascKey :: !(Maybe Key)

73− , _ascOAuthToken :: !(Maybe OAuthToken)

74− , _ascFields :: !(Maybe Text)

70+ , _ascUserIP :: !(Maybe Text)

71+ , _ascPayload :: !AnnotationSet

72+ , _ascKey :: !(Maybe Key)

73+ , _ascOAuthToken :: !(Maybe OAuthToken)

74+ , _ascFields :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

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

@@ -94,7 +94,7 @@ data AnnotationSetsCreate' = AnnotationSetsCreate'

9494annotationSetsCreate'

9595 :: AnnotationSet -- ^ 'payload'

9696 -> AnnotationSetsCreate'

97−annotationSetsCreate' pAscPayload_ =

97+annotationSetsCreate' pAscPayload_ =

9898 AnnotationSetsCreate'

9999 { _ascQuotaUser = Nothing

100100 , _ascPrettyPrint = True

gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Delete.hs+9−9

@@ -43,8 +43,8 @@ module Network.Google.Resource.Genomics.AnnotationSets.Delete

4343 , asdFields

4444 ) where

4545

46−import Network.Google.Genomics.Types

47−import Network.Google.Prelude

46+import Network.Google.Genomics.Types

47+import Network.Google.Prelude

4848

4949-- | A resource alias for @GenomicsAnnotationSetsDelete@ which the

5050-- 'AnnotationSetsDelete'' request conforms to.

@@ -64,13 +64,13 @@ type AnnotationSetsDeleteResource =

6464--

6565-- /See:/ 'annotationSetsDelete'' smart constructor.

6666data AnnotationSetsDelete' = AnnotationSetsDelete'

67− { _asdQuotaUser :: !(Maybe Text)

68− , _asdPrettyPrint :: !Bool

67+ { _asdQuotaUser :: !(Maybe Text)

68+ , _asdPrettyPrint :: !Bool

6969 , _asdAnnotationSetId :: !Text

70− , _asdUserIP :: !(Maybe Text)

71− , _asdKey :: !(Maybe Key)

72− , _asdOAuthToken :: !(Maybe OAuthToken)

73− , _asdFields :: !(Maybe Text)

70+ , _asdUserIP :: !(Maybe Text)

71+ , _asdKey :: !(Maybe Key)

72+ , _asdOAuthToken :: !(Maybe OAuthToken)

73+ , _asdFields :: !(Maybe Text)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

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

@@ -93,7 +93,7 @@ data AnnotationSetsDelete' = AnnotationSetsDelete'

9393annotationSetsDelete'

9494 :: Text -- ^ 'annotationSetId'

9595 -> AnnotationSetsDelete'

96−annotationSetsDelete' pAsdAnnotationSetId_ =

96+annotationSetsDelete' pAsdAnnotationSetId_ =

9797 AnnotationSetsDelete'

9898 { _asdQuotaUser = Nothing

9999 , _asdPrettyPrint = True

gogol-genomics/gen/Network/Google/Resource/Genomics/AnnotationSets/Get.hs+9−9