git.iko.soy/gogol

on develop help sign in

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

@@ -24,7 +24,7 @@ import Network.Google.Prelude

2424-- associated with a deal and\/or revision number.

2525--

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

27−data MarketplaceNote = MarketplaceNote

27+data MarketplaceNote = MarketplaceNote'

2828 { _mnNote :: !(Maybe Text)

2929 , _mnKind :: !Text

3030 , _mnTimestampMs :: !(Maybe (Textual Int64))

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

5757marketplaceNote

5858 :: MarketplaceNote

5959marketplaceNote =

60− MarketplaceNote

60+ MarketplaceNote'

6161 { _mnNote = Nothing

6262 , _mnKind = "adexchangebuyer#marketplaceNote"

6363 , _mnTimestampMs = Nothing

@@ -116,7 +116,7 @@ instance FromJSON MarketplaceNote where

116116 parseJSON

117117 = withObject "MarketplaceNote"

118118 (\ o ->

119− MarketplaceNote <$>

119+ MarketplaceNote' <$>

120120 (o .:? "note") <*>

121121 (o .:? "kind" .!= "adexchangebuyer#marketplaceNote")

122122 <*> (o .:? "timestampMs")

@@ -127,7 +127,7 @@ instance FromJSON MarketplaceNote where

127127 <*> (o .:? "creatorRole"))

128128

129129instance ToJSON MarketplaceNote where

130− toJSON MarketplaceNote{..}

130+ toJSON MarketplaceNote'{..}

131131 = object

132132 (catMaybes

133133 [("note" .=) <$> _mnNote, Just ("kind" .= _mnKind),

@@ -142,7 +142,7 @@ instance ToJSON MarketplaceNote where

142142-- | If nativeAd is set, HTMLSnippet and videoURL should not be set.

143143--

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

145−data CreativeNATiveAd = CreativeNATiveAd

145+data CreativeNATiveAd = CreativeNATiveAd'

146146 { _cnataImage :: !(Maybe CreativeNATiveAdImage)

147147 , _cnataAppIcon :: !(Maybe CreativeNATiveAdAppIcon)

148148 , _cnataClickTrackingURL :: !(Maybe Text)

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

187187creativeNATiveAd

188188 :: CreativeNATiveAd

189189creativeNATiveAd =

190− CreativeNATiveAd

190+ CreativeNATiveAd'

191191 { _cnataImage = Nothing

192192 , _cnataAppIcon = Nothing

193193 , _cnataClickTrackingURL = Nothing

@@ -274,7 +274,7 @@ instance FromJSON CreativeNATiveAd where

274274 parseJSON

275275 = withObject "CreativeNATiveAd"

276276 (\ o ->

277− CreativeNATiveAd <$>

277+ CreativeNATiveAd' <$>

278278 (o .:? "image") <*> (o .:? "appIcon") <*>

279279 (o .:? "clickTrackingUrl")

280280 <*> (o .:? "body")

@@ -288,7 +288,7 @@ instance FromJSON CreativeNATiveAd where

288288 <*> (o .:? "logo"))

289289

290290instance ToJSON CreativeNATiveAd where

291− toJSON CreativeNATiveAd{..}

291+ toJSON CreativeNATiveAd'{..}

292292 = object

293293 (catMaybes

294294 [("image" .=) <$> _cnataImage,

@@ -307,7 +307,7 @@ instance ToJSON CreativeNATiveAd where

307307

308308--

309309-- /See:/ 'editAllOrderDealsResponse' smart constructor.

310−newtype EditAllOrderDealsResponse = EditAllOrderDealsResponse

310+newtype EditAllOrderDealsResponse = EditAllOrderDealsResponse'

311311 { _eaodrDeals :: Maybe [MarketplaceDeal]

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

313313

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

319319editAllOrderDealsResponse

320320 :: EditAllOrderDealsResponse

321321editAllOrderDealsResponse =

322− EditAllOrderDealsResponse

322+ EditAllOrderDealsResponse'

323323 { _eaodrDeals = Nothing

324324 }

325325

@@ -334,11 +334,11 @@ instance FromJSON EditAllOrderDealsResponse where

334334 parseJSON

335335 = withObject "EditAllOrderDealsResponse"

336336 (\ o ->

337− EditAllOrderDealsResponse <$>

337+ EditAllOrderDealsResponse' <$>

338338 (o .:? "deals" .!= mempty))

339339

340340instance ToJSON EditAllOrderDealsResponse where

341− toJSON EditAllOrderDealsResponse{..}

341+ toJSON EditAllOrderDealsResponse'{..}

342342 = object (catMaybes [("deals" .=) <$> _eaodrDeals])

343343

344344-- | The creatives feed lists the active creatives for the Ad Exchange buyer

@@ -346,7 +346,7 @@ instance ToJSON EditAllOrderDealsResponse where

346346-- to a single creative.

347347--

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

349−data CreativesList = CreativesList

349+data CreativesList = CreativesList'

350350 { _clNextPageToken :: !(Maybe Text)

351351 , _clKind :: !Text

352352 , _clItems :: !(Maybe [Creative])

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

364364creativesList

365365 :: CreativesList

366366creativesList =

367− CreativesList

367+ CreativesList'

368368 { _clNextPageToken = Nothing

369369 , _clKind = "adexchangebuyer#creativesList"

370370 , _clItems = Nothing

@@ -391,13 +391,13 @@ instance FromJSON CreativesList where

391391 parseJSON

392392 = withObject "CreativesList"

393393 (\ o ->

394− CreativesList <$>

394+ CreativesList' <$>

395395 (o .:? "nextPageToken") <*>

396396 (o .:? "kind" .!= "adexchangebuyer#creativesList")

397397 <*> (o .:? "items" .!= mempty))

398398

399399instance ToJSON CreativesList where

400− toJSON CreativesList{..}

400+ toJSON CreativesList'{..}

401401 = object

402402 (catMaybes

403403 [("nextPageToken" .=) <$> _clNextPageToken,

@@ -405,7 +405,7 @@ instance ToJSON CreativesList where

405405

406406--

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

408−data CreativeServingRestrictionsItemContextsItem = CreativeServingRestrictionsItemContextsItem

408+data CreativeServingRestrictionsItemContextsItem = CreativeServingRestrictionsItemContextsItem'

409409 { _csriciPlatform :: !(Maybe [Text])

410410 , _csriciContextType :: !(Maybe Text)

411411 , _csriciAuctionType :: !(Maybe [Text])

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

426426creativeServingRestrictionsItemContextsItem

427427 :: CreativeServingRestrictionsItemContextsItem

428428creativeServingRestrictionsItemContextsItem =

429− CreativeServingRestrictionsItemContextsItem

429+ CreativeServingRestrictionsItemContextsItem'

430430 { _csriciPlatform = Nothing

431431 , _csriciContextType = Nothing

432432 , _csriciAuctionType = Nothing

@@ -472,7 +472,7 @@ instance FromJSON

472472 = withObject

473473 "CreativeServingRestrictionsItemContextsItem"

474474 (\ o ->

475− CreativeServingRestrictionsItemContextsItem <$>

475+ CreativeServingRestrictionsItemContextsItem' <$>

476476 (o .:? "platform" .!= mempty) <*>

477477 (o .:? "contextType")

478478 <*> (o .:? "auctionType" .!= mempty)

@@ -481,7 +481,7 @@ instance FromJSON

481481instance ToJSON

482482 CreativeServingRestrictionsItemContextsItem where

483483 toJSON

484− CreativeServingRestrictionsItemContextsItem{..}

484+ CreativeServingRestrictionsItemContextsItem'{..}

485485 = object

486486 (catMaybes

487487 [("platform" .=) <$> _csriciPlatform,

@@ -491,7 +491,7 @@ instance ToJSON

491491

492492--

493493-- /See:/ 'createOrdersResponse' smart constructor.

494−newtype CreateOrdersResponse = CreateOrdersResponse

494+newtype CreateOrdersResponse = CreateOrdersResponse'

495495 { _corProposals :: Maybe [Proposal]

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

497497

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

503503createOrdersResponse

504504 :: CreateOrdersResponse

505505createOrdersResponse =

506− CreateOrdersResponse

506+ CreateOrdersResponse'

507507 { _corProposals = Nothing

508508 }

509509

@@ -518,17 +518,17 @@ instance FromJSON CreateOrdersResponse where

518518 parseJSON

519519 = withObject "CreateOrdersResponse"

520520 (\ o ->

521− CreateOrdersResponse <$>

521+ CreateOrdersResponse' <$>

522522 (o .:? "proposals" .!= mempty))

523523

524524instance ToJSON CreateOrdersResponse where

525− toJSON CreateOrdersResponse{..}

525+ toJSON CreateOrdersResponse'{..}

526526 = object

527527 (catMaybes [("proposals" .=) <$> _corProposals])

528528

529529--

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

531−data AccountBidderLocationItem = AccountBidderLocationItem

531+data AccountBidderLocationItem = AccountBidderLocationItem'

532532 { _abliURL :: !(Maybe Text)

533533 , _abliMaximumQps :: !(Maybe (Textual Int32))

534534 , _abliRegion :: !(Maybe Text)

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

546546accountBidderLocationItem

547547 :: AccountBidderLocationItem

548548accountBidderLocationItem =

549− AccountBidderLocationItem

549+ AccountBidderLocationItem'

550550 { _abliURL = Nothing

551551 , _abliMaximumQps = Nothing

552552 , _abliRegion = Nothing

@@ -574,12 +574,12 @@ instance FromJSON AccountBidderLocationItem where

574574 parseJSON

575575 = withObject "AccountBidderLocationItem"

576576 (\ o ->

577− AccountBidderLocationItem <$>

577+ AccountBidderLocationItem' <$>

578578 (o .:? "url") <*> (o .:? "maximumQps") <*>

579579 (o .:? "region"))

580580

581581instance ToJSON AccountBidderLocationItem where

582− toJSON AccountBidderLocationItem{..}

582+ toJSON AccountBidderLocationItem'{..}

583583 = object

584584 (catMaybes

585585 [("url" .=) <$> _abliURL,

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

588588

589589--

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

591−data PrivateData = PrivateData

591+data PrivateData = PrivateData'

592592 { _pdReferencePayload :: !(Maybe (Textual Word8))

593593 , _pdReferenceId :: !(Maybe Text)

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

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

603603privateData

604604 :: PrivateData

605605privateData =

606− PrivateData

606+ PrivateData'

607607 { _pdReferencePayload = Nothing

608608 , _pdReferenceId = Nothing

609609 }

@@ -623,11 +623,11 @@ instance FromJSON PrivateData where

623623 parseJSON

624624 = withObject "PrivateData"

625625 (\ o ->

626− PrivateData <$>

626+ PrivateData' <$>

627627 (o .:? "referencePayload") <*> (o .:? "referenceId"))

628628

629629instance ToJSON PrivateData where

630− toJSON PrivateData{..}

630+ toJSON PrivateData'{..}

631631 = object

632632 (catMaybes

633633 [("referencePayload" .=) <$> _pdReferencePayload,

@@ -636,7 +636,7 @@ instance ToJSON PrivateData where

636636-- | The configuration data for Ad Exchange RTB - Budget API.

637637--

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

639−data Budget = Budget

639+data Budget = Budget'

640640 { _bCurrencyCode :: !(Maybe Text)

641641 , _bKind :: !Text

642642 , _bBudgetAmount :: !(Maybe (Textual Int64))

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

663663budget

664664 :: Budget

665665budget =

666− Budget

666+ Budget'

667667 { _bCurrencyCode = Nothing

668668 , _bKind = "adexchangebuyer#budget"

669669 , _bBudgetAmount = Nothing

@@ -711,7 +711,7 @@ instance FromJSON Budget where

711711 parseJSON

712712 = withObject "Budget"

713713 (\ o ->

714− Budget <$>

714+ Budget' <$>

715715 (o .:? "currencyCode") <*>

716716 (o .:? "kind" .!= "adexchangebuyer#budget")

717717 <*> (o .:? "budgetAmount")

@@ -720,7 +720,7 @@ instance FromJSON Budget where

720720 <*> (o .:? "billingId"))

721721

722722instance ToJSON Budget where

723− toJSON Budget{..}

723+ toJSON Budget'{..}

724724 = object

725725 (catMaybes

726726 [("currencyCode" .=) <$> _bCurrencyCode,

@@ -731,7 +731,7 @@ instance ToJSON Budget where

731731

732732--

733733-- /See:/ 'addOrderNotesRequest' smart constructor.

734−newtype AddOrderNotesRequest = AddOrderNotesRequest

734+newtype AddOrderNotesRequest = AddOrderNotesRequest'

735735 { _aonrNotes :: Maybe [MarketplaceNote]

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

737737

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

743743addOrderNotesRequest

744744 :: AddOrderNotesRequest

745745addOrderNotesRequest =

746− AddOrderNotesRequest

746+ AddOrderNotesRequest'

747747 { _aonrNotes = Nothing

748748 }

749749

@@ -758,15 +758,15 @@ instance FromJSON AddOrderNotesRequest where

758758 parseJSON

759759 = withObject "AddOrderNotesRequest"

760760 (\ o ->

761− AddOrderNotesRequest <$> (o .:? "notes" .!= mempty))

761+ AddOrderNotesRequest' <$> (o .:? "notes" .!= mempty))

762762

763763instance ToJSON AddOrderNotesRequest where

764− toJSON AddOrderNotesRequest{..}

764+ toJSON AddOrderNotesRequest'{..}

765765 = object (catMaybes [("notes" .=) <$> _aonrNotes])

766766

767767--

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

769−data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap

769+data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap'

770770 { _dcfcMaxImpressions :: !(Maybe (Textual Int32))

771771 , _dcfcNumTimeUnits :: !(Maybe (Textual Int32))

772772 , _dcfcTimeUnitType :: !(Maybe Text)

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

784784deliveryControlFrequencyCap

785785 :: DeliveryControlFrequencyCap

786786deliveryControlFrequencyCap =

787− DeliveryControlFrequencyCap

787+ DeliveryControlFrequencyCap'

788788 { _dcfcMaxImpressions = Nothing

789789 , _dcfcNumTimeUnits = Nothing

790790 , _dcfcTimeUnitType = Nothing

@@ -811,12 +811,12 @@ instance FromJSON DeliveryControlFrequencyCap where

811811 parseJSON

812812 = withObject "DeliveryControlFrequencyCap"

813813 (\ o ->

814− DeliveryControlFrequencyCap <$>

814+ DeliveryControlFrequencyCap' <$>

815815 (o .:? "maxImpressions") <*> (o .:? "numTimeUnits")

816816 <*> (o .:? "timeUnitType"))

817817

818818instance ToJSON DeliveryControlFrequencyCap where

819− toJSON DeliveryControlFrequencyCap{..}

819+ toJSON DeliveryControlFrequencyCap'{..}

820820 = object

821821 (catMaybes

822822 [("maxImpressions" .=) <$> _dcfcMaxImpressions,

@@ -825,7 +825,7 @@ instance ToJSON DeliveryControlFrequencyCap where

825825

826826--

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

828−data MarketplaceDealParty = MarketplaceDealParty

828+data MarketplaceDealParty = MarketplaceDealParty'

829829 { _mdpSeller :: !(Maybe Seller)

830830 , _mdpBuyer :: !(Maybe Buyer)

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

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

840840marketplaceDealParty

841841 :: MarketplaceDealParty

842842marketplaceDealParty =

843− MarketplaceDealParty

843+ MarketplaceDealParty'

844844 { _mdpSeller = Nothing

845845 , _mdpBuyer = Nothing

846846 }

@@ -860,11 +860,11 @@ instance FromJSON MarketplaceDealParty where

860860 parseJSON

861861 = withObject "MarketplaceDealParty"

862862 (\ o ->

863− MarketplaceDealParty <$>

863+ MarketplaceDealParty' <$>

864864 (o .:? "seller") <*> (o .:? "buyer"))

865865

866866instance ToJSON MarketplaceDealParty where

867− toJSON MarketplaceDealParty{..}

867+ toJSON MarketplaceDealParty'{..}

868868 = object

869869 (catMaybes

870870 [("seller" .=) <$> _mdpSeller,

@@ -872,7 +872,7 @@ instance ToJSON MarketplaceDealParty where

872872

873873--

874874-- /See:/ 'getOrderNotesResponse' smart constructor.

875−newtype GetOrderNotesResponse = GetOrderNotesResponse

875+newtype GetOrderNotesResponse = GetOrderNotesResponse'

876876 { _gonrNotes :: Maybe [MarketplaceNote]

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

878878

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

884884getOrderNotesResponse

885885 :: GetOrderNotesResponse

886886getOrderNotesResponse =

887− GetOrderNotesResponse

887+ GetOrderNotesResponse'

888888 { _gonrNotes = Nothing

889889 }

890890

@@ -899,15 +899,16 @@ instance FromJSON GetOrderNotesResponse where

899899 parseJSON

900900 = withObject "GetOrderNotesResponse"

901901 (\ o ->

902− GetOrderNotesResponse <$> (o .:? "notes" .!= mempty))

902+ GetOrderNotesResponse' <$>

903+ (o .:? "notes" .!= mempty))

903904

904905instance ToJSON GetOrderNotesResponse where

905− toJSON GetOrderNotesResponse{..}

906+ toJSON GetOrderNotesResponse'{..}

906907 = object (catMaybes [("notes" .=) <$> _gonrNotes])

907908

908909--

909910-- /See:/ 'getOrdersResponse' smart constructor.

910−newtype GetOrdersResponse = GetOrdersResponse

911+newtype GetOrdersResponse = GetOrdersResponse'

911912 { _gorProposals :: Maybe [Proposal]

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

913914

@@ -919,7 +920,7 @@ newtype GetOrdersResponse = GetOrdersResponse

919920getOrdersResponse

920921 :: GetOrdersResponse

921922getOrdersResponse =

922− GetOrdersResponse

923+ GetOrdersResponse'

923924 { _gorProposals = Nothing

924925 }

925926

@@ -934,16 +935,17 @@ instance FromJSON GetOrdersResponse where

934935 parseJSON

935936 = withObject "GetOrdersResponse"

936937 (\ o ->

937− GetOrdersResponse <$> (o .:? "proposals" .!= mempty))

938+ GetOrdersResponse' <$>

939+ (o .:? "proposals" .!= mempty))

938940

939941instance ToJSON GetOrdersResponse where

940− toJSON GetOrdersResponse{..}

942+ toJSON GetOrdersResponse'{..}

941943 = object

942944 (catMaybes [("proposals" .=) <$> _gorProposals])

943945

944946--

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

946−data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRestrictionsItemDisApprovalReasonsItem

948+data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRestrictionsItemDisApprovalReasonsItem'

947949 { _csridariReason :: !(Maybe Text)

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

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

@@ -958,7 +960,7 @@ data CreativeServingRestrictionsItemDisApprovalReasonsItem = CreativeServingRest

958960creativeServingRestrictionsItemDisApprovalReasonsItem

959961 :: CreativeServingRestrictionsItemDisApprovalReasonsItem

960962creativeServingRestrictionsItemDisApprovalReasonsItem =

961− CreativeServingRestrictionsItemDisApprovalReasonsItem

963+ CreativeServingRestrictionsItemDisApprovalReasonsItem'

962964 { _csridariReason = Nothing

963965 , _csridariDetails = Nothing

964966 }

@@ -984,7 +986,7 @@ instance FromJSON

984986 = withObject

985987 "CreativeServingRestrictionsItemDisApprovalReasonsItem"

986988 (\ o ->

987− CreativeServingRestrictionsItemDisApprovalReasonsItem

989+ CreativeServingRestrictionsItemDisApprovalReasonsItem'

988990 <$>

989991 (o .:? "reason") <*> (o .:? "details" .!= mempty))

990992

@@ -992,7 +994,7 @@ instance ToJSON

992994 CreativeServingRestrictionsItemDisApprovalReasonsItem

993995 where

994996 toJSON

995− CreativeServingRestrictionsItemDisApprovalReasonsItem{..}

997+ CreativeServingRestrictionsItemDisApprovalReasonsItem'{..}

996998 = object

997999 (catMaybes

9981000 [("reason" .=) <$> _csridariReason,

@@ -1002,7 +1004,7 @@ instance ToJSON

10021004-- access to. Each entry in the feed corresponds to a single buyer account.

10031005--

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

1005−data AccountsList = AccountsList

1007+data AccountsList = AccountsList'

10061008 { _alKind :: !Text

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

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

@@ -1017,7 +1019,7 @@ data AccountsList = AccountsList

10171019accountsList

10181020 :: AccountsList

10191021accountsList =

1020− AccountsList

1022+ AccountsList'

10211023 { _alKind = "adexchangebuyer#accountsList"

10221024 , _alItems = Nothing

10231025 }

@@ -1036,12 +1038,12 @@ instance FromJSON AccountsList where

10361038 parseJSON

10371039 = withObject "AccountsList"

10381040 (\ o ->

1039− AccountsList <$>

1041+ AccountsList' <$>

10401042 (o .:? "kind" .!= "adexchangebuyer#accountsList") <*>

10411043 (o .:? "items" .!= mempty))

10421044

10431045instance ToJSON AccountsList where

1044− toJSON AccountsList{..}

1046+ toJSON AccountsList'{..}

10451047 = object

10461048 (catMaybes

10471049 [Just ("kind" .= _alKind),

@@ -1049,7 +1051,7 @@ instance ToJSON AccountsList where

10491051

10501052--

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

1052−data CreateOrdersRequest = CreateOrdersRequest

1054+data CreateOrdersRequest = CreateOrdersRequest'

10531055 { _cProposals :: !(Maybe [Proposal])

10541056 , _cWebPropertyCode :: !(Maybe Text)

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

@@ -1064,7 +1066,7 @@ data CreateOrdersRequest = CreateOrdersRequest

10641066createOrdersRequest

10651067 :: CreateOrdersRequest

10661068createOrdersRequest =

1067− CreateOrdersRequest

1069+ CreateOrdersRequest'

10681070 { _cProposals = Nothing

10691071 , _cWebPropertyCode = Nothing

10701072 }

@@ -1085,12 +1087,12 @@ instance FromJSON CreateOrdersRequest where

10851087 parseJSON

10861088 = withObject "CreateOrdersRequest"

10871089 (\ o ->

1088− CreateOrdersRequest <$>

1090+ CreateOrdersRequest' <$>

10891091 (o .:? "proposals" .!= mempty) <*>

10901092 (o .:? "webPropertyCode"))

10911093

10921094instance ToJSON CreateOrdersRequest where

1093− toJSON CreateOrdersRequest{..}

1095+ toJSON CreateOrdersRequest'{..}

10941096 = object

10951097 (catMaybes

10961098 [("proposals" .=) <$> _cProposals,

@@ -1098,7 +1100,7 @@ instance ToJSON CreateOrdersRequest where

10981100

10991101--

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

1101−data CreativeCorrectionsItem = CreativeCorrectionsItem

1103+data CreativeCorrectionsItem = CreativeCorrectionsItem'

11021104 { _cciReason :: !(Maybe Text)

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

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

@@ -1113,7 +1115,7 @@ data CreativeCorrectionsItem = CreativeCorrectionsItem

11131115creativeCorrectionsItem

11141116 :: CreativeCorrectionsItem

11151117creativeCorrectionsItem =

1116− CreativeCorrectionsItem

1118+ CreativeCorrectionsItem'

11171119 { _cciReason = Nothing

11181120 , _cciDetails = Nothing

11191121 }

@@ -1134,11 +1136,11 @@ instance FromJSON CreativeCorrectionsItem where

11341136 parseJSON

11351137 = withObject "CreativeCorrectionsItem"

11361138 (\ o ->

1137− CreativeCorrectionsItem <$>

1139+ CreativeCorrectionsItem' <$>

11381140 (o .:? "reason") <*> (o .:? "details" .!= mempty))

11391141

11401142instance ToJSON CreativeCorrectionsItem where

1141− toJSON CreativeCorrectionsItem{..}

1143+ toJSON CreativeCorrectionsItem'{..}

11421144 = object

11431145 (catMaybes

11441146 [("reason" .=) <$> _cciReason,

@@ -1146,7 +1148,7 @@ instance ToJSON CreativeCorrectionsItem where

11461148

11471149--

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

1149−data AddOrderDealsResponse = AddOrderDealsResponse

1151+data AddOrderDealsResponse = AddOrderDealsResponse'

11501152 { _aodrDeals :: !(Maybe [MarketplaceDeal])

11511153 , _aodrProposalRevisionNumber :: !(Maybe (Textual Int64))

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

@@ -1161,7 +1163,7 @@ data AddOrderDealsResponse = AddOrderDealsResponse

11611163addOrderDealsResponse

11621164 :: AddOrderDealsResponse

11631165addOrderDealsResponse =

1164− AddOrderDealsResponse

1166+ AddOrderDealsResponse'

11651167 { _aodrDeals = Nothing

11661168 , _aodrProposalRevisionNumber = Nothing

11671169 }

@@ -1184,12 +1186,12 @@ instance FromJSON AddOrderDealsResponse where

11841186 parseJSON

11851187 = withObject "AddOrderDealsResponse"

11861188 (\ o ->

1187− AddOrderDealsResponse <$>

1189+ AddOrderDealsResponse' <$>

11881190 (o .:? "deals" .!= mempty) <*>

11891191 (o .:? "proposalRevisionNumber"))

11901192

11911193instance ToJSON AddOrderDealsResponse where

1192− toJSON AddOrderDealsResponse{..}

1194+ toJSON AddOrderDealsResponse'{..}

11931195 = object

11941196 (catMaybes

11951197 [("deals" .=) <$> _aodrDeals,

@@ -1198,7 +1200,7 @@ instance ToJSON AddOrderDealsResponse where

11981200

11991201--

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

1201−data DeliveryControl = DeliveryControl

1203+data DeliveryControl = DeliveryControl'

12021204 { _dcCreativeBlockingLevel :: !(Maybe Text)

12031205 , _dcFrequencyCaps :: !(Maybe [DeliveryControlFrequencyCap])

12041206 , _dcDeliveryRateType :: !(Maybe Text)

@@ -1216,7 +1218,7 @@ data DeliveryControl = DeliveryControl

12161218deliveryControl

12171219 :: DeliveryControl

12181220deliveryControl =

1219− DeliveryControl

1221+ DeliveryControl'

12201222 { _dcCreativeBlockingLevel = Nothing

12211223 , _dcFrequencyCaps = Nothing

12221224 , _dcDeliveryRateType = Nothing

@@ -1243,13 +1245,13 @@ instance FromJSON DeliveryControl where

12431245 parseJSON

12441246 = withObject "DeliveryControl"

12451247 (\ o ->

1246− DeliveryControl <$>

1248+ DeliveryControl' <$>

12471249 (o .:? "creativeBlockingLevel") <*>

12481250 (o .:? "frequencyCaps" .!= mempty)

12491251 <*> (o .:? "deliveryRateType"))

12501252

12511253instance ToJSON DeliveryControl where

1252− toJSON DeliveryControl{..}

1254+ toJSON DeliveryControl'{..}

12531255 = object

12541256 (catMaybes

12551257 [("creativeBlockingLevel" .=) <$>

@@ -1266,7 +1268,7 @@ instance ToJSON DeliveryControl where

12661268-- buyer is set.

12671269--

12681270-- /See:/ 'pricePerBuyer' smart constructor.

1269−data PricePerBuyer = PricePerBuyer

1271+data PricePerBuyer = PricePerBuyer'

12701272 { _ppbPrice :: !(Maybe Price)

12711273 , _ppbBuyer :: !(Maybe Buyer)

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

@@ -1281,7 +1283,7 @@ data PricePerBuyer = PricePerBuyer

12811283pricePerBuyer

12821284 :: PricePerBuyer

12831285pricePerBuyer =

1284− PricePerBuyer

1286+ PricePerBuyer'

12851287 { _ppbPrice = Nothing

12861288 , _ppbBuyer = Nothing

12871289 }

@@ -1300,11 +1302,11 @@ instance FromJSON PricePerBuyer where

13001302 parseJSON

13011303 = withObject "PricePerBuyer"

13021304 (\ o ->

1303− PricePerBuyer <$>

1305+ PricePerBuyer' <$>

13041306 (o .:? "price") <*> (o .:? "buyer"))

13051307

13061308instance ToJSON PricePerBuyer where

1307− toJSON PricePerBuyer{..}

1309+ toJSON PricePerBuyer'{..}

13081310 = object

13091311 (catMaybes

13101312 [("price" .=) <$> _ppbPrice,

@@ -1313,7 +1315,7 @@ instance ToJSON PricePerBuyer where

13131315-- | A creative and its classification data.

13141316--

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

1316−data Creative = Creative

1318+data Creative = Creative'

13171319 { _cAttribute :: !(Maybe [Textual Int32])

13181320 , _cNATiveAd :: !(Maybe CreativeNATiveAd)

13191321 , _cHeight :: !(Maybe (Textual Int32))

@@ -1397,7 +1399,7 @@ data Creative = Creative

13971399creative

13981400 :: Creative

13991401creative =

1400− Creative

1402+ Creative'

14011403 { _cAttribute = Nothing

14021404 , _cNATiveAd = Nothing

14031405 , _cHeight = Nothing

@@ -1612,7 +1614,7 @@ instance FromJSON Creative where

16121614 parseJSON

16131615 = withObject "Creative"

16141616 (\ o ->

1615− Creative <$>

1617+ Creative' <$>

16161618 (o .:? "attribute" .!= mempty) <*> (o .:? "nativeAd")

16171619 <*> (o .:? "height")

16181620 <*> (o .:? "buyerCreativeId")

@@ -1639,7 +1641,7 @@ instance FromJSON Creative where

16391641 <*> (o .:? "openAuctionStatus"))

16401642

16411643instance ToJSON Creative where

1642− toJSON Creative{..}

1644+ toJSON Creative'{..}

16431645 = object

16441646 (catMaybes

16451647 [("attribute" .=) <$> _cAttribute,

@@ -1672,7 +1674,7 @@ instance ToJSON Creative where

16721674

16731675--

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

1675−data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart

1677+data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart'

16761678 { _tvdptdpEndHour :: !(Maybe (Textual Int32))

16771679 , _tvdptdpStartHour :: !(Maybe (Textual Int32))

16781680 , _tvdptdpStartMinute :: !(Maybe (Textual Int32))

@@ -1696,7 +1698,7 @@ data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPa

16961698targetingValueDayPartTargetingDayPart

16971699 :: TargetingValueDayPartTargetingDayPart

16981700targetingValueDayPartTargetingDayPart =

1699− TargetingValueDayPartTargetingDayPart

1701+ TargetingValueDayPartTargetingDayPart'

17001702 { _tvdptdpEndHour = Nothing

17011703 , _tvdptdpStartHour = Nothing

17021704 , _tvdptdpStartMinute = Nothing

@@ -1738,7 +1740,7 @@ instance FromJSON

17381740 parseJSON

17391741 = withObject "TargetingValueDayPartTargetingDayPart"

17401742 (\ o ->

1741− TargetingValueDayPartTargetingDayPart <$>

1743+ TargetingValueDayPartTargetingDayPart' <$>

17421744 (o .:? "endHour") <*> (o .:? "startHour") <*>

17431745 (o .:? "startMinute")

17441746 <*> (o .:? "dayOfWeek")

@@ -1746,7 +1748,7 @@ instance FromJSON

17461748

17471749instance ToJSON TargetingValueDayPartTargetingDayPart

17481750 where

1749− toJSON TargetingValueDayPartTargetingDayPart{..}

1751+ toJSON TargetingValueDayPartTargetingDayPart'{..}

17501752 = object

17511753 (catMaybes

17521754 [("endHour" .=) <$> _tvdptdpEndHour,

@@ -1757,7 +1759,7 @@ instance ToJSON TargetingValueDayPartTargetingDayPart

17571759

17581760--

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

1760−data PretargetingConfigList = PretargetingConfigList

1762+data PretargetingConfigList = PretargetingConfigList'

17611763 { _pclKind :: !Text

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

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

@@ -1772,7 +1774,7 @@ data PretargetingConfigList = PretargetingConfigList

17721774pretargetingConfigList

17731775 :: PretargetingConfigList

17741776pretargetingConfigList =

1775− PretargetingConfigList

1777+ PretargetingConfigList'

17761778 { _pclKind = "adexchangebuyer#pretargetingConfigList"

17771779 , _pclItems = Nothing

17781780 }

@@ -1792,13 +1794,13 @@ instance FromJSON PretargetingConfigList where

17921794 parseJSON

17931795 = withObject "PretargetingConfigList"

17941796 (\ o ->

1795− PretargetingConfigList <$>

1797+ PretargetingConfigList' <$>

17961798 (o .:? "kind" .!=

17971799 "adexchangebuyer#pretargetingConfigList")

17981800 <*> (o .:? "items" .!= mempty))

17991801

18001802instance ToJSON PretargetingConfigList where

1801− toJSON PretargetingConfigList{..}

1803+ toJSON PretargetingConfigList'{..}

18021804 = object

18031805 (catMaybes

18041806 [Just ("kind" .= _pclKind),

@@ -1806,7 +1808,7 @@ instance ToJSON PretargetingConfigList where

18061808

18071809--

18081810-- /See:/ 'dealTermsNonGuaranteedFixedPriceTerms' smart constructor.

1809−newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPriceTerms

1811+newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPriceTerms'

18101812 { _dtngfptFixedPrices :: Maybe [PricePerBuyer]

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

18121814

@@ -1818,7 +1820,7 @@ newtype DealTermsNonGuaranteedFixedPriceTerms = DealTermsNonGuaranteedFixedPrice

18181820dealTermsNonGuaranteedFixedPriceTerms

18191821 :: DealTermsNonGuaranteedFixedPriceTerms

18201822dealTermsNonGuaranteedFixedPriceTerms =

1821− DealTermsNonGuaranteedFixedPriceTerms

1823+ DealTermsNonGuaranteedFixedPriceTerms'

18221824 { _dtngfptFixedPrices = Nothing

18231825 }

18241826

@@ -1835,12 +1837,12 @@ instance FromJSON

18351837 parseJSON

18361838 = withObject "DealTermsNonGuaranteedFixedPriceTerms"

18371839 (\ o ->

1838− DealTermsNonGuaranteedFixedPriceTerms <$>

1840+ DealTermsNonGuaranteedFixedPriceTerms' <$>

18391841 (o .:? "fixedPrices" .!= mempty))

18401842

18411843instance ToJSON DealTermsNonGuaranteedFixedPriceTerms

18421844 where

1843− toJSON DealTermsNonGuaranteedFixedPriceTerms{..}

1845+ toJSON DealTermsNonGuaranteedFixedPriceTerms'{..}

18441846 = object

18451847 (catMaybes

18461848 [("fixedPrices" .=) <$> _dtngfptFixedPrices])

@@ -1848,7 +1850,7 @@ instance ToJSON DealTermsNonGuaranteedFixedPriceTerms

18481850-- | The configuration data for an Ad Exchange performance report list.

18491851--

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

1851−data PerformanceReport = PerformanceReport

1853+data PerformanceReport = PerformanceReport'

18521854 { _prFilteredBidRate :: !(Maybe (Textual Double))

18531855 , _prKind :: !Text

18541856 , _prLatency95thPercentile :: !(Maybe (Textual Double))

@@ -1923,7 +1925,7 @@ data PerformanceReport = PerformanceReport

19231925performanceReport

19241926 :: PerformanceReport

19251927performanceReport =

1926− PerformanceReport

1928+ PerformanceReport'

19271929 { _prFilteredBidRate = Nothing

19281930 , _prKind = "adexchangebuyer#performanceReport"

19291931 , _prLatency95thPercentile = Nothing

@@ -2109,7 +2111,7 @@ instance FromJSON PerformanceReport where

21092111 parseJSON

21102112 = withObject "PerformanceReport"

21112113 (\ o ->

2112− PerformanceReport <$>

2114+ PerformanceReport' <$>

21132115 (o .:? "filteredBidRate") <*>

21142116 (o .:? "kind" .!=

21152117 "adexchangebuyer#performanceReport")

@@ -2135,7 +2137,7 @@ instance FromJSON PerformanceReport where

21352137 <*> (o .:? "outOfQuota"))

21362138

21372139instance ToJSON PerformanceReport where

2138− toJSON PerformanceReport{..}

2140+ toJSON PerformanceReport'{..}

21392141 = object

21402142 (catMaybes

21412143 [("filteredBidRate" .=) <$> _prFilteredBidRate,

@@ -2173,7 +2175,7 @@ instance ToJSON PerformanceReport where

21732175

21742176--

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

2176−data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacementsItem

2178+data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacementsItem'

21772179 { _pcepiToken :: !(Maybe Text)

21782180 , _pcepiType :: !(Maybe Text)

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

@@ -2188,7 +2190,7 @@ data PretargetingConfigExcludedPlacementsItem = PretargetingConfigExcludedPlacem

21882190pretargetingConfigExcludedPlacementsItem

21892191 :: PretargetingConfigExcludedPlacementsItem

21902192pretargetingConfigExcludedPlacementsItem =

2191− PretargetingConfigExcludedPlacementsItem

2193+ PretargetingConfigExcludedPlacementsItem'

21922194 { _pcepiToken = Nothing

21932195 , _pcepiType = Nothing

21942196 }

@@ -2211,12 +2213,12 @@ instance FromJSON

22112213 = withObject

22122214 "PretargetingConfigExcludedPlacementsItem"

22132215 (\ o ->

2214− PretargetingConfigExcludedPlacementsItem <$>

2216+ PretargetingConfigExcludedPlacementsItem' <$>

22152217 (o .:? "token") <*> (o .:? "type"))

22162218

22172219instance ToJSON

22182220 PretargetingConfigExcludedPlacementsItem where

2219− toJSON PretargetingConfigExcludedPlacementsItem{..}

2221+ toJSON PretargetingConfigExcludedPlacementsItem'{..}

22202222 = object

22212223 (catMaybes

22222224 [("token" .=) <$> _pcepiToken,

@@ -2224,7 +2226,7 @@ instance ToJSON

22242226

22252227--

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

2227−data Seller = Seller

2229+data Seller = Seller'

22282230 { _sAccountId :: !(Maybe Text)

22292231 , _sSubAccountId :: !(Maybe Text)

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

@@ -2239,7 +2241,7 @@ data Seller = Seller

22392241seller

22402242 :: Seller

22412243seller =

2242− Seller

2244+ Seller'

22432245 { _sAccountId = Nothing

22442246 , _sSubAccountId = Nothing

22452247 }

@@ -2260,11 +2262,11 @@ instance FromJSON Seller where

22602262 parseJSON

22612263 = withObject "Seller"

22622264 (\ o ->

2263− Seller <$>

2265+ Seller' <$>

22642266 (o .:? "accountId") <*> (o .:? "subAccountId"))

22652267

22662268instance ToJSON Seller where

2267− toJSON Seller{..}

2269+ toJSON Seller'{..}

22682270 = object

22692271 (catMaybes

22702272 [("accountId" .=) <$> _sAccountId,

@@ -2273,7 +2275,7 @@ instance ToJSON Seller where

22732275-- | Configuration data for an Ad Exchange buyer account.

22742276--

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

2276−data Account = Account

2278+data Account = Account'

22772279 { _aMaximumTotalQps :: !(Maybe (Textual Int32))

22782280 , _aKind :: !Text

22792281 , _aCookieMatchingURL :: !(Maybe Text)

@@ -2306,7 +2308,7 @@ data Account = Account

23062308account

23072309 :: Account

23082310account =

2309− Account

2311+ Account'

23102312 { _aMaximumTotalQps = Nothing

23112313 , _aKind = "adexchangebuyer#account"

23122314 , _aCookieMatchingURL = Nothing

@@ -2378,7 +2380,7 @@ instance FromJSON Account where

23782380 parseJSON

23792381 = withObject "Account"

23802382 (\ o ->

2381− Account <$>

2383+ Account' <$>

23822384 (o .:? "maximumTotalQps") <*>

23832385 (o .:? "kind" .!= "adexchangebuyer#account")

23842386 <*> (o .:? "cookieMatchingUrl")

@@ -2389,7 +2391,7 @@ instance FromJSON Account where

23892391 <*> (o .:? "bidderLocation" .!= mempty))

23902392

23912393instance ToJSON Account where

2392− toJSON Account{..}

2394+ toJSON Account'{..}

23932395 = object

23942396 (catMaybes

23952397 [("maximumTotalQps" .=) <$> _aMaximumTotalQps,

@@ -2405,7 +2407,7 @@ instance ToJSON Account where

24052407

24062408--

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

2408−data DeleteOrderDealsRequest = DeleteOrderDealsRequest

2410+data DeleteOrderDealsRequest = DeleteOrderDealsRequest'

24092411 { _dodrUpdateAction :: !(Maybe Text)

24102412 , _dodrDealIds :: !(Maybe [Text])

24112413 , _dodrProposalRevisionNumber :: !(Maybe (Textual Int64))

@@ -2423,7 +2425,7 @@ data DeleteOrderDealsRequest = DeleteOrderDealsRequest

24232425deleteOrderDealsRequest

24242426 :: DeleteOrderDealsRequest

24252427deleteOrderDealsRequest =

2426− DeleteOrderDealsRequest

2428+ DeleteOrderDealsRequest'

24272429 { _dodrUpdateAction = Nothing

24282430 , _dodrDealIds = Nothing

24292431 , _dodrProposalRevisionNumber = Nothing

@@ -2452,13 +2454,13 @@ instance FromJSON DeleteOrderDealsRequest where

24522454 parseJSON

24532455 = withObject "DeleteOrderDealsRequest"

24542456 (\ o ->

2455− DeleteOrderDealsRequest <$>

2457+ DeleteOrderDealsRequest' <$>

24562458 (o .:? "updateAction") <*>

24572459 (o .:? "dealIds" .!= mempty)

24582460 <*> (o .:? "proposalRevisionNumber"))

24592461

24602462instance ToJSON DeleteOrderDealsRequest where

2461− toJSON DeleteOrderDealsRequest{..}

2463+ toJSON DeleteOrderDealsRequest'{..}

24622464 = object

24632465 (catMaybes

24642466 [("updateAction" .=) <$> _dodrUpdateAction,

@@ -2468,7 +2470,7 @@ instance ToJSON DeleteOrderDealsRequest where

24682470

24692471--

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

2471−data ContactInformation = ContactInformation

2473+data ContactInformation = ContactInformation'

24722474 { _ciEmail :: !(Maybe Text)

24732475 , _ciName :: !(Maybe Text)

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

@@ -2483,7 +2485,7 @@ data ContactInformation = ContactInformation

24832485contactInformation

24842486 :: ContactInformation

24852487contactInformation =

2486− ContactInformation

2488+ ContactInformation'

24872489 { _ciEmail = Nothing

24882490 , _ciName = Nothing

24892491 }

@@ -2500,11 +2502,11 @@ instance FromJSON ContactInformation where

25002502 parseJSON

25012503 = withObject "ContactInformation"

25022504 (\ o ->

2503− ContactInformation <$>

2505+ ContactInformation' <$>

25042506 (o .:? "email") <*> (o .:? "name"))

25052507

25062508instance ToJSON ContactInformation where

2507− toJSON ContactInformation{..}

2509+ toJSON ContactInformation'{..}

25082510 = object

25092511 (catMaybes

25102512 [("email" .=) <$> _ciEmail, ("name" .=) <$> _ciName])

@@ -2512,7 +2514,7 @@ instance ToJSON ContactInformation where

25122514-- | A smaller image, for the advertiser logo.

25132515--

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

2515−data CreativeNATiveAdLogo = CreativeNATiveAdLogo

2517+data CreativeNATiveAdLogo = CreativeNATiveAdLogo'

25162518 { _cnatalHeight :: !(Maybe (Textual Int32))

25172519 , _cnatalURL :: !(Maybe Text)

25182520 , _cnatalWidth :: !(Maybe (Textual Int32))

@@ -2530,7 +2532,7 @@ data CreativeNATiveAdLogo = CreativeNATiveAdLogo

25302532creativeNATiveAdLogo

25312533 :: CreativeNATiveAdLogo

25322534creativeNATiveAdLogo =

2533− CreativeNATiveAdLogo

2535+ CreativeNATiveAdLogo'

25342536 { _cnatalHeight = Nothing

25352537 , _cnatalURL = Nothing

25362538 , _cnatalWidth = Nothing

@@ -2554,12 +2556,12 @@ instance FromJSON CreativeNATiveAdLogo where

25542556 parseJSON

25552557 = withObject "CreativeNATiveAdLogo"

25562558 (\ o ->

2557− CreativeNATiveAdLogo <$>

2559+ CreativeNATiveAdLogo' <$>

25582560 (o .:? "height") <*> (o .:? "url") <*>

25592561 (o .:? "width"))

25602562

25612563instance ToJSON CreativeNATiveAdLogo where

2562− toJSON CreativeNATiveAdLogo{..}

2564+ toJSON CreativeNATiveAdLogo'{..}

25632565 = object

25642566 (catMaybes

25652567 [("height" .=) <$> _cnatalHeight,

@@ -2568,7 +2570,7 @@ instance ToJSON CreativeNATiveAdLogo where

25682570

25692571--

25702572-- /See:/ 'getOrderDealsResponse' smart constructor.

2571−newtype GetOrderDealsResponse = GetOrderDealsResponse

2573+newtype GetOrderDealsResponse = GetOrderDealsResponse'

25722574 { _godrDeals :: Maybe [MarketplaceDeal]

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

25742576

@@ -2580,7 +2582,7 @@ newtype GetOrderDealsResponse = GetOrderDealsResponse

25802582getOrderDealsResponse

25812583 :: GetOrderDealsResponse

25822584getOrderDealsResponse =

2583− GetOrderDealsResponse

2585+ GetOrderDealsResponse'

25842586 { _godrDeals = Nothing

25852587 }

25862588

@@ -2595,10 +2597,11 @@ instance FromJSON GetOrderDealsResponse where

25952597 parseJSON

25962598 = withObject "GetOrderDealsResponse"

25972599 (\ o ->

2598− GetOrderDealsResponse <$> (o .:? "deals" .!= mempty))

2600+ GetOrderDealsResponse' <$>

2601+ (o .:? "deals" .!= mempty))

25992602

26002603instance ToJSON GetOrderDealsResponse where

2601− toJSON GetOrderDealsResponse{..}

2604+ toJSON GetOrderDealsResponse'{..}

26022605 = object (catMaybes [("deals" .=) <$> _godrDeals])

26032606

26042607-- | The configuration data for an Ad Exchange performance report list.

@@ -2606,7 +2609,7 @@ instance ToJSON GetOrderDealsResponse where

26062609-- https:\/\/cs.corp.google.com\/#piper\/\/\/depot\/google3\/contentads\/adx\/tools\/rtb_api\/adxrtb.py

26072610--

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

2609−data PerformanceReportList = PerformanceReportList

2612+data PerformanceReportList = PerformanceReportList'

26102613 { _prlKind :: !Text

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

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

@@ -2621,7 +2624,7 @@ data PerformanceReportList = PerformanceReportList

26212624performanceReportList

26222625 :: PerformanceReportList

26232626performanceReportList =

2624− PerformanceReportList

2627+ PerformanceReportList'

26252628 { _prlKind = "adexchangebuyer#performanceReportList"

26262629 , _prlPerformanceReport = Nothing

26272630 }

@@ -2642,13 +2645,13 @@ instance FromJSON PerformanceReportList where

26422645 parseJSON

26432646 = withObject "PerformanceReportList"

26442647 (\ o ->

2645− PerformanceReportList <$>

2648+ PerformanceReportList' <$>

26462649 (o .:? "kind" .!=

26472650 "adexchangebuyer#performanceReportList")

26482651 <*> (o .:? "performanceReport" .!= mempty))

26492652

26502653instance ToJSON PerformanceReportList where

2651− toJSON PerformanceReportList{..}

2654+ toJSON PerformanceReportList'{..}

26522655 = object

26532656 (catMaybes

26542657 [Just ("kind" .= _prlKind),

@@ -2656,7 +2659,7 @@ instance ToJSON PerformanceReportList where

26562659

26572660--

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

2659−data PretargetingConfig = PretargetingConfig

2662+data PretargetingConfig = PretargetingConfig'

26602663 { _pcPlatforms :: !(Maybe [Text])

26612664 , _pcMobileCarriers :: !(Maybe [Textual Int64])

26622665 , _pcVendorTypes :: !(Maybe [Textual Int64])

@@ -2737,7 +2740,7 @@ data PretargetingConfig = PretargetingConfig

27372740pretargetingConfig

27382741 :: PretargetingConfig

27392742pretargetingConfig =

2740− PretargetingConfig

2743+ PretargetingConfig'

27412744 { _pcPlatforms = Nothing

27422745 , _pcMobileCarriers = Nothing

27432746 , _pcVendorTypes = Nothing

@@ -2957,7 +2960,7 @@ instance FromJSON PretargetingConfig where

29572960 parseJSON

29582961 = withObject "PretargetingConfig"

29592962 (\ o ->

2960− PretargetingConfig <$>

2963+ PretargetingConfig' <$>

29612964 (o .:? "platforms" .!= mempty) <*>

29622965 (o .:? "mobileCarriers" .!= mempty)

29632966 <*> (o .:? "vendorTypes" .!= mempty)

@@ -2987,7 +2990,7 @@ instance FromJSON PretargetingConfig where

29872990 (o .:? "mobileOperatingSystemVersions" .!= mempty))

29882991

29892992instance ToJSON PretargetingConfig where

2990− toJSON PretargetingConfig{..}

2993+ toJSON PretargetingConfig'{..}

29912994 = object

29922995 (catMaybes

29932996 [("platforms" .=) <$> _pcPlatforms,

@@ -3023,7 +3026,7 @@ instance ToJSON PretargetingConfig where

30233026-- be set in requests.

30243027--

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

3026−data CreativeFilteringReasons = CreativeFilteringReasons

3029+data CreativeFilteringReasons = CreativeFilteringReasons'

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

30283031 , _cfrDate :: !(Maybe Text)

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

@@ -3038,7 +3041,7 @@ data CreativeFilteringReasons = CreativeFilteringReasons

30383041creativeFilteringReasons

30393042 :: CreativeFilteringReasons

30403043creativeFilteringReasons =

3041− CreativeFilteringReasons

3044+ CreativeFilteringReasons'

30423045 { _cfrReasons = Nothing

30433046 , _cfrDate = Nothing

30443047 }

@@ -3059,11 +3062,11 @@ instance FromJSON CreativeFilteringReasons where

30593062 parseJSON

30603063 = withObject "CreativeFilteringReasons"

30613064 (\ o ->

3062− CreativeFilteringReasons <$>

3065+ CreativeFilteringReasons' <$>

30633066 (o .:? "reasons" .!= mempty) <*> (o .:? "date"))

30643067

30653068instance ToJSON CreativeFilteringReasons where

3066− toJSON CreativeFilteringReasons{..}

3069+ toJSON CreativeFilteringReasons'{..}

30673070 = object

30683071 (catMaybes

30693072 [("reasons" .=) <$> _cfrReasons,

@@ -3071,7 +3074,7 @@ instance ToJSON CreativeFilteringReasons where

30713074

30723075--

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

3074−data TargetingValueCreativeSize = TargetingValueCreativeSize

3077+data TargetingValueCreativeSize = TargetingValueCreativeSize'

30753078 { _tvcsSize :: !(Maybe TargetingValueSize)

30763079 , _tvcsCompanionSizes :: !(Maybe [TargetingValueSize])

30773080 , _tvcsCreativeSizeType :: !(Maybe Text)

@@ -3089,7 +3092,7 @@ data TargetingValueCreativeSize = TargetingValueCreativeSize

30893092targetingValueCreativeSize

30903093 :: TargetingValueCreativeSize

30913094targetingValueCreativeSize =

3092− TargetingValueCreativeSize

3095+ TargetingValueCreativeSize'

30933096 { _tvcsSize = Nothing

30943097 , _tvcsCompanionSizes = Nothing

30953098 , _tvcsCreativeSizeType = Nothing

@@ -3118,13 +3121,13 @@ instance FromJSON TargetingValueCreativeSize where

31183121 parseJSON

31193122 = withObject "TargetingValueCreativeSize"

31203123 (\ o ->

3121− TargetingValueCreativeSize <$>

3124+ TargetingValueCreativeSize' <$>

31223125 (o .:? "size") <*>

31233126 (o .:? "companionSizes" .!= mempty)

31243127 <*> (o .:? "creativeSizeType"))

31253128

31263129instance ToJSON TargetingValueCreativeSize where

3127− toJSON TargetingValueCreativeSize{..}

3130+ toJSON TargetingValueCreativeSize'{..}

31283131 = object

31293132 (catMaybes

31303133 [("size" .=) <$> _tvcsSize,

@@ -3140,7 +3143,7 @@ instance ToJSON TargetingValueCreativeSize where

31403143-- either buyer or the seller.

31413144--

31423145-- /See:/ 'proposal' smart constructor.

3143−data Proposal = Proposal

3146+data Proposal = Proposal'

31443147 { _pBuyerPrivateData :: !(Maybe PrivateData)

31453148 , _pIsSetupComplete :: !(Maybe Bool)

31463149 , _pInventorySource :: !(Maybe Text)

@@ -3212,7 +3215,7 @@ data Proposal = Proposal

32123215proposal

32133216 :: Proposal

32143217proposal =

3215− Proposal

3218+ Proposal'

32163219 { _pBuyerPrivateData = Nothing

32173220 , _pIsSetupComplete = Nothing

32183221 , _pInventorySource = Nothing

@@ -3369,7 +3372,7 @@ instance FromJSON Proposal where

33693372 parseJSON

33703373 = withObject "Proposal"

33713374 (\ o ->

3372− Proposal <$>

3375+ Proposal' <$>

33733376 (o .:? "buyerPrivateData") <*>

33743377 (o .:? "isSetupComplete")

33753378 <*> (o .:? "inventorySource")

@@ -3393,7 +3396,7 @@ instance FromJSON Proposal where

33933396 <*> (o .:? "buyer"))

33943397

33953398instance ToJSON Proposal where

3396− toJSON Proposal{..}

3399+ toJSON Proposal'{..}

33973400 = object

33983401 (catMaybes

33993402 [("buyerPrivateData" .=) <$> _pBuyerPrivateData,

@@ -3423,7 +3426,7 @@ instance ToJSON Proposal where

34233426-- access to. Each entry in the feed corresponds to a single billing info.

34243427--

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

3426−data BillingInfoList = BillingInfoList

3429+data BillingInfoList = BillingInfoList'

34273430 { _bilKind :: !Text

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

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

@@ -3438,7 +3441,7 @@ data BillingInfoList = BillingInfoList

34383441billingInfoList

34393442 :: BillingInfoList

34403443billingInfoList =

3441− BillingInfoList

3444+ BillingInfoList'

34423445 { _bilKind = "adexchangebuyer#billingInfoList"

34433446 , _bilItems = Nothing

34443447 }

@@ -3458,12 +3461,12 @@ instance FromJSON BillingInfoList where

34583461 parseJSON

34593462 = withObject "BillingInfoList"

34603463 (\ o ->

3461− BillingInfoList <$>

3464+ BillingInfoList' <$>

34623465 (o .:? "kind" .!= "adexchangebuyer#billingInfoList")

34633466 <*> (o .:? "items" .!= mempty))

34643467

34653468instance ToJSON BillingInfoList where

3466− toJSON BillingInfoList{..}

3469+ toJSON BillingInfoList'{..}

34673470 = object

34683471 (catMaybes

34693472 [Just ("kind" .= _bilKind),

@@ -3471,7 +3474,7 @@ instance ToJSON BillingInfoList where

34713474

34723475--

34733476-- /See:/ 'addOrderNotesResponse' smart constructor.

3474−newtype AddOrderNotesResponse = AddOrderNotesResponse

3477+newtype AddOrderNotesResponse = AddOrderNotesResponse'

34753478 { _aNotes :: Maybe [MarketplaceNote]

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

34773480

@@ -3483,7 +3486,7 @@ newtype AddOrderNotesResponse = AddOrderNotesResponse

34833486addOrderNotesResponse

34843487 :: AddOrderNotesResponse

34853488addOrderNotesResponse =

3486− AddOrderNotesResponse

3489+ AddOrderNotesResponse'

34873490 { _aNotes = Nothing

34883491 }

34893492

@@ -3496,15 +3499,16 @@ instance FromJSON AddOrderNotesResponse where

34963499 parseJSON

34973500 = withObject "AddOrderNotesResponse"

34983501 (\ o ->

3499− AddOrderNotesResponse <$> (o .:? "notes" .!= mempty))

3502+ AddOrderNotesResponse' <$>

3503+ (o .:? "notes" .!= mempty))

35003504

35013505instance ToJSON AddOrderNotesResponse where

3502− toJSON AddOrderNotesResponse{..}

3506+ toJSON AddOrderNotesResponse'{..}

35033507 = object (catMaybes [("notes" .=) <$> _aNotes])

35043508

35053509--

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

3507−data TargetingValueSize = TargetingValueSize

3511+data TargetingValueSize = TargetingValueSize'

35083512 { _tvsHeight :: !(Maybe (Textual Int32))

35093513 , _tvsWidth :: !(Maybe (Textual Int32))

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

@@ -3519,7 +3523,7 @@ data TargetingValueSize = TargetingValueSize

35193523targetingValueSize

35203524 :: TargetingValueSize

35213525targetingValueSize =

3522− TargetingValueSize

3526+ TargetingValueSize'

35233527 { _tvsHeight = Nothing

35243528 , _tvsWidth = Nothing

35253529 }

@@ -3540,11 +3544,11 @@ instance FromJSON TargetingValueSize where

35403544 parseJSON

35413545 = withObject "TargetingValueSize"

35423546 (\ o ->

3543− TargetingValueSize <$>

3547+ TargetingValueSize' <$>

35443548 (o .:? "height") <*> (o .:? "width"))

35453549

35463550instance ToJSON TargetingValueSize where

3547− toJSON TargetingValueSize{..}

3551+ toJSON TargetingValueSize'{..}

35483552 = object

35493553 (catMaybes

35503554 [("height" .=) <$> _tvsHeight,

@@ -3552,7 +3556,7 @@ instance ToJSON TargetingValueSize where

35523556

35533557--

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

3555−data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem

3559+data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem'

35563560 { _pcdiHeight :: !(Maybe (Textual Int64))

35573561 , _pcdiWidth :: !(Maybe (Textual Int64))

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

@@ -3567,7 +3571,7 @@ data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem

35673571pretargetingConfigDimensionsItem

35683572 :: PretargetingConfigDimensionsItem

35693573pretargetingConfigDimensionsItem =

3570− PretargetingConfigDimensionsItem

3574+ PretargetingConfigDimensionsItem'

35713575 { _pcdiHeight = Nothing

35723576 , _pcdiWidth = Nothing

35733577 }

@@ -3589,12 +3593,12 @@ instance FromJSON PretargetingConfigDimensionsItem

35893593 parseJSON

35903594 = withObject "PretargetingConfigDimensionsItem"

35913595 (\ o ->

3592− PretargetingConfigDimensionsItem <$>

3596+ PretargetingConfigDimensionsItem' <$>

35933597 (o .:? "height") <*> (o .:? "width"))

35943598

35953599instance ToJSON PretargetingConfigDimensionsItem

35963600 where

3597− toJSON PretargetingConfigDimensionsItem{..}

3601+ toJSON PretargetingConfigDimensionsItem'{..}

35983602 = object

35993603 (catMaybes

36003604 [("height" .=) <$> _pcdiHeight,

@@ -3602,7 +3606,7 @@ instance ToJSON PretargetingConfigDimensionsItem

36023606

36033607--

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

3605−data TargetingValue = TargetingValue

3609+data TargetingValue = TargetingValue'

36063610 { _tvCreativeSizeValue :: !(Maybe TargetingValueCreativeSize)

36073611 , _tvStringValue :: !(Maybe Text)

36083612 , _tvLongValue :: !(Maybe (Textual Int64))

@@ -3623,7 +3627,7 @@ data TargetingValue = TargetingValue

36233627targetingValue

36243628 :: TargetingValue

36253629targetingValue =

3626− TargetingValue

3630+ TargetingValue'

36273631 { _tvCreativeSizeValue = Nothing

36283632 , _tvStringValue = Nothing

36293633 , _tvLongValue = Nothing

@@ -3659,13 +3663,13 @@ instance FromJSON TargetingValue where

36593663 parseJSON

36603664 = withObject "TargetingValue"

36613665 (\ o ->

3662− TargetingValue <$>

3666+ TargetingValue' <$>

36633667 (o .:? "creativeSizeValue") <*> (o .:? "stringValue")

36643668 <*> (o .:? "longValue")

36653669 <*> (o .:? "dayPartTargetingValue"))

36663670

36673671instance ToJSON TargetingValue where

3668− toJSON TargetingValue{..}

3672+ toJSON TargetingValue'{..}

36693673 = object

36703674 (catMaybes

36713675 [("creativeSizeValue" .=) <$> _tvCreativeSizeValue,

@@ -3677,7 +3681,7 @@ instance ToJSON TargetingValue where

36773681-- | The app icon, for app download ads.

36783682--

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

3680−data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon

3684+data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon'

36813685 { _cnataaiHeight :: !(Maybe (Textual Int32))

36823686 , _cnataaiURL :: !(Maybe Text)

36833687 , _cnataaiWidth :: !(Maybe (Textual Int32))

@@ -3695,7 +3699,7 @@ data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon

36953699creativeNATiveAdAppIcon

36963700 :: CreativeNATiveAdAppIcon

36973701creativeNATiveAdAppIcon =

3698− CreativeNATiveAdAppIcon

3702+ CreativeNATiveAdAppIcon'

36993703 { _cnataaiHeight = Nothing

37003704 , _cnataaiURL = Nothing

37013705 , _cnataaiWidth = Nothing

@@ -3720,12 +3724,12 @@ instance FromJSON CreativeNATiveAdAppIcon where

37203724 parseJSON

37213725 = withObject "CreativeNATiveAdAppIcon"

37223726 (\ o ->

3723− CreativeNATiveAdAppIcon <$>

3727+ CreativeNATiveAdAppIcon' <$>

37243728 (o .:? "height") <*> (o .:? "url") <*>

37253729 (o .:? "width"))

37263730

37273731instance ToJSON CreativeNATiveAdAppIcon where

3728− toJSON CreativeNATiveAdAppIcon{..}

3732+ toJSON CreativeNATiveAdAppIcon'{..}

37293733 = object

37303734 (catMaybes

37313735 [("height" .=) <$> _cnataaiHeight,

@@ -3734,7 +3738,7 @@ instance ToJSON CreativeNATiveAdAppIcon where

37343738

37353739--

37363740-- /See:/ 'price' smart constructor.

3737−data Price = Price

3741+data Price = Price'

37383742 { _pCurrencyCode :: !(Maybe Text)

37393743 , _pAmountMicros :: !(Maybe (Textual Double))

37403744 , _pPricingType :: !(Maybe Text)

@@ -3752,7 +3756,7 @@ data Price = Price

37523756price

37533757 :: Price

37543758price =

3755− Price

3759+ Price'

37563760 { _pCurrencyCode = Nothing

37573761 , _pAmountMicros = Nothing

37583762 , _pPricingType = Nothing

@@ -3780,12 +3784,12 @@ instance FromJSON Price where

37803784 parseJSON

37813785 = withObject "Price"

37823786 (\ o ->

3783− Price <$>

3787+ Price' <$>

37843788 (o .:? "currencyCode") <*> (o .:? "amountMicros") <*>

37853789 (o .:? "pricingType"))

37863790

37873791instance ToJSON Price where

3788− toJSON Price{..}

3792+ toJSON Price'{..}

37893793 = object

37903794 (catMaybes

37913795 [("currencyCode" .=) <$> _pCurrencyCode,

@@ -3794,7 +3798,7 @@ instance ToJSON Price where

37943798

37953799--

37963800-- /See:/ 'pretargetingConfigVideoPlayerSizesItem' smart constructor.

3797−data PretargetingConfigVideoPlayerSizesItem = PretargetingConfigVideoPlayerSizesItem

3801+data PretargetingConfigVideoPlayerSizesItem = PretargetingConfigVideoPlayerSizesItem'

37983802 { _pcvpsiMinWidth :: !(Maybe (Textual Int64))

37993803 , _pcvpsiAspectRatio :: !(Maybe Text)

38003804 , _pcvpsiMinHeight :: !(Maybe (Textual Int64))

@@ -3812,7 +3816,7 @@ data PretargetingConfigVideoPlayerSizesItem = PretargetingConfigVideoPlayerSizes

38123816pretargetingConfigVideoPlayerSizesItem

38133817 :: PretargetingConfigVideoPlayerSizesItem

38143818pretargetingConfigVideoPlayerSizesItem =

3815− PretargetingConfigVideoPlayerSizesItem

3819+ PretargetingConfigVideoPlayerSizesItem'

38163820 { _pcvpsiMinWidth = Nothing

38173821 , _pcvpsiAspectRatio = Nothing

38183822 , _pcvpsiMinHeight = Nothing

@@ -3846,13 +3850,13 @@ instance FromJSON

38463850 parseJSON

38473851 = withObject "PretargetingConfigVideoPlayerSizesItem"

38483852 (\ o ->

3849− PretargetingConfigVideoPlayerSizesItem <$>

3853+ PretargetingConfigVideoPlayerSizesItem' <$>

38503854 (o .:? "minWidth") <*> (o .:? "aspectRatio") <*>

38513855 (o .:? "minHeight"))

38523856

38533857instance ToJSON

38543858 PretargetingConfigVideoPlayerSizesItem where

3855− toJSON PretargetingConfigVideoPlayerSizesItem{..}

3859+ toJSON PretargetingConfigVideoPlayerSizesItem'{..}

38563860 = object

38573861 (catMaybes

38583862 [("minWidth" .=) <$> _pcvpsiMinWidth,

@@ -3861,7 +3865,7 @@ instance ToJSON

38613865

38623866--

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

3864−data EditAllOrderDealsRequest = EditAllOrderDealsRequest

3868+data EditAllOrderDealsRequest = EditAllOrderDealsRequest'

38653869 { _eUpdateAction :: !(Maybe Text)

38663870 , _eDeals :: !(Maybe [MarketplaceDeal])

38673871 , _eProposalRevisionNumber :: !(Maybe (Textual Int64))

@@ -3882,7 +3886,7 @@ data EditAllOrderDealsRequest = EditAllOrderDealsRequest

38823886editAllOrderDealsRequest

38833887 :: EditAllOrderDealsRequest

38843888editAllOrderDealsRequest =

3885− EditAllOrderDealsRequest

3889+ EditAllOrderDealsRequest'

38863890 { _eUpdateAction = Nothing

38873891 , _eDeals = Nothing

38883892 , _eProposalRevisionNumber = Nothing

@@ -3929,13 +3933,13 @@ instance FromJSON EditAllOrderDealsRequest where

39293933 parseJSON

39303934 = withObject "EditAllOrderDealsRequest"

39313935 (\ o ->

3932− EditAllOrderDealsRequest <$>

3936+ EditAllOrderDealsRequest' <$>

39333937 (o .:? "updateAction") <*> (o .:? "deals" .!= mempty)

39343938 <*> (o .:? "proposalRevisionNumber")

39353939 <*> (o .:? "proposal"))

39363940

39373941instance ToJSON EditAllOrderDealsRequest where

3938− toJSON EditAllOrderDealsRequest{..}

3942+ toJSON EditAllOrderDealsRequest'{..}

39393943 = object

39403944 (catMaybes

39413945 [("updateAction" .=) <$> _eUpdateAction,

@@ -3947,7 +3951,7 @@ instance ToJSON EditAllOrderDealsRequest where

39473951-- | The configuration data for an Ad Exchange billing info.

39483952--

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

3950−data BillingInfo = BillingInfo

3954+data BillingInfo = BillingInfo'

39513955 { _biKind :: !Text

39523956 , _biAccountName :: !(Maybe Text)

39533957 , _biAccountId :: !(Maybe (Textual Int32))

@@ -3968,7 +3972,7 @@ data BillingInfo = BillingInfo

39683972billingInfo

39693973 :: BillingInfo

39703974billingInfo =

3971− BillingInfo

3975+ BillingInfo'

39723976 { _biKind = "adexchangebuyer#billingInfo"

39733977 , _biAccountName = Nothing

39743978 , _biAccountId = Nothing

@@ -4004,14 +4008,14 @@ instance FromJSON BillingInfo where

40044008 parseJSON

40054009 = withObject "BillingInfo"

40064010 (\ o ->

4007− BillingInfo <$>

4011+ BillingInfo' <$>

40084012 (o .:? "kind" .!= "adexchangebuyer#billingInfo") <*>

40094013 (o .:? "accountName")

40104014 <*> (o .:? "accountId")

40114015 <*> (o .:? "billingId" .!= mempty))

40124016

40134017instance ToJSON BillingInfo where

4014− toJSON BillingInfo{..}

4018+ toJSON BillingInfo'{..}

40154019 = object

40164020 (catMaybes

40174021 [Just ("kind" .= _biKind),

@@ -4021,7 +4025,7 @@ instance ToJSON BillingInfo where

40214025

40224026--

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

4024−data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting

4028+data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting'

40254029 { _tvdptTimeZoneType :: !(Maybe Text)

40264030 , _tvdptDayParts :: !(Maybe [TargetingValueDayPartTargetingDayPart])

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

@@ -4036,7 +4040,7 @@ data TargetingValueDayPartTargeting = TargetingValueDayPartTargeting

40364040targetingValueDayPartTargeting

40374041 :: TargetingValueDayPartTargeting

40384042targetingValueDayPartTargeting =

4039− TargetingValueDayPartTargeting

4043+ TargetingValueDayPartTargeting'

40404044 { _tvdptTimeZoneType = Nothing

40414045 , _tvdptDayParts = Nothing

40424046 }

@@ -4058,12 +4062,12 @@ instance FromJSON TargetingValueDayPartTargeting

40584062 parseJSON

40594063 = withObject "TargetingValueDayPartTargeting"

40604064 (\ o ->

4061− TargetingValueDayPartTargeting <$>

4065+ TargetingValueDayPartTargeting' <$>

40624066 (o .:? "timeZoneType") <*>

40634067 (o .:? "dayParts" .!= mempty))

40644068

40654069instance ToJSON TargetingValueDayPartTargeting where

4066− toJSON TargetingValueDayPartTargeting{..}

4070+ toJSON TargetingValueDayPartTargeting'{..}

40674071 = object

40684072 (catMaybes

40694073 [("timeZoneType" .=) <$> _tvdptTimeZoneType,

@@ -4071,7 +4075,7 @@ instance ToJSON TargetingValueDayPartTargeting where

40714075

40724076--

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

4074−data SharedTargeting = SharedTargeting

4078+data SharedTargeting = SharedTargeting'

40754079 { _stKey :: !(Maybe Text)

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

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

@@ -4089,7 +4093,7 @@ data SharedTargeting = SharedTargeting

40894093sharedTargeting

40904094 :: SharedTargeting

40914095sharedTargeting =

4092− SharedTargeting

4096+ SharedTargeting'

40934097 { _stKey = Nothing

40944098 , _stExclusions = Nothing

40954099 , _stInclusions = Nothing

@@ -4117,12 +4121,12 @@ instance FromJSON SharedTargeting where

41174121 parseJSON

41184122 = withObject "SharedTargeting"

41194123 (\ o ->

4120− SharedTargeting <$>

4124+ SharedTargeting' <$>

41214125 (o .:? "key") <*> (o .:? "exclusions" .!= mempty) <*>

41224126 (o .:? "inclusions" .!= mempty))

41234127

41244128instance ToJSON SharedTargeting where

4125− toJSON SharedTargeting{..}

4129+ toJSON SharedTargeting'{..}

41264130 = object

41274131 (catMaybes

41284132 [("key" .=) <$> _stKey,

@@ -4132,7 +4136,7 @@ instance ToJSON SharedTargeting where

41324136-- | A large image.

41334137--

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

4135−data CreativeNATiveAdImage = CreativeNATiveAdImage

4139+data CreativeNATiveAdImage = CreativeNATiveAdImage'

41364140 { _cnataiHeight :: !(Maybe (Textual Int32))

41374141 , _cnataiURL :: !(Maybe Text)

41384142 , _cnataiWidth :: !(Maybe (Textual Int32))

@@ -4150,7 +4154,7 @@ data CreativeNATiveAdImage = CreativeNATiveAdImage

41504154creativeNATiveAdImage

41514155 :: CreativeNATiveAdImage

41524156creativeNATiveAdImage =

4153− CreativeNATiveAdImage

4157+ CreativeNATiveAdImage'

41544158 { _cnataiHeight = Nothing

41554159 , _cnataiURL = Nothing

41564160 , _cnataiWidth = Nothing

@@ -4174,12 +4178,12 @@ instance FromJSON CreativeNATiveAdImage where

41744178 parseJSON

41754179 = withObject "CreativeNATiveAdImage"

41764180 (\ o ->

4177− CreativeNATiveAdImage <$>

4181+ CreativeNATiveAdImage' <$>

41784182 (o .:? "height") <*> (o .:? "url") <*>

41794183 (o .:? "width"))

41804184

41814185instance ToJSON CreativeNATiveAdImage where

4182− toJSON CreativeNATiveAdImage{..}

4186+ toJSON CreativeNATiveAdImage'{..}

41834187 = object

41844188 (catMaybes

41854189 [("height" .=) <$> _cnataiHeight,

@@ -4195,7 +4199,7 @@ instance ToJSON CreativeNATiveAdImage where

41954199-- field is updatable at all times by either buyer or the seller.

41964200--

41974201-- /See:/ 'product' smart constructor.

4198−data Product = Product

4202+data Product = Product'

41994203 { _proState :: !(Maybe Text)

42004204 , _proInventorySource :: !(Maybe Text)

42014205 , _proWebPropertyCode :: !(Maybe Text)

@@ -4258,7 +4262,7 @@ data Product = Product

42584262product

42594263 :: Product

42604264product =

4261− Product

4265+ Product'

42624266 { _proState = Nothing

42634267 , _proInventorySource = Nothing

42644268 , _proWebPropertyCode = Nothing

@@ -4400,7 +4404,7 @@ instance FromJSON Product where

44004404 parseJSON

44014405 = withObject "Product"

44024406 (\ o ->

4403− Product <$>

4407+ Product' <$>

44044408 (o .:? "state") <*> (o .:? "inventorySource") <*>

44054409 (o .:? "webPropertyCode")

44064410 <*> (o .:? "creationTimeMs")

@@ -4420,7 +4424,7 @@ instance FromJSON Product where

44204424 <*> (o .:? "productId"))

44214425

44224426instance ToJSON Product where

4423− toJSON Product{..}

4427+ toJSON Product'{..}

44244428 = object

44254429 (catMaybes

44264430 [("state" .=) <$> _proState,

@@ -4445,7 +4449,7 @@ instance ToJSON Product where

44454449

44464450--

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

4448−data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem

4452+data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem'

44494453 { _csriContexts :: !(Maybe [CreativeServingRestrictionsItemContextsItem])

44504454 , _csriReason :: !(Maybe Text)

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

@@ -4463,7 +4467,7 @@ data CreativeServingRestrictionsItem = CreativeServingRestrictionsItem

44634467creativeServingRestrictionsItem

44644468 :: CreativeServingRestrictionsItem

44654469creativeServingRestrictionsItem =

4466− CreativeServingRestrictionsItem

4470+ CreativeServingRestrictionsItem'

44674471 { _csriContexts = Nothing

44684472 , _csriReason = Nothing

44694473 , _csriDisApprovalReasons = Nothing

@@ -4499,12 +4503,12 @@ instance FromJSON CreativeServingRestrictionsItem

44994503 parseJSON

45004504 = withObject "CreativeServingRestrictionsItem"

45014505 (\ o ->

4502− CreativeServingRestrictionsItem <$>

4506+ CreativeServingRestrictionsItem' <$>

45034507 (o .:? "contexts" .!= mempty) <*> (o .:? "reason")

45044508 <*> (o .:? "disapprovalReasons" .!= mempty))

45054509

45064510instance ToJSON CreativeServingRestrictionsItem where

4507− toJSON CreativeServingRestrictionsItem{..}

4511+ toJSON CreativeServingRestrictionsItem'{..}

45084512 = object

45094513 (catMaybes

45104514 [("contexts" .=) <$> _csriContexts,

@@ -4514,7 +4518,7 @@ instance ToJSON CreativeServingRestrictionsItem where

45144518

45154519--

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

4517−data DeleteOrderDealsResponse = DeleteOrderDealsResponse

4521+data DeleteOrderDealsResponse = DeleteOrderDealsResponse'

45184522 { _dDeals :: !(Maybe [MarketplaceDeal])

45194523 , _dProposalRevisionNumber :: !(Maybe (Textual Int64))

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

@@ -4529,7 +4533,7 @@ data DeleteOrderDealsResponse = DeleteOrderDealsResponse

45294533deleteOrderDealsResponse

45304534 :: DeleteOrderDealsResponse

45314535deleteOrderDealsResponse =

4532− DeleteOrderDealsResponse

4536+ DeleteOrderDealsResponse'

45334537 { _dDeals = Nothing

45344538 , _dProposalRevisionNumber = Nothing

45354539 }

@@ -4551,12 +4555,12 @@ instance FromJSON DeleteOrderDealsResponse where

45514555 parseJSON

45524556 = withObject "DeleteOrderDealsResponse"

45534557 (\ o ->

4554− DeleteOrderDealsResponse <$>

4558+ DeleteOrderDealsResponse' <$>

45554559 (o .:? "deals" .!= mempty) <*>

45564560 (o .:? "proposalRevisionNumber"))

45574561

45584562instance ToJSON DeleteOrderDealsResponse where

4559− toJSON DeleteOrderDealsResponse{..}

4563+ toJSON DeleteOrderDealsResponse'{..}

45604564 = object

45614565 (catMaybes

45624566 [("deals" .=) <$> _dDeals,

@@ -4565,7 +4569,7 @@ instance ToJSON DeleteOrderDealsResponse where

45654569

45664570--

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

4568−data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem

4572+data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem'

45694573 { _pcpiToken :: !(Maybe Text)

45704574 , _pcpiType :: !(Maybe Text)

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

@@ -4580,7 +4584,7 @@ data PretargetingConfigPlacementsItem = PretargetingConfigPlacementsItem

45804584pretargetingConfigPlacementsItem

45814585 :: PretargetingConfigPlacementsItem

45824586pretargetingConfigPlacementsItem =

4583− PretargetingConfigPlacementsItem

4587+ PretargetingConfigPlacementsItem'

45844588 { _pcpiToken = Nothing

45854589 , _pcpiType = Nothing

45864590 }

@@ -4601,12 +4605,12 @@ instance FromJSON PretargetingConfigPlacementsItem

46014605 parseJSON

46024606 = withObject "PretargetingConfigPlacementsItem"

46034607 (\ o ->

4604− PretargetingConfigPlacementsItem <$>

4608+ PretargetingConfigPlacementsItem' <$>

46054609 (o .:? "token") <*> (o .:? "type"))

46064610

46074611instance ToJSON PretargetingConfigPlacementsItem

46084612 where

4609− toJSON PretargetingConfigPlacementsItem{..}

4613+ toJSON PretargetingConfigPlacementsItem'{..}

46104614 = object

46114615 (catMaybes

46124616 [("token" .=) <$> _pcpiToken,

@@ -4616,7 +4620,7 @@ instance ToJSON PretargetingConfigPlacementsItem

46164620-- targeting information that is used for serving.

46174621--

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

4619−data MarketplaceDeal = MarketplaceDeal

4623+data MarketplaceDeal = MarketplaceDeal'

46204624 { _mdExternalDealId :: !(Maybe Text)

46214625 , _mdBuyerPrivateData :: !(Maybe PrivateData)

46224626 , _mdWebPropertyCode :: !(Maybe Text)

@@ -4685,7 +4689,7 @@ data MarketplaceDeal = MarketplaceDeal

46854689marketplaceDeal

46864690 :: MarketplaceDeal

46874691marketplaceDeal =

4688− MarketplaceDeal

4692+ MarketplaceDeal'

46894693 { _mdExternalDealId = Nothing

46904694 , _mdBuyerPrivateData = Nothing

46914695 , _mdWebPropertyCode = Nothing

@@ -4839,7 +4843,7 @@ instance FromJSON MarketplaceDeal where

48394843 parseJSON

48404844 = withObject "MarketplaceDeal"

48414845 (\ o ->

4842− MarketplaceDeal <$>

4846+ MarketplaceDeal' <$>

48434847 (o .:? "externalDealId") <*>

48444848 (o .:? "buyerPrivateData")

48454849 <*> (o .:? "webPropertyCode")

@@ -4863,7 +4867,7 @@ instance FromJSON MarketplaceDeal where

48634867 <*> (o .:? "productId"))

48644868

48654869instance ToJSON MarketplaceDeal where

4866− toJSON MarketplaceDeal{..}

4870+ toJSON MarketplaceDeal'{..}

48674871 = object

48684872 (catMaybes

48694873 [("externalDealId" .=) <$> _mdExternalDealId,

@@ -4892,7 +4896,7 @@ instance ToJSON MarketplaceDeal where

48924896

48934897--

48944898-- /See:/ 'getOffersResponse' smart constructor.

4895−newtype GetOffersResponse = GetOffersResponse

4899+newtype GetOffersResponse = GetOffersResponse'

48964900 { _gorProducts :: Maybe [Product]

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

48984902

@@ -4904,7 +4908,7 @@ newtype GetOffersResponse = GetOffersResponse

49044908getOffersResponse

49054909 :: GetOffersResponse

49064910getOffersResponse =

4907− GetOffersResponse

4911+ GetOffersResponse'

49084912 { _gorProducts = Nothing

49094913 }

49104914

@@ -4919,16 +4923,16 @@ instance FromJSON GetOffersResponse where

49194923 parseJSON

49204924 = withObject "GetOffersResponse"

49214925 (\ o ->

4922− GetOffersResponse <$> (o .:? "products" .!= mempty))

4926+ GetOffersResponse' <$> (o .:? "products" .!= mempty))

49234927

49244928instance ToJSON GetOffersResponse where

4925− toJSON GetOffersResponse{..}

4929+ toJSON GetOffersResponse'{..}

49264930 = object

49274931 (catMaybes [("products" .=) <$> _gorProducts])

49284932

49294933--

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

4931−data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms

4935+data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms'

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

49334937 , _dtngatPrivateAuctionId :: !(Maybe Text)

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

@@ -4943,7 +4947,7 @@ data DealTermsNonGuaranteedAuctionTerms = DealTermsNonGuaranteedAuctionTerms

49434947dealTermsNonGuaranteedAuctionTerms

49444948 :: DealTermsNonGuaranteedAuctionTerms

49454949dealTermsNonGuaranteedAuctionTerms =

4946− DealTermsNonGuaranteedAuctionTerms

4950+ DealTermsNonGuaranteedAuctionTerms'

49474951 { _dtngatReservePricePerBuyers = Nothing

49484952 , _dtngatPrivateAuctionId = Nothing

49494953 }

@@ -4967,13 +4971,13 @@ instance FromJSON DealTermsNonGuaranteedAuctionTerms

49674971 parseJSON

49684972 = withObject "DealTermsNonGuaranteedAuctionTerms"

49694973 (\ o ->

4970− DealTermsNonGuaranteedAuctionTerms <$>

4974+ DealTermsNonGuaranteedAuctionTerms' <$>

49714975 (o .:? "reservePricePerBuyers" .!= mempty) <*>

49724976 (o .:? "privateAuctionId"))

49734977

49744978instance ToJSON DealTermsNonGuaranteedAuctionTerms

49754979 where

4976− toJSON DealTermsNonGuaranteedAuctionTerms{..}

4980+ toJSON DealTermsNonGuaranteedAuctionTerms'{..}

49774981 = object

49784982 (catMaybes

49794983 [("reservePricePerBuyers" .=) <$>

@@ -4982,7 +4986,7 @@ instance ToJSON DealTermsNonGuaranteedAuctionTerms

49824986

49834987--

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

4985−data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem

4989+data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem'

49864990 { _cfrriFilteringStatus :: !(Maybe (Textual Int32))

49874991 , _cfrriFilteringCount :: !(Maybe (Textual Int64))

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

@@ -4997,7 +5001,7 @@ data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem

49975001creativeFilteringReasonsReasonsItem

49985002 :: CreativeFilteringReasonsReasonsItem

49995003creativeFilteringReasonsReasonsItem =

5000− CreativeFilteringReasonsReasonsItem

5004+ CreativeFilteringReasonsReasonsItem'

50015005 { _cfrriFilteringStatus = Nothing

50025006 , _cfrriFilteringCount = Nothing

50035007 }

@@ -5023,13 +5027,13 @@ instance FromJSON CreativeFilteringReasonsReasonsItem

50235027 parseJSON

50245028 = withObject "CreativeFilteringReasonsReasonsItem"

50255029 (\ o ->

5026− CreativeFilteringReasonsReasonsItem <$>

5030+ CreativeFilteringReasonsReasonsItem' <$>

50275031 (o .:? "filteringStatus") <*>

50285032 (o .:? "filteringCount"))

50295033

50305034instance ToJSON CreativeFilteringReasonsReasonsItem

50315035 where

5032− toJSON CreativeFilteringReasonsReasonsItem{..}

5036+ toJSON CreativeFilteringReasonsReasonsItem'{..}

50335037 = object

50345038 (catMaybes

50355039 [("filteringStatus" .=) <$> _cfrriFilteringStatus,

@@ -5037,7 +5041,7 @@ instance ToJSON CreativeFilteringReasonsReasonsItem

50375041

50385042--

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

5040−data DealTerms = DealTerms

5044+data DealTerms = DealTerms'

50415045 { _dtEstimatedGrossSpend :: !(Maybe Price)

50425046 , _dtNonGuaranteedFixedPriceTerms :: !(Maybe DealTermsNonGuaranteedFixedPriceTerms)

50435047 , _dtNonGuaranteedAuctionTerms :: !(Maybe DealTermsNonGuaranteedAuctionTerms)

@@ -5067,7 +5071,7 @@ data DealTerms = DealTerms

50675071dealTerms

50685072 :: DealTerms

50695073dealTerms =

5070− DealTerms

5074+ DealTerms'

50715075 { _dtEstimatedGrossSpend = Nothing

50725076 , _dtNonGuaranteedFixedPriceTerms = Nothing

50735077 , _dtNonGuaranteedAuctionTerms = Nothing

@@ -5126,7 +5130,7 @@ instance FromJSON DealTerms where

51265130 parseJSON

51275131 = withObject "DealTerms"

51285132 (\ o ->

5129− DealTerms <$>

5133+ DealTerms' <$>

51305134 (o .:? "estimatedGrossSpend") <*>

51315135 (o .:? "nonGuaranteedFixedPriceTerms")

51325136 <*> (o .:? "nonGuaranteedAuctionTerms")

@@ -5136,7 +5140,7 @@ instance FromJSON DealTerms where

51365140 <*> (o .:? "description"))

51375141

51385142instance ToJSON DealTerms where

5139− toJSON DealTerms{..}

5143+ toJSON DealTerms'{..}

51405144 = object

51415145 (catMaybes

51425146 [("estimatedGrossSpend" .=) <$>

@@ -5154,7 +5158,7 @@ instance ToJSON DealTerms where

51545158

51555159--

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

5157−data MarketplaceLabel = MarketplaceLabel

5161+data MarketplaceLabel = MarketplaceLabel'

51585162 { _mlDeprecatedMarketplaceDealParty :: !(Maybe MarketplaceDealParty)

51595163 , _mlAccountId :: !(Maybe Text)

51605164 , _mlCreateTimeMs :: !(Maybe (Textual Int64))

@@ -5175,7 +5179,7 @@ data MarketplaceLabel = MarketplaceLabel

51755179marketplaceLabel

51765180 :: MarketplaceLabel

51775181marketplaceLabel =

5178− MarketplaceLabel

5182+ MarketplaceLabel'

51795183 { _mlDeprecatedMarketplaceDealParty = Nothing

51805184 , _mlAccountId = Nothing

51815185 , _mlCreateTimeMs = Nothing

@@ -5208,14 +5212,14 @@ instance FromJSON MarketplaceLabel where

52085212 parseJSON

52095213 = withObject "MarketplaceLabel"

52105214 (\ o ->

5211− MarketplaceLabel <$>

5215+ MarketplaceLabel' <$>

52125216 (o .:? "deprecatedMarketplaceDealParty") <*>

52135217 (o .:? "accountId")

52145218 <*> (o .:? "createTimeMs")

52155219 <*> (o .:? "label"))

52165220

52175221instance ToJSON MarketplaceLabel where

5218− toJSON MarketplaceLabel{..}

5222+ toJSON MarketplaceLabel'{..}

52195223 = object

52205224 (catMaybes

52215225 [("deprecatedMarketplaceDealParty" .=) <$>

@@ -5226,7 +5230,7 @@ instance ToJSON MarketplaceLabel where

52265230

52275231--

52285232-- /See:/ 'buyer' smart constructor.

5229−newtype Buyer = Buyer

5233+newtype Buyer = Buyer'

52305234 { _buyAccountId :: Maybe Text

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

52325236

@@ -5238,7 +5242,7 @@ newtype Buyer = Buyer

52385242buyer

52395243 :: Buyer

52405244buyer =

5241− Buyer

5245+ Buyer'

52425246 { _buyAccountId = Nothing

52435247 }

52445248

@@ -5250,16 +5254,16 @@ buyAccountId

52505254instance FromJSON Buyer where

52515255 parseJSON

52525256 = withObject "Buyer"

5253− (\ o -> Buyer <$> (o .:? "accountId"))

5257+ (\ o -> Buyer' <$> (o .:? "accountId"))

52545258

52555259instance ToJSON Buyer where

5256− toJSON Buyer{..}

5260+ toJSON Buyer'{..}

52575261 = object

52585262 (catMaybes [("accountId" .=) <$> _buyAccountId])

52595263

52605264--

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

5262−data AddOrderDealsRequest = AddOrderDealsRequest

5266+data AddOrderDealsRequest = AddOrderDealsRequest'

52635267 { _aUpdateAction :: !(Maybe Text)

52645268 , _aDeals :: !(Maybe [MarketplaceDeal])

52655269 , _aProposalRevisionNumber :: !(Maybe (Textual Int64))

@@ -5277,7 +5281,7 @@ data AddOrderDealsRequest = AddOrderDealsRequest

52775281addOrderDealsRequest

52785282 :: AddOrderDealsRequest

52795283addOrderDealsRequest =

5280− AddOrderDealsRequest

5284+ AddOrderDealsRequest'

52815285 { _aUpdateAction = Nothing

52825286 , _aDeals = Nothing

52835287 , _aProposalRevisionNumber = Nothing

@@ -5306,12 +5310,12 @@ instance FromJSON AddOrderDealsRequest where

53065310 parseJSON

53075311 = withObject "AddOrderDealsRequest"

53085312 (\ o ->

5309− AddOrderDealsRequest <$>

5313+ AddOrderDealsRequest' <$>

53105314 (o .:? "updateAction") <*> (o .:? "deals" .!= mempty)

53115315 <*> (o .:? "proposalRevisionNumber"))

53125316

53135317instance ToJSON AddOrderDealsRequest where

5314− toJSON AddOrderDealsRequest{..}

5318+ toJSON AddOrderDealsRequest'{..}

53155319 = object

53165320 (catMaybes

53175321 [("updateAction" .=) <$> _aUpdateAction,

@@ -5321,7 +5325,7 @@ instance ToJSON AddOrderDealsRequest where

53215325

53225326--

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

5324−data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms

5328+data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms'

53255329 { _dtgfptGuaranteedLooks :: !(Maybe (Textual Int64))

53265330 , _dtgfptGuaranteedImpressions :: !(Maybe (Textual Int64))

53275331 , _dtgfptFixedPrices :: !(Maybe [PricePerBuyer])

@@ -5339,7 +5343,7 @@ data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms

53395343dealTermsGuaranteedFixedPriceTerms

53405344 :: DealTermsGuaranteedFixedPriceTerms

53415345dealTermsGuaranteedFixedPriceTerms =

5342− DealTermsGuaranteedFixedPriceTerms

5346+ DealTermsGuaranteedFixedPriceTerms'

53435347 { _dtgfptGuaranteedLooks = Nothing

53445348 , _dtgfptGuaranteedImpressions = Nothing

53455349 , _dtgfptFixedPrices = Nothing

@@ -5373,14 +5377,14 @@ instance FromJSON DealTermsGuaranteedFixedPriceTerms

53735377 parseJSON

53745378 = withObject "DealTermsGuaranteedFixedPriceTerms"

53755379 (\ o ->

5376− DealTermsGuaranteedFixedPriceTerms <$>

5380+ DealTermsGuaranteedFixedPriceTerms' <$>

53775381 (o .:? "guaranteedLooks") <*>

53785382 (o .:? "guaranteedImpressions")

53795383 <*> (o .:? "fixedPrices" .!= mempty))

53805384

53815385instance ToJSON DealTermsGuaranteedFixedPriceTerms

53825386 where

5383− toJSON DealTermsGuaranteedFixedPriceTerms{..}

5387+ toJSON DealTermsGuaranteedFixedPriceTerms'{..}

53845388 = object

53855389 (catMaybes

53865390 [("guaranteedLooks" .=) <$> _dtgfptGuaranteedLooks,

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

@@ -51,7 +51,7 @@ type AccountsGetResource =

5151-- | Gets one account by ID.

5252--

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

54−newtype AccountsGet = AccountsGet

54+newtype AccountsGet = AccountsGet'

5555 { _agId :: Textual Int32

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

5757

@@ -64,7 +64,7 @@ accountsGet

6464 :: Int32 -- ^ 'agId'

6565 -> AccountsGet

6666accountsGet pAgId_ =

67− AccountsGet

67+ AccountsGet'

6868 { _agId = _Coerce # pAgId_

6969 }

7070

@@ -76,7 +76,7 @@ instance GoogleRequest AccountsGet where

7676 type Rs AccountsGet = Account

7777 type Scopes AccountsGet =

7878 '["https://www.googleapis.com/auth/adexchange.buyer"]

79− requestClient AccountsGet{..}

79+ requestClient AccountsGet'{..}

8080 = go _agId (Just AltJSON) adExchangeBuyerService

8181 where go

8282 = buildClient (Proxy :: Proxy AccountsGetResource)

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

@@ -49,20 +49,20 @@ type AccountsListResource =

4949--

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

5151data AccountsList' =

52− AccountsList'

52+ AccountsList''

5353 deriving (Eq,Show,Data,Typeable,Generic)

5454

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

5656--

5757accountsList'

5858 :: AccountsList'

59−accountsList' = AccountsList'

59+accountsList' = AccountsList''

6060

6161instance GoogleRequest AccountsList' where

6262 type Rs AccountsList' = AccountsList

6363 type Scopes AccountsList' =

6464 '["https://www.googleapis.com/auth/adexchange.buyer"]

65− requestClient AccountsList'{}

65+ requestClient AccountsList''{}

6666 = go (Just AltJSON) adExchangeBuyerService

6767 where go

6868 = buildClient (Proxy :: Proxy AccountsListResource)

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

@@ -53,7 +53,7 @@ type AccountsPatchResource =

5353-- | Updates an existing account. This method supports patch semantics.

5454--

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

56−data AccountsPatch = AccountsPatch

56+data AccountsPatch = AccountsPatch'

5757 { _apPayload :: !Account

5858 , _apId :: !(Textual Int32)

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

@@ -70,7 +70,7 @@ accountsPatch

7070 -> Int32 -- ^ 'apId'

7171 -> AccountsPatch

7272accountsPatch pApPayload_ pApId_ =

73− AccountsPatch

73+ AccountsPatch'

7474 { _apPayload = pApPayload_

7575 , _apId = _Coerce # pApId_

7676 }

@@ -88,7 +88,7 @@ instance GoogleRequest AccountsPatch where

8888 type Rs AccountsPatch = Account

8989 type Scopes AccountsPatch =

9090 '["https://www.googleapis.com/auth/adexchange.buyer"]

91− requestClient AccountsPatch{..}

91+ requestClient AccountsPatch'{..}

9292 = go _apId (Just AltJSON) _apPayload

9393 adExchangeBuyerService

9494 where go

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

@@ -53,7 +53,7 @@ type AccountsUpdateResource =

5353-- | Updates an existing account.

5454--

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

56−data AccountsUpdate = AccountsUpdate

56+data AccountsUpdate = AccountsUpdate'

5757 { _auPayload :: !Account

5858 , _auId :: !(Textual Int32)

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

@@ -70,7 +70,7 @@ accountsUpdate

7070 -> Int32 -- ^ 'auId'

7171 -> AccountsUpdate

7272accountsUpdate pAuPayload_ pAuId_ =

73− AccountsUpdate

73+ AccountsUpdate'

7474 { _auPayload = pAuPayload_

7575 , _auId = _Coerce # pAuId_

7676 }

@@ -88,7 +88,7 @@ instance GoogleRequest AccountsUpdate where

8888 type Rs AccountsUpdate = Account

8989 type Scopes AccountsUpdate =

9090 '["https://www.googleapis.com/auth/adexchange.buyer"]

91− requestClient AccountsUpdate{..}

91+ requestClient AccountsUpdate'{..}

9292 = go _auId (Just AltJSON) _auPayload

9393 adExchangeBuyerService

9494 where go

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

@@ -51,7 +51,7 @@ type BillingInfoGetResource =

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

5252--

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

54−newtype BillingInfoGet = BillingInfoGet

54+newtype BillingInfoGet = BillingInfoGet'

5555 { _bigAccountId :: Textual Int32

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

5757

@@ -64,7 +64,7 @@ billingInfoGet

6464 :: Int32 -- ^ 'bigAccountId'

6565 -> BillingInfoGet

6666billingInfoGet pBigAccountId_ =

67− BillingInfoGet

67+ BillingInfoGet'

6868 { _bigAccountId = _Coerce # pBigAccountId_

6969 }

7070

@@ -78,7 +78,7 @@ instance GoogleRequest BillingInfoGet where

7878 type Rs BillingInfoGet = BillingInfo

7979 type Scopes BillingInfoGet =

8080 '["https://www.googleapis.com/auth/adexchange.buyer"]

81− requestClient BillingInfoGet{..}

81+ requestClient BillingInfoGet'{..}

8282 = go _bigAccountId (Just AltJSON)

8383 adExchangeBuyerService

8484 where go

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

@@ -52,20 +52,20 @@ type BillingInfoListResource =

5252--

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

5454data BillingInfoList' =

55− BillingInfoList'

55+ BillingInfoList''

5656 deriving (Eq,Show,Data,Typeable,Generic)

5757

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

5959--

6060billingInfoList'

6161 :: BillingInfoList'

62−billingInfoList' = BillingInfoList'

62+billingInfoList' = BillingInfoList''

6363

6464instance GoogleRequest BillingInfoList' where

6565 type Rs BillingInfoList' = BillingInfoList

6666 type Scopes BillingInfoList' =

6767 '["https://www.googleapis.com/auth/adexchange.buyer"]

68− requestClient BillingInfoList'{}

68+ requestClient BillingInfoList''{}

6969 = go (Just AltJSON) adExchangeBuyerService

7070 where go

7171 = buildClient

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

@@ -55,7 +55,7 @@ type BudgetGetResource =

5555-- accountId and billingId.

5656--

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

58−data BudgetGet = BudgetGet

58+data BudgetGet = BudgetGet'

5959 { _bgAccountId :: !(Textual Int64)

6060 , _bgBillingId :: !(Textual Int64)

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

@@ -72,7 +72,7 @@ budgetGet

7272 -> Int64 -- ^ 'bgBillingId'

7373 -> BudgetGet

7474budgetGet pBgAccountId_ pBgBillingId_ =

75− BudgetGet

75+ BudgetGet'

7676 { _bgAccountId = _Coerce # pBgAccountId_

7777 , _bgBillingId = _Coerce # pBgBillingId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest BudgetGet where

9393 type Rs BudgetGet = Budget

9494 type Scopes BudgetGet =

9595 '["https://www.googleapis.com/auth/adexchange.buyer"]

96− requestClient BudgetGet{..}

96+ requestClient BudgetGet'{..}

9797 = go _bgAccountId _bgBillingId (Just AltJSON)

9898 adExchangeBuyerService

9999 where go

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

@@ -59,7 +59,7 @@ type BudgetPatchResource =

5959-- method supports patch semantics.

6060--

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

62−data BudgetPatch = BudgetPatch

62+data BudgetPatch = BudgetPatch'

6363 { _bpPayload :: !Budget

6464 , _bpAccountId :: !(Textual Int64)

6565 , _bpBillingId :: !(Textual Int64)

@@ -80,7 +80,7 @@ budgetPatch

8080 -> Int64 -- ^ 'bpBillingId'

8181 -> BudgetPatch

8282budgetPatch pBpPayload_ pBpAccountId_ pBpBillingId_ =

83− BudgetPatch

83+ BudgetPatch'

8484 { _bpPayload = pBpPayload_

8585 , _bpAccountId = _Coerce # pBpAccountId_

8686 , _bpBillingId = _Coerce # pBpBillingId_

@@ -107,7 +107,7 @@ instance GoogleRequest BudgetPatch where

107107 type Rs BudgetPatch = Budget

108108 type Scopes BudgetPatch =

109109 '["https://www.googleapis.com/auth/adexchange.buyer"]

110− requestClient BudgetPatch{..}

110+ requestClient BudgetPatch'{..}

111111 = go _bpAccountId _bpBillingId (Just AltJSON)

112112 _bpPayload

113113 adExchangeBuyerService

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

@@ -57,7 +57,7 @@ type BudgetUpdateResource =

5757-- accountId and billingId, with the budget amount in the request.

5858--

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

60−data BudgetUpdate = BudgetUpdate

60+data BudgetUpdate = BudgetUpdate'

6161 { _buPayload :: !Budget

6262 , _buAccountId :: !(Textual Int64)

6363 , _buBillingId :: !(Textual Int64)

@@ -78,7 +78,7 @@ budgetUpdate

7878 -> Int64 -- ^ 'buBillingId'

7979 -> BudgetUpdate

8080budgetUpdate pBuPayload_ pBuAccountId_ pBuBillingId_ =

81− BudgetUpdate

81+ BudgetUpdate'

8282 { _buPayload = pBuPayload_

8383 , _buAccountId = _Coerce # pBuAccountId_

8484 , _buBillingId = _Coerce # pBuBillingId_

@@ -105,7 +105,7 @@ instance GoogleRequest BudgetUpdate where

105105 type Rs BudgetUpdate = Budget

106106 type Scopes BudgetUpdate =

107107 '["https://www.googleapis.com/auth/adexchange.buyer"]

108− requestClient BudgetUpdate{..}

108+ requestClient BudgetUpdate'{..}

109109 = go _buAccountId _buBillingId (Just AltJSON)

110110 _buPayload

111111 adExchangeBuyerService

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs+3−3

@@ -56,7 +56,7 @@ type CreativesAddDealResource =

5656-- | Add a deal id association for the creative.

5757--

5858-- /See:/ 'creativesAddDeal' smart constructor.

59−data CreativesAddDeal = CreativesAddDeal

59+data CreativesAddDeal = CreativesAddDeal'

6060 { _cadBuyerCreativeId :: !Text

6161 , _cadDealId :: !(Textual Int64)

6262 , _cadAccountId :: !(Textual Int32)

@@ -77,7 +77,7 @@ creativesAddDeal

7777 -> Int32 -- ^ 'cadAccountId'

7878 -> CreativesAddDeal

7979creativesAddDeal pCadBuyerCreativeId_ pCadDealId_ pCadAccountId_ =

80− CreativesAddDeal

80+ CreativesAddDeal'

8181 { _cadBuyerCreativeId = pCadBuyerCreativeId_

8282 , _cadDealId = _Coerce # pCadDealId_

8383 , _cadAccountId = _Coerce # pCadAccountId_

@@ -105,7 +105,7 @@ instance GoogleRequest CreativesAddDeal where

105105 type Rs CreativesAddDeal = ()

106106 type Scopes CreativesAddDeal =

107107 '["https://www.googleapis.com/auth/adexchange.buyer"]

108− requestClient CreativesAddDeal{..}

108+ requestClient CreativesAddDeal'{..}

109109 = go _cadAccountId _cadBuyerCreativeId _cadDealId

110110 (Just AltJSON)

111111 adExchangeBuyerService

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

@@ -55,7 +55,7 @@ type CreativesGetResource =

5555-- 30-40 minutes after submission.

5656--

5757-- /See:/ 'creativesGet' smart constructor.

58−data CreativesGet = CreativesGet

58+data CreativesGet = CreativesGet'

5959 { _cgBuyerCreativeId :: !Text

6060 , _cgAccountId :: !(Textual Int32)

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

@@ -72,7 +72,7 @@ creativesGet

7272 -> Int32 -- ^ 'cgAccountId'

7373 -> CreativesGet

7474creativesGet pCgBuyerCreativeId_ pCgAccountId_ =

75− CreativesGet

75+ CreativesGet'

7676 { _cgBuyerCreativeId = pCgBuyerCreativeId_

7777 , _cgAccountId = _Coerce # pCgAccountId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest CreativesGet where

9393 type Rs CreativesGet = Creative

9494 type Scopes CreativesGet =

9595 '["https://www.googleapis.com/auth/adexchange.buyer"]

96− requestClient CreativesGet{..}

96+ requestClient CreativesGet'{..}

9797 = go _cgAccountId _cgBuyerCreativeId (Just AltJSON)

9898 adExchangeBuyerService

9999 where go

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

@@ -51,7 +51,7 @@ type CreativesInsertResource =

5151-- | Submit a new creative.

5252--

5353-- /See:/ 'creativesInsert' smart constructor.

54−newtype CreativesInsert = CreativesInsert

54+newtype CreativesInsert = CreativesInsert'

5555 { _ciPayload :: Creative

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

5757

@@ -64,7 +64,7 @@ creativesInsert

6464 :: Creative -- ^ 'ciPayload'

6565 -> CreativesInsert

6666creativesInsert pCiPayload_ =

67− CreativesInsert

67+ CreativesInsert'

6868 { _ciPayload = pCiPayload_

6969 }

7070

@@ -77,7 +77,7 @@ instance GoogleRequest CreativesInsert where

7777 type Rs CreativesInsert = Creative

7878 type Scopes CreativesInsert =

7979 '["https://www.googleapis.com/auth/adexchange.buyer"]

80− requestClient CreativesInsert{..}

80+ requestClient CreativesInsert'{..}

8181 = go (Just AltJSON) _ciPayload adExchangeBuyerService

8282 where go

8383 = buildClient

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

@@ -67,7 +67,7 @@ type CreativesListResource =

6767-- creative will be available 30-40 minutes after submission.

6868--

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

70−data CreativesList' = CreativesList'

70+data CreativesList' = CreativesList''

7171 { _clBuyerCreativeId :: !(Maybe [Text])

7272 , _clOpenAuctionStatusFilter :: !(Maybe CreativesListOpenAuctionStatusFilter)

7373 , _clAccountId :: !(Maybe [Textual Int32])

@@ -94,7 +94,7 @@ data CreativesList' = CreativesList'

9494creativesList'

9595 :: CreativesList'

9696creativesList' =

97− CreativesList'

97+ CreativesList''

9898 { _clBuyerCreativeId = Nothing

9999 , _clOpenAuctionStatusFilter = Nothing

100100 , _clAccountId = Nothing

@@ -151,7 +151,7 @@ instance GoogleRequest CreativesList' where

151151 type Rs CreativesList' = CreativesList

152152 type Scopes CreativesList' =

153153 '["https://www.googleapis.com/auth/adexchange.buyer"]

154− requestClient CreativesList'{..}

154+ requestClient CreativesList''{..}

155155 = go (_clBuyerCreativeId ^. _Default)

156156 _clOpenAuctionStatusFilter

157157 (_clAccountId ^. _Default)

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs+3−3

@@ -56,7 +56,7 @@ type CreativesRemoveDealResource =

5656-- | Remove a deal id associated with the creative.

5757--

5858-- /See:/ 'creativesRemoveDeal' smart constructor.

59−data CreativesRemoveDeal = CreativesRemoveDeal

59+data CreativesRemoveDeal = CreativesRemoveDeal'

6060 { _crdBuyerCreativeId :: !Text

6161 , _crdDealId :: !(Textual Int64)

6262 , _crdAccountId :: !(Textual Int32)

@@ -77,7 +77,7 @@ creativesRemoveDeal

7777 -> Int32 -- ^ 'crdAccountId'

7878 -> CreativesRemoveDeal

7979creativesRemoveDeal pCrdBuyerCreativeId_ pCrdDealId_ pCrdAccountId_ =

80− CreativesRemoveDeal

80+ CreativesRemoveDeal'

8181 { _crdBuyerCreativeId = pCrdBuyerCreativeId_

8282 , _crdDealId = _Coerce # pCrdDealId_

8383 , _crdAccountId = _Coerce # pCrdAccountId_

@@ -105,7 +105,7 @@ instance GoogleRequest CreativesRemoveDeal where

105105 type Rs CreativesRemoveDeal = ()

106106 type Scopes CreativesRemoveDeal =

107107 '["https://www.googleapis.com/auth/adexchange.buyer"]

108− requestClient CreativesRemoveDeal{..}

108+ requestClient CreativesRemoveDeal'{..}

109109 = go _crdAccountId _crdBuyerCreativeId _crdDealId

110110 (Just AltJSON)

111111 adExchangeBuyerService

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

@@ -56,7 +56,7 @@ type MarketplaceDealsDeleteResource =

5656-- | Delete the specified deals from the proposal

5757--

5858-- /See:/ 'marketplaceDealsDelete' smart constructor.

59−data MarketplaceDealsDelete = MarketplaceDealsDelete

59+data MarketplaceDealsDelete = MarketplaceDealsDelete'

6060 { _mddPayload :: !DeleteOrderDealsRequest

6161 , _mddProposalId :: !Text

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

@@ -73,7 +73,7 @@ marketplaceDealsDelete

7373 -> Text -- ^ 'mddProposalId'

7474 -> MarketplaceDealsDelete

7575marketplaceDealsDelete pMddPayload_ pMddProposalId_ =

76− MarketplaceDealsDelete

76+ MarketplaceDealsDelete'

7777 { _mddPayload = pMddPayload_

7878 , _mddProposalId = pMddProposalId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest MarketplaceDealsDelete where

9494 DeleteOrderDealsResponse

9595 type Scopes MarketplaceDealsDelete =

9696 '["https://www.googleapis.com/auth/adexchange.buyer"]

97− requestClient MarketplaceDealsDelete{..}

97+ requestClient MarketplaceDealsDelete'{..}

9898 = go _mddProposalId (Just AltJSON) _mddPayload

9999 adExchangeBuyerService

100100 where go

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

@@ -56,7 +56,7 @@ type MarketplaceDealsInsertResource =

5656-- | Add new deals for the specified proposal

5757--

5858-- /See:/ 'marketplaceDealsInsert' smart constructor.

59−data MarketplaceDealsInsert = MarketplaceDealsInsert

59+data MarketplaceDealsInsert = MarketplaceDealsInsert'

6060 { _mdiPayload :: !AddOrderDealsRequest

6161 , _mdiProposalId :: !Text

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

@@ -73,7 +73,7 @@ marketplaceDealsInsert

7373 -> Text -- ^ 'mdiProposalId'

7474 -> MarketplaceDealsInsert

7575marketplaceDealsInsert pMdiPayload_ pMdiProposalId_ =

76− MarketplaceDealsInsert

76+ MarketplaceDealsInsert'

7777 { _mdiPayload = pMdiPayload_

7878 , _mdiProposalId = pMdiProposalId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest MarketplaceDealsInsert where

9494 AddOrderDealsResponse

9595 type Scopes MarketplaceDealsInsert =

9696 '["https://www.googleapis.com/auth/adexchange.buyer"]

97− requestClient MarketplaceDealsInsert{..}

97+ requestClient MarketplaceDealsInsert'{..}

9898 = go _mdiProposalId (Just AltJSON) _mdiPayload

9999 adExchangeBuyerService

100100 where go

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

@@ -53,7 +53,7 @@ type MarketplaceDealsListResource =

5353-- | List all the deals for a given proposal

5454--

5555-- /See:/ 'marketplaceDealsList' smart constructor.

56−newtype MarketplaceDealsList = MarketplaceDealsList

56+newtype MarketplaceDealsList = MarketplaceDealsList'

5757 { _mdlProposalId :: Text

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

5959

@@ -66,7 +66,7 @@ marketplaceDealsList

6666 :: Text -- ^ 'mdlProposalId'

6767 -> MarketplaceDealsList

6868marketplaceDealsList pMdlProposalId_ =

69− MarketplaceDealsList

69+ MarketplaceDealsList'

7070 { _mdlProposalId = pMdlProposalId_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest MarketplaceDealsList where

8080 type Rs MarketplaceDealsList = GetOrderDealsResponse

8181 type Scopes MarketplaceDealsList =

8282 '["https://www.googleapis.com/auth/adexchange.buyer"]

83− requestClient MarketplaceDealsList{..}

83+ requestClient MarketplaceDealsList'{..}

8484 = go _mdlProposalId (Just AltJSON)

8585 adExchangeBuyerService

8686 where go

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

@@ -56,7 +56,7 @@ type MarketplaceDealsUpdateResource =

5656-- | Replaces all the deals in the proposal with the passed in deals

5757--

5858-- /See:/ 'marketplaceDealsUpdate' smart constructor.

59−data MarketplaceDealsUpdate = MarketplaceDealsUpdate

59+data MarketplaceDealsUpdate = MarketplaceDealsUpdate'

6060 { _mduPayload :: !EditAllOrderDealsRequest

6161 , _mduProposalId :: !Text

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

@@ -73,7 +73,7 @@ marketplaceDealsUpdate

7373 -> Text -- ^ 'mduProposalId'

7474 -> MarketplaceDealsUpdate

7575marketplaceDealsUpdate pMduPayload_ pMduProposalId_ =

76− MarketplaceDealsUpdate

76+ MarketplaceDealsUpdate'

7777 { _mduPayload = pMduPayload_

7878 , _mduProposalId = pMduProposalId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest MarketplaceDealsUpdate where

9494 EditAllOrderDealsResponse

9595 type Scopes MarketplaceDealsUpdate =

9696 '["https://www.googleapis.com/auth/adexchange.buyer"]

97− requestClient MarketplaceDealsUpdate{..}

97+ requestClient MarketplaceDealsUpdate'{..}

9898 = go _mduProposalId (Just AltJSON) _mduPayload

9999 adExchangeBuyerService

100100 where go

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

@@ -56,7 +56,7 @@ type MarketplaceNotesInsertResource =

5656-- | Add notes to the proposal

5757--

5858-- /See:/ 'marketplaceNotesInsert' smart constructor.

59−data MarketplaceNotesInsert = MarketplaceNotesInsert

59+data MarketplaceNotesInsert = MarketplaceNotesInsert'

6060 { _mniPayload :: !AddOrderNotesRequest

6161 , _mniProposalId :: !Text

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

@@ -73,7 +73,7 @@ marketplaceNotesInsert

7373 -> Text -- ^ 'mniProposalId'

7474 -> MarketplaceNotesInsert

7575marketplaceNotesInsert pMniPayload_ pMniProposalId_ =

76− MarketplaceNotesInsert

76+ MarketplaceNotesInsert'

7777 { _mniPayload = pMniPayload_

7878 , _mniProposalId = pMniProposalId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest MarketplaceNotesInsert where

9494 AddOrderNotesResponse

9595 type Scopes MarketplaceNotesInsert =

9696 '["https://www.googleapis.com/auth/adexchange.buyer"]

97− requestClient MarketplaceNotesInsert{..}

97+ requestClient MarketplaceNotesInsert'{..}

9898 = go _mniProposalId (Just AltJSON) _mniPayload

9999 adExchangeBuyerService

100100 where go

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

@@ -53,7 +53,7 @@ type MarketplaceNotesListResource =

5353-- | Get all the notes associated with a proposal

5454--

5555-- /See:/ 'marketplaceNotesList' smart constructor.

56−newtype MarketplaceNotesList = MarketplaceNotesList

56+newtype MarketplaceNotesList = MarketplaceNotesList'

5757 { _mnlProposalId :: Text

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

5959

@@ -66,7 +66,7 @@ marketplaceNotesList

6666 :: Text -- ^ 'mnlProposalId'

6767 -> MarketplaceNotesList

6868marketplaceNotesList pMnlProposalId_ =

69− MarketplaceNotesList

69+ MarketplaceNotesList'

7070 { _mnlProposalId = pMnlProposalId_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest MarketplaceNotesList where

8080 type Rs MarketplaceNotesList = GetOrderNotesResponse

8181 type Scopes MarketplaceNotesList =

8282 '["https://www.googleapis.com/auth/adexchange.buyer"]

83− requestClient MarketplaceNotesList{..}

83+ requestClient MarketplaceNotesList'{..}

8484 = go _mnlProposalId (Just AltJSON)

8585 adExchangeBuyerService

8686 where go

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

@@ -60,7 +60,7 @@ type PerformanceReportListResource =

6060-- | Retrieves the authenticated user\'s list of performance metrics.

6161--

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

63−data PerformanceReportList' = PerformanceReportList'

63+data PerformanceReportList' = PerformanceReportList''

6464 { _prlAccountId :: !(Textual Int64)

6565 , _prlPageToken :: !(Maybe Text)

6666 , _prlEndDateTime :: !Text

@@ -87,7 +87,7 @@ performanceReportList'

8787 -> Text -- ^ 'prlStartDateTime'

8888 -> PerformanceReportList'

8989performanceReportList' pPrlAccountId_ pPrlEndDateTime_ pPrlStartDateTime_ =

90− PerformanceReportList'

90+ PerformanceReportList''

9191 { _prlAccountId = _Coerce # pPrlAccountId_

9292 , _prlPageToken = Nothing

9393 , _prlEndDateTime = pPrlEndDateTime_

@@ -133,7 +133,7 @@ instance GoogleRequest PerformanceReportList' where

133133 PerformanceReportList

134134 type Scopes PerformanceReportList' =

135135 '["https://www.googleapis.com/auth/adexchange.buyer"]

136− requestClient PerformanceReportList'{..}

136+ requestClient PerformanceReportList''{..}

137137 = go (Just _prlAccountId) (Just _prlEndDateTime)

138138 (Just _prlStartDateTime)

139139 _prlPageToken

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

@@ -53,7 +53,7 @@ type PretargetingConfigDeleteResource =

5353-- | Deletes an existing pretargeting config.

5454--

5555-- /See:/ 'pretargetingConfigDelete' smart constructor.

56−data PretargetingConfigDelete = PretargetingConfigDelete

56+data PretargetingConfigDelete = PretargetingConfigDelete'

5757 { _pcdAccountId :: !(Textual Int64)

5858 , _pcdConfigId :: !(Textual Int64)

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

@@ -70,7 +70,7 @@ pretargetingConfigDelete

7070 -> Int64 -- ^ 'pcdConfigId'

7171 -> PretargetingConfigDelete

7272pretargetingConfigDelete pPcdAccountId_ pPcdConfigId_ =

73− PretargetingConfigDelete

73+ PretargetingConfigDelete'

7474 { _pcdAccountId = _Coerce # pPcdAccountId_

7575 , _pcdConfigId = _Coerce # pPcdConfigId_

7676 }

@@ -91,7 +91,7 @@ instance GoogleRequest PretargetingConfigDelete where

9191 type Rs PretargetingConfigDelete = ()

9292 type Scopes PretargetingConfigDelete =

9393 '["https://www.googleapis.com/auth/adexchange.buyer"]

94− requestClient PretargetingConfigDelete{..}

94+ requestClient PretargetingConfigDelete'{..}

9595 = go _pcdAccountId _pcdConfigId (Just AltJSON)

9696 adExchangeBuyerService

9797 where go

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

@@ -54,7 +54,7 @@ type PretargetingConfigGetResource =

5454-- | Gets a specific pretargeting configuration

5555--

5656-- /See:/ 'pretargetingConfigGet' smart constructor.

57−data PretargetingConfigGet = PretargetingConfigGet

57+data PretargetingConfigGet = PretargetingConfigGet'

5858 { _pcgAccountId :: !(Textual Int64)

5959 , _pcgConfigId :: !(Textual Int64)

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

@@ -71,7 +71,7 @@ pretargetingConfigGet

7171 -> Int64 -- ^ 'pcgConfigId'

7272 -> PretargetingConfigGet

7373pretargetingConfigGet pPcgAccountId_ pPcgConfigId_ =

74− PretargetingConfigGet

74+ PretargetingConfigGet'

7575 { _pcgAccountId = _Coerce # pPcgAccountId_

7676 , _pcgConfigId = _Coerce # pPcgConfigId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest PretargetingConfigGet where

9292 type Rs PretargetingConfigGet = PretargetingConfig

9393 type Scopes PretargetingConfigGet =

9494 '["https://www.googleapis.com/auth/adexchange.buyer"]

95− requestClient PretargetingConfigGet{..}

95+ requestClient PretargetingConfigGet'{..}

9696 = go _pcgAccountId _pcgConfigId (Just AltJSON)

9797 adExchangeBuyerService

9898 where go

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

@@ -54,7 +54,7 @@ type PretargetingConfigInsertResource =

5454-- | Inserts a new pretargeting configuration.

5555--

5656-- /See:/ 'pretargetingConfigInsert' smart constructor.

57−data PretargetingConfigInsert = PretargetingConfigInsert

57+data PretargetingConfigInsert = PretargetingConfigInsert'

5858 { _pciPayload :: !PretargetingConfig

5959 , _pciAccountId :: !(Textual Int64)

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

@@ -71,7 +71,7 @@ pretargetingConfigInsert

7171 -> Int64 -- ^ 'pciAccountId'

7272 -> PretargetingConfigInsert

7373pretargetingConfigInsert pPciPayload_ pPciAccountId_ =

74− PretargetingConfigInsert

74+ PretargetingConfigInsert'

7575 { _pciPayload = pPciPayload_

7676 , _pciAccountId = _Coerce # pPciAccountId_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest PretargetingConfigInsert where

9191 type Rs PretargetingConfigInsert = PretargetingConfig

9292 type Scopes PretargetingConfigInsert =

9393 '["https://www.googleapis.com/auth/adexchange.buyer"]

94− requestClient PretargetingConfigInsert{..}

94+ requestClient PretargetingConfigInsert'{..}

9595 = go _pciAccountId (Just AltJSON) _pciPayload

9696 adExchangeBuyerService

9797 where go

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

@@ -54,7 +54,7 @@ type PretargetingConfigListResource =

5454-- configurations.

5555--

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

57−newtype PretargetingConfigList' = PretargetingConfigList'

57+newtype PretargetingConfigList' = PretargetingConfigList''

5858 { _pclAccountId :: Textual Int64

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

6060

@@ -67,7 +67,7 @@ pretargetingConfigList'

6767 :: Int64 -- ^ 'pclAccountId'

6868 -> PretargetingConfigList'

6969pretargetingConfigList' pPclAccountId_ =

70− PretargetingConfigList'

70+ PretargetingConfigList''

7171 { _pclAccountId = _Coerce # pPclAccountId_

7272 }

7373

@@ -82,7 +82,7 @@ instance GoogleRequest PretargetingConfigList' where

8282 PretargetingConfigList

8383 type Scopes PretargetingConfigList' =

8484 '["https://www.googleapis.com/auth/adexchange.buyer"]

85− requestClient PretargetingConfigList'{..}

85+ requestClient PretargetingConfigList''{..}

8686 = go _pclAccountId (Just AltJSON)

8787 adExchangeBuyerService

8888 where go

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

@@ -58,7 +58,7 @@ type PretargetingConfigPatchResource =

5858-- semantics.

5959--

6060-- /See:/ 'pretargetingConfigPatch' smart constructor.

61−data PretargetingConfigPatch = PretargetingConfigPatch

61+data PretargetingConfigPatch = PretargetingConfigPatch'

6262 { _pcpPayload :: !PretargetingConfig

6363 , _pcpAccountId :: !(Textual Int64)

6464 , _pcpConfigId :: !(Textual Int64)

@@ -79,7 +79,7 @@ pretargetingConfigPatch

7979 -> Int64 -- ^ 'pcpConfigId'

8080 -> PretargetingConfigPatch

8181pretargetingConfigPatch pPcpPayload_ pPcpAccountId_ pPcpConfigId_ =

82− PretargetingConfigPatch

82+ PretargetingConfigPatch'

8383 { _pcpPayload = pPcpPayload_

8484 , _pcpAccountId = _Coerce # pPcpAccountId_

8585 , _pcpConfigId = _Coerce # pPcpConfigId_

@@ -106,7 +106,7 @@ instance GoogleRequest PretargetingConfigPatch where

106106 type Rs PretargetingConfigPatch = PretargetingConfig

107107 type Scopes PretargetingConfigPatch =

108108 '["https://www.googleapis.com/auth/adexchange.buyer"]

109− requestClient PretargetingConfigPatch{..}

109+ requestClient PretargetingConfigPatch'{..}

110110 = go _pcpAccountId _pcpConfigId (Just AltJSON)

111111 _pcpPayload

112112 adExchangeBuyerService

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

@@ -56,7 +56,7 @@ type PretargetingConfigUpdateResource =

5656-- | Updates an existing pretargeting config.

5757--

5858-- /See:/ 'pretargetingConfigUpdate' smart constructor.

59−data PretargetingConfigUpdate = PretargetingConfigUpdate

59+data PretargetingConfigUpdate = PretargetingConfigUpdate'

6060 { _pcuPayload :: !PretargetingConfig

6161 , _pcuAccountId :: !(Textual Int64)

6262 , _pcuConfigId :: !(Textual Int64)

@@ -77,7 +77,7 @@ pretargetingConfigUpdate

7777 -> Int64 -- ^ 'pcuConfigId'

7878 -> PretargetingConfigUpdate

7979pretargetingConfigUpdate pPcuPayload_ pPcuAccountId_ pPcuConfigId_ =

80− PretargetingConfigUpdate

80+ PretargetingConfigUpdate'

8181 { _pcuPayload = pPcuPayload_

8282 , _pcuAccountId = _Coerce # pPcuAccountId_

8383 , _pcuConfigId = _Coerce # pPcuConfigId_

@@ -104,7 +104,7 @@ instance GoogleRequest PretargetingConfigUpdate where

104104 type Rs PretargetingConfigUpdate = PretargetingConfig

105105 type Scopes PretargetingConfigUpdate =

106106 '["https://www.googleapis.com/auth/adexchange.buyer"]

107− requestClient PretargetingConfigUpdate{..}

107+ requestClient PretargetingConfigUpdate'{..}

108108 = go _pcuAccountId _pcuConfigId (Just AltJSON)

109109 _pcuPayload

110110 adExchangeBuyerService

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs+3−3

@@ -51,7 +51,7 @@ type ProductsGetResource =

5151-- | Gets the requested product by id.

5252--

5353-- /See:/ 'productsGet' smart constructor.

54−newtype ProductsGet = ProductsGet

54+newtype ProductsGet = ProductsGet'

5555 { _pgProductId :: Text

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

5757

@@ -64,7 +64,7 @@ productsGet

6464 :: Text -- ^ 'pgProductId'

6565 -> ProductsGet

6666productsGet pPgProductId_ =

67− ProductsGet

67+ ProductsGet'

6868 { _pgProductId = pPgProductId_

6969 }

7070

@@ -77,7 +77,7 @@ instance GoogleRequest ProductsGet where

7777 type Rs ProductsGet = Product

7878 type Scopes ProductsGet =

7979 '["https://www.googleapis.com/auth/adexchange.buyer"]

80− requestClient ProductsGet{..}

80+ requestClient ProductsGet'{..}

8181 = go _pgProductId (Just AltJSON)

8282 adExchangeBuyerService

8383 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs+3−3

@@ -53,7 +53,7 @@ type ProductsSearchResource =

5353-- | Gets the requested product.

5454--

5555-- /See:/ 'productsSearch' smart constructor.

56−newtype ProductsSearch = ProductsSearch

56+newtype ProductsSearch = ProductsSearch'

5757 { _psPqlQuery :: Maybe Text

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

5959

@@ -65,7 +65,7 @@ newtype ProductsSearch = ProductsSearch

6565productsSearch

6666 :: ProductsSearch

6767productsSearch =

68− ProductsSearch

68+ ProductsSearch'

6969 { _psPqlQuery = Nothing

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest ProductsSearch where

7878 type Rs ProductsSearch = GetOffersResponse

7979 type Scopes ProductsSearch =

8080 '["https://www.googleapis.com/auth/adexchange.buyer"]

81− requestClient ProductsSearch{..}

81+ requestClient ProductsSearch'{..}

8282 = go _psPqlQuery (Just AltJSON)

8383 adExchangeBuyerService

8484 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs+3−3

@@ -51,7 +51,7 @@ type ProposalsGetResource =

5151-- | Get a proposal given its id

5252--

5353-- /See:/ 'proposalsGet' smart constructor.

54−newtype ProposalsGet = ProposalsGet

54+newtype ProposalsGet = ProposalsGet'

5555 { _pgProposalId :: Text

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

5757

@@ -64,7 +64,7 @@ proposalsGet

6464 :: Text -- ^ 'pgProposalId'

6565 -> ProposalsGet

6666proposalsGet pPgProposalId_ =

67− ProposalsGet

67+ ProposalsGet'

6868 { _pgProposalId = pPgProposalId_

6969 }

7070

@@ -77,7 +77,7 @@ instance GoogleRequest ProposalsGet where

7777 type Rs ProposalsGet = Proposal

7878 type Scopes ProposalsGet =

7979 '["https://www.googleapis.com/auth/adexchange.buyer"]

80− requestClient ProposalsGet{..}

80+ requestClient ProposalsGet'{..}

8181 = go _pgProposalId (Just AltJSON)

8282 adExchangeBuyerService

8383 where go

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs+3−3

@@ -53,7 +53,7 @@ type ProposalsInsertResource =

5353-- | Create the given list of proposals

5454--

5555-- /See:/ 'proposalsInsert' smart constructor.

56−newtype ProposalsInsert = ProposalsInsert

56+newtype ProposalsInsert = ProposalsInsert'

5757 { _piPayload :: CreateOrdersRequest

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

5959

@@ -66,7 +66,7 @@ proposalsInsert

6666 :: CreateOrdersRequest -- ^ 'piPayload'

6767 -> ProposalsInsert

6868proposalsInsert pPiPayload_ =

69− ProposalsInsert

69+ ProposalsInsert'

7070 { _piPayload = pPiPayload_

7171 }

7272

@@ -79,7 +79,7 @@ instance GoogleRequest ProposalsInsert where

7979 type Rs ProposalsInsert = CreateOrdersResponse

8080 type Scopes ProposalsInsert =

8181 '["https://www.googleapis.com/auth/adexchange.buyer"]

82− requestClient ProposalsInsert{..}

82+ requestClient ProposalsInsert'{..}

8383 = go (Just AltJSON) _piPayload adExchangeBuyerService

8484 where go

8585 = buildClient

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs+3−3

@@ -57,7 +57,7 @@ type ProposalsPatchResource =

5757-- | Update the given proposal. This method supports patch semantics.

5858--

5959-- /See:/ 'proposalsPatch' smart constructor.

60−data ProposalsPatch = ProposalsPatch

60+data ProposalsPatch = ProposalsPatch'

6161 { _ppUpdateAction :: !ProposalsPatchUpdateAction

6262 , _ppRevisionNumber :: !(Textual Int64)

6363 , _ppPayload :: !Proposal

@@ -82,7 +82,7 @@ proposalsPatch

8282 -> Text -- ^ 'ppProposalId'

8383 -> ProposalsPatch

8484proposalsPatch pPpUpdateAction_ pPpRevisionNumber_ pPpPayload_ pPpProposalId_ =

85− ProposalsPatch

85+ ProposalsPatch'

8686 { _ppUpdateAction = pPpUpdateAction_

8787 , _ppRevisionNumber = _Coerce # pPpRevisionNumber_

8888 , _ppPayload = pPpPayload_

@@ -119,7 +119,7 @@ instance GoogleRequest ProposalsPatch where

119119 type Rs ProposalsPatch = Proposal

120120 type Scopes ProposalsPatch =

121121 '["https://www.googleapis.com/auth/adexchange.buyer"]

122− requestClient ProposalsPatch{..}

122+ requestClient ProposalsPatch'{..}

123123 = go _ppProposalId _ppRevisionNumber _ppUpdateAction

124124 (Just AltJSON)

125125 _ppPayload

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs+3−3

@@ -53,7 +53,7 @@ type ProposalsSearchResource =

5353-- | Search for proposals using pql query

5454--

5555-- /See:/ 'proposalsSearch' smart constructor.

56−newtype ProposalsSearch = ProposalsSearch

56+newtype ProposalsSearch = ProposalsSearch'

5757 { _pPqlQuery :: Maybe Text

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

5959

@@ -65,7 +65,7 @@ newtype ProposalsSearch = ProposalsSearch

6565proposalsSearch

6666 :: ProposalsSearch

6767proposalsSearch =

68− ProposalsSearch

68+ ProposalsSearch'

6969 { _pPqlQuery = Nothing

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest ProposalsSearch where

7878 type Rs ProposalsSearch = GetOrdersResponse

7979 type Scopes ProposalsSearch =

8080 '["https://www.googleapis.com/auth/adexchange.buyer"]

81− requestClient ProposalsSearch{..}

81+ requestClient ProposalsSearch'{..}

8282 = go _pPqlQuery (Just AltJSON) adExchangeBuyerService

8383 where go

8484 = buildClient

gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs+3−3

@@ -57,7 +57,7 @@ type ProposalsUpdateResource =

5757-- | Update the given proposal

5858--

5959-- /See:/ 'proposalsUpdate' smart constructor.

60−data ProposalsUpdate = ProposalsUpdate

60+data ProposalsUpdate = ProposalsUpdate'

6161 { _puUpdateAction :: !ProposalsUpdateUpdateAction

6262 , _puRevisionNumber :: !(Textual Int64)

6363 , _puPayload :: !Proposal

@@ -82,7 +82,7 @@ proposalsUpdate

8282 -> Text -- ^ 'puProposalId'

8383 -> ProposalsUpdate

8484proposalsUpdate pPuUpdateAction_ pPuRevisionNumber_ pPuPayload_ pPuProposalId_ =

85− ProposalsUpdate

85+ ProposalsUpdate'

8686 { _puUpdateAction = pPuUpdateAction_

8787 , _puRevisionNumber = _Coerce # pPuRevisionNumber_

8888 , _puPayload = pPuPayload_

@@ -119,7 +119,7 @@ instance GoogleRequest ProposalsUpdate where

119119 type Rs ProposalsUpdate = Proposal

120120 type Scopes ProposalsUpdate =

121121 '["https://www.googleapis.com/auth/adexchange.buyer"]

122− requestClient ProposalsUpdate{..}

122+ requestClient ProposalsUpdate'{..}

123123 = go _puProposalId _puRevisionNumber _puUpdateAction

124124 (Just AltJSON)

125125 _puPayload

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

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

2222

2323--

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

25−data AdClients = AdClients

25+data AdClients = AdClients'

2626 { _acEtag :: !(Maybe Text)

2727 , _acNextPageToken :: !(Maybe Text)

2828 , _acKind :: !Text

@@ -43,7 +43,7 @@ data AdClients = AdClients

4343adClients

4444 :: AdClients

4545adClients =

46− AdClients

46+ AdClients'

4747 { _acEtag = Nothing

4848 , _acNextPageToken = Nothing

4949 , _acKind = "adexchangeseller#adClients"

@@ -75,13 +75,13 @@ instance FromJSON AdClients where

7575 parseJSON

7676 = withObject "AdClients"

7777 (\ o ->

78− AdClients <$>

78+ AdClients' <$>

7979 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

8080 (o .:? "kind" .!= "adexchangeseller#adClients")

8181 <*> (o .:? "items" .!= mempty))

8282

8383instance ToJSON AdClients where

84− toJSON AdClients{..}

84+ toJSON AdClients'{..}

8585 = object

8686 (catMaybes

8787 [("etag" .=) <$> _acEtag,

@@ -90,7 +90,7 @@ instance ToJSON AdClients where

9090

9191--

9292-- /See:/ 'reportingMetadataEntry' smart constructor.

93−data ReportingMetadataEntry = ReportingMetadataEntry

93+data ReportingMetadataEntry = ReportingMetadataEntry'

9494 { _rmeKind :: !Text

9595 , _rmeRequiredMetrics :: !(Maybe [Text])

9696 , _rmeCompatibleMetrics :: !(Maybe [Text])

@@ -120,7 +120,7 @@ data ReportingMetadataEntry = ReportingMetadataEntry

120120reportingMetadataEntry

121121 :: ReportingMetadataEntry

122122reportingMetadataEntry =

123− ReportingMetadataEntry

123+ ReportingMetadataEntry'

124124 { _rmeKind = "adexchangeseller#reportingMetadataEntry"

125125 , _rmeRequiredMetrics = Nothing

126126 , _rmeCompatibleMetrics = Nothing

@@ -194,7 +194,7 @@ instance FromJSON ReportingMetadataEntry where

194194 parseJSON

195195 = withObject "ReportingMetadataEntry"

196196 (\ o ->

197− ReportingMetadataEntry <$>

197+ ReportingMetadataEntry' <$>

198198 (o .:? "kind" .!=

199199 "adexchangeseller#reportingMetadataEntry")

200200 <*> (o .:? "requiredMetrics" .!= mempty)

@@ -205,7 +205,7 @@ instance FromJSON ReportingMetadataEntry where

205205 <*> (o .:? "supportedProducts" .!= mempty))

206206

207207instance ToJSON ReportingMetadataEntry where

208− toJSON ReportingMetadataEntry{..}

208+ toJSON ReportingMetadataEntry'{..}

209209 = object

210210 (catMaybes

211211 [Just ("kind" .= _rmeKind),

@@ -219,7 +219,7 @@ instance ToJSON ReportingMetadataEntry where

219219

220220--

221221-- /See:/ 'accounts' smart constructor.

222−data Accounts = Accounts

222+data Accounts = Accounts'

223223 { _aEtag :: !(Maybe Text)

224224 , _aNextPageToken :: !(Maybe Text)

225225 , _aKind :: !Text

@@ -240,7 +240,7 @@ data Accounts = Accounts

240240accounts

241241 :: Accounts

242242accounts =

243− Accounts

243+ Accounts'

244244 { _aEtag = Nothing

245245 , _aNextPageToken = Nothing

246246 , _aKind = "adexchangeseller#accounts"

@@ -272,13 +272,13 @@ instance FromJSON Accounts where

272272 parseJSON

273273 = withObject "Accounts"

274274 (\ o ->

275− Accounts <$>

275+ Accounts' <$>

276276 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

277277 (o .:? "kind" .!= "adexchangeseller#accounts")

278278 <*> (o .:? "items" .!= mempty))

279279

280280instance ToJSON Accounts where

281− toJSON Accounts{..}

281+ toJSON Accounts'{..}

282282 = object

283283 (catMaybes

284284 [("etag" .=) <$> _aEtag,

@@ -287,7 +287,7 @@ instance ToJSON Accounts where

287287

288288--

289289-- /See:/ 'alerts' smart constructor.

290−data Alerts = Alerts

290+data Alerts = Alerts'

291291 { _aleKind :: !Text

292292 , _aleItems :: !(Maybe [Alert])

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

@@ -302,7 +302,7 @@ data Alerts = Alerts

302302alerts

303303 :: Alerts

304304alerts =

305− Alerts

305+ Alerts'

306306 { _aleKind = "adexchangeseller#alerts"

307307 , _aleItems = Nothing

308308 }

@@ -322,12 +322,12 @@ instance FromJSON Alerts where

322322 parseJSON

323323 = withObject "Alerts"

324324 (\ o ->

325− Alerts <$>

325+ Alerts' <$>

326326 (o .:? "kind" .!= "adexchangeseller#alerts") <*>

327327 (o .:? "items" .!= mempty))

328328

329329instance ToJSON Alerts where

330− toJSON Alerts{..}

330+ toJSON Alerts'{..}

331331 = object

332332 (catMaybes

333333 [Just ("kind" .= _aleKind),

@@ -335,7 +335,7 @@ instance ToJSON Alerts where

335335

336336--

337337-- /See:/ 'savedReports' smart constructor.

338−data SavedReports = SavedReports

338+data SavedReports = SavedReports'

339339 { _srEtag :: !(Maybe Text)

340340 , _srNextPageToken :: !(Maybe Text)

341341 , _srKind :: !Text

@@ -356,7 +356,7 @@ data SavedReports = SavedReports

356356savedReports

357357 :: SavedReports

358358savedReports =

359− SavedReports

359+ SavedReports'

360360 { _srEtag = Nothing

361361 , _srNextPageToken = Nothing

362362 , _srKind = "adexchangeseller#savedReports"

@@ -389,13 +389,13 @@ instance FromJSON SavedReports where

389389 parseJSON

390390 = withObject "SavedReports"

391391 (\ o ->

392− SavedReports <$>

392+ SavedReports' <$>

393393 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

394394 (o .:? "kind" .!= "adexchangeseller#savedReports")

395395 <*> (o .:? "items" .!= mempty))

396396

397397instance ToJSON SavedReports where

398− toJSON SavedReports{..}

398+ toJSON SavedReports'{..}

399399 = object

400400 (catMaybes

401401 [("etag" .=) <$> _srEtag,

@@ -404,7 +404,7 @@ instance ToJSON SavedReports where

404404

405405--

406406-- /See:/ 'savedReport' smart constructor.

407−data SavedReport = SavedReport

407+data SavedReport = SavedReport'

408408 { _sKind :: !Text

409409 , _sName :: !(Maybe Text)

410410 , _sId :: !(Maybe Text)

@@ -422,7 +422,7 @@ data SavedReport = SavedReport

422422savedReport

423423 :: SavedReport

424424savedReport =

425− SavedReport

425+ SavedReport'

426426 { _sKind = "adexchangeseller#savedReport"

427427 , _sName = Nothing

428428 , _sId = Nothing

@@ -444,13 +444,13 @@ instance FromJSON SavedReport where

444444 parseJSON

445445 = withObject "SavedReport"

446446 (\ o ->

447− SavedReport <$>

447+ SavedReport' <$>

448448 (o .:? "kind" .!= "adexchangeseller#savedReport") <*>

449449 (o .:? "name")

450450 <*> (o .:? "id"))

451451

452452instance ToJSON SavedReport where

453− toJSON SavedReport{..}

453+ toJSON SavedReport'{..}

454454 = object

455455 (catMaybes

456456 [Just ("kind" .= _sKind), ("name" .=) <$> _sName,

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

458458

459459--

460460-- /See:/ 'urlChannels' smart constructor.

461−data URLChannels = URLChannels

461+data URLChannels = URLChannels'

462462 { _ucEtag :: !(Maybe Text)

463463 , _ucNextPageToken :: !(Maybe Text)

464464 , _ucKind :: !Text

@@ -479,7 +479,7 @@ data URLChannels = URLChannels

479479urlChannels

480480 :: URLChannels

481481urlChannels =

482− URLChannels

482+ URLChannels'

483483 { _ucEtag = Nothing

484484 , _ucNextPageToken = Nothing

485485 , _ucKind = "adexchangeseller#urlChannels"

@@ -512,13 +512,13 @@ instance FromJSON URLChannels where

512512 parseJSON

513513 = withObject "URLChannels"

514514 (\ o ->

515− URLChannels <$>

515+ URLChannels' <$>

516516 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

517517 (o .:? "kind" .!= "adexchangeseller#urlChannels")

518518 <*> (o .:? "items" .!= mempty))

519519

520520instance ToJSON URLChannels where

521− toJSON URLChannels{..}

521+ toJSON URLChannels'{..}

522522 = object

523523 (catMaybes

524524 [("etag" .=) <$> _ucEtag,

@@ -527,7 +527,7 @@ instance ToJSON URLChannels where

527527

528528--

529529-- /See:/ 'customChannels' smart constructor.

530−data CustomChannels = CustomChannels

530+data CustomChannels = CustomChannels'

531531 { _ccEtag :: !(Maybe Text)

532532 , _ccNextPageToken :: !(Maybe Text)

533533 , _ccKind :: !Text

@@ -548,7 +548,7 @@ data CustomChannels = CustomChannels

548548customChannels

549549 :: CustomChannels

550550customChannels =

551− CustomChannels

551+ CustomChannels'

552552 { _ccEtag = Nothing

553553 , _ccNextPageToken = Nothing

554554 , _ccKind = "adexchangeseller#customChannels"

@@ -581,13 +581,13 @@ instance FromJSON CustomChannels where

581581 parseJSON

582582 = withObject "CustomChannels"

583583 (\ o ->

584− CustomChannels <$>

584+ CustomChannels' <$>

585585 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

586586 (o .:? "kind" .!= "adexchangeseller#customChannels")

587587 <*> (o .:? "items" .!= mempty))

588588

589589instance ToJSON CustomChannels where

590− toJSON CustomChannels{..}

590+ toJSON CustomChannels'{..}

591591 = object

592592 (catMaybes

593593 [("etag" .=) <$> _ccEtag,

@@ -596,7 +596,7 @@ instance ToJSON CustomChannels where

596596

597597--

598598-- /See:/ 'report' smart constructor.

599−data Report = Report

599+data Report = Report'

600600 { _rKind :: !Text

601601 , _rAverages :: !(Maybe [Text])

602602 , _rWarnings :: !(Maybe [Text])

@@ -626,7 +626,7 @@ data Report = Report

626626report

627627 :: Report

628628report =

629− Report

629+ Report'

630630 { _rKind = "adexchangeseller#report"

631631 , _rAverages = Nothing

632632 , _rWarnings = Nothing

@@ -693,7 +693,7 @@ instance FromJSON Report where

693693 parseJSON

694694 = withObject "Report"

695695 (\ o ->

696− Report <$>

696+ Report' <$>

697697 (o .:? "kind" .!= "adexchangeseller#report") <*>

698698 (o .:? "averages" .!= mempty)

699699 <*> (o .:? "warnings" .!= mempty)

@@ -703,7 +703,7 @@ instance FromJSON Report where

703703 <*> (o .:? "totalMatchedRows"))

704704

705705instance ToJSON Report where

706− toJSON Report{..}

706+ toJSON Report'{..}

707707 = object

708708 (catMaybes

709709 [Just ("kind" .= _rKind),

@@ -715,7 +715,7 @@ instance ToJSON Report where

715715

716716--

717717-- /See:/ 'alert' smart constructor.

718−data Alert = Alert

718+data Alert = Alert'

719719 { _aaKind :: !Text

720720 , _aaSeverity :: !(Maybe Text)

721721 , _aaId :: !(Maybe Text)

@@ -739,7 +739,7 @@ data Alert = Alert

739739alert

740740 :: Alert

741741alert =

742− Alert

742+ Alert'

743743 { _aaKind = "adexchangeseller#alert"

744744 , _aaSeverity = Nothing

745745 , _aaId = Nothing

@@ -776,7 +776,7 @@ instance FromJSON Alert where

776776 parseJSON

777777 = withObject "Alert"

778778 (\ o ->

779− Alert <$>

779+ Alert' <$>

780780 (o .:? "kind" .!= "adexchangeseller#alert") <*>

781781 (o .:? "severity")

782782 <*> (o .:? "id")

@@ -784,7 +784,7 @@ instance FromJSON Alert where

784784 <*> (o .:? "message"))

785785

786786instance ToJSON Alert where

787− toJSON Alert{..}

787+ toJSON Alert'{..}

788788 = object

789789 (catMaybes

790790 [Just ("kind" .= _aaKind),

@@ -794,7 +794,7 @@ instance ToJSON Alert where

794794

795795--

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

797−data Account = Account

797+data Account = Account'

798798 { _accKind :: !Text

799799 , _accName :: !(Maybe Text)

800800 , _accId :: !(Maybe Text)

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

812812account

813813 :: Account

814814account =

815− Account

815+ Account'

816816 { _accKind = "adexchangeseller#account"

817817 , _accName = Nothing

818818 , _accId = Nothing

@@ -834,13 +834,13 @@ instance FromJSON Account where

834834 parseJSON

835835 = withObject "Account"

836836 (\ o ->

837− Account <$>

837+ Account' <$>

838838 (o .:? "kind" .!= "adexchangeseller#account") <*>

839839 (o .:? "name")

840840 <*> (o .:? "id"))

841841

842842instance ToJSON Account where

843− toJSON Account{..}

843+ toJSON Account'{..}

844844 = object

845845 (catMaybes

846846 [Just ("kind" .= _accKind), ("name" .=) <$> _accName,

@@ -848,7 +848,7 @@ instance ToJSON Account where

848848

849849--

850850-- /See:/ 'adClient' smart constructor.

851−data AdClient = AdClient

851+data AdClient = AdClient'

852852 { _adKind :: !Text

853853 , _adArcOptIn :: !(Maybe Bool)

854854 , _adSupportsReporting :: !(Maybe Bool)

@@ -872,7 +872,7 @@ data AdClient = AdClient

872872adClient

873873 :: AdClient

874874adClient =

875− AdClient

875+ AdClient'

876876 { _adKind = "adexchangeseller#adClient"

877877 , _adArcOptIn = Nothing

878878 , _adSupportsReporting = Nothing

@@ -910,7 +910,7 @@ instance FromJSON AdClient where

910910 parseJSON

911911 = withObject "AdClient"

912912 (\ o ->

913− AdClient <$>

913+ AdClient' <$>

914914 (o .:? "kind" .!= "adexchangeseller#adClient") <*>

915915 (o .:? "arcOptIn")

916916 <*> (o .:? "supportsReporting")

@@ -918,7 +918,7 @@ instance FromJSON AdClient where

918918 <*> (o .:? "productCode"))

919919

920920instance ToJSON AdClient where

921− toJSON AdClient{..}

921+ toJSON AdClient'{..}

922922 = object

923923 (catMaybes

924924 [Just ("kind" .= _adKind),

@@ -929,7 +929,7 @@ instance ToJSON AdClient where

929929

930930--

931931-- /See:/ 'reportHeadersItem' smart constructor.

932−data ReportHeadersItem = ReportHeadersItem

932+data ReportHeadersItem = ReportHeadersItem'

933933 { _rhiName :: !(Maybe Text)

934934 , _rhiCurrency :: !(Maybe Text)

935935 , _rhiType :: !(Maybe Text)

@@ -947,7 +947,7 @@ data ReportHeadersItem = ReportHeadersItem

947947reportHeadersItem

948948 :: ReportHeadersItem

949949reportHeadersItem =

950− ReportHeadersItem

950+ ReportHeadersItem'

951951 { _rhiName = Nothing

952952 , _rhiCurrency = Nothing

953953 , _rhiType = Nothing

@@ -972,12 +972,12 @@ instance FromJSON ReportHeadersItem where

972972 parseJSON

973973 = withObject "ReportHeadersItem"

974974 (\ o ->

975− ReportHeadersItem <$>

975+ ReportHeadersItem' <$>

976976 (o .:? "name") <*> (o .:? "currency") <*>

977977 (o .:? "type"))

978978

979979instance ToJSON ReportHeadersItem where

980− toJSON ReportHeadersItem{..}

980+ toJSON ReportHeadersItem'{..}

981981 = object

982982 (catMaybes

983983 [("name" .=) <$> _rhiName,

@@ -987,7 +987,7 @@ instance ToJSON ReportHeadersItem where

987987-- | The targeting information of this custom channel, if activated.

988988--

989989-- /See:/ 'customChannelTargetingInfo' smart constructor.

990−data CustomChannelTargetingInfo = CustomChannelTargetingInfo

990+data CustomChannelTargetingInfo = CustomChannelTargetingInfo'

991991 { _cctiLocation :: !(Maybe Text)

992992 , _cctiSiteLanguage :: !(Maybe Text)

993993 , _cctiAdsAppearOn :: !(Maybe Text)

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

10081008customChannelTargetingInfo

10091009 :: CustomChannelTargetingInfo

10101010customChannelTargetingInfo =

1011− CustomChannelTargetingInfo

1011+ CustomChannelTargetingInfo'

10121012 { _cctiLocation = Nothing

10131013 , _cctiSiteLanguage = Nothing

10141014 , _cctiAdsAppearOn = Nothing

@@ -1047,13 +1047,13 @@ instance FromJSON CustomChannelTargetingInfo where

10471047 parseJSON

10481048 = withObject "CustomChannelTargetingInfo"

10491049 (\ o ->

1050− CustomChannelTargetingInfo <$>

1050+ CustomChannelTargetingInfo' <$>

10511051 (o .:? "location") <*> (o .:? "siteLanguage") <*>

10521052 (o .:? "adsAppearOn")

10531053 <*> (o .:? "description"))

10541054

10551055instance ToJSON CustomChannelTargetingInfo where

1056− toJSON CustomChannelTargetingInfo{..}

1056+ toJSON CustomChannelTargetingInfo'{..}

10571057 = object

10581058 (catMaybes

10591059 [("location" .=) <$> _cctiLocation,

@@ -1063,7 +1063,7 @@ instance ToJSON CustomChannelTargetingInfo where

10631063

10641064--

10651065-- /See:/ 'preferredDeals' smart constructor.

1066−data PreferredDeals = PreferredDeals

1066+data PreferredDeals = PreferredDeals'

10671067 { _pdKind :: !Text

10681068 , _pdItems :: !(Maybe [PreferredDeal])

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

@@ -1078,7 +1078,7 @@ data PreferredDeals = PreferredDeals

10781078preferredDeals

10791079 :: PreferredDeals

10801080preferredDeals =

1081− PreferredDeals

1081+ PreferredDeals'

10821082 { _pdKind = "adexchangeseller#preferredDeals"

10831083 , _pdItems = Nothing

10841084 }

@@ -1097,12 +1097,12 @@ instance FromJSON PreferredDeals where

10971097 parseJSON

10981098 = withObject "PreferredDeals"

10991099 (\ o ->

1100− PreferredDeals <$>

1100+ PreferredDeals' <$>

11011101 (o .:? "kind" .!= "adexchangeseller#preferredDeals")

11021102 <*> (o .:? "items" .!= mempty))

11031103

11041104instance ToJSON PreferredDeals where

1105− toJSON PreferredDeals{..}

1105+ toJSON PreferredDeals'{..}

11061106 = object

11071107 (catMaybes

11081108 [Just ("kind" .= _pdKind),

@@ -1110,7 +1110,7 @@ instance ToJSON PreferredDeals where

11101110

11111111--

11121112-- /See:/ 'metadata' smart constructor.

1113−data Metadata = Metadata

1113+data Metadata = Metadata'

11141114 { _mKind :: !Text

11151115 , _mItems :: !(Maybe [ReportingMetadataEntry])

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

@@ -1125,7 +1125,7 @@ data Metadata = Metadata

11251125metadata

11261126 :: Metadata

11271127metadata =

1128− Metadata

1128+ Metadata'

11291129 { _mKind = "adexchangeseller#metadata"

11301130 , _mItems = Nothing

11311131 }

@@ -1143,19 +1143,19 @@ instance FromJSON Metadata where

11431143 parseJSON

11441144 = withObject "Metadata"

11451145 (\ o ->

1146− Metadata <$>

1146+ Metadata' <$>

11471147 (o .:? "kind" .!= "adexchangeseller#metadata") <*>

11481148 (o .:? "items" .!= mempty))

11491149

11501150instance ToJSON Metadata where

1151− toJSON Metadata{..}

1151+ toJSON Metadata'{..}

11521152 = object

11531153 (catMaybes

11541154 [Just ("kind" .= _mKind), ("items" .=) <$> _mItems])

11551155

11561156--

11571157-- /See:/ 'customChannel' smart constructor.

1158−data CustomChannel = CustomChannel

1158+data CustomChannel = CustomChannel'

11591159 { _cTargetingInfo :: !(Maybe CustomChannelTargetingInfo)

11601160 , _cKind :: !Text

11611161 , _cName :: !(Maybe Text)

@@ -1179,7 +1179,7 @@ data CustomChannel = CustomChannel

11791179customChannel

11801180 :: CustomChannel

11811181customChannel =

1182− CustomChannel

1182+ CustomChannel'

11831183 { _cTargetingInfo = Nothing

11841184 , _cKind = "adexchangeseller#customChannel"

11851185 , _cName = Nothing

@@ -1215,7 +1215,7 @@ instance FromJSON CustomChannel where

12151215 parseJSON

12161216 = withObject "CustomChannel"

12171217 (\ o ->

1218− CustomChannel <$>

1218+ CustomChannel' <$>

12191219 (o .:? "targetingInfo") <*>

12201220 (o .:? "kind" .!= "adexchangeseller#customChannel")

12211221 <*> (o .:? "name")

@@ -1223,7 +1223,7 @@ instance FromJSON CustomChannel where

12231223 <*> (o .:? "id"))

12241224

12251225instance ToJSON CustomChannel where

1226− toJSON CustomChannel{..}

1226+ toJSON CustomChannel'{..}

12271227 = object

12281228 (catMaybes

12291229 [("targetingInfo" .=) <$> _cTargetingInfo,

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

12321232

12331233--

12341234-- /See:/ 'urlChannel' smart constructor.

1235−data URLChannel = URLChannel

1235+data URLChannel = URLChannel'

12361236 { _urlcKind :: !Text

12371237 , _urlcId :: !(Maybe Text)

12381238 , _urlcURLPattern :: !(Maybe Text)

@@ -1250,7 +1250,7 @@ data URLChannel = URLChannel

12501250urlChannel

12511251 :: URLChannel

12521252urlChannel =

1253− URLChannel

1253+ URLChannel'

12541254 { _urlcKind = "adexchangeseller#urlChannel"

12551255 , _urlcId = Nothing

12561256 , _urlcURLPattern = Nothing

@@ -1277,13 +1277,13 @@ instance FromJSON URLChannel where

12771277 parseJSON

12781278 = withObject "URLChannel"

12791279 (\ o ->

1280− URLChannel <$>

1280+ URLChannel' <$>

12811281 (o .:? "kind" .!= "adexchangeseller#urlChannel") <*>

12821282 (o .:? "id")

12831283 <*> (o .:? "urlPattern"))

12841284

12851285instance ToJSON URLChannel where

1286− toJSON URLChannel{..}

1286+ toJSON URLChannel'{..}

12871287 = object

12881288 (catMaybes

12891289 [Just ("kind" .= _urlcKind), ("id" .=) <$> _urlcId,

@@ -1291,7 +1291,7 @@ instance ToJSON URLChannel where

12911291

12921292--

12931293-- /See:/ 'preferredDeal' smart constructor.

1294−data PreferredDeal = PreferredDeal

1294+data PreferredDeal = PreferredDeal'

12951295 { _pAdvertiserName :: !(Maybe Text)

12961296 , _pCurrencyCode :: !(Maybe Text)

12971297 , _pStartTime :: !(Maybe (Textual Word64))

@@ -1324,7 +1324,7 @@ data PreferredDeal = PreferredDeal

13241324preferredDeal

13251325 :: PreferredDeal

13261326preferredDeal =

1327− PreferredDeal

1327+ PreferredDeal'

13281328 { _pAdvertiserName = Nothing

13291329 , _pCurrencyCode = Nothing

13301330 , _pStartTime = Nothing

@@ -1391,7 +1391,7 @@ instance FromJSON PreferredDeal where

13911391 parseJSON

13921392 = withObject "PreferredDeal"

13931393 (\ o ->

1394− PreferredDeal <$>

1394+ PreferredDeal' <$>

13951395 (o .:? "advertiserName") <*> (o .:? "currencyCode")

13961396 <*> (o .:? "startTime")

13971397 <*>

@@ -1402,7 +1402,7 @@ instance FromJSON PreferredDeal where

14021402 <*> (o .:? "fixedCpm"))

14031403

14041404instance ToJSON PreferredDeal where

1405− toJSON PreferredDeal{..}

1405+ toJSON PreferredDeal'{..}

14061406 = object

14071407 (catMaybes

14081408 [("advertiserName" .=) <$> _pAdvertiserName,

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

@@ -56,7 +56,7 @@ type AccountsAdClientsListResource =

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

5757--

5858-- /See:/ 'accountsAdClientsList' smart constructor.

59−data AccountsAdClientsList = AccountsAdClientsList

59+data AccountsAdClientsList = AccountsAdClientsList'

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

6262 , _aaclMaxResults :: !(Maybe (Textual Word32))

@@ -75,7 +75,7 @@ accountsAdClientsList

7575 :: Text -- ^ 'aaclAccountId'

7676 -> AccountsAdClientsList

7777accountsAdClientsList pAaclAccountId_ =

78− AccountsAdClientsList

78+ AccountsAdClientsList'

7979 { _aaclAccountId = pAaclAccountId_

8080 , _aaclPageToken = Nothing

8181 , _aaclMaxResults = Nothing

@@ -108,7 +108,7 @@ instance GoogleRequest AccountsAdClientsList where

108108 type Scopes AccountsAdClientsList =

109109 '["https://www.googleapis.com/auth/adexchange.seller",

110110 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

111− requestClient AccountsAdClientsList{..}

111+ requestClient AccountsAdClientsList'{..}

112112 = go _aaclAccountId _aaclPageToken _aaclMaxResults

113113 (Just AltJSON)

114114 adExchangeSellerService

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

@@ -54,7 +54,7 @@ type AccountsAlertsListResource =

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

5555--

5656-- /See:/ 'accountsAlertsList' smart constructor.

57−data AccountsAlertsList = AccountsAlertsList

57+data AccountsAlertsList = AccountsAlertsList'

5858 { _aalLocale :: !(Maybe Text)

5959 , _aalAccountId :: !Text

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

@@ -70,7 +70,7 @@ accountsAlertsList

7070 :: Text -- ^ 'aalAccountId'

7171 -> AccountsAlertsList

7272accountsAlertsList pAalAccountId_ =

73− AccountsAlertsList

73+ AccountsAlertsList'

7474 { _aalLocale = Nothing

7575 , _aalAccountId = pAalAccountId_

7676 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsAlertsList where

9292 type Scopes AccountsAlertsList =

9393 '["https://www.googleapis.com/auth/adexchange.seller",

9494 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

95− requestClient AccountsAlertsList{..}

95+ requestClient AccountsAlertsList'{..}

9696 = go _aalAccountId _aalLocale (Just AltJSON)

9797 adExchangeSellerService

9898 where go

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

@@ -57,7 +57,7 @@ type AccountsCustomChannelsGetResource =

5757-- | Get the specified custom channel from the specified ad client.

5858--

5959-- /See:/ 'accountsCustomChannelsGet' smart constructor.

60−data AccountsCustomChannelsGet = AccountsCustomChannelsGet

60+data AccountsCustomChannelsGet = AccountsCustomChannelsGet'

6161 { _accgCustomChannelId :: !Text

6262 , _accgAdClientId :: !Text

6363 , _accgAccountId :: !Text

@@ -78,7 +78,7 @@ accountsCustomChannelsGet

7878 -> Text -- ^ 'accgAccountId'

7979 -> AccountsCustomChannelsGet

8080accountsCustomChannelsGet pAccgCustomChannelId_ pAccgAdClientId_ pAccgAccountId_ =

81− AccountsCustomChannelsGet

81+ AccountsCustomChannelsGet'

8282 { _accgCustomChannelId = pAccgCustomChannelId_

8383 , _accgAdClientId = pAccgAdClientId_

8484 , _accgAccountId = pAccgAccountId_

@@ -108,7 +108,7 @@ instance GoogleRequest AccountsCustomChannelsGet

108108 type Scopes AccountsCustomChannelsGet =

109109 '["https://www.googleapis.com/auth/adexchange.seller",

110110 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

111− requestClient AccountsCustomChannelsGet{..}

111+ requestClient AccountsCustomChannelsGet'{..}

112112 = go _accgAccountId _accgAdClientId

113113 _accgCustomChannelId

114114 (Just AltJSON)

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

@@ -62,7 +62,7 @@ type AccountsCustomChannelsListResource =

6262-- account.

6363--

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

65−data AccountsCustomChannelsList = AccountsCustomChannelsList

65+data AccountsCustomChannelsList = AccountsCustomChannelsList'

6666 { _acclAdClientId :: !Text

6767 , _acclAccountId :: !Text

6868 , _acclPageToken :: !(Maybe Text)

@@ -85,7 +85,7 @@ accountsCustomChannelsList

8585 -> Text -- ^ 'acclAccountId'

8686 -> AccountsCustomChannelsList

8787accountsCustomChannelsList pAcclAdClientId_ pAcclAccountId_ =

88− AccountsCustomChannelsList

88+ AccountsCustomChannelsList'

8989 { _acclAdClientId = pAcclAdClientId_

9090 , _acclAccountId = pAcclAccountId_

9191 , _acclPageToken = Nothing

@@ -126,7 +126,7 @@ instance GoogleRequest AccountsCustomChannelsList

126126 type Scopes AccountsCustomChannelsList =

127127 '["https://www.googleapis.com/auth/adexchange.seller",

128128 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

129− requestClient AccountsCustomChannelsList{..}

129+ requestClient AccountsCustomChannelsList'{..}

130130 = go _acclAccountId _acclAdClientId _acclPageToken

131131 _acclMaxResults

132132 (Just AltJSON)

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

@@ -51,7 +51,7 @@ type AccountsGetResource =

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

5252--

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

54−newtype AccountsGet = AccountsGet

54+newtype AccountsGet = AccountsGet'

5555 { _agAccountId :: Text

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

5757

@@ -64,7 +64,7 @@ accountsGet

6464 :: Text -- ^ 'agAccountId'

6565 -> AccountsGet

6666accountsGet pAgAccountId_ =

67− AccountsGet

67+ AccountsGet'

6868 { _agAccountId = pAgAccountId_

6969 }

7070

@@ -78,7 +78,7 @@ instance GoogleRequest AccountsGet where

7878 type Scopes AccountsGet =

7979 '["https://www.googleapis.com/auth/adexchange.seller",

8080 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

81− requestClient AccountsGet{..}

81+ requestClient AccountsGet'{..}

8282 = go _agAccountId (Just AltJSON)

8383 adExchangeSellerService

8484 where go

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

@@ -53,7 +53,7 @@ type AccountsListResource =

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

5454--

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

56−data AccountsList = AccountsList

56+data AccountsList = AccountsList'

5757 { _alPageToken :: !(Maybe Text)

5858 , _alMaxResults :: !(Maybe (Textual Int32))

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

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

6868accountsList

6969 :: AccountsList

7070accountsList =

71− AccountsList

71+ AccountsList'

7272 { _alPageToken = Nothing

7373 , _alMaxResults = Nothing

7474 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsList where

9292 type Scopes AccountsList =

9393 '["https://www.googleapis.com/auth/adexchange.seller",

9494 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

95− requestClient AccountsList{..}

95+ requestClient AccountsList'{..}

9696 = go _alPageToken _alMaxResults (Just AltJSON)

9797 adExchangeSellerService

9898 where go

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

@@ -55,7 +55,7 @@ type AccountsMetadataDimensionsListResource =

5555-- account.

5656--

5757-- /See:/ 'accountsMetadataDimensionsList' smart constructor.

58−newtype AccountsMetadataDimensionsList = AccountsMetadataDimensionsList

58+newtype AccountsMetadataDimensionsList = AccountsMetadataDimensionsList'

5959 { _amdlAccountId :: Text

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

6161

@@ -68,7 +68,7 @@ accountsMetadataDimensionsList

6868 :: Text -- ^ 'amdlAccountId'

6969 -> AccountsMetadataDimensionsList

7070accountsMetadataDimensionsList pAmdlAccountId_ =

71− AccountsMetadataDimensionsList

71+ AccountsMetadataDimensionsList'

7272 { _amdlAccountId = pAmdlAccountId_

7373 }

7474

@@ -84,7 +84,7 @@ instance GoogleRequest AccountsMetadataDimensionsList

8484 type Scopes AccountsMetadataDimensionsList =

8585 '["https://www.googleapis.com/auth/adexchange.seller",

8686 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

87− requestClient AccountsMetadataDimensionsList{..}

87+ requestClient AccountsMetadataDimensionsList'{..}

8888 = go _amdlAccountId (Just AltJSON)

8989 adExchangeSellerService

9090 where go

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

@@ -53,7 +53,7 @@ type AccountsMetadataMetricsListResource =

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

5454--

5555-- /See:/ 'accountsMetadataMetricsList' smart constructor.

56−newtype AccountsMetadataMetricsList = AccountsMetadataMetricsList

56+newtype AccountsMetadataMetricsList = AccountsMetadataMetricsList'

5757 { _ammlAccountId :: Text

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

5959

@@ -66,7 +66,7 @@ accountsMetadataMetricsList

6666 :: Text -- ^ 'ammlAccountId'

6767 -> AccountsMetadataMetricsList

6868accountsMetadataMetricsList pAmmlAccountId_ =

69− AccountsMetadataMetricsList

69+ AccountsMetadataMetricsList'

7070 { _ammlAccountId = pAmmlAccountId_

7171 }

7272

@@ -82,7 +82,7 @@ instance GoogleRequest AccountsMetadataMetricsList

8282 type Scopes AccountsMetadataMetricsList =

8383 '["https://www.googleapis.com/auth/adexchange.seller",

8484 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

85− requestClient AccountsMetadataMetricsList{..}

85+ requestClient AccountsMetadataMetricsList'{..}

8686 = go _ammlAccountId (Just AltJSON)

8787 adExchangeSellerService

8888 where go

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

@@ -54,7 +54,7 @@ type AccountsPreferredDealsGetResource =

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

5555--

5656-- /See:/ 'accountsPreferredDealsGet' smart constructor.

57−data AccountsPreferredDealsGet = AccountsPreferredDealsGet

57+data AccountsPreferredDealsGet = AccountsPreferredDealsGet'

5858 { _apdgDealId :: !Text

5959 , _apdgAccountId :: !Text

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

@@ -71,7 +71,7 @@ accountsPreferredDealsGet

7171 -> Text -- ^ 'apdgAccountId'

7272 -> AccountsPreferredDealsGet

7373accountsPreferredDealsGet pApdgDealId_ pApdgAccountId_ =

74− AccountsPreferredDealsGet

74+ AccountsPreferredDealsGet'

7575 { _apdgDealId = pApdgDealId_

7676 , _apdgAccountId = pApdgAccountId_

7777 }

@@ -93,7 +93,7 @@ instance GoogleRequest AccountsPreferredDealsGet

9393 type Scopes AccountsPreferredDealsGet =

9494 '["https://www.googleapis.com/auth/adexchange.seller",

9595 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

96− requestClient AccountsPreferredDealsGet{..}

96+ requestClient AccountsPreferredDealsGet'{..}

9797 = go _apdgAccountId _apdgDealId (Just AltJSON)

9898 adExchangeSellerService

9999 where go

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

@@ -53,7 +53,7 @@ type AccountsPreferredDealsListResource =

5353-- | List the preferred deals for this Ad Exchange account.

5454--

5555-- /See:/ 'accountsPreferredDealsList' smart constructor.

56−newtype AccountsPreferredDealsList = AccountsPreferredDealsList

56+newtype AccountsPreferredDealsList = AccountsPreferredDealsList'

5757 { _apdlAccountId :: Text

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

5959

@@ -66,7 +66,7 @@ accountsPreferredDealsList

6666 :: Text -- ^ 'apdlAccountId'

6767 -> AccountsPreferredDealsList

6868accountsPreferredDealsList pApdlAccountId_ =

69− AccountsPreferredDealsList

69+ AccountsPreferredDealsList'

7070 { _apdlAccountId = pApdlAccountId_

7171 }

7272

@@ -82,7 +82,7 @@ instance GoogleRequest AccountsPreferredDealsList

8282 type Scopes AccountsPreferredDealsList =

8383 '["https://www.googleapis.com/auth/adexchange.seller",

8484 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

85− requestClient AccountsPreferredDealsList{..}

85+ requestClient AccountsPreferredDealsList'{..}

8686 = go _apdlAccountId (Just AltJSON)

8787 adExchangeSellerService

8888 where go

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

@@ -91,7 +91,7 @@ type AccountsReportsGenerateResource =

9191-- format specify \"alt=csv\" as a query parameter.

9292--

9393-- /See:/ 'accountsReportsGenerate' smart constructor.

94−data AccountsReportsGenerate = AccountsReportsGenerate

94+data AccountsReportsGenerate = AccountsReportsGenerate'

9595 { _argDimension :: !(Maybe [Text])

9696 , _argLocale :: !(Maybe Text)

9797 , _argEndDate :: !Text

@@ -133,7 +133,7 @@ accountsReportsGenerate

133133 -> Text -- ^ 'argAccountId'

134134 -> AccountsReportsGenerate

135135accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =

136− AccountsReportsGenerate

136+ AccountsReportsGenerate'

137137 { _argDimension = Nothing

138138 , _argLocale = Nothing

139139 , _argEndDate = pArgEndDate_

@@ -216,7 +216,7 @@ instance GoogleRequest AccountsReportsGenerate where

216216 type Scopes AccountsReportsGenerate =

217217 '["https://www.googleapis.com/auth/adexchange.seller",

218218 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

219− requestClient AccountsReportsGenerate{..}

219+ requestClient AccountsReportsGenerate'{..}

220220 = go _argAccountId (Just _argStartDate)

221221 (Just _argEndDate)

222222 (_argDimension ^. _Default)

@@ -240,7 +240,7 @@ instance GoogleRequest

240240 type Scopes (MediaDownload AccountsReportsGenerate) =

241241 Scopes AccountsReportsGenerate

242242 requestClient

243− (MediaDownload AccountsReportsGenerate{..})

243+ (MediaDownload AccountsReportsGenerate'{..})

244244 = go _argAccountId (Just _argStartDate)

245245 (Just _argEndDate)

246246 (_argDimension ^. _Default)

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

@@ -62,7 +62,7 @@ type AccountsReportsSavedGenerateResource =

6262-- query parameters.

6363--

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

65−data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate

65+data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate'

6666 { _arsgLocale :: !(Maybe Text)

6767 , _arsgSavedReportId :: !Text

6868 , _arsgAccountId :: !Text

@@ -88,7 +88,7 @@ accountsReportsSavedGenerate

8888 -> Text -- ^ 'arsgAccountId'

8989 -> AccountsReportsSavedGenerate

9090accountsReportsSavedGenerate pArsgSavedReportId_ pArsgAccountId_ =

91− AccountsReportsSavedGenerate

91+ AccountsReportsSavedGenerate'

9292 { _arsgLocale = Nothing

9393 , _arsgSavedReportId = pArsgSavedReportId_

9494 , _arsgAccountId = pArsgAccountId_

@@ -134,7 +134,7 @@ instance GoogleRequest AccountsReportsSavedGenerate

134134 type Scopes AccountsReportsSavedGenerate =

135135 '["https://www.googleapis.com/auth/adexchange.seller",

136136 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

137− requestClient AccountsReportsSavedGenerate{..}

137+ requestClient AccountsReportsSavedGenerate'{..}

138138 = go _arsgAccountId _arsgSavedReportId _arsgLocale

139139 _arsgStartIndex

140140 _arsgMaxResults

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

@@ -57,7 +57,7 @@ type AccountsReportsSavedListResource =

5757-- | List all saved reports in this Ad Exchange account.

5858--

5959-- /See:/ 'accountsReportsSavedList' smart constructor.

60−data AccountsReportsSavedList = AccountsReportsSavedList

60+data AccountsReportsSavedList = AccountsReportsSavedList'

6161 { _arslAccountId :: !Text

6262 , _arslPageToken :: !(Maybe Text)

6363 , _arslMaxResults :: !(Maybe (Textual Int32))

@@ -76,7 +76,7 @@ accountsReportsSavedList

7676 :: Text -- ^ 'arslAccountId'

7777 -> AccountsReportsSavedList

7878accountsReportsSavedList pArslAccountId_ =

79− AccountsReportsSavedList

79+ AccountsReportsSavedList'

8080 { _arslAccountId = pArslAccountId_

8181 , _arslPageToken = Nothing

8282 , _arslMaxResults = Nothing

@@ -109,7 +109,7 @@ instance GoogleRequest AccountsReportsSavedList where

109109 type Scopes AccountsReportsSavedList =

110110 '["https://www.googleapis.com/auth/adexchange.seller",

111111 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

112− requestClient AccountsReportsSavedList{..}

112+ requestClient AccountsReportsSavedList'{..}

113113 = go _arslAccountId _arslPageToken _arslMaxResults

114114 (Just AltJSON)

115115 adExchangeSellerService

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

@@ -61,7 +61,7 @@ type AccountsURLChannelsListResource =

6161-- account.

6262--

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

64−data AccountsURLChannelsList = AccountsURLChannelsList

64+data AccountsURLChannelsList = AccountsURLChannelsList'

6565 { _auclAdClientId :: !Text

6666 , _auclAccountId :: !Text

6767 , _auclPageToken :: !(Maybe Text)

@@ -84,7 +84,7 @@ accountsURLChannelsList

8484 -> Text -- ^ 'auclAccountId'

8585 -> AccountsURLChannelsList

8686accountsURLChannelsList pAuclAdClientId_ pAuclAccountId_ =

87− AccountsURLChannelsList

87+ AccountsURLChannelsList'

8888 { _auclAdClientId = pAuclAdClientId_

8989 , _auclAccountId = pAuclAccountId_

9090 , _auclPageToken = Nothing

@@ -124,7 +124,7 @@ instance GoogleRequest AccountsURLChannelsList where

124124 type Scopes AccountsURLChannelsList =

125125 '["https://www.googleapis.com/auth/adexchange.seller",

126126 "https://www.googleapis.com/auth/adexchange.seller.readonly"]

127− requestClient AccountsURLChannelsList{..}

127+ requestClient AccountsURLChannelsList'{..}

128128 = go _auclAccountId _auclAdClientId _auclPageToken

129129 _auclMaxResults

130130 (Just AltJSON)

gogol-admin-datatransfer/gen/Network/Google/DataTransfer/Types/Product.hs+24−24

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323-- | The JSON template for an Application resource.

2424--

2525-- /See:/ 'application' smart constructor.

26−data Application = Application

26+data Application = Application'

2727 { _aTransferParams :: !(Maybe [ApplicationTransferParam])

2828 , _aEtag :: !(Maybe Text)

2929 , _aKind :: !Text

@@ -47,7 +47,7 @@ data Application = Application

4747application

4848 :: Application

4949application =

50− Application

50+ Application'

5151 { _aTransferParams = Nothing

5252 , _aEtag = Nothing

5353 , _aKind = "admin#datatransfer#ApplicationResource"

@@ -86,7 +86,7 @@ instance FromJSON Application where

8686 parseJSON

8787 = withObject "Application"

8888 (\ o ->

89− Application <$>

89+ Application' <$>

9090 (o .:? "transferParams" .!= mempty) <*>

9191 (o .:? "etag")

9292 <*>

@@ -96,7 +96,7 @@ instance FromJSON Application where

9696 <*> (o .:? "id"))

9797

9898instance ToJSON Application where

99− toJSON Application{..}

99+ toJSON Application'{..}

100100 = object

101101 (catMaybes

102102 [("transferParams" .=) <$> _aTransferParams,

@@ -106,7 +106,7 @@ instance ToJSON Application where

106106-- | Template for application transfer parameters.

107107--

108108-- /See:/ 'applicationTransferParam' smart constructor.

109−data ApplicationTransferParam = ApplicationTransferParam

109+data ApplicationTransferParam = ApplicationTransferParam'

110110 { _atpValue :: !(Maybe [Text])

111111 , _atpKey :: !(Maybe Text)

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

@@ -121,7 +121,7 @@ data ApplicationTransferParam = ApplicationTransferParam

121121applicationTransferParam

122122 :: ApplicationTransferParam

123123applicationTransferParam =

124− ApplicationTransferParam

124+ ApplicationTransferParam'

125125 { _atpValue = Nothing

126126 , _atpKey = Nothing

127127 }

@@ -142,11 +142,11 @@ instance FromJSON ApplicationTransferParam where

142142 parseJSON

143143 = withObject "ApplicationTransferParam"

144144 (\ o ->

145− ApplicationTransferParam <$>

145+ ApplicationTransferParam' <$>

146146 (o .:? "value" .!= mempty) <*> (o .:? "key"))

147147

148148instance ToJSON ApplicationTransferParam where

149− toJSON ApplicationTransferParam{..}

149+ toJSON ApplicationTransferParam'{..}

150150 = object

151151 (catMaybes

152152 [("value" .=) <$> _atpValue, ("key" .=) <$> _atpKey])

@@ -154,7 +154,7 @@ instance ToJSON ApplicationTransferParam where

154154-- | Template for a collection of Applications.

155155--

156156-- /See:/ 'applicationsListResponse' smart constructor.

157−data ApplicationsListResponse = ApplicationsListResponse

157+data ApplicationsListResponse = ApplicationsListResponse'

158158 { _alrEtag :: !(Maybe Text)

159159 , _alrNextPageToken :: !(Maybe Text)

160160 , _alrKind :: !Text

@@ -175,7 +175,7 @@ data ApplicationsListResponse = ApplicationsListResponse

175175applicationsListResponse

176176 :: ApplicationsListResponse

177177applicationsListResponse =

178− ApplicationsListResponse

178+ ApplicationsListResponse'

179179 { _alrEtag = Nothing

180180 , _alrNextPageToken = Nothing

181181 , _alrKind = "admin#datatransfer#applicationsList"

@@ -209,14 +209,14 @@ instance FromJSON ApplicationsListResponse where

209209 parseJSON

210210 = withObject "ApplicationsListResponse"

211211 (\ o ->

212− ApplicationsListResponse <$>

212+ ApplicationsListResponse' <$>

213213 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

214214 (o .:? "kind" .!=

215215 "admin#datatransfer#applicationsList")

216216 <*> (o .:? "applications" .!= mempty))

217217

218218instance ToJSON ApplicationsListResponse where

219− toJSON ApplicationsListResponse{..}

219+ toJSON ApplicationsListResponse'{..}

220220 = object

221221 (catMaybes

222222 [("etag" .=) <$> _alrEtag,

@@ -227,7 +227,7 @@ instance ToJSON ApplicationsListResponse where

227227-- | The JSON template for a DataTransfer resource.

228228--

229229-- /See:/ 'dataTransfer' smart constructor.

230−data DataTransfer = DataTransfer

230+data DataTransfer = DataTransfer'

231231 { _dtEtag :: !(Maybe Text)

232232 , _dtOldOwnerUserId :: !(Maybe Text)

233233 , _dtKind :: !Text

@@ -260,7 +260,7 @@ data DataTransfer = DataTransfer

260260dataTransfer

261261 :: DataTransfer

262262dataTransfer =

263− DataTransfer

263+ DataTransfer'

264264 { _dtEtag = Nothing

265265 , _dtOldOwnerUserId = Nothing

266266 , _dtKind = "admin#datatransfer#DataTransfer"

@@ -324,7 +324,7 @@ instance FromJSON DataTransfer where

324324 parseJSON

325325 = withObject "DataTransfer"

326326 (\ o ->

327− DataTransfer <$>

327+ DataTransfer' <$>

328328 (o .:? "etag") <*> (o .:? "oldOwnerUserId") <*>

329329 (o .:? "kind" .!= "admin#datatransfer#DataTransfer")

330330 <*> (o .:? "newOwnerUserId")

@@ -334,7 +334,7 @@ instance FromJSON DataTransfer where

334334 <*> (o .:? "overallTransferStatusCode"))

335335

336336instance ToJSON DataTransfer where

337− toJSON DataTransfer{..}

337+ toJSON DataTransfer'{..}

338338 = object

339339 (catMaybes

340340 [("etag" .=) <$> _dtEtag,

@@ -351,7 +351,7 @@ instance ToJSON DataTransfer where

351351-- | Template for a collection of DataTransfer resources.

352352--

353353-- /See:/ 'dataTransfersListResponse' smart constructor.

354−data DataTransfersListResponse = DataTransfersListResponse

354+data DataTransfersListResponse = DataTransfersListResponse'

355355 { _dtlrEtag :: !(Maybe Text)

356356 , _dtlrNextPageToken :: !(Maybe Text)

357357 , _dtlrKind :: !Text

@@ -372,7 +372,7 @@ data DataTransfersListResponse = DataTransfersListResponse

372372dataTransfersListResponse

373373 :: DataTransfersListResponse

374374dataTransfersListResponse =

375− DataTransfersListResponse

375+ DataTransfersListResponse'

376376 { _dtlrEtag = Nothing

377377 , _dtlrNextPageToken = Nothing

378378 , _dtlrKind = "admin#datatransfer#dataTransfersList"

@@ -405,14 +405,14 @@ instance FromJSON DataTransfersListResponse where

405405 parseJSON

406406 = withObject "DataTransfersListResponse"

407407 (\ o ->

408− DataTransfersListResponse <$>

408+ DataTransfersListResponse' <$>

409409 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

410410 (o .:? "kind" .!=

411411 "admin#datatransfer#dataTransfersList")

412412 <*> (o .:? "dataTransfers" .!= mempty))

413413

414414instance ToJSON DataTransfersListResponse where

415− toJSON DataTransfersListResponse{..}

415+ toJSON DataTransfersListResponse'{..}

416416 = object

417417 (catMaybes

418418 [("etag" .=) <$> _dtlrEtag,

@@ -423,7 +423,7 @@ instance ToJSON DataTransfersListResponse where

423423-- | Template to map fields of ApplicationDataTransfer resource.

424424--

425425-- /See:/ 'applicationDataTransfer' smart constructor.

426−data ApplicationDataTransfer = ApplicationDataTransfer

426+data ApplicationDataTransfer = ApplicationDataTransfer'

427427 { _adtApplicationTransferParams :: !(Maybe [ApplicationTransferParam])

428428 , _adtApplicationId :: !(Maybe (Textual Int64))

429429 , _adtApplicationTransferStatus :: !(Maybe Text)

@@ -441,7 +441,7 @@ data ApplicationDataTransfer = ApplicationDataTransfer

441441applicationDataTransfer

442442 :: ApplicationDataTransfer

443443applicationDataTransfer =

444− ApplicationDataTransfer

444+ ApplicationDataTransfer'

445445 { _adtApplicationTransferParams = Nothing

446446 , _adtApplicationId = Nothing

447447 , _adtApplicationTransferStatus = Nothing

@@ -474,13 +474,13 @@ instance FromJSON ApplicationDataTransfer where

474474 parseJSON

475475 = withObject "ApplicationDataTransfer"

476476 (\ o ->

477− ApplicationDataTransfer <$>

477+ ApplicationDataTransfer' <$>

478478 (o .:? "applicationTransferParams" .!= mempty) <*>

479479 (o .:? "applicationId")

480480 <*> (o .:? "applicationTransferStatus"))

481481

482482instance ToJSON ApplicationDataTransfer where

483− toJSON ApplicationDataTransfer{..}

483+ toJSON ApplicationDataTransfer'{..}

484484 = object

485485 (catMaybes

486486 [("applicationTransferParams" .=) <$>

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

@@ -52,7 +52,7 @@ type ApplicationsGetResource =

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

5353--

5454-- /See:/ 'applicationsGet' smart constructor.

55−newtype ApplicationsGet = ApplicationsGet

55+newtype ApplicationsGet = ApplicationsGet'

5656 { _agApplicationId :: Textual Int64

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

5858

@@ -65,7 +65,7 @@ applicationsGet

6565 :: Int64 -- ^ 'agApplicationId'

6666 -> ApplicationsGet

6767applicationsGet pAgApplicationId_ =

68− ApplicationsGet

68+ ApplicationsGet'

6969 { _agApplicationId = _Coerce # pAgApplicationId_

7070 }

7171

@@ -81,7 +81,7 @@ instance GoogleRequest ApplicationsGet where

8181 type Scopes ApplicationsGet =

8282 '["https://www.googleapis.com/auth/admin.datatransfer",

8383 "https://www.googleapis.com/auth/admin.datatransfer.readonly"]

84− requestClient ApplicationsGet{..}

84+ requestClient ApplicationsGet'{..}

8585 = go _agApplicationId (Just AltJSON)

8686 dataTransferService

8787 where go

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

@@ -57,7 +57,7 @@ type ApplicationsListResource =

5757-- | Lists the applications available for data transfer for a customer.

5858--

5959-- /See:/ 'applicationsList' smart constructor.

60−data ApplicationsList = ApplicationsList

60+data ApplicationsList = ApplicationsList'

6161 { _alCustomerId :: !(Maybe Text)

6262 , _alPageToken :: !(Maybe Text)

6363 , _alMaxResults :: !(Maybe (Textual Int32))

@@ -75,7 +75,7 @@ data ApplicationsList = ApplicationsList

7575applicationsList

7676 :: ApplicationsList

7777applicationsList =

78− ApplicationsList

78+ ApplicationsList'

7979 { _alCustomerId = Nothing

8080 , _alPageToken = Nothing

8181 , _alMaxResults = Nothing

@@ -102,7 +102,7 @@ instance GoogleRequest ApplicationsList where

102102 type Scopes ApplicationsList =

103103 '["https://www.googleapis.com/auth/admin.datatransfer",

104104 "https://www.googleapis.com/auth/admin.datatransfer.readonly"]

105− requestClient ApplicationsList{..}

105+ requestClient ApplicationsList'{..}

106106 = go _alCustomerId _alPageToken _alMaxResults

107107 (Just AltJSON)

108108 dataTransferService

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

@@ -52,7 +52,7 @@ type TransfersGetResource =

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

5353--

5454-- /See:/ 'transfersGet' smart constructor.

55−newtype TransfersGet = TransfersGet

55+newtype TransfersGet = TransfersGet'

5656 { _tgDataTransferId :: Text

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

5858

@@ -65,7 +65,7 @@ transfersGet

6565 :: Text -- ^ 'tgDataTransferId'

6666 -> TransfersGet

6767transfersGet pTgDataTransferId_ =

68− TransfersGet

68+ TransfersGet'

6969 { _tgDataTransferId = pTgDataTransferId_

7070 }

7171

@@ -81,7 +81,7 @@ instance GoogleRequest TransfersGet where

8181 type Scopes TransfersGet =

8282 '["https://www.googleapis.com/auth/admin.datatransfer",

8383 "https://www.googleapis.com/auth/admin.datatransfer.readonly"]

84− requestClient TransfersGet{..}

84+ requestClient TransfersGet'{..}

8585 = go _tgDataTransferId (Just AltJSON)

8686 dataTransferService

8787 where go

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

@@ -53,7 +53,7 @@ type TransfersInsertResource =

5353-- | Inserts a data transfer request.

5454--

5555-- /See:/ 'transfersInsert' smart constructor.

56−newtype TransfersInsert = TransfersInsert

56+newtype TransfersInsert = TransfersInsert'

5757 { _tiPayload :: DataTransfer

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

5959

@@ -66,7 +66,7 @@ transfersInsert

6666 :: DataTransfer -- ^ 'tiPayload'

6767 -> TransfersInsert

6868transfersInsert pTiPayload_ =

69− TransfersInsert

69+ TransfersInsert'

7070 { _tiPayload = pTiPayload_

7171 }

7272

@@ -79,7 +79,7 @@ instance GoogleRequest TransfersInsert where

7979 type Rs TransfersInsert = DataTransfer

8080 type Scopes TransfersInsert =

8181 '["https://www.googleapis.com/auth/admin.datatransfer"]

82− requestClient TransfersInsert{..}

82+ requestClient TransfersInsert'{..}

8383 = go (Just AltJSON) _tiPayload dataTransferService

8484 where go

8585 = buildClient

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

@@ -65,7 +65,7 @@ type TransfersListResource =

6565-- status.

6666--

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

68−data TransfersList = TransfersList

68+data TransfersList = TransfersList'

6969 { _tlStatus :: !(Maybe Text)

7070 , _tlOldOwnerUserId :: !(Maybe Text)

7171 , _tlNewOwnerUserId :: !(Maybe Text)

@@ -92,7 +92,7 @@ data TransfersList = TransfersList

9292transfersList

9393 :: TransfersList

9494transfersList =

95− TransfersList

95+ TransfersList'

9696 { _tlStatus = Nothing

9797 , _tlOldOwnerUserId = Nothing

9898 , _tlNewOwnerUserId = Nothing

@@ -138,7 +138,7 @@ instance GoogleRequest TransfersList where

138138 type Scopes TransfersList =

139139 '["https://www.googleapis.com/auth/admin.datatransfer",

140140 "https://www.googleapis.com/auth/admin.datatransfer.readonly"]

141− requestClient TransfersList{..}

141+ requestClient TransfersList'{..}

142142 = go _tlStatus _tlOldOwnerUserId _tlNewOwnerUserId

143143 _tlCustomerId

144144 _tlPageToken

gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+246−245

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323-- | JSON template for verification codes in Directory API.

2424--

2525-- /See:/ 'verificationCode' smart constructor.

26−data VerificationCode = VerificationCode

26+data VerificationCode = VerificationCode'

2727 { _vcVerificationCode :: !(Maybe Text)

2828 , _vcEtag :: !(Maybe Text)

2929 , _vcKind :: !Text

@@ -44,7 +44,7 @@ data VerificationCode = VerificationCode

4444verificationCode

4545 :: VerificationCode

4646verificationCode =

47− VerificationCode

47+ VerificationCode'

4848 { _vcVerificationCode = Nothing

4949 , _vcEtag = Nothing

5050 , _vcKind = "admin#directory#verificationCode"

@@ -75,13 +75,13 @@ instance FromJSON VerificationCode where

7575 parseJSON

7676 = withObject "VerificationCode"

7777 (\ o ->

78− VerificationCode <$>

78+ VerificationCode' <$>

7979 (o .:? "verificationCode") <*> (o .:? "etag") <*>

8080 (o .:? "kind" .!= "admin#directory#verificationCode")

8181 <*> (o .:? "userId"))

8282

8383instance ToJSON VerificationCode where

84− toJSON VerificationCode{..}

84+ toJSON VerificationCode'{..}

8585 = object

8686 (catMaybes

8787 [("verificationCode" .=) <$> _vcVerificationCode,

@@ -91,7 +91,7 @@ instance ToJSON VerificationCode where

9191-- | JSON template for Org Unit resource in Directory API.

9292--

9393-- /See:/ 'orgUnit' smart constructor.

94−data OrgUnit = OrgUnit

94+data OrgUnit = OrgUnit'

9595 { _ouEtag :: !(Maybe Text)

9696 , _ouParentOrgUnitPath :: !(Maybe Text)

9797 , _ouKind :: !Text

@@ -127,7 +127,7 @@ data OrgUnit = OrgUnit

127127orgUnit

128128 :: OrgUnit

129129orgUnit =

130− OrgUnit

130+ OrgUnit'

131131 { _ouEtag = Nothing

132132 , _ouParentOrgUnitPath = Nothing

133133 , _ouKind = "admin#directory#orgUnit"

@@ -190,7 +190,7 @@ instance FromJSON OrgUnit where

190190 parseJSON

191191 = withObject "OrgUnit"

192192 (\ o ->

193− OrgUnit <$>

193+ OrgUnit' <$>

194194 (o .:? "etag") <*> (o .:? "parentOrgUnitPath") <*>

195195 (o .:? "kind" .!= "admin#directory#orgUnit")

196196 <*> (o .:? "orgUnitPath")

@@ -201,7 +201,7 @@ instance FromJSON OrgUnit where

201201 <*> (o .:? "orgUnitId"))

202202

203203instance ToJSON OrgUnit where

204− toJSON OrgUnit{..}

204+ toJSON OrgUnit'{..}

205205 = object

206206 (catMaybes

207207 [("etag" .=) <$> _ouEtag,

@@ -218,7 +218,7 @@ instance ToJSON OrgUnit where

218218-- Directory API.

219219--

220220-- /See:/ 'userMakeAdmin' smart constructor.

221−newtype UserMakeAdmin = UserMakeAdmin

221+newtype UserMakeAdmin = UserMakeAdmin'

222222 { _umaStatus :: Maybe Bool

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

224224

@@ -230,7 +230,7 @@ newtype UserMakeAdmin = UserMakeAdmin

230230userMakeAdmin

231231 :: UserMakeAdmin

232232userMakeAdmin =

233− UserMakeAdmin

233+ UserMakeAdmin'

234234 { _umaStatus = Nothing

235235 }

236236

@@ -242,16 +242,16 @@ umaStatus

242242instance FromJSON UserMakeAdmin where

243243 parseJSON

244244 = withObject "UserMakeAdmin"

245− (\ o -> UserMakeAdmin <$> (o .:? "status"))

245+ (\ o -> UserMakeAdmin' <$> (o .:? "status"))

246246

247247instance ToJSON UserMakeAdmin where

248− toJSON UserMakeAdmin{..}

248+ toJSON UserMakeAdmin'{..}

249249 = object (catMaybes [("status" .=) <$> _umaStatus])

250250

251251-- | JSON template for About (notes) of a user in Directory API.

252252--

253253-- /See:/ 'userAbout' smart constructor.

254−data UserAbout = UserAbout

254+data UserAbout = UserAbout'

255255 { _uaValue :: !(Maybe Text)

256256 , _uaContentType :: !(Maybe Text)

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

@@ -266,7 +266,7 @@ data UserAbout = UserAbout

266266userAbout

267267 :: UserAbout

268268userAbout =

269− UserAbout

269+ UserAbout'

270270 { _uaValue = Nothing

271271 , _uaContentType = Nothing

272272 }

@@ -287,11 +287,11 @@ instance FromJSON UserAbout where

287287 parseJSON

288288 = withObject "UserAbout"

289289 (\ o ->

290− UserAbout <$>

290+ UserAbout' <$>

291291 (o .:? "value") <*> (o .:? "contentType"))

292292

293293instance ToJSON UserAbout where

294− toJSON UserAbout{..}

294+ toJSON UserAbout'{..}

295295 = object

296296 (catMaybes

297297 [("value" .=) <$> _uaValue,

@@ -300,7 +300,7 @@ instance ToJSON UserAbout where

300300-- | JSON response template for List privileges operation in Directory API.

301301--

302302-- /See:/ 'privileges' smart constructor.

303−data Privileges = Privileges

303+data Privileges = Privileges'

304304 { _pEtag :: !(Maybe Text)

305305 , _pKind :: !Text

306306 , _pItems :: !(Maybe [Privilege])

@@ -318,7 +318,7 @@ data Privileges = Privileges

318318privileges

319319 :: Privileges

320320privileges =

321− Privileges

321+ Privileges'

322322 { _pEtag = Nothing

323323 , _pKind = "admin#directory#privileges"

324324 , _pItems = Nothing

@@ -342,13 +342,13 @@ instance FromJSON Privileges where

342342 parseJSON

343343 = withObject "Privileges"

344344 (\ o ->

345− Privileges <$>

345+ Privileges' <$>

346346 (o .:? "etag") <*>

347347 (o .:? "kind" .!= "admin#directory#privileges")

348348 <*> (o .:? "items" .!= mempty))

349349

350350instance ToJSON Privileges where

351− toJSON Privileges{..}

351+ toJSON Privileges'{..}

352352 = object

353353 (catMaybes

354354 [("etag" .=) <$> _pEtag, Just ("kind" .= _pKind),

@@ -357,7 +357,7 @@ instance ToJSON Privileges where

357357-- | JSON response template for List Groups operation in Directory API.

358358--

359359-- /See:/ 'groups' smart constructor.

360−data Groups = Groups

360+data Groups = Groups'

361361 { _gGroups :: !(Maybe [Group])

362362 , _gEtag :: !(Maybe Text)

363363 , _gNextPageToken :: !(Maybe Text)

@@ -378,7 +378,7 @@ data Groups = Groups

378378groups

379379 :: Groups

380380groups =

381− Groups

381+ Groups'

382382 { _gGroups = Nothing

383383 , _gEtag = Nothing

384384 , _gNextPageToken = Nothing

@@ -409,13 +409,13 @@ instance FromJSON Groups where

409409 parseJSON

410410 = withObject "Groups"

411411 (\ o ->

412− Groups <$>

412+ Groups' <$>

413413 (o .:? "groups" .!= mempty) <*> (o .:? "etag") <*>

414414 (o .:? "nextPageToken")

415415 <*> (o .:? "kind" .!= "admin#directory#groups"))

416416

417417instance ToJSON Groups where

418− toJSON Groups{..}

418+ toJSON Groups'{..}

419419 = object

420420 (catMaybes

421421 [("groups" .=) <$> _gGroups, ("etag" .=) <$> _gEtag,

@@ -426,7 +426,7 @@ instance ToJSON Groups where

426426-- API.

427427--

428428-- /See:/ 'roleAssignments' smart constructor.

429−data RoleAssignments = RoleAssignments

429+data RoleAssignments = RoleAssignments'

430430 { _raEtag :: !(Maybe Text)

431431 , _raNextPageToken :: !(Maybe Text)

432432 , _raKind :: !Text

@@ -447,7 +447,7 @@ data RoleAssignments = RoleAssignments

447447roleAssignments

448448 :: RoleAssignments

449449roleAssignments =

450− RoleAssignments

450+ RoleAssignments'

451451 { _raEtag = Nothing

452452 , _raNextPageToken = Nothing

453453 , _raKind = "admin#directory#roleAssignments"

@@ -478,13 +478,13 @@ instance FromJSON RoleAssignments where

478478 parseJSON

479479 = withObject "RoleAssignments"

480480 (\ o ->

481− RoleAssignments <$>

481+ RoleAssignments' <$>

482482 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

483483 (o .:? "kind" .!= "admin#directory#roleAssignments")

484484 <*> (o .:? "items" .!= mempty))

485485

486486instance ToJSON RoleAssignments where

487− toJSON RoleAssignments{..}

487+ toJSON RoleAssignments'{..}

488488 = object

489489 (catMaybes

490490 [("etag" .=) <$> _raEtag,

@@ -494,7 +494,7 @@ instance ToJSON RoleAssignments where

494494-- | JSON template for privilege resource in Directory API.

495495--

496496-- /See:/ 'privilege' smart constructor.

497−data Privilege = Privilege

497+data Privilege = Privilege'

498498 { _priEtag :: !(Maybe Text)

499499 , _priIsOuScopable :: !(Maybe Bool)

500500 , _priKind :: !Text

@@ -524,7 +524,7 @@ data Privilege = Privilege

524524privilege

525525 :: Privilege

526526privilege =

527− Privilege

527+ Privilege'

528528 { _priEtag = Nothing

529529 , _priIsOuScopable = Nothing

530530 , _priKind = "admin#directory#privilege"

@@ -579,7 +579,7 @@ instance FromJSON Privilege where

579579 parseJSON

580580 = withObject "Privilege"

581581 (\ o ->

582− Privilege <$>

582+ Privilege' <$>

583583 (o .:? "etag") <*> (o .:? "isOuScopable") <*>

584584 (o .:? "kind" .!= "admin#directory#privilege")

585585 <*> (o .:? "serviceName")

@@ -588,7 +588,7 @@ instance FromJSON Privilege where

588588 <*> (o .:? "childPrivileges" .!= mempty))

589589

590590instance ToJSON Privilege where

591− toJSON Privilege{..}

591+ toJSON Privilege'{..}

592592 = object

593593 (catMaybes

594594 [("etag" .=) <$> _priEtag,

@@ -602,7 +602,7 @@ instance ToJSON Privilege where

602602-- | JSON response template for List roles operation in Directory API.

603603--

604604-- /See:/ 'roles' smart constructor.

605−data Roles = Roles

605+data Roles = Roles'

606606 { _rEtag :: !(Maybe Text)

607607 , _rNextPageToken :: !(Maybe Text)

608608 , _rKind :: !Text

@@ -623,7 +623,7 @@ data Roles = Roles

623623roles

624624 :: Roles

625625roles =

626− Roles

626+ Roles'

627627 { _rEtag = Nothing

628628 , _rNextPageToken = Nothing

629629 , _rKind = "admin#directory#roles"

@@ -653,13 +653,13 @@ instance FromJSON Roles where

653653 parseJSON

654654 = withObject "Roles"

655655 (\ o ->

656− Roles <$>

656+ Roles' <$>

657657 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

658658 (o .:? "kind" .!= "admin#directory#roles")

659659 <*> (o .:? "items" .!= mempty))

660660

661661instance ToJSON Roles where

662− toJSON Roles{..}

662+ toJSON Roles'{..}

663663 = object

664664 (catMaybes

665665 [("etag" .=) <$> _rEtag,

@@ -669,7 +669,7 @@ instance ToJSON Roles where

669669-- | JSON template for address.

670670--

671671-- /See:/ 'userAddress' smart constructor.

672−data UserAddress = UserAddress

672+data UserAddress = UserAddress'

673673 { _uaStreetAddress :: !(Maybe Text)

674674 , _uaPoBox :: !(Maybe Text)

675675 , _uaCountry :: !(Maybe Text)

@@ -717,7 +717,7 @@ data UserAddress = UserAddress

717717userAddress

718718 :: UserAddress

719719userAddress =

720− UserAddress

720+ UserAddress'

721721 { _uaStreetAddress = Nothing

722722 , _uaPoBox = Nothing

723723 , _uaCountry = Nothing

@@ -810,7 +810,7 @@ instance FromJSON UserAddress where

810810 parseJSON

811811 = withObject "UserAddress"

812812 (\ o ->

813− UserAddress <$>

813+ UserAddress' <$>

814814 (o .:? "streetAddress") <*> (o .:? "poBox") <*>

815815 (o .:? "country")

816816 <*> (o .:? "postalCode")

@@ -825,7 +825,7 @@ instance FromJSON UserAddress where

825825 <*> (o .:? "sourceIsStructured"))

826826

827827instance ToJSON UserAddress where

828− toJSON UserAddress{..}

828+ toJSON UserAddress'{..}

829829 = object

830830 (catMaybes

831831 [("streetAddress" .=) <$> _uaStreetAddress,

@@ -844,7 +844,7 @@ instance ToJSON UserAddress where

844844-- | JSON template for postal address of a customer.

845845--

846846-- /See:/ 'customerPostalAddress' smart constructor.

847−data CustomerPostalAddress = CustomerPostalAddress

847+data CustomerPostalAddress = CustomerPostalAddress'

848848 { _cpaOrganizationName :: !(Maybe Text)

849849 , _cpaPostalCode :: !(Maybe Text)

850850 , _cpaAddressLine1 :: !(Maybe Text)

@@ -880,7 +880,7 @@ data CustomerPostalAddress = CustomerPostalAddress

880880customerPostalAddress

881881 :: CustomerPostalAddress

882882customerPostalAddress =

883− CustomerPostalAddress

883+ CustomerPostalAddress'

884884 { _cpaOrganizationName = Nothing

885885 , _cpaPostalCode = Nothing

886886 , _cpaAddressLine1 = Nothing

@@ -954,7 +954,7 @@ instance FromJSON CustomerPostalAddress where

954954 parseJSON

955955 = withObject "CustomerPostalAddress"

956956 (\ o ->

957− CustomerPostalAddress <$>

957+ CustomerPostalAddress' <$>

958958 (o .:? "organizationName") <*> (o .:? "postalCode")

959959 <*> (o .:? "addressLine1")

960960 <*> (o .:? "locality")

@@ -965,7 +965,7 @@ instance FromJSON CustomerPostalAddress where

965965 <*> (o .:? "addressLine3"))

966966

967967instance ToJSON CustomerPostalAddress where

968− toJSON CustomerPostalAddress{..}

968+ toJSON CustomerPostalAddress'{..}

969969 = object

970970 (catMaybes

971971 [("organizationName" .=) <$> _cpaOrganizationName,

@@ -981,7 +981,7 @@ instance ToJSON CustomerPostalAddress where

981981-- | JSON template for roleAssignment resource in Directory API.

982982--

983983-- /See:/ 'roleAssignment' smart constructor.

984−data RoleAssignment = RoleAssignment

984+data RoleAssignment = RoleAssignment'

985985 { _rolEtag :: !(Maybe Text)

986986 , _rolScopeType :: !(Maybe Text)

987987 , _rolKind :: !Text

@@ -1011,7 +1011,7 @@ data RoleAssignment = RoleAssignment

10111011roleAssignment

10121012 :: RoleAssignment

10131013roleAssignment =

1014− RoleAssignment

1014+ RoleAssignment'

10151015 { _rolEtag = Nothing

10161016 , _rolScopeType = Nothing

10171017 , _rolKind = "admin#directory#roleAssignment"

@@ -1065,7 +1065,7 @@ instance FromJSON RoleAssignment where

10651065 parseJSON

10661066 = withObject "RoleAssignment"

10671067 (\ o ->

1068− RoleAssignment <$>

1068+ RoleAssignment' <$>

10691069 (o .:? "etag") <*> (o .:? "scopeType") <*>

10701070 (o .:? "kind" .!= "admin#directory#roleAssignment")

10711071 <*> (o .:? "assignedTo")

@@ -1074,7 +1074,7 @@ instance FromJSON RoleAssignment where

10741074 <*> (o .:? "orgUnitId"))

10751075

10761076instance ToJSON RoleAssignment where

1077− toJSON RoleAssignment{..}

1077+ toJSON RoleAssignment'{..}

10781078 = object

10791079 (catMaybes

10801080 [("etag" .=) <$> _rolEtag,

@@ -1088,7 +1088,7 @@ instance ToJSON RoleAssignment where

10881088-- | JSON template for Group resource in Directory API.

10891089--

10901090-- /See:/ 'group'' smart constructor.

1091−data Group = Group

1091+data Group = Group'

10921092 { _groEmail :: !(Maybe Text)

10931093 , _groEtag :: !(Maybe Text)

10941094 , _groDirectMembersCount :: !(Maybe (Textual Int64))

@@ -1127,7 +1127,7 @@ data Group = Group

11271127group'

11281128 :: Group

11291129group' =

1130− Group

1130+ Group'

11311131 { _groEmail = Nothing

11321132 , _groEtag = Nothing

11331133 , _groDirectMembersCount = Nothing

@@ -1198,7 +1198,7 @@ instance FromJSON Group where

11981198 parseJSON

11991199 = withObject "Group"

12001200 (\ o ->

1201− Group <$>

1201+ Group' <$>

12021202 (o .:? "email") <*> (o .:? "etag") <*>

12031203 (o .:? "directMembersCount")

12041204 <*> (o .:? "kind" .!= "admin#directory#group")

@@ -1210,7 +1210,7 @@ instance FromJSON Group where

12101210 <*> (o .:? "description"))

12111211

12121212instance ToJSON Group where

1213− toJSON Group{..}

1213+ toJSON Group'{..}

12141214 = object

12151215 (catMaybes

12161216 [("email" .=) <$> _groEmail,

@@ -1227,7 +1227,7 @@ instance ToJSON Group where

12271227-- | JSON template for Chrome Os Device resource in Directory API.

12281228--

12291229-- /See:/ 'chromeOSDevice' smart constructor.

1230−data ChromeOSDevice = ChromeOSDevice

1230+data ChromeOSDevice = ChromeOSDevice'

12311231 { _codStatus :: !(Maybe Text)

12321232 , _codEtag :: !(Maybe Text)

12331233 , _codAnnotatedUser :: !(Maybe Text)

@@ -1311,7 +1311,7 @@ data ChromeOSDevice = ChromeOSDevice

13111311chromeOSDevice

13121312 :: ChromeOSDevice

13131313chromeOSDevice =

1314− ChromeOSDevice

1314+ ChromeOSDevice'

13151315 { _codStatus = Nothing

13161316 , _codEtag = Nothing

13171317 , _codAnnotatedUser = Nothing

@@ -1488,7 +1488,7 @@ instance FromJSON ChromeOSDevice where

14881488 parseJSON

14891489 = withObject "ChromeOSDevice"

14901490 (\ o ->

1491− ChromeOSDevice <$>

1491+ ChromeOSDevice' <$>

14921492 (o .:? "status") <*> (o .:? "etag") <*>

14931493 (o .:? "annotatedUser")

14941494 <*> (o .:? "platformVersion")

@@ -1516,7 +1516,7 @@ instance FromJSON ChromeOSDevice where

15161516 <*> (o .:? "osVersion"))

15171517

15181518instance ToJSON ChromeOSDevice where

1519− toJSON ChromeOSDevice{..}

1519+ toJSON ChromeOSDevice'{..}

15201520 = object

15211521 (catMaybes

15221522 [("status" .=) <$> _codStatus,

@@ -1548,7 +1548,7 @@ instance ToJSON ChromeOSDevice where

15481548-- | JSON response template for List Users operation in Apps Directory API.

15491549--

15501550-- /See:/ 'users' smart constructor.

1551−data Users = Users

1551+data Users = Users'

15521552 { _uEtag :: !(Maybe Text)

15531553 , _uNextPageToken :: !(Maybe Text)

15541554 , _uUsers :: !(Maybe [User])

@@ -1572,7 +1572,7 @@ data Users = Users

15721572users

15731573 :: Users

15741574users =

1575− Users

1575+ Users'

15761576 { _uEtag = Nothing

15771577 , _uNextPageToken = Nothing

15781578 , _uUsers = Nothing

@@ -1610,14 +1610,14 @@ instance FromJSON Users where

16101610 parseJSON

16111611 = withObject "Users"

16121612 (\ o ->

1613− Users <$>

1613+ Users' <$>

16141614 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

16151615 (o .:? "users" .!= mempty)

16161616 <*> (o .:? "kind" .!= "admin#directory#users")

16171617 <*> (o .:? "trigger_event"))

16181618

16191619instance ToJSON Users where

1620− toJSON Users{..}

1620+ toJSON Users'{..}

16211621 = object

16221622 (catMaybes

16231623 [("etag" .=) <$> _uEtag,

@@ -1628,7 +1628,7 @@ instance ToJSON Users where

16281628-- | The template that returns individual ASP (Access Code) data.

16291629--

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

1631−data Asp = Asp

1631+data Asp = Asp'

16321632 { _aCreationTime :: !(Maybe (Textual Int64))

16331633 , _aEtag :: !(Maybe Text)

16341634 , _aCodeId :: !(Maybe (Textual Int32))

@@ -1658,7 +1658,7 @@ data Asp = Asp

16581658asp

16591659 :: Asp

16601660asp =

1661− Asp

1661+ Asp'

16621662 { _aCreationTime = Nothing

16631663 , _aEtag = Nothing

16641664 , _aCodeId = Nothing

@@ -1709,7 +1709,7 @@ instance FromJSON Asp where

17091709 parseJSON

17101710 = withObject "Asp"

17111711 (\ o ->

1712− Asp <$>

1712+ Asp' <$>

17131713 (o .:? "creationTime") <*> (o .:? "etag") <*>

17141714 (o .:? "codeId")

17151715 <*> (o .:? "kind" .!= "admin#directory#asp")

@@ -1718,7 +1718,7 @@ instance FromJSON Asp where

17181718 <*> (o .:? "userKey"))

17191719

17201720instance ToJSON Asp where

1721− toJSON Asp{..}

1721+ toJSON Asp'{..}

17221722 = object

17231723 (catMaybes

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

@@ -1730,7 +1730,7 @@ instance ToJSON Asp where

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

17311731--

17321732-- /See:/ 'schemas' smart constructor.

1733−data Schemas = Schemas

1733+data Schemas = Schemas'

17341734 { _sEtag :: !(Maybe Text)

17351735 , _sSchemas :: !(Maybe [Schema])

17361736 , _sKind :: !Text

@@ -1748,7 +1748,7 @@ data Schemas = Schemas

17481748schemas

17491749 :: Schemas

17501750schemas =

1751− Schemas

1751+ Schemas'

17521752 { _sEtag = Nothing

17531753 , _sSchemas = Nothing

17541754 , _sKind = "admin#directory#schemas"

@@ -1773,12 +1773,12 @@ instance FromJSON Schemas where

17731773 parseJSON

17741774 = withObject "Schemas"

17751775 (\ o ->

1776− Schemas <$>

1776+ Schemas' <$>

17771777 (o .:? "etag") <*> (o .:? "schemas" .!= mempty) <*>

17781778 (o .:? "kind" .!= "admin#directory#schemas"))

17791779

17801780instance ToJSON Schemas where

1781− toJSON Schemas{..}

1781+ toJSON Schemas'{..}

17821782 = object

17831783 (catMaybes

17841784 [("etag" .=) <$> _sEtag,

@@ -1788,7 +1788,7 @@ instance ToJSON Schemas where

17881788-- | Template for a notification resource.

17891789--

17901790-- /See:/ 'notification' smart constructor.

1791−data Notification = Notification

1791+data Notification = Notification'

17921792 { _nSubject :: !(Maybe Text)

17931793 , _nEtag :: !(Maybe Text)

17941794 , _nKind :: !Text

@@ -1821,7 +1821,7 @@ data Notification = Notification

18211821notification

18221822 :: Notification

18231823notification =

1824− Notification

1824+ Notification'

18251825 { _nSubject = Nothing

18261826 , _nEtag = Nothing

18271827 , _nKind = "admin#directory#notification"

@@ -1873,7 +1873,7 @@ instance FromJSON Notification where

18731873 parseJSON

18741874 = withObject "Notification"

18751875 (\ o ->

1876− Notification <$>

1876+ Notification' <$>

18771877 (o .:? "subject") <*> (o .:? "etag") <*>

18781878 (o .:? "kind" .!= "admin#directory#notification")

18791879 <*> (o .:? "body")

@@ -1883,7 +1883,7 @@ instance FromJSON Notification where

18831883 <*> (o .:? "sendTime"))

18841884

18851885instance ToJSON Notification where

1886− toJSON Notification{..}

1886+ toJSON Notification'{..}

18871887 = object

18881888 (catMaybes

18891889 [("subject" .=) <$> _nSubject,

@@ -1897,7 +1897,7 @@ instance ToJSON Notification where

18971897-- | JSON template for instant messenger of an user.

18981898--

18991899-- /See:/ 'userIm' smart constructor.

1900−data UserIm = UserIm

1900+data UserIm = UserIm'

19011901 { _uiIm :: !(Maybe Text)

19021902 , _uiProtocol :: !(Maybe Text)

19031903 , _uiPrimary :: !(Maybe Bool)

@@ -1924,7 +1924,7 @@ data UserIm = UserIm

19241924userIm

19251925 :: UserIm

19261926userIm =

1927− UserIm

1927+ UserIm'

19281928 { _uiIm = Nothing

19291929 , _uiProtocol = Nothing

19301930 , _uiPrimary = Nothing

@@ -1973,7 +1973,7 @@ instance FromJSON UserIm where

19731973 parseJSON

19741974 = withObject "UserIm"

19751975 (\ o ->

1976− UserIm <$>

1976+ UserIm' <$>

19771977 (o .:? "im") <*> (o .:? "protocol") <*>

19781978 (o .:? "primary")

19791979 <*> (o .:? "customProtocol")

@@ -1981,7 +1981,7 @@ instance FromJSON UserIm where

19811981 <*> (o .:? "customType"))

19821982

19831983instance ToJSON UserIm where

1984− toJSON UserIm{..}

1984+ toJSON UserIm'{..}

19851985 = object

19861986 (catMaybes

19871987 [("im" .=) <$> _uiIm,

@@ -1994,7 +1994,7 @@ instance ToJSON UserIm where

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

19951995--

19961996-- /See:/ 'tokens' smart constructor.

1997−data Tokens = Tokens

1997+data Tokens = Tokens'

19981998 { _tEtag :: !(Maybe Text)

19991999 , _tKind :: !Text

20002000 , _tItems :: !(Maybe [Token])

@@ -2012,7 +2012,7 @@ data Tokens = Tokens

20122012tokens

20132013 :: Tokens

20142014tokens =

2015− Tokens

2015+ Tokens'

20162016 { _tEtag = Nothing

20172017 , _tKind = "admin#directory#tokenList"

20182018 , _tItems = Nothing

@@ -2036,13 +2036,13 @@ instance FromJSON Tokens where

20362036 parseJSON

20372037 = withObject "Tokens"

20382038 (\ o ->

2039− Tokens <$>

2039+ Tokens' <$>

20402040 (o .:? "etag") <*>

20412041 (o .:? "kind" .!= "admin#directory#tokenList")

20422042 <*> (o .:? "items" .!= mempty))

20432043

20442044instance ToJSON Tokens where

2045− toJSON Tokens{..}

2045+ toJSON Tokens'{..}

20462046 = object

20472047 (catMaybes

20482048 [("etag" .=) <$> _tEtag, Just ("kind" .= _tKind),

@@ -2051,7 +2051,7 @@ instance ToJSON Tokens where

20512051-- | Custom fields of the user.

20522052--

20532053-- /See:/ 'userCustomSchemas' smart constructor.

2054−newtype UserCustomSchemas = UserCustomSchemas

2054+newtype UserCustomSchemas = UserCustomSchemas'

20552055 { _ucsAddtional :: HashMap Text UserCustomProperties

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

20572057

@@ -2064,7 +2064,7 @@ userCustomSchemas

20642064 :: HashMap Text UserCustomProperties -- ^ 'ucsAddtional'

20652065 -> UserCustomSchemas

20662066userCustomSchemas pUcsAddtional_ =

2067− UserCustomSchemas

2067+ UserCustomSchemas'

20682068 { _ucsAddtional = _Coerce # pUcsAddtional_

20692069 }

20702070

@@ -2076,7 +2076,7 @@ ucsAddtional

20762076instance FromJSON UserCustomSchemas where

20772077 parseJSON

20782078 = withObject "UserCustomSchemas"

2079− (\ o -> UserCustomSchemas <$> (parseJSONObject o))

2079+ (\ o -> UserCustomSchemas' <$> (parseJSONObject o))

20802080

20812081instance ToJSON UserCustomSchemas where

20822082 toJSON = toJSON . _ucsAddtional

@@ -2084,7 +2084,7 @@ instance ToJSON UserCustomSchemas where

20842084-- | JSON response template to list domain aliases in Directory API.

20852085--

20862086-- /See:/ 'domainAliases' smart constructor.

2087−data DomainAliases = DomainAliases

2087+data DomainAliases = DomainAliases'

20882088 { _daEtag :: !(Maybe Text)

20892089 , _daKind :: !Text

20902090 , _daDomainAliases :: !(Maybe [DomainAlias])

@@ -2102,7 +2102,7 @@ data DomainAliases = DomainAliases

21022102domainAliases

21032103 :: DomainAliases

21042104domainAliases =

2105− DomainAliases

2105+ DomainAliases'

21062106 { _daEtag = Nothing

21072107 , _daKind = "admin#directory#domainAliases"

21082108 , _daDomainAliases = Nothing

@@ -2128,13 +2128,13 @@ instance FromJSON DomainAliases where

21282128 parseJSON

21292129 = withObject "DomainAliases"

21302130 (\ o ->

2131− DomainAliases <$>

2131+ DomainAliases' <$>

21322132 (o .:? "etag") <*>

21332133 (o .:? "kind" .!= "admin#directory#domainAliases")

21342134 <*> (o .:? "domainAliases" .!= mempty))

21352135

21362136instance ToJSON DomainAliases where

2137− toJSON DomainAliases{..}

2137+ toJSON DomainAliases'{..}

21382138 = object

21392139 (catMaybes

21402140 [("etag" .=) <$> _daEtag, Just ("kind" .= _daKind),

@@ -2143,7 +2143,7 @@ instance ToJSON DomainAliases where

21432143-- | JSON response template to list aliases in Directory API.

21442144--

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

2146−data Aliases = Aliases

2146+data Aliases = Aliases'

21472147 { _aliEtag :: !(Maybe Text)

21482148 , _aliKind :: !Text

21492149 , _aliAliases :: !(Maybe [Alias])

@@ -2161,7 +2161,7 @@ data Aliases = Aliases

21612161aliases

21622162 :: Aliases

21632163aliases =

2164− Aliases

2164+ Aliases'

21652165 { _aliEtag = Nothing

21662166 , _aliKind = "admin#directory#aliases"

21672167 , _aliAliases = Nothing

@@ -2186,13 +2186,13 @@ instance FromJSON Aliases where

21862186 parseJSON

21872187 = withObject "Aliases"

21882188 (\ o ->

2189− Aliases <$>

2189+ Aliases' <$>

21902190 (o .:? "etag") <*>

21912191 (o .:? "kind" .!= "admin#directory#aliases")

21922192 <*> (o .:? "aliases" .!= mempty))

21932193

21942194instance ToJSON Aliases where

2195− toJSON Aliases{..}

2195+ toJSON Aliases'{..}

21962196 = object

21972197 (catMaybes

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

@@ -2201,7 +2201,7 @@ instance ToJSON Aliases where

22012201-- | JSON template for Calendar Resource object in Directory API.

22022202--

22032203-- /See:/ 'calendarResource' smart constructor.

2204−data CalendarResource = CalendarResource

2204+data CalendarResource = CalendarResource'

22052205 { _crEtags :: !(Maybe Text)

22062206 , _crResourceId :: !(Maybe Text)

22072207 , _crResourceType :: !(Maybe Text)

@@ -2231,7 +2231,7 @@ data CalendarResource = CalendarResource

22312231calendarResource

22322232 :: CalendarResource

22332233calendarResource =

2234− CalendarResource

2234+ CalendarResource'

22352235 { _crEtags = Nothing

22362236 , _crResourceId = Nothing

22372237 , _crResourceType = Nothing

@@ -2285,7 +2285,7 @@ instance FromJSON CalendarResource where

22852285 parseJSON

22862286 = withObject "CalendarResource"

22872287 (\ o ->

2288− CalendarResource <$>

2288+ CalendarResource' <$>

22892289 (o .:? "etags") <*> (o .:? "resourceId") <*>

22902290 (o .:? "resourceType")

22912291 <*> (o .:? "resourceName")

@@ -2296,7 +2296,7 @@ instance FromJSON CalendarResource where

22962296 <*> (o .:? "resourceDescription"))

22972297

22982298instance ToJSON CalendarResource where

2299− toJSON CalendarResource{..}

2299+ toJSON CalendarResource'{..}

23002300 = object

23012301 (catMaybes

23022302 [("etags" .=) <$> _crEtags,

@@ -2311,7 +2311,7 @@ instance ToJSON CalendarResource where

23112311-- | JSON request template to undelete a user in Directory API.

23122312--

23132313-- /See:/ 'userUndelete' smart constructor.

2314−newtype UserUndelete = UserUndelete

2314+newtype UserUndelete = UserUndelete'

23152315 { _uuOrgUnitPath :: Maybe Text

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

23172317

@@ -2323,7 +2323,7 @@ newtype UserUndelete = UserUndelete

23232323userUndelete

23242324 :: UserUndelete

23252325userUndelete =

2326− UserUndelete

2326+ UserUndelete'

23272327 { _uuOrgUnitPath = Nothing

23282328 }

23292329

@@ -2336,17 +2336,17 @@ uuOrgUnitPath

23362336instance FromJSON UserUndelete where

23372337 parseJSON

23382338 = withObject "UserUndelete"

2339− (\ o -> UserUndelete <$> (o .:? "orgUnitPath"))

2339+ (\ o -> UserUndelete' <$> (o .:? "orgUnitPath"))

23402340

23412341instance ToJSON UserUndelete where

2342− toJSON UserUndelete{..}

2342+ toJSON UserUndelete'{..}

23432343 = object

23442344 (catMaybes [("orgUnitPath" .=) <$> _uuOrgUnitPath])

23452345

23462346-- | JSON response template for List Members operation in Directory API.

23472347--

23482348-- /See:/ 'members' smart constructor.

2349−data Members = Members

2349+data Members = Members'

23502350 { _mEtag :: !(Maybe Text)

23512351 , _mNextPageToken :: !(Maybe Text)

23522352 , _mKind :: !Text

@@ -2367,7 +2367,7 @@ data Members = Members

23672367members

23682368 :: Members

23692369members =

2370− Members

2370+ Members'

23712371 { _mEtag = Nothing

23722372 , _mNextPageToken = Nothing

23732373 , _mKind = "admin#directory#members"

@@ -2399,13 +2399,13 @@ instance FromJSON Members where

23992399 parseJSON

24002400 = withObject "Members"

24012401 (\ o ->

2402− Members <$>

2402+ Members' <$>

24032403 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

24042404 (o .:? "kind" .!= "admin#directory#members")

24052405 <*> (o .:? "members" .!= mempty))

24062406

24072407instance ToJSON Members where

2408− toJSON Members{..}

2408+ toJSON Members'{..}

24092409 = object

24102410 (catMaybes

24112411 [("etag" .=) <$> _mEtag,

@@ -2416,7 +2416,7 @@ instance ToJSON Members where

24162416-- | An notification channel used to watch for resource changes.

24172417--

24182418-- /See:/ 'channel' smart constructor.

2419−data Channel = Channel

2419+data Channel = Channel'

24202420 { _cResourceURI :: !(Maybe Text)

24212421 , _cResourceId :: !(Maybe Text)

24222422 , _cKind :: !Text

@@ -2455,7 +2455,7 @@ data Channel = Channel

24552455channel

24562456 :: Channel

24572457channel =

2458− Channel

2458+ Channel'

24592459 { _cResourceURI = Nothing

24602460 , _cResourceId = Nothing

24612461 , _cKind = "api#channel"

@@ -2520,7 +2520,7 @@ instance FromJSON Channel where

25202520 parseJSON

25212521 = withObject "Channel"

25222522 (\ o ->

2523− Channel <$>

2523+ Channel' <$>

25242524 (o .:? "resourceUri") <*> (o .:? "resourceId") <*>

25252525 (o .:? "kind" .!= "api#channel")

25262526 <*> (o .:? "expiration")

@@ -2532,7 +2532,7 @@ instance FromJSON Channel where

25322532 <*> (o .:? "type"))

25332533

25342534instance ToJSON Channel where

2535− toJSON Channel{..}

2535+ toJSON Channel'{..}

25362536 = object

25372537 (catMaybes

25382538 [("resourceUri" .=) <$> _cResourceURI,

@@ -2549,7 +2549,7 @@ instance ToJSON Channel where

25492549-- API.

25502550--

25512551-- /See:/ 'mobileDevices' smart constructor.

2552−data MobileDevices = MobileDevices

2552+data MobileDevices = MobileDevices'

25532553 { _mdEtag :: !(Maybe Text)

25542554 , _mdNextPageToken :: !(Maybe Text)

25552555 , _mdKind :: !Text

@@ -2570,7 +2570,7 @@ data MobileDevices = MobileDevices

25702570mobileDevices

25712571 :: MobileDevices

25722572mobileDevices =

2573− MobileDevices

2573+ MobileDevices'

25742574 { _mdEtag = Nothing

25752575 , _mdNextPageToken = Nothing

25762576 , _mdKind = "admin#directory#mobiledevices"

@@ -2603,13 +2603,13 @@ instance FromJSON MobileDevices where

26032603 parseJSON

26042604 = withObject "MobileDevices"

26052605 (\ o ->

2606− MobileDevices <$>

2606+ MobileDevices' <$>

26072607 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

26082608 (o .:? "kind" .!= "admin#directory#mobiledevices")

26092609 <*> (o .:? "mobiledevices" .!= mempty))

26102610

26112611instance ToJSON MobileDevices where

2612− toJSON MobileDevices{..}

2612+ toJSON MobileDevices'{..}

26132613 = object

26142614 (catMaybes

26152615 [("etag" .=) <$> _mdEtag,

@@ -2620,7 +2620,7 @@ instance ToJSON MobileDevices where

26202620-- | JSON template for token resource in Directory API.

26212621--

26222622-- /See:/ 'token' smart constructor.

2623−data Token = Token

2623+data Token = Token'

26242624 { _tokClientId :: !(Maybe Text)

26252625 , _tokEtag :: !(Maybe Text)

26262626 , _tokDisplayText :: !(Maybe Text)

@@ -2653,7 +2653,7 @@ data Token = Token

26532653token

26542654 :: Token

26552655token =

2656− Token

2656+ Token'

26572657 { _tokClientId = Nothing

26582658 , _tokEtag = Nothing

26592659 , _tokDisplayText = Nothing

@@ -2711,7 +2711,7 @@ instance FromJSON Token where

27112711 parseJSON

27122712 = withObject "Token"

27132713 (\ o ->

2714− Token <$>

2714+ Token' <$>

27152715 (o .:? "clientId") <*> (o .:? "etag") <*>

27162716 (o .:? "displayText")

27172717 <*> (o .:? "kind" .!= "admin#directory#token")

@@ -2721,7 +2721,7 @@ instance FromJSON Token where

27212721 <*> (o .:? "userKey"))

27222722

27232723instance ToJSON Token where

2724− toJSON Token{..}

2724+ toJSON Token'{..}

27252725 = object

27262726 (catMaybes

27272727 [("clientId" .=) <$> _tokClientId,

@@ -2736,7 +2736,7 @@ instance ToJSON Token where

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

27372737--

27382738-- /See:/ 'userName' smart constructor.

2739−data UserName = UserName

2739+data UserName = UserName'

27402740 { _unGivenName :: !(Maybe Text)

27412741 , _unFullName :: !(Maybe Text)

27422742 , _unFamilyName :: !(Maybe Text)

@@ -2754,7 +2754,7 @@ data UserName = UserName

27542754userName

27552755 :: UserName

27562756userName =

2757− UserName

2757+ UserName'

27582758 { _unGivenName = Nothing

27592759 , _unFullName = Nothing

27602760 , _unFamilyName = Nothing

@@ -2779,12 +2779,12 @@ instance FromJSON UserName where

27792779 parseJSON

27802780 = withObject "UserName"

27812781 (\ o ->

2782− UserName <$>

2782+ UserName' <$>

27832783 (o .:? "givenName") <*> (o .:? "fullName") <*>

27842784 (o .:? "familyName"))

27852785

27862786instance ToJSON UserName where

2787− toJSON UserName{..}

2787+ toJSON UserName'{..}

27882788 = object

27892789 (catMaybes

27902790 [("givenName" .=) <$> _unGivenName,

@@ -2793,7 +2793,7 @@ instance ToJSON UserName where

27932793

27942794--

27952795-- /See:/ 'chromeOSDeviceRecentUsersItem' smart constructor.

2796−data ChromeOSDeviceRecentUsersItem = ChromeOSDeviceRecentUsersItem

2796+data ChromeOSDeviceRecentUsersItem = ChromeOSDeviceRecentUsersItem'

27972797 { _codruiEmail :: !(Maybe Text)

27982798 , _codruiType :: !(Maybe Text)

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

@@ -2808,7 +2808,7 @@ data ChromeOSDeviceRecentUsersItem = ChromeOSDeviceRecentUsersItem

28082808chromeOSDeviceRecentUsersItem

28092809 :: ChromeOSDeviceRecentUsersItem

28102810chromeOSDeviceRecentUsersItem =

2811− ChromeOSDeviceRecentUsersItem

2811+ ChromeOSDeviceRecentUsersItem'

28122812 { _codruiEmail = Nothing

28132813 , _codruiType = Nothing

28142814 }

@@ -2827,11 +2827,11 @@ instance FromJSON ChromeOSDeviceRecentUsersItem where

28272827 parseJSON

28282828 = withObject "ChromeOSDeviceRecentUsersItem"

28292829 (\ o ->

2830− ChromeOSDeviceRecentUsersItem <$>

2830+ ChromeOSDeviceRecentUsersItem' <$>

28312831 (o .:? "email") <*> (o .:? "type"))

28322832

28332833instance ToJSON ChromeOSDeviceRecentUsersItem where

2834− toJSON ChromeOSDeviceRecentUsersItem{..}

2834+ toJSON ChromeOSDeviceRecentUsersItem'{..}

28352835 = object

28362836 (catMaybes

28372837 [("email" .=) <$> _codruiEmail,

@@ -2840,7 +2840,7 @@ instance ToJSON ChromeOSDeviceRecentUsersItem where

28402840-- | JSON template for Domain Alias object in Directory API.

28412841--

28422842-- /See:/ 'domainAlias' smart constructor.

2843−data DomainAlias = DomainAlias

2843+data DomainAlias = DomainAlias'

28442844 { _dCreationTime :: !(Maybe (Textual Int64))

28452845 , _dEtag :: !(Maybe Text)

28462846 , _dKind :: !Text

@@ -2867,7 +2867,7 @@ data DomainAlias = DomainAlias

28672867domainAlias

28682868 :: DomainAlias

28692869domainAlias =

2870− DomainAlias

2870+ DomainAlias'

28712871 { _dCreationTime = Nothing

28722872 , _dEtag = Nothing

28732873 , _dKind = "admin#directory#domainAlias"

@@ -2913,7 +2913,7 @@ instance FromJSON DomainAlias where

29132913 parseJSON

29142914 = withObject "DomainAlias"

29152915 (\ o ->

2916− DomainAlias <$>

2916+ DomainAlias' <$>

29172917 (o .:? "creationTime") <*> (o .:? "etag") <*>

29182918 (o .:? "kind" .!= "admin#directory#domainAlias")

29192919 <*> (o .:? "verified")

@@ -2921,7 +2921,7 @@ instance FromJSON DomainAlias where

29212921 <*> (o .:? "parentDomainName"))

29222922

29232923instance ToJSON DomainAlias where

2924− toJSON DomainAlias{..}

2924+ toJSON DomainAlias'{..}

29252925 = object

29262926 (catMaybes

29272927 [("creationTime" .=) <$> _dCreationTime,

@@ -2933,7 +2933,7 @@ instance ToJSON DomainAlias where

29332933-- | JSON template for Alias object in Directory API.

29342934--

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

2936−data Alias = Alias

2936+data Alias = Alias'

29372937 { _aaEtag :: !(Maybe Text)

29382938 , _aaKind :: !Text

29392939 , _aaAlias :: !(Maybe Text)

@@ -2957,7 +2957,7 @@ data Alias = Alias

29572957alias

29582958 :: Alias

29592959alias =

2960− Alias

2960+ Alias'

29612961 { _aaEtag = Nothing

29622962 , _aaKind = "admin#directory#alias"

29632963 , _aaAlias = Nothing

@@ -2991,7 +2991,7 @@ instance FromJSON Alias where

29912991 parseJSON

29922992 = withObject "Alias"

29932993 (\ o ->

2994− Alias <$>

2994+ Alias' <$>

29952995 (o .:? "etag") <*>

29962996 (o .:? "kind" .!= "admin#directory#alias")

29972997 <*> (o .:? "alias")

@@ -2999,7 +2999,7 @@ instance FromJSON Alias where

29992999 <*> (o .:? "primaryEmail"))

30003000

30013001instance ToJSON Alias where

3002− toJSON Alias{..}

3002+ toJSON Alias'{..}

30033003 = object

30043004 (catMaybes

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

@@ -3009,7 +3009,7 @@ instance ToJSON Alias where

30093009-- | JSON template for Schema resource in Directory API.

30103010--

30113011-- /See:/ 'schema' smart constructor.

3012−data Schema = Schema

3012+data Schema = Schema'

30133013 { _schEtag :: !(Maybe Text)

30143014 , _schKind :: !Text

30153015 , _schSchemaName :: !(Maybe Text)

@@ -3033,7 +3033,7 @@ data Schema = Schema

30333033schema

30343034 :: Schema

30353035schema =

3036− Schema

3036+ Schema'

30373037 { _schEtag = Nothing

30383038 , _schKind = "admin#directory#schema"

30393039 , _schSchemaName = Nothing

@@ -3071,7 +3071,7 @@ instance FromJSON Schema where

30713071 parseJSON

30723072 = withObject "Schema"

30733073 (\ o ->

3074− Schema <$>

3074+ Schema' <$>

30753075 (o .:? "etag") <*>

30763076 (o .:? "kind" .!= "admin#directory#schema")

30773077 <*> (o .:? "schemaName")

@@ -3079,7 +3079,7 @@ instance FromJSON Schema where

30793079 <*> (o .:? "fields" .!= mempty))

30803080

30813081instance ToJSON Schema where

3082− toJSON Schema{..}

3082+ toJSON Schema'{..}

30833083 = object

30843084 (catMaybes

30853085 [("etag" .=) <$> _schEtag, Just ("kind" .= _schKind),

@@ -3090,7 +3090,7 @@ instance ToJSON Schema where

30903090-- | JSON template for User object in Directory API.

30913091--

30923092-- /See:/ 'user' smart constructor.

3093−data User = User

3093+data User = User'

30943094 { _useCreationTime :: !(Maybe DateTime')

30953095 , _useLastLoginTime :: !(Maybe DateTime')

30963096 , _useThumbnailPhotoEtag :: !(Maybe Text)

@@ -3204,7 +3204,7 @@ data User = User

32043204user

32053205 :: User

32063206user =

3207− User

3207+ User'

32083208 { _useCreationTime = Nothing

32093209 , _useLastLoginTime = Nothing

32103210 , _useThumbnailPhotoEtag = Nothing

@@ -3432,7 +3432,7 @@ instance FromJSON User where

34323432 parseJSON

34333433 = withObject "User"

34343434 (\ o ->

3435− User <$>

3435+ User' <$>

34363436 (o .:? "creationTime") <*> (o .:? "lastLoginTime")

34373437 <*> (o .:? "thumbnailPhotoEtag")

34383438 <*> (o .:? "etag")

@@ -3469,7 +3469,7 @@ instance FromJSON User where

34693469 <*> (o .:? "suspensionReason"))

34703470

34713471instance ToJSON User where

3472− toJSON User{..}

3472+ toJSON User'{..}

34733473 = object

34743474 (catMaybes

34753475 [("creationTime" .=) <$> _useCreationTime,

@@ -3511,7 +3511,7 @@ instance ToJSON User where

35113511-- | JSON template for role resource in Directory API.

35123512--

35133513-- /See:/ 'role'' smart constructor.

3514−data Role = Role

3514+data Role = Role'

35153515 { _rrEtag :: !(Maybe Text)

35163516 , _rrKind :: !Text

35173517 , _rrRoleName :: !(Maybe Text)

@@ -3544,7 +3544,7 @@ data Role = Role

35443544role'

35453545 :: Role

35463546role' =

3547− Role

3547+ Role'

35483548 { _rrEtag = Nothing

35493549 , _rrKind = "admin#directory#role"

35503550 , _rrRoleName = Nothing

@@ -3604,7 +3604,7 @@ instance FromJSON Role where

36043604 parseJSON

36053605 = withObject "Role"

36063606 (\ o ->

3607− Role <$>

3607+ Role' <$>

36083608 (o .:? "etag") <*>

36093609 (o .:? "kind" .!= "admin#directory#role")

36103610 <*> (o .:? "roleName")

@@ -3615,7 +3615,7 @@ instance FromJSON Role where

36153615 <*> (o .:? "rolePrivileges" .!= mempty))

36163616

36173617instance ToJSON Role where

3618− toJSON Role{..}

3618+ toJSON Role'{..}

36193619 = object

36203620 (catMaybes

36213621 [("etag" .=) <$> _rrEtag, Just ("kind" .= _rrKind),

@@ -3629,7 +3629,7 @@ instance ToJSON Role where

36293629-- | JSON template for Customer Resource object in Directory API.

36303630--

36313631-- /See:/ 'customer' smart constructor.

3632−data Customer = Customer

3632+data Customer = Customer'

36333633 { _cusEtag :: !(Maybe Text)

36343634 , _cusKind :: !Text

36353635 , _cusAlternateEmail :: !(Maybe Text)

@@ -3665,7 +3665,7 @@ data Customer = Customer

36653665customer

36663666 :: Customer

36673667customer =

3668− Customer

3668+ Customer'

36693669 { _cusEtag = Nothing

36703670 , _cusKind = "admin#directory#customer"

36713671 , _cusAlternateEmail = Nothing

@@ -3731,7 +3731,7 @@ instance FromJSON Customer where

37313731 parseJSON

37323732 = withObject "Customer"

37333733 (\ o ->

3734− Customer <$>

3734+ Customer' <$>

37353735 (o .:? "etag") <*>

37363736 (o .:? "kind" .!= "admin#directory#customer")

37373737 <*> (o .:? "alternateEmail")

@@ -3743,7 +3743,7 @@ instance FromJSON Customer where

37433743 <*> (o .:? "postalAddress"))

37443744

37453745instance ToJSON Customer where

3746− toJSON Customer{..}

3746+ toJSON Customer'{..}

37473747 = object

37483748 (catMaybes

37493749 [("etag" .=) <$> _cusEtag, Just ("kind" .= _cusKind),

@@ -3758,7 +3758,7 @@ instance ToJSON Customer where

37583758

37593759--

37603760-- /See:/ 'mobileDeviceApplicationsItem' smart constructor.

3761−data MobileDeviceApplicationsItem = MobileDeviceApplicationsItem

3761+data MobileDeviceApplicationsItem = MobileDeviceApplicationsItem'

37623762 { _mdaiVersionCode :: !(Maybe (Textual Int32))

37633763 , _mdaiVersionName :: !(Maybe Text)

37643764 , _mdaiPackageName :: !(Maybe Text)

@@ -3782,7 +3782,7 @@ data MobileDeviceApplicationsItem = MobileDeviceApplicationsItem

37823782mobileDeviceApplicationsItem

37833783 :: MobileDeviceApplicationsItem

37843784mobileDeviceApplicationsItem =

3785− MobileDeviceApplicationsItem

3785+ MobileDeviceApplicationsItem'

37863786 { _mdaiVersionCode = Nothing

37873787 , _mdaiVersionName = Nothing

37883788 , _mdaiPackageName = Nothing

@@ -3827,14 +3827,14 @@ instance FromJSON MobileDeviceApplicationsItem where

38273827 parseJSON

38283828 = withObject "MobileDeviceApplicationsItem"

38293829 (\ o ->

3830− MobileDeviceApplicationsItem <$>

3830+ MobileDeviceApplicationsItem' <$>

38313831 (o .:? "versionCode") <*> (o .:? "versionName") <*>

38323832 (o .:? "packageName")

38333833 <*> (o .:? "displayName")

38343834 <*> (o .:? "permission" .!= mempty))

38353835

38363836instance ToJSON MobileDeviceApplicationsItem where

3837− toJSON MobileDeviceApplicationsItem{..}

3837+ toJSON MobileDeviceApplicationsItem'{..}

38383838 = object

38393839 (catMaybes

38403840 [("versionCode" .=) <$> _mdaiVersionCode,

@@ -3847,7 +3847,7 @@ instance ToJSON MobileDeviceApplicationsItem where

38473847-- Directory API.

38483848--

38493849-- /See:/ 'orgUnits' smart constructor.

3850−data OrgUnits = OrgUnits

3850+data OrgUnits = OrgUnits'

38513851 { _oEtag :: !(Maybe Text)

38523852 , _oKind :: !Text

38533853 , _oOrganizationUnits :: !(Maybe [OrgUnit])

@@ -3865,7 +3865,7 @@ data OrgUnits = OrgUnits

38653865orgUnits

38663866 :: OrgUnits

38673867orgUnits =

3868− OrgUnits

3868+ OrgUnits'

38693869 { _oEtag = Nothing

38703870 , _oKind = "admin#directory#orgUnits"

38713871 , _oOrganizationUnits = Nothing

@@ -3891,13 +3891,13 @@ instance FromJSON OrgUnits where

38913891 parseJSON

38923892 = withObject "OrgUnits"

38933893 (\ o ->

3894− OrgUnits <$>

3894+ OrgUnits' <$>

38953895 (o .:? "etag") <*>

38963896 (o .:? "kind" .!= "admin#directory#orgUnits")

38973897 <*> (o .:? "organizationUnits" .!= mempty))

38983898

38993899instance ToJSON OrgUnits where

3900− toJSON OrgUnits{..}

3900+ toJSON OrgUnits'{..}

39013901 = object

39023902 (catMaybes

39033903 [("etag" .=) <$> _oEtag, Just ("kind" .= _oKind),

@@ -3907,7 +3907,7 @@ instance ToJSON OrgUnits where

39073907-- Directory API.

39083908--

39093909-- /See:/ 'verificationCodes' smart constructor.

3910−data VerificationCodes = VerificationCodes

3910+data VerificationCodes = VerificationCodes'

39113911 { _vEtag :: !(Maybe Text)

39123912 , _vKind :: !Text

39133913 , _vItems :: !(Maybe [VerificationCode])

@@ -3925,7 +3925,7 @@ data VerificationCodes = VerificationCodes

39253925verificationCodes

39263926 :: VerificationCodes

39273927verificationCodes =

3928− VerificationCodes

3928+ VerificationCodes'

39293929 { _vEtag = Nothing

39303930 , _vKind = "admin#directory#verificationCodesList"

39313931 , _vItems = Nothing

@@ -3950,14 +3950,14 @@ instance FromJSON VerificationCodes where

39503950 parseJSON

39513951 = withObject "VerificationCodes"

39523952 (\ o ->

3953− VerificationCodes <$>

3953+ VerificationCodes' <$>

39543954 (o .:? "etag") <*>

39553955 (o .:? "kind" .!=

39563956 "admin#directory#verificationCodesList")

39573957 <*> (o .:? "items" .!= mempty))

39583958

39593959instance ToJSON VerificationCodes where

3960− toJSON VerificationCodes{..}

3960+ toJSON VerificationCodes'{..}

39613961 = object

39623962 (catMaybes

39633963 [("etag" .=) <$> _vEtag, Just ("kind" .= _vKind),

@@ -3966,7 +3966,7 @@ instance ToJSON VerificationCodes where

39663966-- | JSON template for a relation entry.

39673967--

39683968-- /See:/ 'userRelation' smart constructor.

3969−data UserRelation = UserRelation

3969+data UserRelation = UserRelation'

39703970 { _urValue :: !(Maybe Text)

39713971 , _urType :: !(Maybe Text)

39723972 , _urCustomType :: !(Maybe Text)

@@ -3984,7 +3984,7 @@ data UserRelation = UserRelation

39843984userRelation

39853985 :: UserRelation

39863986userRelation =

3987− UserRelation

3987+ UserRelation'

39883988 { _urValue = Nothing

39893989 , _urType = Nothing

39903990 , _urCustomType = Nothing

@@ -4008,12 +4008,12 @@ instance FromJSON UserRelation where

40084008 parseJSON

40094009 = withObject "UserRelation"

40104010 (\ o ->

4011− UserRelation <$>

4011+ UserRelation' <$>

40124012 (o .:? "value") <*> (o .:? "type") <*>

40134013 (o .:? "customType"))

40144014

40154015instance ToJSON UserRelation where

4016− toJSON UserRelation{..}

4016+ toJSON UserRelation'{..}

40174017 = object

40184018 (catMaybes

40194019 [("value" .=) <$> _urValue, ("type" .=) <$> _urType,

@@ -4022,7 +4022,7 @@ instance ToJSON UserRelation where

40224022-- | Additional parameters controlling delivery channel behavior. Optional.

40234023--

40244024-- /See:/ 'channelParams' smart constructor.

4025−newtype ChannelParams = ChannelParams

4025+newtype ChannelParams = ChannelParams'

40264026 { _cpAddtional :: HashMap Text Text

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

40284028

@@ -4035,7 +4035,7 @@ channelParams

40354035 :: HashMap Text Text -- ^ 'cpAddtional'

40364036 -> ChannelParams

40374037channelParams pCpAddtional_ =

4038− ChannelParams

4038+ ChannelParams'

40394039 { _cpAddtional = _Coerce # pCpAddtional_

40404040 }

40414041

@@ -4048,7 +4048,7 @@ cpAddtional

40484048instance FromJSON ChannelParams where

40494049 parseJSON

40504050 = withObject "ChannelParams"

4051− (\ o -> ChannelParams <$> (parseJSONObject o))

4051+ (\ o -> ChannelParams' <$> (parseJSONObject o))

40524052

40534053instance ToJSON ChannelParams where

40544054 toJSON = toJSON . _cpAddtional

@@ -4056,7 +4056,7 @@ instance ToJSON ChannelParams where

40564056-- | JSON template for an organization entry.

40574057--

40584058-- /See:/ 'userOrganization' smart constructor.

4059−data UserOrganization = UserOrganization

4059+data UserOrganization = UserOrganization'

40604060 { _uoDePartment :: !(Maybe Text)

40614061 , _uoLocation :: !(Maybe Text)

40624062 , _uoCostCenter :: !(Maybe Text)

@@ -4098,7 +4098,7 @@ data UserOrganization = UserOrganization

40984098userOrganization

40994099 :: UserOrganization

41004100userOrganization =

4101− UserOrganization

4101+ UserOrganization'

41024102 { _uoDePartment = Nothing

41034103 , _uoLocation = Nothing

41044104 , _uoCostCenter = Nothing

@@ -4171,7 +4171,7 @@ instance FromJSON UserOrganization where

41714171 parseJSON

41724172 = withObject "UserOrganization"

41734173 (\ o ->

4174− UserOrganization <$>

4174+ UserOrganization' <$>

41754175 (o .:? "department") <*> (o .:? "location") <*>

41764176 (o .:? "costCenter")

41774177 <*> (o .:? "domain")

@@ -4184,7 +4184,7 @@ instance FromJSON UserOrganization where

41844184 <*> (o .:? "description"))

41854185

41864186instance ToJSON UserOrganization where

4187− toJSON UserOrganization{..}

4187+ toJSON UserOrganization'{..}

41884188 = object

41894189 (catMaybes

41904190 [("department" .=) <$> _uoDePartment,

@@ -4201,7 +4201,7 @@ instance ToJSON UserOrganization where

42014201-- | JSON template for a website entry.

42024202--

42034203-- /See:/ 'userWebsite' smart constructor.

4204−data UserWebsite = UserWebsite

4204+data UserWebsite = UserWebsite'

42054205 { _uwValue :: !(Maybe Text)

42064206 , _uwPrimary :: !(Maybe Bool)

42074207 , _uwType :: !(Maybe Text)

@@ -4222,7 +4222,7 @@ data UserWebsite = UserWebsite

42224222userWebsite

42234223 :: UserWebsite

42244224userWebsite =

4225− UserWebsite

4225+ UserWebsite'

42264226 { _uwValue = Nothing

42274227 , _uwPrimary = Nothing

42284228 , _uwType = Nothing

@@ -4255,13 +4255,13 @@ instance FromJSON UserWebsite where

42554255 parseJSON

42564256 = withObject "UserWebsite"

42574257 (\ o ->

4258− UserWebsite <$>

4258+ UserWebsite' <$>

42594259 (o .:? "value") <*> (o .:? "primary") <*>

42604260 (o .:? "type")

42614261 <*> (o .:? "customType"))

42624262

42634263instance ToJSON UserWebsite where

4264− toJSON UserWebsite{..}

4264+ toJSON UserWebsite'{..}

42654265 = object

42664266 (catMaybes

42674267 [("value" .=) <$> _uwValue,

@@ -4271,7 +4271,7 @@ instance ToJSON UserWebsite where

42714271

42724272--

42734273-- /See:/ 'chromeOSDeviceActiveTimeRangesItem' smart constructor.

4274−data ChromeOSDeviceActiveTimeRangesItem = ChromeOSDeviceActiveTimeRangesItem

4274+data ChromeOSDeviceActiveTimeRangesItem = ChromeOSDeviceActiveTimeRangesItem'

42754275 { _codatriDate :: !(Maybe Date')

42764276 , _codatriActiveTime :: !(Maybe (Textual Int32))

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

@@ -4286,7 +4286,7 @@ data ChromeOSDeviceActiveTimeRangesItem = ChromeOSDeviceActiveTimeRangesItem

42864286chromeOSDeviceActiveTimeRangesItem

42874287 :: ChromeOSDeviceActiveTimeRangesItem

42884288chromeOSDeviceActiveTimeRangesItem =

4289− ChromeOSDeviceActiveTimeRangesItem

4289+ ChromeOSDeviceActiveTimeRangesItem'

42904290 { _codatriDate = Nothing

42914291 , _codatriActiveTime = Nothing

42924292 }

@@ -4309,12 +4309,12 @@ instance FromJSON ChromeOSDeviceActiveTimeRangesItem

43094309 parseJSON

43104310 = withObject "ChromeOSDeviceActiveTimeRangesItem"

43114311 (\ o ->

4312− ChromeOSDeviceActiveTimeRangesItem <$>

4312+ ChromeOSDeviceActiveTimeRangesItem' <$>

43134313 (o .:? "date") <*> (o .:? "activeTime"))

43144314

43154315instance ToJSON ChromeOSDeviceActiveTimeRangesItem

43164316 where

4317− toJSON ChromeOSDeviceActiveTimeRangesItem{..}

4317+ toJSON ChromeOSDeviceActiveTimeRangesItem'{..}

43184318 = object

43194319 (catMaybes

43204320 [("date" .=) <$> _codatriDate,

@@ -4323,7 +4323,7 @@ instance ToJSON ChromeOSDeviceActiveTimeRangesItem

43234323-- | JSON template for an email.

43244324--

43254325-- /See:/ 'userEmail' smart constructor.

4326−data UserEmail = UserEmail

4326+data UserEmail = UserEmail'

43274327 { _ueAddress :: !(Maybe Text)

43284328 , _uePrimary :: !(Maybe Bool)

43294329 , _ueType :: !(Maybe Text)

@@ -4344,7 +4344,7 @@ data UserEmail = UserEmail

43444344userEmail

43454345 :: UserEmail

43464346userEmail =

4347− UserEmail

4347+ UserEmail'

43484348 { _ueAddress = Nothing

43494349 , _uePrimary = Nothing

43504350 , _ueType = Nothing

@@ -4379,13 +4379,13 @@ instance FromJSON UserEmail where

43794379 parseJSON

43804380 = withObject "UserEmail"

43814381 (\ o ->

4382− UserEmail <$>

4382+ UserEmail' <$>

43834383 (o .:? "address") <*> (o .:? "primary") <*>

43844384 (o .:? "type")

43854385 <*> (o .:? "customType"))

43864386

43874387instance ToJSON UserEmail where

4388− toJSON UserEmail{..}

4388+ toJSON UserEmail'{..}

43894389 = object

43904390 (catMaybes

43914391 [("address" .=) <$> _ueAddress,

@@ -4396,7 +4396,7 @@ instance ToJSON UserEmail where

43964396-- | JSON template for a phone entry.

43974397--

43984398-- /See:/ 'userPhone' smart constructor.

4399−data UserPhone = UserPhone

4399+data UserPhone = UserPhone'

44004400 { _upValue :: !(Maybe Text)

44014401 , _upPrimary :: !(Maybe Bool)

44024402 , _upType :: !(Maybe Text)

@@ -4417,7 +4417,7 @@ data UserPhone = UserPhone

44174417userPhone

44184418 :: UserPhone

44194419userPhone =

4420− UserPhone

4420+ UserPhone'

44214421 { _upValue = Nothing

44224422 , _upPrimary = Nothing

44234423 , _upType = Nothing

@@ -4450,13 +4450,13 @@ instance FromJSON UserPhone where

44504450 parseJSON

44514451 = withObject "UserPhone"

44524452 (\ o ->

4453− UserPhone <$>

4453+ UserPhone' <$>

44544454 (o .:? "value") <*> (o .:? "primary") <*>

44554455 (o .:? "type")

44564456 <*> (o .:? "customType"))

44574457

44584458instance ToJSON UserPhone where

4459− toJSON UserPhone{..}

4459+ toJSON UserPhone'{..}

44604460 = object

44614461 (catMaybes

44624462 [("value" .=) <$> _upValue,

@@ -4467,7 +4467,7 @@ instance ToJSON UserPhone where

44674467-- | JSON template for Photo object in Directory API.

44684468--

44694469-- /See:/ 'userPhoto' smart constructor.

4470−data UserPhoto = UserPhoto

4470+data UserPhoto = UserPhoto'

44714471 { _upPhotoData :: !(Maybe (Textual Word8))

44724472 , _upEtag :: !(Maybe Text)

44734473 , _upHeight :: !(Maybe (Textual Int32))

@@ -4500,7 +4500,7 @@ data UserPhoto = UserPhoto

45004500userPhoto

45014501 :: UserPhoto

45024502userPhoto =

4503− UserPhoto

4503+ UserPhoto'

45044504 { _upPhotoData = Nothing

45054505 , _upEtag = Nothing

45064506 , _upHeight = Nothing

@@ -4556,7 +4556,7 @@ instance FromJSON UserPhoto where

45564556 parseJSON

45574557 = withObject "UserPhoto"

45584558 (\ o ->

4559− UserPhoto <$>

4559+ UserPhoto' <$>

45604560 (o .:? "photoData") <*> (o .:? "etag") <*>

45614561 (o .:? "height")

45624562 <*> (o .:? "kind" .!= "admin#directory#user#photo")

@@ -4566,7 +4566,7 @@ instance FromJSON UserPhoto where

45664566 <*> (o .:? "primaryEmail"))

45674567

45684568instance ToJSON UserPhoto where

4569− toJSON UserPhoto{..}

4569+ toJSON UserPhoto'{..}

45704570 = object

45714571 (catMaybes

45724572 [("photoData" .=) <$> _upPhotoData,

@@ -4578,7 +4578,7 @@ instance ToJSON UserPhoto where

45784578-- | JSON template for Mobile Device resource in Directory API.

45794579--

45804580-- /See:/ 'mobileDevice' smart constructor.

4581−data MobileDevice = MobileDevice

4581+data MobileDevice = MobileDevice'

45824582 { _mobEmail :: !(Maybe [Text])

45834583 , _mobStatus :: !(Maybe Text)

45844584 , _mobEtag :: !(Maybe Text)

@@ -4680,7 +4680,7 @@ data MobileDevice = MobileDevice

46804680mobileDevice

46814681 :: MobileDevice

46824682mobileDevice =

4683− MobileDevice

4683+ MobileDevice'

46844684 { _mobEmail = Nothing

46854685 , _mobStatus = Nothing

46864686 , _mobEtag = Nothing

@@ -4894,7 +4894,7 @@ instance FromJSON MobileDevice where

48944894 parseJSON

48954895 = withObject "MobileDevice"

48964896 (\ o ->

4897− MobileDevice <$>

4897+ MobileDevice' <$>

48984898 (o .:? "email" .!= mempty) <*> (o .:? "status") <*>

48994899 (o .:? "etag")

49004900 <*> (o .:? "resourceId")

@@ -4927,7 +4927,7 @@ instance FromJSON MobileDevice where

49274927 <*> (o .:? "defaultLanguage"))

49284928

49294929instance ToJSON MobileDevice where

4930− toJSON MobileDevice{..}

4930+ toJSON MobileDevice'{..}

49314931 = object

49324932 (catMaybes

49334933 [("email" .=) <$> _mobEmail,

@@ -4968,7 +4968,7 @@ instance ToJSON MobileDevice where

49684968-- | JSON template for Member resource in Directory API.

49694969--

49704970-- /See:/ 'member' smart constructor.

4971−data Member = Member

4971+data Member = Member'

49724972 { _memEmail :: !(Maybe Text)

49734973 , _memEtag :: !(Maybe Text)

49744974 , _memKind :: !Text

@@ -4995,7 +4995,7 @@ data Member = Member

49954995member

49964996 :: Member

49974997member =

4998− Member

4998+ Member'

49994999 { _memEmail = Nothing

50005000 , _memEtag = Nothing

50015001 , _memKind = "admin#directory#member"

@@ -5033,7 +5033,7 @@ instance FromJSON Member where

50335033 parseJSON

50345034 = withObject "Member"

50355035 (\ o ->

5036− Member <$>

5036+ Member' <$>

50375037 (o .:? "email") <*> (o .:? "etag") <*>

50385038 (o .:? "kind" .!= "admin#directory#member")

50395039 <*> (o .:? "role")

@@ -5041,7 +5041,7 @@ instance FromJSON Member where

50415041 <*> (o .:? "type"))

50425042

50435043instance ToJSON Member where

5044− toJSON Member{..}

5044+ toJSON Member'{..}

50455045 = object

50465046 (catMaybes

50475047 [("email" .=) <$> _memEmail,

@@ -5053,7 +5053,7 @@ instance ToJSON Member where

50535053-- particular schema)

50545054--

50555055-- /See:/ 'userCustomProperties' smart constructor.

5056−newtype UserCustomProperties = UserCustomProperties

5056+newtype UserCustomProperties = UserCustomProperties'

50575057 { _ucpAddtional :: HashMap Text JSONValue

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

50595059

@@ -5066,7 +5066,7 @@ userCustomProperties

50665066 :: HashMap Text JSONValue -- ^ 'ucpAddtional'

50675067 -> UserCustomProperties

50685068userCustomProperties pUcpAddtional_ =

5069− UserCustomProperties

5069+ UserCustomProperties'

50705070 { _ucpAddtional = _Coerce # pUcpAddtional_

50715071 }

50725072

@@ -5078,7 +5078,8 @@ ucpAddtional

50785078instance FromJSON UserCustomProperties where

50795079 parseJSON

50805080 = withObject "UserCustomProperties"

5081− (\ o -> UserCustomProperties <$> (parseJSONObject o))

5081+ (\ o ->

5082+ UserCustomProperties' <$> (parseJSONObject o))

50825083

50835084instance ToJSON UserCustomProperties where

50845085 toJSON = toJSON . _ucpAddtional

@@ -5086,7 +5087,7 @@ instance ToJSON UserCustomProperties where

50865087-- | JSON template for Domain object in Directory API.

50875088--

50885089-- /See:/ 'domains' smart constructor.

5089−data Domains = Domains

5090+data Domains = Domains'

50905091 { _domCreationTime :: !(Maybe (Textual Int64))

50915092 , _domEtag :: !(Maybe Text)

50925093 , _domKind :: !Text

@@ -5116,7 +5117,7 @@ data Domains = Domains

51165117domains

51175118 :: Domains

51185119domains =

5119− Domains

5120+ Domains'

51205121 { _domCreationTime = Nothing

51215122 , _domEtag = Nothing

51225123 , _domKind = "admin#directory#domain"

@@ -5169,7 +5170,7 @@ instance FromJSON Domains where

51695170 parseJSON

51705171 = withObject "Domains"

51715172 (\ o ->

5172− Domains <$>

5173+ Domains' <$>

51735174 (o .:? "creationTime") <*> (o .:? "etag") <*>

51745175 (o .:? "kind" .!= "admin#directory#domain")

51755176 <*> (o .:? "domainAliases" .!= mempty)

@@ -5178,7 +5179,7 @@ instance FromJSON Domains where

51785179 <*> (o .:? "isPrimary"))

51795180

51805181instance ToJSON Domains where

5181− toJSON Domains{..}

5182+ toJSON Domains'{..}

51825183 = object

51835184 (catMaybes

51845185 [("creationTime" .=) <$> _domCreationTime,

@@ -5192,7 +5193,7 @@ instance ToJSON Domains where

51925193-- API.

51935194--

51945195-- /See:/ 'calendarResources' smart constructor.

5195−data CalendarResources = CalendarResources

5196+data CalendarResources = CalendarResources'

51965197 { _crsEtag :: !(Maybe Text)

51975198 , _crsNextPageToken :: !(Maybe Text)

51985199 , _crsKind :: !Text

@@ -5213,7 +5214,7 @@ data CalendarResources = CalendarResources

52135214calendarResources

52145215 :: CalendarResources

52155216calendarResources =

5216− CalendarResources

5217+ CalendarResources'

52175218 { _crsEtag = Nothing

52185219 , _crsNextPageToken = Nothing

52195220 , _crsKind = "admin#directory#resources#calendars#calendarResourcesList"

@@ -5247,14 +5248,14 @@ instance FromJSON CalendarResources where

52475248 parseJSON

52485249 = withObject "CalendarResources"

52495250 (\ o ->

5250− CalendarResources <$>

5251+ CalendarResources' <$>

52515252 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

52525253 (o .:? "kind" .!=

52535254 "admin#directory#resources#calendars#calendarResourcesList")

52545255 <*> (o .:? "items" .!= mempty))

52555256

52565257instance ToJSON CalendarResources where

5257− toJSON CalendarResources{..}

5258+ toJSON CalendarResources'{..}

52585259 = object

52595260 (catMaybes

52605261 [("etag" .=) <$> _crsEtag,

@@ -5265,7 +5266,7 @@ instance ToJSON CalendarResources where

52655266-- | Template for notifications list response.

52665267--

52675268-- /See:/ 'notifications' smart constructor.

5268−data Notifications = Notifications

5269+data Notifications = Notifications'

52695270 { _notEtag :: !(Maybe Text)

52705271 , _notNextPageToken :: !(Maybe Text)

52715272 , _notKind :: !Text

@@ -5289,7 +5290,7 @@ data Notifications = Notifications

52895290notifications

52905291 :: Notifications

52915292notifications =

5292− Notifications

5293+ Notifications'

52935294 { _notEtag = Nothing

52945295 , _notNextPageToken = Nothing

52955296 , _notKind = "admin#directory#notifications"

@@ -5329,14 +5330,14 @@ instance FromJSON Notifications where

53295330 parseJSON

53305331 = withObject "Notifications"

53315332 (\ o ->

5332− Notifications <$>

5333+ Notifications' <$>

53335334 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

53345335 (o .:? "kind" .!= "admin#directory#notifications")

53355336 <*> (o .:? "items" .!= mempty)

53365337 <*> (o .:? "unreadNotificationsCount"))

53375338

53385339instance ToJSON Notifications where

5339− toJSON Notifications{..}

5340+ toJSON Notifications'{..}

53405341 = object

53415342 (catMaybes

53425343 [("etag" .=) <$> _notEtag,

@@ -5351,7 +5352,7 @@ instance ToJSON Notifications where

53515352-- allows range queries to be supported.

53525353--

53535354-- /See:/ 'schemaFieldSpecNumericIndexingSpec' smart constructor.

5354−data SchemaFieldSpecNumericIndexingSpec = SchemaFieldSpecNumericIndexingSpec

5355+data SchemaFieldSpecNumericIndexingSpec = SchemaFieldSpecNumericIndexingSpec'

53555356 { _sfsnisMaxValue :: !(Maybe (Textual Double))

53565357 , _sfsnisMinValue :: !(Maybe (Textual Double))

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

@@ -5366,7 +5367,7 @@ data SchemaFieldSpecNumericIndexingSpec = SchemaFieldSpecNumericIndexingSpec

53665367schemaFieldSpecNumericIndexingSpec

53675368 :: SchemaFieldSpecNumericIndexingSpec

53685369schemaFieldSpecNumericIndexingSpec =

5369− SchemaFieldSpecNumericIndexingSpec

5370+ SchemaFieldSpecNumericIndexingSpec'

53705371 { _sfsnisMaxValue = Nothing

53715372 , _sfsnisMinValue = Nothing

53725373 }

@@ -5394,12 +5395,12 @@ instance FromJSON SchemaFieldSpecNumericIndexingSpec

53945395 parseJSON

53955396 = withObject "SchemaFieldSpecNumericIndexingSpec"

53965397 (\ o ->

5397− SchemaFieldSpecNumericIndexingSpec <$>

5398+ SchemaFieldSpecNumericIndexingSpec' <$>

53985399 (o .:? "maxValue") <*> (o .:? "minValue"))

53995400

54005401instance ToJSON SchemaFieldSpecNumericIndexingSpec

54015402 where

5402− toJSON SchemaFieldSpecNumericIndexingSpec{..}

5403+ toJSON SchemaFieldSpecNumericIndexingSpec'{..}

54035404 = object

54045405 (catMaybes

54055406 [("maxValue" .=) <$> _sfsnisMaxValue,

@@ -5409,7 +5410,7 @@ instance ToJSON SchemaFieldSpecNumericIndexingSpec

54095410-- Devices API.

54105411--

54115412-- /See:/ 'mobileDeviceAction' smart constructor.

5412−newtype MobileDeviceAction = MobileDeviceAction

5413+newtype MobileDeviceAction = MobileDeviceAction'

54135414 { _mdaAction :: Maybe Text

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

54155416

@@ -5421,7 +5422,7 @@ newtype MobileDeviceAction = MobileDeviceAction

54215422mobileDeviceAction

54225423 :: MobileDeviceAction

54235424mobileDeviceAction =

5424− MobileDeviceAction

5425+ MobileDeviceAction'

54255426 { _mdaAction = Nothing

54265427 }

54275428

@@ -5433,16 +5434,16 @@ mdaAction

54335434instance FromJSON MobileDeviceAction where

54345435 parseJSON

54355436 = withObject "MobileDeviceAction"

5436− (\ o -> MobileDeviceAction <$> (o .:? "action"))

5437+ (\ o -> MobileDeviceAction' <$> (o .:? "action"))

54375438

54385439instance ToJSON MobileDeviceAction where

5439− toJSON MobileDeviceAction{..}

5440+ toJSON MobileDeviceAction'{..}

54405441 = object (catMaybes [("action" .=) <$> _mdaAction])

54415442

54425443-- | JSON template for FieldSpec resource for Schemas in Directory API.

54435444--

54445445-- /See:/ 'schemaFieldSpec' smart constructor.

5445−data SchemaFieldSpec = SchemaFieldSpec

5446+data SchemaFieldSpec = SchemaFieldSpec'

54465447 { _sfsEtag :: !(Maybe Text)

54475448 , _sfsKind :: !Text

54485449 , _sfsNumericIndexingSpec :: !(Maybe SchemaFieldSpecNumericIndexingSpec)

@@ -5478,7 +5479,7 @@ data SchemaFieldSpec = SchemaFieldSpec

54785479schemaFieldSpec

54795480 :: SchemaFieldSpec

54805481schemaFieldSpec =

5481− SchemaFieldSpec

5482+ SchemaFieldSpec'

54825483 { _sfsEtag = Nothing

54835484 , _sfsKind = "admin#directory#schema#fieldspec"

54845485 , _sfsNumericIndexingSpec = Nothing

@@ -5543,7 +5544,7 @@ instance FromJSON SchemaFieldSpec where

55435544 parseJSON

55445545 = withObject "SchemaFieldSpec"

55455546 (\ o ->

5546− SchemaFieldSpec <$>

5547+ SchemaFieldSpec' <$>

55475548 (o .:? "etag") <*>

55485549 (o .:? "kind" .!= "admin#directory#schema#fieldspec")

55495550 <*> (o .:? "numericIndexingSpec")

@@ -5555,7 +5556,7 @@ instance FromJSON SchemaFieldSpec where

55555556 <*> (o .:? "multiValued"))

55565557

55575558instance ToJSON SchemaFieldSpec where

5558− toJSON SchemaFieldSpec{..}

5559+ toJSON SchemaFieldSpec'{..}

55595560 = object

55605561 (catMaybes

55615562 [("etag" .=) <$> _sfsEtag, Just ("kind" .= _sfsKind),

@@ -5572,7 +5573,7 @@ instance ToJSON SchemaFieldSpec where

55725573-- API.

55735574--

55745575-- /See:/ 'chromeOSDevices' smart constructor.

5575−data ChromeOSDevices = ChromeOSDevices

5576+data ChromeOSDevices = ChromeOSDevices'

55765577 { _cosdEtag :: !(Maybe Text)

55775578 , _cosdNextPageToken :: !(Maybe Text)

55785579 , _cosdKind :: !Text

@@ -5593,7 +5594,7 @@ data ChromeOSDevices = ChromeOSDevices

55935594chromeOSDevices

55945595 :: ChromeOSDevices

55955596chromeOSDevices =

5596− ChromeOSDevices

5597+ ChromeOSDevices'

55975598 { _cosdEtag = Nothing

55985599 , _cosdNextPageToken = Nothing

55995600 , _cosdKind = "admin#directory#chromeosdevices"

@@ -5626,13 +5627,13 @@ instance FromJSON ChromeOSDevices where

56265627 parseJSON

56275628 = withObject "ChromeOSDevices"

56285629 (\ o ->

5629− ChromeOSDevices <$>

5630+ ChromeOSDevices' <$>

56305631 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

56315632 (o .:? "kind" .!= "admin#directory#chromeosdevices")

56325633 <*> (o .:? "chromeosdevices" .!= mempty))

56335634

56345635instance ToJSON ChromeOSDevices where

5635− toJSON ChromeOSDevices{..}

5636+ toJSON ChromeOSDevices'{..}

56365637 = object

56375638 (catMaybes

56385639 [("etag" .=) <$> _cosdEtag,

@@ -5643,7 +5644,7 @@ instance ToJSON ChromeOSDevices where

56435644-- | JSON template for an externalId entry.

56445645--

56455646-- /See:/ 'userExternalId' smart constructor.

5646−data UserExternalId = UserExternalId

5647+data UserExternalId = UserExternalId'

56475648 { _ueiValue :: !(Maybe Text)

56485649 , _ueiType :: !(Maybe Text)

56495650 , _ueiCustomType :: !(Maybe Text)

@@ -5661,7 +5662,7 @@ data UserExternalId = UserExternalId

56615662userExternalId

56625663 :: UserExternalId

56635664userExternalId =

5664− UserExternalId

5665+ UserExternalId'

56655666 { _ueiValue = Nothing

56665667 , _ueiType = Nothing

56675668 , _ueiCustomType = Nothing

@@ -5685,12 +5686,12 @@ instance FromJSON UserExternalId where

56855686 parseJSON

56865687 = withObject "UserExternalId"

56875688 (\ o ->

5688− UserExternalId <$>

5689+ UserExternalId' <$>

56895690 (o .:? "value") <*> (o .:? "type") <*>

56905691 (o .:? "customType"))

56915692

56925693instance ToJSON UserExternalId where

5693− toJSON UserExternalId{..}

5694+ toJSON UserExternalId'{..}

56945695 = object

56955696 (catMaybes

56965697 [("value" .=) <$> _ueiValue,

@@ -5699,7 +5700,7 @@ instance ToJSON UserExternalId where

56995700

57005701--

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

5702−data Asps = Asps

5703+data Asps = Asps'

57035704 { _aspEtag :: !(Maybe Text)

57045705 , _aspKind :: !Text

57055706 , _aspItems :: !(Maybe [Asp])

@@ -5717,7 +5718,7 @@ data Asps = Asps

57175718asps

57185719 :: Asps

57195720asps =

5720− Asps

5721+ Asps'

57215722 { _aspEtag = Nothing

57225723 , _aspKind = "admin#directory#aspList"

57235724 , _aspItems = Nothing

@@ -5742,13 +5743,13 @@ instance FromJSON Asps where

57425743 parseJSON

57435744 = withObject "Asps"

57445745 (\ o ->

5745− Asps <$>

5746+ Asps' <$>

57465747 (o .:? "etag") <*>

57475748 (o .:? "kind" .!= "admin#directory#aspList")

57485749 <*> (o .:? "items" .!= mempty))

57495750

57505751instance ToJSON Asps where

5751− toJSON Asps{..}

5752+ toJSON Asps'{..}

57525753 = object

57535754 (catMaybes

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

@@ -5756,7 +5757,7 @@ instance ToJSON Asps where

57565757

57575758--

57585759-- /See:/ 'roleRolePrivilegesItem' smart constructor.

5759−data RoleRolePrivilegesItem = RoleRolePrivilegesItem

5760+data RoleRolePrivilegesItem = RoleRolePrivilegesItem'

57605761 { _rrpiServiceId :: !(Maybe Text)

57615762 , _rrpiPrivilegeName :: !(Maybe Text)

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

@@ -5771,7 +5772,7 @@ data RoleRolePrivilegesItem = RoleRolePrivilegesItem

57715772roleRolePrivilegesItem

57725773 :: RoleRolePrivilegesItem

57735774roleRolePrivilegesItem =

5774− RoleRolePrivilegesItem

5775+ RoleRolePrivilegesItem'

57755776 { _rrpiServiceId = Nothing

57765777 , _rrpiPrivilegeName = Nothing

57775778 }

@@ -5792,11 +5793,11 @@ instance FromJSON RoleRolePrivilegesItem where

57925793 parseJSON

57935794 = withObject "RoleRolePrivilegesItem"

57945795 (\ o ->

5795− RoleRolePrivilegesItem <$>

5796+ RoleRolePrivilegesItem' <$>

57965797 (o .:? "serviceId") <*> (o .:? "privilegeName"))

57975798

57985799instance ToJSON RoleRolePrivilegesItem where

5799− toJSON RoleRolePrivilegesItem{..}

5800+ toJSON RoleRolePrivilegesItem'{..}

58005801 = object

58015802 (catMaybes

58025803 [("serviceId" .=) <$> _rrpiServiceId,

@@ -5805,7 +5806,7 @@ instance ToJSON RoleRolePrivilegesItem where

58055806-- | JSON response template to list Domains in Directory API.

58065807--

58075808-- /See:/ 'domains2' smart constructor.

5808−data Domains2 = Domains2

5809+data Domains2 = Domains2'

58095810 { _ddEtag :: !(Maybe Text)

58105811 , _ddKind :: !Text

58115812 , _ddDomains :: !(Maybe [Domains])

@@ -5823,7 +5824,7 @@ data Domains2 = Domains2

58235824domains2

58245825 :: Domains2

58255826domains2 =

5826− Domains2

5827+ Domains2'

58275828 { _ddEtag = Nothing

58285829 , _ddKind = "admin#directory#domains"

58295830 , _ddDomains = Nothing

@@ -5848,13 +5849,13 @@ instance FromJSON Domains2 where

58485849 parseJSON

58495850 = withObject "Domains2"

58505851 (\ o ->

5851− Domains2 <$>

5852+ Domains2' <$>

58525853 (o .:? "etag") <*>

58535854 (o .:? "kind" .!= "admin#directory#domains")

58545855 <*> (o .:? "domains" .!= mempty))

58555856

58565857instance ToJSON Domains2 where

5857− toJSON Domains2{..}

5858+ toJSON Domains2'{..}

58585859 = object

58595860 (catMaybes

58605861 [("etag" .=) <$> _ddEtag, Just ("kind" .= _ddKind),

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

@@ -55,7 +55,7 @@ type ChannelsStopResource =

5555-- | Stop watching resources through this channel

5656--

5757-- /See:/ 'channelsStop' smart constructor.

58−newtype ChannelsStop = ChannelsStop

58+newtype ChannelsStop = ChannelsStop'

5959 { _csPayload :: Channel

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

6161

@@ -68,7 +68,7 @@ channelsStop

6868 :: Channel -- ^ 'csPayload'

6969 -> ChannelsStop

7070channelsStop pCsPayload_ =

71− ChannelsStop

71+ ChannelsStop'

7272 { _csPayload = pCsPayload_

7373 }

7474

@@ -84,7 +84,7 @@ instance GoogleRequest ChannelsStop where

8484 "https://www.googleapis.com/auth/admin.directory.user.alias",

8585 "https://www.googleapis.com/auth/admin.directory.user.alias.readonly",

8686 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

87− requestClient ChannelsStop{..}

87+ requestClient ChannelsStop'{..}

8888 = go (Just AltJSON) _csPayload directoryService

8989 where go

9090 = buildClient (Proxy :: Proxy ChannelsStopResource)

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

@@ -55,7 +55,7 @@ type AspsDeleteResource =

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

5656--

5757-- /See:/ 'aspsDelete' smart constructor.

58−data AspsDelete = AspsDelete

58+data AspsDelete = AspsDelete'

5959 { _adCodeId :: !(Textual Int32)

6060 , _adUserKey :: !Text

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

@@ -72,7 +72,7 @@ aspsDelete

7272 -> Text -- ^ 'adUserKey'

7373 -> AspsDelete

7474aspsDelete pAdCodeId_ pAdUserKey_ =

75− AspsDelete

75+ AspsDelete'

7676 { _adCodeId = _Coerce # pAdCodeId_

7777 , _adUserKey = pAdUserKey_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest AspsDelete where

9393 type Rs AspsDelete = ()

9494 type Scopes AspsDelete =

9595 '["https://www.googleapis.com/auth/admin.directory.user.security"]

96− requestClient AspsDelete{..}

96+ requestClient AspsDelete'{..}

9797 = go _adUserKey _adCodeId (Just AltJSON)

9898 directoryService

9999 where go

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

@@ -55,7 +55,7 @@ type AspsGetResource =

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

5656--

5757-- /See:/ 'aspsGet' smart constructor.

58−data AspsGet = AspsGet

58+data AspsGet = AspsGet'

5959 { _agCodeId :: !(Textual Int32)

6060 , _agUserKey :: !Text

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

@@ -72,7 +72,7 @@ aspsGet

7272 -> Text -- ^ 'agUserKey'

7373 -> AspsGet

7474aspsGet pAgCodeId_ pAgUserKey_ =

75− AspsGet

75+ AspsGet'

7676 { _agCodeId = _Coerce # pAgCodeId_

7777 , _agUserKey = pAgUserKey_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest AspsGet where

9393 type Rs AspsGet = Asp

9494 type Scopes AspsGet =

9595 '["https://www.googleapis.com/auth/admin.directory.user.security"]

96− requestClient AspsGet{..}

96+ requestClient AspsGet'{..}

9797 = go _agUserKey _agCodeId (Just AltJSON)

9898 directoryService

9999 where go

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

@@ -53,7 +53,7 @@ type AspsListResource =

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

5454--

5555-- /See:/ 'aspsList' smart constructor.

56−newtype AspsList = AspsList

56+newtype AspsList = AspsList'

5757 { _alUserKey :: Text

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

5959

@@ -66,7 +66,7 @@ aspsList

6666 :: Text -- ^ 'alUserKey'

6767 -> AspsList

6868aspsList pAlUserKey_ =

69− AspsList

69+ AspsList'

7070 { _alUserKey = pAlUserKey_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest AspsList where

8080 type Rs AspsList = Asps

8181 type Scopes AspsList =

8282 '["https://www.googleapis.com/auth/admin.directory.user.security"]

83− requestClient AspsList{..}

83+ requestClient AspsList'{..}

8484 = go _alUserKey (Just AltJSON) directoryService

8585 where go

8686 = buildClient (Proxy :: Proxy AspsListResource)

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

@@ -60,7 +60,7 @@ type ChromeosDevicesGetResource =

6060-- | Retrieve Chrome OS Device

6161--

6262-- /See:/ 'chromeosDevicesGet' smart constructor.

63−data ChromeosDevicesGet = ChromeosDevicesGet

63+data ChromeosDevicesGet = ChromeosDevicesGet'

6464 { _cdgCustomerId :: !Text

6565 , _cdgDeviceId :: !Text

6666 , _cdgProjection :: !(Maybe ChromeosDevicesGetProjection)

@@ -80,7 +80,7 @@ chromeosDevicesGet

8080 -> Text -- ^ 'cdgDeviceId'

8181 -> ChromeosDevicesGet

8282chromeosDevicesGet pCdgCustomerId_ pCdgDeviceId_ =

83− ChromeosDevicesGet

83+ ChromeosDevicesGet'

8484 { _cdgCustomerId = pCdgCustomerId_

8585 , _cdgDeviceId = pCdgDeviceId_

8686 , _cdgProjection = Nothing

@@ -108,7 +108,7 @@ instance GoogleRequest ChromeosDevicesGet where

108108 type Scopes ChromeosDevicesGet =

109109 '["https://www.googleapis.com/auth/admin.directory.device.chromeos",

110110 "https://www.googleapis.com/auth/admin.directory.device.chromeos.readonly"]

111− requestClient ChromeosDevicesGet{..}

111+ requestClient ChromeosDevicesGet'{..}

112112 = go _cdgCustomerId _cdgDeviceId _cdgProjection

113113 (Just AltJSON)

114114 directoryService

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

@@ -69,7 +69,7 @@ type ChromeosDevicesListResource =

6969-- | Retrieve all Chrome OS Devices of a customer (paginated)

7070--

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

72−data ChromeosDevicesList = ChromeosDevicesList

72+data ChromeosDevicesList = ChromeosDevicesList'

7373 { _cdlOrderBy :: !(Maybe ChromeosDevicesListOrderBy)

7474 , _cdlCustomerId :: !Text

7575 , _cdlSortOrder :: !(Maybe ChromeosDevicesListSortOrder)

@@ -100,7 +100,7 @@ chromeosDevicesList

100100 :: Text -- ^ 'cdlCustomerId'

101101 -> ChromeosDevicesList

102102chromeosDevicesList pCdlCustomerId_ =

103− ChromeosDevicesList

103+ ChromeosDevicesList'

104104 { _cdlOrderBy = Nothing

105105 , _cdlCustomerId = pCdlCustomerId_

106106 , _cdlSortOrder = Nothing

@@ -155,7 +155,7 @@ instance GoogleRequest ChromeosDevicesList where

155155 type Scopes ChromeosDevicesList =

156156 '["https://www.googleapis.com/auth/admin.directory.device.chromeos",

157157 "https://www.googleapis.com/auth/admin.directory.device.chromeos.readonly"]

158− requestClient ChromeosDevicesList{..}

158+ requestClient ChromeosDevicesList'{..}

159159 = go _cdlCustomerId _cdlOrderBy _cdlSortOrder

160160 _cdlQuery

161161 _cdlProjection

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

@@ -63,7 +63,7 @@ type ChromeosDevicesPatchResource =

6363-- | Update Chrome OS Device. This method supports patch semantics.

6464--

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

66−data ChromeosDevicesPatch = ChromeosDevicesPatch

66+data ChromeosDevicesPatch = ChromeosDevicesPatch'

6767 { _cdpPayload :: !ChromeOSDevice

6868 , _cdpCustomerId :: !Text

6969 , _cdpDeviceId :: !Text

@@ -87,7 +87,7 @@ chromeosDevicesPatch

8787 -> Text -- ^ 'cdpDeviceId'

8888 -> ChromeosDevicesPatch

8989chromeosDevicesPatch pCdpPayload_ pCdpCustomerId_ pCdpDeviceId_ =

90− ChromeosDevicesPatch

90+ ChromeosDevicesPatch'

9191 { _cdpPayload = pCdpPayload_

9292 , _cdpCustomerId = pCdpCustomerId_

9393 , _cdpDeviceId = pCdpDeviceId_

@@ -120,7 +120,7 @@ instance GoogleRequest ChromeosDevicesPatch where

120120 type Rs ChromeosDevicesPatch = ChromeOSDevice

121121 type Scopes ChromeosDevicesPatch =

122122 '["https://www.googleapis.com/auth/admin.directory.device.chromeos"]

123− requestClient ChromeosDevicesPatch{..}

123+ requestClient ChromeosDevicesPatch'{..}

124124 = go _cdpCustomerId _cdpDeviceId _cdpProjection

125125 (Just AltJSON)

126126 _cdpPayload

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

@@ -63,7 +63,7 @@ type ChromeosDevicesUpdateResource =

6363-- | Update Chrome OS Device

6464--

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

66−data ChromeosDevicesUpdate = ChromeosDevicesUpdate

66+data ChromeosDevicesUpdate = ChromeosDevicesUpdate'

6767 { _cduPayload :: !ChromeOSDevice

6868 , _cduCustomerId :: !Text

6969 , _cduDeviceId :: !Text

@@ -87,7 +87,7 @@ chromeosDevicesUpdate

8787 -> Text -- ^ 'cduDeviceId'

8888 -> ChromeosDevicesUpdate

8989chromeosDevicesUpdate pCduPayload_ pCduCustomerId_ pCduDeviceId_ =

90− ChromeosDevicesUpdate

90+ ChromeosDevicesUpdate'

9191 { _cduPayload = pCduPayload_

9292 , _cduCustomerId = pCduCustomerId_

9393 , _cduDeviceId = pCduDeviceId_

@@ -120,7 +120,7 @@ instance GoogleRequest ChromeosDevicesUpdate where

120120 type Rs ChromeosDevicesUpdate = ChromeOSDevice

121121 type Scopes ChromeosDevicesUpdate =

122122 '["https://www.googleapis.com/auth/admin.directory.device.chromeos"]

123− requestClient ChromeosDevicesUpdate{..}

123+ requestClient ChromeosDevicesUpdate'{..}

124124 = go _cduCustomerId _cduDeviceId _cduProjection

125125 (Just AltJSON)

126126 _cduPayload

gogol-admin-directory/gen/Network/Google/Resource/Directory/Customers/Get.hs+3−3

@@ -52,7 +52,7 @@ type CustomersGetResource =

5252-- | Retrives a customer.

5353--

5454-- /See:/ 'customersGet' smart constructor.

55−newtype CustomersGet = CustomersGet

55+newtype CustomersGet = CustomersGet'

5656 { _cgCustomerKey :: Text

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

5858

@@ -65,7 +65,7 @@ customersGet

6565 :: Text -- ^ 'cgCustomerKey'

6666 -> CustomersGet

6767customersGet pCgCustomerKey_ =

68− CustomersGet

68+ CustomersGet'

6969 { _cgCustomerKey = pCgCustomerKey_

7070 }

7171

@@ -80,7 +80,7 @@ instance GoogleRequest CustomersGet where

8080 type Scopes CustomersGet =

8181 '["https://www.googleapis.com/auth/admin.directory.customer",

8282 "https://www.googleapis.com/auth/admin.directory.customer.readonly"]

83− requestClient CustomersGet{..}

83+ requestClient CustomersGet'{..}

8484 = go _cgCustomerKey (Just AltJSON) directoryService

8585 where go

8686 = buildClient (Proxy :: Proxy CustomersGetResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Customers/Patch.hs+3−3

@@ -54,7 +54,7 @@ type CustomersPatchResource =

5454-- | Updates a customer. This method supports patch semantics.

5555--

5656-- /See:/ 'customersPatch' smart constructor.

57−data CustomersPatch = CustomersPatch

57+data CustomersPatch = CustomersPatch'

5858 { _cpCustomerKey :: !Text

5959 , _cpPayload :: !Customer

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

@@ -71,7 +71,7 @@ customersPatch

7171 -> Customer -- ^ 'cpPayload'

7272 -> CustomersPatch

7373customersPatch pCpCustomerKey_ pCpPayload_ =

74− CustomersPatch

74+ CustomersPatch'

7575 { _cpCustomerKey = pCpCustomerKey_

7676 , _cpPayload = pCpPayload_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest CustomersPatch where

9191 type Rs CustomersPatch = Customer

9292 type Scopes CustomersPatch =

9393 '["https://www.googleapis.com/auth/admin.directory.customer"]

94− requestClient CustomersPatch{..}

94+ requestClient CustomersPatch'{..}

9595 = go _cpCustomerKey (Just AltJSON) _cpPayload

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Customers/Update.hs+3−3

@@ -54,7 +54,7 @@ type CustomersUpdateResource =

5454-- | Updates a customer.

5555--

5656-- /See:/ 'customersUpdate' smart constructor.

57−data CustomersUpdate = CustomersUpdate

57+data CustomersUpdate = CustomersUpdate'

5858 { _cuCustomerKey :: !Text

5959 , _cuPayload :: !Customer

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

@@ -71,7 +71,7 @@ customersUpdate

7171 -> Customer -- ^ 'cuPayload'

7272 -> CustomersUpdate

7373customersUpdate pCuCustomerKey_ pCuPayload_ =

74− CustomersUpdate

74+ CustomersUpdate'

7575 { _cuCustomerKey = pCuCustomerKey_

7676 , _cuPayload = pCuPayload_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest CustomersUpdate where

9191 type Rs CustomersUpdate = Customer

9292 type Scopes CustomersUpdate =

9393 '["https://www.googleapis.com/auth/admin.directory.customer"]

94− requestClient CustomersUpdate{..}

94+ requestClient CustomersUpdate'{..}

9595 = go _cuCustomerKey (Just AltJSON) _cuPayload

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/DomainAliases/Delete.hs+3−3

@@ -55,7 +55,7 @@ type DomainAliasesDeleteResource =

5555-- | Deletes a Domain Alias of the customer.

5656--

5757-- /See:/ 'domainAliasesDelete' smart constructor.

58−data DomainAliasesDelete = DomainAliasesDelete

58+data DomainAliasesDelete = DomainAliasesDelete'

5959 { _dadDomainAliasName :: !Text

6060 , _dadCustomer :: !Text

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

@@ -72,7 +72,7 @@ domainAliasesDelete

7272 -> Text -- ^ 'dadCustomer'

7373 -> DomainAliasesDelete

7474domainAliasesDelete pDadDomainAliasName_ pDadCustomer_ =

75− DomainAliasesDelete

75+ DomainAliasesDelete'

7676 { _dadDomainAliasName = pDadDomainAliasName_

7777 , _dadCustomer = pDadCustomer_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest DomainAliasesDelete where

9292 type Rs DomainAliasesDelete = ()

9393 type Scopes DomainAliasesDelete =

9494 '["https://www.googleapis.com/auth/admin.directory.domain"]

95− requestClient DomainAliasesDelete{..}

95+ requestClient DomainAliasesDelete'{..}

9696 = go _dadCustomer _dadDomainAliasName (Just AltJSON)

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/DomainAliases/Get.hs+3−3

@@ -55,7 +55,7 @@ type DomainAliasesGetResource =

5555-- | Retrieves a domain alias of the customer.

5656--

5757-- /See:/ 'domainAliasesGet' smart constructor.

58−data DomainAliasesGet = DomainAliasesGet

58+data DomainAliasesGet = DomainAliasesGet'

5959 { _dagDomainAliasName :: !Text

6060 , _dagCustomer :: !Text

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

@@ -72,7 +72,7 @@ domainAliasesGet

7272 -> Text -- ^ 'dagCustomer'

7373 -> DomainAliasesGet

7474domainAliasesGet pDagDomainAliasName_ pDagCustomer_ =

75− DomainAliasesGet

75+ DomainAliasesGet'

7676 { _dagDomainAliasName = pDagDomainAliasName_

7777 , _dagCustomer = pDagCustomer_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest DomainAliasesGet where

9393 type Scopes DomainAliasesGet =

9494 '["https://www.googleapis.com/auth/admin.directory.domain",

9595 "https://www.googleapis.com/auth/admin.directory.domain.readonly"]

96− requestClient DomainAliasesGet{..}

96+ requestClient DomainAliasesGet'{..}

9797 = go _dagCustomer _dagDomainAliasName (Just AltJSON)

9898 directoryService

9999 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/DomainAliases/Insert.hs+3−3

@@ -56,7 +56,7 @@ type DomainAliasesInsertResource =

5656-- | Inserts a Domain alias of the customer.

5757--

5858-- /See:/ 'domainAliasesInsert' smart constructor.

59−data DomainAliasesInsert = DomainAliasesInsert

59+data DomainAliasesInsert = DomainAliasesInsert'

6060 { _daiPayload :: !DomainAlias

6161 , _daiCustomer :: !Text

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

@@ -73,7 +73,7 @@ domainAliasesInsert

7373 -> Text -- ^ 'daiCustomer'

7474 -> DomainAliasesInsert

7575domainAliasesInsert pDaiPayload_ pDaiCustomer_ =

76− DomainAliasesInsert

76+ DomainAliasesInsert'

7777 { _daiPayload = pDaiPayload_

7878 , _daiCustomer = pDaiCustomer_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest DomainAliasesInsert where

9292 type Rs DomainAliasesInsert = DomainAlias

9393 type Scopes DomainAliasesInsert =

9494 '["https://www.googleapis.com/auth/admin.directory.domain"]

95− requestClient DomainAliasesInsert{..}

95+ requestClient DomainAliasesInsert'{..}

9696 = go _daiCustomer (Just AltJSON) _daiPayload

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/DomainAliases/List.hs+3−3

@@ -55,7 +55,7 @@ type DomainAliasesListResource =

5555-- | Lists the domain aliases of the customer.

5656--

5757-- /See:/ 'domainAliasesList' smart constructor.

58−data DomainAliasesList = DomainAliasesList

58+data DomainAliasesList = DomainAliasesList'

5959 { _dalCustomer :: !Text

6060 , _dalParentDomainName :: !(Maybe Text)

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

@@ -71,7 +71,7 @@ domainAliasesList

7171 :: Text -- ^ 'dalCustomer'

7272 -> DomainAliasesList

7373domainAliasesList pDalCustomer_ =

74− DomainAliasesList

74+ DomainAliasesList'

7575 { _dalCustomer = pDalCustomer_

7676 , _dalParentDomainName = Nothing

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest DomainAliasesList where

9292 type Scopes DomainAliasesList =

9393 '["https://www.googleapis.com/auth/admin.directory.domain",

9494 "https://www.googleapis.com/auth/admin.directory.domain.readonly"]

95− requestClient DomainAliasesList{..}

95+ requestClient DomainAliasesList'{..}

9696 = go _dalCustomer _dalParentDomainName (Just AltJSON)

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/Delete.hs+3−3

@@ -55,7 +55,7 @@ type DomainsDeleteResource =

5555-- | Deletes a domain of the customer.

5656--

5757-- /See:/ 'domainsDelete' smart constructor.

58−data DomainsDelete = DomainsDelete

58+data DomainsDelete = DomainsDelete'

5959 { _ddCustomer :: !Text

6060 , _ddDomainName :: !Text

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

@@ -72,7 +72,7 @@ domainsDelete

7272 -> Text -- ^ 'ddDomainName'

7373 -> DomainsDelete

7474domainsDelete pDdCustomer_ pDdDomainName_ =

75− DomainsDelete

75+ DomainsDelete'

7676 { _ddCustomer = pDdCustomer_

7777 , _ddDomainName = pDdDomainName_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest DomainsDelete where

9191 type Rs DomainsDelete = ()

9292 type Scopes DomainsDelete =

9393 '["https://www.googleapis.com/auth/admin.directory.domain"]

94− requestClient DomainsDelete{..}

94+ requestClient DomainsDelete'{..}

9595 = go _ddCustomer _ddDomainName (Just AltJSON)

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/Get.hs+3−3

@@ -55,7 +55,7 @@ type DomainsGetResource =

5555-- | Retrives a domain of the customer.

5656--

5757-- /See:/ 'domainsGet' smart constructor.

58−data DomainsGet = DomainsGet

58+data DomainsGet = DomainsGet'

5959 { _dgCustomer :: !Text

6060 , _dgDomainName :: !Text

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

@@ -72,7 +72,7 @@ domainsGet

7272 -> Text -- ^ 'dgDomainName'

7373 -> DomainsGet

7474domainsGet pDgCustomer_ pDgDomainName_ =

75− DomainsGet

75+ DomainsGet'

7676 { _dgCustomer = pDgCustomer_

7777 , _dgDomainName = pDgDomainName_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest DomainsGet where

9292 type Scopes DomainsGet =

9393 '["https://www.googleapis.com/auth/admin.directory.domain",

9494 "https://www.googleapis.com/auth/admin.directory.domain.readonly"]

95− requestClient DomainsGet{..}

95+ requestClient DomainsGet'{..}

9696 = go _dgCustomer _dgDomainName (Just AltJSON)

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/Insert.hs+3−3

@@ -55,7 +55,7 @@ type DomainsInsertResource =

5555-- | Inserts a domain of the customer.

5656--

5757-- /See:/ 'domainsInsert' smart constructor.

58−data DomainsInsert = DomainsInsert

58+data DomainsInsert = DomainsInsert'

5959 { _diPayload :: !Domains

6060 , _diCustomer :: !Text

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

@@ -72,7 +72,7 @@ domainsInsert

7272 -> Text -- ^ 'diCustomer'

7373 -> DomainsInsert

7474domainsInsert pDiPayload_ pDiCustomer_ =

75− DomainsInsert

75+ DomainsInsert'

7676 { _diPayload = pDiPayload_

7777 , _diCustomer = pDiCustomer_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest DomainsInsert where

9191 type Rs DomainsInsert = Domains

9292 type Scopes DomainsInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.domain"]

94− requestClient DomainsInsert{..}

94+ requestClient DomainsInsert'{..}

9595 = go _diCustomer (Just AltJSON) _diPayload

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Domains/List.hs+3−3

@@ -53,7 +53,7 @@ type DomainsListResource =

5353-- | Lists the domains of the customer.

5454--

5555-- /See:/ 'domainsList' smart constructor.

56−newtype DomainsList = DomainsList

56+newtype DomainsList = DomainsList'

5757 { _dlCustomer :: Text

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

5959

@@ -66,7 +66,7 @@ domainsList

6666 :: Text -- ^ 'dlCustomer'

6767 -> DomainsList

6868domainsList pDlCustomer_ =

69− DomainsList

69+ DomainsList'

7070 { _dlCustomer = pDlCustomer_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest DomainsList where

8080 type Scopes DomainsList =

8181 '["https://www.googleapis.com/auth/admin.directory.domain",

8282 "https://www.googleapis.com/auth/admin.directory.domain.readonly"]

83− requestClient DomainsList{..}

83+ requestClient DomainsList'{..}

8484 = go _dlCustomer (Just AltJSON) directoryService

8585 where go

8686 = buildClient (Proxy :: Proxy DomainsListResource)

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

@@ -55,7 +55,7 @@ type GroupsAliasesDeleteResource =

5555-- | Remove a alias for the group

5656--

5757-- /See:/ 'groupsAliasesDelete' smart constructor.

58−data GroupsAliasesDelete = GroupsAliasesDelete

58+data GroupsAliasesDelete = GroupsAliasesDelete'

5959 { _gadGroupKey :: !Text

6060 , _gadAlias :: !Text

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

@@ -72,7 +72,7 @@ groupsAliasesDelete

7272 -> Text -- ^ 'gadAlias'

7373 -> GroupsAliasesDelete

7474groupsAliasesDelete pGadGroupKey_ pGadAlias_ =

75− GroupsAliasesDelete

75+ GroupsAliasesDelete'

7676 { _gadGroupKey = pGadGroupKey_

7777 , _gadAlias = pGadAlias_

7878 }

@@ -90,7 +90,7 @@ instance GoogleRequest GroupsAliasesDelete where

9090 type Rs GroupsAliasesDelete = ()

9191 type Scopes GroupsAliasesDelete =

9292 '["https://www.googleapis.com/auth/admin.directory.group"]

93− requestClient GroupsAliasesDelete{..}

93+ requestClient GroupsAliasesDelete'{..}

9494 = go _gadGroupKey _gadAlias (Just AltJSON)

9595 directoryService

9696 where go

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

@@ -55,7 +55,7 @@ type GroupsAliasesInsertResource =

5555-- | Add a alias for the group

5656--

5757-- /See:/ 'groupsAliasesInsert' smart constructor.

58−data GroupsAliasesInsert = GroupsAliasesInsert

58+data GroupsAliasesInsert = GroupsAliasesInsert'

5959 { _gaiGroupKey :: !Text

6060 , _gaiPayload :: !Alias

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

@@ -72,7 +72,7 @@ groupsAliasesInsert

7272 -> Alias -- ^ 'gaiPayload'

7373 -> GroupsAliasesInsert

7474groupsAliasesInsert pGaiGroupKey_ pGaiPayload_ =

75− GroupsAliasesInsert

75+ GroupsAliasesInsert'

7676 { _gaiGroupKey = pGaiGroupKey_

7777 , _gaiPayload = pGaiPayload_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest GroupsAliasesInsert where

9191 type Rs GroupsAliasesInsert = Alias

9292 type Scopes GroupsAliasesInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.group"]

94− requestClient GroupsAliasesInsert{..}

94+ requestClient GroupsAliasesInsert'{..}

9595 = go _gaiGroupKey (Just AltJSON) _gaiPayload

9696 directoryService

9797 where go

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

@@ -53,7 +53,7 @@ type GroupsAliasesListResource =

5353-- | List all aliases for a group

5454--

5555-- /See:/ 'groupsAliasesList' smart constructor.

56−newtype GroupsAliasesList = GroupsAliasesList

56+newtype GroupsAliasesList = GroupsAliasesList'

5757 { _galGroupKey :: Text

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

5959

@@ -66,7 +66,7 @@ groupsAliasesList

6666 :: Text -- ^ 'galGroupKey'

6767 -> GroupsAliasesList

6868groupsAliasesList pGalGroupKey_ =

69− GroupsAliasesList

69+ GroupsAliasesList'

7070 { _galGroupKey = pGalGroupKey_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest GroupsAliasesList where

8080 type Scopes GroupsAliasesList =

8181 '["https://www.googleapis.com/auth/admin.directory.group",

8282 "https://www.googleapis.com/auth/admin.directory.group.readonly"]

83− requestClient GroupsAliasesList{..}

83+ requestClient GroupsAliasesList'{..}

8484 = go _galGroupKey (Just AltJSON) directoryService

8585 where go

8686 = buildClient

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

@@ -52,7 +52,7 @@ type GroupsDeleteResource =

5252-- | Delete Group

5353--

5454-- /See:/ 'groupsDelete' smart constructor.

55−newtype GroupsDelete = GroupsDelete

55+newtype GroupsDelete = GroupsDelete'

5656 { _gdGroupKey :: Text

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

5858

@@ -65,7 +65,7 @@ groupsDelete

6565 :: Text -- ^ 'gdGroupKey'

6666 -> GroupsDelete

6767groupsDelete pGdGroupKey_ =

68− GroupsDelete

68+ GroupsDelete'

6969 { _gdGroupKey = pGdGroupKey_

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest GroupsDelete where

7878 type Rs GroupsDelete = ()

7979 type Scopes GroupsDelete =

8080 '["https://www.googleapis.com/auth/admin.directory.group"]

81− requestClient GroupsDelete{..}

81+ requestClient GroupsDelete'{..}

8282 = go _gdGroupKey (Just AltJSON) directoryService

8383 where go

8484 = buildClient (Proxy :: Proxy GroupsDeleteResource)

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

@@ -52,7 +52,7 @@ type GroupsGetResource =

5252-- | Retrieve Group

5353--

5454-- /See:/ 'groupsGet' smart constructor.

55−newtype GroupsGet = GroupsGet

55+newtype GroupsGet = GroupsGet'

5656 { _ggGroupKey :: Text

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

5858

@@ -65,7 +65,7 @@ groupsGet

6565 :: Text -- ^ 'ggGroupKey'

6666 -> GroupsGet

6767groupsGet pGgGroupKey_ =

68− GroupsGet

68+ GroupsGet'

6969 { _ggGroupKey = pGgGroupKey_

7070 }

7171

@@ -79,7 +79,7 @@ instance GoogleRequest GroupsGet where

7979 type Scopes GroupsGet =

8080 '["https://www.googleapis.com/auth/admin.directory.group",

8181 "https://www.googleapis.com/auth/admin.directory.group.readonly"]

82− requestClient GroupsGet{..}

82+ requestClient GroupsGet'{..}

8383 = go _ggGroupKey (Just AltJSON) directoryService

8484 where go

8585 = buildClient (Proxy :: Proxy GroupsGetResource)

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

@@ -52,7 +52,7 @@ type GroupsInsertResource =

5252-- | Create Group

5353--

5454-- /See:/ 'groupsInsert' smart constructor.

55−newtype GroupsInsert = GroupsInsert

55+newtype GroupsInsert = GroupsInsert'

5656 { _giPayload :: Group

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

5858

@@ -65,7 +65,7 @@ groupsInsert

6565 :: Group -- ^ 'giPayload'

6666 -> GroupsInsert

6767groupsInsert pGiPayload_ =

68− GroupsInsert

68+ GroupsInsert'

6969 { _giPayload = pGiPayload_

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest GroupsInsert where

7878 type Rs GroupsInsert = Group

7979 type Scopes GroupsInsert =

8080 '["https://www.googleapis.com/auth/admin.directory.group"]

81− requestClient GroupsInsert{..}

81+ requestClient GroupsInsert'{..}

8282 = go (Just AltJSON) _giPayload directoryService

8383 where go

8484 = buildClient (Proxy :: Proxy GroupsInsertResource)

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

@@ -60,7 +60,7 @@ type GroupsListResource =

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

6161--

6262-- /See:/ 'groupsList' smart constructor.

63−data GroupsList = GroupsList

63+data GroupsList = GroupsList'

6464 { _glDomain :: !(Maybe Text)

6565 , _glCustomer :: !(Maybe Text)

6666 , _glPageToken :: !(Maybe Text)

@@ -84,7 +84,7 @@ data GroupsList = GroupsList

8484groupsList

8585 :: GroupsList

8686groupsList =

87− GroupsList

87+ GroupsList'

8888 { _glDomain = Nothing

8989 , _glCustomer = Nothing

9090 , _glPageToken = Nothing

@@ -126,7 +126,7 @@ instance GoogleRequest GroupsList where

126126 type Scopes GroupsList =

127127 '["https://www.googleapis.com/auth/admin.directory.group",

128128 "https://www.googleapis.com/auth/admin.directory.group.readonly"]

129− requestClient GroupsList{..}

129+ requestClient GroupsList'{..}

130130 = go _glDomain _glCustomer _glPageToken _glUserKey

131131 _glMaxResults

132132 (Just AltJSON)

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

@@ -54,7 +54,7 @@ type GroupsPatchResource =

5454-- | Update Group. This method supports patch semantics.

5555--

5656-- /See:/ 'groupsPatch' smart constructor.

57−data GroupsPatch = GroupsPatch

57+data GroupsPatch = GroupsPatch'

5858 { _gpGroupKey :: !Text

5959 , _gpPayload :: !Group

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

@@ -71,7 +71,7 @@ groupsPatch

7171 -> Group -- ^ 'gpPayload'

7272 -> GroupsPatch

7373groupsPatch pGpGroupKey_ pGpPayload_ =

74− GroupsPatch

74+ GroupsPatch'

7575 { _gpGroupKey = pGpGroupKey_

7676 , _gpPayload = pGpPayload_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest GroupsPatch where

9191 type Rs GroupsPatch = Group

9292 type Scopes GroupsPatch =

9393 '["https://www.googleapis.com/auth/admin.directory.group"]

94− requestClient GroupsPatch{..}

94+ requestClient GroupsPatch'{..}

9595 = go _gpGroupKey (Just AltJSON) _gpPayload

9696 directoryService

9797 where go

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

@@ -54,7 +54,7 @@ type GroupsUpdateResource =

5454-- | Update Group

5555--

5656-- /See:/ 'groupsUpdate' smart constructor.

57−data GroupsUpdate = GroupsUpdate

57+data GroupsUpdate = GroupsUpdate'

5858 { _guGroupKey :: !Text

5959 , _guPayload :: !Group

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

@@ -71,7 +71,7 @@ groupsUpdate

7171 -> Group -- ^ 'guPayload'

7272 -> GroupsUpdate

7373groupsUpdate pGuGroupKey_ pGuPayload_ =

74− GroupsUpdate

74+ GroupsUpdate'

7575 { _guGroupKey = pGuGroupKey_

7676 , _guPayload = pGuPayload_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest GroupsUpdate where

9191 type Rs GroupsUpdate = Group

9292 type Scopes GroupsUpdate =

9393 '["https://www.googleapis.com/auth/admin.directory.group"]

94− requestClient GroupsUpdate{..}

94+ requestClient GroupsUpdate'{..}

9595 = go _guGroupKey (Just AltJSON) _guPayload

9696 directoryService

9797 where go

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

@@ -55,7 +55,7 @@ type MembersDeleteResource =

5555-- | Remove membership.

5656--

5757-- /See:/ 'membersDelete' smart constructor.

58−data MembersDelete = MembersDelete

58+data MembersDelete = MembersDelete'

5959 { _mdMemberKey :: !Text

6060 , _mdGroupKey :: !Text

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

@@ -72,7 +72,7 @@ membersDelete

7272 -> Text -- ^ 'mdGroupKey'

7373 -> MembersDelete

7474membersDelete pMdMemberKey_ pMdGroupKey_ =

75− MembersDelete

75+ MembersDelete'

7676 { _mdMemberKey = pMdMemberKey_

7777 , _mdGroupKey = pMdGroupKey_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest MembersDelete where

9292 type Scopes MembersDelete =

9393 '["https://www.googleapis.com/auth/admin.directory.group",

9494 "https://www.googleapis.com/auth/admin.directory.group.member"]

95− requestClient MembersDelete{..}

95+ requestClient MembersDelete'{..}

9696 = go _mdGroupKey _mdMemberKey (Just AltJSON)

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type MembersGetResource =

5555-- | Retrieve Group Member

5656--

5757-- /See:/ 'membersGet' smart constructor.

58−data MembersGet = MembersGet

58+data MembersGet = MembersGet'

5959 { _mgMemberKey :: !Text

6060 , _mgGroupKey :: !Text

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

@@ -72,7 +72,7 @@ membersGet

7272 -> Text -- ^ 'mgGroupKey'

7373 -> MembersGet

7474membersGet pMgMemberKey_ pMgGroupKey_ =

75− MembersGet

75+ MembersGet'

7676 { _mgMemberKey = pMgMemberKey_

7777 , _mgGroupKey = pMgGroupKey_

7878 }

@@ -94,7 +94,7 @@ instance GoogleRequest MembersGet where

9494 "https://www.googleapis.com/auth/admin.directory.group.member",

9595 "https://www.googleapis.com/auth/admin.directory.group.member.readonly",

9696 "https://www.googleapis.com/auth/admin.directory.group.readonly"]

97− requestClient MembersGet{..}

97+ requestClient MembersGet'{..}

9898 = go _mgGroupKey _mgMemberKey (Just AltJSON)

9999 directoryService

100100 where go

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

@@ -55,7 +55,7 @@ type MembersInsertResource =

5555-- | Add user to the specified group.

5656--

5757-- /See:/ 'membersInsert' smart constructor.

58−data MembersInsert = MembersInsert

58+data MembersInsert = MembersInsert'

5959 { _miGroupKey :: !Text

6060 , _miPayload :: !Member

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

@@ -72,7 +72,7 @@ membersInsert

7272 -> Member -- ^ 'miPayload'

7373 -> MembersInsert

7474membersInsert pMiGroupKey_ pMiPayload_ =

75− MembersInsert

75+ MembersInsert'

7676 { _miGroupKey = pMiGroupKey_

7777 , _miPayload = pMiPayload_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest MembersInsert where

9292 type Scopes MembersInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.group",

9494 "https://www.googleapis.com/auth/admin.directory.group.member"]

95− requestClient MembersInsert{..}

95+ requestClient MembersInsert'{..}

9696 = go _miGroupKey (Just AltJSON) _miPayload

9797 directoryService

9898 where go

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

@@ -59,7 +59,7 @@ type MembersListResource =

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

6060--

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

62−data MembersList = MembersList

62+data MembersList = MembersList'

6363 { _mlRoles :: !(Maybe Text)

6464 , _mlGroupKey :: !Text

6565 , _mlPageToken :: !(Maybe Text)

@@ -81,7 +81,7 @@ membersList

8181 :: Text -- ^ 'mlGroupKey'

8282 -> MembersList

8383membersList pMlGroupKey_ =

84− MembersList

84+ MembersList'

8585 { _mlRoles = Nothing

8686 , _mlGroupKey = pMlGroupKey_

8787 , _mlPageToken = Nothing

@@ -115,7 +115,7 @@ instance GoogleRequest MembersList where

115115 "https://www.googleapis.com/auth/admin.directory.group.member",

116116 "https://www.googleapis.com/auth/admin.directory.group.member.readonly",

117117 "https://www.googleapis.com/auth/admin.directory.group.readonly"]

118− requestClient MembersList{..}

118+ requestClient MembersList'{..}

119119 = go _mlGroupKey _mlRoles _mlPageToken _mlMaxResults

120120 (Just AltJSON)

121121 directoryService

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

@@ -59,7 +59,7 @@ type MembersPatchResource =

5959-- patch semantics.

6060--

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

62−data MembersPatch = MembersPatch

62+data MembersPatch = MembersPatch'

6363 { _mpMemberKey :: !Text

6464 , _mpGroupKey :: !Text

6565 , _mpPayload :: !Member

@@ -80,7 +80,7 @@ membersPatch

8080 -> Member -- ^ 'mpPayload'

8181 -> MembersPatch

8282membersPatch pMpMemberKey_ pMpGroupKey_ pMpPayload_ =

83− MembersPatch

83+ MembersPatch'

8484 { _mpMemberKey = pMpMemberKey_

8585 , _mpGroupKey = pMpGroupKey_

8686 , _mpPayload = pMpPayload_

@@ -108,7 +108,7 @@ instance GoogleRequest MembersPatch where

108108 type Scopes MembersPatch =

109109 '["https://www.googleapis.com/auth/admin.directory.group",

110110 "https://www.googleapis.com/auth/admin.directory.group.member"]

111− requestClient MembersPatch{..}

111+ requestClient MembersPatch'{..}

112112 = go _mpGroupKey _mpMemberKey (Just AltJSON)

113113 _mpPayload

114114 directoryService

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

@@ -57,7 +57,7 @@ type MembersUpdateResource =

5757-- | Update membership of a user in the specified group.

5858--

5959-- /See:/ 'membersUpdate' smart constructor.

60−data MembersUpdate = MembersUpdate

60+data MembersUpdate = MembersUpdate'

6161 { _muMemberKey :: !Text

6262 , _muGroupKey :: !Text

6363 , _muPayload :: !Member

@@ -78,7 +78,7 @@ membersUpdate

7878 -> Member -- ^ 'muPayload'

7979 -> MembersUpdate

8080membersUpdate pMuMemberKey_ pMuGroupKey_ pMuPayload_ =

81− MembersUpdate

81+ MembersUpdate'

8282 { _muMemberKey = pMuMemberKey_

8383 , _muGroupKey = pMuGroupKey_

8484 , _muPayload = pMuPayload_

@@ -106,7 +106,7 @@ instance GoogleRequest MembersUpdate where

106106 type Scopes MembersUpdate =

107107 '["https://www.googleapis.com/auth/admin.directory.group",

108108 "https://www.googleapis.com/auth/admin.directory.group.member"]

109− requestClient MembersUpdate{..}

109+ requestClient MembersUpdate'{..}

110110 = go _muGroupKey _muMemberKey (Just AltJSON)

111111 _muPayload

112112 directoryService

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

@@ -59,7 +59,7 @@ type MobileDevicesActionResource =

5959-- | Take action on Mobile Device

6060--

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

62−data MobileDevicesAction = MobileDevicesAction

62+data MobileDevicesAction = MobileDevicesAction'

6363 { _mdaResourceId :: !Text

6464 , _mdaPayload :: !MobileDeviceAction

6565 , _mdaCustomerId :: !Text

@@ -80,7 +80,7 @@ mobileDevicesAction

8080 -> Text -- ^ 'mdaCustomerId'

8181 -> MobileDevicesAction

8282mobileDevicesAction pMdaResourceId_ pMdaPayload_ pMdaCustomerId_ =

83− MobileDevicesAction

83+ MobileDevicesAction'

8484 { _mdaResourceId = pMdaResourceId_

8585 , _mdaPayload = pMdaPayload_

8686 , _mdaCustomerId = pMdaCustomerId_

@@ -108,7 +108,7 @@ instance GoogleRequest MobileDevicesAction where

108108 type Scopes MobileDevicesAction =

109109 '["https://www.googleapis.com/auth/admin.directory.device.mobile",

110110 "https://www.googleapis.com/auth/admin.directory.device.mobile.action"]

111− requestClient MobileDevicesAction{..}

111+ requestClient MobileDevicesAction'{..}

112112 = go _mdaCustomerId _mdaResourceId (Just AltJSON)

113113 _mdaPayload

114114 directoryService

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

@@ -56,7 +56,7 @@ type MobileDevicesDeleteResource =

5656-- | Delete Mobile Device

5757--

5858-- /See:/ 'mobileDevicesDelete' smart constructor.

59−data MobileDevicesDelete = MobileDevicesDelete

59+data MobileDevicesDelete = MobileDevicesDelete'

6060 { _mddResourceId :: !Text

6161 , _mddCustomerId :: !Text

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

@@ -73,7 +73,7 @@ mobileDevicesDelete

7373 -> Text -- ^ 'mddCustomerId'

7474 -> MobileDevicesDelete

7575mobileDevicesDelete pMddResourceId_ pMddCustomerId_ =

76− MobileDevicesDelete

76+ MobileDevicesDelete'

7777 { _mddResourceId = pMddResourceId_

7878 , _mddCustomerId = pMddCustomerId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest MobileDevicesDelete where

9494 type Rs MobileDevicesDelete = ()

9595 type Scopes MobileDevicesDelete =

9696 '["https://www.googleapis.com/auth/admin.directory.device.mobile"]

97− requestClient MobileDevicesDelete{..}

97+ requestClient MobileDevicesDelete'{..}

9898 = go _mddCustomerId _mddResourceId (Just AltJSON)

9999 directoryService

100100 where go

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

@@ -58,7 +58,7 @@ type MobileDevicesGetResource =

5858-- | Retrieve Mobile Device

5959--

6060-- /See:/ 'mobileDevicesGet' smart constructor.

61−data MobileDevicesGet = MobileDevicesGet

61+data MobileDevicesGet = MobileDevicesGet'

6262 { _mdgResourceId :: !Text

6363 , _mdgCustomerId :: !Text

6464 , _mdgProjection :: !(Maybe MobileDevicesGetProjection)

@@ -78,7 +78,7 @@ mobileDevicesGet

7878 -> Text -- ^ 'mdgCustomerId'

7979 -> MobileDevicesGet

8080mobileDevicesGet pMdgResourceId_ pMdgCustomerId_ =

81− MobileDevicesGet

81+ MobileDevicesGet'

8282 { _mdgResourceId = pMdgResourceId_

8383 , _mdgCustomerId = pMdgCustomerId_

8484 , _mdgProjection = Nothing

@@ -108,7 +108,7 @@ instance GoogleRequest MobileDevicesGet where

108108 '["https://www.googleapis.com/auth/admin.directory.device.mobile",

109109 "https://www.googleapis.com/auth/admin.directory.device.mobile.action",

110110 "https://www.googleapis.com/auth/admin.directory.device.mobile.readonly"]

111− requestClient MobileDevicesGet{..}

111+ requestClient MobileDevicesGet'{..}

112112 = go _mdgCustomerId _mdgResourceId _mdgProjection

113113 (Just AltJSON)

114114 directoryService

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

@@ -68,7 +68,7 @@ type MobileDevicesListResource =

6868-- | Retrieve all Mobile Devices of a customer (paginated)

6969--

7070-- /See:/ 'mobileDevicesList' smart constructor.

71−data MobileDevicesList = MobileDevicesList

71+data MobileDevicesList = MobileDevicesList'

7272 { _mdlOrderBy :: !(Maybe MobileDevicesListOrderBy)

7373 , _mdlCustomerId :: !Text

7474 , _mdlSortOrder :: !(Maybe MobileDevicesListSortOrder)

@@ -99,7 +99,7 @@ mobileDevicesList

9999 :: Text -- ^ 'mdlCustomerId'

100100 -> MobileDevicesList

101101mobileDevicesList pMdlCustomerId_ =

102− MobileDevicesList

102+ MobileDevicesList'

103103 { _mdlOrderBy = Nothing

104104 , _mdlCustomerId = pMdlCustomerId_

105105 , _mdlSortOrder = Nothing

@@ -155,7 +155,7 @@ instance GoogleRequest MobileDevicesList where

155155 '["https://www.googleapis.com/auth/admin.directory.device.mobile",

156156 "https://www.googleapis.com/auth/admin.directory.device.mobile.action",

157157 "https://www.googleapis.com/auth/admin.directory.device.mobile.readonly"]

158− requestClient MobileDevicesList{..}

158+ requestClient MobileDevicesList'{..}

159159 = go _mdlCustomerId _mdlOrderBy _mdlSortOrder

160160 _mdlQuery

161161 _mdlProjection

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

@@ -55,7 +55,7 @@ type NotificationsDeleteResource =

5555-- | Deletes a notification

5656--

5757-- /See:/ 'notificationsDelete' smart constructor.

58−data NotificationsDelete = NotificationsDelete

58+data NotificationsDelete = NotificationsDelete'

5959 { _ndCustomer :: !Text

6060 , _ndNotificationId :: !Text

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

@@ -72,7 +72,7 @@ notificationsDelete

7272 -> Text -- ^ 'ndNotificationId'

7373 -> NotificationsDelete

7474notificationsDelete pNdCustomer_ pNdNotificationId_ =

75− NotificationsDelete

75+ NotificationsDelete'

7676 { _ndCustomer = pNdCustomer_

7777 , _ndNotificationId = pNdNotificationId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest NotificationsDelete where

9393 type Rs NotificationsDelete = ()

9494 type Scopes NotificationsDelete =

9595 '["https://www.googleapis.com/auth/admin.directory.notifications"]

96− requestClient NotificationsDelete{..}

96+ requestClient NotificationsDelete'{..}

9797 = go _ndCustomer _ndNotificationId (Just AltJSON)

9898 directoryService

9999 where go

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

@@ -55,7 +55,7 @@ type NotificationsGetResource =

5555-- | Retrieves a notification.

5656--

5757-- /See:/ 'notificationsGet' smart constructor.

58−data NotificationsGet = NotificationsGet

58+data NotificationsGet = NotificationsGet'

5959 { _ngCustomer :: !Text

6060 , _ngNotificationId :: !Text

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

@@ -72,7 +72,7 @@ notificationsGet

7272 -> Text -- ^ 'ngNotificationId'

7373 -> NotificationsGet

7474notificationsGet pNgCustomer_ pNgNotificationId_ =

75− NotificationsGet

75+ NotificationsGet'

7676 { _ngCustomer = pNgCustomer_

7777 , _ngNotificationId = pNgNotificationId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest NotificationsGet where

9393 type Rs NotificationsGet = Notification

9494 type Scopes NotificationsGet =

9595 '["https://www.googleapis.com/auth/admin.directory.notifications"]

96− requestClient NotificationsGet{..}

96+ requestClient NotificationsGet'{..}

9797 = go _ngCustomer _ngNotificationId (Just AltJSON)

9898 directoryService

9999 where go

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

@@ -59,7 +59,7 @@ type NotificationsListResource =

5959-- | Retrieves a list of notifications.

6060--

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

62−data NotificationsList = NotificationsList

62+data NotificationsList = NotificationsList'

6363 { _nlCustomer :: !Text

6464 , _nlLanguage :: !(Maybe Text)

6565 , _nlPageToken :: !(Maybe Text)

@@ -81,7 +81,7 @@ notificationsList

8181 :: Text -- ^ 'nlCustomer'

8282 -> NotificationsList

8383notificationsList pNlCustomer_ =

84− NotificationsList

84+ NotificationsList'

8585 { _nlCustomer = pNlCustomer_

8686 , _nlLanguage = Nothing

8787 , _nlPageToken = Nothing

@@ -114,7 +114,7 @@ instance GoogleRequest NotificationsList where

114114 type Rs NotificationsList = Notifications

115115 type Scopes NotificationsList =

116116 '["https://www.googleapis.com/auth/admin.directory.notifications"]

117− requestClient NotificationsList{..}

117+ requestClient NotificationsList'{..}

118118 = go _nlCustomer _nlLanguage _nlPageToken

119119 _nlMaxResults

120120 (Just AltJSON)

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

@@ -58,7 +58,7 @@ type NotificationsPatchResource =

5858-- | Updates a notification. This method supports patch semantics.

5959--

6060-- /See:/ 'notificationsPatch' smart constructor.

61−data NotificationsPatch = NotificationsPatch

61+data NotificationsPatch = NotificationsPatch'

6262 { _npPayload :: !Notification

6363 , _npCustomer :: !Text

6464 , _npNotificationId :: !Text

@@ -79,7 +79,7 @@ notificationsPatch

7979 -> Text -- ^ 'npNotificationId'

8080 -> NotificationsPatch

8181notificationsPatch pNpPayload_ pNpCustomer_ pNpNotificationId_ =

82− NotificationsPatch

82+ NotificationsPatch'

8383 { _npPayload = pNpPayload_

8484 , _npCustomer = pNpCustomer_

8585 , _npNotificationId = pNpNotificationId_

@@ -105,7 +105,7 @@ instance GoogleRequest NotificationsPatch where

105105 type Rs NotificationsPatch = Notification

106106 type Scopes NotificationsPatch =

107107 '["https://www.googleapis.com/auth/admin.directory.notifications"]

108− requestClient NotificationsPatch{..}

108+ requestClient NotificationsPatch'{..}

109109 = go _npCustomer _npNotificationId (Just AltJSON)

110110 _npPayload

111111 directoryService

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

@@ -58,7 +58,7 @@ type NotificationsUpdateResource =

5858-- | Updates a notification.

5959--

6060-- /See:/ 'notificationsUpdate' smart constructor.

61−data NotificationsUpdate = NotificationsUpdate

61+data NotificationsUpdate = NotificationsUpdate'

6262 { _nuPayload :: !Notification

6363 , _nuCustomer :: !Text

6464 , _nuNotificationId :: !Text

@@ -79,7 +79,7 @@ notificationsUpdate

7979 -> Text -- ^ 'nuNotificationId'

8080 -> NotificationsUpdate

8181notificationsUpdate pNuPayload_ pNuCustomer_ pNuNotificationId_ =

82− NotificationsUpdate

82+ NotificationsUpdate'

8383 { _nuPayload = pNuPayload_

8484 , _nuCustomer = pNuCustomer_

8585 , _nuNotificationId = pNuNotificationId_

@@ -105,7 +105,7 @@ instance GoogleRequest NotificationsUpdate where

105105 type Rs NotificationsUpdate = Notification

106106 type Scopes NotificationsUpdate =

107107 '["https://www.googleapis.com/auth/admin.directory.notifications"]

108− requestClient NotificationsUpdate{..}

108+ requestClient NotificationsUpdate'{..}

109109 = go _nuCustomer _nuNotificationId (Just AltJSON)

110110 _nuPayload

111111 directoryService

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

@@ -55,7 +55,7 @@ type OrgUnitsDeleteResource =

5555-- | Remove Organization Unit

5656--

5757-- /See:/ 'orgUnitsDelete' smart constructor.

58−data OrgUnitsDelete = OrgUnitsDelete

58+data OrgUnitsDelete = OrgUnitsDelete'

5959 { _oudOrgUnitPath :: ![Text]

6060 , _oudCustomerId :: !Text

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

@@ -72,7 +72,7 @@ orgUnitsDelete

7272 -> Text -- ^ 'oudCustomerId'

7373 -> OrgUnitsDelete

7474orgUnitsDelete pOudOrgUnitPath_ pOudCustomerId_ =

75− OrgUnitsDelete

75+ OrgUnitsDelete'

7676 { _oudOrgUnitPath = _Coerce # pOudOrgUnitPath_

7777 , _oudCustomerId = pOudCustomerId_

7878 }

@@ -94,7 +94,7 @@ instance GoogleRequest OrgUnitsDelete where

9494 type Rs OrgUnitsDelete = ()

9595 type Scopes OrgUnitsDelete =

9696 '["https://www.googleapis.com/auth/admin.directory.orgunit"]

97− requestClient OrgUnitsDelete{..}

97+ requestClient OrgUnitsDelete'{..}

9898 = go _oudCustomerId _oudOrgUnitPath (Just AltJSON)

9999 directoryService

100100 where go

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

@@ -55,7 +55,7 @@ type OrgUnitsGetResource =

5555-- | Retrieve Organization Unit

5656--

5757-- /See:/ 'orgUnitsGet' smart constructor.

58−data OrgUnitsGet = OrgUnitsGet

58+data OrgUnitsGet = OrgUnitsGet'

5959 { _ougOrgUnitPath :: ![Text]

6060 , _ougCustomerId :: !Text

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

@@ -72,7 +72,7 @@ orgUnitsGet

7272 -> Text -- ^ 'ougCustomerId'

7373 -> OrgUnitsGet

7474orgUnitsGet pOugOrgUnitPath_ pOugCustomerId_ =

75− OrgUnitsGet

75+ OrgUnitsGet'

7676 { _ougOrgUnitPath = _Coerce # pOugOrgUnitPath_

7777 , _ougCustomerId = pOugCustomerId_

7878 }

@@ -95,7 +95,7 @@ instance GoogleRequest OrgUnitsGet where

9595 type Scopes OrgUnitsGet =

9696 '["https://www.googleapis.com/auth/admin.directory.orgunit",

9797 "https://www.googleapis.com/auth/admin.directory.orgunit.readonly"]

98− requestClient OrgUnitsGet{..}

98+ requestClient OrgUnitsGet'{..}

9999 = go _ougCustomerId _ougOrgUnitPath (Just AltJSON)

100100 directoryService

101101 where go

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

@@ -55,7 +55,7 @@ type OrgUnitsInsertResource =

5555-- | Add Organization Unit

5656--

5757-- /See:/ 'orgUnitsInsert' smart constructor.

58−data OrgUnitsInsert = OrgUnitsInsert

58+data OrgUnitsInsert = OrgUnitsInsert'

5959 { _ouiPayload :: !OrgUnit

6060 , _ouiCustomerId :: !Text

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

@@ -72,7 +72,7 @@ orgUnitsInsert

7272 -> Text -- ^ 'ouiCustomerId'

7373 -> OrgUnitsInsert

7474orgUnitsInsert pOuiPayload_ pOuiCustomerId_ =

75− OrgUnitsInsert

75+ OrgUnitsInsert'

7676 { _ouiPayload = pOuiPayload_

7777 , _ouiCustomerId = pOuiCustomerId_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest OrgUnitsInsert where

9292 type Rs OrgUnitsInsert = OrgUnit

9393 type Scopes OrgUnitsInsert =

9494 '["https://www.googleapis.com/auth/admin.directory.orgunit"]

95− requestClient OrgUnitsInsert{..}

95+ requestClient OrgUnitsInsert'{..}

9696 = go _ouiCustomerId (Just AltJSON) _ouiPayload

9797 directoryService

9898 where go

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

@@ -57,7 +57,7 @@ type OrgUnitsListResource =

5757-- | Retrieve all Organization Units

5858--

5959-- /See:/ 'orgUnitsList' smart constructor.

60−data OrgUnitsList = OrgUnitsList

60+data OrgUnitsList = OrgUnitsList'

6161 { _oulOrgUnitPath :: !Text

6262 , _oulCustomerId :: !Text

6363 , _oulType :: !(Maybe OrgUnitsListType)

@@ -76,7 +76,7 @@ orgUnitsList

7676 :: Text -- ^ 'oulCustomerId'

7777 -> OrgUnitsList

7878orgUnitsList pOulCustomerId_ =

79− OrgUnitsList

79+ OrgUnitsList'

8080 { _oulOrgUnitPath = ""

8181 , _oulCustomerId = pOulCustomerId_

8282 , _oulType = Nothing

@@ -103,7 +103,7 @@ instance GoogleRequest OrgUnitsList where

103103 type Scopes OrgUnitsList =

104104 '["https://www.googleapis.com/auth/admin.directory.orgunit",

105105 "https://www.googleapis.com/auth/admin.directory.orgunit.readonly"]

106− requestClient OrgUnitsList{..}

106+ requestClient OrgUnitsList'{..}

107107 = go _oulCustomerId (Just _oulOrgUnitPath) _oulType

108108 (Just AltJSON)

109109 directoryService

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

@@ -57,7 +57,7 @@ type OrgUnitsPatchResource =

5757-- | Update Organization Unit. This method supports patch semantics.

5858--

5959-- /See:/ 'orgUnitsPatch' smart constructor.

60−data OrgUnitsPatch = OrgUnitsPatch

60+data OrgUnitsPatch = OrgUnitsPatch'

6161 { _oupPayload :: !OrgUnit

6262 , _oupOrgUnitPath :: ![Text]

6363 , _oupCustomerId :: !Text

@@ -78,7 +78,7 @@ orgUnitsPatch

7878 -> Text -- ^ 'oupCustomerId'

7979 -> OrgUnitsPatch

8080orgUnitsPatch pOupPayload_ pOupOrgUnitPath_ pOupCustomerId_ =

81− OrgUnitsPatch

81+ OrgUnitsPatch'

8282 { _oupPayload = pOupPayload_

8383 , _oupOrgUnitPath = _Coerce # pOupOrgUnitPath_

8484 , _oupCustomerId = pOupCustomerId_

@@ -106,7 +106,7 @@ instance GoogleRequest OrgUnitsPatch where

106106 type Rs OrgUnitsPatch = OrgUnit

107107 type Scopes OrgUnitsPatch =

108108 '["https://www.googleapis.com/auth/admin.directory.orgunit"]

109− requestClient OrgUnitsPatch{..}

109+ requestClient OrgUnitsPatch'{..}

110110 = go _oupCustomerId _oupOrgUnitPath (Just AltJSON)

111111 _oupPayload

112112 directoryService

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

@@ -57,7 +57,7 @@ type OrgUnitsUpdateResource =

5757-- | Update Organization Unit

5858--

5959-- /See:/ 'orgUnitsUpdate' smart constructor.

60−data OrgUnitsUpdate = OrgUnitsUpdate

60+data OrgUnitsUpdate = OrgUnitsUpdate'

6161 { _ouuPayload :: !OrgUnit

6262 , _ouuOrgUnitPath :: ![Text]

6363 , _ouuCustomerId :: !Text

@@ -78,7 +78,7 @@ orgUnitsUpdate

7878 -> Text -- ^ 'ouuCustomerId'

7979 -> OrgUnitsUpdate

8080orgUnitsUpdate pOuuPayload_ pOuuOrgUnitPath_ pOuuCustomerId_ =

81− OrgUnitsUpdate

81+ OrgUnitsUpdate'

8282 { _ouuPayload = pOuuPayload_

8383 , _ouuOrgUnitPath = _Coerce # pOuuOrgUnitPath_

8484 , _ouuCustomerId = pOuuCustomerId_

@@ -106,7 +106,7 @@ instance GoogleRequest OrgUnitsUpdate where

106106 type Rs OrgUnitsUpdate = OrgUnit

107107 type Scopes OrgUnitsUpdate =

108108 '["https://www.googleapis.com/auth/admin.directory.orgunit"]

109− requestClient OrgUnitsUpdate{..}

109+ requestClient OrgUnitsUpdate'{..}

110110 = go _ouuCustomerId _ouuOrgUnitPath (Just AltJSON)

111111 _ouuPayload

112112 directoryService

gogol-admin-directory/gen/Network/Google/Resource/Directory/Privileges/List.hs+3−3

@@ -55,7 +55,7 @@ type PrivilegesListResource =

5555-- | Retrieves a paginated list of all privileges for a customer.

5656--

5757-- /See:/ 'privilegesList' smart constructor.

58−newtype PrivilegesList = PrivilegesList

58+newtype PrivilegesList = PrivilegesList'

5959 { _plCustomer :: Text

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

6161

@@ -68,7 +68,7 @@ privilegesList

6868 :: Text -- ^ 'plCustomer'

6969 -> PrivilegesList

7070privilegesList pPlCustomer_ =

71− PrivilegesList

71+ PrivilegesList'

7272 { _plCustomer = pPlCustomer_

7373 }

7474

@@ -82,7 +82,7 @@ instance GoogleRequest PrivilegesList where

8282 type Scopes PrivilegesList =

8383 '["https://www.googleapis.com/auth/admin.directory.rolemanagement",

8484 "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]

85− requestClient PrivilegesList{..}

85+ requestClient PrivilegesList'{..}

8686 = go _plCustomer (Just AltJSON) directoryService

8787 where go

8888 = buildClient (Proxy :: Proxy PrivilegesListResource)

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Delete.hs+3−3

@@ -56,7 +56,7 @@ type ResourcesCalendarsDeleteResource =

5656-- | Deletes a calendar resource.

5757--

5858-- /See:/ 'resourcesCalendarsDelete' smart constructor.

59−data ResourcesCalendarsDelete = ResourcesCalendarsDelete

59+data ResourcesCalendarsDelete = ResourcesCalendarsDelete'

6060 { _rcdCustomer :: !Text

6161 , _rcdCalendarResourceId :: !Text

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

@@ -73,7 +73,7 @@ resourcesCalendarsDelete

7373 -> Text -- ^ 'rcdCalendarResourceId'

7474 -> ResourcesCalendarsDelete

7575resourcesCalendarsDelete pRcdCustomer_ pRcdCalendarResourceId_ =

76− ResourcesCalendarsDelete

76+ ResourcesCalendarsDelete'

7777 { _rcdCustomer = pRcdCustomer_

7878 , _rcdCalendarResourceId = pRcdCalendarResourceId_

7979 }

@@ -95,7 +95,7 @@ instance GoogleRequest ResourcesCalendarsDelete where

9595 type Rs ResourcesCalendarsDelete = ()

9696 type Scopes ResourcesCalendarsDelete =

9797 '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]

98− requestClient ResourcesCalendarsDelete{..}

98+ requestClient ResourcesCalendarsDelete'{..}

9999 = go _rcdCustomer _rcdCalendarResourceId

100100 (Just AltJSON)

101101 directoryService

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Get.hs+3−3

@@ -57,7 +57,7 @@ type ResourcesCalendarsGetResource =

5757-- | Retrieves a calendar resource.

5858--

5959-- /See:/ 'resourcesCalendarsGet' smart constructor.

60−data ResourcesCalendarsGet = ResourcesCalendarsGet

60+data ResourcesCalendarsGet = ResourcesCalendarsGet'

6161 { _rcgCustomer :: !Text

6262 , _rcgCalendarResourceId :: !Text

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

@@ -74,7 +74,7 @@ resourcesCalendarsGet

7474 -> Text -- ^ 'rcgCalendarResourceId'

7575 -> ResourcesCalendarsGet

7676resourcesCalendarsGet pRcgCustomer_ pRcgCalendarResourceId_ =

77− ResourcesCalendarsGet

77+ ResourcesCalendarsGet'

7878 { _rcgCustomer = pRcgCustomer_

7979 , _rcgCalendarResourceId = pRcgCalendarResourceId_

8080 }

@@ -97,7 +97,7 @@ instance GoogleRequest ResourcesCalendarsGet where

9797 type Scopes ResourcesCalendarsGet =

9898 '["https://www.googleapis.com/auth/admin.directory.resource.calendar",

9999 "https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly"]

100− requestClient ResourcesCalendarsGet{..}

100+ requestClient ResourcesCalendarsGet'{..}

101101 = go _rcgCustomer _rcgCalendarResourceId

102102 (Just AltJSON)

103103 directoryService

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Insert.hs+3−3

@@ -57,7 +57,7 @@ type ResourcesCalendarsInsertResource =

5757-- | Inserts a calendar resource.

5858--

5959-- /See:/ 'resourcesCalendarsInsert' smart constructor.

60−data ResourcesCalendarsInsert = ResourcesCalendarsInsert

60+data ResourcesCalendarsInsert = ResourcesCalendarsInsert'

6161 { _rciPayload :: !CalendarResource

6262 , _rciCustomer :: !Text

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

@@ -74,7 +74,7 @@ resourcesCalendarsInsert

7474 -> Text -- ^ 'rciCustomer'

7575 -> ResourcesCalendarsInsert

7676resourcesCalendarsInsert pRciPayload_ pRciCustomer_ =

77− ResourcesCalendarsInsert

77+ ResourcesCalendarsInsert'

7878 { _rciPayload = pRciPayload_

7979 , _rciCustomer = pRciCustomer_

8080 }

@@ -95,7 +95,7 @@ instance GoogleRequest ResourcesCalendarsInsert where

9595 type Rs ResourcesCalendarsInsert = CalendarResource

9696 type Scopes ResourcesCalendarsInsert =

9797 '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]

98− requestClient ResourcesCalendarsInsert{..}

98+ requestClient ResourcesCalendarsInsert'{..}

9999 = go _rciCustomer (Just AltJSON) _rciPayload

100100 directoryService

101101 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/List.hs+3−3

@@ -59,7 +59,7 @@ type ResourcesCalendarsListResource =

5959-- | Retrieves a list of calendar resources for an account.

6060--

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

62−data ResourcesCalendarsList = ResourcesCalendarsList

62+data ResourcesCalendarsList = ResourcesCalendarsList'

6363 { _rclCustomer :: !Text

6464 , _rclPageToken :: !(Maybe Text)

6565 , _rclMaxResults :: !(Maybe (Textual Int32))

@@ -78,7 +78,7 @@ resourcesCalendarsList

7878 :: Text -- ^ 'rclCustomer'

7979 -> ResourcesCalendarsList

8080resourcesCalendarsList pRclCustomer_ =

81− ResourcesCalendarsList

81+ ResourcesCalendarsList'

8282 { _rclCustomer = pRclCustomer_

8383 , _rclPageToken = Nothing

8484 , _rclMaxResults = Nothing

@@ -108,7 +108,7 @@ instance GoogleRequest ResourcesCalendarsList where

108108 type Scopes ResourcesCalendarsList =

109109 '["https://www.googleapis.com/auth/admin.directory.resource.calendar",

110110 "https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly"]

111− requestClient ResourcesCalendarsList{..}

111+ requestClient ResourcesCalendarsList'{..}

112112 = go _rclCustomer _rclPageToken _rclMaxResults

113113 (Just AltJSON)

114114 directoryService

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Patch.hs+3−3

@@ -59,7 +59,7 @@ type ResourcesCalendarsPatchResource =

5959-- | Updates a calendar resource. This method supports patch semantics.

6060--

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

62−data ResourcesCalendarsPatch = ResourcesCalendarsPatch

62+data ResourcesCalendarsPatch = ResourcesCalendarsPatch'

6363 { _rcpPayload :: !CalendarResource

6464 , _rcpCustomer :: !Text

6565 , _rcpCalendarResourceId :: !Text

@@ -80,7 +80,7 @@ resourcesCalendarsPatch

8080 -> Text -- ^ 'rcpCalendarResourceId'

8181 -> ResourcesCalendarsPatch

8282resourcesCalendarsPatch pRcpPayload_ pRcpCustomer_ pRcpCalendarResourceId_ =

83− ResourcesCalendarsPatch

83+ ResourcesCalendarsPatch'

8484 { _rcpPayload = pRcpPayload_

8585 , _rcpCustomer = pRcpCustomer_

8686 , _rcpCalendarResourceId = pRcpCalendarResourceId_

@@ -108,7 +108,7 @@ instance GoogleRequest ResourcesCalendarsPatch where

108108 type Rs ResourcesCalendarsPatch = CalendarResource

109109 type Scopes ResourcesCalendarsPatch =

110110 '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]

111− requestClient ResourcesCalendarsPatch{..}

111+ requestClient ResourcesCalendarsPatch'{..}

112112 = go _rcpCustomer _rcpCalendarResourceId

113113 (Just AltJSON)

114114 _rcpPayload

gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Update.hs+3−3

@@ -59,7 +59,7 @@ type ResourcesCalendarsUpdateResource =

5959-- | Updates a calendar resource.

6060--

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

62−data ResourcesCalendarsUpdate = ResourcesCalendarsUpdate

62+data ResourcesCalendarsUpdate = ResourcesCalendarsUpdate'

6363 { _rcuPayload :: !CalendarResource

6464 , _rcuCustomer :: !Text

6565 , _rcuCalendarResourceId :: !Text

@@ -80,7 +80,7 @@ resourcesCalendarsUpdate

8080 -> Text -- ^ 'rcuCalendarResourceId'

8181 -> ResourcesCalendarsUpdate

8282resourcesCalendarsUpdate pRcuPayload_ pRcuCustomer_ pRcuCalendarResourceId_ =

83− ResourcesCalendarsUpdate

83+ ResourcesCalendarsUpdate'

8484 { _rcuPayload = pRcuPayload_

8585 , _rcuCustomer = pRcuCustomer_

8686 , _rcuCalendarResourceId = pRcuCalendarResourceId_

@@ -108,7 +108,7 @@ instance GoogleRequest ResourcesCalendarsUpdate where

108108 type Rs ResourcesCalendarsUpdate = CalendarResource

109109 type Scopes ResourcesCalendarsUpdate =

110110 '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]

111− requestClient ResourcesCalendarsUpdate{..}

111+ requestClient ResourcesCalendarsUpdate'{..}

112112 = go _rcuCustomer _rcuCalendarResourceId

113113 (Just AltJSON)

114114 _rcuPayload

gogol-admin-directory/gen/Network/Google/Resource/Directory/RoleAssignments/Delete.hs+3−3

@@ -55,7 +55,7 @@ type RoleAssignmentsDeleteResource =

5555-- | Deletes a role assignment.

5656--

5757-- /See:/ 'roleAssignmentsDelete' smart constructor.

58−data RoleAssignmentsDelete = RoleAssignmentsDelete

58+data RoleAssignmentsDelete = RoleAssignmentsDelete'

5959 { _radCustomer :: !Text

6060 , _radRoleAssignmentId :: !Text

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

@@ -72,7 +72,7 @@ roleAssignmentsDelete

7272 -> Text -- ^ 'radRoleAssignmentId'

7373 -> RoleAssignmentsDelete

7474roleAssignmentsDelete pRadCustomer_ pRadRoleAssignmentId_ =

75− RoleAssignmentsDelete

75+ RoleAssignmentsDelete'

7676 { _radCustomer = pRadCustomer_

7777 , _radRoleAssignmentId = pRadRoleAssignmentId_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest RoleAssignmentsDelete where

9292 type Rs RoleAssignmentsDelete = ()

9393 type Scopes RoleAssignmentsDelete =

9494 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

95− requestClient RoleAssignmentsDelete{..}

95+ requestClient RoleAssignmentsDelete'{..}

9696 = go _radCustomer _radRoleAssignmentId (Just AltJSON)

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/RoleAssignments/Get.hs+3−3

@@ -56,7 +56,7 @@ type RoleAssignmentsGetResource =

5656-- | Retrieve a role assignment.

5757--

5858-- /See:/ 'roleAssignmentsGet' smart constructor.

59−data RoleAssignmentsGet = RoleAssignmentsGet

59+data RoleAssignmentsGet = RoleAssignmentsGet'

6060 { _ragCustomer :: !Text

6161 , _ragRoleAssignmentId :: !Text

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

@@ -73,7 +73,7 @@ roleAssignmentsGet

7373 -> Text -- ^ 'ragRoleAssignmentId'

7474 -> RoleAssignmentsGet

7575roleAssignmentsGet pRagCustomer_ pRagRoleAssignmentId_ =

76− RoleAssignmentsGet

76+ RoleAssignmentsGet'

7777 { _ragCustomer = pRagCustomer_

7878 , _ragRoleAssignmentId = pRagRoleAssignmentId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest RoleAssignmentsGet where

9494 type Scopes RoleAssignmentsGet =

9595 '["https://www.googleapis.com/auth/admin.directory.rolemanagement",

9696 "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]

97− requestClient RoleAssignmentsGet{..}

97+ requestClient RoleAssignmentsGet'{..}

9898 = go _ragCustomer _ragRoleAssignmentId (Just AltJSON)

9999 directoryService

100100 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/RoleAssignments/Insert.hs+3−3

@@ -56,7 +56,7 @@ type RoleAssignmentsInsertResource =

5656-- | Creates a role assignment.

5757--

5858-- /See:/ 'roleAssignmentsInsert' smart constructor.

59−data RoleAssignmentsInsert = RoleAssignmentsInsert

59+data RoleAssignmentsInsert = RoleAssignmentsInsert'

6060 { _raiPayload :: !RoleAssignment

6161 , _raiCustomer :: !Text

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

@@ -73,7 +73,7 @@ roleAssignmentsInsert

7373 -> Text -- ^ 'raiCustomer'

7474 -> RoleAssignmentsInsert

7575roleAssignmentsInsert pRaiPayload_ pRaiCustomer_ =

76− RoleAssignmentsInsert

76+ RoleAssignmentsInsert'

7777 { _raiPayload = pRaiPayload_

7878 , _raiCustomer = pRaiCustomer_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest RoleAssignmentsInsert where

9292 type Rs RoleAssignmentsInsert = RoleAssignment

9393 type Scopes RoleAssignmentsInsert =

9494 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

95− requestClient RoleAssignmentsInsert{..}

95+ requestClient RoleAssignmentsInsert'{..}

9696 = go _raiCustomer (Just AltJSON) _raiPayload

9797 directoryService

9898 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/RoleAssignments/List.hs+3−3

@@ -62,7 +62,7 @@ type RoleAssignmentsListResource =

6262-- | Retrieves a paginated list of all roleAssignments.

6363--

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

65−data RoleAssignmentsList = RoleAssignmentsList

65+data RoleAssignmentsList = RoleAssignmentsList'

6666 { _ralRoleId :: !(Maybe Text)

6767 , _ralCustomer :: !Text

6868 , _ralPageToken :: !(Maybe Text)

@@ -87,7 +87,7 @@ roleAssignmentsList

8787 :: Text -- ^ 'ralCustomer'

8888 -> RoleAssignmentsList

8989roleAssignmentsList pRalCustomer_ =

90− RoleAssignmentsList

90+ RoleAssignmentsList'

9191 { _ralRoleId = Nothing

9292 , _ralCustomer = pRalCustomer_

9393 , _ralPageToken = Nothing

@@ -130,7 +130,7 @@ instance GoogleRequest RoleAssignmentsList where

130130 type Scopes RoleAssignmentsList =

131131 '["https://www.googleapis.com/auth/admin.directory.rolemanagement",

132132 "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]

133− requestClient RoleAssignmentsList{..}

133+ requestClient RoleAssignmentsList'{..}

134134 = go _ralCustomer _ralRoleId _ralPageToken

135135 _ralUserKey

136136 _ralMaxResults

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/Delete.hs+3−3

@@ -55,7 +55,7 @@ type RolesDeleteResource =

5555-- | Deletes a role.

5656--

5757-- /See:/ 'rolesDelete' smart constructor.

58−data RolesDelete = RolesDelete

58+data RolesDelete = RolesDelete'

5959 { _rdRoleId :: !Text

6060 , _rdCustomer :: !Text

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

@@ -72,7 +72,7 @@ rolesDelete

7272 -> Text -- ^ 'rdCustomer'

7373 -> RolesDelete

7474rolesDelete pRdRoleId_ pRdCustomer_ =

75− RolesDelete

75+ RolesDelete'

7676 { _rdRoleId = pRdRoleId_

7777 , _rdCustomer = pRdCustomer_

7878 }

@@ -90,7 +90,7 @@ instance GoogleRequest RolesDelete where

9090 type Rs RolesDelete = ()

9191 type Scopes RolesDelete =

9292 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

93− requestClient RolesDelete{..}

93+ requestClient RolesDelete'{..}

9494 = go _rdCustomer _rdRoleId (Just AltJSON)

9595 directoryService

9696 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/Get.hs+3−3

@@ -55,7 +55,7 @@ type RolesGetResource =

5555-- | Retrieves a role.

5656--

5757-- /See:/ 'rolesGet' smart constructor.

58−data RolesGet = RolesGet

58+data RolesGet = RolesGet'

5959 { _rgRoleId :: !Text

6060 , _rgCustomer :: !Text

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

@@ -72,7 +72,7 @@ rolesGet

7272 -> Text -- ^ 'rgCustomer'

7373 -> RolesGet

7474rolesGet pRgRoleId_ pRgCustomer_ =

75− RolesGet

75+ RolesGet'

7676 { _rgRoleId = pRgRoleId_

7777 , _rgCustomer = pRgCustomer_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest RolesGet where

9191 type Scopes RolesGet =

9292 '["https://www.googleapis.com/auth/admin.directory.rolemanagement",

9393 "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]

94− requestClient RolesGet{..}

94+ requestClient RolesGet'{..}

9595 = go _rgCustomer _rgRoleId (Just AltJSON)

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/Insert.hs+3−3

@@ -55,7 +55,7 @@ type RolesInsertResource =

5555-- | Creates a role.

5656--

5757-- /See:/ 'rolesInsert' smart constructor.

58−data RolesInsert = RolesInsert

58+data RolesInsert = RolesInsert'

5959 { _riPayload :: !Role

6060 , _riCustomer :: !Text

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

@@ -72,7 +72,7 @@ rolesInsert

7272 -> Text -- ^ 'riCustomer'

7373 -> RolesInsert

7474rolesInsert pRiPayload_ pRiCustomer_ =

75− RolesInsert

75+ RolesInsert'

7676 { _riPayload = pRiPayload_

7777 , _riCustomer = pRiCustomer_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest RolesInsert where

9191 type Rs RolesInsert = Role

9292 type Scopes RolesInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

94− requestClient RolesInsert{..}

94+ requestClient RolesInsert'{..}

9595 = go _riCustomer (Just AltJSON) _riPayload

9696 directoryService

9797 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/List.hs+3−3

@@ -57,7 +57,7 @@ type RolesListResource =

5757-- | Retrieves a paginated list of all the roles in a domain.

5858--

5959-- /See:/ 'rolesList' smart constructor.

60−data RolesList = RolesList

60+data RolesList = RolesList'

6161 { _rlCustomer :: !Text

6262 , _rlPageToken :: !(Maybe Text)

6363 , _rlMaxResults :: !(Maybe (Textual Int32))

@@ -76,7 +76,7 @@ rolesList

7676 :: Text -- ^ 'rlCustomer'

7777 -> RolesList

7878rolesList pRlCustomer_ =

79− RolesList

79+ RolesList'

8080 { _rlCustomer = pRlCustomer_

8181 , _rlPageToken = Nothing

8282 , _rlMaxResults = Nothing

@@ -103,7 +103,7 @@ instance GoogleRequest RolesList where

103103 type Scopes RolesList =

104104 '["https://www.googleapis.com/auth/admin.directory.rolemanagement",

105105 "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]

106− requestClient RolesList{..}

106+ requestClient RolesList'{..}

107107 = go _rlCustomer _rlPageToken _rlMaxResults

108108 (Just AltJSON)

109109 directoryService

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/Patch.hs+3−3

@@ -57,7 +57,7 @@ type RolesPatchResource =

5757-- | Updates a role. This method supports patch semantics.

5858--

5959-- /See:/ 'rolesPatch' smart constructor.

60−data RolesPatch = RolesPatch

60+data RolesPatch = RolesPatch'

6161 { _rpPayload :: !Role

6262 , _rpRoleId :: !Text

6363 , _rpCustomer :: !Text

@@ -78,7 +78,7 @@ rolesPatch

7878 -> Text -- ^ 'rpCustomer'

7979 -> RolesPatch

8080rolesPatch pRpPayload_ pRpRoleId_ pRpCustomer_ =

81− RolesPatch

81+ RolesPatch'

8282 { _rpPayload = pRpPayload_

8383 , _rpRoleId = pRpRoleId_

8484 , _rpCustomer = pRpCustomer_

@@ -102,7 +102,7 @@ instance GoogleRequest RolesPatch where

102102 type Rs RolesPatch = Role

103103 type Scopes RolesPatch =

104104 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

105− requestClient RolesPatch{..}

105+ requestClient RolesPatch'{..}

106106 = go _rpCustomer _rpRoleId (Just AltJSON) _rpPayload

107107 directoryService

108108 where go

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/Update.hs+3−3

@@ -57,7 +57,7 @@ type RolesUpdateResource =

5757-- | Updates a role.

5858--

5959-- /See:/ 'rolesUpdate' smart constructor.

60−data RolesUpdate = RolesUpdate

60+data RolesUpdate = RolesUpdate'

6161 { _ruPayload :: !Role

6262 , _ruRoleId :: !Text

6363 , _ruCustomer :: !Text

@@ -78,7 +78,7 @@ rolesUpdate

7878 -> Text -- ^ 'ruCustomer'

7979 -> RolesUpdate

8080rolesUpdate pRuPayload_ pRuRoleId_ pRuCustomer_ =

81− RolesUpdate

81+ RolesUpdate'

8282 { _ruPayload = pRuPayload_

8383 , _ruRoleId = pRuRoleId_

8484 , _ruCustomer = pRuCustomer_

@@ -102,7 +102,7 @@ instance GoogleRequest RolesUpdate where

102102 type Rs RolesUpdate = Role

103103 type Scopes RolesUpdate =

104104 '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]

105− requestClient RolesUpdate{..}

105+ requestClient RolesUpdate'{..}

106106 = go _ruCustomer _ruRoleId (Just AltJSON) _ruPayload

107107 directoryService

108108 where go

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

@@ -55,7 +55,7 @@ type SchemasDeleteResource =

5555-- | Delete schema

5656--

5757-- /See:/ 'schemasDelete' smart constructor.

58−data SchemasDelete = SchemasDelete

58+data SchemasDelete = SchemasDelete'

5959 { _sdCustomerId :: !Text

6060 , _sdSchemaKey :: !Text

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

@@ -72,7 +72,7 @@ schemasDelete

7272 -> Text -- ^ 'sdSchemaKey'

7373 -> SchemasDelete

7474schemasDelete pSdCustomerId_ pSdSchemaKey_ =

75− SchemasDelete

75+ SchemasDelete'

7676 { _sdCustomerId = pSdCustomerId_

7777 , _sdSchemaKey = pSdSchemaKey_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest SchemasDelete where

9191 type Rs SchemasDelete = ()

9292 type Scopes SchemasDelete =

9393 '["https://www.googleapis.com/auth/admin.directory.userschema"]

94− requestClient SchemasDelete{..}

94+ requestClient SchemasDelete'{..}

9595 = go _sdCustomerId _sdSchemaKey (Just AltJSON)

9696 directoryService

9797 where go

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

@@ -55,7 +55,7 @@ type SchemasGetResource =

5555-- | Retrieve schema

5656--

5757-- /See:/ 'schemasGet' smart constructor.

58−data SchemasGet = SchemasGet

58+data SchemasGet = SchemasGet'

5959 { _sgCustomerId :: !Text

6060 , _sgSchemaKey :: !Text

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

@@ -72,7 +72,7 @@ schemasGet

7272 -> Text -- ^ 'sgSchemaKey'

7373 -> SchemasGet

7474schemasGet pSgCustomerId_ pSgSchemaKey_ =

75− SchemasGet

75+ SchemasGet'

7676 { _sgCustomerId = pSgCustomerId_

7777 , _sgSchemaKey = pSgSchemaKey_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest SchemasGet where

9292 type Scopes SchemasGet =

9393 '["https://www.googleapis.com/auth/admin.directory.userschema",

9494 "https://www.googleapis.com/auth/admin.directory.userschema.readonly"]

95− requestClient SchemasGet{..}

95+ requestClient SchemasGet'{..}

9696 = go _sgCustomerId _sgSchemaKey (Just AltJSON)

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type SchemasInsertResource =

5555-- | Create schema.

5656--

5757-- /See:/ 'schemasInsert' smart constructor.

58−data SchemasInsert = SchemasInsert

58+data SchemasInsert = SchemasInsert'

5959 { _siPayload :: !Schema

6060 , _siCustomerId :: !Text

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

@@ -72,7 +72,7 @@ schemasInsert

7272 -> Text -- ^ 'siCustomerId'

7373 -> SchemasInsert

7474schemasInsert pSiPayload_ pSiCustomerId_ =

75− SchemasInsert

75+ SchemasInsert'

7676 { _siPayload = pSiPayload_

7777 , _siCustomerId = pSiCustomerId_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest SchemasInsert where

9191 type Rs SchemasInsert = Schema

9292 type Scopes SchemasInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.userschema"]

94− requestClient SchemasInsert{..}

94+ requestClient SchemasInsert'{..}

9595 = go _siCustomerId (Just AltJSON) _siPayload

9696 directoryService

9797 where go

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

@@ -53,7 +53,7 @@ type SchemasListResource =

5353-- | Retrieve all schemas for a customer

5454--

5555-- /See:/ 'schemasList' smart constructor.

56−newtype SchemasList = SchemasList

56+newtype SchemasList = SchemasList'

5757 { _slCustomerId :: Text

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

5959

@@ -66,7 +66,7 @@ schemasList

6666 :: Text -- ^ 'slCustomerId'

6767 -> SchemasList

6868schemasList pSlCustomerId_ =

69− SchemasList

69+ SchemasList'

7070 { _slCustomerId = pSlCustomerId_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest SchemasList where

8080 type Scopes SchemasList =

8181 '["https://www.googleapis.com/auth/admin.directory.userschema",

8282 "https://www.googleapis.com/auth/admin.directory.userschema.readonly"]

83− requestClient SchemasList{..}

83+ requestClient SchemasList'{..}

8484 = go _slCustomerId (Just AltJSON) directoryService

8585 where go

8686 = buildClient (Proxy :: Proxy SchemasListResource)

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

@@ -57,7 +57,7 @@ type SchemasPatchResource =

5757-- | Update schema. This method supports patch semantics.

5858--

5959-- /See:/ 'schemasPatch' smart constructor.

60−data SchemasPatch = SchemasPatch

60+data SchemasPatch = SchemasPatch'

6161 { _spPayload :: !Schema

6262 , _spCustomerId :: !Text

6363 , _spSchemaKey :: !Text

@@ -78,7 +78,7 @@ schemasPatch

7878 -> Text -- ^ 'spSchemaKey'

7979 -> SchemasPatch

8080schemasPatch pSpPayload_ pSpCustomerId_ pSpSchemaKey_ =

81− SchemasPatch

81+ SchemasPatch'

8282 { _spPayload = pSpPayload_

8383 , _spCustomerId = pSpCustomerId_

8484 , _spSchemaKey = pSpSchemaKey_

@@ -103,7 +103,7 @@ instance GoogleRequest SchemasPatch where

103103 type Rs SchemasPatch = Schema

104104 type Scopes SchemasPatch =

105105 '["https://www.googleapis.com/auth/admin.directory.userschema"]

106− requestClient SchemasPatch{..}

106+ requestClient SchemasPatch'{..}

107107 = go _spCustomerId _spSchemaKey (Just AltJSON)

108108 _spPayload

109109 directoryService

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

@@ -57,7 +57,7 @@ type SchemasUpdateResource =

5757-- | Update schema

5858--

5959-- /See:/ 'schemasUpdate' smart constructor.

60−data SchemasUpdate = SchemasUpdate

60+data SchemasUpdate = SchemasUpdate'

6161 { _suPayload :: !Schema

6262 , _suCustomerId :: !Text

6363 , _suSchemaKey :: !Text

@@ -78,7 +78,7 @@ schemasUpdate

7878 -> Text -- ^ 'suSchemaKey'

7979 -> SchemasUpdate

8080schemasUpdate pSuPayload_ pSuCustomerId_ pSuSchemaKey_ =

81− SchemasUpdate

81+ SchemasUpdate'

8282 { _suPayload = pSuPayload_

8383 , _suCustomerId = pSuCustomerId_

8484 , _suSchemaKey = pSuSchemaKey_

@@ -103,7 +103,7 @@ instance GoogleRequest SchemasUpdate where

103103 type Rs SchemasUpdate = Schema

104104 type Scopes SchemasUpdate =

105105 '["https://www.googleapis.com/auth/admin.directory.userschema"]

106− requestClient SchemasUpdate{..}

106+ requestClient SchemasUpdate'{..}

107107 = go _suCustomerId _suSchemaKey (Just AltJSON)

108108 _suPayload

109109 directoryService

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

@@ -55,7 +55,7 @@ type TokensDeleteResource =

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

5656--

5757-- /See:/ 'tokensDelete' smart constructor.

58−data TokensDelete = TokensDelete

58+data TokensDelete = TokensDelete'

5959 { _tdClientId :: !Text

6060 , _tdUserKey :: !Text

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

@@ -72,7 +72,7 @@ tokensDelete

7272 -> Text -- ^ 'tdUserKey'

7373 -> TokensDelete

7474tokensDelete pTdClientId_ pTdUserKey_ =

75− TokensDelete

75+ TokensDelete'

7676 { _tdClientId = pTdClientId_

7777 , _tdUserKey = pTdUserKey_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest TokensDelete where

9292 type Rs TokensDelete = ()

9393 type Scopes TokensDelete =

9494 '["https://www.googleapis.com/auth/admin.directory.user.security"]

95− requestClient TokensDelete{..}

95+ requestClient TokensDelete'{..}

9696 = go _tdUserKey _tdClientId (Just AltJSON)

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type TokensGetResource =

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

5656--

5757-- /See:/ 'tokensGet' smart constructor.

58−data TokensGet = TokensGet

58+data TokensGet = TokensGet'

5959 { _tgClientId :: !Text

6060 , _tgUserKey :: !Text

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

@@ -72,7 +72,7 @@ tokensGet

7272 -> Text -- ^ 'tgUserKey'

7373 -> TokensGet

7474tokensGet pTgClientId_ pTgUserKey_ =

75− TokensGet

75+ TokensGet'

7676 { _tgClientId = pTgClientId_

7777 , _tgUserKey = pTgUserKey_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest TokensGet where

9292 type Rs TokensGet = Token

9393 type Scopes TokensGet =

9494 '["https://www.googleapis.com/auth/admin.directory.user.security"]

95− requestClient TokensGet{..}

95+ requestClient TokensGet'{..}

9696 = go _tgUserKey _tgClientId (Just AltJSON)

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type TokensListResource =

5555-- applications.

5656--

5757-- /See:/ 'tokensList' smart constructor.

58−newtype TokensList = TokensList

58+newtype TokensList = TokensList'

5959 { _tlUserKey :: Text

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

6161

@@ -68,7 +68,7 @@ tokensList

6868 :: Text -- ^ 'tlUserKey'

6969 -> TokensList

7070tokensList pTlUserKey_ =

71− TokensList

71+ TokensList'

7272 { _tlUserKey = pTlUserKey_

7373 }

7474

@@ -82,7 +82,7 @@ instance GoogleRequest TokensList where

8282 type Rs TokensList = Tokens

8383 type Scopes TokensList =

8484 '["https://www.googleapis.com/auth/admin.directory.user.security"]

85− requestClient TokensList{..}

85+ requestClient TokensList'{..}

8686 = go _tlUserKey (Just AltJSON) directoryService

8787 where go

8888 = buildClient (Proxy :: Proxy TokensListResource)

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

@@ -55,7 +55,7 @@ type UsersAliasesDeleteResource =

5555-- | Remove a alias for the user

5656--

5757-- /See:/ 'usersAliasesDelete' smart constructor.

58−data UsersAliasesDelete = UsersAliasesDelete

58+data UsersAliasesDelete = UsersAliasesDelete'

5959 { _uadAlias :: !Text

6060 , _uadUserKey :: !Text

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

@@ -72,7 +72,7 @@ usersAliasesDelete

7272 -> Text -- ^ 'uadUserKey'

7373 -> UsersAliasesDelete

7474usersAliasesDelete pUadAlias_ pUadUserKey_ =

75− UsersAliasesDelete

75+ UsersAliasesDelete'

7676 { _uadAlias = pUadAlias_

7777 , _uadUserKey = pUadUserKey_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest UsersAliasesDelete where

9191 type Scopes UsersAliasesDelete =

9292 '["https://www.googleapis.com/auth/admin.directory.user",

9393 "https://www.googleapis.com/auth/admin.directory.user.alias"]

94− requestClient UsersAliasesDelete{..}

94+ requestClient UsersAliasesDelete'{..}

9595 = go _uadUserKey _uadAlias (Just AltJSON)

9696 directoryService

9797 where go

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

@@ -55,7 +55,7 @@ type UsersAliasesInsertResource =

5555-- | Add a alias for the user

5656--

5757-- /See:/ 'usersAliasesInsert' smart constructor.

58−data UsersAliasesInsert = UsersAliasesInsert

58+data UsersAliasesInsert = UsersAliasesInsert'

5959 { _uaiPayload :: !Alias

6060 , _uaiUserKey :: !Text

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

@@ -72,7 +72,7 @@ usersAliasesInsert

7272 -> Text -- ^ 'uaiUserKey'

7373 -> UsersAliasesInsert

7474usersAliasesInsert pUaiPayload_ pUaiUserKey_ =

75− UsersAliasesInsert

75+ UsersAliasesInsert'

7676 { _uaiPayload = pUaiPayload_

7777 , _uaiUserKey = pUaiUserKey_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest UsersAliasesInsert where

9292 type Scopes UsersAliasesInsert =

9393 '["https://www.googleapis.com/auth/admin.directory.user",

9494 "https://www.googleapis.com/auth/admin.directory.user.alias"]

95− requestClient UsersAliasesInsert{..}

95+ requestClient UsersAliasesInsert'{..}

9696 = go _uaiUserKey (Just AltJSON) _uaiPayload

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type UsersAliasesListResource =

5555-- | List all aliases for a user

5656--

5757-- /See:/ 'usersAliasesList' smart constructor.

58−data UsersAliasesList = UsersAliasesList

58+data UsersAliasesList = UsersAliasesList'

5959 { _ualEvent :: !(Maybe UsersAliasesListEvent)

6060 , _ualUserKey :: !Text

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

@@ -71,7 +71,7 @@ usersAliasesList

7171 :: Text -- ^ 'ualUserKey'

7272 -> UsersAliasesList

7373usersAliasesList pUalUserKey_ =

74− UsersAliasesList

74+ UsersAliasesList'

7575 { _ualEvent = Nothing

7676 , _ualUserKey = pUalUserKey_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest UsersAliasesList where

9292 "https://www.googleapis.com/auth/admin.directory.user.alias",

9393 "https://www.googleapis.com/auth/admin.directory.user.alias.readonly",

9494 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

95− requestClient UsersAliasesList{..}

95+ requestClient UsersAliasesList'{..}

9696 = go _ualUserKey _ualEvent (Just AltJSON)

9797 directoryService

9898 where go

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

@@ -58,7 +58,7 @@ type UsersAliasesWatchResource =

5858-- | Watch for changes in user aliases list

5959--

6060-- /See:/ 'usersAliasesWatch' smart constructor.

61−data UsersAliasesWatch = UsersAliasesWatch

61+data UsersAliasesWatch = UsersAliasesWatch'

6262 { _uawEvent :: !(Maybe UsersAliasesWatchEvent)

6363 , _uawPayload :: !Channel

6464 , _uawUserKey :: !Text

@@ -78,7 +78,7 @@ usersAliasesWatch

7878 -> Text -- ^ 'uawUserKey'

7979 -> UsersAliasesWatch

8080usersAliasesWatch pUawPayload_ pUawUserKey_ =

81− UsersAliasesWatch

81+ UsersAliasesWatch'

8282 { _uawEvent = Nothing

8383 , _uawPayload = pUawPayload_

8484 , _uawUserKey = pUawUserKey_

@@ -105,7 +105,7 @@ instance GoogleRequest UsersAliasesWatch where

105105 "https://www.googleapis.com/auth/admin.directory.user.alias",

106106 "https://www.googleapis.com/auth/admin.directory.user.alias.readonly",

107107 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

108− requestClient UsersAliasesWatch{..}

108+ requestClient UsersAliasesWatch'{..}

109109 = go _uawUserKey _uawEvent (Just AltJSON) _uawPayload

110110 directoryService

111111 where go

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

@@ -52,7 +52,7 @@ type UsersDeleteResource =

5252-- | Delete user

5353--

5454-- /See:/ 'usersDelete' smart constructor.

55−newtype UsersDelete = UsersDelete

55+newtype UsersDelete = UsersDelete'

5656 { _udUserKey :: Text

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

5858

@@ -65,7 +65,7 @@ usersDelete

6565 :: Text -- ^ 'udUserKey'

6666 -> UsersDelete

6767usersDelete pUdUserKey_ =

68− UsersDelete

68+ UsersDelete'

6969 { _udUserKey = pUdUserKey_

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest UsersDelete where

7878 type Rs UsersDelete = ()

7979 type Scopes UsersDelete =

8080 '["https://www.googleapis.com/auth/admin.directory.user"]

81− requestClient UsersDelete{..}

81+ requestClient UsersDelete'{..}

8282 = go _udUserKey (Just AltJSON) directoryService

8383 where go

8484 = buildClient (Proxy :: Proxy UsersDeleteResource)

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

@@ -58,7 +58,7 @@ type UsersGetResource =

5858-- | retrieve user

5959--

6060-- /See:/ 'usersGet' smart constructor.

61−data UsersGet = UsersGet

61+data UsersGet = UsersGet'

6262 { _ugViewType :: !UsersGetViewType

6363 , _ugCustomFieldMask :: !(Maybe Text)

6464 , _ugProjection :: !UsersGetProjection

@@ -80,7 +80,7 @@ usersGet

8080 :: Text -- ^ 'ugUserKey'

8181 -> UsersGet

8282usersGet pUgUserKey_ =

83− UsersGet

83+ UsersGet'

8484 { _ugViewType = UGVTAdminView

8585 , _ugCustomFieldMask = Nothing

8686 , _ugProjection = UGPBasic

@@ -114,7 +114,7 @@ instance GoogleRequest UsersGet where

114114 type Scopes UsersGet =

115115 '["https://www.googleapis.com/auth/admin.directory.user",

116116 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

117− requestClient UsersGet{..}

117+ requestClient UsersGet'{..}

118118 = go _ugUserKey (Just _ugViewType) _ugCustomFieldMask

119119 (Just _ugProjection)

120120 (Just AltJSON)

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

@@ -52,7 +52,7 @@ type UsersInsertResource =

5252-- | create user.

5353--

5454-- /See:/ 'usersInsert' smart constructor.

55−newtype UsersInsert = UsersInsert

55+newtype UsersInsert = UsersInsert'

5656 { _uiPayload :: User

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

5858

@@ -65,7 +65,7 @@ usersInsert

6565 :: User -- ^ 'uiPayload'

6666 -> UsersInsert

6767usersInsert pUiPayload_ =

68− UsersInsert

68+ UsersInsert'

6969 { _uiPayload = pUiPayload_

7070 }

7171

@@ -78,7 +78,7 @@ instance GoogleRequest UsersInsert where

7878 type Rs UsersInsert = User

7979 type Scopes UsersInsert =

8080 '["https://www.googleapis.com/auth/admin.directory.user"]

81− requestClient UsersInsert{..}

81+ requestClient UsersInsert'{..}

8282 = go (Just AltJSON) _uiPayload directoryService

8383 where go

8484 = buildClient (Proxy :: Proxy UsersInsertResource)

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

@@ -75,7 +75,7 @@ type UsersListResource =

7575-- | Retrieve either deleted users or all users in a domain (paginated)

7676--

7777-- /See:/ 'usersList' smart constructor.

78−data UsersList = UsersList

78+data UsersList = UsersList'

7979 { _ulEvent :: !(Maybe UsersListEvent)

8080 , _ulOrderBy :: !(Maybe UsersListOrderBy)

8181 , _ulViewType :: !UsersListViewType

@@ -120,7 +120,7 @@ data UsersList = UsersList

120120usersList

121121 :: UsersList

122122usersList =

123− UsersList

123+ UsersList'

124124 { _ulEvent = Nothing

125125 , _ulOrderBy = Nothing

126126 , _ulViewType = AdminView

@@ -205,7 +205,7 @@ instance GoogleRequest UsersList where

205205 type Scopes UsersList =

206206 '["https://www.googleapis.com/auth/admin.directory.user",

207207 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

208− requestClient UsersList{..}

208+ requestClient UsersList'{..}

209209 = go _ulEvent _ulOrderBy (Just _ulViewType)

210210 _ulCustomFieldMask

211211 _ulDomain

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

@@ -55,7 +55,7 @@ type UsersMakeAdminResource =

5555-- | change admin status of a user

5656--

5757-- /See:/ 'usersMakeAdmin' smart constructor.

58−data UsersMakeAdmin = UsersMakeAdmin

58+data UsersMakeAdmin = UsersMakeAdmin'

5959 { _umaPayload :: !UserMakeAdmin

6060 , _umaUserKey :: !Text

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

@@ -72,7 +72,7 @@ usersMakeAdmin

7272 -> Text -- ^ 'umaUserKey'

7373 -> UsersMakeAdmin

7474usersMakeAdmin pUmaPayload_ pUmaUserKey_ =

75− UsersMakeAdmin

75+ UsersMakeAdmin'

7676 { _umaPayload = pUmaPayload_

7777 , _umaUserKey = pUmaUserKey_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest UsersMakeAdmin where

9191 type Rs UsersMakeAdmin = ()

9292 type Scopes UsersMakeAdmin =

9393 '["https://www.googleapis.com/auth/admin.directory.user"]

94− requestClient UsersMakeAdmin{..}

94+ requestClient UsersMakeAdmin'{..}

9595 = go _umaUserKey (Just AltJSON) _umaPayload

9696 directoryService

9797 where go

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

@@ -54,7 +54,7 @@ type UsersPatchResource =

5454-- | update user. This method supports patch semantics.

5555--

5656-- /See:/ 'usersPatch' smart constructor.

57−data UsersPatch = UsersPatch

57+data UsersPatch = UsersPatch'

5858 { _upPayload :: !User

5959 , _upUserKey :: !Text

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

@@ -71,7 +71,7 @@ usersPatch

7171 -> Text -- ^ 'upUserKey'

7272 -> UsersPatch

7373usersPatch pUpPayload_ pUpUserKey_ =

74− UsersPatch

74+ UsersPatch'

7575 { _upPayload = pUpPayload_

7676 , _upUserKey = pUpUserKey_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest UsersPatch where

9191 type Rs UsersPatch = User

9292 type Scopes UsersPatch =

9393 '["https://www.googleapis.com/auth/admin.directory.user"]

94− requestClient UsersPatch{..}

94+ requestClient UsersPatch'{..}

9595 = go _upUserKey (Just AltJSON) _upPayload

9696 directoryService

9797 where go

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

@@ -54,7 +54,7 @@ type UsersPhotosDeleteResource =

5454-- | Remove photos for the user

5555--

5656-- /See:/ 'usersPhotosDelete' smart constructor.

57−newtype UsersPhotosDelete = UsersPhotosDelete

57+newtype UsersPhotosDelete = UsersPhotosDelete'

5858 { _updUserKey :: Text

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

6060

@@ -67,7 +67,7 @@ usersPhotosDelete

6767 :: Text -- ^ 'updUserKey'

6868 -> UsersPhotosDelete

6969usersPhotosDelete pUpdUserKey_ =

70− UsersPhotosDelete

70+ UsersPhotosDelete'

7171 { _updUserKey = pUpdUserKey_

7272 }

7373

@@ -80,7 +80,7 @@ instance GoogleRequest UsersPhotosDelete where

8080 type Rs UsersPhotosDelete = ()

8181 type Scopes UsersPhotosDelete =

8282 '["https://www.googleapis.com/auth/admin.directory.user"]

83− requestClient UsersPhotosDelete{..}

83+ requestClient UsersPhotosDelete'{..}

8484 = go _updUserKey (Just AltJSON) directoryService

8585 where go

8686 = buildClient

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

@@ -54,7 +54,7 @@ type UsersPhotosGetResource =

5454-- | Retrieve photo of a user

5555--

5656-- /See:/ 'usersPhotosGet' smart constructor.

57−newtype UsersPhotosGet = UsersPhotosGet

57+newtype UsersPhotosGet = UsersPhotosGet'

5858 { _upgUserKey :: Text

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

6060

@@ -67,7 +67,7 @@ usersPhotosGet

6767 :: Text -- ^ 'upgUserKey'

6868 -> UsersPhotosGet

6969usersPhotosGet pUpgUserKey_ =

70− UsersPhotosGet

70+ UsersPhotosGet'

7171 { _upgUserKey = pUpgUserKey_

7272 }

7373

@@ -81,7 +81,7 @@ instance GoogleRequest UsersPhotosGet where

8181 type Scopes UsersPhotosGet =

8282 '["https://www.googleapis.com/auth/admin.directory.user",

8383 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

84− requestClient UsersPhotosGet{..}

84+ requestClient UsersPhotosGet'{..}

8585 = go _upgUserKey (Just AltJSON) directoryService

8686 where go

8787 = buildClient (Proxy :: Proxy UsersPhotosGetResource)

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

@@ -56,7 +56,7 @@ type UsersPhotosPatchResource =

5656-- | Add a photo for the user. This method supports patch semantics.

5757--

5858-- /See:/ 'usersPhotosPatch' smart constructor.

59−data UsersPhotosPatch = UsersPhotosPatch

59+data UsersPhotosPatch = UsersPhotosPatch'

6060 { _uppPayload :: !UserPhoto

6161 , _uppUserKey :: !Text

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

@@ -73,7 +73,7 @@ usersPhotosPatch

7373 -> Text -- ^ 'uppUserKey'

7474 -> UsersPhotosPatch

7575usersPhotosPatch pUppPayload_ pUppUserKey_ =

76− UsersPhotosPatch

76+ UsersPhotosPatch'

7777 { _uppPayload = pUppPayload_

7878 , _uppUserKey = pUppUserKey_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest UsersPhotosPatch where

9292 type Rs UsersPhotosPatch = UserPhoto

9393 type Scopes UsersPhotosPatch =

9494 '["https://www.googleapis.com/auth/admin.directory.user"]

95− requestClient UsersPhotosPatch{..}

95+ requestClient UsersPhotosPatch'{..}

9696 = go _uppUserKey (Just AltJSON) _uppPayload

9797 directoryService

9898 where go

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

@@ -56,7 +56,7 @@ type UsersPhotosUpdateResource =

5656-- | Add a photo for the user

5757--

5858-- /See:/ 'usersPhotosUpdate' smart constructor.

59−data UsersPhotosUpdate = UsersPhotosUpdate

59+data UsersPhotosUpdate = UsersPhotosUpdate'

6060 { _upuPayload :: !UserPhoto

6161 , _upuUserKey :: !Text

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

@@ -73,7 +73,7 @@ usersPhotosUpdate

7373 -> Text -- ^ 'upuUserKey'

7474 -> UsersPhotosUpdate

7575usersPhotosUpdate pUpuPayload_ pUpuUserKey_ =

76− UsersPhotosUpdate

76+ UsersPhotosUpdate'

7777 { _upuPayload = pUpuPayload_

7878 , _upuUserKey = pUpuUserKey_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest UsersPhotosUpdate where

9292 type Rs UsersPhotosUpdate = UserPhoto

9393 type Scopes UsersPhotosUpdate =

9494 '["https://www.googleapis.com/auth/admin.directory.user"]

95− requestClient UsersPhotosUpdate{..}

95+ requestClient UsersPhotosUpdate'{..}

9696 = go _upuUserKey (Just AltJSON) _upuPayload

9797 directoryService

9898 where go

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

@@ -55,7 +55,7 @@ type UsersUndeleteResource =

5555-- | Undelete a deleted user

5656--

5757-- /See:/ 'usersUndelete' smart constructor.

58−data UsersUndelete = UsersUndelete

58+data UsersUndelete = UsersUndelete'

5959 { _uuPayload :: !UserUndelete

6060 , _uuUserKey :: !Text

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

@@ -72,7 +72,7 @@ usersUndelete

7272 -> Text -- ^ 'uuUserKey'

7373 -> UsersUndelete

7474usersUndelete pUuPayload_ pUuUserKey_ =

75− UsersUndelete

75+ UsersUndelete'

7676 { _uuPayload = pUuPayload_

7777 , _uuUserKey = pUuUserKey_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest UsersUndelete where

9191 type Rs UsersUndelete = ()

9292 type Scopes UsersUndelete =

9393 '["https://www.googleapis.com/auth/admin.directory.user"]

94− requestClient UsersUndelete{..}

94+ requestClient UsersUndelete'{..}

9595 = go _uuUserKey (Just AltJSON) _uuPayload

9696 directoryService

9797 where go

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

@@ -54,7 +54,7 @@ type UsersUpdateResource =

5454-- | update user

5555--

5656-- /See:/ 'usersUpdate' smart constructor.

57−data UsersUpdate = UsersUpdate

57+data UsersUpdate = UsersUpdate'

5858 { _uPayload :: !User

5959 , _uUserKey :: !Text

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

@@ -71,7 +71,7 @@ usersUpdate

7171 -> Text -- ^ 'uUserKey'

7272 -> UsersUpdate

7373usersUpdate pUPayload_ pUUserKey_ =

74− UsersUpdate

74+ UsersUpdate'

7575 { _uPayload = pUPayload_

7676 , _uUserKey = pUUserKey_

7777 }

@@ -89,7 +89,7 @@ instance GoogleRequest UsersUpdate where

8989 type Rs UsersUpdate = User

9090 type Scopes UsersUpdate =

9191 '["https://www.googleapis.com/auth/admin.directory.user"]

92− requestClient UsersUpdate{..}

92+ requestClient UsersUpdate'{..}

9393 = go _uUserKey (Just AltJSON) _uPayload

9494 directoryService

9595 where go

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

@@ -78,7 +78,7 @@ type UsersWatchResource =

7878-- | Watch for changes in users list

7979--

8080-- /See:/ 'usersWatch' smart constructor.

81−data UsersWatch = UsersWatch

81+data UsersWatch = UsersWatch'

8282 { _uwEvent :: !(Maybe UsersWatchEvent)

8383 , _uwOrderBy :: !(Maybe UsersWatchOrderBy)

8484 , _uwViewType :: !UsersWatchViewType

@@ -127,7 +127,7 @@ usersWatch

127127 :: Channel -- ^ 'uwPayload'

128128 -> UsersWatch

129129usersWatch pUwPayload_ =

130− UsersWatch

130+ UsersWatch'

131131 { _uwEvent = Nothing

132132 , _uwOrderBy = Nothing

133133 , _uwViewType = UWVTAdminView

@@ -218,7 +218,7 @@ instance GoogleRequest UsersWatch where

218218 type Scopes UsersWatch =

219219 '["https://www.googleapis.com/auth/admin.directory.user",

220220 "https://www.googleapis.com/auth/admin.directory.user.readonly"]

221− requestClient UsersWatch{..}

221+ requestClient UsersWatch'{..}

222222 = go _uwEvent _uwOrderBy (Just _uwViewType)

223223 _uwCustomFieldMask

224224 _uwDomain

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

@@ -54,7 +54,7 @@ type VerificationCodesGenerateResource =

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

5555--

5656-- /See:/ 'verificationCodesGenerate' smart constructor.

57−newtype VerificationCodesGenerate = VerificationCodesGenerate

57+newtype VerificationCodesGenerate = VerificationCodesGenerate'

5858 { _vcgUserKey :: Text

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

6060

@@ -67,7 +67,7 @@ verificationCodesGenerate

6767 :: Text -- ^ 'vcgUserKey'

6868 -> VerificationCodesGenerate

6969verificationCodesGenerate pVcgUserKey_ =

70− VerificationCodesGenerate

70+ VerificationCodesGenerate'

7171 { _vcgUserKey = pVcgUserKey_

7272 }

7373

@@ -81,7 +81,7 @@ instance GoogleRequest VerificationCodesGenerate

8181 type Rs VerificationCodesGenerate = ()

8282 type Scopes VerificationCodesGenerate =

8383 '["https://www.googleapis.com/auth/admin.directory.user.security"]

84− requestClient VerificationCodesGenerate{..}

84+ requestClient VerificationCodesGenerate'{..}

8585 = go _vcgUserKey (Just AltJSON) directoryService

8686 where go

8787 = buildClient

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

@@ -54,7 +54,7 @@ type VerificationCodesInvalidateResource =

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

5555--

5656-- /See:/ 'verificationCodesInvalidate' smart constructor.

57−newtype VerificationCodesInvalidate = VerificationCodesInvalidate

57+newtype VerificationCodesInvalidate = VerificationCodesInvalidate'

5858 { _vciUserKey :: Text

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

6060

@@ -67,7 +67,7 @@ verificationCodesInvalidate

6767 :: Text -- ^ 'vciUserKey'

6868 -> VerificationCodesInvalidate

6969verificationCodesInvalidate pVciUserKey_ =

70− VerificationCodesInvalidate

70+ VerificationCodesInvalidate'

7171 { _vciUserKey = pVciUserKey_

7272 }

7373

@@ -81,7 +81,7 @@ instance GoogleRequest VerificationCodesInvalidate

8181 type Rs VerificationCodesInvalidate = ()

8282 type Scopes VerificationCodesInvalidate =

8383 '["https://www.googleapis.com/auth/admin.directory.user.security"]

84− requestClient VerificationCodesInvalidate{..}

84+ requestClient VerificationCodesInvalidate'{..}

8585 = go _vciUserKey (Just AltJSON) directoryService

8686 where go

8787 = buildClient

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

@@ -56,7 +56,7 @@ type VerificationCodesListResource =

5656-- specified user.

5757--

5858-- /See:/ 'verificationCodesList' smart constructor.

59−newtype VerificationCodesList = VerificationCodesList

59+newtype VerificationCodesList = VerificationCodesList'

6060 { _vclUserKey :: Text

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

6262

@@ -69,7 +69,7 @@ verificationCodesList

6969 :: Text -- ^ 'vclUserKey'

7070 -> VerificationCodesList

7171verificationCodesList pVclUserKey_ =

72− VerificationCodesList

72+ VerificationCodesList'

7373 { _vclUserKey = pVclUserKey_

7474 }

7575

@@ -83,7 +83,7 @@ instance GoogleRequest VerificationCodesList where

8383 type Rs VerificationCodesList = VerificationCodes

8484 type Scopes VerificationCodesList =

8585 '["https://www.googleapis.com/auth/admin.directory.user.security"]

86− requestClient VerificationCodesList{..}

86+ requestClient VerificationCodesList'{..}

8787 = go _vclUserKey (Just AltJSON) directoryService

8888 where go

8989 = buildClient

gogol-admin-emailmigration/gen/Network/Google/EmailMigration/Types/Product.hs+4−4

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323-- | JSON template for MailItem object in Email Migration API.

2424--

2525-- /See:/ 'mailItem' smart constructor.

26−data MailItem = MailItem

26+data MailItem = MailItem'

2727 { _miIsDeleted :: !(Maybe Bool)

2828 , _miIsDraft :: !(Maybe Bool)

2929 , _miIsStarred :: !(Maybe Bool)

@@ -59,7 +59,7 @@ data MailItem = MailItem

5959mailItem

6060 :: MailItem

6161mailItem =

62− MailItem

62+ MailItem'

6363 { _miIsDeleted = Nothing

6464 , _miIsDraft = Nothing

6565 , _miIsStarred = Nothing

@@ -120,7 +120,7 @@ instance FromJSON MailItem where

120120 parseJSON

121121 = withObject "MailItem"

122122 (\ o ->

123− MailItem <$>

123+ MailItem' <$>

124124 (o .:? "isDeleted") <*> (o .:? "isDraft") <*>

125125 (o .:? "isStarred")

126126 <*> (o .:? "kind" .!= "mailItem")

@@ -131,7 +131,7 @@ instance FromJSON MailItem where

131131 <*> (o .:? "isSent"))

132132

133133instance ToJSON MailItem where

134− toJSON MailItem{..}

134+ toJSON MailItem'{..}

135135 = object

136136 (catMaybes

137137 [("isDeleted" .=) <$> _miIsDeleted,

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

@@ -65,7 +65,7 @@ type MailInsertResource =

6565-- | Insert Mail into Google\'s Gmail backends

6666--

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

68−data MailInsert = MailInsert

68+data MailInsert = MailInsert'

6969 { _miPayload :: !MailItem

7070 , _miUserKey :: !Text

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

@@ -82,7 +82,7 @@ mailInsert

8282 -> Text -- ^ 'miUserKey'

8383 -> MailInsert

8484mailInsert pMiPayload_ pMiUserKey_ =

85− MailInsert

85+ MailInsert'

8686 { _miPayload = pMiPayload_

8787 , _miUserKey = pMiUserKey_

8888 }

@@ -101,7 +101,7 @@ instance GoogleRequest MailInsert where

101101 type Rs MailInsert = ()

102102 type Scopes MailInsert =

103103 '["https://www.googleapis.com/auth/email.migration"]

104− requestClient MailInsert{..}

104+ requestClient MailInsert'{..}

105105 = go _miUserKey (Just AltJSON) _miPayload

106106 emailMigrationService

107107 where go :<|> _

@@ -112,7 +112,7 @@ instance GoogleRequest (MediaUpload MailInsert) where

112112 type Rs (MediaUpload MailInsert) = ()

113113 type Scopes (MediaUpload MailInsert) =

114114 Scopes MailInsert

115− requestClient (MediaUpload MailInsert{..} body)

115+ requestClient (MediaUpload MailInsert'{..} body)

116116 = go _miUserKey (Just AltJSON) (Just AltMedia)

117117 _miPayload

118118 body

gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+58−58

@@ -22,7 +22,7 @@ import Network.Google.Reports.Types.Sum

2222

2323--

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

25−data UsageReportParametersItem = UsageReportParametersItem

25+data UsageReportParametersItem = UsageReportParametersItem'

2626 { _urpiDatetimeValue :: !(Maybe DateTime')

2727 , _urpiBoolValue :: !(Maybe Bool)

2828 , _urpiIntValue :: !(Maybe (Textual Int64))

@@ -49,7 +49,7 @@ data UsageReportParametersItem = UsageReportParametersItem

4949usageReportParametersItem

5050 :: UsageReportParametersItem

5151usageReportParametersItem =

52− UsageReportParametersItem

52+ UsageReportParametersItem'

5353 { _urpiDatetimeValue = Nothing

5454 , _urpiBoolValue = Nothing

5555 , _urpiIntValue = Nothing

@@ -98,7 +98,7 @@ instance FromJSON UsageReportParametersItem where

9898 parseJSON

9999 = withObject "UsageReportParametersItem"

100100 (\ o ->

101− UsageReportParametersItem <$>

101+ UsageReportParametersItem' <$>

102102 (o .:? "datetimeValue") <*> (o .:? "boolValue") <*>

103103 (o .:? "intValue")

104104 <*> (o .:? "stringValue")

@@ -106,7 +106,7 @@ instance FromJSON UsageReportParametersItem where

106106 <*> (o .:? "msgValue" .!= mempty))

107107

108108instance ToJSON UsageReportParametersItem where

109− toJSON UsageReportParametersItem{..}

109+ toJSON UsageReportParametersItem'{..}

110110 = object

111111 (catMaybes

112112 [("datetimeValue" .=) <$> _urpiDatetimeValue,

@@ -119,7 +119,7 @@ instance ToJSON UsageReportParametersItem where

119119-- | Unique identifier for each activity record.

120120--

121121-- /See:/ 'activityId' smart constructor.

122−data ActivityId = ActivityId

122+data ActivityId = ActivityId'

123123 { _aiTime :: !(Maybe DateTime')

124124 , _aiUniqueQualifier :: !(Maybe (Textual Int64))

125125 , _aiCustomerId :: !(Maybe Text)

@@ -140,7 +140,7 @@ data ActivityId = ActivityId

140140activityId

141141 :: ActivityId

142142activityId =

143− ActivityId

143+ ActivityId'

144144 { _aiTime = Nothing

145145 , _aiUniqueQualifier = Nothing

146146 , _aiCustomerId = Nothing

@@ -175,13 +175,13 @@ instance FromJSON ActivityId where

175175 parseJSON

176176 = withObject "ActivityId"

177177 (\ o ->

178− ActivityId <$>

178+ ActivityId' <$>

179179 (o .:? "time") <*> (o .:? "uniqueQualifier") <*>

180180 (o .:? "customerId")

181181 <*> (o .:? "applicationName"))

182182

183183instance ToJSON ActivityId where

184− toJSON ActivityId{..}

184+ toJSON ActivityId'{..}

185185 = object

186186 (catMaybes

187187 [("time" .=) <$> _aiTime,

@@ -192,7 +192,7 @@ instance ToJSON ActivityId where

192192-- | JSON template for a collection of usage reports.

193193--

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

195−data UsageReports = UsageReports

195+data UsageReports = UsageReports'

196196 { _urEtag :: !(Maybe Text)

197197 , _urNextPageToken :: !(Maybe Text)

198198 , _urUsageReports :: !(Maybe [UsageReport])

@@ -216,7 +216,7 @@ data UsageReports = UsageReports

216216usageReports

217217 :: UsageReports

218218usageReports =

219− UsageReports

219+ UsageReports'

220220 { _urEtag = Nothing

221221 , _urNextPageToken = Nothing

222222 , _urUsageReports = Nothing

@@ -257,14 +257,14 @@ instance FromJSON UsageReports where

257257 parseJSON

258258 = withObject "UsageReports"

259259 (\ o ->

260− UsageReports <$>

260+ UsageReports' <$>

261261 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

262262 (o .:? "usageReports" .!= mempty)

263263 <*> (o .:? "kind" .!= "admin#reports#usageReports")

264264 <*> (o .:? "warnings" .!= mempty))

265265

266266instance ToJSON UsageReports where

267− toJSON UsageReports{..}

267+ toJSON UsageReports'{..}

268268 = object

269269 (catMaybes

270270 [("etag" .=) <$> _urEtag,

@@ -275,7 +275,7 @@ instance ToJSON UsageReports where

275275

276276--

277277-- /See:/ 'usageReportParametersItemMsgValueItem' smart constructor.

278−newtype UsageReportParametersItemMsgValueItem = UsageReportParametersItemMsgValueItem

278+newtype UsageReportParametersItemMsgValueItem = UsageReportParametersItemMsgValueItem'

279279 { _urpimviAddtional :: HashMap Text JSONValue

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

281281

@@ -288,7 +288,7 @@ usageReportParametersItemMsgValueItem

288288 :: HashMap Text JSONValue -- ^ 'urpimviAddtional'

289289 -> UsageReportParametersItemMsgValueItem

290290usageReportParametersItemMsgValueItem pUrpimviAddtional_ =

291− UsageReportParametersItemMsgValueItem

291+ UsageReportParametersItemMsgValueItem'

292292 { _urpimviAddtional = _Coerce # pUrpimviAddtional_

293293 }

294294

@@ -303,7 +303,7 @@ instance FromJSON

303303 parseJSON

304304 = withObject "UsageReportParametersItemMsgValueItem"

305305 (\ o ->

306− UsageReportParametersItemMsgValueItem <$>

306+ UsageReportParametersItemMsgValueItem' <$>

307307 (parseJSONObject o))

308308

309309instance ToJSON UsageReportParametersItemMsgValueItem

@@ -313,7 +313,7 @@ instance ToJSON UsageReportParametersItemMsgValueItem

313313-- | JSON template for a collection of activites.

314314--

315315-- /See:/ 'activities' smart constructor.

316−data Activities = Activities

316+data Activities = Activities'

317317 { _aEtag :: !(Maybe Text)

318318 , _aNextPageToken :: !(Maybe Text)

319319 , _aKind :: !Text

@@ -334,7 +334,7 @@ data Activities = Activities

334334activities

335335 :: Activities

336336activities =

337− Activities

337+ Activities'

338338 { _aEtag = Nothing

339339 , _aNextPageToken = Nothing

340340 , _aKind = "admin#reports#activities"

@@ -365,13 +365,13 @@ instance FromJSON Activities where

365365 parseJSON

366366 = withObject "Activities"

367367 (\ o ->

368− Activities <$>

368+ Activities' <$>

369369 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

370370 (o .:? "kind" .!= "admin#reports#activities")

371371 <*> (o .:? "items" .!= mempty))

372372

373373instance ToJSON Activities where

374− toJSON Activities{..}

374+ toJSON Activities'{..}

375375 = object

376376 (catMaybes

377377 [("etag" .=) <$> _aEtag,

@@ -381,7 +381,7 @@ instance ToJSON Activities where

381381-- | An notification channel used to watch for resource changes.

382382--

383383-- /See:/ 'channel' smart constructor.

384−data Channel = Channel

384+data Channel = Channel'

385385 { _cResourceURI :: !(Maybe Text)

386386 , _cResourceId :: !(Maybe Text)

387387 , _cKind :: !Text

@@ -420,7 +420,7 @@ data Channel = Channel

420420channel

421421 :: Channel

422422channel =

423− Channel

423+ Channel'

424424 { _cResourceURI = Nothing

425425 , _cResourceId = Nothing

426426 , _cKind = "api#channel"

@@ -485,7 +485,7 @@ instance FromJSON Channel where

485485 parseJSON

486486 = withObject "Channel"

487487 (\ o ->

488− Channel <$>

488+ Channel' <$>

489489 (o .:? "resourceUri") <*> (o .:? "resourceId") <*>

490490 (o .:? "kind" .!= "api#channel")

491491 <*> (o .:? "expiration")

@@ -497,7 +497,7 @@ instance FromJSON Channel where

497497 <*> (o .:? "type"))

498498

499499instance ToJSON Channel where

500− toJSON Channel{..}

500+ toJSON Channel'{..}

501501 = object

502502 (catMaybes

503503 [("resourceUri" .=) <$> _cResourceURI,

@@ -513,7 +513,7 @@ instance ToJSON Channel where

513513-- | JSON template for a usage report.

514514--

515515-- /See:/ 'usageReport' smart constructor.

516−data UsageReport = UsageReport

516+data UsageReport = UsageReport'

517517 { _uEtag :: !(Maybe Text)

518518 , _uKind :: !Text

519519 , _uDate :: !(Maybe Text)

@@ -537,7 +537,7 @@ data UsageReport = UsageReport

537537usageReport

538538 :: UsageReport

539539usageReport =

540− UsageReport

540+ UsageReport'

541541 { _uEtag = Nothing

542542 , _uKind = "admin#reports#usageReport"

543543 , _uDate = Nothing

@@ -572,7 +572,7 @@ instance FromJSON UsageReport where

572572 parseJSON

573573 = withObject "UsageReport"

574574 (\ o ->

575− UsageReport <$>

575+ UsageReport' <$>

576576 (o .:? "etag") <*>

577577 (o .:? "kind" .!= "admin#reports#usageReport")

578578 <*> (o .:? "date")

@@ -580,7 +580,7 @@ instance FromJSON UsageReport where

580580 <*> (o .:? "entity"))

581581

582582instance ToJSON UsageReport where

583− toJSON UsageReport{..}

583+ toJSON UsageReport'{..}

584584 = object

585585 (catMaybes

586586 [("etag" .=) <$> _uEtag, Just ("kind" .= _uKind),

@@ -590,7 +590,7 @@ instance ToJSON UsageReport where

590590

591591--

592592-- /See:/ 'usageReportsWarningsItemDataItem' smart constructor.

593−data UsageReportsWarningsItemDataItem = UsageReportsWarningsItemDataItem

593+data UsageReportsWarningsItemDataItem = UsageReportsWarningsItemDataItem'

594594 { _urwidiValue :: !(Maybe Text)

595595 , _urwidiKey :: !(Maybe Text)

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

@@ -605,7 +605,7 @@ data UsageReportsWarningsItemDataItem = UsageReportsWarningsItemDataItem

605605usageReportsWarningsItemDataItem

606606 :: UsageReportsWarningsItemDataItem

607607usageReportsWarningsItemDataItem =

608− UsageReportsWarningsItemDataItem

608+ UsageReportsWarningsItemDataItem'

609609 { _urwidiValue = Nothing

610610 , _urwidiKey = Nothing

611611 }

@@ -627,12 +627,12 @@ instance FromJSON UsageReportsWarningsItemDataItem

627627 parseJSON

628628 = withObject "UsageReportsWarningsItemDataItem"

629629 (\ o ->

630− UsageReportsWarningsItemDataItem <$>

630+ UsageReportsWarningsItemDataItem' <$>

631631 (o .:? "value") <*> (o .:? "key"))

632632

633633instance ToJSON UsageReportsWarningsItemDataItem

634634 where

635− toJSON UsageReportsWarningsItemDataItem{..}

635+ toJSON UsageReportsWarningsItemDataItem'{..}

636636 = object

637637 (catMaybes

638638 [("value" .=) <$> _urwidiValue,

@@ -640,7 +640,7 @@ instance ToJSON UsageReportsWarningsItemDataItem

640640

641641--

642642-- /See:/ 'usageReportsWarningsItem' smart constructor.

643−data UsageReportsWarningsItem = UsageReportsWarningsItem

643+data UsageReportsWarningsItem = UsageReportsWarningsItem'

644644 { _urwiData :: !(Maybe [UsageReportsWarningsItemDataItem])

645645 , _urwiCode :: !(Maybe Text)

646646 , _urwiMessage :: !(Maybe Text)

@@ -658,7 +658,7 @@ data UsageReportsWarningsItem = UsageReportsWarningsItem

658658usageReportsWarningsItem

659659 :: UsageReportsWarningsItem

660660usageReportsWarningsItem =

661− UsageReportsWarningsItem

661+ UsageReportsWarningsItem'

662662 { _urwiData = Nothing

663663 , _urwiCode = Nothing

664664 , _urwiMessage = Nothing

@@ -684,12 +684,12 @@ instance FromJSON UsageReportsWarningsItem where

684684 parseJSON

685685 = withObject "UsageReportsWarningsItem"

686686 (\ o ->

687− UsageReportsWarningsItem <$>

687+ UsageReportsWarningsItem' <$>

688688 (o .:? "data" .!= mempty) <*> (o .:? "code") <*>

689689 (o .:? "message"))

690690

691691instance ToJSON UsageReportsWarningsItem where

692− toJSON UsageReportsWarningsItem{..}

692+ toJSON UsageReportsWarningsItem'{..}

693693 = object

694694 (catMaybes

695695 [("data" .=) <$> _urwiData,

@@ -698,7 +698,7 @@ instance ToJSON UsageReportsWarningsItem where

698698

699699--

700700-- /See:/ 'activityEventsItem' smart constructor.

701−data ActivityEventsItem = ActivityEventsItem

701+data ActivityEventsItem = ActivityEventsItem'

702702 { _aeiName :: !(Maybe Text)

703703 , _aeiParameters :: !(Maybe [ActivityEventsItemParametersItem])

704704 , _aeiType :: !(Maybe Text)

@@ -716,7 +716,7 @@ data ActivityEventsItem = ActivityEventsItem

716716activityEventsItem

717717 :: ActivityEventsItem

718718activityEventsItem =

719− ActivityEventsItem

719+ ActivityEventsItem'

720720 { _aeiName = Nothing

721721 , _aeiParameters = Nothing

722722 , _aeiType = Nothing

@@ -742,12 +742,12 @@ instance FromJSON ActivityEventsItem where

742742 parseJSON

743743 = withObject "ActivityEventsItem"

744744 (\ o ->

745− ActivityEventsItem <$>

745+ ActivityEventsItem' <$>

746746 (o .:? "name") <*> (o .:? "parameters" .!= mempty)

747747 <*> (o .:? "type"))

748748

749749instance ToJSON ActivityEventsItem where

750− toJSON ActivityEventsItem{..}

750+ toJSON ActivityEventsItem'{..}

751751 = object

752752 (catMaybes

753753 [("name" .=) <$> _aeiName,

@@ -757,7 +757,7 @@ instance ToJSON ActivityEventsItem where

757757-- | Additional parameters controlling delivery channel behavior. Optional.

758758--

759759-- /See:/ 'channelParams' smart constructor.

760−newtype ChannelParams = ChannelParams

760+newtype ChannelParams = ChannelParams'

761761 { _cpAddtional :: HashMap Text Text

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

763763

@@ -770,7 +770,7 @@ channelParams

770770 :: HashMap Text Text -- ^ 'cpAddtional'

771771 -> ChannelParams

772772channelParams pCpAddtional_ =

773− ChannelParams

773+ ChannelParams'

774774 { _cpAddtional = _Coerce # pCpAddtional_

775775 }

776776

@@ -783,7 +783,7 @@ cpAddtional

783783instance FromJSON ChannelParams where

784784 parseJSON

785785 = withObject "ChannelParams"

786− (\ o -> ChannelParams <$> (parseJSONObject o))

786+ (\ o -> ChannelParams' <$> (parseJSONObject o))

787787

788788instance ToJSON ChannelParams where

789789 toJSON = toJSON . _cpAddtional

@@ -791,7 +791,7 @@ instance ToJSON ChannelParams where

791791-- | JSON template for the activity resource.

792792--

793793-- /See:/ 'activity' smart constructor.

794−data Activity = Activity

794+data Activity = Activity'

795795 { _actEtag :: !(Maybe Text)

796796 , _actIPAddress :: !(Maybe Text)

797797 , _actKind :: !Text

@@ -821,7 +821,7 @@ data Activity = Activity

821821activity

822822 :: Activity

823823activity =

824− Activity

824+ Activity'

825825 { _actEtag = Nothing

826826 , _actIPAddress = Nothing

827827 , _actKind = "admin#reports#activity"

@@ -869,7 +869,7 @@ instance FromJSON Activity where

869869 parseJSON

870870 = withObject "Activity"

871871 (\ o ->

872− Activity <$>

872+ Activity' <$>

873873 (o .:? "etag") <*> (o .:? "ipAddress") <*>

874874 (o .:? "kind" .!= "admin#reports#activity")

875875 <*> (o .:? "actor")

@@ -878,7 +878,7 @@ instance FromJSON Activity where

878878 <*> (o .:? "id"))

879879

880880instance ToJSON Activity where

881− toJSON Activity{..}

881+ toJSON Activity'{..}

882882 = object

883883 (catMaybes

884884 [("etag" .=) <$> _actEtag,

@@ -891,7 +891,7 @@ instance ToJSON Activity where

891891-- | Information about the type of the item.

892892--

893893-- /See:/ 'usageReportEntity' smart constructor.

894−data UsageReportEntity = UsageReportEntity

894+data UsageReportEntity = UsageReportEntity'

895895 { _ureProFileId :: !(Maybe Text)

896896 , _ureCustomerId :: !(Maybe Text)

897897 , _ureUserEmail :: !(Maybe Text)

@@ -912,7 +912,7 @@ data UsageReportEntity = UsageReportEntity

912912usageReportEntity

913913 :: UsageReportEntity

914914usageReportEntity =

915− UsageReportEntity

915+ UsageReportEntity'

916916 { _ureProFileId = Nothing

917917 , _ureCustomerId = Nothing

918918 , _ureUserEmail = Nothing

@@ -943,13 +943,13 @@ instance FromJSON UsageReportEntity where

943943 parseJSON

944944 = withObject "UsageReportEntity"

945945 (\ o ->

946− UsageReportEntity <$>

946+ UsageReportEntity' <$>

947947 (o .:? "profileId") <*> (o .:? "customerId") <*>

948948 (o .:? "userEmail")

949949 <*> (o .:? "type"))

950950

951951instance ToJSON UsageReportEntity where

952− toJSON UsageReportEntity{..}

952+ toJSON UsageReportEntity'{..}

953953 = object

954954 (catMaybes

955955 [("profileId" .=) <$> _ureProFileId,

@@ -959,7 +959,7 @@ instance ToJSON UsageReportEntity where

959959

960960--

961961-- /See:/ 'activityEventsItemParametersItem' smart constructor.

962−data ActivityEventsItemParametersItem = ActivityEventsItemParametersItem

962+data ActivityEventsItemParametersItem = ActivityEventsItemParametersItem'

963963 { _aeipiBoolValue :: !(Maybe Bool)

964964 , _aeipiIntValue :: !(Maybe (Textual Int64))

965965 , _aeipiValue :: !(Maybe Text)

@@ -986,7 +986,7 @@ data ActivityEventsItemParametersItem = ActivityEventsItemParametersItem

986986activityEventsItemParametersItem

987987 :: ActivityEventsItemParametersItem

988988activityEventsItemParametersItem =

989− ActivityEventsItemParametersItem

989+ ActivityEventsItemParametersItem'

990990 { _aeipiBoolValue = Nothing

991991 , _aeipiIntValue = Nothing

992992 , _aeipiValue = Nothing

@@ -1039,7 +1039,7 @@ instance FromJSON ActivityEventsItemParametersItem

10391039 parseJSON

10401040 = withObject "ActivityEventsItemParametersItem"

10411041 (\ o ->

1042− ActivityEventsItemParametersItem <$>

1042+ ActivityEventsItemParametersItem' <$>

10431043 (o .:? "boolValue") <*> (o .:? "intValue") <*>

10441044 (o .:? "value")

10451045 <*> (o .:? "multiIntValue" .!= mempty)

@@ -1048,7 +1048,7 @@ instance FromJSON ActivityEventsItemParametersItem

10481048

10491049instance ToJSON ActivityEventsItemParametersItem

10501050 where

1051− toJSON ActivityEventsItemParametersItem{..}

1051+ toJSON ActivityEventsItemParametersItem'{..}

10521052 = object

10531053 (catMaybes

10541054 [("boolValue" .=) <$> _aeipiBoolValue,

@@ -1061,7 +1061,7 @@ instance ToJSON ActivityEventsItemParametersItem

10611061-- | User doing the action.

10621062--

10631063-- /See:/ 'activityActor' smart constructor.

1064−data ActivityActor = ActivityActor

1064+data ActivityActor = ActivityActor'

10651065 { _aaEmail :: !(Maybe Text)

10661066 , _aaCallerType :: !(Maybe Text)

10671067 , _aaProFileId :: !(Maybe Text)

@@ -1082,7 +1082,7 @@ data ActivityActor = ActivityActor

10821082activityActor

10831083 :: ActivityActor

10841084activityActor =

1085− ActivityActor

1085+ ActivityActor'

10861086 { _aaEmail = Nothing

10871087 , _aaCallerType = Nothing

10881088 , _aaProFileId = Nothing

@@ -1111,13 +1111,13 @@ instance FromJSON ActivityActor where

11111111 parseJSON

11121112 = withObject "ActivityActor"

11131113 (\ o ->

1114− ActivityActor <$>

1114+ ActivityActor' <$>

11151115 (o .:? "email") <*> (o .:? "callerType") <*>

11161116 (o .:? "profileId")

11171117 <*> (o .:? "key"))

11181118

11191119instance ToJSON ActivityActor where

1120− toJSON ActivityActor{..}

1120+ toJSON ActivityActor'{..}

11211121 = object

11221122 (catMaybes

11231123 [("email" .=) <$> _aaEmail,

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

@@ -55,7 +55,7 @@ type ChannelsStopResource =

5555-- | Stop watching resources through this channel

5656--

5757-- /See:/ 'channelsStop' smart constructor.

58−newtype ChannelsStop = ChannelsStop

58+newtype ChannelsStop = ChannelsStop'

5959 { _csPayload :: Channel

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

6161

@@ -68,7 +68,7 @@ channelsStop

6868 :: Channel -- ^ 'csPayload'

6969 -> ChannelsStop

7070channelsStop pCsPayload_ =

71− ChannelsStop

71+ ChannelsStop'

7272 { _csPayload = pCsPayload_

7373 }

7474

@@ -81,7 +81,7 @@ instance GoogleRequest ChannelsStop where

8181 type Rs ChannelsStop = ()

8282 type Scopes ChannelsStop =

8383 '["https://www.googleapis.com/auth/admin.reports.audit.readonly"]

84− requestClient ChannelsStop{..}

84+ requestClient ChannelsStop'{..}

8585 = go (Just AltJSON) _csPayload reportsService

8686 where go

8787 = buildClient (Proxy :: Proxy ChannelsStopResource)

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

@@ -73,7 +73,7 @@ type ActivitiesListResource =

7373-- | Retrieves a list of activities for a specific customer and application.

7474--

7575-- /See:/ 'activitiesList' smart constructor.

76−data ActivitiesList = ActivitiesList

76+data ActivitiesList = ActivitiesList'

7777 { _alStartTime :: !(Maybe Text)

7878 , _alFilters :: !(Maybe Text)

7979 , _alCustomerId :: !(Maybe Text)

@@ -114,7 +114,7 @@ activitiesList

114114 -> Text -- ^ 'alUserKey'

115115 -> ActivitiesList

116116activitiesList pAlApplicationName_ pAlUserKey_ =

117− ActivitiesList

117+ ActivitiesList'

118118 { _alStartTime = Nothing

119119 , _alFilters = Nothing

120120 , _alCustomerId = Nothing

@@ -188,7 +188,7 @@ instance GoogleRequest ActivitiesList where

188188 type Rs ActivitiesList = Activities

189189 type Scopes ActivitiesList =

190190 '["https://www.googleapis.com/auth/admin.reports.audit.readonly"]

191− requestClient ActivitiesList{..}

191+ requestClient ActivitiesList'{..}

192192 = go _alUserKey _alApplicationName _alStartTime

193193 _alFilters

194194 _alCustomerId

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

@@ -76,7 +76,7 @@ type ActivitiesWatchResource =

7676-- | Push changes to activities

7777--

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

79−data ActivitiesWatch = ActivitiesWatch

79+data ActivitiesWatch = ActivitiesWatch'

8080 { _awStartTime :: !(Maybe Text)

8181 , _awFilters :: !(Maybe Text)

8282 , _awPayload :: !Channel

@@ -121,7 +121,7 @@ activitiesWatch

121121 -> Text -- ^ 'awUserKey'

122122 -> ActivitiesWatch

123123activitiesWatch pAwPayload_ pAwApplicationName_ pAwUserKey_ =

124− ActivitiesWatch

124+ ActivitiesWatch'

125125 { _awStartTime = Nothing

126126 , _awFilters = Nothing

127127 , _awPayload = pAwPayload_

@@ -201,7 +201,7 @@ instance GoogleRequest ActivitiesWatch where

201201 type Rs ActivitiesWatch = Channel

202202 type Scopes ActivitiesWatch =

203203 '["https://www.googleapis.com/auth/admin.reports.audit.readonly"]

204− requestClient ActivitiesWatch{..}

204+ requestClient ActivitiesWatch'{..}

205205 = go _awUserKey _awApplicationName _awStartTime

206206 _awFilters

207207 _awCustomerId

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

@@ -61,7 +61,7 @@ type CustomerUsageReportsGetResource =

6161-- a specific customer.

6262--

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

64−data CustomerUsageReportsGet = CustomerUsageReportsGet

64+data CustomerUsageReportsGet = CustomerUsageReportsGet'

6565 { _curgCustomerId :: !(Maybe Text)

6666 , _curgDate :: !Text

6767 , _curgParameters :: !(Maybe Text)

@@ -83,7 +83,7 @@ customerUsageReportsGet

8383 :: Text -- ^ 'curgDate'

8484 -> CustomerUsageReportsGet

8585customerUsageReportsGet pCurgDate_ =

86− CustomerUsageReportsGet

86+ CustomerUsageReportsGet'

8787 { _curgCustomerId = Nothing

8888 , _curgDate = pCurgDate_

8989 , _curgParameters = Nothing

@@ -118,7 +118,7 @@ instance GoogleRequest CustomerUsageReportsGet where

118118 type Rs CustomerUsageReportsGet = UsageReports

119119 type Scopes CustomerUsageReportsGet =

120120 '["https://www.googleapis.com/auth/admin.reports.usage.readonly"]

121− requestClient CustomerUsageReportsGet{..}

121+ requestClient CustomerUsageReportsGet'{..}

122122 = go _curgDate _curgCustomerId _curgParameters

123123 _curgPageToken

124124 (Just AltJSON)

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

@@ -69,7 +69,7 @@ type UserUsageReportGetResource =

6969-- a set of users.

7070--

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

72−data UserUsageReportGet = UserUsageReportGet

72+data UserUsageReportGet = UserUsageReportGet'

7373 { _uurgFilters :: !(Maybe Text)

7474 , _uurgCustomerId :: !(Maybe Text)

7575 , _uurgDate :: !Text

@@ -101,7 +101,7 @@ userUsageReportGet

101101 -> Text -- ^ 'uurgUserKey'

102102 -> UserUsageReportGet

103103userUsageReportGet pUurgDate_ pUurgUserKey_ =

104− UserUsageReportGet

104+ UserUsageReportGet'

105105 { _uurgFilters = Nothing

106106 , _uurgCustomerId = Nothing

107107 , _uurgDate = pUurgDate_

@@ -157,7 +157,7 @@ instance GoogleRequest UserUsageReportGet where

157157 type Rs UserUsageReportGet = UsageReports

158158 type Scopes UserUsageReportGet =

159159 '["https://www.googleapis.com/auth/admin.reports.usage.readonly"]

160− requestClient UserUsageReportGet{..}

160+ requestClient UserUsageReportGet'{..}

161161 = go _uurgUserKey _uurgDate _uurgFilters

162162 _uurgCustomerId

163163 _uurgParameters

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

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

2222

2323--

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

25−data AdClients = AdClients

25+data AdClients = AdClients'

2626 { _acEtag :: !(Maybe Text)

2727 , _acNextPageToken :: !(Maybe Text)

2828 , _acKind :: !Text

@@ -43,7 +43,7 @@ data AdClients = AdClients

4343adClients

4444 :: AdClients

4545adClients =

46− AdClients

46+ AdClients'

4747 { _acEtag = Nothing

4848 , _acNextPageToken = Nothing

4949 , _acKind = "adsensehost#adClients"

@@ -75,13 +75,13 @@ instance FromJSON AdClients where

7575 parseJSON

7676 = withObject "AdClients"

7777 (\ o ->

78− AdClients <$>

78+ AdClients' <$>

7979 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

8080 (o .:? "kind" .!= "adsensehost#adClients")

8181 <*> (o .:? "items" .!= mempty))

8282

8383instance ToJSON AdClients where

84− toJSON AdClients{..}

84+ toJSON AdClients'{..}

8585 = object

8686 (catMaybes

8787 [("etag" .=) <$> _acEtag,

@@ -90,7 +90,7 @@ instance ToJSON AdClients where

9090

9191--

9292-- /See:/ 'associationSession' smart constructor.

93−data AssociationSession = AssociationSession

93+data AssociationSession = AssociationSession'

9494 { _asStatus :: !(Maybe Text)

9595 , _asKind :: !Text

9696 , _asWebsiteLocale :: !(Maybe Text)

@@ -126,7 +126,7 @@ data AssociationSession = AssociationSession

126126associationSession

127127 :: AssociationSession

128128associationSession =

129− AssociationSession

129+ AssociationSession'

130130 { _asStatus = Nothing

131131 , _asKind = "adsensehost#associationSession"

132132 , _asWebsiteLocale = Nothing

@@ -194,7 +194,7 @@ instance FromJSON AssociationSession where

194194 parseJSON

195195 = withObject "AssociationSession"

196196 (\ o ->

197− AssociationSession <$>

197+ AssociationSession' <$>

198198 (o .:? "status") <*>

199199 (o .:? "kind" .!= "adsensehost#associationSession")

200200 <*> (o .:? "websiteLocale")

@@ -206,7 +206,7 @@ instance FromJSON AssociationSession where

206206 <*> (o .:? "redirectUrl"))

207207

208208instance ToJSON AssociationSession where

209− toJSON AssociationSession{..}

209+ toJSON AssociationSession'{..}

210210 = object

211211 (catMaybes

212212 [("status" .=) <$> _asStatus,

@@ -221,7 +221,7 @@ instance ToJSON AssociationSession where

221221

222222--

223223-- /See:/ 'accounts' smart constructor.

224−data Accounts = Accounts

224+data Accounts = Accounts'

225225 { _aEtag :: !(Maybe Text)

226226 , _aKind :: !Text

227227 , _aItems :: !(Maybe [Account])

@@ -239,7 +239,7 @@ data Accounts = Accounts

239239accounts

240240 :: Accounts

241241accounts =

242− Accounts

242+ Accounts'

243243 { _aEtag = Nothing

244244 , _aKind = "adsensehost#accounts"

245245 , _aItems = Nothing

@@ -263,13 +263,13 @@ instance FromJSON Accounts where

263263 parseJSON

264264 = withObject "Accounts"

265265 (\ o ->

266− Accounts <$>

266+ Accounts' <$>

267267 (o .:? "etag") <*>

268268 (o .:? "kind" .!= "adsensehost#accounts")

269269 <*> (o .:? "items" .!= mempty))

270270

271271instance ToJSON Accounts where

272− toJSON Accounts{..}

272+ toJSON Accounts'{..}

273273 = object

274274 (catMaybes

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

@@ -277,7 +277,7 @@ instance ToJSON Accounts where

277277

278278--

279279-- /See:/ 'adUnits' smart constructor.

280−data AdUnits = AdUnits

280+data AdUnits = AdUnits'

281281 { _auEtag :: !(Maybe Text)

282282 , _auNextPageToken :: !(Maybe Text)

283283 , _auKind :: !Text

@@ -298,7 +298,7 @@ data AdUnits = AdUnits

298298adUnits

299299 :: AdUnits

300300adUnits =

301− AdUnits

301+ AdUnits'

302302 { _auEtag = Nothing

303303 , _auNextPageToken = Nothing

304304 , _auKind = "adsensehost#adUnits"

@@ -330,13 +330,13 @@ instance FromJSON AdUnits where

330330 parseJSON

331331 = withObject "AdUnits"

332332 (\ o ->

333− AdUnits <$>

333+ AdUnits' <$>

334334 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

335335 (o .:? "kind" .!= "adsensehost#adUnits")

336336 <*> (o .:? "items" .!= mempty))

337337

338338instance ToJSON AdUnits where

339− toJSON AdUnits{..}

339+ toJSON AdUnits'{..}

340340 = object

341341 (catMaybes

342342 [("etag" .=) <$> _auEtag,

@@ -345,7 +345,7 @@ instance ToJSON AdUnits where

345345

346346--

347347-- /See:/ 'urlChannels' smart constructor.

348−data URLChannels = URLChannels

348+data URLChannels = URLChannels'

349349 { _ucEtag :: !(Maybe Text)

350350 , _ucNextPageToken :: !(Maybe Text)

351351 , _ucKind :: !Text

@@ -366,7 +366,7 @@ data URLChannels = URLChannels

366366urlChannels

367367 :: URLChannels

368368urlChannels =

369− URLChannels

369+ URLChannels'

370370 { _ucEtag = Nothing

371371 , _ucNextPageToken = Nothing

372372 , _ucKind = "adsensehost#urlChannels"

@@ -399,13 +399,13 @@ instance FromJSON URLChannels where

399399 parseJSON

400400 = withObject "URLChannels"

401401 (\ o ->

402− URLChannels <$>

402+ URLChannels' <$>

403403 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

404404 (o .:? "kind" .!= "adsensehost#urlChannels")

405405 <*> (o .:? "items" .!= mempty))

406406

407407instance ToJSON URLChannels where

408− toJSON URLChannels{..}

408+ toJSON URLChannels'{..}

409409 = object

410410 (catMaybes

411411 [("etag" .=) <$> _ucEtag,

@@ -414,7 +414,7 @@ instance ToJSON URLChannels where

414414

415415--

416416-- /See:/ 'customChannels' smart constructor.

417−data CustomChannels = CustomChannels

417+data CustomChannels = CustomChannels'

418418 { _ccEtag :: !(Maybe Text)

419419 , _ccNextPageToken :: !(Maybe Text)

420420 , _ccKind :: !Text

@@ -435,7 +435,7 @@ data CustomChannels = CustomChannels

435435customChannels

436436 :: CustomChannels

437437customChannels =

438− CustomChannels

438+ CustomChannels'

439439 { _ccEtag = Nothing

440440 , _ccNextPageToken = Nothing

441441 , _ccKind = "adsensehost#customChannels"

@@ -468,13 +468,13 @@ instance FromJSON CustomChannels where

468468 parseJSON

469469 = withObject "CustomChannels"

470470 (\ o ->

471− CustomChannels <$>

471+ CustomChannels' <$>

472472 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

473473 (o .:? "kind" .!= "adsensehost#customChannels")

474474 <*> (o .:? "items" .!= mempty))

475475

476476instance ToJSON CustomChannels where

477− toJSON CustomChannels{..}

477+ toJSON CustomChannels'{..}

478478 = object

479479 (catMaybes

480480 [("etag" .=) <$> _ccEtag,

@@ -483,7 +483,7 @@ instance ToJSON CustomChannels where

483483

484484--

485485-- /See:/ 'adUnit' smart constructor.

486−data AdUnit = AdUnit

486+data AdUnit = AdUnit'

487487 { _auuStatus :: !(Maybe Text)

488488 , _auuMobileContentAdsSettings :: !(Maybe AdUnitMobileContentAdsSettings)

489489 , _auuKind :: !Text

@@ -516,7 +516,7 @@ data AdUnit = AdUnit

516516adUnit

517517 :: AdUnit

518518adUnit =

519− AdUnit

519+ AdUnit'

520520 { _auuStatus = Nothing

521521 , _auuMobileContentAdsSettings = Nothing

522522 , _auuKind = "adsensehost#adUnit"

@@ -576,7 +576,7 @@ instance FromJSON AdUnit where

576576 parseJSON

577577 = withObject "AdUnit"

578578 (\ o ->

579− AdUnit <$>

579+ AdUnit' <$>

580580 (o .:? "status") <*>

581581 (o .:? "mobileContentAdsSettings")

582582 <*> (o .:? "kind" .!= "adsensehost#adUnit")

@@ -587,7 +587,7 @@ instance FromJSON AdUnit where

587587 <*> (o .:? "id"))

588588

589589instance ToJSON AdUnit where

590− toJSON AdUnit{..}

590+ toJSON AdUnit'{..}

591591 = object

592592 (catMaybes

593593 [("status" .=) <$> _auuStatus,

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

601601

602602--

603603-- /See:/ 'report' smart constructor.

604−data Report = Report

604+data Report = Report'

605605 { _rKind :: !Text

606606 , _rAverages :: !(Maybe [Text])

607607 , _rWarnings :: !(Maybe [Text])

@@ -631,7 +631,7 @@ data Report = Report

631631report

632632 :: Report

633633report =

634− Report

634+ Report'

635635 { _rKind = "adsensehost#report"

636636 , _rAverages = Nothing

637637 , _rWarnings = Nothing

@@ -698,7 +698,7 @@ instance FromJSON Report where

698698 parseJSON

699699 = withObject "Report"

700700 (\ o ->

701− Report <$>

701+ Report' <$>

702702 (o .:? "kind" .!= "adsensehost#report") <*>

703703 (o .:? "averages" .!= mempty)

704704 <*> (o .:? "warnings" .!= mempty)

@@ -708,7 +708,7 @@ instance FromJSON Report where

708708 <*> (o .:? "totalMatchedRows"))

709709

710710instance ToJSON Report where

711− toJSON Report{..}

711+ toJSON Report'{..}

712712 = object

713713 (catMaybes

714714 [Just ("kind" .= _rKind),

@@ -721,7 +721,7 @@ instance ToJSON Report where

721721-- | The font which is included in the style.

722722--

723723-- /See:/ 'adStyleFont' smart constructor.

724−data AdStyleFont = AdStyleFont

724+data AdStyleFont = AdStyleFont'

725725 { _asfSize :: !(Maybe Text)

726726 , _asfFamily :: !(Maybe Text)

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

@@ -736,7 +736,7 @@ data AdStyleFont = AdStyleFont

736736adStyleFont

737737 :: AdStyleFont

738738adStyleFont =

739− AdStyleFont

739+ AdStyleFont'

740740 { _asfSize = Nothing

741741 , _asfFamily = Nothing

742742 }

@@ -756,10 +756,10 @@ instance FromJSON AdStyleFont where

756756 parseJSON

757757 = withObject "AdStyleFont"

758758 (\ o ->

759− AdStyleFont <$> (o .:? "size") <*> (o .:? "family"))

759+ AdStyleFont' <$> (o .:? "size") <*> (o .:? "family"))

760760

761761instance ToJSON AdStyleFont where

762− toJSON AdStyleFont{..}

762+ toJSON AdStyleFont'{..}

763763 = object

764764 (catMaybes

765765 [("size" .=) <$> _asfSize,

@@ -767,7 +767,7 @@ instance ToJSON AdStyleFont where

767767

768768--

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

770−data Account = Account

770+data Account = Account'

771771 { _accStatus :: !(Maybe Text)

772772 , _accKind :: !Text

773773 , _accName :: !(Maybe Text)

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

788788account

789789 :: Account

790790account =

791− Account

791+ Account'

792792 { _accStatus = Nothing

793793 , _accKind = "adsensehost#account"

794794 , _accName = Nothing

@@ -816,14 +816,14 @@ instance FromJSON Account where

816816 parseJSON

817817 = withObject "Account"

818818 (\ o ->

819− Account <$>

819+ Account' <$>

820820 (o .:? "status") <*>

821821 (o .:? "kind" .!= "adsensehost#account")

822822 <*> (o .:? "name")

823823 <*> (o .:? "id"))

824824

825825instance ToJSON Account where

826− toJSON Account{..}

826+ toJSON Account'{..}

827827 = object

828828 (catMaybes

829829 [("status" .=) <$> _accStatus,

@@ -833,7 +833,7 @@ instance ToJSON Account where

833833-- | Settings specific to WAP mobile content ads (AFMC - deprecated).

834834--

835835-- /See:/ 'adUnitMobileContentAdsSettings' smart constructor.

836−data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

836+data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings'

837837 { _aumcasSize :: !(Maybe Text)

838838 , _aumcasScriptingLanguage :: !(Maybe Text)

839839 , _aumcasMarkupLanguage :: !(Maybe Text)

@@ -854,7 +854,7 @@ data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

854854adUnitMobileContentAdsSettings

855855 :: AdUnitMobileContentAdsSettings

856856adUnitMobileContentAdsSettings =

857− AdUnitMobileContentAdsSettings

857+ AdUnitMobileContentAdsSettings'

858858 { _aumcasSize = Nothing

859859 , _aumcasScriptingLanguage = Nothing

860860 , _aumcasMarkupLanguage = Nothing

@@ -888,13 +888,13 @@ instance FromJSON AdUnitMobileContentAdsSettings

888888 parseJSON

889889 = withObject "AdUnitMobileContentAdsSettings"

890890 (\ o ->

891− AdUnitMobileContentAdsSettings <$>

891+ AdUnitMobileContentAdsSettings' <$>

892892 (o .:? "size") <*> (o .:? "scriptingLanguage") <*>

893893 (o .:? "markupLanguage")

894894 <*> (o .:? "type"))

895895

896896instance ToJSON AdUnitMobileContentAdsSettings where

897− toJSON AdUnitMobileContentAdsSettings{..}

897+ toJSON AdUnitMobileContentAdsSettings'{..}

898898 = object

899899 (catMaybes

900900 [("size" .=) <$> _aumcasSize,

@@ -908,7 +908,7 @@ instance ToJSON AdUnitMobileContentAdsSettings where

908908-- leading hash.

909909--

910910-- /See:/ 'adStyleColors' smart constructor.

911−data AdStyleColors = AdStyleColors

911+data AdStyleColors = AdStyleColors'

912912 { _ascText :: !(Maybe Text)

913913 , _ascURL :: !(Maybe Text)

914914 , _ascBOrder :: !(Maybe Text)

@@ -932,7 +932,7 @@ data AdStyleColors = AdStyleColors

932932adStyleColors

933933 :: AdStyleColors

934934adStyleColors =

935− AdStyleColors

935+ AdStyleColors'

936936 { _ascText = Nothing

937937 , _ascURL = Nothing

938938 , _ascBOrder = Nothing

@@ -967,13 +967,13 @@ instance FromJSON AdStyleColors where

967967 parseJSON

968968 = withObject "AdStyleColors"

969969 (\ o ->

970− AdStyleColors <$>

970+ AdStyleColors' <$>

971971 (o .:? "text") <*> (o .:? "url") <*> (o .:? "border")

972972 <*> (o .:? "title")

973973 <*> (o .:? "background"))

974974

975975instance ToJSON AdStyleColors where

976− toJSON AdStyleColors{..}

976+ toJSON AdStyleColors'{..}

977977 = object

978978 (catMaybes

979979 [("text" .=) <$> _ascText, ("url" .=) <$> _ascURL,

@@ -984,7 +984,7 @@ instance ToJSON AdStyleColors where

984984-- | The backup option to be used in instances where no ad is available.

985985--

986986-- /See:/ 'adUnitContentAdsSettingsBackupOption' smart constructor.

987−data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

987+data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption'

988988 { _aucasboColor :: !(Maybe Text)

989989 , _aucasboURL :: !(Maybe Text)

990990 , _aucasboType :: !(Maybe Text)

@@ -1002,7 +1002,7 @@ data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

10021002adUnitContentAdsSettingsBackupOption

10031003 :: AdUnitContentAdsSettingsBackupOption

10041004adUnitContentAdsSettingsBackupOption =

1005− AdUnitContentAdsSettingsBackupOption

1005+ AdUnitContentAdsSettingsBackupOption'

10061006 { _aucasboColor = Nothing

10071007 , _aucasboURL = Nothing

10081008 , _aucasboType = Nothing

@@ -1030,12 +1030,12 @@ instance FromJSON

10301030 parseJSON

10311031 = withObject "AdUnitContentAdsSettingsBackupOption"

10321032 (\ o ->

1033− AdUnitContentAdsSettingsBackupOption <$>

1033+ AdUnitContentAdsSettingsBackupOption' <$>

10341034 (o .:? "color") <*> (o .:? "url") <*> (o .:? "type"))

10351035

10361036instance ToJSON AdUnitContentAdsSettingsBackupOption

10371037 where

1038− toJSON AdUnitContentAdsSettingsBackupOption{..}

1038+ toJSON AdUnitContentAdsSettingsBackupOption'{..}

10391039 = object

10401040 (catMaybes

10411041 [("color" .=) <$> _aucasboColor,

@@ -1044,7 +1044,7 @@ instance ToJSON AdUnitContentAdsSettingsBackupOption

10441044

10451045--

10461046-- /See:/ 'adClient' smart constructor.

1047−data AdClient = AdClient

1047+data AdClient = AdClient'

10481048 { _adKind :: !Text

10491049 , _adArcOptIn :: !(Maybe Bool)

10501050 , _adSupportsReporting :: !(Maybe Bool)

@@ -1068,7 +1068,7 @@ data AdClient = AdClient

10681068adClient

10691069 :: AdClient

10701070adClient =

1071− AdClient

1071+ AdClient'

10721072 { _adKind = "adsensehost#adClient"

10731073 , _adArcOptIn = Nothing

10741074 , _adSupportsReporting = Nothing

@@ -1106,7 +1106,7 @@ instance FromJSON AdClient where

11061106 parseJSON

11071107 = withObject "AdClient"

11081108 (\ o ->

1109− AdClient <$>

1109+ AdClient' <$>

11101110 (o .:? "kind" .!= "adsensehost#adClient") <*>

11111111 (o .:? "arcOptIn")

11121112 <*> (o .:? "supportsReporting")

@@ -1114,7 +1114,7 @@ instance FromJSON AdClient where

11141114 <*> (o .:? "productCode"))

11151115

11161116instance ToJSON AdClient where

1117− toJSON AdClient{..}

1117+ toJSON AdClient'{..}

11181118 = object

11191119 (catMaybes

11201120 [Just ("kind" .= _adKind),

@@ -1125,7 +1125,7 @@ instance ToJSON AdClient where

11251125

11261126--

11271127-- /See:/ 'reportHeadersItem' smart constructor.

1128−data ReportHeadersItem = ReportHeadersItem

1128+data ReportHeadersItem = ReportHeadersItem'

11291129 { _rhiName :: !(Maybe Text)

11301130 , _rhiCurrency :: !(Maybe Text)

11311131 , _rhiType :: !(Maybe Text)

@@ -1143,7 +1143,7 @@ data ReportHeadersItem = ReportHeadersItem

11431143reportHeadersItem

11441144 :: ReportHeadersItem

11451145reportHeadersItem =

1146− ReportHeadersItem

1146+ ReportHeadersItem'

11471147 { _rhiName = Nothing

11481148 , _rhiCurrency = Nothing

11491149 , _rhiType = Nothing

@@ -1168,12 +1168,12 @@ instance FromJSON ReportHeadersItem where

11681168 parseJSON

11691169 = withObject "ReportHeadersItem"

11701170 (\ o ->

1171− ReportHeadersItem <$>

1171+ ReportHeadersItem' <$>

11721172 (o .:? "name") <*> (o .:? "currency") <*>

11731173 (o .:? "type"))

11741174

11751175instance ToJSON ReportHeadersItem where

1176− toJSON ReportHeadersItem{..}

1176+ toJSON ReportHeadersItem'{..}

11771177 = object

11781178 (catMaybes

11791179 [("name" .=) <$> _rhiName,

@@ -1182,7 +1182,7 @@ instance ToJSON ReportHeadersItem where

11821182

11831183--

11841184-- /See:/ 'adStyle' smart constructor.

1185−data AdStyle = AdStyle

1185+data AdStyle = AdStyle'

11861186 { _assCorners :: !(Maybe Text)

11871187 , _assKind :: !Text

11881188 , _assFont :: !(Maybe AdStyleFont)

@@ -1203,7 +1203,7 @@ data AdStyle = AdStyle

12031203adStyle

12041204 :: AdStyle

12051205adStyle =

1206− AdStyle

1206+ AdStyle'

12071207 { _assCorners = Nothing

12081208 , _assKind = "adsensehost#adStyle"

12091209 , _assFont = Nothing

@@ -1235,14 +1235,14 @@ instance FromJSON AdStyle where

12351235 parseJSON

12361236 = withObject "AdStyle"

12371237 (\ o ->

1238− AdStyle <$>

1238+ AdStyle' <$>

12391239 (o .:? "corners") <*>

12401240 (o .:? "kind" .!= "adsensehost#adStyle")

12411241 <*> (o .:? "font")

12421242 <*> (o .:? "colors"))

12431243

12441244instance ToJSON AdStyle where

1245− toJSON AdStyle{..}

1245+ toJSON AdStyle'{..}

12461246 = object

12471247 (catMaybes

12481248 [("corners" .=) <$> _assCorners,

@@ -1251,7 +1251,7 @@ instance ToJSON AdStyle where

12511251

12521252--

12531253-- /See:/ 'customChannel' smart constructor.

1254−data CustomChannel = CustomChannel

1254+data CustomChannel = CustomChannel'

12551255 { _cKind :: !Text

12561256 , _cName :: !(Maybe Text)

12571257 , _cCode :: !(Maybe Text)

@@ -1272,7 +1272,7 @@ data CustomChannel = CustomChannel

12721272customChannel

12731273 :: CustomChannel

12741274customChannel =

1275− CustomChannel

1275+ CustomChannel'

12761276 { _cKind = "adsensehost#customChannel"

12771277 , _cName = Nothing

12781278 , _cCode = Nothing

@@ -1301,14 +1301,14 @@ instance FromJSON CustomChannel where

13011301 parseJSON

13021302 = withObject "CustomChannel"

13031303 (\ o ->

1304− CustomChannel <$>

1304+ CustomChannel' <$>

13051305 (o .:? "kind" .!= "adsensehost#customChannel") <*>

13061306 (o .:? "name")

13071307 <*> (o .:? "code")

13081308 <*> (o .:? "id"))

13091309

13101310instance ToJSON CustomChannel where

1311− toJSON CustomChannel{..}

1311+ toJSON CustomChannel'{..}

13121312 = object

13131313 (catMaybes

13141314 [Just ("kind" .= _cKind), ("name" .=) <$> _cName,

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

13161316

13171317--

13181318-- /See:/ 'urlChannel' smart constructor.

1319−data URLChannel = URLChannel

1319+data URLChannel = URLChannel'

13201320 { _urlcKind :: !Text

13211321 , _urlcId :: !(Maybe Text)

13221322 , _urlcURLPattern :: !(Maybe Text)

@@ -1334,7 +1334,7 @@ data URLChannel = URLChannel

13341334urlChannel

13351335 :: URLChannel

13361336urlChannel =

1337− URLChannel

1337+ URLChannel'

13381338 { _urlcKind = "adsensehost#urlChannel"

13391339 , _urlcId = Nothing

13401340 , _urlcURLPattern = Nothing

@@ -1361,13 +1361,13 @@ instance FromJSON URLChannel where

13611361 parseJSON

13621362 = withObject "URLChannel"

13631363 (\ o ->

1364− URLChannel <$>

1364+ URLChannel' <$>

13651365 (o .:? "kind" .!= "adsensehost#urlChannel") <*>

13661366 (o .:? "id")

13671367 <*> (o .:? "urlPattern"))

13681368

13691369instance ToJSON URLChannel where

1370− toJSON URLChannel{..}

1370+ toJSON URLChannel'{..}

13711371 = object

13721372 (catMaybes

13731373 [Just ("kind" .= _urlcKind), ("id" .=) <$> _urlcId,

@@ -1375,7 +1375,7 @@ instance ToJSON URLChannel where

13751375

13761376--

13771377-- /See:/ 'adCode' smart constructor.

1378−data AdCode = AdCode

1378+data AdCode = AdCode'

13791379 { _aaKind :: !Text

13801380 , _aaAdCode :: !(Maybe Text)

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

@@ -1390,7 +1390,7 @@ data AdCode = AdCode

13901390adCode

13911391 :: AdCode

13921392adCode =

1393− AdCode

1393+ AdCode'

13941394 { _aaKind = "adsensehost#adCode"

13951395 , _aaAdCode = Nothing

13961396 }

@@ -1407,12 +1407,12 @@ instance FromJSON AdCode where

14071407 parseJSON

14081408 = withObject "AdCode"

14091409 (\ o ->

1410− AdCode <$>

1410+ AdCode' <$>

14111411 (o .:? "kind" .!= "adsensehost#adCode") <*>

14121412 (o .:? "adCode"))

14131413

14141414instance ToJSON AdCode where

1415− toJSON AdCode{..}

1415+ toJSON AdCode'{..}

14161416 = object

14171417 (catMaybes

14181418 [Just ("kind" .= _aaKind),

@@ -1422,7 +1422,7 @@ instance ToJSON AdCode where

14221422-- (AFMC - deprecated).

14231423--

14241424-- /See:/ 'adUnitContentAdsSettings' smart constructor.

1425−data AdUnitContentAdsSettings = AdUnitContentAdsSettings

1425+data AdUnitContentAdsSettings = AdUnitContentAdsSettings'

14261426 { _aucasBackupOption :: !(Maybe AdUnitContentAdsSettingsBackupOption)

14271427 , _aucasSize :: !(Maybe Text)

14281428 , _aucasType :: !(Maybe Text)

@@ -1440,7 +1440,7 @@ data AdUnitContentAdsSettings = AdUnitContentAdsSettings

14401440adUnitContentAdsSettings

14411441 :: AdUnitContentAdsSettings

14421442adUnitContentAdsSettings =

1443− AdUnitContentAdsSettings

1443+ AdUnitContentAdsSettings'

14441444 { _aucasBackupOption = Nothing

14451445 , _aucasSize = Nothing

14461446 , _aucasType = Nothing

@@ -1467,12 +1467,12 @@ instance FromJSON AdUnitContentAdsSettings where

14671467 parseJSON

14681468 = withObject "AdUnitContentAdsSettings"

14691469 (\ o ->

1470− AdUnitContentAdsSettings <$>

1470+ AdUnitContentAdsSettings' <$>

14711471 (o .:? "backupOption") <*> (o .:? "size") <*>

14721472 (o .:? "type"))

14731473

14741474instance ToJSON AdUnitContentAdsSettings where

1475− toJSON AdUnitContentAdsSettings{..}

1475+ toJSON AdUnitContentAdsSettings'{..}

14761476 = object

14771477 (catMaybes

14781478 [("backupOption" .=) <$> _aucasBackupOption,

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

@@ -56,7 +56,7 @@ type AccountsAdClientsGetResource =

5656-- publisher\'s AdSense account.

5757--

5858-- /See:/ 'accountsAdClientsGet' smart constructor.

59−data AccountsAdClientsGet = AccountsAdClientsGet

59+data AccountsAdClientsGet = AccountsAdClientsGet'

6060 { _aacgAdClientId :: !Text

6161 , _aacgAccountId :: !Text

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

@@ -73,7 +73,7 @@ accountsAdClientsGet

7373 -> Text -- ^ 'aacgAccountId'

7474 -> AccountsAdClientsGet

7575accountsAdClientsGet pAacgAdClientId_ pAacgAccountId_ =

76− AccountsAdClientsGet

76+ AccountsAdClientsGet'

7777 { _aacgAdClientId = pAacgAdClientId_

7878 , _aacgAccountId = pAacgAccountId_

7979 }

@@ -94,7 +94,7 @@ instance GoogleRequest AccountsAdClientsGet where

9494 type Rs AccountsAdClientsGet = AdClient

9595 type Scopes AccountsAdClientsGet =

9696 '["https://www.googleapis.com/auth/adsensehost"]

97− requestClient AccountsAdClientsGet{..}

97+ requestClient AccountsAdClientsGet'{..}

9898 = go _aacgAccountId _aacgAdClientId (Just AltJSON)

9999 adSenseHostService

100100 where go

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

@@ -56,7 +56,7 @@ type AccountsAdClientsListResource =

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

5757--

5858-- /See:/ 'accountsAdClientsList' smart constructor.

59−data AccountsAdClientsList = AccountsAdClientsList

59+data AccountsAdClientsList = AccountsAdClientsList'

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

6262 , _aaclMaxResults :: !(Maybe (Textual Word32))

@@ -75,7 +75,7 @@ accountsAdClientsList

7575 :: Text -- ^ 'aaclAccountId'

7676 -> AccountsAdClientsList

7777accountsAdClientsList pAaclAccountId_ =

78− AccountsAdClientsList

78+ AccountsAdClientsList'

7979 { _aaclAccountId = pAaclAccountId_

8080 , _aaclPageToken = Nothing

8181 , _aaclMaxResults = Nothing

@@ -107,7 +107,7 @@ instance GoogleRequest AccountsAdClientsList where

107107 type Rs AccountsAdClientsList = AdClients

108108 type Scopes AccountsAdClientsList =

109109 '["https://www.googleapis.com/auth/adsensehost"]

110− requestClient AccountsAdClientsList{..}

110+ requestClient AccountsAdClientsList'{..}

111111 = go _aaclAccountId _aaclPageToken _aaclMaxResults

112112 (Just AltJSON)

113113 adSenseHostService

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

@@ -59,7 +59,7 @@ type AccountsAdUnitsDeleteResource =

5959-- account.

6060--

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

62−data AccountsAdUnitsDelete = AccountsAdUnitsDelete

62+data AccountsAdUnitsDelete = AccountsAdUnitsDelete'

6363 { _aaudAdUnitId :: !Text

6464 , _aaudAdClientId :: !Text

6565 , _aaudAccountId :: !Text

@@ -80,7 +80,7 @@ accountsAdUnitsDelete

8080 -> Text -- ^ 'aaudAccountId'

8181 -> AccountsAdUnitsDelete

8282accountsAdUnitsDelete pAaudAdUnitId_ pAaudAdClientId_ pAaudAccountId_ =

83− AccountsAdUnitsDelete

83+ AccountsAdUnitsDelete'

8484 { _aaudAdUnitId = pAaudAdUnitId_

8585 , _aaudAdClientId = pAaudAdClientId_

8686 , _aaudAccountId = pAaudAccountId_

@@ -107,7 +107,7 @@ instance GoogleRequest AccountsAdUnitsDelete where

107107 type Rs AccountsAdUnitsDelete = AdUnit

108108 type Scopes AccountsAdUnitsDelete =

109109 '["https://www.googleapis.com/auth/adsensehost"]

110− requestClient AccountsAdUnitsDelete{..}

110+ requestClient AccountsAdUnitsDelete'{..}

111111 = go _aaudAccountId _aaudAdClientId _aaudAdUnitId

112112 (Just AltJSON)

113113 adSenseHostService

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

@@ -57,7 +57,7 @@ type AccountsAdUnitsGetResource =

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

5858--

5959-- /See:/ 'accountsAdUnitsGet' smart constructor.

60−data AccountsAdUnitsGet = AccountsAdUnitsGet

60+data AccountsAdUnitsGet = AccountsAdUnitsGet'

6161 { _aaugAdUnitId :: !Text

6262 , _aaugAdClientId :: !Text

6363 , _aaugAccountId :: !Text

@@ -78,7 +78,7 @@ accountsAdUnitsGet

7878 -> Text -- ^ 'aaugAccountId'

7979 -> AccountsAdUnitsGet

8080accountsAdUnitsGet pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =

81− AccountsAdUnitsGet

81+ AccountsAdUnitsGet'

8282 { _aaugAdUnitId = pAaugAdUnitId_

8383 , _aaugAdClientId = pAaugAdClientId_

8484 , _aaugAccountId = pAaugAccountId_

@@ -105,7 +105,7 @@ instance GoogleRequest AccountsAdUnitsGet where

105105 type Rs AccountsAdUnitsGet = AdUnit

106106 type Scopes AccountsAdUnitsGet =

107107 '["https://www.googleapis.com/auth/adsensehost"]

108− requestClient AccountsAdUnitsGet{..}

108+ requestClient AccountsAdUnitsGet'{..}

109109 = go _aaugAccountId _aaugAdClientId _aaugAdUnitId

110110 (Just AltJSON)

111111 adSenseHostService

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

@@ -62,7 +62,7 @@ type AccountsAdUnitsGetAdCodeResource =

6262-- custom channels.

6363--

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

65−data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode

65+data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode'

6666 { _aaugacAdUnitId :: !Text

6767 , _aaugacAdClientId :: !Text

6868 , _aaugacAccountId :: !Text

@@ -86,7 +86,7 @@ accountsAdUnitsGetAdCode

8686 -> Text -- ^ 'aaugacAccountId'

8787 -> AccountsAdUnitsGetAdCode

8888accountsAdUnitsGetAdCode pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =

89− AccountsAdUnitsGetAdCode

89+ AccountsAdUnitsGetAdCode'

9090 { _aaugacAdUnitId = pAaugacAdUnitId_

9191 , _aaugacAdClientId = pAaugacAdClientId_

9292 , _aaugacAccountId = pAaugacAccountId_

@@ -123,7 +123,7 @@ instance GoogleRequest AccountsAdUnitsGetAdCode where

123123 type Rs AccountsAdUnitsGetAdCode = AdCode

124124 type Scopes AccountsAdUnitsGetAdCode =

125125 '["https://www.googleapis.com/auth/adsensehost"]

126− requestClient AccountsAdUnitsGetAdCode{..}

126+ requestClient AccountsAdUnitsGetAdCode'{..}

127127 = go _aaugacAccountId _aaugacAdClientId

128128 _aaugacAdUnitId

129129 (_aaugacHostCustomChannelId ^. _Default)

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

@@ -59,7 +59,7 @@ type AccountsAdUnitsInsertResource =

5959-- account.

6060--

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

62−data AccountsAdUnitsInsert = AccountsAdUnitsInsert

62+data AccountsAdUnitsInsert = AccountsAdUnitsInsert'

6363 { _aauiPayload :: !AdUnit

6464 , _aauiAdClientId :: !Text

6565 , _aauiAccountId :: !Text

@@ -80,7 +80,7 @@ accountsAdUnitsInsert

8080 -> Text -- ^ 'aauiAccountId'

8181 -> AccountsAdUnitsInsert

8282accountsAdUnitsInsert pAauiPayload_ pAauiAdClientId_ pAauiAccountId_ =

83− AccountsAdUnitsInsert

83+ AccountsAdUnitsInsert'

8484 { _aauiPayload = pAauiPayload_

8585 , _aauiAdClientId = pAauiAdClientId_

8686 , _aauiAccountId = pAauiAccountId_

@@ -107,7 +107,7 @@ instance GoogleRequest AccountsAdUnitsInsert where

107107 type Rs AccountsAdUnitsInsert = AdUnit

108108 type Scopes AccountsAdUnitsInsert =

109109 '["https://www.googleapis.com/auth/adsensehost"]

110− requestClient AccountsAdUnitsInsert{..}

110+ requestClient AccountsAdUnitsInsert'{..}

111111 = go _aauiAccountId _aauiAdClientId (Just AltJSON)

112112 _aauiPayload

113113 adSenseHostService

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

@@ -61,7 +61,7 @@ type AccountsAdUnitsListResource =

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

6262--

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

64−data AccountsAdUnitsList = AccountsAdUnitsList

64+data AccountsAdUnitsList = AccountsAdUnitsList'

6565 { _aaulIncludeInactive :: !(Maybe Bool)

6666 , _aaulAdClientId :: !Text

6767 , _aaulAccountId :: !Text

@@ -87,7 +87,7 @@ accountsAdUnitsList

8787 -> Text -- ^ 'aaulAccountId'

8888 -> AccountsAdUnitsList

8989accountsAdUnitsList pAaulAdClientId_ pAaulAccountId_ =

90− AccountsAdUnitsList

90+ AccountsAdUnitsList'

9191 { _aaulIncludeInactive = Nothing

9292 , _aaulAdClientId = pAaulAdClientId_

9393 , _aaulAccountId = pAaulAccountId_

@@ -133,7 +133,7 @@ instance GoogleRequest AccountsAdUnitsList where

133133 type Rs AccountsAdUnitsList = AdUnits

134134 type Scopes AccountsAdUnitsList =

135135 '["https://www.googleapis.com/auth/adsensehost"]

136− requestClient AccountsAdUnitsList{..}

136+ requestClient AccountsAdUnitsList'{..}

137137 = go _aaulAccountId _aaulAdClientId

138138 _aaulIncludeInactive

139139 _aaulPageToken

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

@@ -61,7 +61,7 @@ type AccountsAdUnitsPatchResource =

6161-- This method supports patch semantics.

6262--

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

64−data AccountsAdUnitsPatch = AccountsAdUnitsPatch

64+data AccountsAdUnitsPatch = AccountsAdUnitsPatch'

6565 { _aaupAdUnitId :: !Text

6666 , _aaupPayload :: !AdUnit

6767 , _aaupAdClientId :: !Text

@@ -86,7 +86,7 @@ accountsAdUnitsPatch

8686 -> Text -- ^ 'aaupAccountId'

8787 -> AccountsAdUnitsPatch

8888accountsAdUnitsPatch pAaupAdUnitId_ pAaupPayload_ pAaupAdClientId_ pAaupAccountId_ =

89− AccountsAdUnitsPatch

89+ AccountsAdUnitsPatch'

9090 { _aaupAdUnitId = pAaupAdUnitId_

9191 , _aaupPayload = pAaupPayload_

9292 , _aaupAdClientId = pAaupAdClientId_

@@ -119,7 +119,7 @@ instance GoogleRequest AccountsAdUnitsPatch where

119119 type Rs AccountsAdUnitsPatch = AdUnit

120120 type Scopes AccountsAdUnitsPatch =

121121 '["https://www.googleapis.com/auth/adsensehost"]

122− requestClient AccountsAdUnitsPatch{..}

122+ requestClient AccountsAdUnitsPatch'{..}

123123 = go _aaupAccountId _aaupAdClientId

124124 (Just _aaupAdUnitId)

125125 (Just AltJSON)

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

@@ -57,7 +57,7 @@ type AccountsAdUnitsUpdateResource =

5757-- | Update the supplied ad unit in the specified publisher AdSense account.

5858--

5959-- /See:/ 'accountsAdUnitsUpdate' smart constructor.

60−data AccountsAdUnitsUpdate = AccountsAdUnitsUpdate

60+data AccountsAdUnitsUpdate = AccountsAdUnitsUpdate'

6161 { _aauuPayload :: !AdUnit

6262 , _aauuAdClientId :: !Text

6363 , _aauuAccountId :: !Text

@@ -78,7 +78,7 @@ accountsAdUnitsUpdate

7878 -> Text -- ^ 'aauuAccountId'

7979 -> AccountsAdUnitsUpdate

8080accountsAdUnitsUpdate pAauuPayload_ pAauuAdClientId_ pAauuAccountId_ =

81− AccountsAdUnitsUpdate

81+ AccountsAdUnitsUpdate'

8282 { _aauuPayload = pAauuPayload_

8383 , _aauuAdClientId = pAauuAdClientId_

8484 , _aauuAccountId = pAauuAccountId_

@@ -105,7 +105,7 @@ instance GoogleRequest AccountsAdUnitsUpdate where

105105 type Rs AccountsAdUnitsUpdate = AdUnit

106106 type Scopes AccountsAdUnitsUpdate =

107107 '["https://www.googleapis.com/auth/adsensehost"]

108− requestClient AccountsAdUnitsUpdate{..}

108+ requestClient AccountsAdUnitsUpdate'{..}

109109 = go _aauuAccountId _aauuAdClientId (Just AltJSON)

110110 _aauuPayload

111111 adSenseHostService

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

@@ -51,7 +51,7 @@ type AccountsGetResource =

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

5252--

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

54−newtype AccountsGet = AccountsGet

54+newtype AccountsGet = AccountsGet'

5555 { _agAccountId :: Text

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

5757

@@ -64,7 +64,7 @@ accountsGet

6464 :: Text -- ^ 'agAccountId'

6565 -> AccountsGet

6666accountsGet pAgAccountId_ =

67− AccountsGet

67+ AccountsGet'

6868 { _agAccountId = pAgAccountId_

6969 }

7070

@@ -77,7 +77,7 @@ instance GoogleRequest AccountsGet where

7777 type Rs AccountsGet = Account

7878 type Scopes AccountsGet =

7979 '["https://www.googleapis.com/auth/adsensehost"]

80− requestClient AccountsGet{..}

80+ requestClient AccountsGet'{..}

8181 = go _agAccountId (Just AltJSON) adSenseHostService

8282 where go

8383 = buildClient (Proxy :: Proxy AccountsGetResource)

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

@@ -53,7 +53,7 @@ type AccountsListResource =

5353-- id.

5454--

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

56−newtype AccountsList = AccountsList

56+newtype AccountsList = AccountsList'

5757 { _alFilterAdClientId :: [Text]

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

5959

@@ -66,7 +66,7 @@ accountsList

6666 :: [Text] -- ^ 'alFilterAdClientId'

6767 -> AccountsList

6868accountsList pAlFilterAdClientId_ =

69− AccountsList

69+ AccountsList'

7070 { _alFilterAdClientId = _Coerce # pAlFilterAdClientId_

7171 }

7272

@@ -81,7 +81,7 @@ instance GoogleRequest AccountsList where

8181 type Rs AccountsList = Accounts

8282 type Scopes AccountsList =

8383 '["https://www.googleapis.com/auth/adsensehost"]

84− requestClient AccountsList{..}

84+ requestClient AccountsList'{..}

8585 = go _alFilterAdClientId (Just AltJSON)

8686 adSenseHostService

8787 where go

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

@@ -74,7 +74,7 @@ type AccountsReportsGenerateResource =

7474-- specify \"alt=csv\" as a query parameter.

7575--

7676-- /See:/ 'accountsReportsGenerate' smart constructor.

77−data AccountsReportsGenerate = AccountsReportsGenerate

77+data AccountsReportsGenerate = AccountsReportsGenerate'

7878 { _argDimension :: !(Maybe [Text])

7979 , _argLocale :: !(Maybe Text)

8080 , _argEndDate :: !Text

@@ -116,7 +116,7 @@ accountsReportsGenerate

116116 -> Text -- ^ 'argAccountId'

117117 -> AccountsReportsGenerate

118118accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =

119− AccountsReportsGenerate

119+ AccountsReportsGenerate'

120120 { _argDimension = Nothing

121121 , _argLocale = Nothing

122122 , _argEndDate = pArgEndDate_

@@ -198,7 +198,7 @@ instance GoogleRequest AccountsReportsGenerate where

198198 type Rs AccountsReportsGenerate = Report

199199 type Scopes AccountsReportsGenerate =

200200 '["https://www.googleapis.com/auth/adsensehost"]

201− requestClient AccountsReportsGenerate{..}

201+ requestClient AccountsReportsGenerate'{..}

202202 = go _argAccountId (Just _argStartDate)

203203 (Just _argEndDate)

204204 (_argDimension ^. _Default)

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

@@ -51,7 +51,7 @@ type AdClientsGetResource =

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

5252--

5353-- /See:/ 'adClientsGet' smart constructor.

54−newtype AdClientsGet = AdClientsGet

54+newtype AdClientsGet = AdClientsGet'

5555 { _acgAdClientId :: Text

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

5757

@@ -64,7 +64,7 @@ adClientsGet

6464 :: Text -- ^ 'acgAdClientId'

6565 -> AdClientsGet

6666adClientsGet pAcgAdClientId_ =

67− AdClientsGet

67+ AdClientsGet'

6868 { _acgAdClientId = pAcgAdClientId_

6969 }

7070

@@ -78,7 +78,7 @@ instance GoogleRequest AdClientsGet where

7878 type Rs AdClientsGet = AdClient

7979 type Scopes AdClientsGet =

8080 '["https://www.googleapis.com/auth/adsensehost"]

81− requestClient AdClientsGet{..}

81+ requestClient AdClientsGet'{..}

8282 = go _acgAdClientId (Just AltJSON) adSenseHostService

8383 where go

8484 = buildClient (Proxy :: Proxy AdClientsGetResource)

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

@@ -53,7 +53,7 @@ type AdClientsListResource =

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

5454--

5555-- /See:/ 'adClientsList' smart constructor.

56−data AdClientsList = AdClientsList

56+data AdClientsList = AdClientsList'

5757 { _aclPageToken :: !(Maybe Text)

5858 , _aclMaxResults :: !(Maybe (Textual Word32))

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

@@ -68,7 +68,7 @@ data AdClientsList = AdClientsList

6868adClientsList

6969 :: AdClientsList

7070adClientsList =

71− AdClientsList

71+ AdClientsList'

7272 { _aclPageToken = Nothing

7373 , _aclMaxResults = Nothing

7474 }

@@ -92,7 +92,7 @@ instance GoogleRequest AdClientsList where

9292 type Rs AdClientsList = AdClients

9393 type Scopes AdClientsList =

9494 '["https://www.googleapis.com/auth/adsensehost"]

95− requestClient AdClientsList{..}

95+ requestClient AdClientsList'{..}

9696 = go _aclPageToken _aclMaxResults (Just AltJSON)

9797 adSenseHostService

9898 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Start.hs+3−3

@@ -63,7 +63,7 @@ type AssociationSessionsStartResource =

6363-- AdSense user.

6464--

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

66−data AssociationSessionsStart = AssociationSessionsStart

66+data AssociationSessionsStart = AssociationSessionsStart'

6767 { _assWebsiteLocale :: !(Maybe Text)

6868 , _assUserLocale :: !(Maybe Text)

6969 , _assWebsiteURL :: !Text

@@ -86,7 +86,7 @@ associationSessionsStart

8686 -> [AssociationSessionsStartProductCode] -- ^ 'assProductCode'

8787 -> AssociationSessionsStart

8888associationSessionsStart pAssWebsiteURL_ pAssProductCode_ =

89− AssociationSessionsStart

89+ AssociationSessionsStart'

9090 { _assWebsiteLocale = Nothing

9191 , _assUserLocale = Nothing

9292 , _assWebsiteURL = pAssWebsiteURL_

@@ -122,7 +122,7 @@ instance GoogleRequest AssociationSessionsStart where

122122 type Rs AssociationSessionsStart = AssociationSession

123123 type Scopes AssociationSessionsStart =

124124 '["https://www.googleapis.com/auth/adsensehost"]

125− requestClient AssociationSessionsStart{..}

125+ requestClient AssociationSessionsStart'{..}

126126 = go _assProductCode (Just _assWebsiteURL)

127127 _assWebsiteLocale

128128 _assUserLocale

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/AssociationSessions/Verify.hs+3−3

@@ -55,7 +55,7 @@ type AssociationSessionsVerifyResource =

5555-- from AdSense signup.

5656--

5757-- /See:/ 'associationSessionsVerify' smart constructor.

58−newtype AssociationSessionsVerify = AssociationSessionsVerify

58+newtype AssociationSessionsVerify = AssociationSessionsVerify'

5959 { _asvToken :: Text

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

6161

@@ -68,7 +68,7 @@ associationSessionsVerify

6868 :: Text -- ^ 'asvToken'

6969 -> AssociationSessionsVerify

7070associationSessionsVerify pAsvToken_ =

71− AssociationSessionsVerify

71+ AssociationSessionsVerify'

7272 { _asvToken = pAsvToken_

7373 }

7474

@@ -82,7 +82,7 @@ instance GoogleRequest AssociationSessionsVerify

8282 AssociationSession

8383 type Scopes AssociationSessionsVerify =

8484 '["https://www.googleapis.com/auth/adsensehost"]

85− requestClient AssociationSessionsVerify{..}

85+ requestClient AssociationSessionsVerify'{..}

8686 = go (Just _asvToken) (Just AltJSON)

8787 adSenseHostService

8888 where go

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

@@ -55,7 +55,7 @@ type CustomChannelsDeleteResource =

5555-- | Delete a specific custom channel from the host AdSense account.

5656--

5757-- /See:/ 'customChannelsDelete' smart constructor.

58−data CustomChannelsDelete = CustomChannelsDelete

58+data CustomChannelsDelete = CustomChannelsDelete'

5959 { _ccdCustomChannelId :: !Text

6060 , _ccdAdClientId :: !Text

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

@@ -72,7 +72,7 @@ customChannelsDelete

7272 -> Text -- ^ 'ccdAdClientId'

7373 -> CustomChannelsDelete

7474customChannelsDelete pCcdCustomChannelId_ pCcdAdClientId_ =

75− CustomChannelsDelete

75+ CustomChannelsDelete'

7676 { _ccdCustomChannelId = pCcdCustomChannelId_

7777 , _ccdAdClientId = pCcdAdClientId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest CustomChannelsDelete where

9393 type Rs CustomChannelsDelete = CustomChannel

9494 type Scopes CustomChannelsDelete =

9595 '["https://www.googleapis.com/auth/adsensehost"]

96− requestClient CustomChannelsDelete{..}

96+ requestClient CustomChannelsDelete'{..}

9797 = go _ccdAdClientId _ccdCustomChannelId

9898 (Just AltJSON)

9999 adSenseHostService

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

@@ -54,7 +54,7 @@ type CustomChannelsGetResource =

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

5555--

5656-- /See:/ 'customChannelsGet' smart constructor.

57−data CustomChannelsGet = CustomChannelsGet

57+data CustomChannelsGet = CustomChannelsGet'

5858 { _ccgCustomChannelId :: !Text

5959 , _ccgAdClientId :: !Text

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

@@ -71,7 +71,7 @@ customChannelsGet

7171 -> Text -- ^ 'ccgAdClientId'

7272 -> CustomChannelsGet

7373customChannelsGet pCcgCustomChannelId_ pCcgAdClientId_ =

74− CustomChannelsGet

74+ CustomChannelsGet'

7575 { _ccgCustomChannelId = pCcgCustomChannelId_

7676 , _ccgAdClientId = pCcgAdClientId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest CustomChannelsGet where

9292 type Rs CustomChannelsGet = CustomChannel

9393 type Scopes CustomChannelsGet =

9494 '["https://www.googleapis.com/auth/adsensehost"]

95− requestClient CustomChannelsGet{..}

95+ requestClient CustomChannelsGet'{..}

9696 = go _ccgAdClientId _ccgCustomChannelId

9797 (Just AltJSON)

9898 adSenseHostService

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

@@ -55,7 +55,7 @@ type CustomChannelsInsertResource =

5555-- | Add a new custom channel to the host AdSense account.

5656--

5757-- /See:/ 'customChannelsInsert' smart constructor.

58−data CustomChannelsInsert = CustomChannelsInsert

58+data CustomChannelsInsert = CustomChannelsInsert'

5959 { _cciPayload :: !CustomChannel

6060 , _cciAdClientId :: !Text

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

@@ -72,7 +72,7 @@ customChannelsInsert

7272 -> Text -- ^ 'cciAdClientId'

7373 -> CustomChannelsInsert

7474customChannelsInsert pCciPayload_ pCciAdClientId_ =

75− CustomChannelsInsert

75+ CustomChannelsInsert'

7676 { _cciPayload = pCciPayload_

7777 , _cciAdClientId = pCciAdClientId_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest CustomChannelsInsert where

9292 type Rs CustomChannelsInsert = CustomChannel

9393 type Scopes CustomChannelsInsert =

9494 '["https://www.googleapis.com/auth/adsensehost"]

95− requestClient CustomChannelsInsert{..}

95+ requestClient CustomChannelsInsert'{..}

9696 = go _cciAdClientId (Just AltJSON) _cciPayload

9797 adSenseHostService

9898 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/List.hs+3−3

@@ -57,7 +57,7 @@ type CustomChannelsListResource =

5757-- | List all host custom channels in this AdSense account.

5858--

5959-- /See:/ 'customChannelsList' smart constructor.

60−data CustomChannelsList = CustomChannelsList

60+data CustomChannelsList = CustomChannelsList'

6161 { _cclAdClientId :: !Text

6262 , _cclPageToken :: !(Maybe Text)

6363 , _cclMaxResults :: !(Maybe (Textual Word32))

@@ -76,7 +76,7 @@ customChannelsList

7676 :: Text -- ^ 'cclAdClientId'

7777 -> CustomChannelsList

7878customChannelsList pCclAdClientId_ =

79− CustomChannelsList

79+ CustomChannelsList'

8080 { _cclAdClientId = pCclAdClientId_

8181 , _cclPageToken = Nothing

8282 , _cclMaxResults = Nothing

@@ -107,7 +107,7 @@ instance GoogleRequest CustomChannelsList where

107107 type Rs CustomChannelsList = CustomChannels

108108 type Scopes CustomChannelsList =

109109 '["https://www.googleapis.com/auth/adsensehost"]

110− requestClient CustomChannelsList{..}

110+ requestClient CustomChannelsList'{..}

111111 = go _cclAdClientId _cclPageToken _cclMaxResults

112112 (Just AltJSON)

113113 adSenseHostService

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Patch.hs+3−3

@@ -59,7 +59,7 @@ type CustomChannelsPatchResource =

5959-- supports patch semantics.

6060--

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

62−data CustomChannelsPatch = CustomChannelsPatch

62+data CustomChannelsPatch = CustomChannelsPatch'

6363 { _ccpCustomChannelId :: !Text

6464 , _ccpPayload :: !CustomChannel

6565 , _ccpAdClientId :: !Text

@@ -80,7 +80,7 @@ customChannelsPatch

8080 -> Text -- ^ 'ccpAdClientId'

8181 -> CustomChannelsPatch

8282customChannelsPatch pCcpCustomChannelId_ pCcpPayload_ pCcpAdClientId_ =

83− CustomChannelsPatch

83+ CustomChannelsPatch'

8484 { _ccpCustomChannelId = pCcpCustomChannelId_

8585 , _ccpPayload = pCcpPayload_

8686 , _ccpAdClientId = pCcpAdClientId_

@@ -107,7 +107,7 @@ instance GoogleRequest CustomChannelsPatch where

107107 type Rs CustomChannelsPatch = CustomChannel

108108 type Scopes CustomChannelsPatch =

109109 '["https://www.googleapis.com/auth/adsensehost"]

110− requestClient CustomChannelsPatch{..}

110+ requestClient CustomChannelsPatch'{..}

111111 = go _ccpAdClientId (Just _ccpCustomChannelId)

112112 (Just AltJSON)

113113 _ccpPayload

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/CustomChannels/Update.hs+3−3

@@ -55,7 +55,7 @@ type CustomChannelsUpdateResource =

5555-- | Update a custom channel in the host AdSense account.

5656--

5757-- /See:/ 'customChannelsUpdate' smart constructor.

58−data CustomChannelsUpdate = CustomChannelsUpdate

58+data CustomChannelsUpdate = CustomChannelsUpdate'

5959 { _ccuPayload :: !CustomChannel

6060 , _ccuAdClientId :: !Text

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

@@ -72,7 +72,7 @@ customChannelsUpdate

7272 -> Text -- ^ 'ccuAdClientId'

7373 -> CustomChannelsUpdate

7474customChannelsUpdate pCcuPayload_ pCcuAdClientId_ =

75− CustomChannelsUpdate

75+ CustomChannelsUpdate'

7676 { _ccuPayload = pCcuPayload_

7777 , _ccuAdClientId = pCcuAdClientId_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest CustomChannelsUpdate where

9292 type Rs CustomChannelsUpdate = CustomChannel

9393 type Scopes CustomChannelsUpdate =

9494 '["https://www.googleapis.com/auth/adsensehost"]

95− requestClient CustomChannelsUpdate{..}

95+ requestClient CustomChannelsUpdate'{..}

9696 = go _ccuAdClientId (Just AltJSON) _ccuPayload

9797 adSenseHostService

9898 where go

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

@@ -71,7 +71,7 @@ type ReportsGenerateResource =

7171-- specify \"alt=csv\" as a query parameter.

7272--

7373-- /See:/ 'reportsGenerate' smart constructor.

74−data ReportsGenerate = ReportsGenerate

74+data ReportsGenerate = ReportsGenerate'

7575 { _rgDimension :: !(Maybe [Text])

7676 , _rgLocale :: !(Maybe Text)

7777 , _rgEndDate :: !Text

@@ -109,7 +109,7 @@ reportsGenerate

109109 -> Text -- ^ 'rgStartDate'

110110 -> ReportsGenerate

111111reportsGenerate pRgEndDate_ pRgStartDate_ =

112− ReportsGenerate

112+ ReportsGenerate'

113113 { _rgDimension = Nothing

114114 , _rgLocale = Nothing

115115 , _rgEndDate = pRgEndDate_

@@ -182,7 +182,7 @@ instance GoogleRequest ReportsGenerate where

182182 type Rs ReportsGenerate = Report

183183 type Scopes ReportsGenerate =

184184 '["https://www.googleapis.com/auth/adsensehost"]

185− requestClient ReportsGenerate{..}

185+ requestClient ReportsGenerate'{..}

186186 = go (Just _rgStartDate) (Just _rgEndDate)

187187 (_rgDimension ^. _Default)

188188 _rgLocale

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs+3−3

@@ -54,7 +54,7 @@ type URLChannelsDeleteResource =

5454-- | Delete a URL channel from the host AdSense account.

5555--

5656-- /See:/ 'urlChannelsDelete' smart constructor.

57−data URLChannelsDelete = URLChannelsDelete

57+data URLChannelsDelete = URLChannelsDelete'

5858 { _ucdURLChannelId :: !Text

5959 , _ucdAdClientId :: !Text

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

@@ -71,7 +71,7 @@ urlChannelsDelete

7171 -> Text -- ^ 'ucdAdClientId'

7272 -> URLChannelsDelete

7373urlChannelsDelete pUcdURLChannelId_ pUcdAdClientId_ =

74− URLChannelsDelete

74+ URLChannelsDelete'

7575 { _ucdURLChannelId = pUcdURLChannelId_

7676 , _ucdAdClientId = pUcdAdClientId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest URLChannelsDelete where

9292 type Rs URLChannelsDelete = URLChannel

9393 type Scopes URLChannelsDelete =

9494 '["https://www.googleapis.com/auth/adsensehost"]

95− requestClient URLChannelsDelete{..}

95+ requestClient URLChannelsDelete'{..}

9696 = go _ucdAdClientId _ucdURLChannelId (Just AltJSON)

9797 adSenseHostService

9898 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs+3−3

@@ -54,7 +54,7 @@ type URLChannelsInsertResource =

5454-- | Add a new URL channel to the host AdSense account.

5555--

5656-- /See:/ 'urlChannelsInsert' smart constructor.

57−data URLChannelsInsert = URLChannelsInsert

57+data URLChannelsInsert = URLChannelsInsert'

5858 { _uciPayload :: !URLChannel

5959 , _uciAdClientId :: !Text

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

@@ -71,7 +71,7 @@ urlChannelsInsert

7171 -> Text -- ^ 'uciAdClientId'

7272 -> URLChannelsInsert

7373urlChannelsInsert pUciPayload_ pUciAdClientId_ =

74− URLChannelsInsert

74+ URLChannelsInsert'

7575 { _uciPayload = pUciPayload_

7676 , _uciAdClientId = pUciAdClientId_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest URLChannelsInsert where

9191 type Rs URLChannelsInsert = URLChannel

9292 type Scopes URLChannelsInsert =

9393 '["https://www.googleapis.com/auth/adsensehost"]

94− requestClient URLChannelsInsert{..}

94+ requestClient URLChannelsInsert'{..}

9595 = go _uciAdClientId (Just AltJSON) _uciPayload

9696 adSenseHostService

9797 where go

gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs+3−3

@@ -56,7 +56,7 @@ type URLChannelsListResource =

5656-- | List all host URL channels in the host AdSense account.

5757--

5858-- /See:/ 'urlChannelsList' smart constructor.

59−data URLChannelsList = URLChannelsList

59+data URLChannelsList = URLChannelsList'

6060 { _uclAdClientId :: !Text

6161 , _uclPageToken :: !(Maybe Text)

6262 , _uclMaxResults :: !(Maybe (Textual Word32))

@@ -75,7 +75,7 @@ urlChannelsList

7575 :: Text -- ^ 'uclAdClientId'

7676 -> URLChannelsList

7777urlChannelsList pUclAdClientId_ =

78− URLChannelsList

78+ URLChannelsList'

7979 { _uclAdClientId = pUclAdClientId_

8080 , _uclPageToken = Nothing

8181 , _uclMaxResults = Nothing

@@ -106,7 +106,7 @@ instance GoogleRequest URLChannelsList where

106106 type Rs URLChannelsList = URLChannels

107107 type Scopes URLChannelsList =

108108 '["https://www.googleapis.com/auth/adsensehost"]

109− requestClient URLChannelsList{..}

109+ requestClient URLChannelsList'{..}

110110 = go _uclAdClientId _uclPageToken _uclMaxResults

111111 (Just AltJSON)

112112 adSenseHostService

gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+124−124

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

2222

2323--

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

25−data AdClients = AdClients

25+data AdClients = AdClients'

2626 { _acEtag :: !(Maybe Text)

2727 , _acNextPageToken :: !(Maybe Text)

2828 , _acKind :: !Text

@@ -43,7 +43,7 @@ data AdClients = AdClients

4343adClients

4444 :: AdClients

4545adClients =

46− AdClients

46+ AdClients'

4747 { _acEtag = Nothing

4848 , _acNextPageToken = Nothing

4949 , _acKind = "adsense#adClients"

@@ -75,13 +75,13 @@ instance FromJSON AdClients where

7575 parseJSON

7676 = withObject "AdClients"

7777 (\ o ->

78− AdClients <$>

78+ AdClients' <$>

7979 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

8080 (o .:? "kind" .!= "adsense#adClients")

8181 <*> (o .:? "items" .!= mempty))

8282

8383instance ToJSON AdClients where

84− toJSON AdClients{..}

84+ toJSON AdClients'{..}

8585 = object

8686 (catMaybes

8787 [("etag" .=) <$> _acEtag,

@@ -90,7 +90,7 @@ instance ToJSON AdClients where

9090

9191--

9292-- /See:/ 'reportingMetadataEntry' smart constructor.

93−data ReportingMetadataEntry = ReportingMetadataEntry

93+data ReportingMetadataEntry = ReportingMetadataEntry'

9494 { _rmeKind :: !Text

9595 , _rmeRequiredMetrics :: !(Maybe [Text])

9696 , _rmeCompatibleMetrics :: !(Maybe [Text])

@@ -120,7 +120,7 @@ data ReportingMetadataEntry = ReportingMetadataEntry

120120reportingMetadataEntry

121121 :: ReportingMetadataEntry

122122reportingMetadataEntry =

123− ReportingMetadataEntry

123+ ReportingMetadataEntry'

124124 { _rmeKind = "adsense#reportingMetadataEntry"

125125 , _rmeRequiredMetrics = Nothing

126126 , _rmeCompatibleMetrics = Nothing

@@ -193,7 +193,7 @@ instance FromJSON ReportingMetadataEntry where

193193 parseJSON

194194 = withObject "ReportingMetadataEntry"

195195 (\ o ->

196− ReportingMetadataEntry <$>

196+ ReportingMetadataEntry' <$>

197197 (o .:? "kind" .!= "adsense#reportingMetadataEntry")

198198 <*> (o .:? "requiredMetrics" .!= mempty)

199199 <*> (o .:? "compatibleMetrics" .!= mempty)

@@ -203,7 +203,7 @@ instance FromJSON ReportingMetadataEntry where

203203 <*> (o .:? "supportedProducts" .!= mempty))

204204

205205instance ToJSON ReportingMetadataEntry where

206− toJSON ReportingMetadataEntry{..}

206+ toJSON ReportingMetadataEntry'{..}

207207 = object

208208 (catMaybes

209209 [Just ("kind" .= _rmeKind),

@@ -217,7 +217,7 @@ instance ToJSON ReportingMetadataEntry where

217217

218218--

219219-- /See:/ 'adsenseReportsGenerateResponseHeadersItem' smart constructor.

220−data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseHeadersItem

220+data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseHeadersItem'

221221 { _argrhiName :: !(Maybe Text)

222222 , _argrhiCurrency :: !(Maybe Text)

223223 , _argrhiType :: !(Maybe Text)

@@ -235,7 +235,7 @@ data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseH

235235adsenseReportsGenerateResponseHeadersItem

236236 :: AdsenseReportsGenerateResponseHeadersItem

237237adsenseReportsGenerateResponseHeadersItem =

238− AdsenseReportsGenerateResponseHeadersItem

238+ AdsenseReportsGenerateResponseHeadersItem'

239239 { _argrhiName = Nothing

240240 , _argrhiCurrency = Nothing

241241 , _argrhiType = Nothing

@@ -265,13 +265,13 @@ instance FromJSON

265265 = withObject

266266 "AdsenseReportsGenerateResponseHeadersItem"

267267 (\ o ->

268− AdsenseReportsGenerateResponseHeadersItem <$>

268+ AdsenseReportsGenerateResponseHeadersItem' <$>

269269 (o .:? "name") <*> (o .:? "currency") <*>

270270 (o .:? "type"))

271271

272272instance ToJSON

273273 AdsenseReportsGenerateResponseHeadersItem where

274− toJSON AdsenseReportsGenerateResponseHeadersItem{..}

274+ toJSON AdsenseReportsGenerateResponseHeadersItem'{..}

275275 = object

276276 (catMaybes

277277 [("name" .=) <$> _argrhiName,

@@ -280,7 +280,7 @@ instance ToJSON

280280

281281--

282282-- /See:/ 'payment' smart constructor.

283−data Payment = Payment

283+data Payment = Payment'

284284 { _pPaymentAmountCurrencyCode :: !(Maybe Text)

285285 , _pKind :: !Text

286286 , _pPaymentDate :: !(Maybe Text)

@@ -304,7 +304,7 @@ data Payment = Payment

304304payment

305305 :: Payment

306306payment =

307− Payment

307+ Payment'

308308 { _pPaymentAmountCurrencyCode = Nothing

309309 , _pKind = "adsense#payment"

310310 , _pPaymentDate = Nothing

@@ -342,7 +342,7 @@ instance FromJSON Payment where

342342 parseJSON

343343 = withObject "Payment"

344344 (\ o ->

345− Payment <$>

345+ Payment' <$>

346346 (o .:? "paymentAmountCurrencyCode") <*>

347347 (o .:? "kind" .!= "adsense#payment")

348348 <*> (o .:? "paymentDate")

@@ -350,7 +350,7 @@ instance FromJSON Payment where

350350 <*> (o .:? "paymentAmount"))

351351

352352instance ToJSON Payment where

353− toJSON Payment{..}

353+ toJSON Payment'{..}

354354 = object

355355 (catMaybes

356356 [("paymentAmountCurrencyCode" .=) <$>

@@ -362,7 +362,7 @@ instance ToJSON Payment where

362362

363363--

364364-- /See:/ 'accounts' smart constructor.

365−data Accounts = Accounts

365+data Accounts = Accounts'

366366 { _aEtag :: !(Maybe Text)

367367 , _aNextPageToken :: !(Maybe Text)

368368 , _aKind :: !Text

@@ -383,7 +383,7 @@ data Accounts = Accounts

383383accounts

384384 :: Accounts

385385accounts =

386− Accounts

386+ Accounts'

387387 { _aEtag = Nothing

388388 , _aNextPageToken = Nothing

389389 , _aKind = "adsense#accounts"

@@ -415,13 +415,13 @@ instance FromJSON Accounts where

415415 parseJSON

416416 = withObject "Accounts"

417417 (\ o ->

418− Accounts <$>

418+ Accounts' <$>

419419 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

420420 (o .:? "kind" .!= "adsense#accounts")

421421 <*> (o .:? "items" .!= mempty))

422422

423423instance ToJSON Accounts where

424− toJSON Accounts{..}

424+ toJSON Accounts'{..}

425425 = object

426426 (catMaybes

427427 [("etag" .=) <$> _aEtag,

@@ -430,7 +430,7 @@ instance ToJSON Accounts where

430430

431431--

432432-- /See:/ 'alerts' smart constructor.

433−data Alerts = Alerts

433+data Alerts = Alerts'

434434 { _aleKind :: !Text

435435 , _aleItems :: !(Maybe [Alert])

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

@@ -445,7 +445,7 @@ data Alerts = Alerts

445445alerts

446446 :: Alerts

447447alerts =

448− Alerts

448+ Alerts'

449449 { _aleKind = "adsense#alerts"

450450 , _aleItems = Nothing

451451 }

@@ -465,12 +465,12 @@ instance FromJSON Alerts where

465465 parseJSON

466466 = withObject "Alerts"

467467 (\ o ->

468− Alerts <$>

468+ Alerts' <$>

469469 (o .:? "kind" .!= "adsense#alerts") <*>

470470 (o .:? "items" .!= mempty))

471471

472472instance ToJSON Alerts where

473− toJSON Alerts{..}

473+ toJSON Alerts'{..}

474474 = object

475475 (catMaybes

476476 [Just ("kind" .= _aleKind),

@@ -478,7 +478,7 @@ instance ToJSON Alerts where

478478

479479--

480480-- /See:/ 'savedReports' smart constructor.

481−data SavedReports = SavedReports

481+data SavedReports = SavedReports'

482482 { _srEtag :: !(Maybe Text)

483483 , _srNextPageToken :: !(Maybe Text)

484484 , _srKind :: !Text

@@ -499,7 +499,7 @@ data SavedReports = SavedReports

499499savedReports

500500 :: SavedReports

501501savedReports =

502− SavedReports

502+ SavedReports'

503503 { _srEtag = Nothing

504504 , _srNextPageToken = Nothing

505505 , _srKind = "adsense#savedReports"

@@ -532,13 +532,13 @@ instance FromJSON SavedReports where

532532 parseJSON

533533 = withObject "SavedReports"

534534 (\ o ->

535− SavedReports <$>

535+ SavedReports' <$>

536536 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

537537 (o .:? "kind" .!= "adsense#savedReports")

538538 <*> (o .:? "items" .!= mempty))

539539

540540instance ToJSON SavedReports where

541− toJSON SavedReports{..}

541+ toJSON SavedReports'{..}

542542 = object

543543 (catMaybes

544544 [("etag" .=) <$> _srEtag,

@@ -547,7 +547,7 @@ instance ToJSON SavedReports where

547547

548548--

549549-- /See:/ 'adUnits' smart constructor.

550−data AdUnits = AdUnits

550+data AdUnits = AdUnits'

551551 { _auEtag :: !(Maybe Text)

552552 , _auNextPageToken :: !(Maybe Text)

553553 , _auKind :: !Text

@@ -568,7 +568,7 @@ data AdUnits = AdUnits

568568adUnits

569569 :: AdUnits

570570adUnits =

571− AdUnits

571+ AdUnits'

572572 { _auEtag = Nothing

573573 , _auNextPageToken = Nothing

574574 , _auKind = "adsense#adUnits"

@@ -600,13 +600,13 @@ instance FromJSON AdUnits where

600600 parseJSON

601601 = withObject "AdUnits"

602602 (\ o ->

603− AdUnits <$>

603+ AdUnits' <$>

604604 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

605605 (o .:? "kind" .!= "adsense#adUnits")

606606 <*> (o .:? "items" .!= mempty))

607607

608608instance ToJSON AdUnits where

609− toJSON AdUnits{..}

609+ toJSON AdUnits'{..}

610610 = object

611611 (catMaybes

612612 [("etag" .=) <$> _auEtag,

@@ -615,7 +615,7 @@ instance ToJSON AdUnits where

615615

616616--

617617-- /See:/ 'savedReport' smart constructor.

618−data SavedReport = SavedReport

618+data SavedReport = SavedReport'

619619 { _sKind :: !Text

620620 , _sName :: !(Maybe Text)

621621 , _sId :: !(Maybe Text)

@@ -633,7 +633,7 @@ data SavedReport = SavedReport

633633savedReport

634634 :: SavedReport

635635savedReport =

636− SavedReport

636+ SavedReport'

637637 { _sKind = "adsense#savedReport"

638638 , _sName = Nothing

639639 , _sId = Nothing

@@ -655,13 +655,13 @@ instance FromJSON SavedReport where

655655 parseJSON

656656 = withObject "SavedReport"

657657 (\ o ->

658− SavedReport <$>

658+ SavedReport' <$>

659659 (o .:? "kind" .!= "adsense#savedReport") <*>

660660 (o .:? "name")

661661 <*> (o .:? "id"))

662662

663663instance ToJSON SavedReport where

664− toJSON SavedReport{..}

664+ toJSON SavedReport'{..}

665665 = object

666666 (catMaybes

667667 [Just ("kind" .= _sKind), ("name" .=) <$> _sName,

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

669669

670670--

671671-- /See:/ 'urlChannels' smart constructor.

672−data URLChannels = URLChannels

672+data URLChannels = URLChannels'

673673 { _ucEtag :: !(Maybe Text)

674674 , _ucNextPageToken :: !(Maybe Text)

675675 , _ucKind :: !Text

@@ -690,7 +690,7 @@ data URLChannels = URLChannels

690690urlChannels

691691 :: URLChannels

692692urlChannels =

693− URLChannels

693+ URLChannels'

694694 { _ucEtag = Nothing

695695 , _ucNextPageToken = Nothing

696696 , _ucKind = "adsense#urlChannels"

@@ -723,13 +723,13 @@ instance FromJSON URLChannels where

723723 parseJSON

724724 = withObject "URLChannels"

725725 (\ o ->

726− URLChannels <$>

726+ URLChannels' <$>

727727 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

728728 (o .:? "kind" .!= "adsense#urlChannels")

729729 <*> (o .:? "items" .!= mempty))

730730

731731instance ToJSON URLChannels where

732− toJSON URLChannels{..}

732+ toJSON URLChannels'{..}

733733 = object

734734 (catMaybes

735735 [("etag" .=) <$> _ucEtag,

@@ -738,7 +738,7 @@ instance ToJSON URLChannels where

738738

739739--

740740-- /See:/ 'customChannels' smart constructor.

741−data CustomChannels = CustomChannels

741+data CustomChannels = CustomChannels'

742742 { _ccEtag :: !(Maybe Text)

743743 , _ccNextPageToken :: !(Maybe Text)

744744 , _ccKind :: !Text

@@ -759,7 +759,7 @@ data CustomChannels = CustomChannels

759759customChannels

760760 :: CustomChannels

761761customChannels =

762− CustomChannels

762+ CustomChannels'

763763 { _ccEtag = Nothing

764764 , _ccNextPageToken = Nothing

765765 , _ccKind = "adsense#customChannels"

@@ -792,13 +792,13 @@ instance FromJSON CustomChannels where

792792 parseJSON

793793 = withObject "CustomChannels"

794794 (\ o ->

795− CustomChannels <$>

795+ CustomChannels' <$>

796796 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

797797 (o .:? "kind" .!= "adsense#customChannels")

798798 <*> (o .:? "items" .!= mempty))

799799

800800instance ToJSON CustomChannels where

801− toJSON CustomChannels{..}

801+ toJSON CustomChannels'{..}

802802 = object

803803 (catMaybes

804804 [("etag" .=) <$> _ccEtag,

@@ -807,7 +807,7 @@ instance ToJSON CustomChannels where

807807

808808--

809809-- /See:/ 'adUnit' smart constructor.

810−data AdUnit = AdUnit

810+data AdUnit = AdUnit'

811811 { _auuStatus :: !(Maybe Text)

812812 , _auuMobileContentAdsSettings :: !(Maybe AdUnitMobileContentAdsSettings)

813813 , _auuKind :: !Text

@@ -846,7 +846,7 @@ data AdUnit = AdUnit

846846adUnit

847847 :: AdUnit

848848adUnit =

849− AdUnit

849+ AdUnit'

850850 { _auuStatus = Nothing

851851 , _auuMobileContentAdsSettings = Nothing

852852 , _auuKind = "adsense#adUnit"

@@ -920,7 +920,7 @@ instance FromJSON AdUnit where

920920 parseJSON

921921 = withObject "AdUnit"

922922 (\ o ->

923− AdUnit <$>

923+ AdUnit' <$>

924924 (o .:? "status") <*>

925925 (o .:? "mobileContentAdsSettings")

926926 <*> (o .:? "kind" .!= "adsense#adUnit")

@@ -933,7 +933,7 @@ instance FromJSON AdUnit where

933933 <*> (o .:? "id"))

934934

935935instance ToJSON AdUnit where

936− toJSON AdUnit{..}

936+ toJSON AdUnit'{..}

937937 = object

938938 (catMaybes

939939 [("status" .=) <$> _auuStatus,

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

949949

950950--

951951-- /See:/ 'alert' smart constructor.

952−data Alert = Alert

952+data Alert = Alert'

953953 { _aaIsDismissible :: !(Maybe Bool)

954954 , _aaKind :: !Text

955955 , _aaSeverity :: !(Maybe Text)

@@ -976,7 +976,7 @@ data Alert = Alert

976976alert

977977 :: Alert

978978alert =

979− Alert

979+ Alert'

980980 { _aaIsDismissible = Nothing

981981 , _aaKind = "adsense#alert"

982982 , _aaSeverity = Nothing

@@ -1020,7 +1020,7 @@ instance FromJSON Alert where

10201020 parseJSON

10211021 = withObject "Alert"

10221022 (\ o ->

1023− Alert <$>

1023+ Alert' <$>

10241024 (o .:? "isDismissible") <*>

10251025 (o .:? "kind" .!= "adsense#alert")

10261026 <*> (o .:? "severity")

@@ -1029,7 +1029,7 @@ instance FromJSON Alert where

10291029 <*> (o .:? "message"))

10301030

10311031instance ToJSON Alert where

1032− toJSON Alert{..}

1032+ toJSON Alert'{..}

10331033 = object

10341034 (catMaybes

10351035 [("isDismissible" .=) <$> _aaIsDismissible,

@@ -1041,7 +1041,7 @@ instance ToJSON Alert where

10411041-- | The font which is included in the style.

10421042--

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

1044−data AdStyleFont = AdStyleFont

1044+data AdStyleFont = AdStyleFont'

10451045 { _asfSize :: !(Maybe Text)

10461046 , _asfFamily :: !(Maybe Text)

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

@@ -1056,7 +1056,7 @@ data AdStyleFont = AdStyleFont

10561056adStyleFont

10571057 :: AdStyleFont

10581058adStyleFont =

1059− AdStyleFont

1059+ AdStyleFont'

10601060 { _asfSize = Nothing

10611061 , _asfFamily = Nothing

10621062 }

@@ -1074,10 +1074,10 @@ instance FromJSON AdStyleFont where

10741074 parseJSON

10751075 = withObject "AdStyleFont"

10761076 (\ o ->

1077− AdStyleFont <$> (o .:? "size") <*> (o .:? "family"))

1077+ AdStyleFont' <$> (o .:? "size") <*> (o .:? "family"))

10781078

10791079instance ToJSON AdStyleFont where

1080− toJSON AdStyleFont{..}

1080+ toJSON AdStyleFont'{..}

10811081 = object

10821082 (catMaybes

10831083 [("size" .=) <$> _asfSize,

@@ -1085,7 +1085,7 @@ instance ToJSON AdStyleFont where

10851085

10861086--

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

1088−data Account = Account

1088+data Account = Account'

10891089 { _accKind :: !Text

10901090 , _accCreationTime :: !(Maybe (Textual Int64))

10911091 , _accPremium :: !(Maybe Bool)

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

11151115account

11161116 :: Account

11171117account =

1118− Account

1118+ Account'

11191119 { _accKind = "adsense#account"

11201120 , _accCreationTime = Nothing

11211121 , _accPremium = Nothing

@@ -1165,7 +1165,7 @@ instance FromJSON Account where

11651165 parseJSON

11661166 = withObject "Account"

11671167 (\ o ->

1168− Account <$>

1168+ Account' <$>

11691169 (o .:? "kind" .!= "adsense#account") <*>

11701170 (o .:? "creation_time")

11711171 <*> (o .:? "premium")

@@ -1175,7 +1175,7 @@ instance FromJSON Account where

11751175 <*> (o .:? "subAccounts" .!= mempty))

11761176

11771177instance ToJSON Account where

1178− toJSON Account{..}

1178+ toJSON Account'{..}

11791179 = object

11801180 (catMaybes

11811181 [Just ("kind" .= _accKind),

@@ -1188,7 +1188,7 @@ instance ToJSON Account where

11881188-- | Settings specific to WAP mobile content ads (AFMC) - deprecated.

11891189--

11901190-- /See:/ 'adUnitMobileContentAdsSettings' smart constructor.

1191−data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

1191+data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings'

11921192 { _aumcasSize :: !(Maybe Text)

11931193 , _aumcasScriptingLanguage :: !(Maybe Text)

11941194 , _aumcasMarkupLanguage :: !(Maybe Text)

@@ -1209,7 +1209,7 @@ data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings

12091209adUnitMobileContentAdsSettings

12101210 :: AdUnitMobileContentAdsSettings

12111211adUnitMobileContentAdsSettings =

1212− AdUnitMobileContentAdsSettings

1212+ AdUnitMobileContentAdsSettings'

12131213 { _aumcasSize = Nothing

12141214 , _aumcasScriptingLanguage = Nothing

12151215 , _aumcasMarkupLanguage = Nothing

@@ -1243,13 +1243,13 @@ instance FromJSON AdUnitMobileContentAdsSettings

12431243 parseJSON

12441244 = withObject "AdUnitMobileContentAdsSettings"

12451245 (\ o ->

1246− AdUnitMobileContentAdsSettings <$>

1246+ AdUnitMobileContentAdsSettings' <$>

12471247 (o .:? "size") <*> (o .:? "scriptingLanguage") <*>

12481248 (o .:? "markupLanguage")

12491249 <*> (o .:? "type"))

12501250

12511251instance ToJSON AdUnitMobileContentAdsSettings where

1252− toJSON AdUnitMobileContentAdsSettings{..}

1252+ toJSON AdUnitMobileContentAdsSettings'{..}

12531253 = object

12541254 (catMaybes

12551255 [("size" .=) <$> _aumcasSize,

@@ -1260,7 +1260,7 @@ instance ToJSON AdUnitMobileContentAdsSettings where

12601260

12611261--

12621262-- /See:/ 'savedAdStyles' smart constructor.

1263−data SavedAdStyles = SavedAdStyles

1263+data SavedAdStyles = SavedAdStyles'

12641264 { _sasEtag :: !(Maybe Text)

12651265 , _sasNextPageToken :: !(Maybe Text)

12661266 , _sasKind :: !Text

@@ -1281,7 +1281,7 @@ data SavedAdStyles = SavedAdStyles

12811281savedAdStyles

12821282 :: SavedAdStyles

12831283savedAdStyles =

1284− SavedAdStyles

1284+ SavedAdStyles'

12851285 { _sasEtag = Nothing

12861286 , _sasNextPageToken = Nothing

12871287 , _sasKind = "adsense#savedAdStyles"

@@ -1314,13 +1314,13 @@ instance FromJSON SavedAdStyles where

13141314 parseJSON

13151315 = withObject "SavedAdStyles"

13161316 (\ o ->

1317− SavedAdStyles <$>

1317+ SavedAdStyles' <$>

13181318 (o .:? "etag") <*> (o .:? "nextPageToken") <*>

13191319 (o .:? "kind" .!= "adsense#savedAdStyles")

13201320 <*> (o .:? "items" .!= mempty))

13211321

13221322instance ToJSON SavedAdStyles where

1323− toJSON SavedAdStyles{..}

1323+ toJSON SavedAdStyles'{..}

13241324 = object

13251325 (catMaybes

13261326 [("etag" .=) <$> _sasEtag,

@@ -1333,7 +1333,7 @@ instance ToJSON SavedAdStyles where

13331333-- leading hash.

13341334--

13351335-- /See:/ 'adStyleColors' smart constructor.

1336−data AdStyleColors = AdStyleColors

1336+data AdStyleColors = AdStyleColors'

13371337 { _ascText :: !(Maybe Text)

13381338 , _ascURL :: !(Maybe Text)

13391339 , _ascBOrder :: !(Maybe Text)

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

13571357adStyleColors

13581358 :: AdStyleColors

13591359adStyleColors =

1360− AdStyleColors

1360+ AdStyleColors'

13611361 { _ascText = Nothing

13621362 , _ascURL = Nothing

13631363 , _ascBOrder = Nothing

@@ -1392,13 +1392,13 @@ instance FromJSON AdStyleColors where

13921392 parseJSON

13931393 = withObject "AdStyleColors"

13941394 (\ o ->

1395− AdStyleColors <$>

1395+ AdStyleColors' <$>

13961396 (o .:? "text") <*> (o .:? "url") <*> (o .:? "border")

13971397 <*> (o .:? "title")

13981398 <*> (o .:? "background"))

13991399

14001400instance ToJSON AdStyleColors where

1401− toJSON AdStyleColors{..}

1401+ toJSON AdStyleColors'{..}

14021402 = object

14031403 (catMaybes

14041404 [("text" .=) <$> _ascText, ("url" .=) <$> _ascURL,

@@ -1409,7 +1409,7 @@ instance ToJSON AdStyleColors where

14091409-- | The backup option to be used in instances where no ad is available.

14101410--

14111411-- /See:/ 'adUnitContentAdsSettingsBackupOption' smart constructor.

1412−data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

1412+data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption'

14131413 { _aucasboColor :: !(Maybe Text)

14141414 , _aucasboURL :: !(Maybe Text)

14151415 , _aucasboType :: !(Maybe Text)

@@ -1427,7 +1427,7 @@ data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption

14271427adUnitContentAdsSettingsBackupOption

14281428 :: AdUnitContentAdsSettingsBackupOption

14291429adUnitContentAdsSettingsBackupOption =

1430− AdUnitContentAdsSettingsBackupOption

1430+ AdUnitContentAdsSettingsBackupOption'

14311431 { _aucasboColor = Nothing

14321432 , _aucasboURL = Nothing

14331433 , _aucasboType = Nothing

@@ -1453,12 +1453,12 @@ instance FromJSON

14531453 parseJSON

14541454 = withObject "AdUnitContentAdsSettingsBackupOption"

14551455 (\ o ->

1456− AdUnitContentAdsSettingsBackupOption <$>

1456+ AdUnitContentAdsSettingsBackupOption' <$>

14571457 (o .:? "color") <*> (o .:? "url") <*> (o .:? "type"))

14581458

14591459instance ToJSON AdUnitContentAdsSettingsBackupOption

14601460 where

1461− toJSON AdUnitContentAdsSettingsBackupOption{..}

1461+ toJSON AdUnitContentAdsSettingsBackupOption'{..}

14621462 = object

14631463 (catMaybes

14641464 [("color" .=) <$> _aucasboColor,

@@ -1467,7 +1467,7 @@ instance ToJSON AdUnitContentAdsSettingsBackupOption

14671467

14681468--

14691469-- /See:/ 'adClient' smart constructor.

1470−data AdClient = AdClient

1470+data AdClient = AdClient'

14711471 { _adKind :: !Text

14721472 , _adArcOptIn :: !(Maybe Bool)

14731473 , _adSupportsReporting :: !(Maybe Bool)

@@ -1491,7 +1491,7 @@ data AdClient = AdClient

14911491adClient

14921492 :: AdClient

14931493adClient =

1494− AdClient

1494+ AdClient'

14951495 { _adKind = "adsense#adClient"

14961496 , _adArcOptIn = Nothing

14971497 , _adSupportsReporting = Nothing

@@ -1529,7 +1529,7 @@ instance FromJSON AdClient where

15291529 parseJSON

15301530 = withObject "AdClient"

15311531 (\ o ->

1532− AdClient <$>

1532+ AdClient' <$>

15331533 (o .:? "kind" .!= "adsense#adClient") <*>

15341534 (o .:? "arcOptIn")

15351535 <*> (o .:? "supportsReporting")

@@ -1537,7 +1537,7 @@ instance FromJSON AdClient where

15371537 <*> (o .:? "productCode"))

15381538

15391539instance ToJSON AdClient where

1540− toJSON AdClient{..}

1540+ toJSON AdClient'{..}

15411541 = object

15421542 (catMaybes

15431543 [Just ("kind" .= _adKind),

@@ -1548,7 +1548,7 @@ instance ToJSON AdClient where

15481548

15491549--

15501550-- /See:/ 'savedAdStyle' smart constructor.

1551−data SavedAdStyle = SavedAdStyle

1551+data SavedAdStyle = SavedAdStyle'

15521552 { _savKind :: !Text

15531553 , _savName :: !(Maybe Text)

15541554 , _savAdStyle :: !(Maybe AdStyle)

@@ -1569,7 +1569,7 @@ data SavedAdStyle = SavedAdStyle

15691569savedAdStyle

15701570 :: SavedAdStyle

15711571savedAdStyle =

1572− SavedAdStyle

1572+ SavedAdStyle'

15731573 { _savKind = "adsense#savedAdStyle"

15741574 , _savName = Nothing

15751575 , _savAdStyle = Nothing

@@ -1599,14 +1599,14 @@ instance FromJSON SavedAdStyle where

15991599 parseJSON

16001600 = withObject "SavedAdStyle"

16011601 (\ o ->

1602− SavedAdStyle <$>

1602+ SavedAdStyle' <$>

16031603 (o .:? "kind" .!= "adsense#savedAdStyle") <*>

16041604 (o .:? "name")

16051605 <*> (o .:? "adStyle")

16061606 <*> (o .:? "id"))

16071607

16081608instance ToJSON SavedAdStyle where

1609− toJSON SavedAdStyle{..}

1609+ toJSON SavedAdStyle'{..}

16101610 = object

16111611 (catMaybes

16121612 [Just ("kind" .= _savKind), ("name" .=) <$> _savName,

@@ -1616,7 +1616,7 @@ instance ToJSON SavedAdStyle where

16161616-- | The targeting information of this custom channel, if activated.

16171617--

16181618-- /See:/ 'customChannelTargetingInfo' smart constructor.

1619−data CustomChannelTargetingInfo = CustomChannelTargetingInfo

1619+data CustomChannelTargetingInfo = CustomChannelTargetingInfo'

16201620 { _cctiLocation :: !(Maybe Text)

16211621 , _cctiSiteLanguage :: !(Maybe Text)

16221622 , _cctiAdsAppearOn :: !(Maybe Text)

@@ -1637,7 +1637,7 @@ data CustomChannelTargetingInfo = CustomChannelTargetingInfo

16371637customChannelTargetingInfo

16381638 :: CustomChannelTargetingInfo

16391639customChannelTargetingInfo =

1640− CustomChannelTargetingInfo

1640+ CustomChannelTargetingInfo'

16411641 { _cctiLocation = Nothing

16421642 , _cctiSiteLanguage = Nothing

16431643 , _cctiAdsAppearOn = Nothing

@@ -1676,13 +1676,13 @@ instance FromJSON CustomChannelTargetingInfo where

16761676 parseJSON

16771677 = withObject "CustomChannelTargetingInfo"

16781678 (\ o ->

1679− CustomChannelTargetingInfo <$>

1679+ CustomChannelTargetingInfo' <$>

16801680 (o .:? "location") <*> (o .:? "siteLanguage") <*>

16811681 (o .:? "adsAppearOn")

16821682 <*> (o .:? "description"))

16831683

16841684instance ToJSON CustomChannelTargetingInfo where

1685− toJSON CustomChannelTargetingInfo{..}

1685+ toJSON CustomChannelTargetingInfo'{..}

16861686 = object

16871687 (catMaybes

16881688 [("location" .=) <$> _cctiLocation,

@@ -1692,7 +1692,7 @@ instance ToJSON CustomChannelTargetingInfo where

16921692

16931693--

16941694-- /See:/ 'adStyle' smart constructor.

1695−data AdStyle = AdStyle

1695+data AdStyle = AdStyle'

16961696 { _asCorners :: !(Maybe Text)

16971697 , _asKind :: !Text

16981698 , _asFont :: !(Maybe AdStyleFont)

@@ -1713,7 +1713,7 @@ data AdStyle = AdStyle

17131713adStyle

17141714 :: AdStyle

17151715adStyle =

1716− AdStyle

1716+ AdStyle'

17171717 { _asCorners = Nothing

17181718 , _asKind = "adsense#adStyle"

17191719 , _asFont = Nothing

@@ -1743,14 +1743,14 @@ instance FromJSON AdStyle where

17431743 parseJSON

17441744 = withObject "AdStyle"

17451745 (\ o ->

1746− AdStyle <$>

1746+ AdStyle' <$>

17471747 (o .:? "corners") <*>

17481748 (o .:? "kind" .!= "adsense#adStyle")

17491749 <*> (o .:? "font")

17501750 <*> (o .:? "colors"))

17511751

17521752instance ToJSON AdStyle where

1753− toJSON AdStyle{..}

1753+ toJSON AdStyle'{..}

17541754 = object

17551755 (catMaybes

17561756 [("corners" .=) <$> _asCorners,

@@ -1760,7 +1760,7 @@ instance ToJSON AdStyle where

17601760-- | Settings specific to feed ads (AFF) - deprecated.

17611761--

17621762-- /See:/ 'adUnitFeedAdsSettings' smart constructor.

1763−data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings

1763+data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings'

17641764 { _aufasFrequency :: !(Maybe (Textual Int32))

17651765 , _aufasAdPosition :: !(Maybe Text)

17661766 , _aufasType :: !(Maybe Text)

@@ -1781,7 +1781,7 @@ data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings

17811781adUnitFeedAdsSettings

17821782 :: AdUnitFeedAdsSettings

17831783adUnitFeedAdsSettings =

1784− AdUnitFeedAdsSettings

1784+ AdUnitFeedAdsSettings'

17851785 { _aufasFrequency = Nothing

17861786 , _aufasAdPosition = Nothing

17871787 , _aufasType = Nothing

@@ -1818,13 +1818,13 @@ instance FromJSON AdUnitFeedAdsSettings where

18181818 parseJSON

18191819 = withObject "AdUnitFeedAdsSettings"

18201820 (\ o ->

1821− AdUnitFeedAdsSettings <$>

1821+ AdUnitFeedAdsSettings' <$>

18221822 (o .:? "frequency") <*> (o .:? "adPosition") <*>

18231823 (o .:? "type")

18241824 <*> (o .:? "minimumWordCount"))

18251825

18261826instance ToJSON AdUnitFeedAdsSettings where

1827− toJSON AdUnitFeedAdsSettings{..}

1827+ toJSON AdUnitFeedAdsSettings'{..}

18281828 = object

18291829 (catMaybes

18301830 [("frequency" .=) <$> _aufasFrequency,

@@ -1834,7 +1834,7 @@ instance ToJSON AdUnitFeedAdsSettings where

18341834

18351835--

18361836-- /See:/ 'metadata' smart constructor.

1837−data Metadata = Metadata

1837+data Metadata = Metadata'

18381838 { _mKind :: !Text

18391839 , _mItems :: !(Maybe [ReportingMetadataEntry])

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

@@ -1849,7 +1849,7 @@ data Metadata = Metadata

18491849metadata

18501850 :: Metadata

18511851metadata =

1852− Metadata

1852+ Metadata'

18531853 { _mKind = "adsense#metadata"

18541854 , _mItems = Nothing

18551855 }

@@ -1867,19 +1867,19 @@ instance FromJSON Metadata where

18671867 parseJSON

18681868 = withObject "Metadata"

18691869 (\ o ->

1870− Metadata <$>

1870+ Metadata' <$>

18711871 (o .:? "kind" .!= "adsense#metadata") <*>

18721872 (o .:? "items" .!= mempty))

18731873

18741874instance ToJSON Metadata where

1875− toJSON Metadata{..}

1875+ toJSON Metadata'{..}

18761876 = object

18771877 (catMaybes

18781878 [Just ("kind" .= _mKind), ("items" .=) <$> _mItems])

18791879

18801880--

18811881-- /See:/ 'customChannel' smart constructor.

1882−data CustomChannel = CustomChannel

1882+data CustomChannel = CustomChannel'

18831883 { _cTargetingInfo :: !(Maybe CustomChannelTargetingInfo)

18841884 , _cKind :: !Text

18851885 , _cName :: !(Maybe Text)

@@ -1903,7 +1903,7 @@ data CustomChannel = CustomChannel

19031903customChannel

19041904 :: CustomChannel

19051905customChannel =

1906− CustomChannel

1906+ CustomChannel'

19071907 { _cTargetingInfo = Nothing

19081908 , _cKind = "adsense#customChannel"

19091909 , _cName = Nothing

@@ -1939,7 +1939,7 @@ instance FromJSON CustomChannel where

19391939 parseJSON

19401940 = withObject "CustomChannel"

19411941 (\ o ->

1942− CustomChannel <$>

1942+ CustomChannel' <$>

19431943 (o .:? "targetingInfo") <*>

19441944 (o .:? "kind" .!= "adsense#customChannel")

19451945 <*> (o .:? "name")

@@ -1947,7 +1947,7 @@ instance FromJSON CustomChannel where

19471947 <*> (o .:? "id"))

19481948

19491949instance ToJSON CustomChannel where

1950− toJSON CustomChannel{..}

1950+ toJSON CustomChannel'{..}

19511951 = object

19521952 (catMaybes

19531953 [("targetingInfo" .=) <$> _cTargetingInfo,

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

19561956

19571957--

19581958-- /See:/ 'urlChannel' smart constructor.

1959−data URLChannel = URLChannel

1959+data URLChannel = URLChannel'

19601960 { _urlcKind :: !Text

19611961 , _urlcId :: !(Maybe Text)

19621962 , _urlcURLPattern :: !(Maybe Text)

@@ -1974,7 +1974,7 @@ data URLChannel = URLChannel

19741974urlChannel

19751975 :: URLChannel

19761976urlChannel =

1977− URLChannel

1977+ URLChannel'

19781978 { _urlcKind = "adsense#urlChannel"

19791979 , _urlcId = Nothing

19801980 , _urlcURLPattern = Nothing

@@ -2001,13 +2001,13 @@ instance FromJSON URLChannel where

20012001 parseJSON

20022002 = withObject "URLChannel"

20032003 (\ o ->

2004− URLChannel <$>

2004+ URLChannel' <$>

20052005 (o .:? "kind" .!= "adsense#urlChannel") <*>

20062006 (o .:? "id")

20072007 <*> (o .:? "urlPattern"))

20082008

20092009instance ToJSON URLChannel where

2010− toJSON URLChannel{..}

2010+ toJSON URLChannel'{..}

20112011 = object

20122012 (catMaybes

20132013 [Just ("kind" .= _urlcKind), ("id" .=) <$> _urlcId,

@@ -2015,7 +2015,7 @@ instance ToJSON URLChannel where

20152015

20162016--

20172017-- /See:/ 'adCode' smart constructor.

2018−data AdCode = AdCode

2018+data AdCode = AdCode'

20192019 { _addKind :: !Text

20202020 , _addAdCode :: !(Maybe Text)

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

@@ -2030,7 +2030,7 @@ data AdCode = AdCode

20302030adCode

20312031 :: AdCode

20322032adCode =

2033− AdCode

2033+ AdCode'

20342034 { _addKind = "adsense#adCode"

20352035 , _addAdCode = Nothing

20362036 }

@@ -2048,12 +2048,12 @@ instance FromJSON AdCode where

20482048 parseJSON

20492049 = withObject "AdCode"

20502050 (\ o ->

2051− AdCode <$>

2051+ AdCode' <$>

20522052 (o .:? "kind" .!= "adsense#adCode") <*>

20532053 (o .:? "adCode"))

20542054

20552055instance ToJSON AdCode where

2056− toJSON AdCode{..}

2056+ toJSON AdCode'{..}

20572057 = object

20582058 (catMaybes

20592059 [Just ("kind" .= _addKind),

@@ -2061,7 +2061,7 @@ instance ToJSON AdCode where

20612061

20622062--

20632063-- /See:/ 'adsenseReportsGenerateResponse' smart constructor.

2064−data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse

2064+data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse'

20652065 { _argrKind :: !Text

20662066 , _argrAverages :: !(Maybe [Text])

20672067 , _argrEndDate :: !(Maybe Text)

@@ -2097,7 +2097,7 @@ data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse

20972097adsenseReportsGenerateResponse

20982098 :: AdsenseReportsGenerateResponse

20992099adsenseReportsGenerateResponse =

2100− AdsenseReportsGenerateResponse

2100+ AdsenseReportsGenerateResponse'

21012101 { _argrKind = "adsense#report"

21022102 , _argrAverages = Nothing

21032103 , _argrEndDate = Nothing

@@ -2180,7 +2180,7 @@ instance FromJSON AdsenseReportsGenerateResponse

21802180 parseJSON

21812181 = withObject "AdsenseReportsGenerateResponse"

21822182 (\ o ->

2183− AdsenseReportsGenerateResponse <$>

2183+ AdsenseReportsGenerateResponse' <$>

21842184 (o .:? "kind" .!= "adsense#report") <*>

21852185 (o .:? "averages" .!= mempty)

21862186 <*> (o .:? "endDate")

@@ -2192,7 +2192,7 @@ instance FromJSON AdsenseReportsGenerateResponse

21922192 <*> (o .:? "totalMatchedRows"))

21932193

21942194instance ToJSON AdsenseReportsGenerateResponse where

2195− toJSON AdsenseReportsGenerateResponse{..}

2195+ toJSON AdsenseReportsGenerateResponse'{..}

21962196 = object

21972197 (catMaybes

21982198 [Just ("kind" .= _argrKind),

@@ -2209,7 +2209,7 @@ instance ToJSON AdsenseReportsGenerateResponse where

22092209-- (AFMC - deprecated).

22102210--

22112211-- /See:/ 'adUnitContentAdsSettings' smart constructor.

2212−data AdUnitContentAdsSettings = AdUnitContentAdsSettings

2212+data AdUnitContentAdsSettings = AdUnitContentAdsSettings'

22132213 { _aucasBackupOption :: !(Maybe AdUnitContentAdsSettingsBackupOption)

22142214 , _aucasSize :: !(Maybe Text)

22152215 , _aucasType :: !(Maybe Text)

@@ -2227,7 +2227,7 @@ data AdUnitContentAdsSettings = AdUnitContentAdsSettings

22272227adUnitContentAdsSettings

22282228 :: AdUnitContentAdsSettings

22292229adUnitContentAdsSettings =

2230− AdUnitContentAdsSettings

2230+ AdUnitContentAdsSettings'

22312231 { _aucasBackupOption = Nothing

22322232 , _aucasSize = Nothing

22332233 , _aucasType = Nothing

@@ -2253,12 +2253,12 @@ instance FromJSON AdUnitContentAdsSettings where

22532253 parseJSON

22542254 = withObject "AdUnitContentAdsSettings"

22552255 (\ o ->

2256− AdUnitContentAdsSettings <$>

2256+ AdUnitContentAdsSettings' <$>

22572257 (o .:? "backupOption") <*> (o .:? "size") <*>

22582258 (o .:? "type"))

22592259

22602260instance ToJSON AdUnitContentAdsSettings where

2261− toJSON AdUnitContentAdsSettings{..}

2261+ toJSON AdUnitContentAdsSettings'{..}

22622262 = object

22632263 (catMaybes

22642264 [("backupOption" .=) <$> _aucasBackupOption,

@@ -2267,7 +2267,7 @@ instance ToJSON AdUnitContentAdsSettings where

22672267

22682268--

22692269-- /See:/ 'payments' smart constructor.

2270−data Payments = Payments

2270+data Payments = Payments'

22712271 { _payKind :: !Text

22722272 , _payItems :: !(Maybe [Payment])

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

@@ -2282,7 +2282,7 @@ data Payments = Payments

22822282payments

22832283 :: Payments

22842284payments =

2285− Payments

2285+ Payments'

22862286 { _payKind = "adsense#payments"

22872287 , _payItems = Nothing

22882288 }

@@ -2303,12 +2303,12 @@ instance FromJSON Payments where

23032303 parseJSON

23042304 = withObject "Payments"

23052305 (\ o ->

2306− Payments <$>

2306+ Payments' <$>

23072307 (o .:? "kind" .!= "adsense#payments") <*>

23082308 (o .:? "items" .!= mempty))

23092309

23102310instance ToJSON Payments where

2311− toJSON Payments{..}

2311+ toJSON Payments'{..}

23122312 = object

23132313 (catMaybes

23142314 [Just ("kind" .= _payKind),

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs+3−3

@@ -56,7 +56,7 @@ type AccountsAdClientsListResource =

5656-- | List all ad clients in the specified account.

5757--

5858-- /See:/ 'accountsAdClientsList' smart constructor.

59−data AccountsAdClientsList = AccountsAdClientsList

59+data AccountsAdClientsList = AccountsAdClientsList'

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

6262 , _aaclMaxResults :: !(Maybe (Textual Int32))

@@ -75,7 +75,7 @@ accountsAdClientsList

7575 :: Text -- ^ 'aaclAccountId'

7676 -> AccountsAdClientsList

7777accountsAdClientsList pAaclAccountId_ =

78− AccountsAdClientsList

78+ AccountsAdClientsList'

7979 { _aaclAccountId = pAaclAccountId_

8080 , _aaclPageToken = Nothing

8181 , _aaclMaxResults = Nothing

@@ -108,7 +108,7 @@ instance GoogleRequest AccountsAdClientsList where

108108 type Scopes AccountsAdClientsList =

109109 '["https://www.googleapis.com/auth/adsense",

110110 "https://www.googleapis.com/auth/adsense.readonly"]

111− requestClient AccountsAdClientsList{..}

111+ requestClient AccountsAdClientsList'{..}

112112 = go _aaclAccountId _aaclPageToken _aaclMaxResults

113113 (Just AltJSON)

114114 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs+3−3

@@ -63,7 +63,7 @@ type AccountsAdUnitsCustomChannelsListResource =

6363-- | List all custom channels which the specified ad unit belongs to.

6464--

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

66−data AccountsAdUnitsCustomChannelsList = AccountsAdUnitsCustomChannelsList

66+data AccountsAdUnitsCustomChannelsList = AccountsAdUnitsCustomChannelsList'

6767 { _aaucclAdUnitId :: !Text

6868 , _aaucclAdClientId :: !Text

6969 , _aaucclAccountId :: !Text

@@ -90,7 +90,7 @@ accountsAdUnitsCustomChannelsList

9090 -> Text -- ^ 'aaucclAccountId'

9191 -> AccountsAdUnitsCustomChannelsList

9292accountsAdUnitsCustomChannelsList pAaucclAdUnitId_ pAaucclAdClientId_ pAaucclAccountId_ =

93− AccountsAdUnitsCustomChannelsList

93+ AccountsAdUnitsCustomChannelsList'

9494 { _aaucclAdUnitId = pAaucclAdUnitId_

9595 , _aaucclAdClientId = pAaucclAdClientId_

9696 , _aaucclAccountId = pAaucclAccountId_

@@ -139,7 +139,7 @@ instance GoogleRequest

139139 type Scopes AccountsAdUnitsCustomChannelsList =

140140 '["https://www.googleapis.com/auth/adsense",

141141 "https://www.googleapis.com/auth/adsense.readonly"]

142− requestClient AccountsAdUnitsCustomChannelsList{..}

142+ requestClient AccountsAdUnitsCustomChannelsList'{..}

143143 = go _aaucclAccountId _aaucclAdClientId

144144 _aaucclAdUnitId

145145 _aaucclPageToken

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/Get.hs+3−3

@@ -59,7 +59,7 @@ type AccountsAdUnitsGetResource =

5959-- account.

6060--

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

62−data AccountsAdUnitsGet = AccountsAdUnitsGet

62+data AccountsAdUnitsGet = AccountsAdUnitsGet'

6363 { _aaugAdUnitId :: !Text

6464 , _aaugAdClientId :: !Text

6565 , _aaugAccountId :: !Text

@@ -80,7 +80,7 @@ accountsAdUnitsGet

8080 -> Text -- ^ 'aaugAccountId'

8181 -> AccountsAdUnitsGet

8282accountsAdUnitsGet pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =

83− AccountsAdUnitsGet

83+ AccountsAdUnitsGet'

8484 { _aaugAdUnitId = pAaugAdUnitId_

8585 , _aaugAdClientId = pAaugAdClientId_

8686 , _aaugAccountId = pAaugAccountId_

@@ -108,7 +108,7 @@ instance GoogleRequest AccountsAdUnitsGet where

108108 type Scopes AccountsAdUnitsGet =

109109 '["https://www.googleapis.com/auth/adsense",

110110 "https://www.googleapis.com/auth/adsense.readonly"]

111− requestClient AccountsAdUnitsGet{..}

111+ requestClient AccountsAdUnitsGet'{..}

112112 = go _aaugAccountId _aaugAdClientId _aaugAdUnitId

113113 (Just AltJSON)

114114 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/GetAdCode.hs+3−3

@@ -58,7 +58,7 @@ type AccountsAdUnitsGetAdCodeResource =

5858-- | Get ad code for the specified ad unit.

5959--

6060-- /See:/ 'accountsAdUnitsGetAdCode' smart constructor.

61−data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode

61+data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode'

6262 { _aaugacAdUnitId :: !Text

6363 , _aaugacAdClientId :: !Text

6464 , _aaugacAccountId :: !Text

@@ -79,7 +79,7 @@ accountsAdUnitsGetAdCode

7979 -> Text -- ^ 'aaugacAccountId'

8080 -> AccountsAdUnitsGetAdCode

8181accountsAdUnitsGetAdCode pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =

82− AccountsAdUnitsGetAdCode

82+ AccountsAdUnitsGetAdCode'

8383 { _aaugacAdUnitId = pAaugacAdUnitId_

8484 , _aaugacAdClientId = pAaugacAdClientId_

8585 , _aaugacAccountId = pAaugacAccountId_

@@ -108,7 +108,7 @@ instance GoogleRequest AccountsAdUnitsGetAdCode where

108108 type Scopes AccountsAdUnitsGetAdCode =

109109 '["https://www.googleapis.com/auth/adsense",

110110 "https://www.googleapis.com/auth/adsense.readonly"]

111− requestClient AccountsAdUnitsGetAdCode{..}

111+ requestClient AccountsAdUnitsGetAdCode'{..}

112112 = go _aaugacAccountId _aaugacAdClientId

113113 _aaugacAdUnitId

114114 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs+3−3

@@ -61,7 +61,7 @@ type AccountsAdUnitsListResource =

6161-- | List all ad units in the specified ad client for the specified account.

6262--

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

64−data AccountsAdUnitsList = AccountsAdUnitsList

64+data AccountsAdUnitsList = AccountsAdUnitsList'

6565 { _aaulIncludeInactive :: !(Maybe Bool)

6666 , _aaulAdClientId :: !Text

6767 , _aaulAccountId :: !Text

@@ -87,7 +87,7 @@ accountsAdUnitsList

8787 -> Text -- ^ 'aaulAccountId'

8888 -> AccountsAdUnitsList

8989accountsAdUnitsList pAaulAdClientId_ pAaulAccountId_ =

90− AccountsAdUnitsList

90+ AccountsAdUnitsList'

9191 { _aaulIncludeInactive = Nothing

9292 , _aaulAdClientId = pAaulAdClientId_

9393 , _aaulAccountId = pAaulAccountId_

@@ -134,7 +134,7 @@ instance GoogleRequest AccountsAdUnitsList where

134134 type Scopes AccountsAdUnitsList =

135135 '["https://www.googleapis.com/auth/adsense",

136136 "https://www.googleapis.com/auth/adsense.readonly"]

137− requestClient AccountsAdUnitsList{..}

137+ requestClient AccountsAdUnitsList'{..}

138138 = go _aaulAccountId _aaulAdClientId

139139 _aaulIncludeInactive

140140 _aaulPageToken

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs+3−3

@@ -56,7 +56,7 @@ type AccountsAlertsDeleteResource =

5656-- AdSense account.

5757--

5858-- /See:/ 'accountsAlertsDelete' smart constructor.

59−data AccountsAlertsDelete = AccountsAlertsDelete

59+data AccountsAlertsDelete = AccountsAlertsDelete'

6060 { _aadAlertId :: !Text

6161 , _aadAccountId :: !Text

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

@@ -73,7 +73,7 @@ accountsAlertsDelete

7373 -> Text -- ^ 'aadAccountId'

7474 -> AccountsAlertsDelete

7575accountsAlertsDelete pAadAlertId_ pAadAccountId_ =

76− AccountsAlertsDelete

76+ AccountsAlertsDelete'

7777 { _aadAlertId = pAadAlertId_

7878 , _aadAccountId = pAadAccountId_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsAlertsDelete where

9292 type Rs AccountsAlertsDelete = ()

9393 type Scopes AccountsAlertsDelete =

9494 '["https://www.googleapis.com/auth/adsense"]

95− requestClient AccountsAlertsDelete{..}

95+ requestClient AccountsAlertsDelete'{..}

9696 = go _aadAccountId _aadAlertId (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs+3−3

@@ -54,7 +54,7 @@ type AccountsAlertsListResource =

5454-- | List the alerts for the specified AdSense account.

5555--

5656-- /See:/ 'accountsAlertsList' smart constructor.

57−data AccountsAlertsList = AccountsAlertsList

57+data AccountsAlertsList = AccountsAlertsList'

5858 { _aalLocale :: !(Maybe Text)

5959 , _aalAccountId :: !Text

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

@@ -70,7 +70,7 @@ accountsAlertsList

7070 :: Text -- ^ 'aalAccountId'

7171 -> AccountsAlertsList

7272accountsAlertsList pAalAccountId_ =

73− AccountsAlertsList

73+ AccountsAlertsList'

7474 { _aalLocale = Nothing

7575 , _aalAccountId = pAalAccountId_

7676 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsAlertsList where

9292 type Scopes AccountsAlertsList =

9393 '["https://www.googleapis.com/auth/adsense",

9494 "https://www.googleapis.com/auth/adsense.readonly"]

95− requestClient AccountsAlertsList{..}

95+ requestClient AccountsAlertsList'{..}

9696 = go _aalAccountId _aalLocale (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs+3−3

@@ -64,7 +64,7 @@ type AccountsCustomChannelsAdUnitsListResource =

6464-- | List all ad units in the specified custom channel.

6565--

6666-- /See:/ 'accountsCustomChannelsAdUnitsList' smart constructor.

67−data AccountsCustomChannelsAdUnitsList = AccountsCustomChannelsAdUnitsList

67+data AccountsCustomChannelsAdUnitsList = AccountsCustomChannelsAdUnitsList'

6868 { _accaulIncludeInactive :: !(Maybe Bool)

6969 , _accaulCustomChannelId :: !Text

7070 , _accaulAdClientId :: !Text

@@ -94,7 +94,7 @@ accountsCustomChannelsAdUnitsList

9494 -> Text -- ^ 'accaulAccountId'

9595 -> AccountsCustomChannelsAdUnitsList

9696accountsCustomChannelsAdUnitsList pAccaulCustomChannelId_ pAccaulAdClientId_ pAccaulAccountId_ =

97− AccountsCustomChannelsAdUnitsList

97+ AccountsCustomChannelsAdUnitsList'

9898 { _accaulIncludeInactive = Nothing

9999 , _accaulCustomChannelId = pAccaulCustomChannelId_

100100 , _accaulAdClientId = pAccaulAdClientId_

@@ -149,7 +149,7 @@ instance GoogleRequest

149149 type Scopes AccountsCustomChannelsAdUnitsList =

150150 '["https://www.googleapis.com/auth/adsense",

151151 "https://www.googleapis.com/auth/adsense.readonly"]

152− requestClient AccountsCustomChannelsAdUnitsList{..}

152+ requestClient AccountsCustomChannelsAdUnitsList'{..}

153153 = go _accaulAccountId _accaulAdClientId

154154 _accaulCustomChannelId

155155 _accaulIncludeInactive

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/Get.hs+3−3

@@ -59,7 +59,7 @@ type AccountsCustomChannelsGetResource =

5959-- specified account.

6060--

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

62−data AccountsCustomChannelsGet = AccountsCustomChannelsGet

62+data AccountsCustomChannelsGet = AccountsCustomChannelsGet'

6363 { _accgCustomChannelId :: !Text

6464 , _accgAdClientId :: !Text

6565 , _accgAccountId :: !Text

@@ -80,7 +80,7 @@ accountsCustomChannelsGet

8080 -> Text -- ^ 'accgAccountId'

8181 -> AccountsCustomChannelsGet

8282accountsCustomChannelsGet pAccgCustomChannelId_ pAccgAdClientId_ pAccgAccountId_ =

83− AccountsCustomChannelsGet

83+ AccountsCustomChannelsGet'

8484 { _accgCustomChannelId = pAccgCustomChannelId_

8585 , _accgAdClientId = pAccgAdClientId_

8686 , _accgAccountId = pAccgAccountId_

@@ -110,7 +110,7 @@ instance GoogleRequest AccountsCustomChannelsGet

110110 type Scopes AccountsCustomChannelsGet =

111111 '["https://www.googleapis.com/auth/adsense",

112112 "https://www.googleapis.com/auth/adsense.readonly"]

113− requestClient AccountsCustomChannelsGet{..}

113+ requestClient AccountsCustomChannelsGet'{..}

114114 = go _accgAccountId _accgAdClientId

115115 _accgCustomChannelId

116116 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs+3−3

@@ -62,7 +62,7 @@ type AccountsCustomChannelsListResource =

6262-- account.

6363--

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

65−data AccountsCustomChannelsList = AccountsCustomChannelsList

65+data AccountsCustomChannelsList = AccountsCustomChannelsList'

6666 { _acclAdClientId :: !Text

6767 , _acclAccountId :: !Text

6868 , _acclPageToken :: !(Maybe Text)

@@ -85,7 +85,7 @@ accountsCustomChannelsList

8585 -> Text -- ^ 'acclAccountId'

8686 -> AccountsCustomChannelsList

8787accountsCustomChannelsList pAcclAdClientId_ pAcclAccountId_ =

88− AccountsCustomChannelsList

88+ AccountsCustomChannelsList'

8989 { _acclAdClientId = pAcclAdClientId_

9090 , _acclAccountId = pAcclAccountId_

9191 , _acclPageToken = Nothing

@@ -126,7 +126,7 @@ instance GoogleRequest AccountsCustomChannelsList

126126 type Scopes AccountsCustomChannelsList =

127127 '["https://www.googleapis.com/auth/adsense",

128128 "https://www.googleapis.com/auth/adsense.readonly"]

129− requestClient AccountsCustomChannelsList{..}

129+ requestClient AccountsCustomChannelsList'{..}

130130 = go _acclAccountId _acclAdClientId _acclPageToken

131131 _acclMaxResults

132132 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Get.hs+3−3

@@ -53,7 +53,7 @@ type AccountsGetResource =

5353-- | Get information about the selected AdSense account.

5454--

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

56−data AccountsGet = AccountsGet

56+data AccountsGet = AccountsGet'

5757 { _agTree :: !(Maybe Bool)

5858 , _agAccountId :: !Text

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

@@ -69,7 +69,7 @@ accountsGet

6969 :: Text -- ^ 'agAccountId'

7070 -> AccountsGet

7171accountsGet pAgAccountId_ =

72− AccountsGet

72+ AccountsGet'

7373 { _agTree = Nothing

7474 , _agAccountId = pAgAccountId_

7575 }

@@ -88,7 +88,7 @@ instance GoogleRequest AccountsGet where

8888 type Scopes AccountsGet =

8989 '["https://www.googleapis.com/auth/adsense",

9090 "https://www.googleapis.com/auth/adsense.readonly"]

91− requestClient AccountsGet{..}

91+ requestClient AccountsGet'{..}

9292 = go _agAccountId _agTree (Just AltJSON)

9393 adSenseService

9494 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/List.hs+3−3

@@ -53,7 +53,7 @@ type AccountsListResource =

5353-- | List all accounts available to this AdSense account.

5454--

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

56−data AccountsList = AccountsList

56+data AccountsList = AccountsList'

5757 { _alPageToken :: !(Maybe Text)

5858 , _alMaxResults :: !(Maybe (Textual Int32))

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

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

6868accountsList

6969 :: AccountsList

7070accountsList =

71− AccountsList

71+ AccountsList'

7272 { _alPageToken = Nothing

7373 , _alMaxResults = Nothing

7474 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsList where

9292 type Scopes AccountsList =

9393 '["https://www.googleapis.com/auth/adsense",

9494 "https://www.googleapis.com/auth/adsense.readonly"]

95− requestClient AccountsList{..}

95+ requestClient AccountsList'{..}

9696 = go _alPageToken _alMaxResults (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs+3−3

@@ -52,7 +52,7 @@ type AccountsPaymentsListResource =

5252-- | List the payments for the specified AdSense account.

5353--

5454-- /See:/ 'accountsPaymentsList' smart constructor.

55−newtype AccountsPaymentsList = AccountsPaymentsList

55+newtype AccountsPaymentsList = AccountsPaymentsList'

5656 { _aplAccountId :: Text

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

5858

@@ -65,7 +65,7 @@ accountsPaymentsList

6565 :: Text -- ^ 'aplAccountId'

6666 -> AccountsPaymentsList

6767accountsPaymentsList pAplAccountId_ =

68− AccountsPaymentsList

68+ AccountsPaymentsList'

6969 { _aplAccountId = pAplAccountId_

7070 }

7171

@@ -79,7 +79,7 @@ instance GoogleRequest AccountsPaymentsList where

7979 type Scopes AccountsPaymentsList =

8080 '["https://www.googleapis.com/auth/adsense",

8181 "https://www.googleapis.com/auth/adsense.readonly"]

82− requestClient AccountsPaymentsList{..}

82+ requestClient AccountsPaymentsList'{..}

8383 = go _aplAccountId (Just AltJSON) adSenseService

8484 where go

8585 = buildClient

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+4−4

@@ -99,7 +99,7 @@ type AccountsReportsGenerateResource =

9999-- specify \"alt=csv\" as a query parameter.

100100--

101101-- /See:/ 'accountsReportsGenerate' smart constructor.

102−data AccountsReportsGenerate = AccountsReportsGenerate

102+data AccountsReportsGenerate = AccountsReportsGenerate'

103103 { _argDimension :: !(Maybe [Text])

104104 , _argLocale :: !(Maybe Text)

105105 , _argEndDate :: !Text

@@ -147,7 +147,7 @@ accountsReportsGenerate

147147 -> Text -- ^ 'argAccountId'

148148 -> AccountsReportsGenerate

149149accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =

150− AccountsReportsGenerate

150+ AccountsReportsGenerate'

151151 { _argDimension = Nothing

152152 , _argLocale = Nothing

153153 , _argEndDate = pArgEndDate_

@@ -246,7 +246,7 @@ instance GoogleRequest AccountsReportsGenerate where

246246 type Scopes AccountsReportsGenerate =

247247 '["https://www.googleapis.com/auth/adsense",

248248 "https://www.googleapis.com/auth/adsense.readonly"]

249− requestClient AccountsReportsGenerate{..}

249+ requestClient AccountsReportsGenerate'{..}

250250 = go _argAccountId (Just _argStartDate)

251251 (Just _argEndDate)

252252 (_argDimension ^. _Default)

@@ -272,7 +272,7 @@ instance GoogleRequest

272272 type Scopes (MediaDownload AccountsReportsGenerate) =

273273 Scopes AccountsReportsGenerate

274274 requestClient

275− (MediaDownload AccountsReportsGenerate{..})

275+ (MediaDownload AccountsReportsGenerate'{..})

276276 = go _argAccountId (Just _argStartDate)

277277 (Just _argEndDate)

278278 (_argDimension ^. _Default)

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs+3−3

@@ -63,7 +63,7 @@ type AccountsReportsSavedGenerateResource =

6363-- query parameters.

6464--

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

66−data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate

66+data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate'

6767 { _arsgLocale :: !(Maybe Text)

6868 , _arsgSavedReportId :: !Text

6969 , _arsgAccountId :: !Text

@@ -89,7 +89,7 @@ accountsReportsSavedGenerate

8989 -> Text -- ^ 'arsgAccountId'

9090 -> AccountsReportsSavedGenerate

9191accountsReportsSavedGenerate pArsgSavedReportId_ pArsgAccountId_ =

92− AccountsReportsSavedGenerate

92+ AccountsReportsSavedGenerate'

9393 { _arsgLocale = Nothing

9494 , _arsgSavedReportId = pArsgSavedReportId_

9595 , _arsgAccountId = pArsgAccountId_

@@ -136,7 +136,7 @@ instance GoogleRequest AccountsReportsSavedGenerate

136136 type Scopes AccountsReportsSavedGenerate =

137137 '["https://www.googleapis.com/auth/adsense",

138138 "https://www.googleapis.com/auth/adsense.readonly"]

139− requestClient AccountsReportsSavedGenerate{..}

139+ requestClient AccountsReportsSavedGenerate'{..}

140140 = go _arsgAccountId _arsgSavedReportId _arsgLocale

141141 _arsgStartIndex

142142 _arsgMaxResults

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs+3−3

@@ -57,7 +57,7 @@ type AccountsReportsSavedListResource =

5757-- | List all saved reports in the specified AdSense account.

5858--

5959-- /See:/ 'accountsReportsSavedList' smart constructor.

60−data AccountsReportsSavedList = AccountsReportsSavedList

60+data AccountsReportsSavedList = AccountsReportsSavedList'

6161 { _arslAccountId :: !Text

6262 , _arslPageToken :: !(Maybe Text)

6363 , _arslMaxResults :: !(Maybe (Textual Int32))

@@ -76,7 +76,7 @@ accountsReportsSavedList

7676 :: Text -- ^ 'arslAccountId'

7777 -> AccountsReportsSavedList

7878accountsReportsSavedList pArslAccountId_ =

79− AccountsReportsSavedList

79+ AccountsReportsSavedList'

8080 { _arslAccountId = pArslAccountId_

8181 , _arslPageToken = Nothing

8282 , _arslMaxResults = Nothing

@@ -109,7 +109,7 @@ instance GoogleRequest AccountsReportsSavedList where

109109 type Scopes AccountsReportsSavedList =

110110 '["https://www.googleapis.com/auth/adsense",

111111 "https://www.googleapis.com/auth/adsense.readonly"]

112− requestClient AccountsReportsSavedList{..}

112+ requestClient AccountsReportsSavedList'{..}

113113 = go _arslAccountId _arslPageToken _arslMaxResults

114114 (Just AltJSON)

115115 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs+3−3

@@ -54,7 +54,7 @@ type AccountsSavedadstylesGetResource =

5454-- | List a specific saved ad style for the specified account.

5555--

5656-- /See:/ 'accountsSavedadstylesGet' smart constructor.

57−data AccountsSavedadstylesGet = AccountsSavedadstylesGet

57+data AccountsSavedadstylesGet = AccountsSavedadstylesGet'

5858 { _asgSavedAdStyleId :: !Text

5959 , _asgAccountId :: !Text

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

@@ -71,7 +71,7 @@ accountsSavedadstylesGet

7171 -> Text -- ^ 'asgAccountId'

7272 -> AccountsSavedadstylesGet

7373accountsSavedadstylesGet pAsgSavedAdStyleId_ pAsgAccountId_ =

74− AccountsSavedadstylesGet

74+ AccountsSavedadstylesGet'

7575 { _asgSavedAdStyleId = pAsgSavedAdStyleId_

7676 , _asgAccountId = pAsgAccountId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest AccountsSavedadstylesGet where

9292 type Scopes AccountsSavedadstylesGet =

9393 '["https://www.googleapis.com/auth/adsense",

9494 "https://www.googleapis.com/auth/adsense.readonly"]

95− requestClient AccountsSavedadstylesGet{..}

95+ requestClient AccountsSavedadstylesGet'{..}

9696 = go _asgAccountId _asgSavedAdStyleId (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs+3−3

@@ -56,7 +56,7 @@ type AccountsSavedadstylesListResource =

5656-- | List all saved ad styles in the specified account.

5757--

5858-- /See:/ 'accountsSavedadstylesList' smart constructor.

59−data AccountsSavedadstylesList = AccountsSavedadstylesList

59+data AccountsSavedadstylesList = AccountsSavedadstylesList'

6060 { _aslAccountId :: !Text

6161 , _aslPageToken :: !(Maybe Text)

6262 , _aslMaxResults :: !(Maybe (Textual Int32))

@@ -75,7 +75,7 @@ accountsSavedadstylesList

7575 :: Text -- ^ 'aslAccountId'

7676 -> AccountsSavedadstylesList

7777accountsSavedadstylesList pAslAccountId_ =

78− AccountsSavedadstylesList

78+ AccountsSavedadstylesList'

7979 { _aslAccountId = pAslAccountId_

8080 , _aslPageToken = Nothing

8181 , _aslMaxResults = Nothing

@@ -107,7 +107,7 @@ instance GoogleRequest AccountsSavedadstylesList

107107 type Scopes AccountsSavedadstylesList =

108108 '["https://www.googleapis.com/auth/adsense",

109109 "https://www.googleapis.com/auth/adsense.readonly"]

110− requestClient AccountsSavedadstylesList{..}

110+ requestClient AccountsSavedadstylesList'{..}

111111 = go _aslAccountId _aslPageToken _aslMaxResults

112112 (Just AltJSON)

113113 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+3−3

@@ -61,7 +61,7 @@ type AccountsURLChannelsListResource =

6161-- account.

6262--

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

64−data AccountsURLChannelsList = AccountsURLChannelsList

64+data AccountsURLChannelsList = AccountsURLChannelsList'

6565 { _auclAdClientId :: !Text

6666 , _auclAccountId :: !Text

6767 , _auclPageToken :: !(Maybe Text)

@@ -84,7 +84,7 @@ accountsURLChannelsList

8484 -> Text -- ^ 'auclAccountId'

8585 -> AccountsURLChannelsList

8686accountsURLChannelsList pAuclAdClientId_ pAuclAccountId_ =

87− AccountsURLChannelsList

87+ AccountsURLChannelsList'

8888 { _auclAdClientId = pAuclAdClientId_

8989 , _auclAccountId = pAuclAccountId_

9090 , _auclPageToken = Nothing

@@ -124,7 +124,7 @@ instance GoogleRequest AccountsURLChannelsList where

124124 type Scopes AccountsURLChannelsList =

125125 '["https://www.googleapis.com/auth/adsense",

126126 "https://www.googleapis.com/auth/adsense.readonly"]

127− requestClient AccountsURLChannelsList{..}

127+ requestClient AccountsURLChannelsList'{..}

128128 = go _auclAccountId _auclAdClientId _auclPageToken

129129 _auclMaxResults

130130 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/AdClients/List.hs+3−3

@@ -53,7 +53,7 @@ type AdClientsListResource =

5353-- | List all ad clients in this AdSense account.

5454--

5555-- /See:/ 'adClientsList' smart constructor.

56−data AdClientsList = AdClientsList

56+data AdClientsList = AdClientsList'

5757 { _aclPageToken :: !(Maybe Text)

5858 , _aclMaxResults :: !(Maybe (Textual Int32))

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

@@ -68,7 +68,7 @@ data AdClientsList = AdClientsList

6868adClientsList

6969 :: AdClientsList

7070adClientsList =

71− AdClientsList

71+ AdClientsList'

7272 { _aclPageToken = Nothing

7373 , _aclMaxResults = Nothing

7474 }

@@ -93,7 +93,7 @@ instance GoogleRequest AdClientsList where

9393 type Scopes AdClientsList =

9494 '["https://www.googleapis.com/auth/adsense",

9595 "https://www.googleapis.com/auth/adsense.readonly"]

96− requestClient AdClientsList{..}

96+ requestClient AdClientsList'{..}

9797 = go _aclPageToken _aclMaxResults (Just AltJSON)

9898 adSenseService

9999 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs+3−3

@@ -60,7 +60,7 @@ type AdUnitsCustomChannelsListResource =

6060-- | List all custom channels which the specified ad unit belongs to.

6161--

6262-- /See:/ 'adUnitsCustomChannelsList' smart constructor.

63−data AdUnitsCustomChannelsList = AdUnitsCustomChannelsList

63+data AdUnitsCustomChannelsList = AdUnitsCustomChannelsList'

6464 { _aucclAdUnitId :: !Text

6565 , _aucclAdClientId :: !Text

6666 , _aucclPageToken :: !(Maybe Text)

@@ -83,7 +83,7 @@ adUnitsCustomChannelsList

8383 -> Text -- ^ 'aucclAdClientId'

8484 -> AdUnitsCustomChannelsList

8585adUnitsCustomChannelsList pAucclAdUnitId_ pAucclAdClientId_ =

86− AdUnitsCustomChannelsList

86+ AdUnitsCustomChannelsList'

8787 { _aucclAdUnitId = pAucclAdUnitId_

8888 , _aucclAdClientId = pAucclAdClientId_

8989 , _aucclPageToken = Nothing

@@ -124,7 +124,7 @@ instance GoogleRequest AdUnitsCustomChannelsList

124124 type Scopes AdUnitsCustomChannelsList =

125125 '["https://www.googleapis.com/auth/adsense",

126126 "https://www.googleapis.com/auth/adsense.readonly"]

127− requestClient AdUnitsCustomChannelsList{..}

127+ requestClient AdUnitsCustomChannelsList'{..}

128128 = go _aucclAdClientId _aucclAdUnitId _aucclPageToken

129129 _aucclMaxResults

130130 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/Get.hs+3−3

@@ -54,7 +54,7 @@ type AdUnitsGetResource =

5454-- | Gets the specified ad unit in the specified ad client.

5555--

5656-- /See:/ 'adUnitsGet' smart constructor.

57−data AdUnitsGet = AdUnitsGet

57+data AdUnitsGet = AdUnitsGet'

5858 { _augAdUnitId :: !Text

5959 , _augAdClientId :: !Text

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

@@ -71,7 +71,7 @@ adUnitsGet

7171 -> Text -- ^ 'augAdClientId'

7272 -> AdUnitsGet

7373adUnitsGet pAugAdUnitId_ pAugAdClientId_ =

74− AdUnitsGet

74+ AdUnitsGet'

7575 { _augAdUnitId = pAugAdUnitId_

7676 , _augAdClientId = pAugAdClientId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest AdUnitsGet where

9292 type Scopes AdUnitsGet =

9393 '["https://www.googleapis.com/auth/adsense",

9494 "https://www.googleapis.com/auth/adsense.readonly"]

95− requestClient AdUnitsGet{..}

95+ requestClient AdUnitsGet'{..}

9696 = go _augAdClientId _augAdUnitId (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/GetAdCode.hs+3−3

@@ -55,7 +55,7 @@ type AdUnitsGetAdCodeResource =

5555-- | Get ad code for the specified ad unit.

5656--

5757-- /See:/ 'adUnitsGetAdCode' smart constructor.

58−data AdUnitsGetAdCode = AdUnitsGetAdCode

58+data AdUnitsGetAdCode = AdUnitsGetAdCode'

5959 { _augacAdUnitId :: !Text

6060 , _augacAdClientId :: !Text

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

@@ -72,7 +72,7 @@ adUnitsGetAdCode

7272 -> Text -- ^ 'augacAdClientId'

7373 -> AdUnitsGetAdCode

7474adUnitsGetAdCode pAugacAdUnitId_ pAugacAdClientId_ =

75− AdUnitsGetAdCode

75+ AdUnitsGetAdCode'

7676 { _augacAdUnitId = pAugacAdUnitId_

7777 , _augacAdClientId = pAugacAdClientId_

7878 }

@@ -94,7 +94,7 @@ instance GoogleRequest AdUnitsGetAdCode where

9494 type Scopes AdUnitsGetAdCode =

9595 '["https://www.googleapis.com/auth/adsense",

9696 "https://www.googleapis.com/auth/adsense.readonly"]

97− requestClient AdUnitsGetAdCode{..}

97+ requestClient AdUnitsGetAdCode'{..}

9898 = go _augacAdClientId _augacAdUnitId (Just AltJSON)

9999 adSenseService

100100 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/List.hs+3−3

@@ -58,7 +58,7 @@ type AdUnitsListResource =

5858-- | List all ad units in the specified ad client for this AdSense account.

5959--

6060-- /See:/ 'adUnitsList' smart constructor.

61−data AdUnitsList = AdUnitsList

61+data AdUnitsList = AdUnitsList'

6262 { _aulIncludeInactive :: !(Maybe Bool)

6363 , _aulAdClientId :: !Text

6464 , _aulPageToken :: !(Maybe Text)

@@ -80,7 +80,7 @@ adUnitsList

8080 :: Text -- ^ 'aulAdClientId'

8181 -> AdUnitsList

8282adUnitsList pAulAdClientId_ =

83− AdUnitsList

83+ AdUnitsList'

8484 { _aulIncludeInactive = Nothing

8585 , _aulAdClientId = pAulAdClientId_

8686 , _aulPageToken = Nothing

@@ -119,7 +119,7 @@ instance GoogleRequest AdUnitsList where

119119 type Scopes AdUnitsList =

120120 '["https://www.googleapis.com/auth/adsense",

121121 "https://www.googleapis.com/auth/adsense.readonly"]

122− requestClient AdUnitsList{..}

122+ requestClient AdUnitsList'{..}

123123 = go _aulAdClientId _aulIncludeInactive _aulPageToken

124124 _aulMaxResults

125125 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/Delete.hs+3−3

@@ -53,7 +53,7 @@ type AlertsDeleteResource =

5353-- account.

5454--

5555-- /See:/ 'alertsDelete' smart constructor.

56−newtype AlertsDelete = AlertsDelete

56+newtype AlertsDelete = AlertsDelete'

5757 { _adAlertId :: Text

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

5959

@@ -66,7 +66,7 @@ alertsDelete

6666 :: Text -- ^ 'adAlertId'

6767 -> AlertsDelete

6868alertsDelete pAdAlertId_ =

69− AlertsDelete

69+ AlertsDelete'

7070 { _adAlertId = pAdAlertId_

7171 }

7272

@@ -79,7 +79,7 @@ instance GoogleRequest AlertsDelete where

7979 type Rs AlertsDelete = ()

8080 type Scopes AlertsDelete =

8181 '["https://www.googleapis.com/auth/adsense"]

82− requestClient AlertsDelete{..}

82+ requestClient AlertsDelete'{..}

8383 = go _adAlertId (Just AltJSON) adSenseService

8484 where go

8585 = buildClient (Proxy :: Proxy AlertsDeleteResource)

gogol-adsense/gen/Network/Google/Resource/AdSense/Alerts/List.hs+3−3

@@ -51,7 +51,7 @@ type AlertsListResource =

5151-- | List the alerts for this AdSense account.

5252--

5353-- /See:/ 'alertsList' smart constructor.

54−newtype AlertsList = AlertsList

54+newtype AlertsList = AlertsList'

5555 { _alLocale :: Maybe Text

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

5757

@@ -63,7 +63,7 @@ newtype AlertsList = AlertsList

6363alertsList

6464 :: AlertsList

6565alertsList =

66− AlertsList

66+ AlertsList'

6767 { _alLocale = Nothing

6868 }

6969

@@ -78,7 +78,7 @@ instance GoogleRequest AlertsList where

7878 type Scopes AlertsList =

7979 '["https://www.googleapis.com/auth/adsense",

8080 "https://www.googleapis.com/auth/adsense.readonly"]

81− requestClient AlertsList{..}

81+ requestClient AlertsList'{..}

8282 = go _alLocale (Just AltJSON) adSenseService

8383 where go

8484 = buildClient (Proxy :: Proxy AlertsListResource)

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs+3−3

@@ -61,7 +61,7 @@ type CustomChannelsAdUnitsListResource =

6161-- | List all ad units in the specified custom channel.

6262--

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

64−data CustomChannelsAdUnitsList = CustomChannelsAdUnitsList

64+data CustomChannelsAdUnitsList = CustomChannelsAdUnitsList'

6565 { _ccaulIncludeInactive :: !(Maybe Bool)

6666 , _ccaulCustomChannelId :: !Text

6767 , _ccaulAdClientId :: !Text

@@ -87,7 +87,7 @@ customChannelsAdUnitsList

8787 -> Text -- ^ 'ccaulAdClientId'

8888 -> CustomChannelsAdUnitsList

8989customChannelsAdUnitsList pCcaulCustomChannelId_ pCcaulAdClientId_ =

90− CustomChannelsAdUnitsList

90+ CustomChannelsAdUnitsList'

9191 { _ccaulIncludeInactive = Nothing

9292 , _ccaulCustomChannelId = pCcaulCustomChannelId_

9393 , _ccaulAdClientId = pCcaulAdClientId_

@@ -135,7 +135,7 @@ instance GoogleRequest CustomChannelsAdUnitsList

135135 type Scopes CustomChannelsAdUnitsList =

136136 '["https://www.googleapis.com/auth/adsense",

137137 "https://www.googleapis.com/auth/adsense.readonly"]

138− requestClient CustomChannelsAdUnitsList{..}

138+ requestClient CustomChannelsAdUnitsList'{..}

139139 = go _ccaulAdClientId _ccaulCustomChannelId

140140 _ccaulIncludeInactive

141141 _ccaulPageToken

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/Get.hs+3−3

@@ -54,7 +54,7 @@ type CustomChannelsGetResource =

5454-- | Get the specified custom channel from the specified ad client.

5555--

5656-- /See:/ 'customChannelsGet' smart constructor.

57−data CustomChannelsGet = CustomChannelsGet

57+data CustomChannelsGet = CustomChannelsGet'

5858 { _ccgCustomChannelId :: !Text

5959 , _ccgAdClientId :: !Text

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

@@ -71,7 +71,7 @@ customChannelsGet

7171 -> Text -- ^ 'ccgAdClientId'

7272 -> CustomChannelsGet

7373customChannelsGet pCcgCustomChannelId_ pCcgAdClientId_ =

74− CustomChannelsGet

74+ CustomChannelsGet'

7575 { _ccgCustomChannelId = pCcgCustomChannelId_

7676 , _ccgAdClientId = pCcgAdClientId_

7777 }

@@ -93,7 +93,7 @@ instance GoogleRequest CustomChannelsGet where

9393 type Scopes CustomChannelsGet =

9494 '["https://www.googleapis.com/auth/adsense",

9595 "https://www.googleapis.com/auth/adsense.readonly"]

96− requestClient CustomChannelsGet{..}

96+ requestClient CustomChannelsGet'{..}

9797 = go _ccgAdClientId _ccgCustomChannelId

9898 (Just AltJSON)

9999 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/List.hs+3−3

@@ -59,7 +59,7 @@ type CustomChannelsListResource =

5959-- account.

6060--

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

62−data CustomChannelsList = CustomChannelsList

62+data CustomChannelsList = CustomChannelsList'

6363 { _cclAdClientId :: !Text

6464 , _cclPageToken :: !(Maybe Text)

6565 , _cclMaxResults :: !(Maybe (Textual Int32))

@@ -78,7 +78,7 @@ customChannelsList

7878 :: Text -- ^ 'cclAdClientId'

7979 -> CustomChannelsList

8080customChannelsList pCclAdClientId_ =

81− CustomChannelsList

81+ CustomChannelsList'

8282 { _cclAdClientId = pCclAdClientId_

8383 , _cclPageToken = Nothing

8484 , _cclMaxResults = Nothing

@@ -110,7 +110,7 @@ instance GoogleRequest CustomChannelsList where

110110 type Scopes CustomChannelsList =

111111 '["https://www.googleapis.com/auth/adsense",

112112 "https://www.googleapis.com/auth/adsense.readonly"]

113− requestClient CustomChannelsList{..}

113+ requestClient CustomChannelsList'{..}

114114 = go _cclAdClientId _cclPageToken _cclMaxResults

115115 (Just AltJSON)

116116 adSenseService

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs+3−3

@@ -50,21 +50,21 @@ type MetadataDimensionsListResource =

5050--

5151-- /See:/ 'metadataDimensionsList' smart constructor.

5252data MetadataDimensionsList =

53− MetadataDimensionsList

53+ MetadataDimensionsList'

5454 deriving (Eq,Show,Data,Typeable,Generic)

5555

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

5757--

5858metadataDimensionsList

5959 :: MetadataDimensionsList

60−metadataDimensionsList = MetadataDimensionsList

60+metadataDimensionsList = MetadataDimensionsList'

6161

6262instance GoogleRequest MetadataDimensionsList where

6363 type Rs MetadataDimensionsList = Metadata

6464 type Scopes MetadataDimensionsList =

6565 '["https://www.googleapis.com/auth/adsense",

6666 "https://www.googleapis.com/auth/adsense.readonly"]

67− requestClient MetadataDimensionsList{}

67+ requestClient MetadataDimensionsList'{}

6868 = go (Just AltJSON) adSenseService

6969 where go

7070 = buildClient

gogol-adsense/gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs+3−3

@@ -50,21 +50,21 @@ type MetadataMetricsListResource =

5050--

5151-- /See:/ 'metadataMetricsList' smart constructor.

5252data MetadataMetricsList =

53− MetadataMetricsList

53+ MetadataMetricsList'

5454 deriving (Eq,Show,Data,Typeable,Generic)

5555

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

5757--

5858metadataMetricsList

5959 :: MetadataMetricsList

60−metadataMetricsList = MetadataMetricsList

60+metadataMetricsList = MetadataMetricsList'

6161

6262instance GoogleRequest MetadataMetricsList where

6363 type Rs MetadataMetricsList = Metadata

6464 type Scopes MetadataMetricsList =

6565 '["https://www.googleapis.com/auth/adsense",

6666 "https://www.googleapis.com/auth/adsense.readonly"]

67− requestClient MetadataMetricsList{}

67+ requestClient MetadataMetricsList'{}

6868 = go (Just AltJSON) adSenseService

6969 where go

7070 = buildClient

gogol-adsense/gen/Network/Google/Resource/AdSense/Payments/List.hs+3−3

@@ -49,21 +49,21 @@ type PaymentsListResource =

4949--

5050-- /See:/ 'paymentsList' smart constructor.

5151data PaymentsList =

52− PaymentsList

52+ PaymentsList'

5353 deriving (Eq,Show,Data,Typeable,Generic)

5454

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

5656--

5757paymentsList

5858 :: PaymentsList

59−paymentsList = PaymentsList

59+paymentsList = PaymentsList'

6060

6161instance GoogleRequest PaymentsList where

6262 type Rs PaymentsList = Payments

6363 type Scopes PaymentsList =

6464 '["https://www.googleapis.com/auth/adsense",

6565 "https://www.googleapis.com/auth/adsense.readonly"]

66− requestClient PaymentsList{}

66+ requestClient PaymentsList'{}

6767 = go (Just AltJSON) adSenseService

6868 where go

6969 = buildClient (Proxy :: Proxy PaymentsListResource)

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+4−4

@@ -96,7 +96,7 @@ type ReportsGenerateResource =

9696-- specify \"alt=csv\" as a query parameter.

9797--

9898-- /See:/ 'reportsGenerate' smart constructor.

99−data ReportsGenerate = ReportsGenerate

99+data ReportsGenerate = ReportsGenerate'

100100 { _rgDimension :: !(Maybe [Text])

101101 , _rgLocale :: !(Maybe Text)

102102 , _rgEndDate :: !Text

@@ -143,7 +143,7 @@ reportsGenerate

143143 -> Text -- ^ 'rgStartDate'

144144 -> ReportsGenerate

145145reportsGenerate pRgEndDate_ pRgStartDate_ =

146− ReportsGenerate

146+ ReportsGenerate'

147147 { _rgDimension = Nothing

148148 , _rgLocale = Nothing

149149 , _rgEndDate = pRgEndDate_

@@ -241,7 +241,7 @@ instance GoogleRequest ReportsGenerate where

241241 type Scopes ReportsGenerate =

242242 '["https://www.googleapis.com/auth/adsense",

243243 "https://www.googleapis.com/auth/adsense.readonly"]

244− requestClient ReportsGenerate{..}

244+ requestClient ReportsGenerate'{..}

245245 = go (Just _rgStartDate) (Just _rgEndDate)

246246 (_rgDimension ^. _Default)

247247 _rgLocale

@@ -265,7 +265,7 @@ instance GoogleRequest

265265 type Rs (MediaDownload ReportsGenerate) = Stream

266266 type Scopes (MediaDownload ReportsGenerate) =

267267 Scopes ReportsGenerate

268− requestClient (MediaDownload ReportsGenerate{..})

268+ requestClient (MediaDownload ReportsGenerate'{..})

269269 = go (Just _rgStartDate) (Just _rgEndDate)

270270 (_rgDimension ^. _Default)

271271 _rgLocale

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs+3−3

@@ -60,7 +60,7 @@ type ReportsSavedGenerateResource =

6060-- query parameters.

6161--

6262-- /See:/ 'reportsSavedGenerate' smart constructor.

63−data ReportsSavedGenerate = ReportsSavedGenerate

63+data ReportsSavedGenerate = ReportsSavedGenerate'

6464 { _rsgLocale :: !(Maybe Text)

6565 , _rsgSavedReportId :: !Text

6666 , _rsgStartIndex :: !(Maybe (Textual Int32))

@@ -82,7 +82,7 @@ reportsSavedGenerate

8282 :: Text -- ^ 'rsgSavedReportId'

8383 -> ReportsSavedGenerate

8484reportsSavedGenerate pRsgSavedReportId_ =

85− ReportsSavedGenerate

85+ ReportsSavedGenerate'

8686 { _rsgLocale = Nothing

8787 , _rsgSavedReportId = pRsgSavedReportId_

8888 , _rsgStartIndex = Nothing

@@ -121,7 +121,7 @@ instance GoogleRequest ReportsSavedGenerate where

121121 type Scopes ReportsSavedGenerate =

122122 '["https://www.googleapis.com/auth/adsense",

123123 "https://www.googleapis.com/auth/adsense.readonly"]

124− requestClient ReportsSavedGenerate{..}

124+ requestClient ReportsSavedGenerate'{..}

125125 = go _rsgSavedReportId _rsgLocale _rsgStartIndex

126126 _rsgMaxResults

127127 (Just AltJSON)

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs+3−3

@@ -54,7 +54,7 @@ type ReportsSavedListResource =

5454-- | List all saved reports in this AdSense account.

5555--

5656-- /See:/ 'reportsSavedList' smart constructor.

57−data ReportsSavedList = ReportsSavedList

57+data ReportsSavedList = ReportsSavedList'

5858 { _rslPageToken :: !(Maybe Text)

5959 , _rslMaxResults :: !(Maybe (Textual Int32))

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

@@ -69,7 +69,7 @@ data ReportsSavedList = ReportsSavedList

6969reportsSavedList

7070 :: ReportsSavedList

7171reportsSavedList =

72− ReportsSavedList

72+ ReportsSavedList'

7373 { _rslPageToken = Nothing

7474 , _rslMaxResults = Nothing

7575 }

@@ -94,7 +94,7 @@ instance GoogleRequest ReportsSavedList where

9494 type Scopes ReportsSavedList =

9595 '["https://www.googleapis.com/auth/adsense",

9696 "https://www.googleapis.com/auth/adsense.readonly"]

97− requestClient ReportsSavedList{..}

97+ requestClient ReportsSavedList'{..}

9898 = go _rslPageToken _rslMaxResults (Just AltJSON)

9999 adSenseService

100100 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs+3−3

@@ -51,7 +51,7 @@ type SavedadstylesGetResource =

5151-- | Get a specific saved ad style from the user\'s account.

5252--

5353-- /See:/ 'savedadstylesGet' smart constructor.

54−newtype SavedadstylesGet = SavedadstylesGet

54+newtype SavedadstylesGet = SavedadstylesGet'

5555 { _sgSavedAdStyleId :: Text

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

5757

@@ -64,7 +64,7 @@ savedadstylesGet

6464 :: Text -- ^ 'sgSavedAdStyleId'

6565 -> SavedadstylesGet

6666savedadstylesGet pSgSavedAdStyleId_ =

67− SavedadstylesGet

67+ SavedadstylesGet'

6868 { _sgSavedAdStyleId = pSgSavedAdStyleId_

6969 }

7070

@@ -79,7 +79,7 @@ instance GoogleRequest SavedadstylesGet where

7979 type Scopes SavedadstylesGet =

8080 '["https://www.googleapis.com/auth/adsense",

8181 "https://www.googleapis.com/auth/adsense.readonly"]

82− requestClient SavedadstylesGet{..}

82+ requestClient SavedadstylesGet'{..}

8383 = go _sgSavedAdStyleId (Just AltJSON) adSenseService

8484 where go

8585 = buildClient

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs+3−3

@@ -53,7 +53,7 @@ type SavedadstylesListResource =

5353-- | List all saved ad styles in the user\'s account.

5454--

5555-- /See:/ 'savedadstylesList' smart constructor.

56−data SavedadstylesList = SavedadstylesList

56+data SavedadstylesList = SavedadstylesList'

5757 { _slPageToken :: !(Maybe Text)

5858 , _slMaxResults :: !(Maybe (Textual Int32))

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

@@ -68,7 +68,7 @@ data SavedadstylesList = SavedadstylesList

6868savedadstylesList

6969 :: SavedadstylesList

7070savedadstylesList =

71− SavedadstylesList

71+ SavedadstylesList'

7272 { _slPageToken = Nothing

7373 , _slMaxResults = Nothing

7474 }

@@ -92,7 +92,7 @@ instance GoogleRequest SavedadstylesList where

9292 type Scopes SavedadstylesList =

9393 '["https://www.googleapis.com/auth/adsense",

9494 "https://www.googleapis.com/auth/adsense.readonly"]

95− requestClient SavedadstylesList{..}

95+ requestClient SavedadstylesList'{..}

9696 = go _slPageToken _slMaxResults (Just AltJSON)

9797 adSenseService

9898 where go

gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+3−3

@@ -58,7 +58,7 @@ type URLChannelsListResource =

5858-- account.

5959--

6060-- /See:/ 'urlChannelsList' smart constructor.

61−data URLChannelsList = URLChannelsList

61+data URLChannelsList = URLChannelsList'

6262 { _uclAdClientId :: !Text

6363 , _uclPageToken :: !(Maybe Text)

6464 , _uclMaxResults :: !(Maybe (Textual Int32))

@@ -77,7 +77,7 @@ urlChannelsList

7777 :: Text -- ^ 'uclAdClientId'

7878 -> URLChannelsList

7979urlChannelsList pUclAdClientId_ =

80− URLChannelsList

80+ URLChannelsList'

8181 { _uclAdClientId = pUclAdClientId_

8282 , _uclPageToken = Nothing

8383 , _uclMaxResults = Nothing

@@ -109,7 +109,7 @@ instance GoogleRequest URLChannelsList where

109109 type Scopes URLChannelsList =

110110 '["https://www.googleapis.com/auth/adsense",

111111 "https://www.googleapis.com/auth/adsense.readonly"]

112− requestClient URLChannelsList{..}

112+ requestClient URLChannelsList'{..}

113113 = go _uclAdClientId _uclPageToken _uclMaxResults

114114 (Just AltJSON)

115115 adSenseService

gogol-affiliates/gen/Network/Google/Affiliates/Types/Product.hs+68−68

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323-- | An EventResource.

2424--

2525-- /See:/ 'event' smart constructor.

26−data Event = Event

26+data Event = Event'

2727 { _eModifyDate :: !(Maybe DateTime')

2828 , _eStatus :: !(Maybe Text)

2929 , _eCommissionableSales :: !(Maybe Money)

@@ -86,7 +86,7 @@ data Event = Event

8686event

8787 :: Event

8888event =

89− Event

89+ Event'

9090 { _eModifyDate = Nothing

9191 , _eStatus = Nothing

9292 , _eCommissionableSales = Nothing

@@ -214,7 +214,7 @@ instance FromJSON Event where

214214 parseJSON

215215 = withObject "Event"

216216 (\ o ->

217− Event <$>

217+ Event' <$>

218218 (o .:? "modifyDate") <*> (o .:? "status") <*>

219219 (o .:? "commissionableSales")

220220 <*> (o .:? "chargeId")

@@ -234,7 +234,7 @@ instance FromJSON Event where

234234 <*> (o .:? "publisherName"))

235235

236236instance ToJSON Event where

237− toJSON Event{..}

237+ toJSON Event'{..}

238238 = object

239239 (catMaybes

240240 [("modifyDate" .=) <$> _eModifyDate,

@@ -258,7 +258,7 @@ instance ToJSON Event where

258258-- | An ApiMoneyProto.

259259--

260260-- /See:/ 'money' smart constructor.

261−data Money = Money

261+data Money = Money'

262262 { _mAmount :: !(Maybe (Textual Double))

263263 , _mCurrencyCode :: !(Maybe Text)

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

@@ -273,7 +273,7 @@ data Money = Money

273273money

274274 :: Money

275275money =

276− Money

276+ Money'

277277 { _mAmount = Nothing

278278 , _mCurrencyCode = Nothing

279279 }

@@ -294,11 +294,11 @@ instance FromJSON Money where

294294 parseJSON

295295 = withObject "Money"

296296 (\ o ->

297− Money <$>

297+ Money' <$>

298298 (o .:? "amount") <*> (o .:? "currencyCode"))

299299

300300instance ToJSON Money where

301− toJSON Money{..}

301+ toJSON Money'{..}

302302 = object

303303 (catMaybes

304304 [("amount" .=) <$> _mAmount,

@@ -307,7 +307,7 @@ instance ToJSON Money where

307307-- | A LinkResource.

308308--

309309-- /See:/ 'link' smart constructor.

310−data Link = Link

310+data Link = Link'

311311 { _lAuthorship :: !(Maybe Text)

312312 , _lDestinationURL :: !(Maybe Text)

313313 , _lClickTrackingURL :: !(Maybe Text)

@@ -379,7 +379,7 @@ data Link = Link

379379link

380380 :: Link

381381link =

382− Link

382+ Link'

383383 { _lAuthorship = Nothing

384384 , _lDestinationURL = Nothing

385385 , _lClickTrackingURL = Nothing

@@ -528,7 +528,7 @@ instance FromJSON Link where

528528 parseJSON

529529 = withObject "Link"

530530 (\ o ->

531− Link <$>

531+ Link' <$>

532532 (o .:? "authorship") <*> (o .:? "destinationUrl") <*>

533533 (o .:? "clickTrackingUrl")

534534 <*> (o .:? "createDate")

@@ -551,7 +551,7 @@ instance FromJSON Link where

551551 <*> (o .:? "description"))

552552

553553instance ToJSON Link where

554− toJSON Link{..}

554+ toJSON Link'{..}

555555 = object

556556 (catMaybes

557557 [("authorship" .=) <$> _lAuthorship,

@@ -579,7 +579,7 @@ instance ToJSON Link where

579579

580580--

581581-- /See:/ 'ccOffers' smart constructor.

582−data CcOffers = CcOffers

582+data CcOffers = CcOffers'

583583 { _coKind :: !Text

584584 , _coItems :: !(Maybe [CcOffer])

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

@@ -594,7 +594,7 @@ data CcOffers = CcOffers

594594ccOffers

595595 :: CcOffers

596596ccOffers =

597− CcOffers

597+ CcOffers'

598598 { _coKind = "gan#ccOffers"

599599 , _coItems = Nothing

600600 }

@@ -613,12 +613,12 @@ instance FromJSON CcOffers where

613613 parseJSON

614614 = withObject "CcOffers"

615615 (\ o ->

616− CcOffers <$>

616+ CcOffers' <$>

617617 (o .:? "kind" .!= "gan#ccOffers") <*>

618618 (o .:? "items" .!= mempty))

619619

620620instance ToJSON CcOffers where

621− toJSON CcOffers{..}

621+ toJSON CcOffers'{..}

622622 = object

623623 (catMaybes

624624 [Just ("kind" .= _coKind),

@@ -626,7 +626,7 @@ instance ToJSON CcOffers where

626626

627627--

628628-- /See:/ 'ccOfferDefaultFeesItem' smart constructor.

629−data CcOfferDefaultFeesItem = CcOfferDefaultFeesItem

629+data CcOfferDefaultFeesItem = CcOfferDefaultFeesItem'

630630 { _codfiRateType :: !(Maybe Text)

631631 , _codfiMinRate :: !(Maybe (Textual Double))

632632 , _codfiCategory :: !(Maybe Text)

@@ -647,7 +647,7 @@ data CcOfferDefaultFeesItem = CcOfferDefaultFeesItem

647647ccOfferDefaultFeesItem

648648 :: CcOfferDefaultFeesItem

649649ccOfferDefaultFeesItem =

650− CcOfferDefaultFeesItem

650+ CcOfferDefaultFeesItem'

651651 { _codfiRateType = Nothing

652652 , _codfiMinRate = Nothing

653653 , _codfiCategory = Nothing

@@ -684,13 +684,13 @@ instance FromJSON CcOfferDefaultFeesItem where

684684 parseJSON

685685 = withObject "CcOfferDefaultFeesItem"

686686 (\ o ->

687− CcOfferDefaultFeesItem <$>

687+ CcOfferDefaultFeesItem' <$>

688688 (o .:? "rateType") <*> (o .:? "minRate") <*>

689689 (o .:? "category")

690690 <*> (o .:? "maxRate"))

691691

692692instance ToJSON CcOfferDefaultFeesItem where

693− toJSON CcOfferDefaultFeesItem{..}

693+ toJSON CcOfferDefaultFeesItem'{..}

694694 = object

695695 (catMaybes

696696 [("rateType" .=) <$> _codfiRateType,

@@ -702,7 +702,7 @@ instance ToJSON CcOfferDefaultFeesItem where

702702-- advertiser or publisher.

703703--

704704-- /See:/ 'report' smart constructor.

705−data Report = Report

705+data Report = Report'

706706 { _rEndDate :: !(Maybe Text)

707707 , _rTotalsRows :: !(Maybe [[JSONValue]])

708708 , _rKind :: !Text

@@ -735,7 +735,7 @@ data Report = Report

735735report

736736 :: Report

737737report =

738− Report

738+ Report'

739739 { _rEndDate = Nothing

740740 , _rTotalsRows = Nothing

741741 , _rKind = "gan#report"

@@ -794,7 +794,7 @@ instance FromJSON Report where

794794 parseJSON

795795 = withObject "Report"

796796 (\ o ->

797− Report <$>

797+ Report' <$>

798798 (o .:? "end_date") <*>

799799 (o .:? "totals_rows" .!= mempty)

800800 <*> (o .:? "kind" .!= "gan#report")

@@ -805,7 +805,7 @@ instance FromJSON Report where

805805 <*> (o .:? "type"))

806806

807807instance ToJSON Report where

808− toJSON Report{..}

808+ toJSON Report'{..}

809809 = object

810810 (catMaybes

811811 [("end_date" .=) <$> _rEndDate,

@@ -819,7 +819,7 @@ instance ToJSON Report where

819819

820820--

821821-- /See:/ 'advertisers' smart constructor.

822−data Advertisers = Advertisers

822+data Advertisers = Advertisers'

823823 { _aNextPageToken :: !(Maybe Text)

824824 , _aKind :: !Text

825825 , _aItems :: !(Maybe [Advertiser])

@@ -837,7 +837,7 @@ data Advertisers = Advertisers

837837advertisers

838838 :: Advertisers

839839advertisers =

840− Advertisers

840+ Advertisers'

841841 { _aNextPageToken = Nothing

842842 , _aKind = "gan#advertisers"

843843 , _aItems = Nothing

@@ -864,13 +864,13 @@ instance FromJSON Advertisers where

864864 parseJSON

865865 = withObject "Advertisers"

866866 (\ o ->

867− Advertisers <$>

867+ Advertisers' <$>

868868 (o .:? "nextPageToken") <*>

869869 (o .:? "kind" .!= "gan#advertisers")

870870 <*> (o .:? "items" .!= mempty))

871871

872872instance ToJSON Advertisers where

873− toJSON Advertisers{..}

873+ toJSON Advertisers'{..}

874874 = object

875875 (catMaybes

876876 [("nextPageToken" .=) <$> _aNextPageToken,

@@ -878,7 +878,7 @@ instance ToJSON Advertisers where

878878

879879--

880880-- /See:/ 'eventProductsItem' smart constructor.

881−data EventProductsItem = EventProductsItem

881+data EventProductsItem = EventProductsItem'

882882 { _epiSKUName :: !(Maybe Text)

883883 , _epiNetworkFee :: !(Maybe Money)

884884 , _epiQuantity :: !(Maybe (Textual Int64))

@@ -914,7 +914,7 @@ data EventProductsItem = EventProductsItem

914914eventProductsItem

915915 :: EventProductsItem

916916eventProductsItem =

917− EventProductsItem

917+ EventProductsItem'

918918 { _epiSKUName = Nothing

919919 , _epiNetworkFee = Nothing

920920 , _epiQuantity = Nothing

@@ -980,7 +980,7 @@ instance FromJSON EventProductsItem where

980980 parseJSON

981981 = withObject "EventProductsItem"

982982 (\ o ->

983− EventProductsItem <$>

983+ EventProductsItem' <$>

984984 (o .:? "skuName") <*> (o .:? "networkFee") <*>

985985 (o .:? "quantity")

986986 <*> (o .:? "categoryName")

@@ -991,7 +991,7 @@ instance FromJSON EventProductsItem where

991991 <*> (o .:? "earnings"))

992992

993993instance ToJSON EventProductsItem where

994− toJSON EventProductsItem{..}

994+ toJSON EventProductsItem'{..}

995995 = object

996996 (catMaybes

997997 [("skuName" .=) <$> _epiSKUName,

@@ -1006,7 +1006,7 @@ instance ToJSON EventProductsItem where

10061006

10071007--

10081008-- /See:/ 'ccOfferBonusRewardsItem' smart constructor.

1009−data CcOfferBonusRewardsItem = CcOfferBonusRewardsItem

1009+data CcOfferBonusRewardsItem = CcOfferBonusRewardsItem'

10101010 { _cobriAmount :: !(Maybe (Textual Double))

10111011 , _cobriDetails :: !(Maybe Text)

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

@@ -1021,7 +1021,7 @@ data CcOfferBonusRewardsItem = CcOfferBonusRewardsItem

10211021ccOfferBonusRewardsItem

10221022 :: CcOfferBonusRewardsItem

10231023ccOfferBonusRewardsItem =

1024− CcOfferBonusRewardsItem

1024+ CcOfferBonusRewardsItem'

10251025 { _cobriAmount = Nothing

10261026 , _cobriDetails = Nothing

10271027 }

@@ -1042,11 +1042,11 @@ instance FromJSON CcOfferBonusRewardsItem where

10421042 parseJSON

10431043 = withObject "CcOfferBonusRewardsItem"

10441044 (\ o ->

1045− CcOfferBonusRewardsItem <$>

1045+ CcOfferBonusRewardsItem' <$>

10461046 (o .:? "amount") <*> (o .:? "details"))

10471047

10481048instance ToJSON CcOfferBonusRewardsItem where

1049− toJSON CcOfferBonusRewardsItem{..}

1049+ toJSON CcOfferBonusRewardsItem'{..}

10501050 = object

10511051 (catMaybes

10521052 [("amount" .=) <$> _cobriAmount,

@@ -1054,7 +1054,7 @@ instance ToJSON CcOfferBonusRewardsItem where

10541054

10551055--

10561056-- /See:/ 'events' smart constructor.

1057−data Events = Events

1057+data Events = Events'

10581058 { _eveNextPageToken :: !(Maybe Text)

10591059 , _eveKind :: !Text

10601060 , _eveItems :: !(Maybe [Event])

@@ -1072,7 +1072,7 @@ data Events = Events

10721072events

10731073 :: Events

10741074events =

1075− Events

1075+ Events'

10761076 { _eveNextPageToken = Nothing

10771077 , _eveKind = "gan#events"

10781078 , _eveItems = Nothing

@@ -1100,13 +1100,13 @@ instance FromJSON Events where

11001100 parseJSON

11011101 = withObject "Events"

11021102 (\ o ->

1103− Events <$>

1103+ Events' <$>

11041104 (o .:? "nextPageToken") <*>

11051105 (o .:? "kind" .!= "gan#events")

11061106 <*> (o .:? "items" .!= mempty))

11071107

11081108instance ToJSON Events where

1109− toJSON Events{..}

1109+ toJSON Events'{..}

11101110 = object

11111111 (catMaybes

11121112 [("nextPageToken" .=) <$> _eveNextPageToken,

@@ -1116,7 +1116,7 @@ instance ToJSON Events where

11161116-- | Special offers on the link.

11171117--

11181118-- /See:/ 'linkSpecialOffers' smart constructor.

1119−data LinkSpecialOffers = LinkSpecialOffers

1119+data LinkSpecialOffers = LinkSpecialOffers'

11201120 { _lsoFreeShippingMin :: !(Maybe Money)

11211121 , _lsoPercentOff :: !(Maybe (Textual Double))

11221122 , _lsoPriceCut :: !(Maybe Money)

@@ -1149,7 +1149,7 @@ data LinkSpecialOffers = LinkSpecialOffers

11491149linkSpecialOffers

11501150 :: LinkSpecialOffers

11511151linkSpecialOffers =

1152− LinkSpecialOffers

1152+ LinkSpecialOffers'

11531153 { _lsoFreeShippingMin = Nothing

11541154 , _lsoPercentOff = Nothing

11551155 , _lsoPriceCut = Nothing

@@ -1213,7 +1213,7 @@ instance FromJSON LinkSpecialOffers where

12131213 parseJSON

12141214 = withObject "LinkSpecialOffers"

12151215 (\ o ->

1216− LinkSpecialOffers <$>

1216+ LinkSpecialOffers' <$>

12171217 (o .:? "freeShippingMin") <*> (o .:? "percentOff")

12181218 <*> (o .:? "priceCut")

12191219 <*> (o .:? "priceCutMin")

@@ -1223,7 +1223,7 @@ instance FromJSON LinkSpecialOffers where

12231223 <*> (o .:? "freeGift"))

12241224

12251225instance ToJSON LinkSpecialOffers where

1226− toJSON LinkSpecialOffers{..}

1226+ toJSON LinkSpecialOffers'{..}

12271227 = object

12281228 (catMaybes

12291229 [("freeShippingMin" .=) <$> _lsoFreeShippingMin,

@@ -1237,7 +1237,7 @@ instance ToJSON LinkSpecialOffers where

12371237

12381238--

12391239-- /See:/ 'publishers' smart constructor.

1240−data Publishers = Publishers

1240+data Publishers = Publishers'

12411241 { _pNextPageToken :: !(Maybe Text)

12421242 , _pKind :: !Text

12431243 , _pItems :: !(Maybe [Publisher])

@@ -1255,7 +1255,7 @@ data Publishers = Publishers

12551255publishers

12561256 :: Publishers

12571257publishers =

1258− Publishers

1258+ Publishers'

12591259 { _pNextPageToken = Nothing

12601260 , _pKind = "gan#publishers"

12611261 , _pItems = Nothing

@@ -1282,13 +1282,13 @@ instance FromJSON Publishers where

12821282 parseJSON

12831283 = withObject "Publishers"

12841284 (\ o ->

1285− Publishers <$>

1285+ Publishers' <$>

12861286 (o .:? "nextPageToken") <*>

12871287 (o .:? "kind" .!= "gan#publishers")

12881288 <*> (o .:? "items" .!= mempty))

12891289

12901290instance ToJSON Publishers where

1291− toJSON Publishers{..}

1291+ toJSON Publishers'{..}

12921292 = object

12931293 (catMaybes

12941294 [("nextPageToken" .=) <$> _pNextPageToken,

@@ -1297,7 +1297,7 @@ instance ToJSON Publishers where

12971297-- | An AdvertiserResource.

12981298--

12991299-- /See:/ 'advertiser' smart constructor.

1300−data Advertiser = Advertiser

1300+data Advertiser = Advertiser'

13011301 { _advAllowPublisherCreatedLinks :: !(Maybe Bool)

13021302 , _advContactPhone :: !(Maybe Text)

13031303 , _advContactEmail :: !(Maybe Text)

@@ -1369,7 +1369,7 @@ data Advertiser = Advertiser

13691369advertiser

13701370 :: Advertiser

13711371advertiser =

1372− Advertiser

1372+ Advertiser'

13731373 { _advAllowPublisherCreatedLinks = Nothing

13741374 , _advContactPhone = Nothing

13751375 , _advContactEmail = Nothing

@@ -1529,7 +1529,7 @@ instance FromJSON Advertiser where

15291529 parseJSON

15301530 = withObject "Advertiser"

15311531 (\ o ->

1532− Advertiser <$>

1532+ Advertiser' <$>

15331533 (o .:? "allowPublisherCreatedLinks") <*>

15341534 (o .:? "contactPhone")

15351535 <*> (o .:? "contactEmail")

@@ -1553,7 +1553,7 @@ instance FromJSON Advertiser where

15531553 <*> (o .:? "description"))

15541554

15551555instance ToJSON Advertiser where

1556− toJSON Advertiser{..}

1556+ toJSON Advertiser'{..}

15571557 = object

15581558 (catMaybes

15591559 [("allowPublisherCreatedLinks" .=) <$>

@@ -1588,7 +1588,7 @@ instance ToJSON Advertiser where

15881588-- descriptions.

15891589--

15901590-- /See:/ 'ccOffer' smart constructor.

1591−data CcOffer = CcOffer

1591+data CcOffer = CcOffer'

15921592 { _cMinimumFinanceCharge :: !(Maybe Text)

15931593 , _cTrackingURL :: !(Maybe Text)

15941594 , _cProhibitedCategories :: !(Maybe [Text])

@@ -1786,7 +1786,7 @@ data CcOffer = CcOffer

17861786ccOffer

17871787 :: CcOffer

17881788ccOffer =

1789− CcOffer

1789+ CcOffer'

17901790 { _cMinimumFinanceCharge = Nothing

17911791 , _cTrackingURL = Nothing

17921792 , _cProhibitedCategories = Nothing

@@ -2271,7 +2271,7 @@ instance FromJSON CcOffer where

22712271 parseJSON

22722272 = withObject "CcOffer"

22732273 (\ o ->

2274− CcOffer <$>

2274+ CcOffer' <$>

22752275 (o .:? "minimumFinanceCharge") <*>

22762276 (o .:? "trackingUrl")

22772277 <*> (o .:? "prohibitedCategories" .!= mempty)

@@ -2337,7 +2337,7 @@ instance FromJSON CcOffer where

23372337 <*> (o .:? "purchaseRateType"))

23382338

23392339instance ToJSON CcOffer where

2340− toJSON CcOffer{..}

2340+ toJSON CcOffer'{..}

23412341 = object

23422342 (catMaybes

23432343 [("minimumFinanceCharge" .=) <$>

@@ -2423,7 +2423,7 @@ instance ToJSON CcOffer where

24232423

24242424--

24252425-- /See:/ 'links' smart constructor.

2426−data Links = Links

2426+data Links = Links'

24272427 { _linNextPageToken :: !(Maybe Text)

24282428 , _linKind :: !Text

24292429 , _linItems :: !(Maybe [Link])

@@ -2441,7 +2441,7 @@ data Links = Links

24412441links

24422442 :: Links

24432443links =

2444− Links

2444+ Links'

24452445 { _linNextPageToken = Nothing

24462446 , _linKind = "gan#links"

24472447 , _linItems = Nothing

@@ -2468,13 +2468,13 @@ instance FromJSON Links where

24682468 parseJSON

24692469 = withObject "Links"

24702470 (\ o ->

2471− Links <$>

2471+ Links' <$>

24722472 (o .:? "nextPageToken") <*>

24732473 (o .:? "kind" .!= "gan#links")

24742474 <*> (o .:? "items" .!= mempty))

24752475

24762476instance ToJSON Links where

2477− toJSON Links{..}

2477+ toJSON Links'{..}

24782478 = object

24792479 (catMaybes

24802480 [("nextPageToken" .=) <$> _linNextPageToken,

@@ -2484,7 +2484,7 @@ instance ToJSON Links where

24842484-- | A PublisherResource.

24852485--

24862486-- /See:/ 'publisher' smart constructor.

2487−data Publisher = Publisher

2487+data Publisher = Publisher'

24882488 { _pubStatus :: !(Maybe Text)

24892489 , _pubKind :: !Text

24902490 , _pubPayoutRank :: !(Maybe Text)

@@ -2526,7 +2526,7 @@ data Publisher = Publisher

25262526publisher

25272527 :: Publisher

25282528publisher =

2529− Publisher

2529+ Publisher'

25302530 { _pubStatus = Nothing

25312531 , _pubKind = "gan#publisher"

25322532 , _pubPayoutRank = Nothing

@@ -2614,7 +2614,7 @@ instance FromJSON Publisher where

26142614 parseJSON

26152615 = withObject "Publisher"

26162616 (\ o ->

2617− Publisher <$>

2617+ Publisher' <$>

26182618 (o .:? "status") <*>

26192619 (o .:? "kind" .!= "gan#publisher")

26202620 <*> (o .:? "payoutRank")

@@ -2628,7 +2628,7 @@ instance FromJSON Publisher where

26282628 <*> (o .:? "sites" .!= mempty))

26292629

26302630instance ToJSON Publisher where

2631− toJSON Publisher{..}

2631+ toJSON Publisher'{..}

26322632 = object

26332633 (catMaybes

26342634 [("status" .=) <$> _pubStatus,

@@ -2645,7 +2645,7 @@ instance ToJSON Publisher where

26452645

26462646--

26472647-- /See:/ 'ccOfferRewardsItem' smart constructor.

2648−data CcOfferRewardsItem = CcOfferRewardsItem

2648+data CcOfferRewardsItem = CcOfferRewardsItem'

26492649 { _coriAmount :: !(Maybe (Textual Double))

26502650 , _coriExpirationMonths :: !(Maybe (Textual Double))

26512651 , _coriCategory :: !(Maybe Text)

@@ -2672,7 +2672,7 @@ data CcOfferRewardsItem = CcOfferRewardsItem

26722672ccOfferRewardsItem

26732673 :: CcOfferRewardsItem

26742674ccOfferRewardsItem =

2675− CcOfferRewardsItem

2675+ CcOfferRewardsItem'

26762676 { _coriAmount = Nothing

26772677 , _coriExpirationMonths = Nothing

26782678 , _coriCategory = Nothing

@@ -2726,7 +2726,7 @@ instance FromJSON CcOfferRewardsItem where

27262726 parseJSON

27272727 = withObject "CcOfferRewardsItem"

27282728 (\ o ->

2729− CcOfferRewardsItem <$>

2729+ CcOfferRewardsItem' <$>

27302730 (o .:? "amount") <*> (o .:? "expirationMonths") <*>

27312731 (o .:? "category")

27322732 <*> (o .:? "additionalDetails")

@@ -2734,7 +2734,7 @@ instance FromJSON CcOfferRewardsItem where

27342734 <*> (o .:? "minRewardTier"))

27352735

27362736instance ToJSON CcOfferRewardsItem where

2737− toJSON CcOfferRewardsItem{..}

2737+ toJSON CcOfferRewardsItem'{..}

27382738 = object

27392739 (catMaybes

27402740 [("amount" .=) <$> _coriAmount,

gogol-affiliates/gen/Network/Google/Resource/GAN/Advertisers/Get.hs+3−3

@@ -61,7 +61,7 @@ type AdvertisersGetResource =

6161-- omitting the advertiserId query parameter.

6262--

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

64−data AdvertisersGet = AdvertisersGet

64+data AdvertisersGet = AdvertisersGet'

6565 { _agAdvertiserId :: !(Maybe Text)

6666 , _agRoleId :: !Text

6767 , _agRole :: !AdvertisersGetRole

@@ -81,7 +81,7 @@ advertisersGet

8181 -> AdvertisersGetRole -- ^ 'agRole'

8282 -> AdvertisersGet

8383advertisersGet pAgRoleId_ pAgRole_ =

84− AdvertisersGet

84+ AdvertisersGet'

8585 { _agAdvertiserId = Nothing

8686 , _agRoleId = pAgRoleId_

8787 , _agRole = pAgRole_

@@ -105,7 +105,7 @@ agRole = lens _agRole (\ s a -> s{_agRole = a})

105105instance GoogleRequest AdvertisersGet where

106106 type Rs AdvertisersGet = Advertiser

107107 type Scopes AdvertisersGet = '[]

108− requestClient AdvertisersGet{..}

108+ requestClient AdvertisersGet'{..}

109109 = go _agRole _agRoleId _agAdvertiserId (Just AltJSON)

110110 affiliatesService

111111 where go

gogol-affiliates/gen/Network/Google/Resource/GAN/Advertisers/List.hs+3−3

@@ -71,7 +71,7 @@ type AdvertisersListResource =

7171-- advertiser\/publisher has access to.

7272--

7373-- /See:/ 'advertisersList' smart constructor.

74−data AdvertisersList = AdvertisersList

74+data AdvertisersList = AdvertisersList'

7575 { _alRelationshipStatus :: !(Maybe AdvertisersListRelationshipStatus)

7676 , _alMinSevenDayEpc :: !(Maybe (Textual Double))

7777 , _alRoleId :: !Text

@@ -109,7 +109,7 @@ advertisersList

109109 -> AdvertisersListRole -- ^ 'alRole'

110110 -> AdvertisersList

111111advertisersList pAlRoleId_ pAlRole_ =

112− AdvertisersList

112+ AdvertisersList'

113113 { _alRelationshipStatus = Nothing

114114 , _alMinSevenDayEpc = Nothing

115115 , _alRoleId = pAlRoleId_

@@ -188,7 +188,7 @@ alMaxResults

188188instance GoogleRequest AdvertisersList where

189189 type Rs AdvertisersList = Advertisers

190190 type Scopes AdvertisersList = '[]

191− requestClient AdvertisersList{..}

191+ requestClient AdvertisersList'{..}

192192 = go _alRole _alRoleId _alRelationshipStatus

193193 _alMinSevenDayEpc

194194 _alMinNinetyDayEpc

gogol-affiliates/gen/Network/Google/Resource/GAN/CcOffers/List.hs+3−3

@@ -56,7 +56,7 @@ type CcOffersListResource =

5656-- | Retrieves credit card offers for the given publisher.

5757--

5858-- /See:/ 'ccOffersList' smart constructor.

59−data CcOffersList = CcOffersList

59+data CcOffersList = CcOffersList'

6060 { _colAdvertiser :: !(Maybe [Text])

6161 , _colProjection :: !(Maybe CcOffersListProjection)

6262 , _colPublisher :: !Text

@@ -75,7 +75,7 @@ ccOffersList

7575 :: Text -- ^ 'colPublisher'

7676 -> CcOffersList

7777ccOffersList pColPublisher_ =

78− CcOffersList

78+ CcOffersList'

7979 { _colAdvertiser = Nothing

8080 , _colProjection = Nothing

8181 , _colPublisher = pColPublisher_

@@ -104,7 +104,7 @@ colPublisher

104104instance GoogleRequest CcOffersList where

105105 type Rs CcOffersList = CcOffers

106106 type Scopes CcOffersList = '[]

107− requestClient CcOffersList{..}

107+ requestClient CcOffersList'{..}

108108 = go _colPublisher (_colAdvertiser ^. _Default)

109109 _colProjection

110110 (Just AltJSON)

gogol-affiliates/gen/Network/Google/Resource/GAN/Events/List.hs+3−3

@@ -88,7 +88,7 @@ type EventsListResource =

8888-- | Retrieves event data for a given advertiser\/publisher.

8989--

9090-- /See:/ 'eventsList' smart constructor.

91−data EventsList = EventsList

91+data EventsList = EventsList'

9292 { _elStatus :: !(Maybe EventsListStatus)

9393 , _elEventDateMin :: !(Maybe Text)

9494 , _elChargeType :: !(Maybe EventsListChargeType)

@@ -153,7 +153,7 @@ eventsList

153153 -> EventsListRole -- ^ 'elRole'

154154 -> EventsList

155155eventsList pElRoleId_ pElRole_ =

156− EventsList

156+ EventsList'

157157 { _elStatus = Nothing

158158 , _elEventDateMin = Nothing

159159 , _elChargeType = Nothing

@@ -290,7 +290,7 @@ elMaxResults

290290instance GoogleRequest EventsList where

291291 type Rs EventsList = Events

292292 type Scopes EventsList = '[]

293− requestClient EventsList{..}

293+ requestClient EventsList'{..}

294294 = go _elRole _elRoleId _elStatus _elEventDateMin

295295 _elChargeType

296296 _elMemberId

gogol-affiliates/gen/Network/Google/Resource/GAN/Links/Get.hs+3−3

@@ -61,7 +61,7 @@ type LinksGetResource =

6161-- advertisers they are in a relationship with.

6262--

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

64−data LinksGet = LinksGet

64+data LinksGet = LinksGet'

6565 { _lgRoleId :: !Text

6666 , _lgRole :: !LinksGetRole

6767 , _lgLinkId :: !(Textual Int64)

@@ -82,7 +82,7 @@ linksGet

8282 -> Int64 -- ^ 'lgLinkId'

8383 -> LinksGet

8484linksGet pLgRoleId_ pLgRole_ pLgLinkId_ =

85− LinksGet

85+ LinksGet'

8686 { _lgRoleId = pLgRoleId_

8787 , _lgRole = pLgRole_

8888 , _lgLinkId = _Coerce # pLgLinkId_

@@ -106,7 +106,7 @@ lgLinkId

106106instance GoogleRequest LinksGet where

107107 type Rs LinksGet = Link

108108 type Scopes LinksGet = '[]

109− requestClient LinksGet{..}

109+ requestClient LinksGet'{..}

110110 = go _lgRole _lgRoleId _lgLinkId (Just AltJSON)

111111 affiliatesService

112112 where go

gogol-affiliates/gen/Network/Google/Resource/GAN/Links/Insert.hs+3−3

@@ -55,7 +55,7 @@ type LinksInsertResource =

5555-- | Inserts a new link.

5656--

5757-- /See:/ 'linksInsert' smart constructor.

58−data LinksInsert = LinksInsert

58+data LinksInsert = LinksInsert'

5959 { _liPayload :: !Link

6060 , _liRoleId :: !Text

6161 , _liRole :: !LinksInsertRole

@@ -76,7 +76,7 @@ linksInsert

7676 -> LinksInsertRole -- ^ 'liRole'

7777 -> LinksInsert

7878linksInsert pLiPayload_ pLiRoleId_ pLiRole_ =

79− LinksInsert

79+ LinksInsert'

8080 { _liPayload = pLiPayload_

8181 , _liRoleId = pLiRoleId_

8282 , _liRole = pLiRole_

@@ -99,7 +99,7 @@ liRole = lens _liRole (\ s a -> s{_liRole = a})

9999instance GoogleRequest LinksInsert where

100100 type Rs LinksInsert = Link

101101 type Scopes LinksInsert = '[]

102− requestClient LinksInsert{..}

102+ requestClient LinksInsert'{..}

103103 = go _liRole _liRoleId (Just AltJSON) _liPayload

104104 affiliatesService

105105 where go

gogol-affiliates/gen/Network/Google/Resource/GAN/Links/List.hs+3−3

@@ -83,7 +83,7 @@ type LinksListResource =

8383-- | Retrieves all links that match the query parameters.

8484--

8585-- /See:/ 'linksList' smart constructor.

86−data LinksList = LinksList

86+data LinksList = LinksList'

8787 { _llCreateDateMax :: !(Maybe Text)

8888 , _llAuthorship :: !(Maybe LinksListAuthorship)

8989 , _llAssetSize :: !(Maybe [Text])

@@ -139,7 +139,7 @@ linksList

139139 -> LinksListRole -- ^ 'llRole'

140140 -> LinksList

141141linksList pLlRoleId_ pLlRole_ =

142− LinksList

142+ LinksList'

143143 { _llCreateDateMax = Nothing

144144 , _llAuthorship = Nothing

145145 , _llAssetSize = Nothing

@@ -250,7 +250,7 @@ llMaxResults

250250instance GoogleRequest LinksList where

251251 type Rs LinksList = Links

252252 type Scopes LinksList = '[]

253− requestClient LinksList{..}

253+ requestClient LinksList'{..}

254254 = go _llRole _llRoleId _llCreateDateMax _llAuthorship

255255 (_llAssetSize ^. _Default)

256256 _llRelationshipStatus

gogol-affiliates/gen/Network/Google/Resource/GAN/Publishers/Get.hs+3−3

@@ -61,7 +61,7 @@ type PublishersGetResource =

6161-- omitting the publisherId query parameter.

6262--

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

64−data PublishersGet = PublishersGet

64+data PublishersGet = PublishersGet'

6565 { _pgRoleId :: !Text

6666 , _pgRole :: !PublishersGetRole

6767 , _pgPublisherId :: !(Maybe Text)

@@ -81,7 +81,7 @@ publishersGet

8181 -> PublishersGetRole -- ^ 'pgRole'

8282 -> PublishersGet

8383publishersGet pPgRoleId_ pPgRole_ =

84− PublishersGet

84+ PublishersGet'

8585 { _pgRoleId = pPgRoleId_

8686 , _pgRole = pPgRole_

8787 , _pgPublisherId = Nothing

@@ -105,7 +105,7 @@ pgPublisherId

105105instance GoogleRequest PublishersGet where

106106 type Rs PublishersGet = Publisher

107107 type Scopes PublishersGet = '[]

108− requestClient PublishersGet{..}

108+ requestClient PublishersGet'{..}

109109 = go _pgRole _pgRoleId _pgPublisherId (Just AltJSON)

110110 affiliatesService

111111 where go

gogol-affiliates/gen/Network/Google/Resource/GAN/Publishers/List.hs+3−3

@@ -71,7 +71,7 @@ type PublishersListResource =

7171-- advertiser\/publisher has access to.

7272--

7373-- /See:/ 'publishersList' smart constructor.

74−data PublishersList = PublishersList

74+data PublishersList = PublishersList'

7575 { _plRelationshipStatus :: !(Maybe PublishersListRelationshipStatus)

7676 , _plMinSevenDayEpc :: !(Maybe (Textual Double))

7777 , _plRoleId :: !Text

@@ -109,7 +109,7 @@ publishersList

109109 -> PublishersListRole -- ^ 'plRole'

110110 -> PublishersList

111111publishersList pPlRoleId_ pPlRole_ =

112− PublishersList

112+ PublishersList'

113113 { _plRelationshipStatus = Nothing

114114 , _plMinSevenDayEpc = Nothing

115115 , _plRoleId = pPlRoleId_

@@ -187,7 +187,7 @@ plMaxResults

187187instance GoogleRequest PublishersList where

188188 type Rs PublishersList = Publishers

189189 type Scopes PublishersList = '[]

190− requestClient PublishersList{..}

190+ requestClient PublishersList'{..}

191191 = go _plRole _plRoleId _plRelationshipStatus

192192 _plMinSevenDayEpc

193193 _plMinNinetyDayEpc

gogol-affiliates/gen/Network/Google/Resource/GAN/Reports/Get.hs+3−3

@@ -78,7 +78,7 @@ type ReportsGetResource =

7878-- | Retrieves a report of the specified type.

7979--

8080-- /See:/ 'reportsGet' smart constructor.

81−data ReportsGet = ReportsGet

81+data ReportsGet = ReportsGet'

8282 { _rgStatus :: !(Maybe ReportsGetStatus)

8383 , _rgAdvertiserId :: !(Maybe [Text])

8484 , _rgEndDate :: !(Maybe Text)

@@ -132,7 +132,7 @@ reportsGet

132132 -> ReportsGetReportType -- ^ 'rgReportType'

133133 -> ReportsGet

134134reportsGet pRgRoleId_ pRgRole_ pRgReportType_ =

135− ReportsGet

135+ ReportsGet'

136136 { _rgStatus = Nothing

137137 , _rgAdvertiserId = Nothing

138138 , _rgEndDate = Nothing

@@ -241,7 +241,7 @@ rgMaxResults

241241instance GoogleRequest ReportsGet where

242242 type Rs ReportsGet = Report

243243 type Scopes ReportsGet = '[]

244− requestClient ReportsGet{..}

244+ requestClient ReportsGet'{..}

245245 = go _rgRole _rgRoleId _rgReportType _rgStatus

246246 (_rgAdvertiserId ^. _Default)

247247 _rgEndDate

gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+393−388

@@ -26,7 +26,7 @@ import Network.Google.Prelude

2626-- corresponds to a single Analytics unsampled report.

2727--

2828-- /See:/ 'unSampledReports' smart constructor.

29−data UnSampledReports = UnSampledReports

29+data UnSampledReports = UnSampledReports'

3030 { _usrNextLink :: !(Maybe Text)

3131 , _usrItemsPerPage :: !(Maybe (Textual Int32))

3232 , _usrKind :: !Text

@@ -59,7 +59,7 @@ data UnSampledReports = UnSampledReports

5959unSampledReports

6060 :: UnSampledReports

6161unSampledReports =

62− UnSampledReports

62+ UnSampledReports'

6363 { _usrNextLink = Nothing

6464 , _usrItemsPerPage = Nothing

6565 , _usrKind = "analytics#unsampledReports"

@@ -127,7 +127,7 @@ instance FromJSON UnSampledReports where

127127 parseJSON

128128 = withObject "UnSampledReports"

129129 (\ o ->

130− UnSampledReports <$>

130+ UnSampledReports' <$>

131131 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

132132 (o .:? "kind" .!= "analytics#unsampledReports")

133133 <*> (o .:? "username")

@@ -137,7 +137,7 @@ instance FromJSON UnSampledReports where

137137 <*> (o .:? "previousLink"))

138138

139139instance ToJSON UnSampledReports where

140− toJSON UnSampledReports{..}

140+ toJSON UnSampledReports'{..}

141141 = object

142142 (catMaybes

143143 [("nextLink" .=) <$> _usrNextLink,

@@ -151,7 +151,7 @@ instance ToJSON UnSampledReports where

151151

152152--

153153-- /See:/ 'goalURLDestinationDetailsStepsItem' smart constructor.

154−data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem

154+data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem'

155155 { _guddsiURL :: !(Maybe Text)

156156 , _guddsiName :: !(Maybe Text)

157157 , _guddsiNumber :: !(Maybe (Textual Int32))

@@ -169,7 +169,7 @@ data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem

169169goalURLDestinationDetailsStepsItem

170170 :: GoalURLDestinationDetailsStepsItem

171171goalURLDestinationDetailsStepsItem =

172− GoalURLDestinationDetailsStepsItem

172+ GoalURLDestinationDetailsStepsItem'

173173 { _guddsiURL = Nothing

174174 , _guddsiName = Nothing

175175 , _guddsiNumber = Nothing

@@ -196,13 +196,13 @@ instance FromJSON GoalURLDestinationDetailsStepsItem

196196 parseJSON

197197 = withObject "GoalURLDestinationDetailsStepsItem"

198198 (\ o ->

199− GoalURLDestinationDetailsStepsItem <$>

199+ GoalURLDestinationDetailsStepsItem' <$>

200200 (o .:? "url") <*> (o .:? "name") <*>

201201 (o .:? "number"))

202202

203203instance ToJSON GoalURLDestinationDetailsStepsItem

204204 where

205− toJSON GoalURLDestinationDetailsStepsItem{..}

205+ toJSON GoalURLDestinationDetailsStepsItem'{..}

206206 = object

207207 (catMaybes

208208 [("url" .=) <$> _guddsiURL,

@@ -212,7 +212,7 @@ instance ToJSON GoalURLDestinationDetailsStepsItem

212212-- | Analytics data request query parameters.

213213--

214214-- /See:/ 'gaDataQuery' smart constructor.

215−data GaDataQuery = GaDataQuery

215+data GaDataQuery = GaDataQuery'

216216 { _gdqMetrics :: !(Maybe [Text])

217217 , _gdqSamplingLevel :: !(Maybe Text)

218218 , _gdqFilters :: !(Maybe Text)

@@ -254,7 +254,7 @@ data GaDataQuery = GaDataQuery

254254gaDataQuery

255255 :: GaDataQuery

256256gaDataQuery =

257− GaDataQuery

257+ GaDataQuery'

258258 { _gdqMetrics = Nothing

259259 , _gdqSamplingLevel = Nothing

260260 , _gdqFilters = Nothing

@@ -335,7 +335,7 @@ instance FromJSON GaDataQuery where

335335 parseJSON

336336 = withObject "GaDataQuery"

337337 (\ o ->

338− GaDataQuery <$>

338+ GaDataQuery' <$>

339339 (o .:? "metrics" .!= mempty) <*>

340340 (o .:? "samplingLevel")

341341 <*> (o .:? "filters")

@@ -349,7 +349,7 @@ instance FromJSON GaDataQuery where

349349 <*> (o .:? "start-date"))

350350

351351instance ToJSON GaDataQuery where

352− toJSON GaDataQuery{..}

352+ toJSON GaDataQuery'{..}

353353 = object

354354 (catMaybes

355355 [("metrics" .=) <$> _gdqMetrics,

@@ -366,7 +366,7 @@ instance ToJSON GaDataQuery where

366366

367367--

368368-- /See:/ 'gaDataDataTableRowsItem' smart constructor.

369−newtype GaDataDataTableRowsItem = GaDataDataTableRowsItem

369+newtype GaDataDataTableRowsItem = GaDataDataTableRowsItem'

370370 { _gddtriC :: Maybe [GaDataDataTableRowsItemCItem]

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

372372

@@ -378,7 +378,7 @@ newtype GaDataDataTableRowsItem = GaDataDataTableRowsItem

378378gaDataDataTableRowsItem

379379 :: GaDataDataTableRowsItem

380380gaDataDataTableRowsItem =

381− GaDataDataTableRowsItem

381+ GaDataDataTableRowsItem'

382382 { _gddtriC = Nothing

383383 }

384384

@@ -391,16 +391,16 @@ instance FromJSON GaDataDataTableRowsItem where

391391 parseJSON

392392 = withObject "GaDataDataTableRowsItem"

393393 (\ o ->

394− GaDataDataTableRowsItem <$> (o .:? "c" .!= mempty))

394+ GaDataDataTableRowsItem' <$> (o .:? "c" .!= mempty))

395395

396396instance ToJSON GaDataDataTableRowsItem where

397− toJSON GaDataDataTableRowsItem{..}

397+ toJSON GaDataDataTableRowsItem'{..}

398398 = object (catMaybes [("c" .=) <$> _gddtriC])

399399

400400-- | JSON template for Analytics unsampled report resource.

401401--

402402-- /See:/ 'unSampledReport' smart constructor.

403−data UnSampledReport = UnSampledReport

403+data UnSampledReport = UnSampledReport'

404404 { _uDownloadType :: !(Maybe Text)

405405 , _uStatus :: !(Maybe Text)

406406 , _uMetrics :: !(Maybe Text)

@@ -466,7 +466,7 @@ data UnSampledReport = UnSampledReport

466466unSampledReport

467467 :: UnSampledReport

468468unSampledReport =

469− UnSampledReport

469+ UnSampledReport'

470470 { _uDownloadType = Nothing

471471 , _uStatus = Nothing

472472 , _uMetrics = Nothing

@@ -587,7 +587,7 @@ instance FromJSON UnSampledReport where

587587 parseJSON

588588 = withObject "UnSampledReport"

589589 (\ o ->

590− UnSampledReport <$>

590+ UnSampledReport' <$>

591591 (o .:? "downloadType") <*> (o .:? "status") <*>

592592 (o .:? "metrics")

593593 <*> (o .:? "driveDownloadDetails")

@@ -608,7 +608,7 @@ instance FromJSON UnSampledReport where

608608 <*> (o .:? "start-date"))

609609

610610instance ToJSON UnSampledReport where

611− toJSON UnSampledReport{..}

611+ toJSON UnSampledReport'{..}

612612 = object

613613 (catMaybes

614614 [("downloadType" .=) <$> _uDownloadType,

@@ -634,7 +634,7 @@ instance ToJSON UnSampledReport where

634634

635635--

636636-- /See:/ 'mcfDataColumnHeadersItem' smart constructor.

637−data McfDataColumnHeadersItem = McfDataColumnHeadersItem

637+data McfDataColumnHeadersItem = McfDataColumnHeadersItem'

638638 { _mdchiColumnType :: !(Maybe Text)

639639 , _mdchiName :: !(Maybe Text)

640640 , _mdchiDataType :: !(Maybe Text)

@@ -652,7 +652,7 @@ data McfDataColumnHeadersItem = McfDataColumnHeadersItem

652652mcfDataColumnHeadersItem

653653 :: McfDataColumnHeadersItem

654654mcfDataColumnHeadersItem =

655− McfDataColumnHeadersItem

655+ McfDataColumnHeadersItem'

656656 { _mdchiColumnType = Nothing

657657 , _mdchiName = Nothing

658658 , _mdchiDataType = Nothing

@@ -680,12 +680,12 @@ instance FromJSON McfDataColumnHeadersItem where

680680 parseJSON

681681 = withObject "McfDataColumnHeadersItem"

682682 (\ o ->

683− McfDataColumnHeadersItem <$>

683+ McfDataColumnHeadersItem' <$>

684684 (o .:? "columnType") <*> (o .:? "name") <*>

685685 (o .:? "dataType"))

686686

687687instance ToJSON McfDataColumnHeadersItem where

688− toJSON McfDataColumnHeadersItem{..}

688+ toJSON McfDataColumnHeadersItem'{..}

689689 = object

690690 (catMaybes

691691 [("columnType" .=) <$> _mdchiColumnType,

@@ -697,7 +697,7 @@ instance ToJSON McfDataColumnHeadersItem where

697697-- same as the metric order specified in the request.

698698--

699699-- /See:/ 'gaDataTotalsForAllResults' smart constructor.

700−newtype GaDataTotalsForAllResults = GaDataTotalsForAllResults

700+newtype GaDataTotalsForAllResults = GaDataTotalsForAllResults'

701701 { _gdtfarAddtional :: HashMap Text Text

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

703703

@@ -710,7 +710,7 @@ gaDataTotalsForAllResults

710710 :: HashMap Text Text -- ^ 'gdtfarAddtional'

711711 -> GaDataTotalsForAllResults

712712gaDataTotalsForAllResults pGdtfarAddtional_ =

713− GaDataTotalsForAllResults

713+ GaDataTotalsForAllResults'

714714 { _gdtfarAddtional = _Coerce # pGdtfarAddtional_

715715 }

716716

@@ -726,7 +726,7 @@ instance FromJSON GaDataTotalsForAllResults where

726726 parseJSON

727727 = withObject "GaDataTotalsForAllResults"

728728 (\ o ->

729− GaDataTotalsForAllResults <$> (parseJSONObject o))

729+ GaDataTotalsForAllResults' <$> (parseJSONObject o))

730730

731731instance ToJSON GaDataTotalsForAllResults where

732732 toJSON = toJSON . _gdtfarAddtional

@@ -735,7 +735,7 @@ instance ToJSON GaDataTotalsForAllResults where

735735-- this view (profile) belongs.

736736--

737737-- /See:/ 'proFileParentLink' smart constructor.

738−data ProFileParentLink = ProFileParentLink

738+data ProFileParentLink = ProFileParentLink'

739739 { _pfplHref :: !(Maybe Text)

740740 , _pfplType :: !Text

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

@@ -750,7 +750,7 @@ data ProFileParentLink = ProFileParentLink

750750proFileParentLink

751751 :: ProFileParentLink

752752proFileParentLink =

753− ProFileParentLink

753+ ProFileParentLink'

754754 { _pfplHref = Nothing

755755 , _pfplType = "analytics#webproperty"

756756 }

@@ -767,12 +767,12 @@ instance FromJSON ProFileParentLink where

767767 parseJSON

768768 = withObject "ProFileParentLink"

769769 (\ o ->

770− ProFileParentLink <$>

770+ ProFileParentLink' <$>

771771 (o .:? "href") <*>

772772 (o .:? "type" .!= "analytics#webproperty"))

773773

774774instance ToJSON ProFileParentLink where

775− toJSON ProFileParentLink{..}

775+ toJSON ProFileParentLink'{..}

776776 = object

777777 (catMaybes

778778 [("href" .=) <$> _pfplHref,

@@ -780,7 +780,7 @@ instance ToJSON ProFileParentLink where

780780

781781--

782782-- /See:/ 'gaDataDataTableRowsItemCItem' smart constructor.

783−newtype GaDataDataTableRowsItemCItem = GaDataDataTableRowsItemCItem

783+newtype GaDataDataTableRowsItemCItem = GaDataDataTableRowsItemCItem'

784784 { _gddtriciV :: Maybe Text

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

786786

@@ -792,7 +792,7 @@ newtype GaDataDataTableRowsItemCItem = GaDataDataTableRowsItemCItem

792792gaDataDataTableRowsItemCItem

793793 :: GaDataDataTableRowsItemCItem

794794gaDataDataTableRowsItemCItem =

795− GaDataDataTableRowsItemCItem

795+ GaDataDataTableRowsItemCItem'

796796 { _gddtriciV = Nothing

797797 }

798798

@@ -803,16 +803,17 @@ gddtriciV

803803instance FromJSON GaDataDataTableRowsItemCItem where

804804 parseJSON

805805 = withObject "GaDataDataTableRowsItemCItem"

806− (\ o -> GaDataDataTableRowsItemCItem <$> (o .:? "v"))

806+ (\ o ->

807+ GaDataDataTableRowsItemCItem' <$> (o .:? "v"))

807808

808809instance ToJSON GaDataDataTableRowsItemCItem where

809− toJSON GaDataDataTableRowsItemCItem{..}

810+ toJSON GaDataDataTableRowsItemCItem'{..}

810811 = object (catMaybes [("v" .=) <$> _gddtriciV])

811812

812813-- | Permissions the user has for this entity.

813814--

814815-- /See:/ 'entityUserLinkPermissions' smart constructor.

815−data EntityUserLinkPermissions = EntityUserLinkPermissions

816+data EntityUserLinkPermissions = EntityUserLinkPermissions'

816817 { _eulpLocal :: !(Maybe [Text])

817818 , _eulpEffective :: !(Maybe [Text])

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

@@ -827,7 +828,7 @@ data EntityUserLinkPermissions = EntityUserLinkPermissions

827828entityUserLinkPermissions

828829 :: EntityUserLinkPermissions

829830entityUserLinkPermissions =

830− EntityUserLinkPermissions

831+ EntityUserLinkPermissions'

831832 { _eulpLocal = Nothing

832833 , _eulpEffective = Nothing

833834 }

@@ -856,12 +857,12 @@ instance FromJSON EntityUserLinkPermissions where

856857 parseJSON

857858 = withObject "EntityUserLinkPermissions"

858859 (\ o ->

859− EntityUserLinkPermissions <$>

860+ EntityUserLinkPermissions' <$>

860861 (o .:? "local" .!= mempty) <*>

861862 (o .:? "effective" .!= mempty))

862863

863864instance ToJSON EntityUserLinkPermissions where

864− toJSON EntityUserLinkPermissions{..}

865+ toJSON EntityUserLinkPermissions'{..}

865866 = object

866867 (catMaybes

867868 [("local" .=) <$> _eulpLocal,

@@ -871,7 +872,7 @@ instance ToJSON EntityUserLinkPermissions where

871872-- requested.

872873--

873874-- /See:/ 'realtimeDataProFileInfo' smart constructor.

874−data RealtimeDataProFileInfo = RealtimeDataProFileInfo

875+data RealtimeDataProFileInfo = RealtimeDataProFileInfo'

875876 { _rdpfiWebPropertyId :: !(Maybe Text)

876877 , _rdpfiProFileId :: !(Maybe Text)

877878 , _rdpfiProFileName :: !(Maybe Text)

@@ -898,7 +899,7 @@ data RealtimeDataProFileInfo = RealtimeDataProFileInfo

898899realtimeDataProFileInfo

899900 :: RealtimeDataProFileInfo

900901realtimeDataProFileInfo =

901− RealtimeDataProFileInfo

902+ RealtimeDataProFileInfo'

902903 { _rdpfiWebPropertyId = Nothing

903904 , _rdpfiProFileId = Nothing

904905 , _rdpfiProFileName = Nothing

@@ -946,7 +947,7 @@ instance FromJSON RealtimeDataProFileInfo where

946947 parseJSON

947948 = withObject "RealtimeDataProFileInfo"

948949 (\ o ->

949− RealtimeDataProFileInfo <$>

950+ RealtimeDataProFileInfo' <$>

950951 (o .:? "webPropertyId") <*> (o .:? "profileId") <*>

951952 (o .:? "profileName")

952953 <*> (o .:? "accountId")

@@ -954,7 +955,7 @@ instance FromJSON RealtimeDataProFileInfo where

954955 <*> (o .:? "tableId"))

955956

956957instance ToJSON RealtimeDataProFileInfo where

957− toJSON RealtimeDataProFileInfo{..}

958+ toJSON RealtimeDataProFileInfo'{..}

958959 = object

959960 (catMaybes

960961 [("webPropertyId" .=) <$> _rdpfiWebPropertyId,

@@ -967,7 +968,7 @@ instance ToJSON RealtimeDataProFileInfo where

967968

968969--

969970-- /See:/ 'mcfDataRowsItemItemConversionPathValueItem' smart constructor.

970−data McfDataRowsItemItemConversionPathValueItem = McfDataRowsItemItemConversionPathValueItem

971+data McfDataRowsItemItemConversionPathValueItem = McfDataRowsItemItemConversionPathValueItem'

971972 { _mdriicpviInteractionType :: !(Maybe Text)

972973 , _mdriicpviNodeValue :: !(Maybe Text)

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

@@ -982,7 +983,7 @@ data McfDataRowsItemItemConversionPathValueItem = McfDataRowsItemItemConversionP

982983mcfDataRowsItemItemConversionPathValueItem

983984 :: McfDataRowsItemItemConversionPathValueItem

984985mcfDataRowsItemItemConversionPathValueItem =

985− McfDataRowsItemItemConversionPathValueItem

986+ McfDataRowsItemItemConversionPathValueItem'

986987 { _mdriicpviInteractionType = Nothing

987988 , _mdriicpviNodeValue = Nothing

988989 }

@@ -1007,12 +1008,13 @@ instance FromJSON

10071008 = withObject

10081009 "McfDataRowsItemItemConversionPathValueItem"

10091010 (\ o ->

1010− McfDataRowsItemItemConversionPathValueItem <$>

1011+ McfDataRowsItemItemConversionPathValueItem' <$>

10111012 (o .:? "interactionType") <*> (o .:? "nodeValue"))

10121013

10131014instance ToJSON

10141015 McfDataRowsItemItemConversionPathValueItem where

1015− toJSON McfDataRowsItemItemConversionPathValueItem{..}

1016+ toJSON

1017+ McfDataRowsItemItemConversionPathValueItem'{..}

10161018 = object

10171019 (catMaybes

10181020 [("interactionType" .=) <$>

@@ -1022,7 +1024,7 @@ instance ToJSON

10221024-- | JSON template for an Analytics filter expression.

10231025--

10241026-- /See:/ 'filterExpression' smart constructor.

1025−data FilterExpression = FilterExpression

1027+data FilterExpression = FilterExpression'

10261028 { _feFieldIndex :: !(Maybe (Textual Int32))

10271029 , _feField :: !(Maybe Text)

10281030 , _feKind :: !Text

@@ -1049,7 +1051,7 @@ data FilterExpression = FilterExpression

10491051filterExpression

10501052 :: FilterExpression

10511053filterExpression =

1052− FilterExpression

1054+ FilterExpression'

10531055 { _feFieldIndex = Nothing

10541056 , _feField = Nothing

10551057 , _feKind = "analytics#filterExpression"

@@ -1125,7 +1127,7 @@ instance FromJSON FilterExpression where

11251127 parseJSON

11261128 = withObject "FilterExpression"

11271129 (\ o ->

1128− FilterExpression <$>

1130+ FilterExpression' <$>

11291131 (o .:? "fieldIndex") <*> (o .:? "field") <*>

11301132 (o .:? "kind" .!= "analytics#filterExpression")

11311133 <*> (o .:? "matchType")

@@ -1133,7 +1135,7 @@ instance FromJSON FilterExpression where

11331135 <*> (o .:? "expressionValue"))

11341136

11351137instance ToJSON FilterExpression where

1136− toJSON FilterExpression{..}

1138+ toJSON FilterExpression'{..}

11371139 = object

11381140 (catMaybes

11391141 [("fieldIndex" .=) <$> _feFieldIndex,

@@ -1145,7 +1147,7 @@ instance ToJSON FilterExpression where

11451147-- | JSON template for a linked view (profile).

11461148--

11471149-- /See:/ 'proFileRef' smart constructor.

1148−data ProFileRef = ProFileRef

1150+data ProFileRef = ProFileRef'

11491151 { _pfrWebPropertyId :: !(Maybe Text)

11501152 , _pfrKind :: !Text

11511153 , _pfrHref :: !(Maybe Text)

@@ -1175,7 +1177,7 @@ data ProFileRef = ProFileRef

11751177proFileRef

11761178 :: ProFileRef

11771179proFileRef =

1178− ProFileRef

1180+ ProFileRef'

11791181 { _pfrWebPropertyId = Nothing

11801182 , _pfrKind = "analytics#profileRef"

11811183 , _pfrHref = Nothing

@@ -1223,7 +1225,7 @@ instance FromJSON ProFileRef where

12231225 parseJSON

12241226 = withObject "ProFileRef"

12251227 (\ o ->

1226− ProFileRef <$>

1228+ ProFileRef' <$>

12271229 (o .:? "webPropertyId") <*>

12281230 (o .:? "kind" .!= "analytics#profileRef")

12291231 <*> (o .:? "href")

@@ -1233,7 +1235,7 @@ instance FromJSON ProFileRef where

12331235 <*> (o .:? "id"))

12341236

12351237instance ToJSON ProFileRef where

1236− toJSON ProFileRef{..}

1238+ toJSON ProFileRef'{..}

12371239 = object

12381240 (catMaybes

12391241 [("webPropertyId" .=) <$> _pfrWebPropertyId,

@@ -1250,7 +1252,7 @@ instance ToJSON ProFileRef where

12501252-- single Analytics account.

12511253--

12521254-- /See:/ 'accounts' smart constructor.

1253−data Accounts = Accounts

1255+data Accounts = Accounts'

12541256 { _aNextLink :: !(Maybe Text)

12551257 , _aItemsPerPage :: !(Maybe (Textual Int32))

12561258 , _aKind :: !Text

@@ -1283,7 +1285,7 @@ data Accounts = Accounts

12831285accounts

12841286 :: Accounts

12851287accounts =

1286− Accounts

1288+ Accounts'

12871289 { _aNextLink = Nothing

12881290 , _aItemsPerPage = Nothing

12891291 , _aKind = "analytics#accounts"

@@ -1349,7 +1351,7 @@ instance FromJSON Accounts where

13491351 parseJSON

13501352 = withObject "Accounts"

13511353 (\ o ->

1352− Accounts <$>

1354+ Accounts' <$>

13531355 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

13541356 (o .:? "kind" .!= "analytics#accounts")

13551357 <*> (o .:? "username")

@@ -1359,7 +1361,7 @@ instance FromJSON Accounts where

13591361 <*> (o .:? "previousLink"))

13601362

13611363instance ToJSON Accounts where

1362− toJSON Accounts{..}

1364+ toJSON Accounts'{..}

13631365 = object

13641366 (catMaybes

13651367 [("nextLink" .=) <$> _aNextLink,

@@ -1377,7 +1379,7 @@ instance ToJSON Accounts where

13771379-- experiment.

13781380--

13791381-- /See:/ 'experiments' smart constructor.

1380−data Experiments = Experiments

1382+data Experiments = Experiments'

13811383 { _eNextLink :: !(Maybe Text)

13821384 , _eItemsPerPage :: !(Maybe (Textual Int32))

13831385 , _eKind :: !Text

@@ -1410,7 +1412,7 @@ data Experiments = Experiments

14101412experiments

14111413 :: Experiments

14121414experiments =

1413− Experiments

1415+ Experiments'

14141416 { _eNextLink = Nothing

14151417 , _eItemsPerPage = Nothing

14161418 , _eKind = "analytics#experiments"

@@ -1476,7 +1478,7 @@ instance FromJSON Experiments where

14761478 parseJSON

14771479 = withObject "Experiments"

14781480 (\ o ->

1479− Experiments <$>

1481+ Experiments' <$>

14801482 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

14811483 (o .:? "kind" .!= "analytics#experiments")

14821484 <*> (o .:? "username")

@@ -1486,7 +1488,7 @@ instance FromJSON Experiments where

14861488 <*> (o .:? "previousLink"))

14871489

14881490instance ToJSON Experiments where

1489− toJSON Experiments{..}

1491+ toJSON Experiments'{..}

14901492 = object

14911493 (catMaybes

14921494 [("nextLink" .=) <$> _eNextLink,

@@ -1502,7 +1504,7 @@ instance ToJSON Experiments where

15021504-- this experiment belongs.

15031505--

15041506-- /See:/ 'experimentParentLink' smart constructor.

1505−data ExperimentParentLink = ExperimentParentLink

1507+data ExperimentParentLink = ExperimentParentLink'

15061508 { _eplHref :: !(Maybe Text)

15071509 , _eplType :: !Text

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

@@ -1517,7 +1519,7 @@ data ExperimentParentLink = ExperimentParentLink

15171519experimentParentLink

15181520 :: ExperimentParentLink

15191521experimentParentLink =

1520− ExperimentParentLink

1522+ ExperimentParentLink'

15211523 { _eplHref = Nothing

15221524 , _eplType = "analytics#profile"

15231525 }

@@ -1535,12 +1537,12 @@ instance FromJSON ExperimentParentLink where

15351537 parseJSON

15361538 = withObject "ExperimentParentLink"

15371539 (\ o ->

1538− ExperimentParentLink <$>

1540+ ExperimentParentLink' <$>

15391541 (o .:? "href") <*>

15401542 (o .:? "type" .!= "analytics#profile"))

15411543

15421544instance ToJSON ExperimentParentLink where

1543− toJSON ExperimentParentLink{..}

1545+ toJSON ExperimentParentLink'{..}

15441546 = object

15451547 (catMaybes

15461548 [("href" .=) <$> _eplHref,

@@ -1549,7 +1551,7 @@ instance ToJSON ExperimentParentLink where

15491551-- | Download details for a file stored in Google Drive.

15501552--

15511553-- /See:/ 'unSampledReportDriveDownloadDetails' smart constructor.

1552−newtype UnSampledReportDriveDownloadDetails = UnSampledReportDriveDownloadDetails

1554+newtype UnSampledReportDriveDownloadDetails = UnSampledReportDriveDownloadDetails'

15531555 { _usrdddDocumentId :: Maybe Text

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

15551557

@@ -1561,7 +1563,7 @@ newtype UnSampledReportDriveDownloadDetails = UnSampledReportDriveDownloadDetail

15611563unSampledReportDriveDownloadDetails

15621564 :: UnSampledReportDriveDownloadDetails

15631565unSampledReportDriveDownloadDetails =

1564− UnSampledReportDriveDownloadDetails

1566+ UnSampledReportDriveDownloadDetails'

15651567 { _usrdddDocumentId = Nothing

15661568 }

15671569

@@ -1576,12 +1578,12 @@ instance FromJSON UnSampledReportDriveDownloadDetails

15761578 parseJSON

15771579 = withObject "UnSampledReportDriveDownloadDetails"

15781580 (\ o ->

1579− UnSampledReportDriveDownloadDetails <$>

1581+ UnSampledReportDriveDownloadDetails' <$>

15801582 (o .:? "documentId"))

15811583

15821584instance ToJSON UnSampledReportDriveDownloadDetails

15831585 where

1584− toJSON UnSampledReportDriveDownloadDetails{..}

1586+ toJSON UnSampledReportDriveDownloadDetails'{..}

15851587 = object

15861588 (catMaybes [("documentId" .=) <$> _usrdddDocumentId])

15871589

@@ -1589,7 +1591,7 @@ instance ToJSON UnSampledReportDriveDownloadDetails

15891591-- requested.

15901592--

15911593-- /See:/ 'mcfDataProFileInfo' smart constructor.

1592−data McfDataProFileInfo = McfDataProFileInfo

1594+data McfDataProFileInfo = McfDataProFileInfo'

15931595 { _mdpfiWebPropertyId :: !(Maybe Text)

15941596 , _mdpfiProFileId :: !(Maybe Text)

15951597 , _mdpfiProFileName :: !(Maybe Text)

@@ -1616,7 +1618,7 @@ data McfDataProFileInfo = McfDataProFileInfo

16161618mcfDataProFileInfo

16171619 :: McfDataProFileInfo

16181620mcfDataProFileInfo =

1619− McfDataProFileInfo

1621+ McfDataProFileInfo'

16201622 { _mdpfiWebPropertyId = Nothing

16211623 , _mdpfiProFileId = Nothing

16221624 , _mdpfiProFileName = Nothing

@@ -1664,7 +1666,7 @@ instance FromJSON McfDataProFileInfo where

16641666 parseJSON

16651667 = withObject "McfDataProFileInfo"

16661668 (\ o ->

1667− McfDataProFileInfo <$>

1669+ McfDataProFileInfo' <$>

16681670 (o .:? "webPropertyId") <*> (o .:? "profileId") <*>

16691671 (o .:? "profileName")

16701672 <*> (o .:? "accountId")

@@ -1672,7 +1674,7 @@ instance FromJSON McfDataProFileInfo where

16721674 <*> (o .:? "tableId"))

16731675

16741676instance ToJSON McfDataProFileInfo where

1675− toJSON McfDataProFileInfo{..}

1677+ toJSON McfDataProFileInfo'{..}

16761678 = object

16771679 (catMaybes

16781680 [("webPropertyId" .=) <$> _mdpfiWebPropertyId,

@@ -1688,7 +1690,7 @@ instance ToJSON McfDataProFileInfo where

16881690-- source.

16891691--

16901692-- /See:/ 'customDataSources' smart constructor.

1691−data CustomDataSources = CustomDataSources

1693+data CustomDataSources = CustomDataSources'

16921694 { _cdsNextLink :: !(Maybe Text)

16931695 , _cdsItemsPerPage :: !(Maybe (Textual Int32))

16941696 , _cdsKind :: !Text

@@ -1721,7 +1723,7 @@ data CustomDataSources = CustomDataSources

17211723customDataSources

17221724 :: CustomDataSources

17231725customDataSources =

1724− CustomDataSources

1726+ CustomDataSources'

17251727 { _cdsNextLink = Nothing

17261728 , _cdsItemsPerPage = Nothing

17271729 , _cdsKind = "analytics#customDataSources"

@@ -1789,7 +1791,7 @@ instance FromJSON CustomDataSources where

17891791 parseJSON

17901792 = withObject "CustomDataSources"

17911793 (\ o ->

1792− CustomDataSources <$>

1794+ CustomDataSources' <$>

17931795 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

17941796 (o .:? "kind" .!= "analytics#customDataSources")

17951797 <*> (o .:? "username")

@@ -1799,7 +1801,7 @@ instance FromJSON CustomDataSources where

17991801 <*> (o .:? "previousLink"))

18001802

18011803instance ToJSON CustomDataSources where

1802− toJSON CustomDataSources{..}

1804+ toJSON CustomDataSources'{..}

18031805 = object

18041806 (catMaybes

18051807 [("nextLink" .=) <$> _cdsNextLink,

@@ -1815,7 +1817,7 @@ instance ToJSON CustomDataSources where

18151817-- for this web property.

18161818--

18171819-- /See:/ 'webPropertyChildLink' smart constructor.

1818−data WebPropertyChildLink = WebPropertyChildLink

1820+data WebPropertyChildLink = WebPropertyChildLink'

18191821 { _wpclHref :: !(Maybe Text)

18201822 , _wpclType :: !Text

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

@@ -1830,7 +1832,7 @@ data WebPropertyChildLink = WebPropertyChildLink

18301832webPropertyChildLink

18311833 :: WebPropertyChildLink

18321834webPropertyChildLink =

1833− WebPropertyChildLink

1835+ WebPropertyChildLink'

18341836 { _wpclHref = Nothing

18351837 , _wpclType = "analytics#profiles"

18361838 }

@@ -1847,12 +1849,12 @@ instance FromJSON WebPropertyChildLink where

18471849 parseJSON

18481850 = withObject "WebPropertyChildLink"

18491851 (\ o ->

1850− WebPropertyChildLink <$>

1852+ WebPropertyChildLink' <$>

18511853 (o .:? "href") <*>

18521854 (o .:? "type" .!= "analytics#profiles"))

18531855

18541856instance ToJSON WebPropertyChildLink where

1855− toJSON WebPropertyChildLink{..}

1857+ toJSON WebPropertyChildLink'{..}

18561858 = object

18571859 (catMaybes

18581860 [("href" .=) <$> _wpclHref,

@@ -1861,7 +1863,7 @@ instance ToJSON WebPropertyChildLink where

18611863-- | Multi-Channel Funnels data for a given view (profile).

18621864--

18631865-- /See:/ 'mcfData' smart constructor.

1864−data McfData = McfData

1866+data McfData = McfData'

18651867 { _mdNextLink :: !(Maybe Text)

18661868 , _mdSampleSpace :: !(Maybe (Textual Int64))

18671869 , _mdItemsPerPage :: !(Maybe (Textual Int32))

@@ -1915,7 +1917,7 @@ data McfData = McfData

19151917mcfData

19161918 :: McfData

19171919mcfData =

1918− McfData

1920+ McfData'

19191921 { _mdNextLink = Nothing

19201922 , _mdSampleSpace = Nothing

19211923 , _mdItemsPerPage = Nothing

@@ -2034,7 +2036,7 @@ instance FromJSON McfData where

20342036 parseJSON

20352037 = withObject "McfData"

20362038 (\ o ->

2037− McfData <$>

2039+ McfData' <$>

20382040 (o .:? "nextLink") <*> (o .:? "sampleSpace") <*>

20392041 (o .:? "itemsPerPage")

20402042 <*> (o .:? "profileInfo")

@@ -2051,7 +2053,7 @@ instance FromJSON McfData where

20512053 <*> (o .:? "previousLink"))

20522054

20532055instance ToJSON McfData where

2054− toJSON McfData{..}

2056+ toJSON McfData'{..}

20552057 = object

20562058 (catMaybes

20572059 [("nextLink" .=) <$> _mdNextLink,

@@ -2075,7 +2077,7 @@ instance ToJSON McfData where

20752077-- | JSON template for a user reference.

20762078--

20772079-- /See:/ 'userRef' smart constructor.

2078−data UserRef = UserRef

2080+data UserRef = UserRef'

20792081 { _urEmail :: !(Maybe Text)

20802082 , _urKind :: !Text

20812083 , _urId :: !(Maybe Text)

@@ -2093,7 +2095,7 @@ data UserRef = UserRef

20932095userRef

20942096 :: UserRef

20952097userRef =

2096− UserRef

2098+ UserRef'

20972099 { _urEmail = Nothing

20982100 , _urKind = "analytics#userRef"

20992101 , _urId = Nothing

@@ -2114,13 +2116,13 @@ instance FromJSON UserRef where

21142116 parseJSON

21152117 = withObject "UserRef"

21162118 (\ o ->

2117− UserRef <$>

2119+ UserRef' <$>

21182120 (o .:? "email") <*>

21192121 (o .:? "kind" .!= "analytics#userRef")

21202122 <*> (o .:? "id"))

21212123

21222124instance ToJSON UserRef where

2123− toJSON UserRef{..}

2125+ toJSON UserRef'{..}

21242126 = object

21252127 (catMaybes

21262128 [("email" .=) <$> _urEmail, Just ("kind" .= _urKind),

@@ -2129,7 +2131,7 @@ instance ToJSON UserRef where

21292131-- | Details for the goal of the type VISIT_NUM_PAGES.

21302132--

21312133-- /See:/ 'goalVisitNumPagesDetails' smart constructor.

2132−data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails

2134+data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails'

21332135 { _gvnpdComparisonValue :: !(Maybe (Textual Int64))

21342136 , _gvnpdComparisonType :: !(Maybe Text)

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

@@ -2144,7 +2146,7 @@ data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails

21442146goalVisitNumPagesDetails

21452147 :: GoalVisitNumPagesDetails

21462148goalVisitNumPagesDetails =

2147− GoalVisitNumPagesDetails

2149+ GoalVisitNumPagesDetails'

21482150 { _gvnpdComparisonValue = Nothing

21492151 , _gvnpdComparisonType = Nothing

21502152 }

@@ -2167,12 +2169,12 @@ instance FromJSON GoalVisitNumPagesDetails where

21672169 parseJSON

21682170 = withObject "GoalVisitNumPagesDetails"

21692171 (\ o ->

2170− GoalVisitNumPagesDetails <$>

2172+ GoalVisitNumPagesDetails' <$>

21712173 (o .:? "comparisonValue") <*>

21722174 (o .:? "comparisonType"))

21732175

21742176instance ToJSON GoalVisitNumPagesDetails where

2175− toJSON GoalVisitNumPagesDetails{..}

2177+ toJSON GoalVisitNumPagesDetails'{..}

21762178 = object

21772179 (catMaybes

21782180 [("comparisonValue" .=) <$> _gvnpdComparisonValue,

@@ -2180,7 +2182,7 @@ instance ToJSON GoalVisitNumPagesDetails where

21802182

21812183--

21822184-- /See:/ 'realtimeDataColumnHeadersItem' smart constructor.

2183−data RealtimeDataColumnHeadersItem = RealtimeDataColumnHeadersItem

2185+data RealtimeDataColumnHeadersItem = RealtimeDataColumnHeadersItem'

21842186 { _rdchiColumnType :: !(Maybe Text)

21852187 , _rdchiName :: !(Maybe Text)

21862188 , _rdchiDataType :: !(Maybe Text)

@@ -2198,7 +2200,7 @@ data RealtimeDataColumnHeadersItem = RealtimeDataColumnHeadersItem

21982200realtimeDataColumnHeadersItem

21992201 :: RealtimeDataColumnHeadersItem

22002202realtimeDataColumnHeadersItem =

2201− RealtimeDataColumnHeadersItem

2203+ RealtimeDataColumnHeadersItem'

22022204 { _rdchiColumnType = Nothing

22032205 , _rdchiName = Nothing

22042206 , _rdchiDataType = Nothing

@@ -2227,12 +2229,12 @@ instance FromJSON RealtimeDataColumnHeadersItem where

22272229 parseJSON

22282230 = withObject "RealtimeDataColumnHeadersItem"

22292231 (\ o ->

2230− RealtimeDataColumnHeadersItem <$>

2232+ RealtimeDataColumnHeadersItem' <$>

22312233 (o .:? "columnType") <*> (o .:? "name") <*>

22322234 (o .:? "dataType"))

22332235

22342236instance ToJSON RealtimeDataColumnHeadersItem where

2235− toJSON RealtimeDataColumnHeadersItem{..}

2237+ toJSON RealtimeDataColumnHeadersItem'{..}

22362238 = object

22372239 (catMaybes

22382240 [("columnType" .=) <$> _rdchiColumnType,

@@ -2242,7 +2244,7 @@ instance ToJSON RealtimeDataColumnHeadersItem where

22422244-- | JSON template for a linked account.

22432245--

22442246-- /See:/ 'accountRef' smart constructor.

2245−data AccountRef = AccountRef

2247+data AccountRef = AccountRef'

22462248 { _arKind :: !Text

22472249 , _arHref :: !(Maybe Text)

22482250 , _arName :: !(Maybe Text)

@@ -2263,7 +2265,7 @@ data AccountRef = AccountRef

22632265accountRef

22642266 :: AccountRef

22652267accountRef =

2266− AccountRef

2268+ AccountRef'

22672269 { _arKind = "analytics#accountRef"

22682270 , _arHref = Nothing

22692271 , _arName = Nothing

@@ -2290,14 +2292,14 @@ instance FromJSON AccountRef where

22902292 parseJSON

22912293 = withObject "AccountRef"

22922294 (\ o ->

2293− AccountRef <$>

2295+ AccountRef' <$>

22942296 (o .:? "kind" .!= "analytics#accountRef") <*>

22952297 (o .:? "href")

22962298 <*> (o .:? "name")

22972299 <*> (o .:? "id"))

22982300

22992301instance ToJSON AccountRef where

2300− toJSON AccountRef{..}

2302+ toJSON AccountRef'{..}

23012303 = object

23022304 (catMaybes

23032305 [Just ("kind" .= _arKind), ("href" .=) <$> _arHref,

@@ -2307,7 +2309,7 @@ instance ToJSON AccountRef where

23072309-- Each resource in this collection corresponds to a single link.

23082310--

23092311-- /See:/ 'entityAdWordsLinks' smart constructor.

2310−data EntityAdWordsLinks = EntityAdWordsLinks

2312+data EntityAdWordsLinks = EntityAdWordsLinks'

23112313 { _eawlNextLink :: !(Maybe Text)

23122314 , _eawlItemsPerPage :: !(Maybe (Textual Int32))

23132315 , _eawlKind :: !Text

@@ -2337,7 +2339,7 @@ data EntityAdWordsLinks = EntityAdWordsLinks

23372339entityAdWordsLinks

23382340 :: EntityAdWordsLinks

23392341entityAdWordsLinks =

2340− EntityAdWordsLinks

2342+ EntityAdWordsLinks'

23412343 { _eawlNextLink = Nothing

23422344 , _eawlItemsPerPage = Nothing

23432345 , _eawlKind = "analytics#entityAdWordsLinks"

@@ -2399,7 +2401,7 @@ instance FromJSON EntityAdWordsLinks where

23992401 parseJSON

24002402 = withObject "EntityAdWordsLinks"

24012403 (\ o ->

2402− EntityAdWordsLinks <$>

2404+ EntityAdWordsLinks' <$>

24032405 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

24042406 (o .:? "kind" .!= "analytics#entityAdWordsLinks")

24052407 <*> (o .:? "items" .!= mempty)

@@ -2408,7 +2410,7 @@ instance FromJSON EntityAdWordsLinks where

24082410 <*> (o .:? "previousLink"))

24092411

24102412instance ToJSON EntityAdWordsLinks where

2411− toJSON EntityAdWordsLinks{..}

2413+ toJSON EntityAdWordsLinks'{..}

24122414 = object

24132415 (catMaybes

24142416 [("nextLink" .=) <$> _eawlNextLink,

@@ -2424,7 +2426,7 @@ instance ToJSON EntityAdWordsLinks where

24242426-- single Analytics view (profile).

24252427--

24262428-- /See:/ 'proFiles' smart constructor.

2427−data ProFiles = ProFiles

2429+data ProFiles = ProFiles'

24282430 { _pfNextLink :: !(Maybe Text)

24292431 , _pfItemsPerPage :: !(Maybe (Textual Int32))

24302432 , _pfKind :: !Text

@@ -2457,7 +2459,7 @@ data ProFiles = ProFiles

24572459proFiles

24582460 :: ProFiles

24592461proFiles =

2460− ProFiles

2462+ ProFiles'

24612463 { _pfNextLink = Nothing

24622464 , _pfItemsPerPage = Nothing

24632465 , _pfKind = "analytics#profiles"

@@ -2523,7 +2525,7 @@ instance FromJSON ProFiles where

25232525 parseJSON

25242526 = withObject "ProFiles"

25252527 (\ o ->

2526− ProFiles <$>

2528+ ProFiles' <$>

25272529 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

25282530 (o .:? "kind" .!= "analytics#profiles")

25292531 <*> (o .:? "username")

@@ -2533,7 +2535,7 @@ instance FromJSON ProFiles where

25332535 <*> (o .:? "previousLink"))

25342536

25352537instance ToJSON ProFiles where

2536− toJSON ProFiles{..}

2538+ toJSON ProFiles'{..}

25372539 = object

25382540 (catMaybes

25392541 [("nextLink" .=) <$> _pfNextLink,

@@ -2548,7 +2550,7 @@ instance ToJSON ProFiles where

25482550-- | Request template for the delete upload data request.

25492551--

25502552-- /See:/ 'analyticsDataimportDeleteUploadDataRequest' smart constructor.

2551−newtype AnalyticsDataimportDeleteUploadDataRequest = AnalyticsDataimportDeleteUploadDataRequest

2553+newtype AnalyticsDataimportDeleteUploadDataRequest = AnalyticsDataimportDeleteUploadDataRequest'

25522554 { _addudrCustomDataImportUids :: Maybe [Text]

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

25542556

@@ -2560,7 +2562,7 @@ newtype AnalyticsDataimportDeleteUploadDataRequest = AnalyticsDataimportDeleteUp

25602562analyticsDataimportDeleteUploadDataRequest

25612563 :: AnalyticsDataimportDeleteUploadDataRequest

25622564analyticsDataimportDeleteUploadDataRequest =

2563− AnalyticsDataimportDeleteUploadDataRequest

2565+ AnalyticsDataimportDeleteUploadDataRequest'

25642566 { _addudrCustomDataImportUids = Nothing

25652567 }

25662568

@@ -2578,12 +2580,13 @@ instance FromJSON

25782580 = withObject

25792581 "AnalyticsDataimportDeleteUploadDataRequest"

25802582 (\ o ->

2581− AnalyticsDataimportDeleteUploadDataRequest <$>

2583+ AnalyticsDataimportDeleteUploadDataRequest' <$>

25822584 (o .:? "customDataImportUids" .!= mempty))

25832585

25842586instance ToJSON

25852587 AnalyticsDataimportDeleteUploadDataRequest where

2586− toJSON AnalyticsDataimportDeleteUploadDataRequest{..}

2588+ toJSON

2589+ AnalyticsDataimportDeleteUploadDataRequest'{..}

25872590 = object

25882591 (catMaybes

25892592 [("customDataImportUids" .=) <$>

@@ -2592,7 +2595,7 @@ instance ToJSON

25922595-- | JSON template for Analytics Entity AdWords Link.

25932596--

25942597-- /See:/ 'entityAdWordsLink' smart constructor.

2595−data EntityAdWordsLink = EntityAdWordsLink

2598+data EntityAdWordsLink = EntityAdWordsLink'

25962599 { _entAdWordsAccounts :: !(Maybe [AdWordsAccount])

25972600 , _entProFileIds :: !(Maybe [Text])

25982601 , _entKind :: !Text

@@ -2622,7 +2625,7 @@ data EntityAdWordsLink = EntityAdWordsLink

26222625entityAdWordsLink

26232626 :: EntityAdWordsLink

26242627entityAdWordsLink =

2625− EntityAdWordsLink

2628+ EntityAdWordsLink'

26262629 { _entAdWordsAccounts = Nothing

26272630 , _entProFileIds = Nothing

26282631 , _entKind = "analytics#entityAdWordsLink"

@@ -2675,7 +2678,7 @@ instance FromJSON EntityAdWordsLink where

26752678 parseJSON

26762679 = withObject "EntityAdWordsLink"

26772680 (\ o ->

2678− EntityAdWordsLink <$>

2681+ EntityAdWordsLink' <$>

26792682 (o .:? "adWordsAccounts" .!= mempty) <*>

26802683 (o .:? "profileIds" .!= mempty)

26812684 <*> (o .:? "kind" .!= "analytics#entityAdWordsLink")

@@ -2685,7 +2688,7 @@ instance FromJSON EntityAdWordsLink where

26852688 <*> (o .:? "entity"))

26862689

26872690instance ToJSON EntityAdWordsLink where

2688− toJSON EntityAdWordsLink{..}

2691+ toJSON EntityAdWordsLink'{..}

26892692 = object

26902693 (catMaybes

26912694 [("adWordsAccounts" .=) <$> _entAdWordsAccounts,

@@ -2698,7 +2701,7 @@ instance ToJSON EntityAdWordsLink where

26982701-- | Details for the filter of the type SEARCH_AND_REPLACE.

26992702--

27002703-- /See:/ 'filterSearchAndReplaceDetails' smart constructor.

2701−data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails

2704+data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails'

27022705 { _fsardFieldIndex :: !(Maybe (Textual Int32))

27032706 , _fsardField :: !(Maybe Text)

27042707 , _fsardSearchString :: !(Maybe Text)

@@ -2722,7 +2725,7 @@ data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails

27222725filterSearchAndReplaceDetails

27232726 :: FilterSearchAndReplaceDetails

27242727filterSearchAndReplaceDetails =

2725− FilterSearchAndReplaceDetails

2728+ FilterSearchAndReplaceDetails'

27262729 { _fsardFieldIndex = Nothing

27272730 , _fsardField = Nothing

27282731 , _fsardSearchString = Nothing

@@ -2765,14 +2768,14 @@ instance FromJSON FilterSearchAndReplaceDetails where

27652768 parseJSON

27662769 = withObject "FilterSearchAndReplaceDetails"

27672770 (\ o ->

2768− FilterSearchAndReplaceDetails <$>

2771+ FilterSearchAndReplaceDetails' <$>

27692772 (o .:? "fieldIndex") <*> (o .:? "field") <*>

27702773 (o .:? "searchString")

27712774 <*> (o .:? "replaceString")

27722775 <*> (o .:? "caseSensitive"))

27732776

27742777instance ToJSON FilterSearchAndReplaceDetails where

2775− toJSON FilterSearchAndReplaceDetails{..}

2778+ toJSON FilterSearchAndReplaceDetails'{..}

27762779 = object

27772780 (catMaybes

27782781 [("fieldIndex" .=) <$> _fsardFieldIndex,

@@ -2784,7 +2787,7 @@ instance ToJSON FilterSearchAndReplaceDetails where

27842787-- | Permissions the user has for this view (profile).

27852788--

27862789-- /See:/ 'proFilePermissions' smart constructor.

2787−newtype ProFilePermissions = ProFilePermissions

2790+newtype ProFilePermissions = ProFilePermissions'

27882791 { _pfpEffective :: Maybe [Text]

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

27902793

@@ -2796,7 +2799,7 @@ newtype ProFilePermissions = ProFilePermissions

27962799proFilePermissions

27972800 :: ProFilePermissions

27982801proFilePermissions =

2799− ProFilePermissions

2802+ ProFilePermissions'

28002803 { _pfpEffective = Nothing

28012804 }

28022805

@@ -2813,18 +2816,18 @@ instance FromJSON ProFilePermissions where

28132816 parseJSON

28142817 = withObject "ProFilePermissions"

28152818 (\ o ->

2816− ProFilePermissions <$>

2819+ ProFilePermissions' <$>

28172820 (o .:? "effective" .!= mempty))

28182821

28192822instance ToJSON ProFilePermissions where

2820− toJSON ProFilePermissions{..}

2823+ toJSON ProFilePermissions'{..}

28212824 = object

28222825 (catMaybes [("effective" .=) <$> _pfpEffective])

28232826

28242827-- | JSON template for an Analytics view (profile).

28252828--

28262829-- /See:/ 'proFile' smart constructor.

2827−data ProFile = ProFile

2830+data ProFile = ProFile'

28282831 { _pParentLink :: !(Maybe ProFileParentLink)

28292832 , _pECommerceTracking :: !(Maybe Bool)

28302833 , _pSiteSearchCategoryParameters :: !(Maybe Text)

@@ -2911,7 +2914,7 @@ data ProFile = ProFile

29112914proFile

29122915 :: ProFile

29132916proFile =

2914− ProFile

2917+ ProFile'

29152918 { _pParentLink = Nothing

29162919 , _pECommerceTracking = Nothing

29172920 , _pSiteSearchCategoryParameters = Nothing

@@ -3092,7 +3095,7 @@ instance FromJSON ProFile where

30923095 parseJSON

30933096 = withObject "ProFile"

30943097 (\ o ->

3095− ProFile <$>

3098+ ProFile' <$>

30963099 (o .:? "parentLink") <*> (o .:? "eCommerceTracking")

30973100 <*> (o .:? "siteSearchCategoryParameters")

30983101 <*> (o .:? "webPropertyId")

@@ -3120,7 +3123,7 @@ instance FromJSON ProFile where

31203123 <*> (o .:? "stripSiteSearchQueryParameters"))

31213124

31223125instance ToJSON ProFile where

3123− toJSON ProFile{..}

3126+ toJSON ProFile'{..}

31243127 = object

31253128 (catMaybes

31263129 [("parentLink" .=) <$> _pParentLink,

@@ -3161,7 +3164,7 @@ instance ToJSON ProFile where

31613164-- collection corresponds to a single AccountSummary.

31623165--

31633166-- /See:/ 'accountSummaries' smart constructor.

3164−data AccountSummaries = AccountSummaries

3167+data AccountSummaries = AccountSummaries'

31653168 { _asNextLink :: !(Maybe Text)

31663169 , _asItemsPerPage :: !(Maybe (Textual Int32))

31673170 , _asKind :: !Text

@@ -3194,7 +3197,7 @@ data AccountSummaries = AccountSummaries

31943197accountSummaries

31953198 :: AccountSummaries

31963199accountSummaries =

3197− AccountSummaries

3200+ AccountSummaries'

31983201 { _asNextLink = Nothing

31993202 , _asItemsPerPage = Nothing

32003203 , _asKind = "analytics#accountSummaries"

@@ -3260,7 +3263,7 @@ instance FromJSON AccountSummaries where

32603263 parseJSON

32613264 = withObject "AccountSummaries"

32623265 (\ o ->

3263− AccountSummaries <$>

3266+ AccountSummaries' <$>

32643267 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

32653268 (o .:? "kind" .!= "analytics#accountSummaries")

32663269 <*> (o .:? "username")

@@ -3270,7 +3273,7 @@ instance FromJSON AccountSummaries where

32703273 <*> (o .:? "previousLink"))

32713274

32723275instance ToJSON AccountSummaries where

3273− toJSON AccountSummaries{..}

3276+ toJSON AccountSummaries'{..}

32743277 = object

32753278 (catMaybes

32763279 [("nextLink" .=) <$> _asNextLink,

@@ -3285,7 +3288,7 @@ instance ToJSON AccountSummaries where

32853288-- | Details for the goal of the type EVENT.

32863289--

32873290-- /See:/ 'goalEventDetails' smart constructor.

3288−data GoalEventDetails = GoalEventDetails

3291+data GoalEventDetails = GoalEventDetails'

32893292 { _gedUseEventValue :: !(Maybe Bool)

32903293 , _gedEventConditions :: !(Maybe [GoalEventDetailsEventConditionsItem])

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

@@ -3300,7 +3303,7 @@ data GoalEventDetails = GoalEventDetails

33003303goalEventDetails

33013304 :: GoalEventDetails

33023305goalEventDetails =

3303− GoalEventDetails

3306+ GoalEventDetails'

33043307 { _gedUseEventValue = Nothing

33053308 , _gedEventConditions = Nothing

33063309 }

@@ -3323,12 +3326,12 @@ instance FromJSON GoalEventDetails where

33233326 parseJSON

33243327 = withObject "GoalEventDetails"

33253328 (\ o ->

3326− GoalEventDetails <$>

3329+ GoalEventDetails' <$>

33273330 (o .:? "useEventValue") <*>

33283331 (o .:? "eventConditions" .!= mempty))

33293332

33303333instance ToJSON GoalEventDetails where

3331− toJSON GoalEventDetails{..}

3334+ toJSON GoalEventDetails'{..}

33323335 = object

33333336 (catMaybes

33343337 [("useEventValue" .=) <$> _gedUseEventValue,

@@ -3338,7 +3341,7 @@ instance ToJSON GoalEventDetails where

33383341-- returns basic information (i.e., summary) for a web property.

33393342--

33403343-- /See:/ 'webPropertySummary' smart constructor.

3341−data WebPropertySummary = WebPropertySummary

3344+data WebPropertySummary = WebPropertySummary'

33423345 { _wpsKind :: !Text

33433346 , _wpsProFiles :: !(Maybe [ProFileSummary])

33443347 , _wpsName :: !(Maybe Text)

@@ -3371,7 +3374,7 @@ data WebPropertySummary = WebPropertySummary

33713374webPropertySummary

33723375 :: WebPropertySummary

33733376webPropertySummary =

3374− WebPropertySummary

3377+ WebPropertySummary'

33753378 { _wpsKind = "analytics#webPropertySummary"

33763379 , _wpsProFiles = Nothing

33773380 , _wpsName = Nothing

@@ -3426,7 +3429,7 @@ instance FromJSON WebPropertySummary where

34263429 parseJSON

34273430 = withObject "WebPropertySummary"

34283431 (\ o ->

3429− WebPropertySummary <$>

3432+ WebPropertySummary' <$>

34303433 (o .:? "kind" .!= "analytics#webPropertySummary") <*>

34313434 (o .:? "profiles" .!= mempty)

34323435 <*> (o .:? "name")

@@ -3437,7 +3440,7 @@ instance FromJSON WebPropertySummary where

34373440 <*> (o .:? "level"))

34383441

34393442instance ToJSON WebPropertySummary where

3440− toJSON WebPropertySummary{..}

3443+ toJSON WebPropertySummary'{..}

34413444 = object

34423445 (catMaybes

34433446 [Just ("kind" .= _wpsKind),

@@ -3454,7 +3457,7 @@ instance ToJSON WebPropertySummary where

34543457-- account. Each resource in the collection corresponds to a filter.

34553458--

34563459-- /See:/ 'filters' smart constructor.

3457−data Filters = Filters

3460+data Filters = Filters'

34583461 { _fNextLink :: !(Maybe Text)

34593462 , _fItemsPerPage :: !(Maybe (Textual Int32))

34603463 , _fKind :: !Text

@@ -3487,7 +3490,7 @@ data Filters = Filters

34873490filters

34883491 :: Filters

34893492filters =

3490− Filters

3493+ Filters'

34913494 { _fNextLink = Nothing

34923495 , _fItemsPerPage = Nothing

34933496 , _fKind = "analytics#filters"

@@ -3553,7 +3556,7 @@ instance FromJSON Filters where

35533556 parseJSON

35543557 = withObject "Filters"

35553558 (\ o ->

3556− Filters <$>

3559+ Filters' <$>

35573560 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

35583561 (o .:? "kind" .!= "analytics#filters")

35593562 <*> (o .:? "username")

@@ -3563,7 +3566,7 @@ instance FromJSON Filters where

35633566 <*> (o .:? "previousLink"))

35643567

35653568instance ToJSON Filters where

3566− toJSON Filters{..}

3569+ toJSON Filters'{..}

35673570 = object

35683571 (catMaybes

35693572 [("nextLink" .=) <$> _fNextLink,

@@ -3578,7 +3581,7 @@ instance ToJSON Filters where

35783581-- | Analytics data for a given view (profile).

35793582--

35803583-- /See:/ 'gaData' smart constructor.

3581−data GaData = GaData

3584+data GaData = GaData'

35823585 { _gdNextLink :: !(Maybe Text)

35833586 , _gdSampleSpace :: !(Maybe (Textual Int64))

35843587 , _gdItemsPerPage :: !(Maybe (Textual Int32))

@@ -3635,7 +3638,7 @@ data GaData = GaData

36353638gaData

36363639 :: GaData

36373640gaData =

3638− GaData

3641+ GaData'

36393642 { _gdNextLink = Nothing

36403643 , _gdSampleSpace = Nothing

36413644 , _gdItemsPerPage = Nothing

@@ -3759,7 +3762,7 @@ instance FromJSON GaData where

37593762 parseJSON

37603763 = withObject "GaData"

37613764 (\ o ->

3762− GaData <$>

3765+ GaData' <$>

37633766 (o .:? "nextLink") <*> (o .:? "sampleSpace") <*>

37643767 (o .:? "itemsPerPage")

37653768 <*> (o .:? "profileInfo")

@@ -3777,7 +3780,7 @@ instance FromJSON GaData where

37773780 <*> (o .:? "previousLink"))

37783781

37793782instance ToJSON GaData where

3780− toJSON GaData{..}

3783+ toJSON GaData'{..}

37813784 = object

37823785 (catMaybes

37833786 [("nextLink" .=) <$> _gdNextLink,

@@ -3804,7 +3807,7 @@ instance ToJSON GaData where

38043807-- same as the metric order specified in the request.

38053808--

38063809-- /See:/ 'realtimeDataTotalsForAllResults' smart constructor.

3807−newtype RealtimeDataTotalsForAllResults = RealtimeDataTotalsForAllResults

3810+newtype RealtimeDataTotalsForAllResults = RealtimeDataTotalsForAllResults'

38083811 { _rdtfarAddtional :: HashMap Text Text

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

38103813

@@ -3817,7 +3820,7 @@ realtimeDataTotalsForAllResults

38173820 :: HashMap Text Text -- ^ 'rdtfarAddtional'

38183821 -> RealtimeDataTotalsForAllResults

38193822realtimeDataTotalsForAllResults pRdtfarAddtional_ =

3820− RealtimeDataTotalsForAllResults

3823+ RealtimeDataTotalsForAllResults'

38213824 { _rdtfarAddtional = _Coerce # pRdtfarAddtional_

38223825 }

38233826

@@ -3834,7 +3837,7 @@ instance FromJSON RealtimeDataTotalsForAllResults

38343837 parseJSON

38353838 = withObject "RealtimeDataTotalsForAllResults"

38363839 (\ o ->

3837− RealtimeDataTotalsForAllResults <$>

3840+ RealtimeDataTotalsForAllResults' <$>

38383841 (parseJSONObject o))

38393842

38403843instance ToJSON RealtimeDataTotalsForAllResults where

@@ -3843,7 +3846,7 @@ instance ToJSON RealtimeDataTotalsForAllResults where

38433846-- | JSON template for an Analytics custom data source.

38443847--

38453848-- /See:/ 'customDataSource' smart constructor.

3846−data CustomDataSource = CustomDataSource

3849+data CustomDataSource = CustomDataSource'

38473850 { _cParentLink :: !(Maybe CustomDataSourceParentLink)

38483851 , _cWebPropertyId :: !(Maybe Text)

38493852 , _cChildLink :: !(Maybe CustomDataSourceChildLink)

@@ -3897,7 +3900,7 @@ data CustomDataSource = CustomDataSource

38973900customDataSource

38983901 :: CustomDataSource

38993902customDataSource =

3900− CustomDataSource

3903+ CustomDataSource'

39013904 { _cParentLink = Nothing

39023905 , _cWebPropertyId = Nothing

39033906 , _cChildLink = Nothing

@@ -3996,7 +3999,7 @@ instance FromJSON CustomDataSource where

39963999 parseJSON

39974000 = withObject "CustomDataSource"

39984001 (\ o ->

3999− CustomDataSource <$>

4002+ CustomDataSource' <$>

40004003 (o .:? "parentLink") <*> (o .:? "webPropertyId") <*>

40014004 (o .:? "childLink")

40024005 <*> (o .:? "kind" .!= "analytics#customDataSource")

@@ -4013,7 +4016,7 @@ instance FromJSON CustomDataSource where

40134016 <*> (o .:? "profilesLinked" .!= mempty))

40144017

40154018instance ToJSON CustomDataSource where

4016− toJSON CustomDataSource{..}

4019+ toJSON CustomDataSource'{..}

40174020 = object

40184021 (catMaybes

40194022 [("parentLink" .=) <$> _cParentLink,

@@ -4033,7 +4036,7 @@ instance ToJSON CustomDataSource where

40334036-- | JSON template for a web property reference.

40344037--

40354038-- /See:/ 'webPropertyRef' smart constructor.

4036−data WebPropertyRef = WebPropertyRef

4039+data WebPropertyRef = WebPropertyRef'

40374040 { _wprKind :: !Text

40384041 , _wprHref :: !(Maybe Text)

40394042 , _wprAccountId :: !(Maybe Text)

@@ -4060,7 +4063,7 @@ data WebPropertyRef = WebPropertyRef

40604063webPropertyRef

40614064 :: WebPropertyRef

40624065webPropertyRef =

4063− WebPropertyRef

4066+ WebPropertyRef'

40644067 { _wprKind = "analytics#webPropertyRef"

40654068 , _wprHref = Nothing

40664069 , _wprAccountId = Nothing

@@ -4100,7 +4103,7 @@ instance FromJSON WebPropertyRef where

41004103 parseJSON

41014104 = withObject "WebPropertyRef"

41024105 (\ o ->

4103− WebPropertyRef <$>

4106+ WebPropertyRef' <$>

41044107 (o .:? "kind" .!= "analytics#webPropertyRef") <*>

41054108 (o .:? "href")

41064109 <*> (o .:? "accountId")

@@ -4109,7 +4112,7 @@ instance FromJSON WebPropertyRef where

41094112 <*> (o .:? "id"))

41104113

41114114instance ToJSON WebPropertyRef where

4112− toJSON WebPropertyRef{..}

4115+ toJSON WebPropertyRef'{..}

41134116 = object

41144117 (catMaybes

41154118 [Just ("kind" .= _wprKind), ("href" .=) <$> _wprHref,

@@ -4124,7 +4127,7 @@ instance ToJSON WebPropertyRef where

41244127-- collection corresponds to a single Analytics goal.

41254128--

41264129-- /See:/ 'goals' smart constructor.

4127−data Goals = Goals

4130+data Goals = Goals'

41284131 { _gNextLink :: !(Maybe Text)

41294132 , _gItemsPerPage :: !(Maybe (Textual Int32))

41304133 , _gKind :: !Text

@@ -4157,7 +4160,7 @@ data Goals = Goals

41574160goals

41584161 :: Goals

41594162goals =

4160− Goals

4163+ Goals'

41614164 { _gNextLink = Nothing

41624165 , _gItemsPerPage = Nothing

41634166 , _gKind = "analytics#goals"

@@ -4223,7 +4226,7 @@ instance FromJSON Goals where

42234226 parseJSON

42244227 = withObject "Goals"

42254228 (\ o ->

4226− Goals <$>

4229+ Goals' <$>

42274230 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

42284231 (o .:? "kind" .!= "analytics#goals")

42294232 <*> (o .:? "username")

@@ -4233,7 +4236,7 @@ instance FromJSON Goals where

42334236 <*> (o .:? "previousLink"))

42344237

42354238instance ToJSON Goals where

4236− toJSON Goals{..}

4239+ toJSON Goals'{..}

42374240 = object

42384241 (catMaybes

42394242 [("nextLink" .=) <$> _gNextLink,

@@ -4250,7 +4253,7 @@ instance ToJSON Goals where

42504253-- populated.

42514254--

42524255-- /See:/ 'mcfDataRowsItemItem' smart constructor.

4253−data McfDataRowsItemItem = McfDataRowsItemItem

4256+data McfDataRowsItemItem = McfDataRowsItemItem'

42544257 { _mdriiPrimitiveValue :: !(Maybe Text)

42554258 , _mdriiConversionPathValue :: !(Maybe [McfDataRowsItemItemConversionPathValueItem])

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

@@ -4265,7 +4268,7 @@ data McfDataRowsItemItem = McfDataRowsItemItem

42654268mcfDataRowsItemItem

42664269 :: McfDataRowsItemItem

42674270mcfDataRowsItemItem =

4268− McfDataRowsItemItem

4271+ McfDataRowsItemItem'

42694272 { _mdriiPrimitiveValue = Nothing

42704273 , _mdriiConversionPathValue = Nothing

42714274 }

@@ -4289,12 +4292,12 @@ instance FromJSON McfDataRowsItemItem where

42894292 parseJSON

42904293 = withObject "McfDataRowsItemItem"

42914294 (\ o ->

4292− McfDataRowsItemItem <$>

4295+ McfDataRowsItemItem' <$>

42934296 (o .:? "primitiveValue") <*>

42944297 (o .:? "conversionPathValue" .!= mempty))

42954298

42964299instance ToJSON McfDataRowsItemItem where

4297− toJSON McfDataRowsItemItem{..}

4300+ toJSON McfDataRowsItemItem'{..}

42984301 = object

42994302 (catMaybes

43004303 [("primitiveValue" .=) <$> _mdriiPrimitiveValue,

@@ -4304,7 +4307,7 @@ instance ToJSON McfDataRowsItemItem where

43044307-- | Permissions the user has for this account.

43054308--

43064309-- /See:/ 'accountPermissions' smart constructor.

4307−newtype AccountPermissions = AccountPermissions

4310+newtype AccountPermissions = AccountPermissions'

43084311 { _apEffective :: Maybe [Text]

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

43104313

@@ -4316,7 +4319,7 @@ newtype AccountPermissions = AccountPermissions

43164319accountPermissions

43174320 :: AccountPermissions

43184321accountPermissions =

4319− AccountPermissions

4322+ AccountPermissions'

43204323 { _apEffective = Nothing

43214324 }

43224325

@@ -4332,11 +4335,11 @@ instance FromJSON AccountPermissions where

43324335 parseJSON

43334336 = withObject "AccountPermissions"

43344337 (\ o ->

4335− AccountPermissions <$>

4338+ AccountPermissions' <$>

43364339 (o .:? "effective" .!= mempty))

43374340

43384341instance ToJSON AccountPermissions where

4339− toJSON AccountPermissions{..}

4342+ toJSON AccountPermissions'{..}

43404343 = object

43414344 (catMaybes [("effective" .=) <$> _apEffective])

43424345

@@ -4344,7 +4347,7 @@ instance ToJSON AccountPermissions where

43444347-- (profile).

43454348--

43464349-- /See:/ 'entityUserLinkEntity' smart constructor.

4347−data EntityUserLinkEntity = EntityUserLinkEntity

4350+data EntityUserLinkEntity = EntityUserLinkEntity'

43484351 { _euleProFileRef :: !(Maybe ProFileRef)

43494352 , _euleAccountRef :: !(Maybe AccountRef)

43504353 , _euleWebPropertyRef :: !(Maybe WebPropertyRef)

@@ -4362,7 +4365,7 @@ data EntityUserLinkEntity = EntityUserLinkEntity

43624365entityUserLinkEntity

43634366 :: EntityUserLinkEntity

43644367entityUserLinkEntity =

4365− EntityUserLinkEntity

4368+ EntityUserLinkEntity'

43664369 { _euleProFileRef = Nothing

43674370 , _euleAccountRef = Nothing

43684371 , _euleWebPropertyRef = Nothing

@@ -4390,12 +4393,12 @@ instance FromJSON EntityUserLinkEntity where

43904393 parseJSON

43914394 = withObject "EntityUserLinkEntity"

43924395 (\ o ->

4393− EntityUserLinkEntity <$>

4396+ EntityUserLinkEntity' <$>

43944397 (o .:? "profileRef") <*> (o .:? "accountRef") <*>

43954398 (o .:? "webPropertyRef"))

43964399

43974400instance ToJSON EntityUserLinkEntity where

4398− toJSON EntityUserLinkEntity{..}

4401+ toJSON EntityUserLinkEntity'{..}

43994402 = object

44004403 (catMaybes

44014404 [("profileRef" .=) <$> _euleProFileRef,

@@ -4405,7 +4408,7 @@ instance ToJSON EntityUserLinkEntity where

44054408-- | JSON template for Analytics account entry.

44064409--

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

4408−data Account = Account

4411+data Account = Account'

44094412 { _accChildLink :: !(Maybe AccountChildLink)

44104413 , _accKind :: !Text

44114414 , _accCreated :: !(Maybe DateTime')

@@ -4441,7 +4444,7 @@ data Account = Account

44414444account

44424445 :: Account

44434446account =

4444− Account

4447+ Account'

44454448 { _accChildLink = Nothing

44464449 , _accKind = "analytics#account"

44474450 , _accCreated = Nothing

@@ -4503,7 +4506,7 @@ instance FromJSON Account where

45034506 parseJSON

45044507 = withObject "Account"

45054508 (\ o ->

4506− Account <$>

4509+ Account' <$>

45074510 (o .:? "childLink") <*>

45084511 (o .:? "kind" .!= "analytics#account")

45094512 <*> (o .:? "created")

@@ -4515,7 +4518,7 @@ instance FromJSON Account where

45154518 <*> (o .:? "permissions"))

45164519

45174520instance ToJSON Account where

4518− toJSON Account{..}

4521+ toJSON Account'{..}

45194522 = object

45204523 (catMaybes

45214524 [("childLink" .=) <$> _accChildLink,

@@ -4530,7 +4533,7 @@ instance ToJSON Account where

45304533-- | JSON template for Analytics experiment resource.

45314534--

45324535-- /See:/ 'experiment' smart constructor.

4533−data Experiment = Experiment

4536+data Experiment = Experiment'

45344537 { _expParentLink :: !(Maybe ExperimentParentLink)

45354538 , _expEqualWeighting :: !(Maybe Bool)

45364539 , _expStatus :: !(Maybe Text)

@@ -4623,7 +4626,7 @@ data Experiment = Experiment

46234626experiment

46244627 :: Experiment

46254628experiment =

4626− Experiment

4629+ Experiment'

46274630 { _expParentLink = Nothing

46284631 , _expEqualWeighting = Nothing

46294632 , _expStatus = Nothing

@@ -4872,7 +4875,7 @@ instance FromJSON Experiment where

48724875 parseJSON

48734876 = withObject "Experiment"

48744877 (\ o ->

4875− Experiment <$>

4878+ Experiment' <$>

48764879 (o .:? "parentLink") <*> (o .:? "equalWeighting") <*>

48774880 (o .:? "status")

48784881 <*> (o .:? "webPropertyId")

@@ -4902,7 +4905,7 @@ instance FromJSON Experiment where

49024905 <*> (o .:? "description"))

49034906

49044907instance ToJSON Experiment where

4905− toJSON Experiment{..}

4908+ toJSON Experiment'{..}

49064909 = object

49074910 (catMaybes

49084911 [("parentLink" .=) <$> _expParentLink,

@@ -4942,7 +4945,7 @@ instance ToJSON Experiment where

49424945-- Each resource in this collection corresponds to a single link.

49434946--

49444947-- /See:/ 'entityUserLinks' smart constructor.

4945−data EntityUserLinks = EntityUserLinks

4948+data EntityUserLinks = EntityUserLinks'

49464949 { _eulNextLink :: !(Maybe Text)

49474950 , _eulItemsPerPage :: !(Maybe (Textual Int32))

49484951 , _eulKind :: !Text

@@ -4972,7 +4975,7 @@ data EntityUserLinks = EntityUserLinks

49724975entityUserLinks

49734976 :: EntityUserLinks

49744977entityUserLinks =

4975− EntityUserLinks

4978+ EntityUserLinks'

49764979 { _eulNextLink = Nothing

49774980 , _eulItemsPerPage = Nothing

49784981 , _eulKind = "analytics#entityUserLinks"

@@ -5034,7 +5037,7 @@ instance FromJSON EntityUserLinks where

50345037 parseJSON

50355038 = withObject "EntityUserLinks"

50365039 (\ o ->

5037− EntityUserLinks <$>

5040+ EntityUserLinks' <$>

50385041 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

50395042 (o .:? "kind" .!= "analytics#entityUserLinks")

50405043 <*> (o .:? "items" .!= mempty)

@@ -5043,7 +5046,7 @@ instance FromJSON EntityUserLinks where

50435046 <*> (o .:? "previousLink"))

50445047

50455048instance ToJSON EntityUserLinks where

5046− toJSON EntityUserLinks{..}

5049+ toJSON EntityUserLinks'{..}

50475050 = object

50485051 (catMaybes

50495052 [("nextLink" .=) <$> _eulNextLink,

@@ -5057,7 +5060,7 @@ instance ToJSON EntityUserLinks where

50575060-- | JSON template for an AdWords account.

50585061--

50595062-- /See:/ 'adWordsAccount' smart constructor.

5060−data AdWordsAccount = AdWordsAccount

5063+data AdWordsAccount = AdWordsAccount'

50615064 { _awaAutoTaggingEnabled :: !(Maybe Bool)

50625065 , _awaKind :: !Text

50635066 , _awaCustomerId :: !(Maybe Text)

@@ -5075,7 +5078,7 @@ data AdWordsAccount = AdWordsAccount

50755078adWordsAccount

50765079 :: AdWordsAccount

50775080adWordsAccount =

5078− AdWordsAccount

5081+ AdWordsAccount'

50795082 { _awaAutoTaggingEnabled = Nothing

50805083 , _awaKind = "analytics#adWordsAccount"

50815084 , _awaCustomerId = Nothing

@@ -5102,13 +5105,13 @@ instance FromJSON AdWordsAccount where

51025105 parseJSON

51035106 = withObject "AdWordsAccount"

51045107 (\ o ->

5105− AdWordsAccount <$>

5108+ AdWordsAccount' <$>

51065109 (o .:? "autoTaggingEnabled") <*>

51075110 (o .:? "kind" .!= "analytics#adWordsAccount")

51085111 <*> (o .:? "customerId"))

51095112

51105113instance ToJSON AdWordsAccount where

5111− toJSON AdWordsAccount{..}

5114+ toJSON AdWordsAccount'{..}

51125115 = object

51135116 (catMaybes

51145117 [("autoTaggingEnabled" .=) <$>

@@ -5119,7 +5122,7 @@ instance ToJSON AdWordsAccount where

51195122-- | JSON template for a profile filter link.

51205123--

51215124-- /See:/ 'filterRef' smart constructor.

5122−data FilterRef = FilterRef

5125+data FilterRef = FilterRef'

51235126 { _frKind :: !Text

51245127 , _frHref :: !(Maybe Text)

51255128 , _frAccountId :: !(Maybe Text)

@@ -5143,7 +5146,7 @@ data FilterRef = FilterRef

51435146filterRef

51445147 :: FilterRef

51455148filterRef =

5146− FilterRef

5149+ FilterRef'

51475150 { _frKind = "analytics#filterRef"

51485151 , _frHref = Nothing

51495152 , _frAccountId = Nothing

@@ -5176,7 +5179,7 @@ instance FromJSON FilterRef where

51765179 parseJSON

51775180 = withObject "FilterRef"

51785181 (\ o ->

5179− FilterRef <$>

5182+ FilterRef' <$>

51805183 (o .:? "kind" .!= "analytics#filterRef") <*>

51815184 (o .:? "href")

51825185 <*> (o .:? "accountId")

@@ -5184,7 +5187,7 @@ instance FromJSON FilterRef where

51845187 <*> (o .:? "id"))

51855188

51865189instance ToJSON FilterRef where

5187− toJSON FilterRef{..}

5190+ toJSON FilterRef'{..}

51885191 = object

51895192 (catMaybes

51905193 [Just ("kind" .= _frKind), ("href" .=) <$> _frHref,

@@ -5194,7 +5197,7 @@ instance ToJSON FilterRef where

51945197-- | Details for the goal of the type VISIT_TIME_ON_SITE.

51955198--

51965199-- /See:/ 'goalVisitTimeOnSiteDetails' smart constructor.

5197−data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails

5200+data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails'

51985201 { _gvtosdComparisonValue :: !(Maybe (Textual Int64))

51995202 , _gvtosdComparisonType :: !(Maybe Text)

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

@@ -5209,7 +5212,7 @@ data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails

52095212goalVisitTimeOnSiteDetails

52105213 :: GoalVisitTimeOnSiteDetails

52115214goalVisitTimeOnSiteDetails =

5212− GoalVisitTimeOnSiteDetails

5215+ GoalVisitTimeOnSiteDetails'

52135216 { _gvtosdComparisonValue = Nothing

52145217 , _gvtosdComparisonType = Nothing

52155218 }

@@ -5231,12 +5234,12 @@ instance FromJSON GoalVisitTimeOnSiteDetails where

52315234 parseJSON

52325235 = withObject "GoalVisitTimeOnSiteDetails"

52335236 (\ o ->

5234− GoalVisitTimeOnSiteDetails <$>

5237+ GoalVisitTimeOnSiteDetails' <$>

52355238 (o .:? "comparisonValue") <*>

52365239 (o .:? "comparisonType"))

52375240

52385241instance ToJSON GoalVisitTimeOnSiteDetails where

5239− toJSON GoalVisitTimeOnSiteDetails{..}

5242+ toJSON GoalVisitTimeOnSiteDetails'{..}

52405243 = object

52415244 (catMaybes

52425245 [("comparisonValue" .=) <$> _gvtosdComparisonValue,

@@ -5247,7 +5250,7 @@ instance ToJSON GoalVisitTimeOnSiteDetails where

52475250-- Analytics web property.

52485251--

52495252-- /See:/ 'webProperties' smart constructor.

5250−data WebProperties = WebProperties

5253+data WebProperties = WebProperties'

52515254 { _wpNextLink :: !(Maybe Text)

52525255 , _wpItemsPerPage :: !(Maybe (Textual Int32))

52535256 , _wpKind :: !Text

@@ -5280,7 +5283,7 @@ data WebProperties = WebProperties

52805283webProperties

52815284 :: WebProperties

52825285webProperties =

5283− WebProperties

5286+ WebProperties'

52845287 { _wpNextLink = Nothing

52855288 , _wpItemsPerPage = Nothing

52865289 , _wpKind = "analytics#webproperties"

@@ -5346,7 +5349,7 @@ instance FromJSON WebProperties where

53465349 parseJSON

53475350 = withObject "WebProperties"

53485351 (\ o ->

5349− WebProperties <$>

5352+ WebProperties' <$>

53505353 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

53515354 (o .:? "kind" .!= "analytics#webproperties")

53525355 <*> (o .:? "username")

@@ -5356,7 +5359,7 @@ instance FromJSON WebProperties where

53565359 <*> (o .:? "previousLink"))

53575360

53585361instance ToJSON WebProperties where

5359− toJSON WebProperties{..}

5362+ toJSON WebProperties'{..}

53605363 = object

53615364 (catMaybes

53625365 [("nextLink" .=) <$> _wpNextLink,

@@ -5373,7 +5376,7 @@ instance ToJSON WebProperties where

53735376-- Analytics custom metric.

53745377--

53755378-- /See:/ 'customMetrics' smart constructor.

5376−data CustomMetrics = CustomMetrics

5379+data CustomMetrics = CustomMetrics'

53775380 { _cmNextLink :: !(Maybe Text)

53785381 , _cmItemsPerPage :: !(Maybe (Textual Int32))

53795382 , _cmKind :: !Text

@@ -5406,7 +5409,7 @@ data CustomMetrics = CustomMetrics

54065409customMetrics

54075410 :: CustomMetrics

54085411customMetrics =

5409− CustomMetrics

5412+ CustomMetrics'

54105413 { _cmNextLink = Nothing

54115414 , _cmItemsPerPage = Nothing

54125415 , _cmKind = "analytics#customMetrics"

@@ -5472,7 +5475,7 @@ instance FromJSON CustomMetrics where

54725475 parseJSON

54735476 = withObject "CustomMetrics"

54745477 (\ o ->

5475− CustomMetrics <$>

5478+ CustomMetrics' <$>

54765479 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

54775480 (o .:? "kind" .!= "analytics#customMetrics")

54785481 <*> (o .:? "username")

@@ -5482,7 +5485,7 @@ instance FromJSON CustomMetrics where

54825485 <*> (o .:? "previousLink"))

54835486

54845487instance ToJSON CustomMetrics where

5485− toJSON CustomMetrics{..}

5488+ toJSON CustomMetrics'{..}

54865489 = object

54875490 (catMaybes

54885491 [("nextLink" .=) <$> _cmNextLink,

@@ -5497,7 +5500,7 @@ instance ToJSON CustomMetrics where

54975500-- | Details for the filter of the type ADVANCED.

54985501--

54995502-- /See:/ 'filterAdvancedDetails' smart constructor.

5500−data FilterAdvancedDetails = FilterAdvancedDetails

5503+data FilterAdvancedDetails = FilterAdvancedDetails'

55015504 { _fadExtractA :: !(Maybe Text)

55025505 , _fadFieldARequired :: !(Maybe Bool)

55035506 , _fadFieldA :: !(Maybe Text)

@@ -5545,7 +5548,7 @@ data FilterAdvancedDetails = FilterAdvancedDetails

55455548filterAdvancedDetails

55465549 :: FilterAdvancedDetails

55475550filterAdvancedDetails =

5548− FilterAdvancedDetails

5551+ FilterAdvancedDetails'

55495552 { _fadExtractA = Nothing

55505553 , _fadFieldARequired = Nothing

55515554 , _fadFieldA = Nothing

@@ -5646,7 +5649,7 @@ instance FromJSON FilterAdvancedDetails where

56465649 parseJSON

56475650 = withObject "FilterAdvancedDetails"

56485651 (\ o ->

5649− FilterAdvancedDetails <$>

5652+ FilterAdvancedDetails' <$>

56505653 (o .:? "extractA") <*> (o .:? "fieldARequired") <*>

56515654 (o .:? "fieldA")

56525655 <*> (o .:? "fieldBIndex")

@@ -5661,7 +5664,7 @@ instance FromJSON FilterAdvancedDetails where

56615664 <*> (o .:? "overrideOutputField"))

56625665

56635666instance ToJSON FilterAdvancedDetails where

5664− toJSON FilterAdvancedDetails{..}

5667+ toJSON FilterAdvancedDetails'{..}

56655668 = object

56665669 (catMaybes

56675670 [("extractA" .=) <$> _fadExtractA,

@@ -5682,7 +5685,7 @@ instance ToJSON FilterAdvancedDetails where

56825685-- | Details for the filter of the type UPPER.

56835686--

56845687-- /See:/ 'filterUppercaseDetails' smart constructor.

5685−data FilterUppercaseDetails = FilterUppercaseDetails

5688+data FilterUppercaseDetails = FilterUppercaseDetails'

56865689 { _fudFieldIndex :: !(Maybe (Textual Int32))

56875690 , _fudField :: !(Maybe Text)

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

@@ -5697,7 +5700,7 @@ data FilterUppercaseDetails = FilterUppercaseDetails

56975700filterUppercaseDetails

56985701 :: FilterUppercaseDetails

56995702filterUppercaseDetails =

5700− FilterUppercaseDetails

5703+ FilterUppercaseDetails'

57015704 { _fudFieldIndex = Nothing

57025705 , _fudField = Nothing

57035706 }

@@ -5718,11 +5721,11 @@ instance FromJSON FilterUppercaseDetails where

57185721 parseJSON

57195722 = withObject "FilterUppercaseDetails"

57205723 (\ o ->

5721− FilterUppercaseDetails <$>

5724+ FilterUppercaseDetails' <$>

57225725 (o .:? "fieldIndex") <*> (o .:? "field"))

57235726

57245727instance ToJSON FilterUppercaseDetails where

5725− toJSON FilterUppercaseDetails{..}

5728+ toJSON FilterUppercaseDetails'{..}

57265729 = object

57275730 (catMaybes

57285731 [("fieldIndex" .=) <$> _fudFieldIndex,

@@ -5730,7 +5733,7 @@ instance ToJSON FilterUppercaseDetails where

57305733

57315734--

57325735-- /See:/ 'customDataSourceChildLink' smart constructor.

5733−data CustomDataSourceChildLink = CustomDataSourceChildLink

5736+data CustomDataSourceChildLink = CustomDataSourceChildLink'

57345737 { _cdsclHref :: !(Maybe Text)

57355738 , _cdsclType :: !(Maybe Text)

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

@@ -5745,7 +5748,7 @@ data CustomDataSourceChildLink = CustomDataSourceChildLink

57455748customDataSourceChildLink

57465749 :: CustomDataSourceChildLink

57475750customDataSourceChildLink =

5748− CustomDataSourceChildLink

5751+ CustomDataSourceChildLink'

57495752 { _cdsclHref = Nothing

57505753 , _cdsclType = Nothing

57515754 }

@@ -5765,11 +5768,11 @@ instance FromJSON CustomDataSourceChildLink where

57655768 parseJSON

57665769 = withObject "CustomDataSourceChildLink"

57675770 (\ o ->

5768− CustomDataSourceChildLink <$>

5771+ CustomDataSourceChildLink' <$>

57695772 (o .:? "href") <*> (o .:? "type"))

57705773

57715774instance ToJSON CustomDataSourceChildLink where

5772− toJSON CustomDataSourceChildLink{..}

5775+ toJSON CustomDataSourceChildLink'{..}

57735776 = object

57745777 (catMaybes

57755778 [("href" .=) <$> _cdsclHref,

@@ -5779,7 +5782,7 @@ instance ToJSON CustomDataSourceChildLink where

57795782-- belongs.

57805783--

57815784-- /See:/ 'filterParentLink' smart constructor.

5782−data FilterParentLink = FilterParentLink

5785+data FilterParentLink = FilterParentLink'

57835786 { _fplHref :: !(Maybe Text)

57845787 , _fplType :: !Text

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

@@ -5794,7 +5797,7 @@ data FilterParentLink = FilterParentLink

57945797filterParentLink

57955798 :: FilterParentLink

57965799filterParentLink =

5797− FilterParentLink

5800+ FilterParentLink'

57985801 { _fplHref = Nothing

57995802 , _fplType = "analytics#account"

58005803 }

@@ -5811,12 +5814,12 @@ instance FromJSON FilterParentLink where

58115814 parseJSON

58125815 = withObject "FilterParentLink"

58135816 (\ o ->

5814− FilterParentLink <$>

5817+ FilterParentLink' <$>

58155818 (o .:? "href") <*>

58165819 (o .:? "type" .!= "analytics#account"))

58175820

58185821instance ToJSON FilterParentLink where

5819− toJSON FilterParentLink{..}

5822+ toJSON FilterParentLink'{..}

58205823 = object

58215824 (catMaybes

58225825 [("href" .=) <$> _fplHref,

@@ -5825,7 +5828,7 @@ instance ToJSON FilterParentLink where

58255828-- | Real time data for a given view (profile).

58265829--

58275830-- /See:/ 'realtimeData' smart constructor.

5828−data RealtimeData = RealtimeData

5831+data RealtimeData = RealtimeData'

58295832 { _rdProFileInfo :: !(Maybe RealtimeDataProFileInfo)

58305833 , _rdKind :: !Text

58315834 , _rdRows :: !(Maybe [[Text]])

@@ -5861,7 +5864,7 @@ data RealtimeData = RealtimeData

58615864realtimeData

58625865 :: RealtimeData

58635866realtimeData =

5864− RealtimeData

5867+ RealtimeData'

58655868 { _rdProFileInfo = Nothing

58665869 , _rdKind = "analytics#realtimeData"

58675870 , _rdRows = Nothing

@@ -5934,7 +5937,7 @@ instance FromJSON RealtimeData where

59345937 parseJSON

59355938 = withObject "RealtimeData"

59365939 (\ o ->

5937− RealtimeData <$>

5940+ RealtimeData' <$>

59385941 (o .:? "profileInfo") <*>

59395942 (o .:? "kind" .!= "analytics#realtimeData")

59405943 <*> (o .:? "rows" .!= mempty)

@@ -5946,7 +5949,7 @@ instance FromJSON RealtimeData where

59465949 <*> (o .:? "totalsForAllResults"))

59475950

59485951instance ToJSON RealtimeData where

5949− toJSON RealtimeData{..}

5952+ toJSON RealtimeData'{..}

59505953 = object

59515954 (catMaybes

59525955 [("profileInfo" .=) <$> _rdProFileInfo,

@@ -5962,7 +5965,7 @@ instance ToJSON RealtimeData where

59625965-- | JSON template for Analytics Custom Metric.

59635966--

59645967-- /See:/ 'customMetric' smart constructor.

5965−data CustomMetric = CustomMetric

5968+data CustomMetric = CustomMetric'

59665969 { _cusParentLink :: !(Maybe CustomMetricParentLink)

59675970 , _cusWebPropertyId :: !(Maybe Text)

59685971 , _cusKind :: !Text

@@ -6016,7 +6019,7 @@ data CustomMetric = CustomMetric

60166019customMetric

60176020 :: CustomMetric

60186021customMetric =

6019− CustomMetric

6022+ CustomMetric'

60206023 { _cusParentLink = Nothing

60216024 , _cusWebPropertyId = Nothing

60226025 , _cusKind = "analytics#customMetric"

@@ -6115,7 +6118,7 @@ instance FromJSON CustomMetric where

61156118 parseJSON

61166119 = withObject "CustomMetric"

61176120 (\ o ->

6118− CustomMetric <$>

6121+ CustomMetric' <$>

61196122 (o .:? "parentLink") <*> (o .:? "webPropertyId") <*>

61206123 (o .:? "kind" .!= "analytics#customMetric")

61216124 <*> (o .:? "max_value")

@@ -6132,7 +6135,7 @@ instance FromJSON CustomMetric where

61326135 <*> (o .:? "index"))

61336136

61346137instance ToJSON CustomMetric where

6135− toJSON CustomMetric{..}

6138+ toJSON CustomMetric'{..}

61366139 = object

61376140 (catMaybes

61386141 [("parentLink" .=) <$> _cusParentLink,

@@ -6153,7 +6156,7 @@ instance ToJSON CustomMetric where

61536156-- basic information (i.e., summary) for a profile.

61546157--

61556158-- /See:/ 'proFileSummary' smart constructor.

6156−data ProFileSummary = ProFileSummary

6159+data ProFileSummary = ProFileSummary'

61576160 { _pfsKind :: !Text

61586161 , _pfsName :: !(Maybe Text)

61596162 , _pfsStarred :: !(Maybe Bool)

@@ -6177,7 +6180,7 @@ data ProFileSummary = ProFileSummary

61776180proFileSummary

61786181 :: ProFileSummary

61796182proFileSummary =

6180− ProFileSummary

6183+ ProFileSummary'

61816184 { _pfsKind = "analytics#profileSummary"

61826185 , _pfsName = Nothing

61836186 , _pfsStarred = Nothing

@@ -6210,7 +6213,7 @@ instance FromJSON ProFileSummary where

62106213 parseJSON

62116214 = withObject "ProFileSummary"

62126215 (\ o ->

6213− ProFileSummary <$>

6216+ ProFileSummary' <$>

62146217 (o .:? "kind" .!= "analytics#profileSummary") <*>

62156218 (o .:? "name")

62166219 <*> (o .:? "starred")

@@ -6218,7 +6221,7 @@ instance FromJSON ProFileSummary where

62186221 <*> (o .:? "type"))

62196222

62206223instance ToJSON ProFileSummary where

6221− toJSON ProFileSummary{..}

6224+ toJSON ProFileSummary'{..}

62226225 = object

62236226 (catMaybes

62246227 [Just ("kind" .= _pfsKind), ("name" .=) <$> _pfsName,

@@ -6229,7 +6232,7 @@ instance ToJSON ProFileSummary where

62296232-- the custom dimension belongs.

62306233--

62316234-- /See:/ 'customDimensionParentLink' smart constructor.

6232−data CustomDimensionParentLink = CustomDimensionParentLink

6235+data CustomDimensionParentLink = CustomDimensionParentLink'

62336236 { _cdplHref :: !(Maybe Text)

62346237 , _cdplType :: !Text

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

@@ -6244,7 +6247,7 @@ data CustomDimensionParentLink = CustomDimensionParentLink

62446247customDimensionParentLink

62456248 :: CustomDimensionParentLink

62466249customDimensionParentLink =

6247− CustomDimensionParentLink

6250+ CustomDimensionParentLink'

62486251 { _cdplHref = Nothing

62496252 , _cdplType = "analytics#webproperty"

62506253 }

@@ -6261,12 +6264,12 @@ instance FromJSON CustomDimensionParentLink where

62616264 parseJSON

62626265 = withObject "CustomDimensionParentLink"

62636266 (\ o ->

6264− CustomDimensionParentLink <$>

6267+ CustomDimensionParentLink' <$>

62656268 (o .:? "href") <*>

62666269 (o .:? "type" .!= "analytics#webproperty"))

62676270

62686271instance ToJSON CustomDimensionParentLink where

6269− toJSON CustomDimensionParentLink{..}

6272+ toJSON CustomDimensionParentLink'{..}

62706273 = object

62716274 (catMaybes

62726275 [("href" .=) <$> _cdplHref,

@@ -6275,7 +6278,7 @@ instance ToJSON CustomDimensionParentLink where

62756278-- | JSON template for an Analytics web property.

62766279--

62776280-- /See:/ 'webProperty' smart constructor.

6278−data WebProperty = WebProperty

6281+data WebProperty = WebProperty'

62796282 { _wParentLink :: !(Maybe WebPropertyParentLink)

62806283 , _wChildLink :: !(Maybe WebPropertyChildLink)

62816284 , _wDefaultProFileId :: !(Maybe (Textual Int64))

@@ -6335,7 +6338,7 @@ data WebProperty = WebProperty

63356338webProperty

63366339 :: WebProperty

63376340webProperty =

6338− WebProperty

6341+ WebProperty'

63396342 { _wParentLink = Nothing

63406343 , _wChildLink = Nothing

63416344 , _wDefaultProFileId = Nothing

@@ -6449,7 +6452,7 @@ instance FromJSON WebProperty where

64496452 parseJSON

64506453 = withObject "WebProperty"

64516454 (\ o ->

6452− WebProperty <$>

6455+ WebProperty' <$>

64536456 (o .:? "parentLink") <*> (o .:? "childLink") <*>

64546457 (o .:? "defaultProfileId")

64556458 <*> (o .:? "kind" .!= "analytics#webproperty")

@@ -6468,7 +6471,7 @@ instance FromJSON WebProperty where

64686471 <*> (o .:? "level"))

64696472

64706473instance ToJSON WebProperty where

6471− toJSON WebProperty{..}

6474+ toJSON WebProperty'{..}

64726475 = object

64736476 (catMaybes

64746477 [("parentLink" .=) <$> _wParentLink,

@@ -6491,7 +6494,7 @@ instance ToJSON WebProperty where

64916494-- | Permissions the user has for this web property.

64926495--

64936496-- /See:/ 'webPropertyPermissions' smart constructor.

6494−newtype WebPropertyPermissions = WebPropertyPermissions

6497+newtype WebPropertyPermissions = WebPropertyPermissions'

64956498 { _wppEffective :: Maybe [Text]

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

64976500

@@ -6503,7 +6506,7 @@ newtype WebPropertyPermissions = WebPropertyPermissions

65036506webPropertyPermissions

65046507 :: WebPropertyPermissions

65056508webPropertyPermissions =

6506− WebPropertyPermissions

6509+ WebPropertyPermissions'

65076510 { _wppEffective = Nothing

65086511 }

65096512

@@ -6520,11 +6523,11 @@ instance FromJSON WebPropertyPermissions where

65206523 parseJSON

65216524 = withObject "WebPropertyPermissions"

65226525 (\ o ->

6523− WebPropertyPermissions <$>

6526+ WebPropertyPermissions' <$>

65246527 (o .:? "effective" .!= mempty))

65256528

65266529instance ToJSON WebPropertyPermissions where

6527− toJSON WebPropertyPermissions{..}

6530+ toJSON WebPropertyPermissions'{..}

65286531 = object

65296532 (catMaybes [("effective" .=) <$> _wppEffective])

65306533

@@ -6532,7 +6535,7 @@ instance ToJSON WebPropertyPermissions where

65326535-- that a user has for an entity.

65336536--

65346537-- /See:/ 'entityUserLink' smart constructor.

6535−data EntityUserLink = EntityUserLink

6538+data EntityUserLink = EntityUserLink'

65366539 { _euluKind :: !Text

65376540 , _euluUserRef :: !(Maybe UserRef)

65386541 , _euluSelfLink :: !(Maybe Text)

@@ -6559,7 +6562,7 @@ data EntityUserLink = EntityUserLink

65596562entityUserLink

65606563 :: EntityUserLink

65616564entityUserLink =

6562− EntityUserLink

6565+ EntityUserLink'

65636566 { _euluKind = "analytics#entityUserLink"

65646567 , _euluUserRef = Nothing

65656568 , _euluSelfLink = Nothing

@@ -6602,7 +6605,7 @@ instance FromJSON EntityUserLink where

66026605 parseJSON

66036606 = withObject "EntityUserLink"

66046607 (\ o ->

6605− EntityUserLink <$>

6608+ EntityUserLink' <$>

66066609 (o .:? "kind" .!= "analytics#entityUserLink") <*>

66076610 (o .:? "userRef")

66086611 <*> (o .:? "selfLink")

@@ -6611,7 +6614,7 @@ instance FromJSON EntityUserLink where

66116614 <*> (o .:? "entity"))

66126615

66136616instance ToJSON EntityUserLink where

6614− toJSON EntityUserLink{..}

6617+ toJSON EntityUserLink'{..}

66156618 = object

66166619 (catMaybes

66176620 [Just ("kind" .= _euluKind),

@@ -6625,7 +6628,7 @@ instance ToJSON EntityUserLink where

66256628-- which this custom data source belongs.

66266629--

66276630-- /See:/ 'customDataSourceParentLink' smart constructor.

6628−data CustomDataSourceParentLink = CustomDataSourceParentLink

6631+data CustomDataSourceParentLink = CustomDataSourceParentLink'

66296632 { _cdsplHref :: !(Maybe Text)

66306633 , _cdsplType :: !Text

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

@@ -6640,7 +6643,7 @@ data CustomDataSourceParentLink = CustomDataSourceParentLink

66406643customDataSourceParentLink

66416644 :: CustomDataSourceParentLink

66426645customDataSourceParentLink =

6643− CustomDataSourceParentLink

6646+ CustomDataSourceParentLink'

66446647 { _cdsplHref = Nothing

66456648 , _cdsplType = "analytics#webproperty"

66466649 }

@@ -6659,12 +6662,12 @@ instance FromJSON CustomDataSourceParentLink where

66596662 parseJSON

66606663 = withObject "CustomDataSourceParentLink"

66616664 (\ o ->

6662− CustomDataSourceParentLink <$>

6665+ CustomDataSourceParentLink' <$>

66636666 (o .:? "href") <*>

66646667 (o .:? "type" .!= "analytics#webproperty"))

66656668

66666669instance ToJSON CustomDataSourceParentLink where

6667− toJSON CustomDataSourceParentLink{..}

6670+ toJSON CustomDataSourceParentLink'{..}

66686671 = object

66696672 (catMaybes

66706673 [("href" .=) <$> _cdsplHref,

@@ -6672,7 +6675,7 @@ instance ToJSON CustomDataSourceParentLink where

66726675

66736676--

66746677-- /See:/ 'goalEventDetailsEventConditionsItem' smart constructor.

6675−data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem

6678+data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem'

66766679 { _gedeciMatchType :: !(Maybe Text)

66776680 , _gedeciExpression :: !(Maybe Text)

66786681 , _gedeciComparisonValue :: !(Maybe (Textual Int64))

@@ -6696,7 +6699,7 @@ data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem

66966699goalEventDetailsEventConditionsItem

66976700 :: GoalEventDetailsEventConditionsItem

66986701goalEventDetailsEventConditionsItem =

6699− GoalEventDetailsEventConditionsItem

6702+ GoalEventDetailsEventConditionsItem'

67006703 { _gedeciMatchType = Nothing

67016704 , _gedeciExpression = Nothing

67026705 , _gedeciComparisonValue = Nothing

@@ -6742,7 +6745,7 @@ instance FromJSON GoalEventDetailsEventConditionsItem

67426745 parseJSON

67436746 = withObject "GoalEventDetailsEventConditionsItem"

67446747 (\ o ->

6745− GoalEventDetailsEventConditionsItem <$>

6748+ GoalEventDetailsEventConditionsItem' <$>

67466749 (o .:? "matchType") <*> (o .:? "expression") <*>

67476750 (o .:? "comparisonValue")

67486751 <*> (o .:? "type")

@@ -6750,7 +6753,7 @@ instance FromJSON GoalEventDetailsEventConditionsItem

67506753

67516754instance ToJSON GoalEventDetailsEventConditionsItem

67526755 where

6753− toJSON GoalEventDetailsEventConditionsItem{..}

6756+ toJSON GoalEventDetailsEventConditionsItem'{..}

67546757 = object

67556758 (catMaybes

67566759 [("matchType" .=) <$> _gedeciMatchType,

@@ -6762,7 +6765,7 @@ instance ToJSON GoalEventDetailsEventConditionsItem

67626765-- | Analytics data request query parameters.

67636766--

67646767-- /See:/ 'mcfDataQuery' smart constructor.

6765−data McfDataQuery = McfDataQuery

6768+data McfDataQuery = McfDataQuery'

67666769 { _mdqMetrics :: !(Maybe [Text])

67676770 , _mdqSamplingLevel :: !(Maybe Text)

67686771 , _mdqFilters :: !(Maybe Text)

@@ -6804,7 +6807,7 @@ data McfDataQuery = McfDataQuery

68046807mcfDataQuery

68056808 :: McfDataQuery

68066809mcfDataQuery =

6807− McfDataQuery

6810+ McfDataQuery'

68086811 { _mdqMetrics = Nothing

68096812 , _mdqSamplingLevel = Nothing

68106813 , _mdqFilters = Nothing

@@ -6885,7 +6888,7 @@ instance FromJSON McfDataQuery where

68856888 parseJSON

68866889 = withObject "McfDataQuery"

68876890 (\ o ->

6888− McfDataQuery <$>

6891+ McfDataQuery' <$>

68896892 (o .:? "metrics" .!= mempty) <*>

68906893 (o .:? "samplingLevel")

68916894 <*> (o .:? "filters")

@@ -6899,7 +6902,7 @@ instance FromJSON McfDataQuery where

68996902 <*> (o .:? "start-date"))

69006903

69016904instance ToJSON McfDataQuery where

6902− toJSON McfDataQuery{..}

6905+ toJSON McfDataQuery'{..}

69036906 = object

69046907 (catMaybes

69056908 [("metrics" .=) <$> _mdqMetrics,

@@ -6917,7 +6920,7 @@ instance ToJSON McfDataQuery where

69176920-- | JSON template for Analytics goal resource.

69186921--

69196922-- /See:/ 'goal' smart constructor.

6920−data Goal = Goal

6923+data Goal = Goal'

69216924 { _goaParentLink :: !(Maybe GoalParentLink)

69226925 , _goaWebPropertyId :: !(Maybe Text)

69236926 , _goaKind :: !Text

@@ -6980,7 +6983,7 @@ data Goal = Goal

69806983goal

69816984 :: Goal

69826985goal =

6983− Goal

6986+ Goal'

69846987 { _goaParentLink = Nothing

69856988 , _goaWebPropertyId = Nothing

69866989 , _goaKind = "analytics#goal"

@@ -7104,7 +7107,7 @@ instance FromJSON Goal where

71047107 parseJSON

71057108 = withObject "Goal"

71067109 (\ o ->

7107− Goal <$>

7110+ Goal' <$>

71087111 (o .:? "parentLink") <*> (o .:? "webPropertyId") <*>

71097112 (o .:? "kind" .!= "analytics#goal")

71107113 <*> (o .:? "created")

@@ -7124,7 +7127,7 @@ instance FromJSON Goal where

71247127 <*> (o .:? "type"))

71257128

71267129instance ToJSON Goal where

7127− toJSON Goal{..}

7130+ toJSON Goal'{..}

71287131 = object

71297132 (catMaybes

71307133 [("parentLink" .=) <$> _goaParentLink,

@@ -7155,7 +7158,7 @@ instance ToJSON Goal where

71557158-- property and profile.

71567159--

71577160-- /See:/ 'accountTicket' smart constructor.

7158−data AccountTicket = AccountTicket

7161+data AccountTicket = AccountTicket'

71597162 { _atRedirectURI :: !(Maybe Text)

71607163 , _atKind :: !Text

71617164 , _atProFile :: !(Maybe ProFile)

@@ -7182,7 +7185,7 @@ data AccountTicket = AccountTicket

71827185accountTicket

71837186 :: AccountTicket

71847187accountTicket =

7185− AccountTicket

7188+ AccountTicket'

71867189 { _atRedirectURI = Nothing

71877190 , _atKind = "analytics#accountTicket"

71887191 , _atProFile = Nothing

@@ -7226,7 +7229,7 @@ instance FromJSON AccountTicket where

72267229 parseJSON

72277230 = withObject "AccountTicket"

72287231 (\ o ->

7229− AccountTicket <$>

7232+ AccountTicket' <$>

72307233 (o .:? "redirectUri") <*>

72317234 (o .:? "kind" .!= "analytics#accountTicket")

72327235 <*> (o .:? "profile")

@@ -7235,7 +7238,7 @@ instance FromJSON AccountTicket where

72357238 <*> (o .:? "id"))

72367239

72377240instance ToJSON AccountTicket where

7238− toJSON AccountTicket{..}

7241+ toJSON AccountTicket'{..}

72397242 = object

72407243 (catMaybes

72417244 [("redirectUri" .=) <$> _atRedirectURI,

@@ -7249,7 +7252,7 @@ instance ToJSON AccountTicket where

72497252-- lightweight tree comprised of properties\/profiles.

72507253--

72517254-- /See:/ 'accountSummary' smart constructor.

7252−data AccountSummary = AccountSummary

7255+data AccountSummary = AccountSummary'

72537256 { _assKind :: !Text

72547257 , _assWebProperties :: !(Maybe [WebPropertySummary])

72557258 , _assName :: !(Maybe Text)

@@ -7273,7 +7276,7 @@ data AccountSummary = AccountSummary

72737276accountSummary

72747277 :: AccountSummary

72757278accountSummary =

7276− AccountSummary

7279+ AccountSummary'

72777280 { _assKind = "analytics#accountSummary"

72787281 , _assWebProperties = Nothing

72797282 , _assName = Nothing

@@ -7310,7 +7313,7 @@ instance FromJSON AccountSummary where

73107313 parseJSON

73117314 = withObject "AccountSummary"

73127315 (\ o ->

7313− AccountSummary <$>

7316+ AccountSummary' <$>

73147317 (o .:? "kind" .!= "analytics#accountSummary") <*>

73157318 (o .:? "webProperties" .!= mempty)

73167319 <*> (o .:? "name")

@@ -7318,7 +7321,7 @@ instance FromJSON AccountSummary where

73187321 <*> (o .:? "id"))

73197322

73207323instance ToJSON AccountSummary where

7321− toJSON AccountSummary{..}

7324+ toJSON AccountSummary'{..}

73227325 = object

73237326 (catMaybes

73247327 [Just ("kind" .= _assKind),

@@ -7330,7 +7333,7 @@ instance ToJSON AccountSummary where

73307333-- | Real time data request query parameters.

73317334--

73327335-- /See:/ 'realtimeDataQuery' smart constructor.

7333−data RealtimeDataQuery = RealtimeDataQuery

7336+data RealtimeDataQuery = RealtimeDataQuery'

73347337 { _rdqMetrics :: !(Maybe [Text])

73357338 , _rdqFilters :: !(Maybe Text)

73367339 , _rdqIds :: !(Maybe Text)

@@ -7357,7 +7360,7 @@ data RealtimeDataQuery = RealtimeDataQuery

73577360realtimeDataQuery

73587361 :: RealtimeDataQuery

73597362realtimeDataQuery =

7360− RealtimeDataQuery

7363+ RealtimeDataQuery'

73617364 { _rdqMetrics = Nothing

73627365 , _rdqFilters = Nothing

73637366 , _rdqIds = Nothing

@@ -7405,7 +7408,7 @@ instance FromJSON RealtimeDataQuery where

74057408 parseJSON

74067409 = withObject "RealtimeDataQuery"

74077410 (\ o ->

7408− RealtimeDataQuery <$>

7411+ RealtimeDataQuery' <$>

74097412 (o .:? "metrics" .!= mempty) <*> (o .:? "filters")

74107413 <*> (o .:? "ids")

74117414 <*> (o .:? "sort" .!= mempty)

@@ -7413,7 +7416,7 @@ instance FromJSON RealtimeDataQuery where

74137416 <*> (o .:? "max-results"))

74147417

74157418instance ToJSON RealtimeDataQuery where

7416− toJSON RealtimeDataQuery{..}

7419+ toJSON RealtimeDataQuery'{..}

74177420 = object

74187421 (catMaybes

74197422 [("metrics" .=) <$> _rdqMetrics,

@@ -7425,7 +7428,7 @@ instance ToJSON RealtimeDataQuery where

74257428-- | Lists columns (dimensions and metrics) for a particular report type.

74267429--

74277430-- /See:/ 'columns' smart constructor.

7428−data Columns = Columns

7431+data Columns = Columns'

74297432 { _colEtag :: !(Maybe Text)

74307433 , _colKind :: !Text

74317434 , _colItems :: !(Maybe [Column])

@@ -7449,7 +7452,7 @@ data Columns = Columns

74497452columns

74507453 :: Columns

74517454columns =

7452− Columns

7455+ Columns'

74537456 { _colEtag = Nothing

74547457 , _colKind = "analytics#columns"

74557458 , _colItems = Nothing

@@ -7492,7 +7495,7 @@ instance FromJSON Columns where

74927495 parseJSON

74937496 = withObject "Columns"

74947497 (\ o ->

7495− Columns <$>

7498+ Columns' <$>

74967499 (o .:? "etag") <*>

74977500 (o .:? "kind" .!= "analytics#columns")

74987501 <*> (o .:? "items" .!= mempty)

@@ -7500,7 +7503,7 @@ instance FromJSON Columns where

75007503 <*> (o .:? "attributeNames" .!= mempty))

75017504

75027505instance ToJSON Columns where

7503− toJSON Columns{..}

7506+ toJSON Columns'{..}

75047507 = object

75057508 (catMaybes

75067509 [("etag" .=) <$> _colEtag, Just ("kind" .= _colKind),

@@ -7511,7 +7514,7 @@ instance ToJSON Columns where

75117514-- | Details for the filter of the type LOWER.

75127515--

75137516-- /See:/ 'filterLowercaseDetails' smart constructor.

7514−data FilterLowercaseDetails = FilterLowercaseDetails

7517+data FilterLowercaseDetails = FilterLowercaseDetails'

75157518 { _fldFieldIndex :: !(Maybe (Textual Int32))

75167519 , _fldField :: !(Maybe Text)

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

@@ -7526,7 +7529,7 @@ data FilterLowercaseDetails = FilterLowercaseDetails

75267529filterLowercaseDetails

75277530 :: FilterLowercaseDetails

75287531filterLowercaseDetails =

7529− FilterLowercaseDetails

7532+ FilterLowercaseDetails'

75307533 { _fldFieldIndex = Nothing

75317534 , _fldField = Nothing

75327535 }

@@ -7547,11 +7550,11 @@ instance FromJSON FilterLowercaseDetails where

75477550 parseJSON

75487551 = withObject "FilterLowercaseDetails"

75497552 (\ o ->

7550− FilterLowercaseDetails <$>

7553+ FilterLowercaseDetails' <$>

75517554 (o .:? "fieldIndex") <*> (o .:? "field"))

75527555

75537556instance ToJSON FilterLowercaseDetails where

7554− toJSON FilterLowercaseDetails{..}

7557+ toJSON FilterLowercaseDetails'{..}

75557558 = object

75567559 (catMaybes

75577560 [("fieldIndex" .=) <$> _fldFieldIndex,

@@ -7560,7 +7563,7 @@ instance ToJSON FilterLowercaseDetails where

75607563-- | JSON template for an Analytics account filter.

75617564--

75627565-- /See:/ 'filter'' smart constructor.

7563−data Filter = Filter

7566+data Filter = Filter'

75647567 { _filParentLink :: !(Maybe FilterParentLink)

75657568 , _filAdvancedDetails :: !(Maybe FilterAdvancedDetails)

75667569 , _filUppercaseDetails :: !(Maybe FilterUppercaseDetails)

@@ -7614,7 +7617,7 @@ data Filter = Filter

76147617filter'

76157618 :: Filter

76167619filter' =

7617− Filter

7620+ Filter'

76187621 { _filParentLink = Nothing

76197622 , _filAdvancedDetails = Nothing

76207623 , _filUppercaseDetails = Nothing

@@ -7718,7 +7721,7 @@ instance FromJSON Filter where

77187721 parseJSON

77197722 = withObject "Filter"

77207723 (\ o ->

7721− Filter <$>

7724+ Filter' <$>

77227725 (o .:? "parentLink") <*> (o .:? "advancedDetails")

77237726 <*> (o .:? "uppercaseDetails")

77247727 <*> (o .:? "lowercaseDetails")

@@ -7735,7 +7738,7 @@ instance FromJSON Filter where

77357738 <*> (o .:? "searchAndReplaceDetails"))

77367739

77377740instance ToJSON Filter where

7738− toJSON Filter{..}

7741+ toJSON Filter'{..}

77397742 = object

77407743 (catMaybes

77417744 [("parentLink" .=) <$> _filParentLink,

@@ -7759,7 +7762,7 @@ instance ToJSON Filter where

77597762-- upload collection corresponds to a single Analytics data upload.

77607763--

77617764-- /See:/ 'uploads' smart constructor.

7762−data Uploads = Uploads

7765+data Uploads = Uploads'

77637766 { _uplNextLink :: !(Maybe Text)

77647767 , _uplItemsPerPage :: !(Maybe (Textual Int32))

77657768 , _uplKind :: !Text

@@ -7789,7 +7792,7 @@ data Uploads = Uploads

77897792uploads

77907793 :: Uploads

77917794uploads =

7792− Uploads

7795+ Uploads'

77937796 { _uplNextLink = Nothing

77947797 , _uplItemsPerPage = Nothing

77957798 , _uplKind = "analytics#uploads"

@@ -7851,7 +7854,7 @@ instance FromJSON Uploads where

78517854 parseJSON

78527855 = withObject "Uploads"

78537856 (\ o ->

7854− Uploads <$>

7857+ Uploads' <$>

78557858 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

78567859 (o .:? "kind" .!= "analytics#uploads")

78577860 <*> (o .:? "items" .!= mempty)

@@ -7860,7 +7863,7 @@ instance FromJSON Uploads where

78607863 <*> (o .:? "previousLink"))

78617864

78627865instance ToJSON Uploads where

7863− toJSON Uploads{..}

7866+ toJSON Uploads'{..}

78647867 = object

78657868 (catMaybes

78667869 [("nextLink" .=) <$> _uplNextLink,

@@ -7876,7 +7879,7 @@ instance ToJSON Uploads where

78767879-- single Analytics custom dimension.

78777880--

78787881-- /See:/ 'customDimensions' smart constructor.

7879−data CustomDimensions = CustomDimensions

7882+data CustomDimensions = CustomDimensions'

78807883 { _cdNextLink :: !(Maybe Text)

78817884 , _cdItemsPerPage :: !(Maybe (Textual Int32))

78827885 , _cdKind :: !Text

@@ -7909,7 +7912,7 @@ data CustomDimensions = CustomDimensions

79097912customDimensions

79107913 :: CustomDimensions

79117914customDimensions =

7912− CustomDimensions

7915+ CustomDimensions'

79137916 { _cdNextLink = Nothing

79147917 , _cdItemsPerPage = Nothing

79157918 , _cdKind = "analytics#customDimensions"

@@ -7975,7 +7978,7 @@ instance FromJSON CustomDimensions where

79757978 parseJSON

79767979 = withObject "CustomDimensions"

79777980 (\ o ->

7978− CustomDimensions <$>

7981+ CustomDimensions' <$>

79797982 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

79807983 (o .:? "kind" .!= "analytics#customDimensions")

79817984 <*> (o .:? "username")

@@ -7985,7 +7988,7 @@ instance FromJSON CustomDimensions where

79857988 <*> (o .:? "previousLink"))

79867989

79877990instance ToJSON CustomDimensions where

7988− toJSON CustomDimensions{..}

7991+ toJSON CustomDimensions'{..}

79897992 = object

79907993 (catMaybes

79917994 [("nextLink" .=) <$> _cdNextLink,

@@ -8002,7 +8005,7 @@ instance ToJSON CustomDimensions where

80028005-- segment.

80038006--

80048007-- /See:/ 'segments' smart constructor.

8005−data Segments = Segments

8008+data Segments = Segments'

80068009 { _sNextLink :: !(Maybe Text)

80078010 , _sItemsPerPage :: !(Maybe (Textual Int32))

80088011 , _sKind :: !Text

@@ -8035,7 +8038,7 @@ data Segments = Segments

80358038segments

80368039 :: Segments

80378040segments =

8038− Segments

8041+ Segments'

80398042 { _sNextLink = Nothing

80408043 , _sItemsPerPage = Nothing

80418044 , _sKind = "analytics#segments"

@@ -8101,7 +8104,7 @@ instance FromJSON Segments where

81018104 parseJSON

81028105 = withObject "Segments"

81038106 (\ o ->

8104− Segments <$>

8107+ Segments' <$>

81058108 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

81068109 (o .:? "kind" .!= "analytics#segments")

81078110 <*> (o .:? "username")

@@ -8111,7 +8114,7 @@ instance FromJSON Segments where

81118114 <*> (o .:? "previousLink"))

81128115

81138116instance ToJSON Segments where

8114− toJSON Segments{..}

8117+ toJSON Segments'{..}

81158118 = object

81168119 (catMaybes

81178120 [("nextLink" .=) <$> _sNextLink,

@@ -8125,7 +8128,7 @@ instance ToJSON Segments where

81258128

81268129--

81278130-- /See:/ 'gaDataDataTable' smart constructor.

8128−data GaDataDataTable = GaDataDataTable

8131+data GaDataDataTable = GaDataDataTable'

81298132 { _gddtCols :: !(Maybe [GaDataDataTableColsItem])

81308133 , _gddtRows :: !(Maybe [GaDataDataTableRowsItem])

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

@@ -8140,7 +8143,7 @@ data GaDataDataTable = GaDataDataTable

81408143gaDataDataTable

81418144 :: GaDataDataTable

81428145gaDataDataTable =

8143− GaDataDataTable

8146+ GaDataDataTable'

81448147 { _gddtCols = Nothing

81458148 , _gddtRows = Nothing

81468149 }

@@ -8161,12 +8164,12 @@ instance FromJSON GaDataDataTable where

81618164 parseJSON

81628165 = withObject "GaDataDataTable"

81638166 (\ o ->

8164− GaDataDataTable <$>

8167+ GaDataDataTable' <$>

81658168 (o .:? "cols" .!= mempty) <*>

81668169 (o .:? "rows" .!= mempty))

81678170

81688171instance ToJSON GaDataDataTable where

8169− toJSON GaDataDataTable{..}

8172+ toJSON GaDataDataTable'{..}

81708173 = object

81718174 (catMaybes

81728175 [("cols" .=) <$> _gddtCols,

@@ -8175,7 +8178,7 @@ instance ToJSON GaDataDataTable where

81758178-- | Web property being linked.

81768179--

81778180-- /See:/ 'entityAdWordsLinkEntity' smart constructor.

8178−newtype EntityAdWordsLinkEntity = EntityAdWordsLinkEntity

8181+newtype EntityAdWordsLinkEntity = EntityAdWordsLinkEntity'

81798182 { _eawleWebPropertyRef :: Maybe WebPropertyRef

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

81818184

@@ -8187,7 +8190,7 @@ newtype EntityAdWordsLinkEntity = EntityAdWordsLinkEntity

81878190entityAdWordsLinkEntity

81888191 :: EntityAdWordsLinkEntity

81898192entityAdWordsLinkEntity =

8190− EntityAdWordsLinkEntity

8193+ EntityAdWordsLinkEntity'

81918194 { _eawleWebPropertyRef = Nothing

81928195 }

81938196

@@ -8200,10 +8203,11 @@ instance FromJSON EntityAdWordsLinkEntity where

82008203 parseJSON

82018204 = withObject "EntityAdWordsLinkEntity"

82028205 (\ o ->

8203− EntityAdWordsLinkEntity <$> (o .:? "webPropertyRef"))

8206+ EntityAdWordsLinkEntity' <$>

8207+ (o .:? "webPropertyRef"))

82048208

82058209instance ToJSON EntityAdWordsLinkEntity where

8206− toJSON EntityAdWordsLinkEntity{..}

8210+ toJSON EntityAdWordsLinkEntity'{..}

82078211 = object

82088212 (catMaybes

82098213 [("webPropertyRef" .=) <$> _eawleWebPropertyRef])

@@ -8211,7 +8215,7 @@ instance ToJSON EntityAdWordsLinkEntity where

82118215-- | Details for the goal of the type URL_DESTINATION.

82128216--

82138217-- /See:/ 'goalURLDestinationDetails' smart constructor.

8214−data GoalURLDestinationDetails = GoalURLDestinationDetails

8218+data GoalURLDestinationDetails = GoalURLDestinationDetails'

82158219 { _guddURL :: !(Maybe Text)

82168220 , _guddMatchType :: !(Maybe Text)

82178221 , _guddSteps :: !(Maybe [GoalURLDestinationDetailsStepsItem])

@@ -8235,7 +8239,7 @@ data GoalURLDestinationDetails = GoalURLDestinationDetails

82358239goalURLDestinationDetails

82368240 :: GoalURLDestinationDetails

82378241goalURLDestinationDetails =

8238− GoalURLDestinationDetails

8242+ GoalURLDestinationDetails'

82398243 { _guddURL = Nothing

82408244 , _guddMatchType = Nothing

82418245 , _guddSteps = Nothing

@@ -8277,14 +8281,14 @@ instance FromJSON GoalURLDestinationDetails where

82778281 parseJSON

82788282 = withObject "GoalURLDestinationDetails"

82798283 (\ o ->

8280− GoalURLDestinationDetails <$>

8284+ GoalURLDestinationDetails' <$>

82818285 (o .:? "url") <*> (o .:? "matchType") <*>

82828286 (o .:? "steps" .!= mempty)

82838287 <*> (o .:? "caseSensitive")

82848288 <*> (o .:? "firstStepRequired"))

82858289

82868290instance ToJSON GoalURLDestinationDetails where

8287− toJSON GoalURLDestinationDetails{..}

8291+ toJSON GoalURLDestinationDetails'{..}

82888292 = object

82898293 (catMaybes

82908294 [("url" .=) <$> _guddURL,

@@ -8298,7 +8302,7 @@ instance ToJSON GoalURLDestinationDetails where

82988302-- profile filter link.

82998303--

83008304-- /See:/ 'proFileFilterLinks' smart constructor.

8301−data ProFileFilterLinks = ProFileFilterLinks

8305+data ProFileFilterLinks = ProFileFilterLinks'

83028306 { _pfflNextLink :: !(Maybe Text)

83038307 , _pfflItemsPerPage :: !(Maybe (Textual Int32))

83048308 , _pfflKind :: !Text

@@ -8331,7 +8335,7 @@ data ProFileFilterLinks = ProFileFilterLinks

83318335proFileFilterLinks

83328336 :: ProFileFilterLinks

83338337proFileFilterLinks =

8334− ProFileFilterLinks

8338+ ProFileFilterLinks'

83358339 { _pfflNextLink = Nothing

83368340 , _pfflItemsPerPage = Nothing

83378341 , _pfflKind = "analytics#profileFilterLinks"

@@ -8399,7 +8403,7 @@ instance FromJSON ProFileFilterLinks where

83998403 parseJSON

84008404 = withObject "ProFileFilterLinks"

84018405 (\ o ->

8402− ProFileFilterLinks <$>

8406+ ProFileFilterLinks' <$>

84038407 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>

84048408 (o .:? "kind" .!= "analytics#profileFilterLinks")

84058409 <*> (o .:? "username")

@@ -8409,7 +8413,7 @@ instance FromJSON ProFileFilterLinks where

84098413 <*> (o .:? "previousLink"))

84108414

84118415instance ToJSON ProFileFilterLinks where

8412− toJSON ProFileFilterLinks{..}

8416+ toJSON ProFileFilterLinks'{..}

84138417 = object

84148418 (catMaybes

84158419 [("nextLink" .=) <$> _pfflNextLink,

@@ -8425,7 +8429,7 @@ instance ToJSON ProFileFilterLinks where

84258429-- web property belongs.

84268430--

84278431-- /See:/ 'webPropertyParentLink' smart constructor.

8428−data WebPropertyParentLink = WebPropertyParentLink

8432+data WebPropertyParentLink = WebPropertyParentLink'

84298433 { _wpplHref :: !(Maybe Text)

84308434 , _wpplType :: !Text

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

@@ -8440,7 +8444,7 @@ data WebPropertyParentLink = WebPropertyParentLink

84408444webPropertyParentLink

84418445 :: WebPropertyParentLink

84428446webPropertyParentLink =

8443− WebPropertyParentLink

8447+ WebPropertyParentLink'

84448448 { _wpplHref = Nothing

84458449 , _wpplType = "analytics#account"

84468450 }

@@ -8457,12 +8461,12 @@ instance FromJSON WebPropertyParentLink where

84578461 parseJSON

84588462 = withObject "WebPropertyParentLink"

84598463 (\ o ->

8460− WebPropertyParentLink <$>

8464+ WebPropertyParentLink' <$>

84618465 (o .:? "href") <*>

84628466 (o .:? "type" .!= "analytics#account"))

84638467

84648468instance ToJSON WebPropertyParentLink where

8465− toJSON WebPropertyParentLink{..}

8469+ toJSON WebPropertyParentLink'{..}

84668470 = object

84678471 (catMaybes

84688472 [("href" .=) <$> _wpplHref,

@@ -8472,7 +8476,7 @@ instance ToJSON WebPropertyParentLink where

84728476-- requested.

84738477--

84748478-- /See:/ 'gaDataProFileInfo' smart constructor.

8475−data GaDataProFileInfo = GaDataProFileInfo

8479+data GaDataProFileInfo = GaDataProFileInfo'

84768480 { _gdpfiWebPropertyId :: !(Maybe Text)

84778481 , _gdpfiProFileId :: !(Maybe Text)

84788482 , _gdpfiProFileName :: !(Maybe Text)

@@ -8499,7 +8503,7 @@ data GaDataProFileInfo = GaDataProFileInfo

84998503gaDataProFileInfo

85008504 :: GaDataProFileInfo

85018505gaDataProFileInfo =

8502− GaDataProFileInfo

8506+ GaDataProFileInfo'

85038507 { _gdpfiWebPropertyId = Nothing

85048508 , _gdpfiProFileId = Nothing

85058509 , _gdpfiProFileName = Nothing

@@ -8547,7 +8551,7 @@ instance FromJSON GaDataProFileInfo where

85478551 parseJSON

85488552 = withObject "GaDataProFileInfo"

85498553 (\ o ->

8550− GaDataProFileInfo <$>

8554+ GaDataProFileInfo' <$>

85518555 (o .:? "webPropertyId") <*> (o .:? "profileId") <*>

85528556 (o .:? "profileName")

85538557 <*> (o .:? "accountId")

@@ -8555,7 +8559,7 @@ instance FromJSON GaDataProFileInfo where

85558559 <*> (o .:? "tableId"))

85568560

85578561instance ToJSON GaDataProFileInfo where

8558− toJSON GaDataProFileInfo{..}

8562+ toJSON GaDataProFileInfo'{..}

85598563 = object

85608564 (catMaybes

85618565 [("webPropertyId" .=) <$> _gdpfiWebPropertyId,

@@ -8569,7 +8573,7 @@ instance ToJSON GaDataProFileInfo where

85698573-- | Metadata returned for an upload operation.

85708574--

85718575-- /See:/ 'upload' smart constructor.

8572−data Upload = Upload

8576+data Upload = Upload'

85738577 { _uuStatus :: !(Maybe Text)

85748578 , _uuKind :: !Text

85758579 , _uuCustomDataSourceId :: !(Maybe Text)

@@ -8596,7 +8600,7 @@ data Upload = Upload

85968600upload

85978601 :: Upload

85988602upload =

8599− Upload

8603+ Upload'

86008604 { _uuStatus = Nothing

86018605 , _uuKind = "analytics#upload"

86028606 , _uuCustomDataSourceId = Nothing

@@ -8641,7 +8645,7 @@ instance FromJSON Upload where

86418645 parseJSON

86428646 = withObject "Upload"

86438647 (\ o ->

8644− Upload <$>

8648+ Upload' <$>

86458649 (o .:? "status") <*>

86468650 (o .:? "kind" .!= "analytics#upload")

86478651 <*> (o .:? "customDataSourceId")

@@ -8650,7 +8654,7 @@ instance FromJSON Upload where

86508654 <*> (o .:? "errors" .!= mempty))

86518655

86528656instance ToJSON Upload where

8653− toJSON Upload{..}

8657+ toJSON Upload'{..}

86548658 = object

86558659 (catMaybes

86568660 [("status" .=) <$> _uuStatus,

@@ -8662,7 +8666,7 @@ instance ToJSON Upload where

86628666-- | JSON template for Analytics Custom Dimension.

86638667--

86648668-- /See:/ 'customDimension' smart constructor.

8665−data CustomDimension = CustomDimension

8669+data CustomDimension = CustomDimension'

86668670 { _cddParentLink :: !(Maybe CustomDimensionParentLink)

86678671 , _cddWebPropertyId :: !(Maybe Text)

86688672 , _cddKind :: !Text

@@ -8707,7 +8711,7 @@ data CustomDimension = CustomDimension

87078711customDimension

87088712 :: CustomDimension

87098713customDimension =

8710− CustomDimension

8714+ CustomDimension'

87118715 { _cddParentLink = Nothing

87128716 , _cddWebPropertyId = Nothing

87138717 , _cddKind = "analytics#customDimension"

@@ -8789,7 +8793,7 @@ instance FromJSON CustomDimension where

87898793 parseJSON

87908794 = withObject "CustomDimension"

87918795 (\ o ->

8792− CustomDimension <$>

8796+ CustomDimension' <$>

87938797 (o .:? "parentLink") <*> (o .:? "webPropertyId") <*>

87948798 (o .:? "kind" .!= "analytics#customDimension")

87958799 <*> (o .:? "created")

@@ -8803,7 +8807,7 @@ instance FromJSON CustomDimension where

88038807 <*> (o .:? "index"))

88048808

88058809instance ToJSON CustomDimension where

8806− toJSON CustomDimension{..}

8810+ toJSON CustomDimension'{..}

88078811 = object

88088812 (catMaybes

88098813 [("parentLink" .=) <$> _cddParentLink,

@@ -8820,7 +8824,7 @@ instance ToJSON CustomDimension where

88208824-- | JSON template for an Analytics segment.

88218825--

88228826-- /See:/ 'segment' smart constructor.

8823−data Segment = Segment

8827+data Segment = Segment'

88248828 { _segDefinition :: !(Maybe Text)

88258829 , _segKind :: !Text

88268830 , _segCreated :: !(Maybe DateTime')

@@ -8856,7 +8860,7 @@ data Segment = Segment

88568860segment

88578861 :: Segment

88588862segment =

8859− Segment

8863+ Segment'

88608864 { _segDefinition = Nothing

88618865 , _segKind = "analytics#segment"

88628866 , _segCreated = Nothing

@@ -8917,7 +8921,7 @@ instance FromJSON Segment where

89178921 parseJSON

89188922 = withObject "Segment"

89198923 (\ o ->

8920− Segment <$>

8924+ Segment' <$>

89218925 (o .:? "definition") <*>

89228926 (o .:? "kind" .!= "analytics#segment")

89238927 <*> (o .:? "created")

@@ -8929,7 +8933,7 @@ instance FromJSON Segment where

89298933 <*> (o .:? "segmentId"))

89308934

89318935instance ToJSON Segment where

8932− toJSON Segment{..}

8936+ toJSON Segment'{..}

89338937 = object

89348938 (catMaybes

89358939 [("definition" .=) <$> _segDefinition,

@@ -8945,7 +8949,7 @@ instance ToJSON Segment where

89458949-- for this account.

89468950--

89478951-- /See:/ 'accountChildLink' smart constructor.

8948−data AccountChildLink = AccountChildLink

8952+data AccountChildLink = AccountChildLink'

89498953 { _aclHref :: !(Maybe Text)

89508954 , _aclType :: !Text

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

@@ -8960,7 +8964,7 @@ data AccountChildLink = AccountChildLink

89608964accountChildLink

89618965 :: AccountChildLink

89628966accountChildLink =

8963− AccountChildLink

8967+ AccountChildLink'

89648968 { _aclHref = Nothing

89658969 , _aclType = "analytics#webproperties"

89668970 }

@@ -8977,12 +8981,12 @@ instance FromJSON AccountChildLink where

89778981 parseJSON

89788982 = withObject "AccountChildLink"

89798983 (\ o ->

8980− AccountChildLink <$>

8984+ AccountChildLink' <$>

89818985 (o .:? "href") <*>

89828986 (o .:? "type" .!= "analytics#webproperties"))

89838987

89848988instance ToJSON AccountChildLink where

8985− toJSON AccountChildLink{..}

8989+ toJSON AccountChildLink'{..}

89868990 = object

89878991 (catMaybes

89888992 [("href" .=) <$> _aclHref,

@@ -8991,7 +8995,7 @@ instance ToJSON AccountChildLink where

89918995-- | JSON template for an Analytics profile filter link.

89928996--

89938997-- /See:/ 'proFileFilterLink' smart constructor.

8994−data ProFileFilterLink = ProFileFilterLink

8998+data ProFileFilterLink = ProFileFilterLink'

89958999 { _proProFileRef :: !(Maybe ProFileRef)

89969000 , _proKind :: !Text

89979001 , _proFilterRef :: !(Maybe FilterRef)

@@ -9018,7 +9022,7 @@ data ProFileFilterLink = ProFileFilterLink

90189022proFileFilterLink

90199023 :: ProFileFilterLink

90209024proFileFilterLink =

9021− ProFileFilterLink

9025+ ProFileFilterLink'

90229026 { _proProFileRef = Nothing

90239027 , _proKind = "analytics#profileFilterLink"

90249028 , _proFilterRef = Nothing

@@ -9071,7 +9075,7 @@ instance FromJSON ProFileFilterLink where

90719075 parseJSON

90729076 = withObject "ProFileFilterLink"

90739077 (\ o ->

9074− ProFileFilterLink <$>

9078+ ProFileFilterLink' <$>

90759079 (o .:? "profileRef") <*>

90769080 (o .:? "kind" .!= "analytics#profileFilterLink")

90779081 <*> (o .:? "filterRef")

@@ -9080,7 +9084,7 @@ instance FromJSON ProFileFilterLink where

90809084 <*> (o .:? "rank"))

90819085

90829086instance ToJSON ProFileFilterLink where

9083− toJSON ProFileFilterLink{..}

9087+ toJSON ProFileFilterLink'{..}

90849088 = object

90859089 (catMaybes

90869090 [("profileRef" .=) <$> _proProFileRef,

@@ -9093,7 +9097,7 @@ instance ToJSON ProFileFilterLink where

90939097-- custom metric belongs.

90949098--

90959099-- /See:/ 'customMetricParentLink' smart constructor.

9096−data CustomMetricParentLink = CustomMetricParentLink

9100+data CustomMetricParentLink = CustomMetricParentLink'

90979101 { _cmplHref :: !(Maybe Text)

90989102 , _cmplType :: !Text

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

@@ -9108,7 +9112,7 @@ data CustomMetricParentLink = CustomMetricParentLink

91089112customMetricParentLink

91099113 :: CustomMetricParentLink

91109114customMetricParentLink =

9111− CustomMetricParentLink

9115+ CustomMetricParentLink'

91129116 { _cmplHref = Nothing

91139117 , _cmplType = "analytics#webproperty"

91149118 }

@@ -9125,12 +9129,12 @@ instance FromJSON CustomMetricParentLink where

91259129 parseJSON

91269130 = withObject "CustomMetricParentLink"

91279131 (\ o ->

9128− CustomMetricParentLink <$>

9132+ CustomMetricParentLink' <$>

91299133 (o .:? "href") <*>

91309134 (o .:? "type" .!= "analytics#webproperty"))

91319135

91329136instance ToJSON CustomMetricParentLink where

9133− toJSON CustomMetricParentLink{..}

9137+ toJSON CustomMetricParentLink'{..}

91349138 = object

91359139 (catMaybes

91369140 [("href" .=) <$> _cmplHref,

@@ -9139,7 +9143,7 @@ instance ToJSON CustomMetricParentLink where

91399143-- | JSON template for a metadata column.

91409144--

91419145-- /See:/ 'column' smart constructor.

9142−data Column = Column

9146+data Column = Column'

91439147 { _ccKind :: !Text

91449148 , _ccAttributes :: !(Maybe ColumnAttributes)

91459149 , _ccId :: !(Maybe Text)

@@ -9157,7 +9161,7 @@ data Column = Column

91579161column

91589162 :: Column

91599163column =

9160− Column

9164+ Column'

91619165 { _ccKind = "analytics#column"

91629166 , _ccAttributes = Nothing

91639167 , _ccId = Nothing

@@ -9180,13 +9184,13 @@ instance FromJSON Column where

91809184 parseJSON

91819185 = withObject "Column"

91829186 (\ o ->

9183− Column <$>

9187+ Column' <$>

91849188 (o .:? "kind" .!= "analytics#column") <*>

91859189 (o .:? "attributes")

91869190 <*> (o .:? "id"))

91879191

91889192instance ToJSON Column where

9189− toJSON Column{..}

9193+ toJSON Column'{..}

91909194 = object

91919195 (catMaybes

91929196 [Just ("kind" .= _ccKind),

@@ -9195,7 +9199,7 @@ instance ToJSON Column where

91959199

91969200--

91979201-- /See:/ 'gaDataDataTableColsItem' smart constructor.

9198−data GaDataDataTableColsItem = GaDataDataTableColsItem

9202+data GaDataDataTableColsItem = GaDataDataTableColsItem'

91999203 { _gddtciId :: !(Maybe Text)

92009204 , _gddtciType :: !(Maybe Text)

92019205 , _gddtciLabel :: !(Maybe Text)

@@ -9213,7 +9217,7 @@ data GaDataDataTableColsItem = GaDataDataTableColsItem

92139217gaDataDataTableColsItem

92149218 :: GaDataDataTableColsItem

92159219gaDataDataTableColsItem =

9216− GaDataDataTableColsItem

9220+ GaDataDataTableColsItem'

92179221 { _gddtciId = Nothing

92189222 , _gddtciType = Nothing

92199223 , _gddtciLabel = Nothing

@@ -9234,11 +9238,11 @@ instance FromJSON GaDataDataTableColsItem where

92349238 parseJSON

92359239 = withObject "GaDataDataTableColsItem"

92369240 (\ o ->

9237− GaDataDataTableColsItem <$>

9241+ GaDataDataTableColsItem' <$>

92389242 (o .:? "id") <*> (o .:? "type") <*> (o .:? "label"))

92399243

92409244instance ToJSON GaDataDataTableColsItem where

9241− toJSON GaDataDataTableColsItem{..}

9245+ toJSON GaDataDataTableColsItem'{..}

92429246 = object

92439247 (catMaybes

92449248 [("id" .=) <$> _gddtciId,

@@ -9247,7 +9251,7 @@ instance ToJSON GaDataDataTableColsItem where

92479251

92489252--

92499253-- /See:/ 'experimentVariationsItem' smart constructor.

9250−data ExperimentVariationsItem = ExperimentVariationsItem

9254+data ExperimentVariationsItem = ExperimentVariationsItem'

92519255 { _eviStatus :: !(Maybe Text)

92529256 , _eviWeight :: !(Maybe (Textual Double))

92539257 , _eviURL :: !(Maybe Text)

@@ -9271,7 +9275,7 @@ data ExperimentVariationsItem = ExperimentVariationsItem

92719275experimentVariationsItem

92729276 :: ExperimentVariationsItem

92739277experimentVariationsItem =

9274− ExperimentVariationsItem

9278+ ExperimentVariationsItem'

92759279 { _eviStatus = Nothing

92769280 , _eviWeight = Nothing

92779281 , _eviURL = Nothing

@@ -9314,14 +9318,14 @@ instance FromJSON ExperimentVariationsItem where

93149318 parseJSON

93159319 = withObject "ExperimentVariationsItem"

93169320 (\ o ->

9317− ExperimentVariationsItem <$>

9321+ ExperimentVariationsItem' <$>

93189322 (o .:? "status") <*> (o .:? "weight") <*>

93199323 (o .:? "url")

93209324 <*> (o .:? "won")

93219325 <*> (o .:? "name"))

93229326

93239327instance ToJSON ExperimentVariationsItem where

9324− toJSON ExperimentVariationsItem{..}

9328+ toJSON ExperimentVariationsItem'{..}

93259329 = object

93269330 (catMaybes

93279331 [("status" .=) <$> _eviStatus,

@@ -9333,7 +9337,7 @@ instance ToJSON ExperimentVariationsItem where

93339337-- same as the metric order specified in the request.

93349338--

93359339-- /See:/ 'mcfDataTotalsForAllResults' smart constructor.

9336−newtype McfDataTotalsForAllResults = McfDataTotalsForAllResults

9340+newtype McfDataTotalsForAllResults = McfDataTotalsForAllResults'

93379341 { _mdtfarAddtional :: HashMap Text Text

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

93399343

@@ -9346,7 +9350,7 @@ mcfDataTotalsForAllResults

93469350 :: HashMap Text Text -- ^ 'mdtfarAddtional'

93479351 -> McfDataTotalsForAllResults

93489352mcfDataTotalsForAllResults pMdtfarAddtional_ =

9349− McfDataTotalsForAllResults

9353+ McfDataTotalsForAllResults'

93509354 { _mdtfarAddtional = _Coerce # pMdtfarAddtional_

93519355 }

93529356

@@ -9362,7 +9366,7 @@ instance FromJSON McfDataTotalsForAllResults where

93629366 parseJSON

93639367 = withObject "McfDataTotalsForAllResults"

93649368 (\ o ->

9365− McfDataTotalsForAllResults <$> (parseJSONObject o))

9369+ McfDataTotalsForAllResults' <$> (parseJSONObject o))

93669370

93679371instance ToJSON McfDataTotalsForAllResults where

93689372 toJSON = toJSON . _mdtfarAddtional

@@ -9370,7 +9374,7 @@ instance ToJSON McfDataTotalsForAllResults where

93709374-- | Download details for a file stored in Google Cloud Storage.

93719375--

93729376-- /See:/ 'unSampledReportCloudStorageDownloadDetails' smart constructor.

9373−data UnSampledReportCloudStorageDownloadDetails = UnSampledReportCloudStorageDownloadDetails

9377+data UnSampledReportCloudStorageDownloadDetails = UnSampledReportCloudStorageDownloadDetails'

93749378 { _usrcsddObjectId :: !(Maybe Text)

93759379 , _usrcsddBucketId :: !(Maybe Text)

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

@@ -9385,7 +9389,7 @@ data UnSampledReportCloudStorageDownloadDetails = UnSampledReportCloudStorageDow

93859389unSampledReportCloudStorageDownloadDetails

93869390 :: UnSampledReportCloudStorageDownloadDetails

93879391unSampledReportCloudStorageDownloadDetails =

9388− UnSampledReportCloudStorageDownloadDetails

9392+ UnSampledReportCloudStorageDownloadDetails'

93899393 { _usrcsddObjectId = Nothing

93909394 , _usrcsddBucketId = Nothing

93919395 }

@@ -9408,12 +9412,13 @@ instance FromJSON

94089412 = withObject

94099413 "UnSampledReportCloudStorageDownloadDetails"

94109414 (\ o ->

9411− UnSampledReportCloudStorageDownloadDetails <$>

9415+ UnSampledReportCloudStorageDownloadDetails' <$>

94129416 (o .:? "objectId") <*> (o .:? "bucketId"))

94139417

94149418instance ToJSON

94159419 UnSampledReportCloudStorageDownloadDetails where

9416− toJSON UnSampledReportCloudStorageDownloadDetails{..}

9420+ toJSON

9421+ UnSampledReportCloudStorageDownloadDetails'{..}

94179422 = object

94189423 (catMaybes

94199424 [("objectId" .=) <$> _usrcsddObjectId,

@@ -9423,7 +9428,7 @@ instance ToJSON

94239428-- view (profile).

94249429--

94259430-- /See:/ 'proFileChildLink' smart constructor.

9426−data ProFileChildLink = ProFileChildLink

9431+data ProFileChildLink = ProFileChildLink'

94279432 { _pfclHref :: !(Maybe Text)

94289433 , _pfclType :: !Text

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

@@ -9438,7 +9443,7 @@ data ProFileChildLink = ProFileChildLink

94389443proFileChildLink

94399444 :: ProFileChildLink

94409445proFileChildLink =

9441− ProFileChildLink

9446+ ProFileChildLink'

94429447 { _pfclHref = Nothing

94439448 , _pfclType = "analytics#goals"

94449449 }

@@ -9455,12 +9460,12 @@ instance FromJSON ProFileChildLink where

94559460 parseJSON

94569461 = withObject "ProFileChildLink"

94579462 (\ o ->

9458− ProFileChildLink <$>

9463+ ProFileChildLink' <$>

94599464 (o .:? "href") <*>

94609465 (o .:? "type" .!= "analytics#goals"))

94619466

94629467instance ToJSON ProFileChildLink where

9463− toJSON ProFileChildLink{..}

9468+ toJSON ProFileChildLink'{..}

94649469 = object

94659470 (catMaybes

94669471 [("href" .=) <$> _pfclHref,

@@ -9468,7 +9473,7 @@ instance ToJSON ProFileChildLink where

94689473

94699474--

94709475-- /See:/ 'gaDataColumnHeadersItem' smart constructor.

9471−data GaDataColumnHeadersItem = GaDataColumnHeadersItem

9476+data GaDataColumnHeadersItem = GaDataColumnHeadersItem'

94729477 { _gdchiColumnType :: !(Maybe Text)

94739478 , _gdchiName :: !(Maybe Text)

94749479 , _gdchiDataType :: !(Maybe Text)

@@ -9486,7 +9491,7 @@ data GaDataColumnHeadersItem = GaDataColumnHeadersItem

94869491gaDataColumnHeadersItem

94879492 :: GaDataColumnHeadersItem

94889493gaDataColumnHeadersItem =

9489− GaDataColumnHeadersItem

9494+ GaDataColumnHeadersItem'

94909495 { _gdchiColumnType = Nothing

94919496 , _gdchiName = Nothing

94929497 , _gdchiDataType = Nothing

@@ -9515,12 +9520,12 @@ instance FromJSON GaDataColumnHeadersItem where

95159520 parseJSON

95169521 = withObject "GaDataColumnHeadersItem"

95179522 (\ o ->

9518− GaDataColumnHeadersItem <$>

9523+ GaDataColumnHeadersItem' <$>

95199524 (o .:? "columnType") <*> (o .:? "name") <*>

95209525 (o .:? "dataType"))

95219526

95229527instance ToJSON GaDataColumnHeadersItem where

9523− toJSON GaDataColumnHeadersItem{..}

9528+ toJSON GaDataColumnHeadersItem'{..}

95249529 = object

95259530 (catMaybes

95269531 [("columnType" .=) <$> _gdchiColumnType,

@@ -9531,7 +9536,7 @@ instance ToJSON GaDataColumnHeadersItem where

95319536-- belongs.

95329537--

95339538-- /See:/ 'goalParentLink' smart constructor.

9534−data GoalParentLink = GoalParentLink

9539+data GoalParentLink = GoalParentLink'

95359540 { _gplHref :: !(Maybe Text)

95369541 , _gplType :: !Text

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

@@ -9546,7 +9551,7 @@ data GoalParentLink = GoalParentLink

95469551goalParentLink

95479552 :: GoalParentLink

95489553goalParentLink =

9549− GoalParentLink

9554+ GoalParentLink'

95509555 { _gplHref = Nothing

95519556 , _gplType = "analytics#profile"

95529557 }

@@ -9563,12 +9568,12 @@ instance FromJSON GoalParentLink where

95639568 parseJSON

95649569 = withObject "GoalParentLink"

95659570 (\ o ->

9566− GoalParentLink <$>

9571+ GoalParentLink' <$>

95679572 (o .:? "href") <*>

95689573 (o .:? "type" .!= "analytics#profile"))

95699574

95709575instance ToJSON GoalParentLink where

9571− toJSON GoalParentLink{..}

9576+ toJSON GoalParentLink'{..}

95729577 = object

95739578 (catMaybes

95749579 [("href" .=) <$> _gplHref,

@@ -9577,7 +9582,7 @@ instance ToJSON GoalParentLink where

95779582-- | Map of attribute name and value for this column.

95789583--

95799584-- /See:/ 'columnAttributes' smart constructor.

9580−newtype ColumnAttributes = ColumnAttributes

9585+newtype ColumnAttributes = ColumnAttributes'

95819586 { _caAddtional :: HashMap Text Text

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

95839588

@@ -9590,7 +9595,7 @@ columnAttributes

95909595 :: HashMap Text Text -- ^ 'caAddtional'

95919596 -> ColumnAttributes

95929597columnAttributes pCaAddtional_ =

9593− ColumnAttributes

9598+ ColumnAttributes'

95949599 { _caAddtional = _Coerce # pCaAddtional_

95959600 }

95969601

@@ -9603,7 +9608,7 @@ caAddtional

96039608instance FromJSON ColumnAttributes where

96049609 parseJSON

96059610 = withObject "ColumnAttributes"

9606− (\ o -> ColumnAttributes <$> (parseJSONObject o))

9611+ (\ o -> ColumnAttributes' <$> (parseJSONObject o))

96079612

96089613instance ToJSON ColumnAttributes where

96099614 toJSON = toJSON . _caAddtional

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Ga/Get.hs+3−3

@@ -77,7 +77,7 @@ type DataGaGetResource =

7777-- | Returns Analytics data for a view (profile).

7878--

7979-- /See:/ 'dataGaGet' smart constructor.

80−data DataGaGet = DataGaGet

80+data DataGaGet = DataGaGet'

8181 { _dggMetrics :: !Text

8282 , _dggSamplingLevel :: !(Maybe DataGaGetSamplingLevel)

8383 , _dggFilters :: !(Maybe Text)

@@ -129,7 +129,7 @@ dataGaGet

129129 -> Text -- ^ 'dggStartDate'

130130 -> DataGaGet

131131dataGaGet pDggMetrics_ pDggIds_ pDggEndDate_ pDggStartDate_ =

132− DataGaGet

132+ DataGaGet'

133133 { _dggMetrics = pDggMetrics_

134134 , _dggSamplingLevel = Nothing

135135 , _dggFilters = Nothing

@@ -231,7 +231,7 @@ instance GoogleRequest DataGaGet where

231231 type Scopes DataGaGet =

232232 '["https://www.googleapis.com/auth/analytics",

233233 "https://www.googleapis.com/auth/analytics.readonly"]

234− requestClient DataGaGet{..}

234+ requestClient DataGaGet'{..}

235235 = go (Just _dggIds) (Just _dggStartDate)

236236 (Just _dggEndDate)

237237 (Just _dggMetrics)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Mcf/Get.hs+3−3

@@ -70,7 +70,7 @@ type DataMcfGetResource =

7070-- | Returns Analytics Multi-Channel Funnels data for a view (profile).

7171--

7272-- /See:/ 'dataMcfGet' smart constructor.

73−data DataMcfGet = DataMcfGet

73+data DataMcfGet = DataMcfGet'

7474 { _dmgMetrics :: !Text

7575 , _dmgSamplingLevel :: !(Maybe DataMcfGetSamplingLevel)

7676 , _dmgFilters :: !(Maybe Text)

@@ -113,7 +113,7 @@ dataMcfGet

113113 -> Text -- ^ 'dmgStartDate'

114114 -> DataMcfGet

115115dataMcfGet pDmgMetrics_ pDmgIds_ pDmgEndDate_ pDmgStartDate_ =

116− DataMcfGet

116+ DataMcfGet'

117117 { _dmgMetrics = pDmgMetrics_

118118 , _dmgSamplingLevel = Nothing

119119 , _dmgFilters = Nothing

@@ -196,7 +196,7 @@ instance GoogleRequest DataMcfGet where

196196 type Scopes DataMcfGet =

197197 '["https://www.googleapis.com/auth/analytics",

198198 "https://www.googleapis.com/auth/analytics.readonly"]

199− requestClient DataMcfGet{..}

199+ requestClient DataMcfGet'{..}

200200 = go (Just _dmgIds) (Just _dmgStartDate)

201201 (Just _dmgEndDate)

202202 (Just _dmgMetrics)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Realtime/Get.hs+3−3

@@ -62,7 +62,7 @@ type DataRealtimeGetResource =

6262-- | Returns real time data for a view (profile).

6363--

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

65−data DataRealtimeGet = DataRealtimeGet

65+data DataRealtimeGet = DataRealtimeGet'

6666 { _drgMetrics :: !Text

6767 , _drgFilters :: !(Maybe Text)

6868 , _drgIds :: !Text

@@ -91,7 +91,7 @@ dataRealtimeGet

9191 -> Text -- ^ 'drgIds'

9292 -> DataRealtimeGet

9393dataRealtimeGet pDrgMetrics_ pDrgIds_ =

94− DataRealtimeGet

94+ DataRealtimeGet'

9595 { _drgMetrics = pDrgMetrics_

9696 , _drgFilters = Nothing

9797 , _drgIds = pDrgIds_

@@ -141,7 +141,7 @@ instance GoogleRequest DataRealtimeGet where

141141 type Scopes DataRealtimeGet =

142142 '["https://www.googleapis.com/auth/analytics",

143143 "https://www.googleapis.com/auth/analytics.readonly"]

144− requestClient DataRealtimeGet{..}

144+ requestClient DataRealtimeGet'{..}

145145 = go (Just _drgIds) (Just _drgMetrics) _drgFilters

146146 _drgSort

147147 _drgDimensions

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountSummaries/List.hs+3−3

@@ -57,7 +57,7 @@ type ManagementAccountSummariesListResource =

5757-- accounts\/properties\/profiles) to which the user has access.

5858--

5959-- /See:/ 'managementAccountSummariesList' smart constructor.

60−data ManagementAccountSummariesList = ManagementAccountSummariesList

60+data ManagementAccountSummariesList = ManagementAccountSummariesList'

6161 { _maslStartIndex :: !(Maybe (Textual Int32))

6262 , _maslMaxResults :: !(Maybe (Textual Int32))

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

@@ -72,7 +72,7 @@ data ManagementAccountSummariesList = ManagementAccountSummariesList

7272managementAccountSummariesList

7373 :: ManagementAccountSummariesList

7474managementAccountSummariesList =

75− ManagementAccountSummariesList

75+ ManagementAccountSummariesList'

7676 { _maslStartIndex = Nothing

7777 , _maslMaxResults = Nothing

7878 }

@@ -100,7 +100,7 @@ instance GoogleRequest ManagementAccountSummariesList

100100 type Scopes ManagementAccountSummariesList =

101101 '["https://www.googleapis.com/auth/analytics.edit",

102102 "https://www.googleapis.com/auth/analytics.readonly"]

103− requestClient ManagementAccountSummariesList{..}

103+ requestClient ManagementAccountSummariesList'{..}

104104 = go _maslStartIndex _maslMaxResults (Just AltJSON)

105105 analyticsService

106106 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Delete.hs+3−3

@@ -55,7 +55,7 @@ type ManagementAccountUserLinksDeleteResource =

5555-- | Removes a user from the given account.

5656--

5757-- /See:/ 'managementAccountUserLinksDelete' smart constructor.

58−data ManagementAccountUserLinksDelete = ManagementAccountUserLinksDelete

58+data ManagementAccountUserLinksDelete = ManagementAccountUserLinksDelete'

5959 { _mauldAccountId :: !Text

6060 , _mauldLinkId :: !Text

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

@@ -72,7 +72,7 @@ managementAccountUserLinksDelete

7272 -> Text -- ^ 'mauldLinkId'

7373 -> ManagementAccountUserLinksDelete

7474managementAccountUserLinksDelete pMauldAccountId_ pMauldLinkId_ =

75− ManagementAccountUserLinksDelete

75+ ManagementAccountUserLinksDelete'

7676 { _mauldAccountId = pMauldAccountId_

7777 , _mauldLinkId = pMauldLinkId_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest

9393 type Rs ManagementAccountUserLinksDelete = ()

9494 type Scopes ManagementAccountUserLinksDelete =

9595 '["https://www.googleapis.com/auth/analytics.manage.users"]

96− requestClient ManagementAccountUserLinksDelete{..}

96+ requestClient ManagementAccountUserLinksDelete'{..}

9797 = go _mauldAccountId _mauldLinkId (Just AltJSON)

9898 analyticsService

9999 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Insert.hs+3−3

@@ -56,7 +56,7 @@ type ManagementAccountUserLinksInsertResource =

5656-- | Adds a new user to the given account.

5757--

5858-- /See:/ 'managementAccountUserLinksInsert' smart constructor.

59−data ManagementAccountUserLinksInsert = ManagementAccountUserLinksInsert

59+data ManagementAccountUserLinksInsert = ManagementAccountUserLinksInsert'

6060 { _mauliPayload :: !EntityUserLink

6161 , _mauliAccountId :: !Text

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

@@ -73,7 +73,7 @@ managementAccountUserLinksInsert

7373 -> Text -- ^ 'mauliAccountId'

7474 -> ManagementAccountUserLinksInsert

7575managementAccountUserLinksInsert pMauliPayload_ pMauliAccountId_ =

76− ManagementAccountUserLinksInsert

76+ ManagementAccountUserLinksInsert'

7777 { _mauliPayload = pMauliPayload_

7878 , _mauliAccountId = pMauliAccountId_

7979 }

@@ -95,7 +95,7 @@ instance GoogleRequest

9595 EntityUserLink

9696 type Scopes ManagementAccountUserLinksInsert =

9797 '["https://www.googleapis.com/auth/analytics.manage.users"]

98− requestClient ManagementAccountUserLinksInsert{..}

98+ requestClient ManagementAccountUserLinksInsert'{..}

9999 = go _mauliAccountId (Just AltJSON) _mauliPayload

100100 analyticsService

101101 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/List.hs+3−3

@@ -58,7 +58,7 @@ type ManagementAccountUserLinksListResource =

5858-- | Lists account-user links for a given account.

5959--

6060-- /See:/ 'managementAccountUserLinksList' smart constructor.

61−data ManagementAccountUserLinksList = ManagementAccountUserLinksList

61+data ManagementAccountUserLinksList = ManagementAccountUserLinksList'

6262 { _maullAccountId :: !Text

6363 , _maullStartIndex :: !(Maybe (Textual Int32))

6464 , _maullMaxResults :: !(Maybe (Textual Int32))

@@ -77,7 +77,7 @@ managementAccountUserLinksList

7777 :: Text -- ^ 'maullAccountId'

7878 -> ManagementAccountUserLinksList

7979managementAccountUserLinksList pMaullAccountId_ =

80− ManagementAccountUserLinksList

80+ ManagementAccountUserLinksList'

8181 { _maullAccountId = pMaullAccountId_

8282 , _maullStartIndex = Nothing

8383 , _maullMaxResults = Nothing

@@ -111,7 +111,7 @@ instance GoogleRequest ManagementAccountUserLinksList

111111 type Scopes ManagementAccountUserLinksList =

112112 '["https://www.googleapis.com/auth/analytics.manage.users",

113113 "https://www.googleapis.com/auth/analytics.manage.users.readonly"]

114− requestClient ManagementAccountUserLinksList{..}

114+ requestClient ManagementAccountUserLinksList'{..}

115115 = go _maullAccountId _maullStartIndex

116116 _maullMaxResults

117117 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/Update.hs+3−3

@@ -58,7 +58,7 @@ type ManagementAccountUserLinksUpdateResource =

5858-- | Updates permissions for an existing user on the given account.

5959--

6060-- /See:/ 'managementAccountUserLinksUpdate' smart constructor.

61−data ManagementAccountUserLinksUpdate = ManagementAccountUserLinksUpdate

61+data ManagementAccountUserLinksUpdate = ManagementAccountUserLinksUpdate'

6262 { _mauluPayload :: !EntityUserLink

6363 , _mauluAccountId :: !Text

6464 , _mauluLinkId :: !Text

@@ -79,7 +79,7 @@ managementAccountUserLinksUpdate

7979 -> Text -- ^ 'mauluLinkId'

8080 -> ManagementAccountUserLinksUpdate

8181managementAccountUserLinksUpdate pMauluPayload_ pMauluAccountId_ pMauluLinkId_ =

82− ManagementAccountUserLinksUpdate

82+ ManagementAccountUserLinksUpdate'

8383 { _mauluPayload = pMauluPayload_

8484 , _mauluAccountId = pMauluAccountId_

8585 , _mauluLinkId = pMauluLinkId_

@@ -107,7 +107,7 @@ instance GoogleRequest

107107 EntityUserLink

108108 type Scopes ManagementAccountUserLinksUpdate =

109109 '["https://www.googleapis.com/auth/analytics.manage.users"]

110− requestClient ManagementAccountUserLinksUpdate{..}

110+ requestClient ManagementAccountUserLinksUpdate'{..}

111111 = go _mauluAccountId _mauluLinkId (Just AltJSON)

112112 _mauluPayload

113113 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Accounts/List.hs+3−3

@@ -54,7 +54,7 @@ type ManagementAccountsListResource =

5454-- | Lists all accounts to which the user has access.

5555--

5656-- /See:/ 'managementAccountsList' smart constructor.

57−data ManagementAccountsList = ManagementAccountsList

57+data ManagementAccountsList = ManagementAccountsList'

5858 { _malStartIndex :: !(Maybe (Textual Int32))

5959 , _malMaxResults :: !(Maybe (Textual Int32))

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

@@ -69,7 +69,7 @@ data ManagementAccountsList = ManagementAccountsList

6969managementAccountsList

7070 :: ManagementAccountsList

7171managementAccountsList =

72− ManagementAccountsList

72+ ManagementAccountsList'

7373 { _malStartIndex = Nothing

7474 , _malMaxResults = Nothing

7575 }

@@ -95,7 +95,7 @@ instance GoogleRequest ManagementAccountsList where

9595 '["https://www.googleapis.com/auth/analytics",

9696 "https://www.googleapis.com/auth/analytics.edit",

9797 "https://www.googleapis.com/auth/analytics.readonly"]

98− requestClient ManagementAccountsList{..}

98+ requestClient ManagementAccountsList'{..}

9999 = go _malStartIndex _malMaxResults (Just AltJSON)

100100 analyticsService

101101 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDataSources/List.hs+3−3

@@ -61,7 +61,7 @@ type ManagementCustomDataSourcesListResource =

6161-- | List custom data sources to which the user has access.

6262--

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

64−data ManagementCustomDataSourcesList = ManagementCustomDataSourcesList

64+data ManagementCustomDataSourcesList = ManagementCustomDataSourcesList'

6565 { _mcdslWebPropertyId :: !Text

6666 , _mcdslAccountId :: !Text

6767 , _mcdslStartIndex :: !(Maybe (Textual Int32))

@@ -84,7 +84,7 @@ managementCustomDataSourcesList

8484 -> Text -- ^ 'mcdslAccountId'

8585 -> ManagementCustomDataSourcesList

8686managementCustomDataSourcesList pMcdslWebPropertyId_ pMcdslAccountId_ =

87− ManagementCustomDataSourcesList

87+ ManagementCustomDataSourcesList'

8888 { _mcdslWebPropertyId = pMcdslWebPropertyId_

8989 , _mcdslAccountId = pMcdslAccountId_

9090 , _mcdslStartIndex = Nothing

@@ -127,7 +127,7 @@ instance GoogleRequest

127127 '["https://www.googleapis.com/auth/analytics",

128128 "https://www.googleapis.com/auth/analytics.edit",

129129 "https://www.googleapis.com/auth/analytics.readonly"]

130− requestClient ManagementCustomDataSourcesList{..}

130+ requestClient ManagementCustomDataSourcesList'{..}

131131 = go _mcdslAccountId _mcdslWebPropertyId

132132 _mcdslStartIndex

133133 _mcdslMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Get.hs+3−3

@@ -59,7 +59,7 @@ type ManagementCustomDimensionsGetResource =

5959-- | Get a custom dimension to which the user has access.

6060--

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

62−data ManagementCustomDimensionsGet = ManagementCustomDimensionsGet

62+data ManagementCustomDimensionsGet = ManagementCustomDimensionsGet'

6363 { _mcdgWebPropertyId :: !Text

6464 , _mcdgAccountId :: !Text

6565 , _mcdgCustomDimensionId :: !Text

@@ -80,7 +80,7 @@ managementCustomDimensionsGet

8080 -> Text -- ^ 'mcdgCustomDimensionId'

8181 -> ManagementCustomDimensionsGet

8282managementCustomDimensionsGet pMcdgWebPropertyId_ pMcdgAccountId_ pMcdgCustomDimensionId_ =

83− ManagementCustomDimensionsGet

83+ ManagementCustomDimensionsGet'

8484 { _mcdgWebPropertyId = pMcdgWebPropertyId_

8585 , _mcdgAccountId = pMcdgAccountId_

8686 , _mcdgCustomDimensionId = pMcdgCustomDimensionId_

@@ -111,7 +111,7 @@ instance GoogleRequest ManagementCustomDimensionsGet

111111 type Scopes ManagementCustomDimensionsGet =

112112 '["https://www.googleapis.com/auth/analytics.edit",

113113 "https://www.googleapis.com/auth/analytics.readonly"]

114− requestClient ManagementCustomDimensionsGet{..}

114+ requestClient ManagementCustomDimensionsGet'{..}

115115 = go _mcdgAccountId _mcdgWebPropertyId

116116 _mcdgCustomDimensionId

117117 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Insert.hs+3−3

@@ -59,7 +59,7 @@ type ManagementCustomDimensionsInsertResource =

5959-- | Create a new custom dimension.

6060--

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

62−data ManagementCustomDimensionsInsert = ManagementCustomDimensionsInsert

62+data ManagementCustomDimensionsInsert = ManagementCustomDimensionsInsert'

6363 { _mcdiWebPropertyId :: !Text

6464 , _mcdiPayload :: !CustomDimension

6565 , _mcdiAccountId :: !Text

@@ -80,7 +80,7 @@ managementCustomDimensionsInsert

8080 -> Text -- ^ 'mcdiAccountId'

8181 -> ManagementCustomDimensionsInsert

8282managementCustomDimensionsInsert pMcdiWebPropertyId_ pMcdiPayload_ pMcdiAccountId_ =

83− ManagementCustomDimensionsInsert

83+ ManagementCustomDimensionsInsert'

8484 { _mcdiWebPropertyId = pMcdiWebPropertyId_

8585 , _mcdiPayload = pMcdiPayload_

8686 , _mcdiAccountId = pMcdiAccountId_

@@ -109,7 +109,7 @@ instance GoogleRequest

109109 CustomDimension

110110 type Scopes ManagementCustomDimensionsInsert =

111111 '["https://www.googleapis.com/auth/analytics.edit"]

112− requestClient ManagementCustomDimensionsInsert{..}

112+ requestClient ManagementCustomDimensionsInsert'{..}

113113 = go _mcdiAccountId _mcdiWebPropertyId (Just AltJSON)

114114 _mcdiPayload

115115 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/List.hs+3−3

@@ -61,7 +61,7 @@ type ManagementCustomDimensionsListResource =

6161-- | Lists custom dimensions to which the user has access.

6262--

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

64−data ManagementCustomDimensionsList = ManagementCustomDimensionsList

64+data ManagementCustomDimensionsList = ManagementCustomDimensionsList'

6565 { _mcdlWebPropertyId :: !Text

6666 , _mcdlAccountId :: !Text

6767 , _mcdlStartIndex :: !(Maybe (Textual Int32))

@@ -84,7 +84,7 @@ managementCustomDimensionsList

8484 -> Text -- ^ 'mcdlAccountId'

8585 -> ManagementCustomDimensionsList

8686managementCustomDimensionsList pMcdlWebPropertyId_ pMcdlAccountId_ =

87− ManagementCustomDimensionsList

87+ ManagementCustomDimensionsList'

8888 { _mcdlWebPropertyId = pMcdlWebPropertyId_

8989 , _mcdlAccountId = pMcdlAccountId_

9090 , _mcdlStartIndex = Nothing

@@ -125,7 +125,7 @@ instance GoogleRequest ManagementCustomDimensionsList

125125 type Scopes ManagementCustomDimensionsList =

126126 '["https://www.googleapis.com/auth/analytics",

127127 "https://www.googleapis.com/auth/analytics.readonly"]

128− requestClient ManagementCustomDimensionsList{..}

128+ requestClient ManagementCustomDimensionsList'{..}

129129 = go _mcdlAccountId _mcdlWebPropertyId

130130 _mcdlStartIndex

131131 _mcdlMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Patch.hs+3−3

@@ -65,7 +65,7 @@ type ManagementCustomDimensionsPatchResource =

6565-- semantics.

6666--

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

68−data ManagementCustomDimensionsPatch = ManagementCustomDimensionsPatch

68+data ManagementCustomDimensionsPatch = ManagementCustomDimensionsPatch'

6969 { _mcdpWebPropertyId :: !Text

7070 , _mcdpIgnoreCustomDataSourceLinks :: !Bool

7171 , _mcdpPayload :: !CustomDimension

@@ -93,7 +93,7 @@ managementCustomDimensionsPatch

9393 -> Text -- ^ 'mcdpCustomDimensionId'

9494 -> ManagementCustomDimensionsPatch

9595managementCustomDimensionsPatch pMcdpWebPropertyId_ pMcdpPayload_ pMcdpAccountId_ pMcdpCustomDimensionId_ =

96− ManagementCustomDimensionsPatch

96+ ManagementCustomDimensionsPatch'

9797 { _mcdpWebPropertyId = pMcdpWebPropertyId_

9898 , _mcdpIgnoreCustomDataSourceLinks = False

9999 , _mcdpPayload = pMcdpPayload_

@@ -137,7 +137,7 @@ instance GoogleRequest

137137 CustomDimension

138138 type Scopes ManagementCustomDimensionsPatch =

139139 '["https://www.googleapis.com/auth/analytics.edit"]

140− requestClient ManagementCustomDimensionsPatch{..}

140+ requestClient ManagementCustomDimensionsPatch'{..}

141141 = go _mcdpAccountId _mcdpWebPropertyId

142142 _mcdpCustomDimensionId

143143 (Just _mcdpIgnoreCustomDataSourceLinks)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/Update.hs+3−3

@@ -63,7 +63,7 @@ type ManagementCustomDimensionsUpdateResource =

6363-- | Updates an existing custom dimension.

6464--

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

66−data ManagementCustomDimensionsUpdate = ManagementCustomDimensionsUpdate

66+data ManagementCustomDimensionsUpdate = ManagementCustomDimensionsUpdate'

6767 { _mcduWebPropertyId :: !Text

6868 , _mcduIgnoreCustomDataSourceLinks :: !Bool

6969 , _mcduPayload :: !CustomDimension

@@ -91,7 +91,7 @@ managementCustomDimensionsUpdate

9191 -> Text -- ^ 'mcduCustomDimensionId'

9292 -> ManagementCustomDimensionsUpdate

9393managementCustomDimensionsUpdate pMcduWebPropertyId_ pMcduPayload_ pMcduAccountId_ pMcduCustomDimensionId_ =

94− ManagementCustomDimensionsUpdate

94+ ManagementCustomDimensionsUpdate'

9595 { _mcduWebPropertyId = pMcduWebPropertyId_

9696 , _mcduIgnoreCustomDataSourceLinks = False

9797 , _mcduPayload = pMcduPayload_

@@ -135,7 +135,7 @@ instance GoogleRequest

135135 CustomDimension

136136 type Scopes ManagementCustomDimensionsUpdate =

137137 '["https://www.googleapis.com/auth/analytics.edit"]

138− requestClient ManagementCustomDimensionsUpdate{..}

138+ requestClient ManagementCustomDimensionsUpdate'{..}

139139 = go _mcduAccountId _mcduWebPropertyId

140140 _mcduCustomDimensionId

141141 (Just _mcduIgnoreCustomDataSourceLinks)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Get.hs+3−3

@@ -58,7 +58,7 @@ type ManagementCustomMetricsGetResource =

5858-- | Get a custom metric to which the user has access.

5959--

6060-- /See:/ 'managementCustomMetricsGet' smart constructor.

61−data ManagementCustomMetricsGet = ManagementCustomMetricsGet

61+data ManagementCustomMetricsGet = ManagementCustomMetricsGet'

6262 { _mcmgCustomMetricId :: !Text

6363 , _mcmgWebPropertyId :: !Text

6464 , _mcmgAccountId :: !Text

@@ -79,7 +79,7 @@ managementCustomMetricsGet

7979 -> Text -- ^ 'mcmgAccountId'

8080 -> ManagementCustomMetricsGet

8181managementCustomMetricsGet pMcmgCustomMetricId_ pMcmgWebPropertyId_ pMcmgAccountId_ =

82− ManagementCustomMetricsGet

82+ ManagementCustomMetricsGet'

8383 { _mcmgCustomMetricId = pMcmgCustomMetricId_

8484 , _mcmgWebPropertyId = pMcmgWebPropertyId_

8585 , _mcmgAccountId = pMcmgAccountId_

@@ -109,7 +109,7 @@ instance GoogleRequest ManagementCustomMetricsGet

109109 type Scopes ManagementCustomMetricsGet =

110110 '["https://www.googleapis.com/auth/analytics.edit",

111111 "https://www.googleapis.com/auth/analytics.readonly"]

112− requestClient ManagementCustomMetricsGet{..}

112+ requestClient ManagementCustomMetricsGet'{..}

113113 = go _mcmgAccountId _mcmgWebPropertyId

114114 _mcmgCustomMetricId

115115 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Insert.hs+3−3

@@ -59,7 +59,7 @@ type ManagementCustomMetricsInsertResource =

5959-- | Create a new custom metric.

6060--

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

62−data ManagementCustomMetricsInsert = ManagementCustomMetricsInsert

62+data ManagementCustomMetricsInsert = ManagementCustomMetricsInsert'

6363 { _mcmiWebPropertyId :: !Text

6464 , _mcmiPayload :: !CustomMetric

6565 , _mcmiAccountId :: !Text

@@ -80,7 +80,7 @@ managementCustomMetricsInsert

8080 -> Text -- ^ 'mcmiAccountId'

8181 -> ManagementCustomMetricsInsert

8282managementCustomMetricsInsert pMcmiWebPropertyId_ pMcmiPayload_ pMcmiAccountId_ =

83− ManagementCustomMetricsInsert

83+ ManagementCustomMetricsInsert'

8484 { _mcmiWebPropertyId = pMcmiWebPropertyId_

8585 , _mcmiPayload = pMcmiPayload_

8686 , _mcmiAccountId = pMcmiAccountId_

@@ -108,7 +108,7 @@ instance GoogleRequest ManagementCustomMetricsInsert

108108 type Rs ManagementCustomMetricsInsert = CustomMetric

109109 type Scopes ManagementCustomMetricsInsert =

110110 '["https://www.googleapis.com/auth/analytics.edit"]

111− requestClient ManagementCustomMetricsInsert{..}

111+ requestClient ManagementCustomMetricsInsert'{..}

112112 = go _mcmiAccountId _mcmiWebPropertyId (Just AltJSON)

113113 _mcmiPayload

114114 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/List.hs+3−3

@@ -60,7 +60,7 @@ type ManagementCustomMetricsListResource =

6060-- | Lists custom metrics to which the user has access.

6161--

6262-- /See:/ 'managementCustomMetricsList' smart constructor.

63−data ManagementCustomMetricsList = ManagementCustomMetricsList

63+data ManagementCustomMetricsList = ManagementCustomMetricsList'

6464 { _mcmlWebPropertyId :: !Text

6565 , _mcmlAccountId :: !Text

6666 , _mcmlStartIndex :: !(Maybe (Textual Int32))

@@ -83,7 +83,7 @@ managementCustomMetricsList

8383 -> Text -- ^ 'mcmlAccountId'

8484 -> ManagementCustomMetricsList

8585managementCustomMetricsList pMcmlWebPropertyId_ pMcmlAccountId_ =

86− ManagementCustomMetricsList

86+ ManagementCustomMetricsList'

8787 { _mcmlWebPropertyId = pMcmlWebPropertyId_

8888 , _mcmlAccountId = pMcmlAccountId_

8989 , _mcmlStartIndex = Nothing

@@ -123,7 +123,7 @@ instance GoogleRequest ManagementCustomMetricsList

123123 type Scopes ManagementCustomMetricsList =

124124 '["https://www.googleapis.com/auth/analytics",

125125 "https://www.googleapis.com/auth/analytics.readonly"]

126− requestClient ManagementCustomMetricsList{..}

126+ requestClient ManagementCustomMetricsList'{..}

127127 = go _mcmlAccountId _mcmlWebPropertyId

128128 _mcmlStartIndex

129129 _mcmlMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Patch.hs+3−3

@@ -63,7 +63,7 @@ type ManagementCustomMetricsPatchResource =

6363-- | Updates an existing custom metric. This method supports patch semantics.

6464--

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

66−data ManagementCustomMetricsPatch = ManagementCustomMetricsPatch

66+data ManagementCustomMetricsPatch = ManagementCustomMetricsPatch'

6767 { _mcmpCustomMetricId :: !Text

6868 , _mcmpWebPropertyId :: !Text

6969 , _mcmpIgnoreCustomDataSourceLinks :: !Bool

@@ -91,7 +91,7 @@ managementCustomMetricsPatch

9191 -> Text -- ^ 'mcmpAccountId'

9292 -> ManagementCustomMetricsPatch

9393managementCustomMetricsPatch pMcmpCustomMetricId_ pMcmpWebPropertyId_ pMcmpPayload_ pMcmpAccountId_ =

94− ManagementCustomMetricsPatch

94+ ManagementCustomMetricsPatch'

9595 { _mcmpCustomMetricId = pMcmpCustomMetricId_

9696 , _mcmpWebPropertyId = pMcmpWebPropertyId_

9797 , _mcmpIgnoreCustomDataSourceLinks = False

@@ -134,7 +134,7 @@ instance GoogleRequest ManagementCustomMetricsPatch

134134 type Rs ManagementCustomMetricsPatch = CustomMetric

135135 type Scopes ManagementCustomMetricsPatch =

136136 '["https://www.googleapis.com/auth/analytics.edit"]

137− requestClient ManagementCustomMetricsPatch{..}

137+ requestClient ManagementCustomMetricsPatch'{..}

138138 = go _mcmpAccountId _mcmpWebPropertyId

139139 _mcmpCustomMetricId

140140 (Just _mcmpIgnoreCustomDataSourceLinks)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/Update.hs+3−3

@@ -63,7 +63,7 @@ type ManagementCustomMetricsUpdateResource =

6363-- | Updates an existing custom metric.

6464--

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

66−data ManagementCustomMetricsUpdate = ManagementCustomMetricsUpdate

66+data ManagementCustomMetricsUpdate = ManagementCustomMetricsUpdate'

6767 { _mcmuCustomMetricId :: !Text

6868 , _mcmuWebPropertyId :: !Text

6969 , _mcmuIgnoreCustomDataSourceLinks :: !Bool

@@ -91,7 +91,7 @@ managementCustomMetricsUpdate

9191 -> Text -- ^ 'mcmuAccountId'

9292 -> ManagementCustomMetricsUpdate

9393managementCustomMetricsUpdate pMcmuCustomMetricId_ pMcmuWebPropertyId_ pMcmuPayload_ pMcmuAccountId_ =

94− ManagementCustomMetricsUpdate

94+ ManagementCustomMetricsUpdate'

9595 { _mcmuCustomMetricId = pMcmuCustomMetricId_

9696 , _mcmuWebPropertyId = pMcmuWebPropertyId_

9797 , _mcmuIgnoreCustomDataSourceLinks = False

@@ -134,7 +134,7 @@ instance GoogleRequest ManagementCustomMetricsUpdate

134134 type Rs ManagementCustomMetricsUpdate = CustomMetric

135135 type Scopes ManagementCustomMetricsUpdate =

136136 '["https://www.googleapis.com/auth/analytics.edit"]

137− requestClient ManagementCustomMetricsUpdate{..}

137+ requestClient ManagementCustomMetricsUpdate'{..}

138138 = go _mcmuAccountId _mcmuWebPropertyId

139139 _mcmuCustomMetricId

140140 (Just _mcmuIgnoreCustomDataSourceLinks)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Delete.hs+3−3

@@ -61,7 +61,7 @@ type ManagementExperimentsDeleteResource =

6161-- | Delete an experiment.

6262--

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

64−data ManagementExperimentsDelete = ManagementExperimentsDelete

64+data ManagementExperimentsDelete = ManagementExperimentsDelete'

6565 { _medWebPropertyId :: !Text

6666 , _medProFileId :: !Text

6767 , _medAccountId :: !Text

@@ -86,7 +86,7 @@ managementExperimentsDelete

8686 -> Text -- ^ 'medExperimentId'

8787 -> ManagementExperimentsDelete

8888managementExperimentsDelete pMedWebPropertyId_ pMedProFileId_ pMedAccountId_ pMedExperimentId_ =

89− ManagementExperimentsDelete

89+ ManagementExperimentsDelete'

9090 { _medWebPropertyId = pMedWebPropertyId_

9191 , _medProFileId = pMedProFileId_

9292 , _medAccountId = pMedAccountId_

@@ -121,7 +121,7 @@ instance GoogleRequest ManagementExperimentsDelete

121121 type Scopes ManagementExperimentsDelete =

122122 '["https://www.googleapis.com/auth/analytics",

123123 "https://www.googleapis.com/auth/analytics.edit"]

124− requestClient ManagementExperimentsDelete{..}

124+ requestClient ManagementExperimentsDelete'{..}

125125 = go _medAccountId _medWebPropertyId _medProFileId

126126 _medExperimentId

127127 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Get.hs+3−3

@@ -61,7 +61,7 @@ type ManagementExperimentsGetResource =

6161-- | Returns an experiment to which the user has access.

6262--

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

64−data ManagementExperimentsGet = ManagementExperimentsGet

64+data ManagementExperimentsGet = ManagementExperimentsGet'

6565 { _megWebPropertyId :: !Text

6666 , _megProFileId :: !Text

6767 , _megAccountId :: !Text

@@ -86,7 +86,7 @@ managementExperimentsGet

8686 -> Text -- ^ 'megExperimentId'

8787 -> ManagementExperimentsGet

8888managementExperimentsGet pMegWebPropertyId_ pMegProFileId_ pMegAccountId_ pMegExperimentId_ =

89− ManagementExperimentsGet

89+ ManagementExperimentsGet'

9090 { _megWebPropertyId = pMegWebPropertyId_

9191 , _megProFileId = pMegProFileId_

9292 , _megAccountId = pMegAccountId_

@@ -121,7 +121,7 @@ instance GoogleRequest ManagementExperimentsGet where

121121 '["https://www.googleapis.com/auth/analytics",

122122 "https://www.googleapis.com/auth/analytics.edit",

123123 "https://www.googleapis.com/auth/analytics.readonly"]

124− requestClient ManagementExperimentsGet{..}

124+ requestClient ManagementExperimentsGet'{..}

125125 = go _megAccountId _megWebPropertyId _megProFileId

126126 _megExperimentId

127127 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Insert.hs+3−3

@@ -61,7 +61,7 @@ type ManagementExperimentsInsertResource =

6161-- | Create a new experiment.

6262--

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

64−data ManagementExperimentsInsert = ManagementExperimentsInsert

64+data ManagementExperimentsInsert = ManagementExperimentsInsert'

6565 { _meiWebPropertyId :: !Text

6666 , _meiProFileId :: !Text

6767 , _meiPayload :: !Experiment

@@ -86,7 +86,7 @@ managementExperimentsInsert

8686 -> Text -- ^ 'meiAccountId'

8787 -> ManagementExperimentsInsert

8888managementExperimentsInsert pMeiWebPropertyId_ pMeiProFileId_ pMeiPayload_ pMeiAccountId_ =

89− ManagementExperimentsInsert

89+ ManagementExperimentsInsert'

9090 { _meiWebPropertyId = pMeiWebPropertyId_

9191 , _meiProFileId = pMeiProFileId_

9292 , _meiPayload = pMeiPayload_

@@ -120,7 +120,7 @@ instance GoogleRequest ManagementExperimentsInsert

120120 type Scopes ManagementExperimentsInsert =

121121 '["https://www.googleapis.com/auth/analytics",

122122 "https://www.googleapis.com/auth/analytics.edit"]

123− requestClient ManagementExperimentsInsert{..}

123+ requestClient ManagementExperimentsInsert'{..}

124124 = go _meiAccountId _meiWebPropertyId _meiProFileId

125125 (Just AltJSON)

126126 _meiPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/List.hs+3−3

@@ -63,7 +63,7 @@ type ManagementExperimentsListResource =

6363-- | Lists experiments to which the user has access.

6464--

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

66−data ManagementExperimentsList = ManagementExperimentsList

66+data ManagementExperimentsList = ManagementExperimentsList'

6767 { _melWebPropertyId :: !Text

6868 , _melProFileId :: !Text

6969 , _melAccountId :: !Text

@@ -90,7 +90,7 @@ managementExperimentsList

9090 -> Text -- ^ 'melAccountId'

9191 -> ManagementExperimentsList

9292managementExperimentsList pMelWebPropertyId_ pMelProFileId_ pMelAccountId_ =

93− ManagementExperimentsList

93+ ManagementExperimentsList'

9494 { _melWebPropertyId = pMelWebPropertyId_

9595 , _melProFileId = pMelProFileId_

9696 , _melAccountId = pMelAccountId_

@@ -136,7 +136,7 @@ instance GoogleRequest ManagementExperimentsList

136136 '["https://www.googleapis.com/auth/analytics",

137137 "https://www.googleapis.com/auth/analytics.edit",

138138 "https://www.googleapis.com/auth/analytics.readonly"]

139− requestClient ManagementExperimentsList{..}

139+ requestClient ManagementExperimentsList'{..}

140140 = go _melAccountId _melWebPropertyId _melProFileId

141141 _melStartIndex

142142 _melMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Patch.hs+3−3

@@ -64,7 +64,7 @@ type ManagementExperimentsPatchResource =

6464-- | Update an existing experiment. This method supports patch semantics.

6565--

6666-- /See:/ 'managementExperimentsPatch' smart constructor.

67−data ManagementExperimentsPatch = ManagementExperimentsPatch

67+data ManagementExperimentsPatch = ManagementExperimentsPatch'

6868 { _mepWebPropertyId :: !Text

6969 , _mepProFileId :: !Text

7070 , _mepPayload :: !Experiment

@@ -93,7 +93,7 @@ managementExperimentsPatch

9393 -> Text -- ^ 'mepExperimentId'

9494 -> ManagementExperimentsPatch

9595managementExperimentsPatch pMepWebPropertyId_ pMepProFileId_ pMepPayload_ pMepAccountId_ pMepExperimentId_ =

96− ManagementExperimentsPatch

96+ ManagementExperimentsPatch'

9797 { _mepWebPropertyId = pMepWebPropertyId_

9898 , _mepProFileId = pMepProFileId_

9999 , _mepPayload = pMepPayload_

@@ -134,7 +134,7 @@ instance GoogleRequest ManagementExperimentsPatch

134134 type Scopes ManagementExperimentsPatch =

135135 '["https://www.googleapis.com/auth/analytics",

136136 "https://www.googleapis.com/auth/analytics.edit"]

137− requestClient ManagementExperimentsPatch{..}

137+ requestClient ManagementExperimentsPatch'{..}

138138 = go _mepAccountId _mepWebPropertyId _mepProFileId

139139 _mepExperimentId

140140 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/Update.hs+3−3

@@ -64,7 +64,7 @@ type ManagementExperimentsUpdateResource =

6464-- | Update an existing experiment.

6565--

6666-- /See:/ 'managementExperimentsUpdate' smart constructor.

67−data ManagementExperimentsUpdate = ManagementExperimentsUpdate

67+data ManagementExperimentsUpdate = ManagementExperimentsUpdate'

6868 { _meuWebPropertyId :: !Text

6969 , _meuProFileId :: !Text

7070 , _meuPayload :: !Experiment

@@ -93,7 +93,7 @@ managementExperimentsUpdate

9393 -> Text -- ^ 'meuExperimentId'

9494 -> ManagementExperimentsUpdate

9595managementExperimentsUpdate pMeuWebPropertyId_ pMeuProFileId_ pMeuPayload_ pMeuAccountId_ pMeuExperimentId_ =

96− ManagementExperimentsUpdate

96+ ManagementExperimentsUpdate'

9797 { _meuWebPropertyId = pMeuWebPropertyId_

9898 , _meuProFileId = pMeuProFileId_

9999 , _meuPayload = pMeuPayload_

@@ -134,7 +134,7 @@ instance GoogleRequest ManagementExperimentsUpdate

134134 type Scopes ManagementExperimentsUpdate =

135135 '["https://www.googleapis.com/auth/analytics",

136136 "https://www.googleapis.com/auth/analytics.edit"]

137− requestClient ManagementExperimentsUpdate{..}

137+ requestClient ManagementExperimentsUpdate'{..}

138138 = go _meuAccountId _meuWebPropertyId _meuProFileId

139139 _meuExperimentId

140140 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Delete.hs+3−3

@@ -55,7 +55,7 @@ type ManagementFiltersDeleteResource =

5555-- | Delete a filter.

5656--

5757-- /See:/ 'managementFiltersDelete' smart constructor.

58−data ManagementFiltersDelete = ManagementFiltersDelete

58+data ManagementFiltersDelete = ManagementFiltersDelete'

5959 { _mfdFilterId :: !Text

6060 , _mfdAccountId :: !Text

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

@@ -72,7 +72,7 @@ managementFiltersDelete

7272 -> Text -- ^ 'mfdAccountId'

7373 -> ManagementFiltersDelete

7474managementFiltersDelete pMfdFilterId_ pMfdAccountId_ =

75− ManagementFiltersDelete

75+ ManagementFiltersDelete'

7676 { _mfdFilterId = pMfdFilterId_

7777 , _mfdAccountId = pMfdAccountId_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest ManagementFiltersDelete where

9191 type Rs ManagementFiltersDelete = Filter

9292 type Scopes ManagementFiltersDelete =

9393 '["https://www.googleapis.com/auth/analytics.edit"]

94− requestClient ManagementFiltersDelete{..}

94+ requestClient ManagementFiltersDelete'{..}

9595 = go _mfdAccountId _mfdFilterId (Just AltJSON)

9696 analyticsService

9797 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Get.hs+3−3

@@ -55,7 +55,7 @@ type ManagementFiltersGetResource =

5555-- | Returns a filters to which the user has access.

5656--

5757-- /See:/ 'managementFiltersGet' smart constructor.

58−data ManagementFiltersGet = ManagementFiltersGet

58+data ManagementFiltersGet = ManagementFiltersGet'

5959 { _mfgFilterId :: !Text

6060 , _mfgAccountId :: !Text

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

@@ -72,7 +72,7 @@ managementFiltersGet

7272 -> Text -- ^ 'mfgAccountId'

7373 -> ManagementFiltersGet

7474managementFiltersGet pMfgFilterId_ pMfgAccountId_ =

75− ManagementFiltersGet

75+ ManagementFiltersGet'

7676 { _mfgFilterId = pMfgFilterId_

7777 , _mfgAccountId = pMfgAccountId_

7878 }

@@ -92,7 +92,7 @@ instance GoogleRequest ManagementFiltersGet where

9292 type Scopes ManagementFiltersGet =

9393 '["https://www.googleapis.com/auth/analytics.edit",

9494 "https://www.googleapis.com/auth/analytics.readonly"]

95− requestClient ManagementFiltersGet{..}

95+ requestClient ManagementFiltersGet'{..}

9696 = go _mfgAccountId _mfgFilterId (Just AltJSON)

9797 analyticsService

9898 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Insert.hs+3−3

@@ -55,7 +55,7 @@ type ManagementFiltersInsertResource =

5555-- | Create a new filter.

5656--

5757-- /See:/ 'managementFiltersInsert' smart constructor.

58−data ManagementFiltersInsert = ManagementFiltersInsert

58+data ManagementFiltersInsert = ManagementFiltersInsert'

5959 { _mfiPayload :: !Filter

6060 , _mfiAccountId :: !Text

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

@@ -72,7 +72,7 @@ managementFiltersInsert

7272 -> Text -- ^ 'mfiAccountId'

7373 -> ManagementFiltersInsert

7474managementFiltersInsert pMfiPayload_ pMfiAccountId_ =

75− ManagementFiltersInsert

75+ ManagementFiltersInsert'

7676 { _mfiPayload = pMfiPayload_

7777 , _mfiAccountId = pMfiAccountId_

7878 }

@@ -91,7 +91,7 @@ instance GoogleRequest ManagementFiltersInsert where

9191 type Rs ManagementFiltersInsert = Filter

9292 type Scopes ManagementFiltersInsert =

9393 '["https://www.googleapis.com/auth/analytics.edit"]

94− requestClient ManagementFiltersInsert{..}

94+ requestClient ManagementFiltersInsert'{..}

9595 = go _mfiAccountId (Just AltJSON) _mfiPayload

9696 analyticsService

9797 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/List.hs+3−3

@@ -57,7 +57,7 @@ type ManagementFiltersListResource =

5757-- | Lists all filters for an account

5858--

5959-- /See:/ 'managementFiltersList' smart constructor.

60−data ManagementFiltersList = ManagementFiltersList

60+data ManagementFiltersList = ManagementFiltersList'

6161 { _mflAccountId :: !Text

6262 , _mflStartIndex :: !(Maybe (Textual Int32))

6363 , _mflMaxResults :: !(Maybe (Textual Int32))

@@ -76,7 +76,7 @@ managementFiltersList

7676 :: Text -- ^ 'mflAccountId'

7777 -> ManagementFiltersList

7878managementFiltersList pMflAccountId_ =

79− ManagementFiltersList

79+ ManagementFiltersList'

8080 { _mflAccountId = pMflAccountId_

8181 , _mflStartIndex = Nothing

8282 , _mflMaxResults = Nothing

@@ -107,7 +107,7 @@ instance GoogleRequest ManagementFiltersList where

107107 type Scopes ManagementFiltersList =

108108 '["https://www.googleapis.com/auth/analytics.edit",

109109 "https://www.googleapis.com/auth/analytics.readonly"]

110− requestClient ManagementFiltersList{..}

110+ requestClient ManagementFiltersList'{..}

111111 = go _mflAccountId _mflStartIndex _mflMaxResults

112112 (Just AltJSON)

113113 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Patch.hs+3−3

@@ -57,7 +57,7 @@ type ManagementFiltersPatchResource =

5757-- | Updates an existing filter. This method supports patch semantics.

5858--

5959-- /See:/ 'managementFiltersPatch' smart constructor.

60−data ManagementFiltersPatch = ManagementFiltersPatch

60+data ManagementFiltersPatch = ManagementFiltersPatch'

6161 { _mfpFilterId :: !Text

6262 , _mfpPayload :: !Filter

6363 , _mfpAccountId :: !Text

@@ -78,7 +78,7 @@ managementFiltersPatch

7878 -> Text -- ^ 'mfpAccountId'

7979 -> ManagementFiltersPatch

8080managementFiltersPatch pMfpFilterId_ pMfpPayload_ pMfpAccountId_ =

81− ManagementFiltersPatch

81+ ManagementFiltersPatch'

8282 { _mfpFilterId = pMfpFilterId_

8383 , _mfpPayload = pMfpPayload_

8484 , _mfpAccountId = pMfpAccountId_

@@ -103,7 +103,7 @@ instance GoogleRequest ManagementFiltersPatch where

103103 type Rs ManagementFiltersPatch = Filter

104104 type Scopes ManagementFiltersPatch =

105105 '["https://www.googleapis.com/auth/analytics.edit"]

106− requestClient ManagementFiltersPatch{..}

106+ requestClient ManagementFiltersPatch'{..}

107107 = go _mfpAccountId _mfpFilterId (Just AltJSON)

108108 _mfpPayload

109109 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/Update.hs+3−3

@@ -57,7 +57,7 @@ type ManagementFiltersUpdateResource =

5757-- | Updates an existing filter.

5858--

5959-- /See:/ 'managementFiltersUpdate' smart constructor.

60−data ManagementFiltersUpdate = ManagementFiltersUpdate

60+data ManagementFiltersUpdate = ManagementFiltersUpdate'

6161 { _mfuFilterId :: !Text

6262 , _mfuPayload :: !Filter

6363 , _mfuAccountId :: !Text

@@ -78,7 +78,7 @@ managementFiltersUpdate

7878 -> Text -- ^ 'mfuAccountId'

7979 -> ManagementFiltersUpdate

8080managementFiltersUpdate pMfuFilterId_ pMfuPayload_ pMfuAccountId_ =

81− ManagementFiltersUpdate

81+ ManagementFiltersUpdate'

8282 { _mfuFilterId = pMfuFilterId_

8383 , _mfuPayload = pMfuPayload_

8484 , _mfuAccountId = pMfuAccountId_

@@ -103,7 +103,7 @@ instance GoogleRequest ManagementFiltersUpdate where

103103 type Rs ManagementFiltersUpdate = Filter

104104 type Scopes ManagementFiltersUpdate =

105105 '["https://www.googleapis.com/auth/analytics.edit"]

106− requestClient ManagementFiltersUpdate{..}

106+ requestClient ManagementFiltersUpdate'{..}

107107 = go _mfuAccountId _mfuFilterId (Just AltJSON)

108108 _mfuPayload

109109 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Get.hs+3−3

@@ -61,7 +61,7 @@ type ManagementGoalsGetResource =

6161-- | Gets a goal to which the user has access.

6262--

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

64−data ManagementGoalsGet = ManagementGoalsGet

64+data ManagementGoalsGet = ManagementGoalsGet'

6565 { _mggWebPropertyId :: !Text

6666 , _mggGoalId :: !Text

6767 , _mggProFileId :: !Text

@@ -86,7 +86,7 @@ managementGoalsGet

8686 -> Text -- ^ 'mggAccountId'

8787 -> ManagementGoalsGet

8888managementGoalsGet pMggWebPropertyId_ pMggGoalId_ pMggProFileId_ pMggAccountId_ =

89− ManagementGoalsGet

89+ ManagementGoalsGet'

9090 { _mggWebPropertyId = pMggWebPropertyId_

9191 , _mggGoalId = pMggGoalId_

9292 , _mggProFileId = pMggProFileId_

@@ -119,7 +119,7 @@ instance GoogleRequest ManagementGoalsGet where

119119 type Scopes ManagementGoalsGet =

120120 '["https://www.googleapis.com/auth/analytics.edit",

121121 "https://www.googleapis.com/auth/analytics.readonly"]

122− requestClient ManagementGoalsGet{..}

122+ requestClient ManagementGoalsGet'{..}

123123 = go _mggAccountId _mggWebPropertyId _mggProFileId

124124 _mggGoalId

125125 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Insert.hs+3−3

@@ -61,7 +61,7 @@ type ManagementGoalsInsertResource =

6161-- | Create a new goal.

6262--

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

64−data ManagementGoalsInsert = ManagementGoalsInsert

64+data ManagementGoalsInsert = ManagementGoalsInsert'

6565 { _mgiWebPropertyId :: !Text

6666 , _mgiProFileId :: !Text

6767 , _mgiPayload :: !Goal

@@ -86,7 +86,7 @@ managementGoalsInsert

8686 -> Text -- ^ 'mgiAccountId'

8787 -> ManagementGoalsInsert

8888managementGoalsInsert pMgiWebPropertyId_ pMgiProFileId_ pMgiPayload_ pMgiAccountId_ =

89− ManagementGoalsInsert

89+ ManagementGoalsInsert'

9090 { _mgiWebPropertyId = pMgiWebPropertyId_

9191 , _mgiProFileId = pMgiProFileId_

9292 , _mgiPayload = pMgiPayload_

@@ -118,7 +118,7 @@ instance GoogleRequest ManagementGoalsInsert where

118118 type Rs ManagementGoalsInsert = Goal

119119 type Scopes ManagementGoalsInsert =

120120 '["https://www.googleapis.com/auth/analytics.edit"]

121− requestClient ManagementGoalsInsert{..}

121+ requestClient ManagementGoalsInsert'{..}

122122 = go _mgiAccountId _mgiWebPropertyId _mgiProFileId

123123 (Just AltJSON)

124124 _mgiPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/List.hs+3−3

@@ -63,7 +63,7 @@ type ManagementGoalsListResource =

6363-- | Lists goals to which the user has access.

6464--

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

66−data ManagementGoalsList = ManagementGoalsList

66+data ManagementGoalsList = ManagementGoalsList'

6767 { _mglWebPropertyId :: !Text

6868 , _mglProFileId :: !Text

6969 , _mglAccountId :: !Text

@@ -90,7 +90,7 @@ managementGoalsList

9090 -> Text -- ^ 'mglAccountId'

9191 -> ManagementGoalsList

9292managementGoalsList pMglWebPropertyId_ pMglProFileId_ pMglAccountId_ =

93− ManagementGoalsList

93+ ManagementGoalsList'

9494 { _mglWebPropertyId = pMglWebPropertyId_

9595 , _mglProFileId = pMglProFileId_

9696 , _mglAccountId = pMglAccountId_

@@ -140,7 +140,7 @@ instance GoogleRequest ManagementGoalsList where

140140 '["https://www.googleapis.com/auth/analytics",

141141 "https://www.googleapis.com/auth/analytics.edit",

142142 "https://www.googleapis.com/auth/analytics.readonly"]

143− requestClient ManagementGoalsList{..}

143+ requestClient ManagementGoalsList'{..}

144144 = go _mglAccountId _mglWebPropertyId _mglProFileId

145145 _mglStartIndex

146146 _mglMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Patch.hs+3−3

@@ -63,7 +63,7 @@ type ManagementGoalsPatchResource =

6363-- | Updates an existing goal. This method supports patch semantics.

6464--

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

66−data ManagementGoalsPatch = ManagementGoalsPatch

66+data ManagementGoalsPatch = ManagementGoalsPatch'

6767 { _mgpWebPropertyId :: !Text

6868 , _mgpGoalId :: !Text

6969 , _mgpProFileId :: !Text

@@ -92,7 +92,7 @@ managementGoalsPatch

9292 -> Text -- ^ 'mgpAccountId'

9393 -> ManagementGoalsPatch

9494managementGoalsPatch pMgpWebPropertyId_ pMgpGoalId_ pMgpProFileId_ pMgpPayload_ pMgpAccountId_ =

95− ManagementGoalsPatch

95+ ManagementGoalsPatch'

9696 { _mgpWebPropertyId = pMgpWebPropertyId_

9797 , _mgpGoalId = pMgpGoalId_

9898 , _mgpProFileId = pMgpProFileId_

@@ -130,7 +130,7 @@ instance GoogleRequest ManagementGoalsPatch where

130130 type Rs ManagementGoalsPatch = Goal

131131 type Scopes ManagementGoalsPatch =

132132 '["https://www.googleapis.com/auth/analytics.edit"]

133− requestClient ManagementGoalsPatch{..}

133+ requestClient ManagementGoalsPatch'{..}

134134 = go _mgpAccountId _mgpWebPropertyId _mgpProFileId

135135 _mgpGoalId

136136 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/Update.hs+3−3

@@ -63,7 +63,7 @@ type ManagementGoalsUpdateResource =

6363-- | Updates an existing goal.

6464--

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

66−data ManagementGoalsUpdate = ManagementGoalsUpdate

66+data ManagementGoalsUpdate = ManagementGoalsUpdate'

6767 { _mguWebPropertyId :: !Text

6868 , _mguGoalId :: !Text

6969 , _mguProFileId :: !Text

@@ -92,7 +92,7 @@ managementGoalsUpdate

9292 -> Text -- ^ 'mguAccountId'

9393 -> ManagementGoalsUpdate

9494managementGoalsUpdate pMguWebPropertyId_ pMguGoalId_ pMguProFileId_ pMguPayload_ pMguAccountId_ =

95− ManagementGoalsUpdate

95+ ManagementGoalsUpdate'

9696 { _mguWebPropertyId = pMguWebPropertyId_

9797 , _mguGoalId = pMguGoalId_

9898 , _mguProFileId = pMguProFileId_

@@ -130,7 +130,7 @@ instance GoogleRequest ManagementGoalsUpdate where

130130 type Rs ManagementGoalsUpdate = Goal

131131 type Scopes ManagementGoalsUpdate =

132132 '["https://www.googleapis.com/auth/analytics.edit"]

133− requestClient ManagementGoalsUpdate{..}

133+ requestClient ManagementGoalsUpdate'{..}

134134 = go _mguAccountId _mguWebPropertyId _mguProFileId

135135 _mguGoalId

136136 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Delete.hs+3−3

@@ -61,7 +61,7 @@ type ManagementProFileFilterLinksDeleteResource =

6161-- | Delete a profile filter link.

6262--

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

64−data ManagementProFileFilterLinksDelete = ManagementProFileFilterLinksDelete

64+data ManagementProFileFilterLinksDelete = ManagementProFileFilterLinksDelete'

6565 { _mpffldWebPropertyId :: !Text

6666 , _mpffldProFileId :: !Text

6767 , _mpffldAccountId :: !Text

@@ -86,7 +86,7 @@ managementProFileFilterLinksDelete

8686 -> Text -- ^ 'mpffldLinkId'

8787 -> ManagementProFileFilterLinksDelete

8888managementProFileFilterLinksDelete pMpffldWebPropertyId_ pMpffldProFileId_ pMpffldAccountId_ pMpffldLinkId_ =

89− ManagementProFileFilterLinksDelete

89+ ManagementProFileFilterLinksDelete'

9090 { _mpffldWebPropertyId = pMpffldWebPropertyId_

9191 , _mpffldProFileId = pMpffldProFileId_

9292 , _mpffldAccountId = pMpffldAccountId_

@@ -121,7 +121,7 @@ instance GoogleRequest

121121 type Rs ManagementProFileFilterLinksDelete = ()

122122 type Scopes ManagementProFileFilterLinksDelete =

123123 '["https://www.googleapis.com/auth/analytics.edit"]

124− requestClient ManagementProFileFilterLinksDelete{..}

124+ requestClient ManagementProFileFilterLinksDelete'{..}

125125 = go _mpffldAccountId _mpffldWebPropertyId

126126 _mpffldProFileId

127127 _mpffldLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Get.hs+3−3

@@ -62,7 +62,7 @@ type ManagementProFileFilterLinksGetResource =

6262-- | Returns a single profile filter link.

6363--

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

65−data ManagementProFileFilterLinksGet = ManagementProFileFilterLinksGet

65+data ManagementProFileFilterLinksGet = ManagementProFileFilterLinksGet'

6666 { _mpfflgWebPropertyId :: !Text

6767 , _mpfflgProFileId :: !Text

6868 , _mpfflgAccountId :: !Text

@@ -87,7 +87,7 @@ managementProFileFilterLinksGet

8787 -> Text -- ^ 'mpfflgLinkId'

8888 -> ManagementProFileFilterLinksGet

8989managementProFileFilterLinksGet pMpfflgWebPropertyId_ pMpfflgProFileId_ pMpfflgAccountId_ pMpfflgLinkId_ =

90− ManagementProFileFilterLinksGet

90+ ManagementProFileFilterLinksGet'

9191 { _mpfflgWebPropertyId = pMpfflgWebPropertyId_

9292 , _mpfflgProFileId = pMpfflgProFileId_

9393 , _mpfflgAccountId = pMpfflgAccountId_

@@ -124,7 +124,7 @@ instance GoogleRequest

124124 type Scopes ManagementProFileFilterLinksGet =

125125 '["https://www.googleapis.com/auth/analytics.edit",

126126 "https://www.googleapis.com/auth/analytics.readonly"]

127− requestClient ManagementProFileFilterLinksGet{..}

127+ requestClient ManagementProFileFilterLinksGet'{..}

128128 = go _mpfflgAccountId _mpfflgWebPropertyId

129129 _mpfflgProFileId

130130 _mpfflgLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Insert.hs+3−3

@@ -62,7 +62,7 @@ type ManagementProFileFilterLinksInsertResource =

6262-- | Create a new profile filter link.

6363--

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

65−data ManagementProFileFilterLinksInsert = ManagementProFileFilterLinksInsert

65+data ManagementProFileFilterLinksInsert = ManagementProFileFilterLinksInsert'

6666 { _mpffliWebPropertyId :: !Text

6767 , _mpffliProFileId :: !Text

6868 , _mpffliPayload :: !ProFileFilterLink

@@ -87,7 +87,7 @@ managementProFileFilterLinksInsert

8787 -> Text -- ^ 'mpffliAccountId'

8888 -> ManagementProFileFilterLinksInsert

8989managementProFileFilterLinksInsert pMpffliWebPropertyId_ pMpffliProFileId_ pMpffliPayload_ pMpffliAccountId_ =

90− ManagementProFileFilterLinksInsert

90+ ManagementProFileFilterLinksInsert'

9191 { _mpffliWebPropertyId = pMpffliWebPropertyId_

9292 , _mpffliProFileId = pMpffliProFileId_

9393 , _mpffliPayload = pMpffliPayload_

@@ -124,7 +124,7 @@ instance GoogleRequest

124124 ProFileFilterLink

125125 type Scopes ManagementProFileFilterLinksInsert =

126126 '["https://www.googleapis.com/auth/analytics.edit"]

127− requestClient ManagementProFileFilterLinksInsert{..}

127+ requestClient ManagementProFileFilterLinksInsert'{..}

128128 = go _mpffliAccountId _mpffliWebPropertyId

129129 _mpffliProFileId

130130 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/List.hs+3−3

@@ -64,7 +64,7 @@ type ManagementProFileFilterLinksListResource =

6464-- | Lists all profile filter links for a profile.

6565--

6666-- /See:/ 'managementProFileFilterLinksList' smart constructor.

67−data ManagementProFileFilterLinksList = ManagementProFileFilterLinksList

67+data ManagementProFileFilterLinksList = ManagementProFileFilterLinksList'

6868 { _mpffllWebPropertyId :: !Text

6969 , _mpffllProFileId :: !Text

7070 , _mpffllAccountId :: !Text

@@ -91,7 +91,7 @@ managementProFileFilterLinksList

9191 -> Text -- ^ 'mpffllAccountId'

9292 -> ManagementProFileFilterLinksList

9393managementProFileFilterLinksList pMpffllWebPropertyId_ pMpffllProFileId_ pMpffllAccountId_ =

94− ManagementProFileFilterLinksList

94+ ManagementProFileFilterLinksList'

9595 { _mpffllWebPropertyId = pMpffllWebPropertyId_

9696 , _mpffllProFileId = pMpffllProFileId_

9797 , _mpffllAccountId = pMpffllAccountId_

@@ -143,7 +143,7 @@ instance GoogleRequest

143143 type Scopes ManagementProFileFilterLinksList =

144144 '["https://www.googleapis.com/auth/analytics.edit",

145145 "https://www.googleapis.com/auth/analytics.readonly"]

146− requestClient ManagementProFileFilterLinksList{..}

146+ requestClient ManagementProFileFilterLinksList'{..}

147147 = go _mpffllAccountId _mpffllWebPropertyId

148148 _mpffllProFileId

149149 _mpffllStartIndex

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Patch.hs+3−3

@@ -66,7 +66,7 @@ type ManagementProFileFilterLinksPatchResource =

6666-- semantics.

6767--

6868-- /See:/ 'managementProFileFilterLinksPatch' smart constructor.

69−data ManagementProFileFilterLinksPatch = ManagementProFileFilterLinksPatch

69+data ManagementProFileFilterLinksPatch = ManagementProFileFilterLinksPatch'

7070 { _mpfflpWebPropertyId :: !Text

7171 , _mpfflpProFileId :: !Text

7272 , _mpfflpPayload :: !ProFileFilterLink

@@ -95,7 +95,7 @@ managementProFileFilterLinksPatch

9595 -> Text -- ^ 'mpfflpLinkId'

9696 -> ManagementProFileFilterLinksPatch

9797managementProFileFilterLinksPatch pMpfflpWebPropertyId_ pMpfflpProFileId_ pMpfflpPayload_ pMpfflpAccountId_ pMpfflpLinkId_ =

98− ManagementProFileFilterLinksPatch

98+ ManagementProFileFilterLinksPatch'

9999 { _mpfflpWebPropertyId = pMpfflpWebPropertyId_

100100 , _mpfflpProFileId = pMpfflpProFileId_

101101 , _mpfflpPayload = pMpfflpPayload_

@@ -138,7 +138,7 @@ instance GoogleRequest

138138 ProFileFilterLink

139139 type Scopes ManagementProFileFilterLinksPatch =

140140 '["https://www.googleapis.com/auth/analytics.edit"]

141− requestClient ManagementProFileFilterLinksPatch{..}

141+ requestClient ManagementProFileFilterLinksPatch'{..}

142142 = go _mpfflpAccountId _mpfflpWebPropertyId

143143 _mpfflpProFileId

144144 _mpfflpLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/Update.hs+3−3

@@ -64,7 +64,7 @@ type ManagementProFileFilterLinksUpdateResource =

6464-- | Update an existing profile filter link.

6565--

6666-- /See:/ 'managementProFileFilterLinksUpdate' smart constructor.

67−data ManagementProFileFilterLinksUpdate = ManagementProFileFilterLinksUpdate

67+data ManagementProFileFilterLinksUpdate = ManagementProFileFilterLinksUpdate'

6868 { _mpffluWebPropertyId :: !Text

6969 , _mpffluProFileId :: !Text

7070 , _mpffluPayload :: !ProFileFilterLink

@@ -93,7 +93,7 @@ managementProFileFilterLinksUpdate

9393 -> Text -- ^ 'mpffluLinkId'

9494 -> ManagementProFileFilterLinksUpdate

9595managementProFileFilterLinksUpdate pMpffluWebPropertyId_ pMpffluProFileId_ pMpffluPayload_ pMpffluAccountId_ pMpffluLinkId_ =

96− ManagementProFileFilterLinksUpdate

96+ ManagementProFileFilterLinksUpdate'

9797 { _mpffluWebPropertyId = pMpffluWebPropertyId_

9898 , _mpffluProFileId = pMpffluProFileId_

9999 , _mpffluPayload = pMpffluPayload_

@@ -136,7 +136,7 @@ instance GoogleRequest

136136 ProFileFilterLink

137137 type Scopes ManagementProFileFilterLinksUpdate =

138138 '["https://www.googleapis.com/auth/analytics.edit"]

139− requestClient ManagementProFileFilterLinksUpdate{..}

139+ requestClient ManagementProFileFilterLinksUpdate'{..}

140140 = go _mpffluAccountId _mpffluWebPropertyId

141141 _mpffluProFileId

142142 _mpffluLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Delete.hs+3−3

@@ -61,7 +61,7 @@ type ManagementProFileUserLinksDeleteResource =

6161-- | Removes a user from the given view (profile).

6262--

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

64−data ManagementProFileUserLinksDelete = ManagementProFileUserLinksDelete

64+data ManagementProFileUserLinksDelete = ManagementProFileUserLinksDelete'

6565 { _mpfuldWebPropertyId :: !Text

6666 , _mpfuldProFileId :: !Text

6767 , _mpfuldAccountId :: !Text

@@ -86,7 +86,7 @@ managementProFileUserLinksDelete

8686 -> Text -- ^ 'mpfuldLinkId'

8787 -> ManagementProFileUserLinksDelete

8888managementProFileUserLinksDelete pMpfuldWebPropertyId_ pMpfuldProFileId_ pMpfuldAccountId_ pMpfuldLinkId_ =

89− ManagementProFileUserLinksDelete

89+ ManagementProFileUserLinksDelete'

9090 { _mpfuldWebPropertyId = pMpfuldWebPropertyId_

9191 , _mpfuldProFileId = pMpfuldProFileId_

9292 , _mpfuldAccountId = pMpfuldAccountId_

@@ -121,7 +121,7 @@ instance GoogleRequest

121121 type Rs ManagementProFileUserLinksDelete = ()

122122 type Scopes ManagementProFileUserLinksDelete =

123123 '["https://www.googleapis.com/auth/analytics.manage.users"]

124− requestClient ManagementProFileUserLinksDelete{..}

124+ requestClient ManagementProFileUserLinksDelete'{..}

125125 = go _mpfuldAccountId _mpfuldWebPropertyId

126126 _mpfuldProFileId

127127 _mpfuldLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Insert.hs+3−3

@@ -62,7 +62,7 @@ type ManagementProFileUserLinksInsertResource =

6262-- | Adds a new user to the given view (profile).

6363--

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

65−data ManagementProFileUserLinksInsert = ManagementProFileUserLinksInsert

65+data ManagementProFileUserLinksInsert = ManagementProFileUserLinksInsert'

6666 { _mpfuliWebPropertyId :: !Text

6767 , _mpfuliProFileId :: !Text

6868 , _mpfuliPayload :: !EntityUserLink

@@ -87,7 +87,7 @@ managementProFileUserLinksInsert

8787 -> Text -- ^ 'mpfuliAccountId'

8888 -> ManagementProFileUserLinksInsert

8989managementProFileUserLinksInsert pMpfuliWebPropertyId_ pMpfuliProFileId_ pMpfuliPayload_ pMpfuliAccountId_ =

90− ManagementProFileUserLinksInsert

90+ ManagementProFileUserLinksInsert'

9191 { _mpfuliWebPropertyId = pMpfuliWebPropertyId_

9292 , _mpfuliProFileId = pMpfuliProFileId_

9393 , _mpfuliPayload = pMpfuliPayload_

@@ -124,7 +124,7 @@ instance GoogleRequest

124124 EntityUserLink

125125 type Scopes ManagementProFileUserLinksInsert =

126126 '["https://www.googleapis.com/auth/analytics.manage.users"]

127− requestClient ManagementProFileUserLinksInsert{..}

127+ requestClient ManagementProFileUserLinksInsert'{..}

128128 = go _mpfuliAccountId _mpfuliWebPropertyId

129129 _mpfuliProFileId

130130 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/List.hs+3−3

@@ -64,7 +64,7 @@ type ManagementProFileUserLinksListResource =

6464-- | Lists profile-user links for a given view (profile).

6565--

6666-- /See:/ 'managementProFileUserLinksList' smart constructor.

67−data ManagementProFileUserLinksList = ManagementProFileUserLinksList

67+data ManagementProFileUserLinksList = ManagementProFileUserLinksList'

6868 { _mpfullWebPropertyId :: !Text

6969 , _mpfullProFileId :: !Text

7070 , _mpfullAccountId :: !Text

@@ -91,7 +91,7 @@ managementProFileUserLinksList

9191 -> Text -- ^ 'mpfullAccountId'

9292 -> ManagementProFileUserLinksList

9393managementProFileUserLinksList pMpfullWebPropertyId_ pMpfullProFileId_ pMpfullAccountId_ =

94− ManagementProFileUserLinksList

94+ ManagementProFileUserLinksList'

9595 { _mpfullWebPropertyId = pMpfullWebPropertyId_

9696 , _mpfullProFileId = pMpfullProFileId_

9797 , _mpfullAccountId = pMpfullAccountId_

@@ -143,7 +143,7 @@ instance GoogleRequest ManagementProFileUserLinksList

143143 type Scopes ManagementProFileUserLinksList =

144144 '["https://www.googleapis.com/auth/analytics.manage.users",

145145 "https://www.googleapis.com/auth/analytics.manage.users.readonly"]

146− requestClient ManagementProFileUserLinksList{..}

146+ requestClient ManagementProFileUserLinksList'{..}

147147 = go _mpfullAccountId _mpfullWebPropertyId

148148 _mpfullProFileId

149149 _mpfullStartIndex

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/Update.hs+3−3

@@ -64,7 +64,7 @@ type ManagementProFileUserLinksUpdateResource =

6464-- | Updates permissions for an existing user on the given view (profile).

6565--

6666-- /See:/ 'managementProFileUserLinksUpdate' smart constructor.

67−data ManagementProFileUserLinksUpdate = ManagementProFileUserLinksUpdate

67+data ManagementProFileUserLinksUpdate = ManagementProFileUserLinksUpdate'

6868 { _mpfuluWebPropertyId :: !Text

6969 , _mpfuluProFileId :: !Text

7070 , _mpfuluPayload :: !EntityUserLink

@@ -93,7 +93,7 @@ managementProFileUserLinksUpdate

9393 -> Text -- ^ 'mpfuluLinkId'

9494 -> ManagementProFileUserLinksUpdate

9595managementProFileUserLinksUpdate pMpfuluWebPropertyId_ pMpfuluProFileId_ pMpfuluPayload_ pMpfuluAccountId_ pMpfuluLinkId_ =

96− ManagementProFileUserLinksUpdate

96+ ManagementProFileUserLinksUpdate'

9797 { _mpfuluWebPropertyId = pMpfuluWebPropertyId_

9898 , _mpfuluProFileId = pMpfuluProFileId_

9999 , _mpfuluPayload = pMpfuluPayload_

@@ -136,7 +136,7 @@ instance GoogleRequest

136136 EntityUserLink

137137 type Scopes ManagementProFileUserLinksUpdate =

138138 '["https://www.googleapis.com/auth/analytics.manage.users"]

139− requestClient ManagementProFileUserLinksUpdate{..}

139+ requestClient ManagementProFileUserLinksUpdate'{..}

140140 = go _mpfuluAccountId _mpfuluWebPropertyId

141141 _mpfuluProFileId

142142 _mpfuluLinkId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Delete.hs+3−3

@@ -58,7 +58,7 @@ type ManagementProFilesDeleteResource =

5858-- | Deletes a view (profile).

5959--

6060-- /See:/ 'managementProFilesDelete' smart constructor.

61−data ManagementProFilesDelete = ManagementProFilesDelete

61+data ManagementProFilesDelete = ManagementProFilesDelete'

6262 { _mpfdWebPropertyId :: !Text

6363 , _mpfdProFileId :: !Text

6464 , _mpfdAccountId :: !Text

@@ -79,7 +79,7 @@ managementProFilesDelete

7979 -> Text -- ^ 'mpfdAccountId'

8080 -> ManagementProFilesDelete

8181managementProFilesDelete pMpfdWebPropertyId_ pMpfdProFileId_ pMpfdAccountId_ =

82− ManagementProFilesDelete

82+ ManagementProFilesDelete'

8383 { _mpfdWebPropertyId = pMpfdWebPropertyId_

8484 , _mpfdProFileId = pMpfdProFileId_

8585 , _mpfdAccountId = pMpfdAccountId_

@@ -107,7 +107,7 @@ instance GoogleRequest ManagementProFilesDelete where

107107 type Rs ManagementProFilesDelete = ()

108108 type Scopes ManagementProFilesDelete =

109109 '["https://www.googleapis.com/auth/analytics.edit"]

110− requestClient ManagementProFilesDelete{..}

110+ requestClient ManagementProFilesDelete'{..}

111111 = go _mpfdAccountId _mpfdWebPropertyId _mpfdProFileId

112112 (Just AltJSON)

113113 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Get.hs+3−3

@@ -58,7 +58,7 @@ type ManagementProFilesGetResource =

5858-- | Gets a view (profile) to which the user has access.

5959--

6060-- /See:/ 'managementProFilesGet' smart constructor.

61−data ManagementProFilesGet = ManagementProFilesGet

61+data ManagementProFilesGet = ManagementProFilesGet'

6262 { _mpfgWebPropertyId :: !Text

6363 , _mpfgProFileId :: !Text

6464 , _mpfgAccountId :: !Text

@@ -79,7 +79,7 @@ managementProFilesGet

7979 -> Text -- ^ 'mpfgAccountId'

8080 -> ManagementProFilesGet

8181managementProFilesGet pMpfgWebPropertyId_ pMpfgProFileId_ pMpfgAccountId_ =

82− ManagementProFilesGet

82+ ManagementProFilesGet'

8383 { _mpfgWebPropertyId = pMpfgWebPropertyId_

8484 , _mpfgProFileId = pMpfgProFileId_

8585 , _mpfgAccountId = pMpfgAccountId_

@@ -108,7 +108,7 @@ instance GoogleRequest ManagementProFilesGet where

108108 type Scopes ManagementProFilesGet =

109109 '["https://www.googleapis.com/auth/analytics.edit",

110110 "https://www.googleapis.com/auth/analytics.readonly"]

111− requestClient ManagementProFilesGet{..}

111+ requestClient ManagementProFilesGet'{..}

112112 = go _mpfgAccountId _mpfgWebPropertyId _mpfgProFileId

113113 (Just AltJSON)

114114 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Insert.hs+3−3

@@ -58,7 +58,7 @@ type ManagementProFilesInsertResource =

5858-- | Create a new view (profile).

5959--

6060-- /See:/ 'managementProFilesInsert' smart constructor.

61−data ManagementProFilesInsert = ManagementProFilesInsert

61+data ManagementProFilesInsert = ManagementProFilesInsert'

6262 { _mpfiWebPropertyId :: !Text

6363 , _mpfiPayload :: !ProFile

6464 , _mpfiAccountId :: !Text

@@ -79,7 +79,7 @@ managementProFilesInsert

7979 -> Text -- ^ 'mpfiAccountId'

8080 -> ManagementProFilesInsert

8181managementProFilesInsert pMpfiWebPropertyId_ pMpfiPayload_ pMpfiAccountId_ =

82− ManagementProFilesInsert

82+ ManagementProFilesInsert'

8383 { _mpfiWebPropertyId = pMpfiWebPropertyId_

8484 , _mpfiPayload = pMpfiPayload_

8585 , _mpfiAccountId = pMpfiAccountId_

@@ -106,7 +106,7 @@ instance GoogleRequest ManagementProFilesInsert where

106106 type Rs ManagementProFilesInsert = ProFile

107107 type Scopes ManagementProFilesInsert =

108108 '["https://www.googleapis.com/auth/analytics.edit"]

109− requestClient ManagementProFilesInsert{..}

109+ requestClient ManagementProFilesInsert'{..}

110110 = go _mpfiAccountId _mpfiWebPropertyId (Just AltJSON)

111111 _mpfiPayload

112112 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/List.hs+3−3

@@ -60,7 +60,7 @@ type ManagementProFilesListResource =

6060-- | Lists views (profiles) to which the user has access.

6161--

6262-- /See:/ 'managementProFilesList' smart constructor.

63−data ManagementProFilesList = ManagementProFilesList

63+data ManagementProFilesList = ManagementProFilesList'

6464 { _mpflWebPropertyId :: !Text

6565 , _mpflAccountId :: !Text

6666 , _mpflStartIndex :: !(Maybe (Textual Int32))

@@ -83,7 +83,7 @@ managementProFilesList

8383 -> Text -- ^ 'mpflAccountId'

8484 -> ManagementProFilesList

8585managementProFilesList pMpflWebPropertyId_ pMpflAccountId_ =

86− ManagementProFilesList

86+ ManagementProFilesList'

8787 { _mpflWebPropertyId = pMpflWebPropertyId_

8888 , _mpflAccountId = pMpflAccountId_

8989 , _mpflStartIndex = Nothing

@@ -127,7 +127,7 @@ instance GoogleRequest ManagementProFilesList where

127127 '["https://www.googleapis.com/auth/analytics",

128128 "https://www.googleapis.com/auth/analytics.edit",

129129 "https://www.googleapis.com/auth/analytics.readonly"]

130− requestClient ManagementProFilesList{..}

130+ requestClient ManagementProFilesList'{..}

131131 = go _mpflAccountId _mpflWebPropertyId

132132 _mpflStartIndex

133133 _mpflMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Patch.hs+3−3

@@ -62,7 +62,7 @@ type ManagementProFilesPatchResource =

6262-- semantics.

6363--

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

65−data ManagementProFilesPatch = ManagementProFilesPatch

65+data ManagementProFilesPatch = ManagementProFilesPatch'

6666 { _mpfpWebPropertyId :: !Text

6767 , _mpfpProFileId :: !Text

6868 , _mpfpPayload :: !ProFile

@@ -87,7 +87,7 @@ managementProFilesPatch

8787 -> Text -- ^ 'mpfpAccountId'

8888 -> ManagementProFilesPatch

8989managementProFilesPatch pMpfpWebPropertyId_ pMpfpProFileId_ pMpfpPayload_ pMpfpAccountId_ =

90− ManagementProFilesPatch

90+ ManagementProFilesPatch'

9191 { _mpfpWebPropertyId = pMpfpWebPropertyId_

9292 , _mpfpProFileId = pMpfpProFileId_

9393 , _mpfpPayload = pMpfpPayload_

@@ -121,7 +121,7 @@ instance GoogleRequest ManagementProFilesPatch where

121121 type Rs ManagementProFilesPatch = ProFile

122122 type Scopes ManagementProFilesPatch =

123123 '["https://www.googleapis.com/auth/analytics.edit"]

124− requestClient ManagementProFilesPatch{..}

124+ requestClient ManagementProFilesPatch'{..}

125125 = go _mpfpAccountId _mpfpWebPropertyId _mpfpProFileId

126126 (Just AltJSON)

127127 _mpfpPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/Update.hs+3−3

@@ -60,7 +60,7 @@ type ManagementProFilesUpdateResource =

6060-- | Updates an existing view (profile).

6161--

6262-- /See:/ 'managementProFilesUpdate' smart constructor.

63−data ManagementProFilesUpdate = ManagementProFilesUpdate

63+data ManagementProFilesUpdate = ManagementProFilesUpdate'

6464 { _mpfuWebPropertyId :: !Text

6565 , _mpfuProFileId :: !Text

6666 , _mpfuPayload :: !ProFile

@@ -85,7 +85,7 @@ managementProFilesUpdate

8585 -> Text -- ^ 'mpfuAccountId'

8686 -> ManagementProFilesUpdate

8787managementProFilesUpdate pMpfuWebPropertyId_ pMpfuProFileId_ pMpfuPayload_ pMpfuAccountId_ =

88− ManagementProFilesUpdate

88+ ManagementProFilesUpdate'

8989 { _mpfuWebPropertyId = pMpfuWebPropertyId_

9090 , _mpfuProFileId = pMpfuProFileId_

9191 , _mpfuPayload = pMpfuPayload_

@@ -119,7 +119,7 @@ instance GoogleRequest ManagementProFilesUpdate where

119119 type Rs ManagementProFilesUpdate = ProFile

120120 type Scopes ManagementProFilesUpdate =

121121 '["https://www.googleapis.com/auth/analytics.edit"]

122− requestClient ManagementProFilesUpdate{..}

122+ requestClient ManagementProFilesUpdate'{..}

123123 = go _mpfuAccountId _mpfuWebPropertyId _mpfuProFileId

124124 (Just AltJSON)

125125 _mpfuPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Segments/List.hs+3−3

@@ -54,7 +54,7 @@ type ManagementSegmentsListResource =

5454-- | Lists segments to which the user has access.

5555--

5656-- /See:/ 'managementSegmentsList' smart constructor.

57−data ManagementSegmentsList = ManagementSegmentsList

57+data ManagementSegmentsList = ManagementSegmentsList'

5858 { _mslStartIndex :: !(Maybe (Textual Int32))

5959 , _mslMaxResults :: !(Maybe (Textual Int32))

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

@@ -69,7 +69,7 @@ data ManagementSegmentsList = ManagementSegmentsList

6969managementSegmentsList

7070 :: ManagementSegmentsList

7171managementSegmentsList =

72− ManagementSegmentsList

72+ ManagementSegmentsList'

7373 { _mslStartIndex = Nothing

7474 , _mslMaxResults = Nothing

7575 }

@@ -95,7 +95,7 @@ instance GoogleRequest ManagementSegmentsList where

9595 '["https://www.googleapis.com/auth/analytics",

9696 "https://www.googleapis.com/auth/analytics.edit",

9797 "https://www.googleapis.com/auth/analytics.readonly"]

98− requestClient ManagementSegmentsList{..}

98+ requestClient ManagementSegmentsList'{..}

9999 = go _mslStartIndex _mslMaxResults (Just AltJSON)

100100 analyticsService

101101 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Delete.hs+3−3

@@ -61,7 +61,7 @@ type ManagementUnSampledReportsDeleteResource =

6161-- | Deletes an unsampled report.

6262--

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

64−data ManagementUnSampledReportsDelete = ManagementUnSampledReportsDelete

64+data ManagementUnSampledReportsDelete = ManagementUnSampledReportsDelete'

6565 { _musrdWebPropertyId :: !Text

6666 , _musrdProFileId :: !Text

6767 , _musrdAccountId :: !Text

@@ -86,7 +86,7 @@ managementUnSampledReportsDelete

8686 -> Text -- ^ 'musrdUnSampledReportId'

8787 -> ManagementUnSampledReportsDelete

8888managementUnSampledReportsDelete pMusrdWebPropertyId_ pMusrdProFileId_ pMusrdAccountId_ pMusrdUnSampledReportId_ =

89− ManagementUnSampledReportsDelete

89+ ManagementUnSampledReportsDelete'

9090 { _musrdWebPropertyId = pMusrdWebPropertyId_

9191 , _musrdProFileId = pMusrdProFileId_

9292 , _musrdAccountId = pMusrdAccountId_

@@ -122,7 +122,7 @@ instance GoogleRequest

122122 type Rs ManagementUnSampledReportsDelete = ()

123123 type Scopes ManagementUnSampledReportsDelete =

124124 '["https://www.googleapis.com/auth/analytics.edit"]

125− requestClient ManagementUnSampledReportsDelete{..}

125+ requestClient ManagementUnSampledReportsDelete'{..}

126126 = go _musrdAccountId _musrdWebPropertyId

127127 _musrdProFileId

128128 _musrdUnSampledReportId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Get.hs+3−3

@@ -62,7 +62,7 @@ type ManagementUnSampledReportsGetResource =

6262-- | Returns a single unsampled report.

6363--

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

65−data ManagementUnSampledReportsGet = ManagementUnSampledReportsGet

65+data ManagementUnSampledReportsGet = ManagementUnSampledReportsGet'

6666 { _musrgWebPropertyId :: !Text

6767 , _musrgProFileId :: !Text

6868 , _musrgAccountId :: !Text

@@ -87,7 +87,7 @@ managementUnSampledReportsGet

8787 -> Text -- ^ 'musrgUnSampledReportId'

8888 -> ManagementUnSampledReportsGet

8989managementUnSampledReportsGet pMusrgWebPropertyId_ pMusrgProFileId_ pMusrgAccountId_ pMusrgUnSampledReportId_ =

90− ManagementUnSampledReportsGet

90+ ManagementUnSampledReportsGet'

9191 { _musrgWebPropertyId = pMusrgWebPropertyId_

9292 , _musrgProFileId = pMusrgProFileId_

9393 , _musrgAccountId = pMusrgAccountId_

@@ -126,7 +126,7 @@ instance GoogleRequest ManagementUnSampledReportsGet

126126 '["https://www.googleapis.com/auth/analytics",

127127 "https://www.googleapis.com/auth/analytics.edit",

128128 "https://www.googleapis.com/auth/analytics.readonly"]

129− requestClient ManagementUnSampledReportsGet{..}

129+ requestClient ManagementUnSampledReportsGet'{..}

130130 = go _musrgAccountId _musrgWebPropertyId

131131 _musrgProFileId

132132 _musrgUnSampledReportId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hs+3−3

@@ -62,7 +62,7 @@ type ManagementUnSampledReportsInsertResource =

6262-- | Create a new unsampled report.

6363--

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

65−data ManagementUnSampledReportsInsert = ManagementUnSampledReportsInsert

65+data ManagementUnSampledReportsInsert = ManagementUnSampledReportsInsert'

6666 { _musriWebPropertyId :: !Text

6767 , _musriProFileId :: !Text

6868 , _musriPayload :: !UnSampledReport

@@ -87,7 +87,7 @@ managementUnSampledReportsInsert

8787 -> Text -- ^ 'musriAccountId'

8888 -> ManagementUnSampledReportsInsert

8989managementUnSampledReportsInsert pMusriWebPropertyId_ pMusriProFileId_ pMusriPayload_ pMusriAccountId_ =

90− ManagementUnSampledReportsInsert

90+ ManagementUnSampledReportsInsert'

9191 { _musriWebPropertyId = pMusriWebPropertyId_

9292 , _musriProFileId = pMusriProFileId_

9393 , _musriPayload = pMusriPayload_

@@ -124,7 +124,7 @@ instance GoogleRequest

124124 type Scopes ManagementUnSampledReportsInsert =

125125 '["https://www.googleapis.com/auth/analytics",

126126 "https://www.googleapis.com/auth/analytics.edit"]

127− requestClient ManagementUnSampledReportsInsert{..}

127+ requestClient ManagementUnSampledReportsInsert'{..}

128128 = go _musriAccountId _musriWebPropertyId

129129 _musriProFileId

130130 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hs+3−3

@@ -64,7 +64,7 @@ type ManagementUnSampledReportsListResource =

6464-- | Lists unsampled reports to which the user has access.

6565--

6666-- /See:/ 'managementUnSampledReportsList' smart constructor.

67−data ManagementUnSampledReportsList = ManagementUnSampledReportsList

67+data ManagementUnSampledReportsList = ManagementUnSampledReportsList'

6868 { _musrlWebPropertyId :: !Text

6969 , _musrlProFileId :: !Text

7070 , _musrlAccountId :: !Text

@@ -91,7 +91,7 @@ managementUnSampledReportsList

9191 -> Text -- ^ 'musrlAccountId'

9292 -> ManagementUnSampledReportsList

9393managementUnSampledReportsList pMusrlWebPropertyId_ pMusrlProFileId_ pMusrlAccountId_ =

94− ManagementUnSampledReportsList

94+ ManagementUnSampledReportsList'

9595 { _musrlWebPropertyId = pMusrlWebPropertyId_

9696 , _musrlProFileId = pMusrlProFileId_

9797 , _musrlAccountId = pMusrlAccountId_

@@ -143,7 +143,7 @@ instance GoogleRequest ManagementUnSampledReportsList

143143 '["https://www.googleapis.com/auth/analytics",

144144 "https://www.googleapis.com/auth/analytics.edit",

145145 "https://www.googleapis.com/auth/analytics.readonly"]

146− requestClient ManagementUnSampledReportsList{..}

146+ requestClient ManagementUnSampledReportsList'{..}

147147 = go _musrlAccountId _musrlWebPropertyId

148148 _musrlProFileId

149149 _musrlStartIndex

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/DeleteUploadData.hs+3−3

@@ -63,7 +63,7 @@ type ManagementUploadsDeleteUploadDataResource =

6363-- | Delete data associated with a previous upload.

6464--

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

66−data ManagementUploadsDeleteUploadData = ManagementUploadsDeleteUploadData

66+data ManagementUploadsDeleteUploadData = ManagementUploadsDeleteUploadData'

6767 { _mududWebPropertyId :: !Text

6868 , _mududCustomDataSourceId :: !Text

6969 , _mududPayload :: !AnalyticsDataimportDeleteUploadDataRequest

@@ -88,7 +88,7 @@ managementUploadsDeleteUploadData

8888 -> Text -- ^ 'mududAccountId'

8989 -> ManagementUploadsDeleteUploadData

9090managementUploadsDeleteUploadData pMududWebPropertyId_ pMududCustomDataSourceId_ pMududPayload_ pMududAccountId_ =

91− ManagementUploadsDeleteUploadData

91+ ManagementUploadsDeleteUploadData'

9292 { _mududWebPropertyId = pMududWebPropertyId_

9393 , _mududCustomDataSourceId = pMududCustomDataSourceId_

9494 , _mududPayload = pMududPayload_

@@ -124,7 +124,7 @@ instance GoogleRequest

124124 type Scopes ManagementUploadsDeleteUploadData =

125125 '["https://www.googleapis.com/auth/analytics",

126126 "https://www.googleapis.com/auth/analytics.edit"]

127− requestClient ManagementUploadsDeleteUploadData{..}

127+ requestClient ManagementUploadsDeleteUploadData'{..}

128128 = go _mududAccountId _mududWebPropertyId

129129 _mududCustomDataSourceId

130130 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/Get.hs+3−3

@@ -61,7 +61,7 @@ type ManagementUploadsGetResource =

6161-- | List uploads to which the user has access.

6262--

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

64−data ManagementUploadsGet = ManagementUploadsGet

64+data ManagementUploadsGet = ManagementUploadsGet'

6565 { _mugWebPropertyId :: !Text

6666 , _mugCustomDataSourceId :: !Text

6767 , _mugAccountId :: !Text

@@ -86,7 +86,7 @@ managementUploadsGet

8686 -> Text -- ^ 'mugUploadId'

8787 -> ManagementUploadsGet

8888managementUploadsGet pMugWebPropertyId_ pMugCustomDataSourceId_ pMugAccountId_ pMugUploadId_ =

89− ManagementUploadsGet

89+ ManagementUploadsGet'

9090 { _mugWebPropertyId = pMugWebPropertyId_

9191 , _mugCustomDataSourceId = pMugCustomDataSourceId_

9292 , _mugAccountId = pMugAccountId_

@@ -121,7 +121,7 @@ instance GoogleRequest ManagementUploadsGet where

121121 '["https://www.googleapis.com/auth/analytics",

122122 "https://www.googleapis.com/auth/analytics.edit",

123123 "https://www.googleapis.com/auth/analytics.readonly"]

124− requestClient ManagementUploadsGet{..}

124+ requestClient ManagementUploadsGet'{..}

125125 = go _mugAccountId _mugWebPropertyId

126126 _mugCustomDataSourceId

127127 _mugUploadId

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/List.hs+3−3

@@ -63,7 +63,7 @@ type ManagementUploadsListResource =

6363-- | List uploads to which the user has access.

6464--

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

66−data ManagementUploadsList = ManagementUploadsList

66+data ManagementUploadsList = ManagementUploadsList'

6767 { _mulWebPropertyId :: !Text

6868 , _mulCustomDataSourceId :: !Text

6969 , _mulAccountId :: !Text

@@ -90,7 +90,7 @@ managementUploadsList

9090 -> Text -- ^ 'mulAccountId'

9191 -> ManagementUploadsList

9292managementUploadsList pMulWebPropertyId_ pMulCustomDataSourceId_ pMulAccountId_ =

93− ManagementUploadsList

93+ ManagementUploadsList'

9494 { _mulWebPropertyId = pMulWebPropertyId_

9595 , _mulCustomDataSourceId = pMulCustomDataSourceId_

9696 , _mulAccountId = pMulAccountId_

@@ -136,7 +136,7 @@ instance GoogleRequest ManagementUploadsList where

136136 '["https://www.googleapis.com/auth/analytics",

137137 "https://www.googleapis.com/auth/analytics.edit",

138138 "https://www.googleapis.com/auth/analytics.readonly"]

139− requestClient ManagementUploadsList{..}

139+ requestClient ManagementUploadsList'{..}

140140 = go _mulAccountId _mulWebPropertyId

141141 _mulCustomDataSourceId

142142 _mulStartIndex

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+4−4

@@ -75,7 +75,7 @@ type ManagementUploadsUploadDataResource =

7575-- | Upload data for a custom data source.

7676--

7777-- /See:/ 'managementUploadsUploadData' smart constructor.

78−data ManagementUploadsUploadData = ManagementUploadsUploadData

78+data ManagementUploadsUploadData = ManagementUploadsUploadData'

7979 { _muudWebPropertyId :: !Text

8080 , _muudCustomDataSourceId :: !Text

8181 , _muudAccountId :: !Text

@@ -96,7 +96,7 @@ managementUploadsUploadData

9696 -> Text -- ^ 'muudAccountId'

9797 -> ManagementUploadsUploadData

9898managementUploadsUploadData pMuudWebPropertyId_ pMuudCustomDataSourceId_ pMuudAccountId_ =

99− ManagementUploadsUploadData

99+ ManagementUploadsUploadData'

100100 { _muudWebPropertyId = pMuudWebPropertyId_

101101 , _muudCustomDataSourceId = pMuudCustomDataSourceId_

102102 , _muudAccountId = pMuudAccountId_

@@ -126,7 +126,7 @@ instance GoogleRequest ManagementUploadsUploadData

126126 type Scopes ManagementUploadsUploadData =

127127 '["https://www.googleapis.com/auth/analytics",

128128 "https://www.googleapis.com/auth/analytics.edit"]

129− requestClient ManagementUploadsUploadData{..}

129+ requestClient ManagementUploadsUploadData'{..}

130130 = go _muudAccountId _muudWebPropertyId

131131 _muudCustomDataSourceId

132132 (Just AltJSON)

@@ -143,7 +143,7 @@ instance GoogleRequest

143143 type Scopes (MediaUpload ManagementUploadsUploadData)

144144 = Scopes ManagementUploadsUploadData

145145 requestClient

146− (MediaUpload ManagementUploadsUploadData{..} body)

146+ (MediaUpload ManagementUploadsUploadData'{..} body)

147147 = go _muudAccountId _muudWebPropertyId

148148 _muudCustomDataSourceId

149149 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Get.hs+3−3

@@ -55,7 +55,7 @@ type ManagementWebPropertiesGetResource =

5555-- | Gets a web property to which the user has access.

5656--

5757-- /See:/ 'managementWebPropertiesGet' smart constructor.

58−data ManagementWebPropertiesGet = ManagementWebPropertiesGet

58+data ManagementWebPropertiesGet = ManagementWebPropertiesGet'

5959 { _mwpgWebPropertyId :: !Text

6060 , _mwpgAccountId :: !Text

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

@@ -72,7 +72,7 @@ managementWebPropertiesGet

7272 -> Text -- ^ 'mwpgAccountId'

7373 -> ManagementWebPropertiesGet

7474managementWebPropertiesGet pMwpgWebPropertyId_ pMwpgAccountId_ =

75− ManagementWebPropertiesGet

75+ ManagementWebPropertiesGet'

7676 { _mwpgWebPropertyId = pMwpgWebPropertyId_

7777 , _mwpgAccountId = pMwpgAccountId_

7878 }

@@ -95,7 +95,7 @@ instance GoogleRequest ManagementWebPropertiesGet

9595 type Scopes ManagementWebPropertiesGet =

9696 '["https://www.googleapis.com/auth/analytics.edit",

9797 "https://www.googleapis.com/auth/analytics.readonly"]

98− requestClient ManagementWebPropertiesGet{..}

98+ requestClient ManagementWebPropertiesGet'{..}

9999 = go _mwpgAccountId _mwpgWebPropertyId (Just AltJSON)

100100 analyticsService

101101 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Insert.hs+3−3

@@ -60,7 +60,7 @@ type ManagementWebPropertiesInsertResource =

6060-- have at least one profile.

6161--

6262-- /See:/ 'managementWebPropertiesInsert' smart constructor.

63−data ManagementWebPropertiesInsert = ManagementWebPropertiesInsert

63+data ManagementWebPropertiesInsert = ManagementWebPropertiesInsert'

6464 { _mwpiPayload :: !WebProperty

6565 , _mwpiAccountId :: !Text

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

@@ -77,7 +77,7 @@ managementWebPropertiesInsert

7777 -> Text -- ^ 'mwpiAccountId'

7878 -> ManagementWebPropertiesInsert

7979managementWebPropertiesInsert pMwpiPayload_ pMwpiAccountId_ =

80− ManagementWebPropertiesInsert

80+ ManagementWebPropertiesInsert'

8181 { _mwpiPayload = pMwpiPayload_

8282 , _mwpiAccountId = pMwpiAccountId_

8383 }

@@ -98,7 +98,7 @@ instance GoogleRequest ManagementWebPropertiesInsert

9898 type Rs ManagementWebPropertiesInsert = WebProperty

9999 type Scopes ManagementWebPropertiesInsert =

100100 '["https://www.googleapis.com/auth/analytics.edit"]

101− requestClient ManagementWebPropertiesInsert{..}

101+ requestClient ManagementWebPropertiesInsert'{..}

102102 = go _mwpiAccountId (Just AltJSON) _mwpiPayload

103103 analyticsService

104104 where go

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/List.hs+3−3

@@ -57,7 +57,7 @@ type ManagementWebPropertiesListResource =

5757-- | Lists web properties to which the user has access.

5858--

5959-- /See:/ 'managementWebPropertiesList' smart constructor.

60−data ManagementWebPropertiesList = ManagementWebPropertiesList

60+data ManagementWebPropertiesList = ManagementWebPropertiesList'

6161 { _mwplAccountId :: !Text

6262 , _mwplStartIndex :: !(Maybe (Textual Int32))

6363 , _mwplMaxResults :: !(Maybe (Textual Int32))

@@ -76,7 +76,7 @@ managementWebPropertiesList

7676 :: Text -- ^ 'mwplAccountId'

7777 -> ManagementWebPropertiesList

7878managementWebPropertiesList pMwplAccountId_ =

79− ManagementWebPropertiesList

79+ ManagementWebPropertiesList'

8080 { _mwplAccountId = pMwplAccountId_

8181 , _mwplStartIndex = Nothing

8282 , _mwplMaxResults = Nothing

@@ -112,7 +112,7 @@ instance GoogleRequest ManagementWebPropertiesList

112112 '["https://www.googleapis.com/auth/analytics",

113113 "https://www.googleapis.com/auth/analytics.edit",

114114 "https://www.googleapis.com/auth/analytics.readonly"]

115− requestClient ManagementWebPropertiesList{..}

115+ requestClient ManagementWebPropertiesList'{..}

116116 = go _mwplAccountId _mwplStartIndex _mwplMaxResults

117117 (Just AltJSON)

118118 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Patch.hs+3−3

@@ -58,7 +58,7 @@ type ManagementWebPropertiesPatchResource =

5858-- | Updates an existing web property. This method supports patch semantics.

5959--

6060-- /See:/ 'managementWebPropertiesPatch' smart constructor.

61−data ManagementWebPropertiesPatch = ManagementWebPropertiesPatch

61+data ManagementWebPropertiesPatch = ManagementWebPropertiesPatch'

6262 { _mwppWebPropertyId :: !Text

6363 , _mwppPayload :: !WebProperty

6464 , _mwppAccountId :: !Text

@@ -79,7 +79,7 @@ managementWebPropertiesPatch

7979 -> Text -- ^ 'mwppAccountId'

8080 -> ManagementWebPropertiesPatch

8181managementWebPropertiesPatch pMwppWebPropertyId_ pMwppPayload_ pMwppAccountId_ =

82− ManagementWebPropertiesPatch

82+ ManagementWebPropertiesPatch'

8383 { _mwppWebPropertyId = pMwppWebPropertyId_

8484 , _mwppPayload = pMwppPayload_

8585 , _mwppAccountId = pMwppAccountId_

@@ -107,7 +107,7 @@ instance GoogleRequest ManagementWebPropertiesPatch

107107 type Rs ManagementWebPropertiesPatch = WebProperty

108108 type Scopes ManagementWebPropertiesPatch =

109109 '["https://www.googleapis.com/auth/analytics.edit"]

110− requestClient ManagementWebPropertiesPatch{..}

110+ requestClient ManagementWebPropertiesPatch'{..}

111111 = go _mwppAccountId _mwppWebPropertyId (Just AltJSON)

112112 _mwppPayload

113113 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/Update.hs+3−3

@@ -58,7 +58,7 @@ type ManagementWebPropertiesUpdateResource =

5858-- | Updates an existing web property.

5959--

6060-- /See:/ 'managementWebPropertiesUpdate' smart constructor.

61−data ManagementWebPropertiesUpdate = ManagementWebPropertiesUpdate

61+data ManagementWebPropertiesUpdate = ManagementWebPropertiesUpdate'

6262 { _mwpuWebPropertyId :: !Text

6363 , _mwpuPayload :: !WebProperty

6464 , _mwpuAccountId :: !Text

@@ -79,7 +79,7 @@ managementWebPropertiesUpdate

7979 -> Text -- ^ 'mwpuAccountId'

8080 -> ManagementWebPropertiesUpdate

8181managementWebPropertiesUpdate pMwpuWebPropertyId_ pMwpuPayload_ pMwpuAccountId_ =

82− ManagementWebPropertiesUpdate

82+ ManagementWebPropertiesUpdate'

8383 { _mwpuWebPropertyId = pMwpuWebPropertyId_

8484 , _mwpuPayload = pMwpuPayload_

8585 , _mwpuAccountId = pMwpuAccountId_

@@ -107,7 +107,7 @@ instance GoogleRequest ManagementWebPropertiesUpdate

107107 type Rs ManagementWebPropertiesUpdate = WebProperty

108108 type Scopes ManagementWebPropertiesUpdate =

109109 '["https://www.googleapis.com/auth/analytics.edit"]

110− requestClient ManagementWebPropertiesUpdate{..}

110+ requestClient ManagementWebPropertiesUpdate'{..}

111111 = go _mwpuAccountId _mwpuWebPropertyId (Just AltJSON)

112112 _mwpuPayload

113113 analyticsService

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Delete.hs+3−3

@@ -59,7 +59,7 @@ type ManagementWebPropertyAdWordsLinksDeleteResource

5959-- | Deletes a web property-AdWords link.

6060--

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

62−data ManagementWebPropertyAdWordsLinksDelete = ManagementWebPropertyAdWordsLinksDelete

62+data ManagementWebPropertyAdWordsLinksDelete = ManagementWebPropertyAdWordsLinksDelete'

6363 { _mwpawldWebPropertyId :: !Text

6464 , _mwpawldAccountId :: !Text

6565 , _mwpawldWebPropertyAdWordsLinkId :: !Text

@@ -80,7 +80,7 @@ managementWebPropertyAdWordsLinksDelete

8080 -> Text -- ^ 'mwpawldWebPropertyAdWordsLinkId'

8181 -> ManagementWebPropertyAdWordsLinksDelete

8282managementWebPropertyAdWordsLinksDelete pMwpawldWebPropertyId_ pMwpawldAccountId_ pMwpawldWebPropertyAdWordsLinkId_ =

83− ManagementWebPropertyAdWordsLinksDelete

83+ ManagementWebPropertyAdWordsLinksDelete'

8484 { _mwpawldWebPropertyId = pMwpawldWebPropertyId_

8585 , _mwpawldAccountId = pMwpawldAccountId_

8686 , _mwpawldWebPropertyAdWordsLinkId = pMwpawldWebPropertyAdWordsLinkId_

@@ -110,7 +110,7 @@ instance GoogleRequest

110110 type Scopes ManagementWebPropertyAdWordsLinksDelete =

111111 '["https://www.googleapis.com/auth/analytics.edit"]

112112 requestClient

113− ManagementWebPropertyAdWordsLinksDelete{..}

113+ ManagementWebPropertyAdWordsLinksDelete'{..}

114114 = go _mwpawldAccountId _mwpawldWebPropertyId

115115 _mwpawldWebPropertyAdWordsLinkId

116116 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Get.hs+3−3

@@ -59,7 +59,7 @@ type ManagementWebPropertyAdWordsLinksGetResource =

5959-- | Returns a web property-AdWords link to which the user has access.

6060--

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

62−data ManagementWebPropertyAdWordsLinksGet = ManagementWebPropertyAdWordsLinksGet

62+data ManagementWebPropertyAdWordsLinksGet = ManagementWebPropertyAdWordsLinksGet'

6363 { _mwpawlgWebPropertyId :: !Text

6464 , _mwpawlgAccountId :: !Text

6565 , _mwpawlgWebPropertyAdWordsLinkId :: !Text

@@ -80,7 +80,7 @@ managementWebPropertyAdWordsLinksGet

8080 -> Text -- ^ 'mwpawlgWebPropertyAdWordsLinkId'

8181 -> ManagementWebPropertyAdWordsLinksGet

8282managementWebPropertyAdWordsLinksGet pMwpawlgWebPropertyId_ pMwpawlgAccountId_ pMwpawlgWebPropertyAdWordsLinkId_ =

83− ManagementWebPropertyAdWordsLinksGet

83+ ManagementWebPropertyAdWordsLinksGet'

8484 { _mwpawlgWebPropertyId = pMwpawlgWebPropertyId_

8585 , _mwpawlgAccountId = pMwpawlgAccountId_

8686 , _mwpawlgWebPropertyAdWordsLinkId = pMwpawlgWebPropertyAdWordsLinkId_

@@ -112,7 +112,7 @@ instance GoogleRequest

112112 '["https://www.googleapis.com/auth/analytics.edit",

113113 "https://www.googleapis.com/auth/analytics.readonly"]

114114 requestClient

115− ManagementWebPropertyAdWordsLinksGet{..}

115+ ManagementWebPropertyAdWordsLinksGet'{..}

116116 = go _mwpawlgAccountId _mwpawlgWebPropertyId

117117 _mwpawlgWebPropertyAdWordsLinkId

118118 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Insert.hs+3−3

@@ -60,7 +60,7 @@ type ManagementWebPropertyAdWordsLinksInsertResource

6060-- | Creates a webProperty-AdWords link.

6161--

6262-- /See:/ 'managementWebPropertyAdWordsLinksInsert' smart constructor.

63−data ManagementWebPropertyAdWordsLinksInsert = ManagementWebPropertyAdWordsLinksInsert

63+data ManagementWebPropertyAdWordsLinksInsert = ManagementWebPropertyAdWordsLinksInsert'

6464 { _mwpawliWebPropertyId :: !Text

6565 , _mwpawliPayload :: !EntityAdWordsLink

6666 , _mwpawliAccountId :: !Text

@@ -81,7 +81,7 @@ managementWebPropertyAdWordsLinksInsert

8181 -> Text -- ^ 'mwpawliAccountId'

8282 -> ManagementWebPropertyAdWordsLinksInsert

8383managementWebPropertyAdWordsLinksInsert pMwpawliWebPropertyId_ pMwpawliPayload_ pMwpawliAccountId_ =

84− ManagementWebPropertyAdWordsLinksInsert

84+ ManagementWebPropertyAdWordsLinksInsert'

8585 { _mwpawliWebPropertyId = pMwpawliWebPropertyId_

8686 , _mwpawliPayload = pMwpawliPayload_

8787 , _mwpawliAccountId = pMwpawliAccountId_

@@ -112,7 +112,7 @@ instance GoogleRequest

112112 type Scopes ManagementWebPropertyAdWordsLinksInsert =

113113 '["https://www.googleapis.com/auth/analytics.edit"]

114114 requestClient

115− ManagementWebPropertyAdWordsLinksInsert{..}

115+ ManagementWebPropertyAdWordsLinksInsert'{..}

116116 = go _mwpawliAccountId _mwpawliWebPropertyId

117117 (Just AltJSON)

118118 _mwpawliPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/List.hs+3−3

@@ -61,7 +61,7 @@ type ManagementWebPropertyAdWordsLinksListResource =

6161-- | Lists webProperty-AdWords links for a given web property.

6262--

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

64−data ManagementWebPropertyAdWordsLinksList = ManagementWebPropertyAdWordsLinksList

64+data ManagementWebPropertyAdWordsLinksList = ManagementWebPropertyAdWordsLinksList'

6565 { _mwpawllWebPropertyId :: !Text

6666 , _mwpawllAccountId :: !Text

6767 , _mwpawllStartIndex :: !(Maybe (Textual Int32))

@@ -84,7 +84,7 @@ managementWebPropertyAdWordsLinksList

8484 -> Text -- ^ 'mwpawllAccountId'

8585 -> ManagementWebPropertyAdWordsLinksList

8686managementWebPropertyAdWordsLinksList pMwpawllWebPropertyId_ pMwpawllAccountId_ =

87− ManagementWebPropertyAdWordsLinksList

87+ ManagementWebPropertyAdWordsLinksList'

8888 { _mwpawllWebPropertyId = pMwpawllWebPropertyId_

8989 , _mwpawllAccountId = pMwpawllAccountId_

9090 , _mwpawllStartIndex = Nothing

@@ -128,7 +128,7 @@ instance GoogleRequest

128128 '["https://www.googleapis.com/auth/analytics.edit",

129129 "https://www.googleapis.com/auth/analytics.readonly"]

130130 requestClient

131− ManagementWebPropertyAdWordsLinksList{..}

131+ ManagementWebPropertyAdWordsLinksList'{..}

132132 = go _mwpawllAccountId _mwpawllWebPropertyId

133133 _mwpawllStartIndex

134134 _mwpawllMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Patch.hs+3−3

@@ -63,7 +63,7 @@ type ManagementWebPropertyAdWordsLinksPatchResource =

6363-- semantics.

6464--

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

66−data ManagementWebPropertyAdWordsLinksPatch = ManagementWebPropertyAdWordsLinksPatch

66+data ManagementWebPropertyAdWordsLinksPatch = ManagementWebPropertyAdWordsLinksPatch'

6767 { _mwpawlpWebPropertyId :: !Text

6868 , _mwpawlpPayload :: !EntityAdWordsLink

6969 , _mwpawlpAccountId :: !Text

@@ -88,7 +88,7 @@ managementWebPropertyAdWordsLinksPatch

8888 -> Text -- ^ 'mwpawlpWebPropertyAdWordsLinkId'

8989 -> ManagementWebPropertyAdWordsLinksPatch

9090managementWebPropertyAdWordsLinksPatch pMwpawlpWebPropertyId_ pMwpawlpPayload_ pMwpawlpAccountId_ pMwpawlpWebPropertyAdWordsLinkId_ =

91− ManagementWebPropertyAdWordsLinksPatch

91+ ManagementWebPropertyAdWordsLinksPatch'

9292 { _mwpawlpWebPropertyId = pMwpawlpWebPropertyId_

9393 , _mwpawlpPayload = pMwpawlpPayload_

9494 , _mwpawlpAccountId = pMwpawlpAccountId_

@@ -126,7 +126,7 @@ instance GoogleRequest

126126 type Scopes ManagementWebPropertyAdWordsLinksPatch =

127127 '["https://www.googleapis.com/auth/analytics.edit"]

128128 requestClient

129− ManagementWebPropertyAdWordsLinksPatch{..}

129+ ManagementWebPropertyAdWordsLinksPatch'{..}

130130 = go _mwpawlpAccountId _mwpawlpWebPropertyId

131131 _mwpawlpWebPropertyAdWordsLinkId

132132 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/Update.hs+3−3

@@ -62,7 +62,7 @@ type ManagementWebPropertyAdWordsLinksUpdateResource

6262-- | Updates an existing webProperty-AdWords link.

6363--

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

65−data ManagementWebPropertyAdWordsLinksUpdate = ManagementWebPropertyAdWordsLinksUpdate

65+data ManagementWebPropertyAdWordsLinksUpdate = ManagementWebPropertyAdWordsLinksUpdate'

6666 { _mwpawluWebPropertyId :: !Text

6767 , _mwpawluPayload :: !EntityAdWordsLink

6868 , _mwpawluAccountId :: !Text

@@ -87,7 +87,7 @@ managementWebPropertyAdWordsLinksUpdate

8787 -> Text -- ^ 'mwpawluWebPropertyAdWordsLinkId'

8888 -> ManagementWebPropertyAdWordsLinksUpdate

8989managementWebPropertyAdWordsLinksUpdate pMwpawluWebPropertyId_ pMwpawluPayload_ pMwpawluAccountId_ pMwpawluWebPropertyAdWordsLinkId_ =

90− ManagementWebPropertyAdWordsLinksUpdate

90+ ManagementWebPropertyAdWordsLinksUpdate'

9191 { _mwpawluWebPropertyId = pMwpawluWebPropertyId_

9292 , _mwpawluPayload = pMwpawluPayload_

9393 , _mwpawluAccountId = pMwpawluAccountId_

@@ -125,7 +125,7 @@ instance GoogleRequest

125125 type Scopes ManagementWebPropertyAdWordsLinksUpdate =

126126 '["https://www.googleapis.com/auth/analytics.edit"]

127127 requestClient

128− ManagementWebPropertyAdWordsLinksUpdate{..}

128+ ManagementWebPropertyAdWordsLinksUpdate'{..}

129129 = go _mwpawluAccountId _mwpawluWebPropertyId

130130 _mwpawluWebPropertyAdWordsLinkId

131131 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Delete.hs+3−3

@@ -58,7 +58,7 @@ type ManagementWebPropertyUserLinksDeleteResource =

5858-- | Removes a user from the given web property.

5959--

6060-- /See:/ 'managementWebPropertyUserLinksDelete' smart constructor.

61−data ManagementWebPropertyUserLinksDelete = ManagementWebPropertyUserLinksDelete

61+data ManagementWebPropertyUserLinksDelete = ManagementWebPropertyUserLinksDelete'

6262 { _mwpuldWebPropertyId :: !Text

6363 , _mwpuldAccountId :: !Text

6464 , _mwpuldLinkId :: !Text

@@ -79,7 +79,7 @@ managementWebPropertyUserLinksDelete

7979 -> Text -- ^ 'mwpuldLinkId'

8080 -> ManagementWebPropertyUserLinksDelete

8181managementWebPropertyUserLinksDelete pMwpuldWebPropertyId_ pMwpuldAccountId_ pMwpuldLinkId_ =

82− ManagementWebPropertyUserLinksDelete

82+ ManagementWebPropertyUserLinksDelete'

8383 { _mwpuldWebPropertyId = pMwpuldWebPropertyId_

8484 , _mwpuldAccountId = pMwpuldAccountId_

8585 , _mwpuldLinkId = pMwpuldLinkId_

@@ -108,7 +108,7 @@ instance GoogleRequest

108108 type Scopes ManagementWebPropertyUserLinksDelete =

109109 '["https://www.googleapis.com/auth/analytics.manage.users"]

110110 requestClient

111− ManagementWebPropertyUserLinksDelete{..}

111+ ManagementWebPropertyUserLinksDelete'{..}

112112 = go _mwpuldAccountId _mwpuldWebPropertyId

113113 _mwpuldLinkId

114114 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Insert.hs+3−3

@@ -59,7 +59,7 @@ type ManagementWebPropertyUserLinksInsertResource =

5959-- | Adds a new user to the given web property.

6060--

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

62−data ManagementWebPropertyUserLinksInsert = ManagementWebPropertyUserLinksInsert

62+data ManagementWebPropertyUserLinksInsert = ManagementWebPropertyUserLinksInsert'

6363 { _mwpuliWebPropertyId :: !Text

6464 , _mwpuliPayload :: !EntityUserLink

6565 , _mwpuliAccountId :: !Text

@@ -80,7 +80,7 @@ managementWebPropertyUserLinksInsert

8080 -> Text -- ^ 'mwpuliAccountId'

8181 -> ManagementWebPropertyUserLinksInsert

8282managementWebPropertyUserLinksInsert pMwpuliWebPropertyId_ pMwpuliPayload_ pMwpuliAccountId_ =

83− ManagementWebPropertyUserLinksInsert

83+ ManagementWebPropertyUserLinksInsert'

8484 { _mwpuliWebPropertyId = pMwpuliWebPropertyId_

8585 , _mwpuliPayload = pMwpuliPayload_

8686 , _mwpuliAccountId = pMwpuliAccountId_

@@ -111,7 +111,7 @@ instance GoogleRequest

111111 type Scopes ManagementWebPropertyUserLinksInsert =

112112 '["https://www.googleapis.com/auth/analytics.manage.users"]

113113 requestClient

114− ManagementWebPropertyUserLinksInsert{..}

114+ ManagementWebPropertyUserLinksInsert'{..}

115115 = go _mwpuliAccountId _mwpuliWebPropertyId

116116 (Just AltJSON)

117117 _mwpuliPayload

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/List.hs+3−3

@@ -61,7 +61,7 @@ type ManagementWebPropertyUserLinksListResource =

6161-- | Lists webProperty-user links for a given web property.

6262--

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

64−data ManagementWebPropertyUserLinksList = ManagementWebPropertyUserLinksList

64+data ManagementWebPropertyUserLinksList = ManagementWebPropertyUserLinksList'

6565 { _mwpullWebPropertyId :: !Text

6666 , _mwpullAccountId :: !Text

6767 , _mwpullStartIndex :: !(Maybe (Textual Int32))

@@ -84,7 +84,7 @@ managementWebPropertyUserLinksList

8484 -> Text -- ^ 'mwpullAccountId'

8585 -> ManagementWebPropertyUserLinksList

8686managementWebPropertyUserLinksList pMwpullWebPropertyId_ pMwpullAccountId_ =

87− ManagementWebPropertyUserLinksList

87+ ManagementWebPropertyUserLinksList'

8888 { _mwpullWebPropertyId = pMwpullWebPropertyId_

8989 , _mwpullAccountId = pMwpullAccountId_

9090 , _mwpullStartIndex = Nothing

@@ -129,7 +129,7 @@ instance GoogleRequest

129129 type Scopes ManagementWebPropertyUserLinksList =

130130 '["https://www.googleapis.com/auth/analytics.manage.users",

131131 "https://www.googleapis.com/auth/analytics.manage.users.readonly"]

132− requestClient ManagementWebPropertyUserLinksList{..}

132+ requestClient ManagementWebPropertyUserLinksList'{..}

133133 = go _mwpullAccountId _mwpullWebPropertyId

134134 _mwpullStartIndex

135135 _mwpullMaxResults

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/Update.hs+3−3

@@ -61,7 +61,7 @@ type ManagementWebPropertyUserLinksUpdateResource =

6161-- | Updates permissions for an existing user on the given web property.

6262--

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

64−data ManagementWebPropertyUserLinksUpdate = ManagementWebPropertyUserLinksUpdate

64+data ManagementWebPropertyUserLinksUpdate = ManagementWebPropertyUserLinksUpdate'

6565 { _mwpuluWebPropertyId :: !Text

6666 , _mwpuluPayload :: !EntityUserLink

6767 , _mwpuluAccountId :: !Text

@@ -86,7 +86,7 @@ managementWebPropertyUserLinksUpdate

8686 -> Text -- ^ 'mwpuluLinkId'

8787 -> ManagementWebPropertyUserLinksUpdate

8888managementWebPropertyUserLinksUpdate pMwpuluWebPropertyId_ pMwpuluPayload_ pMwpuluAccountId_ pMwpuluLinkId_ =

89− ManagementWebPropertyUserLinksUpdate

89+ ManagementWebPropertyUserLinksUpdate'

9090 { _mwpuluWebPropertyId = pMwpuluWebPropertyId_

9191 , _mwpuluPayload = pMwpuluPayload_

9292 , _mwpuluAccountId = pMwpuluAccountId_

@@ -123,7 +123,7 @@ instance GoogleRequest

123123 type Scopes ManagementWebPropertyUserLinksUpdate =

124124 '["https://www.googleapis.com/auth/analytics.manage.users"]

125125 requestClient

126− ManagementWebPropertyUserLinksUpdate{..}

126+ ManagementWebPropertyUserLinksUpdate'{..}

127127 = go _mwpuluAccountId _mwpuluWebPropertyId

128128 _mwpuluLinkId

129129 (Just AltJSON)

gogol-analytics/gen/Network/Google/Resource/Analytics/Metadata/Columns/List.hs+3−3

@@ -52,7 +52,7 @@ type MetadataColumnsListResource =

5252-- | Lists all columns for a report type

5353--

5454-- /See:/ 'metadataColumnsList' smart constructor.

55−newtype MetadataColumnsList = MetadataColumnsList

55+newtype MetadataColumnsList = MetadataColumnsList'

5656 { _mclReportType :: Text

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

5858

@@ -65,7 +65,7 @@ metadataColumnsList

6565 :: Text -- ^ 'mclReportType'

6666 -> MetadataColumnsList

6767metadataColumnsList pMclReportType_ =

68− MetadataColumnsList

68+ MetadataColumnsList'

6969 { _mclReportType = pMclReportType_

7070 }

7171

@@ -82,7 +82,7 @@ instance GoogleRequest MetadataColumnsList where

8282 '["https://www.googleapis.com/auth/analytics",

8383 "https://www.googleapis.com/auth/analytics.edit",

8484 "https://www.googleapis.com/auth/analytics.readonly"]

85− requestClient MetadataColumnsList{..}

85+ requestClient MetadataColumnsList'{..}

8686 = go _mclReportType (Just AltJSON) analyticsService

8787 where go

8888 = buildClient

gogol-analytics/gen/Network/Google/Resource/Analytics/Provisioning/CreateAccountTicket.hs+3−3

@@ -53,7 +53,7 @@ type ProvisioningCreateAccountTicketResource =

5353-- | Creates an account ticket.

5454--

5555-- /See:/ 'provisioningCreateAccountTicket' smart constructor.

56−newtype ProvisioningCreateAccountTicket = ProvisioningCreateAccountTicket

56+newtype ProvisioningCreateAccountTicket = ProvisioningCreateAccountTicket'

5757 { _pcatPayload :: AccountTicket

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

5959

@@ -66,7 +66,7 @@ provisioningCreateAccountTicket

6666 :: AccountTicket -- ^ 'pcatPayload'

6767 -> ProvisioningCreateAccountTicket

6868provisioningCreateAccountTicket pPcatPayload_ =

69− ProvisioningCreateAccountTicket

69+ ProvisioningCreateAccountTicket'

7070 { _pcatPayload = pPcatPayload_

7171 }

7272

@@ -81,7 +81,7 @@ instance GoogleRequest

8181 AccountTicket

8282 type Scopes ProvisioningCreateAccountTicket =

8383 '["https://www.googleapis.com/auth/analytics.provision"]

84− requestClient ProvisioningCreateAccountTicket{..}

84+ requestClient ProvisioningCreateAccountTicket'{..}

8585 = go (Just AltJSON) _pcatPayload analyticsService

8686 where go

8787 = buildClient

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+153−152

@@ -39,7 +39,7 @@ import Network.Google.Prelude

3939-- marking it as unapproved in Google Play.

4040--

4141-- /See:/ 'groupLicense' smart constructor.

42−data GroupLicense = GroupLicense

42+data GroupLicense = GroupLicense'

4343 { _glKind :: !Text

4444 , _glNumProvisioned :: !(Maybe (Textual Int32))

4545 , _glNumPurchased :: !(Maybe (Textual Int32))

@@ -66,7 +66,7 @@ data GroupLicense = GroupLicense

6666groupLicense

6767 :: GroupLicense

6868groupLicense =

69− GroupLicense

69+ GroupLicense'

7070 { _glKind = "androidenterprise#groupLicense"

7171 , _glNumProvisioned = Nothing

7272 , _glNumPurchased = Nothing

@@ -126,7 +126,7 @@ instance FromJSON GroupLicense where

126126 parseJSON

127127 = withObject "GroupLicense"

128128 (\ o ->

129− GroupLicense <$>

129+ GroupLicense' <$>

130130 (o .:? "kind" .!= "androidenterprise#groupLicense")

131131 <*> (o .:? "numProvisioned")

132132 <*> (o .:? "numPurchased")

@@ -135,7 +135,7 @@ instance FromJSON GroupLicense where

135135 <*> (o .:? "acquisitionKind"))

136136

137137instance ToJSON GroupLicense where

138− toJSON GroupLicense{..}

138+ toJSON GroupLicense'{..}

139139 = object

140140 (catMaybes

141141 [Just ("kind" .= _glKind),

@@ -148,7 +148,7 @@ instance ToJSON GroupLicense where

148148-- | The store page resources for the enterprise.

149149--

150150-- /See:/ 'storeLayoutPagesListResponse' smart constructor.

151−data StoreLayoutPagesListResponse = StoreLayoutPagesListResponse

151+data StoreLayoutPagesListResponse = StoreLayoutPagesListResponse'

152152 { _slplrKind :: !Text

153153 , _slplrPage :: !(Maybe [StorePage])

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

@@ -163,7 +163,7 @@ data StoreLayoutPagesListResponse = StoreLayoutPagesListResponse

163163storeLayoutPagesListResponse

164164 :: StoreLayoutPagesListResponse

165165storeLayoutPagesListResponse =

166− StoreLayoutPagesListResponse

166+ StoreLayoutPagesListResponse'

167167 { _slplrKind = "androidenterprise#storeLayoutPagesListResponse"

168168 , _slplrPage = Nothing

169169 }

@@ -185,13 +185,13 @@ instance FromJSON StoreLayoutPagesListResponse where

185185 parseJSON

186186 = withObject "StoreLayoutPagesListResponse"

187187 (\ o ->

188− StoreLayoutPagesListResponse <$>

188+ StoreLayoutPagesListResponse' <$>

189189 (o .:? "kind" .!=

190190 "androidenterprise#storeLayoutPagesListResponse")

191191 <*> (o .:? "page" .!= mempty))

192192

193193instance ToJSON StoreLayoutPagesListResponse where

194− toJSON StoreLayoutPagesListResponse{..}

194+ toJSON StoreLayoutPagesListResponse'{..}

195195 = object

196196 (catMaybes

197197 [Just ("kind" .= _slplrKind),

@@ -201,7 +201,7 @@ instance ToJSON StoreLayoutPagesListResponse where

201201-- API calls that require such authentication.

202202--

203203-- /See:/ 'enterpriseAccount' smart constructor.

204−data EnterpriseAccount = EnterpriseAccount

204+data EnterpriseAccount = EnterpriseAccount'

205205 { _eaKind :: !Text

206206 , _eaAccountEmail :: !(Maybe Text)

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

@@ -216,7 +216,7 @@ data EnterpriseAccount = EnterpriseAccount

216216enterpriseAccount

217217 :: EnterpriseAccount

218218enterpriseAccount =

219− EnterpriseAccount

219+ EnterpriseAccount'

220220 { _eaKind = "androidenterprise#enterpriseAccount"

221221 , _eaAccountEmail = Nothing

222222 }

@@ -236,13 +236,13 @@ instance FromJSON EnterpriseAccount where

236236 parseJSON

237237 = withObject "EnterpriseAccount"

238238 (\ o ->

239− EnterpriseAccount <$>

239+ EnterpriseAccount' <$>

240240 (o .:? "kind" .!=

241241 "androidenterprise#enterpriseAccount")

242242 <*> (o .:? "accountEmail"))

243243

244244instance ToJSON EnterpriseAccount where

245− toJSON EnterpriseAccount{..}

245+ toJSON EnterpriseAccount'{..}

246246 = object

247247 (catMaybes

248248 [Just ("kind" .= _eaKind),

@@ -251,7 +251,7 @@ instance ToJSON EnterpriseAccount where

251251-- | The collection resources for the enterprise.

252252--

253253-- /See:/ 'collectionsListResponse' smart constructor.

254−data CollectionsListResponse = CollectionsListResponse

254+data CollectionsListResponse = CollectionsListResponse'

255255 { _clrKind :: !Text

256256 , _clrCollection :: !(Maybe [Collection])

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

@@ -266,7 +266,7 @@ data CollectionsListResponse = CollectionsListResponse

266266collectionsListResponse

267267 :: CollectionsListResponse

268268collectionsListResponse =

269− CollectionsListResponse

269+ CollectionsListResponse'

270270 { _clrKind = "androidenterprise#collectionsListResponse"

271271 , _clrCollection = Nothing

272272 }

@@ -289,13 +289,13 @@ instance FromJSON CollectionsListResponse where

289289 parseJSON

290290 = withObject "CollectionsListResponse"

291291 (\ o ->

292− CollectionsListResponse <$>

292+ CollectionsListResponse' <$>

293293 (o .:? "kind" .!=

294294 "androidenterprise#collectionsListResponse")

295295 <*> (o .:? "collection" .!= mempty))

296296

297297instance ToJSON CollectionsListResponse where

298− toJSON CollectionsListResponse{..}

298+ toJSON CollectionsListResponse'{..}

299299 = object

300300 (catMaybes

301301 [Just ("kind" .= _clrKind),

@@ -304,7 +304,7 @@ instance ToJSON CollectionsListResponse where

304304-- | A typed value for the restriction.

305305--

306306-- /See:/ 'appRestrictionsSchemaRestrictionRestrictionValue' smart constructor.

307−data AppRestrictionsSchemaRestrictionRestrictionValue = AppRestrictionsSchemaRestrictionRestrictionValue

307+data AppRestrictionsSchemaRestrictionRestrictionValue = AppRestrictionsSchemaRestrictionRestrictionValue'

308308 { _arsrrvValueMultiselect :: !(Maybe [Text])

309309 , _arsrrvValueBool :: !(Maybe Bool)

310310 , _arsrrvValueInteger :: !(Maybe (Textual Int32))

@@ -328,7 +328,7 @@ data AppRestrictionsSchemaRestrictionRestrictionValue = AppRestrictionsSchemaRes

328328appRestrictionsSchemaRestrictionRestrictionValue

329329 :: AppRestrictionsSchemaRestrictionRestrictionValue

330330appRestrictionsSchemaRestrictionRestrictionValue =

331− AppRestrictionsSchemaRestrictionRestrictionValue

331+ AppRestrictionsSchemaRestrictionRestrictionValue'

332332 { _arsrrvValueMultiselect = Nothing

333333 , _arsrrvValueBool = Nothing

334334 , _arsrrvValueInteger = Nothing

@@ -377,7 +377,7 @@ instance FromJSON

377377 = withObject

378378 "AppRestrictionsSchemaRestrictionRestrictionValue"

379379 (\ o ->

380− AppRestrictionsSchemaRestrictionRestrictionValue <$>

380+ AppRestrictionsSchemaRestrictionRestrictionValue' <$>

381381 (o .:? "valueMultiselect" .!= mempty) <*>

382382 (o .:? "valueBool")

383383 <*> (o .:? "valueInteger")

@@ -388,7 +388,7 @@ instance ToJSON

388388 AppRestrictionsSchemaRestrictionRestrictionValue

389389 where

390390 toJSON

391− AppRestrictionsSchemaRestrictionRestrictionValue{..}

391+ AppRestrictionsSchemaRestrictionRestrictionValue'{..}

392392 = object

393393 (catMaybes

394394 [("valueMultiselect" .=) <$> _arsrrvValueMultiselect,

@@ -401,7 +401,7 @@ instance ToJSON

401401-- methods on device resources.

402402--

403403-- /See:/ 'deviceState' smart constructor.

404−data DeviceState = DeviceState

404+data DeviceState = DeviceState'

405405 { _dsKind :: !Text

406406 , _dsAccountState :: !(Maybe Text)

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

@@ -416,7 +416,7 @@ data DeviceState = DeviceState

416416deviceState

417417 :: DeviceState

418418deviceState =

419− DeviceState

419+ DeviceState'

420420 { _dsKind = "androidenterprise#deviceState"

421421 , _dsAccountState = Nothing

422422 }

@@ -439,12 +439,12 @@ instance FromJSON DeviceState where

439439 parseJSON

440440 = withObject "DeviceState"

441441 (\ o ->

442− DeviceState <$>

442+ DeviceState' <$>

443443 (o .:? "kind" .!= "androidenterprise#deviceState")

444444 <*> (o .:? "accountState"))

445445

446446instance ToJSON DeviceState where

447− toJSON DeviceState{..}

447+ toJSON DeviceState'{..}

448448 = object

449449 (catMaybes

450450 [Just ("kind" .= _dsKind),

@@ -453,7 +453,7 @@ instance ToJSON DeviceState where

453453-- | The user resources for the group license.

454454--

455455-- /See:/ 'groupLicenseUsersListResponse' smart constructor.

456−data GroupLicenseUsersListResponse = GroupLicenseUsersListResponse

456+data GroupLicenseUsersListResponse = GroupLicenseUsersListResponse'

457457 { _glulrKind :: !Text

458458 , _glulrUser :: !(Maybe [User])

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

@@ -468,7 +468,7 @@ data GroupLicenseUsersListResponse = GroupLicenseUsersListResponse

468468groupLicenseUsersListResponse

469469 :: GroupLicenseUsersListResponse

470470groupLicenseUsersListResponse =

471− GroupLicenseUsersListResponse

471+ GroupLicenseUsersListResponse'

472472 { _glulrKind = "androidenterprise#groupLicenseUsersListResponse"

473473 , _glulrUser = Nothing

474474 }

@@ -490,13 +490,13 @@ instance FromJSON GroupLicenseUsersListResponse where

490490 parseJSON

491491 = withObject "GroupLicenseUsersListResponse"

492492 (\ o ->

493− GroupLicenseUsersListResponse <$>

493+ GroupLicenseUsersListResponse' <$>

494494 (o .:? "kind" .!=

495495 "androidenterprise#groupLicenseUsersListResponse")

496496 <*> (o .:? "user" .!= mempty))

497497

498498instance ToJSON GroupLicenseUsersListResponse where

499− toJSON GroupLicenseUsersListResponse{..}

499+ toJSON GroupLicenseUsersListResponse'{..}

500500 = object

501501 (catMaybes

502502 [Just ("kind" .= _glulrKind),

@@ -505,7 +505,7 @@ instance ToJSON GroupLicenseUsersListResponse where

505505-- | Information on an approval URL.

506506--

507507-- /See:/ 'approvalURLInfo' smart constructor.

508−data ApprovalURLInfo = ApprovalURLInfo

508+data ApprovalURLInfo = ApprovalURLInfo'

509509 { _auiApprovalURL :: !(Maybe Text)

510510 , _auiKind :: !Text

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

@@ -520,7 +520,7 @@ data ApprovalURLInfo = ApprovalURLInfo

520520approvalURLInfo

521521 :: ApprovalURLInfo

522522approvalURLInfo =

523− ApprovalURLInfo

523+ ApprovalURLInfo'

524524 { _auiApprovalURL = Nothing

525525 , _auiKind = "androidenterprise#approvalUrlInfo"

526526 }

@@ -541,13 +541,13 @@ instance FromJSON ApprovalURLInfo where

541541 parseJSON

542542 = withObject "ApprovalURLInfo"

543543 (\ o ->

544− ApprovalURLInfo <$>

544+ ApprovalURLInfo' <$>

545545 (o .:? "approvalUrl") <*>

546546 (o .:? "kind" .!=

547547 "androidenterprise#approvalUrlInfo"))

548548

549549instance ToJSON ApprovalURLInfo where

550− toJSON ApprovalURLInfo{..}

550+ toJSON ApprovalURLInfo'{..}

551551 = object

552552 (catMaybes

553553 [("approvalUrl" .=) <$> _auiApprovalURL,

@@ -556,7 +556,7 @@ instance ToJSON ApprovalURLInfo where

556556-- | The store page resources for the enterprise.

557557--

558558-- /See:/ 'storeLayoutClustersListResponse' smart constructor.

559−data StoreLayoutClustersListResponse = StoreLayoutClustersListResponse

559+data StoreLayoutClustersListResponse = StoreLayoutClustersListResponse'

560560 { _slclrCluster :: !(Maybe [StoreCluster])

561561 , _slclrKind :: !Text

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

@@ -571,7 +571,7 @@ data StoreLayoutClustersListResponse = StoreLayoutClustersListResponse

571571storeLayoutClustersListResponse

572572 :: StoreLayoutClustersListResponse

573573storeLayoutClustersListResponse =

574− StoreLayoutClustersListResponse

574+ StoreLayoutClustersListResponse'

575575 { _slclrCluster = Nothing

576576 , _slclrKind = "androidenterprise#storeLayoutClustersListResponse"

577577 }

@@ -594,13 +594,13 @@ instance FromJSON StoreLayoutClustersListResponse

594594 parseJSON

595595 = withObject "StoreLayoutClustersListResponse"

596596 (\ o ->

597− StoreLayoutClustersListResponse <$>

597+ StoreLayoutClustersListResponse' <$>

598598 (o .:? "cluster" .!= mempty) <*>

599599 (o .:? "kind" .!=

600600 "androidenterprise#storeLayoutClustersListResponse"))

601601

602602instance ToJSON StoreLayoutClustersListResponse where

603− toJSON StoreLayoutClustersListResponse{..}

603+ toJSON StoreLayoutClustersListResponse'{..}

604604 = object

605605 (catMaybes

606606 [("cluster" .=) <$> _slclrCluster,

@@ -610,7 +610,7 @@ instance ToJSON StoreLayoutClustersListResponse where

610610-- displayed as part of a store page.

611611--

612612-- /See:/ 'storeCluster' smart constructor.

613−data StoreCluster = StoreCluster

613+data StoreCluster = StoreCluster'

614614 { _scKind :: !Text

615615 , _scName :: !(Maybe [LocalizedText])

616616 , _scOrderInPage :: !(Maybe Text)

@@ -634,7 +634,7 @@ data StoreCluster = StoreCluster

634634storeCluster

635635 :: StoreCluster

636636storeCluster =

637− StoreCluster

637+ StoreCluster'

638638 { _scKind = "androidenterprise#storeCluster"

639639 , _scName = Nothing

640640 , _scOrderInPage = Nothing

@@ -683,7 +683,7 @@ instance FromJSON StoreCluster where

683683 parseJSON

684684 = withObject "StoreCluster"

685685 (\ o ->

686− StoreCluster <$>

686+ StoreCluster' <$>

687687 (o .:? "kind" .!= "androidenterprise#storeCluster")

688688 <*> (o .:? "name" .!= mempty)

689689 <*> (o .:? "orderInPage")

@@ -691,7 +691,7 @@ instance FromJSON StoreCluster where

691691 <*> (o .:? "productId" .!= mempty))

692692

693693instance ToJSON StoreCluster where

694− toJSON StoreCluster{..}

694+ toJSON StoreCluster'{..}

695695 = object

696696 (catMaybes

697697 [Just ("kind" .= _scKind), ("name" .=) <$> _scName,

@@ -706,7 +706,7 @@ instance ToJSON StoreCluster where

706706-- accepted.

707707--

708708-- /See:/ 'productPermission' smart constructor.

709−data ProductPermission = ProductPermission

709+data ProductPermission = ProductPermission'

710710 { _ppState :: !(Maybe Text)

711711 , _ppPermissionId :: !(Maybe Text)

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

@@ -721,7 +721,7 @@ data ProductPermission = ProductPermission

721721productPermission

722722 :: ProductPermission

723723productPermission =

724− ProductPermission

724+ ProductPermission'

725725 { _ppState = Nothing

726726 , _ppPermissionId = Nothing

727727 }

@@ -740,11 +740,11 @@ instance FromJSON ProductPermission where

740740 parseJSON

741741 = withObject "ProductPermission"

742742 (\ o ->

743− ProductPermission <$>

743+ ProductPermission' <$>

744744 (o .:? "state") <*> (o .:? "permissionId"))

745745

746746instance ToJSON ProductPermission where

747− toJSON ProductPermission{..}

747+ toJSON ProductPermission'{..}

748748 = object

749749 (catMaybes

750750 [("state" .=) <$> _ppState,

@@ -756,7 +756,7 @@ instance ToJSON ProductPermission where

756756-- up to be managed.

757757--

758758-- /See:/ 'device' smart constructor.

759−data Device = Device

759+data Device = Device'

760760 { _dKind :: !Text

761761 , _dManagementType :: !(Maybe Text)

762762 , _dAndroidId :: !(Maybe Text)

@@ -774,7 +774,7 @@ data Device = Device

774774device

775775 :: Device

776776device =

777− Device

777+ Device'

778778 { _dKind = "androidenterprise#device"

779779 , _dManagementType = Nothing

780780 , _dAndroidId = Nothing

@@ -806,13 +806,13 @@ instance FromJSON Device where

806806 parseJSON

807807 = withObject "Device"

808808 (\ o ->

809− Device <$>

809+ Device' <$>

810810 (o .:? "kind" .!= "androidenterprise#device") <*>

811811 (o .:? "managementType")

812812 <*> (o .:? "androidId"))

813813

814814instance ToJSON Device where

815− toJSON Device{..}

815+ toJSON Device'{..}

816816 = object

817817 (catMaybes

818818 [Just ("kind" .= _dKind),

@@ -822,7 +822,7 @@ instance ToJSON Device where

822822-- | The install resources for the device.

823823--

824824-- /See:/ 'installsListResponse' smart constructor.

825−data InstallsListResponse = InstallsListResponse

825+data InstallsListResponse = InstallsListResponse'

826826 { _ilrKind :: !Text

827827 , _ilrInstall :: !(Maybe [Install])

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

@@ -837,7 +837,7 @@ data InstallsListResponse = InstallsListResponse

837837installsListResponse

838838 :: InstallsListResponse

839839installsListResponse =

840− InstallsListResponse

840+ InstallsListResponse'

841841 { _ilrKind = "androidenterprise#installsListResponse"

842842 , _ilrInstall = Nothing

843843 }

@@ -859,13 +859,13 @@ instance FromJSON InstallsListResponse where

859859 parseJSON

860860 = withObject "InstallsListResponse"

861861 (\ o ->

862− InstallsListResponse <$>

862+ InstallsListResponse' <$>

863863 (o .:? "kind" .!=

864864 "androidenterprise#installsListResponse")

865865 <*> (o .:? "install" .!= mempty))

866866

867867instance ToJSON InstallsListResponse where

868− toJSON InstallsListResponse{..}

868+ toJSON InstallsListResponse'{..}

869869 = object

870870 (catMaybes

871871 [Just ("kind" .= _ilrKind),

@@ -875,7 +875,7 @@ instance ToJSON InstallsListResponse where

875875-- configuration that may be pre-applied.

876876--

877877-- /See:/ 'appRestrictionsSchemaRestriction' smart constructor.

878−data AppRestrictionsSchemaRestriction = AppRestrictionsSchemaRestriction

878+data AppRestrictionsSchemaRestriction = AppRestrictionsSchemaRestriction'

879879 { _arsrRestrictionType :: !(Maybe Text)

880880 , _arsrEntry :: !(Maybe [Text])

881881 , _arsrKey :: !(Maybe Text)

@@ -905,7 +905,7 @@ data AppRestrictionsSchemaRestriction = AppRestrictionsSchemaRestriction

905905appRestrictionsSchemaRestriction

906906 :: AppRestrictionsSchemaRestriction

907907appRestrictionsSchemaRestriction =

908− AppRestrictionsSchemaRestriction

908+ AppRestrictionsSchemaRestriction'

909909 { _arsrRestrictionType = Nothing

910910 , _arsrEntry = Nothing

911911 , _arsrKey = Nothing

@@ -966,7 +966,7 @@ instance FromJSON AppRestrictionsSchemaRestriction

966966 parseJSON

967967 = withObject "AppRestrictionsSchemaRestriction"

968968 (\ o ->

969− AppRestrictionsSchemaRestriction <$>

969+ AppRestrictionsSchemaRestriction' <$>

970970 (o .:? "restrictionType") <*>

971971 (o .:? "entry" .!= mempty)

972972 <*> (o .:? "key")

@@ -977,7 +977,7 @@ instance FromJSON AppRestrictionsSchemaRestriction

977977

978978instance ToJSON AppRestrictionsSchemaRestriction

979979 where

980− toJSON AppRestrictionsSchemaRestriction{..}

980+ toJSON AppRestrictionsSchemaRestriction'{..}

981981 = object

982982 (catMaybes

983983 [("restrictionType" .=) <$> _arsrRestrictionType,

@@ -990,7 +990,7 @@ instance ToJSON AppRestrictionsSchemaRestriction

990990-- | The matching user resources.

991991--

992992-- /See:/ 'usersListResponse' smart constructor.

993−data UsersListResponse = UsersListResponse

993+data UsersListResponse = UsersListResponse'

994994 { _ulrKind :: !Text

995995 , _ulrUser :: !(Maybe [User])

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

@@ -1005,7 +1005,7 @@ data UsersListResponse = UsersListResponse

10051005usersListResponse

10061006 :: UsersListResponse

10071007usersListResponse =

1008− UsersListResponse

1008+ UsersListResponse'

10091009 { _ulrKind = "androidenterprise#usersListResponse"

10101010 , _ulrUser = Nothing

10111011 }

@@ -1025,13 +1025,13 @@ instance FromJSON UsersListResponse where

10251025 parseJSON

10261026 = withObject "UsersListResponse"

10271027 (\ o ->

1028− UsersListResponse <$>

1028+ UsersListResponse' <$>

10291029 (o .:? "kind" .!=

10301030 "androidenterprise#usersListResponse")

10311031 <*> (o .:? "user" .!= mempty))

10321032

10331033instance ToJSON UsersListResponse where

1034− toJSON UsersListResponse{..}

1034+ toJSON UsersListResponse'{..}

10351035 = object

10361036 (catMaybes

10371037 [Just ("kind" .= _ulrKind),

@@ -1040,7 +1040,7 @@ instance ToJSON UsersListResponse where

10401040-- | This represents a single version of the app.

10411041--

10421042-- /See:/ 'appVersion' smart constructor.

1043−data AppVersion = AppVersion

1043+data AppVersion = AppVersion'

10441044 { _avVersionCode :: !(Maybe (Textual Int32))

10451045 , _avVersionString :: !(Maybe Text)

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

@@ -1055,7 +1055,7 @@ data AppVersion = AppVersion

10551055appVersion

10561056 :: AppVersion

10571057appVersion =

1058− AppVersion

1058+ AppVersion'

10591059 { _avVersionCode = Nothing

10601060 , _avVersionString = Nothing

10611061 }

@@ -1079,11 +1079,11 @@ instance FromJSON AppVersion where

10791079 parseJSON

10801080 = withObject "AppVersion"

10811081 (\ o ->

1082− AppVersion <$>

1082+ AppVersion' <$>

10831083 (o .:? "versionCode") <*> (o .:? "versionString"))

10841084

10851085instance ToJSON AppVersion where

1086− toJSON AppVersion{..}

1086+ toJSON AppVersion'{..}

10871087 = object

10881088 (catMaybes

10891089 [("versionCode" .=) <$> _avVersionCode,

@@ -1092,7 +1092,7 @@ instance ToJSON AppVersion where

10921092-- | The grouplicense resources for the enterprise.

10931093--

10941094-- /See:/ 'groupLicensesListResponse' smart constructor.

1095−data GroupLicensesListResponse = GroupLicensesListResponse

1095+data GroupLicensesListResponse = GroupLicensesListResponse'

10961096 { _gllrGroupLicense :: !(Maybe [GroupLicense])

10971097 , _gllrKind :: !Text

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

@@ -1107,7 +1107,7 @@ data GroupLicensesListResponse = GroupLicensesListResponse

11071107groupLicensesListResponse

11081108 :: GroupLicensesListResponse

11091109groupLicensesListResponse =

1110− GroupLicensesListResponse

1110+ GroupLicensesListResponse'

11111111 { _gllrGroupLicense = Nothing

11121112 , _gllrKind = "androidenterprise#groupLicensesListResponse"

11131113 }

@@ -1129,13 +1129,13 @@ instance FromJSON GroupLicensesListResponse where

11291129 parseJSON

11301130 = withObject "GroupLicensesListResponse"

11311131 (\ o ->

1132− GroupLicensesListResponse <$>

1132+ GroupLicensesListResponse' <$>

11331133 (o .:? "groupLicense" .!= mempty) <*>

11341134 (o .:? "kind" .!=

11351135 "androidenterprise#groupLicensesListResponse"))

11361136

11371137instance ToJSON GroupLicensesListResponse where

1138− toJSON GroupLicensesListResponse{..}

1138+ toJSON GroupLicensesListResponse'{..}

11391139 = object

11401140 (catMaybes

11411141 [("groupLicense" .=) <$> _gllrGroupLicense,

@@ -1154,7 +1154,7 @@ instance ToJSON GroupLicensesListResponse where

11541154-- policies and the purpose of the apps concerned.

11551155--

11561156-- /See:/ 'collection' smart constructor.

1157−data Collection = Collection

1157+data Collection = Collection'

11581158 { _colKind :: !Text

11591159 , _colCollectionId :: !(Maybe Text)

11601160 , _colVisibility :: !(Maybe Text)

@@ -1178,7 +1178,7 @@ data Collection = Collection

11781178collection

11791179 :: Collection

11801180collection =

1181− Collection

1181+ Collection'

11821182 { _colKind = "androidenterprise#collection"

11831183 , _colCollectionId = Nothing

11841184 , _colVisibility = Nothing

@@ -1225,7 +1225,7 @@ instance FromJSON Collection where

12251225 parseJSON

12261226 = withObject "Collection"

12271227 (\ o ->

1228− Collection <$>

1228+ Collection' <$>

12291229 (o .:? "kind" .!= "androidenterprise#collection") <*>

12301230 (o .:? "collectionId")

12311231 <*> (o .:? "visibility")

@@ -1233,7 +1233,7 @@ instance FromJSON Collection where

12331233 <*> (o .:? "productId" .!= mempty))

12341234

12351235instance ToJSON Collection where

1236− toJSON Collection{..}

1236+ toJSON Collection'{..}

12371237 = object

12381238 (catMaybes

12391239 [Just ("kind" .= _colKind),

@@ -1245,7 +1245,7 @@ instance ToJSON Collection where

12451245-- | A set of products.

12461246--

12471247-- /See:/ 'productSet' smart constructor.

1248−data ProductSet = ProductSet

1248+data ProductSet = ProductSet'

12491249 { _psKind :: !Text

12501250 , _psProductId :: !(Maybe [Text])

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

@@ -1260,7 +1260,7 @@ data ProductSet = ProductSet

12601260productSet

12611261 :: ProductSet

12621262productSet =

1263− ProductSet

1263+ ProductSet'

12641264 { _psKind = "androidenterprise#productSet"

12651265 , _psProductId = Nothing

12661266 }

@@ -1281,12 +1281,12 @@ instance FromJSON ProductSet where

12811281 parseJSON

12821282 = withObject "ProductSet"

12831283 (\ o ->

1284− ProductSet <$>

1284+ ProductSet' <$>

12851285 (o .:? "kind" .!= "androidenterprise#productSet") <*>

12861286 (o .:? "productId" .!= mempty))

12871287

12881288instance ToJSON ProductSet where

1289− toJSON ProductSet{..}

1289+ toJSON ProductSet'{..}

12901290 = object

12911291 (catMaybes

12921292 [Just ("kind" .= _psKind),

@@ -1313,7 +1313,7 @@ instance ToJSON ProductSet where

13131313-- themselves.

13141314--

13151315-- /See:/ 'install' smart constructor.

1316−data Install = Install

1316+data Install = Install'

13171317 { _iVersionCode :: !(Maybe (Textual Int32))

13181318 , _iKind :: !Text

13191319 , _iInstallState :: !(Maybe Text)

@@ -1334,7 +1334,7 @@ data Install = Install

13341334install

13351335 :: Install

13361336install =

1337− Install

1337+ Install'

13381338 { _iVersionCode = Nothing

13391339 , _iKind = "androidenterprise#install"

13401340 , _iInstallState = Nothing

@@ -1372,14 +1372,14 @@ instance FromJSON Install where

13721372 parseJSON

13731373 = withObject "Install"

13741374 (\ o ->

1375− Install <$>

1375+ Install' <$>

13761376 (o .:? "versionCode") <*>

13771377 (o .:? "kind" .!= "androidenterprise#install")

13781378 <*> (o .:? "installState")

13791379 <*> (o .:? "productId"))

13801380

13811381instance ToJSON Install where

1382− toJSON Install{..}

1382+ toJSON Install'{..}

13831383 = object

13841384 (catMaybes

13851385 [("versionCode" .=) <$> _iVersionCode,

@@ -1398,7 +1398,7 @@ instance ToJSON Install where

13981398-- primary email address.

13991399--

14001400-- /See:/ 'user' smart constructor.

1401−data User = User

1401+data User = User'

14021402 { _uKind :: !Text

14031403 , _uId :: !(Maybe Text)

14041404 , _uPrimaryEmail :: !(Maybe Text)

@@ -1416,7 +1416,7 @@ data User = User

14161416user

14171417 :: User

14181418user =

1419− User

1419+ User'

14201420 { _uKind = "androidenterprise#user"

14211421 , _uId = Nothing

14221422 , _uPrimaryEmail = Nothing

@@ -1442,13 +1442,13 @@ instance FromJSON User where

14421442 parseJSON

14431443 = withObject "User"

14441444 (\ o ->

1445− User <$>

1445+ User' <$>

14461446 (o .:? "kind" .!= "androidenterprise#user") <*>

14471447 (o .:? "id")

14481448 <*> (o .:? "primaryEmail"))

14491449

14501450instance ToJSON User where

1451− toJSON User{..}

1451+ toJSON User'{..}

14521452 = object

14531453 (catMaybes

14541454 [Just ("kind" .= _uKind), ("id" .=) <$> _uId,

@@ -1456,7 +1456,7 @@ instance ToJSON User where

14561456

14571457--

14581458-- /See:/ 'productsGenerateApprovalURLResponse' smart constructor.

1459−newtype ProductsGenerateApprovalURLResponse = ProductsGenerateApprovalURLResponse

1459+newtype ProductsGenerateApprovalURLResponse = ProductsGenerateApprovalURLResponse'

14601460 { _pgaurURL :: Maybe Text

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

14621462

@@ -1468,7 +1468,7 @@ newtype ProductsGenerateApprovalURLResponse = ProductsGenerateApprovalURLRespons

14681468productsGenerateApprovalURLResponse

14691469 :: ProductsGenerateApprovalURLResponse

14701470productsGenerateApprovalURLResponse =

1471− ProductsGenerateApprovalURLResponse

1471+ ProductsGenerateApprovalURLResponse'

14721472 { _pgaurURL = Nothing

14731473 }

14741474

@@ -1488,12 +1488,12 @@ instance FromJSON ProductsGenerateApprovalURLResponse

14881488 parseJSON

14891489 = withObject "ProductsGenerateApprovalURLResponse"

14901490 (\ o ->

1491− ProductsGenerateApprovalURLResponse <$>

1491+ ProductsGenerateApprovalURLResponse' <$>

14921492 (o .:? "url"))

14931493

14941494instance ToJSON ProductsGenerateApprovalURLResponse

14951495 where

1496− toJSON ProductsGenerateApprovalURLResponse{..}

1496+ toJSON ProductsGenerateApprovalURLResponse'{..}

14971497 = object (catMaybes [("url" .=) <$> _pgaurURL])

14981498

14991499-- | Definition of a Google Play for Work store page, made of a localized

@@ -1501,7 +1501,7 @@ instance ToJSON ProductsGenerateApprovalURLResponse

15011501-- a subcollection.

15021502--

15031503-- /See:/ 'storePage' smart constructor.

1504−data StorePage = StorePage

1504+data StorePage = StorePage'

15051505 { _spKind :: !Text

15061506 , _spLink :: !(Maybe [Text])

15071507 , _spName :: !(Maybe [LocalizedText])

@@ -1522,7 +1522,7 @@ data StorePage = StorePage

15221522storePage

15231523 :: StorePage

15241524storePage =

1525− StorePage

1525+ StorePage'

15261526 { _spKind = "androidenterprise#storePage"

15271527 , _spLink = Nothing

15281528 , _spName = Nothing

@@ -1561,14 +1561,14 @@ instance FromJSON StorePage where

15611561 parseJSON

15621562 = withObject "StorePage"

15631563 (\ o ->

1564− StorePage <$>

1564+ StorePage' <$>

15651565 (o .:? "kind" .!= "androidenterprise#storePage") <*>

15661566 (o .:? "link" .!= mempty)

15671567 <*> (o .:? "name" .!= mempty)

15681568 <*> (o .:? "id"))

15691569

15701570instance ToJSON StorePage where

1571− toJSON StorePage{..}

1571+ toJSON StorePage'{..}

15721572 = object

15731573 (catMaybes

15741574 [Just ("kind" .= _spKind), ("link" .=) <$> _spLink,

@@ -1576,7 +1576,7 @@ instance ToJSON StorePage where

15761576

15771577--

15781578-- /See:/ 'enterprisesSendTestPushNotificationResponse' smart constructor.

1579−data EnterprisesSendTestPushNotificationResponse = EnterprisesSendTestPushNotificationResponse

1579+data EnterprisesSendTestPushNotificationResponse = EnterprisesSendTestPushNotificationResponse'

15801580 { _estpnrTopicName :: !(Maybe Text)

15811581 , _estpnrMessageId :: !(Maybe Text)

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

@@ -1591,7 +1591,7 @@ data EnterprisesSendTestPushNotificationResponse = EnterprisesSendTestPushNotifi

15911591enterprisesSendTestPushNotificationResponse

15921592 :: EnterprisesSendTestPushNotificationResponse

15931593enterprisesSendTestPushNotificationResponse =

1594− EnterprisesSendTestPushNotificationResponse

1594+ EnterprisesSendTestPushNotificationResponse'

15951595 { _estpnrTopicName = Nothing

15961596 , _estpnrMessageId = Nothing

15971597 }

@@ -1615,13 +1615,13 @@ instance FromJSON

16151615 = withObject

16161616 "EnterprisesSendTestPushNotificationResponse"

16171617 (\ o ->

1618− EnterprisesSendTestPushNotificationResponse <$>

1618+ EnterprisesSendTestPushNotificationResponse' <$>

16191619 (o .:? "topicName") <*> (o .:? "messageId"))

16201620

16211621instance ToJSON

16221622 EnterprisesSendTestPushNotificationResponse where

16231623 toJSON

1624− EnterprisesSendTestPushNotificationResponse{..}

1624+ EnterprisesSendTestPushNotificationResponse'{..}

16251625 = object

16261626 (catMaybes

16271627 [("topicName" .=) <$> _estpnrTopicName,

@@ -1630,7 +1630,7 @@ instance ToJSON

16301630-- | The matching enterprise resources.

16311631--

16321632-- /See:/ 'enterprisesListResponse' smart constructor.

1633−data EnterprisesListResponse = EnterprisesListResponse

1633+data EnterprisesListResponse = EnterprisesListResponse'

16341634 { _elrKind :: !Text

16351635 , _elrEnterprise :: !(Maybe [Enterprise])

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

@@ -1645,7 +1645,7 @@ data EnterprisesListResponse = EnterprisesListResponse

16451645enterprisesListResponse

16461646 :: EnterprisesListResponse

16471647enterprisesListResponse =

1648− EnterprisesListResponse

1648+ EnterprisesListResponse'

16491649 { _elrKind = "androidenterprise#enterprisesListResponse"

16501650 , _elrEnterprise = Nothing

16511651 }

@@ -1667,13 +1667,13 @@ instance FromJSON EnterprisesListResponse where

16671667 parseJSON

16681668 = withObject "EnterprisesListResponse"

16691669 (\ o ->

1670− EnterprisesListResponse <$>

1670+ EnterprisesListResponse' <$>

16711671 (o .:? "kind" .!=

16721672 "androidenterprise#enterprisesListResponse")

16731673 <*> (o .:? "enterprise" .!= mempty))

16741674

16751675instance ToJSON EnterprisesListResponse where

1676− toJSON EnterprisesListResponse{..}

1676+ toJSON EnterprisesListResponse'{..}

16771677 = object

16781678 (catMaybes

16791679 [Just ("kind" .= _elrKind),

@@ -1683,7 +1683,7 @@ instance ToJSON EnterprisesListResponse where

16831683-- for the product.

16841684--

16851685-- /See:/ 'appRestrictionsSchema' smart constructor.

1686−data AppRestrictionsSchema = AppRestrictionsSchema

1686+data AppRestrictionsSchema = AppRestrictionsSchema'

16871687 { _arsKind :: !Text

16881688 , _arsRestrictions :: !(Maybe [AppRestrictionsSchemaRestriction])

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

@@ -1698,7 +1698,7 @@ data AppRestrictionsSchema = AppRestrictionsSchema

16981698appRestrictionsSchema

16991699 :: AppRestrictionsSchema

17001700appRestrictionsSchema =

1701− AppRestrictionsSchema

1701+ AppRestrictionsSchema'

17021702 { _arsKind = "androidenterprise#appRestrictionsSchema"

17031703 , _arsRestrictions = Nothing

17041704 }

@@ -1720,13 +1720,13 @@ instance FromJSON AppRestrictionsSchema where

17201720 parseJSON

17211721 = withObject "AppRestrictionsSchema"

17221722 (\ o ->

1723− AppRestrictionsSchema <$>

1723+ AppRestrictionsSchema' <$>

17241724 (o .:? "kind" .!=

17251725 "androidenterprise#appRestrictionsSchema")

17261726 <*> (o .:? "restrictions" .!= mempty))

17271727

17281728instance ToJSON AppRestrictionsSchema where

1729− toJSON AppRestrictionsSchema{..}

1729+ toJSON AppRestrictionsSchema'{..}

17301730 = object

17311731 (catMaybes

17321732 [Just ("kind" .= _arsKind),

@@ -1735,7 +1735,7 @@ instance ToJSON AppRestrictionsSchema where

17351735-- | A localized string with its locale.

17361736--

17371737-- /See:/ 'localizedText' smart constructor.

1738−data LocalizedText = LocalizedText

1738+data LocalizedText = LocalizedText'

17391739 { _ltText :: !(Maybe Text)

17401740 , _ltLocale :: !(Maybe Text)

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

@@ -1750,7 +1750,7 @@ data LocalizedText = LocalizedText

17501750localizedText

17511751 :: LocalizedText

17521752localizedText =

1753− LocalizedText

1753+ LocalizedText'

17541754 { _ltText = Nothing

17551755 , _ltLocale = Nothing

17561756 }

@@ -1767,11 +1767,11 @@ instance FromJSON LocalizedText where

17671767 parseJSON

17681768 = withObject "LocalizedText"

17691769 (\ o ->

1770− LocalizedText <$>

1770+ LocalizedText' <$>

17711771 (o .:? "text") <*> (o .:? "locale"))

17721772

17731773instance ToJSON LocalizedText where

1774− toJSON LocalizedText{..}

1774+ toJSON LocalizedText'{..}

17751775 = object

17761776 (catMaybes

17771777 [("text" .=) <$> _ltText,

@@ -1783,7 +1783,7 @@ instance ToJSON LocalizedText where

17831783-- automatically downloaded.

17841784--

17851785-- /See:/ 'userToken' smart constructor.

1786−data UserToken = UserToken

1786+data UserToken = UserToken'

17871787 { _utKind :: !Text

17881788 , _utToken :: !(Maybe Text)

17891789 , _utUserId :: !(Maybe Text)

@@ -1801,7 +1801,7 @@ data UserToken = UserToken

18011801userToken

18021802 :: UserToken

18031803userToken =

1804− UserToken

1804+ UserToken'

18051805 { _utKind = "androidenterprise#userToken"

18061806 , _utToken = Nothing

18071807 , _utUserId = Nothing

@@ -1825,13 +1825,13 @@ instance FromJSON UserToken where

18251825 parseJSON

18261826 = withObject "UserToken"

18271827 (\ o ->

1828− UserToken <$>

1828+ UserToken' <$>

18291829 (o .:? "kind" .!= "androidenterprise#userToken") <*>

18301830 (o .:? "token")

18311831 <*> (o .:? "userId"))

18321832

18331833instance ToJSON UserToken where

1834− toJSON UserToken{..}

1834+ toJSON UserToken'{..}

18351835 = object

18361836 (catMaybes

18371837 [Just ("kind" .= _utKind), ("token" .=) <$> _utToken,

@@ -1840,7 +1840,7 @@ instance ToJSON UserToken where

18401840-- | The device resources for the user.

18411841--

18421842-- /See:/ 'devicesListResponse' smart constructor.

1843−data DevicesListResponse = DevicesListResponse

1843+data DevicesListResponse = DevicesListResponse'

18441844 { _dlrKind :: !Text

18451845 , _dlrDevice :: !(Maybe [Device])

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

@@ -1855,7 +1855,7 @@ data DevicesListResponse = DevicesListResponse

18551855devicesListResponse

18561856 :: DevicesListResponse

18571857devicesListResponse =

1858− DevicesListResponse

1858+ DevicesListResponse'

18591859 { _dlrKind = "androidenterprise#devicesListResponse"

18601860 , _dlrDevice = Nothing

18611861 }

@@ -1876,13 +1876,13 @@ instance FromJSON DevicesListResponse where

18761876 parseJSON

18771877 = withObject "DevicesListResponse"

18781878 (\ o ->

1879− DevicesListResponse <$>

1879+ DevicesListResponse' <$>

18801880 (o .:? "kind" .!=

18811881 "androidenterprise#devicesListResponse")

18821882 <*> (o .:? "device" .!= mempty))

18831883

18841884instance ToJSON DevicesListResponse where

1885− toJSON DevicesListResponse{..}

1885+ toJSON DevicesListResponse'{..}

18861886 = object

18871887 (catMaybes

18881888 [Just ("kind" .= _dlrKind),

@@ -1913,7 +1913,7 @@ instance ToJSON DevicesListResponse where

19131913-- the list method.

19141914--

19151915-- /See:/ 'enterprise' smart constructor.

1916−data Enterprise = Enterprise

1916+data Enterprise = Enterprise'

19171917 { _eKind :: !Text

19181918 , _ePrimaryDomain :: !(Maybe Text)

19191919 , _eName :: !(Maybe Text)

@@ -1934,7 +1934,7 @@ data Enterprise = Enterprise

19341934enterprise

19351935 :: Enterprise

19361936enterprise =

1937− Enterprise

1937+ Enterprise'

19381938 { _eKind = "androidenterprise#enterprise"

19391939 , _ePrimaryDomain = Nothing

19401940 , _eName = Nothing

@@ -1964,14 +1964,14 @@ instance FromJSON Enterprise where

19641964 parseJSON

19651965 = withObject "Enterprise"

19661966 (\ o ->

1967− Enterprise <$>

1967+ Enterprise' <$>

19681968 (o .:? "kind" .!= "androidenterprise#enterprise") <*>

19691969 (o .:? "primaryDomain")

19701970 <*> (o .:? "name")

19711971 <*> (o .:? "id"))

19721972

19731973instance ToJSON Enterprise where

1974− toJSON Enterprise{..}

1974+ toJSON Enterprise'{..}

19751975 = object

19761976 (catMaybes

19771977 [Just ("kind" .= _eKind),

@@ -1982,7 +1982,7 @@ instance ToJSON Enterprise where

19821982-- only specifying the page to display the first time the store is opened.

19831983--

19841984-- /See:/ 'storeLayout' smart constructor.

1985−data StoreLayout = StoreLayout

1985+data StoreLayout = StoreLayout'

19861986 { _slKind :: !Text

19871987 , _slHomepageId :: !(Maybe Text)

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

@@ -1997,7 +1997,7 @@ data StoreLayout = StoreLayout

19971997storeLayout

19981998 :: StoreLayout

19991999storeLayout =

2000− StoreLayout

2000+ StoreLayout'

20012001 { _slKind = "androidenterprise#storeLayout"

20022002 , _slHomepageId = Nothing

20032003 }

@@ -2020,12 +2020,12 @@ instance FromJSON StoreLayout where

20202020 parseJSON

20212021 = withObject "StoreLayout"

20222022 (\ o ->

2023− StoreLayout <$>

2023+ StoreLayout' <$>

20242024 (o .:? "kind" .!= "androidenterprise#storeLayout")

20252025 <*> (o .:? "homepageId"))

20262026

20272027instance ToJSON StoreLayout where

2028− toJSON StoreLayout{..}

2028+ toJSON StoreLayout'{..}

20292029 = object

20302030 (catMaybes

20312031 [Just ("kind" .= _slKind),

@@ -2040,7 +2040,7 @@ instance ToJSON StoreLayout where

20402040-- user interface.

20412041--

20422042-- /See:/ 'product' smart constructor.

2043−data Product = Product

2043+data Product = Product'

20442044 { _pAuthorName :: !(Maybe Text)

20452045 , _pKind :: !Text

20462046 , _pWorkDetailsURL :: !(Maybe Text)

@@ -2082,7 +2082,7 @@ data Product = Product

20822082product

20832083 :: Product

20842084product =

2085− Product

2085+ Product'

20862086 { _pAuthorName = Nothing

20872087 , _pKind = "androidenterprise#product"

20882088 , _pWorkDetailsURL = Nothing

@@ -2169,7 +2169,7 @@ instance FromJSON Product where

21692169 parseJSON

21702170 = withObject "Product"

21712171 (\ o ->

2172− Product <$>

2172+ Product' <$>

21732173 (o .:? "authorName") <*>

21742174 (o .:? "kind" .!= "androidenterprise#product")

21752175 <*> (o .:? "workDetailsUrl")

@@ -2183,7 +2183,7 @@ instance FromJSON Product where

21832183 <*> (o .:? "detailsUrl"))

21842184

21852185instance ToJSON Product where

2186− toJSON Product{..}

2186+ toJSON Product'{..}

21872187 = object

21882188 (catMaybes

21892189 [("authorName" .=) <$> _pAuthorName,

@@ -2202,7 +2202,7 @@ instance ToJSON Product where

22022202-- | The entitlement resources for the user.

22032203--

22042204-- /See:/ 'entitlementsListResponse' smart constructor.

2205−data EntitlementsListResponse = EntitlementsListResponse

2205+data EntitlementsListResponse = EntitlementsListResponse'

22062206 { _entKind :: !Text

22072207 , _entEntitlement :: !(Maybe [Entitlement])

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

@@ -2217,7 +2217,7 @@ data EntitlementsListResponse = EntitlementsListResponse

22172217entitlementsListResponse

22182218 :: EntitlementsListResponse

22192219entitlementsListResponse =

2220− EntitlementsListResponse

2220+ EntitlementsListResponse'

22212221 { _entKind = "androidenterprise#entitlementsListResponse"

22222222 , _entEntitlement = Nothing

22232223 }

@@ -2241,13 +2241,13 @@ instance FromJSON EntitlementsListResponse where

22412241 parseJSON

22422242 = withObject "EntitlementsListResponse"

22432243 (\ o ->

2244− EntitlementsListResponse <$>

2244+ EntitlementsListResponse' <$>

22452245 (o .:? "kind" .!=

22462246 "androidenterprise#entitlementsListResponse")

22472247 <*> (o .:? "entitlement" .!= mempty))

22482248

22492249instance ToJSON EntitlementsListResponse where

2250− toJSON EntitlementsListResponse{..}

2250+ toJSON EntitlementsListResponse'{..}

22512251 = object

22522252 (catMaybes

22532253 [Just ("kind" .= _entKind),

@@ -2257,7 +2257,7 @@ instance ToJSON EntitlementsListResponse where

22572257-- they have been accepted by the enterprise.

22582258--

22592259-- /See:/ 'productPermissions' smart constructor.

2260−data ProductPermissions = ProductPermissions

2260+data ProductPermissions = ProductPermissions'

22612261 { _ppKind :: !Text

22622262 , _ppPermission :: !(Maybe [ProductPermission])

22632263 , _ppProductId :: !(Maybe Text)

@@ -2275,7 +2275,7 @@ data ProductPermissions = ProductPermissions

22752275productPermissions

22762276 :: ProductPermissions

22772277productPermissions =

2278− ProductPermissions

2278+ ProductPermissions'

22792279 { _ppKind = "androidenterprise#productPermissions"

22802280 , _ppPermission = Nothing

22812281 , _ppProductId = Nothing

@@ -2303,14 +2303,14 @@ instance FromJSON ProductPermissions where

23032303 parseJSON

23042304 = withObject "ProductPermissions"

23052305 (\ o ->

2306− ProductPermissions <$>

2306+ ProductPermissions' <$>

23072307 (o .:? "kind" .!=

23082308 "androidenterprise#productPermissions")

23092309 <*> (o .:? "permission" .!= mempty)

23102310 <*> (o .:? "productId"))

23112311

23122312instance ToJSON ProductPermissions where

2313− toJSON ProductPermissions{..}

2313+ toJSON ProductPermissions'{..}

23142314 = object

23152315 (catMaybes

23162316 [Just ("kind" .= _ppKind),

@@ -2326,7 +2326,7 @@ instance ToJSON ProductPermissions where

23262326-- obtaining consent from the enterprise.

23272327--

23282328-- /See:/ 'permission' smart constructor.

2329−data Permission = Permission

2329+data Permission = Permission'

23302330 { _perKind :: !Text

23312331 , _perName :: !(Maybe Text)

23322332 , _perDescription :: !(Maybe Text)

@@ -2347,7 +2347,7 @@ data Permission = Permission

23472347permission

23482348 :: Permission

23492349permission =

2350− Permission

2350+ Permission'

23512351 { _perKind = "androidenterprise#permission"

23522352 , _perName = Nothing

23532353 , _perDescription = Nothing

@@ -2380,14 +2380,14 @@ instance FromJSON Permission where

23802380 parseJSON

23812381 = withObject "Permission"

23822382 (\ o ->

2383− Permission <$>

2383+ Permission' <$>

23842384 (o .:? "kind" .!= "androidenterprise#permission") <*>

23852385 (o .:? "name")

23862386 <*> (o .:? "description")

23872387 <*> (o .:? "permissionId"))

23882388

23892389instance ToJSON Permission where

2390− toJSON Permission{..}

2390+ toJSON Permission'{..}

23912391 = object

23922392 (catMaybes

23932393 [Just ("kind" .= _perKind), ("name" .=) <$> _perName,

@@ -2396,7 +2396,7 @@ instance ToJSON Permission where

23962396

23972397--

23982398-- /See:/ 'productsApproveRequest' smart constructor.

2399−newtype ProductsApproveRequest = ProductsApproveRequest

2399+newtype ProductsApproveRequest = ProductsApproveRequest'

24002400 { _parApprovalURLInfo :: Maybe ApprovalURLInfo

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

24022402

@@ -2408,7 +2408,7 @@ newtype ProductsApproveRequest = ProductsApproveRequest

24082408productsApproveRequest

24092409 :: ProductsApproveRequest

24102410productsApproveRequest =

2411− ProductsApproveRequest

2411+ ProductsApproveRequest'

24122412 { _parApprovalURLInfo = Nothing

24132413 }

24142414

@@ -2427,10 +2427,11 @@ instance FromJSON ProductsApproveRequest where

24272427 parseJSON

24282428 = withObject "ProductsApproveRequest"

24292429 (\ o ->

2430− ProductsApproveRequest <$> (o .:? "approvalUrlInfo"))

2430+ ProductsApproveRequest' <$>

2431+ (o .:? "approvalUrlInfo"))

24312432

24322433instance ToJSON ProductsApproveRequest where

2433− toJSON ProductsApproveRequest{..}

2434+ toJSON ProductsApproveRequest'{..}

24342435 = object

24352436 (catMaybes

24362437 [("approvalUrlInfo" .=) <$> _parApprovalURLInfo])

@@ -2438,7 +2439,7 @@ instance ToJSON ProductsApproveRequest where

24382439-- | The user resources for the collection.

24392440--

24402441-- /See:/ 'collectionViewersListResponse' smart constructor.

2441−data CollectionViewersListResponse = CollectionViewersListResponse

2442+data CollectionViewersListResponse = CollectionViewersListResponse'

24422443 { _cvlrKind :: !Text

24432444 , _cvlrUser :: !(Maybe [User])

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

@@ -2453,7 +2454,7 @@ data CollectionViewersListResponse = CollectionViewersListResponse

24532454collectionViewersListResponse

24542455 :: CollectionViewersListResponse

24552456collectionViewersListResponse =

2456− CollectionViewersListResponse

2457+ CollectionViewersListResponse'

24572458 { _cvlrKind = "androidenterprise#collectionViewersListResponse"

24582459 , _cvlrUser = Nothing

24592460 }

@@ -2474,13 +2475,13 @@ instance FromJSON CollectionViewersListResponse where

24742475 parseJSON

24752476 = withObject "CollectionViewersListResponse"

24762477 (\ o ->

2477− CollectionViewersListResponse <$>

2478+ CollectionViewersListResponse' <$>

24782479 (o .:? "kind" .!=

24792480 "androidenterprise#collectionViewersListResponse")

24802481 <*> (o .:? "user" .!= mempty))

24812482

24822483instance ToJSON CollectionViewersListResponse where

2483− toJSON CollectionViewersListResponse{..}

2484+ toJSON CollectionViewersListResponse'{..}

24842485 = object

24852486 (catMaybes

24862487 [Just ("kind" .= _cvlrKind),

@@ -2512,7 +2513,7 @@ instance ToJSON CollectionViewersListResponse where

25122513-- cannot be removed via the API.

25132514--

25142515-- /See:/ 'entitlement' smart constructor.

2515−data Entitlement = Entitlement

2516+data Entitlement = Entitlement'

25162517 { _eeKind :: !Text

25172518 , _eeReason :: !(Maybe Text)

25182519 , _eeProductId :: !(Maybe Text)

@@ -2530,7 +2531,7 @@ data Entitlement = Entitlement

25302531entitlement

25312532 :: Entitlement

25322533entitlement =

2533− Entitlement

2534+ Entitlement'

25342535 { _eeKind = "androidenterprise#entitlement"

25352536 , _eeReason = Nothing

25362537 , _eeProductId = Nothing

@@ -2557,13 +2558,13 @@ instance FromJSON Entitlement where

25572558 parseJSON

25582559 = withObject "Entitlement"

25592560 (\ o ->

2560− Entitlement <$>

2561+ Entitlement' <$>

25612562 (o .:? "kind" .!= "androidenterprise#entitlement")

25622563 <*> (o .:? "reason")

25632564 <*> (o .:? "productId"))

25642565

25652566instance ToJSON Entitlement where

2566− toJSON Entitlement{..}

2567+ toJSON Entitlement'{..}

25672568 = object

25682569 (catMaybes

25692570 [Just ("kind" .= _eeKind),

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Delete.hs+3−3

@@ -54,7 +54,7 @@ type CollectionsDeleteResource =

5454-- | Deletes a collection.

5555--

5656-- /See:/ 'collectionsDelete' smart constructor.

57−data CollectionsDelete = CollectionsDelete

57+data CollectionsDelete = CollectionsDelete'

5858 { _cddEnterpriseId :: !Text

5959 , _cddCollectionId :: !Text

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

@@ -71,7 +71,7 @@ collectionsDelete

7171 -> Text -- ^ 'cddCollectionId'

7272 -> CollectionsDelete

7373collectionsDelete pCddEnterpriseId_ pCddCollectionId_ =

74− CollectionsDelete

74+ CollectionsDelete'

7575 { _cddEnterpriseId = pCddEnterpriseId_

7676 , _cddCollectionId = pCddCollectionId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest CollectionsDelete where

9292 type Rs CollectionsDelete = ()

9393 type Scopes CollectionsDelete =

9494 '["https://www.googleapis.com/auth/androidenterprise"]

95− requestClient CollectionsDelete{..}

95+ requestClient CollectionsDelete'{..}

9696 = go _cddEnterpriseId _cddCollectionId (Just AltJSON)

9797 androidEnterpriseService

9898 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Get.hs+3−3

@@ -54,7 +54,7 @@ type CollectionsGetResource =

5454-- | Retrieves the details of a collection.

5555--

5656-- /See:/ 'collectionsGet' smart constructor.

57−data CollectionsGet = CollectionsGet

57+data CollectionsGet = CollectionsGet'

5858 { _cgEnterpriseId :: !Text

5959 , _cgCollectionId :: !Text

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

@@ -71,7 +71,7 @@ collectionsGet

7171 -> Text -- ^ 'cgCollectionId'

7272 -> CollectionsGet

7373collectionsGet pCgEnterpriseId_ pCgCollectionId_ =

74− CollectionsGet

74+ CollectionsGet'

7575 { _cgEnterpriseId = pCgEnterpriseId_

7676 , _cgCollectionId = pCgCollectionId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest CollectionsGet where

9292 type Rs CollectionsGet = Collection

9393 type Scopes CollectionsGet =

9494 '["https://www.googleapis.com/auth/androidenterprise"]

95− requestClient CollectionsGet{..}

95+ requestClient CollectionsGet'{..}

9696 = go _cgEnterpriseId _cgCollectionId (Just AltJSON)

9797 androidEnterpriseService

9898 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Insert.hs+3−3

@@ -54,7 +54,7 @@ type CollectionsInsertResource =

5454-- | Creates a new collection.

5555--

5656-- /See:/ 'collectionsInsert' smart constructor.

57−data CollectionsInsert = CollectionsInsert

57+data CollectionsInsert = CollectionsInsert'

5858 { _ciEnterpriseId :: !Text

5959 , _ciPayload :: !Collection

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

@@ -71,7 +71,7 @@ collectionsInsert

7171 -> Collection -- ^ 'ciPayload'

7272 -> CollectionsInsert

7373collectionsInsert pCiEnterpriseId_ pCiPayload_ =

74− CollectionsInsert

74+ CollectionsInsert'

7575 { _ciEnterpriseId = pCiEnterpriseId_

7676 , _ciPayload = pCiPayload_

7777 }

@@ -91,7 +91,7 @@ instance GoogleRequest CollectionsInsert where

9191 type Rs CollectionsInsert = Collection

9292 type Scopes CollectionsInsert =

9393 '["https://www.googleapis.com/auth/androidenterprise"]

94− requestClient CollectionsInsert{..}

94+ requestClient CollectionsInsert'{..}

9595 = go _ciEnterpriseId (Just AltJSON) _ciPayload

9696 androidEnterpriseService

9797 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/List.hs+3−3

@@ -53,7 +53,7 @@ type CollectionsListResource =

5353-- | Retrieves the IDs of all the collections for an enterprise.

5454--

5555-- /See:/ 'collectionsList' smart constructor.

56−newtype CollectionsList = CollectionsList

56+newtype CollectionsList = CollectionsList'

5757 { _clEnterpriseId :: Text

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

5959

@@ -66,7 +66,7 @@ collectionsList

6666 :: Text -- ^ 'clEnterpriseId'

6767 -> CollectionsList

6868collectionsList pClEnterpriseId_ =

69− CollectionsList

69+ CollectionsList'

7070 { _clEnterpriseId = pClEnterpriseId_

7171 }

7272

@@ -80,7 +80,7 @@ instance GoogleRequest CollectionsList where

8080 type Rs CollectionsList = CollectionsListResponse

8181 type Scopes CollectionsList =

8282 '["https://www.googleapis.com/auth/androidenterprise"]

83− requestClient CollectionsList{..}

83+ requestClient CollectionsList'{..}

8484 = go _clEnterpriseId (Just AltJSON)

8585 androidEnterpriseService

8686 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Patch.hs+3−3

@@ -57,7 +57,7 @@ type CollectionsPatchResource =

5757-- | Updates a collection. This method supports patch semantics.

5858--

5959-- /See:/ 'collectionsPatch' smart constructor.

60−data CollectionsPatch = CollectionsPatch

60+data CollectionsPatch = CollectionsPatch'

6161 { _cpEnterpriseId :: !Text

6262 , _cpCollectionId :: !Text

6363 , _cpPayload :: !Collection

@@ -78,7 +78,7 @@ collectionsPatch

7878 -> Collection -- ^ 'cpPayload'

7979 -> CollectionsPatch

8080collectionsPatch pCpEnterpriseId_ pCpCollectionId_ pCpPayload_ =

81− CollectionsPatch

81+ CollectionsPatch'

8282 { _cpEnterpriseId = pCpEnterpriseId_

8383 , _cpCollectionId = pCpCollectionId_

8484 , _cpPayload = pCpPayload_

@@ -105,7 +105,7 @@ instance GoogleRequest CollectionsPatch where

105105 type Rs CollectionsPatch = Collection

106106 type Scopes CollectionsPatch =

107107 '["https://www.googleapis.com/auth/androidenterprise"]

108− requestClient CollectionsPatch{..}

108+ requestClient CollectionsPatch'{..}

109109 = go _cpEnterpriseId _cpCollectionId (Just AltJSON)

110110 _cpPayload

111111 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collections/Update.hs+3−3

@@ -56,7 +56,7 @@ type CollectionsUpdateResource =

5656-- | Updates a collection.

5757--

5858-- /See:/ 'collectionsUpdate' smart constructor.

59−data CollectionsUpdate = CollectionsUpdate

59+data CollectionsUpdate = CollectionsUpdate'

6060 { _cuuEnterpriseId :: !Text

6161 , _cuuCollectionId :: !Text

6262 , _cuuPayload :: !Collection

@@ -77,7 +77,7 @@ collectionsUpdate

7777 -> Collection -- ^ 'cuuPayload'

7878 -> CollectionsUpdate

7979collectionsUpdate pCuuEnterpriseId_ pCuuCollectionId_ pCuuPayload_ =

80− CollectionsUpdate

80+ CollectionsUpdate'

8181 { _cuuEnterpriseId = pCuuEnterpriseId_

8282 , _cuuCollectionId = pCuuCollectionId_

8383 , _cuuPayload = pCuuPayload_

@@ -104,7 +104,7 @@ instance GoogleRequest CollectionsUpdate where

104104 type Rs CollectionsUpdate = Collection

105105 type Scopes CollectionsUpdate =

106106 '["https://www.googleapis.com/auth/androidenterprise"]

107− requestClient CollectionsUpdate{..}

107+ requestClient CollectionsUpdate'{..}

108108 = go _cuuEnterpriseId _cuuCollectionId (Just AltJSON)

109109 _cuuPayload

110110 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Delete.hs+3−3

@@ -61,7 +61,7 @@ type CollectionviewersDeleteResource =

6161-- only such users will see the collection.

6262--

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

64−data CollectionviewersDelete = CollectionviewersDelete

64+data CollectionviewersDelete = CollectionviewersDelete'

6565 { _cdEnterpriseId :: !Text

6666 , _cdCollectionId :: !Text

6767 , _cdUserId :: !Text

@@ -82,7 +82,7 @@ collectionviewersDelete

8282 -> Text -- ^ 'cdUserId'

8383 -> CollectionviewersDelete

8484collectionviewersDelete pCdEnterpriseId_ pCdCollectionId_ pCdUserId_ =

85− CollectionviewersDelete

85+ CollectionviewersDelete'

8686 { _cdEnterpriseId = pCdEnterpriseId_

8787 , _cdCollectionId = pCdCollectionId_

8888 , _cdUserId = pCdUserId_

@@ -108,7 +108,7 @@ instance GoogleRequest CollectionviewersDelete where

108108 type Rs CollectionviewersDelete = ()

109109 type Scopes CollectionviewersDelete =

110110 '["https://www.googleapis.com/auth/androidenterprise"]

111− requestClient CollectionviewersDelete{..}

111+ requestClient CollectionviewersDelete'{..}

112112 = go _cdEnterpriseId _cdCollectionId _cdUserId

113113 (Just AltJSON)

114114 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Get.hs+3−3

@@ -61,7 +61,7 @@ type CollectionviewersGetResource =

6161-- viewersOnly then only these users will see the collection.

6262--

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

64−data CollectionviewersGet = CollectionviewersGet

64+data CollectionviewersGet = CollectionviewersGet'

6565 { _cggEnterpriseId :: !Text

6666 , _cggCollectionId :: !Text

6767 , _cggUserId :: !Text

@@ -82,7 +82,7 @@ collectionviewersGet

8282 -> Text -- ^ 'cggUserId'

8383 -> CollectionviewersGet

8484collectionviewersGet pCggEnterpriseId_ pCggCollectionId_ pCggUserId_ =

85− CollectionviewersGet

85+ CollectionviewersGet'

8686 { _cggEnterpriseId = pCggEnterpriseId_

8787 , _cggCollectionId = pCggCollectionId_

8888 , _cggUserId = pCggUserId_

@@ -109,7 +109,7 @@ instance GoogleRequest CollectionviewersGet where

109109 type Rs CollectionviewersGet = User

110110 type Scopes CollectionviewersGet =

111111 '["https://www.googleapis.com/auth/androidenterprise"]

112− requestClient CollectionviewersGet{..}

112+ requestClient CollectionviewersGet'{..}

113113 = go _cggEnterpriseId _cggCollectionId _cggUserId

114114 (Just AltJSON)

115115 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/List.hs+3−3

@@ -60,7 +60,7 @@ type CollectionviewersListResource =

6060-- then only these users will see the collection.

6161--

6262-- /See:/ 'collectionviewersList' smart constructor.

63−data CollectionviewersList = CollectionviewersList

63+data CollectionviewersList = CollectionviewersList'

6464 { _cEnterpriseId :: !Text

6565 , _cCollectionId :: !Text

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

@@ -77,7 +77,7 @@ collectionviewersList

7777 -> Text -- ^ 'cCollectionId'

7878 -> CollectionviewersList

7979collectionviewersList pCEnterpriseId_ pCCollectionId_ =

80− CollectionviewersList

80+ CollectionviewersList'

8181 { _cEnterpriseId = pCEnterpriseId_

8282 , _cCollectionId = pCCollectionId_

8383 }

@@ -99,7 +99,7 @@ instance GoogleRequest CollectionviewersList where

9999 CollectionViewersListResponse

100100 type Scopes CollectionviewersList =

101101 '["https://www.googleapis.com/auth/androidenterprise"]

102− requestClient CollectionviewersList{..}

102+ requestClient CollectionviewersList'{..}

103103 = go _cEnterpriseId _cCollectionId (Just AltJSON)

104104 androidEnterpriseService

105105 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Patch.hs+3−3

@@ -65,7 +65,7 @@ type CollectionviewersPatchResource =

6565-- semantics.

6666--

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

68−data CollectionviewersPatch = CollectionviewersPatch

68+data CollectionviewersPatch = CollectionviewersPatch'

6969 { _cppEnterpriseId :: !Text

7070 , _cppCollectionId :: !Text

7171 , _cppPayload :: !User

@@ -90,7 +90,7 @@ collectionviewersPatch

9090 -> Text -- ^ 'cppUserId'

9191 -> CollectionviewersPatch

9292collectionviewersPatch pCppEnterpriseId_ pCppCollectionId_ pCppPayload_ pCppUserId_ =

93− CollectionviewersPatch

93+ CollectionviewersPatch'

9494 { _cppEnterpriseId = pCppEnterpriseId_

9595 , _cppCollectionId = pCppCollectionId_

9696 , _cppPayload = pCppPayload_

@@ -123,7 +123,7 @@ instance GoogleRequest CollectionviewersPatch where

123123 type Rs CollectionviewersPatch = User

124124 type Scopes CollectionviewersPatch =

125125 '["https://www.googleapis.com/auth/androidenterprise"]

126− requestClient CollectionviewersPatch{..}

126+ requestClient CollectionviewersPatch'{..}

127127 = go _cppEnterpriseId _cppCollectionId _cppUserId

128128 (Just AltJSON)

129129 _cppPayload

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Collectionviewers/Update.hs+3−3

@@ -63,7 +63,7 @@ type CollectionviewersUpdateResource =

6363-- only such users will see the collection.

6464--

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

66−data CollectionviewersUpdate = CollectionviewersUpdate

66+data CollectionviewersUpdate = CollectionviewersUpdate'

6767 { _cuEnterpriseId :: !Text

6868 , _cuCollectionId :: !Text

6969 , _cuPayload :: !User

@@ -88,7 +88,7 @@ collectionviewersUpdate

8888 -> Text -- ^ 'cuUserId'

8989 -> CollectionviewersUpdate

9090collectionviewersUpdate pCuEnterpriseId_ pCuCollectionId_ pCuPayload_ pCuUserId_ =

91− CollectionviewersUpdate

91+ CollectionviewersUpdate'

9292 { _cuEnterpriseId = pCuEnterpriseId_

9393 , _cuCollectionId = pCuCollectionId_

9494 , _cuPayload = pCuPayload_

@@ -120,7 +120,7 @@ instance GoogleRequest CollectionviewersUpdate where

120120 type Rs CollectionviewersUpdate = User

121121 type Scopes CollectionviewersUpdate =

122122 '["https://www.googleapis.com/auth/androidenterprise"]

123− requestClient CollectionviewersUpdate{..}

123+ requestClient CollectionviewersUpdate'{..}

124124 = go _cuEnterpriseId _cuCollectionId _cuUserId

125125 (Just AltJSON)

126126 _cuPayload

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/Get.hs+3−3

@@ -57,7 +57,7 @@ type DevicesGetResource =

5757-- | Retrieves the details of a device.

5858--

5959-- /See:/ 'devicesGet' smart constructor.

60−data DevicesGet = DevicesGet

60+data DevicesGet = DevicesGet'

6161 { _dgEnterpriseId :: !Text

6262 , _dgUserId :: !Text

6363 , _dgDeviceId :: !Text

@@ -78,7 +78,7 @@ devicesGet

7878 -> Text -- ^ 'dgDeviceId'

7979 -> DevicesGet

8080devicesGet pDgEnterpriseId_ pDgUserId_ pDgDeviceId_ =

81− DevicesGet

81+ DevicesGet'

8282 { _dgEnterpriseId = pDgEnterpriseId_

8383 , _dgUserId = pDgUserId_

8484 , _dgDeviceId = pDgDeviceId_

@@ -103,7 +103,7 @@ instance GoogleRequest DevicesGet where

103103 type Rs DevicesGet = Device

104104 type Scopes DevicesGet =

105105 '["https://www.googleapis.com/auth/androidenterprise"]

106− requestClient DevicesGet{..}

106+ requestClient DevicesGet'{..}

107107 = go _dgEnterpriseId _dgUserId _dgDeviceId

108108 (Just AltJSON)

109109 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/GetState.hs+3−3

@@ -66,7 +66,7 @@ type DevicesGetStateResource =

6666-- access to Google services.

6767--

6868-- /See:/ 'devicesGetState' smart constructor.

69−data DevicesGetState = DevicesGetState

69+data DevicesGetState = DevicesGetState'

7070 { _dgsEnterpriseId :: !Text

7171 , _dgsUserId :: !Text

7272 , _dgsDeviceId :: !Text

@@ -87,7 +87,7 @@ devicesGetState

8787 -> Text -- ^ 'dgsDeviceId'

8888 -> DevicesGetState

8989devicesGetState pDgsEnterpriseId_ pDgsUserId_ pDgsDeviceId_ =

90− DevicesGetState

90+ DevicesGetState'

9191 { _dgsEnterpriseId = pDgsEnterpriseId_

9292 , _dgsUserId = pDgsUserId_

9393 , _dgsDeviceId = pDgsDeviceId_

@@ -113,7 +113,7 @@ instance GoogleRequest DevicesGetState where

113113 type Rs DevicesGetState = DeviceState

114114 type Scopes DevicesGetState =

115115 '["https://www.googleapis.com/auth/androidenterprise"]

116− requestClient DevicesGetState{..}

116+ requestClient DevicesGetState'{..}

117117 = go _dgsEnterpriseId _dgsUserId _dgsDeviceId

118118 (Just AltJSON)

119119 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/List.hs+3−3

@@ -56,7 +56,7 @@ type DevicesListResource =

5656-- | Retrieves the IDs of all of a user\'s devices.

5757--

5858-- /See:/ 'devicesList' smart constructor.

59−data DevicesList = DevicesList

59+data DevicesList = DevicesList'

6060 { _dlEnterpriseId :: !Text

6161 , _dlUserId :: !Text

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

@@ -73,7 +73,7 @@ devicesList

7373 -> Text -- ^ 'dlUserId'

7474 -> DevicesList

7575devicesList pDlEnterpriseId_ pDlUserId_ =

76− DevicesList

76+ DevicesList'

7777 { _dlEnterpriseId = pDlEnterpriseId_

7878 , _dlUserId = pDlUserId_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest DevicesList where

9292 type Rs DevicesList = DevicesListResponse

9393 type Scopes DevicesList =

9494 '["https://www.googleapis.com/auth/androidenterprise"]

95− requestClient DevicesList{..}

95+ requestClient DevicesList'{..}

9696 = go _dlEnterpriseId _dlUserId (Just AltJSON)

9797 androidEnterpriseService

9898 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Devices/SetState.hs+3−3

@@ -69,7 +69,7 @@ type DevicesSetStateResource =

6969-- access to Google services.

7070--

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

72−data DevicesSetState = DevicesSetState

72+data DevicesSetState = DevicesSetState'

7373 { _dssEnterpriseId :: !Text

7474 , _dssPayload :: !DeviceState

7575 , _dssUserId :: !Text

@@ -94,7 +94,7 @@ devicesSetState

9494 -> Text -- ^ 'dssDeviceId'

9595 -> DevicesSetState

9696devicesSetState pDssEnterpriseId_ pDssPayload_ pDssUserId_ pDssDeviceId_ =

97− DevicesSetState

97+ DevicesSetState'

9898 { _dssEnterpriseId = pDssEnterpriseId_

9999 , _dssPayload = pDssPayload_

100100 , _dssUserId = pDssUserId_

@@ -126,7 +126,7 @@ instance GoogleRequest DevicesSetState where

126126 type Rs DevicesSetState = DeviceState

127127 type Scopes DevicesSetState =

128128 '["https://www.googleapis.com/auth/androidenterprise"]

129− requestClient DevicesSetState{..}

129+ requestClient DevicesSetState'{..}

130130 = go _dssEnterpriseId _dssUserId _dssDeviceId

131131 (Just AltJSON)

132132 _dssPayload

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Delete.hs+3−3

@@ -57,7 +57,7 @@ type EnterprisesDeleteResource =

5757-- call.

5858--

5959-- /See:/ 'enterprisesDelete' smart constructor.

60−newtype EnterprisesDelete = EnterprisesDelete

60+newtype EnterprisesDelete = EnterprisesDelete'

6161 { _edEnterpriseId :: Text

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

6363

@@ -70,7 +70,7 @@ enterprisesDelete

7070 :: Text -- ^ 'edEnterpriseId'

7171 -> EnterprisesDelete

7272enterprisesDelete pEdEnterpriseId_ =

73− EnterprisesDelete

73+ EnterprisesDelete'

7474 { _edEnterpriseId = pEdEnterpriseId_

7575 }

7676

@@ -84,7 +84,7 @@ instance GoogleRequest EnterprisesDelete where

8484 type Rs EnterprisesDelete = ()

8585 type Scopes EnterprisesDelete =

8686 '["https://www.googleapis.com/auth/androidenterprise"]

87− requestClient EnterprisesDelete{..}

87+ requestClient EnterprisesDelete'{..}

8888 = go _edEnterpriseId (Just AltJSON)

8989 androidEnterpriseService

9090 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Enroll.hs+3−3

@@ -54,7 +54,7 @@ type EnterprisesEnrollResource =

5454-- | Enrolls an enterprise with the calling EMM.

5555--

5656-- /See:/ 'enterprisesEnroll' smart constructor.

57−data EnterprisesEnroll = EnterprisesEnroll

57+data EnterprisesEnroll = EnterprisesEnroll'

5858 { _eeToken :: !Text

5959 , _eePayload :: !Enterprise

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

@@ -71,7 +71,7 @@ enterprisesEnroll

7171 -> Enterprise -- ^ 'eePayload'

7272 -> EnterprisesEnroll

7373enterprisesEnroll pEeToken_ pEePayload_ =

74− EnterprisesEnroll

74+ EnterprisesEnroll'

7575 { _eeToken = pEeToken_

7676 , _eePayload = pEePayload_

7777 }

@@ -89,7 +89,7 @@ instance GoogleRequest EnterprisesEnroll where

8989 type Rs EnterprisesEnroll = Enterprise

9090 type Scopes EnterprisesEnroll =

9191 '["https://www.googleapis.com/auth/androidenterprise"]

92− requestClient EnterprisesEnroll{..}

92+ requestClient EnterprisesEnroll'{..}

9393 = go (Just _eeToken) (Just AltJSON) _eePayload

9494 androidEnterpriseService

9595 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Get.hs+3−3

@@ -51,7 +51,7 @@ type EnterprisesGetResource =

5151-- | Retrieves the name and domain of an enterprise.

5252--

5353-- /See:/ 'enterprisesGet' smart constructor.

54−newtype EnterprisesGet = EnterprisesGet

54+newtype EnterprisesGet = EnterprisesGet'

5555 { _eEnterpriseId :: Text

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

5757

@@ -64,7 +64,7 @@ enterprisesGet

6464 :: Text -- ^ 'eEnterpriseId'

6565 -> EnterprisesGet

6666enterprisesGet pEEnterpriseId_ =

67− EnterprisesGet

67+ EnterprisesGet'

6868 { _eEnterpriseId = pEEnterpriseId_

6969 }

7070

@@ -78,7 +78,7 @@ instance GoogleRequest EnterprisesGet where

7878 type Rs EnterprisesGet = Enterprise

7979 type Scopes EnterprisesGet =

8080 '["https://www.googleapis.com/auth/androidenterprise"]

81− requestClient EnterprisesGet{..}

81+ requestClient EnterprisesGet'{..}

8282 = go _eEnterpriseId (Just AltJSON)

8383 androidEnterpriseService

8484 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/GetStoreLayout.hs+3−3

@@ -52,7 +52,7 @@ type EnterprisesGetStoreLayoutResource =

5252-- | Returns the store layout resource.

5353--

5454-- /See:/ 'enterprisesGetStoreLayout' smart constructor.

55−newtype EnterprisesGetStoreLayout = EnterprisesGetStoreLayout

55+newtype EnterprisesGetStoreLayout = EnterprisesGetStoreLayout'

5656 { _egslEnterpriseId :: Text

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

5858

@@ -65,7 +65,7 @@ enterprisesGetStoreLayout

6565 :: Text -- ^ 'egslEnterpriseId'

6666 -> EnterprisesGetStoreLayout

6767enterprisesGetStoreLayout pEgslEnterpriseId_ =

68− EnterprisesGetStoreLayout

68+ EnterprisesGetStoreLayout'

6969 { _egslEnterpriseId = pEgslEnterpriseId_

7070 }

7171

@@ -80,7 +80,7 @@ instance GoogleRequest EnterprisesGetStoreLayout

8080 type Rs EnterprisesGetStoreLayout = StoreLayout

8181 type Scopes EnterprisesGetStoreLayout =

8282 '["https://www.googleapis.com/auth/androidenterprise"]

83− requestClient EnterprisesGetStoreLayout{..}

83+ requestClient EnterprisesGetStoreLayout'{..}

8484 = go _egslEnterpriseId (Just AltJSON)

8585 androidEnterpriseService

8686 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Insert.hs+3−3

@@ -55,7 +55,7 @@ type EnterprisesInsertResource =

5555-- deprecated; use enroll instead.

5656--

5757-- /See:/ 'enterprisesInsert' smart constructor.

58−data EnterprisesInsert = EnterprisesInsert

58+data EnterprisesInsert = EnterprisesInsert'

5959 { _eiToken :: !Text

6060 , _eiPayload :: !Enterprise

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

@@ -72,7 +72,7 @@ enterprisesInsert

7272 -> Enterprise -- ^ 'eiPayload'

7373 -> EnterprisesInsert

7474enterprisesInsert pEiToken_ pEiPayload_ =

75− EnterprisesInsert

75+ EnterprisesInsert'

7676 { _eiToken = pEiToken_

7777 , _eiPayload = pEiPayload_

7878 }

@@ -90,7 +90,7 @@ instance GoogleRequest EnterprisesInsert where

9090 type Rs EnterprisesInsert = Enterprise

9191 type Scopes EnterprisesInsert =

9292 '["https://www.googleapis.com/auth/androidenterprise"]

93− requestClient EnterprisesInsert{..}

93+ requestClient EnterprisesInsert'{..}

9494 = go (Just _eiToken) (Just AltJSON) _eiPayload

9595 androidEnterpriseService

9696 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/List.hs+3−3

@@ -52,7 +52,7 @@ type EnterprisesListResource =

5252-- | Looks up an enterprise by domain name.

5353--

5454-- /See:/ 'enterprisesList' smart constructor.

55−newtype EnterprisesList = EnterprisesList

55+newtype EnterprisesList = EnterprisesList'

5656 { _elDomain :: Text

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

5858

@@ -65,7 +65,7 @@ enterprisesList

6565 :: Text -- ^ 'elDomain'

6666 -> EnterprisesList

6767enterprisesList pElDomain_ =

68− EnterprisesList

68+ EnterprisesList'

6969 { _elDomain = pElDomain_

7070 }

7171

@@ -77,7 +77,7 @@ instance GoogleRequest EnterprisesList where

7777 type Rs EnterprisesList = EnterprisesListResponse

7878 type Scopes EnterprisesList =

7979 '["https://www.googleapis.com/auth/androidenterprise"]

80− requestClient EnterprisesList{..}

80+ requestClient EnterprisesList'{..}

8181 = go (Just _elDomain) (Just AltJSON)

8282 androidEnterpriseService

8383 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SendTestPushNotification.hs+4−3

@@ -56,7 +56,7 @@ type EnterprisesSendTestPushNotificationResource =

5656-- Google Cloud Pub\/Sub service for this enterprise.

5757--

5858-- /See:/ 'enterprisesSendTestPushNotification' smart constructor.

59−newtype EnterprisesSendTestPushNotification = EnterprisesSendTestPushNotification

59+newtype EnterprisesSendTestPushNotification = EnterprisesSendTestPushNotification'

6060 { _estpnEnterpriseId :: Text

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

6262

@@ -69,7 +69,7 @@ enterprisesSendTestPushNotification

6969 :: Text -- ^ 'estpnEnterpriseId'

7070 -> EnterprisesSendTestPushNotification

7171enterprisesSendTestPushNotification pEstpnEnterpriseId_ =

72− EnterprisesSendTestPushNotification

72+ EnterprisesSendTestPushNotification'

7373 { _estpnEnterpriseId = pEstpnEnterpriseId_

7474 }

7575

@@ -85,7 +85,8 @@ instance GoogleRequest

8585 EnterprisesSendTestPushNotificationResponse

8686 type Scopes EnterprisesSendTestPushNotification =

8787 '["https://www.googleapis.com/auth/androidenterprise"]

88− requestClient EnterprisesSendTestPushNotification{..}

88+ requestClient

89+ EnterprisesSendTestPushNotification'{..}

8990 = go _estpnEnterpriseId (Just AltJSON)

9091 androidEnterpriseService

9192 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetAccount.hs+3−3

@@ -57,7 +57,7 @@ type EnterprisesSetAccountResource =

5757-- enterprise.

5858--

5959-- /See:/ 'enterprisesSetAccount' smart constructor.

60−data EnterprisesSetAccount = EnterprisesSetAccount

60+data EnterprisesSetAccount = EnterprisesSetAccount'

6161 { _esaEnterpriseId :: !Text

6262 , _esaPayload :: !EnterpriseAccount

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

@@ -74,7 +74,7 @@ enterprisesSetAccount

7474 -> EnterpriseAccount -- ^ 'esaPayload'

7575 -> EnterprisesSetAccount

7676enterprisesSetAccount pEsaEnterpriseId_ pEsaPayload_ =

77− EnterprisesSetAccount

77+ EnterprisesSetAccount'

7878 { _esaEnterpriseId = pEsaEnterpriseId_

7979 , _esaPayload = pEsaPayload_

8080 }

@@ -94,7 +94,7 @@ instance GoogleRequest EnterprisesSetAccount where

9494 type Rs EnterprisesSetAccount = EnterpriseAccount

9595 type Scopes EnterprisesSetAccount =

9696 '["https://www.googleapis.com/auth/androidenterprise"]

97− requestClient EnterprisesSetAccount{..}

97+ requestClient EnterprisesSetAccount'{..}

9898 = go _esaEnterpriseId (Just AltJSON) _esaPayload

9999 androidEnterpriseService

100100 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetStoreLayout.hs+3−3

@@ -55,7 +55,7 @@ type EnterprisesSetStoreLayoutResource =

5555-- | Sets the store layout resource.

5656--

5757-- /See:/ 'enterprisesSetStoreLayout' smart constructor.

58−data EnterprisesSetStoreLayout = EnterprisesSetStoreLayout

58+data EnterprisesSetStoreLayout = EnterprisesSetStoreLayout'

5959 { _esslEnterpriseId :: !Text

6060 , _esslPayload :: !StoreLayout

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

@@ -72,7 +72,7 @@ enterprisesSetStoreLayout

7272 -> StoreLayout -- ^ 'esslPayload'

7373 -> EnterprisesSetStoreLayout

7474enterprisesSetStoreLayout pEsslEnterpriseId_ pEsslPayload_ =

75− EnterprisesSetStoreLayout

75+ EnterprisesSetStoreLayout'

7676 { _esslEnterpriseId = pEsslEnterpriseId_

7777 , _esslPayload = pEsslPayload_

7878 }

@@ -93,7 +93,7 @@ instance GoogleRequest EnterprisesSetStoreLayout

9393 type Rs EnterprisesSetStoreLayout = StoreLayout

9494 type Scopes EnterprisesSetStoreLayout =

9595 '["https://www.googleapis.com/auth/androidenterprise"]

96− requestClient EnterprisesSetStoreLayout{..}

96+ requestClient EnterprisesSetStoreLayout'{..}

9797 = go _esslEnterpriseId (Just AltJSON) _esslPayload

9898 androidEnterpriseService

9999 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/Unenroll.hs+3−3

@@ -52,7 +52,7 @@ type EnterprisesUnenrollResource =

5252-- | Unenrolls an enterprise from the calling EMM.

5353--

5454-- /See:/ 'enterprisesUnenroll' smart constructor.

55−newtype EnterprisesUnenroll = EnterprisesUnenroll

55+newtype EnterprisesUnenroll = EnterprisesUnenroll'

5656 { _euuEnterpriseId :: Text

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

5858

@@ -65,7 +65,7 @@ enterprisesUnenroll

6565 :: Text -- ^ 'euuEnterpriseId'

6666 -> EnterprisesUnenroll

6767enterprisesUnenroll pEuuEnterpriseId_ =

68− EnterprisesUnenroll

68+ EnterprisesUnenroll'

6969 { _euuEnterpriseId = pEuuEnterpriseId_

7070 }

7171

@@ -79,7 +79,7 @@ instance GoogleRequest EnterprisesUnenroll where

7979 type Rs EnterprisesUnenroll = ()

8080 type Scopes EnterprisesUnenroll =

8181 '["https://www.googleapis.com/auth/androidenterprise"]

82− requestClient EnterprisesUnenroll{..}

82+ requestClient EnterprisesUnenroll'{..}

8383 = go _euuEnterpriseId (Just AltJSON)

8484 androidEnterpriseService

8585 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Delete.hs+3−3

@@ -57,7 +57,7 @@ type EntitlementsDeleteResource =

5757-- | Removes an entitlement to an app for a user and uninstalls it.

5858--

5959-- /See:/ 'entitlementsDelete' smart constructor.

60−data EntitlementsDelete = EntitlementsDelete

60+data EntitlementsDelete = EntitlementsDelete'

6161 { _entEntitlementId :: !Text

6262 , _entEnterpriseId :: !Text

6363 , _entUserId :: !Text

@@ -78,7 +78,7 @@ entitlementsDelete

7878 -> Text -- ^ 'entUserId'

7979 -> EntitlementsDelete

8080entitlementsDelete pEntEntitlementId_ pEntEnterpriseId_ pEntUserId_ =

81− EntitlementsDelete

81+ EntitlementsDelete'

8282 { _entEntitlementId = pEntEntitlementId_

8383 , _entEnterpriseId = pEntEnterpriseId_

8484 , _entUserId = pEntUserId_

@@ -105,7 +105,7 @@ instance GoogleRequest EntitlementsDelete where

105105 type Rs EntitlementsDelete = ()

106106 type Scopes EntitlementsDelete =

107107 '["https://www.googleapis.com/auth/androidenterprise"]

108− requestClient EntitlementsDelete{..}

108+ requestClient EntitlementsDelete'{..}

109109 = go _entEnterpriseId _entUserId _entEntitlementId

110110 (Just AltJSON)

111111 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Get.hs+3−3

@@ -57,7 +57,7 @@ type EntitlementsGetResource =

5757-- | Retrieves details of an entitlement.

5858--

5959-- /See:/ 'entitlementsGet' smart constructor.

60−data EntitlementsGet = EntitlementsGet

60+data EntitlementsGet = EntitlementsGet'

6161 { _egEntitlementId :: !Text

6262 , _egEnterpriseId :: !Text

6363 , _egUserId :: !Text

@@ -78,7 +78,7 @@ entitlementsGet

7878 -> Text -- ^ 'egUserId'

7979 -> EntitlementsGet

8080entitlementsGet pEgEntitlementId_ pEgEnterpriseId_ pEgUserId_ =

81− EntitlementsGet

81+ EntitlementsGet'

8282 { _egEntitlementId = pEgEntitlementId_

8383 , _egEnterpriseId = pEgEnterpriseId_

8484 , _egUserId = pEgUserId_

@@ -104,7 +104,7 @@ instance GoogleRequest EntitlementsGet where

104104 type Rs EntitlementsGet = Entitlement

105105 type Scopes EntitlementsGet =

106106 '["https://www.googleapis.com/auth/androidenterprise"]

107− requestClient EntitlementsGet{..}

107+ requestClient EntitlementsGet'{..}

108108 = go _egEnterpriseId _egUserId _egEntitlementId

109109 (Just AltJSON)

110110 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/List.hs+3−3

@@ -56,7 +56,7 @@ type EntitlementsListResource =

5656-- | List of all entitlements for the specified user. Only the ID is set.

5757--

5858-- /See:/ 'entitlementsList' smart constructor.

59−data EntitlementsList = EntitlementsList

59+data EntitlementsList = EntitlementsList'

6060 { _elEnterpriseId :: !Text

6161 , _elUserId :: !Text

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

@@ -73,7 +73,7 @@ entitlementsList

7373 -> Text -- ^ 'elUserId'

7474 -> EntitlementsList

7575entitlementsList pElEnterpriseId_ pElUserId_ =

76− EntitlementsList

76+ EntitlementsList'

7777 { _elEnterpriseId = pElEnterpriseId_

7878 , _elUserId = pElUserId_

7979 }

@@ -92,7 +92,7 @@ instance GoogleRequest EntitlementsList where

9292 type Rs EntitlementsList = EntitlementsListResponse

9393 type Scopes EntitlementsList =

9494 '["https://www.googleapis.com/auth/androidenterprise"]

95− requestClient EntitlementsList{..}

95+ requestClient EntitlementsList'{..}

9696 = go _elEnterpriseId _elUserId (Just AltJSON)

9797 androidEnterpriseService

9898 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Patch.hs+3−3

@@ -64,7 +64,7 @@ type EntitlementsPatchResource =

6464-- supports patch semantics.

6565--

6666-- /See:/ 'entitlementsPatch' smart constructor.

67−data EntitlementsPatch = EntitlementsPatch

67+data EntitlementsPatch = EntitlementsPatch'

6868 { _epEntitlementId :: !Text

6969 , _epEnterpriseId :: !Text

7070 , _epPayload :: !Entitlement

@@ -92,7 +92,7 @@ entitlementsPatch

9292 -> Text -- ^ 'epUserId'

9393 -> EntitlementsPatch

9494entitlementsPatch pEpEntitlementId_ pEpEnterpriseId_ pEpPayload_ pEpUserId_ =

95− EntitlementsPatch

95+ EntitlementsPatch'

9696 { _epEntitlementId = pEpEntitlementId_

9797 , _epEnterpriseId = pEpEnterpriseId_

9898 , _epPayload = pEpPayload_

@@ -133,7 +133,7 @@ instance GoogleRequest EntitlementsPatch where

133133 type Rs EntitlementsPatch = Entitlement

134134 type Scopes EntitlementsPatch =

135135 '["https://www.googleapis.com/auth/androidenterprise"]

136− requestClient EntitlementsPatch{..}

136+ requestClient EntitlementsPatch'{..}

137137 = go _epEnterpriseId _epUserId _epEntitlementId

138138 _epInstall

139139 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Entitlements/Update.hs+3−3

@@ -62,7 +62,7 @@ type EntitlementsUpdateResource =

6262-- | Adds or updates an entitlement to an app for a user.

6363--

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

65−data EntitlementsUpdate = EntitlementsUpdate

65+data EntitlementsUpdate = EntitlementsUpdate'

6666 { _euEntitlementId :: !Text

6767 , _euEnterpriseId :: !Text

6868 , _euPayload :: !Entitlement

@@ -90,7 +90,7 @@ entitlementsUpdate

9090 -> Text -- ^ 'euUserId'

9191 -> EntitlementsUpdate

9292entitlementsUpdate pEuEntitlementId_ pEuEnterpriseId_ pEuPayload_ pEuUserId_ =

93− EntitlementsUpdate

93+ EntitlementsUpdate'

9494 { _euEntitlementId = pEuEntitlementId_

9595 , _euEnterpriseId = pEuEnterpriseId_

9696 , _euPayload = pEuPayload_

@@ -131,7 +131,7 @@ instance GoogleRequest EntitlementsUpdate where

131131 type Rs EntitlementsUpdate = Entitlement

132132 type Scopes EntitlementsUpdate =

133133 '["https://www.googleapis.com/auth/androidenterprise"]

134− requestClient EntitlementsUpdate{..}

134+ requestClient EntitlementsUpdate'{..}

135135 = go _euEnterpriseId _euUserId _euEntitlementId

136136 _euInstall

137137 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/GrouplicenseUsers/List.hs+3−3

@@ -58,7 +58,7 @@ type GrouplicenseUsersListResource =

5858-- the license.

5959--

6060-- /See:/ 'grouplicenseUsersList' smart constructor.

61−data GrouplicenseUsersList = GrouplicenseUsersList

61+data GrouplicenseUsersList = GrouplicenseUsersList'

6262 { _gulEnterpriseId :: !Text

6363 , _gulGroupLicenseId :: !Text

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

@@ -75,7 +75,7 @@ grouplicenseUsersList

7575 -> Text -- ^ 'gulGroupLicenseId'

7676 -> GrouplicenseUsersList

7777grouplicenseUsersList pGulEnterpriseId_ pGulGroupLicenseId_ =

78− GrouplicenseUsersList

78+ GrouplicenseUsersList'

7979 { _gulEnterpriseId = pGulEnterpriseId_

8080 , _gulGroupLicenseId = pGulGroupLicenseId_

8181 }

@@ -98,7 +98,7 @@ instance GoogleRequest GrouplicenseUsersList where

9898 GroupLicenseUsersListResponse

9999 type Scopes GrouplicenseUsersList =

100100 '["https://www.googleapis.com/auth/androidenterprise"]

101− requestClient GrouplicenseUsersList{..}

101+ requestClient GrouplicenseUsersList'{..}

102102 = go _gulEnterpriseId _gulGroupLicenseId

103103 (Just AltJSON)

104104 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Grouplicenses/Get.hs+3−3

@@ -54,7 +54,7 @@ type GrouplicensesGetResource =

5454-- | Retrieves details of an enterprise\'s group license for a product.

5555--

5656-- /See:/ 'grouplicensesGet' smart constructor.

57−data GrouplicensesGet = GrouplicensesGet

57+data GrouplicensesGet = GrouplicensesGet'

5858 { _ggEnterpriseId :: !Text

5959 , _ggGroupLicenseId :: !Text

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

@@ -71,7 +71,7 @@ grouplicensesGet

7171 -> Text -- ^ 'ggGroupLicenseId'

7272 -> GrouplicensesGet

7373grouplicensesGet pGgEnterpriseId_ pGgGroupLicenseId_ =

74− GrouplicensesGet

74+ GrouplicensesGet'

7575 { _ggEnterpriseId = pGgEnterpriseId_

7676 , _ggGroupLicenseId = pGgGroupLicenseId_

7777 }

@@ -93,7 +93,7 @@ instance GoogleRequest GrouplicensesGet where

9393 type Rs GrouplicensesGet = GroupLicense

9494 type Scopes GrouplicensesGet =

9595 '["https://www.googleapis.com/auth/androidenterprise"]

96− requestClient GrouplicensesGet{..}

96+ requestClient GrouplicensesGet'{..}

9797 = go _ggEnterpriseId _ggGroupLicenseId (Just AltJSON)

9898 androidEnterpriseService

9999 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Grouplicenses/List.hs+3−3

@@ -55,7 +55,7 @@ type GrouplicensesListResource =

5555-- license.

5656--

5757-- /See:/ 'grouplicensesList' smart constructor.

58−newtype GrouplicensesList = GrouplicensesList

58+newtype GrouplicensesList = GrouplicensesList'

5959 { _glEnterpriseId :: Text

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

6161

@@ -68,7 +68,7 @@ grouplicensesList

6868 :: Text -- ^ 'glEnterpriseId'

6969 -> GrouplicensesList

7070grouplicensesList pGlEnterpriseId_ =

71− GrouplicensesList

71+ GrouplicensesList'

7272 { _glEnterpriseId = pGlEnterpriseId_

7373 }

7474

@@ -82,7 +82,7 @@ instance GoogleRequest GrouplicensesList where

8282 type Rs GrouplicensesList = GroupLicensesListResponse

8383 type Scopes GrouplicensesList =

8484 '["https://www.googleapis.com/auth/androidenterprise"]

85− requestClient GrouplicensesList{..}

85+ requestClient GrouplicensesList'{..}

8686 = go _glEnterpriseId (Just AltJSON)

8787 androidEnterpriseService

8888 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Delete.hs+3−3

@@ -64,7 +64,7 @@ type InstallsDeleteResource =

6464-- removed.

6565--

6666-- /See:/ 'installsDelete' smart constructor.

67−data InstallsDelete = InstallsDelete

67+data InstallsDelete = InstallsDelete'

6868 { _idEnterpriseId :: !Text

6969 , _idUserId :: !Text

7070 , _idInstallId :: !Text

@@ -89,7 +89,7 @@ installsDelete

8989 -> Text -- ^ 'idDeviceId'

9090 -> InstallsDelete

9191installsDelete pIdEnterpriseId_ pIdUserId_ pIdInstallId_ pIdDeviceId_ =

92− InstallsDelete

92+ InstallsDelete'

9393 { _idEnterpriseId = pIdEnterpriseId_

9494 , _idUserId = pIdUserId_

9595 , _idInstallId = pIdInstallId_

@@ -121,7 +121,7 @@ instance GoogleRequest InstallsDelete where

121121 type Rs InstallsDelete = ()

122122 type Scopes InstallsDelete =

123123 '["https://www.googleapis.com/auth/androidenterprise"]

124− requestClient InstallsDelete{..}

124+ requestClient InstallsDelete'{..}

125125 = go _idEnterpriseId _idUserId _idDeviceId

126126 _idInstallId

127127 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Get.hs+3−3

@@ -60,7 +60,7 @@ type InstallsGetResource =

6060-- | Retrieves details of an installation of an app on a device.

6161--

6262-- /See:/ 'installsGet' smart constructor.

63−data InstallsGet = InstallsGet

63+data InstallsGet = InstallsGet'

6464 { _igEnterpriseId :: !Text

6565 , _igUserId :: !Text

6666 , _igInstallId :: !Text

@@ -85,7 +85,7 @@ installsGet

8585 -> Text -- ^ 'igDeviceId'

8686 -> InstallsGet

8787installsGet pIgEnterpriseId_ pIgUserId_ pIgInstallId_ pIgDeviceId_ =

88− InstallsGet

88+ InstallsGet'

8989 { _igEnterpriseId = pIgEnterpriseId_

9090 , _igUserId = pIgUserId_

9191 , _igInstallId = pIgInstallId_

@@ -117,7 +117,7 @@ instance GoogleRequest InstallsGet where

117117 type Rs InstallsGet = Install

118118 type Scopes InstallsGet =

119119 '["https://www.googleapis.com/auth/androidenterprise"]

120− requestClient InstallsGet{..}

120+ requestClient InstallsGet'{..}

121121 = go _igEnterpriseId _igUserId _igDeviceId

122122 _igInstallId

123123 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/List.hs+3−3

@@ -59,7 +59,7 @@ type InstallsListResource =

5959-- | Retrieves the details of all apps installed on the specified device.

6060--

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

62−data InstallsList = InstallsList

62+data InstallsList = InstallsList'

6363 { _ilEnterpriseId :: !Text

6464 , _ilUserId :: !Text

6565 , _ilDeviceId :: !Text

@@ -80,7 +80,7 @@ installsList

8080 -> Text -- ^ 'ilDeviceId'

8181 -> InstallsList

8282installsList pIlEnterpriseId_ pIlUserId_ pIlDeviceId_ =

83− InstallsList

83+ InstallsList'

8484 { _ilEnterpriseId = pIlEnterpriseId_

8585 , _ilUserId = pIlUserId_

8686 , _ilDeviceId = pIlDeviceId_

@@ -105,7 +105,7 @@ instance GoogleRequest InstallsList where

105105 type Rs InstallsList = InstallsListResponse

106106 type Scopes InstallsList =

107107 '["https://www.googleapis.com/auth/androidenterprise"]

108− requestClient InstallsList{..}

108+ requestClient InstallsList'{..}

109109 = go _ilEnterpriseId _ilUserId _ilDeviceId

110110 (Just AltJSON)

111111 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Patch.hs+3−3

@@ -66,7 +66,7 @@ type InstallsPatchResource =

6666-- necessary. This method supports patch semantics.

6767--

6868-- /See:/ 'installsPatch' smart constructor.

69−data InstallsPatch = InstallsPatch

69+data InstallsPatch = InstallsPatch'

7070 { _ipEnterpriseId :: !Text

7171 , _ipPayload :: !Install

7272 , _ipUserId :: !Text

@@ -95,7 +95,7 @@ installsPatch

9595 -> Text -- ^ 'ipDeviceId'

9696 -> InstallsPatch

9797installsPatch pIpEnterpriseId_ pIpPayload_ pIpUserId_ pIpInstallId_ pIpDeviceId_ =

98− InstallsPatch

98+ InstallsPatch'

9999 { _ipEnterpriseId = pIpEnterpriseId_

100100 , _ipPayload = pIpPayload_

101101 , _ipUserId = pIpUserId_

@@ -133,7 +133,7 @@ instance GoogleRequest InstallsPatch where

133133 type Rs InstallsPatch = Install

134134 type Scopes InstallsPatch =

135135 '["https://www.googleapis.com/auth/androidenterprise"]

136− requestClient InstallsPatch{..}

136+ requestClient InstallsPatch'{..}

137137 = go _ipEnterpriseId _ipUserId _ipDeviceId

138138 _ipInstallId

139139 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Installs/Update.hs+3−3

@@ -66,7 +66,7 @@ type InstallsUpdateResource =

6666-- necessary.

6767--

6868-- /See:/ 'installsUpdate' smart constructor.

69−data InstallsUpdate = InstallsUpdate

69+data InstallsUpdate = InstallsUpdate'

7070 { _iuEnterpriseId :: !Text

7171 , _iuPayload :: !Install

7272 , _iuUserId :: !Text

@@ -95,7 +95,7 @@ installsUpdate

9595 -> Text -- ^ 'iuDeviceId'

9696 -> InstallsUpdate

9797installsUpdate pIuEnterpriseId_ pIuPayload_ pIuUserId_ pIuInstallId_ pIuDeviceId_ =

98− InstallsUpdate

98+ InstallsUpdate'

9999 { _iuEnterpriseId = pIuEnterpriseId_

100100 , _iuPayload = pIuPayload_

101101 , _iuUserId = pIuUserId_

@@ -133,7 +133,7 @@ instance GoogleRequest InstallsUpdate where

133133 type Rs InstallsUpdate = Install

134134 type Scopes InstallsUpdate =

135135 '["https://www.googleapis.com/auth/androidenterprise"]

136− requestClient InstallsUpdate{..}

136+ requestClient InstallsUpdate'{..}

137137 = go _iuEnterpriseId _iuUserId _iuDeviceId

138138 _iuInstallId

139139 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Permissions/Get.hs+3−3

@@ -55,7 +55,7 @@ type PermissionsGetResource =

5555-- enterprise admin.

5656--

5757-- /See:/ 'permissionsGet' smart constructor.

58−data PermissionsGet = PermissionsGet

58+data PermissionsGet = PermissionsGet'

5959 { _pgLanguage :: !(Maybe Text)

6060 , _pgPermissionId :: !Text

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

@@ -71,7 +71,7 @@ permissionsGet

7171 :: Text -- ^ 'pgPermissionId'

7272 -> PermissionsGet

7373permissionsGet pPgPermissionId_ =

74− PermissionsGet

74+ PermissionsGet'

7575 { _pgLanguage = Nothing

7676 , _pgPermissionId = pPgPermissionId_

7777 }

@@ -92,7 +92,7 @@ instance GoogleRequest PermissionsGet where

9292 type Rs PermissionsGet = Permission

9393 type Scopes PermissionsGet =

9494 '["https://www.googleapis.com/auth/androidenterprise"]

95− requestClient PermissionsGet{..}

95+ requestClient PermissionsGet'{..}

9696 = go _pgPermissionId _pgLanguage (Just AltJSON)

9797 androidEnterpriseService

9898 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/Approve.hs+3−3

@@ -60,7 +60,7 @@ type ProductsApproveResource =

6060-- any).

6161--

6262-- /See:/ 'productsApprove' smart constructor.

63−data ProductsApprove = ProductsApprove

63+data ProductsApprove = ProductsApprove'

6464 { _paEnterpriseId :: !Text

6565 , _paPayload :: !ProductsApproveRequest

6666 , _paProductId :: !Text

@@ -81,7 +81,7 @@ productsApprove

8181 -> Text -- ^ 'paProductId'

8282 -> ProductsApprove

8383productsApprove pPaEnterpriseId_ pPaPayload_ pPaProductId_ =

84− ProductsApprove

84+ ProductsApprove'

8585 { _paEnterpriseId = pPaEnterpriseId_

8686 , _paPayload = pPaPayload_

8787 , _paProductId = pPaProductId_

@@ -107,7 +107,7 @@ instance GoogleRequest ProductsApprove where

107107 type Rs ProductsApprove = ()

108108 type Scopes ProductsApprove =

109109 '["https://www.googleapis.com/auth/androidenterprise"]

110− requestClient ProductsApprove{..}

110+ requestClient ProductsApprove'{..}

111111 = go _paEnterpriseId _paProductId (Just AltJSON)

112112 _paPayload

113113 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GenerateApprovalURL.hs+3−3

@@ -72,7 +72,7 @@ type ProductsGenerateApprovalURLResource =

7272-- only be used to display permissions for up to 1 day.

7373--

7474-- /See:/ 'productsGenerateApprovalURL' smart constructor.

75−data ProductsGenerateApprovalURL = ProductsGenerateApprovalURL

75+data ProductsGenerateApprovalURL = ProductsGenerateApprovalURL'

7676 { _pgauLanguageCode :: !(Maybe Text)

7777 , _pgauEnterpriseId :: !Text

7878 , _pgauProductId :: !Text

@@ -92,7 +92,7 @@ productsGenerateApprovalURL

9292 -> Text -- ^ 'pgauProductId'

9393 -> ProductsGenerateApprovalURL

9494productsGenerateApprovalURL pPgauEnterpriseId_ pPgauProductId_ =

95− ProductsGenerateApprovalURL

95+ ProductsGenerateApprovalURL'

9696 { _pgauLanguageCode = Nothing

9797 , _pgauEnterpriseId = pPgauEnterpriseId_

9898 , _pgauProductId = pPgauProductId_

@@ -123,7 +123,7 @@ instance GoogleRequest ProductsGenerateApprovalURL

123123 ProductsGenerateApprovalURLResponse

124124 type Scopes ProductsGenerateApprovalURL =

125125 '["https://www.googleapis.com/auth/androidenterprise"]

126− requestClient ProductsGenerateApprovalURL{..}

126+ requestClient ProductsGenerateApprovalURL'{..}

127127 = go _pgauEnterpriseId _pgauProductId

128128 _pgauLanguageCode

129129 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/Get.hs+3−3

@@ -56,7 +56,7 @@ type ProductsGetResource =

5656-- | Retrieves details of a product for display to an enterprise admin.

5757--

5858-- /See:/ 'productsGet' smart constructor.

59−data ProductsGet = ProductsGet

59+data ProductsGet = ProductsGet'

6060 { _proEnterpriseId :: !Text

6161 , _proLanguage :: !(Maybe Text)

6262 , _proProductId :: !Text

@@ -76,7 +76,7 @@ productsGet

7676 -> Text -- ^ 'proProductId'

7777 -> ProductsGet

7878productsGet pProEnterpriseId_ pProProductId_ =

79− ProductsGet

79+ ProductsGet'

8080 { _proEnterpriseId = pProEnterpriseId_

8181 , _proLanguage = Nothing

8282 , _proProductId = pProProductId_

@@ -103,7 +103,7 @@ instance GoogleRequest ProductsGet where

103103 type Rs ProductsGet = Product

104104 type Scopes ProductsGet =

105105 '["https://www.googleapis.com/auth/androidenterprise"]

106− requestClient ProductsGet{..}

106+ requestClient ProductsGet'{..}

107107 = go _proEnterpriseId _proProductId _proLanguage

108108 (Just AltJSON)

109109 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GetAppRestrictionsSchema.hs+3−3

@@ -62,7 +62,7 @@ type ProductsGetAppRestrictionsSchemaResource =

6262-- restrictions are defined.

6363--

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

65−data ProductsGetAppRestrictionsSchema = ProductsGetAppRestrictionsSchema

65+data ProductsGetAppRestrictionsSchema = ProductsGetAppRestrictionsSchema'

6666 { _pgarsEnterpriseId :: !Text

6767 , _pgarsLanguage :: !(Maybe Text)

6868 , _pgarsProductId :: !Text

@@ -82,7 +82,7 @@ productsGetAppRestrictionsSchema

8282 -> Text -- ^ 'pgarsProductId'

8383 -> ProductsGetAppRestrictionsSchema

8484productsGetAppRestrictionsSchema pPgarsEnterpriseId_ pPgarsProductId_ =

85− ProductsGetAppRestrictionsSchema

85+ ProductsGetAppRestrictionsSchema'

8686 { _pgarsEnterpriseId = pPgarsEnterpriseId_

8787 , _pgarsLanguage = Nothing

8888 , _pgarsProductId = pPgarsProductId_

@@ -113,7 +113,7 @@ instance GoogleRequest

113113 AppRestrictionsSchema

114114 type Scopes ProductsGetAppRestrictionsSchema =

115115 '["https://www.googleapis.com/auth/androidenterprise"]

116− requestClient ProductsGetAppRestrictionsSchema{..}

116+ requestClient ProductsGetAppRestrictionsSchema'{..}

117117 = go _pgarsEnterpriseId _pgarsProductId

118118 _pgarsLanguage

119119 (Just AltJSON)

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/GetPermissions.hs+3−3

@@ -56,7 +56,7 @@ type ProductsGetPermissionsResource =

5656-- | Retrieves the Android app permissions required by this app.

5757--

5858-- /See:/ 'productsGetPermissions' smart constructor.

59−data ProductsGetPermissions = ProductsGetPermissions

59+data ProductsGetPermissions = ProductsGetPermissions'

6060 { _pgpEnterpriseId :: !Text

6161 , _pgpProductId :: !Text

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

@@ -73,7 +73,7 @@ productsGetPermissions

7373 -> Text -- ^ 'pgpProductId'

7474 -> ProductsGetPermissions

7575productsGetPermissions pPgpEnterpriseId_ pPgpProductId_ =

76− ProductsGetPermissions

76+ ProductsGetPermissions'

7777 { _pgpEnterpriseId = pPgpEnterpriseId_

7878 , _pgpProductId = pPgpProductId_

7979 }

@@ -93,7 +93,7 @@ instance GoogleRequest ProductsGetPermissions where

9393 type Rs ProductsGetPermissions = ProductPermissions

9494 type Scopes ProductsGetPermissions =

9595 '["https://www.googleapis.com/auth/androidenterprise"]

96− requestClient ProductsGetPermissions{..}

96+ requestClient ProductsGetPermissions'{..}

9797 = go _pgpEnterpriseId _pgpProductId (Just AltJSON)

9898 androidEnterpriseService

9999 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Products/UpdatePermissions.hs+3−3

@@ -68,7 +68,7 @@ type ProductsUpdatePermissionsResource =

6868-- permissions for this app that have been accepted by the enterprise.

6969--

7070-- /See:/ 'productsUpdatePermissions' smart constructor.

71−data ProductsUpdatePermissions = ProductsUpdatePermissions

71+data ProductsUpdatePermissions = ProductsUpdatePermissions'

7272 { _pupEnterpriseId :: !Text

7373 , _pupPayload :: !ProductPermissions

7474 , _pupProductId :: !Text

@@ -89,7 +89,7 @@ productsUpdatePermissions

8989 -> Text -- ^ 'pupProductId'

9090 -> ProductsUpdatePermissions

9191productsUpdatePermissions pPupEnterpriseId_ pPupPayload_ pPupProductId_ =

92− ProductsUpdatePermissions

92+ ProductsUpdatePermissions'

9393 { _pupEnterpriseId = pPupEnterpriseId_

9494 , _pupPayload = pPupPayload_

9595 , _pupProductId = pPupProductId_

@@ -117,7 +117,7 @@ instance GoogleRequest ProductsUpdatePermissions

117117 ProductPermissions

118118 type Scopes ProductsUpdatePermissions =

119119 '["https://www.googleapis.com/auth/androidenterprise"]

120− requestClient ProductsUpdatePermissions{..}

120+ requestClient ProductsUpdatePermissions'{..}

121121 = go _pupEnterpriseId _pupProductId (Just AltJSON)

122122 _pupPayload

123123 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Delete.hs+3−3

@@ -58,7 +58,7 @@ type StorelayoutclustersDeleteResource =

5858-- | Deletes a cluster.

5959--

6060-- /See:/ 'storelayoutclustersDelete' smart constructor.

61−data StorelayoutclustersDelete = StorelayoutclustersDelete

61+data StorelayoutclustersDelete = StorelayoutclustersDelete'

6262 { _sddEnterpriseId :: !Text

6363 , _sddPageId :: !Text

6464 , _sddClusterId :: !Text

@@ -79,7 +79,7 @@ storelayoutclustersDelete

7979 -> Text -- ^ 'sddClusterId'

8080 -> StorelayoutclustersDelete

8181storelayoutclustersDelete pSddEnterpriseId_ pSddPageId_ pSddClusterId_ =

82− StorelayoutclustersDelete

82+ StorelayoutclustersDelete'

8383 { _sddEnterpriseId = pSddEnterpriseId_

8484 , _sddPageId = pSddPageId_

8585 , _sddClusterId = pSddClusterId_

@@ -106,7 +106,7 @@ instance GoogleRequest StorelayoutclustersDelete

106106 type Rs StorelayoutclustersDelete = ()

107107 type Scopes StorelayoutclustersDelete =

108108 '["https://www.googleapis.com/auth/androidenterprise"]

109− requestClient StorelayoutclustersDelete{..}

109+ requestClient StorelayoutclustersDelete'{..}

110110 = go _sddEnterpriseId _sddPageId _sddClusterId

111111 (Just AltJSON)

112112 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Get.hs+3−3

@@ -58,7 +58,7 @@ type StorelayoutclustersGetResource =

5858-- | Retrieves details of a cluster.

5959--

6060-- /See:/ 'storelayoutclustersGet' smart constructor.

61−data StorelayoutclustersGet = StorelayoutclustersGet

61+data StorelayoutclustersGet = StorelayoutclustersGet'

6262 { _stoEnterpriseId :: !Text

6363 , _stoPageId :: !Text

6464 , _stoClusterId :: !Text

@@ -79,7 +79,7 @@ storelayoutclustersGet

7979 -> Text -- ^ 'stoClusterId'

8080 -> StorelayoutclustersGet

8181storelayoutclustersGet pStoEnterpriseId_ pStoPageId_ pStoClusterId_ =

82− StorelayoutclustersGet

82+ StorelayoutclustersGet'

8383 { _stoEnterpriseId = pStoEnterpriseId_

8484 , _stoPageId = pStoPageId_

8585 , _stoClusterId = pStoClusterId_

@@ -105,7 +105,7 @@ instance GoogleRequest StorelayoutclustersGet where

105105 type Rs StorelayoutclustersGet = StoreCluster

106106 type Scopes StorelayoutclustersGet =

107107 '["https://www.googleapis.com/auth/androidenterprise"]

108− requestClient StorelayoutclustersGet{..}

108+ requestClient StorelayoutclustersGet'{..}

109109 = go _stoEnterpriseId _stoPageId _stoClusterId

110110 (Just AltJSON)

111111 androidEnterpriseService

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Insert.hs+3−3

@@ -59,7 +59,7 @@ type StorelayoutclustersInsertResource =

5959-- | Inserts a new cluster in a page.

6060--

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

62−data StorelayoutclustersInsert = StorelayoutclustersInsert

62+data StorelayoutclustersInsert = StorelayoutclustersInsert'

6363 { _sEnterpriseId :: !Text

6464 , _sPageId :: !Text

6565 , _sPayload :: !StoreCluster

@@ -80,7 +80,7 @@ storelayoutclustersInsert

8080 -> StoreCluster -- ^ 'sPayload'

8181 -> StorelayoutclustersInsert

8282storelayoutclustersInsert pSEnterpriseId_ pSPageId_ pSPayload_ =

83− StorelayoutclustersInsert

83+ StorelayoutclustersInsert'

8484 { _sEnterpriseId = pSEnterpriseId_

8585 , _sPageId = pSPageId_

8686 , _sPayload = pSPayload_

@@ -105,7 +105,7 @@ instance GoogleRequest StorelayoutclustersInsert

105105 type Rs StorelayoutclustersInsert = StoreCluster

106106 type Scopes StorelayoutclustersInsert =

107107 '["https://www.googleapis.com/auth/androidenterprise"]

108− requestClient StorelayoutclustersInsert{..}

108+ requestClient StorelayoutclustersInsert'{..}

109109 = go _sEnterpriseId _sPageId (Just AltJSON) _sPayload

110110 androidEnterpriseService

111111 where go

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/List.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Patch.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Update.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Delete.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Get.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Insert.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/List.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Patch.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Update.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/GenerateToken.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/Get.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/GetAvailableProductSet.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/List.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/RevokeToken.hs+3−3

This diff is too big to show here.

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Users/SetAvailableProductSet.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+191−190

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Delete.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Deleteall.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Addexternallyhosted.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+4−4

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Commit.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Delete.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Details/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Upload.hs+4−4

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Delete.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Deleteall.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Upload.hs+4−4

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Insert.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Delete.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Deleteall.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Listings/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Validate.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Entitlements/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Batch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Delete.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Insert.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/List.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Patch.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/Update.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Products/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Cancel.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Defer.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Get.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Refund.hs+3−3

This diff is too big to show here.

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Purchases/Subscriptions/Revoke.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+156−156

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Get.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/List.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Delete.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Get.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/List.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Patch.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Create.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Delete.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Get.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/List.hs+3−3

This diff is too big to show here.

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Product.hs+46−44

This diff is too big to show here.

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+152−152

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/List.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Update.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Watch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Clear.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Calendars/Update.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Channels/Stop.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Colors/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Import.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Instances.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Move.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/QuickAdd.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Update.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/FreeBusy/Query.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Get.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/List.hs+3−3

This diff is too big to show here.

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Watch.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/AppsLicensing/Types/Product.hs+13−12

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Get.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProduct.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProductAndSKU.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/Update.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Product.hs+44−44

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Get.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Customers/Update.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Activate.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangePlan.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeRenewalSettings.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/ChangeSeats.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Get.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/List.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/StartPaidService.hs+3−3

This diff is too big to show here.

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Suspend.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/AppsTasks/Types/Product.hs+20−20

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Get.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/List.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/Update.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Clear.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Delete.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Get.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Insert.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Move.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Patch.hs+3−3

This diff is too big to show here.

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/Update.hs+3−3

This diff is too big to show here.

gogol-appstate/gen/Network/Google/AppState/Types/Product.hs+16−16

This diff is too big to show here.

gogol-appstate/gen/Network/Google/Resource/AppState/States/Clear.hs+3−3

This diff is too big to show here.

gogol-appstate/gen/Network/Google/Resource/AppState/States/Delete.hs+3−3

This diff is too big to show here.

gogol-appstate/gen/Network/Google/Resource/AppState/States/Get.hs+3−3

This diff is too big to show here.

gogol-appstate/gen/Network/Google/Resource/AppState/States/List.hs+3−3

This diff is too big to show here.

gogol-appstate/gen/Network/Google/Resource/AppState/States/Update.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Autoscaler/Types/Product.hs+64−64

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Delete.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Get.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Insert.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/List.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Patch.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/Update.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/Get.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/List.hs+3−3

This diff is too big to show here.

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Zones/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+207−206

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/Delete.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/Get.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/Insert.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/Patch.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/Update.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Cancel.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Get.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/GetQueryResults.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Insert.hs+4−4

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Query.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Projects/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/TableData/InsertAll.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/TableData/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Delete.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Get.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Insert.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/List.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Patch.hs+3−3

This diff is too big to show here.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/Update.hs+3−3

This diff is too big to show here.

gogol-billing/gen/Network/Google/Billing/Types/Product.hs+16−16

This diff is too big to show here.

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/Get.hs+3−3

This diff is too big to show here.

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/List.hs+3−3

This diff is too big to show here.

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/Projects/List.hs+3−3

This diff is too big to show here.

gogol-billing/gen/Network/Google/Resource/CloudBilling/Projects/GetBillingInfo.hs+3−3

This diff is too big to show here.

gogol-billing/gen/Network/Google/Resource/CloudBilling/Projects/UpdateBillingInfo.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+140−140

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/BlogUserInfos/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/GetByURL.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/ListByUser.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Approve.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Delete.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/List.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/ListByBlog.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/MarkAsSpam.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/RemoveContent.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/PageViews/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Delete.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Insert.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/List.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Patch.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Publish.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Revert.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/Update.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/List.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Delete.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Get.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/GetByPath.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Insert.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/List.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Patch.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Publish.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Revert.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Search.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Update.hs+3−3

This diff is too big to show here.

gogol-blogger/gen/Network/Google/Resource/Blogger/Users/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Books/Types/Product.hs+393−392

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Bookshelves/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Bookshelves/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Bookshelves/Volumes/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/CloudLoading/AddBook.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/CloudLoading/DeleteBook.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/CloudLoading/UpdateBook.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Dictionary/ListOfflineMetadata.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/VolumeAnnotations/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Layers/VolumeAnnotations/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyConfig/GetUserSettings.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyConfig/ReleaseDownloadAccess.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyConfig/RequestAccess.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyConfig/SyncVolumeLicenses.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyConfig/UpdateUserSettings.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Delete.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Insert.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Summary.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/Update.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/AddVolume.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/ClearVolumes.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/MoveVolume.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/RemoveVolume.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/Volumes/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/ReadingPositions/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/ReadingPositions/SetPosition.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Notification/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Onboarding/ListCategories.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Onboarding/ListCategoryVolumes.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Personalizedstream/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/PromoOffer/Accept.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/PromoOffer/Dismiss.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/PromoOffer/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Series/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Series/Membership/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/Associated/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/Get.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/Mybooks/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/Recommended/List.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/Recommended/Rate.hs+3−3

This diff is too big to show here.

gogol-books/gen/Network/Google/Resource/Books/Volumes/UserUploaded/List.hs+3−3

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+86−86

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Divisions/Search.hs+3−3

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/ElectionQuery.hs+3−3

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/VoterInfoQuery.hs+3−3

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByAddress.hs+3−3

This diff is too big to show here.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Representatives/RepresentativeInfoByDivision.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+55−55

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/Create.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/Delete.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/List.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Create.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Delete.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Get.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/List.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Patch.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Create.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Delete.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/Get.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/List.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Create.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Delete.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Get.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/List.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Update.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Accept.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Create.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Delete.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/Get.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/List.hs+3−3

This diff is too big to show here.

gogol-classroom/gen/Network/Google/Resource/Classroom/UserProFiles/Get.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/CloudMonitoring/Types/Product.hs+90−90

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/Create.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/Delete.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/List.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/List.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/Write.hs+3−3

This diff is too big to show here.

gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/TimeseriesDescriptors/List.hs+3−3

This diff is too big to show here.

gogol-cloudtrace/gen/Network/Google/CloudTrace/Types/Product.hs+22−22

This diff is too big to show here.

gogol-cloudtrace/gen/Network/Google/Resource/CloudTrace/Projects/PatchTraces.hs+3−3

This diff is too big to show here.

gogol-cloudtrace/gen/Network/Google/Resource/CloudTrace/Projects/Traces/Get.hs+3−3

This diff is too big to show here.

gogol-cloudtrace/gen/Network/Google/Resource/CloudTrace/Projects/Traces/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+824−818

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/GetHealth.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/CreateSnapshot.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/SetTarget.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/SetTarget.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Images/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Images/Deprecate.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Images/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Images/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Images/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AbandonInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AggregatedList.hs+4−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/DeleteInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/ListManagedInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/RecreateInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Resize.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetInstanceTemplate.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/SetTargetPools.hs+4−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AddInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/ListInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/RemoveInstances.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/SetNamedPorts.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/AddAccessConfig.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/AttachDisk.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/DeleteAccessConfig.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/DetachDisk.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/GetSerialPortOutput.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Reset.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetDiskAutoDelete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetMachineType.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetMetadata.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetScheduling.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetTags.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Start.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Stop.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Licenses/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Networks/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Networks/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Networks/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Networks/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Projects/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveDisk.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Projects/MoveInstance.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetCommonInstanceMetadata.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Projects/SetUsageExportBucket.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Regions/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Regions/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Routes/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Routes/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Routes/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Routes/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/SSLCertificates/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/SSLCertificates/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/SSLCertificates/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/SSLCertificates/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/SetURLMap.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/SetSSLCertificates.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/SetURLMap.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddHealthCheck.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AddInstance.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/GetHealth.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveHealthCheck.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/RemoveInstance.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/SetBackup.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Patch.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Update.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Validate.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/AggregatedList.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Insert.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/List.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Zones/Get.hs+3−3

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Zones/List.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Container/Types/Product.hs+40−40

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Create.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Delete.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Get.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/List.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Update.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/GetServerConfig.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Operations/List.hs+3−3

This diff is too big to show here.

gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+61−61

This diff is too big to show here.

gogol-customsearch/gen/Network/Google/Resource/Search/CSE/List.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+406−405

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Create.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Get.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/GetMetrics.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/List.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Messages/List.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Update.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/Lease.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/WorkItems/ReportStatus.hs+3−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Dataproc/Types/Product.hs+192−190

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Media/Download.hs+4−4

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Media/Upload.hs+4−4

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Create.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Delete.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Diagnose.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Get.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/List.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Patch.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Cancel.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Delete.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Get.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/List.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Submit.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Cancel.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Delete.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/List.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+140−139

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/AllocateIds.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/BeginTransaction.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/Commit.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/Lookup.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/Rollback.hs+3−3

This diff is too big to show here.

gogol-datastore/gen/Network/Google/Resource/Datastore/DataSets/RunQuery.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+117−115

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/List.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Breakpoints/Update.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Controller/Debuggees/Register.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Delete.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Get.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/List.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/Breakpoints/Set.hs+3−3

This diff is too big to show here.

gogol-debugger/gen/Network/Google/Resource/CloudDebugger/Debugger/Debuggees/List.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types/Product.hs+116−116

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/CancelPreview.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Delete.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Get.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Insert.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Patch.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Stop.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/Update.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Manifests/Get.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Resources/Get.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs+3−3

This diff is too big to show here.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Types/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+773−772

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountActiveAdSummaries/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Browsers/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Cities/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeAssets/Insert.hs+4−4

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DimensionValues/Query.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/Get.hs+4−4

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Generatetag.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Metros/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Generatetags.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Regions/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/CompatibleFields/Query.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/Get.hs+4−4

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Run.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Update.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProFiles/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProFiles/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Delete.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Get.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Insert.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/List.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Patch.hs+3−3

This diff is too big to show here.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Update.hs+3−3

This diff is too big to show here.

gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+109−107

This diff is too big to show here.

gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/GetRest.hs+3−3

This diff is too big to show here.

gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/List.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/DNS/Types/Product.hs+32−32

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/Changes/Create.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/Changes/Get.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/Changes/List.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Create.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Delete.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/Get.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/List.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/Projects/Get.hs+3−3

This diff is too big to show here.

gogol-dns/gen/Network/Google/Resource/DNS/ResourceRecordSets/List.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Product.hs+84−84

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Lineitems/Downloadlineitems.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Lineitems/Uploadlineitems.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/CreateQuery.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/DeleteQuery.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/GetQuery.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/Listqueries.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/RunQuery.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Reports/Listreports.hs+3−3

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Rubicon/Notifyproposalchange.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+71−71

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Get.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Insert.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Patch.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Update.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/UpdateAvailability.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Generate.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Get.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/GetFile.hs+4−4

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/Request.hs+3−3

This diff is too big to show here.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/SavedColumns/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Drive/Types/Product.hs+118−118

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/About/Get.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/GetStartPageToken.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Channels/Stop.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/Create.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/Delete.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/Get.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/Update.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Create.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Delete.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/EmptyTrash.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Export.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/GenerateIds.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Create.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Delete.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Get.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Update.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/Create.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/Delete.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/Get.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/Update.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Delete.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Get.hs+4−4

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/List.hs+3−3

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Update.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+80−80

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSet/Aggregate.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Create.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Delete.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Get.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Patch.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Delete.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Get.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/List.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Patch.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Update.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Delete.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/List.hs+3−3

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Update.hs+3−3

This diff is too big to show here.

gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+11−11

This diff is too big to show here.

gogol-fonts/gen/Network/Google/Resource/Webfonts/Webfonts/List.hs+3−3

This diff is too big to show here.

gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+20−20

This diff is too big to show here.

gogol-freebasesearch/gen/Network/Google/Method/Freebase/Reconcile.hs+3−3

This diff is too big to show here.

gogol-freebasesearch/gen/Network/Google/Method/Freebase/Search.hs+4−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+96−96

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Delete.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Get.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Insert.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/List.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Patch.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/Update.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQL.hs+4−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQLGet.hs+4−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Delete.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Get.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Insert.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/List.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Patch.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Update.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Copy.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Delete.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Get.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+4−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportTable.hs+5−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Insert.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/List.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Patch.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+5−4

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/Update.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Delete.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/Get.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/List.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Delete.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Get.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Insert.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/List.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Patch.hs+3−3

This diff is too big to show here.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Update.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Product.hs+44−44

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Delete.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Get.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Insert.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/List.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Patch.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/Update.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/ImageConfigurations/Upload.hs+4−4

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Delete.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Get.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Insert.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/List.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Patch.hs+3−3

This diff is too big to show here.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/Update.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+60−60

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetAll.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetAllForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Achievements/ResetMultipleForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Applications/ListHidden.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetAll.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetAllForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Events/ResetMultipleForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Players/Hide.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Players/Unhide.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetAll.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetAllForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Quests/ResetMultipleForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Rooms/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Rooms/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetAll.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetAllForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Scores/ResetMultipleForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/TurnBasedMatches/Reset.hs+3−3

This diff is too big to show here.

gogol-games-management/gen/Network/Google/Resource/GamesManagement/TurnBasedMatches/ResetForAllPlayers.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Games/Types/Product.hs+396−396

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/AchievementDefinitions/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/Increment.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/Reveal.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/SetStepsAtLeast.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/Unlock.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Achievements/UpdateMultiple.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Applications/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Applications/Played.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Applications/Verify.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Events/ListByPlayer.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Events/ListDefinitions.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Events/Record.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Leaderboards/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Leaderboards/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Metagame/GetMetagameConfig.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Metagame/ListCategoriesByPlayer.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Players/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Players/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Remove.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Pushtokens/Update.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/QuestMilestones/Claim.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Quests/Accept.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Quests/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Revisions/Check.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Create.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Decline.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Dismiss.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Join.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/Leave.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Rooms/ReportStatus.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Scores/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Scores/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Scores/ListWindow.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Scores/Submit.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Scores/SubmitMultiple.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Snapshots/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/Snapshots/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Cancel.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Create.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Decline.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Dismiss.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Finish.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Get.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Join.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Leave.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/LeaveTurn.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/List.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Rematch.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Sync.hs+3−3

This diff is too big to show here.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/TakeTurn.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+273−273

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/CallSets/Create.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/CallSets/Delete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/CallSets/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/CallSets/Patch.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/CallSets/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/Create.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/Delete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/GetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/List.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/Patch.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/SetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/TestIAMPermissions.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/Undelete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Operations/Cancel.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Operations/List.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/CoverageBuckets/List.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Delete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Export.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Import.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Patch.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Reads/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Reads/Stream.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/References/Bases/List.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/References/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/References/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Referencesets/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Referencesets/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Create.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Delete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Export.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Patch.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/VariantSets/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Create.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Delete.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Get.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Import.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Merge.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Patch.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Search.hs+3−3

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Stream.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+93−92

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Create.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Delete.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Get.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/List.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Send.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Update.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/GetProFile.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/History/List.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Create.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Delete.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Get.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/List.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Patch.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Labels/Update.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Attachments/Get.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Delete.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Get.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Import.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Insert.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/List.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Modify.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Send.hs+4−4

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Trash.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Untrash.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Stop.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Delete.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Get.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/List.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Modify.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Trash.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/Untrash.hs+3−3

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Watch.hs+3−3

This diff is too big to show here.

gogol-groups-migration/gen/Network/Google/GroupsMigration/Types/Product.hs+4−4

This diff is too big to show here.

gogol-groups-migration/gen/Network/Google/Resource/GroupsMigration/Archive/Insert.hs+4−4

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Product.hs+4−4

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hs+3−3

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs+3−3

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+150−147

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/CreateAuthURI.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DeleteAccount.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DownloadAccount.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetAccountInfo.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetOOBConfirmationCode.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetProjectConfig.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetPublicKeys.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetRecaptchaParam.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/ResetPassword.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetAccountInfo.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetProjectConfig.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SignOutUser.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SignupNewUser.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/UploadAccount.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyAssertion.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyCustomToken.hs+3−3

This diff is too big to show here.

gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyPassword.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/KnowledgeGraphSearch/Types/Product.hs+77−77

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Create.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Delete.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Get.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/GetIAMPolicy.hs+4−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Create.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Delete.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Get.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/List.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/List.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SetIAMPolicy.hs+4−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SignBlob.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/TestIAMPermissions.hs+3−3

This diff is too big to show here.

gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Update.hs+3−3

This diff is too big to show here.

gogol-latencytest/gen/Network/Google/LatencyTest/Types/Product.hs+29−28

This diff is too big to show here.

gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updateaggregatedstats.hs+3−3

This diff is too big to show here.

gogol-latencytest/gen/Network/Google/Resource/Cloudlatencytest/Statscollection/Updatestats.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Logging/Types/Product.hs+95−93

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Entries/List.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Entries/Write.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/MonitoredResourceDescriptors/List.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Delete.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Create.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Delete.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Get.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/List.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Update.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Create.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Delete.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Get.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/List.hs+3−3

This diff is too big to show here.

gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Update.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Product.hs+72−72

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/CustomFieldDef/List.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Get.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Insert.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/List.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Update.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Location/List.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Get.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Update.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Team/List.hs+3−3

This diff is too big to show here.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Worker/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+296−295

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/Parents/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/CancelProcessing.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Create.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Delete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/GetPublished.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/ListPublished.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Parents/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Permissions/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Permissions/BatchUpdate.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Process.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Publish.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/UnPublish.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Create.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Delete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/GetPublished.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/ListPublished.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Permissions/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Permissions/BatchUpdate.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/Publish.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/UnPublish.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/Create.hs+4−4

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/Get.hs+4−4

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/CancelProcessing.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Create.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Delete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Parents/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Permissions/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Permissions/BatchUpdate.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Process.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/BatchDelete.hs+4−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/BatchInsert.hs+4−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Delete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Files/Insert.hs+4−4

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Parents/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Permissions/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Permissions/BatchUpdate.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Process.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Upload.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Create.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Delete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchInsert.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/BatchPatch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Files/Insert.hs+4−4

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Get.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Parents/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Patch.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Permissions/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Permissions/BatchUpdate.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Process.hs+3−3

This diff is too big to show here.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Upload.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Mirror/Types/Product.hs+81−80

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Accounts/Insert.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Delete.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Get.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Insert.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/List.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Patch.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Contacts/Update.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Locations/Get.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Locations/List.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Settings/Get.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Delete.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Insert.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/List.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Subscriptions/Update.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Delete.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Get.hs+4−4

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Insert.hs+4−4

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/List.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Delete.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Get.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Insert.hs+4−4

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/List.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Patch.hs+3−3

This diff is too big to show here.

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Update.hs+4−4

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+131−131

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/CollectdTimeSeries/Create.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Create.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Delete.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Get.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/List.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Members/List.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Update.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Create.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Delete.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Get.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/List.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MonitoredResourceDescriptors/Get.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MonitoredResourceDescriptors/List.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/TimeSeries/Create.hs+3−3

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/TimeSeries/List.hs+3−3

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Method/OAuth2/GetCertForOpenIdConnect.hs+3−3

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Method/OAuth2/TokenInfo.hs+3−3

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+16−16

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/Get.hs+3−3

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/V2/Me/Get.hs+3−3

This diff is too big to show here.

gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+62−62

This diff is too big to show here.

gogol-pagespeed/gen/Network/Google/Resource/PagespeedOnline/PagespeedAPI/RunPagespeed.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Partners/Types/Product.hs+107−107

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/ClientMessages/Log.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/Companies/Get.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/Companies/Leads/Create.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/Companies/List.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/UserEvents/Log.hs+3−3

This diff is too big to show here.

gogol-partners/gen/Network/Google/Resource/Partners/UserStates/List.hs+3−3

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types/Product.hs+142−140

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/Connections/List.hs+3−3

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/Get.hs+3−3

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/GetBatchGet.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Product.hs+32−32

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Avails/List.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/Get.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/List.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/Get.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/List.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/Country/Get.hs+3−3

This diff is too big to show here.

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+250−248

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Get.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Insert.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Audiences/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/AddPeople.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Get.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Insert.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Patch.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Remove.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/RemovePeople.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Update.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Get.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Insert.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Media/Insert.hs+4−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/Get.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/List.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByActivity.hs+3−3

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByCircle.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Plus/Types/Product.hs+206−204

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Get.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/List.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Search.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/Get.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/List.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/Get.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/List.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/ListByActivity.hs+3−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/Search.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+100−99

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/HostedModels/Predict.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Analyze.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Delete.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Get.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Insert.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/List.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Predict.hs+3−3

This diff is too big to show here.

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/Update.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+78−78

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/BeaconInfo/GetforObserved.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Activate.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/BatchDelete.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/Create.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/Delete.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Attachments/List.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Deactivate.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Decommission.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Diagnostics/List.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Get.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/List.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Register.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Update.hs+3−3

This diff is too big to show here.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Namespaces/List.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+90−89

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Acknowledge.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Create.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Delete.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Get.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/GetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/List.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyAckDeadline.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/ModifyPushConfig.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Pull.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/SetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/TestIAMPermissions.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Create.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Delete.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Get.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/GetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/List.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Publish.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/SetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Subscriptions/List.hs+3−3

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/TestIAMPermissions.hs+3−3

This diff is too big to show here.

gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+96−96

This diff is too big to show here.

gogol-qpxexpress/gen/Network/Google/Resource/QPXExpress/Trips/Search.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/ReplicaPoolUpdater/Types/Product.hs+60−60

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Cancel.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Get.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Insert.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/List.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/ListInstanceUpdates.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Pause.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Resume.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/Rollback.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/ZoneOperations/Get.hs+3−3

This diff is too big to show here.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/ZoneOperations/List.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/ReplicaPool/Types/Product.hs+57−56

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/AbandonInstances.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/Delete.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/DeleteInstances.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/Get.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/Insert.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/List.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/RecreateInstances.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/Resize.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/SetInstanceTemplate.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/InstanceGroupManagers/SetTargetPools.hs+4−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/ZoneOperations/Get.hs+3−3

This diff is too big to show here.

gogol-replicapool/gen/Network/Google/Resource/ReplicaPool/ZoneOperations/List.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Delete.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Get.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/GetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/List.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/SetIAMPolicy.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/TestIAMPermissions.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Undelete.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Update.hs+3−3

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+44−44

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneOperations/Get.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneOperations/List.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/AddResources.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/Delete.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/Get.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/GetService.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/Insert.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/List.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/ListResources.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/RemoveResources.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/Resource/ResourceViews/ZoneViews/SetService.hs+3−3

This diff is too big to show here.

gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+67−67

This diff is too big to show here.

gogol-script/gen/Network/Google/Resource/Script/Scripts/Run.hs+3−3

This diff is too big to show here.

gogol-script/gen/Network/Google/Script/Types/Product.hs+33−33

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/AuthInfo.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Delete.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Insert.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Patch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Update.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountshipping/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountshipping/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountshipping/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountshipping/Patch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountshipping/Update.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountstatuses/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountstatuses/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountstatuses/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounttax/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounttax/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounttax/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounttax/Patch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounttax/Update.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Delete.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Insert.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Patch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Update.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeedstatuses/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeedstatuses/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeedstatuses/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Inventory/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Inventory/Set.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Acknowledge.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/AdvancetestOrder.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancel.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Cancellineitem.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/CreatetestOrder.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/GetbymerchantOrderid.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/GettestOrdertemplate.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Refund.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Returnlineitem.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Shiplineitems.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/UpdatemerchantOrderid.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Updateshipment.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Delete.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Insert.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Productstatuses/Custombatch.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Productstatuses/Get.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Productstatuses/List.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent/Types/Product.hs+593−592

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Delete.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Get.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/GetToken.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Insert.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/List.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Patch.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/Resource/SiteVerification/WebResource/Update.hs+3−3

This diff is too big to show here.

gogol-siteverification/gen/Network/Google/SiteVerification/Types/Product.hs+25−24

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrum.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/GetSpectrumBatch.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Init.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/NotifySpectrumUse.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/Register.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Resource/Spectrum/Paws/VerifyDevice.hs+3−3

This diff is too big to show here.

gogol-spectrum/gen/Network/Google/Spectrum/Types/Product.hs+133−132

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/BackupRuns/Delete.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/BackupRuns/Get.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/BackupRuns/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Delete.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Get.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Insert.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Patch.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Databases/Update.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Flags/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Clone.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Delete.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Export.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Failover.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Get.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Import.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Insert.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Patch.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/PromoteReplica.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/ResetSSLConfig.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Restart.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/RestoreBackup.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/StartReplica.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/StopReplica.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Instances/Update.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Operations/Get.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Operations/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/CreateEphemeral.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Delete.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Get.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Insert.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Tiers/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/Delete.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/Insert.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/List.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/Resource/SQL/Users/Update.hs+3−3

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+193−192

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/GetGoogleServiceAccount.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/GoogleServiceAccounts/Get.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Create.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Get.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/List.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Patch.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Cancel.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Get.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/List.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Pause.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Resume.hs+3−3

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+102−102

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Delete.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Get.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Insert.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/List.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Patch.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Update.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Delete.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Get.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Insert.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/List.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Patch.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Buckets/Update.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Channels/Stop.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Delete.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Get.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Insert.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/List.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Patch.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Update.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Delete.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Get.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Insert.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/List.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Patch.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Update.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Compose.hs+4−4

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Copy.hs+4−4

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Delete.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Get.hs+4−4

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Insert.hs+4−4

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/List.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Patch.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Rewrite.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Update.hs+4−4

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Objects/WatchAll.hs+3−3

This diff is too big to show here.

gogol-storage/gen/Network/Google/Storage/Types/Product.hs+110−110

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Patch.hs+4−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Entities/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Folders/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MoveFolders/Update.hs+4−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/ReauthorizeEnvironments/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Tags/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Triggers/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Variables/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Publish.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Restore.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Undelete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Versions/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Create.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Delete.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Get.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/List.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Permissions/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Update.hs+3−3

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+125−124

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Taskqueues/Get.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Delete.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Get.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Insert.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Lease.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/List.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Patch.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Update.hs+3−3

This diff is too big to show here.

gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Product.hs+24−24

This diff is too big to show here.

gogol-translate/gen/Network/Google/Resource/Language/Detections/List.hs+3−3

This diff is too big to show here.

gogol-translate/gen/Network/Google/Resource/Language/Languages/List.hs+3−3

This diff is too big to show here.

gogol-translate/gen/Network/Google/Resource/Language/Translations/List.hs+3−3

This diff is too big to show here.

gogol-translate/gen/Network/Google/Translate/Types/Product.hs+24−24

This diff is too big to show here.

gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Get.hs+3−3

This diff is too big to show here.

gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Insert.hs+3−3

This diff is too big to show here.

gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/List.hs+3−3

This diff is too big to show here.

gogol-urlshortener/gen/Network/Google/URLShortener/Types/Product.hs+20−20

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/GlobalAccountsOperations/Delete.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/GlobalAccountsOperations/Get.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/GlobalAccountsOperations/List.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/AddMember.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/Delete.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/Get.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/Insert.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/List.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Groups/RemoveMember.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Linux/GetAuthorizedKeysView.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Linux/GetLinuxAccountViews.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/AddPublicKey.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/Delete.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/Get.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/Insert.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/List.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/Resource/CloudUserAccounts/Users/RemovePublicKey.hs+3−3

This diff is too big to show here.

gogol-useraccounts/gen/Network/Google/UserAccounts/Types/Product.hs+76−76

This diff is too big to show here.

gogol-vision/gen/Network/Google/Resource/Vision/Images/Annotate.hs+3−3

This diff is too big to show here.

gogol-vision/gen/Network/Google/Vision/Types/Product.hs+100−99

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Searchanalytics/Query.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Delete.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Get.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/List.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sitemaps/Submit.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Add.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Delete.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/Get.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/Sites/List.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/Get.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/List.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/MarkAsFixed.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorscounts/Query.hs+3−3

This diff is too big to show here.

gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Product.hs+65−64

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/BatchReportDefinitions/List.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/BatchReports/List.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/GroupItems/List.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/List.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Groups/Update.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Reports/Query.hs+3−3

This diff is too big to show here.

gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Product.hs+60−60

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/Create.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/Get.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/List.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/Reports/Get.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Jobs/Reports/List.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/Media/Download.hs+4−4

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/Resource/YouTubeReporting/ReportTypes/List.hs+3−3

This diff is too big to show here.

gogol-youtube-reporting/gen/Network/Google/YouTubeReporting/Types/Product.hs+31−31

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Activities/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Activities/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Download.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Insert.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Update.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelBanners/Insert.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelSections/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Channels/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Channels/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/CommentThreads/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/MarkAsSpam.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/SetModerationStatus.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Comments/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/FanFundingEvents/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/GuideCategories/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/I18nLanguages/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/I18nRegions/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Bind.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Control.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Transition.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatBans/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatBans/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/LiveStreams/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayListItems/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/PlayLists/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Search/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Sponsors/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/Insert.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Subscriptions/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Thumbnails/Set.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/VideoAbuseReportReasons/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/VideoCategories/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Delete.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/GetRating.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Insert.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/List.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Rate.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/ReportAbuse.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Update.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Watermarks/Set.hs+4−4

This diff is too big to show here.

gogol-youtube/gen/Network/Google/Resource/YouTube/Watermarks/UnSet.hs+3−3

This diff is too big to show here.

gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+677−675

This diff is too big to show here.