90e8f83 · gogol · git.iko.soy

git.iko.soy/gogol

Regenerating all services

commit90e8f836556a32aafbda24d7faa8065665ed5631 authorBrendan Hay <brendan.g.hay@gmail.com> dateSat 24 Oct 2015, 08:57 (11 years ago) parente0be89a

754 files changed+4076−4115

compare with develop

unifiedsplit

core/src/Network/Google/Data/JSON.hs+7−7

@@ -12,7 +12,7 @@

1212--

1313module Network.Google.Data.JSON

1414 ( JSONValue

15− , JSONText (..)

15+ , Textual (..)

1616 , parseJSONObject

1717 , parseJSONText

1818 , toJSONText

@@ -41,18 +41,18 @@ import Servant.API

4141

4242type JSONValue = Value

4343

44−newtype JSONText a = JSONText a

44+newtype Textual a = Textual a

4545 deriving (Eq, Ord, Read, Show, Num, Fractional, Data, Typeable, FromText, ToText)

4646

47−instance (FromJSON a, FromText a) => FromJSON (JSONText a) where

47+instance (FromJSON a, FromText a) => FromJSON (Textual a) where

4848 parseJSON (String s) =

4949 case fromText s of

50− Just x -> pure (JSONText x)

50+ Just x -> pure (Textual x)

5151 Nothing -> fail $ "Failed to parse value from " ++ Text.unpack s

52− parseJSON o = JSONText <$> parseJSON o

52+ parseJSON o = Textual <$> parseJSON o

5353

54−instance ToText a => ToJSON (JSONText a) where

55− toJSON (JSONText x) = String (toText x)

54+instance ToText a => ToJSON (Textual a) where

55+ toJSON (Textual x) = String (toText x)

5656

5757parseJSONObject :: FromJSON a => HashMap Text Value -> Parser a

5858parseJSONObject = parseJSON . Object

core/src/Network/Google/Data/Numeric.hs−4

@@ -12,7 +12,6 @@

1212--

1313module Network.Google.Data.Numeric

1414 ( Nat (..)

15− , _Nat

1615 ) where

1716

1817import Control.Lens

@@ -33,9 +32,6 @@ import Servant.API

3332newtype Nat = Nat { unNat :: Natural }

3433 deriving (Eq, Ord, Enum, Show, Read, Num, Real, Integral, Data, Typeable)

3534

36−_Nat :: Iso' Nat Natural

37−_Nat = iso unNat Nat

38−

3935instance FromJSON Nat where

4036 parseJSON = parseJSON >=> go

4137 where

gen/src/Gen/Syntax.hs+9−9

@@ -560,14 +560,14 @@ internalLit = \case

560560 Time -> TyCon "Time'"

561561 Date -> TyCon "Date'"

562562 DateTime -> TyCon "DateTime'"

563− Nat -> TyApp (TyCon "JSONText") (TyCon "Nat")

564− Float -> TyApp (TyCon "JSONText") (TyCon "Float")

565− Double -> TyApp (TyCon "JSONText") (TyCon "Double")

566− Byte -> TyApp (TyCon "JSONText") (TyCon "Word8")

567− UInt32 -> TyApp (TyCon "JSONText") (TyCon "Word32")

568− UInt64 -> TyApp (TyCon "JSONText") (TyCon "Word64")

569− Int32 -> TyApp (TyCon "JSONText") (TyCon "Int32")

570− Int64 -> TyApp (TyCon "JSONText") (TyCon "Int64")

563+ Nat -> TyApp (TyCon "Textual") (TyCon "Nat")

564+ Float -> TyApp (TyCon "Textual") (TyCon "Double")

565+ Double -> TyApp (TyCon "Textual") (TyCon "Double")

566+ Byte -> TyApp (TyCon "Textual") (TyCon "Word8")

567+ UInt32 -> TyApp (TyCon "Textual") (TyCon "Word32")

568+ UInt64 -> TyApp (TyCon "Textual") (TyCon "Word64")

569+ Int32 -> TyApp (TyCon "Textual") (TyCon "Int32")

570+ Int64 -> TyApp (TyCon "Textual") (TyCon "Int64")

571571 Alt t -> TyCon (unqual (Text.unpack t))

572572 RqBody -> TyCon "RequestBody"

573573 RsBody -> TyCon "Stream"

@@ -588,7 +588,7 @@ iso :: TType -> Maybe Exp

588588iso = \case

589589 TList {} -> Just (var "_Coerce")

590590 TMap {} -> Just (var "_Coerce")

591− TLit Nat -> Just (var "_Nat")

591+ TLit Nat -> Just (var "_Coerce")

592592 TLit Time -> Just (var "_Time")

593593 TLit Date -> Just (var "_Date")

594594 TLit DateTime -> Just (var "_DateTime")

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

@@ -23,9 +23,9 @@ import Network.Google.Prelude

2323--

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

2525data BrandDTO = BrandDTO

26− { _bdtoAdvertiserId :: !(Maybe (JSONText Int64))

26+ { _bdtoAdvertiserId :: !(Maybe (Textual Int64))

2727 , _bdtoName :: !(Maybe Text)

28− , _bdtoId :: !(Maybe (JSONText Int64))

28+ , _bdtoId :: !(Maybe (Textual Int64))

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

3030

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

@@ -82,12 +82,12 @@ instance ToJSON BrandDTO where

8282data MarketplaceNote = MarketplaceNote

8383 { _mnNote :: !(Maybe Text)

8484 , _mnKind :: !Text

85− , _mnTimestampMs :: !(Maybe (JSONText Int64))

85+ , _mnTimestampMs :: !(Maybe (Textual Int64))

8686 , _mnDealId :: !(Maybe Text)

8787 , _mnNoteId :: !(Maybe Text)

8888 , _mnCreatorRole :: !(Maybe Text)

8989 , _mnOrderId :: !(Maybe Text)

90− , _mnOrderRevisionNumber :: !(Maybe (JSONText Int64))

90+ , _mnOrderRevisionNumber :: !(Maybe (Textual Int64))

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

9292

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

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

208208 , _cnataStore :: !(Maybe Text)

209209 , _cnataPrice :: !(Maybe Text)

210210 , _cnataAdvertiser :: !(Maybe Text)

211− , _cnataStarRating :: !(Maybe (JSONText Double))

211+ , _cnataStarRating :: !(Maybe (Textual Double))

212212 , _cnataLogo :: !(Maybe CreativeNATiveAdLogo)

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

214214

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

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

465465 , _csriciContextType :: !(Maybe Text)

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

467− , _csriciGeoCriteriaId :: !(Maybe [JSONText Int32])

467+ , _csriciGeoCriteriaId :: !(Maybe [Textual Int32])

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

469469

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

@@ -555,11 +555,11 @@ data TermsDTO = TermsDTO

555555 , _tdtoCpm :: !(Maybe MoneyDTO)

556556 , _tdtoEstimatedSpend :: !(Maybe MoneyDTO)

557557 , _tdtoAdvertisers :: !(Maybe [AdvertiserDTO])

558− , _tdtoEstimatedImpressionsPerDay :: !(Maybe (JSONText Int64))

558+ , _tdtoEstimatedImpressionsPerDay :: !(Maybe (Textual Int64))

559559 , _tdtoMonetizerType :: !(Maybe Text)

560560 , _tdtoAudienceSegmentDescription :: !(Maybe Text)

561561 , _tdtoCreativeReviewPolicy :: !(Maybe Text)

562− , _tdtoMinimumTrueLooks :: !(Maybe (JSONText Int64))

562+ , _tdtoMinimumTrueLooks :: !(Maybe (Textual Int64))

563563 , _tdtoStartDate :: !(Maybe DateTime)

564564 , _tdtoCreativeBlockingLevel :: !(Maybe Text)

565565 , _tdtoSemiTransparent :: !(Maybe Bool)

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

570570 , _tdtoTermsAttributes :: !(Maybe [Text])

571571 , _tdtoInventorySegmentTargeting :: !(Maybe InventorySegmentTargeting)

572572 , _tdtoDescriptiveName :: !(Maybe Text)

573− , _tdtoMinimumSpendMicros :: !(Maybe (JSONText Int64))

573+ , _tdtoMinimumSpendMicros :: !(Maybe (Textual Int64))

574574 , _tdtoTargetByDealId :: !(Maybe Bool)

575575 , _tdtoBillingTerms :: !(Maybe Text)

576576 , _tdtoDescription :: !(Maybe Text)

@@ -946,7 +946,7 @@ instance ToJSON CreateOrdersResponse where

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

947947data AccountBidderLocationItem = AccountBidderLocationItem

948948 { _abliURL :: !(Maybe Text)

949− , _abliMaximumQps :: !(Maybe (JSONText Int32))

949+ , _abliMaximumQps :: !(Maybe (Textual Int32))

950950 , _abliRegion :: !(Maybe Text)

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

952952

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

10051005--

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

10071007data PrivateData = PrivateData

1008− { _pdReferencePayload :: !(Maybe (JSONText Word8))

1008+ { _pdReferencePayload :: !(Maybe (Textual Word8))

10091009 , _pdReferenceId :: !(Maybe Text)

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

10111011

@@ -1055,10 +1055,10 @@ instance ToJSON PrivateData where

10551055data Budget = Budget

10561056 { _bCurrencyCode :: !(Maybe Text)

10571057 , _bKind :: !Text

1058− , _bBudgetAmount :: !(Maybe (JSONText Int64))

1059− , _bAccountId :: !(Maybe (JSONText Int64))

1058+ , _bBudgetAmount :: !(Maybe (Textual Int64))

1059+ , _bAccountId :: !(Maybe (Textual Int64))

10601060 , _bId :: !(Maybe Text)

1061− , _bBillingId :: !(Maybe (JSONText Int64))

1061+ , _bBillingId :: !(Maybe (Textual Int64))

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

10631063

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

@@ -1224,8 +1224,8 @@ instance ToJSON

12241224--

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

12261226data DeliveryControlFrequencyCap = DeliveryControlFrequencyCap

1227− { _dcfcMaxImpressions :: !(Maybe (JSONText Int32))

1228− , _dcfcNumTimeUnits :: !(Maybe (JSONText Int32))

1227+ { _dcfcMaxImpressions :: !(Maybe (Textual Int32))

1228+ , _dcfcNumTimeUnits :: !(Maybe (Textual Int32))

12291229 , _dcfcTimeUnitType :: !(Maybe Text)

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

12311231

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

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

12851285data DealPartyDTO = DealPartyDTO

12861286 { _dpdtoBuyerSellerRole :: !(Maybe Text)

1287− , _dpdtoCustomerId :: !(Maybe (JSONText Int32))

1287+ , _dpdtoCustomerId :: !(Maybe (Textual Int32))

12881288 , _dpdtoName :: !(Maybe Text)

12891289 , _dpdtoWebProperty :: !(Maybe WebPropertyDTO)

12901290 , _dpdtoBuyer :: !(Maybe BuyerDTO)

@@ -1723,8 +1723,8 @@ instance ToJSON CreateOrdersRequest where

17231723--

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

17251725data AdSize = AdSize

1726− { _asHeight :: !(Maybe (JSONText Int32))

1727− , _asWidth :: !(Maybe (JSONText Int32))

1726+ { _asHeight :: !(Maybe (Textual Int32))

1727+ , _asWidth :: !(Maybe (Textual Int32))

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

17291729

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

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

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

18181818data AddOrderDealsResponse = AddOrderDealsResponse

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

1820− , _aodrOrderRevisionNumber :: !(Maybe (JSONText Int64))

1820+ , _aodrOrderRevisionNumber :: !(Maybe (Textual Int64))

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

18221822

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

@@ -1971,27 +1971,27 @@ instance ToJSON PricePerBuyer where

19711971--

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

19731973data Creative = Creative

1974− { _cAttribute :: !(Maybe [JSONText Int32])

1974+ { _cAttribute :: !(Maybe [Textual Int32])

19751975 , _cNATiveAd :: !(Maybe CreativeNATiveAd)

1976− , _cHeight :: !(Maybe (JSONText Int32))

1976+ , _cHeight :: !(Maybe (Textual Int32))

19771977 , _cBuyerCreativeId :: !(Maybe Text)

19781978 , _cAdvertiserName :: !(Maybe Text)

1979− , _cAgencyId :: !(Maybe (JSONText Int64))

1979+ , _cAgencyId :: !(Maybe (Textual Int64))

19801980 , _cCorrections :: !(Maybe [CreativeCorrectionsItem])

1981− , _cProductCategories :: !(Maybe [JSONText Int32])

1981+ , _cProductCategories :: !(Maybe [Textual Int32])

19821982 , _cKind :: !Text

19831983 , _cHTMLSnippet :: !(Maybe Text)

1984− , _cAdvertiserId :: !(Maybe [JSONText Int64])

1985− , _cRestrictedCategories :: !(Maybe [JSONText Int32])

1984+ , _cAdvertiserId :: !(Maybe [Textual Int64])

1985+ , _cRestrictedCategories :: !(Maybe [Textual Int32])

19861986 , _cDealsStatus :: !(Maybe Text)

1987− , _cWidth :: !(Maybe (JSONText Int32))

1987+ , _cWidth :: !(Maybe (Textual Int32))

19881988 , _cClickThroughURL :: !(Maybe [Text])

1989− , _cVendorType :: !(Maybe [JSONText Int32])

1990− , _cAccountId :: !(Maybe (JSONText Int32))

1989+ , _cVendorType :: !(Maybe [Textual Int32])

1990+ , _cAccountId :: !(Maybe (Textual Int32))

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

19921992 , _cFilteringReasons :: !(Maybe CreativeFilteringReasons)

1993− , _cVersion :: !(Maybe (JSONText Int32))

1994− , _cSensitiveCategories :: !(Maybe [JSONText Int32])

1993+ , _cVersion :: !(Maybe (Textual Int32))

1994+ , _cSensitiveCategories :: !(Maybe [Textual Int32])

19951995 , _cVideoURL :: !(Maybe Text)

19961996 , _cAPIUploadTimestamp :: !(Maybe DateTime')

19971997 , _cServingRestrictions :: !(Maybe [CreativeServingRestrictionsItem])

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

23302330--

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

23322332data TargetingValueDayPartTargetingDayPart = TargetingValueDayPartTargetingDayPart

2333− { _tvdptdpEndHour :: !(Maybe (JSONText Int32))

2334− , _tvdptdpStartHour :: !(Maybe (JSONText Int32))

2335− , _tvdptdpStartMinute :: !(Maybe (JSONText Int32))

2333+ { _tvdptdpEndHour :: !(Maybe (Textual Int32))

2334+ , _tvdptdpStartHour :: !(Maybe (Textual Int32))

2335+ , _tvdptdpStartMinute :: !(Maybe (Textual Int32))

23362336 , _tvdptdpDayOfWeek :: !(Maybe Text)

2337− , _tvdptdpEndMinute :: !(Maybe (JSONText Int32))

2337+ , _tvdptdpEndMinute :: !(Maybe (Textual Int32))

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

23392339

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

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

24642464--

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

24662466data BuyerDTO = BuyerDTO

2467− { _buySponsorAccountId :: !(Maybe (JSONText Int32))

2467+ { _buySponsorAccountId :: !(Maybe (Textual Int32))

24682468 , _buyEnabledForInterestTargetingDeals :: !(Maybe Bool)

2469− , _buyCustomerId :: !(Maybe (JSONText Int32))

2469+ , _buyCustomerId :: !(Maybe (Textual Int32))

24702470 , _buyEnabledForPreferredDeals :: !(Maybe Bool)

2471− , _buyAccountId :: !(Maybe (JSONText Int32))

2471+ , _buyAccountId :: !(Maybe (Textual Int32))

24722472 , _buyDisplayName :: !(Maybe Text)

2473− , _buyId :: !(Maybe (JSONText Int32))

2473+ , _buyId :: !(Maybe (Textual Int32))

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

24752475

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

@@ -2571,10 +2571,10 @@ instance ToJSON BuyerDTO where

25712571--

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

25732573data AdSlotDTO = AdSlotDTO

2574− { _asdtoWebPropertyId :: !(Maybe (JSONText Int32))

2574+ { _asdtoWebPropertyId :: !(Maybe (Textual Int32))

25752575 , _asdtoSize :: !(Maybe Text)

25762576 , _asdtoChannelCode :: !(Maybe Text)

2577− , _asdtoChannelId :: !(Maybe (JSONText Int32))

2577+ , _asdtoChannelId :: !(Maybe (Textual Int32))

25782578 , _asdtoName :: !(Maybe Text)

25792579 , _asdtoDescription :: !(Maybe Text)

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

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

27032703--

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

27052705data PerformanceReport = PerformanceReport

2706− { _prFilteredBidRate :: !(Maybe (JSONText Double))

2706+ { _prFilteredBidRate :: !(Maybe (Textual Double))

27072707 , _prKind :: !Text

2708− , _prLatency95thPercentile :: !(Maybe (JSONText Double))

2708+ , _prLatency95thPercentile :: !(Maybe (Textual Double))

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

27102710 , _prHostedMatchStatusRate :: !(Maybe [JSONValue])

2711− , _prUnsuccessfulRequestRate :: !(Maybe (JSONText Double))

2712− , _prBidRequestRate :: !(Maybe (JSONText Double))

2713− , _prQuotaThrottledLimit :: !(Maybe (JSONText Double))

2714− , _prQuotaConfiguredLimit :: !(Maybe (JSONText Double))

2715− , _prSuccessfulRequestRate :: !(Maybe (JSONText Double))

2716− , _prLatency85thPercentile :: !(Maybe (JSONText Double))

2711+ , _prUnsuccessfulRequestRate :: !(Maybe (Textual Double))

2712+ , _prBidRequestRate :: !(Maybe (Textual Double))

2713+ , _prQuotaThrottledLimit :: !(Maybe (Textual Double))

2714+ , _prQuotaConfiguredLimit :: !(Maybe (Textual Double))

2715+ , _prSuccessfulRequestRate :: !(Maybe (Textual Double))

2716+ , _prLatency85thPercentile :: !(Maybe (Textual Double))

27172717 , _prCalloutStatusRate :: !(Maybe [JSONValue])

2718− , _prLatency50thPercentile :: !(Maybe (JSONText Double))

2719− , _prBidRate :: !(Maybe (JSONText Double))

2718+ , _prLatency50thPercentile :: !(Maybe (Textual Double))

2719+ , _prBidRate :: !(Maybe (Textual Double))

27202720 , _prCreativeStatusRate :: !(Maybe [JSONValue])

2721− , _prNoQuotaInRegion :: !(Maybe (JSONText Double))

2721+ , _prNoQuotaInRegion :: !(Maybe (Textual Double))

27222722 , _prRegion :: !(Maybe Text)

2723− , _prInventoryMatchRate :: !(Maybe (JSONText Double))

2724− , _prPixelMatchResponses :: !(Maybe (JSONText Double))

2725− , _prTimestamp :: !(Maybe (JSONText Int64))

2726− , _prPixelMatchRequests :: !(Maybe (JSONText Double))

2727− , _prOutOfQuota :: !(Maybe (JSONText Double))

2723+ , _prInventoryMatchRate :: !(Maybe (Textual Double))

2724+ , _prPixelMatchResponses :: !(Maybe (Textual Double))

2725+ , _prTimestamp :: !(Maybe (Textual Int64))

2726+ , _prPixelMatchRequests :: !(Maybe (Textual Double))

2727+ , _prOutOfQuota :: !(Maybe (Textual Double))

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

27292729

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

@@ -3128,13 +3128,13 @@ instance ToJSON Seller where

31283128--

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

31303130data Account = Account

3131− { _aMaximumTotalQps :: !(Maybe (JSONText Int32))

3131+ { _aMaximumTotalQps :: !(Maybe (Textual Int32))

31323132 , _aKind :: !Text

31333133 , _aCookieMatchingURL :: !(Maybe Text)

3134− , _aMaximumActiveCreatives :: !(Maybe (JSONText Int32))

3134+ , _aMaximumActiveCreatives :: !(Maybe (Textual Int32))

31353135 , _aCookieMatchingNid :: !(Maybe Text)

3136− , _aNumberActiveCreatives :: !(Maybe (JSONText Int32))

3137− , _aId :: !(Maybe (JSONText Int32))

3136+ , _aNumberActiveCreatives :: !(Maybe (Textual Int32))

3137+ , _aId :: !(Maybe (Textual Int32))

31383138 , _aBidderLocation :: !(Maybe [AccountBidderLocationItem])

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

31403140

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

32623262data DeleteOrderDealsRequest = DeleteOrderDealsRequest

32633263 { _dodrUpdateAction :: !(Maybe Text)

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

3265− , _dodrOrderRevisionNumber :: !(Maybe (JSONText Int64))

3265+ , _dodrOrderRevisionNumber :: !(Maybe (Textual Int64))

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

32673267

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

@@ -3367,9 +3367,9 @@ instance ToJSON ContactInformation where

33673367--

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

33693369data CreativeNATiveAdLogo = CreativeNATiveAdLogo

3370− { _cnatalHeight :: !(Maybe (JSONText Int32))

3370+ { _cnatalHeight :: !(Maybe (Textual Int32))

33713371 , _cnatalURL :: !(Maybe Text)

3372− , _cnatalWidth :: !(Maybe (JSONText Int32))

3372+ , _cnatalWidth :: !(Maybe (Textual Int32))

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

33743374

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

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

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

35133513data PretargetingConfig = PretargetingConfig

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

3515− , _pcMobileCarriers :: !(Maybe [JSONText Int64])

3516− , _pcVendorTypes :: !(Maybe [JSONText Int64])

3517− , _pcExcludedGeoCriteriaIds :: !(Maybe [JSONText Int64])

3518− , _pcSupportedCreativeAttributes :: !(Maybe [JSONText Int64])

3519− , _pcUserLists :: !(Maybe [JSONText Int64])

3515+ , _pcMobileCarriers :: !(Maybe [Textual Int64])

3516+ , _pcVendorTypes :: !(Maybe [Textual Int64])

3517+ , _pcExcludedGeoCriteriaIds :: !(Maybe [Textual Int64])

3518+ , _pcSupportedCreativeAttributes :: !(Maybe [Textual Int64])

3519+ , _pcUserLists :: !(Maybe [Textual Int64])

35203520 , _pcKind :: !Text

35213521 , _pcExcludedPlacements :: !(Maybe [PretargetingConfigExcludedPlacementsItem])

3522− , _pcMobileDevices :: !(Maybe [JSONText Int64])

3522+ , _pcMobileDevices :: !(Maybe [Textual Int64])

35233523 , _pcLanguages :: !(Maybe [Text])

3524− , _pcVerticals :: !(Maybe [JSONText Int64])

3525− , _pcConfigId :: !(Maybe (JSONText Int64))

3524+ , _pcVerticals :: !(Maybe [Textual Int64])

3525+ , _pcConfigId :: !(Maybe (Textual Int64))

35263526 , _pcPlacements :: !(Maybe [PretargetingConfigPlacementsItem])

3527− , _pcExcludedUserLists :: !(Maybe [JSONText Int64])

3527+ , _pcExcludedUserLists :: !(Maybe [Textual Int64])

35283528 , _pcConfigName :: !(Maybe Text)

3529− , _pcGeoCriteriaIds :: !(Maybe [JSONText Int64])

3529+ , _pcGeoCriteriaIds :: !(Maybe [Textual Int64])

35303530 , _pcDimensions :: !(Maybe [PretargetingConfigDimensionsItem])

3531− , _pcExcludedVerticals :: !(Maybe [JSONText Int64])

3531+ , _pcExcludedVerticals :: !(Maybe [Textual Int64])

35323532 , _pcCreativeType :: !(Maybe [Text])

35333533 , _pcIsActive :: !(Maybe Bool)

3534− , _pcExcludedContentLabels :: !(Maybe [JSONText Int64])

3535− , _pcBillingId :: !(Maybe (JSONText Int64))

3536− , _pcMobileOperatingSystemVersions :: !(Maybe [JSONText Int64])

3534+ , _pcExcludedContentLabels :: !(Maybe [Textual Int64])

3535+ , _pcBillingId :: !(Maybe (Textual Int64))

3536+ , _pcMobileOperatingSystemVersions :: !(Maybe [Textual Int64])

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

35383538

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

@@ -3973,7 +3973,7 @@ instance ToJSON TargetingValueCreativeSize where

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

39743974data NegotiationDTO = NegotiationDTO

39753975 { _ndtoNegotiationState :: !(Maybe Text)

3976− , _ndtoExternalDealId :: !(Maybe (JSONText Int64))

3976+ , _ndtoExternalDealId :: !(Maybe (Textual Int64))

39773977 , _ndtoStatus :: !(Maybe Text)

39783978 , _ndtoDealType :: !(Maybe Text)

39793979 , _ndtoNegotiationRounds :: !(Maybe [NegotiationRoundDTO])

@@ -3983,8 +3983,8 @@ data NegotiationDTO = NegotiationDTO

39833983 , _ndtoStats :: !(Maybe StatsDTO)

39843984 , _ndtoSeller :: !(Maybe DealPartyDTO)

39853985 , _ndtoLabelNames :: !(Maybe [Text])

3986− , _ndtoOfferId :: !(Maybe (JSONText Int64))

3987− , _ndtoNegotiationId :: !(Maybe (JSONText Int64))

3986+ , _ndtoOfferId :: !(Maybe (Textual Int64))

3987+ , _ndtoNegotiationId :: !(Maybe (Textual Int64))

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

39893989 , _ndtoBuyer :: !(Maybe DealPartyDTO)

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

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

41914191 , _odtoOpenToDealParties :: !(Maybe [DealPartyDTO])

41924192 , _odtoEmailContacts :: !(Maybe [Text])

41934193 , _odtoLabelNames :: !(Maybe [Text])

4194− , _odtoOfferId :: !(Maybe (JSONText Int64))

4194+ , _odtoOfferId :: !(Maybe (Textual Int64))

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

41964196 , _odtoAnonymous :: !(Maybe Bool)

41974197 , _odtoIsOpen :: !(Maybe Bool)

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

43764376--

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

43784378data AudienceSegment = AudienceSegment

4379− { _asNumCookies :: !(Maybe (JSONText Int64))

4379+ { _asNumCookies :: !(Maybe (Textual Int64))

43804380 , _asName :: !(Maybe Text)

4381− , _asId :: !(Maybe (JSONText Int64))

4381+ , _asId :: !(Maybe (Textual Int64))

43824382 , _asDescription :: !(Maybe Text)

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

43844384

@@ -4500,17 +4500,17 @@ instance ToJSON BillingInfoList where

45004500data MarketplaceOffer = MarketplaceOffer

45014501 { _moState :: !(Maybe Text)

45024502 , _moWebPropertyCode :: !(Maybe Text)

4503− , _moCreationTimeMs :: !(Maybe (JSONText Int64))

4503+ , _moCreationTimeMs :: !(Maybe (Textual Int64))

45044504 , _moTerms :: !(Maybe DealTerms)

4505− , _moLastUpdateTimeMs :: !(Maybe (JSONText Int64))

4505+ , _moLastUpdateTimeMs :: !(Maybe (Textual Int64))

45064506 , _moKind :: !Text

4507− , _moRevisionNumber :: !(Maybe (JSONText Int64))

4507+ , _moRevisionNumber :: !(Maybe (Textual Int64))

45084508 , _moHasCreatorSignedOff :: !(Maybe Bool)

4509− , _moFlightStartTimeMs :: !(Maybe (JSONText Int64))

4509+ , _moFlightStartTimeMs :: !(Maybe (Textual Int64))

45104510 , _moSharedTargetings :: !(Maybe [SharedTargeting])

45114511 , _moSeller :: !(Maybe Seller)

45124512 , _moSyndicationProduct :: !(Maybe Text)

4513− , _moFlightEndTimeMs :: !(Maybe (JSONText Int64))

4513+ , _moFlightEndTimeMs :: !(Maybe (Textual Int64))

45144514 , _moName :: !(Maybe Text)

45154515 , _moCreatorContacts :: !(Maybe [ContactInformation])

45164516 , _moOfferId :: !(Maybe Text)

@@ -4769,8 +4769,8 @@ instance ToJSON AddOrderNotesResponse where

47694769--

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

47714771data TargetingValueSize = TargetingValueSize

4772− { _tvsHeight :: !(Maybe (JSONText Int32))

4773− , _tvsWidth :: !(Maybe (JSONText Int32))

4772+ { _tvsHeight :: !(Maybe (Textual Int32))

4773+ , _tvsWidth :: !(Maybe (Textual Int32))

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

47754775

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

@@ -4817,7 +4817,7 @@ instance ToJSON TargetingValueSize where

48174817--

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

48194819data GetNegotiationsRequest = GetNegotiationsRequest

4820− { _gnrSinceTimestampMillis :: !(Maybe (JSONText Int64))

4820+ { _gnrSinceTimestampMillis :: !(Maybe (Textual Int64))

48214821 , _gnrFinalized :: !(Maybe Bool)

48224822 , _gnrIncludePrivateAuctions :: !(Maybe Bool)

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

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

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

48794879data MoneyDTO = MoneyDTO

48804880 { _mdtoCurrencyCode :: !(Maybe Text)

4881− , _mdtoMicros :: !(Maybe (JSONText Int64))

4881+ , _mdtoMicros :: !(Maybe (Textual Int64))

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

48834883

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

@@ -5006,8 +5006,8 @@ instance ToJSON ListOffersResponse where

50065006--

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

50085008data PretargetingConfigDimensionsItem = PretargetingConfigDimensionsItem

5009− { _pcdiHeight :: !(Maybe (JSONText Int64))

5010− , _pcdiWidth :: !(Maybe (JSONText Int64))

5009+ { _pcdiHeight :: !(Maybe (Textual Int64))

5010+ , _pcdiWidth :: !(Maybe (Textual Int64))

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

50125012

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

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

50595059 { _adtoStatus :: !(Maybe Text)

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

50615061 , _adtoName :: !(Maybe Text)

5062− , _adtoId :: !(Maybe (JSONText Int64))

5062+ , _adtoId :: !(Maybe (Textual Int64))

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

50645064

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

@@ -5164,7 +5164,7 @@ instance ToJSON ListClientAccessCapabilitiesResponse

51645164data TargetingValue = TargetingValue

51655165 { _tvCreativeSizeValue :: !(Maybe TargetingValueCreativeSize)

51665166 , _tvStringValue :: !(Maybe Text)

5167− , _tvLongValue :: !(Maybe (JSONText Int64))

5167+ , _tvLongValue :: !(Maybe (Textual Int64))

51685168 , _tvDayPartTargetingValue :: !(Maybe TargetingValueDayPartTargeting)

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

51705170

@@ -5237,9 +5237,9 @@ instance ToJSON TargetingValue where

52375237--

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

52395239data CreativeNATiveAdAppIcon = CreativeNATiveAdAppIcon

5240− { _cnataaiHeight :: !(Maybe (JSONText Int32))

5240+ { _cnataaiHeight :: !(Maybe (Textual Int32))

52415241 , _cnataaiURL :: !(Maybe Text)

5242− , _cnataaiWidth :: !(Maybe (JSONText Int32))

5242+ , _cnataaiWidth :: !(Maybe (Textual Int32))

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

52445244

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

@@ -5295,7 +5295,7 @@ instance ToJSON CreativeNATiveAdAppIcon where

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

52965296data Price = Price

52975297 { _pCurrencyCode :: !(Maybe Text)

5298− , _pAmountMicros :: !(Maybe (JSONText Double))

5298+ , _pAmountMicros :: !(Maybe (Textual Double))

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

53005300

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

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

53465346 { _eUpdateAction :: !(Maybe Text)

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

53485348 , _eOrder :: !(Maybe MarketplaceOrder)

5349− , _eOrderRevisionNumber :: !(Maybe (JSONText Int64))

5349+ , _eOrderRevisionNumber :: !(Maybe (Textual Int64))

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

53515351

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

@@ -5429,7 +5429,7 @@ instance ToJSON EditAllOrderDealsRequest where

54295429data BillingInfo = BillingInfo

54305430 { _biKind :: !Text

54315431 , _biAccountName :: !(Maybe Text)

5432− , _biAccountId :: !(Maybe (JSONText Int32))

5432+ , _biAccountId :: !(Maybe (Textual Int32))

54335433 , _biBillingId :: !(Maybe [Text])

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

54355435

@@ -5611,7 +5611,7 @@ instance ToJSON SharedTargeting where

56115611--

56125612-- /See:/ 'listClientAccessCapabilitiesRequest' smart constructor.

56135613newtype ListClientAccessCapabilitiesRequest = ListClientAccessCapabilitiesRequest

5614− { _lcacrSponsorAccountId :: Maybe (JSONText Int64)

5614+ { _lcacrSponsorAccountId :: Maybe (Textual Int64)

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

56165616

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

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

56505650--

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

56525652data InventorySegmentTargeting = InventorySegmentTargeting

5653− { _istNegativeVideoDurationSegments :: !(Maybe [JSONText Int64])

5654− , _istNegativeIcmBrands :: !(Maybe [JSONText Int64])

5653+ { _istNegativeVideoDurationSegments :: !(Maybe [Textual Int64])

5654+ , _istNegativeIcmBrands :: !(Maybe [Textual Int64])

56555655 , _istNegativeKeyValues :: !(Maybe [RuleKeyValuePair])

5656− , _istPositiveAudienceSegments :: !(Maybe [JSONText Int64])

5657− , _istPositiveXfpPlacements :: !(Maybe [JSONText Int64])

5658− , _istNegativeXfpAdSlots :: !(Maybe [JSONText Int64])

5659− , _istPositiveOperatingSystemVersions :: !(Maybe [JSONText Int64])

5660− , _istPositiveSizes :: !(Maybe [JSONText Int64])

5661− , _istPositiveDeviceCategories :: !(Maybe [JSONText Int64])

5662− , _istPositiveLocations :: !(Maybe [JSONText Int64])

5656+ , _istPositiveAudienceSegments :: !(Maybe [Textual Int64])

5657+ , _istPositiveXfpPlacements :: !(Maybe [Textual Int64])

5658+ , _istNegativeXfpAdSlots :: !(Maybe [Textual Int64])

5659+ , _istPositiveOperatingSystemVersions :: !(Maybe [Textual Int64])

5660+ , _istPositiveSizes :: !(Maybe [Textual Int64])

5661+ , _istPositiveDeviceCategories :: !(Maybe [Textual Int64])

5662+ , _istPositiveLocations :: !(Maybe [Textual Int64])

56635663 , _istNegativeAdSizes :: !(Maybe [AdSize])

5664− , _istPositiveOperatingSystems :: !(Maybe [JSONText Int64])

5664+ , _istPositiveOperatingSystems :: !(Maybe [Textual Int64])

56655665 , _istPositiveSiteURLs :: !(Maybe [Text])

56665666 , _istNegativeInventorySlots :: !(Maybe [Text])

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

56685668 , _istPositiveAdTypeSegments :: !(Maybe [Text])

5669− , _istPositiveIcmInterests :: !(Maybe [JSONText Int64])

5669+ , _istPositiveIcmInterests :: !(Maybe [Textual Int64])

56705670 , _istPositiveMobileApps :: !(Maybe [Text])

56715671 , _istPositiveKeyValues :: !(Maybe [RuleKeyValuePair])

5672− , _istPositiveIcmBrands :: !(Maybe [JSONText Int64])

5673− , _istPositiveVideoDurationSegments :: !(Maybe [JSONText Int64])

5674− , _istNegativeAudienceSegments :: !(Maybe [JSONText Int64])

5675− , _istNegativeXfpPlacements :: !(Maybe [JSONText Int64])

5676− , _istPositiveXfpAdSlots :: !(Maybe [JSONText Int64])

5677− , _istNegativeOperatingSystemVersions :: !(Maybe [JSONText Int64])

5678− , _istNegativeSizes :: !(Maybe [JSONText Int64])

5679− , _istNegativeLocations :: !(Maybe [JSONText Int64])

5680− , _istNegativeDeviceCategories :: !(Maybe [JSONText Int64])

5681− , _istNegativeOperatingSystems :: !(Maybe [JSONText Int64])

5672+ , _istPositiveIcmBrands :: !(Maybe [Textual Int64])

5673+ , _istPositiveVideoDurationSegments :: !(Maybe [Textual Int64])

5674+ , _istNegativeAudienceSegments :: !(Maybe [Textual Int64])

5675+ , _istNegativeXfpPlacements :: !(Maybe [Textual Int64])

5676+ , _istPositiveXfpAdSlots :: !(Maybe [Textual Int64])

5677+ , _istNegativeOperatingSystemVersions :: !(Maybe [Textual Int64])

5678+ , _istNegativeSizes :: !(Maybe [Textual Int64])

5679+ , _istNegativeLocations :: !(Maybe [Textual Int64])

5680+ , _istNegativeDeviceCategories :: !(Maybe [Textual Int64])

5681+ , _istNegativeOperatingSystems :: !(Maybe [Textual Int64])

56825682 , _istPositiveAdSizes :: !(Maybe [AdSize])

56835683 , _istNegativeSiteURLs :: !(Maybe [Text])

56845684 , _istNegativeAdTypeSegments :: !(Maybe [Text])

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

56865686 , _istPositiveInventorySlots :: !(Maybe [Text])

56875687 , _istNegativeMobileApps :: !(Maybe [Text])

5688− , _istNegativeIcmInterests :: !(Maybe [JSONText Int64])

5688+ , _istNegativeIcmInterests :: !(Maybe [Textual Int64])

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

56905690

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

@@ -6169,9 +6169,9 @@ instance ToJSON InventorySegmentTargeting where

61696169--

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

61716171data CreativeNATiveAdImage = CreativeNATiveAdImage

6172− { _cnataiHeight :: !(Maybe (JSONText Int32))

6172+ { _cnataiHeight :: !(Maybe (Textual Int32))

61736173 , _cnataiURL :: !(Maybe Text)

6174− , _cnataiWidth :: !(Maybe (JSONText Int32))

6174+ , _cnataiWidth :: !(Maybe (Textual Int32))

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

61766176

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

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

62296229 , _wpdtoSyndicationProduct :: !(Maybe Text)

62306230 , _wpdtoName :: !(Maybe Text)

62316231 , _wpdtoPropertyCode :: !(Maybe Text)

6232− , _wpdtoId :: !(Maybe (JSONText Int32))

6232+ , _wpdtoId :: !(Maybe (Textual Int32))

62336233 , _wpdtoSiteURLs :: !(Maybe [Text])

62346234 , _wpdtoAllowInterestTargetedAds :: !(Maybe Bool)

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

@@ -6331,7 +6331,7 @@ instance ToJSON WebPropertyDTO where

63316331--

63326332-- /See:/ 'listOffersRequest' smart constructor.

63336333newtype ListOffersRequest = ListOffersRequest

6334− { _lorSinceTimestampMillis :: Maybe (JSONText Int64)

6334+ { _lorSinceTimestampMillis :: Maybe (Textual Int64)

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

63366336

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

@@ -6368,8 +6368,8 @@ instance ToJSON ListOffersRequest where

63686368--

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

63706370data ClientAccessCapabilities = ClientAccessCapabilities

6371− { _cacClientAccountId :: !(Maybe (JSONText Int64))

6372− , _cacCapabilities :: !(Maybe [JSONText Int32])

6371+ { _cacClientAccountId :: !(Maybe (Textual Int64))

6372+ , _cacCapabilities :: !(Maybe [Textual Int32])

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

63746374

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

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

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

64896489data DeleteOrderDealsResponse = DeleteOrderDealsResponse

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

6491− , _dOrderRevisionNumber :: !(Maybe (JSONText Int64))

6491+ , _dOrderRevisionNumber :: !(Maybe (Textual Int64))

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

64936493

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

@@ -6592,18 +6592,18 @@ data MarketplaceDeal = MarketplaceDeal

65926592 { _mdExternalDealId :: !(Maybe Text)

65936593 , _mdBuyerPrivateData :: !(Maybe PrivateData)

65946594 , _mdWebPropertyCode :: !(Maybe Text)

6595− , _mdCreationTimeMs :: !(Maybe (JSONText Int64))

6595+ , _mdCreationTimeMs :: !(Maybe (Textual Int64))

65966596 , _mdTerms :: !(Maybe DealTerms)

6597− , _mdOfferRevisionNumber :: !(Maybe (JSONText Int64))

6598− , _mdLastUpdateTimeMs :: !(Maybe (JSONText Int64))

6597+ , _mdOfferRevisionNumber :: !(Maybe (Textual Int64))

6598+ , _mdLastUpdateTimeMs :: !(Maybe (Textual Int64))

65996599 , _mdKind :: !Text

66006600 , _mdDeliveryControl :: !(Maybe DeliveryControl)

6601− , _mdFlightStartTimeMs :: !(Maybe (JSONText Int64))

6601+ , _mdFlightStartTimeMs :: !(Maybe (Textual Int64))

66026602 , _mdSharedTargetings :: !(Maybe [SharedTargeting])

66036603 , _mdDealId :: !(Maybe Text)

66046604 , _mdInventoryDescription :: !(Maybe Text)

66056605 , _mdSyndicationProduct :: !(Maybe Text)

6606− , _mdFlightEndTimeMs :: !(Maybe (JSONText Int64))

6606+ , _mdFlightEndTimeMs :: !(Maybe (Textual Int64))

66076607 , _mdName :: !(Maybe Text)

66086608 , _mdSellerContacts :: !(Maybe [ContactInformation])

66096609 , _mdOfferId :: !(Maybe Text)

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

68876887--

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

68896889data StatsDTO = StatsDTO

6890− { _sdtoBids :: !(Maybe (JSONText Int64))

6890+ { _sdtoBids :: !(Maybe (Textual Int64))

68916891 , _sdtoSpend :: !(Maybe MoneyDTO)

6892− , _sdtoImpressions :: !(Maybe (JSONText Int64))

6893− , _sdtoGoodBids :: !(Maybe (JSONText Int64))

6892+ , _sdtoImpressions :: !(Maybe (Textual Int64))

6893+ , _sdtoGoodBids :: !(Maybe (Textual Int64))

68946894 , _sdtoRevenue :: !(Maybe MoneyDTO)

6895− , _sdtoRequests :: !(Maybe (JSONText Int64))

6895+ , _sdtoRequests :: !(Maybe (Textual Int64))

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

68976897

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

@@ -7030,8 +7030,8 @@ instance ToJSON DealTermsNonGuaranteedAuctionTerms

70307030--

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

70327032data CreativeFilteringReasonsReasonsItem = CreativeFilteringReasonsReasonsItem

7033− { _cfrriFilteringStatus :: !(Maybe (JSONText Int32))

7034− , _cfrriFilteringCount :: !(Maybe (JSONText Int64))

7033+ { _cfrriFilteringStatus :: !(Maybe (Textual Int32))

7034+ , _cfrriFilteringCount :: !(Maybe (Textual Int64))

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

70367036

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

@@ -7089,11 +7089,11 @@ data NegotiationRoundDTO = NegotiationRoundDTO

70897089 , _nrdtoKind :: !Text

70907090 , _nrdtoOriginatorRole :: !(Maybe Text)

70917091 , _nrdtoAction :: !(Maybe Text)

7092− , _nrdtoDBmPartnerId :: !(Maybe (JSONText Int64))

7092+ , _nrdtoDBmPartnerId :: !(Maybe (Textual Int64))

70937093 , _nrdtoNotes :: !(Maybe Text)

7094− , _nrdtoNegotiationId :: !(Maybe (JSONText Int64))

7094+ , _nrdtoNegotiationId :: !(Maybe (Textual Int64))

70957095 , _nrdtoEditHistory :: !(Maybe EditHistoryDTO)

7096− , _nrdtoRoundNumber :: !(Maybe (JSONText Int64))

7096+ , _nrdtoRoundNumber :: !(Maybe (Textual Int64))

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

70987098

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

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

72927292--

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

72947294data DateTime = DateTime

7295− { _dtSecond :: !(Maybe (JSONText Int32))

7296− , _dtDay :: !(Maybe (JSONText Int32))

7297− , _dtYear :: !(Maybe (JSONText Int32))

7298− , _dtHour :: !(Maybe (JSONText Int32))

7299− , _dtMonth :: !(Maybe (JSONText Int32))

7300− , _dtMinute :: !(Maybe (JSONText Int32))

7295+ { _dtSecond :: !(Maybe (Textual Int32))

7296+ , _dtDay :: !(Maybe (Textual Int32))

7297+ , _dtYear :: !(Maybe (Textual Int32))

7298+ , _dtHour :: !(Maybe (Textual Int32))

7299+ , _dtMonth :: !(Maybe (Textual Int32))

7300+ , _dtMinute :: !(Maybe (Textual Int32))

73017301 , _dtTimeZoneId :: !(Maybe Text)

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

73037303

@@ -7391,7 +7391,7 @@ instance ToJSON DateTime where

73917391data MarketplaceLabel = MarketplaceLabel

73927392 { _mlDeprecatedMarketplaceDealParty :: !(Maybe MarketplaceDealParty)

73937393 , _mlAccountId :: !(Maybe Text)

7394− , _mlCreateTimeMs :: !(Maybe (JSONText Int64))

7394+ , _mlCreateTimeMs :: !(Maybe (Textual Int64))

73957395 , _mlLabel :: !(Maybe Text)

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

73977397

@@ -7463,8 +7463,8 @@ instance ToJSON MarketplaceLabel where

74637463data EditHistoryDTO = EditHistoryDTO

74647464 { _ehdtoLastUpdatedByLoginName :: !(Maybe Text)

74657465 , _ehdtoCreatedByLoginName :: !(Maybe Text)

7466− , _ehdtoLastUpdateTimeStamp :: !(Maybe (JSONText Int64))

7467− , _ehdtoCreatedTimeStamp :: !(Maybe (JSONText Int64))

7466+ , _ehdtoLastUpdateTimeStamp :: !(Maybe (Textual Int64))

7467+ , _ehdtoCreatedTimeStamp :: !(Maybe (Textual Int64))

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

74697469

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

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

75807580 , _mBuyerContacts :: !(Maybe [ContactInformation])

75817581 , _mKind :: !Text

75827582 , _mOriginatorRole :: !(Maybe Text)

7583− , _mRevisionNumber :: !(Maybe (JSONText Int64))

7583+ , _mRevisionNumber :: !(Maybe (Textual Int64))

75847584 , _mBilledBuyer :: !(Maybe Buyer)

75857585 , _mIsRenegotiating :: !(Maybe Bool)

75867586 , _mHasSellerSignedOff :: !(Maybe Bool)

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

75907590 , _mSellerContacts :: !(Maybe [ContactInformation])

75917591 , _mLastUpdaterRole :: !(Maybe Text)

75927592 , _mLabels :: !(Maybe [MarketplaceLabel])

7593− , _mRevisionTimeMs :: !(Maybe (JSONText Int64))

7593+ , _mRevisionTimeMs :: !(Maybe (Textual Int64))

75947594 , _mOrderId :: !(Maybe Text)

75957595 , _mLastUpdaterOrCommentorRole :: !(Maybe Text)

75967596 , _mHasBuyerSignedOff :: !(Maybe Bool)

@@ -7844,7 +7844,7 @@ instance ToJSON MarketplaceOrder where

78447844data AddOrderDealsRequest = AddOrderDealsRequest

78457845 { _aUpdateAction :: !(Maybe Text)

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

7847− , _aOrderRevisionNumber :: !(Maybe (JSONText Int64))

7847+ , _aOrderRevisionNumber :: !(Maybe (Textual Int64))

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

78497849

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

@@ -7904,8 +7904,8 @@ instance ToJSON AddOrderDealsRequest where

79047904--

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

79067906data DealTermsGuaranteedFixedPriceTerms = DealTermsGuaranteedFixedPriceTerms

7907− { _dtgfptGuaranteedLooks :: !(Maybe (JSONText Int64))

7908− , _dtgfptGuaranteedImpressions :: !(Maybe (JSONText Int64))

7907+ { _dtgfptGuaranteedLooks :: !(Maybe (Textual Int64))

7908+ , _dtgfptGuaranteedImpressions :: !(Maybe (Textual Int64))

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

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

79117911

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

@@ -45,14 +45,14 @@ type AccountsGetResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "accounts" :>

48− Capture "id" (JSONText Int32) :>

48+ Capture "id" (Textual Int32) :>

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

5050

5151-- | Gets one account by ID.

5252--

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

5454newtype AccountsGet = AccountsGet

55− { _agId :: JSONText Int32

55+ { _agId :: Textual Int32

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

5757

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

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

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

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "accounts" :>

49− Capture "id" (JSONText Int32) :>

49+ Capture "id" (Textual Int32) :>

5050 QueryParam "alt" AltJSON :>

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

5252

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

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

5656data AccountsPatch = AccountsPatch

5757 { _apPayload :: !Account

58− , _apId :: !(JSONText Int32)

58+ , _apId :: !(Textual Int32)

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

6060

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

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

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

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "accounts" :>

49− Capture "id" (JSONText Int32) :>

49+ Capture "id" (Textual Int32) :>

5050 QueryParam "alt" AltJSON :>

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

5252

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

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

5656data AccountsUpdate = AccountsUpdate

5757 { _auPayload :: !Account

58− , _auId :: !(JSONText Int32)

58+ , _auId :: !(Textual Int32)

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

6060

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

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

@@ -45,14 +45,14 @@ type BillingInfoGetResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "billinginfo" :>

48− Capture "accountId" (JSONText Int32) :>

48+ Capture "accountId" (Textual Int32) :>

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

5050

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

5252--

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

5454newtype BillingInfoGet = BillingInfoGet

55− { _bigAccountId :: JSONText Int32

55+ { _bigAccountId :: Textual Int32

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

5757

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

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

@@ -47,8 +47,8 @@ type BudgetGetResource =

4747 "adexchangebuyer" :>

4848 "v1.4" :>

4949 "billinginfo" :>

50− Capture "accountId" (JSONText Int64) :>

51− Capture "billingId" (JSONText Int64) :>

50+ Capture "accountId" (Textual Int64) :>

51+ Capture "billingId" (Textual Int64) :>

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

5353

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

@@ -56,8 +56,8 @@ type BudgetGetResource =

5656--

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

5858data BudgetGet = BudgetGet

59− { _bgAccountId :: !(JSONText Int64)

60− , _bgBillingId :: !(JSONText Int64)

59+ { _bgAccountId :: !(Textual Int64)

60+ , _bgBillingId :: !(Textual Int64)

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

6262

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

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

@@ -49,8 +49,8 @@ type BudgetPatchResource =

4949 "adexchangebuyer" :>

5050 "v1.4" :>

5151 "billinginfo" :>

52− Capture "accountId" (JSONText Int64) :>

53− Capture "billingId" (JSONText Int64) :>

52+ Capture "accountId" (Textual Int64) :>

53+ Capture "billingId" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

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

5656

@@ -61,8 +61,8 @@ type BudgetPatchResource =

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

6262data BudgetPatch = BudgetPatch

6363 { _bpPayload :: !Budget

64− , _bpAccountId :: !(JSONText Int64)

65− , _bpBillingId :: !(JSONText Int64)

64+ , _bpAccountId :: !(Textual Int64)

65+ , _bpBillingId :: !(Textual Int64)

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

6767

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

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

@@ -48,8 +48,8 @@ type BudgetUpdateResource =

4848 "adexchangebuyer" :>

4949 "v1.4" :>

5050 "billinginfo" :>

51− Capture "accountId" (JSONText Int64) :>

52− Capture "billingId" (JSONText Int64) :>

51+ Capture "accountId" (Textual Int64) :>

52+ Capture "billingId" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

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

5555

@@ -59,8 +59,8 @@ type BudgetUpdateResource =

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

6060data BudgetUpdate = BudgetUpdate

6161 { _buPayload :: !Budget

62− , _buAccountId :: !(JSONText Int64)

63− , _buBillingId :: !(JSONText Int64)

62+ , _buAccountId :: !(Textual Int64)

63+ , _buBillingId :: !(Textual Int64)

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

6565

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

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

@@ -44,15 +44,15 @@ type ClientAccessDeleteResource =

4444 "adexchangebuyer" :>

4545 "v1.4" :>

4646 "clientAccess" :>

47− Capture "clientAccountId" (JSONText Int64) :>

48− QueryParam "sponsorAccountId" (JSONText Int32) :>

47+ Capture "clientAccountId" (Textual Int64) :>

48+ QueryParam "sponsorAccountId" (Textual Int32) :>

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

5050

5151--

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

5353data ClientAccessDelete = ClientAccessDelete

54− { _cadSponsorAccountId :: !(JSONText Int32)

55− , _cadClientAccountId :: !(JSONText Int64)

54+ { _cadSponsorAccountId :: !(Textual Int32)

55+ , _cadClientAccountId :: !(Textual Int64)

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

5757

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

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

@@ -44,16 +44,16 @@ type ClientAccessGetResource =

4444 "adexchangebuyer" :>

4545 "v1.4" :>

4646 "clientAccess" :>

47− Capture "clientAccountId" (JSONText Int64) :>

48− QueryParam "sponsorAccountId" (JSONText Int32) :>

47+ Capture "clientAccountId" (Textual Int64) :>

48+ QueryParam "sponsorAccountId" (Textual Int32) :>

4949 QueryParam "alt" AltJSON :>

5050 Get '[JSON] ClientAccessCapabilities

5151

5252--

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

5454data ClientAccessGet = ClientAccessGet

55− { _cagSponsorAccountId :: !(JSONText Int32)

56− , _cagClientAccountId :: !(JSONText Int64)

55+ { _cagSponsorAccountId :: !(Textual Int32)

56+ , _cagClientAccountId :: !(Textual Int64)

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

5858

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

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

@@ -45,8 +45,8 @@ type ClientAccessInsertResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "clientAccess" :>

48− QueryParam "sponsorAccountId" (JSONText Int32) :>

49− QueryParam "clientAccountId" (JSONText Int64) :>

48+ QueryParam "sponsorAccountId" (Textual Int32) :>

49+ QueryParam "clientAccountId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] ClientAccessCapabilities :>

5252 Post '[JSON] ClientAccessCapabilities

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

5454--

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

5656data ClientAccessInsert = ClientAccessInsert

57− { _caiSponsorAccountId :: !(Maybe (JSONText Int32))

57+ { _caiSponsorAccountId :: !(Maybe (Textual Int32))

5858 , _caiPayload :: !ClientAccessCapabilities

59− , _caiClientAccountId :: !(Maybe (JSONText Int64))

59+ , _caiClientAccountId :: !(Maybe (Textual Int64))

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

6161

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

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

@@ -45,8 +45,8 @@ type ClientAccessPatchResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "clientAccess" :>

48− Capture "clientAccountId" (JSONText Int64) :>

49− QueryParam "sponsorAccountId" (JSONText Int32) :>

48+ Capture "clientAccountId" (Textual Int64) :>

49+ QueryParam "sponsorAccountId" (Textual Int32) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] ClientAccessCapabilities :>

5252 Patch '[JSON] ClientAccessCapabilities

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

5454--

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

5656data ClientAccessPatch = ClientAccessPatch

57− { _capSponsorAccountId :: !(JSONText Int32)

57+ { _capSponsorAccountId :: !(Textual Int32)

5858 , _capPayload :: !ClientAccessCapabilities

59− , _capClientAccountId :: !(JSONText Int64)

59+ , _capClientAccountId :: !(Textual Int64)

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

6161

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

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

@@ -45,8 +45,8 @@ type ClientAccessUpdateResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "clientAccess" :>

48− Capture "clientAccountId" (JSONText Int64) :>

49− QueryParam "sponsorAccountId" (JSONText Int32) :>

48+ Capture "clientAccountId" (Textual Int64) :>

49+ QueryParam "sponsorAccountId" (Textual Int32) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] ClientAccessCapabilities :>

5252 Put '[JSON] ClientAccessCapabilities

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

5454--

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

5656data ClientAccessUpdate = ClientAccessUpdate

57− { _cauSponsorAccountId :: !(JSONText Int32)

57+ { _cauSponsorAccountId :: !(Textual Int32)

5858 , _cauPayload :: !ClientAccessCapabilities

59− , _cauClientAccountId :: !(JSONText Int64)

59+ , _cauClientAccountId :: !(Textual Int64)

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

6161

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

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

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

4747 "adexchangebuyer" :>

4848 "v1.4" :>

4949 "creatives" :>

50− Capture "accountId" (JSONText Int32) :>

50+ Capture "accountId" (Textual Int32) :>

5151 Capture "buyerCreativeId" Text :>

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

5353

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

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

5858data CreativesGet = CreativesGet

5959 { _cgBuyerCreativeId :: !Text

60− , _cgAccountId :: !(JSONText Int32)

60+ , _cgAccountId :: !(Textual Int32)

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

6262

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

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

@@ -55,12 +55,12 @@ type CreativesListResource =

5555 QueryParam "openAuctionStatusFilter"

5656 CreativesListOpenAuctionStatusFilter

5757 :>

58− QueryParams "accountId" (JSONText Int32) :>

58+ QueryParams "accountId" (Textual Int32) :>

5959 QueryParam "pageToken" Text :>

6060 QueryParam "dealsStatusFilter"

6161 CreativesListDealsStatusFilter

6262 :>

63− QueryParam "maxResults" (JSONText Word32) :>

63+ QueryParam "maxResults" (Textual Word32) :>

6464 QueryParam "alt" AltJSON :> Get '[JSON] CreativesList

6565

6666-- | Retrieves a list of the authenticated user\'s active creatives. A

@@ -70,10 +70,10 @@ type CreativesListResource =

7070data CreativesList' = CreativesList'

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

7272 , _clOpenAuctionStatusFilter :: !(Maybe CreativesListOpenAuctionStatusFilter)

73− , _clAccountId :: !(Maybe [JSONText Int32])

73+ , _clAccountId :: !(Maybe [Textual Int32])

7474 , _clPageToken :: !(Maybe Text)

7575 , _clDealsStatusFilter :: !(Maybe CreativesListDealsStatusFilter)

76− , _clMaxResults :: !(Maybe (JSONText Word32))

76+ , _clMaxResults :: !(Maybe (Textual Word32))

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

7878

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

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

@@ -46,7 +46,7 @@ type DealsGetResource =

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "deals" :>

49− Capture "dealId" (JSONText Int64) :>

49+ Capture "dealId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON]

5252 GetFinalizedNegotiationByExternalDealIdRequest

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

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

5858data DealsGet = DealsGet

5959 { _dgPayload :: !GetFinalizedNegotiationByExternalDealIdRequest

60− , _dgDealId :: !(JSONText Int64)

60+ , _dgDealId :: !(Textual Int64)

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

6262

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

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

@@ -49,7 +49,7 @@ type MarketplaceOrdersPatchResource =

4949 "v1.4" :>

5050 "marketplaceOrders" :>

5151 Capture "orderId" Text :>

52− Capture "revisionNumber" (JSONText Int64) :>

52+ Capture "revisionNumber" (Textual Int64) :>

5353 Capture "updateAction"

5454 MarketplaceOrdersPatchUpdateAction

5555 :>

@@ -62,7 +62,7 @@ type MarketplaceOrdersPatchResource =

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

6363data MarketplaceOrdersPatch = MarketplaceOrdersPatch

6464 { _mopUpdateAction :: !MarketplaceOrdersPatchUpdateAction

65− , _mopRevisionNumber :: !(JSONText Int64)

65+ , _mopRevisionNumber :: !(Textual Int64)

6666 , _mopPayload :: !MarketplaceOrder

6767 , _mopOrderId :: !Text

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

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

@@ -49,7 +49,7 @@ type MarketplaceOrdersUpdateResource =

4949 "v1.4" :>

5050 "marketplaceOrders" :>

5151 Capture "orderId" Text :>

52− Capture "revisionNumber" (JSONText Int64) :>

52+ Capture "revisionNumber" (Textual Int64) :>

5353 Capture "updateAction"

5454 MarketplaceOrdersUpdateUpdateAction

5555 :>

@@ -62,7 +62,7 @@ type MarketplaceOrdersUpdateResource =

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

6363data MarketplaceOrdersUpdate = MarketplaceOrdersUpdate

6464 { _mouUpdateAction :: !MarketplaceOrdersUpdateUpdateAction

65− , _mouRevisionNumber :: !(JSONText Int64)

65+ , _mouRevisionNumber :: !(Textual Int64)

6666 , _mouPayload :: !MarketplaceOrder

6767 , _mouOrderId :: !Text

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

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

@@ -46,7 +46,7 @@ type NegotiationRoundsInsertResource =

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "negotiations" :>

49− Capture "negotiationId" (JSONText Int64) :>

49+ Capture "negotiationId" (Textual Int64) :>

5050 "negotiationrounds" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] NegotiationRoundDTO :>

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

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

5858data NegotiationRoundsInsert = NegotiationRoundsInsert

5959 { _nriPayload :: !NegotiationRoundDTO

60− , _nriNegotiationId :: !(JSONText Int64)

60+ , _nriNegotiationId :: !(Textual Int64)

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

6262

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

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

@@ -46,7 +46,7 @@ type NegotiationsGetResource =

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "negotiations" :>

49− Capture "negotiationId" (JSONText Int64) :>

49+ Capture "negotiationId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] GetNegotiationByIdRequest :>

5252 Get '[JSON] NegotiationDTO

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

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

5757data NegotiationsGet = NegotiationsGet

5858 { _ngPayload :: !GetNegotiationByIdRequest

59− , _ngNegotiationId :: !(JSONText Int64)

59+ , _ngNegotiationId :: !(Textual Int64)

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

6161

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

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

@@ -45,14 +45,14 @@ type OffersGetResource =

4545 "adexchangebuyer" :>

4646 "v1.4" :>

4747 "offers" :>

48− Capture "offerId" (JSONText Int64) :>

48+ Capture "offerId" (Textual Int64) :>

4949 QueryParam "alt" AltJSON :> Get '[JSON] OfferDTO

5050

5151-- | Gets the requested offer.

5252--

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

5454newtype OffersGet = OffersGet

55− { _ogOfferId :: JSONText Int64

55+ { _ogOfferId :: Textual Int64

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

5757

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

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

@@ -49,11 +49,11 @@ type PerformanceReportListResource =

4949 "adexchangebuyer" :>

5050 "v1.4" :>

5151 "performancereport" :>

52− QueryParam "accountId" (JSONText Int64) :>

52+ QueryParam "accountId" (Textual Int64) :>

5353 QueryParam "endDateTime" Text :>

5454 QueryParam "startDateTime" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] PerformanceReportList

5959

@@ -61,10 +61,10 @@ type PerformanceReportListResource =

6161--

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

6363data PerformanceReportList' = PerformanceReportList'

64− { _prlAccountId :: !(JSONText Int64)

64+ { _prlAccountId :: !(Textual Int64)

6565 , _prlPageToken :: !(Maybe Text)

6666 , _prlEndDateTime :: !Text

67− , _prlMaxResults :: !(Maybe (JSONText Word32))

67+ , _prlMaxResults :: !(Maybe (Textual Word32))

6868 , _prlStartDateTime :: !Text

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

7070

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

@@ -46,16 +46,16 @@ type PretargetingConfigDeleteResource =

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "pretargetingconfigs" :>

49− Capture "accountId" (JSONText Int64) :>

50− Capture "configId" (JSONText Int64) :>

49+ Capture "accountId" (Textual Int64) :>

50+ Capture "configId" (Textual Int64) :>

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

5252

5353-- | Deletes an existing pretargeting config.

5454--

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

5656data PretargetingConfigDelete = PretargetingConfigDelete

57− { _pcdAccountId :: !(JSONText Int64)

58− , _pcdConfigId :: !(JSONText Int64)

57+ { _pcdAccountId :: !(Textual Int64)

58+ , _pcdConfigId :: !(Textual Int64)

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

6060

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

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

@@ -46,8 +46,8 @@ type PretargetingConfigGetResource =

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "pretargetingconfigs" :>

49− Capture "accountId" (JSONText Int64) :>

50− Capture "configId" (JSONText Int64) :>

49+ Capture "accountId" (Textual Int64) :>

50+ Capture "configId" (Textual Int64) :>

5151 QueryParam "alt" AltJSON :>

5252 Get '[JSON] PretargetingConfig

5353

@@ -55,8 +55,8 @@ type PretargetingConfigGetResource =

5555--

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

5757data PretargetingConfigGet = PretargetingConfigGet

58− { _pcgAccountId :: !(JSONText Int64)

59− , _pcgConfigId :: !(JSONText Int64)

58+ { _pcgAccountId :: !(Textual Int64)

59+ , _pcgConfigId :: !(Textual Int64)

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

6161

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

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

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

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "pretargetingconfigs" :>

49− Capture "accountId" (JSONText Int64) :>

49+ Capture "accountId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] PretargetingConfig :>

5252 Post '[JSON] PretargetingConfig

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

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

5757data PretargetingConfigInsert = PretargetingConfigInsert

5858 { _pciPayload :: !PretargetingConfig

59− , _pciAccountId :: !(JSONText Int64)

59+ , _pciAccountId :: !(Textual Int64)

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

6161

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

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

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

4646 "adexchangebuyer" :>

4747 "v1.4" :>

4848 "pretargetingconfigs" :>

49− Capture "accountId" (JSONText Int64) :>

49+ Capture "accountId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] PretargetingConfigList

5252

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

5555--

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

5757newtype PretargetingConfigList' = PretargetingConfigList'

58− { _pclAccountId :: JSONText Int64

58+ { _pclAccountId :: Textual Int64

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

6060

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

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

@@ -48,8 +48,8 @@ type PretargetingConfigPatchResource =

4848 "adexchangebuyer" :>

4949 "v1.4" :>

5050 "pretargetingconfigs" :>

51− Capture "accountId" (JSONText Int64) :>

52− Capture "configId" (JSONText Int64) :>

51+ Capture "accountId" (Textual Int64) :>

52+ Capture "configId" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] PretargetingConfig :>

5555 Patch '[JSON] PretargetingConfig

@@ -60,8 +60,8 @@ type PretargetingConfigPatchResource =

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

6161data PretargetingConfigPatch = PretargetingConfigPatch

6262 { _pcpPayload :: !PretargetingConfig

63− , _pcpAccountId :: !(JSONText Int64)

64− , _pcpConfigId :: !(JSONText Int64)

63+ , _pcpAccountId :: !(Textual Int64)

64+ , _pcpConfigId :: !(Textual Int64)

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

6666

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

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

@@ -47,8 +47,8 @@ type PretargetingConfigUpdateResource =

4747 "adexchangebuyer" :>

4848 "v1.4" :>

4949 "pretargetingconfigs" :>

50− Capture "accountId" (JSONText Int64) :>

51− Capture "configId" (JSONText Int64) :>

50+ Capture "accountId" (Textual Int64) :>

51+ Capture "configId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 ReqBody '[JSON] PretargetingConfig :>

5454 Put '[JSON] PretargetingConfig

@@ -58,8 +58,8 @@ type PretargetingConfigUpdateResource =

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

5959data PretargetingConfigUpdate = PretargetingConfigUpdate

6060 { _pcuPayload :: !PretargetingConfig

61− , _pcuAccountId :: !(JSONText Int64)

62− , _pcuConfigId :: !(JSONText Int64)

61+ , _pcuAccountId :: !(Textual Int64)

62+ , _pcuConfigId :: !(Textual Int64)

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

6464

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

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

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

603603 , _rRows :: !(Maybe [[Text]])

604604 , _rTotals :: !(Maybe [Text])

605605 , _rHeaders :: !(Maybe [ReportHeadersItem])

606− , _rTotalMatchedRows :: !(Maybe (JSONText Int64))

606+ , _rTotalMatchedRows :: !(Maybe (Textual Int64))

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

608608

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

@@ -1294,12 +1294,12 @@ instance ToJSON URLChannel where

12941294data PreferredDeal = PreferredDeal

12951295 { _pAdvertiserName :: !(Maybe Text)

12961296 , _pCurrencyCode :: !(Maybe Text)

1297− , _pStartTime :: !(Maybe (JSONText Word64))

1297+ , _pStartTime :: !(Maybe (Textual Word64))

12981298 , _pKind :: !Text

12991299 , _pBuyerNetworkName :: !(Maybe Text)

1300− , _pEndTime :: !(Maybe (JSONText Word64))

1301− , _pId :: !(Maybe (JSONText Int64))

1302− , _pFixedCpm :: !(Maybe (JSONText Int64))

1300+ , _pEndTime :: !(Maybe (Textual Word64))

1301+ , _pId :: !(Maybe (Textual Int64))

1302+ , _pFixedCpm :: !(Maybe (Textual Int64))

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

13041304

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

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

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

5050 Capture "accountId" Text :>

5151 "adclients" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

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

5555

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

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

5959data AccountsAdClientsList = AccountsAdClientsList

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

62− , _aaclMaxResults :: !(Maybe (JSONText Word32))

62+ , _aaclMaxResults :: !(Maybe (Textual Word32))

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

6464

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

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

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

5454 Capture "adClientId" Text :>

5555 "customchannels" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] CustomChannels

6060

@@ -66,7 +66,7 @@ data AccountsCustomChannelsList = AccountsCustomChannelsList

6666 { _acclAdClientId :: !Text

6767 , _acclAccountId :: !Text

6868 , _acclPageToken :: !(Maybe Text)

69− , _acclMaxResults :: !(Maybe (JSONText Word32))

69+ , _acclMaxResults :: !(Maybe (Textual Word32))

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

7171

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

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

@@ -47,7 +47,7 @@ type AccountsListResource =

4747 "v2.0" :>

4848 "accounts" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Int32) :>

50+ QueryParam "maxResults" (Textual Int32) :>

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

5252

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

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

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

5656data AccountsList = AccountsList

5757 { _alPageToken :: !(Maybe Text)

58− , _alMaxResults :: !(Maybe (JSONText Int32))

58+ , _alMaxResults :: !(Maybe (Textual Int32))

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

6060

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

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

@@ -65,8 +65,8 @@ type AccountsReportsGenerateResource =

6565 QueryParams "metric" Text :>

6666 QueryParams "sort" Text :>

6767 QueryParams "filter" Text :>

68− QueryParam "startIndex" (JSONText Word32) :>

69− QueryParam "maxResults" (JSONText Word32) :>

68+ QueryParam "startIndex" (Textual Word32) :>

69+ QueryParam "maxResults" (Textual Word32) :>

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

7171 :<|>

7272 "adexchangeseller" :>

@@ -81,8 +81,8 @@ type AccountsReportsGenerateResource =

8181 QueryParams "metric" Text :>

8282 QueryParams "sort" Text :>

8383 QueryParams "filter" Text :>

84− QueryParam "startIndex" (JSONText Word32) :>

85− QueryParam "maxResults" (JSONText Word32) :>

84+ QueryParam "startIndex" (Textual Word32) :>

85+ QueryParam "maxResults" (Textual Word32) :>

8686 QueryParam "alt" AltMedia :>

8787 Get '[OctetStream] Stream

8888

@@ -100,8 +100,8 @@ data AccountsReportsGenerate = AccountsReportsGenerate

100100 , _argMetric :: !(Maybe [Text])

101101 , _argSort :: !(Maybe [Text])

102102 , _argFilter :: !(Maybe [Text])

103− , _argStartIndex :: !(Maybe (JSONText Word32))

104− , _argMaxResults :: !(Maybe (JSONText Word32))

103+ , _argStartIndex :: !(Maybe (Textual Word32))

104+ , _argMaxResults :: !(Maybe (Textual Word32))

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

106106

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

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

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

5454 "reports" :>

5555 Capture "savedReportId" Text :>

5656 QueryParam "locale" Text :>

57− QueryParam "startIndex" (JSONText Int32) :>

58− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "startIndex" (Textual Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

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

6060

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

@@ -66,8 +66,8 @@ data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate

6666 { _arsgLocale :: !(Maybe Text)

6767 , _arsgSavedReportId :: !Text

6868 , _arsgAccountId :: !Text

69− , _arsgStartIndex :: !(Maybe (JSONText Int32))

70− , _arsgMaxResults :: !(Maybe (JSONText Int32))

69+ , _arsgStartIndex :: !(Maybe (Textual Int32))

70+ , _arsgMaxResults :: !(Maybe (Textual Int32))

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

7272

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

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

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

5151 "reports" :>

5252 "saved" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] SavedReports

5656

5757-- | List all saved reports in this Ad Exchange account.

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

6060data AccountsReportsSavedList = AccountsReportsSavedList

6161 { _arslAccountId :: !Text

6262 , _arslPageToken :: !(Maybe Text)

63− , _arslMaxResults :: !(Maybe (JSONText Int32))

63+ , _arslMaxResults :: !(Maybe (Textual Int32))

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

6565

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

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

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

5454 Capture "adClientId" Text :>

5555 "urlchannels" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

5959

6060-- | List all URL channels in the specified ad client for this Ad Exchange

@@ -65,7 +65,7 @@ data AccountsURLChannelsList = AccountsURLChannelsList

6565 { _auclAdClientId :: !Text

6666 , _auclAccountId :: !Text

6767 , _auclPageToken :: !(Maybe Text)

68− , _auclMaxResults :: !(Maybe (JSONText Word32))

68+ , _auclMaxResults :: !(Maybe (Textual Word32))

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

7070

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

gogol-admin-datatransfer/gen/Network/Google/DataTransfer/Types/Product.hs+2−2

@@ -28,7 +28,7 @@ data Application = Application

2828 , _aEtag :: !(Maybe Text)

2929 , _aKind :: !Text

3030 , _aName :: !(Maybe Text)

31− , _aId :: !(Maybe (JSONText Int64))

31+ , _aId :: !(Maybe (Textual Int64))

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

3333

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

@@ -425,7 +425,7 @@ instance ToJSON DataTransfersListResponse where

425425-- /See:/ 'applicationDataTransfer' smart constructor.

426426data ApplicationDataTransfer = ApplicationDataTransfer

427427 { _adtApplicationTransferParams :: !(Maybe [ApplicationTransferParam])

428− , _adtApplicationId :: !(Maybe (JSONText Int64))

428+ , _adtApplicationId :: !(Maybe (Textual Int64))

429429 , _adtApplicationTransferStatus :: !(Maybe Text)

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

431431

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

@@ -46,14 +46,14 @@ type ApplicationsGetResource =

4646 "datatransfer" :>

4747 "v1" :>

4848 "applications" :>

49− Capture "applicationId" (JSONText Int64) :>

49+ Capture "applicationId" (Textual Int64) :>

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

5151

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

5353--

5454-- /See:/ 'applicationsGet' smart constructor.

5555newtype ApplicationsGet = ApplicationsGet

56− { _agApplicationId :: JSONText Int64

56+ { _agApplicationId :: Textual Int64

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

5858

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

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

@@ -50,7 +50,7 @@ type ApplicationsListResource =

5050 "applications" :>

5151 QueryParam "customerId" Text :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ApplicationsListResponse

5656

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

6060data ApplicationsList = ApplicationsList

6161 { _alCustomerId :: !(Maybe Text)

6262 , _alPageToken :: !(Maybe Text)

63− , _alMaxResults :: !(Maybe (JSONText Word32))

63+ , _alMaxResults :: !(Maybe (Textual Word32))

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

6565

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

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

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

5757 QueryParam "newOwnerUserId" Text :>

5858 QueryParam "customerId" Text :>

5959 QueryParam "pageToken" Text :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] DataTransfersListResponse

6363

@@ -71,7 +71,7 @@ data TransfersList = TransfersList

7171 , _tlNewOwnerUserId :: !(Maybe Text)

7272 , _tlCustomerId :: !(Maybe Text)

7373 , _tlPageToken :: !(Maybe Text)

74− , _tlMaxResults :: !(Maybe (JSONText Int32))

74+ , _tlMaxResults :: !(Maybe (Textual Int32))

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

7676

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

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

@@ -986,8 +986,8 @@ data RoleAssignment = RoleAssignment

986986 , _rolScopeType :: !(Maybe Text)

987987 , _rolKind :: !Text

988988 , _rolAssignedTo :: !(Maybe Text)

989− , _rolRoleId :: !(Maybe (JSONText Int64))

990− , _rolRoleAssignmentId :: !(Maybe (JSONText Int64))

989+ , _rolRoleId :: !(Maybe (Textual Int64))

990+ , _rolRoleAssignmentId :: !(Maybe (Textual Int64))

991991 , _rolOrgUnitId :: !(Maybe Text)

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

993993

@@ -1091,7 +1091,7 @@ instance ToJSON RoleAssignment where

10911091data Group = Group

10921092 { _groEmail :: !(Maybe Text)

10931093 , _groEtag :: !(Maybe Text)

1094− , _groDirectMembersCount :: !(Maybe (JSONText Int64))

1094+ , _groDirectMembersCount :: !(Maybe (Textual Int64))

10951095 , _groKind :: !Text

10961096 , _groAliases :: !(Maybe [Text])

10971097 , _groNonEditableAliases :: !(Maybe [Text])

@@ -1629,12 +1629,12 @@ instance ToJSON Users where

16291629--

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

16311631data Asp = Asp

1632− { _aCreationTime :: !(Maybe (JSONText Int64))

1632+ { _aCreationTime :: !(Maybe (Textual Int64))

16331633 , _aEtag :: !(Maybe Text)

1634− , _aCodeId :: !(Maybe (JSONText Int32))

1634+ , _aCodeId :: !(Maybe (Textual Int32))

16351635 , _aKind :: !Text

16361636 , _aName :: !(Maybe Text)

1637− , _aLastTimeUsed :: !(Maybe (JSONText Int64))

1637+ , _aLastTimeUsed :: !(Maybe (Textual Int64))

16381638 , _aUserKey :: !(Maybe Text)

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

16401640

@@ -2310,7 +2310,7 @@ data Channel = Channel

23102310 { _cResourceURI :: !(Maybe Text)

23112311 , _cResourceId :: !(Maybe Text)

23122312 , _cKind :: !Text

2313− , _cExpiration :: !(Maybe (JSONText Int64))

2313+ , _cExpiration :: !(Maybe (Textual Int64))

23142314 , _cToken :: !(Maybe Text)

23152315 , _cAddress :: !(Maybe Text)

23162316 , _cPayload :: !(Maybe Bool)

@@ -2731,7 +2731,7 @@ instance ToJSON ChromeOSDeviceRecentUsersItem where

27312731--

27322732-- /See:/ 'domainAlias' smart constructor.

27332733data DomainAlias = DomainAlias

2734− { _dCreationTime :: !(Maybe (JSONText Int64))

2734+ { _dCreationTime :: !(Maybe (Textual Int64))

27352735 , _dEtag :: !(Maybe Text)

27362736 , _dKind :: !Text

27372737 , _dVerified :: !(Maybe Bool)

@@ -3406,7 +3406,7 @@ data Role = Role

34063406 , _rrKind :: !Text

34073407 , _rrRoleName :: !(Maybe Text)

34083408 , _rrIsSystemRole :: !(Maybe Bool)

3409− , _rrRoleId :: !(Maybe (JSONText Int64))

3409+ , _rrRoleId :: !(Maybe (Textual Int64))

34103410 , _rrRoleDescription :: !(Maybe Text)

34113411 , _rrIsSuperAdminRole :: !(Maybe Bool)

34123412 , _rrRolePrivileges :: !(Maybe [RoleRolePrivilegesItem])

@@ -3649,7 +3649,7 @@ instance ToJSON Customer where

36493649--

36503650-- /See:/ 'mobileDeviceApplicationsItem' smart constructor.

36513651data MobileDeviceApplicationsItem = MobileDeviceApplicationsItem

3652− { _mdaiVersionCode :: !(Maybe (JSONText Int32))

3652+ { _mdaiVersionCode :: !(Maybe (Textual Int32))

36533653 , _mdaiVersionName :: !(Maybe Text)

36543654 , _mdaiPackageName :: !(Maybe Text)

36553655 , _mdaiDisplayName :: !(Maybe Text)

@@ -4163,7 +4163,7 @@ instance ToJSON UserWebsite where

41634163-- /See:/ 'chromeOSDeviceActiveTimeRangesItem' smart constructor.

41644164data ChromeOSDeviceActiveTimeRangesItem = ChromeOSDeviceActiveTimeRangesItem

41654165 { _codatriDate :: !(Maybe Date')

4166− , _codatriActiveTime :: !(Maybe (JSONText Int32))

4166+ , _codatriActiveTime :: !(Maybe (Textual Int32))

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

41684168

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

@@ -4358,11 +4358,11 @@ instance ToJSON UserPhone where

43584358--

43594359-- /See:/ 'userPhoto' smart constructor.

43604360data UserPhoto = UserPhoto

4361− { _upPhotoData :: !(Maybe (JSONText Word8))

4361+ { _upPhotoData :: !(Maybe (Textual Word8))

43624362 , _upEtag :: !(Maybe Text)

4363− , _upHeight :: !(Maybe (JSONText Int32))

4363+ , _upHeight :: !(Maybe (Textual Int32))

43644364 , _upKind :: !Text

4365− , _upWidth :: !(Maybe (JSONText Int32))

4365+ , _upWidth :: !(Maybe (Textual Int32))

43664366 , _upMimeType :: !(Maybe Text)

43674367 , _upId :: !(Maybe Text)

43684368 , _upPrimaryEmail :: !(Maybe Text)

@@ -4977,7 +4977,7 @@ instance ToJSON UserCustomProperties where

49774977--

49784978-- /See:/ 'domains' smart constructor.

49794979data Domains = Domains

4980− { _domCreationTime :: !(Maybe (JSONText Int64))

4980+ { _domCreationTime :: !(Maybe (Textual Int64))

49814981 , _domEtag :: !(Maybe Text)

49824982 , _domKind :: !Text

49834983 , _domDomainAliases :: !(Maybe [DomainAlias])

@@ -5086,7 +5086,7 @@ data Notifications = Notifications

50865086 , _notNextPageToken :: !(Maybe Text)

50875087 , _notKind :: !Text

50885088 , _notItems :: !(Maybe [Notification])

5089− , _notUnreadNotificationsCount :: !(Maybe (JSONText Int32))

5089+ , _notUnreadNotificationsCount :: !(Maybe (Textual Int32))

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

50915091

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

@@ -5168,8 +5168,8 @@ instance ToJSON Notifications where

51685168--

51695169-- /See:/ 'schemaFieldSpecNumericIndexingSpec' smart constructor.

51705170data SchemaFieldSpecNumericIndexingSpec = SchemaFieldSpecNumericIndexingSpec

5171− { _sfsnisMaxValue :: !(Maybe (JSONText Double))

5172− , _sfsnisMinValue :: !(Maybe (JSONText Double))

5171+ { _sfsnisMaxValue :: !(Maybe (Textual Double))

5172+ , _sfsnisMinValue :: !(Maybe (Textual Double))

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

51745174

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

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

@@ -49,14 +49,14 @@ type AspsDeleteResource =

4949 "users" :>

5050 Capture "userKey" Text :>

5151 "asps" :>

52− Capture "codeId" (JSONText Int32) :>

52+ Capture "codeId" (Textual Int32) :>

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

5454

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

5656--

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

5858data AspsDelete = AspsDelete

59− { _adCodeId :: !(JSONText Int32)

59+ { _adCodeId :: !(Textual Int32)

6060 , _adUserKey :: !Text

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

6262

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

@@ -49,14 +49,14 @@ type AspsGetResource =

4949 "users" :>

5050 Capture "userKey" Text :>

5151 "asps" :>

52− Capture "codeId" (JSONText Int32) :>

52+ Capture "codeId" (Textual Int32) :>

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

5454

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

5656--

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

5858data AspsGet = AspsGet

59− { _agCodeId :: !(JSONText Int32)

59+ { _agCodeId :: !(Textual Int32)

6060 , _agUserKey :: !Text

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

6262

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

@@ -62,7 +62,7 @@ type ChromeosDevicesListResource =

6262 QueryParam "projection" ChromeosDevicesListProjection

6363 :>

6464 QueryParam "pageToken" Text :>

65− QueryParam "maxResults" (JSONText Int32) :>

65+ QueryParam "maxResults" (Textual Int32) :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] ChromeOSDevices

6868

@@ -76,7 +76,7 @@ data ChromeosDevicesList = ChromeosDevicesList

7676 , _cdlQuery :: !(Maybe Text)

7777 , _cdlProjection :: !(Maybe ChromeosDevicesListProjection)

7878 , _cdlPageToken :: !(Maybe Text)

79− , _cdlMaxResults :: !(Maybe (JSONText Int32))

79+ , _cdlMaxResults :: !(Maybe (Textual Int32))

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

8181

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

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

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

5454 QueryParam "customer" Text :>

5555 QueryParam "pageToken" Text :>

5656 QueryParam "userKey" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

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

5959

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

@@ -65,7 +65,7 @@ data GroupsList = GroupsList

6565 , _glCustomer :: !(Maybe Text)

6666 , _glPageToken :: !(Maybe Text)

6767 , _glUserKey :: !(Maybe Text)

68− , _glMaxResults :: !(Maybe (JSONText Int32))

68+ , _glMaxResults :: !(Maybe (Textual Int32))

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

7070

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

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

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

5353 "members" :>

5454 QueryParam "roles" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

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

5858

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

@@ -63,7 +63,7 @@ data MembersList = MembersList

6363 { _mlRoles :: !(Maybe Text)

6464 , _mlGroupKey :: !Text

6565 , _mlPageToken :: !(Maybe Text)

66− , _mlMaxResults :: !(Maybe (JSONText Int32))

66+ , _mlMaxResults :: !(Maybe (Textual Int32))

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

6868

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

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

@@ -61,7 +61,7 @@ type MobileDevicesListResource =

6161 QueryParam "projection" MobileDevicesListProjection

6262 :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "maxResults" (JSONText Int32) :>

64+ QueryParam "maxResults" (Textual Int32) :>

6565 QueryParam "alt" AltJSON :>

6666 Get '[JSON] MobileDevices

6767

@@ -75,7 +75,7 @@ data MobileDevicesList = MobileDevicesList

7575 , _mdlQuery :: !(Maybe Text)

7676 , _mdlProjection :: !(Maybe MobileDevicesListProjection)

7777 , _mdlPageToken :: !(Maybe Text)

78− , _mdlMaxResults :: !(Maybe (JSONText Int32))

78+ , _mdlMaxResults :: !(Maybe (Textual Int32))

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

8080

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

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

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

5353 "notifications" :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] Notifications

5858

5959-- | Retrieves a list of notifications.

@@ -63,7 +63,7 @@ data NotificationsList = NotificationsList

6363 { _nlCustomer :: !Text

6464 , _nlLanguage :: !(Maybe Text)

6565 , _nlPageToken :: !(Maybe Text)

66− , _nlMaxResults :: !(Maybe (JSONText Word32))

66+ , _nlMaxResults :: !(Maybe (Textual Word32))

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

6868

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

gogol-admin-directory/gen/Network/Google/Resource/Directory/RoleAssignments/List.hs+2−2

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

5555 QueryParam "roleId" Text :>

5656 QueryParam "pageToken" Text :>

5757 QueryParam "userKey" Text :>

58− QueryParam "maxResults" (JSONText Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] RoleAssignments

6161

@@ -67,7 +67,7 @@ data RoleAssignmentsList = RoleAssignmentsList

6767 , _ralCustomer :: !Text

6868 , _ralPageToken :: !(Maybe Text)

6969 , _ralUserKey :: !(Maybe Text)

70− , _ralMaxResults :: !(Maybe (JSONText Int32))

70+ , _ralMaxResults :: !(Maybe (Textual Int32))

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

7272

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

gogol-admin-directory/gen/Network/Google/Resource/Directory/Roles/List.hs+2−2

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

5151 Capture "customer" Text :>

5252 "roles" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] Roles

5656

5757-- | Retrieves a paginated list of all the roles in a domain.

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

6060data RolesList = RolesList

6161 { _rlCustomer :: !Text

6262 , _rlPageToken :: !(Maybe Text)

63− , _rlMaxResults :: !(Maybe (JSONText Int32))

63+ , _rlMaxResults :: !(Maybe (Textual Int32))

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

6565

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

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

@@ -68,7 +68,7 @@ type UsersListResource =

6868 QueryParam "query" Text :>

6969 QueryParam "projection" UsersListProjection :>

7070 QueryParam "pageToken" Text :>

71− QueryParam "maxResults" (JSONText Int32) :>

71+ QueryParam "maxResults" (Textual Int32) :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] Users

7474

@@ -87,7 +87,7 @@ data UsersList = UsersList

8787 , _ulQuery :: !(Maybe Text)

8888 , _ulProjection :: !UsersListProjection

8989 , _ulPageToken :: !(Maybe Text)

90− , _ulMaxResults :: !(Maybe (JSONText Int32))

90+ , _ulMaxResults :: !(Maybe (Textual Int32))

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

9292

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

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

@@ -70,7 +70,7 @@ type UsersWatchResource =

7070 QueryParam "query" Text :>

7171 QueryParam "projection" UsersWatchProjection :>

7272 QueryParam "pageToken" Text :>

73− QueryParam "maxResults" (JSONText Int32) :>

73+ QueryParam "maxResults" (Textual Int32) :>

7474 QueryParam "alt" AltJSON :>

7575 ReqBody '[JSON] Channel :>

7676 Post '[JSON] Channel

@@ -91,7 +91,7 @@ data UsersWatch = UsersWatch

9191 , _uwQuery :: !(Maybe Text)

9292 , _uwProjection :: !UsersWatchProjection

9393 , _uwPageToken :: !(Maybe Text)

94− , _uwMaxResults :: !(Maybe (JSONText Int32))

94+ , _uwMaxResults :: !(Maybe (Textual Int32))

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

9696

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

gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+5−5

@@ -25,7 +25,7 @@ import Network.Google.Reports.Types.Sum

2525data UsageReportParametersItem = UsageReportParametersItem

2626 { _urpiDatetimeValue :: !(Maybe DateTime')

2727 , _urpiBoolValue :: !(Maybe Bool)

28− , _urpiIntValue :: !(Maybe (JSONText Int64))

28+ , _urpiIntValue :: !(Maybe (Textual Int64))

2929 , _urpiStringValue :: !(Maybe Text)

3030 , _urpiName :: !(Maybe Text)

3131 , _urpiMsgValue :: !(Maybe [UsageReportParametersItemMsgValueItem])

@@ -121,7 +121,7 @@ instance ToJSON UsageReportParametersItem where

121121-- /See:/ 'activityId' smart constructor.

122122data ActivityId = ActivityId

123123 { _aiTime :: !(Maybe DateTime')

124− , _aiUniqueQualifier :: !(Maybe (JSONText Int64))

124+ , _aiUniqueQualifier :: !(Maybe (Textual Int64))

125125 , _aiCustomerId :: !(Maybe Text)

126126 , _aiApplicationName :: !(Maybe Text)

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

@@ -385,7 +385,7 @@ data Channel = Channel

385385 { _cResourceURI :: !(Maybe Text)

386386 , _cResourceId :: !(Maybe Text)

387387 , _cKind :: !Text

388− , _cExpiration :: !(Maybe (JSONText Int64))

388+ , _cExpiration :: !(Maybe (Textual Int64))

389389 , _cToken :: !(Maybe Text)

390390 , _cAddress :: !(Maybe Text)

391391 , _cPayload :: !(Maybe Bool)

@@ -961,9 +961,9 @@ instance ToJSON UsageReportEntity where

961961-- /See:/ 'activityEventsItemParametersItem' smart constructor.

962962data ActivityEventsItemParametersItem = ActivityEventsItemParametersItem

963963 { _aeipiBoolValue :: !(Maybe Bool)

964− , _aeipiIntValue :: !(Maybe (JSONText Int64))

964+ , _aeipiIntValue :: !(Maybe (Textual Int64))

965965 , _aeipiValue :: !(Maybe Text)

966− , _aeipiMultiIntValue :: !(Maybe [JSONText Int64])

966+ , _aeipiMultiIntValue :: !(Maybe [Textual Int64])

967967 , _aeipiName :: !(Maybe Text)

968968 , _aeipiMultiValue :: !(Maybe [Text])

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

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

@@ -66,7 +66,7 @@ type ActivitiesListResource =

6666 QueryParam "endTime" Text :>

6767 QueryParam "pageToken" Text :>

6868 QueryParam "eventName" Text :>

69− QueryParam "maxResults" (JSONText Int32) :>

69+ QueryParam "maxResults" (Textual Int32) :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] Activities

7272

@@ -83,7 +83,7 @@ data ActivitiesList = ActivitiesList

8383 , _alPageToken :: !(Maybe Text)

8484 , _alEventName :: !(Maybe Text)

8585 , _alUserKey :: !Text

86− , _alMaxResults :: !(Maybe (JSONText Int32))

86+ , _alMaxResults :: !(Maybe (Textual Int32))

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

8888

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

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

@@ -68,7 +68,7 @@ type ActivitiesWatchResource =

6868 QueryParam "endTime" Text :>

6969 QueryParam "pageToken" Text :>

7070 QueryParam "eventName" Text :>

71− QueryParam "maxResults" (JSONText Int32) :>

71+ QueryParam "maxResults" (Textual Int32) :>

7272 QueryParam "alt" AltJSON :>

7373 ReqBody '[JSON] Channel :>

7474 Post '[JSON] Channel

@@ -87,7 +87,7 @@ data ActivitiesWatch = ActivitiesWatch

8787 , _awPageToken :: !(Maybe Text)

8888 , _awEventName :: !(Maybe Text)

8989 , _awUserKey :: !Text

90− , _awMaxResults :: !(Maybe (JSONText Int32))

90+ , _awMaxResults :: !(Maybe (Textual Int32))

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

9292

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

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

@@ -61,7 +61,7 @@ type UserUsageReportGetResource =

6161 QueryParam "customerId" Text :>

6262 QueryParam "parameters" Text :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "maxResults" (JSONText Word32) :>

64+ QueryParam "maxResults" (Textual Word32) :>

6565 QueryParam "alt" AltJSON :>

6666 Get '[JSON] UsageReports

6767

@@ -76,7 +76,7 @@ data UserUsageReportGet = UserUsageReportGet

7676 , _uurgParameters :: !(Maybe Text)

7777 , _uurgPageToken :: !(Maybe Text)

7878 , _uurgUserKey :: !Text

79− , _uurgMaxResults :: !(Maybe (JSONText Word32))

79+ , _uurgMaxResults :: !(Maybe (Textual Word32))

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

8181

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

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

@@ -607,7 +607,7 @@ data Report = Report

607607 , _rRows :: !(Maybe [[Text]])

608608 , _rTotals :: !(Maybe [Text])

609609 , _rHeaders :: !(Maybe [ReportHeadersItem])

610− , _rTotalMatchedRows :: !(Maybe (JSONText Int64))

610+ , _rTotalMatchedRows :: !(Maybe (Textual Int64))

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

612612

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

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

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

5050 Capture "accountId" Text :>

5151 "adclients" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

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

5555

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

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

5959data AccountsAdClientsList = AccountsAdClientsList

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

62− , _aaclMaxResults :: !(Maybe (JSONText Word32))

62+ , _aaclMaxResults :: !(Maybe (Textual Word32))

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

6464

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

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

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

5555 "adunits" :>

5656 QueryParam "includeInactive" Bool :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

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

6060

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

@@ -66,7 +66,7 @@ data AccountsAdUnitsList = AccountsAdUnitsList

6666 , _aaulAdClientId :: !Text

6767 , _aaulAccountId :: !Text

6868 , _aaulPageToken :: !(Maybe Text)

69− , _aaulMaxResults :: !(Maybe (JSONText Word32))

69+ , _aaulMaxResults :: !(Maybe (Textual Word32))

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

7171

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

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

@@ -65,8 +65,8 @@ type AccountsReportsGenerateResource =

6565 QueryParams "metric" Text :>

6666 QueryParams "sort" Text :>

6767 QueryParams "filter" Text :>

68− QueryParam "startIndex" (JSONText Word32) :>

69− QueryParam "maxResults" (JSONText Word32) :>

68+ QueryParam "startIndex" (Textual Word32) :>

69+ QueryParam "maxResults" (Textual Word32) :>

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

7171

7272-- | Generate an AdSense report based on the report request sent in the query

@@ -83,8 +83,8 @@ data AccountsReportsGenerate = AccountsReportsGenerate

8383 , _argMetric :: !(Maybe [Text])

8484 , _argSort :: !(Maybe [Text])

8585 , _argFilter :: !(Maybe [Text])

86− , _argStartIndex :: !(Maybe (JSONText Word32))

87− , _argMaxResults :: !(Maybe (JSONText Word32))

86+ , _argStartIndex :: !(Maybe (Textual Word32))

87+ , _argMaxResults :: !(Maybe (Textual Word32))

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

8989

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

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

@@ -47,7 +47,7 @@ type AdClientsListResource =

4747 "v4.1" :>

4848 "adclients" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Word32) :>

50+ QueryParam "maxResults" (Textual Word32) :>

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

5252

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

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

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

5656data AdClientsList = AdClientsList

5757 { _aclPageToken :: !(Maybe Text)

58− , _aclMaxResults :: !(Maybe (JSONText Word32))

58+ , _aclMaxResults :: !(Maybe (Textual Word32))

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

6060

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

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

@@ -50,7 +50,7 @@ type CustomChannelsListResource =

5050 Capture "adClientId" Text :>

5151 "customchannels" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] CustomChannels

5656

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

6060data CustomChannelsList = CustomChannelsList

6161 { _cclAdClientId :: !Text

6262 , _cclPageToken :: !(Maybe Text)

63− , _cclMaxResults :: !(Maybe (JSONText Word32))

63+ , _cclMaxResults :: !(Maybe (Textual Word32))

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

6565

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

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

@@ -62,8 +62,8 @@ type ReportsGenerateResource =

6262 QueryParams "metric" Text :>

6363 QueryParams "sort" Text :>

6464 QueryParams "filter" Text :>

65− QueryParam "startIndex" (JSONText Word32) :>

66− QueryParam "maxResults" (JSONText Word32) :>

65+ QueryParam "startIndex" (Textual Word32) :>

66+ QueryParam "maxResults" (Textual Word32) :>

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

6868

6969-- | Generate an AdSense report based on the report request sent in the query

@@ -79,8 +79,8 @@ data ReportsGenerate = ReportsGenerate

7979 , _rgMetric :: !(Maybe [Text])

8080 , _rgSort :: !(Maybe [Text])

8181 , _rgFilter :: !(Maybe [Text])

82− , _rgStartIndex :: !(Maybe (JSONText Word32))

83− , _rgMaxResults :: !(Maybe (JSONText Word32))

82+ , _rgStartIndex :: !(Maybe (Textual Word32))

83+ , _rgMaxResults :: !(Maybe (Textual Word32))

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

8585

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

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

@@ -50,7 +50,7 @@ type URLChannelsListResource =

5050 Capture "adClientId" Text :>

5151 "urlchannels" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

5555

5656-- | List all host URL channels in the host AdSense account.

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

5959data URLChannelsList = URLChannelsList

6060 { _uclAdClientId :: !Text

6161 , _uclPageToken :: !(Maybe Text)

62− , _uclMaxResults :: !(Maybe (JSONText Word32))

62+ , _uclMaxResults :: !(Maybe (Textual Word32))

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

6464

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

gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+4−4

@@ -1087,7 +1087,7 @@ instance ToJSON AdStyleFont where

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

10881088data Account = Account

10891089 { _accKind :: !Text

1090− , _accCreationTime :: !(Maybe (JSONText Int64))

1090+ , _accCreationTime :: !(Maybe (Textual Int64))

10911091 , _accPremium :: !(Maybe Bool)

10921092 , _accName :: !(Maybe Text)

10931093 , _accId :: !(Maybe Text)

@@ -1774,10 +1774,10 @@ instance ToJSON AdStyle where

17741774--

17751775-- /See:/ 'adUnitFeedAdsSettings' smart constructor.

17761776data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings

1777− { _aufasFrequency :: !(Maybe (JSONText Int32))

1777+ { _aufasFrequency :: !(Maybe (Textual Int32))

17781778 , _aufasAdPosition :: !(Maybe Text)

17791779 , _aufasType :: !(Maybe Text)

1780− , _aufasMinimumWordCount :: !(Maybe (JSONText Int32))

1780+ , _aufasMinimumWordCount :: !(Maybe (Textual Int32))

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

17821782

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

@@ -2083,7 +2083,7 @@ data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse

20832083 , _argrTotals :: !(Maybe [Text])

20842084 , _argrStartDate :: !(Maybe Text)

20852085 , _argrHeaders :: !(Maybe [AdsenseReportsGenerateResponseHeadersItem])

2086− , _argrTotalMatchedRows :: !(Maybe (JSONText Int64))

2086+ , _argrTotalMatchedRows :: !(Maybe (Textual Int64))

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

20882088

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs+2−2

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

5050 Capture "accountId" Text :>

5151 "adclients" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Int32) :>

53+ QueryParam "maxResults" (Textual Int32) :>

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

5555

5656-- | List all ad clients in the specified account.

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

5959data AccountsAdClientsList = AccountsAdClientsList

6060 { _aaclAccountId :: !Text

6161 , _aaclPageToken :: !(Maybe Text)

62− , _aaclMaxResults :: !(Maybe (JSONText Int32))

62+ , _aaclMaxResults :: !(Maybe (Textual Int32))

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

6464

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs+2−2

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

5656 Capture "adUnitId" Text :>

5757 "customchannels" :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] CustomChannels

6262

@@ -68,7 +68,7 @@ data AccountsAdUnitsCustomChannelsList = AccountsAdUnitsCustomChannelsList

6868 , _aaucclAdClientId :: !Text

6969 , _aaucclAccountId :: !Text

7070 , _aaucclPageToken :: !(Maybe Text)

71− , _aaucclMaxResults :: !(Maybe (JSONText Int32))

71+ , _aaucclMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs+2−2

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

5555 "adunits" :>

5656 QueryParam "includeInactive" Bool :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

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

6060

6161-- | List all ad units in the specified ad client for the specified account.

@@ -66,7 +66,7 @@ data AccountsAdUnitsList = AccountsAdUnitsList

6666 , _aaulAdClientId :: !Text

6767 , _aaulAccountId :: !Text

6868 , _aaulPageToken :: !(Maybe Text)

69− , _aaulMaxResults :: !(Maybe (JSONText Int32))

69+ , _aaulMaxResults :: !(Maybe (Textual Int32))

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

7171

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs+2−2

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

5858 "adunits" :>

5959 QueryParam "includeInactive" Bool :>

6060 QueryParam "pageToken" Text :>

61− QueryParam "maxResults" (JSONText Int32) :>

61+ QueryParam "maxResults" (Textual Int32) :>

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

6363

6464-- | List all ad units in the specified custom channel.

@@ -70,7 +70,7 @@ data AccountsCustomChannelsAdUnitsList = AccountsCustomChannelsAdUnitsList

7070 , _accaulAdClientId :: !Text

7171 , _accaulAccountId :: !Text

7272 , _accaulPageToken :: !(Maybe Text)

73− , _accaulMaxResults :: !(Maybe (JSONText Int32))

73+ , _accaulMaxResults :: !(Maybe (Textual Int32))

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

7575

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs+2−2

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

5454 Capture "adClientId" Text :>

5555 "customchannels" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] CustomChannels

6060

@@ -66,7 +66,7 @@ data AccountsCustomChannelsList = AccountsCustomChannelsList

6666 { _acclAdClientId :: !Text

6767 , _acclAccountId :: !Text

6868 , _acclPageToken :: !(Maybe Text)

69− , _acclMaxResults :: !(Maybe (JSONText Int32))

69+ , _acclMaxResults :: !(Maybe (Textual Int32))

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

7171

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/List.hs+2−2

@@ -47,7 +47,7 @@ type AccountsListResource =

4747 "v1.4" :>

4848 "accounts" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Int32) :>

50+ QueryParam "maxResults" (Textual Int32) :>

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

5252

5353-- | List all accounts available to this AdSense account.

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

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

5656data AccountsList = AccountsList

5757 { _alPageToken :: !(Maybe Text)

58− , _alMaxResults :: !(Maybe (JSONText Int32))

58+ , _alMaxResults :: !(Maybe (Textual Int32))

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

6060

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+6−6

@@ -68,9 +68,9 @@ type AccountsReportsGenerateResource =

6868 QueryParam "currency" Text :>

6969 QueryParams "sort" Text :>

7070 QueryParams "filter" Text :>

71− QueryParam "startIndex" (JSONText Int32) :>

71+ QueryParam "startIndex" (Textual Int32) :>

7272 QueryParam "useTimezoneReporting" Bool :>

73− QueryParam "maxResults" (JSONText Int32) :>

73+ QueryParam "maxResults" (Textual Int32) :>

7474 QueryParam "alt" AltJSON :>

7575 Get '[JSON]

7676 AdsenseReportsGenerateResponse

@@ -88,9 +88,9 @@ type AccountsReportsGenerateResource =

8888 QueryParam "currency" Text :>

8989 QueryParams "sort" Text :>

9090 QueryParams "filter" Text :>

91− QueryParam "startIndex" (JSONText Int32) :>

91+ QueryParam "startIndex" (Textual Int32) :>

9292 QueryParam "useTimezoneReporting" Bool :>

93− QueryParam "maxResults" (JSONText Int32) :>

93+ QueryParam "maxResults" (Textual Int32) :>

9494 QueryParam "alt" AltMedia :>

9595 Get '[OctetStream] Stream

9696

@@ -109,9 +109,9 @@ data AccountsReportsGenerate = AccountsReportsGenerate

109109 , _argCurrency :: !(Maybe Text)

110110 , _argSort :: !(Maybe [Text])

111111 , _argFilter :: !(Maybe [Text])

112− , _argStartIndex :: !(Maybe (JSONText Int32))

112+ , _argStartIndex :: !(Maybe (Textual Int32))

113113 , _argUseTimezoneReporting :: !(Maybe Bool)

114− , _argMaxResults :: !(Maybe (JSONText Int32))

114+ , _argMaxResults :: !(Maybe (Textual Int32))

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

116116

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs+4−4

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

5454 "reports" :>

5555 Capture "savedReportId" Text :>

5656 QueryParam "locale" Text :>

57− QueryParam "startIndex" (JSONText Int32) :>

58− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "startIndex" (Textual Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] AdsenseReportsGenerateResponse

6161

@@ -67,8 +67,8 @@ data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate

6767 { _arsgLocale :: !(Maybe Text)

6868 , _arsgSavedReportId :: !Text

6969 , _arsgAccountId :: !Text

70− , _arsgStartIndex :: !(Maybe (JSONText Int32))

71− , _arsgMaxResults :: !(Maybe (JSONText Int32))

70+ , _arsgStartIndex :: !(Maybe (Textual Int32))

71+ , _arsgMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs+2−2

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

5151 "reports" :>

5252 "saved" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] SavedReports

5656

5757-- | List all saved reports in the specified AdSense account.

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

6060data AccountsReportsSavedList = AccountsReportsSavedList

6161 { _arslAccountId :: !Text

6262 , _arslPageToken :: !(Maybe Text)

63− , _arslMaxResults :: !(Maybe (JSONText Int32))

63+ , _arslMaxResults :: !(Maybe (Textual Int32))

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

6565

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs+2−2

@@ -50,7 +50,7 @@ type AccountsSavedadstylesListResource =

5050 Capture "accountId" Text :>

5151 "savedadstyles" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Int32) :>

53+ QueryParam "maxResults" (Textual Int32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyles

5555

5656-- | List all saved ad styles in the specified account.

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

5959data AccountsSavedadstylesList = AccountsSavedadstylesList

6060 { _aslAccountId :: !Text

6161 , _aslPageToken :: !(Maybe Text)

62− , _aslMaxResults :: !(Maybe (JSONText Int32))

62+ , _aslMaxResults :: !(Maybe (Textual Int32))

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

6464

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+2−2

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

5454 Capture "adClientId" Text :>

5555 "urlchannels" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

5959

6060-- | List all URL channels in the specified ad client for the specified

@@ -65,7 +65,7 @@ data AccountsURLChannelsList = AccountsURLChannelsList

6565 { _auclAdClientId :: !Text

6666 , _auclAccountId :: !Text

6767 , _auclPageToken :: !(Maybe Text)

68− , _auclMaxResults :: !(Maybe (JSONText Int32))

68+ , _auclMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-adsense/gen/Network/Google/Resource/AdSense/AdClients/List.hs+2−2

@@ -47,7 +47,7 @@ type AdClientsListResource =

4747 "v1.4" :>

4848 "adclients" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Int32) :>

50+ QueryParam "maxResults" (Textual Int32) :>

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

5252

5353-- | List all ad clients in this AdSense account.

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

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

5656data AdClientsList = AdClientsList

5757 { _aclPageToken :: !(Maybe Text)

58− , _aclMaxResults :: !(Maybe (JSONText Int32))

58+ , _aclMaxResults :: !(Maybe (Textual Int32))

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

6060

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

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs+2−2

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

5353 Capture "adUnitId" Text :>

5454 "customchannels" :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] CustomChannels

5959

@@ -64,7 +64,7 @@ data AdUnitsCustomChannelsList = AdUnitsCustomChannelsList

6464 { _aucclAdUnitId :: !Text

6565 , _aucclAdClientId :: !Text

6666 , _aucclPageToken :: !(Maybe Text)

67− , _aucclMaxResults :: !(Maybe (JSONText Int32))

67+ , _aucclMaxResults :: !(Maybe (Textual Int32))

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

6969

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

gogol-adsense/gen/Network/Google/Resource/AdSense/AdUnits/List.hs+2−2

@@ -52,7 +52,7 @@ type AdUnitsListResource =

5252 "adunits" :>

5353 QueryParam "includeInactive" Bool :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Int32) :>

55+ QueryParam "maxResults" (Textual Int32) :>

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

5757

5858-- | List all ad units in the specified ad client for this AdSense account.

@@ -62,7 +62,7 @@ data AdUnitsList = AdUnitsList

6262 { _aulIncludeInactive :: !(Maybe Bool)

6363 , _aulAdClientId :: !Text

6464 , _aulPageToken :: !(Maybe Text)

65− , _aulMaxResults :: !(Maybe (JSONText Int32))

65+ , _aulMaxResults :: !(Maybe (Textual Int32))

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

6767

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

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs+2−2

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

5555 "adunits" :>

5656 QueryParam "includeInactive" Bool :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

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

6060

6161-- | List all ad units in the specified custom channel.

@@ -66,7 +66,7 @@ data CustomChannelsAdUnitsList = CustomChannelsAdUnitsList

6666 , _ccaulCustomChannelId :: !Text

6767 , _ccaulAdClientId :: !Text

6868 , _ccaulPageToken :: !(Maybe Text)

69− , _ccaulMaxResults :: !(Maybe (JSONText Int32))

69+ , _ccaulMaxResults :: !(Maybe (Textual Int32))

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

7171

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

gogol-adsense/gen/Network/Google/Resource/AdSense/CustomChannels/List.hs+2−2

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

5151 Capture "adClientId" Text :>

5252 "customchannels" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :>

5656 Get '[JSON] CustomChannels

5757

@@ -62,7 +62,7 @@ type CustomChannelsListResource =

6262data CustomChannelsList = CustomChannelsList

6363 { _cclAdClientId :: !Text

6464 , _cclPageToken :: !(Maybe Text)

65− , _cclMaxResults :: !(Maybe (JSONText Int32))

65+ , _cclMaxResults :: !(Maybe (Textual Int32))

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

6767

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+6−6

@@ -67,9 +67,9 @@ type ReportsGenerateResource =

6767 QueryParam "currency" Text :>

6868 QueryParams "sort" Text :>

6969 QueryParams "filter" Text :>

70− QueryParam "startIndex" (JSONText Int32) :>

70+ QueryParam "startIndex" (Textual Int32) :>

7171 QueryParam "useTimezoneReporting" Bool :>

72− QueryParam "maxResults" (JSONText Int32) :>

72+ QueryParam "maxResults" (Textual Int32) :>

7373 QueryParam "alt" AltJSON :>

7474 Get '[JSON] AdsenseReportsGenerateResponse

7575 :<|>

@@ -85,9 +85,9 @@ type ReportsGenerateResource =

8585 QueryParam "currency" Text :>

8686 QueryParams "sort" Text :>

8787 QueryParams "filter" Text :>

88− QueryParam "startIndex" (JSONText Int32) :>

88+ QueryParam "startIndex" (Textual Int32) :>

8989 QueryParam "useTimezoneReporting" Bool :>

90− QueryParam "maxResults" (JSONText Int32) :>

90+ QueryParam "maxResults" (Textual Int32) :>

9191 QueryParam "alt" AltMedia :>

9292 Get '[OctetStream] Stream

9393

@@ -106,9 +106,9 @@ data ReportsGenerate = ReportsGenerate

106106 , _rgCurrency :: !(Maybe Text)

107107 , _rgSort :: !(Maybe [Text])

108108 , _rgFilter :: !(Maybe [Text])

109− , _rgStartIndex :: !(Maybe (JSONText Int32))

109+ , _rgStartIndex :: !(Maybe (Textual Int32))

110110 , _rgUseTimezoneReporting :: !(Maybe Bool)

111− , _rgMaxResults :: !(Maybe (JSONText Int32))

111+ , _rgMaxResults :: !(Maybe (Textual Int32))

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

113113

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs+4−4

@@ -51,8 +51,8 @@ type ReportsSavedGenerateResource =

5151 "reports" :>

5252 Capture "savedReportId" Text :>

5353 QueryParam "locale" Text :>

54− QueryParam "startIndex" (JSONText Int32) :>

55− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "startIndex" (Textual Int32) :>

55+ QueryParam "maxResults" (Textual Int32) :>

5656 QueryParam "alt" AltJSON :>

5757 Get '[JSON] AdsenseReportsGenerateResponse

5858

@@ -63,8 +63,8 @@ type ReportsSavedGenerateResource =

6363data ReportsSavedGenerate = ReportsSavedGenerate

6464 { _rsgLocale :: !(Maybe Text)

6565 , _rsgSavedReportId :: !Text

66− , _rsgStartIndex :: !(Maybe (JSONText Int32))

67− , _rsgMaxResults :: !(Maybe (JSONText Int32))

66+ , _rsgStartIndex :: !(Maybe (Textual Int32))

67+ , _rsgMaxResults :: !(Maybe (Textual Int32))

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

6969

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs+2−2

@@ -48,7 +48,7 @@ type ReportsSavedListResource =

4848 "reports" :>

4949 "saved" :>

5050 QueryParam "pageToken" Text :>

51− QueryParam "maxResults" (JSONText Int32) :>

51+ QueryParam "maxResults" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] SavedReports

5353

5454-- | List all saved reports in this AdSense account.

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

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

5757data ReportsSavedList = ReportsSavedList

5858 { _rslPageToken :: !(Maybe Text)

59− , _rslMaxResults :: !(Maybe (JSONText Int32))

59+ , _rslMaxResults :: !(Maybe (Textual Int32))

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

6161

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

gogol-adsense/gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs+2−2

@@ -47,7 +47,7 @@ type SavedadstylesListResource =

4747 "v1.4" :>

4848 "savedadstyles" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Int32) :>

50+ QueryParam "maxResults" (Textual Int32) :>

5151 QueryParam "alt" AltJSON :> Get '[JSON] SavedAdStyles

5252

5353-- | List all saved ad styles in the user\'s account.

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

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

5656data SavedadstylesList = SavedadstylesList

5757 { _slPageToken :: !(Maybe Text)

58− , _slMaxResults :: !(Maybe (JSONText Int32))

58+ , _slMaxResults :: !(Maybe (Textual Int32))

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

6060

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

gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+2−2

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

5151 Capture "adClientId" Text :>

5252 "urlchannels" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] URLChannels

5656

5757-- | List all URL channels in the specified ad client for this AdSense

@@ -61,7 +61,7 @@ type URLChannelsListResource =

6161data URLChannelsList = URLChannelsList

6262 { _uclAdClientId :: !Text

6363 , _uclPageToken :: !(Maybe Text)

64− , _uclMaxResults :: !(Maybe (JSONText Int32))

64+ , _uclMaxResults :: !(Maybe (Textual Int32))

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

6666

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

gogol-affiliates/gen/Network/Google/Affiliates/Types/Product.hs+28−28

@@ -33,13 +33,13 @@ data Event = Event

3333 , _eMemberId :: !(Maybe Text)

3434 , _eKind :: !Text

3535 , _eNetworkFee :: !(Maybe Money)

36− , _eAdvertiserId :: !(Maybe (JSONText Int64))

36+ , _eAdvertiserId :: !(Maybe (Textual Int64))

3737 , _eEventDate :: !(Maybe DateTime')

3838 , _eProducts :: !(Maybe [EventProductsItem])

3939 , _ePublisherFee :: !(Maybe Money)

4040 , _eType :: !(Maybe Text)

4141 , _eOrderId :: !(Maybe Text)

42− , _ePublisherId :: !(Maybe (JSONText Int64))

42+ , _ePublisherId :: !(Maybe (Textual Int64))

4343 , _eEarnings :: !(Maybe Money)

4444 , _ePublisherName :: !(Maybe Text)

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

@@ -259,7 +259,7 @@ instance ToJSON Event where

259259--

260260-- /See:/ 'money' smart constructor.

261261data Money = Money

262− { _mAmount :: !(Maybe (JSONText Double))

262+ { _mAmount :: !(Maybe (Textual Double))

263263 , _mCurrencyCode :: !(Maybe Text)

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

265265

@@ -313,7 +313,7 @@ data Link = Link

313313 , _lClickTrackingURL :: !(Maybe Text)

314314 , _lCreateDate :: !(Maybe DateTime')

315315 , _lKind :: !Text

316− , _lAdvertiserId :: !(Maybe (JSONText Int64))

316+ , _lAdvertiserId :: !(Maybe (Textual Int64))

317317 , _lEndDate :: !(Maybe DateTime')

318318 , _lImageAltText :: !(Maybe Text)

319319 , _lPromotionType :: !(Maybe Text)

@@ -323,7 +323,7 @@ data Link = Link

323323 , _lImpressionTrackingURL :: !(Maybe Text)

324324 , _lSpecialOffers :: !(Maybe LinkSpecialOffers)

325325 , _lEpcSevenDayAverage :: !(Maybe Money)

326− , _lId :: !(Maybe (JSONText Int64))

326+ , _lId :: !(Maybe (Textual Int64))

327327 , _lEpcNinetyDayAverage :: !(Maybe Money)

328328 , _lLinkType :: !(Maybe Text)

329329 , _lIsActive :: !(Maybe Bool)

@@ -628,9 +628,9 @@ instance ToJSON CcOffers where

628628-- /See:/ 'ccOfferDefaultFeesItem' smart constructor.

629629data CcOfferDefaultFeesItem = CcOfferDefaultFeesItem

630630 { _codfiRateType :: !(Maybe Text)

631− , _codfiMinRate :: !(Maybe (JSONText Double))

631+ , _codfiMinRate :: !(Maybe (Textual Double))

632632 , _codfiCategory :: !(Maybe Text)

633− , _codfiMaxRate :: !(Maybe (JSONText Double))

633+ , _codfiMaxRate :: !(Maybe (Textual Double))

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

635635

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

@@ -708,7 +708,7 @@ data Report = Report

708708 , _rKind :: !Text

709709 , _rStartDate :: !(Maybe Text)

710710 , _rRows :: !(Maybe [[JSONValue]])

711− , _rMatchingRowCount :: !(Maybe (JSONText Int64))

711+ , _rMatchingRowCount :: !(Maybe (Textual Int64))

712712 , _rColumnNames :: !(Maybe [Text])

713713 , _rType :: !(Maybe Text)

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

@@ -881,7 +881,7 @@ instance ToJSON Advertisers where

881881data EventProductsItem = EventProductsItem

882882 { _epiSKUName :: !(Maybe Text)

883883 , _epiNetworkFee :: !(Maybe Money)

884− , _epiQuantity :: !(Maybe (JSONText Int64))

884+ , _epiQuantity :: !(Maybe (Textual Int64))

885885 , _epiCategoryName :: !(Maybe Text)

886886 , _epiCategoryId :: !(Maybe Text)

887887 , _epiSKU :: !(Maybe Text)

@@ -1007,7 +1007,7 @@ instance ToJSON EventProductsItem where

10071007--

10081008-- /See:/ 'ccOfferBonusRewardsItem' smart constructor.

10091009data CcOfferBonusRewardsItem = CcOfferBonusRewardsItem

1010− { _cobriAmount :: !(Maybe (JSONText Double))

1010+ { _cobriAmount :: !(Maybe (Textual Double))

10111011 , _cobriDetails :: !(Maybe Text)

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

10131013

@@ -1118,7 +1118,7 @@ instance ToJSON Events where

11181118-- /See:/ 'linkSpecialOffers' smart constructor.

11191119data LinkSpecialOffers = LinkSpecialOffers

11201120 { _lsoFreeShippingMin :: !(Maybe Money)

1121− , _lsoPercentOff :: !(Maybe (JSONText Double))

1121+ , _lsoPercentOff :: !(Maybe (Textual Double))

11221122 , _lsoPriceCut :: !(Maybe Money)

11231123 , _lsoPriceCutMin :: !(Maybe Money)

11241124 , _lsoPercentOffMin :: !(Maybe Money)

@@ -1308,16 +1308,16 @@ data Advertiser = Advertiser

13081308 , _advSiteURL :: !(Maybe Text)

13091309 , _advPayoutRank :: !(Maybe Text)

13101310 , _advJoinDate :: !(Maybe DateTime')

1311− , _advDefaultLinkId :: !(Maybe (JSONText Int64))

1311+ , _advDefaultLinkId :: !(Maybe (Textual Int64))

13121312 , _advRedirectDomains :: !(Maybe [Text])

13131313 , _advName :: !(Maybe Text)

13141314 , _advProductFeedsEnabled :: !(Maybe Bool)

1315− , _advMerchantCenterIds :: !(Maybe [JSONText Int64])

1315+ , _advMerchantCenterIds :: !(Maybe [Textual Int64])

13161316 , _advEpcSevenDayAverage :: !(Maybe Money)

13171317 , _advItem :: !(Maybe Advertiser)

1318− , _advId :: !(Maybe (JSONText Int64))

1318+ , _advId :: !(Maybe (Textual Int64))

13191319 , _advEpcNinetyDayAverage :: !(Maybe Money)

1320− , _advCommissionDuration :: !(Maybe (JSONText Int32))

1320+ , _advCommissionDuration :: !(Maybe (Textual Int32))

13211321 , _advDescription :: !(Maybe Text)

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

13231323

@@ -1597,13 +1597,13 @@ data CcOffer = CcOffer

15971597 , _cReturnedPaymentFee :: !(Maybe Text)

15981598 , _cAgeMinimumDetails :: !(Maybe Text)

15991599 , _cVariableRatesUpdateFrequency :: !(Maybe Text)

1600− , _cCreditLimitMin :: !(Maybe (JSONText Double))

1600+ , _cCreditLimitMin :: !(Maybe (Textual Double))

16011601 , _cTravelInsurance :: !(Maybe Text)

16021602 , _cApprovedCategories :: !(Maybe [Text])

16031603 , _cAnnualFeeDisplay :: !(Maybe Text)

16041604 , _cOverLimitFee :: !(Maybe Text)

1605− , _cMaxPurchaseRate :: !(Maybe (JSONText Double))

1606− , _cAgeMinimum :: !(Maybe (JSONText Double))

1605+ , _cMaxPurchaseRate :: !(Maybe (Textual Double))

1606+ , _cAgeMinimum :: !(Maybe (Textual Double))

16071607 , _cVariableRatesLastUpdated :: !(Maybe Text)

16081608 , _cIntroCashAdvanceTerms :: !(Maybe Text)

16091609 , _cIssuerWebsite :: !(Maybe Text)

@@ -1622,11 +1622,11 @@ data CcOffer = CcOffer

16221622 , _cRewards :: !(Maybe [CcOfferRewardsItem])

16231623 , _cCardType :: !(Maybe Text)

16241624 , _cImageURL :: !(Maybe Text)

1625− , _cCreditLimitMax :: !(Maybe (JSONText Double))

1625+ , _cCreditLimitMax :: !(Maybe (Textual Double))

16261626 , _cLandingPageURL :: !(Maybe Text)

1627− , _cAnnualFee :: !(Maybe (JSONText Double))

1627+ , _cAnnualFee :: !(Maybe (Textual Double))

16281628 , _cRewardsExpire :: !(Maybe Bool)

1629− , _cFirstYearAnnualFee :: !(Maybe (JSONText Double))

1629+ , _cFirstYearAnnualFee :: !(Maybe (Textual Double))

16301630 , _cCarRentalInsurance :: !(Maybe Text)

16311631 , _cPurchaseRateAdditionalDetails :: !(Maybe Text)

16321632 , _cOfferId :: !(Maybe Text)

@@ -1638,11 +1638,11 @@ data CcOffer = CcOffer

16381638 , _cCardBenefits :: !(Maybe [Text])

16391639 , _cIssuer :: !(Maybe Text)

16401640 , _cCardName :: !(Maybe Text)

1641− , _cMinPurchaseRate :: !(Maybe (JSONText Double))

1641+ , _cMinPurchaseRate :: !(Maybe (Textual Double))

16421642 , _cFraudLiability :: !(Maybe Text)

16431643 , _cForeignCurrencyTransactionFee :: !(Maybe Text)

16441644 , _cExtendedWarranty :: !(Maybe Text)

1645− , _cAnnualRewardMaximum :: !(Maybe (JSONText Double))

1645+ , _cAnnualRewardMaximum :: !(Maybe (Textual Double))

16461646 , _cIssuerId :: !(Maybe Text)

16471647 , _cIntroBalanceTransferTerms :: !(Maybe Text)

16481648 , _cDefaultFees :: !(Maybe [CcOfferDefaultFeesItem])

@@ -2493,7 +2493,7 @@ data Publisher = Publisher

24932493 , _pubName :: !(Maybe Text)

24942494 , _pubEpcSevenDayAverage :: !(Maybe Money)

24952495 , _pubItem :: !(Maybe Publisher)

2496− , _pubId :: !(Maybe (JSONText Int64))

2496+ , _pubId :: !(Maybe (Textual Int64))

24972497 , _pubEpcNinetyDayAverage :: !(Maybe Money)

24982498 , _pubSites :: !(Maybe [Text])

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

@@ -2646,12 +2646,12 @@ instance ToJSON Publisher where

26462646--

26472647-- /See:/ 'ccOfferRewardsItem' smart constructor.

26482648data CcOfferRewardsItem = CcOfferRewardsItem

2649− { _coriAmount :: !(Maybe (JSONText Double))

2650− , _coriExpirationMonths :: !(Maybe (JSONText Double))

2649+ { _coriAmount :: !(Maybe (Textual Double))

2650+ , _coriExpirationMonths :: !(Maybe (Textual Double))

26512651 , _coriCategory :: !(Maybe Text)

26522652 , _coriAdditionalDetails :: !(Maybe Text)

2653− , _coriMaxRewardTier :: !(Maybe (JSONText Double))

2654− , _coriMinRewardTier :: !(Maybe (JSONText Double))

2653+ , _coriMaxRewardTier :: !(Maybe (Textual Double))

2654+ , _coriMinRewardTier :: !(Maybe (Textual Double))

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

26562656

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Advertisers/List.hs+8−8

@@ -59,12 +59,12 @@ type AdvertisersListResource =

5959 QueryParam "relationshipStatus"

6060 AdvertisersListRelationshipStatus

6161 :>

62− QueryParam "minSevenDayEpc" (JSONText Double) :>

63− QueryParam "minNinetyDayEpc" (JSONText Double) :>

64− QueryParam "minPayoutRank" (JSONText Int32) :>

62+ QueryParam "minSevenDayEpc" (Textual Double) :>

63+ QueryParam "minNinetyDayEpc" (Textual Double) :>

64+ QueryParam "minPayoutRank" (Textual Int32) :>

6565 QueryParam "advertiserCategory" Text :>

6666 QueryParam "pageToken" Text :>

67− QueryParam "maxResults" (JSONText Word32) :>

67+ QueryParam "maxResults" (Textual Word32) :>

6868 QueryParam "alt" AltJSON :> Get '[JSON] Advertisers

6969

7070-- | Retrieves data about all advertisers that the requesting

@@ -73,14 +73,14 @@ type AdvertisersListResource =

7373-- /See:/ 'advertisersList' smart constructor.

7474data AdvertisersList = AdvertisersList

7575 { _alRelationshipStatus :: !(Maybe AdvertisersListRelationshipStatus)

76− , _alMinSevenDayEpc :: !(Maybe (JSONText Double))

76+ , _alMinSevenDayEpc :: !(Maybe (Textual Double))

7777 , _alRoleId :: !Text

78− , _alMinNinetyDayEpc :: !(Maybe (JSONText Double))

78+ , _alMinNinetyDayEpc :: !(Maybe (Textual Double))

7979 , _alRole :: !AdvertisersListRole

80− , _alMinPayoutRank :: !(Maybe (JSONText Int32))

80+ , _alMinPayoutRank :: !(Maybe (Textual Int32))

8181 , _alAdvertiserCategory :: !(Maybe Text)

8282 , _alPageToken :: !(Maybe Text)

83− , _alMaxResults :: !(Maybe (JSONText Word32))

83+ , _alMaxResults :: !(Maybe (Textual Word32))

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

8585

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Events/List.hs+2−2

@@ -80,7 +80,7 @@ type EventsListResource =

8080 QueryParam "publisherId" Text :>

8181 QueryParam "productCategory" Text :>

8282 QueryParam "maxResults"

83− (JSONText Word32)

83+ (Textual Word32)

8484 :>

8585 QueryParam "alt" AltJSON :>

8686 Get '[JSON] Events

@@ -106,7 +106,7 @@ data EventsList = EventsList

106106 , _elOrderId :: !(Maybe Text)

107107 , _elPublisherId :: !(Maybe Text)

108108 , _elProductCategory :: !(Maybe Text)

109− , _elMaxResults :: !(Maybe (JSONText Word32))

109+ , _elMaxResults :: !(Maybe (Textual Word32))

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

111111

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Links/Get.hs+2−2

@@ -52,7 +52,7 @@ type LinksGetResource =

5252 Capture "role" LinksGetRole :>

5353 Capture "roleId" Text :>

5454 "link" :>

55− Capture "linkId" (JSONText Int64) :>

55+ Capture "linkId" (Textual Int64) :>

5656 QueryParam "alt" AltJSON :> Get '[JSON] Link

5757

5858-- | Retrieves data about a single link if the requesting

@@ -64,7 +64,7 @@ type LinksGetResource =

6464data LinksGet = LinksGet

6565 { _lgRoleId :: !Text

6666 , _lgRole :: !LinksGetRole

67− , _lgLinkId :: !(JSONText Int64)

67+ , _lgLinkId :: !(Textual Int64)

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

6969

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Links/List.hs+4−4

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

6767 QueryParam "relationshipStatus"

6868 LinksListRelationshipStatus

6969 :>

70− QueryParams "advertiserId" (JSONText Int64) :>

70+ QueryParams "advertiserId" (Textual Int64) :>

7171 QueryParam "searchText" Text :>

7272 QueryParams "promotionType" LinksListPromotionType :>

7373 QueryParam "createDateMin" Text :>

@@ -75,7 +75,7 @@ type LinksListResource =

7575 QueryParam "pageToken" Text :>

7676 QueryParam "startDateMax" Text :>

7777 QueryParam "startDateMin" Text :>

78− QueryParam "maxResults" (JSONText Word32)

78+ QueryParam "maxResults" (Textual Word32)

7979 :>

8080 QueryParam "alt" AltJSON :>

8181 Get '[JSON] Links

@@ -88,7 +88,7 @@ data LinksList = LinksList

8888 , _llAuthorship :: !(Maybe LinksListAuthorship)

8989 , _llAssetSize :: !(Maybe [Text])

9090 , _llRelationshipStatus :: !(Maybe LinksListRelationshipStatus)

91− , _llAdvertiserId :: !(Maybe [JSONText Int64])

91+ , _llAdvertiserId :: !(Maybe [Textual Int64])

9292 , _llSearchText :: !(Maybe Text)

9393 , _llPromotionType :: !(Maybe [LinksListPromotionType])

9494 , _llRoleId :: !Text

@@ -98,7 +98,7 @@ data LinksList = LinksList

9898 , _llPageToken :: !(Maybe Text)

9999 , _llStartDateMax :: !(Maybe Text)

100100 , _llStartDateMin :: !(Maybe Text)

101− , _llMaxResults :: !(Maybe (JSONText Word32))

101+ , _llMaxResults :: !(Maybe (Textual Word32))

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

103103

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Publishers/List.hs+8−8

@@ -59,12 +59,12 @@ type PublishersListResource =

5959 QueryParam "relationshipStatus"

6060 PublishersListRelationshipStatus

6161 :>

62− QueryParam "minSevenDayEpc" (JSONText Double) :>

63− QueryParam "minNinetyDayEpc" (JSONText Double) :>

64− QueryParam "minPayoutRank" (JSONText Int32) :>

62+ QueryParam "minSevenDayEpc" (Textual Double) :>

63+ QueryParam "minNinetyDayEpc" (Textual Double) :>

64+ QueryParam "minPayoutRank" (Textual Int32) :>

6565 QueryParam "pageToken" Text :>

6666 QueryParam "publisherCategory" Text :>

67− QueryParam "maxResults" (JSONText Word32) :>

67+ QueryParam "maxResults" (Textual Word32) :>

6868 QueryParam "alt" AltJSON :> Get '[JSON] Publishers

6969

7070-- | Retrieves data about all publishers that the requesting

@@ -73,14 +73,14 @@ type PublishersListResource =

7373-- /See:/ 'publishersList' smart constructor.

7474data PublishersList = PublishersList

7575 { _plRelationshipStatus :: !(Maybe PublishersListRelationshipStatus)

76− , _plMinSevenDayEpc :: !(Maybe (JSONText Double))

76+ , _plMinSevenDayEpc :: !(Maybe (Textual Double))

7777 , _plRoleId :: !Text

78− , _plMinNinetyDayEpc :: !(Maybe (JSONText Double))

78+ , _plMinNinetyDayEpc :: !(Maybe (Textual Double))

7979 , _plRole :: !PublishersListRole

80− , _plMinPayoutRank :: !(Maybe (JSONText Int32))

80+ , _plMinPayoutRank :: !(Maybe (Textual Int32))

8181 , _plPageToken :: !(Maybe Text)

8282 , _plPublisherCategory :: !(Maybe Text)

83− , _plMaxResults :: !(Maybe (JSONText Word32))

83+ , _plMaxResults :: !(Maybe (Textual Word32))

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

8585

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

gogol-affiliates/gen/Network/Google/Resource/GAN/Reports/Get.hs+4−5

@@ -70,9 +70,8 @@ type ReportsGetResource =

7070 QueryParams "linkId" Text :>

7171 QueryParams "orderId" Text :>

7272 QueryParams "publisherId" Text :>

73− QueryParam "startIndex" (JSONText Word32) :>

74− QueryParam "maxResults" (JSONText Word32)

75− :>

73+ QueryParam "startIndex" (Textual Word32) :>

74+ QueryParam "maxResults" (Textual Word32) :>

7675 QueryParam "alt" AltJSON :>

7776 Get '[JSON] Report

7877

@@ -92,8 +91,8 @@ data ReportsGet = ReportsGet

9291 , _rgOrderId :: !(Maybe [Text])

9392 , _rgPublisherId :: !(Maybe [Text])

9493 , _rgReportType :: !ReportsGetReportType

95− , _rgStartIndex :: !(Maybe (JSONText Word32))

96− , _rgMaxResults :: !(Maybe (JSONText Word32))

94+ , _rgStartIndex :: !(Maybe (Textual Word32))

95+ , _rgMaxResults :: !(Maybe (Textual Word32))

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

9897

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

gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+85−85

@@ -28,12 +28,12 @@ import Network.Google.Prelude

2828-- /See:/ 'unSampledReports' smart constructor.

2929data UnSampledReports = UnSampledReports

3030 { _usrNextLink :: !(Maybe Text)

31− , _usrItemsPerPage :: !(Maybe (JSONText Int32))

31+ , _usrItemsPerPage :: !(Maybe (Textual Int32))

3232 , _usrKind :: !Text

3333 , _usrUsername :: !(Maybe Text)

3434 , _usrItems :: !(Maybe [UnSampledReport])

35− , _usrTotalResults :: !(Maybe (JSONText Int32))

36− , _usrStartIndex :: !(Maybe (JSONText Int32))

35+ , _usrTotalResults :: !(Maybe (Textual Int32))

36+ , _usrStartIndex :: !(Maybe (Textual Int32))

3737 , _usrPreviousLink :: !(Maybe Text)

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

3939

@@ -154,7 +154,7 @@ instance ToJSON UnSampledReports where

154154data GoalURLDestinationDetailsStepsItem = GoalURLDestinationDetailsStepsItem

155155 { _guddsiURL :: !(Maybe Text)

156156 , _guddsiName :: !(Maybe Text)

157− , _guddsiNumber :: !(Maybe (JSONText Int32))

157+ , _guddsiNumber :: !(Maybe (Textual Int32))

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

159159

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

@@ -220,8 +220,8 @@ data GaDataQuery = GaDataQuery

220220 , _gdqEndDate :: !(Maybe Text)

221221 , _gdqSort :: !(Maybe [Text])

222222 , _gdqDimensions :: !(Maybe Text)

223− , _gdqStartIndex :: !(Maybe (JSONText Int32))

224− , _gdqMaxResults :: !(Maybe (JSONText Int32))

223+ , _gdqStartIndex :: !(Maybe (Textual Int32))

224+ , _gdqMaxResults :: !(Maybe (Textual Int32))

225225 , _gdqSegment :: !(Maybe Text)

226226 , _gdqStartDate :: !(Maybe Text)

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

@@ -1023,7 +1023,7 @@ instance ToJSON

10231023--

10241024-- /See:/ 'filterExpression' smart constructor.

10251025data FilterExpression = FilterExpression

1026− { _feFieldIndex :: !(Maybe (JSONText Int32))

1026+ { _feFieldIndex :: !(Maybe (Textual Int32))

10271027 , _feField :: !(Maybe Text)

10281028 , _feKind :: !Text

10291029 , _feMatchType :: !(Maybe Text)

@@ -1252,12 +1252,12 @@ instance ToJSON ProFileRef where

12521252-- /See:/ 'accounts' smart constructor.

12531253data Accounts = Accounts

12541254 { _aNextLink :: !(Maybe Text)

1255− , _aItemsPerPage :: !(Maybe (JSONText Int32))

1255+ , _aItemsPerPage :: !(Maybe (Textual Int32))

12561256 , _aKind :: !Text

12571257 , _aUsername :: !(Maybe Text)

12581258 , _aItems :: !(Maybe [Account])

1259− , _aTotalResults :: !(Maybe (JSONText Int32))

1260− , _aStartIndex :: !(Maybe (JSONText Int32))

1259+ , _aTotalResults :: !(Maybe (Textual Int32))

1260+ , _aStartIndex :: !(Maybe (Textual Int32))

12611261 , _aPreviousLink :: !(Maybe Text)

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

12631263

@@ -1379,12 +1379,12 @@ instance ToJSON Accounts where

13791379-- /See:/ 'experiments' smart constructor.

13801380data Experiments = Experiments

13811381 { _eNextLink :: !(Maybe Text)

1382− , _eItemsPerPage :: !(Maybe (JSONText Int32))

1382+ , _eItemsPerPage :: !(Maybe (Textual Int32))

13831383 , _eKind :: !Text

13841384 , _eUsername :: !(Maybe Text)

13851385 , _eItems :: !(Maybe [Experiment])

1386− , _eTotalResults :: !(Maybe (JSONText Int32))

1387− , _eStartIndex :: !(Maybe (JSONText Int32))

1386+ , _eTotalResults :: !(Maybe (Textual Int32))

1387+ , _eStartIndex :: !(Maybe (Textual Int32))

13881388 , _ePreviousLink :: !(Maybe Text)

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

13901390

@@ -1690,12 +1690,12 @@ instance ToJSON McfDataProFileInfo where

16901690-- /See:/ 'customDataSources' smart constructor.

16911691data CustomDataSources = CustomDataSources

16921692 { _cdsNextLink :: !(Maybe Text)

1693− , _cdsItemsPerPage :: !(Maybe (JSONText Int32))

1693+ , _cdsItemsPerPage :: !(Maybe (Textual Int32))

16941694 , _cdsKind :: !Text

16951695 , _cdsUsername :: !(Maybe Text)

16961696 , _cdsItems :: !(Maybe [CustomDataSource])

1697− , _cdsTotalResults :: !(Maybe (JSONText Int32))

1698− , _cdsStartIndex :: !(Maybe (JSONText Int32))

1697+ , _cdsTotalResults :: !(Maybe (Textual Int32))

1698+ , _cdsStartIndex :: !(Maybe (Textual Int32))

16991699 , _cdsPreviousLink :: !(Maybe Text)

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

17011701

@@ -1863,17 +1863,17 @@ instance ToJSON WebPropertyChildLink where

18631863-- /See:/ 'mcfData' smart constructor.

18641864data McfData = McfData

18651865 { _mdNextLink :: !(Maybe Text)

1866− , _mdSampleSpace :: !(Maybe (JSONText Int64))

1867− , _mdItemsPerPage :: !(Maybe (JSONText Int32))

1866+ , _mdSampleSpace :: !(Maybe (Textual Int64))

1867+ , _mdItemsPerPage :: !(Maybe (Textual Int32))

18681868 , _mdProFileInfo :: !(Maybe McfDataProFileInfo)

18691869 , _mdKind :: !Text

1870− , _mdSampleSize :: !(Maybe (JSONText Int64))

1870+ , _mdSampleSize :: !(Maybe (Textual Int64))

18711871 , _mdRows :: !(Maybe [[McfDataRowsItemItem]])

18721872 , _mdSelfLink :: !(Maybe Text)

18731873 , _mdQuery :: !(Maybe McfDataQuery)

18741874 , _mdColumnHeaders :: !(Maybe [McfDataColumnHeadersItem])

18751875 , _mdId :: !(Maybe Text)

1876− , _mdTotalResults :: !(Maybe (JSONText Int32))

1876+ , _mdTotalResults :: !(Maybe (Textual Int32))

18771877 , _mdContainsSampledData :: !(Maybe Bool)

18781878 , _mdTotalsForAllResults :: !(Maybe McfDataTotalsForAllResults)

18791879 , _mdPreviousLink :: !(Maybe Text)

@@ -2130,7 +2130,7 @@ instance ToJSON UserRef where

21302130--

21312131-- /See:/ 'goalVisitNumPagesDetails' smart constructor.

21322132data GoalVisitNumPagesDetails = GoalVisitNumPagesDetails

2133− { _gvnpdComparisonValue :: !(Maybe (JSONText Int64))

2133+ { _gvnpdComparisonValue :: !(Maybe (Textual Int64))

21342134 , _gvnpdComparisonType :: !(Maybe Text)

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

21362136

@@ -2309,11 +2309,11 @@ instance ToJSON AccountRef where

23092309-- /See:/ 'entityAdWordsLinks' smart constructor.

23102310data EntityAdWordsLinks = EntityAdWordsLinks

23112311 { _eawlNextLink :: !(Maybe Text)

2312− , _eawlItemsPerPage :: !(Maybe (JSONText Int32))

2312+ , _eawlItemsPerPage :: !(Maybe (Textual Int32))

23132313 , _eawlKind :: !Text

23142314 , _eawlItems :: !(Maybe [EntityAdWordsLink])

2315− , _eawlTotalResults :: !(Maybe (JSONText Int32))

2316− , _eawlStartIndex :: !(Maybe (JSONText Int32))

2315+ , _eawlTotalResults :: !(Maybe (Textual Int32))

2316+ , _eawlStartIndex :: !(Maybe (Textual Int32))

23172317 , _eawlPreviousLink :: !(Maybe Text)

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

23192319

@@ -2426,12 +2426,12 @@ instance ToJSON EntityAdWordsLinks where

24262426-- /See:/ 'proFiles' smart constructor.

24272427data ProFiles = ProFiles

24282428 { _pfNextLink :: !(Maybe Text)

2429− , _pfItemsPerPage :: !(Maybe (JSONText Int32))

2429+ , _pfItemsPerPage :: !(Maybe (Textual Int32))

24302430 , _pfKind :: !Text

24312431 , _pfUsername :: !(Maybe Text)

24322432 , _pfItems :: !(Maybe [ProFile])

2433− , _pfTotalResults :: !(Maybe (JSONText Int32))

2434− , _pfStartIndex :: !(Maybe (JSONText Int32))

2433+ , _pfTotalResults :: !(Maybe (Textual Int32))

2434+ , _pfStartIndex :: !(Maybe (Textual Int32))

24352435 , _pfPreviousLink :: !(Maybe Text)

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

24372437

@@ -2699,7 +2699,7 @@ instance ToJSON EntityAdWordsLink where

26992699--

27002700-- /See:/ 'filterSearchAndReplaceDetails' smart constructor.

27012701data FilterSearchAndReplaceDetails = FilterSearchAndReplaceDetails

2702− { _fsardFieldIndex :: !(Maybe (JSONText Int32))

2702+ { _fsardFieldIndex :: !(Maybe (Textual Int32))

27032703 , _fsardField :: !(Maybe Text)

27042704 , _fsardSearchString :: !(Maybe Text)

27052705 , _fsardReplaceString :: !(Maybe Text)

@@ -3141,12 +3141,12 @@ instance ToJSON ProFile where

31413141-- /See:/ 'accountSummaries' smart constructor.

31423142data AccountSummaries = AccountSummaries

31433143 { _asNextLink :: !(Maybe Text)

3144− , _asItemsPerPage :: !(Maybe (JSONText Int32))

3144+ , _asItemsPerPage :: !(Maybe (Textual Int32))

31453145 , _asKind :: !Text

31463146 , _asUsername :: !(Maybe Text)

31473147 , _asItems :: !(Maybe [AccountSummary])

3148− , _asTotalResults :: !(Maybe (JSONText Int32))

3149− , _asStartIndex :: !(Maybe (JSONText Int32))

3148+ , _asTotalResults :: !(Maybe (Textual Int32))

3149+ , _asStartIndex :: !(Maybe (Textual Int32))

31503150 , _asPreviousLink :: !(Maybe Text)

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

31523152

@@ -3423,12 +3423,12 @@ instance ToJSON WebPropertySummary where

34233423-- /See:/ 'filters' smart constructor.

34243424data Filters = Filters

34253425 { _fNextLink :: !(Maybe Text)

3426− , _fItemsPerPage :: !(Maybe (JSONText Int32))

3426+ , _fItemsPerPage :: !(Maybe (Textual Int32))

34273427 , _fKind :: !Text

34283428 , _fUsername :: !(Maybe Text)

34293429 , _fItems :: !(Maybe [Filter])

3430− , _fTotalResults :: !(Maybe (JSONText Int32))

3431− , _fStartIndex :: !(Maybe (JSONText Int32))

3430+ , _fTotalResults :: !(Maybe (Textual Int32))

3431+ , _fStartIndex :: !(Maybe (Textual Int32))

34323432 , _fPreviousLink :: !(Maybe Text)

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

34343434

@@ -3547,17 +3547,17 @@ instance ToJSON Filters where

35473547-- /See:/ 'gaData' smart constructor.

35483548data GaData = GaData

35493549 { _gdNextLink :: !(Maybe Text)

3550− , _gdSampleSpace :: !(Maybe (JSONText Int64))

3551− , _gdItemsPerPage :: !(Maybe (JSONText Int32))

3550+ , _gdSampleSpace :: !(Maybe (Textual Int64))

3551+ , _gdItemsPerPage :: !(Maybe (Textual Int32))

35523552 , _gdProFileInfo :: !(Maybe GaDataProFileInfo)

35533553 , _gdKind :: !Text

3554− , _gdSampleSize :: !(Maybe (JSONText Int64))

3554+ , _gdSampleSize :: !(Maybe (Textual Int64))

35553555 , _gdRows :: !(Maybe [[Text]])

35563556 , _gdSelfLink :: !(Maybe Text)

35573557 , _gdQuery :: !(Maybe GaDataQuery)

35583558 , _gdColumnHeaders :: !(Maybe [GaDataColumnHeadersItem])

35593559 , _gdId :: !(Maybe Text)

3560− , _gdTotalResults :: !(Maybe (JSONText Int32))

3560+ , _gdTotalResults :: !(Maybe (Textual Int32))

35613561 , _gdDataTable :: !(Maybe GaDataDataTable)

35623562 , _gdContainsSampledData :: !(Maybe Bool)

35633563 , _gdTotalsForAllResults :: !(Maybe GaDataTotalsForAllResults)

@@ -4093,12 +4093,12 @@ instance ToJSON WebPropertyRef where

40934093-- /See:/ 'goals' smart constructor.

40944094data Goals = Goals

40954095 { _gNextLink :: !(Maybe Text)

4096− , _gItemsPerPage :: !(Maybe (JSONText Int32))

4096+ , _gItemsPerPage :: !(Maybe (Textual Int32))

40974097 , _gKind :: !Text

40984098 , _gUsername :: !(Maybe Text)

40994099 , _gItems :: !(Maybe [Goal])

4100− , _gTotalResults :: !(Maybe (JSONText Int32))

4101− , _gStartIndex :: !(Maybe (JSONText Int32))

4100+ , _gTotalResults :: !(Maybe (Textual Int32))

4101+ , _gStartIndex :: !(Maybe (Textual Int32))

41024102 , _gPreviousLink :: !(Maybe Text)

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

41044104

@@ -4496,9 +4496,9 @@ data Experiment = Experiment

44964496 , _expKind :: !Text

44974497 , _expCreated :: !(Maybe DateTime')

44984498 , _expReasonExperimentEnded :: !(Maybe Text)

4499− , _expTrafficCoverage :: !(Maybe (JSONText Double))

4499+ , _expTrafficCoverage :: !(Maybe (Textual Double))

45004500 , _expEditableInGaUi :: !(Maybe Bool)

4501− , _expMinimumExperimentLengthInDays :: !(Maybe (JSONText Int32))

4501+ , _expMinimumExperimentLengthInDays :: !(Maybe (Textual Int32))

45024502 , _expProFileId :: !(Maybe Text)

45034503 , _expOptimizationType :: !(Maybe Text)

45044504 , _expSelfLink :: !(Maybe Text)

@@ -4512,7 +4512,7 @@ data Experiment = Experiment

45124512 , _expUpdated :: !(Maybe DateTime')

45134513 , _expRewriteVariationURLsAsOriginal :: !(Maybe Bool)

45144514 , _expObjectiveMetric :: !(Maybe Text)

4515− , _expWinnerConfidenceLevel :: !(Maybe (JSONText Double))

4515+ , _expWinnerConfidenceLevel :: !(Maybe (Textual Double))

45164516 , _expServingFramework :: !(Maybe Text)

45174517 , _expDescription :: !(Maybe Text)

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

@@ -4900,11 +4900,11 @@ instance ToJSON Experiment where

49004900-- /See:/ 'entityUserLinks' smart constructor.

49014901data EntityUserLinks = EntityUserLinks

49024902 { _eulNextLink :: !(Maybe Text)

4903− , _eulItemsPerPage :: !(Maybe (JSONText Int32))

4903+ , _eulItemsPerPage :: !(Maybe (Textual Int32))

49044904 , _eulKind :: !Text

49054905 , _eulItems :: !(Maybe [EntityUserLink])

4906− , _eulTotalResults :: !(Maybe (JSONText Int32))

4907− , _eulStartIndex :: !(Maybe (JSONText Int32))

4906+ , _eulTotalResults :: !(Maybe (Textual Int32))

4907+ , _eulStartIndex :: !(Maybe (Textual Int32))

49084908 , _eulPreviousLink :: !(Maybe Text)

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

49104910

@@ -5151,7 +5151,7 @@ instance ToJSON FilterRef where

51515151--

51525152-- /See:/ 'goalVisitTimeOnSiteDetails' smart constructor.

51535153data GoalVisitTimeOnSiteDetails = GoalVisitTimeOnSiteDetails

5154− { _gvtosdComparisonValue :: !(Maybe (JSONText Int64))

5154+ { _gvtosdComparisonValue :: !(Maybe (Textual Int64))

51555155 , _gvtosdComparisonType :: !(Maybe Text)

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

51575157

@@ -5205,12 +5205,12 @@ instance ToJSON GoalVisitTimeOnSiteDetails where

52055205-- /See:/ 'webProperties' smart constructor.

52065206data WebProperties = WebProperties

52075207 { _wpNextLink :: !(Maybe Text)

5208− , _wpItemsPerPage :: !(Maybe (JSONText Int32))

5208+ , _wpItemsPerPage :: !(Maybe (Textual Int32))

52095209 , _wpKind :: !Text

52105210 , _wpUsername :: !(Maybe Text)

52115211 , _wpItems :: !(Maybe [WebProperty])

5212− , _wpTotalResults :: !(Maybe (JSONText Int32))

5213− , _wpStartIndex :: !(Maybe (JSONText Int32))

5212+ , _wpTotalResults :: !(Maybe (Textual Int32))

5213+ , _wpStartIndex :: !(Maybe (Textual Int32))

52145214 , _wpPreviousLink :: !(Maybe Text)

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

52165216

@@ -5331,12 +5331,12 @@ instance ToJSON WebProperties where

53315331-- /See:/ 'customMetrics' smart constructor.

53325332data CustomMetrics = CustomMetrics

53335333 { _cmNextLink :: !(Maybe Text)

5334− , _cmItemsPerPage :: !(Maybe (JSONText Int32))

5334+ , _cmItemsPerPage :: !(Maybe (Textual Int32))

53355335 , _cmKind :: !Text

53365336 , _cmUsername :: !(Maybe Text)

53375337 , _cmItems :: !(Maybe [CustomMetric])

5338− , _cmTotalResults :: !(Maybe (JSONText Int32))

5339− , _cmStartIndex :: !(Maybe (JSONText Int32))

5338+ , _cmTotalResults :: !(Maybe (Textual Int32))

5339+ , _cmStartIndex :: !(Maybe (Textual Int32))

53405340 , _cmPreviousLink :: !(Maybe Text)

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

53425342

@@ -5457,13 +5457,13 @@ data FilterAdvancedDetails = FilterAdvancedDetails

54575457 { _fadExtractA :: !(Maybe Text)

54585458 , _fadFieldARequired :: !(Maybe Bool)

54595459 , _fadFieldA :: !(Maybe Text)

5460− , _fadFieldBIndex :: !(Maybe (JSONText Int32))

5460+ , _fadFieldBIndex :: !(Maybe (Textual Int32))

54615461 , _fadOutputToField :: !(Maybe Text)

54625462 , _fadOutputConstructor :: !(Maybe Text)

54635463 , _fadExtractB :: !(Maybe Text)

5464− , _fadFieldAIndex :: !(Maybe (JSONText Int32))

5464+ , _fadFieldAIndex :: !(Maybe (Textual Int32))

54655465 , _fadCaseSensitive :: !(Maybe Bool)

5466− , _fadOutputToFieldIndex :: !(Maybe (JSONText Int32))

5466+ , _fadOutputToFieldIndex :: !(Maybe (Textual Int32))

54675467 , _fadFieldB :: !(Maybe Text)

54685468 , _fadFieldBRequired :: !(Maybe Bool)

54695469 , _fadOverrideOutputField :: !(Maybe Bool)

@@ -5639,7 +5639,7 @@ instance ToJSON FilterAdvancedDetails where

56395639--

56405640-- /See:/ 'filterUppercaseDetails' smart constructor.

56415641data FilterUppercaseDetails = FilterUppercaseDetails

5642− { _fudFieldIndex :: !(Maybe (JSONText Int32))

5642+ { _fudFieldIndex :: !(Maybe (Textual Int32))

56435643 , _fudField :: !(Maybe Text)

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

56455645

@@ -5789,7 +5789,7 @@ data RealtimeData = RealtimeData

57895789 , _rdQuery :: !(Maybe RealtimeDataQuery)

57905790 , _rdColumnHeaders :: !(Maybe [RealtimeDataColumnHeadersItem])

57915791 , _rdId :: !(Maybe Text)

5792− , _rdTotalResults :: !(Maybe (JSONText Int32))

5792+ , _rdTotalResults :: !(Maybe (Textual Int32))

57935793 , _rdTotalsForAllResults :: !(Maybe RealtimeDataTotalsForAllResults)

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

57955795

@@ -5933,7 +5933,7 @@ data CustomMetric = CustomMetric

59335933 , _cusId :: !(Maybe Text)

59345934 , _cusUpdated :: !(Maybe DateTime')

59355935 , _cusType :: !(Maybe Text)

5936− , _cusIndex :: !(Maybe (JSONText Int32))

5936+ , _cusIndex :: !(Maybe (Textual Int32))

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

59385938

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

@@ -6223,7 +6223,7 @@ instance ToJSON CustomDimensionParentLink where

62236223data WebProperty = WebProperty

62246224 { _wParentLink :: !(Maybe WebPropertyParentLink)

62256225 , _wChildLink :: !(Maybe WebPropertyChildLink)

6226− , _wDefaultProFileId :: !(Maybe (JSONText Int64))

6226+ , _wDefaultProFileId :: !(Maybe (Textual Int64))

62276227 , _wKind :: !Text

62286228 , _wCreated :: !(Maybe DateTime')

62296229 , _wSelfLink :: !(Maybe Text)

@@ -6232,7 +6232,7 @@ data WebProperty = WebProperty

62326232 , _wInternalWebPropertyId :: !(Maybe Text)

62336233 , _wId :: !(Maybe Text)

62346234 , _wUpdated :: !(Maybe DateTime')

6235− , _wProFileCount :: !(Maybe (JSONText Int32))

6235+ , _wProFileCount :: !(Maybe (Textual Int32))

62366236 , _wPermissions :: !(Maybe WebPropertyPermissions)

62376237 , _wWebsiteURL :: !(Maybe Text)

62386238 , _wIndustryVertical :: !(Maybe Text)

@@ -6611,7 +6611,7 @@ instance ToJSON CustomDataSourceParentLink where

66116611data GoalEventDetailsEventConditionsItem = GoalEventDetailsEventConditionsItem

66126612 { _gedeciMatchType :: !(Maybe Text)

66136613 , _gedeciExpression :: !(Maybe Text)

6614− , _gedeciComparisonValue :: !(Maybe (JSONText Int64))

6614+ , _gedeciComparisonValue :: !(Maybe (Textual Int64))

66156615 , _gedeciType :: !(Maybe Text)

66166616 , _gedeciComparisonType :: !(Maybe Text)

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

@@ -6706,8 +6706,8 @@ data McfDataQuery = McfDataQuery

67066706 , _mdqEndDate :: !(Maybe Text)

67076707 , _mdqSort :: !(Maybe [Text])

67086708 , _mdqDimensions :: !(Maybe Text)

6709− , _mdqStartIndex :: !(Maybe (JSONText Int32))

6710− , _mdqMaxResults :: !(Maybe (JSONText Int32))

6709+ , _mdqStartIndex :: !(Maybe (Textual Int32))

6710+ , _mdqMaxResults :: !(Maybe (Textual Int32))

67116711 , _mdqSegment :: !(Maybe Text)

67126712 , _mdqStartDate :: !(Maybe Text)

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

@@ -6858,7 +6858,7 @@ data Goal = Goal

68586858 , _goaWebPropertyId :: !(Maybe Text)

68596859 , _goaKind :: !Text

68606860 , _goaCreated :: !(Maybe DateTime')

6861− , _goaValue :: !(Maybe (JSONText Float))

6861+ , _goaValue :: !(Maybe (Textual Double))

68626862 , _goaProFileId :: !(Maybe Text)

68636863 , _goaEventDetails :: !(Maybe GoalEventDetails)

68646864 , _goaActive :: !(Maybe Bool)

@@ -7260,7 +7260,7 @@ data RealtimeDataQuery = RealtimeDataQuery

72607260 , _rdqIds :: !(Maybe Text)

72617261 , _rdqSort :: !(Maybe [Text])

72627262 , _rdqDimensions :: !(Maybe Text)

7263− , _rdqMaxResults :: !(Maybe (JSONText Int32))

7263+ , _rdqMaxResults :: !(Maybe (Textual Int32))

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

72657265

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

@@ -7353,7 +7353,7 @@ data Columns = Columns

73537353 { _colEtag :: !(Maybe Text)

73547354 , _colKind :: !Text

73557355 , _colItems :: !(Maybe [Column])

7356− , _colTotalResults :: !(Maybe (JSONText Int32))

7356+ , _colTotalResults :: !(Maybe (Textual Int32))

73577357 , _colAttributeNames :: !(Maybe [Text])

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

73597359

@@ -7436,7 +7436,7 @@ instance ToJSON Columns where

74367436--

74377437-- /See:/ 'filterLowercaseDetails' smart constructor.

74387438data FilterLowercaseDetails = FilterLowercaseDetails

7439− { _fldFieldIndex :: !(Maybe (JSONText Int32))

7439+ { _fldFieldIndex :: !(Maybe (Textual Int32))

74407440 , _fldField :: !(Maybe Text)

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

74427442

@@ -7685,11 +7685,11 @@ instance ToJSON Filter where

76857685-- /See:/ 'uploads' smart constructor.

76867686data Uploads = Uploads

76877687 { _uplNextLink :: !(Maybe Text)

7688− , _uplItemsPerPage :: !(Maybe (JSONText Int32))

7688+ , _uplItemsPerPage :: !(Maybe (Textual Int32))

76897689 , _uplKind :: !Text

76907690 , _uplItems :: !(Maybe [Upload])

7691− , _uplTotalResults :: !(Maybe (JSONText Int32))

7692− , _uplStartIndex :: !(Maybe (JSONText Int32))

7691+ , _uplTotalResults :: !(Maybe (Textual Int32))

7692+ , _uplStartIndex :: !(Maybe (Textual Int32))

76937693 , _uplPreviousLink :: !(Maybe Text)

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

76957695

@@ -7802,12 +7802,12 @@ instance ToJSON Uploads where

78027802-- /See:/ 'customDimensions' smart constructor.

78037803data CustomDimensions = CustomDimensions

78047804 { _cdNextLink :: !(Maybe Text)

7805− , _cdItemsPerPage :: !(Maybe (JSONText Int32))

7805+ , _cdItemsPerPage :: !(Maybe (Textual Int32))

78067806 , _cdKind :: !Text

78077807 , _cdUsername :: !(Maybe Text)

78087808 , _cdItems :: !(Maybe [CustomDimension])

7809− , _cdTotalResults :: !(Maybe (JSONText Int32))

7810− , _cdStartIndex :: !(Maybe (JSONText Int32))

7809+ , _cdTotalResults :: !(Maybe (Textual Int32))

7810+ , _cdStartIndex :: !(Maybe (Textual Int32))

78117811 , _cdPreviousLink :: !(Maybe Text)

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

78137813

@@ -7928,12 +7928,12 @@ instance ToJSON CustomDimensions where

79287928-- /See:/ 'segments' smart constructor.

79297929data Segments = Segments

79307930 { _sNextLink :: !(Maybe Text)

7931− , _sItemsPerPage :: !(Maybe (JSONText Int32))

7931+ , _sItemsPerPage :: !(Maybe (Textual Int32))

79327932 , _sKind :: !Text

79337933 , _sUsername :: !(Maybe Text)

79347934 , _sItems :: !(Maybe [Segment])

7935− , _sTotalResults :: !(Maybe (JSONText Int32))

7936− , _sStartIndex :: !(Maybe (JSONText Int32))

7935+ , _sTotalResults :: !(Maybe (Textual Int32))

7936+ , _sStartIndex :: !(Maybe (Textual Int32))

79377937 , _sPreviousLink :: !(Maybe Text)

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

79397939

@@ -8224,12 +8224,12 @@ instance ToJSON GoalURLDestinationDetails where

82248224-- /See:/ 'proFileFilterLinks' smart constructor.

82258225data ProFileFilterLinks = ProFileFilterLinks

82268226 { _pfflNextLink :: !(Maybe Text)

8227− , _pfflItemsPerPage :: !(Maybe (JSONText Int32))

8227+ , _pfflItemsPerPage :: !(Maybe (Textual Int32))

82288228 , _pfflKind :: !Text

82298229 , _pfflUsername :: !(Maybe Text)

82308230 , _pfflItems :: !(Maybe [ProFileFilterLink])

8231− , _pfflTotalResults :: !(Maybe (JSONText Int32))

8232− , _pfflStartIndex :: !(Maybe (JSONText Int32))

8231+ , _pfflTotalResults :: !(Maybe (Textual Int32))

8232+ , _pfflStartIndex :: !(Maybe (Textual Int32))

82338233 , _pfflPreviousLink :: !(Maybe Text)

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

82358235

@@ -8497,7 +8497,7 @@ data Upload = Upload

84978497 { _uuStatus :: !(Maybe Text)

84988498 , _uuKind :: !Text

84998499 , _uuCustomDataSourceId :: !(Maybe Text)

8500− , _uuAccountId :: !(Maybe (JSONText Int64))

8500+ , _uuAccountId :: !(Maybe (Textual Int64))

85018501 , _uuId :: !(Maybe Text)

85028502 , _uuErrors :: !(Maybe [Text])

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

@@ -8598,7 +8598,7 @@ data CustomDimension = CustomDimension

85988598 , _cddScope :: !(Maybe Text)

85998599 , _cddId :: !(Maybe Text)

86008600 , _cddUpdated :: !(Maybe DateTime')

8601− , _cddIndex :: !(Maybe (JSONText Int32))

8601+ , _cddIndex :: !(Maybe (Textual Int32))

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

86038603

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

@@ -8921,7 +8921,7 @@ data ProFileFilterLink = ProFileFilterLink

89218921 , _proFilterRef :: !(Maybe FilterRef)

89228922 , _proSelfLink :: !(Maybe Text)

89238923 , _proId :: !(Maybe Text)

8924− , _proRank :: !(Maybe (JSONText Int32))

8924+ , _proRank :: !(Maybe (Textual Int32))

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

89268926

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

@@ -9173,7 +9173,7 @@ instance ToJSON GaDataDataTableColsItem where

91739173-- /See:/ 'experimentVariationsItem' smart constructor.

91749174data ExperimentVariationsItem = ExperimentVariationsItem

91759175 { _eviStatus :: !(Maybe Text)

9176− , _eviWeight :: !(Maybe (JSONText Double))

9176+ , _eviWeight :: !(Maybe (Textual Double))

91779177 , _eviURL :: !(Maybe Text)

91789178 , _eviWon :: !(Maybe Bool)

91799179 , _eviName :: !(Maybe Text)

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Ga/Get.hs+4−4

@@ -66,8 +66,8 @@ type DataGaGetResource =

6666 QueryParam "output" DataGaGetOutput :>

6767 QueryParam "sort" Text :>

6868 QueryParam "dimensions" Text :>

69− QueryParam "start-index" (JSONText Int32) :>

70− QueryParam "max-results" (JSONText Int32) :>

69+ QueryParam "start-index" (Textual Int32) :>

70+ QueryParam "max-results" (Textual Int32) :>

7171 QueryParam "segment" Text :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] GaData

@@ -84,8 +84,8 @@ data DataGaGet = DataGaGet

8484 , _dggOutput :: !(Maybe DataGaGetOutput)

8585 , _dggSort :: !(Maybe Text)

8686 , _dggDimensions :: !(Maybe Text)

87− , _dggStartIndex :: !(Maybe (JSONText Int32))

88− , _dggMaxResults :: !(Maybe (JSONText Int32))

87+ , _dggStartIndex :: !(Maybe (Textual Int32))

88+ , _dggMaxResults :: !(Maybe (Textual Int32))

8989 , _dggSegment :: !(Maybe Text)

9090 , _dggStartDate :: !Text

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Mcf/Get.hs+4−4

@@ -63,8 +63,8 @@ type DataMcfGetResource =

6363 QueryParam "filters" Text :>

6464 QueryParam "sort" Text :>

6565 QueryParam "dimensions" Text :>

66− QueryParam "start-index" (JSONText Int32) :>

67− QueryParam "max-results" (JSONText Int32) :>

66+ QueryParam "start-index" (Textual Int32) :>

67+ QueryParam "max-results" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :> Get '[JSON] McfData

6969

7070-- | Returns Analytics Multi-Channel Funnels data for a view (profile).

@@ -78,8 +78,8 @@ data DataMcfGet = DataMcfGet

7878 , _dmgEndDate :: !Text

7979 , _dmgSort :: !(Maybe Text)

8080 , _dmgDimensions :: !(Maybe Text)

81− , _dmgStartIndex :: !(Maybe (JSONText Int32))

82− , _dmgMaxResults :: !(Maybe (JSONText Int32))

81+ , _dmgStartIndex :: !(Maybe (Textual Int32))

82+ , _dmgMaxResults :: !(Maybe (Textual Int32))

8383 , _dmgStartDate :: !Text

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

8585

gogol-analytics/gen/Network/Google/Resource/Analytics/Data/Realtime/Get.hs+2−2

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

5656 QueryParam "filters" Text :>

5757 QueryParam "sort" Text :>

5858 QueryParam "dimensions" Text :>

59− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "max-results" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] RealtimeData

6161

6262-- | Returns real time data for a view (profile).

@@ -68,7 +68,7 @@ data DataRealtimeGet = DataRealtimeGet

6868 , _drgIds :: !Text

6969 , _drgSort :: !(Maybe Text)

7070 , _drgDimensions :: !(Maybe Text)

71− , _drgMaxResults :: !(Maybe (JSONText Int32))

71+ , _drgMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountSummaries/List.hs+4−4

@@ -48,8 +48,8 @@ type ManagementAccountSummariesListResource =

4848 "v3" :>

4949 "management" :>

5050 "accountSummaries" :>

51− QueryParam "start-index" (JSONText Int32) :>

52− QueryParam "max-results" (JSONText Int32) :>

51+ QueryParam "start-index" (Textual Int32) :>

52+ QueryParam "max-results" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] AccountSummaries

5555

@@ -58,8 +58,8 @@ type ManagementAccountSummariesListResource =

5858--

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

6060data ManagementAccountSummariesList = ManagementAccountSummariesList

61− { _maslStartIndex :: !(Maybe (JSONText Int32))

62− , _maslMaxResults :: !(Maybe (JSONText Int32))

61+ { _maslStartIndex :: !(Maybe (Textual Int32))

62+ , _maslMaxResults :: !(Maybe (Textual Int32))

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

6464

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/AccountUserLinks/List.hs+4−4

@@ -50,8 +50,8 @@ type ManagementAccountUserLinksListResource =

5050 "accounts" :>

5151 Capture "accountId" Text :>

5252 "entityUserLinks" :>

53− QueryParam "start-index" (JSONText Int32) :>

54− QueryParam "max-results" (JSONText Int32) :>

53+ QueryParam "start-index" (Textual Int32) :>

54+ QueryParam "max-results" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :>

5656 Get '[JSON] EntityUserLinks

5757

@@ -60,8 +60,8 @@ type ManagementAccountUserLinksListResource =

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

6161data ManagementAccountUserLinksList = ManagementAccountUserLinksList

6262 { _maullAccountId :: !Text

63− , _maullStartIndex :: !(Maybe (JSONText Int32))

64− , _maullMaxResults :: !(Maybe (JSONText Int32))

63+ , _maullStartIndex :: !(Maybe (Textual Int32))

64+ , _maullMaxResults :: !(Maybe (Textual Int32))

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

6666

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Accounts/List.hs+4−4

@@ -47,16 +47,16 @@ type ManagementAccountsListResource =

4747 "v3" :>

4848 "management" :>

4949 "accounts" :>

50− QueryParam "start-index" (JSONText Int32) :>

51− QueryParam "max-results" (JSONText Int32) :>

50+ QueryParam "start-index" (Textual Int32) :>

51+ QueryParam "max-results" (Textual Int32) :>

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

5353

5454-- | Lists all accounts to which the user has access.

5555--

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

5757data ManagementAccountsList = ManagementAccountsList

58− { _malStartIndex :: !(Maybe (JSONText Int32))

59− , _malMaxResults :: !(Maybe (JSONText Int32))

58+ { _malStartIndex :: !(Maybe (Textual Int32))

59+ , _malMaxResults :: !(Maybe (Textual Int32))

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

6161

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDataSources/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementCustomDataSourcesListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "customDataSources" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] CustomDataSources

6060

@@ -64,8 +64,8 @@ type ManagementCustomDataSourcesListResource =

6464data ManagementCustomDataSourcesList = ManagementCustomDataSourcesList

6565 { _mcdslWebPropertyId :: !Text

6666 , _mcdslAccountId :: !Text

67− , _mcdslStartIndex :: !(Maybe (JSONText Int32))

68− , _mcdslMaxResults :: !(Maybe (JSONText Int32))

67+ , _mcdslStartIndex :: !(Maybe (Textual Int32))

68+ , _mcdslMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomDimensions/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementCustomDimensionsListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "customDimensions" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] CustomDimensions

6060

@@ -64,8 +64,8 @@ type ManagementCustomDimensionsListResource =

6464data ManagementCustomDimensionsList = ManagementCustomDimensionsList

6565 { _mcdlWebPropertyId :: !Text

6666 , _mcdlAccountId :: !Text

67− , _mcdlStartIndex :: !(Maybe (JSONText Int32))

68− , _mcdlMaxResults :: !(Maybe (JSONText Int32))

67+ , _mcdlStartIndex :: !(Maybe (Textual Int32))

68+ , _mcdlMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/CustomMetrics/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementCustomMetricsListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "customMetrics" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] CustomMetrics

5959

6060-- | Lists custom metrics to which the user has access.

@@ -63,8 +63,8 @@ type ManagementCustomMetricsListResource =

6363data ManagementCustomMetricsList = ManagementCustomMetricsList

6464 { _mcmlWebPropertyId :: !Text

6565 , _mcmlAccountId :: !Text

66− , _mcmlStartIndex :: !(Maybe (JSONText Int32))

67− , _mcmlMaxResults :: !(Maybe (JSONText Int32))

66+ , _mcmlStartIndex :: !(Maybe (Textual Int32))

67+ , _mcmlMaxResults :: !(Maybe (Textual Int32))

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

6969

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Experiments/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementExperimentsListResource =

5656 "profiles" :>

5757 Capture "profileId" Text :>

5858 "experiments" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] Experiments

6262

6363-- | Lists experiments to which the user has access.

@@ -67,8 +67,8 @@ data ManagementExperimentsList = ManagementExperimentsList

6767 { _melWebPropertyId :: !Text

6868 , _melProFileId :: !Text

6969 , _melAccountId :: !Text

70− , _melStartIndex :: !(Maybe (JSONText Int32))

71− , _melMaxResults :: !(Maybe (JSONText Int32))

70+ , _melStartIndex :: !(Maybe (Textual Int32))

71+ , _melMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Filters/List.hs+4−4

@@ -50,8 +50,8 @@ type ManagementFiltersListResource =

5050 "accounts" :>

5151 Capture "accountId" Text :>

5252 "filters" :>

53− QueryParam "start-index" (JSONText Int32) :>

54− QueryParam "max-results" (JSONText Int32) :>

53+ QueryParam "start-index" (Textual Int32) :>

54+ QueryParam "max-results" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] Filters

5656

5757-- | Lists all filters for an account

@@ -59,8 +59,8 @@ type ManagementFiltersListResource =

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

6060data ManagementFiltersList = ManagementFiltersList

6161 { _mflAccountId :: !Text

62− , _mflStartIndex :: !(Maybe (JSONText Int32))

63− , _mflMaxResults :: !(Maybe (JSONText Int32))

62+ , _mflStartIndex :: !(Maybe (Textual Int32))

63+ , _mflMaxResults :: !(Maybe (Textual Int32))

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

6565

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Goals/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementGoalsListResource =

5656 "profiles" :>

5757 Capture "profileId" Text :>

5858 "goals" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] Goals

6262

6363-- | Lists goals to which the user has access.

@@ -67,8 +67,8 @@ data ManagementGoalsList = ManagementGoalsList

6767 { _mglWebPropertyId :: !Text

6868 , _mglProFileId :: !Text

6969 , _mglAccountId :: !Text

70− , _mglStartIndex :: !(Maybe (JSONText Int32))

71− , _mglMaxResults :: !(Maybe (JSONText Int32))

70+ , _mglStartIndex :: !(Maybe (Textual Int32))

71+ , _mglMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileFilterLinks/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementProFileFilterLinksListResource =

5656 "profiles" :>

5757 Capture "profileId" Text :>

5858 "profileFilterLinks" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] ProFileFilterLinks

6363

@@ -68,8 +68,8 @@ data ManagementProFileFilterLinksList = ManagementProFileFilterLinksList

6868 { _mpffllWebPropertyId :: !Text

6969 , _mpffllProFileId :: !Text

7070 , _mpffllAccountId :: !Text

71− , _mpffllStartIndex :: !(Maybe (JSONText Int32))

72− , _mpffllMaxResults :: !(Maybe (JSONText Int32))

71+ , _mpffllStartIndex :: !(Maybe (Textual Int32))

72+ , _mpffllMaxResults :: !(Maybe (Textual Int32))

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

7474

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFileUserLinks/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementProFileUserLinksListResource =

5656 "profiles" :>

5757 Capture "profileId" Text :>

5858 "entityUserLinks" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] EntityUserLinks

6363

@@ -68,8 +68,8 @@ data ManagementProFileUserLinksList = ManagementProFileUserLinksList

6868 { _mpfullWebPropertyId :: !Text

6969 , _mpfullProFileId :: !Text

7070 , _mpfullAccountId :: !Text

71− , _mpfullStartIndex :: !(Maybe (JSONText Int32))

72− , _mpfullMaxResults :: !(Maybe (JSONText Int32))

71+ , _mpfullStartIndex :: !(Maybe (Textual Int32))

72+ , _mpfullMaxResults :: !(Maybe (Textual Int32))

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

7474

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/ProFiles/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementProFilesListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "profiles" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] ProFiles

5959

6060-- | Lists views (profiles) to which the user has access.

@@ -63,8 +63,8 @@ type ManagementProFilesListResource =

6363data ManagementProFilesList = ManagementProFilesList

6464 { _mpflWebPropertyId :: !Text

6565 , _mpflAccountId :: !Text

66− , _mpflStartIndex :: !(Maybe (JSONText Int32))

67− , _mpflMaxResults :: !(Maybe (JSONText Int32))

66+ , _mpflStartIndex :: !(Maybe (Textual Int32))

67+ , _mpflMaxResults :: !(Maybe (Textual Int32))

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

6969

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Segments/List.hs+4−4

@@ -47,16 +47,16 @@ type ManagementSegmentsListResource =

4747 "v3" :>

4848 "management" :>

4949 "segments" :>

50− QueryParam "start-index" (JSONText Int32) :>

51− QueryParam "max-results" (JSONText Int32) :>

50+ QueryParam "start-index" (Textual Int32) :>

51+ QueryParam "max-results" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Segments

5353

5454-- | Lists segments to which the user has access.

5555--

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

5757data ManagementSegmentsList = ManagementSegmentsList

58− { _mslStartIndex :: !(Maybe (JSONText Int32))

59− , _mslMaxResults :: !(Maybe (JSONText Int32))

58+ { _mslStartIndex :: !(Maybe (Textual Int32))

59+ , _mslMaxResults :: !(Maybe (Textual Int32))

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

6161

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementUnSampledReportsListResource =

5656 "profiles" :>

5757 Capture "profileId" Text :>

5858 "unsampledReports" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] UnSampledReports

6363

@@ -68,8 +68,8 @@ data ManagementUnSampledReportsList = ManagementUnSampledReportsList

6868 { _musrlWebPropertyId :: !Text

6969 , _musrlProFileId :: !Text

7070 , _musrlAccountId :: !Text

71− , _musrlStartIndex :: !(Maybe (JSONText Int32))

72− , _musrlMaxResults :: !(Maybe (JSONText Int32))

71+ , _musrlStartIndex :: !(Maybe (Textual Int32))

72+ , _musrlMaxResults :: !(Maybe (Textual Int32))

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

7474

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/List.hs+4−4

@@ -56,8 +56,8 @@ type ManagementUploadsListResource =

5656 "customDataSources" :>

5757 Capture "customDataSourceId" Text :>

5858 "uploads" :>

59− QueryParam "start-index" (JSONText Int32) :>

60− QueryParam "max-results" (JSONText Int32) :>

59+ QueryParam "start-index" (Textual Int32) :>

60+ QueryParam "max-results" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] Uploads

6262

6363-- | List uploads to which the user has access.

@@ -67,8 +67,8 @@ data ManagementUploadsList = ManagementUploadsList

6767 { _mulWebPropertyId :: !Text

6868 , _mulCustomDataSourceId :: !Text

6969 , _mulAccountId :: !Text

70− , _mulStartIndex :: !(Maybe (JSONText Int32))

71− , _mulMaxResults :: !(Maybe (JSONText Int32))

70+ , _mulStartIndex :: !(Maybe (Textual Int32))

71+ , _mulMaxResults :: !(Maybe (Textual Int32))

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

7373

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebProperties/List.hs+4−4

@@ -50,8 +50,8 @@ type ManagementWebPropertiesListResource =

5050 "accounts" :>

5151 Capture "accountId" Text :>

5252 "webproperties" :>

53− QueryParam "start-index" (JSONText Int32) :>

54− QueryParam "max-results" (JSONText Int32) :>

53+ QueryParam "start-index" (Textual Int32) :>

54+ QueryParam "max-results" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] WebProperties

5656

5757-- | Lists web properties to which the user has access.

@@ -59,8 +59,8 @@ type ManagementWebPropertiesListResource =

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

6060data ManagementWebPropertiesList = ManagementWebPropertiesList

6161 { _mwplAccountId :: !Text

62− , _mwplStartIndex :: !(Maybe (JSONText Int32))

63− , _mwplMaxResults :: !(Maybe (JSONText Int32))

62+ , _mwplStartIndex :: !(Maybe (Textual Int32))

63+ , _mwplMaxResults :: !(Maybe (Textual Int32))

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

6565

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyAdWordsLinks/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementWebPropertyAdWordsLinksListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "entityAdWordsLinks" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] EntityAdWordsLinks

6060

@@ -64,8 +64,8 @@ type ManagementWebPropertyAdWordsLinksListResource =

6464data ManagementWebPropertyAdWordsLinksList = ManagementWebPropertyAdWordsLinksList

6565 { _mwpawllWebPropertyId :: !Text

6666 , _mwpawllAccountId :: !Text

67− , _mwpawllStartIndex :: !(Maybe (JSONText Int32))

68− , _mwpawllMaxResults :: !(Maybe (JSONText Int32))

67+ , _mwpawllStartIndex :: !(Maybe (Textual Int32))

68+ , _mwpawllMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/WebPropertyUserLinks/List.hs+4−4

@@ -53,8 +53,8 @@ type ManagementWebPropertyUserLinksListResource =

5353 "webproperties" :>

5454 Capture "webPropertyId" Text :>

5555 "entityUserLinks" :>

56− QueryParam "start-index" (JSONText Int32) :>

57− QueryParam "max-results" (JSONText Int32) :>

56+ QueryParam "start-index" (Textual Int32) :>

57+ QueryParam "max-results" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] EntityUserLinks

6060

@@ -64,8 +64,8 @@ type ManagementWebPropertyUserLinksListResource =

6464data ManagementWebPropertyUserLinksList = ManagementWebPropertyUserLinksList

6565 { _mwpullWebPropertyId :: !Text

6666 , _mwpullAccountId :: !Text

67− , _mwpullStartIndex :: !(Maybe (JSONText Int32))

68− , _mwpullMaxResults :: !(Maybe (JSONText Int32))

67+ , _mwpullStartIndex :: !(Maybe (Textual Int32))

68+ , _mwpullMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+5−5

@@ -41,8 +41,8 @@ import Network.Google.Prelude

4141-- /See:/ 'groupLicense' smart constructor.

4242data GroupLicense = GroupLicense

4343 { _glKind :: !Text

44− , _glNumProvisioned :: !(Maybe (JSONText Int32))

45− , _glNumPurchased :: !(Maybe (JSONText Int32))

44+ , _glNumProvisioned :: !(Maybe (Textual Int32))

45+ , _glNumPurchased :: !(Maybe (Textual Int32))

4646 , _glApproval :: !(Maybe Text)

4747 , _glProductId :: !(Maybe Text)

4848 , _glAcquisitionKind :: !(Maybe Text)

@@ -255,7 +255,7 @@ instance ToJSON CollectionsListResponse where

255255data AppRestrictionsSchemaRestrictionRestrictionValue = AppRestrictionsSchemaRestrictionRestrictionValue

256256 { _arsrrvValueMultiselect :: !(Maybe [Text])

257257 , _arsrrvValueBool :: !(Maybe Bool)

258− , _arsrrvValueInteger :: !(Maybe (JSONText Int32))

258+ , _arsrrvValueInteger :: !(Maybe (Textual Int32))

259259 , _arsrrvType :: !(Maybe Text)

260260 , _arsrrvValueString :: !(Maybe Text)

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

@@ -843,7 +843,7 @@ instance ToJSON UsersListResponse where

843843--

844844-- /See:/ 'appVersion' smart constructor.

845845data AppVersion = AppVersion

846− { _avVersionCode :: !(Maybe (JSONText Int32))

846+ { _avVersionCode :: !(Maybe (Textual Int32))

847847 , _avVersionString :: !(Maybe Text)

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

849849

@@ -1116,7 +1116,7 @@ instance ToJSON ProductSet where

11161116--

11171117-- /See:/ 'install' smart constructor.

11181118data Install = Install

1119− { _iVersionCode :: !(Maybe (JSONText Int32))

1119+ { _iVersionCode :: !(Maybe (Textual Int32))

11201120 , _iKind :: !Text

11211121 , _iInstallState :: !(Maybe Text)

11221122 , _iProductId :: !(Maybe Text)

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+25−25

@@ -95,8 +95,8 @@ instance ToJSON InAppProductsUpdateResponse where

9595--

9696-- /See:/ 'monthDay' smart constructor.

9797data MonthDay = MonthDay

98− { _mdDay :: !(Maybe (JSONText Word32))

99− , _mdMonth :: !(Maybe (JSONText Word32))

98+ { _mdDay :: !(Maybe (Textual Word32))

99+ , _mdMonth :: !(Maybe (Textual Word32))

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

101101

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

@@ -142,9 +142,9 @@ instance ToJSON MonthDay where

142142--

143143-- /See:/ 'track' smart constructor.

144144data Track = Track

145− { _tVersionCodes :: !(Maybe [JSONText Int32])

145+ { _tVersionCodes :: !(Maybe [Textual Int32])

146146 , _tTrack :: !(Maybe Text)

147− , _tUserFraction :: !(Maybe (JSONText Double))

147+ , _tUserFraction :: !(Maybe (Textual Double))

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

149149

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

@@ -255,7 +255,7 @@ data InAppProductsBatchRequestEntry = InAppProductsBatchRequestEntry

255255 { _iapbreMethodName :: !(Maybe Text)

256256 , _iapbreInAppProductsinsertrequest :: !(Maybe InAppProductsInsertRequest)

257257 , _iapbreInAppProductsupdaterequest :: !(Maybe InAppProductsUpdateRequest)

258− , _iapbreBatchId :: !(Maybe (JSONText Word32))

258+ , _iapbreBatchId :: !(Maybe (Textual Word32))

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

260260

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

@@ -453,8 +453,8 @@ instance ToJSON TokenPagination where

453453--

454454-- /See:/ 'expansionFile' smart constructor.

455455data ExpansionFile = ExpansionFile

456− { _efFileSize :: !(Maybe (JSONText Int64))

457− , _efReferencesVersion :: !(Maybe (JSONText Int32))

456+ { _efFileSize :: !(Maybe (Textual Int64))

457+ , _efReferencesVersion :: !(Maybe (Textual Int32))

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

459459

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

@@ -638,7 +638,7 @@ instance ToJSON Listing where

638638--

639639-- /See:/ 'aPK' smart constructor.

640640data APK = APK

641− { _aVersionCode :: !(Maybe (JSONText Int32))

641+ { _aVersionCode :: !(Maybe (Textual Int32))

642642 , _aBinary :: !(Maybe APKBinary)

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

644644

@@ -812,9 +812,9 @@ instance ToJSON Season where

812812--

813813-- /See:/ 'pageInfo' smart constructor.

814814data PageInfo = PageInfo

815− { _piResultPerPage :: !(Maybe (JSONText Int32))

816− , _piTotalResults :: !(Maybe (JSONText Int32))

817− , _piStartIndex :: !(Maybe (JSONText Int32))

815+ { _piResultPerPage :: !(Maybe (Textual Int32))

816+ , _piTotalResults :: !(Maybe (Textual Int32))

817+ , _piStartIndex :: !(Maybe (Textual Int32))

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

819819

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

@@ -956,10 +956,10 @@ instance ToJSON AppEdit where

956956--

957957-- /See:/ 'productPurchase' smart constructor.

958958data ProductPurchase = ProductPurchase

959− { _ppPurchaseState :: !(Maybe (JSONText Int32))

960− , _ppConsumptionState :: !(Maybe (JSONText Int32))

959+ { _ppPurchaseState :: !(Maybe (Textual Int32))

960+ , _ppConsumptionState :: !(Maybe (Textual Int32))

961961 , _ppKind :: !Text

962− , _ppPurchaseTimeMillis :: !(Maybe (JSONText Int64))

962+ , _ppPurchaseTimeMillis :: !(Maybe (Textual Int64))

963963 , _ppDeveloperPayload :: !(Maybe Text)

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

965965

@@ -1048,7 +1048,7 @@ instance ToJSON ProductPurchase where

10481048--

10491049-- /See:/ 'subscriptionPurchasesDeferResponse' smart constructor.

10501050newtype SubscriptionPurchasesDeferResponse = SubscriptionPurchasesDeferResponse

1051− { _spdrNewExpiryTimeMillis :: Maybe (JSONText Int64)

1051+ { _spdrNewExpiryTimeMillis :: Maybe (Textual Int64)

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

10531053

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

@@ -1140,9 +1140,9 @@ instance ToJSON APKListing where

11401140-- /See:/ 'subscriptionPurchase' smart constructor.

11411141data SubscriptionPurchase = SubscriptionPurchase

11421142 { _spKind :: !Text

1143− , _spExpiryTimeMillis :: !(Maybe (JSONText Int64))

1143+ , _spExpiryTimeMillis :: !(Maybe (Textual Int64))

11441144 , _spAutoRenewing :: !(Maybe Bool)

1145− , _spStartTimeMillis :: !(Maybe (JSONText Int64))

1145+ , _spStartTimeMillis :: !(Maybe (Textual Int64))

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

11471147

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

@@ -1363,17 +1363,17 @@ instance ToJSON InAppProductsBatchRequest where

13631363-- /See:/ 'externallyHostedAPK' smart constructor.

13641364data ExternallyHostedAPK = ExternallyHostedAPK

13651365 { _ehapkApplicationLabel :: !(Maybe Text)

1366− , _ehapkMaximumSdk :: !(Maybe (JSONText Int32))

1366+ , _ehapkMaximumSdk :: !(Maybe (Textual Int32))

13671367 , _ehapkNATiveCodes :: !(Maybe [Text])

1368− , _ehapkVersionCode :: !(Maybe (JSONText Int32))

1368+ , _ehapkVersionCode :: !(Maybe (Textual Int32))

13691369 , _ehapkFileSha256Base64 :: !(Maybe Text)

13701370 , _ehapkExternallyHostedURL :: !(Maybe Text)

13711371 , _ehapkVersionName :: !(Maybe Text)

13721372 , _ehapkPackageName :: !(Maybe Text)

1373− , _ehapkFileSize :: !(Maybe (JSONText Int64))

1373+ , _ehapkFileSize :: !(Maybe (Textual Int64))

13741374 , _ehapkIconBase64 :: !(Maybe Text)

13751375 , _ehapkUsesFeatures :: !(Maybe [Text])

1376− , _ehapkMinimumSdk :: !(Maybe (JSONText Int32))

1376+ , _ehapkMinimumSdk :: !(Maybe (Textual Int32))

13771377 , _ehapkFileSha1Base64 :: !(Maybe Text)

13781378 , _ehapkUsesPermissions :: !(Maybe [ExternallyHostedAPKUsesPermission])

13791379 , _ehapkCertificateBase64s :: !(Maybe [Text])

@@ -1849,8 +1849,8 @@ instance ToJSON APKsAddExternallyHostedResponse where

18491849--

18501850-- /See:/ 'subscriptionDeferralInfo' smart constructor.

18511851data SubscriptionDeferralInfo = SubscriptionDeferralInfo

1852− { _sdiDesiredExpiryTimeMillis :: !(Maybe (JSONText Int64))

1853− , _sdiExpectedExpiryTimeMillis :: !(Maybe (JSONText Int64))

1852+ { _sdiDesiredExpiryTimeMillis :: !(Maybe (Textual Int64))

1853+ , _sdiExpectedExpiryTimeMillis :: !(Maybe (Textual Int64))

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

18551855

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

@@ -2063,7 +2063,7 @@ instance ToJSON InAppProduct where

20632063data InAppProductsBatchResponseEntry = InAppProductsBatchResponseEntry

20642064 { _iInAppProductsupdateresponse :: !(Maybe InAppProductsUpdateResponse)

20652065 , _iInAppProductsinsertresponse :: !(Maybe InAppProductsInsertResponse)

2066− , _iBatchId :: !(Maybe (JSONText Word32))

2066+ , _iBatchId :: !(Maybe (Textual Word32))

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

20682068

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

@@ -2254,7 +2254,7 @@ instance ToJSON APKsListResponse where

22542254-- /See:/ 'externallyHostedAPKUsesPermission' smart constructor.

22552255data ExternallyHostedAPKUsesPermission = ExternallyHostedAPKUsesPermission

22562256 { _ehapkupName :: !(Maybe Text)

2257− , _ehapkupMaxSdkVersion :: !(Maybe (JSONText Int32))

2257+ , _ehapkupMaxSdkVersion :: !(Maybe (Textual Int32))

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

22592259

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Delete.hs+2−2

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

5353 "edits" :>

5454 Capture "editId" Text :>

5555 "apks" :>

56− Capture "apkVersionCode" (JSONText Int32) :>

56+ Capture "apkVersionCode" (Textual Int32) :>

5757 "listings" :>

5858 Capture "language" Text :>

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

@@ -64,7 +64,7 @@ type EditsAPKListingsDeleteResource =

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

6565data EditsAPKListingsDelete = EditsAPKListingsDelete

6666 { _eapkldPackageName :: !Text

67− , _eapkldAPKVersionCode :: !(JSONText Int32)

67+ , _eapkldAPKVersionCode :: !(Textual Int32)

6868 , _eapkldLanguage :: !Text

6969 , _eapkldEditId :: !Text

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Deleteall.hs+2−2

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

5151 "edits" :>

5252 Capture "editId" Text :>

5353 "apks" :>

54− Capture "apkVersionCode" (JSONText Int32) :>

54+ Capture "apkVersionCode" (Textual Int32) :>

5555 "listings" :>

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

5757

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

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

6161data EditsAPKListingsDeleteall = EditsAPKListingsDeleteall

6262 { _eapkldaPackageName :: !Text

63− , _eapkldaAPKVersionCode :: !(JSONText Int32)

63+ , _eapkldaAPKVersionCode :: !(Textual Int32)

6464 , _eapkldaEditId :: !Text

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

6666

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Get.hs+2−2

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

5353 "edits" :>

5454 Capture "editId" Text :>

5555 "apks" :>

56− Capture "apkVersionCode" (JSONText Int32) :>

56+ Capture "apkVersionCode" (Textual Int32) :>

5757 "listings" :>

5858 Capture "language" Text :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] APKListing

@@ -64,7 +64,7 @@ type EditsAPKListingsGetResource =

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

6565data EditsAPKListingsGet = EditsAPKListingsGet

6666 { _eapklgPackageName :: !Text

67− , _eapklgAPKVersionCode :: !(JSONText Int32)

67+ , _eapklgAPKVersionCode :: !(Textual Int32)

6868 , _eapklgLanguage :: !Text

6969 , _eapklgEditId :: !Text

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/List.hs+2−2

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

5151 "edits" :>

5252 Capture "editId" Text :>

5353 "apks" :>

54− Capture "apkVersionCode" (JSONText Int32) :>

54+ Capture "apkVersionCode" (Textual Int32) :>

5555 "listings" :>

5656 QueryParam "alt" AltJSON :>

5757 Get '[JSON] APKListingsListResponse

@@ -61,7 +61,7 @@ type EditsAPKListingsListResource =

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

6262data EditsAPKListingsList = EditsAPKListingsList

6363 { _eapkllPackageName :: !Text

64− , _eapkllAPKVersionCode :: !(JSONText Int32)

64+ , _eapkllAPKVersionCode :: !(Textual Int32)

6565 , _eapkllEditId :: !Text

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

6767

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+2−2

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

5454 "edits" :>

5555 Capture "editId" Text :>

5656 "apks" :>

57− Capture "apkVersionCode" (JSONText Int32) :>

57+ Capture "apkVersionCode" (Textual Int32) :>

5858 "listings" :>

5959 Capture "language" Text :>

6060 QueryParam "alt" AltJSON :>

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

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

6868data EditsAPKListingsPatch = EditsAPKListingsPatch

6969 { _eapklpPackageName :: !Text

70− , _eapklpAPKVersionCode :: !(JSONText Int32)

70+ , _eapklpAPKVersionCode :: !(Textual Int32)

7171 , _eapklpPayload :: !APKListing

7272 , _eapklpLanguage :: !Text

7373 , _eapklpEditId :: !Text

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+2−2

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

5454 "edits" :>

5555 Capture "editId" Text :>

5656 "apks" :>

57− Capture "apkVersionCode" (JSONText Int32) :>

57+ Capture "apkVersionCode" (Textual Int32) :>

5858 "listings" :>

5959 Capture "language" Text :>

6060 QueryParam "alt" AltJSON :>

@@ -66,7 +66,7 @@ type EditsAPKListingsUpdateResource =

6666-- /See:/ 'editsAPKListingsUpdate' smart constructor.

6767data EditsAPKListingsUpdate = EditsAPKListingsUpdate

6868 { _eapkluPackageName :: !Text

69− , _eapkluAPKVersionCode :: !(JSONText Int32)

69+ , _eapkluAPKVersionCode :: !(Textual Int32)

7070 , _eapkluPayload :: !APKListing

7171 , _eapkluLanguage :: !Text

7272 , _eapkluEditId :: !Text

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Get.hs+2−2

@@ -52,7 +52,7 @@ type EditsExpansionFilesGetResource =

5252 "edits" :>

5353 Capture "editId" Text :>

5454 "apks" :>

55− Capture "apkVersionCode" (JSONText Int32) :>

55+ Capture "apkVersionCode" (Textual Int32) :>

5656 "expansionFiles" :>

5757 Capture "expansionFileType"

5858 EditsExpansionFilesGetExpansionFileType

@@ -64,7 +64,7 @@ type EditsExpansionFilesGetResource =

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

6565data EditsExpansionFilesGet = EditsExpansionFilesGet

6666 { _eefgPackageName :: !Text

67− , _eefgAPKVersionCode :: !(JSONText Int32)

67+ , _eefgAPKVersionCode :: !(Textual Int32)

6868 , _eefgExpansionFileType :: !EditsExpansionFilesGetExpansionFileType

6969 , _eefgEditId :: !Text

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Patch.hs+2−2

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

5555 "edits" :>

5656 Capture "editId" Text :>

5757 "apks" :>

58− Capture "apkVersionCode" (JSONText Int32) :>

58+ Capture "apkVersionCode" (Textual Int32) :>

5959 "expansionFiles" :>

6060 Capture "expansionFileType"

6161 EditsExpansionFilesPatchExpansionFileType

@@ -71,7 +71,7 @@ type EditsExpansionFilesPatchResource =

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

7272data EditsExpansionFilesPatch = EditsExpansionFilesPatch

7373 { _eefpPackageName :: !Text

74− , _eefpAPKVersionCode :: !(JSONText Int32)

74+ , _eefpAPKVersionCode :: !(Textual Int32)

7575 , _eefpPayload :: !ExpansionFile

7676 , _eefpExpansionFileType :: !EditsExpansionFilesPatchExpansionFileType

7777 , _eefpEditId :: !Text

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Update.hs+2−2

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

5555 "edits" :>

5656 Capture "editId" Text :>

5757 "apks" :>

58− Capture "apkVersionCode" (JSONText Int32) :>

58+ Capture "apkVersionCode" (Textual Int32) :>

5959 "expansionFiles" :>

6060 Capture "expansionFileType"

6161 EditsExpansionFilesUpdateExpansionFileType

@@ -71,7 +71,7 @@ type EditsExpansionFilesUpdateResource =

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

7272data EditsExpansionFilesUpdate = EditsExpansionFilesUpdate

7373 { _eefuPackageName :: !Text

74− , _eefuAPKVersionCode :: !(JSONText Int32)

74+ , _eefuAPKVersionCode :: !(Textual Int32)

7575 , _eefuPayload :: !ExpansionFile

7676 , _eefuExpansionFileType :: !EditsExpansionFilesUpdateExpansionFileType

7777 , _eefuEditId :: !Text

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Upload.hs+3−3

@@ -52,7 +52,7 @@ type EditsExpansionFilesUploadResource =

5252 "edits" :>

5353 Capture "editId" Text :>

5454 "apks" :>

55− Capture "apkVersionCode" (JSONText Int32) :>

55+ Capture "apkVersionCode" (Textual Int32) :>

5656 "expansionFiles" :>

5757 Capture "expansionFileType"

5858 EditsExpansionFilesUploadExpansionFileType

@@ -68,7 +68,7 @@ type EditsExpansionFilesUploadResource =

6868 "edits" :>

6969 Capture "editId" Text :>

7070 "apks" :>

71− Capture "apkVersionCode" (JSONText Int32) :>

71+ Capture "apkVersionCode" (Textual Int32) :>

7272 "expansionFiles" :>

7373 Capture "expansionFileType"

7474 EditsExpansionFilesUploadExpansionFileType

@@ -83,7 +83,7 @@ type EditsExpansionFilesUploadResource =

8383-- /See:/ 'editsExpansionFilesUpload' smart constructor.

8484data EditsExpansionFilesUpload = EditsExpansionFilesUpload

8585 { _ePackageName :: !Text

86− , _eAPKVersionCode :: !(JSONText Int32)

86+ , _eAPKVersionCode :: !(Textual Int32)

8787 , _eExpansionFileType :: !EditsExpansionFilesUploadExpansionFileType

8888 , _eEditId :: !Text

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Entitlements/List.hs+4−4

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

5252 Capture "packageName" Text :>

5353 "entitlements" :>

5454 QueryParam "token" Text :>

55− QueryParam "startIndex" (JSONText Word32) :>

55+ QueryParam "startIndex" (Textual Word32) :>

5656 QueryParam "productId" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] EntitlementsListResponse

6060

@@ -64,9 +64,9 @@ type EntitlementsListResource =

6464data EntitlementsList = EntitlementsList

6565 { _elPackageName :: !Text

6666 , _elToken :: !(Maybe Text)

67− , _elStartIndex :: !(Maybe (JSONText Word32))

67+ , _elStartIndex :: !(Maybe (Textual Word32))

6868 , _elProductId :: !(Maybe Text)

69− , _elMaxResults :: !(Maybe (JSONText Word32))

69+ , _elMaxResults :: !(Maybe (Textual Word32))

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

7171

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

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/InAppProducts/List.hs+4−4

@@ -52,8 +52,8 @@ type InAppProductsListResource =

5252 Capture "packageName" Text :>

5353 "inappproducts" :>

5454 QueryParam "token" Text :>

55− QueryParam "startIndex" (JSONText Word32) :>

56− QueryParam "maxResults" (JSONText Word32) :>

55+ QueryParam "startIndex" (Textual Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] InAppProductsListResponse

5959

@@ -64,8 +64,8 @@ type InAppProductsListResource =

6464data InAppProductsList = InAppProductsList

6565 { _iaplPackageName :: !Text

6666 , _iaplToken :: !(Maybe Text)

67− , _iaplStartIndex :: !(Maybe (JSONText Word32))

68− , _iaplMaxResults :: !(Maybe (JSONText Word32))

67+ , _iaplStartIndex :: !(Maybe (Textual Word32))

68+ , _iaplMaxResults :: !(Maybe (Textual Word32))

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

7070

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

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+16−16

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

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

6161data Status = Status

6262 { _sDetails :: !(Maybe [StatusDetailsItem])

63− , _sCode :: !(Maybe (JSONText Int32))

63+ , _sCode :: !(Maybe (Textual Int32))

6464 , _sMessage :: !(Maybe Text)

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

6666

@@ -492,13 +492,13 @@ instance ToJSON ListOperationsResponse where

492492--

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

494494data HealthCheck = HealthCheck

495− { _hcHealthyThreshold :: !(Maybe (JSONText Word32))

495+ { _hcHealthyThreshold :: !(Maybe (Textual Word32))

496496 , _hcDisableHealthCheck :: !(Maybe Bool)

497497 , _hcCheckInterval :: !(Maybe Text)

498− , _hcRestartThreshold :: !(Maybe (JSONText Word32))

498+ , _hcRestartThreshold :: !(Maybe (Textual Word32))

499499 , _hcHost :: !(Maybe Text)

500500 , _hcTimeout :: !(Maybe Text)

501− , _hcUnhealthyThreshold :: !(Maybe (JSONText Word32))

501+ , _hcUnhealthyThreshold :: !(Maybe (Textual Word32))

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

503503

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

@@ -1152,13 +1152,13 @@ instance ToJSON FileInfo where

11521152--

11531153-- /See:/ 'automaticScaling' smart constructor.

11541154data AutomaticScaling = AutomaticScaling

1155− { _asMaxTotalInstances :: !(Maybe (JSONText Int32))

1156− , _asMinIdleInstances :: !(Maybe (JSONText Int32))

1155+ { _asMaxTotalInstances :: !(Maybe (Textual Int32))

1156+ , _asMinIdleInstances :: !(Maybe (Textual Int32))

11571157 , _asMinPendingLatency :: !(Maybe Text)

11581158 , _asCPUUtilization :: !(Maybe CPUUtilization)

1159− , _asMaxIdleInstances :: !(Maybe (JSONText Int32))

1160− , _asMinTotalInstances :: !(Maybe (JSONText Int32))

1161− , _asMaxConcurrentRequests :: !(Maybe (JSONText Int32))

1159+ , _asMaxIdleInstances :: !(Maybe (Textual Int32))

1160+ , _asMinTotalInstances :: !(Maybe (Textual Int32))

1161+ , _asMaxConcurrentRequests :: !(Maybe (Textual Int32))

11621162 , _asCoolDownPeriod :: !(Maybe Text)

11631163 , _asMaxPendingLatency :: !(Maybe Text)

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

@@ -1521,9 +1521,9 @@ instance ToJSON StaticFilesHandlerHTTPHeaders where

15211521--

15221522-- /See:/ 'resources' smart constructor.

15231523data Resources = Resources

1524− { _rMemoryGb :: !(Maybe (JSONText Double))

1525− , _rDiskGb :: !(Maybe (JSONText Double))

1526− , _rCPU :: !(Maybe (JSONText Double))

1524+ { _rMemoryGb :: !(Maybe (Textual Double))

1525+ , _rDiskGb :: !(Maybe (Textual Double))

1526+ , _rCPU :: !(Maybe (Textual Double))

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

15281528

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

@@ -1617,7 +1617,7 @@ instance ToJSON DeploymentFiles where

16171617-- /See:/ 'cpuUtilization' smart constructor.

16181618data CPUUtilization = CPUUtilization

16191619 { _cuAggregationWindowLength :: !(Maybe Text)

1620− , _cuTargetUtilization :: !(Maybe (JSONText Double))

1620+ , _cuTargetUtilization :: !(Maybe (Textual Double))

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

16221622

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

@@ -1675,7 +1675,7 @@ instance ToJSON CPUUtilization where

16751675--

16761676-- /See:/ 'trafficSplitAllocations' smart constructor.

16771677newtype TrafficSplitAllocations = TrafficSplitAllocations

1678− { _tsaAddtional :: HashMap Text (JSONText Double)

1678+ { _tsaAddtional :: HashMap Text (Textual Double)

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

16801680

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

@@ -1710,7 +1710,7 @@ instance ToJSON TrafficSplitAllocations where

17101710--

17111711-- /See:/ 'manualScaling' smart constructor.

17121712newtype ManualScaling = ManualScaling

1713− { _msInstances :: Maybe (JSONText Int32)

1713+ { _msInstances :: Maybe (Textual Int32)

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

17151715

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

@@ -1751,7 +1751,7 @@ instance ToJSON ManualScaling where

17511751--

17521752-- /See:/ 'basicScaling' smart constructor.

17531753data BasicScaling = BasicScaling

1754− { _bsMaxInstances :: !(Maybe (JSONText Int32))

1754+ { _bsMaxInstances :: !(Maybe (Textual Int32))

17551755 , _bsIdleTimeout :: !(Maybe Text)

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

17571757

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/List.hs+2−2

@@ -62,7 +62,7 @@ type AppsModulesListResource =

6262 QueryParam "uploadType" Text :>

6363 QueryParam "bearer_token" Text :>

6464 QueryParam "pageToken" Text :>

65− QueryParam "pageSize" (JSONText Int32) :>

65+ QueryParam "pageSize" (Textual Int32) :>

6666 QueryParam "callback" Text :>

6767 QueryParam "alt" AltJSON :>

6868 Get '[JSON] ListModulesResponse

@@ -79,7 +79,7 @@ data AppsModulesList = AppsModulesList

7979 , _amlBearerToken :: !(Maybe Text)

8080 , _amlAppsId :: !Text

8181 , _amlPageToken :: !(Maybe Text)

82− , _amlPageSize :: !(Maybe (JSONText Int32))

82+ , _amlPageSize :: !(Maybe (Textual Int32))

8383 , _amlCallback :: !(Maybe Text)

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

8585

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Modules/Versions/List.hs+2−2

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

6767 QueryParam "bearer_token" Text :>

6868 QueryParam "view" Text :>

6969 QueryParam "pageToken" Text :>

70− QueryParam "pageSize" (JSONText Int32) :>

70+ QueryParam "pageSize" (Textual Int32) :>

7171 QueryParam "callback" Text :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] ListVersionsResponse

@@ -86,7 +86,7 @@ data AppsModulesVersionsList = AppsModulesVersionsList

8686 , _amvlAppsId :: !Text

8787 , _amvlView :: !(Maybe Text)

8888 , _amvlPageToken :: !(Maybe Text)

89− , _amvlPageSize :: !(Maybe (JSONText Int32))

89+ , _amvlPageSize :: !(Maybe (Textual Int32))

9090 , _amvlCallback :: !(Maybe Text)

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

9292

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Operations/List.hs+2−2

@@ -68,7 +68,7 @@ type AppsOperationsListResource =

6868 QueryParam "bearer_token" Text :>

6969 QueryParam "filter" Text :>

7070 QueryParam "pageToken" Text :>

71− QueryParam "pageSize" (JSONText Int32) :>

71+ QueryParam "pageSize" (Textual Int32) :>

7272 QueryParam "callback" Text :>

7373 QueryParam "alt" AltJSON :>

7474 Get '[JSON] ListOperationsResponse

@@ -90,7 +90,7 @@ data AppsOperationsList = AppsOperationsList

9090 , _aolAppsId :: !Text

9191 , _aolFilter :: !(Maybe Text)

9292 , _aolPageToken :: !(Maybe Text)

93− , _aolPageSize :: !(Maybe (JSONText Int32))

93+ , _aolPageSize :: !(Maybe (Textual Int32))

9494 , _aolCallback :: !(Maybe Text)

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

9696

gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Product.hs+1−1

@@ -112,7 +112,7 @@ instance ToJSON Photo where

112112data Event = Event

113113 { _ePrimaryEventType :: !(Maybe EventPrimaryEventType)

114114 , _eUser :: !(Maybe User)

115− , _eEventTimeMillis :: !(Maybe (JSONText Word64))

115+ , _eEventTimeMillis :: !(Maybe (Textual Word64))

116116 , _eRename :: !(Maybe Rename)

117117 , _eFromUserDeletion :: !(Maybe Bool)

118118 , _eAdditionalEventTypes :: !(Maybe [EventAdditionalEventTypesItem])

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+2−2

@@ -64,7 +64,7 @@ type ActivitiesListResource =

6464 QueryParam "userId" Text :>

6565 QueryParam "source" Text :>

6666 QueryParam "pageToken" Text :>

67− QueryParam "pageSize" (JSONText Int32) :>

67+ QueryParam "pageSize" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] ListActivitiesResponse

7070

@@ -83,7 +83,7 @@ data ActivitiesList = ActivitiesList

8383 , _alUserId :: !Text

8484 , _alSource :: !(Maybe Text)

8585 , _alPageToken :: !(Maybe Text)

86− , _alPageSize :: !(JSONText Int32)

86+ , _alPageSize :: !(Textual Int32)

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

8888

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

gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+8−8

@@ -299,7 +299,7 @@ data Event = Event

299299 , _eGuestsCanInviteOthers :: !Bool

300300 , _eRecurrence :: !(Maybe [Text])

301301 , _eGadget :: !(Maybe EventGadget)

302− , _eSequence :: !(Maybe (JSONText Int32))

302+ , _eSequence :: !(Maybe (Textual Int32))

303303 , _eICalUId :: !(Maybe Text)

304304 , _eEnd :: !(Maybe EventDateTime)

305305 , _eAttendeesOmitted :: !Bool

@@ -1314,7 +1314,7 @@ data Channel = Channel

13141314 { _cResourceURI :: !(Maybe Text)

13151315 , _cResourceId :: !(Maybe Text)

13161316 , _cKind :: !Text

1317− , _cExpiration :: !(Maybe (JSONText Int64))

1317+ , _cExpiration :: !(Maybe (Textual Int64))

13181318 , _cToken :: !(Maybe Text)

13191319 , _cAddress :: !(Maybe Text)

13201320 , _cPayload :: !(Maybe Bool)

@@ -1982,7 +1982,7 @@ data EventAttendee = EventAttendee

19821982 , _eaResponseStatus :: !(Maybe Text)

19831983 , _eaSelf :: !Bool

19841984 , _eaResource :: !Bool

1985− , _eaAdditionalGuests :: !(JSONText Int32)

1985+ , _eaAdditionalGuests :: !(Textual Int32)

19861986 , _eaDisplayName :: !(Maybe Text)

19871987 , _eaId :: !(Maybe Text)

19881988 , _eaComment :: !(Maybe Text)

@@ -2302,7 +2302,7 @@ instance ToJSON FreeBusyResponse where

23022302-- /See:/ 'eventReminder' smart constructor.

23032303data EventReminder = EventReminder

23042304 { _erMethod :: !(Maybe Text)

2305− , _erMinutes :: !(Maybe (JSONText Int32))

2305+ , _erMinutes :: !(Maybe (Textual Int32))

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

23072307

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

@@ -2621,12 +2621,12 @@ instance ToJSON CalendarList where

26212621--

26222622-- /See:/ 'eventGadget' smart constructor.

26232623data EventGadget = EventGadget

2624− { _egHeight :: !(Maybe (JSONText Int32))

2624+ { _egHeight :: !(Maybe (Textual Int32))

26252625 , _egDisplay :: !(Maybe Text)

26262626 , _egPreferences :: !(Maybe EventGadgetPreferences)

26272627 , _egLink :: !(Maybe Text)

26282628 , _egIconLink :: !(Maybe Text)

2629− , _egWidth :: !(Maybe (JSONText Int32))

2629+ , _egWidth :: !(Maybe (Textual Int32))

26302630 , _egTitle :: !(Maybe Text)

26312631 , _egType :: !(Maybe Text)

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

@@ -2771,10 +2771,10 @@ instance ToJSON EventGadgetPreferences where

27712771--

27722772-- /See:/ 'freeBusyRequest' smart constructor.

27732773data FreeBusyRequest = FreeBusyRequest

2774− { _fCalendarExpansionMax :: !(Maybe (JSONText Int32))

2774+ { _fCalendarExpansionMax :: !(Maybe (Textual Int32))

27752775 , _fTimeMin :: !(Maybe DateTime')

27762776 , _fItems :: !(Maybe [FreeBusyRequestItem])

2777− , _fGroupExpansionMax :: !(Maybe (JSONText Int32))

2777+ , _fGroupExpansionMax :: !(Maybe (Textual Int32))

27782778 , _fTimeZone :: !Text

27792779 , _fTimeMax :: !(Maybe DateTime')

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+2−2

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

5454 QueryParam "syncToken" Text :>

5555 QueryParam "showDeleted" Bool :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] ACL

5959

6060-- | Returns the rules in the access control list for the calendar.

@@ -65,7 +65,7 @@ data ACLList = ACLList

6565 , _alCalendarId :: !Text

6666 , _alShowDeleted :: !(Maybe Bool)

6767 , _alPageToken :: !(Maybe Text)

68− , _alMaxResults :: !(Maybe (JSONText Int32))

68+ , _alMaxResults :: !(Maybe (Textual Int32))

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

7070

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+2−2

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

5656 QueryParam "syncToken" Text :>

5757 QueryParam "showDeleted" Bool :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :>

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

6262

@@ -69,7 +69,7 @@ data ACLWatch = ACLWatch

6969 , _awShowDeleted :: !(Maybe Bool)

7070 , _awPayload :: !Channel

7171 , _awPageToken :: !(Maybe Text)

72− , _awMaxResults :: !(Maybe (JSONText Int32))

72+ , _awMaxResults :: !(Maybe (Textual Int32))

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

7474

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/List.hs+2−2

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

5959 QueryParam "showDeleted" Bool :>

6060 QueryParam "showHidden" Bool :>

6161 QueryParam "pageToken" Text :>

62− QueryParam "maxResults" (JSONText Int32) :>

62+ QueryParam "maxResults" (Textual Int32) :>

6363 QueryParam "alt" AltJSON :> Get '[JSON] CalendarList

6464

6565-- | Returns entries on the user\'s calendar list.

@@ -71,7 +71,7 @@ data CalendarListList = CalendarListList

7171 , _cllShowDeleted :: !(Maybe Bool)

7272 , _cllShowHidden :: !(Maybe Bool)

7373 , _cllPageToken :: !(Maybe Text)

74− , _cllMaxResults :: !(Maybe (JSONText Int32))

74+ , _cllMaxResults :: !(Maybe (Textual Int32))

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

7676

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/CalendarList/Watch.hs+2−2

@@ -61,7 +61,7 @@ type CalendarListWatchResource =

6161 QueryParam "showDeleted" Bool :>

6262 QueryParam "showHidden" Bool :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "maxResults" (JSONText Int32) :>

64+ QueryParam "maxResults" (Textual Int32) :>

6565 QueryParam "alt" AltJSON :>

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

6767

@@ -75,7 +75,7 @@ data CalendarListWatch = CalendarListWatch

7575 , _clwPayload :: !Channel

7676 , _clwShowHidden :: !(Maybe Bool)

7777 , _clwPageToken :: !(Maybe Text)

78− , _clwMaxResults :: !(Maybe (JSONText Int32))

78+ , _clwMaxResults :: !(Maybe (Textual Int32))

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

8080

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Get.hs+2−2

@@ -52,7 +52,7 @@ type EventsGetResource =

5252 Capture "calendarId" Text :>

5353 "events" :>

5454 Capture "eventId" Text :>

55− QueryParam "maxAttendees" (JSONText Int32) :>

55+ QueryParam "maxAttendees" (Textual Int32) :>

5656 QueryParam "timeZone" Text :>

5757 QueryParam "alwaysIncludeEmail" Bool :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] Event

@@ -62,7 +62,7 @@ type EventsGetResource =

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

6363data EventsGet = EventsGet

6464 { _egCalendarId :: !Text

65− , _egMaxAttendees :: !(Maybe (JSONText Int32))

65+ , _egMaxAttendees :: !(Maybe (Textual Int32))

6666 , _egTimeZone :: !(Maybe Text)

6767 , _egAlwaysIncludeEmail :: !(Maybe Bool)

6868 , _egEventId :: !Text

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Insert.hs+2−2

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

5151 "calendars" :>

5252 Capture "calendarId" Text :>

5353 "events" :>

54− QueryParam "maxAttendees" (JSONText Int32) :>

54+ QueryParam "maxAttendees" (Textual Int32) :>

5555 QueryParam "sendNotifications" Bool :>

5656 QueryParam "supportsAttachments" Bool :>

5757 QueryParam "alt" AltJSON :>

@@ -63,7 +63,7 @@ type EventsInsertResource =

6363data EventsInsert = EventsInsert

6464 { _eveCalendarId :: !Text

6565 , _evePayload :: !Event

66− , _eveMaxAttendees :: !(Maybe (JSONText Int32))

66+ , _eveMaxAttendees :: !(Maybe (Textual Int32))

6767 , _eveSendNotifications :: !(Maybe Bool)

6868 , _eveSupportsAttachments :: !(Maybe Bool)

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Instances.hs+4−4

@@ -62,10 +62,10 @@ type EventsInstancesResource =

6262 QueryParam "timeMin" DateTime' :>

6363 QueryParam "showDeleted" Bool :>

6464 QueryParam "originalStart" Text :>

65− QueryParam "maxAttendees" (JSONText Int32) :>

65+ QueryParam "maxAttendees" (Textual Int32) :>

6666 QueryParam "pageToken" Text :>

6767 QueryParam "timeZone" Text :>

68− QueryParam "maxResults" (JSONText Int32) :>

68+ QueryParam "maxResults" (Textual Int32) :>

6969 QueryParam "alwaysIncludeEmail" Bool :>

7070 QueryParam "timeMax" DateTime' :>

7171 QueryParam "alt" AltJSON :>

@@ -79,10 +79,10 @@ data EventsInstances = EventsInstances

7979 , _eTimeMin :: !(Maybe DateTime')

8080 , _eShowDeleted :: !(Maybe Bool)

8181 , _eOriginalStart :: !(Maybe Text)

82− , _eMaxAttendees :: !(Maybe (JSONText Int32))

82+ , _eMaxAttendees :: !(Maybe (Textual Int32))

8383 , _ePageToken :: !(Maybe Text)

8484 , _eTimeZone :: !(Maybe Text)

85− , _eMaxResults :: !(Maybe (JSONText Int32))

85+ , _eMaxResults :: !(Maybe (Textual Int32))

8686 , _eAlwaysIncludeEmail :: !(Maybe Bool)

8787 , _eTimeMax :: !(Maybe DateTime')

8888 , _eEventId :: !Text

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+4−4

@@ -72,7 +72,7 @@ type EventsListResource =

7272 QueryParam "showDeleted" Bool :>

7373 QueryParam "q" Text :>

7474 QueryParams "sharedExtendedProperty" Text :>

75− QueryParam "maxAttendees" (JSONText Int32) :>

75+ QueryParam "maxAttendees" (Textual Int32) :>

7676 QueryParam "iCalUID" Text :>

7777 QueryParam "updatedMin" DateTime' :>

7878 QueryParam "pageToken" Text :>

@@ -80,7 +80,7 @@ type EventsListResource =

8080 QueryParam "showHiddenInvitations" Bool

8181 :>

8282 QueryParam "maxResults"

83− (JSONText Int32)

83+ (Textual Int32)

8484 :>

8585 QueryParam "alwaysIncludeEmail"

8686 Bool

@@ -102,13 +102,13 @@ data EventsList = EventsList

102102 , _elShowDeleted :: !(Maybe Bool)

103103 , _elQ :: !(Maybe Text)

104104 , _elSharedExtendedProperty :: !(Maybe [Text])

105− , _elMaxAttendees :: !(Maybe (JSONText Int32))

105+ , _elMaxAttendees :: !(Maybe (Textual Int32))

106106 , _elICalUId :: !(Maybe Text)

107107 , _elUpdatedMin :: !(Maybe DateTime')

108108 , _elPageToken :: !(Maybe Text)

109109 , _elTimeZone :: !(Maybe Text)

110110 , _elShowHiddenInvitations :: !(Maybe Bool)

111− , _elMaxResults :: !(Maybe (JSONText Int32))

111+ , _elMaxResults :: !(Maybe (Textual Int32))

112112 , _elAlwaysIncludeEmail :: !(Maybe Bool)

113113 , _elTimeMax :: !(Maybe DateTime')

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Patch.hs+2−2

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

5454 Capture "calendarId" Text :>

5555 "events" :>

5656 Capture "eventId" Text :>

57− QueryParam "maxAttendees" (JSONText Int32) :>

57+ QueryParam "maxAttendees" (Textual Int32) :>

5858 QueryParam "sendNotifications" Bool :>

5959 QueryParam "supportsAttachments" Bool :>

6060 QueryParam "alwaysIncludeEmail" Bool :>

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

6767data EventsPatch = EventsPatch

6868 { _epCalendarId :: !Text

6969 , _epPayload :: !Event

70− , _epMaxAttendees :: !(Maybe (JSONText Int32))

70+ , _epMaxAttendees :: !(Maybe (Textual Int32))

7171 , _epSendNotifications :: !(Maybe Bool)

7272 , _epSupportsAttachments :: !(Maybe Bool)

7373 , _epAlwaysIncludeEmail :: !(Maybe Bool)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Update.hs+2−2

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

5454 Capture "calendarId" Text :>

5555 "events" :>

5656 Capture "eventId" Text :>

57− QueryParam "maxAttendees" (JSONText Int32) :>

57+ QueryParam "maxAttendees" (Textual Int32) :>

5858 QueryParam "sendNotifications" Bool :>

5959 QueryParam "supportsAttachments" Bool :>

6060 QueryParam "alwaysIncludeEmail" Bool :>

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

6767data EventsUpdate = EventsUpdate

6868 { _euCalendarId :: !Text

6969 , _euPayload :: !Event

70− , _euMaxAttendees :: !(Maybe (JSONText Int32))

70+ , _euMaxAttendees :: !(Maybe (Textual Int32))

7171 , _euSendNotifications :: !(Maybe Bool)

7272 , _euSupportsAttachments :: !(Maybe Bool)

7373 , _euAlwaysIncludeEmail :: !(Maybe Bool)

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+4−4

@@ -74,7 +74,7 @@ type EventsWatchResource =

7474 QueryParam "showDeleted" Bool :>

7575 QueryParam "q" Text :>

7676 QueryParams "sharedExtendedProperty" Text :>

77− QueryParam "maxAttendees" (JSONText Int32) :>

77+ QueryParam "maxAttendees" (Textual Int32) :>

7878 QueryParam "iCalUID" Text :>

7979 QueryParam "updatedMin" DateTime' :>

8080 QueryParam "pageToken" Text :>

@@ -83,7 +83,7 @@ type EventsWatchResource =

8383 Bool

8484 :>

8585 QueryParam "maxResults"

86− (JSONText Int32)

86+ (Textual Int32)

8787 :>

8888 QueryParam "alwaysIncludeEmail"

8989 Bool

@@ -108,13 +108,13 @@ data EventsWatch = EventsWatch

108108 , _ewPayload :: !Channel

109109 , _ewQ :: !(Maybe Text)

110110 , _ewSharedExtendedProperty :: !(Maybe [Text])

111− , _ewMaxAttendees :: !(Maybe (JSONText Int32))

111+ , _ewMaxAttendees :: !(Maybe (Textual Int32))

112112 , _ewICalUId :: !(Maybe Text)

113113 , _ewUpdatedMin :: !(Maybe DateTime')

114114 , _ewPageToken :: !(Maybe Text)

115115 , _ewTimeZone :: !(Maybe Text)

116116 , _ewShowHiddenInvitations :: !(Maybe Bool)

117− , _ewMaxResults :: !(Maybe (JSONText Int32))

117+ , _ewMaxResults :: !(Maybe (Textual Int32))

118118 , _ewAlwaysIncludeEmail :: !(Maybe Bool)

119119 , _ewTimeMax :: !(Maybe DateTime')

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/List.hs+2−2

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

5151 "settings" :>

5252 QueryParam "syncToken" Text :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Int32) :>

54+ QueryParam "maxResults" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] Settings

5656

5757-- | Returns all user settings for the authenticated user.

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

6060data SettingsList = SettingsList

6161 { _slSyncToken :: !(Maybe Text)

6262 , _slPageToken :: !(Maybe Text)

63− , _slMaxResults :: !(Maybe (JSONText Int32))

63+ , _slMaxResults :: !(Maybe (Textual Int32))

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

6565

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

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Settings/Watch.hs+2−2

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

5353 "watch" :>

5454 QueryParam "syncToken" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

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

5959

@@ -64,7 +64,7 @@ data SettingsWatch = SettingsWatch

6464 { _swSyncToken :: !(Maybe Text)

6565 , _swPayload :: !Channel

6666 , _swPageToken :: !(Maybe Text)

67− , _swMaxResults :: !(Maybe (JSONText Int32))

67+ , _swMaxResults :: !(Maybe (Textual Int32))

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

6969

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

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProduct.hs+2−2

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

5353 "users" :>

5454 QueryParam "customerId" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] LicenseAssignmentList

5959

@@ -64,7 +64,7 @@ data LicenseAssignmentsListForProduct = LicenseAssignmentsListForProduct

6464 { _lalfpCustomerId :: !Text

6565 , _lalfpPageToken :: !Text

6666 , _lalfpProductId :: !Text

67− , _lalfpMaxResults :: !(JSONText Word32)

67+ , _lalfpMaxResults :: !(Textual Word32)

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

6969

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

gogol-apps-licensing/gen/Network/Google/Resource/Licensing/LicenseAssignments/ListForProductAndSKU.hs+2−2

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

5656 "users" :>

5757 QueryParam "customerId" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] LicenseAssignmentList

6262

@@ -68,7 +68,7 @@ data LicenseAssignmentsListForProductAndSKU = LicenseAssignmentsListForProductAn

6868 , _lalfpaskuCustomerId :: !Text

6969 , _lalfpaskuPageToken :: !Text

7070 , _lalfpaskuProductId :: !Text

71− , _lalfpaskuMaxResults :: !(JSONText Word32)

71+ , _lalfpaskuMaxResults :: !(Textual Word32)

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

7373

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

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Product.hs+9−9

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

2525-- /See:/ 'subscriptionTrialSettings' smart constructor.

2626data SubscriptionTrialSettings = SubscriptionTrialSettings

2727 { _stsIsInTrial :: !(Maybe Bool)

28− , _stsTrialEndTime :: !(Maybe (JSONText Int64))

28+ , _stsTrialEndTime :: !(Maybe (Textual Int64))

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

3030

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

@@ -389,8 +389,8 @@ instance ToJSON ChangePlanRequest where

389389--

390390-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

391391data SubscriptionPlanCommitmentInterval = SubscriptionPlanCommitmentInterval

392− { _spciStartTime :: !(Maybe (JSONText Int64))

393− , _spciEndTime :: !(Maybe (JSONText Int64))

392+ { _spciStartTime :: !(Maybe (Textual Int64))

393+ , _spciEndTime :: !(Maybe (Textual Int64))

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

395395

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

@@ -565,9 +565,9 @@ instance ToJSON Subscriptions where

565565--

566566-- /See:/ 'seats' smart constructor.

567567data Seats = Seats

568− { _seaNumberOfSeats :: !(Maybe (JSONText Int32))

569− , _seaMaximumNumberOfSeats :: !(Maybe (JSONText Int32))

570− , _seaLicensedNumberOfSeats :: !(Maybe (JSONText Int32))

568+ { _seaNumberOfSeats :: !(Maybe (Textual Int32))

569+ , _seaMaximumNumberOfSeats :: !(Maybe (Textual Int32))

570+ , _seaLicensedNumberOfSeats :: !(Maybe (Textual Int32))

571571 , _seaKind :: !Text

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

573573

@@ -695,7 +695,7 @@ instance ToJSON RenewalSettings where

695695--

696696-- /See:/ 'subscription' smart constructor.

697697data Subscription = Subscription

698− { _subCreationTime :: !(Maybe (JSONText Int64))

698+ { _subCreationTime :: !(Maybe (Textual Int64))

699699 , _subBillingMethod :: !(Maybe Text)

700700 , _subStatus :: !(Maybe Text)

701701 , _subTrialSettings :: !(Maybe SubscriptionTrialSettings)

@@ -893,8 +893,8 @@ instance ToJSON Subscription where

893893--

894894-- /See:/ 'subscriptionTransferInfo' smart constructor.

895895data SubscriptionTransferInfo = SubscriptionTransferInfo

896− { _stiTransferabilityExpirationTime :: !(Maybe (JSONText Int64))

897− , _stiMinimumTransferableSeats :: !(Maybe (JSONText Int32))

896+ { _stiTransferabilityExpirationTime :: !(Maybe (Textual Int64))

897+ , _stiMinimumTransferableSeats :: !(Maybe (Textual Int32))

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

899899

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

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/List.hs+2−2

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

5555 QueryParam "customerId" Text :>

5656 QueryParam "customerAuthToken" Text :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] Subscriptions

6060

6161-- | Lists subscriptions of a reseller, optionally filtered by a customer

@@ -67,7 +67,7 @@ data SubscriptionsList = SubscriptionsList

6767 , _slCustomerId :: !(Maybe Text)

6868 , _slCustomerAuthToken :: !(Maybe Text)

6969 , _slPageToken :: !(Maybe Text)

70− , _slMaxResults :: !(Maybe (JSONText Word32))

70+ , _slMaxResults :: !(Maybe (Textual Word32))

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

7272

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

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/List.hs+2−2

@@ -49,7 +49,7 @@ type TaskListsListResource =

4949 "@me" :>

5050 "lists" :>

5151 QueryParam "pageToken" Text :>

52− QueryParam "maxResults" (JSONText Int64) :>

52+ QueryParam "maxResults" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :> Get '[JSON] TaskLists

5454

5555-- | Returns all the authenticated user\'s task lists.

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

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

5858data TaskListsList = TaskListsList

5959 { _tllPageToken :: !(Maybe Text)

60− , _tllMaxResults :: !(Maybe (JSONText Int64))

60+ , _tllMaxResults :: !(Maybe (Textual Int64))

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

6262

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

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+2−2

@@ -66,7 +66,7 @@ type TasksListResource =

6666 QueryParam "updatedMin" Text :>

6767 QueryParam "completedMin" Text :>

6868 QueryParam "pageToken" Text :>

69− QueryParam "maxResults" (JSONText Int64) :>

69+ QueryParam "maxResults" (Textual Int64) :>

7070 QueryParam "alt" AltJSON :> Get '[JSON] Tasks

7171

7272-- | Returns all tasks in the specified task list.

@@ -83,7 +83,7 @@ data TasksList = TasksList

8383 , _tlTaskList :: !Text

8484 , _tlCompletedMin :: !(Maybe Text)

8585 , _tlPageToken :: !(Maybe Text)

86− , _tlMaxResults :: !(Maybe (JSONText Int64))

86+ , _tlMaxResults :: !(Maybe (Textual Int64))

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

8888

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

gogol-appstate/gen/Network/Google/AppState/Types/Product.hs+3−3

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

2626data WriteResult = WriteResult

2727 { _wrCurrentStateVersion :: !(Maybe Text)

2828 , _wrKind :: !Text

29− , _wrStateKey :: !(Maybe (JSONText Int32))

29+ , _wrStateKey :: !(Maybe (Textual Int32))

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

3131

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

@@ -86,7 +86,7 @@ instance ToJSON WriteResult where

8686--

8787-- /See:/ 'listResponse' smart constructor.

8888data ListResponse = ListResponse

89− { _lrMaximumKeyCount :: !(Maybe (JSONText Int32))

89+ { _lrMaximumKeyCount :: !(Maybe (Textual Int32))

9090 , _lrKind :: !Text

9191 , _lrItems :: !(Maybe [GetResponse])

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

@@ -150,7 +150,7 @@ data GetResponse = GetResponse

150150 { _grCurrentStateVersion :: !(Maybe Text)

151151 , _grKind :: !Text

152152 , _grData :: !(Maybe Text)

153− , _grStateKey :: !(Maybe (JSONText Int32))

153+ , _grStateKey :: !(Maybe (Textual Int32))

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

155155

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

gogol-appstate/gen/Network/Google/Resource/AppState/States/Clear.hs+2−2

@@ -48,7 +48,7 @@ type StatesClearResource =

4848 "appstate" :>

4949 "v1" :>

5050 "states" :>

51− Capture "stateKey" (JSONText Int32) :>

51+ Capture "stateKey" (Textual Int32) :>

5252 "clear" :>

5353 QueryParam "currentDataVersion" Text :>

5454 QueryParam "alt" AltJSON :> Post '[JSON] WriteResult

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

5959--

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

6161data StatesClear = StatesClear

62− { _scStateKey :: !(JSONText Int32)

62+ { _scStateKey :: !(Textual Int32)

6363 , _scCurrentDataVersion :: !(Maybe Text)

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

6565

gogol-appstate/gen/Network/Google/Resource/AppState/States/Delete.hs+2−2

@@ -49,7 +49,7 @@ type StatesDeleteResource =

4949 "appstate" :>

5050 "v1" :>

5151 "states" :>

52− Capture "stateKey" (JSONText Int32) :>

52+ Capture "stateKey" (Textual Int32) :>

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

5454

5555-- | Deletes a key and the data associated with it. The key is removed and no

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

6060--

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

6262newtype StatesDelete = StatesDelete

63− { _sdStateKey :: JSONText Int32

63+ { _sdStateKey :: Textual Int32

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

6565

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

gogol-appstate/gen/Network/Google/Resource/AppState/States/Get.hs+2−2

@@ -46,7 +46,7 @@ type StatesGetResource =

4646 "appstate" :>

4747 "v1" :>

4848 "states" :>

49− Capture "stateKey" (JSONText Int32) :>

49+ Capture "stateKey" (Textual Int32) :>

5050 QueryParam "alt" AltJSON :> Get '[JSON] GetResponse

5151

5252-- | Retrieves the data corresponding to the passed key. If the key does not

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

5454--

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

5656newtype StatesGet = StatesGet

57− { _sgStateKey :: JSONText Int32

57+ { _sgStateKey :: Textual Int32

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

5959

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

gogol-appstate/gen/Network/Google/Resource/AppState/States/Update.hs+2−2

@@ -49,7 +49,7 @@ type StatesUpdateResource =

4949 "appstate" :>

5050 "v1" :>

5151 "states" :>

52− Capture "stateKey" (JSONText Int32) :>

52+ Capture "stateKey" (Textual Int32) :>

5353 QueryParam "currentStateVersion" Text :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] UpdateRequest :>

@@ -62,7 +62,7 @@ type StatesUpdateResource =

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

6363data StatesUpdate = StatesUpdate

6464 { _suCurrentStateVersion :: !(Maybe Text)

65− , _suStateKey :: !(JSONText Int32)

65+ , _suStateKey :: !(Textual Int32)

6666 , _suPayload :: !UpdateRequest

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

6868

gogol-autoscaler/gen/Network/Google/Autoscaler/Types/Product.hs+12−12

@@ -141,7 +141,7 @@ instance ToJSON DeprecationStatus where

141141--

142142-- /See:/ 'autoscalingPolicyCustomMetricUtilization' smart constructor.

143143data AutoscalingPolicyCustomMetricUtilization = AutoscalingPolicyCustomMetricUtilization

144− { _apcmuUtilizationTarget :: !(Maybe (JSONText Double))

144+ { _apcmuUtilizationTarget :: !(Maybe (Textual Double))

145145 , _apcmuMetric :: !(Maybe Text)

146146 , _apcmuUtilizationTargetType :: !(Maybe Text)

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

@@ -287,24 +287,24 @@ instance ToJSON OperationList where

287287--

288288-- /See:/ 'operation' smart constructor.

289289data Operation = Operation

290− { _oTargetId :: !(Maybe (JSONText Word64))

290+ { _oTargetId :: !(Maybe (Textual Word64))

291291 , _oStatus :: !(Maybe Text)

292292 , _oInsertTime :: !(Maybe Text)

293− , _oProgress :: !(Maybe (JSONText Int32))

293+ , _oProgress :: !(Maybe (Textual Int32))

294294 , _oStartTime :: !(Maybe Text)

295295 , _oKind :: !Text

296296 , _oError :: !(Maybe OperationError)

297297 , _oHTTPErrorMessage :: !(Maybe Text)

298298 , _oZone :: !(Maybe Text)

299299 , _oWarnings :: !(Maybe [OperationWarningsItem])

300− , _oHTTPErrorStatusCode :: !(Maybe (JSONText Int32))

300+ , _oHTTPErrorStatusCode :: !(Maybe (Textual Int32))

301301 , _oUser :: !(Maybe Text)

302302 , _oSelfLink :: !(Maybe Text)

303303 , _oName :: !(Maybe Text)

304304 , _oStatusMessage :: !(Maybe Text)

305305 , _oCreationTimestamp :: !(Maybe Text)

306306 , _oEndTime :: !(Maybe Text)

307− , _oId :: !(Maybe (JSONText Word64))

307+ , _oId :: !(Maybe (Textual Word64))

308308 , _oOperationType :: !(Maybe Text)

309309 , _oRegion :: !(Maybe Text)

310310 , _oTargetLink :: !(Maybe Text)

@@ -535,7 +535,7 @@ instance ToJSON Operation where

535535--

536536-- /See:/ 'autoscalingPolicyLoadBalancingUtilization' smart constructor.

537537newtype AutoscalingPolicyLoadBalancingUtilization = AutoscalingPolicyLoadBalancingUtilization

538− { _aplbuUtilizationTarget :: Maybe (JSONText Double)

538+ { _aplbuUtilizationTarget :: Maybe (Textual Double)

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

540540

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

@@ -588,7 +588,7 @@ data Zone = Zone

588588 , _zSelfLink :: !(Maybe Text)

589589 , _zName :: !(Maybe Text)

590590 , _zCreationTimestamp :: !(Maybe Text)

591− , _zId :: !(Maybe (JSONText Word64))

591+ , _zId :: !(Maybe (Textual Word64))

592592 , _zRegion :: !(Maybe Text)

593593 , _zDescription :: !(Maybe Text)

594594 , _zDeprecated :: !(Maybe DeprecationStatus)

@@ -911,11 +911,11 @@ instance ToJSON AutoscalerListResponse where

911911-- /See:/ 'autoscalingPolicy' smart constructor.

912912data AutoscalingPolicy = AutoscalingPolicy

913913 { _apCustomMetricUtilizations :: !(Maybe [AutoscalingPolicyCustomMetricUtilization])

914− , _apMaxNumReplicas :: !(Maybe (JSONText Int32))

914+ , _apMaxNumReplicas :: !(Maybe (Textual Int32))

915915 , _apCPUUtilization :: !(Maybe AutoscalingPolicyCPUUtilization)

916916 , _apLoadBalancingUtilization :: !(Maybe AutoscalingPolicyLoadBalancingUtilization)

917− , _apMinNumReplicas :: !(Maybe (JSONText Int32))

918− , _apCoolDownPeriodSec :: !(Maybe (JSONText Int32))

917+ , _apMinNumReplicas :: !(Maybe (Textual Int32))

918+ , _apCoolDownPeriodSec :: !(Maybe (Textual Int32))

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

920920

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

@@ -1059,7 +1059,7 @@ data Autoscaler = Autoscaler

10591059 , _aName :: !(Maybe Text)

10601060 , _aCreationTimestamp :: !(Maybe Text)

10611061 , _aAutoscalingPolicy :: !(Maybe AutoscalingPolicy)

1062− , _aId :: !(Maybe (JSONText Word64))

1062+ , _aId :: !(Maybe (Textual Word64))

10631063 , _aDescription :: !(Maybe Text)

10641064 , _aTarget :: !(Maybe Text)

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

@@ -1222,7 +1222,7 @@ instance ToJSON OperationErrorErrorsItem where

12221222--

12231223-- /See:/ 'autoscalingPolicyCPUUtilization' smart constructor.

12241224newtype AutoscalingPolicyCPUUtilization = AutoscalingPolicyCPUUtilization

1225− { _apcuUtilizationTarget :: Maybe (JSONText Double)

1225+ { _apcuUtilizationTarget :: Maybe (Textual Double)

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

12271227

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

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Autoscalers/List.hs+2−2

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

5555 "autoscalers" :>

5656 QueryParam "filter" Text :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] AutoscalerListResponse

6161

@@ -67,7 +67,7 @@ data AutoscalersList = AutoscalersList

6767 , _alZone :: !Text

6868 , _alFilter :: !(Maybe Text)

6969 , _alPageToken :: !(Maybe Text)

70− , _alMaxResults :: !(JSONText Word32)

70+ , _alMaxResults :: !(Textual Word32)

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

7272

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

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/ZoneOperations/List.hs+2−2

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

5555 "operations" :>

5656 QueryParam "filter" Text :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] OperationList

6060

6161-- | Retrieves the list of operation resources contained within the specified

@@ -67,7 +67,7 @@ data ZoneOperationsList = ZoneOperationsList

6767 , _zolZone :: !Text

6868 , _zolFilter :: !(Maybe Text)

6969 , _zolPageToken :: !(Maybe Text)

70− , _zolMaxResults :: !(JSONText Word32)

70+ , _zolMaxResults :: !(Textual Word32)

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

7272

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

gogol-autoscaler/gen/Network/Google/Resource/Autoscaler/Zones/List.hs+2−2

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

5151 "zones" :>

5252 QueryParam "filter" Text :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Word32) :>

54+ QueryParam "maxResults" (Textual Word32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] ZoneList

5656

5757-- |

@@ -61,7 +61,7 @@ data ZonesList = ZonesList

6161 { _zlProject :: !Text

6262 , _zlFilter :: !(Maybe Text)

6363 , _zlPageToken :: !(Maybe Text)

64− , _zlMaxResults :: !(JSONText Word32)

64+ , _zlMaxResults :: !(Textual Word32)

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

6666

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

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+38−38

@@ -70,7 +70,7 @@ instance ToJSON JobReference where

7070--

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

7272data TableList = TableList

73− { _tlTotalItems :: !(Maybe (JSONText Int32))

73+ { _tlTotalItems :: !(Maybe (Textual Int32))

7474 , _tlEtag :: !(Maybe Text)

7575 , _tlNextPageToken :: !(Maybe Text)

7676 , _tlKind :: !Text

@@ -227,7 +227,7 @@ data TableDataList = TableDataList

227227 , _tdlKind :: !Text

228228 , _tdlRows :: !(Maybe [TableRow])

229229 , _tdlPageToken :: !(Maybe Text)

230− , _tdlTotalRows :: !(Maybe (JSONText Int64))

230+ , _tdlTotalRows :: !(Maybe (Textual Int64))

231231 } deriving (Eq,Show,Data,Typeable,Generic)

232232

233233-- | Creates a value of 'TableDataList' with the minimum fields required to make a request.

@@ -515,7 +515,7 @@ instance ToJSON TableSchema where

515515--

516516-- /See:/ 'projectList' smart constructor.

517517data ProjectList = ProjectList

518− { _plTotalItems :: !(Maybe (JSONText Int32))

518+ { _plTotalItems :: !(Maybe (Textual Int32))

519519 , _plEtag :: !(Maybe Text)

520520 , _plNextPageToken :: !(Maybe Text)

521521 , _plKind :: !Text

@@ -596,11 +596,11 @@ instance ToJSON ProjectList where

596596--

597597-- /See:/ 'jobStatistics' smart constructor.

598598data JobStatistics = JobStatistics

599− { _jsCreationTime :: !(Maybe (JSONText Int64))

600− , _jsStartTime :: !(Maybe (JSONText Int64))

599+ { _jsCreationTime :: !(Maybe (Textual Int64))

600+ , _jsStartTime :: !(Maybe (Textual Int64))

601601 , _jsLoad :: !(Maybe JobStatistics3)

602− , _jsTotalBytesProcessed :: !(Maybe (JSONText Int64))

603− , _jsEndTime :: !(Maybe (JSONText Int64))

602+ , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

603+ , _jsEndTime :: !(Maybe (Textual Int64))

604604 , _jsQuery :: !(Maybe JobStatistics2)

605605 , _jsExtract :: !(Maybe JobStatistics4)

606606 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -707,17 +707,17 @@ instance ToJSON JobStatistics where

707707--

708708-- /See:/ 'dataSet' smart constructor.

709709data DataSet = DataSet

710− { _dsCreationTime :: !(Maybe (JSONText Int64))

710+ { _dsCreationTime :: !(Maybe (Textual Int64))

711711 , _dsAccess :: !(Maybe [DataSetAccessItem])

712712 , _dsEtag :: !(Maybe Text)

713713 , _dsLocation :: !(Maybe Text)

714714 , _dsFriendlyName :: !(Maybe Text)

715715 , _dsKind :: !Text

716− , _dsLastModifiedTime :: !(Maybe (JSONText Int64))

716+ , _dsLastModifiedTime :: !(Maybe (Textual Int64))

717717 , _dsDataSetReference :: !(Maybe DataSetReference)

718718 , _dsSelfLink :: !(Maybe Text)

719719 , _dsId :: !(Maybe Text)

720− , _dsDefaultTableExpirationMs :: !(Maybe (JSONText Int64))

720+ , _dsDefaultTableExpirationMs :: !(Maybe (Textual Int64))

721721 , _dsDescription :: !(Maybe Text)

722722 } deriving (Eq,Show,Data,Typeable,Generic)

723723

@@ -898,7 +898,7 @@ data ExternalDataConfiguration = ExternalDataConfiguration

898898 , _edcCompression :: !(Maybe Text)

899899 , _edcSourceFormat :: !(Maybe Text)

900900 , _edcSchema :: !(Maybe TableSchema)

901− , _edcMaxBadRecords :: !(Maybe (JSONText Int32))

901+ , _edcMaxBadRecords :: !(Maybe (Textual Int32))

902902 , _edcSourceURIs :: !(Maybe [Text])

903903 , _edcCSVOptions :: !(Maybe CSVOptions)

904904 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1167,10 +1167,10 @@ data GetQueryResultsResponse = GetQueryResultsResponse

11671167 , _gqrrEtag :: !(Maybe Text)

11681168 , _gqrrKind :: !Text

11691169 , _gqrrSchema :: !(Maybe TableSchema)

1170− , _gqrrTotalBytesProcessed :: !(Maybe (JSONText Int64))

1170+ , _gqrrTotalBytesProcessed :: !(Maybe (Textual Int64))

11711171 , _gqrrRows :: !(Maybe [TableRow])

11721172 , _gqrrPageToken :: !(Maybe Text)

1173− , _gqrrTotalRows :: !(Maybe (JSONText Word64))

1173+ , _gqrrTotalRows :: !(Maybe (Textual Word64))

11741174 , _gqrrErrors :: !(Maybe [ErrorProto])

11751175 , _gqrrJobComplete :: !(Maybe Bool)

11761176 , _gqrrCacheHit :: !(Maybe Bool)

@@ -1412,9 +1412,9 @@ data QueryRequest = QueryRequest

14121412 , _qrPreserveNulls :: !(Maybe Bool)

14131413 , _qrKind :: !Text

14141414 , _qrQuery :: !(Maybe Text)

1415− , _qrTimeoutMs :: !(Maybe (JSONText Word32))

1415+ , _qrTimeoutMs :: !(Maybe (Textual Word32))

14161416 , _qrDryRun :: !(Maybe Bool)

1417− , _qrMaxResults :: !(Maybe (JSONText Word32))

1417+ , _qrMaxResults :: !(Maybe (Textual Word32))

14181418 , _qrDefaultDataSet :: !(Maybe DataSetReference)

14191419 } deriving (Eq,Show,Data,Typeable,Generic)

14201420

@@ -1542,7 +1542,7 @@ instance ToJSON QueryRequest where

15421542--

15431543-- /See:/ 'jobStatistics4' smart constructor.

15441544newtype JobStatistics4 = JobStatistics4

1545− { _jsDestinationURIFileCounts :: Maybe [JSONText Int64]

1545+ { _jsDestinationURIFileCounts :: Maybe [Textual Int64]

15461546 } deriving (Eq,Show,Data,Typeable,Generic)

15471547

15481548-- | Creates a value of 'JobStatistics4' with the minimum fields required to make a request.

@@ -1618,7 +1618,7 @@ instance ToJSON ProjectReference where

16181618--

16191619-- /See:/ 'jobConfigurationLoad' smart constructor.

16201620data JobConfigurationLoad = JobConfigurationLoad

1621− { _jclSkipLeadingRows :: !(Maybe (JSONText Int32))

1621+ { _jclSkipLeadingRows :: !(Maybe (Textual Int32))

16221622 , _jclProjectionFields :: !(Maybe [Text])

16231623 , _jclDestinationTable :: !(Maybe TableReference)

16241624 , _jclWriteDisPosition :: !(Maybe Text)

@@ -1631,7 +1631,7 @@ data JobConfigurationLoad = JobConfigurationLoad

16311631 , _jclSourceFormat :: !(Maybe Text)

16321632 , _jclSchema :: !(Maybe TableSchema)

16331633 , _jclQuote :: !Text

1634− , _jclMaxBadRecords :: !(Maybe (JSONText Int32))

1634+ , _jclMaxBadRecords :: !(Maybe (Textual Int32))

16351635 , _jclSourceURIs :: !(Maybe [Text])

16361636 , _jclEncoding :: !(Maybe Text)

16371637 , _jclFieldDelimiter :: !(Maybe Text)

@@ -2038,7 +2038,7 @@ data ProjectListProjectsItem = ProjectListProjectsItem

20382038 , _plpiKind :: !Text

20392039 , _plpiProjectReference :: !(Maybe ProjectReference)

20402040 , _plpiId :: !(Maybe Text)

2041− , _plpiNumericId :: !(Maybe (JSONText Word64))

2041+ , _plpiNumericId :: !(Maybe (Textual Word64))

20422042 } deriving (Eq,Show,Data,Typeable,Generic)

20432043

20442044-- | Creates a value of 'ProjectListProjectsItem' with the minimum fields required to make a request.

@@ -2116,9 +2116,9 @@ instance ToJSON ProjectListProjectsItem where

21162116--

21172117-- /See:/ 'streamingbuffer' smart constructor.

21182118data Streamingbuffer = Streamingbuffer

2119− { _sEstimatedBytes :: !(Maybe (JSONText Word64))

2120− , _sOldestEntryTime :: !(Maybe (JSONText Word64))

2121− , _sEstimatedRows :: !(Maybe (JSONText Word64))

2119+ { _sEstimatedBytes :: !(Maybe (Textual Word64))

2120+ , _sOldestEntryTime :: !(Maybe (Textual Word64))

2121+ , _sEstimatedRows :: !(Maybe (Textual Word64))

21222122 } deriving (Eq,Show,Data,Typeable,Generic)

21232123

21242124-- | Creates a value of 'Streamingbuffer' with the minimum fields required to make a request.

@@ -2640,7 +2640,7 @@ instance ToJSON JobConfigurationLink where

26402640-- /See:/ 'tableDataInsertAllResponseInsertErrorsItem' smart constructor.

26412641data TableDataInsertAllResponseInsertErrorsItem = TableDataInsertAllResponseInsertErrorsItem

26422642 { _tdiarieiErrors :: !(Maybe [ErrorProto])

2643− , _tdiarieiIndex :: !(Maybe (JSONText Word32))

2643+ , _tdiarieiIndex :: !(Maybe (Textual Word32))

26442644 } deriving (Eq,Show,Data,Typeable,Generic)

26452645

26462646-- | Creates a value of 'TableDataInsertAllResponseInsertErrorsItem' with the minimum fields required to make a request.

@@ -3355,10 +3355,10 @@ instance ToJSON UserDefinedFunctionResource where

33553355--

33563356-- /See:/ 'jobStatistics2' smart constructor.

33573357data JobStatistics2 = JobStatistics2

3358− { _jTotalBytesProcessed :: !(Maybe (JSONText Int64))

3359− , _jBillingTier :: !(Maybe (JSONText Int32))

3358+ { _jTotalBytesProcessed :: !(Maybe (Textual Int64))

3359+ , _jBillingTier :: !(Maybe (Textual Int32))

33603360 , _jCacheHit :: !(Maybe Bool)

3361− , _jTotalBytesBilled :: !(Maybe (JSONText Int64))

3361+ , _jTotalBytesBilled :: !(Maybe (Textual Int64))

33623362 } deriving (Eq,Show,Data,Typeable,Generic)

33633363

33643364-- | Creates a value of 'JobStatistics2' with the minimum fields required to make a request.

@@ -3644,23 +3644,23 @@ instance ToJSON TableDataInsertAllResponse where

36443644--

36453645-- /See:/ 'table' smart constructor.

36463646data Table = Table

3647− { _tabCreationTime :: !(Maybe (JSONText Int64))

3647+ { _tabCreationTime :: !(Maybe (Textual Int64))

36483648 , _tabEtag :: !(Maybe Text)

3649− , _tabNumBytes :: !(Maybe (JSONText Int64))

3649+ , _tabNumBytes :: !(Maybe (Textual Int64))

36503650 , _tabExternalDataConfiguration :: !(Maybe ExternalDataConfiguration)

36513651 , _tabLocation :: !(Maybe Text)

36523652 , _tabTableReference :: !(Maybe TableReference)

36533653 , _tabFriendlyName :: !(Maybe Text)

36543654 , _tabKind :: !Text

3655− , _tabLastModifiedTime :: !(Maybe (JSONText Word64))

3655+ , _tabLastModifiedTime :: !(Maybe (Textual Word64))

36563656 , _tabSchema :: !(Maybe TableSchema)

36573657 , _tabStreamingBuffer :: !(Maybe Streamingbuffer)

36583658 , _tabSelfLink :: !(Maybe Text)

3659− , _tabNumRows :: !(Maybe (JSONText Word64))

3659+ , _tabNumRows :: !(Maybe (Textual Word64))

36603660 , _tabView :: !(Maybe ViewDefinition)

36613661 , _tabId :: !(Maybe Text)

36623662 , _tabType :: !(Maybe Text)

3663− , _tabExpirationTime :: !(Maybe (JSONText Int64))

3663+ , _tabExpirationTime :: !(Maybe (Textual Int64))

36643664 , _tabDescription :: !(Maybe Text)

36653665 } deriving (Eq,Show,Data,Typeable,Generic)

36663666

@@ -3955,7 +3955,7 @@ instance ToJSON ErrorProto where

39553955--

39563956-- /See:/ 'csvOptions' smart constructor.

39573957data CSVOptions = CSVOptions

3958− { _coSkipLeadingRows :: !(Maybe (JSONText Int32))

3958+ { _coSkipLeadingRows :: !(Maybe (Textual Int32))

39593959 , _coAllowJaggedRows :: !(Maybe Bool)

39603960 , _coAllowQuotedNewlines :: !(Maybe Bool)

39613961 , _coQuote :: !Text

@@ -4071,10 +4071,10 @@ instance ToJSON CSVOptions where

40714071--

40724072-- /See:/ 'jobStatistics3' smart constructor.

40734073data JobStatistics3 = JobStatistics3

4074− { _jsInputFiles :: !(Maybe (JSONText Int64))

4075− , _jsOutputRows :: !(Maybe (JSONText Int64))

4076− , _jsOutputBytes :: !(Maybe (JSONText Int64))

4077− , _jsInputFileBytes :: !(Maybe (JSONText Int64))

4074+ { _jsInputFiles :: !(Maybe (Textual Int64))

4075+ , _jsOutputRows :: !(Maybe (Textual Int64))

4076+ , _jsOutputBytes :: !(Maybe (Textual Int64))

4077+ , _jsInputFileBytes :: !(Maybe (Textual Int64))

40784078 } deriving (Eq,Show,Data,Typeable,Generic)

40794079

40804080-- | Creates a value of 'JobStatistics3' with the minimum fields required to make a request.

@@ -4150,10 +4150,10 @@ data QueryResponse = QueryResponse

41504150 { _qJobReference :: !(Maybe JobReference)

41514151 , _qKind :: !Text

41524152 , _qSchema :: !(Maybe TableSchema)

4153− , _qTotalBytesProcessed :: !(Maybe (JSONText Int64))

4153+ , _qTotalBytesProcessed :: !(Maybe (Textual Int64))

41544154 , _qRows :: !(Maybe [TableRow])

41554155 , _qPageToken :: !(Maybe Text)

4156− , _qTotalRows :: !(Maybe (JSONText Word64))

4156+ , _qTotalRows :: !(Maybe (Textual Word64))

41574157 , _qErrors :: !(Maybe [ErrorProto])

41584158 , _qJobComplete :: !(Maybe Bool)

41594159 , _qCacheHit :: !(Maybe Bool)

gogol-bigquery/gen/Network/Google/Resource/BigQuery/DataSets/List.hs+2−2

@@ -53,7 +53,7 @@ type DataSetsListResource =

5353 "datasets" :>

5454 QueryParam "all" Bool :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] DataSetList

5858

5959-- | Lists all datasets in the specified project to which you have been

@@ -64,7 +64,7 @@ data DataSetsList = DataSetsList

6464 { _dslAll :: !(Maybe Bool)

6565 , _dslPageToken :: !(Maybe Text)

6666 , _dslProjectId :: !Text

67− , _dslMaxResults :: !(Maybe (JSONText Word32))

67+ , _dslMaxResults :: !(Maybe (Textual Word32))

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'DataSetsList' with the minimum fields required to make a request.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/GetQueryResults.hs+6−6

@@ -53,10 +53,10 @@ type JobsGetQueryResultsResource =

5353 Capture "projectId" Text :>

5454 "queries" :>

5555 Capture "jobId" Text :>

56− QueryParam "timeoutMs" (JSONText Word32) :>

56+ QueryParam "timeoutMs" (Textual Word32) :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "startIndex" (JSONText Word64) :>

59− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "startIndex" (Textual Word64) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] GetQueryResultsResponse

6262

@@ -65,11 +65,11 @@ type JobsGetQueryResultsResource =

6565-- /See:/ 'jobsGetQueryResults' smart constructor.

6666data JobsGetQueryResults = JobsGetQueryResults

6767 { _jgqrJobId :: !Text

68− , _jgqrTimeoutMs :: !(Maybe (JSONText Word32))

68+ , _jgqrTimeoutMs :: !(Maybe (Textual Word32))

6969 , _jgqrPageToken :: !(Maybe Text)

7070 , _jgqrProjectId :: !Text

71− , _jgqrStartIndex :: !(Maybe (JSONText Word64))

72− , _jgqrMaxResults :: !(Maybe (JSONText Word32))

71+ , _jgqrStartIndex :: !(Maybe (Textual Word64))

72+ , _jgqrMaxResults :: !(Maybe (Textual Word32))

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'JobsGetQueryResults' with the minimum fields required to make a request.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/List.hs+2−2

@@ -60,7 +60,7 @@ type JobsListResource =

6060 QueryParam "projection" JobsListProjection :>

6161 QueryParam "pageToken" Text :>

6262 QueryParam "allUsers" Bool :>

63− QueryParam "maxResults" (JSONText Word32) :>

63+ QueryParam "maxResults" (Textual Word32) :>

6464 QueryParam "alt" AltJSON :> Get '[JSON] JobList

6565

6666-- | Lists all jobs that you started in the specified project. Job

@@ -76,7 +76,7 @@ data JobsList = JobsList

7676 , _jlPageToken :: !(Maybe Text)

7777 , _jlProjectId :: !Text

7878 , _jlAllUsers :: !(Maybe Bool)

79− , _jlMaxResults :: !(Maybe (JSONText Word32))

79+ , _jlMaxResults :: !(Maybe (Textual Word32))

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

8282-- | Creates a value of 'JobsList' with the minimum fields required to make a request.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Projects/List.hs+2−2

@@ -47,7 +47,7 @@ type ProjectsListResource =

4747 "v2" :>

4848 "projects" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Word32) :>

50+ QueryParam "maxResults" (Textual Word32) :>

5151 QueryParam "alt" AltJSON :> Get '[JSON] ProjectList

5252

5353-- | Lists all projects to which you have been granted any project role.

@@ -55,7 +55,7 @@ type ProjectsListResource =

5555-- /See:/ 'projectsList' smart constructor.

5656data ProjectsList = ProjectsList

5757 { _plPageToken :: !(Maybe Text)

58− , _plMaxResults :: !(Maybe (JSONText Word32))

58+ , _plMaxResults :: !(Maybe (Textual Word32))

5959 } deriving (Eq,Show,Data,Typeable,Generic)

6060

6161-- | Creates a value of 'ProjectsList' with the minimum fields required to make a request.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/TableData/List.hs+4−4

@@ -58,8 +58,8 @@ type TableDataListResource =

5858 Capture "tableId" Text :>

5959 "data" :>

6060 QueryParam "pageToken" Text :>

61− QueryParam "startIndex" (JSONText Word64) :>

62− QueryParam "maxResults" (JSONText Word32) :>

61+ QueryParam "startIndex" (Textual Word64) :>

62+ QueryParam "maxResults" (Textual Word32) :>

6363 QueryParam "alt" AltJSON :>

6464 Get '[JSON] TableDataList

6565

@@ -72,8 +72,8 @@ data TableDataList' = TableDataList'

7272 , _tPageToken :: !(Maybe Text)

7373 , _tProjectId :: !Text

7474 , _tTableId :: !Text

75− , _tStartIndex :: !(Maybe (JSONText Word64))

76− , _tMaxResults :: !(Maybe (JSONText Word32))

75+ , _tStartIndex :: !(Maybe (Textual Word64))

76+ , _tMaxResults :: !(Maybe (Textual Word32))

7777 } deriving (Eq,Show,Data,Typeable,Generic)

7878

7979-- | Creates a value of 'TableDataList'' with the minimum fields required to make a request.

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Tables/List.hs+2−2

@@ -54,7 +54,7 @@ type TablesListResource =

5454 Capture "datasetId" Text :>

5555 "tables" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] TableList

5959

6060-- | Lists all tables in the specified dataset. Requires the READER dataset

@@ -65,7 +65,7 @@ data TablesList = TablesList

6565 { _tlDataSetId :: !Text

6666 , _tlPageToken :: !(Maybe Text)

6767 , _tlProjectId :: !Text

68− , _tlMaxResults :: !(Maybe (JSONText Word32))

68+ , _tlMaxResults :: !(Maybe (Textual Word32))

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'TablesList' with the minimum fields required to make a request.

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/List.hs+2−2

@@ -60,7 +60,7 @@ type BillingAccountsListResource =

6060 QueryParam "uploadType" Text :>

6161 QueryParam "bearer_token" Text :>

6262 QueryParam "pageToken" Text :>

63− QueryParam "pageSize" (JSONText Int32) :>

63+ QueryParam "pageSize" (Textual Int32) :>

6464 QueryParam "callback" Text :>

6565 QueryParam "alt" AltJSON :>

6666 Get '[JSON] ListBillingAccountsResponse

@@ -77,7 +77,7 @@ data BillingAccountsList = BillingAccountsList

7777 , _balUploadType :: !(Maybe Text)

7878 , _balBearerToken :: !(Maybe Text)

7979 , _balPageToken :: !(Maybe Text)

80− , _balPageSize :: !(Maybe (JSONText Int32))

80+ , _balPageSize :: !(Maybe (Textual Int32))

8181 , _balCallback :: !(Maybe Text)

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

gogol-billing/gen/Network/Google/Resource/CloudBilling/BillingAccounts/Projects/List.hs+2−2

@@ -63,7 +63,7 @@ type BillingAccountsProjectsListResource =

6363 QueryParam "uploadType" Text :>

6464 QueryParam "bearer_token" Text :>

6565 QueryParam "pageToken" Text :>

66− QueryParam "pageSize" (JSONText Int32) :>

66+ QueryParam "pageSize" (Textual Int32) :>

6767 QueryParam "callback" Text :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] ListProjectBillingInfoResponse

@@ -82,7 +82,7 @@ data BillingAccountsProjectsList = BillingAccountsProjectsList

8282 , _baplBearerToken :: !(Maybe Text)

8383 , _baplName :: !Text

8484 , _baplPageToken :: !(Maybe Text)

85− , _baplPageSize :: !(Maybe (JSONText Int32))

85+ , _baplPageSize :: !(Maybe (Textual Int32))

8686 , _baplCallback :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+6−6

@@ -299,9 +299,9 @@ instance ToJSON Pageviews where

299299-- /See:/ 'postLocation' smart constructor.

300300data PostLocation = PostLocation

301301 { _plSpan :: !(Maybe Text)

302− , _plLat :: !(Maybe (JSONText Double))

302+ , _plLat :: !(Maybe (Textual Double))

303303 , _plName :: !(Maybe Text)

304− , _plLng :: !(Maybe (JSONText Double))

304+ , _plLng :: !(Maybe (Textual Double))

305305 } deriving (Eq,Show,Data,Typeable,Generic)

306306

307307-- | Creates a value of 'PostLocation' with the minimum fields required to make a request.

@@ -364,7 +364,7 @@ instance ToJSON PostLocation where

364364--

365365-- /See:/ 'blogPosts' smart constructor.

366366data BlogPosts = BlogPosts

367− { _bpTotalItems :: !(Maybe (JSONText Int32))

367+ { _bpTotalItems :: !(Maybe (Textual Int32))

368368 , _bpItems :: !(Maybe [Post'])

369369 , _bpSelfLink :: !(Maybe Text)

370370 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1091,7 +1091,7 @@ instance ToJSON Blog where

10911091--

10921092-- /See:/ 'blogPages' smart constructor.

10931093data BlogPages = BlogPages

1094− { _bpsTotalItems :: !(Maybe (JSONText Int32))

1094+ { _bpsTotalItems :: !(Maybe (Textual Int32))

10951095 , _bpsSelfLink :: !(Maybe Text)

10961096 } deriving (Eq,Show,Data,Typeable,Generic)

10971097

@@ -1481,7 +1481,7 @@ instance ToJSON UserBlogs where

14811481--

14821482-- /See:/ 'postReplies' smart constructor.

14831483data PostReplies = PostReplies

1484− { _prTotalItems :: !(Maybe (JSONText Int64))

1484+ { _prTotalItems :: !(Maybe (Textual Int64))

14851485 , _prItems :: !(Maybe [Comment])

14861486 , _prSelfLink :: !(Maybe Text)

14871487 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1779,7 +1779,7 @@ instance ToJSON PostPerUserInfo where

17791779-- /See:/ 'pageviewsCountsItem' smart constructor.

17801780data PageviewsCountsItem = PageviewsCountsItem

17811781 { _pciTimeRange :: !(Maybe Text)

1782− , _pciCount :: !(Maybe (JSONText Int64))

1782+ , _pciCount :: !(Maybe (Textual Int64))

17831783 } deriving (Eq,Show,Data,Typeable,Generic)

17841784

17851785-- | Creates a value of 'PageviewsCountsItem' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/BlogUserInfos/Get.hs+2−2

@@ -50,7 +50,7 @@ type BlogUserInfosGetResource =

5050 Capture "userId" Text :>

5151 "blogs" :>

5252 Capture "blogId" Text :>

53− QueryParam "maxPosts" (JSONText Word32) :>

53+ QueryParam "maxPosts" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] BlogUserInfo

5555

5656-- | Gets one blog and user info pair by blogId and userId.

@@ -59,7 +59,7 @@ type BlogUserInfosGetResource =

5959data BlogUserInfosGet = BlogUserInfosGet

6060 { _buigBlogId :: !Text

6161 , _buigUserId :: !Text

62− , _buigMaxPosts :: !(Maybe (JSONText Word32))

62+ , _buigMaxPosts :: !(Maybe (Textual Word32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'BlogUserInfosGet' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/Blogs/Get.hs+2−2

@@ -48,7 +48,7 @@ type BlogsGetResource =

4848 "v3" :>

4949 "blogs" :>

5050 Capture "blogId" Text :>

51− QueryParam "maxPosts" (JSONText Word32) :>

51+ QueryParam "maxPosts" (Textual Word32) :>

5252 QueryParam "view" BlogsGetView :>

5353 QueryParam "alt" AltJSON :> Get '[JSON] Blog

5454

@@ -57,7 +57,7 @@ type BlogsGetResource =

5757-- /See:/ 'blogsGet' smart constructor.

5858data BlogsGet = BlogsGet

5959 { _bgBlogId :: !Text

60− , _bgMaxPosts :: !(Maybe (JSONText Word32))

60+ , _bgMaxPosts :: !(Maybe (Textual Word32))

6161 , _bgView :: !(Maybe BlogsGetView)

6262 } deriving (Eq,Show,Data,Typeable,Generic)

6363

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/List.hs+2−2

@@ -63,7 +63,7 @@ type CommentsListResource =

6363 QueryParam "fetchBodies" Bool :>

6464 QueryParam "view" CommentsListView :>

6565 QueryParam "pageToken" Text :>

66− QueryParam "maxResults" (JSONText Word32) :>

66+ QueryParam "maxResults" (Textual Word32) :>

6767 QueryParam "alt" AltJSON :>

6868 Get '[JSON] CommentList

6969

@@ -79,7 +79,7 @@ data CommentsList = CommentsList

7979 , _clView :: !(Maybe CommentsListView)

8080 , _clPostId :: !Text

8181 , _clPageToken :: !(Maybe Text)

82− , _clMaxResults :: !(Maybe (JSONText Word32))

82+ , _clMaxResults :: !(Maybe (Textual Word32))

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

8585-- | Creates a value of 'CommentsList' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/Comments/ListByBlog.hs+2−2

@@ -58,7 +58,7 @@ type CommentsListByBlogResource =

5858 QueryParam "startDate" DateTime' :>

5959 QueryParam "fetchBodies" Bool :>

6060 QueryParam "pageToken" Text :>

61− QueryParam "maxResults" (JSONText Word32) :>

61+ QueryParam "maxResults" (Textual Word32) :>

6262 QueryParam "alt" AltJSON :> Get '[JSON] CommentList

6363

6464-- | Retrieves the comments for a blog, across all posts, possibly filtered.

@@ -71,7 +71,7 @@ data CommentsListByBlog = CommentsListByBlog

7171 , _clbbStartDate :: !(Maybe DateTime')

7272 , _clbbFetchBodies :: !(Maybe Bool)

7373 , _clbbPageToken :: !(Maybe Text)

74− , _clbbMaxResults :: !(Maybe (JSONText Word32))

74+ , _clbbMaxResults :: !(Maybe (Textual Word32))

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

7777-- | Creates a value of 'CommentsListByBlog' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/Pages/List.hs+2−2

@@ -56,7 +56,7 @@ type PagesListResource =

5656 QueryParam "fetchBodies" Bool :>

5757 QueryParam "view" PagesListView :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] PageList

6161

6262-- | Retrieves the pages for a blog, optionally including non-LIVE statuses.

@@ -68,7 +68,7 @@ data PagesList = PagesList

6868 , _plFetchBodies :: !(Maybe Bool)

6969 , _plView :: !(Maybe PagesListView)

7070 , _plPageToken :: !(Maybe Text)

71− , _plMaxResults :: !(Maybe (JSONText Word32))

71+ , _plMaxResults :: !(Maybe (Textual Word32))

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'PagesList' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/Get.hs+2−2

@@ -55,7 +55,7 @@ type PostUserInfosGetResource =

5555 Capture "blogId" Text :>

5656 "posts" :>

5757 Capture "postId" Text :>

58− QueryParam "maxComments" (JSONText Word32) :>

58+ QueryParam "maxComments" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] PostUserInfo

6060

6161-- | Gets one post and user info pair, by post ID and user ID. The post user

@@ -65,7 +65,7 @@ type PostUserInfosGetResource =

6565-- /See:/ 'postUserInfosGet' smart constructor.

6666data PostUserInfosGet = PostUserInfosGet

6767 { _puigBlogId :: !Text

68− , _puigMaxComments :: !(Maybe (JSONText Word32))

68+ , _puigMaxComments :: !(Maybe (Textual Word32))

6969 , _puigUserId :: !Text

7070 , _puigPostId :: !Text

7171 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-blogger/gen/Network/Google/Resource/Blogger/PostUserInfos/List.hs+2−2

@@ -69,7 +69,7 @@ type PostUserInfosListResource =

6969 QueryParam "view" PostUserInfosListView :>

7070 QueryParam "labels" Text :>

7171 QueryParam "pageToken" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "alt" AltJSON :>

7474 Get '[JSON] PostUserInfosList

7575

@@ -89,7 +89,7 @@ data PostUserInfosList' = PostUserInfosList'

8989 , _puilView :: !(Maybe PostUserInfosListView)

9090 , _puilLabels :: !(Maybe Text)

9191 , _puilPageToken :: !(Maybe Text)

92− , _puilMaxResults :: !(Maybe (JSONText Word32))

92+ , _puilMaxResults :: !(Maybe (Textual Word32))

9393 } deriving (Eq,Show,Data,Typeable,Generic)

9494

9595-- | Creates a value of 'PostUserInfosList'' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Get.hs+2−2

@@ -55,7 +55,7 @@ type PostsGetResource =

5555 Capture "postId" Text :>

5656 QueryParam "fetchBody" Bool :>

5757 QueryParam "fetchImages" Bool :>

58− QueryParam "maxComments" (JSONText Word32) :>

58+ QueryParam "maxComments" (Textual Word32) :>

5959 QueryParam "view" PostsGetView :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] Post'

6161

@@ -66,7 +66,7 @@ data PostsGet = PostsGet

6666 { _pggFetchBody :: !Bool

6767 , _pggFetchImages :: !(Maybe Bool)

6868 , _pggBlogId :: !Text

69− , _pggMaxComments :: !(Maybe (JSONText Word32))

69+ , _pggMaxComments :: !(Maybe (Textual Word32))

7070 , _pggView :: !(Maybe PostsGetView)

7171 , _pggPostId :: !Text

7272 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/GetByPath.hs+2−2

@@ -52,7 +52,7 @@ type PostsGetByPathResource =

5252 "posts" :>

5353 "bypath" :>

5454 QueryParam "path" Text :>

55− QueryParam "maxComments" (JSONText Word32) :>

55+ QueryParam "maxComments" (Textual Word32) :>

5656 QueryParam "view" PostsGetByPathView :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] Post'

5858

@@ -62,7 +62,7 @@ type PostsGetByPathResource =

6262data PostsGetByPath = PostsGetByPath

6363 { _pgbpPath :: !Text

6464 , _pgbpBlogId :: !Text

65− , _pgbpMaxComments :: !(Maybe (JSONText Word32))

65+ , _pgbpMaxComments :: !(Maybe (Textual Word32))

6666 , _pgbpView :: !(Maybe PostsGetByPathView)

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/List.hs+2−2

@@ -66,7 +66,7 @@ type PostsListResource =

6666 QueryParam "view" PostsListView :>

6767 QueryParam "labels" Text :>

6868 QueryParam "pageToken" Text :>

69− QueryParam "maxResults" (JSONText Word32) :>

69+ QueryParam "maxResults" (Textual Word32) :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] PostList

7272

@@ -84,7 +84,7 @@ data PostsList = PostsList

8484 , _pllView :: !(Maybe PostsListView)

8585 , _pllLabels :: !(Maybe Text)

8686 , _pllPageToken :: !(Maybe Text)

87− , _pllMaxResults :: !(Maybe (JSONText Word32))

87+ , _pllMaxResults :: !(Maybe (Textual Word32))

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

9090-- | Creates a value of 'PostsList' with the minimum fields required to make a request.

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Patch.hs+2−2

@@ -57,7 +57,7 @@ type PostsPatchResource =

5757 Capture "postId" Text :>

5858 QueryParam "fetchBody" Bool :>

5959 QueryParam "fetchImages" Bool :>

60− QueryParam "maxComments" (JSONText Word32) :>

60+ QueryParam "maxComments" (Textual Word32) :>

6161 QueryParam "revert" Bool :>

6262 QueryParam "publish" Bool :>

6363 QueryParam "alt" AltJSON :>

@@ -71,7 +71,7 @@ data PostsPatch = PostsPatch

7171 , _posoFetchImages :: !(Maybe Bool)

7272 , _posoBlogId :: !Text

7373 , _posoPayload :: !Post'

74− , _posoMaxComments :: !(Maybe (JSONText Word32))

74+ , _posoMaxComments :: !(Maybe (Textual Word32))

7575 , _posoRevert :: !(Maybe Bool)

7676 , _posoPostId :: !Text

7777 , _posoPublish :: !(Maybe Bool)

gogol-blogger/gen/Network/Google/Resource/Blogger/Posts/Update.hs+2−2

@@ -57,7 +57,7 @@ type PostsUpdateResource =

5757 Capture "postId" Text :>

5858 QueryParam "fetchBody" Bool :>

5959 QueryParam "fetchImages" Bool :>

60− QueryParam "maxComments" (JSONText Word32) :>

60+ QueryParam "maxComments" (Textual Word32) :>

6161 QueryParam "revert" Bool :>

6262 QueryParam "publish" Bool :>

6363 QueryParam "alt" AltJSON :>

@@ -71,7 +71,7 @@ data PostsUpdate = PostsUpdate

7171 , _puFetchImages :: !(Maybe Bool)

7272 , _puBlogId :: !Text

7373 , _puPayload :: !Post'

74− , _puMaxComments :: !(Maybe (JSONText Word32))

74+ , _puMaxComments :: !(Maybe (Textual Word32))

7575 , _puRevert :: !(Maybe Bool)

7676 , _puPostId :: !Text

7777 , _puPublish :: !(Maybe Bool)

gogol-books/gen/Network/Google/Books/Types/Product.hs+48−48

@@ -81,7 +81,7 @@ instance ToJSON UserSettings where

8181--

8282-- /See:/ 'annotations' smart constructor.

8383data Annotations = Annotations

84− { _aTotalItems :: !(Maybe (JSONText Int32))

84+ { _aTotalItems :: !(Maybe (Textual Int32))

8585 , _aNextPageToken :: !(Maybe Text)

8686 , _aKind :: !Text

8787 , _aItems :: !(Maybe [Annotation])

@@ -152,7 +152,7 @@ instance ToJSON Annotations where

152152--

153153-- /See:/ 'annotationsData' smart constructor.

154154data AnnotationsData = AnnotationsData

155− { _adTotalItems :: !(Maybe (JSONText Int32))

155+ { _adTotalItems :: !(Maybe (Textual Int32))

156156 , _adNextPageToken :: !(Maybe Text)

157157 , _adKind :: !Text

158158 , _adItems :: !(Maybe [AnnotationData])

@@ -261,7 +261,7 @@ instance ToJSON

261261--

262262-- /See:/ 'volumeannotations' smart constructor.

263263data Volumeannotations = Volumeannotations

264− { _vTotalItems :: !(Maybe (JSONText Int32))

264+ { _vTotalItems :: !(Maybe (Textual Int32))

265265 , _vNextPageToken :: !(Maybe Text)

266266 , _vKind :: !Text

267267 , _vItems :: !(Maybe [Volumeannotation])

@@ -404,7 +404,7 @@ instance ToJSON ReviewSource where

404404--

405405-- /See:/ 'annotationData' smart constructor.

406406data AnnotationData = AnnotationData

407− { _annEncodedData :: !(Maybe (JSONText Word8))

407+ { _annEncodedData :: !(Maybe (Textual Word8))

408408 , _annKind :: !Text

409409 , _annData :: !(Maybe JSONValue)

410410 , _annSelfLink :: !(Maybe Text)

@@ -1078,8 +1078,8 @@ data VolumeUserInfo = VolumeUserInfo

10781078 { _vuiCopy :: !(Maybe VolumeUserInfoCopy)

10791079 , _vuiUserUploadedVolumeInfo :: !(Maybe VolumeUserInfoUserUploadedVolumeInfo)

10801080 , _vuiIsPurchased :: !(Maybe Bool)

1081− , _vuiEntitlementType :: !(Maybe (JSONText Int32))

1082− , _vuiAcquisitionType :: !(Maybe (JSONText Int32))

1081+ , _vuiEntitlementType :: !(Maybe (Textual Int32))

1082+ , _vuiAcquisitionType :: !(Maybe (Textual Int32))

10831083 , _vuiRentalState :: !(Maybe Text)

10841084 , _vuiIsPreOrdered :: !(Maybe Bool)

10851085 , _vuiReview :: !(Maybe Review)

@@ -1262,10 +1262,10 @@ data Layersummary = Layersummary

12621262 { _lAnnotationsDataLink :: !(Maybe Text)

12631263 , _lAnnotationsLink :: !(Maybe Text)

12641264 , _lKind :: !Text

1265− , _lDataCount :: !(Maybe (JSONText Int32))

1265+ , _lDataCount :: !(Maybe (Textual Int32))

12661266 , _lContentVersion :: !(Maybe Text)

12671267 , _lVolumeAnnotationsVersion :: !(Maybe Text)

1268− , _lAnnotationCount :: !(Maybe (JSONText Int32))

1268+ , _lAnnotationCount :: !(Maybe (Textual Int32))

12691269 , _lAnnotationTypes :: !(Maybe [Text])

12701270 , _lSelfLink :: !(Maybe Text)

12711271 , _lVolumeId :: !(Maybe Text)

@@ -1858,9 +1858,9 @@ instance ToJSON VolumeUserInfoUserUploadedVolumeInfo

18581858-- /See:/ 'volumeUserInfoCopy' smart constructor.

18591859data VolumeUserInfoCopy = VolumeUserInfoCopy

18601860 { _vuicLimitType :: !(Maybe Text)

1861− , _vuicAllowedCharacterCount :: !(Maybe (JSONText Int32))

1861+ , _vuicAllowedCharacterCount :: !(Maybe (Textual Int32))

18621862 , _vuicUpdated :: !(Maybe DateTime')

1863− , _vuicRemainingCharacterCount :: !(Maybe (JSONText Int32))

1863+ , _vuicRemainingCharacterCount :: !(Maybe (Textual Int32))

18641864 } deriving (Eq,Show,Data,Typeable,Generic)

18651865

18661866-- | Creates a value of 'VolumeUserInfoCopy' with the minimum fields required to make a request.

@@ -1973,9 +1973,9 @@ data Bookshelf = Bookshelf

19731973 , _bVolumesLastUpdated :: !(Maybe DateTime')

19741974 , _bKind :: !Text

19751975 , _bCreated :: !(Maybe DateTime')

1976− , _bVolumeCount :: !(Maybe (JSONText Int32))

1976+ , _bVolumeCount :: !(Maybe (Textual Int32))

19771977 , _bSelfLink :: !(Maybe Text)

1978− , _bId :: !(Maybe (JSONText Int32))

1978+ , _bId :: !(Maybe (Textual Int32))

19791979 , _bUpdated :: !(Maybe DateTime')

19801980 , _bTitle :: !(Maybe Text)

19811981 , _bDescription :: !(Maybe Text)

@@ -2178,10 +2178,10 @@ instance ToJSON Notification where

21782178-- /See:/ 'annotationsSummaryLayersItem' smart constructor.

21792179data AnnotationsSummaryLayersItem = AnnotationsSummaryLayersItem

21802180 { _asliLimitType :: !(Maybe Text)

2181− , _asliAllowedCharacterCount :: !(Maybe (JSONText Int32))

2181+ , _asliAllowedCharacterCount :: !(Maybe (Textual Int32))

21822182 , _asliUpdated :: !(Maybe DateTime')

21832183 , _asliLayerId :: !(Maybe Text)

2184− , _asliRemainingCharacterCount :: !(Maybe (JSONText Int32))

2184+ , _asliRemainingCharacterCount :: !(Maybe (Textual Int32))

21852185 } deriving (Eq,Show,Data,Typeable,Generic)

21862186

21872187-- | Creates a value of 'AnnotationsSummaryLayersItem' with the minimum fields required to make a request.

@@ -2261,7 +2261,7 @@ instance ToJSON AnnotationsSummaryLayersItem where

22612261--

22622262-- /See:/ 'volumeSaleInfoOffersItemRentalDuration' smart constructor.

22632263data VolumeSaleInfoOffersItemRentalDuration = VolumeSaleInfoOffersItemRentalDuration

2264− { _vsioirdCount :: !(Maybe (JSONText Double))

2264+ { _vsioirdCount :: !(Maybe (Textual Double))

22652265 , _vsioirdUnit :: !(Maybe Text)

22662266 } deriving (Eq,Show,Data,Typeable,Generic)

22672267

@@ -2421,8 +2421,8 @@ instance ToJSON OffersItemsItem where

24212421-- /See:/ 'annotationLayerSummary' smart constructor.

24222422data AnnotationLayerSummary = AnnotationLayerSummary

24232423 { _alsLimitType :: !(Maybe Text)

2424− , _alsAllowedCharacterCount :: !(Maybe (JSONText Int32))

2425− , _alsRemainingCharacterCount :: !(Maybe (JSONText Int32))

2424+ , _alsAllowedCharacterCount :: !(Maybe (Textual Int32))

2425+ , _alsRemainingCharacterCount :: !(Maybe (Textual Int32))

24262426 } deriving (Eq,Show,Data,Typeable,Generic)

24272427

24282428-- | Creates a value of 'AnnotationLayerSummary' with the minimum fields required to make a request.

@@ -2859,8 +2859,8 @@ instance ToJSON Volume where

28592859--

28602860-- /See:/ 'geolayerDataGeoBoundaryItemItem' smart constructor.

28612861data GeolayerDataGeoBoundaryItemItem = GeolayerDataGeoBoundaryItemItem

2862− { _gdgbiiLatitude :: !(Maybe (JSONText Word32))

2863− , _gdgbiiLongitude :: !(Maybe (JSONText Word32))

2862+ { _gdgbiiLatitude :: !(Maybe (Textual Word32))

2863+ , _gdgbiiLongitude :: !(Maybe (Textual Word32))

28642864 } deriving (Eq,Show,Data,Typeable,Generic)

28652865

28662866-- | Creates a value of 'GeolayerDataGeoBoundaryItemItem' with the minimum fields required to make a request.

@@ -3132,10 +3132,10 @@ data GeolayerDataGeo = GeolayerDataGeo

31323132 , _gdgCachePolicy :: !(Maybe Text)

31333133 , _gdgViewport :: !(Maybe GeolayerDataGeoViewport)

31343134 , _gdgBoundary :: !(Maybe [[GeolayerDataGeoBoundaryItemItem]])

3135− , _gdgLatitude :: !(Maybe (JSONText Double))

3136− , _gdgZoom :: !(Maybe (JSONText Int32))

3135+ , _gdgLatitude :: !(Maybe (Textual Double))

3136+ , _gdgZoom :: !(Maybe (Textual Int32))

31373137 , _gdgCountryCode :: !(Maybe Text)

3138− , _gdgLongitude :: !(Maybe (JSONText Double))

3138+ , _gdgLongitude :: !(Maybe (Textual Double))

31393139 } deriving (Eq,Show,Data,Typeable,Generic)

31403140

31413141-- | Creates a value of 'GeolayerDataGeo' with the minimum fields required to make a request.

@@ -3822,8 +3822,8 @@ instance ToJSON

38223822--

38233823-- /See:/ 'geolayerDataGeoViewportLo' smart constructor.

38243824data GeolayerDataGeoViewportLo = GeolayerDataGeoViewportLo

3825− { _gdgvlLatitude :: !(Maybe (JSONText Double))

3826− , _gdgvlLongitude :: !(Maybe (JSONText Double))

3825+ { _gdgvlLatitude :: !(Maybe (Textual Double))

3826+ , _gdgvlLongitude :: !(Maybe (Textual Double))

38273827 } deriving (Eq,Show,Data,Typeable,Generic)

38283828

38293829-- | Creates a value of 'GeolayerDataGeoViewportLo' with the minimum fields required to make a request.

@@ -3872,7 +3872,7 @@ instance ToJSON GeolayerDataGeoViewportLo where

38723872-- /See:/ 'volumeSaleInfoOffersItemListPrice' smart constructor.

38733873data VolumeSaleInfoOffersItemListPrice = VolumeSaleInfoOffersItemListPrice

38743874 { _vsioilpCurrencyCode :: !(Maybe Text)

3875− , _vsioilpAmountInMicros :: !(Maybe (JSONText Double))

3875+ , _vsioilpAmountInMicros :: !(Maybe (Textual Double))

38763876 } deriving (Eq,Show,Data,Typeable,Generic)

38773877

38783878-- | Creates a value of 'VolumeSaleInfoOffersItemListPrice' with the minimum fields required to make a request.

@@ -3923,8 +3923,8 @@ data DownloadAccessRestriction = DownloadAccessRestriction

39233923 { _darJustAcquired :: !(Maybe Bool)

39243924 , _darSignature :: !(Maybe Text)

39253925 , _darKind :: !Text

3926− , _darMaxDownloadDevices :: !(Maybe (JSONText Int32))

3927− , _darDownloadsAcquired :: !(Maybe (JSONText Int32))

3926+ , _darMaxDownloadDevices :: !(Maybe (Textual Int32))

3927+ , _darDownloadsAcquired :: !(Maybe (Textual Int32))

39283928 , _darReasonCode :: !(Maybe Text)

39293929 , _darVolumeId :: !(Maybe Text)

39303930 , _darRestricted :: !(Maybe Bool)

@@ -4123,7 +4123,7 @@ instance ToJSON DictlayerDataCommon where

41234123data DiscoveryclustersClustersItem = DiscoveryclustersClustersItem

41244124 { _dciBannerWithContentContainer :: !(Maybe DiscoveryclustersClustersItemBanner_with_content_container)

41254125 , _dciUid :: !(Maybe Text)

4126− , _dciTotalVolumes :: !(Maybe (JSONText Int32))

4126+ , _dciTotalVolumes :: !(Maybe (Textual Int32))

41274127 , _dciSubTitle :: !(Maybe Text)

41284128 , _dciTitle :: !(Maybe Text)

41294129 , _dciVolumes :: !(Maybe [Volume])

@@ -4213,7 +4213,7 @@ instance ToJSON DiscoveryclustersClustersItem where

42134213--

42144214-- /See:/ 'volumeSaleInfoRetailPrice' smart constructor.

42154215data VolumeSaleInfoRetailPrice = VolumeSaleInfoRetailPrice

4216− { _vsirpAmount :: !(Maybe (JSONText Double))

4216+ { _vsirpAmount :: !(Maybe (Textual Double))

42174217 , _vsirpCurrencyCode :: !(Maybe Text)

42184218 } deriving (Eq,Show,Data,Typeable,Generic)

42194219

@@ -4262,7 +4262,7 @@ instance ToJSON VolumeSaleInfoRetailPrice where

42624262--

42634263-- /See:/ 'volumeSaleInfoListPrice' smart constructor.

42644264data VolumeSaleInfoListPrice = VolumeSaleInfoListPrice

4265− { _vsilpAmount :: !(Maybe (JSONText Double))

4265+ { _vsilpAmount :: !(Maybe (Textual Double))

42664266 , _vsilpCurrencyCode :: !(Maybe Text)

42674267 } deriving (Eq,Show,Data,Typeable,Generic)

42684268

@@ -4549,8 +4549,8 @@ instance ToJSON Review where

45494549--

45504550-- /See:/ 'volumeUserInfoRentalPeriod' smart constructor.

45514551data VolumeUserInfoRentalPeriod = VolumeUserInfoRentalPeriod

4552− { _vuirpEndUtcSec :: !(Maybe (JSONText Int64))

4553− , _vuirpStartUtcSec :: !(Maybe (JSONText Int64))

4552+ { _vuirpEndUtcSec :: !(Maybe (Textual Int64))

4553+ , _vuirpStartUtcSec :: !(Maybe (Textual Int64))

45544554 } deriving (Eq,Show,Data,Typeable,Generic)

45554555

45564556-- | Creates a value of 'VolumeUserInfoRentalPeriod' with the minimum fields required to make a request.

@@ -5483,7 +5483,7 @@ instance ToJSON ReadingPosition where

54835483--

54845484-- /See:/ 'volumeSaleInfoOffersItem' smart constructor.

54855485data VolumeSaleInfoOffersItem = VolumeSaleInfoOffersItem

5486− { _vsioiFinskyOfferType :: !(Maybe (JSONText Int32))

5486+ { _vsioiFinskyOfferType :: !(Maybe (Textual Int32))

54875487 , _vsioiRentalDuration :: !(Maybe VolumeSaleInfoOffersItemRentalDuration)

54885488 , _vsioiListPrice :: !(Maybe VolumeSaleInfoOffersItemListPrice)

54895489 , _vsioiRetailPrice :: !(Maybe VolumeSaleInfoOffersItemRetailPrice)

@@ -5809,7 +5809,7 @@ instance ToJSON Offers where

58095809-- /See:/ 'discoveryclusters' smart constructor.

58105810data Discoveryclusters = Discoveryclusters

58115811 { _dKind :: !Text

5812− , _dTotalClusters :: !(Maybe (JSONText Int32))

5812+ , _dTotalClusters :: !(Maybe (Textual Int32))

58135813 , _dClusters :: !(Maybe [DiscoveryclustersClustersItem])

58145814 } deriving (Eq,Show,Data,Typeable,Generic)

58155815

@@ -5914,9 +5914,9 @@ instance ToJSON UserSettingsNotesExport where

59145914--

59155915-- /See:/ 'concurrentAccessRestriction' smart constructor.

59165916data ConcurrentAccessRestriction = ConcurrentAccessRestriction

5917− { _carMaxConcurrentDevices :: !(Maybe (JSONText Int32))

5917+ { _carMaxConcurrentDevices :: !(Maybe (Textual Int32))

59185918 , _carSignature :: !(Maybe Text)

5919− , _carTimeWindowSeconds :: !(Maybe (JSONText Int32))

5919+ , _carTimeWindowSeconds :: !(Maybe (Textual Int32))

59205920 , _carKind :: !Text

59215921 , _carReasonCode :: !(Maybe Text)

59225922 , _carVolumeId :: !(Maybe Text)

@@ -6070,7 +6070,7 @@ instance ToJSON ConcurrentAccessRestriction where

60706070--

60716071-- /See:/ 'volumes' smart constructor.

60726072data Volumes = Volumes

6073− { _v1TotalItems :: !(Maybe (JSONText Int32))

6073+ { _v1TotalItems :: !(Maybe (Textual Int32))

60746074 , _v1Kind :: !Text

60756075 , _v1Items :: !(Maybe [Volume])

60766076 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -6271,8 +6271,8 @@ instance ToJSON DownloadAccesses where

62716271--

62726272-- /See:/ 'geolayerDataGeoViewportHi' smart constructor.

62736273data GeolayerDataGeoViewportHi = GeolayerDataGeoViewportHi

6274− { _gdgvhLatitude :: !(Maybe (JSONText Double))

6275− , _gdgvhLongitude :: !(Maybe (JSONText Double))

6274+ { _gdgvhLatitude :: !(Maybe (Textual Double))

6275+ , _gdgvhLongitude :: !(Maybe (Textual Double))

62766276 } deriving (Eq,Show,Data,Typeable,Generic)

62776277

62786278-- | Creates a value of 'GeolayerDataGeoViewportHi' with the minimum fields required to make a request.

@@ -6321,15 +6321,15 @@ instance ToJSON GeolayerDataGeoViewportHi where

63216321-- /See:/ 'volumeVolumeInfo' smart constructor.

63226322data VolumeVolumeInfo = VolumeVolumeInfo

63236323 { _vviImageLinks :: !(Maybe VolumeVolumeInfoImageLinks)

6324− , _vviAverageRating :: !(Maybe (JSONText Double))

6325− , _vviRatingsCount :: !(Maybe (JSONText Int32))

6324+ , _vviAverageRating :: !(Maybe (Textual Double))

6325+ , _vviRatingsCount :: !(Maybe (Textual Int32))

63266326 , _vviCanonicalVolumeLink :: !(Maybe Text)

63276327 , _vviReadingModes :: !(Maybe JSONValue)

63286328 , _vviIndustryIdentifiers :: !(Maybe [VolumeVolumeInfoIndustryIdentifiersItem])

6329− , _vviPrintedPageCount :: !(Maybe (JSONText Int32))

6329+ , _vviPrintedPageCount :: !(Maybe (Textual Int32))

63306330 , _vviMainCategory :: !(Maybe Text)

63316331 , _vviContentVersion :: !(Maybe Text)

6332− , _vviSamplePageCount :: !(Maybe (JSONText Int32))

6332+ , _vviSamplePageCount :: !(Maybe (Textual Int32))

63336333 , _vviCategories :: !(Maybe [Text])

63346334 , _vviAuthors :: !(Maybe [Text])

63356335 , _vviAllowAnonLogging :: !(Maybe Bool)

@@ -6339,7 +6339,7 @@ data VolumeVolumeInfo = VolumeVolumeInfo

63396339 , _vviPreviewLink :: !(Maybe Text)

63406340 , _vviLanguage :: !(Maybe Text)

63416341 , _vviTitle :: !(Maybe Text)

6342− , _vviPageCount :: !(Maybe (JSONText Int32))

6342+ , _vviPageCount :: !(Maybe (Textual Int32))

63436343 , _vviDimensions :: !(Maybe VolumeVolumeInfoDimensions)

63446344 , _vviInfoLink :: !(Maybe Text)

63456345 , _vviPublisher :: !(Maybe Text)

@@ -6656,8 +6656,8 @@ instance ToJSON VolumeVolumeInfo where

66566656--

66576657-- /See:/ 'metadataItemsItem' smart constructor.

66586658data MetadataItemsItem = MetadataItemsItem

6659− { _miiSize :: !(Maybe (JSONText Int64))

6660− , _miiVersion :: !(Maybe (JSONText Int64))

6659+ { _miiSize :: !(Maybe (Textual Int64))

6660+ , _miiVersion :: !(Maybe (Textual Int64))

66616661 , _miiLanguage :: !(Maybe Text)

66626662 , _miiDownloadURL :: !(Maybe Text)

66636663 , _miiEncryptedKey :: !(Maybe Text)

@@ -6784,7 +6784,7 @@ instance ToJSON

67846784-- /See:/ 'volumeSaleInfoOffersItemRetailPrice' smart constructor.

67856785data VolumeSaleInfoOffersItemRetailPrice = VolumeSaleInfoOffersItemRetailPrice

67866786 { _vsioirpCurrencyCode :: !(Maybe Text)

6787− , _vsioirpAmountInMicros :: !(Maybe (JSONText Double))

6787+ , _vsioirpAmountInMicros :: !(Maybe (Textual Double))

67886788 } deriving (Eq,Show,Data,Typeable,Generic)

67896789

67906790-- | Creates a value of 'VolumeSaleInfoOffersItemRetailPrice' with the minimum fields required to make a request.

@@ -6953,7 +6953,7 @@ instance ToJSON BooksAnnotationsRange where

69536953--

69546954-- /See:/ 'layersummaries' smart constructor.

69556955data Layersummaries = Layersummaries

6956− { _layTotalItems :: !(Maybe (JSONText Int32))

6956+ { _layTotalItems :: !(Maybe (Textual Int32))

69576957 , _layKind :: !Text

69586958 , _layItems :: !(Maybe [Layersummary])

69596959 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-books/gen/Network/Google/Resource/Books/Bookshelves/Volumes/List.hs+4−4

@@ -55,8 +55,8 @@ type BookshelvesVolumesListResource =

5555 Capture "shelf" Text :>

5656 "volumes" :>

5757 QueryParam "source" Text :>

58− QueryParam "startIndex" (JSONText Word32) :>

59− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "startIndex" (Textual Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "showPreorders" Bool :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] Volumes

6262

@@ -67,8 +67,8 @@ data BookshelvesVolumesList = BookshelvesVolumesList

6767 { _bvlUserId :: !Text

6868 , _bvlShelf :: !Text

6969 , _bvlSource :: !(Maybe Text)

70− , _bvlStartIndex :: !(Maybe (JSONText Word32))

71− , _bvlMaxResults :: !(Maybe (JSONText Word32))

70+ , _bvlStartIndex :: !(Maybe (Textual Word32))

71+ , _bvlMaxResults :: !(Maybe (Textual Word32))

7272 , _bvlShowPreOrders :: !(Maybe Bool)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/Get.hs+6−6

@@ -60,12 +60,12 @@ type LayersAnnotationDataGetResource =

6060 "data" :>

6161 Capture "annotationDataId" Text :>

6262 QueryParam "contentVersion" Text :>

63− QueryParam "w" (JSONText Int32) :>

64− QueryParam "scale" (JSONText Int32) :>

63+ QueryParam "w" (Textual Int32) :>

64+ QueryParam "scale" (Textual Int32) :>

6565 QueryParam "locale" Text :>

6666 QueryParam "allowWebDefinitions" Bool :>

6767 QueryParam "source" Text :>

68− QueryParam "h" (JSONText Int32) :>

68+ QueryParam "h" (Textual Int32) :>

6969 QueryParam "alt" AltJSON :>

7070 Get '[JSON] AnnotationData

7171

@@ -73,15 +73,15 @@ type LayersAnnotationDataGetResource =

7373--

7474-- /See:/ 'layersAnnotationDataGet' smart constructor.

7575data LayersAnnotationDataGet = LayersAnnotationDataGet

76− { _ladgW :: !(Maybe (JSONText Int32))

77− , _ladgScale :: !(Maybe (JSONText Int32))

76+ { _ladgW :: !(Maybe (Textual Int32))

77+ , _ladgScale :: !(Maybe (Textual Int32))

7878 , _ladgLocale :: !(Maybe Text)

7979 , _ladgContentVersion :: !Text

8080 , _ladgAllowWebDefinitions :: !(Maybe Bool)

8181 , _ladgAnnotationDataId :: !Text

8282 , _ladgVolumeId :: !Text

8383 , _ladgSource :: !(Maybe Text)

84− , _ladgH :: !(Maybe (JSONText Int32))

84+ , _ladgH :: !(Maybe (Textual Int32))

8585 , _ladgLayerId :: !Text

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

gogol-books/gen/Network/Google/Resource/Books/Layers/AnnotationData/List.hs+8−8

@@ -62,16 +62,16 @@ type LayersAnnotationDataListResource =

6262 Capture "layerId" Text :>

6363 "data" :>

6464 QueryParam "contentVersion" Text :>

65− QueryParam "w" (JSONText Int32) :>

66− QueryParam "scale" (JSONText Int32) :>

65+ QueryParam "w" (Textual Int32) :>

66+ QueryParam "scale" (Textual Int32) :>

6767 QueryParam "locale" Text :>

6868 QueryParam "updatedMax" Text :>

6969 QueryParam "updatedMin" Text :>

7070 QueryParams "annotationDataId" Text :>

7171 QueryParam "source" Text :>

72− QueryParam "h" (JSONText Int32) :>

72+ QueryParam "h" (Textual Int32) :>

7373 QueryParam "pageToken" Text :>

74− QueryParam "maxResults" (JSONText Word32)

74+ QueryParam "maxResults" (Textual Word32)

7575 :>

7676 QueryParam "alt" AltJSON :>

7777 Get '[JSON] AnnotationsData

@@ -80,8 +80,8 @@ type LayersAnnotationDataListResource =

8080--

8181-- /See:/ 'layersAnnotationDataList' smart constructor.

8282data LayersAnnotationDataList = LayersAnnotationDataList

83− { _ladlW :: !(Maybe (JSONText Int32))

84− , _ladlScale :: !(Maybe (JSONText Int32))

83+ { _ladlW :: !(Maybe (Textual Int32))

84+ , _ladlScale :: !(Maybe (Textual Int32))

8585 , _ladlLocale :: !(Maybe Text)

8686 , _ladlContentVersion :: !Text

8787 , _ladlUpdatedMax :: !(Maybe Text)

@@ -89,10 +89,10 @@ data LayersAnnotationDataList = LayersAnnotationDataList

8989 , _ladlAnnotationDataId :: !(Maybe [Text])

9090 , _ladlVolumeId :: !Text

9191 , _ladlSource :: !(Maybe Text)

92− , _ladlH :: !(Maybe (JSONText Int32))

92+ , _ladlH :: !(Maybe (Textual Int32))

9393 , _ladlPageToken :: !(Maybe Text)

9494 , _ladlLayerId :: !Text

95− , _ladlMaxResults :: !(Maybe (JSONText Word32))

95+ , _ladlMaxResults :: !(Maybe (Textual Word32))

9696 } deriving (Eq,Show,Data,Typeable,Generic)

9797

9898-- | Creates a value of 'LayersAnnotationDataList' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/Layers/List.hs+2−2

@@ -54,7 +54,7 @@ type LayersListResource =

5454 QueryParam "contentVersion" Text :>

5555 QueryParam "source" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] Layersummaries

6060

@@ -66,7 +66,7 @@ data LayersList = LayersList

6666 , _llVolumeId :: !Text

6767 , _llSource :: !(Maybe Text)

6868 , _llPageToken :: !(Maybe Text)

69− , _llMaxResults :: !(Maybe (JSONText Word32))

69+ , _llMaxResults :: !(Maybe (Textual Word32))

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'LayersList' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/Layers/VolumeAnnotations/List.hs+2−2

@@ -73,7 +73,7 @@ type LayersVolumeAnnotationsListResource =

7373 QueryParam "source" Text :>

7474 QueryParam "pageToken" Text :>

7575 QueryParam "endPosition" Text :>

76− QueryParam "maxResults" (JSONText Word32)

76+ QueryParam "maxResults" (Textual Word32)

7777 :>

7878 QueryParam "startPosition" Text :>

7979 QueryParam "alt" AltJSON :>

@@ -96,7 +96,7 @@ data LayersVolumeAnnotationsList = LayersVolumeAnnotationsList

9696 , _lvalPageToken :: !(Maybe Text)

9797 , _lvalEndPosition :: !(Maybe Text)

9898 , _lvalLayerId :: !Text

99− , _lvalMaxResults :: !(Maybe (JSONText Word32))

99+ , _lvalMaxResults :: !(Maybe (Textual Word32))

100100 , _lvalStartPosition :: !(Maybe Text)

101101 } deriving (Eq,Show,Data,Typeable,Generic)

102102

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Annotations/List.hs+2−2

@@ -64,7 +64,7 @@ type MyLibraryAnnotationsListResource =

6464 QueryParam "source" Text :>

6565 QueryParam "pageToken" Text :>

6666 QueryParam "layerId" Text :>

67− QueryParam "maxResults" (JSONText Word32) :>

67+ QueryParam "maxResults" (Textual Word32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] Annotations

7070

@@ -81,7 +81,7 @@ data MyLibraryAnnotationsList = MyLibraryAnnotationsList

8181 , _mlalSource :: !(Maybe Text)

8282 , _mlalPageToken :: !(Maybe Text)

8383 , _mlalLayerId :: !(Maybe Text)

84− , _mlalMaxResults :: !(Maybe (JSONText Word32))

84+ , _mlalMaxResults :: !(Maybe (Textual Word32))

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

8787-- | Creates a value of 'MyLibraryAnnotationsList' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/MoveVolume.hs+2−2

@@ -52,7 +52,7 @@ type MyLibraryBookshelvesMoveVolumeResource =

5252 Capture "shelf" Text :>

5353 "moveVolume" :>

5454 QueryParam "volumeId" Text :>

55− QueryParam "volumePosition" (JSONText Int32) :>

55+ QueryParam "volumePosition" (Textual Int32) :>

5656 QueryParam "source" Text :>

5757 QueryParam "alt" AltJSON :> Post '[JSON] ()

5858

@@ -63,7 +63,7 @@ data MyLibraryBookshelvesMoveVolume = MyLibraryBookshelvesMoveVolume

6363 { _mlbmvShelf :: !Text

6464 , _mlbmvVolumeId :: !Text

6565 , _mlbmvSource :: !(Maybe Text)

66− , _mlbmvVolumePosition :: !(JSONText Int32)

66+ , _mlbmvVolumePosition :: !(Textual Int32)

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

6969-- | Creates a value of 'MyLibraryBookshelvesMoveVolume' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/MyLibrary/Bookshelves/Volumes/List.hs+4−4

@@ -61,8 +61,8 @@ type MyLibraryBookshelvesVolumesListResource =

6161 QueryParam "projection"

6262 MyLibraryBookshelvesVolumesListProjection

6363 :>

64− QueryParam "startIndex" (JSONText Word32) :>

65− QueryParam "maxResults" (JSONText Word32) :>

64+ QueryParam "startIndex" (Textual Word32) :>

65+ QueryParam "maxResults" (Textual Word32) :>

6666 QueryParam "showPreorders" Bool :>

6767 QueryParam "alt" AltJSON :> Get '[JSON] Volumes

6868

@@ -75,8 +75,8 @@ data MyLibraryBookshelvesVolumesList = MyLibraryBookshelvesVolumesList

7575 , _mlbvlShelf :: !Text

7676 , _mlbvlSource :: !(Maybe Text)

7777 , _mlbvlProjection :: !(Maybe MyLibraryBookshelvesVolumesListProjection)

78− , _mlbvlStartIndex :: !(Maybe (JSONText Word32))

79− , _mlbvlMaxResults :: !(Maybe (JSONText Word32))

78+ , _mlbvlStartIndex :: !(Maybe (Textual Word32))

79+ , _mlbvlMaxResults :: !(Maybe (Textual Word32))

8080 , _mlbvlShowPreOrders :: !(Maybe Bool)

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

gogol-books/gen/Network/Google/Resource/Books/Onboarding/ListCategoryVolumes.hs+2−2

@@ -56,7 +56,7 @@ type OnboardingListCategoryVolumesResource =

5656 :>

5757 QueryParams "categoryId" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "pageSize" (JSONText Word32) :>

59+ QueryParam "pageSize" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] Volume2

6161

6262-- | List available volumes under categories for onboarding experience.

@@ -67,7 +67,7 @@ data OnboardingListCategoryVolumes = OnboardingListCategoryVolumes

6767 , _olcvMaxAllowedMaturityRating :: !(Maybe OnboardingListCategoryVolumesMaxAllowedMaturityRating)

6868 , _olcvCategoryId :: !(Maybe [Text])

6969 , _olcvPageToken :: !(Maybe Text)

70− , _olcvPageSize :: !(Maybe (JSONText Word32))

70+ , _olcvPageSize :: !(Maybe (Textual Word32))

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

7373-- | Creates a value of 'OnboardingListCategoryVolumes' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/Volumes/List.hs+4−4

@@ -68,8 +68,8 @@ type VolumesListResource =

6868 QueryParam "projection" VolumesListProjection :>

6969 QueryParam "filter" VolumesListFilter :>

7070 QueryParam "langRestrict" Text :>

71− QueryParam "startIndex" (JSONText Word32) :>

72− QueryParam "maxResults" (JSONText Word32) :>

71+ QueryParam "startIndex" (Textual Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "showPreorders" Bool :>

7474 QueryParam "printType" VolumesListPrintType

7575 :>

@@ -89,8 +89,8 @@ data VolumesList = VolumesList

8989 , _vlProjection :: !(Maybe VolumesListProjection)

9090 , _vlFilter :: !(Maybe VolumesListFilter)

9191 , _vlLangRestrict :: !(Maybe Text)

92− , _vlStartIndex :: !(Maybe (JSONText Word32))

93− , _vlMaxResults :: !(Maybe (JSONText Word32))

92+ , _vlStartIndex :: !(Maybe (Textual Word32))

93+ , _vlMaxResults :: !(Maybe (Textual Word32))

9494 , _vlShowPreOrders :: !(Maybe Bool)

9595 , _vlPrintType :: !(Maybe VolumesListPrintType)

9696 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-books/gen/Network/Google/Resource/Books/Volumes/Mybooks/List.hs+4−4

@@ -59,8 +59,8 @@ type VolumesMybooksListResource =

5959 :>

6060 QueryParam "locale" Text :>

6161 QueryParam "source" Text :>

62− QueryParam "startIndex" (JSONText Word32) :>

63− QueryParam "maxResults" (JSONText Word32) :>

62+ QueryParam "startIndex" (Textual Word32) :>

63+ QueryParam "maxResults" (Textual Word32) :>

6464 QueryParam "alt" AltJSON :> Get '[JSON] Volumes

6565

6666-- | Return a list of books in My Library.

@@ -71,8 +71,8 @@ data VolumesMybooksList = VolumesMybooksList

7171 , _vmlAcquireMethod :: !(Maybe [VolumesMybooksListAcquireMethod])

7272 , _vmlLocale :: !(Maybe Text)

7373 , _vmlSource :: !(Maybe Text)

74− , _vmlStartIndex :: !(Maybe (JSONText Word32))

75− , _vmlMaxResults :: !(Maybe (JSONText Word32))

74+ , _vmlStartIndex :: !(Maybe (Textual Word32))

75+ , _vmlMaxResults :: !(Maybe (Textual Word32))

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'VolumesMybooksList' with the minimum fields required to make a request.

gogol-books/gen/Network/Google/Resource/Books/Volumes/UserUploaded/List.hs+4−4

@@ -57,8 +57,8 @@ type VolumesUserUploadedListResource =

5757 QueryParam "locale" Text :>

5858 QueryParams "volumeId" Text :>

5959 QueryParam "source" Text :>

60− QueryParam "startIndex" (JSONText Word32) :>

61− QueryParam "maxResults" (JSONText Word32) :>

60+ QueryParam "startIndex" (Textual Word32) :>

61+ QueryParam "maxResults" (Textual Word32) :>

6262 QueryParam "alt" AltJSON :> Get '[JSON] Volumes

6363

6464-- | Return a list of books uploaded by the current user.

@@ -69,8 +69,8 @@ data VolumesUserUploadedList = VolumesUserUploadedList

6969 , _vuulLocale :: !(Maybe Text)

7070 , _vuulVolumeId :: !(Maybe [Text])

7171 , _vuulSource :: !(Maybe Text)

72− , _vuulStartIndex :: !(Maybe (JSONText Word32))

73− , _vuulMaxResults :: !(Maybe (JSONText Word32))

72+ , _vuulStartIndex :: !(Maybe (Textual Word32))

73+ , _vuulMaxResults :: !(Maybe (Textual Word32))

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

7676-- | Creates a value of 'VolumesUserUploadedList' with the minimum fields required to make a request.

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+7−7

@@ -371,7 +371,7 @@ instance ToJSON PollingLocation where

371371-- /See:/ 'geographicDivision' smart constructor.

372372data GeographicDivision = GeographicDivision

373373 { _gdName :: !(Maybe Text)

374− , _gdOfficeIndices :: !(Maybe [JSONText Word32])

374+ , _gdOfficeIndices :: !(Maybe [Textual Word32])

375375 , _gdAlsoKnownAs :: !(Maybe [Text])

376376 } deriving (Eq,Show,Data,Typeable,Generic)

377377

@@ -448,7 +448,7 @@ data Candidate = Candidate

448448 , _cPhotoURL :: !(Maybe Text)

449449 , _cChannels :: !(Maybe [Channel])

450450 , _cCandidateURL :: !(Maybe Text)

451− , _cOrderOnBallot :: !(Maybe (JSONText Int64))

451+ , _cOrderOnBallot :: !(Maybe (Textual Int64))

452452 , _cName :: !(Maybe Text)

453453 , _cParty :: !(Maybe Text)

454454 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -557,7 +557,7 @@ instance ToJSON Candidate where

557557data Office = Office

558558 { _oDivisionId :: !(Maybe Text)

559559 , _oRoles :: !(Maybe [Text])

560− , _oOfficialIndices :: !(Maybe [JSONText Word32])

560+ , _oOfficialIndices :: !(Maybe [Textual Word32])

561561 , _oSources :: !(Maybe [Source])

562562 , _oName :: !(Maybe Text)

563563 , _oLevels :: !(Maybe [Text])

@@ -707,7 +707,7 @@ data Election = Election

707707 { _eOcdDivisionId :: !(Maybe Text)

708708 , _eElectionDay :: !(Maybe Text)

709709 , _eName :: !(Maybe Text)

710− , _eId :: !(Maybe (JSONText Int64))

710+ , _eId :: !(Maybe (Textual Int64))

711711 } deriving (Eq,Show,Data,Typeable,Generic)

712712

713713-- | Creates a value of 'Election' with the minimum fields required to make a request.

@@ -1131,13 +1131,13 @@ data Contest = Contest

11311131 , _conReferendumURL :: !(Maybe Text)

11321132 , _conReferendumEffectOfAbstain :: !(Maybe Text)

11331133 , _conReferendumSubtitle :: !(Maybe Text)

1134− , _conNumberVotingFor :: !(Maybe (JSONText Int64))

1134+ , _conNumberVotingFor :: !(Maybe (Textual Int64))

11351135 , _conOffice :: !(Maybe Text)

11361136 , _conReferendumConStatement :: !(Maybe Text)

11371137 , _conSources :: !(Maybe [Source])

11381138 , _conReferendumProStatement :: !(Maybe Text)

11391139 , _conReferendumBallotResponses :: !(Maybe [Text])

1140− , _conNumberElected :: !(Maybe (JSONText Int64))

1140+ , _conNumberElected :: !(Maybe (Textual Int64))

11411141 , _conSpecial :: !(Maybe Text)

11421142 , _conReferendumText :: !(Maybe Text)

11431143 , _conPrimaryParty :: !(Maybe Text)

@@ -1149,7 +1149,7 @@ data Contest = Contest

11491149 , _conLevel :: !(Maybe [Text])

11501150 , _conCandidates :: !(Maybe [Candidate])

11511151 , _conReferendumTitle :: !(Maybe Text)

1152− , _conBallotPlacement :: !(Maybe (JSONText Int64))

1152+ , _conBallotPlacement :: !(Maybe (Textual Int64))

11531153 } deriving (Eq,Show,Data,Typeable,Generic)

11541154

11551155-- | Creates a value of 'Contest' with the minimum fields required to make a request.

gogol-civicinfo/gen/Network/Google/Resource/CivicInfo/Elections/VoterInfoQuery.hs+2−2

@@ -49,7 +49,7 @@ type ElectionsVoterInfoQueryResource =

4949 "v2" :>

5050 "voterinfo" :>

5151 QueryParam "address" Text :>

52− QueryParam "electionId" (JSONText Int64) :>

52+ QueryParam "electionId" (Textual Int64) :>

5353 QueryParam "officialOnly" Bool :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] VoterInfoResponse

@@ -59,7 +59,7 @@ type ElectionsVoterInfoQueryResource =

5959--

6060-- /See:/ 'electionsVoterInfoQuery' smart constructor.

6161data ElectionsVoterInfoQuery = ElectionsVoterInfoQuery

62− { _eviqElectionId :: !(JSONText Int64)

62+ { _eviqElectionId :: !(Textual Int64)

6363 , _eviqAddress :: !Text

6464 , _eviqOfficialOnly :: !Bool

6565 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Aliases/List.hs+2−2

@@ -65,7 +65,7 @@ type CoursesAliasesListResource =

6565 QueryParam "uploadType" Text :>

6666 QueryParam "bearer_token" Text :>

6767 QueryParam "pageToken" Text :>

68− QueryParam "pageSize" (JSONText Int32) :>

68+ QueryParam "pageSize" (Textual Int32) :>

6969 QueryParam "callback" Text :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] ListCourseAliasesResponse

@@ -85,7 +85,7 @@ data CoursesAliasesList = CoursesAliasesList

8585 , _calUploadType :: !(Maybe Text)

8686 , _calBearerToken :: !(Maybe Text)

8787 , _calPageToken :: !(Maybe Text)

88− , _calPageSize :: !(Maybe (JSONText Int32))

88+ , _calPageSize :: !(Maybe (Textual Int32))

8989 , _calCallback :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/List.hs+2−2

@@ -67,7 +67,7 @@ type CoursesListResource =

6767 QueryParam "teacherId" Text :>

6868 QueryParam "bearer_token" Text :>

6969 QueryParam "pageToken" Text :>

70− QueryParam "pageSize" (JSONText Int32) :>

70+ QueryParam "pageSize" (Textual Int32) :>

7171 QueryParam "callback" Text :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] ListCoursesResponse

@@ -89,7 +89,7 @@ data CoursesList = CoursesList

8989 , _clTeacherId :: !(Maybe Text)

9090 , _clBearerToken :: !(Maybe Text)

9191 , _clPageToken :: !(Maybe Text)

92− , _clPageSize :: !(Maybe (JSONText Int32))

92+ , _clPageSize :: !(Maybe (Textual Int32))

9393 , _clCallback :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Students/List.hs+2−2

@@ -65,7 +65,7 @@ type CoursesStudentsListResource =

6565 QueryParam "uploadType" Text :>

6666 QueryParam "bearer_token" Text :>

6767 QueryParam "pageToken" Text :>

68− QueryParam "pageSize" (JSONText Int32) :>

68+ QueryParam "pageSize" (Textual Int32) :>

6969 QueryParam "callback" Text :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] ListStudentsResponse

@@ -85,7 +85,7 @@ data CoursesStudentsList = CoursesStudentsList

8585 , _cslUploadType :: !(Maybe Text)

8686 , _cslBearerToken :: !(Maybe Text)

8787 , _cslPageToken :: !(Maybe Text)

88− , _cslPageSize :: !(Maybe (JSONText Int32))

88+ , _cslPageSize :: !(Maybe (Textual Int32))

8989 , _cslCallback :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/List.hs+2−2

@@ -65,7 +65,7 @@ type CoursesTeachersListResource =

6565 QueryParam "uploadType" Text :>

6666 QueryParam "bearer_token" Text :>

6767 QueryParam "pageToken" Text :>

68− QueryParam "pageSize" (JSONText Int32) :>

68+ QueryParam "pageSize" (Textual Int32) :>

6969 QueryParam "callback" Text :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] ListTeachersResponse

@@ -85,7 +85,7 @@ data CoursesTeachersList = CoursesTeachersList

8585 , _ctlUploadType :: !(Maybe Text)

8686 , _ctlBearerToken :: !(Maybe Text)

8787 , _ctlPageToken :: !(Maybe Text)

88− , _ctlPageSize :: !(Maybe (JSONText Int32))

88+ , _ctlPageSize :: !(Maybe (Textual Int32))

8989 , _ctlCallback :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

9191

gogol-classroom/gen/Network/Google/Resource/Classroom/Invitations/List.hs+2−2

@@ -67,7 +67,7 @@ type InvitationsListResource =

6767 QueryParam "userId" Text :>

6868 QueryParam "bearer_token" Text :>

6969 QueryParam "pageToken" Text :>

70− QueryParam "pageSize" (JSONText Int32) :>

70+ QueryParam "pageSize" (Textual Int32) :>

7171 QueryParam "callback" Text :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] ListInvitationsResponse

@@ -89,7 +89,7 @@ data InvitationsList = InvitationsList

8989 , _ilUserId :: !(Maybe Text)

9090 , _ilBearerToken :: !(Maybe Text)

9191 , _ilPageToken :: !(Maybe Text)

92− , _ilPageSize :: !(Maybe (JSONText Int32))

92+ , _ilPageSize :: !(Maybe (Textual Int32))

9393 , _ilCallback :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

gogol-cloudtrace/gen/Network/Google/CloudTrace/Types/Product.hs+2−2

@@ -119,8 +119,8 @@ data TraceSpan = TraceSpan

119119 , _tsName :: !(Maybe Text)

120120 , _tsEndTime :: !(Maybe Text)

121121 , _tsLabels :: !(Maybe TraceSpanLabels)

122− , _tsParentSpanId :: !(Maybe (JSONText Word64))

123− , _tsSpanId :: !(Maybe (JSONText Word64))

122+ , _tsParentSpanId :: !(Maybe (Textual Word64))

123+ , _tsSpanId :: !(Maybe (Textual Word64))

124124 } deriving (Eq,Show,Data,Typeable,Generic)

125125

126126-- | Creates a value of 'TraceSpan' with the minimum fields required to make a request.

gogol-cloudtrace/gen/Network/Google/Resource/CloudTrace/Projects/Traces/List.hs+2−2

@@ -72,7 +72,7 @@ type ProjectsTracesListResource =

7272 QueryParam "view" Text :>

7373 QueryParam "filter" Text :>

7474 QueryParam "pageToken" Text :>

75− QueryParam "pageSize" (JSONText Int32) :>

75+ QueryParam "pageSize" (Textual Int32) :>

7676 QueryParam "callback" Text :>

7777 QueryParam "alt" AltJSON :>

7878 Get '[JSON] ListTracesResponse

@@ -94,7 +94,7 @@ data ProjectsTracesList = ProjectsTracesList

9494 , _ptlFilter :: !(Maybe Text)

9595 , _ptlPageToken :: !(Maybe Text)

9696 , _ptlProjectId :: !Text

97− , _ptlPageSize :: !(Maybe (JSONText Int32))

97+ , _ptlPageSize :: !(Maybe (Textual Int32))

9898 , _ptlCallback :: !(Maybe Text)

9999 } deriving (Eq,Show,Data,Typeable,Generic)

100100

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+94−94

@@ -716,14 +716,14 @@ instance ToJSON DeprecationStatus where

716716data Snapshot = Snapshot

717717 { _sStorageBytesStatus :: !(Maybe SnapshotStorageBytesStatus)

718718 , _sStatus :: !(Maybe SnapshotStatus)

719− , _sDiskSizeGb :: !(Maybe (JSONText Int64))

719+ , _sDiskSizeGb :: !(Maybe (Textual Int64))

720720 , _sSourceDiskId :: !(Maybe Text)

721721 , _sKind :: !Text

722− , _sStorageBytes :: !(Maybe (JSONText Int64))

722+ , _sStorageBytes :: !(Maybe (Textual Int64))

723723 , _sSelfLink :: !(Maybe Text)

724724 , _sName :: !(Maybe Text)

725725 , _sCreationTimestamp :: !(Maybe Text)

726− , _sId :: !(Maybe (JSONText Word64))

726+ , _sId :: !(Maybe (Textual Word64))

727727 , _sLicenses :: !(Maybe [Text])

728728 , _sSourceDisk :: !(Maybe Text)

729729 , _sDescription :: !(Maybe Text)

@@ -899,7 +899,7 @@ instance ToJSON Snapshot where

899899--

900900-- /See:/ 'autoscalingPolicyCustomMetricUtilization' smart constructor.

901901data AutoscalingPolicyCustomMetricUtilization = AutoscalingPolicyCustomMetricUtilization

902− { _apcmuUtilizationTarget :: !(Maybe (JSONText Double))

902+ { _apcmuUtilizationTarget :: !(Maybe (Textual Double))

903903 , _apcmuMetric :: !(Maybe Text)

904904 , _apcmuUtilizationTargetType :: !(Maybe AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType)

905905 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1102,7 +1102,7 @@ instance ToJSON VPNTunnelsScopedList where

11021102--

11031103-- /See:/ 'instanceGroupsSetNamedPortsRequest' smart constructor.

11041104data InstanceGroupsSetNamedPortsRequest = InstanceGroupsSetNamedPortsRequest

1105− { _igsnprFingerprint :: !(Maybe (JSONText Word8))

1105+ { _igsnprFingerprint :: !(Maybe (Textual Word8))

11061106 , _igsnprNamedPorts :: !(Maybe [NamedPort])

11071107 } deriving (Eq,Show,Data,Typeable,Generic)

11081108

@@ -1488,16 +1488,16 @@ instance ToJSON InstanceGroupManagerList where

14881488-- /See:/ 'image' smart constructor.

14891489data Image = Image

14901490 { _iStatus :: !(Maybe ImageStatus)

1491− , _iDiskSizeGb :: !(Maybe (JSONText Int64))

1491+ , _iDiskSizeGb :: !(Maybe (Textual Int64))

14921492 , _iSourceType :: !ImageSourceType

14931493 , _iSourceDiskId :: !(Maybe Text)

14941494 , _iKind :: !Text

1495− , _iArchiveSizeBytes :: !(Maybe (JSONText Int64))

1495+ , _iArchiveSizeBytes :: !(Maybe (Textual Int64))

14961496 , _iRawDisk :: !(Maybe ImageRawDisk)

14971497 , _iSelfLink :: !(Maybe Text)

14981498 , _iName :: !(Maybe Text)

14991499 , _iCreationTimestamp :: !(Maybe Text)

1500− , _iId :: !(Maybe (JSONText Word64))

1500+ , _iId :: !(Maybe (Textual Word64))

15011501 , _iLicenses :: !(Maybe [Text])

15021502 , _iSourceDisk :: !(Maybe Text)

15031503 , _iDescription :: !(Maybe Text)

@@ -1702,13 +1702,13 @@ instance ToJSON Image where

17021702data URLMap = URLMap

17031703 { _umTests :: !(Maybe [URLMapTest])

17041704 , _umKind :: !Text

1705− , _umFingerprint :: !(Maybe (JSONText Word8))

1705+ , _umFingerprint :: !(Maybe (Textual Word8))

17061706 , _umDefaultService :: !(Maybe Text)

17071707 , _umSelfLink :: !(Maybe Text)

17081708 , _umName :: !(Maybe Text)

17091709 , _umCreationTimestamp :: !(Maybe Text)

17101710 , _umPathMatchers :: !(Maybe [PathMatcher])

1711− , _umId :: !(Maybe (JSONText Word64))

1711+ , _umId :: !(Maybe (Textual Word64))

17121712 , _umHostRules :: !(Maybe [HostRule])

17131713 , _umDescription :: !(Maybe Text)

17141714 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2524,7 +2524,7 @@ instance ToJSON OperationsScopedList where

25242524-- /See:/ 'namedPort' smart constructor.

25252525data NamedPort = NamedPort

25262526 { _npName :: !(Maybe Text)

2527− , _npPort :: !(Maybe (JSONText Int32))

2527+ , _npPort :: !(Maybe (Textual Int32))

25282528 } deriving (Eq,Show,Data,Typeable,Generic)

25292529

25302530-- | Creates a value of 'NamedPort' with the minimum fields required to make a request.

@@ -3035,8 +3035,8 @@ data TargetPool = TargetPool

30353035 , _tpName :: !(Maybe Text)

30363036 , _tpCreationTimestamp :: !(Maybe Text)

30373037 , _tpInstances :: !(Maybe [Text])

3038− , _tpId :: !(Maybe (JSONText Word64))

3039− , _tpFailoverRatio :: !(Maybe (JSONText Float))

3038+ , _tpId :: !(Maybe (Textual Word64))

3039+ , _tpFailoverRatio :: !(Maybe (Textual Double))

30403040 , _tpRegion :: !(Maybe Text)

30413041 , _tpDescription :: !(Maybe Text)

30423042 , _tpHealthChecks :: !(Maybe [Text])

@@ -3381,7 +3381,7 @@ data ForwardingRule = ForwardingRule

33813381 , _frName :: !(Maybe Text)

33823382 , _frIPProtocol :: !(Maybe ForwardingRuleIPProtocol)

33833383 , _frCreationTimestamp :: !(Maybe Text)

3384− , _frId :: !(Maybe (JSONText Word64))

3384+ , _frId :: !(Maybe (Textual Word64))

33853385 , _frRegion :: !(Maybe Text)

33863386 , _frDescription :: !(Maybe Text)

33873387 , _frTarget :: !(Maybe Text)

@@ -3729,7 +3729,7 @@ data Project = Project

37293729 , _pCreationTimestamp :: !(Maybe Text)

37303730 , _pEnabledFeatures :: !(Maybe [Text])

37313731 , _pQuotas :: !(Maybe [Quota])

3732− , _pId :: !(Maybe (JSONText Word64))

3732+ , _pId :: !(Maybe (Textual Word64))

37333733 , _pDescription :: !(Maybe Text)

37343734 , _pCommonInstanceMetadata :: !(Maybe Metadata)

37353735 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -3865,24 +3865,24 @@ instance ToJSON Project where

38653865--

38663866-- /See:/ 'operation' smart constructor.

38673867data Operation = Operation

3868− { _oTargetId :: !(Maybe (JSONText Word64))

3868+ { _oTargetId :: !(Maybe (Textual Word64))

38693869 , _oStatus :: !(Maybe OperationStatus)

38703870 , _oInsertTime :: !(Maybe Text)

3871− , _oProgress :: !(Maybe (JSONText Int32))

3871+ , _oProgress :: !(Maybe (Textual Int32))

38723872 , _oStartTime :: !(Maybe Text)

38733873 , _oKind :: !Text

38743874 , _oError :: !(Maybe OperationError)

38753875 , _oHTTPErrorMessage :: !(Maybe Text)

38763876 , _oZone :: !(Maybe Text)

38773877 , _oWarnings :: !(Maybe [OperationWarningsItem])

3878− , _oHTTPErrorStatusCode :: !(Maybe (JSONText Int32))

3878+ , _oHTTPErrorStatusCode :: !(Maybe (Textual Int32))

38793879 , _oUser :: !(Maybe Text)

38803880 , _oSelfLink :: !(Maybe Text)

38813881 , _oName :: !(Maybe Text)

38823882 , _oStatusMessage :: !(Maybe Text)

38833883 , _oCreationTimestamp :: !(Maybe Text)

38843884 , _oEndTime :: !(Maybe Text)

3885− , _oId :: !(Maybe (JSONText Word64))

3885+ , _oId :: !(Maybe (Textual Word64))

38863886 , _oOperationType :: !(Maybe Text)

38873887 , _oRegion :: !(Maybe Text)

38883888 , _oTargetLink :: !(Maybe Text)

@@ -4205,7 +4205,7 @@ data Disk = Disk

42054205 , _dLastAttachTimestamp :: !(Maybe Text)

42064206 , _dUsers :: !(Maybe [Text])

42074207 , _dSourceImage :: !(Maybe Text)

4208− , _dSizeGb :: !(Maybe (JSONText Int64))

4208+ , _dSizeGb :: !(Maybe (Textual Int64))

42094209 , _dKind :: !Text

42104210 , _dLastDetachTimestamp :: !(Maybe Text)

42114211 , _dZone :: !(Maybe Text)

@@ -4213,7 +4213,7 @@ data Disk = Disk

42134213 , _dName :: !(Maybe Text)

42144214 , _dSourceImageId :: !(Maybe Text)

42154215 , _dCreationTimestamp :: !(Maybe Text)

4216− , _dId :: !(Maybe (JSONText Word64))

4216+ , _dId :: !(Maybe (Textual Word64))

42174217 , _dLicenses :: !(Maybe [Text])

42184218 , _dOptions :: !(Maybe Text)

42194219 , _dType :: !(Maybe Text)

@@ -4529,7 +4529,7 @@ instance ToJSON DiskMoveRequest where

45294529--

45304530-- /See:/ 'autoscalingPolicyLoadBalancingUtilization' smart constructor.

45314531newtype AutoscalingPolicyLoadBalancingUtilization = AutoscalingPolicyLoadBalancingUtilization

4532− { _aplbuUtilizationTarget :: Maybe (JSONText Double)

4532+ { _aplbuUtilizationTarget :: Maybe (Textual Double)

45334533 } deriving (Eq,Show,Data,Typeable,Generic)

45344534

45354535-- | Creates a value of 'AutoscalingPolicyLoadBalancingUtilization' with the minimum fields required to make a request.

@@ -4626,16 +4626,16 @@ instance ToJSON TargetPoolsScopedListWarningDataItem

46264626-- /See:/ 'instanceGroupManager' smart constructor.

46274627data InstanceGroupManager = InstanceGroupManager

46284628 { _igmKind :: !Text

4629− , _igmFingerprint :: !(Maybe (JSONText Word8))

4629+ , _igmFingerprint :: !(Maybe (Textual Word8))

46304630 , _igmBaseInstanceName :: !(Maybe Text)

46314631 , _igmZone :: !(Maybe Text)

46324632 , _igmInstanceTemplate :: !(Maybe Text)

4633− , _igmTargetSize :: !(Maybe (JSONText Int32))

4633+ , _igmTargetSize :: !(Maybe (Textual Int32))

46344634 , _igmSelfLink :: !(Maybe Text)

46354635 , _igmCurrentActions :: !(Maybe InstanceGroupManagerActionsSummary)

46364636 , _igmName :: !(Maybe Text)

46374637 , _igmCreationTimestamp :: !(Maybe Text)

4638− , _igmId :: !(Maybe (JSONText Word64))

4638+ , _igmId :: !(Maybe (Textual Word64))

46394639 , _igmTargetPools :: !(Maybe [Text])

46404640 , _igmDescription :: !(Maybe Text)

46414641 , _igmInstanceGroup :: !(Maybe Text)

@@ -5213,7 +5213,7 @@ data TargetInstance = TargetInstance

52135213 , _tiSelfLink :: !(Maybe Text)

52145214 , _tiName :: !(Maybe Text)

52155215 , _tiCreationTimestamp :: !(Maybe Text)

5216− , _tiId :: !(Maybe (JSONText Word64))

5216+ , _tiId :: !(Maybe (Textual Word64))

52175217 , _tiDescription :: !(Maybe Text)

52185218 , _tiInstance :: !(Maybe Text)

52195219 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -5651,7 +5651,7 @@ instance ToJSON DiskTypesScopedListWarning where

56515651-- /See:/ 'attachedDiskInitializeParams' smart constructor.

56525652data AttachedDiskInitializeParams = AttachedDiskInitializeParams

56535653 { _adipSourceImage :: !(Maybe Text)

5654− , _adipDiskSizeGb :: !(Maybe (JSONText Int64))

5654+ , _adipDiskSizeGb :: !(Maybe (Textual Int64))

56555655 , _adipDiskName :: !(Maybe Text)

56565656 , _adipDiskType :: !(Maybe Text)

56575657 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -6302,7 +6302,7 @@ data Network = Network

63026302 , _nSelfLink :: !(Maybe Text)

63036303 , _nName :: !(Maybe Text)

63046304 , _nCreationTimestamp :: !(Maybe Text)

6305− , _nId :: !(Maybe (JSONText Word64))

6305+ , _nId :: !(Maybe (Textual Word64))

63066306 , _nGatewayIPv4 :: !(Maybe Text)

63076307 , _nDescription :: !(Maybe Text)

63086308 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -6629,7 +6629,7 @@ data Address = Address

66296629 , _aSelfLink :: !(Maybe Text)

66306630 , _aName :: !(Maybe Text)

66316631 , _aCreationTimestamp :: !(Maybe Text)

6632− , _aId :: !(Maybe (JSONText Word64))

6632+ , _aId :: !(Maybe (Textual Word64))

66336633 , _aRegion :: !(Maybe Text)

66346634 , _aDescription :: !(Maybe Text)

66356635 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -6770,7 +6770,7 @@ data Zone = Zone

67706770 , _zSelfLink :: !(Maybe Text)

67716771 , _zName :: !(Maybe Text)

67726772 , _zCreationTimestamp :: !(Maybe Text)

6773− , _zId :: !(Maybe (JSONText Word64))

6773+ , _zId :: !(Maybe (Textual Word64))

67746774 , _zRegion :: !(Maybe Text)

67756775 , _zDescription :: !(Maybe Text)

67766776 , _zDeprecated :: !(Maybe DeprecationStatus)

@@ -7162,7 +7162,7 @@ instance ToJSON InstanceGroupAggregatedList where

71627162--

71637163-- /See:/ 'route' smart constructor.

71647164data Route = Route

7165− { _rPriority :: !(Maybe (JSONText Word32))

7165+ { _rPriority :: !(Maybe (Textual Word32))

71667166 , _rKind :: !Text

71677167 , _rNextHopGateway :: !(Maybe Text)

71687168 , _rNextHopNetwork :: !(Maybe Text)

@@ -7173,7 +7173,7 @@ data Route = Route

71737173 , _rSelfLink :: !(Maybe Text)

71747174 , _rName :: !(Maybe Text)

71757175 , _rCreationTimestamp :: !(Maybe Text)

7176− , _rId :: !(Maybe (JSONText Word64))

7176+ , _rId :: !(Maybe (Textual Word64))

71777177 , _rNextHopVPNTunnel :: !(Maybe Text)

71787178 , _rDescription :: !(Maybe Text)

71797179 , _rTags :: !(Maybe [Text])

@@ -7485,7 +7485,7 @@ data InstanceTemplate = InstanceTemplate

74857485 , _itSelfLink :: !(Maybe Text)

74867486 , _itName :: !(Maybe Text)

74877487 , _itCreationTimestamp :: !(Maybe Text)

7488− , _itId :: !(Maybe (JSONText Word64))

7488+ , _itId :: !(Maybe (Textual Word64))

74897489 , _itDescription :: !(Maybe Text)

74907490 , _itProperties :: !(Maybe InstanceProperties)

74917491 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -7670,7 +7670,7 @@ data TargetVPNGateway = TargetVPNGateway

76707670 , _tvgSelfLink :: !(Maybe Text)

76717671 , _tvgName :: !(Maybe Text)

76727672 , _tvgCreationTimestamp :: !(Maybe Text)

7673− , _tvgId :: !(Maybe (JSONText Word64))

7673+ , _tvgId :: !(Maybe (Textual Word64))

76747674 , _tvgRegion :: !(Maybe Text)

76757675 , _tvgTunnels :: !(Maybe [Text])

76767676 , _tvgDescription :: !(Maybe Text)

@@ -7866,7 +7866,7 @@ data SSLCertificate = SSLCertificate

78667866 , _scSelfLink :: !(Maybe Text)

78677867 , _scName :: !(Maybe Text)

78687868 , _scCreationTimestamp :: !(Maybe Text)

7869− , _scId :: !(Maybe (JSONText Word64))

7869+ , _scId :: !(Maybe (Textual Word64))

78707870 , _scCertificate :: !(Maybe Text)

78717871 , _scDescription :: !(Maybe Text)

78727872 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -8234,7 +8234,7 @@ instance ToJSON ZoneList where

82348234data ManagedInstance = ManagedInstance

82358235 { _miLastAttempt :: !(Maybe ManagedInstanceLastAttempt)

82368236 , _miCurrentAction :: !(Maybe ManagedInstanceCurrentAction)

8237− , _miId :: !(Maybe (JSONText Word64))

8237+ , _miId :: !(Maybe (Textual Word64))

82388238 , _miInstanceStatus :: !(Maybe ManagedInstanceInstanceStatus)

82398239 , _miInstance :: !(Maybe Text)

82408240 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -8419,11 +8419,11 @@ instance ToJSON

84198419data Backend = Backend

84208420 { _bGroup :: !(Maybe Text)

84218421 , _bBalancingMode :: !(Maybe BackendBalancingMode)

8422− , _bMaxUtilization :: !(Maybe (JSONText Float))

8423− , _bMaxRate :: !(Maybe (JSONText Int32))

8424− , _bMaxRatePerInstance :: !(Maybe (JSONText Float))

8422+ , _bMaxUtilization :: !(Maybe (Textual Double))

8423+ , _bMaxRate :: !(Maybe (Textual Int32))

8424+ , _bMaxRatePerInstance :: !(Maybe (Textual Double))

84258425 , _bDescription :: !(Maybe Text)

8426− , _bCapacityScaler :: !(Maybe (JSONText Float))

8426+ , _bCapacityScaler :: !(Maybe (Textual Double))

84278427 } deriving (Eq,Show,Data,Typeable,Generic)

84288428

84298429-- | Creates a value of 'Backend' with the minimum fields required to make a request.

@@ -8763,13 +8763,13 @@ instance ToJSON OperationAggregatedListItems where

87638763--

87648764-- /See:/ 'instanceGroupManagerActionsSummary' smart constructor.

87658765data InstanceGroupManagerActionsSummary = InstanceGroupManagerActionsSummary

8766− { _igmasDeleting :: !(Maybe (JSONText Int32))

8767− , _igmasRestarting :: !(Maybe (JSONText Int32))

8768− , _igmasNone :: !(Maybe (JSONText Int32))

8769− , _igmasCreating :: !(Maybe (JSONText Int32))

8770− , _igmasRefreshing :: !(Maybe (JSONText Int32))

8771− , _igmasRecreating :: !(Maybe (JSONText Int32))

8772− , _igmasAbandoning :: !(Maybe (JSONText Int32))

8766+ { _igmasDeleting :: !(Maybe (Textual Int32))

8767+ , _igmasRestarting :: !(Maybe (Textual Int32))

8768+ , _igmasNone :: !(Maybe (Textual Int32))

8769+ , _igmasCreating :: !(Maybe (Textual Int32))

8770+ , _igmasRefreshing :: !(Maybe (Textual Int32))

8771+ , _igmasRecreating :: !(Maybe (Textual Int32))

8772+ , _igmasAbandoning :: !(Maybe (Textual Int32))

87738773 } deriving (Eq,Show,Data,Typeable,Generic)

87748774

87758775-- | Creates a value of 'InstanceGroupManagerActionsSummary' with the minimum fields required to make a request.

@@ -9358,7 +9358,7 @@ data AttachedDisk = AttachedDisk

93589358 , _adSource :: !(Maybe Text)

93599359 , _adLicenses :: !(Maybe [Text])

93609360 , _adType :: !(Maybe AttachedDiskType)

9361− , _adIndex :: !(Maybe (JSONText Int32))

9361+ , _adIndex :: !(Maybe (Textual Int32))

93629362 } deriving (Eq,Show,Data,Typeable,Generic)

93639363

93649364-- | Creates a value of 'AttachedDisk' with the minimum fields required to make a request.

@@ -9896,19 +9896,19 @@ instance ToJSON DiskTypeAggregatedList where

98969896--

98979897-- /See:/ 'hTTPHealthCheck' smart constructor.

98989898data HTTPHealthCheck = HTTPHealthCheck

9899− { _httphcHealthyThreshold :: !(Maybe (JSONText Int32))

9899+ { _httphcHealthyThreshold :: !(Maybe (Textual Int32))

99009900 , _httphcKind :: !Text

99019901 , _httphcRequestPath :: !(Maybe Text)

99029902 , _httphcSelfLink :: !(Maybe Text)

9903− , _httphcCheckIntervalSec :: !(Maybe (JSONText Int32))

9903+ , _httphcCheckIntervalSec :: !(Maybe (Textual Int32))

99049904 , _httphcName :: !(Maybe Text)

99059905 , _httphcCreationTimestamp :: !(Maybe Text)

9906− , _httphcId :: !(Maybe (JSONText Word64))

9906+ , _httphcId :: !(Maybe (Textual Word64))

99079907 , _httphcHost :: !(Maybe Text)

9908− , _httphcTimeoutSec :: !(Maybe (JSONText Int32))

9908+ , _httphcTimeoutSec :: !(Maybe (Textual Int32))

99099909 , _httphcDescription :: !(Maybe Text)

9910− , _httphcUnhealthyThreshold :: !(Maybe (JSONText Int32))

9911− , _httphcPort :: !(Maybe (JSONText Int32))

9910+ , _httphcUnhealthyThreshold :: !(Maybe (Textual Int32))

9911+ , _httphcPort :: !(Maybe (Textual Int32))

99129912 } deriving (Eq,Show,Data,Typeable,Generic)

99139913

99149914-- | Creates a value of 'HTTPHealthCheck' with the minimum fields required to make a request.

@@ -10274,11 +10274,11 @@ instance ToJSON AutoscalerAggregatedList where

1027410274-- /See:/ 'autoscalingPolicy' smart constructor.

1027510275data AutoscalingPolicy = AutoscalingPolicy

1027610276 { _apCustomMetricUtilizations :: !(Maybe [AutoscalingPolicyCustomMetricUtilization])

10277− , _apMaxNumReplicas :: !(Maybe (JSONText Int32))

10277+ , _apMaxNumReplicas :: !(Maybe (Textual Int32))

1027810278 , _apCPUUtilization :: !(Maybe AutoscalingPolicyCPUUtilization)

1027910279 , _apLoadBalancingUtilization :: !(Maybe AutoscalingPolicyLoadBalancingUtilization)

10280− , _apMinNumReplicas :: !(Maybe (JSONText Int32))

10281− , _apCoolDownPeriodSec :: !(Maybe (JSONText Int32))

10280+ , _apMinNumReplicas :: !(Maybe (Textual Int32))

10281+ , _apCoolDownPeriodSec :: !(Maybe (Textual Int32))

1028210282 } deriving (Eq,Show,Data,Typeable,Generic)

1028310283

1028410284-- | Creates a value of 'AutoscalingPolicy' with the minimum fields required to make a request.

@@ -10554,7 +10554,7 @@ instance ToJSON VPNTunnelList where

1055410554--

1055510555-- /See:/ 'machineTypeScratchDisksItem' smart constructor.

1055610556newtype MachineTypeScratchDisksItem = MachineTypeScratchDisksItem

10557− { _mtsdiDiskGb :: Maybe (JSONText Int32)

10557+ { _mtsdiDiskGb :: Maybe (Textual Int32)

1055810558 } deriving (Eq,Show,Data,Typeable,Generic)

1055910559

1056010560-- | Creates a value of 'MachineTypeScratchDisksItem' with the minimum fields required to make a request.

@@ -10726,10 +10726,10 @@ data DiskType = DiskType

1072610726 , _dtSelfLink :: !(Maybe Text)

1072710727 , _dtName :: !(Maybe Text)

1072810728 , _dtCreationTimestamp :: !(Maybe Text)

10729− , _dtId :: !(Maybe (JSONText Word64))

10729+ , _dtId :: !(Maybe (Textual Word64))

1073010730 , _dtValidDiskSize :: !(Maybe Text)

1073110731 , _dtDescription :: !(Maybe Text)

10732− , _dtDefaultDiskSizeGb :: !(Maybe (JSONText Int64))

10732+ , _dtDefaultDiskSizeGb :: !(Maybe (Textual Int64))

1073310733 , _dtDeprecated :: !(Maybe DeprecationStatus)

1073410734 } deriving (Eq,Show,Data,Typeable,Generic)

1073510735

@@ -10940,7 +10940,7 @@ instance ToJSON URLMapValidationResult where

1094010940-- /See:/ 'metadata' smart constructor.

1094110941data Metadata = Metadata

1094210942 { _mKind :: !Text

10943− , _mFingerprint :: !(Maybe (JSONText Word8))

10943+ , _mFingerprint :: !(Maybe (Textual Word8))

1094410944 , _mItems :: !(Maybe [MetadataItemsItem])

1094510945 } deriving (Eq,Show,Data,Typeable,Generic)

1094610946

@@ -11162,7 +11162,7 @@ data TargetHTTPProxy = TargetHTTPProxy

1116211162 , _thttppSelfLink :: !(Maybe Text)

1116311163 , _thttppName :: !(Maybe Text)

1116411164 , _thttppCreationTimestamp :: !(Maybe Text)

11165− , _thttppId :: !(Maybe (JSONText Word64))

11165+ , _thttppId :: !(Maybe (Textual Word64))

1116611166 , _thttppDescription :: !(Maybe Text)

1116711167 } deriving (Eq,Show,Data,Typeable,Generic)

1116811168

@@ -11275,17 +11275,17 @@ instance ToJSON TargetHTTPProxy where

1127511275-- /See:/ 'machineType' smart constructor.

1127611276data MachineType = MachineType

1127711277 { _mtKind :: !Text

11278− , _mtImageSpaceGb :: !(Maybe (JSONText Int32))

11278+ , _mtImageSpaceGb :: !(Maybe (Textual Int32))

1127911279 , _mtZone :: !(Maybe Text)

1128011280 , _mtSelfLink :: !(Maybe Text)

1128111281 , _mtName :: !(Maybe Text)

1128211282 , _mtCreationTimestamp :: !(Maybe Text)

1128311283 , _mtScratchDisks :: !(Maybe [MachineTypeScratchDisksItem])

11284− , _mtId :: !(Maybe (JSONText Word64))

11285− , _mtGuestCPUs :: !(Maybe (JSONText Int32))

11286− , _mtMaximumPersistentDisksSizeGb :: !(Maybe (JSONText Int64))

11287− , _mtMaximumPersistentDisks :: !(Maybe (JSONText Int32))

11288− , _mtMemoryMb :: !(Maybe (JSONText Int32))

11284+ , _mtId :: !(Maybe (Textual Word64))

11285+ , _mtGuestCPUs :: !(Maybe (Textual Int32))

11286+ , _mtMaximumPersistentDisksSizeGb :: !(Maybe (Textual Int64))

11287+ , _mtMaximumPersistentDisks :: !(Maybe (Textual Int32))

11288+ , _mtMemoryMb :: !(Maybe (Textual Int32))

1128911289 , _mtDescription :: !(Maybe Text)

1129011290 , _mtDeprecated :: !(Maybe DeprecationStatus)

1129111291 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -11707,7 +11707,7 @@ data Autoscaler = Autoscaler

1170711707 , _aaName :: !(Maybe Text)

1170811708 , _aaCreationTimestamp :: !(Maybe Text)

1170911709 , _aaAutoscalingPolicy :: !(Maybe AutoscalingPolicy)

11710− , _aaId :: !(Maybe (JSONText Word64))

11710+ , _aaId :: !(Maybe (Textual Word64))

1171111711 , _aaDescription :: !(Maybe Text)

1171211712 , _aaTarget :: !(Maybe Text)

1171311713 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -11995,7 +11995,7 @@ instance ToJSON TargetPoolsScopedListWarning where

1199511995data HealthStatus = HealthStatus

1199611996 { _hsIPAddress :: !(Maybe Text)

1199711997 , _hsHealthState :: !(Maybe HealthStatusHealthState)

11998− , _hsPort :: !(Maybe (JSONText Int32))

11998+ , _hsPort :: !(Maybe (Textual Int32))

1199911999 , _hsInstance :: !(Maybe Text)

1200012000 } deriving (Eq,Show,Data,Typeable,Generic)

1200112001

@@ -12071,7 +12071,7 @@ data Region = Region

1207112071 , _rrName :: !(Maybe Text)

1207212072 , _rrCreationTimestamp :: !(Maybe Text)

1207312073 , _rrQuotas :: !(Maybe [Quota])

12074− , _rrId :: !(Maybe (JSONText Word64))

12074+ , _rrId :: !(Maybe (Textual Word64))

1207512075 , _rrDescription :: !(Maybe Text)

1207612076 , _rrDeprecated :: !(Maybe DeprecationStatus)

1207712077 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -12211,8 +12211,8 @@ data VPNTunnel = VPNTunnel

1221112211 , _vtName :: !(Maybe Text)

1221212212 , _vtCreationTimestamp :: !(Maybe Text)

1221312213 , _vtSharedSecretHash :: !(Maybe Text)

12214− , _vtId :: !(Maybe (JSONText Word64))

12215− , _vtIkeVersion :: !(Maybe (JSONText Int32))

12214+ , _vtId :: !(Maybe (Textual Word64))

12215+ , _vtIkeVersion :: !(Maybe (Textual Int32))

1221612216 , _vtRegion :: !(Maybe Text)

1221712217 , _vtDescription :: !(Maybe Text)

1221812218 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -12814,7 +12814,7 @@ instance ToJSON URLMapsValidateRequest where

1281412814--

1281512815-- /See:/ 'instanceGroupManagersSetTargetPoolsRequest' smart constructor.

1281612816data InstanceGroupManagersSetTargetPoolsRequest = InstanceGroupManagersSetTargetPoolsRequest

12817− { _igmstprFingerprint :: !(Maybe (JSONText Word8))

12817+ { _igmstprFingerprint :: !(Maybe (Textual Word8))

1281812818 , _igmstprTargetPools :: !(Maybe [Text])

1281912819 } deriving (Eq,Show,Data,Typeable,Generic)

1282012820

@@ -13402,7 +13402,7 @@ instance ToJSON InstanceGroupsScopedListWarning where

1340213402--

1340313403-- /See:/ 'autoscalingPolicyCPUUtilization' smart constructor.

1340413404newtype AutoscalingPolicyCPUUtilization = AutoscalingPolicyCPUUtilization

13405− { _apcuUtilizationTarget :: Maybe (JSONText Double)

13405+ { _apcuUtilizationTarget :: Maybe (Textual Double)

1340613406 } deriving (Eq,Show,Data,Typeable,Generic)

1340713407

1340813408-- | Creates a value of 'AutoscalingPolicyCPUUtilization' with the minimum fields required to make a request.

@@ -13535,7 +13535,7 @@ data Firewall = Firewall

1353513535 , _fSelfLink :: !(Maybe Text)

1353613536 , _fName :: !(Maybe Text)

1353713537 , _fCreationTimestamp :: !(Maybe Text)

13538− , _fId :: !(Maybe (JSONText Word64))

13538+ , _fId :: !(Maybe (Textual Word64))

1353913539 , _fAllowed :: !(Maybe [FirewallAllowedItem])

1354013540 , _fDescription :: !(Maybe Text)

1354113541 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -13774,8 +13774,8 @@ instance ToJSON HostRule where

1377413774-- /See:/ 'quota' smart constructor.

1377513775data Quota = Quota

1377613776 { _qMetric :: !(Maybe QuotaMetric)

13777− , _qLimit :: !(Maybe (JSONText Double))

13778− , _qUsage :: !(Maybe (JSONText Double))

13777+ , _qLimit :: !(Maybe (Textual Double))

13778+ , _qUsage :: !(Maybe (Textual Double))

1377913779 } deriving (Eq,Show,Data,Typeable,Generic)

1378013780

1378113781-- | Creates a value of 'Quota' with the minimum fields required to make a request.

@@ -13830,15 +13830,15 @@ instance ToJSON Quota where

1383013830--

1383113831-- /See:/ 'instanceGroup' smart constructor.

1383213832data InstanceGroup = InstanceGroup

13833− { _iiSize :: !(Maybe (JSONText Int32))

13833+ { _iiSize :: !(Maybe (Textual Int32))

1383413834 , _iiKind :: !Text

13835− , _iiFingerprint :: !(Maybe (JSONText Word8))

13835+ , _iiFingerprint :: !(Maybe (Textual Word8))

1383613836 , _iiNetwork :: !(Maybe Text)

1383713837 , _iiZone :: !(Maybe Text)

1383813838 , _iiSelfLink :: !(Maybe Text)

1383913839 , _iiName :: !(Maybe Text)

1384013840 , _iiCreationTimestamp :: !(Maybe Text)

13841− , _iiId :: !(Maybe (JSONText Word64))

13841+ , _iiId :: !(Maybe (Textual Word64))

1384213842 , _iiDescription :: !(Maybe Text)

1384313843 , _iiNamedPorts :: !(Maybe [NamedPort])

1384413844 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -14336,7 +14336,7 @@ data TargetHTTPSProxy = TargetHTTPSProxy

1433614336 , _thpSelfLink :: !(Maybe Text)

1433714337 , _thpName :: !(Maybe Text)

1433814338 , _thpCreationTimestamp :: !(Maybe Text)

14339− , _thpId :: !(Maybe (JSONText Word64))

14339+ , _thpId :: !(Maybe (Textual Word64))

1434014340 , _thpDescription :: !(Maybe Text)

1434114341 } deriving (Eq,Show,Data,Typeable,Generic)

1434214342

@@ -14694,17 +14694,17 @@ instance ToJSON InstancesScopedListWarningDataItem

1469414694data BackendService = BackendService

1469514695 { _bsBackends :: !(Maybe [Backend])

1469614696 , _bsKind :: !Text

14697− , _bsFingerprint :: !(Maybe (JSONText Word8))

14697+ , _bsFingerprint :: !(Maybe (Textual Word8))

1469814698 , _bsProtocol :: !(Maybe BackendServiceProtocol)

1469914699 , _bsSelfLink :: !(Maybe Text)

1470014700 , _bsName :: !(Maybe Text)

1470114701 , _bsCreationTimestamp :: !(Maybe Text)

14702− , _bsId :: !(Maybe (JSONText Word64))

14703− , _bsTimeoutSec :: !(Maybe (JSONText Int32))

14702+ , _bsId :: !(Maybe (Textual Word64))

14703+ , _bsTimeoutSec :: !(Maybe (Textual Int32))

1470414704 , _bsDescription :: !(Maybe Text)

1470514705 , _bsPortName :: !(Maybe Text)

1470614706 , _bsHealthChecks :: !(Maybe [Text])

14707− , _bsPort :: !(Maybe (JSONText Int32))

14707+ , _bsPort :: !(Maybe (Textual Int32))

1470814708 } deriving (Eq,Show,Data,Typeable,Generic)

1470914709

1471014710-- | Creates a value of 'BackendService' with the minimum fields required to make a request.

@@ -14996,19 +14996,19 @@ instance ToJSON InstanceGroupsScopedList where

1499614996--

1499714997-- /See:/ 'httpsHealthCheck' smart constructor.

1499814998data HTTPSHealthCheck = HTTPSHealthCheck

14999− { _hhcHealthyThreshold :: !(Maybe (JSONText Int32))

14999+ { _hhcHealthyThreshold :: !(Maybe (Textual Int32))

1500015000 , _hhcKind :: !Text

1500115001 , _hhcRequestPath :: !(Maybe Text)

1500215002 , _hhcSelfLink :: !(Maybe Text)

15003− , _hhcCheckIntervalSec :: !(Maybe (JSONText Int32))

15003+ , _hhcCheckIntervalSec :: !(Maybe (Textual Int32))

1500415004 , _hhcName :: !(Maybe Text)

1500515005 , _hhcCreationTimestamp :: !(Maybe Text)

15006− , _hhcId :: !(Maybe (JSONText Word64))

15006+ , _hhcId :: !(Maybe (Textual Word64))

1500715007 , _hhcHost :: !(Maybe Text)

15008− , _hhcTimeoutSec :: !(Maybe (JSONText Int32))

15008+ , _hhcTimeoutSec :: !(Maybe (Textual Int32))

1500915009 , _hhcDescription :: !(Maybe Text)

15010− , _hhcUnhealthyThreshold :: !(Maybe (JSONText Int32))

15011− , _hhcPort :: !(Maybe (JSONText Int32))

15010+ , _hhcUnhealthyThreshold :: !(Maybe (Textual Int32))

15011+ , _hhcPort :: !(Maybe (Textual Int32))

1501215012 } deriving (Eq,Show,Data,Typeable,Generic)

1501315013

1501415014-- | Creates a value of 'HTTPSHealthCheck' with the minimum fields required to make a request.

@@ -15226,7 +15226,7 @@ instance ToJSON VPNTunnelAggregatedListItems where

1522615226--

1522715227-- /See:/ 'tags' smart constructor.

1522815228data Tags = Tags

15229− { _tFingerprint :: !(Maybe (JSONText Word8))

15229+ { _tFingerprint :: !(Maybe (Textual Word8))

1523015230 , _tItems :: !(Maybe [Text])

1523115231 } deriving (Eq,Show,Data,Typeable,Generic)

1523215232

@@ -15496,7 +15496,7 @@ data Instance = Instance

1549615496 , _insnCreationTimestamp :: !(Maybe Text)

1549715497 , _insnMachineType :: !(Maybe Text)

1549815498 , _insnMetadata :: !(Maybe Metadata)

15499− , _insnId :: !(Maybe (JSONText Word64))

15499+ , _insnId :: !(Maybe (Textual Word64))

1550015500 , _insnScheduling :: !(Maybe Scheduling)

1550115501 , _insnDisks :: !(Maybe [AttachedDisk])

1550215502 , _insnCanIPForward :: !(Maybe Bool)

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type AddressesAggregatedListResource =

5353 "addresses" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] AddressAggregatedList

5959

@@ -64,7 +64,7 @@ data AddressesAggregatedList = AddressesAggregatedList

6464 { _aalProject :: !Text

6565 , _aalFilter :: !(Maybe Text)

6666 , _aalPageToken :: !(Maybe Text)

67− , _aalMaxResults :: !(JSONText Word32)

67+ , _aalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'AddressesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Addresses/List.hs+2−2

@@ -56,7 +56,7 @@ type AddressesListResource =

5656 "addresses" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] AddressList

6161

6262-- | Retrieves the list of address resources contained within the specified

@@ -68,7 +68,7 @@ data AddressesList = AddressesList

6868 , _alFilter :: !(Maybe Text)

6969 , _alRegion :: !Text

7070 , _alPageToken :: !(Maybe Text)

71− , _alMaxResults :: !(JSONText Word32)

71+ , _alMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'AddressesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type AutoscalersAggregatedListResource =

5353 "autoscalers" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] AutoscalerAggregatedList

5959

@@ -64,7 +64,7 @@ data AutoscalersAggregatedList = AutoscalersAggregatedList

6464 { _autProject :: !Text

6565 , _autFilter :: !(Maybe Text)

6666 , _autPageToken :: !(Maybe Text)

67− , _autMaxResults :: !(JSONText Word32)

67+ , _autMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'AutoscalersAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Autoscalers/List.hs+2−2

@@ -56,7 +56,7 @@ type AutoscalersListResource =

5656 "autoscalers" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] AutoscalerList

6262

@@ -69,7 +69,7 @@ data AutoscalersList = AutoscalersList

6969 , _aZone :: !Text

7070 , _aFilter :: !(Maybe Text)

7171 , _aPageToken :: !(Maybe Text)

72− , _aMaxResults :: !(JSONText Word32)

72+ , _aMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'AutoscalersList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/BackendServices/List.hs+2−2

@@ -54,7 +54,7 @@ type BackendServicesListResource =

5454 "backendServices" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] BackendServiceList

6060

@@ -66,7 +66,7 @@ data BackendServicesList = BackendServicesList

6666 { _bslProject :: !Text

6767 , _bslFilter :: !(Maybe Text)

6868 , _bslPageToken :: !(Maybe Text)

69− , _bslMaxResults :: !(JSONText Word32)

69+ , _bslMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'BackendServicesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type DiskTypesAggregatedListResource =

5353 "diskTypes" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] DiskTypeAggregatedList

5959

@@ -64,7 +64,7 @@ data DiskTypesAggregatedList = DiskTypesAggregatedList

6464 { _dtalProject :: !Text

6565 , _dtalFilter :: !(Maybe Text)

6666 , _dtalPageToken :: !(Maybe Text)

67− , _dtalMaxResults :: !(JSONText Word32)

67+ , _dtalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'DiskTypesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/DiskTypes/List.hs+2−2

@@ -56,7 +56,7 @@ type DiskTypesListResource =

5656 "diskTypes" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] DiskTypeList

6161

6262-- | Retrieves the list of disk type resources available to the specified

@@ -68,7 +68,7 @@ data DiskTypesList = DiskTypesList

6868 , _dtlZone :: !Text

6969 , _dtlFilter :: !(Maybe Text)

7070 , _dtlPageToken :: !(Maybe Text)

71− , _dtlMaxResults :: !(JSONText Word32)

71+ , _dtlMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'DiskTypesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type DisksAggregatedListResource =

5353 "disks" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] DiskAggregatedList

5959

@@ -64,7 +64,7 @@ data DisksAggregatedList = DisksAggregatedList

6464 { _dalProject :: !Text

6565 , _dalFilter :: !(Maybe Text)

6666 , _dalPageToken :: !(Maybe Text)

67− , _dalMaxResults :: !(JSONText Word32)

67+ , _dalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'DisksAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Disks/List.hs+2−2

@@ -56,7 +56,7 @@ type DisksListResource =

5656 "disks" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] DiskList

6161

6262-- | Retrieves the list of persistent disks contained within the specified

@@ -68,7 +68,7 @@ data DisksList = DisksList

6868 , _dlZone :: !Text

6969 , _dlFilter :: !(Maybe Text)

7070 , _dlPageToken :: !(Maybe Text)

71− , _dlMaxResults :: !(JSONText Word32)

71+ , _dlMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'DisksList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Firewalls/List.hs+2−2

@@ -54,7 +54,7 @@ type FirewallsListResource =

5454 "firewalls" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] FirewallList

5959

6060-- | Retrieves the list of firewall resources available to the specified

@@ -65,7 +65,7 @@ data FirewallsList = FirewallsList

6565 { _flProject :: !Text

6666 , _flFilter :: !(Maybe Text)

6767 , _flPageToken :: !(Maybe Text)

68− , _flMaxResults :: !(JSONText Word32)

68+ , _flMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'FirewallsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type ForwardingRulesAggregatedListResource =

5353 "forwardingRules" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] ForwardingRuleAggregatedList

5959

@@ -64,7 +64,7 @@ data ForwardingRulesAggregatedList = ForwardingRulesAggregatedList

6464 { _fralProject :: !Text

6565 , _fralFilter :: !(Maybe Text)

6666 , _fralPageToken :: !(Maybe Text)

67− , _fralMaxResults :: !(JSONText Word32)

67+ , _fralMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'ForwardingRulesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/ForwardingRules/List.hs+2−2

@@ -56,7 +56,7 @@ type ForwardingRulesListResource =

5656 "forwardingRules" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] ForwardingRuleList

6262

@@ -69,7 +69,7 @@ data ForwardingRulesList = ForwardingRulesList

6969 , _frlFilter :: !(Maybe Text)

7070 , _frlRegion :: !Text

7171 , _frlPageToken :: !(Maybe Text)

72− , _frlMaxResults :: !(JSONText Word32)

72+ , _frlMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'ForwardingRulesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalAddresses/List.hs+2−2

@@ -53,7 +53,7 @@ type GlobalAddressesListResource =

5353 "addresses" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] AddressList

5858

5959-- | Retrieves the list of global address resources.

@@ -63,7 +63,7 @@ data GlobalAddressesList = GlobalAddressesList

6363 { _galProject :: !Text

6464 , _galFilter :: !(Maybe Text)

6565 , _galPageToken :: !(Maybe Text)

66− , _galMaxResults :: !(JSONText Word32)

66+ , _galMaxResults :: !(Textual Word32)

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

6969-- | Creates a value of 'GlobalAddressesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalForwardingRules/List.hs+2−2

@@ -54,7 +54,7 @@ type GlobalForwardingRulesListResource =

5454 "forwardingRules" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] ForwardingRuleList

6060

@@ -66,7 +66,7 @@ data GlobalForwardingRulesList = GlobalForwardingRulesList

6666 { _gfrlProject :: !Text

6767 , _gfrlFilter :: !(Maybe Text)

6868 , _gfrlPageToken :: !(Maybe Text)

69− , _gfrlMaxResults :: !(JSONText Word32)

69+ , _gfrlMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'GlobalForwardingRulesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type GlobalOperationsAggregatedListResource =

5353 "operations" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] OperationAggregatedList

5959

@@ -64,7 +64,7 @@ data GlobalOperationsAggregatedList = GlobalOperationsAggregatedList

6464 { _goalProject :: !Text

6565 , _goalFilter :: !(Maybe Text)

6666 , _goalPageToken :: !(Maybe Text)

67− , _goalMaxResults :: !(JSONText Word32)

67+ , _goalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'GlobalOperationsAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/GlobalOperations/List.hs+2−2

@@ -54,7 +54,7 @@ type GlobalOperationsListResource =

5454 "operations" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] OperationList

5959

6060-- | Retrieves the list of Operation resources contained within the specified

@@ -65,7 +65,7 @@ data GlobalOperationsList = GlobalOperationsList

6565 { _golProject :: !Text

6666 , _golFilter :: !(Maybe Text)

6767 , _golPageToken :: !(Maybe Text)

68− , _golMaxResults :: !(JSONText Word32)

68+ , _golMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'GlobalOperationsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/List.hs+2−2

@@ -54,7 +54,7 @@ type HTTPHealthChecksListResource =

5454 "httpHealthChecks" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] HTTPHealthCheckList

6060

@@ -66,7 +66,7 @@ data HTTPHealthChecksList = HTTPHealthChecksList

6666 { _httphclProject :: !Text

6767 , _httphclFilter :: !(Maybe Text)

6868 , _httphclPageToken :: !(Maybe Text)

69− , _httphclMaxResults :: !(JSONText Word32)

69+ , _httphclMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'HTTPHealthChecksList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/HTTPSHealthChecks/List.hs+2−2

@@ -54,7 +54,7 @@ type HTTPSHealthChecksListResource =

5454 "httpsHealthChecks" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] HTTPSHealthCheckList

6060

@@ -66,7 +66,7 @@ data HTTPSHealthChecksList = HTTPSHealthChecksList

6666 { _hhclProject :: !Text

6767 , _hhclFilter :: !(Maybe Text)

6868 , _hhclPageToken :: !(Maybe Text)

69− , _hhclMaxResults :: !(JSONText Word32)

69+ , _hhclMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'HTTPSHealthChecksList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Images/List.hs+2−2

@@ -59,7 +59,7 @@ type ImagesListResource =

5959 "images" :>

6060 QueryParam "filter" Text :>

6161 QueryParam "pageToken" Text :>

62− QueryParam "maxResults" (JSONText Word32) :>

62+ QueryParam "maxResults" (Textual Word32) :>

6363 QueryParam "alt" AltJSON :> Get '[JSON] ImageList

6464

6565-- | Retrieves the list of private images available to the specified project.

@@ -75,7 +75,7 @@ data ImagesList = ImagesList

7575 { _illProject :: !Text

7676 , _illFilter :: !(Maybe Text)

7777 , _illPageToken :: !(Maybe Text)

78− , _illMaxResults :: !(JSONText Word32)

78+ , _illMaxResults :: !(Textual Word32)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

8181-- | Creates a value of 'ImagesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type InstanceGroupManagersAggregatedListResource =

5353 "instanceGroupManagers" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] InstanceGroupManagerAggregatedList

5959

@@ -64,7 +64,7 @@ data InstanceGroupManagersAggregatedList = InstanceGroupManagersAggregatedList

6464 { _igmalProject :: !Text

6565 , _igmalFilter :: !(Maybe Text)

6666 , _igmalPageToken :: !(Maybe Text)

67− , _igmalMaxResults :: !(JSONText Word32)

67+ , _igmalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'InstanceGroupManagersAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/List.hs+2−2

@@ -56,7 +56,7 @@ type InstanceGroupManagersListResource =

5656 "instanceGroupManagers" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] InstanceGroupManagerList

6262

@@ -69,7 +69,7 @@ data InstanceGroupManagersList = InstanceGroupManagersList

6969 , _igmlZone :: !Text

7070 , _igmlFilter :: !(Maybe Text)

7171 , _igmlPageToken :: !(Maybe Text)

72− , _igmlMaxResults :: !(JSONText Word32)

72+ , _igmlMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'InstanceGroupManagersList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroupManagers/Resize.hs+2−2

@@ -60,7 +60,7 @@ type InstanceGroupManagersResizeResource =

6060 "instanceGroupManagers" :>

6161 Capture "instanceGroupManager" Text :>

6262 "resize" :>

63− QueryParam "size" (JSONText Int32) :>

63+ QueryParam "size" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :> Post '[JSON] Operation

6565

6666-- | Resizes the managed instance group. If you increase the size, the group

@@ -74,7 +74,7 @@ type InstanceGroupManagersResizeResource =

7474-- /See:/ 'instanceGroupManagersResize' smart constructor.

7575data InstanceGroupManagersResize = InstanceGroupManagersResize

7676 { _igmrProject :: !Text

77− , _igmrSize :: !(JSONText Int32)

77+ , _igmrSize :: !(Textual Int32)

7878 , _igmrInstanceGroupManager :: !Text

7979 , _igmrZone :: !Text

8080 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type InstanceGroupsAggregatedListResource =

5353 "instanceGroups" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] InstanceGroupAggregatedList

5959

@@ -64,7 +64,7 @@ data InstanceGroupsAggregatedList = InstanceGroupsAggregatedList

6464 { _igalProject :: !Text

6565 , _igalFilter :: !(Maybe Text)

6666 , _igalPageToken :: !(Maybe Text)

67− , _igalMaxResults :: !(JSONText Word32)

67+ , _igalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'InstanceGroupsAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/List.hs+2−2

@@ -56,7 +56,7 @@ type InstanceGroupsListResource =

5656 "instanceGroups" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] InstanceGroupList

6262

@@ -69,7 +69,7 @@ data InstanceGroupsList = InstanceGroupsList

6969 , _iglZone :: !Text

7070 , _iglFilter :: !(Maybe Text)

7171 , _iglPageToken :: !(Maybe Text)

72− , _iglMaxResults :: !(JSONText Word32)

72+ , _iglMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'InstanceGroupsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceGroups/ListInstances.hs+2−2

@@ -59,7 +59,7 @@ type InstanceGroupsListInstancesResource =

5959 "listInstances" :>

6060 QueryParam "filter" Text :>

6161 QueryParam "pageToken" Text :>

62− QueryParam "maxResults" (JSONText Word32) :>

62+ QueryParam "maxResults" (Textual Word32) :>

6363 QueryParam "alt" AltJSON :>

6464 ReqBody '[JSON]

6565 InstanceGroupsListInstancesRequest

@@ -75,7 +75,7 @@ data InstanceGroupsListInstances' = InstanceGroupsListInstances'

7575 , _igliFilter :: !(Maybe Text)

7676 , _igliPageToken :: !(Maybe Text)

7777 , _igliInstanceGroup :: !Text

78− , _igliMaxResults :: !(JSONText Word32)

78+ , _igliMaxResults :: !(Textual Word32)

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

8181-- | Creates a value of 'InstanceGroupsListInstances'' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/InstanceTemplates/List.hs+2−2

@@ -54,7 +54,7 @@ type InstanceTemplatesListResource =

5454 "instanceTemplates" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] InstanceTemplateList

6060

@@ -66,7 +66,7 @@ data InstanceTemplatesList = InstanceTemplatesList

6666 { _itlProject :: !Text

6767 , _itlFilter :: !(Maybe Text)

6868 , _itlPageToken :: !(Maybe Text)

69− , _itlMaxResults :: !(JSONText Word32)

69+ , _itlMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'InstanceTemplatesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type InstancesAggregatedListResource =

5353 "instances" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] InstanceAggregatedList

5959

@@ -64,7 +64,7 @@ data InstancesAggregatedList = InstancesAggregatedList

6464 { _ialProject :: !Text

6565 , _ialFilter :: !(Maybe Text)

6666 , _ialPageToken :: !(Maybe Text)

67− , _ialMaxResults :: !(JSONText Word32)

67+ , _ialMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'InstancesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/GetSerialPortOutput.hs+2−2

@@ -54,7 +54,7 @@ type InstancesGetSerialPortOutputResource =

5454 "instances" :>

5555 Capture "instance" Text :>

5656 "serialPort" :>

57− QueryParam "port" (JSONText Int32) :>

57+ QueryParam "port" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] SerialPortOutput

6060

@@ -64,7 +64,7 @@ type InstancesGetSerialPortOutputResource =

6464data InstancesGetSerialPortOutput = InstancesGetSerialPortOutput

6565 { _igspoProject :: !Text

6666 , _igspoZone :: !Text

67− , _igspoPort :: !(JSONText Int32)

67+ , _igspoPort :: !(Textual Int32)

6868 , _igspoInstance :: !Text

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

gogol-compute/gen/Network/Google/Resource/Compute/Instances/List.hs+2−2

@@ -56,7 +56,7 @@ type InstancesListResource =

5656 "instances" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] InstanceList

6161

6262-- | Retrieves the list of instance resources contained within the specified

@@ -68,7 +68,7 @@ data InstancesList = InstancesList

6868 , _ilZone :: !Text

6969 , _ilFilter :: !(Maybe Text)

7070 , _ilPageToken :: !(Maybe Text)

71− , _ilMaxResults :: !(JSONText Word32)

71+ , _ilMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'InstancesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type MachineTypesAggregatedListResource =

5353 "machineTypes" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] MachineTypeAggregatedList

5959

@@ -64,7 +64,7 @@ data MachineTypesAggregatedList = MachineTypesAggregatedList

6464 { _mtalProject :: !Text

6565 , _mtalFilter :: !(Maybe Text)

6666 , _mtalPageToken :: !(Maybe Text)

67− , _mtalMaxResults :: !(JSONText Word32)

67+ , _mtalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'MachineTypesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/MachineTypes/List.hs+2−2

@@ -56,7 +56,7 @@ type MachineTypesListResource =

5656 "machineTypes" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] MachineTypeList

6262

@@ -69,7 +69,7 @@ data MachineTypesList = MachineTypesList

6969 , _mtlZone :: !Text

7070 , _mtlFilter :: !(Maybe Text)

7171 , _mtlPageToken :: !(Maybe Text)

72− , _mtlMaxResults :: !(JSONText Word32)

72+ , _mtlMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'MachineTypesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Networks/List.hs+2−2

@@ -54,7 +54,7 @@ type NetworksListResource =

5454 "networks" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] NetworkList

5959

6060-- | Retrieves the list of network resources available to the specified

@@ -65,7 +65,7 @@ data NetworksList = NetworksList

6565 { _nlProject :: !Text

6666 , _nlFilter :: !(Maybe Text)

6767 , _nlPageToken :: !(Maybe Text)

68− , _nlMaxResults :: !(JSONText Word32)

68+ , _nlMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'NetworksList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/RegionOperations/List.hs+2−2

@@ -56,7 +56,7 @@ type RegionOperationsListResource =

5656 "operations" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] OperationList

6161

6262-- | Retrieves the list of Operation resources contained within the specified

@@ -68,7 +68,7 @@ data RegionOperationsList = RegionOperationsList

6868 , _rolFilter :: !(Maybe Text)

6969 , _rolRegion :: !Text

7070 , _rolPageToken :: !(Maybe Text)

71− , _rolMaxResults :: !(JSONText Word32)

71+ , _rolMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'RegionOperationsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Regions/List.hs+2−2

@@ -53,7 +53,7 @@ type RegionsListResource =

5353 "regions" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] RegionList

5858

5959-- | Retrieves the list of region resources available to the specified

@@ -64,7 +64,7 @@ data RegionsList = RegionsList

6464 { _rProject :: !Text

6565 , _rFilter :: !(Maybe Text)

6666 , _rPageToken :: !(Maybe Text)

67− , _rMaxResults :: !(JSONText Word32)

67+ , _rMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'RegionsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Routes/List.hs+2−2

@@ -54,7 +54,7 @@ type RoutesListResource =

5454 "routes" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] RouteList

5959

6060-- | Retrieves the list of route resources available to the specified

@@ -65,7 +65,7 @@ data RoutesList = RoutesList

6565 { _rlProject :: !Text

6666 , _rlFilter :: !(Maybe Text)

6767 , _rlPageToken :: !(Maybe Text)

68− , _rlMaxResults :: !(JSONText Word32)

68+ , _rlMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'RoutesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/SSLCertificates/List.hs+2−2

@@ -54,7 +54,7 @@ type SSLCertificatesListResource =

5454 "sslCertificates" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] SSLCertificateList

6060

@@ -66,7 +66,7 @@ data SSLCertificatesList = SSLCertificatesList

6666 { _sclProject :: !Text

6767 , _sclFilter :: !(Maybe Text)

6868 , _sclPageToken :: !(Maybe Text)

69− , _sclMaxResults :: !(JSONText Word32)

69+ , _sclMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'SSLCertificatesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Snapshots/List.hs+2−2

@@ -54,7 +54,7 @@ type SnapshotsListResource =

5454 "snapshots" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] SnapshotList

5959

6060-- | Retrieves the list of Snapshot resources contained within the specified

@@ -65,7 +65,7 @@ data SnapshotsList = SnapshotsList

6565 { _slProject :: !Text

6666 , _slFilter :: !(Maybe Text)

6767 , _slPageToken :: !(Maybe Text)

68− , _slMaxResults :: !(JSONText Word32)

68+ , _slMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'SnapshotsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPProxies/List.hs+2−2

@@ -54,7 +54,7 @@ type TargetHTTPProxiesListResource =

5454 "targetHttpProxies" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] TargetHTTPProxyList

6060

@@ -66,7 +66,7 @@ data TargetHTTPProxiesList = TargetHTTPProxiesList

6666 { _thttpplProject :: !Text

6767 , _thttpplFilter :: !(Maybe Text)

6868 , _thttpplPageToken :: !(Maybe Text)

69− , _thttpplMaxResults :: !(JSONText Word32)

69+ , _thttpplMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'TargetHTTPProxiesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetHTTPSProxies/List.hs+2−2

@@ -54,7 +54,7 @@ type TargetHTTPSProxiesListResource =

5454 "targetHttpsProxies" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] TargetHTTPSProxyList

6060

@@ -66,7 +66,7 @@ data TargetHTTPSProxiesList = TargetHTTPSProxiesList

6666 { _thplProject :: !Text

6767 , _thplFilter :: !(Maybe Text)

6868 , _thplPageToken :: !(Maybe Text)

69− , _thplMaxResults :: !(JSONText Word32)

69+ , _thplMaxResults :: !(Textual Word32)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'TargetHTTPSProxiesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type TargetInstancesAggregatedListResource =

5353 "targetInstances" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] TargetInstanceAggregatedList

5959

@@ -64,7 +64,7 @@ data TargetInstancesAggregatedList = TargetInstancesAggregatedList

6464 { _tialProject :: !Text

6565 , _tialFilter :: !(Maybe Text)

6666 , _tialPageToken :: !(Maybe Text)

67− , _tialMaxResults :: !(JSONText Word32)

67+ , _tialMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'TargetInstancesAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetInstances/List.hs+2−2

@@ -56,7 +56,7 @@ type TargetInstancesListResource =

5656 "targetInstances" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] TargetInstanceList

6262

@@ -69,7 +69,7 @@ data TargetInstancesList = TargetInstancesList

6969 , _tilZone :: !Text

7070 , _tilFilter :: !(Maybe Text)

7171 , _tilPageToken :: !(Maybe Text)

72− , _tilMaxResults :: !(JSONText Word32)

72+ , _tilMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'TargetInstancesList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type TargetPoolsAggregatedListResource =

5353 "targetPools" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] TargetPoolAggregatedList

5959

@@ -64,7 +64,7 @@ data TargetPoolsAggregatedList = TargetPoolsAggregatedList

6464 { _tpalProject :: !Text

6565 , _tpalFilter :: !(Maybe Text)

6666 , _tpalPageToken :: !(Maybe Text)

67− , _tpalMaxResults :: !(JSONText Word32)

67+ , _tpalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'TargetPoolsAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/List.hs+2−2

@@ -56,7 +56,7 @@ type TargetPoolsListResource =

5656 "targetPools" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] TargetPoolList

6262

@@ -69,7 +69,7 @@ data TargetPoolsList = TargetPoolsList

6969 , _tplFilter :: !(Maybe Text)

7070 , _tplRegion :: !Text

7171 , _tplPageToken :: !(Maybe Text)

72− , _tplMaxResults :: !(JSONText Word32)

72+ , _tplMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'TargetPoolsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetPools/SetBackup.hs+2−2

@@ -55,7 +55,7 @@ type TargetPoolsSetBackupResource =

5555 "targetPools" :>

5656 Capture "targetPool" Text :>

5757 "setBackup" :>

58− QueryParam "failoverRatio" (JSONText Float) :>

58+ QueryParam "failoverRatio" (Textual Double) :>

5959 QueryParam "alt" AltJSON :>

6060 ReqBody '[JSON] TargetReference :>

6161 Post '[JSON] Operation

@@ -67,7 +67,7 @@ data TargetPoolsSetBackup = TargetPoolsSetBackup

6767 { _tpsbProject :: !Text

6868 , _tpsbTargetPool :: !Text

6969 , _tpsbPayload :: !TargetReference

70− , _tpsbFailoverRatio :: !(Maybe (JSONText Float))

70+ , _tpsbFailoverRatio :: !(Maybe (Textual Double))

7171 , _tpsbRegion :: !Text

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type TargetVPNGatewaysAggregatedListResource =

5353 "targetVpnGateways" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] TargetVPNGatewayAggregatedList

5959

@@ -64,7 +64,7 @@ data TargetVPNGatewaysAggregatedList = TargetVPNGatewaysAggregatedList

6464 { _tvgalProject :: !Text

6565 , _tvgalFilter :: !(Maybe Text)

6666 , _tvgalPageToken :: !(Maybe Text)

67− , _tvgalMaxResults :: !(JSONText Word32)

67+ , _tvgalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'TargetVPNGatewaysAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/TargetVPNGateways/List.hs+2−2

@@ -56,7 +56,7 @@ type TargetVPNGatewaysListResource =

5656 "targetVpnGateways" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] TargetVPNGatewayList

6262

@@ -69,7 +69,7 @@ data TargetVPNGatewaysList = TargetVPNGatewaysList

6969 , _tvglFilter :: !(Maybe Text)

7070 , _tvglRegion :: !Text

7171 , _tvglPageToken :: !(Maybe Text)

72− , _tvglMaxResults :: !(JSONText Word32)

72+ , _tvglMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'TargetVPNGatewaysList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/List.hs+2−2

@@ -54,7 +54,7 @@ type URLMapsListResource =

5454 "urlMaps" :>

5555 QueryParam "filter" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] URLMapList

5959

6060-- | Retrieves the list of UrlMap resources available to the specified

@@ -65,7 +65,7 @@ data URLMapsList = URLMapsList

6565 { _umlProject :: !Text

6666 , _umlFilter :: !(Maybe Text)

6767 , _umlPageToken :: !(Maybe Text)

68− , _umlMaxResults :: !(JSONText Word32)

68+ , _umlMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'URLMapsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/AggregatedList.hs+2−2

@@ -53,7 +53,7 @@ type VPNTunnelsAggregatedListResource =

5353 "vpnTunnels" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] VPNTunnelAggregatedList

5959

@@ -64,7 +64,7 @@ data VPNTunnelsAggregatedList = VPNTunnelsAggregatedList

6464 { _vtalProject :: !Text

6565 , _vtalFilter :: !(Maybe Text)

6666 , _vtalPageToken :: !(Maybe Text)

67− , _vtalMaxResults :: !(JSONText Word32)

67+ , _vtalMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'VPNTunnelsAggregatedList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/List.hs+2−2

@@ -56,7 +56,7 @@ type VPNTunnelsListResource =

5656 "vpnTunnels" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] VPNTunnelList

6161

6262-- | Retrieves the list of VpnTunnel resources contained in the specified

@@ -68,7 +68,7 @@ data VPNTunnelsList = VPNTunnelsList

6868 , _vtlFilter :: !(Maybe Text)

6969 , _vtlRegion :: !Text

7070 , _vtlPageToken :: !(Maybe Text)

71− , _vtlMaxResults :: !(JSONText Word32)

71+ , _vtlMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'VPNTunnelsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/ZoneOperations/List.hs+2−2

@@ -56,7 +56,7 @@ type ZoneOperationsListResource =

5656 "operations" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] OperationList

6161

6262-- | Retrieves the list of Operation resources contained within the specified

@@ -68,7 +68,7 @@ data ZoneOperationsList = ZoneOperationsList

6868 , _zolZone :: !Text

6969 , _zolFilter :: !(Maybe Text)

7070 , _zolPageToken :: !(Maybe Text)

71− , _zolMaxResults :: !(JSONText Word32)

71+ , _zolMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'ZoneOperationsList' with the minimum fields required to make a request.

gogol-compute/gen/Network/Google/Resource/Compute/Zones/List.hs+2−2

@@ -52,7 +52,7 @@ type ZonesListResource =

5252 "zones" :>

5353 QueryParam "filter" Text :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Word32) :>

55+ QueryParam "maxResults" (Textual Word32) :>

5656 QueryParam "alt" AltJSON :> Get '[JSON] ZoneList

5757

5858-- | Retrieves the list of zone resources available to the specified project.

@@ -62,7 +62,7 @@ data ZonesList = ZonesList

6262 { _zlProject :: !Text

6363 , _zlFilter :: !(Maybe Text)

6464 , _zlPageToken :: !(Maybe Text)

65− , _zlMaxResults :: !(JSONText Word32)

65+ , _zlMaxResults :: !(Textual Word32)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'ZonesList' with the minimum fields required to make a request.

gogol-container/gen/Network/Google/Container/Types/Product.hs+3−3

@@ -99,9 +99,9 @@ instance ToJSON CreateClusterRequest where

9999data Cluster = Cluster

100100 { _cStatus :: !(Maybe Text)

101101 , _cNodeConfig :: !(Maybe NodeConfig)

102− , _cNodeIPv4CIdRSize :: !(Maybe (JSONText Int32))

102+ , _cNodeIPv4CIdRSize :: !(Maybe (Textual Int32))

103103 , _cClusterIPv4CIdR :: !(Maybe Text)

104− , _cInitialNodeCount :: !(Maybe (JSONText Int32))

104+ , _cInitialNodeCount :: !(Maybe (Textual Int32))

105105 , _cCurrentNodeVersion :: !(Maybe Text)

106106 , _cNetwork :: !(Maybe Text)

107107 , _cInitialClusterVersion :: !(Maybe Text)

@@ -437,7 +437,7 @@ instance ToJSON UpdateClusterRequest where

437437--

438438-- /See:/ 'nodeConfig' smart constructor.

439439data NodeConfig = NodeConfig

440− { _ncDiskSizeGb :: !(Maybe (JSONText Int32))

440+ { _ncDiskSizeGb :: !(Maybe (Textual Int32))

441441 , _ncOAuthScopes :: !(Maybe [Text])

442442 , _ncMachineType :: !(Maybe Text)

443443 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+13−13

@@ -23,8 +23,8 @@ import Network.Google.Prelude

2323--

2424-- /See:/ 'promotionImage' smart constructor.

2525data PromotionImage = PromotionImage

26− { _piHeight :: !(Maybe (JSONText Int32))

27− , _piWidth :: !(Maybe (JSONText Int32))

26+ { _piHeight :: !(Maybe (Textual Int32))

27+ , _piWidth :: !(Maybe (Textual Int32))

2828 , _piSource :: !(Maybe Text)

2929 } deriving (Eq,Show,Data,Typeable,Generic)

3030

@@ -281,12 +281,12 @@ instance ToJSON SearchSpelling where

281281-- /See:/ 'resultImage' smart constructor.

282282data ResultImage = ResultImage

283283 { _riThumbnailLink :: !(Maybe Text)

284− , _riHeight :: !(Maybe (JSONText Int32))

285− , _riByteSize :: !(Maybe (JSONText Int32))

284+ , _riHeight :: !(Maybe (Textual Int32))

285+ , _riByteSize :: !(Maybe (Textual Int32))

286286 , _riContextLink :: !(Maybe Text)

287− , _riThumbnailHeight :: !(Maybe (JSONText Int32))

288− , _riWidth :: !(Maybe (JSONText Int32))

289− , _riThumbnailWidth :: !(Maybe (JSONText Int32))

287+ , _riThumbnailHeight :: !(Maybe (Textual Int32))

288+ , _riWidth :: !(Maybe (Textual Int32))

289+ , _riThumbnailWidth :: !(Maybe (Textual Int32))

290290 } deriving (Eq,Show,Data,Typeable,Generic)

291291

292292-- | Creates a value of 'ResultImage' with the minimum fields required to make a request.

@@ -637,9 +637,9 @@ instance ToJSON ResultLabelsItem where

637637--

638638-- /See:/ 'searchSearchInformation' smart constructor.

639639data SearchSearchInformation = SearchSearchInformation

640− { _ssiSearchTime :: !(Maybe (JSONText Double))

640+ { _ssiSearchTime :: !(Maybe (Textual Double))

641641 , _ssiFormattedSearchTime :: !(Maybe Text)

642− , _ssiTotalResults :: !(Maybe (JSONText Int64))

642+ , _ssiTotalResults :: !(Maybe (Textual Int64))

643643 , _ssiFormattedTotalResults :: !(Maybe Text)

644644 } deriving (Eq,Show,Data,Typeable,Generic)

645645

@@ -716,9 +716,9 @@ data Query = Query

716716 , _qInputEncoding :: !(Maybe Text)

717717 , _qOrTerms :: !(Maybe Text)

718718 , _qSearchTerms :: !(Maybe Text)

719− , _qStartPage :: !(Maybe (JSONText Int32))

719+ , _qStartPage :: !(Maybe (Textual Int32))

720720 , _qRights :: !(Maybe Text)

721− , _qCount :: !(Maybe (JSONText Int32))

721+ , _qCount :: !(Maybe (Textual Int32))

722722 , _qExcludeTerms :: !(Maybe Text)

723723 , _qFileType :: !(Maybe Text)

724724 , _qSearchType :: !(Maybe Text)

@@ -731,7 +731,7 @@ data Query = Query

731731 , _qLanguage :: !(Maybe Text)

732732 , _qSiteSearch :: !(Maybe Text)

733733 , _qFilter :: !(Maybe Text)

734− , _qTotalResults :: !(Maybe (JSONText Int64))

734+ , _qTotalResults :: !(Maybe (Textual Int64))

735735 , _qDateRestrict :: !(Maybe Text)

736736 , _qTitle :: !(Maybe Text)

737737 , _qLinkSite :: !(Maybe Text)

@@ -742,7 +742,7 @@ data Query = Query

742742 , _qImgColorType :: !(Maybe Text)

743743 , _qImgSize :: !(Maybe Text)

744744 , _qExactTerms :: !(Maybe Text)

745− , _qStartIndex :: !(Maybe (JSONText Int32))

745+ , _qStartIndex :: !(Maybe (Textual Int32))

746746 , _qCr :: !(Maybe Text)

747747 , _qSafe :: !(Maybe Text)

748748 , _qHq :: !(Maybe Text)

gogol-customsearch/gen/Network/Google/Resource/Search/CSE/List.hs+4−4

@@ -83,10 +83,10 @@ type CSEListResource =

8383 :>

8484 QueryParam "c2coff" Text :>

8585 QueryParam "orTerms" Text :>

86− QueryParam "start" (JSONText Word32) :>

86+ QueryParam "start" (Textual Word32) :>

8787 QueryParam "rights" Text :>

8888 QueryParam "excludeTerms" Text :>

89− QueryParam "num" (JSONText Word32) :>

89+ QueryParam "num" (Textual Word32) :>

9090 QueryParam "fileType" Text :>

9191 QueryParam "searchType" CSEListSearchType :>

9292 QueryParam "lr" CSEListLr :>

@@ -150,10 +150,10 @@ data CSEList = CSEList

150150 , _cselSiteSearchFilter :: !(Maybe CSEListSiteSearchFilter)

151151 , _cselC2coff :: !(Maybe Text)

152152 , _cselOrTerms :: !(Maybe Text)

153− , _cselStart :: !(Maybe (JSONText Word32))

153+ , _cselStart :: !(Maybe (Textual Word32))

154154 , _cselRights :: !(Maybe Text)

155155 , _cselExcludeTerms :: !(Maybe Text)

156− , _cselNum :: !(JSONText Word32)

156+ , _cselNum :: !(Textual Word32)

157157 , _cselFileType :: !(Maybe Text)

158158 , _cselSearchType :: !(Maybe CSEListSearchType)

159159 , _cselLr :: !(Maybe CSEListLr)

gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+22−22

@@ -278,7 +278,7 @@ instance ToJSON SourceSplitResponse where

278278-- /See:/ 'status' smart constructor.

279279data Status = Status

280280 { _sDetails :: !(Maybe [StatusDetailsItem])

281− , _sCode :: !(Maybe (JSONText Int32))

281+ , _sCode :: !(Maybe (Textual Int32))

282282 , _sMessage :: !(Maybe Text)

283283 } deriving (Eq,Show,Data,Typeable,Generic)

284284

@@ -346,12 +346,12 @@ data WorkItem = WorkItem

346346 , _wiReportStatusInterval :: !(Maybe Text)

347347 , _wiShellTask :: !(Maybe ShellTask)

348348 , _wiStreamingSetupTask :: !(Maybe StreamingSetupTask)

349− , _wiInitialReportIndex :: !(Maybe (JSONText Int64))

349+ , _wiInitialReportIndex :: !(Maybe (Textual Int64))

350350 , _wiMapTask :: !(Maybe MapTask)

351351 , _wiPackages :: !(Maybe [Package])

352352 , _wiStreamingComputationTask :: !(Maybe StreamingComputationTask)

353353 , _wiSourceOperationTask :: !(Maybe SourceOperationRequest)

354− , _wiId :: !(Maybe (JSONText Int64))

354+ , _wiId :: !(Maybe (Textual Int64))

355355 , _wiProjectId :: !(Maybe Text)

356356 , _wiLeaseExpireTime :: !(Maybe Text)

357357 , _wiConfiguration :: !(Maybe Text)

@@ -536,8 +536,8 @@ instance ToJSON WorkItem where

536536--

537537-- /See:/ 'sourceSplitOptions' smart constructor.

538538data SourceSplitOptions = SourceSplitOptions

539− { _ssoDesiredShardSizeBytes :: !(Maybe (JSONText Int64))

540− , _ssoDesiredBundleSizeBytes :: !(Maybe (JSONText Int64))

539+ { _ssoDesiredShardSizeBytes :: !(Maybe (Textual Int64))

540+ , _ssoDesiredBundleSizeBytes :: !(Maybe (Textual Int64))

541541 } deriving (Eq,Show,Data,Typeable,Generic)

542542

543543-- | Creates a value of 'SourceSplitOptions' with the minimum fields required to make a request.

@@ -624,7 +624,7 @@ instance ToJSON WorkerPoolMetadata where

624624--

625625-- /See:/ 'autoscalingSettings' smart constructor.

626626data AutoscalingSettings = AutoscalingSettings

627− { _asMaxNumWorkers :: !(Maybe (JSONText Int32))

627+ { _asMaxNumWorkers :: !(Maybe (Textual Int32))

628628 , _asAlgorithm :: !(Maybe Text)

629629 } deriving (Eq,Show,Data,Typeable,Generic)

630630

@@ -1059,7 +1059,7 @@ instance ToJSON EnvironmentUserAgent where

10591059--

10601060-- /See:/ 'disk' smart constructor.

10611061data Disk = Disk

1062− { _dSizeGb :: !(Maybe (JSONText Int32))

1062+ { _dSizeGb :: !(Maybe (Textual Int32))

10631063 , _dDiskType :: !(Maybe Text)

10641064 , _dMountPoint :: !(Maybe Text)

10651065 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1457,7 +1457,7 @@ instance ToJSON Environment where

14571457--

14581458-- /See:/ 'concatPosition' smart constructor.

14591459data ConcatPosition = ConcatPosition

1460− { _cpIndex :: !(Maybe (JSONText Int32))

1460+ { _cpIndex :: !(Maybe (Textual Int32))

14611461 , _cpPosition :: !(Maybe Position)

14621462 } deriving (Eq,Show,Data,Typeable,Generic)

14631463

@@ -1690,7 +1690,7 @@ data WorkItemStatus = WorkItemStatus

16901690 , _wisDynamicSourceSplit :: !(Maybe DynamicSourceSplit)

16911691 , _wisCompleted :: !(Maybe Bool)

16921692 , _wisSourceFork :: !(Maybe SourceFork)

1693− , _wisReportIndex :: !(Maybe (JSONText Int64))

1693+ , _wisReportIndex :: !(Maybe (Textual Int64))

16941694 , _wisRequestedLeaseDuration :: !(Maybe Text)

16951695 , _wisErrors :: !(Maybe [Status])

16961696 , _wisMetricUpdates :: !(Maybe [MetricUpdate])

@@ -1989,7 +1989,7 @@ instance ToJSON SourceSpec where

19891989--

19901990-- /See:/ 'sourceMetadata' smart constructor.

19911991data SourceMetadata = SourceMetadata

1992− { _smEstimatedSizeBytes :: !(Maybe (JSONText Int64))

1992+ { _smEstimatedSizeBytes :: !(Maybe (Textual Int64))

19931993 , _smProducesSortedKeys :: !(Maybe Bool)

19941994 , _smInfinite :: !(Maybe Bool)

19951995 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2582,7 +2582,7 @@ instance ToJSON

25822582-- /See:/ 'shellTask' smart constructor.

25832583data ShellTask = ShellTask

25842584 { _stCommand :: !(Maybe Text)

2585− , _stExitCode :: !(Maybe (JSONText Int32))

2585+ , _stExitCode :: !(Maybe (Textual Int32))

25862586 } deriving (Eq,Show,Data,Typeable,Generic)

25872587

25882588-- | Creates a value of 'ShellTask' with the minimum fields required to make a request.

@@ -2966,7 +2966,7 @@ instance ToJSON DataDiskAssignment where

29662966--

29672967-- /See:/ 'workItemServiceState' smart constructor.

29682968data WorkItemServiceState = WorkItemServiceState

2969− { _wissNextReportIndex :: !(Maybe (JSONText Int64))

2969+ { _wissNextReportIndex :: !(Maybe (Textual Int64))

29702970 , _wissReportStatusInterval :: !(Maybe Text)

29712971 , _wissHarnessData :: !(Maybe WorkItemServiceStateHarnessData)

29722972 , _wissSuggestedStopPoint :: !(Maybe ApproximateProgress)

@@ -3073,8 +3073,8 @@ instance ToJSON WorkItemServiceState where

30733073-- /See:/ 'streamingSetupTask' smart constructor.

30743074data StreamingSetupTask = StreamingSetupTask

30753075 { _sstStreamingComputationTopology :: !(Maybe TopologyConfig)

3076− , _sstReceiveWorkPort :: !(Maybe (JSONText Int32))

3077− , _sstWorkerHarnessPort :: !(Maybe (JSONText Int32))

3076+ , _sstReceiveWorkPort :: !(Maybe (Textual Int32))

3077+ , _sstWorkerHarnessPort :: !(Maybe (Textual Int32))

30783078 } deriving (Eq,Show,Data,Typeable,Generic)

30793079

30803080-- | Creates a value of 'StreamingSetupTask' with the minimum fields required to make a request.

@@ -4126,10 +4126,10 @@ instance ToJSON SinkSpec where

41264126-- /See:/ 'workerPool' smart constructor.

41274127data WorkerPool = WorkerPool

41284128 { _wpAutoscalingSettings :: !(Maybe AutoscalingSettings)

4129− , _wpDiskSizeGb :: !(Maybe (JSONText Int32))

4129+ , _wpDiskSizeGb :: !(Maybe (Textual Int32))

41304130 , _wpKind :: !(Maybe Text)

41314131 , _wpTaskrunnerSettings :: !(Maybe TaskRunnerSettings)

4132− , _wpNumWorkers :: !(Maybe (JSONText Int32))

4132+ , _wpNumWorkers :: !(Maybe (Textual Int32))

41334133 , _wpNetwork :: !(Maybe Text)

41344134 , _wpZone :: !(Maybe Text)

41354135 , _wpPackages :: !(Maybe [Package])

@@ -4867,7 +4867,7 @@ instance ToJSON Source where

48674867-- /See:/ 'approximateProgress' smart constructor.

48684868data ApproximateProgress = ApproximateProgress

48694869 { _apRemainingTime :: !(Maybe Text)

4870− , _apPercentComplete :: !(Maybe (JSONText Float))

4870+ , _apPercentComplete :: !(Maybe (Textual Double))

48714871 , _apPosition :: !(Maybe Position)

48724872 } deriving (Eq,Show,Data,Typeable,Generic)

48734873

@@ -5113,7 +5113,7 @@ instance ToJSON PartialGroupByKeyInstruction where

51135113--

51145114-- /See:/ 'parDoInstruction' smart constructor.

51155115data ParDoInstruction = ParDoInstruction

5116− { _pdiNumOutputs :: !(Maybe (JSONText Int32))

5116+ { _pdiNumOutputs :: !(Maybe (Textual Int32))

51175117 , _pdiMultiOutputInfos :: !(Maybe [MultiOutputInfo])

51185118 , _pdiSideInputs :: !(Maybe [SideInputInfo])

51195119 , _pdiInput :: !(Maybe InstructionInput)

@@ -5914,8 +5914,8 @@ instance ToJSON PubsubLocation where

59145914--

59155915-- /See:/ 'instructionInput' smart constructor.

59165916data InstructionInput = InstructionInput

5917− { _iiProducerInstructionIndex :: !(Maybe (JSONText Int32))

5918− , _iiOutputNum :: !(Maybe (JSONText Int32))

5917+ { _iiProducerInstructionIndex :: !(Maybe (Textual Int32))

5918+ , _iiOutputNum :: !(Maybe (Textual Int32))

59195919 } deriving (Eq,Show,Data,Typeable,Generic)

59205920

59215921-- | Creates a value of 'InstructionInput' with the minimum fields required to make a request.

@@ -6153,9 +6153,9 @@ instance ToJSON LeaseWorkItemResponse where

61536153--

61546154-- /See:/ 'position' smart constructor.

61556155data Position = Position

6156− { _pByteOffSet :: !(Maybe (JSONText Int64))

6156+ { _pByteOffSet :: !(Maybe (Textual Int64))

61576157 , _pConcatPosition :: !(Maybe ConcatPosition)

6158− , _pRecordIndex :: !(Maybe (JSONText Int64))

6158+ , _pRecordIndex :: !(Maybe (Textual Int64))

61596159 , _pShufflePosition :: !(Maybe Text)

61606160 , _pKey :: !(Maybe Text)

61616161 , _pEnd :: !(Maybe Bool)

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/List.hs+2−2

@@ -64,7 +64,7 @@ type ProjectsJobsListResource =

6464 QueryParam "bearer_token" Text :>

6565 QueryParam "view" Text :>

6666 QueryParam "pageToken" Text :>

67− QueryParam "pageSize" (JSONText Int32) :>

67+ QueryParam "pageSize" (Textual Int32) :>

6868 QueryParam "callback" Text :>

6969 QueryParam "alt" AltJSON :>

7070 Get '[JSON] ListJobsResponse

@@ -82,7 +82,7 @@ data ProjectsJobsList = ProjectsJobsList

8282 , _pjlView :: !(Maybe Text)

8383 , _pjlPageToken :: !(Maybe Text)

8484 , _pjlProjectId :: !Text

85− , _pjlPageSize :: !(Maybe (JSONText Int32))

85+ , _pjlPageSize :: !(Maybe (Textual Int32))

8686 , _pjlCallback :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Messages/List.hs+2−2

@@ -71,7 +71,7 @@ type ProjectsJobsMessagesListResource =

7171 QueryParam "endTime" Text :>

7272 QueryParam "minimumImportance" Text :>

7373 QueryParam "pageToken" Text :>

74− QueryParam "pageSize" (JSONText Int32) :>

74+ QueryParam "pageSize" (Textual Int32) :>

7575 QueryParam "callback" Text :>

7676 QueryParam "alt" AltJSON :>

7777 Get '[JSON] ListJobMessagesResponse

@@ -92,7 +92,7 @@ data ProjectsJobsMessagesList = ProjectsJobsMessagesList

9292 , _pjmlMinimumImportance :: !(Maybe Text)

9393 , _pjmlPageToken :: !(Maybe Text)

9494 , _pjmlProjectId :: !Text

95− , _pjmlPageSize :: !(Maybe (JSONText Int32))

95+ , _pjmlPageSize :: !(Maybe (Textual Int32))

9696 , _pjmlCallback :: !(Maybe Text)

9797 } deriving (Eq,Show,Data,Typeable,Generic)

9898

gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+21−21

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323--

2424-- /See:/ 'rollbackRequest' smart constructor.

2525newtype RollbackRequest = RollbackRequest

26− { _rrTransaction :: Maybe (JSONText Word8)

26+ { _rrTransaction :: Maybe (Textual Word8)

2727 } deriving (Eq,Show,Data,Typeable,Generic)

2828

2929-- | Creates a value of 'RollbackRequest' with the minimum fields required to make a request.

@@ -62,15 +62,15 @@ data Property = Property

6262 { _pKeyValue :: !(Maybe Key)

6363 , _pBlobKeyValue :: !(Maybe Text)

6464 , _pDateTimeValue :: !(Maybe DateTime')

65− , _pIntegerValue :: !(Maybe (JSONText Int64))

65+ , _pIntegerValue :: !(Maybe (Textual Int64))

6666 , _pEntityValue :: !(Maybe Entity)

67− , _pDoubleValue :: !(Maybe (JSONText Double))

67+ , _pDoubleValue :: !(Maybe (Textual Double))

6868 , _pStringValue :: !(Maybe Text)

6969 , _pListValue :: !(Maybe [Value])

7070 , _pIndexed :: !(Maybe Bool)

7171 , _pBooleanValue :: !(Maybe Bool)

72− , _pMeaning :: !(Maybe (JSONText Int32))

73− , _pBlobValue :: !(Maybe (JSONText Word8))

72+ , _pMeaning :: !(Maybe (Textual Int32))

73+ , _pBlobValue :: !(Maybe (Textual Word8))

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

7676-- | Creates a value of 'Property' with the minimum fields required to make a request.

@@ -285,11 +285,11 @@ instance ToJSON PartitionId where

285285--

286286-- /See:/ 'queryResultBatch' smart constructor.

287287data QueryResultBatch = QueryResultBatch

288− { _qrbSkippedResults :: !(Maybe (JSONText Int32))

288+ { _qrbSkippedResults :: !(Maybe (Textual Int32))

289289 , _qrbEntityResultType :: !(Maybe QueryResultBatchEntityResultType)

290290 , _qrbEntityResults :: !(Maybe [EntityResult])

291291 , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults)

292− , _qrbEndCursor :: !(Maybe (JSONText Word8))

292+ , _qrbEndCursor :: !(Maybe (Textual Word8))

293293 } deriving (Eq,Show,Data,Typeable,Generic)

294294

295295-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.

@@ -618,7 +618,7 @@ instance ToJSON CompositeFilter where

618618--

619619-- /See:/ 'beginTransactionResponse' smart constructor.

620620data BeginTransactionResponse = BeginTransactionResponse

621− { _btrTransaction :: !(Maybe (JSONText Word8))

621+ { _btrTransaction :: !(Maybe (Textual Word8))

622622 , _btrHeader :: !(Maybe ResponseHeader)

623623 } deriving (Eq,Show,Data,Typeable,Generic)

624624

@@ -666,7 +666,7 @@ instance ToJSON BeginTransactionResponse where

666666-- /See:/ 'mutationResult' smart constructor.

667667data MutationResult = MutationResult

668668 { _mrInsertAutoIdKeys :: !(Maybe [Key])

669− , _mrIndexUpdates :: !(Maybe (JSONText Int32))

669+ , _mrIndexUpdates :: !(Maybe (Textual Int32))

670670 } deriving (Eq,Show,Data,Typeable,Generic)

671671

672672-- | Creates a value of 'MutationResult' with the minimum fields required to make a request.

@@ -895,15 +895,15 @@ data Value = Value

895895 { _vKeyValue :: !(Maybe Key)

896896 , _vBlobKeyValue :: !(Maybe Text)

897897 , _vDateTimeValue :: !(Maybe DateTime')

898− , _vIntegerValue :: !(Maybe (JSONText Int64))

898+ , _vIntegerValue :: !(Maybe (Textual Int64))

899899 , _vEntityValue :: !(Maybe Entity)

900− , _vDoubleValue :: !(Maybe (JSONText Double))

900+ , _vDoubleValue :: !(Maybe (Textual Double))

901901 , _vStringValue :: !(Maybe Text)

902902 , _vListValue :: !(Maybe [Value])

903903 , _vIndexed :: !(Maybe Bool)

904904 , _vBooleanValue :: !(Maybe Bool)

905− , _vMeaning :: !(Maybe (JSONText Int32))

906− , _vBlobValue :: !(Maybe (JSONText Word8))

905+ , _vMeaning :: !(Maybe (Textual Int32))

906+ , _vBlobValue :: !(Maybe (Textual Word8))

907907 } deriving (Eq,Show,Data,Typeable,Generic)

908908

909909-- | Creates a value of 'Value' with the minimum fields required to make a request.

@@ -1258,7 +1258,7 @@ instance ToJSON ResponseHeader where

12581258data KeyPathElement = KeyPathElement

12591259 { _kpeKind :: !(Maybe Text)

12601260 , _kpeName :: !(Maybe Text)

1261− , _kpeId :: !(Maybe (JSONText Int64))

1261+ , _kpeId :: !(Maybe (Textual Int64))

12621262 } deriving (Eq,Show,Data,Typeable,Generic)

12631263

12641264-- | Creates a value of 'KeyPathElement' with the minimum fields required to make a request.

@@ -1348,7 +1348,7 @@ instance ToJSON PropertyReference where

13481348--

13491349-- /See:/ 'gqlQueryArg' smart constructor.

13501350data GqlQueryArg = GqlQueryArg

1351− { _gqaCursor :: !(Maybe (JSONText Word8))

1351+ { _gqaCursor :: !(Maybe (Textual Word8))

13521352 , _gqaValue :: !(Maybe Value)

13531353 , _gqaName :: !(Maybe Text)

13541354 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1523,10 +1523,10 @@ instance ToJSON PropertyFilter where

15231523-- /See:/ 'query' smart constructor.

15241524data Query = Query

15251525 { _qGroupBy :: !(Maybe [PropertyReference])

1526− , _qStartCursor :: !(Maybe (JSONText Word8))

1527− , _qOffSet :: !(Maybe (JSONText Int32))

1528− , _qEndCursor :: !(Maybe (JSONText Word8))

1529− , _qLimit :: !(Maybe (JSONText Int32))

1526+ , _qStartCursor :: !(Maybe (Textual Word8))

1527+ , _qOffSet :: !(Maybe (Textual Int32))

1528+ , _qEndCursor :: !(Maybe (Textual Word8))

1529+ , _qLimit :: !(Maybe (Textual Int32))

15301530 , _qProjection :: !(Maybe [PropertyExpression])

15311531 , _qFilter :: !(Maybe Filter)

15321532 , _qKinds :: !(Maybe [KindExpression])

@@ -1770,7 +1770,7 @@ instance ToJSON KindExpression where

17701770-- /See:/ 'readOptions' smart constructor.

17711771data ReadOptions = ReadOptions

17721772 { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)

1773− , _roTransaction :: !(Maybe (JSONText Word8))

1773+ , _roTransaction :: !(Maybe (Textual Word8))

17741774 } deriving (Eq,Show,Data,Typeable,Generic)

17751775

17761776-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.

@@ -1956,7 +1956,7 @@ instance ToJSON Filter where

19561956data CommitRequest = CommitRequest

19571957 { _crMode :: !(Maybe CommitRequestMode)

19581958 , _crMutation :: !(Maybe Mutation)

1959− , _crTransaction :: !(Maybe (JSONText Word8))

1959+ , _crTransaction :: !(Maybe (Textual Word8))

19601960 , _crIgnoreReadOnly :: !(Maybe Bool)

19611961 } deriving (Eq,Show,Data,Typeable,Generic)

19621962

gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+2−2

@@ -733,7 +733,7 @@ instance ToJSON GetBreakpointResponse where

733733-- /See:/ 'variable' smart constructor.

734734data Variable = Variable

735735 { _vStatus :: !(Maybe StatusMessage)

736− , _vVarTableIndex :: !(Maybe (JSONText Int32))

736+ , _vVarTableIndex :: !(Maybe (Textual Int32))

737737 , _vMembers :: !(Maybe [Variable])

738738 , _vValue :: !(Maybe Text)

739739 , _vName :: !(Maybe Text)

@@ -1122,7 +1122,7 @@ instance ToJSON GitSourceContext where

11221122-- /See:/ 'sourceLocation' smart constructor.

11231123data SourceLocation = SourceLocation

11241124 { _slPath :: !(Maybe Text)

1125− , _slLine :: !(Maybe (JSONText Int32))

1125+ , _slLine :: !(Maybe (Textual Int32))

11261126 } deriving (Eq,Show,Data,Typeable,Generic)

11271127

11281128-- | Creates a value of 'SourceLocation' with the minimum fields required to make a request.

gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types/Product.hs+11−11

@@ -254,24 +254,24 @@ instance ToJSON TypesListResponse where

254254--

255255-- /See:/ 'operation' smart constructor.

256256data Operation = Operation

257− { _oTargetId :: !(Maybe (JSONText Word64))

257+ { _oTargetId :: !(Maybe (Textual Word64))

258258 , _oStatus :: !(Maybe Text)

259259 , _oInsertTime :: !(Maybe Text)

260− , _oProgress :: !(Maybe (JSONText Int32))

260+ , _oProgress :: !(Maybe (Textual Int32))

261261 , _oStartTime :: !(Maybe Text)

262262 , _oKind :: !Text

263263 , _oError :: !(Maybe OperationError)

264264 , _oHTTPErrorMessage :: !(Maybe Text)

265265 , _oZone :: !(Maybe Text)

266266 , _oWarnings :: !(Maybe [OperationWarningsItem])

267− , _oHTTPErrorStatusCode :: !(Maybe (JSONText Int32))

267+ , _oHTTPErrorStatusCode :: !(Maybe (Textual Int32))

268268 , _oUser :: !(Maybe Text)

269269 , _oSelfLink :: !(Maybe Text)

270270 , _oName :: !(Maybe Text)

271271 , _oStatusMessage :: !(Maybe Text)

272272 , _oCreationTimestamp :: !(Maybe Text)

273273 , _oEndTime :: !(Maybe Text)

274− , _oId :: !(Maybe (JSONText Word64))

274+ , _oId :: !(Maybe (Textual Word64))

275275 , _oOperationType :: !(Maybe Text)

276276 , _oRegion :: !(Maybe Text)

277277 , _oTargetLink :: !(Maybe Text)

@@ -742,7 +742,7 @@ data Manifest = Manifest

742742 , _mImports :: !(Maybe [ImportFile])

743743 , _mSelfLink :: !(Maybe Text)

744744 , _mName :: !(Maybe Text)

745− , _mId :: !(Maybe (JSONText Word64))

745+ , _mId :: !(Maybe (Textual Word64))

746746 } deriving (Eq,Show,Data,Typeable,Generic)

747747

748748-- | Creates a value of 'Manifest' with the minimum fields required to make a request.

@@ -907,7 +907,7 @@ instance ToJSON ResourceUpdateWarningsItem where

907907--

908908-- /See:/ 'deploymentsCancelPreviewRequest' smart constructor.

909909newtype DeploymentsCancelPreviewRequest = DeploymentsCancelPreviewRequest

910− { _dcprFingerprint :: Maybe (JSONText Word8)

910+ { _dcprFingerprint :: Maybe (Textual Word8)

911911 } deriving (Eq,Show,Data,Typeable,Generic)

912912

913913-- | Creates a value of 'DeploymentsCancelPreviewRequest' with the minimum fields required to make a request.

@@ -961,7 +961,7 @@ data Resource = Resource

961961 , _rName :: !(Maybe Text)

962962 , _rManifest :: !(Maybe Text)

963963 , _rFinalProperties :: !(Maybe Text)

964− , _rId :: !(Maybe (JSONText Word64))

964+ , _rId :: !(Maybe (Textual Word64))

965965 , _rType :: !(Maybe Text)

966966 , _rUpdate :: !(Maybe ResourceUpdate)

967967 , _rProperties :: !(Maybe Text)

@@ -1257,7 +1257,7 @@ data Type = Type

12571257 { _tInsertTime :: !(Maybe Text)

12581258 , _tSelfLink :: !(Maybe Text)

12591259 , _tName :: !(Maybe Text)

1260− , _tId :: !(Maybe (JSONText Word64))

1260+ , _tId :: !(Maybe (Textual Word64))

12611261 } deriving (Eq,Show,Data,Typeable,Generic)

12621262

12631263-- | Creates a value of 'Type' with the minimum fields required to make a request.

@@ -1424,7 +1424,7 @@ instance ToJSON OperationErrorErrorsItem where

14241424--

14251425-- /See:/ 'deploymentsStopRequest' smart constructor.

14261426newtype DeploymentsStopRequest = DeploymentsStopRequest

1427− { _dsrFingerprint :: Maybe (JSONText Word8)

1427+ { _dsrFingerprint :: Maybe (Textual Word8)

14281428 } deriving (Eq,Show,Data,Typeable,Generic)

14291429

14301430-- | Creates a value of 'DeploymentsStopRequest' with the minimum fields required to make a request.

@@ -1769,10 +1769,10 @@ instance ToJSON OperationWarningsItem where

17691769data Deployment = Deployment

17701770 { _dInsertTime :: !(Maybe Text)

17711771 , _dOperation :: !(Maybe Operation)

1772− , _dFingerprint :: !(Maybe (JSONText Word8))

1772+ , _dFingerprint :: !(Maybe (Textual Word8))

17731773 , _dName :: !(Maybe Text)

17741774 , _dManifest :: !(Maybe Text)

1775− , _dId :: !(Maybe (JSONText Word64))

1775+ , _dId :: !(Maybe (Textual Word64))

17761776 , _dDescription :: !(Maybe Text)

17771777 , _dUpdate :: !(Maybe DeploymentUpdate)

17781778 , _dTarget :: !(Maybe TargetConfiguration)

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Deployments/List.hs+2−2

@@ -53,7 +53,7 @@ type DeploymentsListResource =

5353 "deployments" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] DeploymentsListResponse

5959

@@ -64,7 +64,7 @@ data DeploymentsList = DeploymentsList

6464 { _dlProject :: !Text

6565 , _dlFilter :: !(Maybe Text)

6666 , _dlPageToken :: !(Maybe Text)

67− , _dlMaxResults :: !(JSONText Word32)

67+ , _dlMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'DeploymentsList' with the minimum fields required to make a request.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Manifests/List.hs+2−2

@@ -56,7 +56,7 @@ type ManifestsListResource =

5656 "manifests" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] ManifestsListResponse

6262

@@ -67,7 +67,7 @@ data ManifestsList = ManifestsList

6767 { _mlProject :: !Text

6868 , _mlFilter :: !(Maybe Text)

6969 , _mlPageToken :: !(Maybe Text)

70− , _mlMaxResults :: !(JSONText Word32)

70+ , _mlMaxResults :: !(Textual Word32)

7171 , _mlDeployment :: !Text

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Operations/List.hs+2−2

@@ -53,7 +53,7 @@ type OperationsListResource =

5353 "operations" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] OperationsListResponse

5959

@@ -64,7 +64,7 @@ data OperationsList = OperationsList

6464 { _olProject :: !Text

6565 , _olFilter :: !(Maybe Text)

6666 , _olPageToken :: !(Maybe Text)

67− , _olMaxResults :: !(JSONText Word32)

67+ , _olMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'OperationsList' with the minimum fields required to make a request.

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Resources/List.hs+2−2

@@ -56,7 +56,7 @@ type ResourcesListResource =

5656 "resources" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] ResourcesListResponse

6262

@@ -67,7 +67,7 @@ data ResourcesList = ResourcesList

6767 { _rlProject :: !Text

6868 , _rlFilter :: !(Maybe Text)

6969 , _rlPageToken :: !(Maybe Text)

70− , _rlMaxResults :: !(JSONText Word32)

70+ , _rlMaxResults :: !(Textual Word32)

7171 , _rlDeployment :: !Text

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

gogol-deploymentmanager/gen/Network/Google/Resource/DeploymentManager/Types/List.hs+2−2

@@ -53,7 +53,7 @@ type TypesListResource =

5353 "types" :>

5454 QueryParam "filter" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] TypesListResponse

5959

@@ -64,7 +64,7 @@ data TypesList = TypesList

6464 { _tlProject :: !Text

6565 , _tlFilter :: !(Maybe Text)

6666 , _tlPageToken :: !(Maybe Text)

67− , _tlMaxResults :: !(JSONText Word32)

67+ , _tlMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'TypesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+294−294

@@ -95,8 +95,8 @@ instance ToJSON FileList where

9595--

9696-- /See:/ 'optimizationActivity' smart constructor.

9797data OptimizationActivity = OptimizationActivity

98− { _oaWeight :: !(Maybe (JSONText Int32))

99− , _oaFloodlightActivityId :: !(Maybe (JSONText Int64))

98+ { _oaWeight :: !(Maybe (Textual Int32))

99+ , _oaFloodlightActivityId :: !(Maybe (Textual Int64))

100100 , _oaFloodlightActivityIdDimensionValue :: !(Maybe DimensionValue)

101101 } deriving (Eq,Show,Data,Typeable,Generic)

102102

@@ -208,7 +208,7 @@ data CreativeCustomEvent = CreativeCustomEvent

208208 , _cceTargetType :: !(Maybe CreativeCustomEventTargetType)

209209 , _ccePopupWindowProperties :: !(Maybe PopupWindowProperties)

210210 , _cceVideoReportingId :: !(Maybe Text)

211− , _cceId :: !(Maybe (JSONText Int64))

211+ , _cceId :: !(Maybe (Textual Int64))

212212 , _cceArtworkLabel :: !(Maybe Text)

213213 , _cceArtworkType :: !(Maybe CreativeCustomEventArtworkType)

214214 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -705,10 +705,10 @@ instance ToJSON ReachReportCompatibleFields where

705705data Browser = Browser

706706 { _bMinorVersion :: !(Maybe Text)

707707 , _bKind :: !Text

708− , _bBrowserVersionId :: !(Maybe (JSONText Int64))

708+ , _bBrowserVersionId :: !(Maybe (Textual Int64))

709709 , _bMajorVersion :: !(Maybe Text)

710710 , _bName :: !(Maybe Text)

711− , _bDartId :: !(Maybe (JSONText Int64))

711+ , _bDartId :: !(Maybe (Textual Int64))

712712 } deriving (Eq,Show,Data,Typeable,Generic)

713713

714714-- | Creates a value of 'Browser' with the minimum fields required to make a request.

@@ -814,7 +814,7 @@ instance ToJSON Browser where

814814-- /See:/ 'creativeGroupAssignment' smart constructor.

815815data CreativeGroupAssignment = CreativeGroupAssignment

816816 { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)

817− , _cgaCreativeGroupId :: !(Maybe (JSONText Int64))

817+ , _cgaCreativeGroupId :: !(Maybe (Textual Int64))

818818 } deriving (Eq,Show,Data,Typeable,Generic)

819819

820820-- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.

@@ -982,7 +982,7 @@ instance ToJSON DirectorySiteSettings where

982982-- /See:/ 'listPopulationRule' smart constructor.

983983data ListPopulationRule = ListPopulationRule

984984 { _lprFloodlightActivityName :: !(Maybe Text)

985− , _lprFloodlightActivityId :: !(Maybe (JSONText Int64))

985+ , _lprFloodlightActivityId :: !(Maybe (Textual Int64))

986986 , _lprListPopulationClauses :: !(Maybe [ListPopulationClause])

987987 } deriving (Eq,Show,Data,Typeable,Generic)

988988

@@ -1105,7 +1105,7 @@ instance ToJSON SizesListResponse where

11051105data CreativeRotation = CreativeRotation

11061106 { _crWeightCalculationStrategy :: !(Maybe CreativeRotationWeightCalculationStrategy)

11071107 , _crCreativeAssignments :: !(Maybe [CreativeAssignment])

1108− , _crCreativeOptimizationConfigurationId :: !(Maybe (JSONText Int64))

1108+ , _crCreativeOptimizationConfigurationId :: !(Maybe (Textual Int64))

11091109 , _crType :: !(Maybe CreativeRotationType)

11101110 } deriving (Eq,Show,Data,Typeable,Generic)

11111111

@@ -1316,25 +1316,25 @@ instance ToJSON TechnologyTargeting where

13161316--

13171317-- /See:/ 'inventoryItem' smart constructor.

13181318data InventoryItem = InventoryItem

1319− { _iiPlacementStrategyId :: !(Maybe (JSONText Int64))

1320− , _iiEstimatedClickThroughRate :: !(Maybe (JSONText Int64))

1319+ { _iiPlacementStrategyId :: !(Maybe (Textual Int64))

1320+ , _iiEstimatedClickThroughRate :: !(Maybe (Textual Int64))

13211321 , _iiPricing :: !(Maybe Pricing)

13221322 , _iiKind :: !Text

1323− , _iiAdvertiserId :: !(Maybe (JSONText Int64))

1324− , _iiRfpId :: !(Maybe (JSONText Int64))

1325− , _iiContentCategoryId :: !(Maybe (JSONText Int64))

1323+ , _iiAdvertiserId :: !(Maybe (Textual Int64))

1324+ , _iiRfpId :: !(Maybe (Textual Int64))

1325+ , _iiContentCategoryId :: !(Maybe (Textual Int64))

13261326 , _iiInPlan :: !(Maybe Bool)

1327− , _iiAccountId :: !(Maybe (JSONText Int64))

1327+ , _iiAccountId :: !(Maybe (Textual Int64))

13281328 , _iiName :: !(Maybe Text)

13291329 , _iiAdSlots :: !(Maybe [AdSlot])

1330− , _iiNegotiationChannelId :: !(Maybe (JSONText Int64))

1330+ , _iiNegotiationChannelId :: !(Maybe (Textual Int64))

13311331 , _iiLastModifiedInfo :: !(Maybe LastModifiedInfo)

1332− , _iiId :: !(Maybe (JSONText Int64))

1333− , _iiEstimatedConversionRate :: !(Maybe (JSONText Int64))

1334− , _iiProjectId :: !(Maybe (JSONText Int64))

1335− , _iiSubAccountId :: !(Maybe (JSONText Int64))

1336− , _iiOrderId :: !(Maybe (JSONText Int64))

1337− , _iiSiteId :: !(Maybe (JSONText Int64))

1332+ , _iiId :: !(Maybe (Textual Int64))

1333+ , _iiEstimatedConversionRate :: !(Maybe (Textual Int64))

1334+ , _iiProjectId :: !(Maybe (Textual Int64))

1335+ , _iiSubAccountId :: !(Maybe (Textual Int64))

1336+ , _iiOrderId :: !(Maybe (Textual Int64))

1337+ , _iiSiteId :: !(Maybe (Textual Int64))

13381338 } deriving (Eq,Show,Data,Typeable,Generic)

13391339

13401340-- | Creates a value of 'InventoryItem' with the minimum fields required to make a request.

@@ -1709,7 +1709,7 @@ data ListPopulationTerm = ListPopulationTerm

17091709 , _lptVariableFriendlyName :: !(Maybe Text)

17101710 , _lptNegation :: !(Maybe Bool)

17111711 , _lptVariableName :: !(Maybe Text)

1712− , _lptRemarketingListId :: !(Maybe (JSONText Int64))

1712+ , _lptRemarketingListId :: !(Maybe (Textual Int64))

17131713 , _lptType :: !(Maybe ListPopulationTermType)

17141714 , _lptContains :: !(Maybe Bool)

17151715 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1958,7 +1958,7 @@ data DirectorySiteContact = DirectorySiteContact

19581958 , _dscAddress :: !(Maybe Text)

19591959 , _dscRole :: !(Maybe DirectorySiteContactRole)

19601960 , _dscFirstName :: !(Maybe Text)

1961− , _dscId :: !(Maybe (JSONText Int64))

1961+ , _dscId :: !(Maybe (Textual Int64))

19621962 , _dscTitle :: !(Maybe Text)

19631963 , _dscType :: !(Maybe DirectorySiteContactType)

19641964 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2136,7 +2136,7 @@ instance ToJSON RegionsListResponse where

21362136data FloodlightActivityDynamicTag = FloodlightActivityDynamicTag

21372137 { _fadtTag :: !(Maybe Text)

21382138 , _fadtName :: !(Maybe Text)

2139− , _fadtId :: !(Maybe (JSONText Int64))

2139+ , _fadtId :: !(Maybe (Textual Int64))

21402140 } deriving (Eq,Show,Data,Typeable,Generic)

21412141

21422142-- | Creates a value of 'FloodlightActivityDynamicTag' with the minimum fields required to make a request.

@@ -2191,7 +2191,7 @@ instance ToJSON FloodlightActivityDynamicTag where

21912191--

21922192-- /See:/ 'directorySite' smart constructor.

21932193data DirectorySite = DirectorySite

2194− { _dsCurrencyId :: !(Maybe (JSONText Int64))

2194+ { _dsCurrencyId :: !(Maybe (Textual Int64))

21952195 , _dsSettings :: !(Maybe DirectorySiteSettings)

21962196 , _dsInterstitialTagFormats :: !(Maybe [DirectorySiteInterstitialTagFormatsItem])

21972197 , _dsKind :: !Text

@@ -2200,11 +2200,11 @@ data DirectorySite = DirectorySite

22002200 , _dsInpageTagFormats :: !(Maybe [DirectorySiteInpageTagFormatsItem])

22012201 , _dsActive :: !(Maybe Bool)

22022202 , _dsName :: !(Maybe Text)

2203− , _dsId :: !(Maybe (JSONText Int64))

2204− , _dsCountryId :: !(Maybe (JSONText Int64))

2203+ , _dsId :: !(Maybe (Textual Int64))

2204+ , _dsCountryId :: !(Maybe (Textual Int64))

22052205 , _dsContactAssignments :: !(Maybe [DirectorySiteContactAssignment])

22062206 , _dsDescription :: !(Maybe Text)

2207− , _dsParentId :: !(Maybe (JSONText Int64))

2207+ , _dsParentId :: !(Maybe (Textual Int64))

22082208 } deriving (Eq,Show,Data,Typeable,Generic)

22092209

22102210-- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.

@@ -2472,15 +2472,15 @@ instance ToJSON

24722472-- /See:/ 'floodlightActivityGroup' smart constructor.

24732473data FloodlightActivityGroup = FloodlightActivityGroup

24742474 { _fagTagString :: !(Maybe Text)

2475− , _fagFloodlightConfigurationId :: !(Maybe (JSONText Int64))

2475+ , _fagFloodlightConfigurationId :: !(Maybe (Textual Int64))

24762476 , _fagKind :: !Text

2477− , _fagAdvertiserId :: !(Maybe (JSONText Int64))

2477+ , _fagAdvertiserId :: !(Maybe (Textual Int64))

24782478 , _fagAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

24792479 , _fagIdDimensionValue :: !(Maybe DimensionValue)

2480− , _fagAccountId :: !(Maybe (JSONText Int64))

2480+ , _fagAccountId :: !(Maybe (Textual Int64))

24812481 , _fagName :: !(Maybe Text)

2482− , _fagId :: !(Maybe (JSONText Int64))

2483− , _fagSubAccountId :: !(Maybe (JSONText Int64))

2482+ , _fagId :: !(Maybe (Textual Int64))

2483+ , _fagSubAccountId :: !(Maybe (Textual Int64))

24842484 , _fagType :: !(Maybe FloodlightActivityGroupType)

24852485 , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)

24862486 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2767,10 +2767,10 @@ instance ToJSON

27672767-- /See:/ 'fsCommand' smart constructor.

27682768data FsCommand = FsCommand

27692769 { _fcPositionOption :: !(Maybe FsCommandPositionOption)

2770− , _fcLeft :: !(Maybe (JSONText Int32))

2771− , _fcWindowHeight :: !(Maybe (JSONText Int32))

2772− , _fcWindowWidth :: !(Maybe (JSONText Int32))

2773− , _fcTop :: !(Maybe (JSONText Int32))

2770+ , _fcLeft :: !(Maybe (Textual Int32))

2771+ , _fcWindowHeight :: !(Maybe (Textual Int32))

2772+ , _fcWindowWidth :: !(Maybe (Textual Int32))

2773+ , _fcTop :: !(Maybe (Textual Int32))

27742774 } deriving (Eq,Show,Data,Typeable,Generic)

27752775

27762776-- | Creates a value of 'FsCommand' with the minimum fields required to make a request.

@@ -2855,7 +2855,7 @@ instance ToJSON FsCommand where

28552855--

28562856-- /See:/ 'placementAssignment' smart constructor.

28572857data PlacementAssignment = PlacementAssignment

2858− { _paPlacementId :: !(Maybe (JSONText Int64))

2858+ { _paPlacementId :: !(Maybe (Textual Int64))

28592859 , _paPlacementIdDimensionValue :: !(Maybe DimensionValue)

28602860 , _paActive :: !(Maybe Bool)

28612861 , _paSSLRequired :: !(Maybe Bool)

@@ -2934,7 +2934,7 @@ instance ToJSON PlacementAssignment where

29342934data CreativeFieldValue = CreativeFieldValue

29352935 { _cfvKind :: !Text

29362936 , _cfvValue :: !(Maybe Text)

2937− , _cfvId :: !(Maybe (JSONText Int64))

2937+ , _cfvId :: !(Maybe (Textual Int64))

29382938 } deriving (Eq,Show,Data,Typeable,Generic)

29392939

29402940-- | Creates a value of 'CreativeFieldValue' with the minimum fields required to make a request.

@@ -3203,8 +3203,8 @@ instance ToJSON FloodlightActivitiesListResponse

32033203--

32043204-- /See:/ 'creativeFieldAssignment' smart constructor.

32053205data CreativeFieldAssignment = CreativeFieldAssignment

3206− { _cfaCreativeFieldId :: !(Maybe (JSONText Int64))

3207− , _cfaCreativeFieldValueId :: !(Maybe (JSONText Int64))

3206+ { _cfaCreativeFieldId :: !(Maybe (Textual Int64))

3207+ , _cfaCreativeFieldValueId :: !(Maybe (Textual Int64))

32083208 } deriving (Eq,Show,Data,Typeable,Generic)

32093209

32103210-- | Creates a value of 'CreativeFieldAssignment' with the minimum fields required to make a request.

@@ -3258,9 +3258,9 @@ instance ToJSON CreativeFieldAssignment where

32583258-- /See:/ 'advertiserGroup' smart constructor.

32593259data AdvertiserGroup = AdvertiserGroup

32603260 { _agKind :: !Text

3261− , _agAccountId :: !(Maybe (JSONText Int64))

3261+ , _agAccountId :: !(Maybe (Textual Int64))

32623262 , _agName :: !(Maybe Text)

3263− , _agId :: !(Maybe (JSONText Int64))

3263+ , _agId :: !(Maybe (Textual Int64))

32643264 } deriving (Eq,Show,Data,Typeable,Generic)

32653265

32663266-- | Creates a value of 'AdvertiserGroup' with the minimum fields required to make a request.

@@ -3332,8 +3332,8 @@ instance ToJSON AdvertiserGroup where

33323332data TagData = TagData

33333333 { _tdClickTag :: !(Maybe Text)

33343334 , _tdFormat :: !(Maybe TagDataFormat)

3335− , _tdCreativeId :: !(Maybe (JSONText Int64))

3336− , _tdAdId :: !(Maybe (JSONText Int64))

3335+ , _tdCreativeId :: !(Maybe (Textual Int64))

3336+ , _tdAdId :: !(Maybe (Textual Int64))

33373337 , _tdImpressionTag :: !(Maybe Text)

33383338 } deriving (Eq,Show,Data,Typeable,Generic)

33393339

@@ -3413,7 +3413,7 @@ instance ToJSON TagData where

34133413-- /See:/ 'dayPartTargeting' smart constructor.

34143414data DayPartTargeting = DayPartTargeting

34153415 { _dptDaysOfWeek :: !(Maybe [DayPartTargetingDaysOfWeekItem])

3416− , _dptHoursOfDay :: !(Maybe [JSONText Int32])

3416+ , _dptHoursOfDay :: !(Maybe [Textual Int32])

34173417 , _dptUserLocalTime :: !(Maybe Bool)

34183418 } deriving (Eq,Show,Data,Typeable,Generic)

34193419

@@ -3490,7 +3490,7 @@ data CreativeOptimizationConfiguration = CreativeOptimizationConfiguration

34903490 { _cocOptimizationModel :: !(Maybe CreativeOptimizationConfigurationOptimizationModel)

34913491 , _cocName :: !(Maybe Text)

34923492 , _cocOptimizationActivitys :: !(Maybe [OptimizationActivity])

3493− , _cocId :: !(Maybe (JSONText Int64))

3493+ , _cocId :: !(Maybe (Textual Int64))

34943494 } deriving (Eq,Show,Data,Typeable,Generic)

34953495

34963496-- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.

@@ -3738,10 +3738,10 @@ instance ToJSON PlacementStrategiesListResponse where

37383738-- /See:/ 'subAccount' smart constructor.

37393739data SubAccount = SubAccount

37403740 { _saKind :: !Text

3741− , _saAvailablePermissionIds :: !(Maybe [JSONText Int64])

3742− , _saAccountId :: !(Maybe (JSONText Int64))

3741+ , _saAvailablePermissionIds :: !(Maybe [Textual Int64])

3742+ , _saAccountId :: !(Maybe (Textual Int64))

37433743 , _saName :: !(Maybe Text)

3744− , _saId :: !(Maybe (JSONText Int64))

3744+ , _saId :: !(Maybe (Textual Int64))

37453745 } deriving (Eq,Show,Data,Typeable,Generic)

37463746

37473747-- | Creates a value of 'SubAccount' with the minimum fields required to make a request.

@@ -3893,32 +3893,32 @@ data Ad = Ad

38933893 , _aGeoTargeting :: !(Maybe GeoTargeting)

38943894 , _aCreativeRotation :: !(Maybe CreativeRotation)

38953895 , _aTechnologyTargeting :: !(Maybe TechnologyTargeting)

3896− , _aAudienceSegmentId :: !(Maybe (JSONText Int64))

3896+ , _aAudienceSegmentId :: !(Maybe (Textual Int64))

38973897 , _aDayPartTargeting :: !(Maybe DayPartTargeting)

38983898 , _aSize :: !(Maybe Size)

38993899 , _aStartTime :: !(Maybe DateTime')

39003900 , _aKind :: !Text

39013901 , _aClickThroughURLSuffixProperties :: !(Maybe ClickThroughURLSuffixProperties)

39023902 , _aCampaignIdDimensionValue :: !(Maybe DimensionValue)

3903− , _aAdvertiserId :: !(Maybe (JSONText Int64))

3903+ , _aAdvertiserId :: !(Maybe (Textual Int64))

39043904 , _aAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

39053905 , _aSSLCompliant :: !(Maybe Bool)

3906− , _aCampaignId :: !(Maybe (JSONText Int64))

3906+ , _aCampaignId :: !(Maybe (Textual Int64))

39073907 , _aIdDimensionValue :: !(Maybe DimensionValue)

39083908 , _aClickThroughURL :: !(Maybe ClickThroughURL)

39093909 , _aDeliverySchedule :: !(Maybe DeliverySchedule)

39103910 , _aEventTagOverrides :: !(Maybe [EventTagOverride])

39113911 , _aActive :: !(Maybe Bool)

3912− , _aAccountId :: !(Maybe (JSONText Int64))

3912+ , _aAccountId :: !(Maybe (Textual Int64))

39133913 , _aName :: !(Maybe Text)

39143914 , _aKeyValueTargetingExpression :: !(Maybe KeyValueTargetingExpression)

39153915 , _aEndTime :: !(Maybe DateTime')

39163916 , _aCreateInfo :: !(Maybe LastModifiedInfo)

39173917 , _aLastModifiedInfo :: !(Maybe LastModifiedInfo)

3918− , _aId :: !(Maybe (JSONText Int64))

3918+ , _aId :: !(Maybe (Textual Int64))

39193919 , _aSSLRequired :: !(Maybe Bool)

39203920 , _aComments :: !(Maybe Text)

3921− , _aSubAccountId :: !(Maybe (JSONText Int64))

3921+ , _aSubAccountId :: !(Maybe (Textual Int64))

39223922 , _aType :: !(Maybe AdType)

39233923 , _aRemarketingListExpression :: !(Maybe ListTargetingExpression)

39243924 , _aDynamicClickTracker :: !(Maybe Bool)

@@ -4399,27 +4399,27 @@ instance ToJSON Ad where

43994399--

44004400-- /See:/ 'project' smart constructor.

44014401data Project = Project

4402− { _pTargetClicks :: !(Maybe (JSONText Int64))

4402+ { _pTargetClicks :: !(Maybe (Textual Int64))

44034403 , _pClientBillingCode :: !(Maybe Text)

4404− , _pTargetCpmNanos :: !(Maybe (JSONText Int64))

4405− , _pTargetConversions :: !(Maybe (JSONText Int64))

4406− , _pBudget :: !(Maybe (JSONText Int64))

4404+ , _pTargetCpmNanos :: !(Maybe (Textual Int64))

4405+ , _pTargetConversions :: !(Maybe (Textual Int64))

4406+ , _pBudget :: !(Maybe (Textual Int64))

44074407 , _pKind :: !Text

4408− , _pAdvertiserId :: !(Maybe (JSONText Int64))

4408+ , _pAdvertiserId :: !(Maybe (Textual Int64))

44094409 , _pEndDate :: !(Maybe Date')

44104410 , _pOverview :: !(Maybe Text)

4411− , _pTargetImpressions :: !(Maybe (JSONText Int64))

4411+ , _pTargetImpressions :: !(Maybe (Textual Int64))

44124412 , _pStartDate :: !(Maybe Date')

4413− , _pTargetCpcNanos :: !(Maybe (JSONText Int64))

4414− , _pAccountId :: !(Maybe (JSONText Int64))

4413+ , _pTargetCpcNanos :: !(Maybe (Textual Int64))

4414+ , _pAccountId :: !(Maybe (Textual Int64))

44154415 , _pName :: !(Maybe Text)

44164416 , _pLastModifiedInfo :: !(Maybe LastModifiedInfo)

4417− , _pId :: !(Maybe (JSONText Int64))

4417+ , _pId :: !(Maybe (Textual Int64))

44184418 , _pAudienceAgeGroup :: !(Maybe ProjectAudienceAgeGroup)

4419− , _pSubAccountId :: !(Maybe (JSONText Int64))

4419+ , _pSubAccountId :: !(Maybe (Textual Int64))

44204420 , _pAudienceGender :: !(Maybe ProjectAudienceGender)

44214421 , _pClientName :: !(Maybe Text)

4422− , _pTargetCpaNanos :: !(Maybe (JSONText Int64))

4422+ , _pTargetCpaNanos :: !(Maybe (Textual Int64))

44234423 } deriving (Eq,Show,Data,Typeable,Generic)

44244424

44254425-- | Creates a value of 'Project' with the minimum fields required to make a request.

@@ -4804,11 +4804,11 @@ instance ToJSON ReportFloodlightCriteria where

48044804--

48054805-- /See:/ 'size' smart constructor.

48064806data Size = Size

4807− { _sHeight :: !(Maybe (JSONText Int32))

4807+ { _sHeight :: !(Maybe (Textual Int32))

48084808 , _sKind :: !Text

4809− , _sWidth :: !(Maybe (JSONText Int32))

4809+ , _sWidth :: !(Maybe (Textual Int32))

48104810 , _sIab :: !(Maybe Bool)

4811− , _sId :: !(Maybe (JSONText Int64))

4811+ , _sId :: !(Maybe (Textual Int64))

48124812 } deriving (Eq,Show,Data,Typeable,Generic)

48134813

48144814-- | Creates a value of 'Size' with the minimum fields required to make a request.

@@ -4886,7 +4886,7 @@ instance ToJSON Size where

48864886data ObjectFilter = ObjectFilter

48874887 { _ofStatus :: !(Maybe ObjectFilterStatus)

48884888 , _ofKind :: !Text

4889− , _ofObjectIds :: !(Maybe [JSONText Int64])

4889+ , _ofObjectIds :: !(Maybe [Textual Int64])

48904890 } deriving (Eq,Show,Data,Typeable,Generic)

48914891

48924892-- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.

@@ -4948,7 +4948,7 @@ instance ToJSON ObjectFilter where

49484948-- /See:/ 'reportsConfiguration' smart constructor.

49494949data ReportsConfiguration = ReportsConfiguration

49504950 { _rcExposureToConversionEnabled :: !(Maybe Bool)

4951− , _rcReportGenerationTimeZoneId :: !(Maybe (JSONText Int64))

4951+ , _rcReportGenerationTimeZoneId :: !(Maybe (Textual Int64))

49524952 , _rcLookbackConfiguration :: !(Maybe LookbackConfiguration)

49534953 } deriving (Eq,Show,Data,Typeable,Generic)

49544954

@@ -5024,7 +5024,7 @@ instance ToJSON ReportsConfiguration where

50245024-- /See:/ 'pricingSchedule' smart constructor.

50255025data PricingSchedule = PricingSchedule

50265026 { _psTestingStartDate :: !(Maybe Date')

5027− , _psFloodlightActivityId :: !(Maybe (JSONText Int64))

5027+ , _psFloodlightActivityId :: !(Maybe (Textual Int64))

50285028 , _psEndDate :: !(Maybe Date')

50295029 , _psDisregardOverdelivery :: !(Maybe Bool)

50305030 , _psStartDate :: !(Maybe Date')

@@ -5177,7 +5177,7 @@ data PostalCode = PostalCode

51775177 , _pcCode :: !(Maybe Text)

51785178 , _pcCountryCode :: !(Maybe Text)

51795179 , _pcId :: !(Maybe Text)

5180− , _pcCountryDartId :: !(Maybe (JSONText Int64))

5180+ , _pcCountryDartId :: !(Maybe (Textual Int64))

51815181 } deriving (Eq,Show,Data,Typeable,Generic)

51825182

51835183-- | Creates a value of 'PostalCode' with the minimum fields required to make a request.

@@ -5311,7 +5311,7 @@ data Country = Country

53115311 { _cKind :: !Text

53125312 , _cName :: !(Maybe Text)

53135313 , _cCountryCode :: !(Maybe Text)

5314− , _cDartId :: !(Maybe (JSONText Int64))

5314+ , _cDartId :: !(Maybe (Textual Int64))

53155315 , _cSSLEnabled :: !(Maybe Bool)

53165316 } deriving (Eq,Show,Data,Typeable,Generic)

53175317

@@ -5608,7 +5608,7 @@ instance ToJSON Pricing where

56085608data AudienceSegmentGroup = AudienceSegmentGroup

56095609 { _asgAudienceSegments :: !(Maybe [AudienceSegment])

56105610 , _asgName :: !(Maybe Text)

5611− , _asgId :: !(Maybe (JSONText Int64))

5611+ , _asgId :: !(Maybe (Textual Int64))

56125612 } deriving (Eq,Show,Data,Typeable,Generic)

56135613

56145614-- | Creates a value of 'AudienceSegmentGroup' with the minimum fields required to make a request.

@@ -5675,7 +5675,7 @@ data OperatingSystem = OperatingSystem

56755675 , _osKind :: !Text

56765676 , _osName :: !(Maybe Text)

56775677 , _osMobile :: !(Maybe Bool)

5678− , _osDartId :: !(Maybe (JSONText Int64))

5678+ , _osDartId :: !(Maybe (Textual Int64))

56795679 } deriving (Eq,Show,Data,Typeable,Generic)

56805680

56815681-- | Creates a value of 'OperatingSystem' with the minimum fields required to make a request.

@@ -5750,10 +5750,10 @@ instance ToJSON OperatingSystem where

57505750--

57515751-- /See:/ 'flight' smart constructor.

57525752data Flight = Flight

5753− { _fRateOrCost :: !(Maybe (JSONText Int64))

5753+ { _fRateOrCost :: !(Maybe (Textual Int64))

57545754 , _fEndDate :: !(Maybe Date')

57555755 , _fStartDate :: !(Maybe Date')

5756− , _fUnits :: !(Maybe (JSONText Int64))

5756+ , _fUnits :: !(Maybe (Textual Int64))

57575757 } deriving (Eq,Show,Data,Typeable,Generic)

57585758

57595759-- | Creates a value of 'Flight' with the minimum fields required to make a request.

@@ -6245,18 +6245,18 @@ data AccountUserProFile = AccountUserProFile

62456245 { _aupfEmail :: !(Maybe Text)

62466246 , _aupfUserRoleFilter :: !(Maybe ObjectFilter)

62476247 , _aupfAdvertiserFilter :: !(Maybe ObjectFilter)

6248− , _aupfUserRoleId :: !(Maybe (JSONText Int64))

6248+ , _aupfUserRoleId :: !(Maybe (Textual Int64))

62496249 , _aupfKind :: !Text

62506250 , _aupfLocale :: !(Maybe Text)

62516251 , _aupfSiteFilter :: !(Maybe ObjectFilter)

62526252 , _aupfTraffickerType :: !(Maybe AccountUserProFileTraffickerType)

62536253 , _aupfActive :: !(Maybe Bool)

6254− , _aupfAccountId :: !(Maybe (JSONText Int64))

6254+ , _aupfAccountId :: !(Maybe (Textual Int64))

62556255 , _aupfName :: !(Maybe Text)

6256− , _aupfId :: !(Maybe (JSONText Int64))

6256+ , _aupfId :: !(Maybe (Textual Int64))

62576257 , _aupfUserAccessType :: !(Maybe AccountUserProFileUserAccessType)

62586258 , _aupfComments :: !(Maybe Text)

6259− , _aupfSubAccountId :: !(Maybe (JSONText Int64))

6259+ , _aupfSubAccountId :: !(Maybe (Textual Int64))

62606260 , _aupfCampaignFilter :: !(Maybe ObjectFilter)

62616261 } deriving (Eq,Show,Data,Typeable,Generic)

62626262

@@ -6681,7 +6681,7 @@ instance ToJSON UserRolePermissionGroupsListResponse

66816681--

66826682-- /See:/ 'placementTag' smart constructor.

66836683data PlacementTag = PlacementTag

6684− { _ptPlacementId :: !(Maybe (JSONText Int64))

6684+ { _ptPlacementId :: !(Maybe (Textual Int64))

66856685 , _ptTagDatas :: !(Maybe [TagData])

66866686 } deriving (Eq,Show,Data,Typeable,Generic)

66876687

@@ -6802,8 +6802,8 @@ data Creative = Creative

68026802 , _creBackupImageTargetWindow :: !(Maybe TargetWindow)

68036803 , _creRenderingIdDimensionValue :: !(Maybe DimensionValue)

68046804 , _creCustomKeyValues :: !(Maybe [Text])

6805− , _creVideoDuration :: !(Maybe (JSONText Float))

6806− , _creRenderingId :: !(Maybe (JSONText Int64))

6805+ , _creVideoDuration :: !(Maybe (Textual Double))

6806+ , _creRenderingId :: !(Maybe (Textual Int64))

68076807 , _creThirdPartyBackupImageImpressionsURL :: !(Maybe Text)

68086808 , _creFsCommand :: !(Maybe FsCommand)

68096809 , _creAllowScriptAccess :: !(Maybe Bool)

@@ -6816,8 +6816,8 @@ data Creative = Creative

68166816 , _creKind :: !Text

68176817 , _creSSLOverride :: !(Maybe Bool)

68186818 , _creHTMLCode :: !(Maybe Text)

6819− , _creAdvertiserId :: !(Maybe (JSONText Int64))

6820− , _creRequiredFlashVersion :: !(Maybe (JSONText Int32))

6819+ , _creAdvertiserId :: !(Maybe (Textual Int64))

6820+ , _creRequiredFlashVersion :: !(Maybe (Textual Int32))

68216821 , _creBackgRoundColor :: !(Maybe Text)

68226822 , _creAdTagKeys :: !(Maybe [Text])

68236823 , _creSkippable :: !(Maybe Bool)

@@ -6827,31 +6827,31 @@ data Creative = Creative

68276827 , _creCommercialId :: !(Maybe Text)

68286828 , _creActive :: !(Maybe Bool)

68296829 , _creExitCustomEvents :: !(Maybe [CreativeCustomEvent])

6830− , _creAccountId :: !(Maybe (JSONText Int64))

6830+ , _creAccountId :: !(Maybe (Textual Int64))

68316831 , _creBackupImageClickThroughURL :: !(Maybe Text)

68326832 , _creName :: !(Maybe Text)

68336833 , _creOverrideCss :: !(Maybe Text)

68346834 , _creVideoDescription :: !(Maybe Text)

68356835 , _creClickTags :: !(Maybe [ClickTag])

68366836 , _creAdParameters :: !(Maybe Text)

6837− , _creVersion :: !(Maybe (JSONText Int32))

6838− , _creLatestTraffickedCreativeId :: !(Maybe (JSONText Int64))

6837+ , _creVersion :: !(Maybe (Textual Int32))

6838+ , _creLatestTraffickedCreativeId :: !(Maybe (Textual Int64))

68396839 , _creThirdPartyRichMediaImpressionsURL :: !(Maybe Text)

68406840 , _creLastModifiedInfo :: !(Maybe LastModifiedInfo)

6841− , _creId :: !(Maybe (JSONText Int64))

6842− , _creStudioAdvertiserId :: !(Maybe (JSONText Int64))

6841+ , _creId :: !(Maybe (Textual Int64))

6842+ , _creStudioAdvertiserId :: !(Maybe (Textual Int64))

68436843 , _creCreativeAssets :: !(Maybe [CreativeAsset])

6844− , _creSubAccountId :: !(Maybe (JSONText Int64))

6844+ , _creSubAccountId :: !(Maybe (Textual Int64))

68456845 , _creType :: !(Maybe CreativeType)

68466846 , _creTimerCustomEvents :: !(Maybe [CreativeCustomEvent])

6847− , _creStudioCreativeId :: !(Maybe (JSONText Int64))

6847+ , _creStudioCreativeId :: !(Maybe (Textual Int64))

68486848 , _creCompatibility :: !(Maybe [CreativeCompatibilityItem])

68496849 , _creBackupImageFeatures :: !(Maybe [CreativeBackupImageFeaturesItem])

68506850 , _creArtworkType :: !(Maybe CreativeArtworkType)

68516851 , _creArchived :: !(Maybe Bool)

6852− , _creCompanionCreatives :: !(Maybe [JSONText Int64])

6853− , _creTotalFileSize :: !(Maybe (JSONText Int64))

6854− , _creStudioTraffickedCreativeId :: !(Maybe (JSONText Int64))

6852+ , _creCompanionCreatives :: !(Maybe [Textual Int64])

6853+ , _creTotalFileSize :: !(Maybe (Textual Int64))

6854+ , _creStudioTraffickedCreativeId :: !(Maybe (Textual Int64))

68556855 , _creRedirectURL :: !(Maybe Text)

68566856 , _creAutoAdvanceImages :: !(Maybe Bool)

68576857 , _creCreativeFieldAssignments :: !(Maybe [CreativeFieldAssignment])

@@ -7672,7 +7672,7 @@ data SiteContact = SiteContact

76727672 , _scLastName :: !(Maybe Text)

76737673 , _scAddress :: !(Maybe Text)

76747674 , _scFirstName :: !(Maybe Text)

7675− , _scId :: !(Maybe (JSONText Int64))

7675+ , _scId :: !(Maybe (Textual Int64))

76767676 , _scTitle :: !(Maybe Text)

76777677 , _scContactType :: !(Maybe SiteContactContactType)

76787678 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -7918,19 +7918,19 @@ instance ToJSON DateRange where

79187918data Report = Report

79197919 { _rDelivery :: !(Maybe ReportDelivery)

79207920 , _rEtag :: !(Maybe Text)

7921− , _rOwnerProFileId :: !(Maybe (JSONText Int64))

7921+ , _rOwnerProFileId :: !(Maybe (Textual Int64))

79227922 , _rSchedule :: !(Maybe ReportSchedule)

79237923 , _rPathToConversionCriteria :: !(Maybe ReportPathToConversionCriteria)

79247924 , _rKind :: !Text

79257925 , _rFormat :: !(Maybe ReportFormat)

79267926 , _rReachCriteria :: !(Maybe ReportReachCriteria)

7927− , _rLastModifiedTime :: !(Maybe (JSONText Word64))

7928− , _rAccountId :: !(Maybe (JSONText Int64))

7927+ , _rLastModifiedTime :: !(Maybe (Textual Word64))

7928+ , _rAccountId :: !(Maybe (Textual Int64))

79297929 , _rName :: !(Maybe Text)

7930− , _rId :: !(Maybe (JSONText Int64))

7930+ , _rId :: !(Maybe (Textual Int64))

79317931 , _rCrossDimensionReachCriteria :: !(Maybe ReportCrossDimensionReachCriteria)

79327932 , _rType :: !(Maybe ReportType)

7933− , _rSubAccountId :: !(Maybe (JSONText Int64))

7933+ , _rSubAccountId :: !(Maybe (Textual Int64))

79347934 , _rFloodlightCriteria :: !(Maybe ReportFloodlightCriteria)

79357935 , _rCriteria :: !(Maybe ReportCriteria)

79367936 , _rFileName :: !(Maybe Text)

@@ -8151,26 +8151,26 @@ instance ToJSON Report where

81518151-- /See:/ 'campaign' smart constructor.

81528152data Campaign = Campaign

81538153 { _camCreativeOptimizationConfiguration :: !(Maybe CreativeOptimizationConfiguration)

8154− , _camCreativeGroupIds :: !(Maybe [JSONText Int64])

8154+ , _camCreativeGroupIds :: !(Maybe [Textual Int64])

81558155 , _camNielsenOCREnabled :: !(Maybe Bool)

81568156 , _camKind :: !Text

81578157 , _camClickThroughURLSuffixProperties :: !(Maybe ClickThroughURLSuffixProperties)

8158− , _camAdvertiserId :: !(Maybe (JSONText Int64))

8158+ , _camAdvertiserId :: !(Maybe (Textual Int64))

81598159 , _camEndDate :: !(Maybe Date')

81608160 , _camAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

81618161 , _camIdDimensionValue :: !(Maybe DimensionValue)

81628162 , _camEventTagOverrides :: !(Maybe [EventTagOverride])

81638163 , _camLookbackConfiguration :: !(Maybe LookbackConfiguration)

81648164 , _camStartDate :: !(Maybe Date')

8165− , _camAccountId :: !(Maybe (JSONText Int64))

8165+ , _camAccountId :: !(Maybe (Textual Int64))

81668166 , _camComscoreVceEnabled :: !(Maybe Bool)

81678167 , _camName :: !(Maybe Text)

8168− , _camAdvertiserGroupId :: !(Maybe (JSONText Int64))

8168+ , _camAdvertiserGroupId :: !(Maybe (Textual Int64))

81698169 , _camBillingInvoiceCode :: !(Maybe Text)

81708170 , _camCreateInfo :: !(Maybe LastModifiedInfo)

81718171 , _camLastModifiedInfo :: !(Maybe LastModifiedInfo)

8172− , _camId :: !(Maybe (JSONText Int64))

8173− , _camSubAccountId :: !(Maybe (JSONText Int64))

8172+ , _camId :: !(Maybe (Textual Int64))

8173+ , _camSubAccountId :: !(Maybe (Textual Int64))

81748174 , _camAdditionalCreativeOptimizationConfigurations :: !(Maybe [CreativeOptimizationConfiguration])

81758175 , _camExternalId :: !(Maybe Text)

81768176 , _camComment :: !(Maybe Text)

@@ -8603,7 +8603,7 @@ data ClickThroughURL = ClickThroughURL

86038603 { _ctuDefaultLandingPage :: !(Maybe Bool)

86048604 , _ctuComputedClickThroughURL :: !(Maybe Text)

86058605 , _ctuCustomClickThroughURL :: !(Maybe Text)

8606− , _ctuLandingPageId :: !(Maybe (JSONText Int64))

8606+ , _ctuLandingPageId :: !(Maybe (Textual Int64))

86078607 } deriving (Eq,Show,Data,Typeable,Generic)

86088608

86098609-- | Creates a value of 'ClickThroughURL' with the minimum fields required to make a request.

@@ -8964,24 +8964,24 @@ instance ToJSON CreativesListResponse where

89648964--

89658965-- /See:/ 'account' smart constructor.

89668966data Account = Account

8967− { _aaAccountPermissionIds :: !(Maybe [JSONText Int64])

8968− , _aaMaximumImageSize :: !(Maybe (JSONText Int64))

8969− , _aaCurrencyId :: !(Maybe (JSONText Int64))

8967+ { _aaAccountPermissionIds :: !(Maybe [Textual Int64])

8968+ , _aaMaximumImageSize :: !(Maybe (Textual Int64))

8969+ , _aaCurrencyId :: !(Maybe (Textual Int64))

89708970 , _aaReportsConfiguration :: !(Maybe ReportsConfiguration)

89718971 , _aaNielsenOCREnabled :: !(Maybe Bool)

89728972 , _aaKind :: !Text

89738973 , _aaLocale :: !(Maybe Text)

89748974 , _aaActive :: !(Maybe Bool)

8975− , _aaAvailablePermissionIds :: !(Maybe [JSONText Int64])

8976− , _aaTeaserSizeLimit :: !(Maybe (JSONText Int64))

8975+ , _aaAvailablePermissionIds :: !(Maybe [Textual Int64])

8976+ , _aaTeaserSizeLimit :: !(Maybe (Textual Int64))

89778977 , _aaComscoreVceEnabled :: !(Maybe Bool)

89788978 , _aaActiveViewOptOut :: !(Maybe Bool)

89798979 , _aaName :: !(Maybe Text)

89808980 , _aaAccountProFile :: !(Maybe AccountAccountProFile)

8981− , _aaId :: !(Maybe (JSONText Int64))

8982− , _aaCountryId :: !(Maybe (JSONText Int64))

8981+ , _aaId :: !(Maybe (Textual Int64))

8982+ , _aaCountryId :: !(Maybe (Textual Int64))

89838983 , _aaActiveAdsLimitTier :: !(Maybe AccountActiveAdsLimitTier)

8984− , _aaDefaultCreativeSizeId :: !(Maybe (JSONText Int64))

8984+ , _aaDefaultCreativeSizeId :: !(Maybe (Textual Int64))

89858985 , _aaDescription :: !(Maybe Text)

89868986 } deriving (Eq,Show,Data,Typeable,Generic)

89878987

@@ -9312,9 +9312,9 @@ instance ToJSON AccountUserProFilesListResponse where

93129312-- /See:/ 'contentCategory' smart constructor.

93139313data ContentCategory = ContentCategory

93149314 { _conKind :: !Text

9315− , _conAccountId :: !(Maybe (JSONText Int64))

9315+ , _conAccountId :: !(Maybe (Textual Int64))

93169316 , _conName :: !(Maybe Text)

9317− , _conId :: !(Maybe (JSONText Int64))

9317+ , _conId :: !(Maybe (Textual Int64))

93189318 } deriving (Eq,Show,Data,Typeable,Generic)

93199319

93209320-- | Creates a value of 'ContentCategory' with the minimum fields required to make a request.

@@ -9485,7 +9485,7 @@ instance ToJSON ReportCompatibleFields where

94859485data DeliverySchedule = DeliverySchedule

94869486 { _dsHardCutoff :: !(Maybe Bool)

94879487 , _dsPriority :: !(Maybe DeliverySchedulePriority)

9488− , _dsImpressionRatio :: !(Maybe (JSONText Int64))

9488+ , _dsImpressionRatio :: !(Maybe (Textual Int64))

94899489 , _dsFrequencyCap :: !(Maybe FrequencyCap)

94909490 } deriving (Eq,Show,Data,Typeable,Generic)

94919491

@@ -9568,18 +9568,18 @@ instance ToJSON DeliverySchedule where

95689568--

95699569-- /See:/ 'remarketingList' smart constructor.

95709570data RemarketingList = RemarketingList

9571− { _rlListSize :: !(Maybe (JSONText Int64))

9571+ { _rlListSize :: !(Maybe (Textual Int64))

95729572 , _rlListPopulationRule :: !(Maybe ListPopulationRule)

9573− , _rlLifeSpan :: !(Maybe (JSONText Int64))

9573+ , _rlLifeSpan :: !(Maybe (Textual Int64))

95749574 , _rlKind :: !Text

9575− , _rlAdvertiserId :: !(Maybe (JSONText Int64))

9575+ , _rlAdvertiserId :: !(Maybe (Textual Int64))

95769576 , _rlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

95779577 , _rlActive :: !(Maybe Bool)

9578− , _rlAccountId :: !(Maybe (JSONText Int64))

9578+ , _rlAccountId :: !(Maybe (Textual Int64))

95799579 , _rlName :: !(Maybe Text)

95809580 , _rlListSource :: !(Maybe RemarketingListListSource)

9581− , _rlId :: !(Maybe (JSONText Int64))

9582− , _rlSubAccountId :: !(Maybe (JSONText Int64))

9581+ , _rlId :: !(Maybe (Textual Int64))

9582+ , _rlSubAccountId :: !(Maybe (Textual Int64))

95839583 , _rlDescription :: !(Maybe Text)

95849584 } deriving (Eq,Show,Data,Typeable,Generic)

95859585

@@ -9912,7 +9912,7 @@ instance ToJSON FloodlightReportCompatibleFields

99129912data UserRolePermissionGroup = UserRolePermissionGroup

99139913 { _urpgKind :: !Text

99149914 , _urpgName :: !(Maybe Text)

9915− , _urpgId :: !(Maybe (JSONText Int64))

9915+ , _urpgId :: !(Maybe (Textual Int64))

99169916 } deriving (Eq,Show,Data,Typeable,Generic)

99179917

99189918-- | Creates a value of 'UserRolePermissionGroup' with the minimum fields required to make a request.

@@ -10053,13 +10053,13 @@ instance ToJSON TagSetting where

1005310053--

1005410054-- /See:/ 'reportPathToConversionCriteriaReportProperties' smart constructor.

1005510055data ReportPathToConversionCriteriaReportProperties = ReportPathToConversionCriteriaReportProperties

10056− { _rptccrpMaximumInteractionGap :: !(Maybe (JSONText Int32))

10057− , _rptccrpMaximumClickInteractions :: !(Maybe (JSONText Int32))

10056+ { _rptccrpMaximumInteractionGap :: !(Maybe (Textual Int32))

10057+ , _rptccrpMaximumClickInteractions :: !(Maybe (Textual Int32))

1005810058 , _rptccrpPivotOnInteractionPath :: !(Maybe Bool)

10059− , _rptccrpMaximumImpressionInteractions :: !(Maybe (JSONText Int32))

10059+ , _rptccrpMaximumImpressionInteractions :: !(Maybe (Textual Int32))

1006010060 , _rptccrpIncludeUnattributedIPConversions :: !(Maybe Bool)

10061− , _rptccrpImpressionsLookbackWindow :: !(Maybe (JSONText Int32))

10062− , _rptccrpClicksLookbackWindow :: !(Maybe (JSONText Int32))

10061+ , _rptccrpImpressionsLookbackWindow :: !(Maybe (Textual Int32))

10062+ , _rptccrpClicksLookbackWindow :: !(Maybe (Textual Int32))

1006310063 , _rptccrpIncludeUnattributedCookieConversions :: !(Maybe Bool)

1006410064 , _rptccrpIncludeAttributedIPConversions :: !(Maybe Bool)

1006510065 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -10348,8 +10348,8 @@ data MobileCarrier = MobileCarrier

1034810348 { _mcKind :: !Text

1034910349 , _mcName :: !(Maybe Text)

1035010350 , _mcCountryCode :: !(Maybe Text)

10351− , _mcId :: !(Maybe (JSONText Int64))

10352− , _mcCountryDartId :: !(Maybe (JSONText Int64))

10351+ , _mcId :: !(Maybe (Textual Int64))

10352+ , _mcCountryDartId :: !(Maybe (Textual Int64))

1035310353 } deriving (Eq,Show,Data,Typeable,Generic)

1035410354

1035510355-- | Creates a value of 'MobileCarrier' with the minimum fields required to make a request.

@@ -10433,7 +10433,7 @@ data LandingPage = LandingPage

1043310433 , _lpDefault :: !(Maybe Bool)

1043410434 , _lpURL :: !(Maybe Text)

1043510435 , _lpName :: !(Maybe Text)

10436− , _lpId :: !(Maybe (JSONText Int64))

10436+ , _lpId :: !(Maybe (Textual Int64))

1043710437 } deriving (Eq,Show,Data,Typeable,Generic)

1043810438

1043910439-- | Creates a value of 'LandingPage' with the minimum fields required to make a request.

@@ -10699,13 +10699,13 @@ instance ToJSON ReportList where

1069910699-- /See:/ 'creativeGroup' smart constructor.

1070010700data CreativeGroup = CreativeGroup

1070110701 { _cgKind :: !Text

10702− , _cgAdvertiserId :: !(Maybe (JSONText Int64))

10702+ , _cgAdvertiserId :: !(Maybe (Textual Int64))

1070310703 , _cgAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

10704− , _cgGroupNumber :: !(Maybe (JSONText Int32))

10705− , _cgAccountId :: !(Maybe (JSONText Int64))

10704+ , _cgGroupNumber :: !(Maybe (Textual Int32))

10705+ , _cgAccountId :: !(Maybe (Textual Int64))

1070610706 , _cgName :: !(Maybe Text)

10707− , _cgId :: !(Maybe (JSONText Int64))

10708− , _cgSubAccountId :: !(Maybe (JSONText Int64))

10707+ , _cgId :: !(Maybe (Textual Int64))

10708+ , _cgSubAccountId :: !(Maybe (Textual Int64))

1070910709 } deriving (Eq,Show,Data,Typeable,Generic)

1071010710

1071110711-- | Creates a value of 'CreativeGroup' with the minimum fields required to make a request.

@@ -10830,7 +10830,7 @@ instance ToJSON CreativeGroup where

1083010830-- /See:/ 'campaignCreativeAssociation' smart constructor.

1083110831data CampaignCreativeAssociation = CampaignCreativeAssociation

1083210832 { _ccaKind :: !Text

10833− , _ccaCreativeId :: !(Maybe (JSONText Int64))

10833+ , _ccaCreativeId :: !(Maybe (Textual Int64))

1083410834 } deriving (Eq,Show,Data,Typeable,Generic)

1083510835

1083610836-- | Creates a value of 'CampaignCreativeAssociation' with the minimum fields required to make a request.

@@ -10881,8 +10881,8 @@ instance ToJSON CampaignCreativeAssociation where

1088110881--

1088210882-- /See:/ 'lookbackConfiguration' smart constructor.

1088310883data LookbackConfiguration = LookbackConfiguration

10884− { _lcClickDuration :: !(Maybe (JSONText Int32))

10885− , _lcPostImpressionActivitiesDuration :: !(Maybe (JSONText Int32))

10884+ { _lcClickDuration :: !(Maybe (Textual Int32))

10885+ , _lcPostImpressionActivitiesDuration :: !(Maybe (Textual Int32))

1088610886 } deriving (Eq,Show,Data,Typeable,Generic)

1088710887

1088810888-- | Creates a value of 'LookbackConfiguration' with the minimum fields required to make a request.

@@ -10943,8 +10943,8 @@ data FloodlightActivityPublisherDynamicTag = FloodlightActivityPublisherDynamicT

1094310943 { _fapdtClickThrough :: !(Maybe Bool)

1094410944 , _fapdtSiteIdDimensionValue :: !(Maybe DimensionValue)

1094510945 , _fapdtDynamicTag :: !(Maybe FloodlightActivityDynamicTag)

10946− , _fapdtDirectorySiteId :: !(Maybe (JSONText Int64))

10947− , _fapdtSiteId :: !(Maybe (JSONText Int64))

10946+ , _fapdtDirectorySiteId :: !(Maybe (Textual Int64))

10947+ , _fapdtSiteId :: !(Maybe (Textual Int64))

1094810948 , _fapdtViewThrough :: !(Maybe Bool)

1094910949 } deriving (Eq,Show,Data,Typeable,Generic)

1095010950

@@ -11045,10 +11045,10 @@ instance ToJSON FloodlightActivityPublisherDynamicTag

1104511045--

1104611046-- /See:/ 'accountActiveAdSummary' smart constructor.

1104711047data AccountActiveAdSummary = AccountActiveAdSummary

11048− { _aaasAvailableAds :: !(Maybe (JSONText Int64))

11048+ { _aaasAvailableAds :: !(Maybe (Textual Int64))

1104911049 , _aaasKind :: !Text

11050− , _aaasAccountId :: !(Maybe (JSONText Int64))

11051− , _aaasActiveAds :: !(Maybe (JSONText Int64))

11050+ , _aaasAccountId :: !(Maybe (Textual Int64))

11051+ , _aaasActiveAds :: !(Maybe (Textual Int64))

1105211052 , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)

1105311053 } deriving (Eq,Show,Data,Typeable,Generic)

1105411054

@@ -11135,8 +11135,8 @@ instance ToJSON AccountActiveAdSummary where

1113511135--

1113611136-- /See:/ 'offSetPosition' smart constructor.

1113711137data OffSetPosition = OffSetPosition

11138− { _ospLeft :: !(Maybe (JSONText Int32))

11139− , _ospTop :: !(Maybe (JSONText Int32))

11138+ { _ospLeft :: !(Maybe (Textual Int32))

11139+ , _ospTop :: !(Maybe (Textual Int32))

1114011140 } deriving (Eq,Show,Data,Typeable,Generic)

1114111141

1114211142-- | Creates a value of 'OffSetPosition' with the minimum fields required to make a request.

@@ -11230,10 +11230,10 @@ instance ToJSON Metric where

1123011230--

1123111231-- /See:/ 'remarketingListShare' smart constructor.

1123211232data RemarketingListShare = RemarketingListShare

11233− { _rlsSharedAdvertiserIds :: !(Maybe [JSONText Int64])

11233+ { _rlsSharedAdvertiserIds :: !(Maybe [Textual Int64])

1123411234 , _rlsKind :: !Text

11235− , _rlsRemarketingListId :: !(Maybe (JSONText Int64))

11236− , _rlsSharedAccountIds :: !(Maybe [JSONText Int64])

11235+ , _rlsRemarketingListId :: !(Maybe (Textual Int64))

11236+ , _rlsSharedAccountIds :: !(Maybe [Textual Int64])

1123711237 } deriving (Eq,Show,Data,Typeable,Generic)

1123811238

1123911239-- | Creates a value of 'RemarketingListShare' with the minimum fields required to make a request.

@@ -11537,8 +11537,8 @@ instance ToJSON CompatibleFields where

1153711537-- /See:/ 'audienceSegment' smart constructor.

1153811538data AudienceSegment = AudienceSegment

1153911539 { _asName :: !(Maybe Text)

11540− , _asId :: !(Maybe (JSONText Int64))

11541− , _asAllocation :: !(Maybe (JSONText Int32))

11540+ , _asId :: !(Maybe (Textual Int64))

11541+ , _asAllocation :: !(Maybe (Textual Int32))

1154211542 } deriving (Eq,Show,Data,Typeable,Generic)

1154311543

1154411544-- | Creates a value of 'AudienceSegment' with the minimum fields required to make a request.

@@ -11795,12 +11795,12 @@ data City = City

1179511795 { _ccMetroCode :: !(Maybe Text)

1179611796 , _ccRegionCode :: !(Maybe Text)

1179711797 , _ccKind :: !Text

11798− , _ccRegionDartId :: !(Maybe (JSONText Int64))

11799− , _ccMetroDmaId :: !(Maybe (JSONText Int64))

11798+ , _ccRegionDartId :: !(Maybe (Textual Int64))

11799+ , _ccMetroDmaId :: !(Maybe (Textual Int64))

1180011800 , _ccName :: !(Maybe Text)

1180111801 , _ccCountryCode :: !(Maybe Text)

11802− , _ccCountryDartId :: !(Maybe (JSONText Int64))

11803− , _ccDartId :: !(Maybe (JSONText Int64))

11802+ , _ccCountryDartId :: !(Maybe (Textual Int64))

11803+ , _ccDartId :: !(Maybe (Textual Int64))

1180411804 } deriving (Eq,Show,Data,Typeable,Generic)

1180511805

1180611806-- | Creates a value of 'City' with the minimum fields required to make a request.

@@ -11925,7 +11925,7 @@ instance ToJSON City where

1192511925data PlatformType = PlatformType

1192611926 { _ptKind :: !Text

1192711927 , _ptName :: !(Maybe Text)

11928− , _ptId :: !(Maybe (JSONText Int64))

11928+ , _ptId :: !(Maybe (Textual Int64))

1192911929 } deriving (Eq,Show,Data,Typeable,Generic)

1193011930

1193111931-- | Creates a value of 'PlatformType' with the minimum fields required to make a request.

@@ -12017,7 +12017,7 @@ instance ToJSON KeyValueTargetingExpression where

1201712017--

1201812018-- /See:/ 'companionClickThroughOverride' smart constructor.

1201912019data CompanionClickThroughOverride = CompanionClickThroughOverride

12020− { _cctoCreativeId :: !(Maybe (JSONText Int64))

12020+ { _cctoCreativeId :: !(Maybe (Textual Int64))

1202112021 , _cctoClickThroughURL :: !(Maybe ClickThroughURL)

1202212022 } deriving (Eq,Show,Data,Typeable,Generic)

1202312023

@@ -12370,7 +12370,7 @@ instance ToJSON PopupWindowProperties where

1237012370-- /See:/ 'eventTagOverride' smart constructor.

1237112371data EventTagOverride = EventTagOverride

1237212372 { _etoEnabled :: !(Maybe Bool)

12373− , _etoId :: !(Maybe (JSONText Int64))

12373+ , _etoId :: !(Maybe (Textual Int64))

1237412374 } deriving (Eq,Show,Data,Typeable,Generic)

1237512375

1237612376-- | Creates a value of 'EventTagOverride' with the minimum fields required to make a request.

@@ -12424,7 +12424,7 @@ data OperatingSystemVersion = OperatingSystemVersion

1242412424 , _osvOperatingSystem :: !(Maybe OperatingSystem)

1242512425 , _osvMajorVersion :: !(Maybe Text)

1242612426 , _osvName :: !(Maybe Text)

12427− , _osvId :: !(Maybe (JSONText Int64))

12427+ , _osvId :: !(Maybe (Textual Int64))

1242812428 } deriving (Eq,Show,Data,Typeable,Generic)

1242912429

1243012430-- | Creates a value of 'OperatingSystemVersion' with the minimum fields required to make a request.

@@ -12520,9 +12520,9 @@ data AccountPermission = AccountPermission

1252012520 { _acccKind :: !Text

1252112521 , _acccAccountProFiles :: !(Maybe [AccountPermissionAccountProFilesItem])

1252212522 , _acccName :: !(Maybe Text)

12523− , _acccId :: !(Maybe (JSONText Int64))

12523+ , _acccId :: !(Maybe (Textual Int64))

1252412524 , _acccLevel :: !(Maybe AccountPermissionLevel)

12525− , _acccPermissionGroupId :: !(Maybe (JSONText Int64))

12525+ , _acccPermissionGroupId :: !(Maybe (Textual Int64))

1252612526 } deriving (Eq,Show,Data,Typeable,Generic)

1252712527

1252812528-- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.

@@ -12617,11 +12617,11 @@ data UserProFile = UserProFile

1261712617 { _upfEtag :: !(Maybe Text)

1261812618 , _upfKind :: !Text

1261912619 , _upfAccountName :: !(Maybe Text)

12620− , _upfProFileId :: !(Maybe (JSONText Int64))

12620+ , _upfProFileId :: !(Maybe (Textual Int64))

1262112621 , _upfUserName :: !(Maybe Text)

12622− , _upfAccountId :: !(Maybe (JSONText Int64))

12622+ , _upfAccountId :: !(Maybe (Textual Int64))

1262312623 , _upfSubAccountName :: !(Maybe Text)

12624− , _upfSubAccountId :: !(Maybe (JSONText Int64))

12624+ , _upfSubAccountId :: !(Maybe (Textual Int64))

1262512625 } deriving (Eq,Show,Data,Typeable,Generic)

1262612626

1262712627-- | Creates a value of 'UserProFile' with the minimum fields required to make a request.

@@ -12864,17 +12864,17 @@ instance ToJSON ReportDelivery where

1286412864--

1286512865-- /See:/ 'targetableRemarketingList' smart constructor.

1286612866data TargetableRemarketingList = TargetableRemarketingList

12867− { _trlListSize :: !(Maybe (JSONText Int64))

12868− , _trlLifeSpan :: !(Maybe (JSONText Int64))

12867+ { _trlListSize :: !(Maybe (Textual Int64))

12868+ , _trlLifeSpan :: !(Maybe (Textual Int64))

1286912869 , _trlKind :: !Text

12870− , _trlAdvertiserId :: !(Maybe (JSONText Int64))

12870+ , _trlAdvertiserId :: !(Maybe (Textual Int64))

1287112871 , _trlAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

1287212872 , _trlActive :: !(Maybe Bool)

12873− , _trlAccountId :: !(Maybe (JSONText Int64))

12873+ , _trlAccountId :: !(Maybe (Textual Int64))

1287412874 , _trlName :: !(Maybe Text)

1287512875 , _trlListSource :: !(Maybe TargetableRemarketingListListSource)

12876− , _trlId :: !(Maybe (JSONText Int64))

12877− , _trlSubAccountId :: !(Maybe (JSONText Int64))

12876+ , _trlId :: !(Maybe (Textual Int64))

12877+ , _trlSubAccountId :: !(Maybe (Textual Int64))

1287812878 , _trlDescription :: !(Maybe Text)

1287912879 } deriving (Eq,Show,Data,Typeable,Generic)

1288012880

@@ -13090,19 +13090,19 @@ instance ToJSON PostalCodesListResponse where

1309013090--

1309113091-- /See:/ 'changeLog' smart constructor.

1309213092data ChangeLog = ChangeLog

13093− { _chaUserProFileId :: !(Maybe (JSONText Int64))

13093+ { _chaUserProFileId :: !(Maybe (Textual Int64))

1309413094 , _chaObjectType :: !(Maybe Text)

1309513095 , _chaUserProFileName :: !(Maybe Text)

1309613096 , _chaKind :: !Text

13097− , _chaObjectId :: !(Maybe (JSONText Int64))

13097+ , _chaObjectId :: !(Maybe (Textual Int64))

1309813098 , _chaAction :: !(Maybe Text)

13099− , _chaTransactionId :: !(Maybe (JSONText Int64))

13099+ , _chaTransactionId :: !(Maybe (Textual Int64))

1310013100 , _chaOldValue :: !(Maybe Text)

13101− , _chaAccountId :: !(Maybe (JSONText Int64))

13101+ , _chaAccountId :: !(Maybe (Textual Int64))

1310213102 , _chaNewValue :: !(Maybe Text)

1310313103 , _chaFieldName :: !(Maybe Text)

13104− , _chaId :: !(Maybe (JSONText Int64))

13105− , _chaSubAccountId :: !(Maybe (JSONText Int64))

13104+ , _chaId :: !(Maybe (Textual Int64))

13105+ , _chaSubAccountId :: !(Maybe (Textual Int64))

1310613106 , _chaChangeTime :: !(Maybe DateTime')

1310713107 } deriving (Eq,Show,Data,Typeable,Generic)

1310813108

@@ -13286,9 +13286,9 @@ instance ToJSON ChangeLog where

1328613286-- /See:/ 'placementStrategy' smart constructor.

1328713287data PlacementStrategy = PlacementStrategy

1328813288 { _psKind :: !Text

13289− , _psAccountId :: !(Maybe (JSONText Int64))

13289+ , _psAccountId :: !(Maybe (Textual Int64))

1329013290 , _psName :: !(Maybe Text)

13291− , _psId :: !(Maybe (JSONText Int64))

13291+ , _psId :: !(Maybe (Textual Int64))

1329213292 } deriving (Eq,Show,Data,Typeable,Generic)

1329313293

1329413294-- | Creates a value of 'PlacementStrategy' with the minimum fields required to make a request.

@@ -13364,27 +13364,27 @@ data FloodlightActivity = FloodlightActivity

1336413364 , _faSecure :: !(Maybe Bool)

1336513365 , _faExpectedURL :: !(Maybe Text)

1336613366 , _faFloodlightActivityGroupTagString :: !(Maybe Text)

13367− , _faFloodlightConfigurationId :: !(Maybe (JSONText Int64))

13367+ , _faFloodlightConfigurationId :: !(Maybe (Textual Int64))

1336813368 , _faKind :: !Text

1336913369 , _faImageTagEnabled :: !(Maybe Bool)

13370− , _faAdvertiserId :: !(Maybe (JSONText Int64))

13370+ , _faAdvertiserId :: !(Maybe (Textual Int64))

1337113371 , _faAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

1337213372 , _faSSLCompliant :: !(Maybe Bool)

1337313373 , _faIdDimensionValue :: !(Maybe DimensionValue)

1337413374 , _faTagFormat :: !(Maybe FloodlightActivityTagFormat)

1337513375 , _faCacheBustingType :: !(Maybe FloodlightActivityCacheBustingType)

13376− , _faAccountId :: !(Maybe (JSONText Int64))

13376+ , _faAccountId :: !(Maybe (Textual Int64))

1337713377 , _faName :: !(Maybe Text)

1337813378 , _faPublisherTags :: !(Maybe [FloodlightActivityPublisherDynamicTag])

13379− , _faFloodlightActivityGroupId :: !(Maybe (JSONText Int64))

13379+ , _faFloodlightActivityGroupId :: !(Maybe (Textual Int64))

1338013380 , _faHidden :: !(Maybe Bool)

1338113381 , _faFloodlightActivityGroupType :: !(Maybe FloodlightActivityFloodlightActivityGroupType)

1338213382 , _faDefaultTags :: !(Maybe [FloodlightActivityDynamicTag])

1338313383 , _faFloodlightActivityGroupName :: !(Maybe Text)

13384− , _faId :: !(Maybe (JSONText Int64))

13384+ , _faId :: !(Maybe (Textual Int64))

1338513385 , _faSSLRequired :: !(Maybe Bool)

1338613386 , _faUserDefinedVariableTypes :: !(Maybe [FloodlightActivityUserDefinedVariableTypesItem])

13387− , _faSubAccountId :: !(Maybe (JSONText Int64))

13387+ , _faSubAccountId :: !(Maybe (Textual Int64))

1338813388 , _faNotes :: !(Maybe Text)

1338913389 , _faFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)

1339013390 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -13812,7 +13812,7 @@ instance ToJSON PlatformTypesListResponse where

1381213812--

1381313813-- /See:/ 'lastModifiedInfo' smart constructor.

1381413814newtype LastModifiedInfo = LastModifiedInfo

13815− { _lmiTime :: Maybe (JSONText Int64)

13815+ { _lmiTime :: Maybe (Textual Int64)

1381613816 } deriving (Eq,Show,Data,Typeable,Generic)

1381713817

1381813818-- | Creates a value of 'LastModifiedInfo' with the minimum fields required to make a request.

@@ -13899,7 +13899,7 @@ instance ToJSON TargetWindow where

1389913899data AccountPermissionGroup = AccountPermissionGroup

1390013900 { _apgpKind :: !Text

1390113901 , _apgpName :: !(Maybe Text)

13902− , _apgpId :: !(Maybe (JSONText Int64))

13902+ , _apgpId :: !(Maybe (Textual Int64))

1390313903 } deriving (Eq,Show,Data,Typeable,Generic)

1390413904

1390513905-- | Creates a value of 'AccountPermissionGroup' with the minimum fields required to make a request.

@@ -13956,19 +13956,19 @@ instance ToJSON AccountPermissionGroup where

1395613956--

1395713957-- /See:/ 'advertiser' smart constructor.

1395813958data Advertiser = Advertiser

13959− { _advdOriginalFloodlightConfigurationId :: !(Maybe (JSONText Int64))

13959+ { _advdOriginalFloodlightConfigurationId :: !(Maybe (Textual Int64))

1396013960 , _advdStatus :: !(Maybe AdvertiserStatus)

13961− , _advdFloodlightConfigurationId :: !(Maybe (JSONText Int64))

13961+ , _advdFloodlightConfigurationId :: !(Maybe (Textual Int64))

1396213962 , _advdKind :: !Text

1396313963 , _advdSuspended :: !(Maybe Bool)

1396413964 , _advdIdDimensionValue :: !(Maybe DimensionValue)

13965− , _advdAccountId :: !(Maybe (JSONText Int64))

13965+ , _advdAccountId :: !(Maybe (Textual Int64))

1396613966 , _advdDefaultEmail :: !(Maybe Text)

1396713967 , _advdName :: !(Maybe Text)

13968− , _advdAdvertiserGroupId :: !(Maybe (JSONText Int64))

13969− , _advdDefaultClickThroughEventTagId :: !(Maybe (JSONText Int64))

13970− , _advdId :: !(Maybe (JSONText Int64))

13971− , _advdSubAccountId :: !(Maybe (JSONText Int64))

13968+ , _advdAdvertiserGroupId :: !(Maybe (Textual Int64))

13969+ , _advdDefaultClickThroughEventTagId :: !(Maybe (Textual Int64))

13970+ , _advdId :: !(Maybe (Textual Int64))

13971+ , _advdSubAccountId :: !(Maybe (Textual Int64))

1397213972 , _advdFloodlightConfigurationIdDimensionValue :: !(Maybe DimensionValue)

1397313973 , _advdClickThroughURLSuffix :: !(Maybe Text)

1397413974 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -14193,14 +14193,14 @@ instance ToJSON Advertiser where

1419314193--

1419414194-- /See:/ 'userRole' smart constructor.

1419514195data UserRole = UserRole

14196− { _urParentUserRoleId :: !(Maybe (JSONText Int64))

14196+ { _urParentUserRoleId :: !(Maybe (Textual Int64))

1419714197 , _urKind :: !Text

1419814198 , _urDefaultUserRole :: !(Maybe Bool)

14199− , _urAccountId :: !(Maybe (JSONText Int64))

14199+ , _urAccountId :: !(Maybe (Textual Int64))

1420014200 , _urName :: !(Maybe Text)

14201− , _urId :: !(Maybe (JSONText Int64))

14201+ , _urId :: !(Maybe (Textual Int64))

1420214202 , _urPermissions :: !(Maybe [UserRolePermission])

14203− , _urSubAccountId :: !(Maybe (JSONText Int64))

14203+ , _urSubAccountId :: !(Maybe (Textual Int64))

1420414204 } deriving (Eq,Show,Data,Typeable,Generic)

1420514205

1420614206-- | Creates a value of 'UserRole' with the minimum fields required to make a request.

@@ -14390,9 +14390,9 @@ instance ToJSON DirectorySitesListResponse where

1439014390-- /See:/ 'pricingSchedulePricingPeriod' smart constructor.

1439114391data PricingSchedulePricingPeriod = PricingSchedulePricingPeriod

1439214392 { _psppEndDate :: !(Maybe Date')

14393− , _psppRateOrCostNanos :: !(Maybe (JSONText Int64))

14393+ , _psppRateOrCostNanos :: !(Maybe (Textual Int64))

1439414394 , _psppStartDate :: !(Maybe Date')

14395− , _psppUnits :: !(Maybe (JSONText Int64))

14395+ , _psppUnits :: !(Maybe (Textual Int64))

1439614396 , _psppPricingComment :: !(Maybe Text)

1439714397 } deriving (Eq,Show,Data,Typeable,Generic)

1439814398

@@ -14556,8 +14556,8 @@ data Region = Region

1455614556 , _regKind :: !Text

1455714557 , _regName :: !(Maybe Text)

1455814558 , _regCountryCode :: !(Maybe Text)

14559− , _regCountryDartId :: !(Maybe (JSONText Int64))

14560− , _regDartId :: !(Maybe (JSONText Int64))

14559+ , _regCountryDartId :: !(Maybe (Textual Int64))

14560+ , _regDartId :: !(Maybe (Textual Int64))

1456114561 } deriving (Eq,Show,Data,Typeable,Generic)

1456214562

1456314563-- | Creates a value of 'Region' with the minimum fields required to make a request.

@@ -14713,14 +14713,14 @@ instance ToJSON AdvertiserGroupsListResponse where

1471314713data CreativeAssignment = CreativeAssignment

1471414714 { _caCreativeGroupAssignments :: !(Maybe [CreativeGroupAssignment])

1471514715 , _caStartTime :: !(Maybe DateTime')

14716− , _caWeight :: !(Maybe (JSONText Int32))

14716+ , _caWeight :: !(Maybe (Textual Int32))

1471714717 , _caRichMediaExitOverrides :: !(Maybe [RichMediaExitOverride])

1471814718 , _caSSLCompliant :: !(Maybe Bool)

14719− , _caCreativeId :: !(Maybe (JSONText Int64))

14719+ , _caCreativeId :: !(Maybe (Textual Int64))

1472014720 , _caClickThroughURL :: !(Maybe ClickThroughURL)

1472114721 , _caApplyEventTags :: !(Maybe Bool)

1472214722 , _caActive :: !(Maybe Bool)

14723− , _caSequence :: !(Maybe (JSONText Int32))

14723+ , _caSequence :: !(Maybe (Textual Int32))

1472414724 , _caEndTime :: !(Maybe DateTime')

1472514725 , _caCompanionCreativeOverrides :: !(Maybe [CompanionClickThroughOverride])

1472614726 , _caCreativeIdDimensionValue :: !(Maybe DimensionValue)

@@ -15040,17 +15040,17 @@ data FloodlightConfiguration = FloodlightConfiguration

1504015040 , _fcInAppAttributionTrackingEnabled :: !(Maybe Bool)

1504115041 , _fcThirdPartyAuthenticationTokens :: !(Maybe [ThirdPartyAuthenticationToken])

1504215042 , _fcKind :: !Text

15043− , _fcAdvertiserId :: !(Maybe (JSONText Int64))

15043+ , _fcAdvertiserId :: !(Maybe (Textual Int64))

1504415044 , _fcAnalyticsDataSharingEnabled :: !(Maybe Bool)

1504515045 , _fcAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

1504615046 , _fcIdDimensionValue :: !(Maybe DimensionValue)

1504715047 , _fcLookbackConfiguration :: !(Maybe LookbackConfiguration)

15048− , _fcAccountId :: !(Maybe (JSONText Int64))

15049− , _fcId :: !(Maybe (JSONText Int64))

15048+ , _fcAccountId :: !(Maybe (Textual Int64))

15049+ , _fcId :: !(Maybe (Textual Int64))

1505015050 , _fcSSLRequired :: !(Maybe Bool)

1505115051 , _fcNATuralSearchConversionAttributionOption :: !(Maybe FloodlightConfigurationNATuralSearchConversionAttributionOption)

1505215052 , _fcUserDefinedVariableConfigurations :: !(Maybe [UserDefinedVariableConfiguration])

15053− , _fcSubAccountId :: !(Maybe (JSONText Int64))

15053+ , _fcSubAccountId :: !(Maybe (Textual Int64))

1505415054 , _fcFirstDayOfWeek :: !(Maybe FloodlightConfigurationFirstDayOfWeek)

1505515055 , _fcOmnitureSettings :: !(Maybe OmnitureSettings)

1505615056 , _fcStandardVariableTypes :: !(Maybe [FloodlightConfigurationStandardVariableTypesItem])

@@ -15460,7 +15460,7 @@ instance ToJSON CreativeFieldValuesListResponse where

1546015460-- /See:/ 'richMediaExitOverride' smart constructor.

1546115461data RichMediaExitOverride = RichMediaExitOverride

1546215462 { _rmeoUseCustomExitURL :: !(Maybe Bool)

15463− , _rmeoExitId :: !(Maybe (JSONText Int64))

15463+ , _rmeoExitId :: !(Maybe (Textual Int64))

1546415464 , _rmeoCustomExitURL :: !(Maybe Text)

1546515465 } deriving (Eq,Show,Data,Typeable,Generic)

1546615466

@@ -15695,13 +15695,13 @@ instance ToJSON PlacementsGenerateTagsResponse where

1569515695--

1569615696-- /See:/ 'creativeAsset' smart constructor.

1569715697data CreativeAsset = CreativeAsset

15698− { _caaZIndex :: !(Maybe (JSONText Int32))

15698+ { _caaZIndex :: !(Maybe (Textual Int32))

1569915699 , _caaPushdown :: !(Maybe Bool)

15700− , _caaVideoDuration :: !(Maybe (JSONText Float))

15700+ , _caaVideoDuration :: !(Maybe (Textual Double))

1570115701 , _caaOriginalBackup :: !(Maybe Bool)

1570215702 , _caaWindowMode :: !(Maybe CreativeAssetWindowMode)

15703− , _caaFlashVersion :: !(Maybe (JSONText Int32))

15704− , _caaPushdownDuration :: !(Maybe (JSONText Float))

15703+ , _caaFlashVersion :: !(Maybe (Textual Int32))

15704+ , _caaPushdownDuration :: !(Maybe (Textual Double))

1570515705 , _caaSize :: !(Maybe Size)

1570615706 , _caaVerticallyLocked :: !(Maybe Bool)

1570715707 , _caaOffSet :: !(Maybe OffSetPosition)

@@ -15710,7 +15710,7 @@ data CreativeAsset = CreativeAsset

1571015710 , _caaTransparency :: !(Maybe Bool)

1571115711 , _caaHideSelectionBoxes :: !(Maybe Bool)

1571215712 , _caaSSLCompliant :: !(Maybe Bool)

15713− , _caaFileSize :: !(Maybe (JSONText Int64))

15713+ , _caaFileSize :: !(Maybe (Textual Int64))

1571415714 , _caaAssetIdentifier :: !(Maybe CreativeAssetId)

1571515715 , _caaDurationType :: !(Maybe CreativeAssetDurationType)

1571615716 , _caaProgressiveServingURL :: !(Maybe Text)

@@ -15726,11 +15726,11 @@ data CreativeAsset = CreativeAsset

1572615726 , _caaDisplayType :: !(Maybe CreativeAssetDisplayType)

1572715727 , _caaChildAssetType :: !(Maybe CreativeAssetChildAssetType)

1572815728 , _caaCollapsedSize :: !(Maybe Size)

15729− , _caaId :: !(Maybe (JSONText Int64))

15730− , _caaBitRate :: !(Maybe (JSONText Int32))

15731− , _caaCustomStartTimeValue :: !(Maybe (JSONText Int32))

15729+ , _caaId :: !(Maybe (Textual Int64))

15730+ , _caaBitRate :: !(Maybe (Textual Int32))

15731+ , _caaCustomStartTimeValue :: !(Maybe (Textual Int32))

1573215732 , _caaStartTimeType :: !(Maybe CreativeAssetStartTimeType)

15733− , _caaDuration :: !(Maybe (JSONText Int32))

15733+ , _caaDuration :: !(Maybe (Textual Int32))

1573415734 , _caaArtworkType :: !(Maybe CreativeAssetArtworkType)

1573515735 , _caaHideFlashObjects :: !(Maybe Bool)

1573615736 , _caaDetectedFeatures :: !(Maybe [CreativeAssetDetectedFeaturesItem])

@@ -16378,7 +16378,7 @@ instance ToJSON PlacementsListResponse where

1637816378--

1637916379-- /See:/ 'reportSchedule' smart constructor.

1638016380data ReportSchedule = ReportSchedule

16381− { _rsEvery :: !(Maybe (JSONText Int32))

16381+ { _rsEvery :: !(Maybe (Textual Int32))

1638216382 , _rsActive :: !(Maybe Bool)

1638316383 , _rsRepeats :: !(Maybe Text)

1638416384 , _rsStartDate :: !(Maybe Date')

@@ -16830,11 +16830,11 @@ data Site = Site

1683016830 , _ssSiteSettings :: !(Maybe SiteSettings)

1683116831 , _ssIdDimensionValue :: !(Maybe DimensionValue)

1683216832 , _ssDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)

16833− , _ssAccountId :: !(Maybe (JSONText Int64))

16833+ , _ssAccountId :: !(Maybe (Textual Int64))

1683416834 , _ssName :: !(Maybe Text)

16835− , _ssDirectorySiteId :: !(Maybe (JSONText Int64))

16836− , _ssId :: !(Maybe (JSONText Int64))

16837− , _ssSubAccountId :: !(Maybe (JSONText Int64))

16835+ , _ssDirectorySiteId :: !(Maybe (Textual Int64))

16836+ , _ssId :: !(Maybe (Textual Int64))

16837+ , _ssSubAccountId :: !(Maybe (Textual Int64))

1683816838 , _ssApproved :: !(Maybe Bool)

1683916839 } deriving (Eq,Show,Data,Typeable,Generic)

1684016840

@@ -17305,23 +17305,23 @@ data Order = Order

1730517305 { _oSellerOrderId :: !(Maybe Text)

1730617306 , _oSellerOrganizationName :: !(Maybe Text)

1730717307 , _oKind :: !Text

17308− , _oAdvertiserId :: !(Maybe (JSONText Int64))

17309− , _oPlanningTermId :: !(Maybe (JSONText Int64))

17310− , _oAccountId :: !(Maybe (JSONText Int64))

17308+ , _oAdvertiserId :: !(Maybe (Textual Int64))

17309+ , _oPlanningTermId :: !(Maybe (Textual Int64))

17310+ , _oAccountId :: !(Maybe (Textual Int64))

1731117311 , _oName :: !(Maybe Text)

1731217312 , _oSiteNames :: !(Maybe [Text])

1731317313 , _oLastModifiedInfo :: !(Maybe LastModifiedInfo)

1731417314 , _oBuyerOrganizationName :: !(Maybe Text)

17315− , _oId :: !(Maybe (JSONText Int64))

17315+ , _oId :: !(Maybe (Textual Int64))

1731617316 , _oBuyerInvoiceId :: !(Maybe Text)

1731717317 , _oComments :: !(Maybe Text)

17318− , _oProjectId :: !(Maybe (JSONText Int64))

17319− , _oSubAccountId :: !(Maybe (JSONText Int64))

17318+ , _oProjectId :: !(Maybe (Textual Int64))

17319+ , _oSubAccountId :: !(Maybe (Textual Int64))

1732017320 , _oNotes :: !(Maybe Text)

1732117321 , _oContacts :: !(Maybe [OrderContact])

17322− , _oSiteId :: !(Maybe [JSONText Int64])

17322+ , _oSiteId :: !(Maybe [Textual Int64])

1732317323 , _oTermsAndConditions :: !(Maybe Text)

17324− , _oApproverUserProFileIds :: !(Maybe [JSONText Int64])

17324+ , _oApproverUserProFileIds :: !(Maybe [Textual Int64])

1732517325 } deriving (Eq,Show,Data,Typeable,Generic)

1732617326

1732717327-- | Creates a value of 'Order' with the minimum fields required to make a request.

@@ -17619,8 +17619,8 @@ instance ToJSON CreativeAssetId where

1761917619--

1762017620-- /See:/ 'frequencyCap' smart constructor.

1762117621data FrequencyCap = FrequencyCap

17622− { _fcImpressions :: !(Maybe (JSONText Int64))

17623− , _fcDuration :: !(Maybe (JSONText Int64))

17622+ { _fcImpressions :: !(Maybe (Textual Int64))

17623+ , _fcDuration :: !(Maybe (Textual Int64))

1762417624 } deriving (Eq,Show,Data,Typeable,Generic)

1762517625

1762617626-- | Creates a value of 'FrequencyCap' with the minimum fields required to make a request.

@@ -17678,11 +17678,11 @@ data File = File

1767817678 , _filEtag :: !(Maybe Text)

1767917679 , _filKind :: !Text

1768017680 , _filURLs :: !(Maybe FileURLs)

17681− , _filReportId :: !(Maybe (JSONText Int64))

17681+ , _filReportId :: !(Maybe (Textual Int64))

1768217682 , _filDateRange :: !(Maybe DateRange)

1768317683 , _filFormat :: !(Maybe FileFormat)

17684− , _filLastModifiedTime :: !(Maybe (JSONText Int64))

17685− , _filId :: !(Maybe (JSONText Int64))

17684+ , _filLastModifiedTime :: !(Maybe (Textual Int64))

17685+ , _filId :: !(Maybe (Textual Int64))

1768617686 , _filFileName :: !(Maybe Text)

1768717687 } deriving (Eq,Show,Data,Typeable,Generic)

1768817688

@@ -18199,7 +18199,7 @@ instance ToJSON OmnitureSettings where

1819918199data ConnectionType = ConnectionType

1820018200 { _cttKind :: !Text

1820118201 , _cttName :: !(Maybe Text)

18202− , _cttId :: !(Maybe (JSONText Int64))

18202+ , _cttId :: !(Maybe (Textual Int64))

1820318203 } deriving (Eq,Show,Data,Typeable,Generic)

1820418204

1820518205-- | Creates a value of 'ConnectionType' with the minimum fields required to make a request.

@@ -18255,31 +18255,31 @@ instance ToJSON ConnectionType where

1825518255--

1825618256-- /See:/ 'placementGroup' smart constructor.

1825718257data PlacementGroup = PlacementGroup

18258− { _plalPlacementStrategyId :: !(Maybe (JSONText Int64))

18258+ { _plalPlacementStrategyId :: !(Maybe (Textual Int64))

1825918259 , _plalSiteIdDimensionValue :: !(Maybe DimensionValue)

1826018260 , _plalPricingSchedule :: !(Maybe PricingSchedule)

1826118261 , _plalKind :: !Text

1826218262 , _plalCampaignIdDimensionValue :: !(Maybe DimensionValue)

18263− , _plalAdvertiserId :: !(Maybe (JSONText Int64))

18263+ , _plalAdvertiserId :: !(Maybe (Textual Int64))

1826418264 , _plalAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

18265− , _plalCampaignId :: !(Maybe (JSONText Int64))

18265+ , _plalCampaignId :: !(Maybe (Textual Int64))

1826618266 , _plalIdDimensionValue :: !(Maybe DimensionValue)

1826718267 , _plalPlacementGroupType :: !(Maybe PlacementGroupPlacementGroupType)

18268− , _plalContentCategoryId :: !(Maybe (JSONText Int64))

18268+ , _plalContentCategoryId :: !(Maybe (Textual Int64))

1826918269 , _plalDirectorySiteIdDimensionValue :: !(Maybe DimensionValue)

18270− , _plalAccountId :: !(Maybe (JSONText Int64))

18270+ , _plalAccountId :: !(Maybe (Textual Int64))

1827118271 , _plalName :: !(Maybe Text)

18272− , _plalDirectorySiteId :: !(Maybe (JSONText Int64))

18272+ , _plalDirectorySiteId :: !(Maybe (Textual Int64))

1827318273 , _plalCreateInfo :: !(Maybe LastModifiedInfo)

18274− , _plalChildPlacementIds :: !(Maybe [JSONText Int64])

18274+ , _plalChildPlacementIds :: !(Maybe [Textual Int64])

1827518275 , _plalLastModifiedInfo :: !(Maybe LastModifiedInfo)

18276− , _plalId :: !(Maybe (JSONText Int64))

18277− , _plalPrimaryPlacementId :: !(Maybe (JSONText Int64))

18278− , _plalSubAccountId :: !(Maybe (JSONText Int64))

18276+ , _plalId :: !(Maybe (Textual Int64))

18277+ , _plalPrimaryPlacementId :: !(Maybe (Textual Int64))

18278+ , _plalSubAccountId :: !(Maybe (Textual Int64))

1827918279 , _plalExternalId :: !(Maybe Text)

1828018280 , _plalComment :: !(Maybe Text)

1828118281 , _plalPrimaryPlacementIdDimensionValue :: !(Maybe DimensionValue)

18282− , _plalSiteId :: !(Maybe (JSONText Int64))

18282+ , _plalSiteId :: !(Maybe (Textual Int64))

1828318283 , _plalArchived :: !(Maybe Bool)

1828418284 } deriving (Eq,Show,Data,Typeable,Generic)

1828518285

@@ -18640,17 +18640,17 @@ data EventTag = EventTag

1864018640 , _etEnabledByDefault :: !(Maybe Bool)

1864118641 , _etKind :: !Text

1864218642 , _etCampaignIdDimensionValue :: !(Maybe DimensionValue)

18643− , _etAdvertiserId :: !(Maybe (JSONText Int64))

18643+ , _etAdvertiserId :: !(Maybe (Textual Int64))

1864418644 , _etURL :: !(Maybe Text)

1864518645 , _etAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

1864618646 , _etSSLCompliant :: !(Maybe Bool)

18647− , _etCampaignId :: !(Maybe (JSONText Int64))

18648− , _etAccountId :: !(Maybe (JSONText Int64))

18647+ , _etCampaignId :: !(Maybe (Textual Int64))

18648+ , _etAccountId :: !(Maybe (Textual Int64))

1864918649 , _etName :: !(Maybe Text)

18650− , _etURLEscapeLevels :: !(Maybe (JSONText Int32))

18651− , _etSiteIds :: !(Maybe [JSONText Int64])

18652− , _etId :: !(Maybe (JSONText Int64))

18653− , _etSubAccountId :: !(Maybe (JSONText Int64))

18650+ , _etURLEscapeLevels :: !(Maybe (Textual Int32))

18651+ , _etSiteIds :: !(Maybe [Textual Int64])

18652+ , _etId :: !(Maybe (Textual Int64))

18653+ , _etSubAccountId :: !(Maybe (Textual Int64))

1865418654 , _etType :: !(Maybe EventTagType)

1865518655 , _etSiteFilterType :: !(Maybe EventTagSiteFilterType)

1865618656 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -18897,8 +18897,8 @@ data UserRolePermission = UserRolePermission

1889718897 { _useKind :: !Text

1889818898 , _useAvailability :: !(Maybe UserRolePermissionAvailability)

1889918899 , _useName :: !(Maybe Text)

18900− , _useId :: !(Maybe (JSONText Int64))

18901− , _usePermissionGroupId :: !(Maybe (JSONText Int64))

18900+ , _useId :: !(Maybe (Textual Int64))

18901+ , _usePermissionGroupId :: !(Maybe (Textual Int64))

1890218902 } deriving (Eq,Show,Data,Typeable,Generic)

1890318903

1890418904-- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.

@@ -18977,7 +18977,7 @@ instance ToJSON UserRolePermission where

1897718977--

1897818978-- /See:/ 'orderContact' smart constructor.

1897918979data OrderContact = OrderContact

18980− { _ocSignatureUserProFileId :: !(Maybe (JSONText Int64))

18980+ { _ocSignatureUserProFileId :: !(Maybe (Textual Int64))

1898118981 , _ocContactName :: !(Maybe Text)

1898218982 , _ocContactTitle :: !(Maybe Text)

1898318983 , _ocContactType :: !(Maybe OrderContactContactType)

@@ -19124,7 +19124,7 @@ instance ToJSON

1912419124-- /See:/ 'directorySiteContactAssignment' smart constructor.

1912519125data DirectorySiteContactAssignment = DirectorySiteContactAssignment

1912619126 { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)

19127− , _dscaContactId :: !(Maybe (JSONText Int64))

19127+ , _dscaContactId :: !(Maybe (Textual Int64))

1912819128 } deriving (Eq,Show,Data,Typeable,Generic)

1912919129

1913019130-- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.

@@ -19177,10 +19177,10 @@ instance ToJSON DirectorySiteContactAssignment where

1917719177--

1917819178-- /See:/ 'adSlot' smart constructor.

1917919179data AdSlot = AdSlot

19180− { _assHeight :: !(Maybe (JSONText Int64))

19180+ { _assHeight :: !(Maybe (Textual Int64))

1918119181 , _assPaymentSourceType :: !(Maybe AdSlotPaymentSourceType)

19182− , _assLinkedPlacementId :: !(Maybe (JSONText Int64))

19183− , _assWidth :: !(Maybe (JSONText Int64))

19182+ , _assLinkedPlacementId :: !(Maybe (Textual Int64))

19183+ , _assWidth :: !(Maybe (Textual Int64))

1918419184 , _assPrimary :: !(Maybe Bool)

1918519185 , _assName :: !(Maybe Text)

1918619186 , _assComment :: !(Maybe Text)

@@ -19349,19 +19349,19 @@ instance ToJSON ThirdPartyTrackingURL where

1934919349data OrderDocument = OrderDocument

1935019350 { _odSigned :: !(Maybe Bool)

1935119351 , _odKind :: !Text

19352− , _odAdvertiserId :: !(Maybe (JSONText Int64))

19352+ , _odAdvertiserId :: !(Maybe (Textual Int64))

1935319353 , _odLastSentTime :: !(Maybe DateTime')

19354− , _odAmendedOrderDocumentId :: !(Maybe (JSONText Int64))

19354+ , _odAmendedOrderDocumentId :: !(Maybe (Textual Int64))

1935519355 , _odLastSentRecipients :: !(Maybe [Text])

1935619356 , _odEffectiveDate :: !(Maybe Date')

19357− , _odApprovedByUserProFileIds :: !(Maybe [JSONText Int64])

19358− , _odAccountId :: !(Maybe (JSONText Int64))

19359− , _odId :: !(Maybe (JSONText Int64))

19360− , _odProjectId :: !(Maybe (JSONText Int64))

19357+ , _odApprovedByUserProFileIds :: !(Maybe [Textual Int64])

19358+ , _odAccountId :: !(Maybe (Textual Int64))

19359+ , _odId :: !(Maybe (Textual Int64))

19360+ , _odProjectId :: !(Maybe (Textual Int64))

1936119361 , _odTitle :: !(Maybe Text)

19362− , _odSubAccountId :: !(Maybe (JSONText Int64))

19362+ , _odSubAccountId :: !(Maybe (Textual Int64))

1936319363 , _odType :: !(Maybe OrderDocumentType)

19364− , _odOrderId :: !(Maybe (JSONText Int64))

19364+ , _odOrderId :: !(Maybe (Textual Int64))

1936519365 , _odCancelled :: !(Maybe Bool)

1936619366 , _odCreatedInfo :: !(Maybe LastModifiedInfo)

1936719367 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -19586,9 +19586,9 @@ data Metro = Metro

1958619586 , _metKind :: !Text

1958719587 , _metName :: !(Maybe Text)

1958819588 , _metCountryCode :: !(Maybe Text)

19589− , _metDmaId :: !(Maybe (JSONText Int64))

19590− , _metCountryDartId :: !(Maybe (JSONText Int64))

19591− , _metDartId :: !(Maybe (JSONText Int64))

19589+ , _metDmaId :: !(Maybe (Textual Int64))

19590+ , _metCountryDartId :: !(Maybe (Textual Int64))

19591+ , _metDartId :: !(Maybe (Textual Int64))

1959219592 } deriving (Eq,Show,Data,Typeable,Generic)

1959319593

1959419594-- | Creates a value of 'Metro' with the minimum fields required to make a request.

@@ -19690,7 +19690,7 @@ instance ToJSON Metro where

1969019690-- /See:/ 'placement' smart constructor.

1969119691data Placement = Placement

1969219692 { _p1Status :: !(Maybe PlacementStatus)

19693− , _p1PlacementStrategyId :: !(Maybe (JSONText Int64))

19693+ , _p1PlacementStrategyId :: !(Maybe (Textual Int64))

1969419694 , _p1TagFormats :: !(Maybe [PlacementTagFormatsItem])

1969519695 , _p1SiteIdDimensionValue :: !(Maybe DimensionValue)

1969619696 , _p1PricingSchedule :: !(Maybe PricingSchedule)

@@ -19698,29 +19698,29 @@ data Placement = Placement

1969819698 , _p1Kind :: !Text

1969919699 , _p1KeyName :: !(Maybe Text)

1970019700 , _p1CampaignIdDimensionValue :: !(Maybe DimensionValue)

19701− , _p1AdvertiserId :: !(Maybe (JSONText Int64))

19701+ , _p1AdvertiserId :: !(Maybe (Textual Int64))

1970219702 , _p1AdvertiserIdDimensionValue :: !(Maybe DimensionValue)

19703− , _p1CampaignId :: !(Maybe (JSONText Int64))

19703+ , _p1CampaignId :: !(Maybe (Textual Int64))

1970419704 , _p1IdDimensionValue :: !(Maybe DimensionValue)

1970519705 , _p1Primary :: !(Maybe Bool)

1970619706 , _p1LookbackConfiguration :: !(Maybe LookbackConfiguration)

1970719707 , _p1TagSetting :: !(Maybe TagSetting)

19708− , _p1ContentCategoryId :: !(Maybe (JSONText Int64))

19708+ , _p1ContentCategoryId :: !(Maybe (Textual Int64))

1970919709 , _p1DirectorySiteIdDimensionValue :: !(Maybe DimensionValue)

19710− , _p1AccountId :: !(Maybe (JSONText Int64))

19710+ , _p1AccountId :: !(Maybe (Textual Int64))

1971119711 , _p1PaymentSource :: !(Maybe PlacementPaymentSource)

1971219712 , _p1Name :: !(Maybe Text)

19713− , _p1DirectorySiteId :: !(Maybe (JSONText Int64))

19713+ , _p1DirectorySiteId :: !(Maybe (Textual Int64))

1971419714 , _p1CreateInfo :: !(Maybe LastModifiedInfo)

1971519715 , _p1LastModifiedInfo :: !(Maybe LastModifiedInfo)

19716− , _p1Id :: !(Maybe (JSONText Int64))

19716+ , _p1Id :: !(Maybe (Textual Int64))

1971719717 , _p1SSLRequired :: !(Maybe Bool)

19718− , _p1SubAccountId :: !(Maybe (JSONText Int64))

19718+ , _p1SubAccountId :: !(Maybe (Textual Int64))

1971919719 , _p1PlacementGroupIdDimensionValue :: !(Maybe DimensionValue)

1972019720 , _p1ExternalId :: !(Maybe Text)

19721− , _p1PlacementGroupId :: !(Maybe (JSONText Int64))

19721+ , _p1PlacementGroupId :: !(Maybe (Textual Int64))

1972219722 , _p1Comment :: !(Maybe Text)

19723− , _p1SiteId :: !(Maybe (JSONText Int64))

19723+ , _p1SiteId :: !(Maybe (Textual Int64))

1972419724 , _p1Compatibility :: !(Maybe PlacementCompatibility)

1972519725 , _p1Archived :: !(Maybe Bool)

1972619726 , _p1PaymentApproved :: !(Maybe Bool)

@@ -20248,12 +20248,12 @@ instance ToJSON SitesListResponse where

2024820248-- /See:/ 'creativeField' smart constructor.

2024920249data CreativeField = CreativeField

2025020250 { _cffKind :: !Text

20251− , _cffAdvertiserId :: !(Maybe (JSONText Int64))

20251+ , _cffAdvertiserId :: !(Maybe (Textual Int64))

2025220252 , _cffAdvertiserIdDimensionValue :: !(Maybe DimensionValue)

20253− , _cffAccountId :: !(Maybe (JSONText Int64))

20253+ , _cffAccountId :: !(Maybe (Textual Int64))

2025420254 , _cffName :: !(Maybe Text)

20255− , _cffId :: !(Maybe (JSONText Int64))

20256− , _cffSubAccountId :: !(Maybe (JSONText Int64))

20255+ , _cffId :: !(Maybe (Textual Int64))

20256+ , _cffSubAccountId :: !(Maybe (Textual Int64))

2025720257 } deriving (Eq,Show,Data,Typeable,Generic)

2025820258

2025920259-- | Creates a value of 'CreativeField' with the minimum fields required to make a request.

@@ -20365,7 +20365,7 @@ instance ToJSON CreativeField where

2036520365-- /See:/ 'defaultClickThroughEventTagProperties' smart constructor.

2036620366data DefaultClickThroughEventTagProperties = DefaultClickThroughEventTagProperties

2036720367 { _dctetpOverrideInheritedEventTag :: !(Maybe Bool)

20368− , _dctetpDefaultClickThroughEventTagId :: !(Maybe (JSONText Int64))

20368+ , _dctetpDefaultClickThroughEventTagId :: !(Maybe (Textual Int64))

2036920369 } deriving (Eq,Show,Data,Typeable,Generic)

2037020370

2037120371-- | Creates a value of 'DefaultClickThroughEventTagProperties' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountActiveAdSummaries/Get.hs+4−4

@@ -46,9 +46,9 @@ type AccountActiveAdSummariesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountActiveAdSummaries" :>

51− Capture "summaryAccountId" (JSONText Int64) :>

51+ Capture "summaryAccountId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] AccountActiveAdSummary

5454

@@ -56,8 +56,8 @@ type AccountActiveAdSummariesGetResource =

5656--

5757-- /See:/ 'accountActiveAdSummariesGet' smart constructor.

5858data AccountActiveAdSummariesGet = AccountActiveAdSummariesGet

59− { _aaasgProFileId :: !(JSONText Int64)

60− , _aaasgSummaryAccountId :: !(JSONText Int64)

59+ { _aaasgProFileId :: !(Textual Int64)

60+ , _aaasgSummaryAccountId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'AccountActiveAdSummariesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/Get.hs+4−4

@@ -46,9 +46,9 @@ type AccountPermissionGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountPermissionGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] AccountPermissionGroup

5454

@@ -56,8 +56,8 @@ type AccountPermissionGroupsGetResource =

5656--

5757-- /See:/ 'accountPermissionGroupsGet' smart constructor.

5858data AccountPermissionGroupsGet = AccountPermissionGroupsGet

59− { _apggProFileId :: !(JSONText Int64)

60− , _apggId :: !(JSONText Int64)

59+ { _apggProFileId :: !(Textual Int64)

60+ , _apggId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'AccountPermissionGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissionGroups/List.hs+2−2

@@ -45,7 +45,7 @@ type AccountPermissionGroupsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "accountPermissionGroups" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] AccountPermissionGroupsListResponse

@@ -54,7 +54,7 @@ type AccountPermissionGroupsListResource =

5454--

5555-- /See:/ 'accountPermissionGroupsList' smart constructor.

5656newtype AccountPermissionGroupsList = AccountPermissionGroupsList

57− { _apglProFileId :: JSONText Int64

57+ { _apglProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'AccountPermissionGroupsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/Get.hs+4−4

@@ -46,9 +46,9 @@ type AccountPermissionsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountPermissions" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] AccountPermission

5454

@@ -56,8 +56,8 @@ type AccountPermissionsGetResource =

5656--

5757-- /See:/ 'accountPermissionsGet' smart constructor.

5858data AccountPermissionsGet = AccountPermissionsGet

59− { _apgProFileId :: !(JSONText Int64)

60− , _apgId :: !(JSONText Int64)

59+ { _apgProFileId :: !(Textual Int64)

60+ , _apgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'AccountPermissionsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountPermissions/List.hs+2−2

@@ -45,7 +45,7 @@ type AccountPermissionsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "accountPermissions" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] AccountPermissionsListResponse

@@ -54,7 +54,7 @@ type AccountPermissionsListResource =

5454--

5555-- /See:/ 'accountPermissionsList' smart constructor.

5656newtype AccountPermissionsList = AccountPermissionsList

57− { _aplProFileId :: JSONText Int64

57+ { _aplProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'AccountPermissionsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Get.hs+4−4

@@ -46,9 +46,9 @@ type AccountUserProFilesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountUserProfiles" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] AccountUserProFile

5454

@@ -56,8 +56,8 @@ type AccountUserProFilesGetResource =

5656--

5757-- /See:/ 'accountUserProFilesGet' smart constructor.

5858data AccountUserProFilesGet = AccountUserProFilesGet

59− { _aupfgProFileId :: !(JSONText Int64)

60− , _aupfgId :: !(JSONText Int64)

59+ { _aupfgProFileId :: !(Textual Int64)

60+ , _aupfgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'AccountUserProFilesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Insert.hs+2−2

@@ -46,7 +46,7 @@ type AccountUserProFilesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountUserProfiles" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] AccountUserProFile :>

@@ -56,7 +56,7 @@ type AccountUserProFilesInsertResource =

5656--

5757-- /See:/ 'accountUserProFilesInsert' smart constructor.

5858data AccountUserProFilesInsert = AccountUserProFilesInsert

59− { _aupfiProFileId :: !(JSONText Int64)

59+ { _aupfiProFileId :: !(Textual Int64)

6060 , _aupfiPayload :: !AccountUserProFile

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/List.hs+10−10

@@ -54,11 +54,11 @@ type AccountUserProFilesListResource =

5454 "dfareporting" :>

5555 "v2.2" :>

5656 "userprofiles" :>

57− Capture "profileId" (JSONText Int64) :>

57+ Capture "profileId" (Textual Int64) :>

5858 "accountUserProfiles" :>

59− QueryParam "userRoleId" (JSONText Int64) :>

59+ QueryParam "userRoleId" (Textual Int64) :>

6060 QueryParam "searchString" Text :>

61− QueryParams "ids" (JSONText Int64) :>

61+ QueryParams "ids" (Textual Int64) :>

6262 QueryParam "sortOrder"

6363 AccountUserProFilesListSortOrder

6464 :>

@@ -67,8 +67,8 @@ type AccountUserProFilesListResource =

6767 QueryParam "sortField"

6868 AccountUserProFilesListSortField

6969 :>

70− QueryParam "subaccountId" (JSONText Int64) :>

71− QueryParam "maxResults" (JSONText Int32) :>

70+ QueryParam "subaccountId" (Textual Int64) :>

71+ QueryParam "maxResults" (Textual Int32) :>

7272 QueryParam "alt" AltJSON :>

7373 Get '[JSON] AccountUserProFilesListResponse

7474

@@ -76,16 +76,16 @@ type AccountUserProFilesListResource =

7676--

7777-- /See:/ 'accountUserProFilesList' smart constructor.

7878data AccountUserProFilesList = AccountUserProFilesList

79− { _aupflUserRoleId :: !(Maybe (JSONText Int64))

79+ { _aupflUserRoleId :: !(Maybe (Textual Int64))

8080 , _aupflSearchString :: !(Maybe Text)

81− , _aupflIds :: !(Maybe [JSONText Int64])

82− , _aupflProFileId :: !(JSONText Int64)

81+ , _aupflIds :: !(Maybe [Textual Int64])

82+ , _aupflProFileId :: !(Textual Int64)

8383 , _aupflSortOrder :: !(Maybe AccountUserProFilesListSortOrder)

8484 , _aupflActive :: !(Maybe Bool)

8585 , _aupflPageToken :: !(Maybe Text)

8686 , _aupflSortField :: !(Maybe AccountUserProFilesListSortField)

87− , _aupflSubAccountId :: !(Maybe (JSONText Int64))

88− , _aupflMaxResults :: !(Maybe (JSONText Int32))

87+ , _aupflSubAccountId :: !(Maybe (Textual Int64))

88+ , _aupflMaxResults :: !(Maybe (Textual Int32))

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

9191-- | Creates a value of 'AccountUserProFilesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Patch.hs+4−4

@@ -48,9 +48,9 @@ type AccountUserProFilesPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "accountUserProfiles" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] AccountUserProFile :>

5656 Patch '[JSON] AccountUserProFile

@@ -60,9 +60,9 @@ type AccountUserProFilesPatchResource =

6060--

6161-- /See:/ 'accountUserProFilesPatch' smart constructor.

6262data AccountUserProFilesPatch = AccountUserProFilesPatch

63− { _aupfpProFileId :: !(JSONText Int64)

63+ { _aupfpProFileId :: !(Textual Int64)

6464 , _aupfpPayload :: !AccountUserProFile

65− , _aupfpId :: !(JSONText Int64)

65+ , _aupfpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'AccountUserProFilesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AccountUserProFiles/Update.hs+2−2

@@ -46,7 +46,7 @@ type AccountUserProFilesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accountUserProfiles" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] AccountUserProFile :>

@@ -56,7 +56,7 @@ type AccountUserProFilesUpdateResource =

5656--

5757-- /See:/ 'accountUserProFilesUpdate' smart constructor.

5858data AccountUserProFilesUpdate = AccountUserProFilesUpdate

59− { _aupfuProFileId :: !(JSONText Int64)

59+ { _aupfuProFileId :: !(Textual Int64)

6060 , _aupfuPayload :: !AccountUserProFile

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Get.hs+4−4

@@ -46,17 +46,17 @@ type AccountsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accounts" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Account

5353

5454-- | Gets one account by ID.

5555--

5656-- /See:/ 'accountsGet' smart constructor.

5757data AccountsGet = AccountsGet

58− { _aggProFileId :: !(JSONText Int64)

59− , _aggId :: !(JSONText Int64)

58+ { _aggProFileId :: !(Textual Int64)

59+ , _aggId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'AccountsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/List.hs+6−6

@@ -52,15 +52,15 @@ type AccountsListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "accounts" :>

5757 QueryParam "searchString" Text :>

58− QueryParams "ids" (JSONText Int64) :>

58+ QueryParams "ids" (Textual Int64) :>

5959 QueryParam "sortOrder" AccountsListSortOrder :>

6060 QueryParam "active" Bool :>

6161 QueryParam "pageToken" Text :>

6262 QueryParam "sortField" AccountsListSortField :>

63− QueryParam "maxResults" (JSONText Int32) :>

63+ QueryParam "maxResults" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :>

6565 Get '[JSON] AccountsListResponse

6666

@@ -69,13 +69,13 @@ type AccountsListResource =

6969-- /See:/ 'accountsList' smart constructor.

7070data AccountsList = AccountsList

7171 { _accSearchString :: !(Maybe Text)

72− , _accIds :: !(Maybe [JSONText Int64])

73− , _accProFileId :: !(JSONText Int64)

72+ , _accIds :: !(Maybe [Textual Int64])

73+ , _accProFileId :: !(Textual Int64)

7474 , _accSortOrder :: !(Maybe AccountsListSortOrder)

7575 , _accActive :: !(Maybe Bool)

7676 , _accPageToken :: !(Maybe Text)

7777 , _accSortField :: !(Maybe AccountsListSortField)

78− , _accMaxResults :: !(Maybe (JSONText Int32))

78+ , _accMaxResults :: !(Maybe (Textual Int32))

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

8181-- | Creates a value of 'AccountsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Patch.hs+4−4

@@ -47,9 +47,9 @@ type AccountsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "accounts" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Account :> Patch '[JSON] Account

5555

@@ -57,9 +57,9 @@ type AccountsPatchResource =

5757--

5858-- /See:/ 'accountsPatch' smart constructor.

5959data AccountsPatch = AccountsPatch

60− { _appProFileId :: !(JSONText Int64)

60+ { _appProFileId :: !(Textual Int64)

6161 , _appPayload :: !Account

62− , _appId :: !(JSONText Int64)

62+ , _appId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'AccountsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Accounts/Update.hs+2−2

@@ -46,7 +46,7 @@ type AccountsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "accounts" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Account :> Put '[JSON] Account

@@ -55,7 +55,7 @@ type AccountsUpdateResource =

5555--

5656-- /See:/ 'accountsUpdate' smart constructor.

5757data AccountsUpdate = AccountsUpdate

58− { _auuProFileId :: !(JSONText Int64)

58+ { _auuProFileId :: !(Textual Int64)

5959 , _auuPayload :: !Account

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Get.hs+4−4

@@ -46,17 +46,17 @@ type AdsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "ads" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Ad

5353

5454-- | Gets one ad by ID.

5555--

5656-- /See:/ 'adsGet' smart constructor.

5757data AdsGet = AdsGet

58− { _adsProFileId :: !(JSONText Int64)

59− , _adsId :: !(JSONText Int64)

58+ { _adsProFileId :: !(Textual Int64)

59+ , _adsId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'AdsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Insert.hs+2−2

@@ -46,7 +46,7 @@ type AdsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "ads" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Ad :> Post '[JSON] Ad

@@ -55,7 +55,7 @@ type AdsInsertResource =

5555--

5656-- /See:/ 'adsInsert' smart constructor.

5757data AdsInsert = AdsInsert

58− { _aiProFileId :: !(JSONText Int64)

58+ { _aiProFileId :: !(Textual Int64)

5959 , _aiPayload :: !Ad

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/List.hs+26−26

@@ -69,29 +69,29 @@ type AdsListResource =

6969 "dfareporting" :>

7070 "v2.2" :>

7171 "userprofiles" :>

72− Capture "profileId" (JSONText Int64) :>

72+ Capture "profileId" (Textual Int64) :>

7373 "ads" :>

74− QueryParams "remarketingListIds" (JSONText Int64) :>

75− QueryParams "landingPageIds" (JSONText Int64) :>

76− QueryParams "creativeIds" (JSONText Int64) :>

77− QueryParam "advertiserId" (JSONText Int64) :>

78− QueryParams "campaignIds" (JSONText Int64) :>

74+ QueryParams "remarketingListIds" (Textual Int64) :>

75+ QueryParams "landingPageIds" (Textual Int64) :>

76+ QueryParams "creativeIds" (Textual Int64) :>

77+ QueryParam "advertiserId" (Textual Int64) :>

78+ QueryParams "campaignIds" (Textual Int64) :>

7979 QueryParam "searchString" Text :>

80− QueryParams "sizeIds" (JSONText Int64) :>

80+ QueryParams "sizeIds" (Textual Int64) :>

8181 QueryParam "sslCompliant" Bool :>

82− QueryParams "ids" (JSONText Int64) :>

82+ QueryParams "ids" (Textual Int64) :>

8383 QueryParam "sortOrder" AdsListSortOrder :>

8484 QueryParam "active" Bool :>

8585 QueryParams

8686 "creativeOptimizationConfigurationIds"

87− (JSONText Int64)

87+ (Textual Int64)

8888 :>

8989 QueryParams "placementIds"

90− (JSONText Int64)

90+ (Textual Int64)

9191 :>

9292 QueryParam "sslRequired" Bool :>

9393 QueryParam "overriddenEventTagId"

94− (JSONText Int64)

94+ (Textual Int64)

9595 :>

9696 QueryParam "pageToken" Text :>

9797 QueryParam "sortField"

@@ -115,11 +115,11 @@ type AdsListResource =

115115 :>

116116 QueryParam

117117 "maxResults"

118− (JSONText Int32)

118+ (Textual Int32)

119119 :>

120120 QueryParams

121121 "audienceSegmentIds"

122− (JSONText Int64)

122+ (Textual Int64)

123123 :>

124124 QueryParam "alt"

125125 AltJSON

@@ -131,22 +131,22 @@ type AdsListResource =

131131--

132132-- /See:/ 'adsList' smart constructor.

133133data AdsList = AdsList

134− { _alRemarketingListIds :: !(Maybe [JSONText Int64])

135− , _alLandingPageIds :: !(Maybe [JSONText Int64])

136− , _alCreativeIds :: !(Maybe [JSONText Int64])

137− , _alAdvertiserId :: !(Maybe (JSONText Int64))

138− , _alCampaignIds :: !(Maybe [JSONText Int64])

134+ { _alRemarketingListIds :: !(Maybe [Textual Int64])

135+ , _alLandingPageIds :: !(Maybe [Textual Int64])

136+ , _alCreativeIds :: !(Maybe [Textual Int64])

137+ , _alAdvertiserId :: !(Maybe (Textual Int64))

138+ , _alCampaignIds :: !(Maybe [Textual Int64])

139139 , _alSearchString :: !(Maybe Text)

140− , _alSizeIds :: !(Maybe [JSONText Int64])

140+ , _alSizeIds :: !(Maybe [Textual Int64])

141141 , _alSSLCompliant :: !(Maybe Bool)

142− , _alIds :: !(Maybe [JSONText Int64])

143− , _alProFileId :: !(JSONText Int64)

142+ , _alIds :: !(Maybe [Textual Int64])

143+ , _alProFileId :: !(Textual Int64)

144144 , _alSortOrder :: !(Maybe AdsListSortOrder)

145145 , _alActive :: !(Maybe Bool)

146− , _alCreativeOptimizationConfigurationIds :: !(Maybe [JSONText Int64])

147− , _alPlacementIds :: !(Maybe [JSONText Int64])

146+ , _alCreativeOptimizationConfigurationIds :: !(Maybe [Textual Int64])

147+ , _alPlacementIds :: !(Maybe [Textual Int64])

148148 , _alSSLRequired :: !(Maybe Bool)

149− , _alOverriddenEventTagId :: !(Maybe (JSONText Int64))

149+ , _alOverriddenEventTagId :: !(Maybe (Textual Int64))

150150 , _alPageToken :: !(Maybe Text)

151151 , _alSortField :: !(Maybe AdsListSortField)

152152 , _alType :: !(Maybe [AdsListType])

@@ -154,8 +154,8 @@ data AdsList = AdsList

154154 , _alDynamicClickTracker :: !(Maybe Bool)

155155 , _alCompatibility :: !(Maybe AdsListCompatibility)

156156 , _alArchived :: !(Maybe Bool)

157− , _alMaxResults :: !(Maybe (JSONText Int32))

158− , _alAudienceSegmentIds :: !(Maybe [JSONText Int64])

157+ , _alMaxResults :: !(Maybe (Textual Int32))

158+ , _alAudienceSegmentIds :: !(Maybe [Textual Int64])

159159 } deriving (Eq,Show,Data,Typeable,Generic)

160160

161161-- | Creates a value of 'AdsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Patch.hs+4−4

@@ -47,9 +47,9 @@ type AdsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "ads" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Ad :> Patch '[JSON] Ad

5555

@@ -57,9 +57,9 @@ type AdsPatchResource =

5757--

5858-- /See:/ 'adsPatch' smart constructor.

5959data AdsPatch = AdsPatch

60− { _adsdProFileId :: !(JSONText Int64)

60+ { _adsdProFileId :: !(Textual Int64)

6161 , _adsdPayload :: !Ad

62− , _adsdId :: !(JSONText Int64)

62+ , _adsdId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'AdsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Ads/Update.hs+2−2

@@ -46,7 +46,7 @@ type AdsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "ads" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Ad :> Put '[JSON] Ad

@@ -55,7 +55,7 @@ type AdsUpdateResource =

5555--

5656-- /See:/ 'adsUpdate' smart constructor.

5757data AdsUpdate = AdsUpdate

58− { _aProFileId :: !(JSONText Int64)

58+ { _aProFileId :: !(Textual Int64)

5959 , _aPayload :: !Ad

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Delete.hs+4−4

@@ -46,17 +46,17 @@ type AdvertiserGroupsDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertiserGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing advertiser group.

5555--

5656-- /See:/ 'advertiserGroupsDelete' smart constructor.

5757data AdvertiserGroupsDelete = AdvertiserGroupsDelete

58− { _agdProFileId :: !(JSONText Int64)

59− , _agdId :: !(JSONText Int64)

58+ { _agdProFileId :: !(Textual Int64)

59+ , _agdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'AdvertiserGroupsDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Get.hs+4−4

@@ -46,9 +46,9 @@ type AdvertiserGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertiserGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] AdvertiserGroup

5454

@@ -56,8 +56,8 @@ type AdvertiserGroupsGetResource =

5656--

5757-- /See:/ 'advertiserGroupsGet' smart constructor.

5858data AdvertiserGroupsGet = AdvertiserGroupsGet

59− { _agggProFileId :: !(JSONText Int64)

60− , _agggId :: !(JSONText Int64)

59+ { _agggProFileId :: !(Textual Int64)

60+ , _agggId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'AdvertiserGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Insert.hs+2−2

@@ -46,7 +46,7 @@ type AdvertiserGroupsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertiserGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] AdvertiserGroup :>

@@ -56,7 +56,7 @@ type AdvertiserGroupsInsertResource =

5656--

5757-- /See:/ 'advertiserGroupsInsert' smart constructor.

5858data AdvertiserGroupsInsert = AdvertiserGroupsInsert

59− { _agiProFileId :: !(JSONText Int64)

59+ { _agiProFileId :: !(Textual Int64)

6060 , _agiPayload :: !AdvertiserGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/List.hs+6−6

@@ -51,16 +51,16 @@ type AdvertiserGroupsListResource =

5151 "dfareporting" :>

5252 "v2.2" :>

5353 "userprofiles" :>

54− Capture "profileId" (JSONText Int64) :>

54+ Capture "profileId" (Textual Int64) :>

5555 "advertiserGroups" :>

5656 QueryParam "searchString" Text :>

57− QueryParams "ids" (JSONText Int64) :>

57+ QueryParams "ids" (Textual Int64) :>

5858 QueryParam "sortOrder" AdvertiserGroupsListSortOrder

5959 :>

6060 QueryParam "pageToken" Text :>

6161 QueryParam "sortField" AdvertiserGroupsListSortField

6262 :>

63− QueryParam "maxResults" (JSONText Int32) :>

63+ QueryParam "maxResults" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :>

6565 Get '[JSON] AdvertiserGroupsListResponse

6666

@@ -69,12 +69,12 @@ type AdvertiserGroupsListResource =

6969-- /See:/ 'advertiserGroupsList' smart constructor.

7070data AdvertiserGroupsList = AdvertiserGroupsList

7171 { _aglSearchString :: !(Maybe Text)

72− , _aglIds :: !(Maybe [JSONText Int64])

73− , _aglProFileId :: !(JSONText Int64)

72+ , _aglIds :: !(Maybe [Textual Int64])

73+ , _aglProFileId :: !(Textual Int64)

7474 , _aglSortOrder :: !(Maybe AdvertiserGroupsListSortOrder)

7575 , _aglPageToken :: !(Maybe Text)

7676 , _aglSortField :: !(Maybe AdvertiserGroupsListSortField)

77− , _aglMaxResults :: !(Maybe (JSONText Int32))

77+ , _aglMaxResults :: !(Maybe (Textual Int32))

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

8080-- | Creates a value of 'AdvertiserGroupsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Patch.hs+4−4

@@ -48,9 +48,9 @@ type AdvertiserGroupsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "advertiserGroups" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] AdvertiserGroup :>

5656 Patch '[JSON] AdvertiserGroup

@@ -60,9 +60,9 @@ type AdvertiserGroupsPatchResource =

6060--

6161-- /See:/ 'advertiserGroupsPatch' smart constructor.

6262data AdvertiserGroupsPatch = AdvertiserGroupsPatch

63− { _agpProFileId :: !(JSONText Int64)

63+ { _agpProFileId :: !(Textual Int64)

6464 , _agpPayload :: !AdvertiserGroup

65− , _agpId :: !(JSONText Int64)

65+ , _agpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'AdvertiserGroupsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/AdvertiserGroups/Update.hs+2−2

@@ -46,7 +46,7 @@ type AdvertiserGroupsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertiserGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] AdvertiserGroup :>

@@ -56,7 +56,7 @@ type AdvertiserGroupsUpdateResource =

5656--

5757-- /See:/ 'advertiserGroupsUpdate' smart constructor.

5858data AdvertiserGroupsUpdate = AdvertiserGroupsUpdate

59− { _aguProFileId :: !(JSONText Int64)

59+ { _aguProFileId :: !(Textual Int64)

6060 , _aguPayload :: !AdvertiserGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Get.hs+4−4

@@ -46,17 +46,17 @@ type AdvertisersGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertisers" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Advertiser

5353

5454-- | Gets one advertiser by ID.

5555--

5656-- /See:/ 'advertisersGet' smart constructor.

5757data AdvertisersGet = AdvertisersGet

58− { _advProFileId :: !(JSONText Int64)

59− , _advId :: !(JSONText Int64)

58+ { _advProFileId :: !(Textual Int64)

59+ , _advId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'AdvertisersGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Insert.hs+2−2

@@ -46,7 +46,7 @@ type AdvertisersInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertisers" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Advertiser :> Post '[JSON] Advertiser

@@ -55,7 +55,7 @@ type AdvertisersInsertResource =

5555--

5656-- /See:/ 'advertisersInsert' smart constructor.

5757data AdvertisersInsert = AdvertisersInsert

58− { _aiiProFileId :: !(JSONText Int64)

58+ { _aiiProFileId :: !(Textual Int64)

5959 , _aiiPayload :: !Advertiser

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/List.hs+12−12

@@ -57,24 +57,24 @@ type AdvertisersListResource =

5757 "dfareporting" :>

5858 "v2.2" :>

5959 "userprofiles" :>

60− Capture "profileId" (JSONText Int64) :>

60+ Capture "profileId" (Textual Int64) :>

6161 "advertisers" :>

6262 QueryParam "status" AdvertisersListStatus :>

6363 QueryParam "onlyParent" Bool :>

6464 QueryParam "searchString" Text :>

65− QueryParams "ids" (JSONText Int64) :>

65+ QueryParams "ids" (Textual Int64) :>

6666 QueryParam "includeAdvertisersWithoutGroupsOnly" Bool

6767 :>

6868 QueryParam "sortOrder" AdvertisersListSortOrder :>

69− QueryParams "advertiserGroupIds" (JSONText Int64) :>

69+ QueryParams "advertiserGroupIds" (Textual Int64) :>

7070 QueryParam "pageToken" Text :>

7171 QueryParam "sortField" AdvertisersListSortField

7272 :>

73− QueryParam "subaccountId" (JSONText Int64) :>

73+ QueryParam "subaccountId" (Textual Int64) :>

7474 QueryParams "floodlightConfigurationIds"

75− (JSONText Int64)

75+ (Textual Int64)

7676 :>

77− QueryParam "maxResults" (JSONText Int32) :>

77+ QueryParam "maxResults" (Textual Int32) :>

7878 QueryParam "alt" AltJSON :>

7979 Get '[JSON] AdvertisersListResponse

8080

@@ -85,16 +85,16 @@ data AdvertisersList = AdvertisersList

8585 { _allStatus :: !(Maybe AdvertisersListStatus)

8686 , _allOnlyParent :: !(Maybe Bool)

8787 , _allSearchString :: !(Maybe Text)

88− , _allIds :: !(Maybe [JSONText Int64])

88+ , _allIds :: !(Maybe [Textual Int64])

8989 , _allIncludeAdvertisersWithoutGroupsOnly :: !(Maybe Bool)

90− , _allProFileId :: !(JSONText Int64)

90+ , _allProFileId :: !(Textual Int64)

9191 , _allSortOrder :: !(Maybe AdvertisersListSortOrder)

92− , _allAdvertiserGroupIds :: !(Maybe [JSONText Int64])

92+ , _allAdvertiserGroupIds :: !(Maybe [Textual Int64])

9393 , _allPageToken :: !(Maybe Text)

9494 , _allSortField :: !(Maybe AdvertisersListSortField)

95− , _allSubAccountId :: !(Maybe (JSONText Int64))

96− , _allFloodlightConfigurationIds :: !(Maybe [JSONText Int64])

97− , _allMaxResults :: !(Maybe (JSONText Int32))

95+ , _allSubAccountId :: !(Maybe (Textual Int64))

96+ , _allFloodlightConfigurationIds :: !(Maybe [Textual Int64])

97+ , _allMaxResults :: !(Maybe (Textual Int32))

9898 } deriving (Eq,Show,Data,Typeable,Generic)

9999

100100-- | Creates a value of 'AdvertisersList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Patch.hs+4−4

@@ -47,9 +47,9 @@ type AdvertisersPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "advertisers" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Advertiser :>

5555 Patch '[JSON] Advertiser

@@ -58,9 +58,9 @@ type AdvertisersPatchResource =

5858--

5959-- /See:/ 'advertisersPatch' smart constructor.

6060data AdvertisersPatch = AdvertisersPatch

61− { _apProFileId :: !(JSONText Int64)

61+ { _apProFileId :: !(Textual Int64)

6262 , _apPayload :: !Advertiser

63− , _apId :: !(JSONText Int64)

63+ , _apId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'AdvertisersPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Advertisers/Update.hs+2−2

@@ -46,7 +46,7 @@ type AdvertisersUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "advertisers" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Advertiser :> Put '[JSON] Advertiser

@@ -55,7 +55,7 @@ type AdvertisersUpdateResource =

5555--

5656-- /See:/ 'advertisersUpdate' smart constructor.

5757data AdvertisersUpdate = AdvertisersUpdate

58− { _auProFileId :: !(JSONText Int64)

58+ { _auProFileId :: !(Textual Int64)

5959 , _auPayload :: !Advertiser

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Browsers/List.hs+2−2

@@ -45,7 +45,7 @@ type BrowsersListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "browsers" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] BrowsersListResponse

@@ -54,7 +54,7 @@ type BrowsersListResource =

5454--

5555-- /See:/ 'browsersList' smart constructor.

5656newtype BrowsersList = BrowsersList

57− { _blProFileId :: JSONText Int64

57+ { _blProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'BrowsersList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/Insert.hs+4−4

@@ -49,9 +49,9 @@ type CampaignCreativeAssociationsInsertResource =

4949 "dfareporting" :>

5050 "v2.2" :>

5151 "userprofiles" :>

52− Capture "profileId" (JSONText Int64) :>

52+ Capture "profileId" (Textual Int64) :>

5353 "campaigns" :>

54− Capture "campaignId" (JSONText Int64) :>

54+ Capture "campaignId" (Textual Int64) :>

5555 "campaignCreativeAssociations" :>

5656 QueryParam "alt" AltJSON :>

5757 ReqBody '[JSON] CampaignCreativeAssociation :>

@@ -63,8 +63,8 @@ type CampaignCreativeAssociationsInsertResource =

6363--

6464-- /See:/ 'campaignCreativeAssociationsInsert' smart constructor.

6565data CampaignCreativeAssociationsInsert = CampaignCreativeAssociationsInsert

66− { _ccaiCampaignId :: !(JSONText Int64)

67− , _ccaiProFileId :: !(JSONText Int64)

66+ { _ccaiCampaignId :: !(Textual Int64)

67+ , _ccaiProFileId :: !(Textual Int64)

6868 , _ccaiPayload :: !CampaignCreativeAssociation

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CampaignCreativeAssociations/List.hs+6−6

@@ -50,15 +50,15 @@ type CampaignCreativeAssociationsListResource =

5050 "dfareporting" :>

5151 "v2.2" :>

5252 "userprofiles" :>

53− Capture "profileId" (JSONText Int64) :>

53+ Capture "profileId" (Textual Int64) :>

5454 "campaigns" :>

55− Capture "campaignId" (JSONText Int64) :>

55+ Capture "campaignId" (Textual Int64) :>

5656 "campaignCreativeAssociations" :>

5757 QueryParam "sortOrder"

5858 CampaignCreativeAssociationsListSortOrder

5959 :>

6060 QueryParam "pageToken" Text :>

61− QueryParam "maxResults" (JSONText Int32) :>

61+ QueryParam "maxResults" (Textual Int32) :>

6262 QueryParam "alt" AltJSON :>

6363 Get '[JSON] CampaignCreativeAssociationsListResponse

6464

@@ -67,11 +67,11 @@ type CampaignCreativeAssociationsListResource =

6767--

6868-- /See:/ 'campaignCreativeAssociationsList' smart constructor.

6969data CampaignCreativeAssociationsList = CampaignCreativeAssociationsList

70− { _ccalCampaignId :: !(JSONText Int64)

71− , _ccalProFileId :: !(JSONText Int64)

70+ { _ccalCampaignId :: !(Textual Int64)

71+ , _ccalProFileId :: !(Textual Int64)

7272 , _ccalSortOrder :: !(Maybe CampaignCreativeAssociationsListSortOrder)

7373 , _ccalPageToken :: !(Maybe Text)

74− , _ccalMaxResults :: !(Maybe (JSONText Int32))

74+ , _ccalMaxResults :: !(Maybe (Textual Int32))

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

7777-- | Creates a value of 'CampaignCreativeAssociationsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Get.hs+4−4

@@ -46,17 +46,17 @@ type CampaignsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "campaigns" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Campaign

5353

5454-- | Gets one campaign by ID.

5555--

5656-- /See:/ 'campaignsGet' smart constructor.

5757data CampaignsGet = CampaignsGet

58− { _cggProFileId :: !(JSONText Int64)

59− , _cggId :: !(JSONText Int64)

58+ { _cggProFileId :: !(Textual Int64)

59+ , _cggId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CampaignsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Insert.hs+2−2

@@ -48,7 +48,7 @@ type CampaignsInsertResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "campaigns" :>

5353 QueryParam "defaultLandingPageName" Text :>

5454 QueryParam "defaultLandingPageUrl" Text :>

@@ -59,7 +59,7 @@ type CampaignsInsertResource =

5959--

6060-- /See:/ 'campaignsInsert' smart constructor.

6161data CampaignsInsert = CampaignsInsert

62− { _camProFileId :: !(JSONText Int64)

62+ { _camProFileId :: !(Textual Int64)

6363 , _camPayload :: !Campaign

6464 , _camDefaultLandingPageURL :: !Text

6565 , _camDefaultLandingPageName :: !Text

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/List.hs+16−16

@@ -58,22 +58,22 @@ type CampaignsListResource =

5858 "dfareporting" :>

5959 "v2.2" :>

6060 "userprofiles" :>

61− Capture "profileId" (JSONText Int64) :>

61+ Capture "profileId" (Textual Int64) :>

6262 "campaigns" :>

63− QueryParams "excludedIds" (JSONText Int64) :>

63+ QueryParams "excludedIds" (Textual Int64) :>

6464 QueryParam "searchString" Text :>

65− QueryParams "ids" (JSONText Int64) :>

65+ QueryParams "ids" (Textual Int64) :>

6666 QueryParam "sortOrder" CampaignsListSortOrder :>

67− QueryParams "advertiserGroupIds" (JSONText Int64) :>

67+ QueryParams "advertiserGroupIds" (Textual Int64) :>

6868 QueryParam "atLeastOneOptimizationActivity" Bool :>

69− QueryParam "overriddenEventTagId" (JSONText Int64) :>

69+ QueryParam "overriddenEventTagId" (Textual Int64) :>

7070 QueryParam "pageToken" Text :>

7171 QueryParam "sortField" CampaignsListSortField :>

72− QueryParam "subaccountId" (JSONText Int64) :>

73− QueryParams "advertiserIds" (JSONText Int64)

72+ QueryParam "subaccountId" (Textual Int64) :>

73+ QueryParams "advertiserIds" (Textual Int64)

7474 :>

7575 QueryParam "archived" Bool :>

76− QueryParam "maxResults" (JSONText Int32)

76+ QueryParam "maxResults" (Textual Int32)

7777 :>

7878 QueryParam "alt" AltJSON :>

7979 Get '[JSON] CampaignsListResponse

@@ -82,20 +82,20 @@ type CampaignsListResource =

8282--

8383-- /See:/ 'campaignsList' smart constructor.

8484data CampaignsList = CampaignsList

85− { _clExcludedIds :: !(Maybe [JSONText Int64])

85+ { _clExcludedIds :: !(Maybe [Textual Int64])

8686 , _clSearchString :: !(Maybe Text)

87− , _clIds :: !(Maybe [JSONText Int64])

88− , _clProFileId :: !(JSONText Int64)

87+ , _clIds :: !(Maybe [Textual Int64])

88+ , _clProFileId :: !(Textual Int64)

8989 , _clSortOrder :: !(Maybe CampaignsListSortOrder)

90− , _clAdvertiserGroupIds :: !(Maybe [JSONText Int64])

90+ , _clAdvertiserGroupIds :: !(Maybe [Textual Int64])

9191 , _clAtLeastOneOptimizationActivity :: !(Maybe Bool)

92− , _clOverriddenEventTagId :: !(Maybe (JSONText Int64))

92+ , _clOverriddenEventTagId :: !(Maybe (Textual Int64))

9393 , _clPageToken :: !(Maybe Text)

9494 , _clSortField :: !(Maybe CampaignsListSortField)

95− , _clSubAccountId :: !(Maybe (JSONText Int64))

96− , _clAdvertiserIds :: !(Maybe [JSONText Int64])

95+ , _clSubAccountId :: !(Maybe (Textual Int64))

96+ , _clAdvertiserIds :: !(Maybe [Textual Int64])

9797 , _clArchived :: !(Maybe Bool)

98− , _clMaxResults :: !(Maybe (JSONText Int32))

98+ , _clMaxResults :: !(Maybe (Textual Int32))

9999 } deriving (Eq,Show,Data,Typeable,Generic)

100100

101101-- | Creates a value of 'CampaignsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Patch.hs+4−4

@@ -47,9 +47,9 @@ type CampaignsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "campaigns" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Campaign :> Patch '[JSON] Campaign

5555

@@ -57,9 +57,9 @@ type CampaignsPatchResource =

5757--

5858-- /See:/ 'campaignsPatch' smart constructor.

5959data CampaignsPatch = CampaignsPatch

60− { _cpProFileId :: !(JSONText Int64)

60+ { _cpProFileId :: !(Textual Int64)

6161 , _cpPayload :: !Campaign

62− , _cpId :: !(JSONText Int64)

62+ , _cpId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'CampaignsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Campaigns/Update.hs+2−2

@@ -46,7 +46,7 @@ type CampaignsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "campaigns" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Campaign :> Put '[JSON] Campaign

@@ -55,7 +55,7 @@ type CampaignsUpdateResource =

5555--

5656-- /See:/ 'campaignsUpdate' smart constructor.

5757data CampaignsUpdate = CampaignsUpdate

58− { _cuProFileId :: !(JSONText Int64)

58+ { _cuProFileId :: !(Textual Int64)

5959 , _cuPayload :: !Campaign

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/Get.hs+4−4

@@ -46,17 +46,17 @@ type ChangeLogsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "changeLogs" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] ChangeLog

5353

5454-- | Gets one change log by ID.

5555--

5656-- /See:/ 'changeLogsGet' smart constructor.

5757data ChangeLogsGet = ChangeLogsGet

58− { _clgProFileId :: !(JSONText Int64)

59− , _clgId :: !(JSONText Int64)

58+ { _clgProFileId :: !(Textual Int64)

59+ , _clgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'ChangeLogsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ChangeLogs/List.hs+10−10

@@ -55,18 +55,18 @@ type ChangeLogsListResource =

5555 "dfareporting" :>

5656 "v2.2" :>

5757 "userprofiles" :>

58− Capture "profileId" (JSONText Int64) :>

58+ Capture "profileId" (Textual Int64) :>

5959 "changeLogs" :>

60− QueryParams "userProfileIds" (JSONText Int64) :>

60+ QueryParams "userProfileIds" (Textual Int64) :>

6161 QueryParam "objectType" ChangeLogsListObjectType :>

6262 QueryParam "searchString" Text :>

63− QueryParams "ids" (JSONText Int64) :>

63+ QueryParams "ids" (Textual Int64) :>

6464 QueryParam "action" ChangeLogsListAction :>

6565 QueryParam "minChangeTime" Text :>

6666 QueryParam "maxChangeTime" Text :>

6767 QueryParam "pageToken" Text :>

68− QueryParams "objectIds" (JSONText Int64) :>

69− QueryParam "maxResults" (JSONText Int32) :>

68+ QueryParams "objectIds" (Textual Int64) :>

69+ QueryParam "maxResults" (Textual Int32) :>

7070 QueryParam "alt" AltJSON :>

7171 Get '[JSON] ChangeLogsListResponse

7272

@@ -74,17 +74,17 @@ type ChangeLogsListResource =

7474--

7575-- /See:/ 'changeLogsList' smart constructor.

7676data ChangeLogsList = ChangeLogsList

77− { _cllUserProFileIds :: !(Maybe [JSONText Int64])

77+ { _cllUserProFileIds :: !(Maybe [Textual Int64])

7878 , _cllObjectType :: !(Maybe ChangeLogsListObjectType)

7979 , _cllSearchString :: !(Maybe Text)

80− , _cllIds :: !(Maybe [JSONText Int64])

81− , _cllProFileId :: !(JSONText Int64)

80+ , _cllIds :: !(Maybe [Textual Int64])

81+ , _cllProFileId :: !(Textual Int64)

8282 , _cllAction :: !(Maybe ChangeLogsListAction)

8383 , _cllMinChangeTime :: !(Maybe Text)

8484 , _cllMaxChangeTime :: !(Maybe Text)

8585 , _cllPageToken :: !(Maybe Text)

86− , _cllObjectIds :: !(Maybe [JSONText Int64])

87− , _cllMaxResults :: !(Maybe (JSONText Int32))

86+ , _cllObjectIds :: !(Maybe [Textual Int64])

87+ , _cllMaxResults :: !(Maybe (Textual Int32))

8888 } deriving (Eq,Show,Data,Typeable,Generic)

8989

9090-- | Creates a value of 'ChangeLogsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Cities/List.hs+8−8

@@ -49,12 +49,12 @@ type CitiesListResource =

4949 "dfareporting" :>

5050 "v2.2" :>

5151 "userprofiles" :>

52− Capture "profileId" (JSONText Int64) :>

52+ Capture "profileId" (Textual Int64) :>

5353 "cities" :>

54− QueryParams "regionDartIds" (JSONText Int64) :>

54+ QueryParams "regionDartIds" (Textual Int64) :>

5555 QueryParam "namePrefix" Text :>

56− QueryParams "countryDartIds" (JSONText Int64) :>

57− QueryParams "dartIds" (JSONText Int64) :>

56+ QueryParams "countryDartIds" (Textual Int64) :>

57+ QueryParams "dartIds" (Textual Int64) :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] CitiesListResponse

6060

@@ -62,11 +62,11 @@ type CitiesListResource =

6262--

6363-- /See:/ 'citiesList' smart constructor.

6464data CitiesList = CitiesList

65− { _citRegionDartIds :: !(Maybe [JSONText Int64])

66− , _citProFileId :: !(JSONText Int64)

65+ { _citRegionDartIds :: !(Maybe [Textual Int64])

66+ , _citProFileId :: !(Textual Int64)

6767 , _citNamePrefix :: !(Maybe Text)

68− , _citCountryDartIds :: !(Maybe [JSONText Int64])

69− , _citDartIds :: !(Maybe [JSONText Int64])

68+ , _citCountryDartIds :: !(Maybe [Textual Int64])

69+ , _citDartIds :: !(Maybe [Textual Int64])

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'CitiesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/Get.hs+4−4

@@ -46,9 +46,9 @@ type ConnectionTypesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "connectionTypes" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] ConnectionType

5454

@@ -56,8 +56,8 @@ type ConnectionTypesGetResource =

5656--

5757-- /See:/ 'connectionTypesGet' smart constructor.

5858data ConnectionTypesGet = ConnectionTypesGet

59− { _ctgProFileId :: !(JSONText Int64)

60− , _ctgId :: !(JSONText Int64)

59+ { _ctgProFileId :: !(Textual Int64)

60+ , _ctgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'ConnectionTypesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ConnectionTypes/List.hs+2−2

@@ -45,7 +45,7 @@ type ConnectionTypesListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "connectionTypes" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] ConnectionTypesListResponse

@@ -54,7 +54,7 @@ type ConnectionTypesListResource =

5454--

5555-- /See:/ 'connectionTypesList' smart constructor.

5656newtype ConnectionTypesList = ConnectionTypesList

57− { _ctlProFileId :: JSONText Int64

57+ { _ctlProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'ConnectionTypesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Delete.hs+4−4

@@ -46,17 +46,17 @@ type ContentCategoriesDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "contentCategories" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing content category.

5555--

5656-- /See:/ 'contentCategoriesDelete' smart constructor.

5757data ContentCategoriesDelete = ContentCategoriesDelete

58− { _ccdProFileId :: !(JSONText Int64)

59− , _ccdId :: !(JSONText Int64)

58+ { _ccdProFileId :: !(Textual Int64)

59+ , _ccdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'ContentCategoriesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Get.hs+4−4

@@ -46,9 +46,9 @@ type ContentCategoriesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "contentCategories" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] ContentCategory

5454

@@ -56,8 +56,8 @@ type ContentCategoriesGetResource =

5656--

5757-- /See:/ 'contentCategoriesGet' smart constructor.

5858data ContentCategoriesGet = ContentCategoriesGet

59− { _ccgProFileId :: !(JSONText Int64)

60− , _ccgId :: !(JSONText Int64)

59+ { _ccgProFileId :: !(Textual Int64)

60+ , _ccgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'ContentCategoriesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Insert.hs+2−2

@@ -46,7 +46,7 @@ type ContentCategoriesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "contentCategories" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] ContentCategory :>

@@ -56,7 +56,7 @@ type ContentCategoriesInsertResource =

5656--

5757-- /See:/ 'contentCategoriesInsert' smart constructor.

5858data ContentCategoriesInsert = ContentCategoriesInsert

59− { _cciProFileId :: !(JSONText Int64)

59+ { _cciProFileId :: !(Textual Int64)

6060 , _cciPayload :: !ContentCategory

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/List.hs+6−6

@@ -51,16 +51,16 @@ type ContentCategoriesListResource =

5151 "dfareporting" :>

5252 "v2.2" :>

5353 "userprofiles" :>

54− Capture "profileId" (JSONText Int64) :>

54+ Capture "profileId" (Textual Int64) :>

5555 "contentCategories" :>

5656 QueryParam "searchString" Text :>

57− QueryParams "ids" (JSONText Int64) :>

57+ QueryParams "ids" (Textual Int64) :>

5858 QueryParam "sortOrder" ContentCategoriesListSortOrder

5959 :>

6060 QueryParam "pageToken" Text :>

6161 QueryParam "sortField" ContentCategoriesListSortField

6262 :>

63− QueryParam "maxResults" (JSONText Int32) :>

63+ QueryParam "maxResults" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :>

6565 Get '[JSON] ContentCategoriesListResponse

6666

@@ -69,12 +69,12 @@ type ContentCategoriesListResource =

6969-- /See:/ 'contentCategoriesList' smart constructor.

7070data ContentCategoriesList = ContentCategoriesList

7171 { _cclSearchString :: !(Maybe Text)

72− , _cclIds :: !(Maybe [JSONText Int64])

73− , _cclProFileId :: !(JSONText Int64)

72+ , _cclIds :: !(Maybe [Textual Int64])

73+ , _cclProFileId :: !(Textual Int64)

7474 , _cclSortOrder :: !(Maybe ContentCategoriesListSortOrder)

7575 , _cclPageToken :: !(Maybe Text)

7676 , _cclSortField :: !(Maybe ContentCategoriesListSortField)

77− , _cclMaxResults :: !(Maybe (JSONText Int32))

77+ , _cclMaxResults :: !(Maybe (Textual Int32))

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

8080-- | Creates a value of 'ContentCategoriesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Patch.hs+4−4

@@ -48,9 +48,9 @@ type ContentCategoriesPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "contentCategories" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] ContentCategory :>

5656 Patch '[JSON] ContentCategory

@@ -60,9 +60,9 @@ type ContentCategoriesPatchResource =

6060--

6161-- /See:/ 'contentCategoriesPatch' smart constructor.

6262data ContentCategoriesPatch = ContentCategoriesPatch

63− { _ccpProFileId :: !(JSONText Int64)

63+ { _ccpProFileId :: !(Textual Int64)

6464 , _ccpPayload :: !ContentCategory

65− , _ccpId :: !(JSONText Int64)

65+ , _ccpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'ContentCategoriesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/ContentCategories/Update.hs+2−2

@@ -46,7 +46,7 @@ type ContentCategoriesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "contentCategories" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] ContentCategory :>

@@ -56,7 +56,7 @@ type ContentCategoriesUpdateResource =

5656--

5757-- /See:/ 'contentCategoriesUpdate' smart constructor.

5858data ContentCategoriesUpdate = ContentCategoriesUpdate

59− { _ccuProFileId :: !(JSONText Int64)

59+ { _ccuProFileId :: !(Textual Int64)

6060 , _ccuPayload :: !ContentCategory

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/Get.hs+4−4

@@ -46,17 +46,17 @@ type CountriesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "countries" :>

51− Capture "dartId" (JSONText Int64) :>

51+ Capture "dartId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Country

5353

5454-- | Gets one country by ID.

5555--

5656-- /See:/ 'countriesGet' smart constructor.

5757data CountriesGet = CountriesGet

58− { _cgProFileId :: !(JSONText Int64)

59− , _cgDartId :: !(JSONText Int64)

58+ { _cgProFileId :: !(Textual Int64)

59+ , _cgDartId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CountriesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Countries/List.hs+2−2

@@ -45,7 +45,7 @@ type CountriesListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "countries" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] CountriesListResponse

@@ -54,7 +54,7 @@ type CountriesListResource =

5454--

5555-- /See:/ 'countriesList' smart constructor.

5656newtype CountriesList = CountriesList

57− { _couProFileId :: JSONText Int64

57+ { _couProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'CountriesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeAssets/Insert.hs+6−6

@@ -47,9 +47,9 @@ type CreativeAssetsInsertResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creativeAssets" :>

52− Capture "advertiserId" (JSONText Int64) :>

52+ Capture "advertiserId" (Textual Int64) :>

5353 "creativeAssets" :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] CreativeAssetMetadata :>

@@ -59,9 +59,9 @@ type CreativeAssetsInsertResource =

5959 "dfareporting" :>

6060 "v2.2" :>

6161 "userprofiles" :>

62− Capture "profileId" (JSONText Int64) :>

62+ Capture "profileId" (Textual Int64) :>

6363 "creativeAssets" :>

64− Capture "advertiserId" (JSONText Int64) :>

64+ Capture "advertiserId" (Textual Int64) :>

6565 "creativeAssets" :>

6666 QueryParam "alt" AltJSON :>

6767 QueryParam "uploadType" AltMedia :>

@@ -73,8 +73,8 @@ type CreativeAssetsInsertResource =

7373--

7474-- /See:/ 'creativeAssetsInsert' smart constructor.

7575data CreativeAssetsInsert = CreativeAssetsInsert

76− { _caiAdvertiserId :: !(JSONText Int64)

77− , _caiProFileId :: !(JSONText Int64)

76+ { _caiAdvertiserId :: !(Textual Int64)

77+ , _caiProFileId :: !(Textual Int64)

7878 , _caiPayload :: !CreativeAssetMetadata

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Delete.hs+6−6

@@ -47,20 +47,20 @@ type CreativeFieldValuesDeleteResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creativeFields" :>

52− Capture "creativeFieldId" (JSONText Int64) :>

52+ Capture "creativeFieldId" (Textual Int64) :>

5353 "creativeFieldValues" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5656

5757-- | Deletes an existing creative field value.

5858--

5959-- /See:/ 'creativeFieldValuesDelete' smart constructor.

6060data CreativeFieldValuesDelete = CreativeFieldValuesDelete

61− { _cfvdCreativeFieldId :: !(JSONText Int64)

62− , _cfvdProFileId :: !(JSONText Int64)

63− , _cfvdId :: !(JSONText Int64)

61+ { _cfvdCreativeFieldId :: !(Textual Int64)

62+ , _cfvdProFileId :: !(Textual Int64)

63+ , _cfvdId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'CreativeFieldValuesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Get.hs+6−6

@@ -47,11 +47,11 @@ type CreativeFieldValuesGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creativeFields" :>

52− Capture "creativeFieldId" (JSONText Int64) :>

52+ Capture "creativeFieldId" (Textual Int64) :>

5353 "creativeFieldValues" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :>

5656 Get '[JSON] CreativeFieldValue

5757

@@ -59,9 +59,9 @@ type CreativeFieldValuesGetResource =

5959--

6060-- /See:/ 'creativeFieldValuesGet' smart constructor.

6161data CreativeFieldValuesGet = CreativeFieldValuesGet

62− { _cfvgCreativeFieldId :: !(JSONText Int64)

63− , _cfvgProFileId :: !(JSONText Int64)

64− , _cfvgId :: !(JSONText Int64)

62+ { _cfvgCreativeFieldId :: !(Textual Int64)

63+ , _cfvgProFileId :: !(Textual Int64)

64+ , _cfvgId :: !(Textual Int64)

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

6767-- | Creates a value of 'CreativeFieldValuesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Insert.hs+4−4

@@ -47,9 +47,9 @@ type CreativeFieldValuesInsertResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creativeFields" :>

52− Capture "creativeFieldId" (JSONText Int64) :>

52+ Capture "creativeFieldId" (Textual Int64) :>

5353 "creativeFieldValues" :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] CreativeFieldValue :>

@@ -59,8 +59,8 @@ type CreativeFieldValuesInsertResource =

5959--

6060-- /See:/ 'creativeFieldValuesInsert' smart constructor.

6161data CreativeFieldValuesInsert = CreativeFieldValuesInsert

62− { _cfviCreativeFieldId :: !(JSONText Int64)

63− , _cfviProFileId :: !(JSONText Int64)

62+ { _cfviCreativeFieldId :: !(Textual Int64)

63+ , _cfviProFileId :: !(Textual Int64)

6464 , _cfviPayload :: !CreativeFieldValue

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/List.hs+8−8

@@ -52,12 +52,12 @@ type CreativeFieldValuesListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "creativeFields" :>

57− Capture "creativeFieldId" (JSONText Int64) :>

57+ Capture "creativeFieldId" (Textual Int64) :>

5858 "creativeFieldValues" :>

5959 QueryParam "searchString" Text :>

60− QueryParams "ids" (JSONText Int64) :>

60+ QueryParams "ids" (Textual Int64) :>

6161 QueryParam "sortOrder"

6262 CreativeFieldValuesListSortOrder

6363 :>

@@ -65,7 +65,7 @@ type CreativeFieldValuesListResource =

6565 QueryParam "sortField"

6666 CreativeFieldValuesListSortField

6767 :>

68− QueryParam "maxResults" (JSONText Int32) :>

68+ QueryParam "maxResults" (Textual Int32) :>

6969 QueryParam "alt" AltJSON :>

7070 Get '[JSON] CreativeFieldValuesListResponse

7171

@@ -73,14 +73,14 @@ type CreativeFieldValuesListResource =

7373--

7474-- /See:/ 'creativeFieldValuesList' smart constructor.

7575data CreativeFieldValuesList = CreativeFieldValuesList

76− { _cfvlCreativeFieldId :: !(JSONText Int64)

76+ { _cfvlCreativeFieldId :: !(Textual Int64)

7777 , _cfvlSearchString :: !(Maybe Text)

78− , _cfvlIds :: !(Maybe [JSONText Int64])

79− , _cfvlProFileId :: !(JSONText Int64)

78+ , _cfvlIds :: !(Maybe [Textual Int64])

79+ , _cfvlProFileId :: !(Textual Int64)

8080 , _cfvlSortOrder :: !(Maybe CreativeFieldValuesListSortOrder)

8181 , _cfvlPageToken :: !(Maybe Text)

8282 , _cfvlSortField :: !(Maybe CreativeFieldValuesListSortField)

83− , _cfvlMaxResults :: !(Maybe (JSONText Int32))

83+ , _cfvlMaxResults :: !(Maybe (Textual Int32))

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

8686-- | Creates a value of 'CreativeFieldValuesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Patch.hs+6−6

@@ -49,11 +49,11 @@ type CreativeFieldValuesPatchResource =

4949 "dfareporting" :>

5050 "v2.2" :>

5151 "userprofiles" :>

52− Capture "profileId" (JSONText Int64) :>

52+ Capture "profileId" (Textual Int64) :>

5353 "creativeFields" :>

54− Capture "creativeFieldId" (JSONText Int64) :>

54+ Capture "creativeFieldId" (Textual Int64) :>

5555 "creativeFieldValues" :>

56− QueryParam "id" (JSONText Int64) :>

56+ QueryParam "id" (Textual Int64) :>

5757 QueryParam "alt" AltJSON :>

5858 ReqBody '[JSON] CreativeFieldValue :>

5959 Patch '[JSON] CreativeFieldValue

@@ -63,10 +63,10 @@ type CreativeFieldValuesPatchResource =

6363--

6464-- /See:/ 'creativeFieldValuesPatch' smart constructor.

6565data CreativeFieldValuesPatch = CreativeFieldValuesPatch

66− { _cfvpCreativeFieldId :: !(JSONText Int64)

67− , _cfvpProFileId :: !(JSONText Int64)

66+ { _cfvpCreativeFieldId :: !(Textual Int64)

67+ , _cfvpProFileId :: !(Textual Int64)

6868 , _cfvpPayload :: !CreativeFieldValue

69− , _cfvpId :: !(JSONText Int64)

69+ , _cfvpId :: !(Textual Int64)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'CreativeFieldValuesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFieldValues/Update.hs+4−4

@@ -47,9 +47,9 @@ type CreativeFieldValuesUpdateResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creativeFields" :>

52− Capture "creativeFieldId" (JSONText Int64) :>

52+ Capture "creativeFieldId" (Textual Int64) :>

5353 "creativeFieldValues" :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] CreativeFieldValue :>

@@ -59,8 +59,8 @@ type CreativeFieldValuesUpdateResource =

5959--

6060-- /See:/ 'creativeFieldValuesUpdate' smart constructor.

6161data CreativeFieldValuesUpdate = CreativeFieldValuesUpdate

62− { _cfvuCreativeFieldId :: !(JSONText Int64)

63− , _cfvuProFileId :: !(JSONText Int64)

62+ { _cfvuCreativeFieldId :: !(Textual Int64)

63+ , _cfvuProFileId :: !(Textual Int64)

6464 , _cfvuPayload :: !CreativeFieldValue

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Delete.hs+4−4

@@ -46,17 +46,17 @@ type CreativeFieldsDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeFields" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing creative field.

5555--

5656-- /See:/ 'creativeFieldsDelete' smart constructor.

5757data CreativeFieldsDelete = CreativeFieldsDelete

58− { _cfdProFileId :: !(JSONText Int64)

59− , _cfdId :: !(JSONText Int64)

58+ { _cfdProFileId :: !(Textual Int64)

59+ , _cfdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CreativeFieldsDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Get.hs+4−4

@@ -46,17 +46,17 @@ type CreativeFieldsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeFields" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] CreativeField

5353

5454-- | Gets one creative field by ID.

5555--

5656-- /See:/ 'creativeFieldsGet' smart constructor.

5757data CreativeFieldsGet = CreativeFieldsGet

58− { _cfgProFileId :: !(JSONText Int64)

59− , _cfgId :: !(JSONText Int64)

58+ { _cfgProFileId :: !(Textual Int64)

59+ , _cfgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CreativeFieldsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Insert.hs+2−2

@@ -46,7 +46,7 @@ type CreativeFieldsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeFields" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] CreativeField :>

@@ -56,7 +56,7 @@ type CreativeFieldsInsertResource =

5656--

5757-- /See:/ 'creativeFieldsInsert' smart constructor.

5858data CreativeFieldsInsert = CreativeFieldsInsert

59− { _cfiProFileId :: !(JSONText Int64)

59+ { _cfiProFileId :: !(Textual Int64)

6060 , _cfiPayload :: !CreativeField

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/List.hs+8−8

@@ -52,15 +52,15 @@ type CreativeFieldsListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "creativeFields" :>

5757 QueryParam "searchString" Text :>

58− QueryParams "ids" (JSONText Int64) :>

58+ QueryParams "ids" (Textual Int64) :>

5959 QueryParam "sortOrder" CreativeFieldsListSortOrder :>

6060 QueryParam "pageToken" Text :>

6161 QueryParam "sortField" CreativeFieldsListSortField :>

62− QueryParams "advertiserIds" (JSONText Int64) :>

63− QueryParam "maxResults" (JSONText Int32) :>

62+ QueryParams "advertiserIds" (Textual Int64) :>

63+ QueryParam "maxResults" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :>

6565 Get '[JSON] CreativeFieldsListResponse

6666

@@ -69,13 +69,13 @@ type CreativeFieldsListResource =

6969-- /See:/ 'creativeFieldsList' smart constructor.

7070data CreativeFieldsList = CreativeFieldsList

7171 { _cflSearchString :: !(Maybe Text)

72− , _cflIds :: !(Maybe [JSONText Int64])

73− , _cflProFileId :: !(JSONText Int64)

72+ , _cflIds :: !(Maybe [Textual Int64])

73+ , _cflProFileId :: !(Textual Int64)

7474 , _cflSortOrder :: !(Maybe CreativeFieldsListSortOrder)

7575 , _cflPageToken :: !(Maybe Text)

7676 , _cflSortField :: !(Maybe CreativeFieldsListSortField)

77− , _cflAdvertiserIds :: !(Maybe [JSONText Int64])

78− , _cflMaxResults :: !(Maybe (JSONText Int32))

77+ , _cflAdvertiserIds :: !(Maybe [Textual Int64])

78+ , _cflMaxResults :: !(Maybe (Textual Int32))

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

8181-- | Creates a value of 'CreativeFieldsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Patch.hs+4−4

@@ -48,9 +48,9 @@ type CreativeFieldsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "creativeFields" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] CreativeField :>

5656 Patch '[JSON] CreativeField

@@ -60,9 +60,9 @@ type CreativeFieldsPatchResource =

6060--

6161-- /See:/ 'creativeFieldsPatch' smart constructor.

6262data CreativeFieldsPatch = CreativeFieldsPatch

63− { _cfpProFileId :: !(JSONText Int64)

63+ { _cfpProFileId :: !(Textual Int64)

6464 , _cfpPayload :: !CreativeField

65− , _cfpId :: !(JSONText Int64)

65+ , _cfpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'CreativeFieldsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeFields/Update.hs+2−2

@@ -46,7 +46,7 @@ type CreativeFieldsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeFields" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] CreativeField :>

@@ -56,7 +56,7 @@ type CreativeFieldsUpdateResource =

5656--

5757-- /See:/ 'creativeFieldsUpdate' smart constructor.

5858data CreativeFieldsUpdate = CreativeFieldsUpdate

59− { _cfuProFileId :: !(JSONText Int64)

59+ { _cfuProFileId :: !(Textual Int64)

6060 , _cfuPayload :: !CreativeField

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Get.hs+4−4

@@ -46,17 +46,17 @@ type CreativeGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] CreativeGroup

5353

5454-- | Gets one creative group by ID.

5555--

5656-- /See:/ 'creativeGroupsGet' smart constructor.

5757data CreativeGroupsGet = CreativeGroupsGet

58− { _cgggProFileId :: !(JSONText Int64)

59− , _cgggId :: !(JSONText Int64)

58+ { _cgggProFileId :: !(Textual Int64)

59+ , _cgggId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CreativeGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Insert.hs+2−2

@@ -46,7 +46,7 @@ type CreativeGroupsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] CreativeGroup :>

@@ -56,7 +56,7 @@ type CreativeGroupsInsertResource =

5656--

5757-- /See:/ 'creativeGroupsInsert' smart constructor.

5858data CreativeGroupsInsert = CreativeGroupsInsert

59− { _cgiProFileId :: !(JSONText Int64)

59+ { _cgiProFileId :: !(Textual Int64)

6060 , _cgiPayload :: !CreativeGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/List.hs+10−10

@@ -53,16 +53,16 @@ type CreativeGroupsListResource =

5353 "dfareporting" :>

5454 "v2.2" :>

5555 "userprofiles" :>

56− Capture "profileId" (JSONText Int64) :>

56+ Capture "profileId" (Textual Int64) :>

5757 "creativeGroups" :>

5858 QueryParam "searchString" Text :>

59− QueryParams "ids" (JSONText Int64) :>

59+ QueryParams "ids" (Textual Int64) :>

6060 QueryParam "sortOrder" CreativeGroupsListSortOrder :>

61− QueryParam "groupNumber" (JSONText Int32) :>

61+ QueryParam "groupNumber" (Textual Int32) :>

6262 QueryParam "pageToken" Text :>

6363 QueryParam "sortField" CreativeGroupsListSortField :>

64− QueryParams "advertiserIds" (JSONText Int64) :>

65− QueryParam "maxResults" (JSONText Int32) :>

64+ QueryParams "advertiserIds" (Textual Int64) :>

65+ QueryParam "maxResults" (Textual Int32) :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] CreativeGroupsListResponse

6868

@@ -71,14 +71,14 @@ type CreativeGroupsListResource =

7171-- /See:/ 'creativeGroupsList' smart constructor.

7272data CreativeGroupsList = CreativeGroupsList

7373 { _cglSearchString :: !(Maybe Text)

74− , _cglIds :: !(Maybe [JSONText Int64])

75− , _cglProFileId :: !(JSONText Int64)

74+ , _cglIds :: !(Maybe [Textual Int64])

75+ , _cglProFileId :: !(Textual Int64)

7676 , _cglSortOrder :: !(Maybe CreativeGroupsListSortOrder)

77− , _cglGroupNumber :: !(Maybe (JSONText Int32))

77+ , _cglGroupNumber :: !(Maybe (Textual Int32))

7878 , _cglPageToken :: !(Maybe Text)

7979 , _cglSortField :: !(Maybe CreativeGroupsListSortField)

80− , _cglAdvertiserIds :: !(Maybe [JSONText Int64])

81− , _cglMaxResults :: !(Maybe (JSONText Int32))

80+ , _cglAdvertiserIds :: !(Maybe [Textual Int64])

81+ , _cglMaxResults :: !(Maybe (Textual Int32))

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

8484-- | Creates a value of 'CreativeGroupsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Patch.hs+4−4

@@ -48,9 +48,9 @@ type CreativeGroupsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "creativeGroups" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] CreativeGroup :>

5656 Patch '[JSON] CreativeGroup

@@ -60,9 +60,9 @@ type CreativeGroupsPatchResource =

6060--

6161-- /See:/ 'creativeGroupsPatch' smart constructor.

6262data CreativeGroupsPatch = CreativeGroupsPatch

63− { _cgpProFileId :: !(JSONText Int64)

63+ { _cgpProFileId :: !(Textual Int64)

6464 , _cgpPayload :: !CreativeGroup

65− , _cgpId :: !(JSONText Int64)

65+ , _cgpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'CreativeGroupsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeGroups/Update.hs+2−2

@@ -46,7 +46,7 @@ type CreativeGroupsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creativeGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] CreativeGroup :>

@@ -56,7 +56,7 @@ type CreativeGroupsUpdateResource =

5656--

5757-- /See:/ 'creativeGroupsUpdate' smart constructor.

5858data CreativeGroupsUpdate = CreativeGroupsUpdate

59− { _cguProFileId :: !(JSONText Int64)

59+ { _cguProFileId :: !(Textual Int64)

6060 , _cguPayload :: !CreativeGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Get.hs+4−4

@@ -46,17 +46,17 @@ type CreativesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creatives" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Creative

5353

5454-- | Gets one creative by ID.

5555--

5656-- /See:/ 'creativesGet' smart constructor.

5757data CreativesGet = CreativesGet

58− { _ccProFileId :: !(JSONText Int64)

59− , _ccId :: !(JSONText Int64)

58+ { _ccProFileId :: !(Textual Int64)

59+ , _ccId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'CreativesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Insert.hs+2−2

@@ -46,7 +46,7 @@ type CreativesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creatives" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Creative :> Post '[JSON] Creative

@@ -55,7 +55,7 @@ type CreativesInsertResource =

5555--

5656-- /See:/ 'creativesInsert' smart constructor.

5757data CreativesInsert = CreativesInsert

58− { _ciProFileId :: !(JSONText Int64)

58+ { _ciProFileId :: !(Textual Int64)

5959 , _ciPayload :: !Creative

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/List.hs+20−21

@@ -61,32 +61,31 @@ type CreativesListResource =

6161 "dfareporting" :>

6262 "v2.2" :>

6363 "userprofiles" :>

64− Capture "profileId" (JSONText Int64) :>

64+ Capture "profileId" (Textual Int64) :>

6565 "creatives" :>

66− QueryParams "renderingIds" (JSONText Int64) :>

67− QueryParam "advertiserId" (JSONText Int64) :>

66+ QueryParams "renderingIds" (Textual Int64) :>

67+ QueryParam "advertiserId" (Textual Int64) :>

6868 QueryParam "searchString" Text :>

69− QueryParams "sizeIds" (JSONText Int64) :>

70− QueryParams "companionCreativeIds" (JSONText Int64)

71− :>

72− QueryParam "campaignId" (JSONText Int64) :>

69+ QueryParams "sizeIds" (Textual Int64) :>

70+ QueryParams "companionCreativeIds" (Textual Int64) :>

71+ QueryParam "campaignId" (Textual Int64) :>

7372 QueryParams "types" CreativesListTypes :>

74− QueryParams "ids" (JSONText Int64) :>

73+ QueryParams "ids" (Textual Int64) :>

7574 QueryParam "sortOrder" CreativesListSortOrder :>

7675 QueryParam "active" Bool :>

7776 QueryParams "creativeFieldIds"

78− (JSONText Int64)

77+ (Textual Int64)

7978 :>

8079 QueryParam "pageToken" Text :>

8180 QueryParam "sortField"

8281 CreativesListSortField

8382 :>

8483 QueryParam "studioCreativeId"

85− (JSONText Int64)

84+ (Textual Int64)

8685 :>

8786 QueryParam "archived" Bool :>

8887 QueryParam "maxResults"

89− (JSONText Int32)

88+ (Textual Int32)

9089 :>

9190 QueryParam "alt" AltJSON :>

9291 Get '[JSON]

@@ -96,23 +95,23 @@ type CreativesListResource =

9695--

9796-- /See:/ 'creativesList' smart constructor.

9897data CreativesList = CreativesList

99− { _cRenderingIds :: !(Maybe [JSONText Int64])

100− , _cAdvertiserId :: !(Maybe (JSONText Int64))

98+ { _cRenderingIds :: !(Maybe [Textual Int64])

99+ , _cAdvertiserId :: !(Maybe (Textual Int64))

101100 , _cSearchString :: !(Maybe Text)

102− , _cSizeIds :: !(Maybe [JSONText Int64])

103− , _cCompanionCreativeIds :: !(Maybe [JSONText Int64])

104− , _cCampaignId :: !(Maybe (JSONText Int64))

101+ , _cSizeIds :: !(Maybe [Textual Int64])

102+ , _cCompanionCreativeIds :: !(Maybe [Textual Int64])

103+ , _cCampaignId :: !(Maybe (Textual Int64))

105104 , _cTypes :: !(Maybe [CreativesListTypes])

106− , _cIds :: !(Maybe [JSONText Int64])

107− , _cProFileId :: !(JSONText Int64)

105+ , _cIds :: !(Maybe [Textual Int64])

106+ , _cProFileId :: !(Textual Int64)

108107 , _cSortOrder :: !(Maybe CreativesListSortOrder)

109108 , _cActive :: !(Maybe Bool)

110− , _cCreativeFieldIds :: !(Maybe [JSONText Int64])

109+ , _cCreativeFieldIds :: !(Maybe [Textual Int64])

111110 , _cPageToken :: !(Maybe Text)

112111 , _cSortField :: !(Maybe CreativesListSortField)

113− , _cStudioCreativeId :: !(Maybe (JSONText Int64))

112+ , _cStudioCreativeId :: !(Maybe (Textual Int64))

114113 , _cArchived :: !(Maybe Bool)

115− , _cMaxResults :: !(Maybe (JSONText Int32))

114+ , _cMaxResults :: !(Maybe (Textual Int32))

116115 } deriving (Eq,Show,Data,Typeable,Generic)

117116

118117-- | Creates a value of 'CreativesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Patch.hs+4−4

@@ -47,9 +47,9 @@ type CreativesPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "creatives" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Creative :> Patch '[JSON] Creative

5555

@@ -57,9 +57,9 @@ type CreativesPatchResource =

5757--

5858-- /See:/ 'creativesPatch' smart constructor.

5959data CreativesPatch = CreativesPatch

60− { _cppProFileId :: !(JSONText Int64)

60+ { _cppProFileId :: !(Textual Int64)

6161 , _cppPayload :: !Creative

62− , _cppId :: !(JSONText Int64)

62+ , _cppId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'CreativesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Creatives/Update.hs+2−2

@@ -46,7 +46,7 @@ type CreativesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "creatives" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Creative :> Put '[JSON] Creative

@@ -55,7 +55,7 @@ type CreativesUpdateResource =

5555--

5656-- /See:/ 'creativesUpdate' smart constructor.

5757data CreativesUpdate = CreativesUpdate

58− { _creProFileId :: !(JSONText Int64)

58+ { _creProFileId :: !(Textual Int64)

5959 , _crePayload :: !Creative

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DimensionValues/Query.hs+4−4

@@ -48,11 +48,11 @@ type DimensionValuesQueryResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "dimensionvalues" :>

5353 "query" :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Int32) :>

55+ QueryParam "maxResults" (Textual Int32) :>

5656 QueryParam "alt" AltJSON :>

5757 ReqBody '[JSON] DimensionValueRequest :>

5858 Post '[JSON] DimensionValueList

@@ -61,10 +61,10 @@ type DimensionValuesQueryResource =

6161--

6262-- /See:/ 'dimensionValuesQuery' smart constructor.

6363data DimensionValuesQuery = DimensionValuesQuery

64− { _dvqProFileId :: !(JSONText Int64)

64+ { _dvqProFileId :: !(Textual Int64)

6565 , _dvqPayload :: !DimensionValueRequest

6666 , _dvqPageToken :: !(Maybe Text)

67− , _dvqMaxResults :: !(Maybe (JSONText Int32))

67+ , _dvqMaxResults :: !(Maybe (Textual Int32))

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'DimensionValuesQuery' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/Get.hs+4−4

@@ -46,9 +46,9 @@ type DirectorySiteContactsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "directorySiteContacts" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] DirectorySiteContact

5454

@@ -56,8 +56,8 @@ type DirectorySiteContactsGetResource =

5656--

5757-- /See:/ 'directorySiteContactsGet' smart constructor.

5858data DirectorySiteContactsGet = DirectorySiteContactsGet

59− { _dscgProFileId :: !(JSONText Int64)

60− , _dscgId :: !(JSONText Int64)

59+ { _dscgProFileId :: !(Textual Int64)

60+ , _dscgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'DirectorySiteContactsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySiteContacts/List.hs+8−8

@@ -52,11 +52,11 @@ type DirectorySiteContactsListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "directorySiteContacts" :>

5757 QueryParam "searchString" Text :>

58− QueryParams "ids" (JSONText Int64) :>

59− QueryParams "directorySiteIds" (JSONText Int64) :>

58+ QueryParams "ids" (Textual Int64) :>

59+ QueryParams "directorySiteIds" (Textual Int64) :>

6060 QueryParam "sortOrder"

6161 DirectorySiteContactsListSortOrder

6262 :>

@@ -64,7 +64,7 @@ type DirectorySiteContactsListResource =

6464 QueryParam "sortField"

6565 DirectorySiteContactsListSortField

6666 :>

67− QueryParam "maxResults" (JSONText Int32) :>

67+ QueryParam "maxResults" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] DirectorySiteContactsListResponse

7070

@@ -73,13 +73,13 @@ type DirectorySiteContactsListResource =

7373-- /See:/ 'directorySiteContactsList' smart constructor.

7474data DirectorySiteContactsList = DirectorySiteContactsList

7575 { _dsclSearchString :: !(Maybe Text)

76− , _dsclIds :: !(Maybe [JSONText Int64])

77− , _dsclProFileId :: !(JSONText Int64)

78− , _dsclDirectorySiteIds :: !(Maybe [JSONText Int64])

76+ , _dsclIds :: !(Maybe [Textual Int64])

77+ , _dsclProFileId :: !(Textual Int64)

78+ , _dsclDirectorySiteIds :: !(Maybe [Textual Int64])

7979 , _dsclSortOrder :: !(Maybe DirectorySiteContactsListSortOrder)

8080 , _dsclPageToken :: !(Maybe Text)

8181 , _dsclSortField :: !(Maybe DirectorySiteContactsListSortField)

82− , _dsclMaxResults :: !(Maybe (JSONText Int32))

82+ , _dsclMaxResults :: !(Maybe (Textual Int32))

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

8585-- | Creates a value of 'DirectorySiteContactsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Get.hs+4−4

@@ -46,17 +46,17 @@ type DirectorySitesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "directorySites" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] DirectorySite

5353

5454-- | Gets one directory site by ID.

5555--

5656-- /See:/ 'directorySitesGet' smart constructor.

5757data DirectorySitesGet = DirectorySitesGet

58− { _dsgProFileId :: !(JSONText Int64)

59− , _dsgId :: !(JSONText Int64)

58+ { _dsgProFileId :: !(Textual Int64)

59+ , _dsgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'DirectorySitesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/Insert.hs+2−2

@@ -46,7 +46,7 @@ type DirectorySitesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "directorySites" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] DirectorySite :>

@@ -56,7 +56,7 @@ type DirectorySitesInsertResource =

5656--

5757-- /See:/ 'directorySitesInsert' smart constructor.

5858data DirectorySitesInsert = DirectorySitesInsert

59− { _dsiProFileId :: !(JSONText Int64)

59+ { _dsiProFileId :: !(Textual Int64)

6060 , _dsiPayload :: !DirectorySite

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/DirectorySites/List.hs+10−10

@@ -58,15 +58,15 @@ type DirectorySitesListResource =

5858 "dfareporting" :>

5959 "v2.2" :>

6060 "userprofiles" :>

61− Capture "profileId" (JSONText Int64) :>

61+ Capture "profileId" (Textual Int64) :>

6262 "directorySites" :>

6363 QueryParam "searchString" Text :>

6464 QueryParam "acceptsInterstitialPlacements" Bool :>

6565 QueryParam "acceptsPublisherPaidPlacements" Bool :>

66− QueryParams "ids" (JSONText Int64) :>

66+ QueryParams "ids" (Textual Int64) :>

6767 QueryParam "sortOrder" DirectorySitesListSortOrder :>

6868 QueryParam "active" Bool :>

69− QueryParam "countryId" (JSONText Int64) :>

69+ QueryParam "countryId" (Textual Int64) :>

7070 QueryParam "pageToken" Text :>

7171 QueryParam "sortField"

7272 DirectorySitesListSortField

@@ -74,8 +74,8 @@ type DirectorySitesListResource =

7474 QueryParam "acceptsInStreamVideoPlacements"

7575 Bool

7676 :>

77− QueryParam "maxResults" (JSONText Int32) :>

78− QueryParam "parentId" (JSONText Int64) :>

77+ QueryParam "maxResults" (Textual Int32) :>

78+ QueryParam "parentId" (Textual Int64) :>

7979 QueryParam "dfp_network_code" Text :>

8080 QueryParam "alt" AltJSON :>

8181 Get '[JSON]

@@ -88,16 +88,16 @@ data DirectorySitesList = DirectorySitesList

8888 { _dslSearchString :: !(Maybe Text)

8989 , _dslAcceptsInterstitialPlacements :: !(Maybe Bool)

9090 , _dslAcceptsPublisherPaidPlacements :: !(Maybe Bool)

91− , _dslIds :: !(Maybe [JSONText Int64])

92− , _dslProFileId :: !(JSONText Int64)

91+ , _dslIds :: !(Maybe [Textual Int64])

92+ , _dslProFileId :: !(Textual Int64)

9393 , _dslSortOrder :: !(Maybe DirectorySitesListSortOrder)

9494 , _dslActive :: !(Maybe Bool)

95− , _dslCountryId :: !(Maybe (JSONText Int64))

95+ , _dslCountryId :: !(Maybe (Textual Int64))

9696 , _dslPageToken :: !(Maybe Text)

9797 , _dslSortField :: !(Maybe DirectorySitesListSortField)

9898 , _dslAcceptsInStreamVideoPlacements :: !(Maybe Bool)

99− , _dslMaxResults :: !(Maybe (JSONText Int32))

100− , _dslParentId :: !(Maybe (JSONText Int64))

99+ , _dslMaxResults :: !(Maybe (Textual Int32))

100+ , _dslParentId :: !(Maybe (Textual Int64))

101101 , _dslDfpNetworkCode :: !(Maybe Text)

102102 } deriving (Eq,Show,Data,Typeable,Generic)

103103

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Delete.hs+4−4

@@ -46,17 +46,17 @@ type EventTagsDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "eventTags" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing event tag.

5555--

5656-- /See:/ 'eventTagsDelete' smart constructor.

5757data EventTagsDelete = EventTagsDelete

58− { _etdProFileId :: !(JSONText Int64)

59− , _etdId :: !(JSONText Int64)

58+ { _etdProFileId :: !(Textual Int64)

59+ , _etdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'EventTagsDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Get.hs+4−4

@@ -46,17 +46,17 @@ type EventTagsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "eventTags" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] EventTag

5353

5454-- | Gets one event tag by ID.

5555--

5656-- /See:/ 'eventTagsGet' smart constructor.

5757data EventTagsGet = EventTagsGet

58− { _etgProFileId :: !(JSONText Int64)

59− , _etgId :: !(JSONText Int64)

58+ { _etgProFileId :: !(Textual Int64)

59+ , _etgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'EventTagsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Insert.hs+2−2

@@ -46,7 +46,7 @@ type EventTagsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "eventTags" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] EventTag :> Post '[JSON] EventTag

@@ -55,7 +55,7 @@ type EventTagsInsertResource =

5555--

5656-- /See:/ 'eventTagsInsert' smart constructor.

5757data EventTagsInsert = EventTagsInsert

58− { _etiProFileId :: !(JSONText Int64)

58+ { _etiProFileId :: !(Textual Int64)

5959 , _etiPayload :: !EventTag

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/List.hs+10−10

@@ -55,19 +55,19 @@ type EventTagsListResource =

5555 "dfareporting" :>

5656 "v2.2" :>

5757 "userprofiles" :>

58− Capture "profileId" (JSONText Int64) :>

58+ Capture "profileId" (Textual Int64) :>

5959 "eventTags" :>

6060 QueryParam "definitionsOnly" Bool :>

6161 QueryParams "eventTagTypes"

6262 EventTagsListEventTagTypes

6363 :>

6464 QueryParam "enabled" Bool :>

65− QueryParam "advertiserId" (JSONText Int64) :>

65+ QueryParam "advertiserId" (Textual Int64) :>

6666 QueryParam "searchString" Text :>

67− QueryParam "campaignId" (JSONText Int64) :>

68− QueryParams "ids" (JSONText Int64) :>

67+ QueryParam "campaignId" (Textual Int64) :>

68+ QueryParams "ids" (Textual Int64) :>

6969 QueryParam "sortOrder" EventTagsListSortOrder :>

70− QueryParam "adId" (JSONText Int64) :>

70+ QueryParam "adId" (Textual Int64) :>

7171 QueryParam "sortField" EventTagsListSortField

7272 :>

7373 QueryParam "alt" AltJSON :>

@@ -80,13 +80,13 @@ data EventTagsList = EventTagsList

8080 { _etlDefinitionsOnly :: !(Maybe Bool)

8181 , _etlEventTagTypes :: !(Maybe [EventTagsListEventTagTypes])

8282 , _etlEnabled :: !(Maybe Bool)

83− , _etlAdvertiserId :: !(Maybe (JSONText Int64))

83+ , _etlAdvertiserId :: !(Maybe (Textual Int64))

8484 , _etlSearchString :: !(Maybe Text)

85− , _etlCampaignId :: !(Maybe (JSONText Int64))

86− , _etlIds :: !(Maybe [JSONText Int64])

87− , _etlProFileId :: !(JSONText Int64)

85+ , _etlCampaignId :: !(Maybe (Textual Int64))

86+ , _etlIds :: !(Maybe [Textual Int64])

87+ , _etlProFileId :: !(Textual Int64)

8888 , _etlSortOrder :: !(Maybe EventTagsListSortOrder)

89− , _etlAdId :: !(Maybe (JSONText Int64))

89+ , _etlAdId :: !(Maybe (Textual Int64))

9090 , _etlSortField :: !(Maybe EventTagsListSortField)

9191 } deriving (Eq,Show,Data,Typeable,Generic)

9292

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Patch.hs+4−4

@@ -47,9 +47,9 @@ type EventTagsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "eventTags" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] EventTag :> Patch '[JSON] EventTag

5555

@@ -57,9 +57,9 @@ type EventTagsPatchResource =

5757--

5858-- /See:/ 'eventTagsPatch' smart constructor.

5959data EventTagsPatch = EventTagsPatch

60− { _etpProFileId :: !(JSONText Int64)

60+ { _etpProFileId :: !(Textual Int64)

6161 , _etpPayload :: !EventTag

62− , _etpId :: !(JSONText Int64)

62+ , _etpId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'EventTagsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/EventTags/Update.hs+2−2

@@ -46,7 +46,7 @@ type EventTagsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "eventTags" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] EventTag :> Put '[JSON] EventTag

@@ -55,7 +55,7 @@ type EventTagsUpdateResource =

5555--

5656-- /See:/ 'eventTagsUpdate' smart constructor.

5757data EventTagsUpdate = EventTagsUpdate

58− { _etuProFileId :: !(JSONText Int64)

58+ { _etuProFileId :: !(Textual Int64)

5959 , _etuPayload :: !EventTag

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/Get.hs+6−6

@@ -46,17 +46,17 @@ type FilesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "reports" :>

49− Capture "reportId" (JSONText Int64) :>

49+ Capture "reportId" (Textual Int64) :>

5050 "files" :>

51− Capture "fileId" (JSONText Int64) :>

51+ Capture "fileId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] File

5353 :<|>

5454 "dfareporting" :>

5555 "v2.2" :>

5656 "reports" :>

57− Capture "reportId" (JSONText Int64) :>

57+ Capture "reportId" (Textual Int64) :>

5858 "files" :>

59− Capture "fileId" (JSONText Int64) :>

59+ Capture "fileId" (Textual Int64) :>

6060 QueryParam "alt" AltMedia :>

6161 Get '[OctetStream] Stream

6262

@@ -64,8 +64,8 @@ type FilesGetResource =

6464--

6565-- /See:/ 'filesGet' smart constructor.

6666data FilesGet = FilesGet

67− { _fgReportId :: !(JSONText Int64)

68− , _fgFileId :: !(JSONText Int64)

67+ { _fgReportId :: !(Textual Int64)

68+ , _fgFileId :: !(Textual Int64)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'FilesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/List.hs+4−4

@@ -50,25 +50,25 @@ type FilesListResource =

5050 "dfareporting" :>

5151 "v2.2" :>

5252 "userprofiles" :>

53− Capture "profileId" (JSONText Int64) :>

53+ Capture "profileId" (Textual Int64) :>

5454 "files" :>

5555 QueryParam "sortOrder" FilesListSortOrder :>

5656 QueryParam "scope" FilesListScope :>

5757 QueryParam "pageToken" Text :>

5858 QueryParam "sortField" FilesListSortField :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] FileList

6161

6262-- | Lists files for a user profile.

6363--

6464-- /See:/ 'filesList' smart constructor.

6565data FilesList = FilesList

66− { _flProFileId :: !(JSONText Int64)

66+ { _flProFileId :: !(Textual Int64)

6767 , _flSortOrder :: !FilesListSortOrder

6868 , _flScope :: !FilesListScope

6969 , _flPageToken :: !(Maybe Text)

7070 , _flSortField :: !FilesListSortField

71− , _flMaxResults :: !(Maybe (JSONText Int32))

71+ , _flMaxResults :: !(Maybe (Textual Int32))

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'FilesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Delete.hs+4−4

@@ -46,17 +46,17 @@ type FloodlightActivitiesDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivities" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing floodlight activity.

5555--

5656-- /See:/ 'floodlightActivitiesDelete' smart constructor.

5757data FloodlightActivitiesDelete = FloodlightActivitiesDelete

58− { _fadProFileId :: !(JSONText Int64)

59− , _fadId :: !(JSONText Int64)

58+ { _fadProFileId :: !(Textual Int64)

59+ , _fadId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'FloodlightActivitiesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Generatetag.hs+4−4

@@ -46,10 +46,10 @@ type FloodlightActivitiesGeneratetagResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivities" :>

5151 "generatetag" :>

52− QueryParam "floodlightActivityId" (JSONText Int64) :>

52+ QueryParam "floodlightActivityId" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 Post '[JSON] FloodlightActivitiesGenerateTagResponse

5555

@@ -57,8 +57,8 @@ type FloodlightActivitiesGeneratetagResource =

5757--

5858-- /See:/ 'floodlightActivitiesGeneratetag' smart constructor.

5959data FloodlightActivitiesGeneratetag = FloodlightActivitiesGeneratetag

60− { _fagFloodlightActivityId :: !(Maybe (JSONText Int64))

61− , _fagProFileId :: !(JSONText Int64)

60+ { _fagFloodlightActivityId :: !(Maybe (Textual Int64))

61+ , _fagProFileId :: !(Textual Int64)

6262 } deriving (Eq,Show,Data,Typeable,Generic)

6363

6464-- | Creates a value of 'FloodlightActivitiesGeneratetag' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Get.hs+4−4

@@ -46,9 +46,9 @@ type FloodlightActivitiesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivities" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] FloodlightActivity

5454

@@ -56,8 +56,8 @@ type FloodlightActivitiesGetResource =

5656--

5757-- /See:/ 'floodlightActivitiesGet' smart constructor.

5858data FloodlightActivitiesGet = FloodlightActivitiesGet

59− { _fProFileId :: !(JSONText Int64)

60− , _fId :: !(JSONText Int64)

59+ { _fProFileId :: !(Textual Int64)

60+ , _fId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'FloodlightActivitiesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Insert.hs+2−2

@@ -46,7 +46,7 @@ type FloodlightActivitiesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivities" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] FloodlightActivity :>

@@ -56,7 +56,7 @@ type FloodlightActivitiesInsertResource =

5656--

5757-- /See:/ 'floodlightActivitiesInsert' smart constructor.

5858data FloodlightActivitiesInsert = FloodlightActivitiesInsert

59− { _faiProFileId :: !(JSONText Int64)

59+ { _faiProFileId :: !(Textual Int64)

6060 , _faiPayload :: !FloodlightActivity

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/List.hs+12−12

@@ -58,18 +58,18 @@ type FloodlightActivitiesListResource =

5858 "dfareporting" :>

5959 "v2.2" :>

6060 "userprofiles" :>

61− Capture "profileId" (JSONText Int64) :>

61+ Capture "profileId" (Textual Int64) :>

6262 "floodlightActivities" :>

6363 QueryParam "tagString" Text :>

6464 QueryParam "floodlightActivityGroupTagString" Text :>

6565 QueryParam "floodlightConfigurationId"

66− (JSONText Int64)

66+ (Textual Int64)

6767 :>

68− QueryParam "advertiserId" (JSONText Int64) :>

68+ QueryParam "advertiserId" (Textual Int64) :>

6969 QueryParam "searchString" Text :>

70− QueryParams "ids" (JSONText Int64) :>

70+ QueryParams "ids" (Textual Int64) :>

7171 QueryParams "floodlightActivityGroupIds"

72− (JSONText Int64)

72+ (Textual Int64)

7373 :>

7474 QueryParam "sortOrder"

7575 FloodlightActivitiesListSortOrder

@@ -83,7 +83,7 @@ type FloodlightActivitiesListResource =

8383 QueryParam "sortField"

8484 FloodlightActivitiesListSortField

8585 :>

86− QueryParam "maxResults" (JSONText Int32)

86+ QueryParam "maxResults" (Textual Int32)

8787 :>

8888 QueryParam "alt" AltJSON :>

8989 Get '[JSON]

@@ -95,18 +95,18 @@ type FloodlightActivitiesListResource =

9595data FloodlightActivitiesList = FloodlightActivitiesList

9696 { _falTagString :: !(Maybe Text)

9797 , _falFloodlightActivityGroupTagString :: !(Maybe Text)

98− , _falFloodlightConfigurationId :: !(Maybe (JSONText Int64))

99− , _falAdvertiserId :: !(Maybe (JSONText Int64))

98+ , _falFloodlightConfigurationId :: !(Maybe (Textual Int64))

99+ , _falAdvertiserId :: !(Maybe (Textual Int64))

100100 , _falSearchString :: !(Maybe Text)

101− , _falIds :: !(Maybe [JSONText Int64])

102− , _falProFileId :: !(JSONText Int64)

103− , _falFloodlightActivityGroupIds :: !(Maybe [JSONText Int64])

101+ , _falIds :: !(Maybe [Textual Int64])

102+ , _falProFileId :: !(Textual Int64)

103+ , _falFloodlightActivityGroupIds :: !(Maybe [Textual Int64])

104104 , _falSortOrder :: !(Maybe FloodlightActivitiesListSortOrder)

105105 , _falFloodlightActivityGroupType :: !(Maybe FloodlightActivitiesListFloodlightActivityGroupType)

106106 , _falFloodlightActivityGroupName :: !(Maybe Text)

107107 , _falPageToken :: !(Maybe Text)

108108 , _falSortField :: !(Maybe FloodlightActivitiesListSortField)

109− , _falMaxResults :: !(Maybe (JSONText Int32))

109+ , _falMaxResults :: !(Maybe (Textual Int32))

110110 } deriving (Eq,Show,Data,Typeable,Generic)

111111

112112-- | Creates a value of 'FloodlightActivitiesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Patch.hs+4−4

@@ -48,9 +48,9 @@ type FloodlightActivitiesPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "floodlightActivities" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] FloodlightActivity :>

5656 Patch '[JSON] FloodlightActivity

@@ -60,9 +60,9 @@ type FloodlightActivitiesPatchResource =

6060--

6161-- /See:/ 'floodlightActivitiesPatch' smart constructor.

6262data FloodlightActivitiesPatch = FloodlightActivitiesPatch

63− { _fapProFileId :: !(JSONText Int64)

63+ { _fapProFileId :: !(Textual Int64)

6464 , _fapPayload :: !FloodlightActivity

65− , _fapId :: !(JSONText Int64)

65+ , _fapId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'FloodlightActivitiesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivities/Update.hs+2−2

@@ -46,7 +46,7 @@ type FloodlightActivitiesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivities" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] FloodlightActivity :>

@@ -56,7 +56,7 @@ type FloodlightActivitiesUpdateResource =

5656--

5757-- /See:/ 'floodlightActivitiesUpdate' smart constructor.

5858data FloodlightActivitiesUpdate = FloodlightActivitiesUpdate

59− { _fauProFileId :: !(JSONText Int64)

59+ { _fauProFileId :: !(Textual Int64)

6060 , _fauPayload :: !FloodlightActivity

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Delete.hs+4−4

@@ -46,17 +46,17 @@ type FloodlightActivityGroupsDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivityGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing floodlight activity group.

5555--

5656-- /See:/ 'floodlightActivityGroupsDelete' smart constructor.

5757data FloodlightActivityGroupsDelete = FloodlightActivityGroupsDelete

58− { _fagdProFileId :: !(JSONText Int64)

59− , _fagdId :: !(JSONText Int64)

58+ { _fagdProFileId :: !(Textual Int64)

59+ , _fagdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'FloodlightActivityGroupsDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Get.hs+4−4

@@ -46,9 +46,9 @@ type FloodlightActivityGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivityGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] FloodlightActivityGroup

5454

@@ -56,8 +56,8 @@ type FloodlightActivityGroupsGetResource =

5656--

5757-- /See:/ 'floodlightActivityGroupsGet' smart constructor.

5858data FloodlightActivityGroupsGet = FloodlightActivityGroupsGet

59− { _faggProFileId :: !(JSONText Int64)

60− , _faggId :: !(JSONText Int64)

59+ { _faggProFileId :: !(Textual Int64)

60+ , _faggId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'FloodlightActivityGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Insert.hs+2−2

@@ -46,7 +46,7 @@ type FloodlightActivityGroupsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivityGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] FloodlightActivityGroup :>

@@ -56,7 +56,7 @@ type FloodlightActivityGroupsInsertResource =

5656--

5757-- /See:/ 'floodlightActivityGroupsInsert' smart constructor.

5858data FloodlightActivityGroupsInsert = FloodlightActivityGroupsInsert

59− { _fagiProFileId :: !(JSONText Int64)

59+ { _fagiProFileId :: !(Textual Int64)

6060 , _fagiPayload :: !FloodlightActivityGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/List.hs+10−10

@@ -54,14 +54,14 @@ type FloodlightActivityGroupsListResource =

5454 "dfareporting" :>

5555 "v2.2" :>

5656 "userprofiles" :>

57− Capture "profileId" (JSONText Int64) :>

57+ Capture "profileId" (Textual Int64) :>

5858 "floodlightActivityGroups" :>

5959 QueryParam "floodlightConfigurationId"

60− (JSONText Int64)

60+ (Textual Int64)

6161 :>

62− QueryParam "advertiserId" (JSONText Int64) :>

62+ QueryParam "advertiserId" (Textual Int64) :>

6363 QueryParam "searchString" Text :>

64− QueryParams "ids" (JSONText Int64) :>

64+ QueryParams "ids" (Textual Int64) :>

6565 QueryParam "sortOrder"

6666 FloodlightActivityGroupsListSortOrder

6767 :>

@@ -71,7 +71,7 @@ type FloodlightActivityGroupsListResource =

7171 :>

7272 QueryParam "type" FloodlightActivityGroupsListType

7373 :>

74− QueryParam "maxResults" (JSONText Int32) :>

74+ QueryParam "maxResults" (Textual Int32) :>

7575 QueryParam "alt" AltJSON :>

7676 Get '[JSON]

7777 FloodlightActivityGroupsListResponse

@@ -80,16 +80,16 @@ type FloodlightActivityGroupsListResource =

8080--

8181-- /See:/ 'floodlightActivityGroupsList' smart constructor.

8282data FloodlightActivityGroupsList = FloodlightActivityGroupsList

83− { _faglFloodlightConfigurationId :: !(Maybe (JSONText Int64))

84− , _faglAdvertiserId :: !(Maybe (JSONText Int64))

83+ { _faglFloodlightConfigurationId :: !(Maybe (Textual Int64))

84+ , _faglAdvertiserId :: !(Maybe (Textual Int64))

8585 , _faglSearchString :: !(Maybe Text)

86− , _faglIds :: !(Maybe [JSONText Int64])

87− , _faglProFileId :: !(JSONText Int64)

86+ , _faglIds :: !(Maybe [Textual Int64])

87+ , _faglProFileId :: !(Textual Int64)

8888 , _faglSortOrder :: !(Maybe FloodlightActivityGroupsListSortOrder)

8989 , _faglPageToken :: !(Maybe Text)

9090 , _faglSortField :: !(Maybe FloodlightActivityGroupsListSortField)

9191 , _faglType :: !(Maybe FloodlightActivityGroupsListType)

92− , _faglMaxResults :: !(Maybe (JSONText Int32))

92+ , _faglMaxResults :: !(Maybe (Textual Int32))

9393 } deriving (Eq,Show,Data,Typeable,Generic)

9494

9595-- | Creates a value of 'FloodlightActivityGroupsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Patch.hs+4−4

@@ -48,9 +48,9 @@ type FloodlightActivityGroupsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "floodlightActivityGroups" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] FloodlightActivityGroup :>

5656 Patch '[JSON] FloodlightActivityGroup

@@ -60,9 +60,9 @@ type FloodlightActivityGroupsPatchResource =

6060--

6161-- /See:/ 'floodlightActivityGroupsPatch' smart constructor.

6262data FloodlightActivityGroupsPatch = FloodlightActivityGroupsPatch

63− { _fagpProFileId :: !(JSONText Int64)

63+ { _fagpProFileId :: !(Textual Int64)

6464 , _fagpPayload :: !FloodlightActivityGroup

65− , _fagpId :: !(JSONText Int64)

65+ , _fagpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'FloodlightActivityGroupsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightActivityGroups/Update.hs+2−2

@@ -46,7 +46,7 @@ type FloodlightActivityGroupsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightActivityGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] FloodlightActivityGroup :>

@@ -56,7 +56,7 @@ type FloodlightActivityGroupsUpdateResource =

5656--

5757-- /See:/ 'floodlightActivityGroupsUpdate' smart constructor.

5858data FloodlightActivityGroupsUpdate = FloodlightActivityGroupsUpdate

59− { _faguProFileId :: !(JSONText Int64)

59+ { _faguProFileId :: !(Textual Int64)

6060 , _faguPayload :: !FloodlightActivityGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Get.hs+4−4

@@ -46,9 +46,9 @@ type FloodlightConfigurationsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightConfigurations" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] FloodlightConfiguration

5454

@@ -56,8 +56,8 @@ type FloodlightConfigurationsGetResource =

5656--

5757-- /See:/ 'floodlightConfigurationsGet' smart constructor.

5858data FloodlightConfigurationsGet = FloodlightConfigurationsGet

59− { _fcgProFileId :: !(JSONText Int64)

60− , _fcgId :: !(JSONText Int64)

59+ { _fcgProFileId :: !(Textual Int64)

60+ , _fcgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'FloodlightConfigurationsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/List.hs+4−4

@@ -46,9 +46,9 @@ type FloodlightConfigurationsListResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightConfigurations" :>

51− QueryParams "ids" (JSONText Int64) :>

51+ QueryParams "ids" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] FloodlightConfigurationsListResponse

5454

@@ -56,8 +56,8 @@ type FloodlightConfigurationsListResource =

5656--

5757-- /See:/ 'floodlightConfigurationsList' smart constructor.

5858data FloodlightConfigurationsList = FloodlightConfigurationsList

59− { _fclIds :: !(Maybe [JSONText Int64])

60− , _fclProFileId :: !(JSONText Int64)

59+ { _fclIds :: !(Maybe [Textual Int64])

60+ , _fclProFileId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'FloodlightConfigurationsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Patch.hs+4−4

@@ -48,9 +48,9 @@ type FloodlightConfigurationsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "floodlightConfigurations" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] FloodlightConfiguration :>

5656 Patch '[JSON] FloodlightConfiguration

@@ -60,9 +60,9 @@ type FloodlightConfigurationsPatchResource =

6060--

6161-- /See:/ 'floodlightConfigurationsPatch' smart constructor.

6262data FloodlightConfigurationsPatch = FloodlightConfigurationsPatch

63− { _fcpProFileId :: !(JSONText Int64)

63+ { _fcpProFileId :: !(Textual Int64)

6464 , _fcpPayload :: !FloodlightConfiguration

65− , _fcpId :: !(JSONText Int64)

65+ , _fcpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'FloodlightConfigurationsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/FloodlightConfigurations/Update.hs+2−2

@@ -46,7 +46,7 @@ type FloodlightConfigurationsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "floodlightConfigurations" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] FloodlightConfiguration :>

@@ -56,7 +56,7 @@ type FloodlightConfigurationsUpdateResource =

5656--

5757-- /See:/ 'floodlightConfigurationsUpdate' smart constructor.

5858data FloodlightConfigurationsUpdate = FloodlightConfigurationsUpdate

59− { _fcuProFileId :: !(JSONText Int64)

59+ { _fcuProFileId :: !(Textual Int64)

6060 , _fcuPayload :: !FloodlightConfiguration

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/Get.hs+6−6

@@ -47,20 +47,20 @@ type InventoryItemsGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "projects" :>

52− Capture "projectId" (JSONText Int64) :>

52+ Capture "projectId" (Textual Int64) :>

5353 "inventoryItems" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] InventoryItem

5656

5757-- | Gets one inventory item by ID.

5858--

5959-- /See:/ 'inventoryItemsGet' smart constructor.

6060data InventoryItemsGet = InventoryItemsGet

61− { _iigProFileId :: !(JSONText Int64)

62− , _iigId :: !(JSONText Int64)

63− , _iigProjectId :: !(JSONText Int64)

61+ { _iigProFileId :: !(Textual Int64)

62+ , _iigId :: !(Textual Int64)

63+ , _iigProjectId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'InventoryItemsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/InventoryItems/List.hs+12−12

@@ -54,18 +54,18 @@ type InventoryItemsListResource =

5454 "dfareporting" :>

5555 "v2.2" :>

5656 "userprofiles" :>

57− Capture "profileId" (JSONText Int64) :>

57+ Capture "profileId" (Textual Int64) :>

5858 "projects" :>

59− Capture "projectId" (JSONText Int64) :>

59+ Capture "projectId" (Textual Int64) :>

6060 "inventoryItems" :>

61− QueryParams "ids" (JSONText Int64) :>

61+ QueryParams "ids" (Textual Int64) :>

6262 QueryParam "sortOrder" InventoryItemsListSortOrder :>

6363 QueryParam "inPlan" Bool :>

6464 QueryParam "pageToken" Text :>

6565 QueryParam "sortField" InventoryItemsListSortField :>

66− QueryParams "orderId" (JSONText Int64) :>

67− QueryParams "siteId" (JSONText Int64) :>

68− QueryParam "maxResults" (JSONText Int32) :>

66+ QueryParams "orderId" (Textual Int64) :>

67+ QueryParams "siteId" (Textual Int64) :>

68+ QueryParam "maxResults" (Textual Int32) :>

6969 QueryParam "alt" AltJSON :>

7070 Get '[JSON] InventoryItemsListResponse

7171

@@ -73,16 +73,16 @@ type InventoryItemsListResource =

7373--

7474-- /See:/ 'inventoryItemsList' smart constructor.

7575data InventoryItemsList = InventoryItemsList

76− { _iilIds :: !(Maybe [JSONText Int64])

77− , _iilProFileId :: !(JSONText Int64)

76+ { _iilIds :: !(Maybe [Textual Int64])

77+ , _iilProFileId :: !(Textual Int64)

7878 , _iilSortOrder :: !(Maybe InventoryItemsListSortOrder)

7979 , _iilInPlan :: !(Maybe Bool)

8080 , _iilPageToken :: !(Maybe Text)

81− , _iilProjectId :: !(JSONText Int64)

81+ , _iilProjectId :: !(Textual Int64)

8282 , _iilSortField :: !(Maybe InventoryItemsListSortField)

83− , _iilOrderId :: !(Maybe [JSONText Int64])

84− , _iilSiteId :: !(Maybe [JSONText Int64])

85− , _iilMaxResults :: !(Maybe (JSONText Int32))

83+ , _iilOrderId :: !(Maybe [Textual Int64])

84+ , _iilSiteId :: !(Maybe [Textual Int64])

85+ , _iilMaxResults :: !(Maybe (Textual Int32))

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

8888-- | Creates a value of 'InventoryItemsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Delete.hs+6−6

@@ -47,20 +47,20 @@ type LandingPagesDeleteResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "campaigns" :>

52− Capture "campaignId" (JSONText Int64) :>

52+ Capture "campaignId" (Textual Int64) :>

5353 "landingPages" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5656

5757-- | Deletes an existing campaign landing page.

5858--

5959-- /See:/ 'landingPagesDelete' smart constructor.

6060data LandingPagesDelete = LandingPagesDelete

61− { _lpdCampaignId :: !(JSONText Int64)

62− , _lpdProFileId :: !(JSONText Int64)

63− , _lpdId :: !(JSONText Int64)

61+ { _lpdCampaignId :: !(Textual Int64)

62+ , _lpdProFileId :: !(Textual Int64)

63+ , _lpdId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'LandingPagesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Get.hs+6−6

@@ -47,20 +47,20 @@ type LandingPagesGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "campaigns" :>

52− Capture "campaignId" (JSONText Int64) :>

52+ Capture "campaignId" (Textual Int64) :>

5353 "landingPages" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] LandingPage

5656

5757-- | Gets one campaign landing page by ID.

5858--

5959-- /See:/ 'landingPagesGet' smart constructor.

6060data LandingPagesGet = LandingPagesGet

61− { _lpgCampaignId :: !(JSONText Int64)

62− , _lpgProFileId :: !(JSONText Int64)

63− , _lpgId :: !(JSONText Int64)

61+ { _lpgCampaignId :: !(Textual Int64)

62+ , _lpgProFileId :: !(Textual Int64)

63+ , _lpgId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'LandingPagesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Insert.hs+4−4

@@ -47,9 +47,9 @@ type LandingPagesInsertResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "campaigns" :>

52− Capture "campaignId" (JSONText Int64) :>

52+ Capture "campaignId" (Textual Int64) :>

5353 "landingPages" :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] LandingPage :>

@@ -59,8 +59,8 @@ type LandingPagesInsertResource =

5959--

6060-- /See:/ 'landingPagesInsert' smart constructor.

6161data LandingPagesInsert = LandingPagesInsert

62− { _lpiCampaignId :: !(JSONText Int64)

63− , _lpiProFileId :: !(JSONText Int64)

62+ { _lpiCampaignId :: !(Textual Int64)

63+ , _lpiProFileId :: !(Textual Int64)

6464 , _lpiPayload :: !LandingPage

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/List.hs+4−4

@@ -46,9 +46,9 @@ type LandingPagesListResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "campaigns" :>

51− Capture "campaignId" (JSONText Int64) :>

51+ Capture "campaignId" (Textual Int64) :>

5252 "landingPages" :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] LandingPagesListResponse

@@ -57,8 +57,8 @@ type LandingPagesListResource =

5757--

5858-- /See:/ 'landingPagesList' smart constructor.

5959data LandingPagesList = LandingPagesList

60− { _lplCampaignId :: !(JSONText Int64)

61− , _lplProFileId :: !(JSONText Int64)

60+ { _lplCampaignId :: !(Textual Int64)

61+ , _lplProFileId :: !(Textual Int64)

6262 } deriving (Eq,Show,Data,Typeable,Generic)

6363

6464-- | Creates a value of 'LandingPagesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Patch.hs+6−6

@@ -49,11 +49,11 @@ type LandingPagesPatchResource =

4949 "dfareporting" :>

5050 "v2.2" :>

5151 "userprofiles" :>

52− Capture "profileId" (JSONText Int64) :>

52+ Capture "profileId" (Textual Int64) :>

5353 "campaigns" :>

54− Capture "campaignId" (JSONText Int64) :>

54+ Capture "campaignId" (Textual Int64) :>

5555 "landingPages" :>

56− QueryParam "id" (JSONText Int64) :>

56+ QueryParam "id" (Textual Int64) :>

5757 QueryParam "alt" AltJSON :>

5858 ReqBody '[JSON] LandingPage :>

5959 Patch '[JSON] LandingPage

@@ -63,10 +63,10 @@ type LandingPagesPatchResource =

6363--

6464-- /See:/ 'landingPagesPatch' smart constructor.

6565data LandingPagesPatch = LandingPagesPatch

66− { _lppCampaignId :: !(JSONText Int64)

67− , _lppProFileId :: !(JSONText Int64)

66+ { _lppCampaignId :: !(Textual Int64)

67+ , _lppProFileId :: !(Textual Int64)

6868 , _lppPayload :: !LandingPage

69− , _lppId :: !(JSONText Int64)

69+ , _lppId :: !(Textual Int64)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'LandingPagesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/LandingPages/Update.hs+4−4

@@ -47,9 +47,9 @@ type LandingPagesUpdateResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "campaigns" :>

52− Capture "campaignId" (JSONText Int64) :>

52+ Capture "campaignId" (Textual Int64) :>

5353 "landingPages" :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] LandingPage :>

@@ -59,8 +59,8 @@ type LandingPagesUpdateResource =

5959--

6060-- /See:/ 'landingPagesUpdate' smart constructor.

6161data LandingPagesUpdate = LandingPagesUpdate

62− { _lpuCampaignId :: !(JSONText Int64)

63− , _lpuProFileId :: !(JSONText Int64)

62+ { _lpuCampaignId :: !(Textual Int64)

63+ , _lpuProFileId :: !(Textual Int64)

6464 , _lpuPayload :: !LandingPage

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Metros/List.hs+2−2

@@ -45,7 +45,7 @@ type MetrosListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "metros" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] MetrosListResponse

@@ -54,7 +54,7 @@ type MetrosListResource =

5454--

5555-- /See:/ 'metrosList' smart constructor.

5656newtype MetrosList = MetrosList

57− { _mlProFileId :: JSONText Int64

57+ { _mlProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'MetrosList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/Get.hs+4−4

@@ -46,17 +46,17 @@ type MobileCarriersGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "mobileCarriers" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] MobileCarrier

5353

5454-- | Gets one mobile carrier by ID.

5555--

5656-- /See:/ 'mobileCarriersGet' smart constructor.

5757data MobileCarriersGet = MobileCarriersGet

58− { _mcgProFileId :: !(JSONText Int64)

59− , _mcgId :: !(JSONText Int64)

58+ { _mcgProFileId :: !(Textual Int64)

59+ , _mcgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'MobileCarriersGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/MobileCarriers/List.hs+2−2

@@ -45,7 +45,7 @@ type MobileCarriersListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "mobileCarriers" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] MobileCarriersListResponse

@@ -54,7 +54,7 @@ type MobileCarriersListResource =

5454--

5555-- /See:/ 'mobileCarriersList' smart constructor.

5656newtype MobileCarriersList = MobileCarriersList

57− { _mclProFileId :: JSONText Int64

57+ { _mclProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'MobileCarriersList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/Get.hs+4−4

@@ -46,9 +46,9 @@ type OperatingSystemVersionsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "operatingSystemVersions" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] OperatingSystemVersion

5454

@@ -56,8 +56,8 @@ type OperatingSystemVersionsGetResource =

5656--

5757-- /See:/ 'operatingSystemVersionsGet' smart constructor.

5858data OperatingSystemVersionsGet = OperatingSystemVersionsGet

59− { _osvgProFileId :: !(JSONText Int64)

60− , _osvgId :: !(JSONText Int64)

59+ { _osvgProFileId :: !(Textual Int64)

60+ , _osvgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'OperatingSystemVersionsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystemVersions/List.hs+2−2

@@ -45,7 +45,7 @@ type OperatingSystemVersionsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "operatingSystemVersions" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] OperatingSystemVersionsListResponse

@@ -54,7 +54,7 @@ type OperatingSystemVersionsListResource =

5454--

5555-- /See:/ 'operatingSystemVersionsList' smart constructor.

5656newtype OperatingSystemVersionsList = OperatingSystemVersionsList

57− { _osvlProFileId :: JSONText Int64

57+ { _osvlProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'OperatingSystemVersionsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/Get.hs+4−4

@@ -46,9 +46,9 @@ type OperatingSystemsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "operatingSystems" :>

51− Capture "dartId" (JSONText Int64) :>

51+ Capture "dartId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] OperatingSystem

5454

@@ -56,8 +56,8 @@ type OperatingSystemsGetResource =

5656--

5757-- /See:/ 'operatingSystemsGet' smart constructor.

5858data OperatingSystemsGet = OperatingSystemsGet

59− { _osgProFileId :: !(JSONText Int64)

60− , _osgDartId :: !(JSONText Int64)

59+ { _osgProFileId :: !(Textual Int64)

60+ , _osgDartId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'OperatingSystemsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OperatingSystems/List.hs+2−2

@@ -45,7 +45,7 @@ type OperatingSystemsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "operatingSystems" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] OperatingSystemsListResponse

@@ -54,7 +54,7 @@ type OperatingSystemsListResource =

5454--

5555-- /See:/ 'operatingSystemsList' smart constructor.

5656newtype OperatingSystemsList = OperatingSystemsList

57− { _oslProFileId :: JSONText Int64

57+ { _oslProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'OperatingSystemsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/Get.hs+6−6

@@ -47,20 +47,20 @@ type OrderDocumentsGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "projects" :>

52− Capture "projectId" (JSONText Int64) :>

52+ Capture "projectId" (Textual Int64) :>

5353 "orderDocuments" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] OrderDocument

5656

5757-- | Gets one order document by ID.

5858--

5959-- /See:/ 'orderDocumentsGet' smart constructor.

6060data OrderDocumentsGet = OrderDocumentsGet

61− { _odgProFileId :: !(JSONText Int64)

62− , _odgId :: !(JSONText Int64)

63− , _odgProjectId :: !(JSONText Int64)

61+ { _odgProFileId :: !(Textual Int64)

62+ , _odgId :: !(Textual Int64)

63+ , _odgProjectId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'OrderDocumentsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/OrderDocuments/List.hs+12−12

@@ -55,19 +55,19 @@ type OrderDocumentsListResource =

5555 "dfareporting" :>

5656 "v2.2" :>

5757 "userprofiles" :>

58− Capture "profileId" (JSONText Int64) :>

58+ Capture "profileId" (Textual Int64) :>

5959 "projects" :>

60− Capture "projectId" (JSONText Int64) :>

60+ Capture "projectId" (Textual Int64) :>

6161 "orderDocuments" :>

6262 QueryParam "searchString" Text :>

63− QueryParams "ids" (JSONText Int64) :>

63+ QueryParams "ids" (Textual Int64) :>

6464 QueryParam "sortOrder" OrderDocumentsListSortOrder :>

6565 QueryParam "pageToken" Text :>

6666 QueryParam "sortField" OrderDocumentsListSortField :>

67− QueryParams "orderId" (JSONText Int64) :>

67+ QueryParams "orderId" (Textual Int64) :>

6868 QueryParam "approved" Bool :>

69− QueryParams "siteId" (JSONText Int64) :>

70− QueryParam "maxResults" (JSONText Int32) :>

69+ QueryParams "siteId" (Textual Int64) :>

70+ QueryParam "maxResults" (Textual Int32) :>

7171 QueryParam "alt" AltJSON :>

7272 Get '[JSON] OrderDocumentsListResponse

7373

@@ -76,16 +76,16 @@ type OrderDocumentsListResource =

7676-- /See:/ 'orderDocumentsList' smart constructor.

7777data OrderDocumentsList = OrderDocumentsList

7878 { _odlSearchString :: !(Maybe Text)

79− , _odlIds :: !(Maybe [JSONText Int64])

80− , _odlProFileId :: !(JSONText Int64)

79+ , _odlIds :: !(Maybe [Textual Int64])

80+ , _odlProFileId :: !(Textual Int64)

8181 , _odlSortOrder :: !(Maybe OrderDocumentsListSortOrder)

8282 , _odlPageToken :: !(Maybe Text)

83− , _odlProjectId :: !(JSONText Int64)

83+ , _odlProjectId :: !(Textual Int64)

8484 , _odlSortField :: !(Maybe OrderDocumentsListSortField)

85− , _odlOrderId :: !(Maybe [JSONText Int64])

85+ , _odlOrderId :: !(Maybe [Textual Int64])

8686 , _odlApproved :: !(Maybe Bool)

87− , _odlSiteId :: !(Maybe [JSONText Int64])

88− , _odlMaxResults :: !(Maybe (JSONText Int32))

87+ , _odlSiteId :: !(Maybe [Textual Int64])

88+ , _odlMaxResults :: !(Maybe (Textual Int32))

8989 } deriving (Eq,Show,Data,Typeable,Generic)

9090

9191-- | Creates a value of 'OrderDocumentsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/Get.hs+6−6

@@ -47,20 +47,20 @@ type OrdersGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "projects" :>

52− Capture "projectId" (JSONText Int64) :>

52+ Capture "projectId" (Textual Int64) :>

5353 "orders" :>

54− Capture "id" (JSONText Int64) :>

54+ Capture "id" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] Order

5656

5757-- | Gets one order by ID.

5858--

5959-- /See:/ 'ordersGet' smart constructor.

6060data OrdersGet = OrdersGet

61− { _ogProFileId :: !(JSONText Int64)

62− , _ogId :: !(JSONText Int64)

63− , _ogProjectId :: !(JSONText Int64)

61+ { _ogProFileId :: !(Textual Int64)

62+ , _ogId :: !(Textual Int64)

63+ , _ogProjectId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'OrdersGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Orders/List.hs+10−10

@@ -53,17 +53,17 @@ type OrdersListResource =

5353 "dfareporting" :>

5454 "v2.2" :>

5555 "userprofiles" :>

56− Capture "profileId" (JSONText Int64) :>

56+ Capture "profileId" (Textual Int64) :>

5757 "projects" :>

58− Capture "projectId" (JSONText Int64) :>

58+ Capture "projectId" (Textual Int64) :>

5959 "orders" :>

6060 QueryParam "searchString" Text :>

61− QueryParams "ids" (JSONText Int64) :>

61+ QueryParams "ids" (Textual Int64) :>

6262 QueryParam "sortOrder" OrdersListSortOrder :>

6363 QueryParam "pageToken" Text :>

6464 QueryParam "sortField" OrdersListSortField :>

65− QueryParams "siteId" (JSONText Int64) :>

66− QueryParam "maxResults" (JSONText Int32) :>

65+ QueryParams "siteId" (Textual Int64) :>

66+ QueryParam "maxResults" (Textual Int32) :>

6767 QueryParam "alt" AltJSON :>

6868 Get '[JSON] OrdersListResponse

6969

@@ -72,14 +72,14 @@ type OrdersListResource =

7272-- /See:/ 'ordersList' smart constructor.

7373data OrdersList = OrdersList

7474 { _olSearchString :: !(Maybe Text)

75− , _olIds :: !(Maybe [JSONText Int64])

76− , _olProFileId :: !(JSONText Int64)

75+ , _olIds :: !(Maybe [Textual Int64])

76+ , _olProFileId :: !(Textual Int64)

7777 , _olSortOrder :: !(Maybe OrdersListSortOrder)

7878 , _olPageToken :: !(Maybe Text)

79− , _olProjectId :: !(JSONText Int64)

79+ , _olProjectId :: !(Textual Int64)

8080 , _olSortField :: !(Maybe OrdersListSortField)

81− , _olSiteId :: !(Maybe [JSONText Int64])

82− , _olMaxResults :: !(Maybe (JSONText Int32))

81+ , _olSiteId :: !(Maybe [Textual Int64])

82+ , _olMaxResults :: !(Maybe (Textual Int32))

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

8585-- | Creates a value of 'OrdersList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Get.hs+4−4

@@ -46,9 +46,9 @@ type PlacementGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] PlacementGroup

5454

@@ -56,8 +56,8 @@ type PlacementGroupsGetResource =

5656--

5757-- /See:/ 'placementGroupsGet' smart constructor.

5858data PlacementGroupsGet = PlacementGroupsGet

59− { _pggProFileId :: !(JSONText Int64)

60− , _pggId :: !(JSONText Int64)

59+ { _pggProFileId :: !(Textual Int64)

60+ , _pggId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'PlacementGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Insert.hs+2−2

@@ -46,7 +46,7 @@ type PlacementGroupsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] PlacementGroup :>

@@ -56,7 +56,7 @@ type PlacementGroupsInsertResource =

5656--

5757-- /See:/ 'placementGroupsInsert' smart constructor.

5858data PlacementGroupsInsert = PlacementGroupsInsert

59− { _pgiProFileId :: !(JSONText Int64)

59+ { _pgiProFileId :: !(Textual Int64)

6060 , _pgiPayload :: !PlacementGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/List.hs+18−20

@@ -64,39 +64,37 @@ type PlacementGroupsListResource =

6464 "dfareporting" :>

6565 "v2.2" :>

6666 "userprofiles" :>

67− Capture "profileId" (JSONText Int64) :>

67+ Capture "profileId" (Textual Int64) :>

6868 "placementGroups" :>

69− QueryParams "placementStrategyIds" (JSONText Int64)

70− :>

71− QueryParams "contentCategoryIds" (JSONText Int64) :>

69+ QueryParams "placementStrategyIds" (Textual Int64) :>

70+ QueryParams "contentCategoryIds" (Textual Int64) :>

7271 QueryParam "maxEndDate" Text :>

73− QueryParams "campaignIds" (JSONText Int64) :>

72+ QueryParams "campaignIds" (Textual Int64) :>

7473 QueryParams "pricingTypes"

7574 PlacementGroupsListPricingTypes

7675 :>

7776 QueryParam "searchString" Text :>

78− QueryParams "ids" (JSONText Int64) :>

77+ QueryParams "ids" (Textual Int64) :>

7978 QueryParam "placementGroupType"

8079 PlacementGroupsListPlacementGroupType

8180 :>

82− QueryParams "directorySiteIds" (JSONText Int64)

83− :>

81+ QueryParams "directorySiteIds" (Textual Int64) :>

8482 QueryParam "sortOrder"

8583 PlacementGroupsListSortOrder

8684 :>

87− QueryParams "siteIds" (JSONText Int64) :>

85+ QueryParams "siteIds" (Textual Int64) :>

8886 QueryParam "pageToken" Text :>

8987 QueryParam "sortField"

9088 PlacementGroupsListSortField

9189 :>

9290 QueryParam "maxStartDate" Text :>

9391 QueryParams "advertiserIds"

94− (JSONText Int64)

92+ (Textual Int64)

9593 :>

9694 QueryParam "minStartDate" Text :>

9795 QueryParam "archived" Bool :>

9896 QueryParam "maxResults"

99− (JSONText Int32)

97+ (Textual Int32)

10098 :>

10199 QueryParam "minEndDate" Text

102100 :>

@@ -108,25 +106,25 @@ type PlacementGroupsListResource =

108106--

109107-- /See:/ 'placementGroupsList' smart constructor.

110108data PlacementGroupsList = PlacementGroupsList

111− { _pglPlacementStrategyIds :: !(Maybe [JSONText Int64])

112− , _pglContentCategoryIds :: !(Maybe [JSONText Int64])

109+ { _pglPlacementStrategyIds :: !(Maybe [Textual Int64])

110+ , _pglContentCategoryIds :: !(Maybe [Textual Int64])

113111 , _pglMaxEndDate :: !(Maybe Text)

114− , _pglCampaignIds :: !(Maybe [JSONText Int64])

112+ , _pglCampaignIds :: !(Maybe [Textual Int64])

115113 , _pglPricingTypes :: !(Maybe [PlacementGroupsListPricingTypes])

116114 , _pglSearchString :: !(Maybe Text)

117− , _pglIds :: !(Maybe [JSONText Int64])

118− , _pglProFileId :: !(JSONText Int64)

115+ , _pglIds :: !(Maybe [Textual Int64])

116+ , _pglProFileId :: !(Textual Int64)

119117 , _pglPlacementGroupType :: !(Maybe PlacementGroupsListPlacementGroupType)

120− , _pglDirectorySiteIds :: !(Maybe [JSONText Int64])

118+ , _pglDirectorySiteIds :: !(Maybe [Textual Int64])

121119 , _pglSortOrder :: !(Maybe PlacementGroupsListSortOrder)

122− , _pglSiteIds :: !(Maybe [JSONText Int64])

120+ , _pglSiteIds :: !(Maybe [Textual Int64])

123121 , _pglPageToken :: !(Maybe Text)

124122 , _pglSortField :: !(Maybe PlacementGroupsListSortField)

125123 , _pglMaxStartDate :: !(Maybe Text)

126− , _pglAdvertiserIds :: !(Maybe [JSONText Int64])

124+ , _pglAdvertiserIds :: !(Maybe [Textual Int64])

127125 , _pglMinStartDate :: !(Maybe Text)

128126 , _pglArchived :: !(Maybe Bool)

129− , _pglMaxResults :: !(Maybe (JSONText Int32))

127+ , _pglMaxResults :: !(Maybe (Textual Int32))

130128 , _pglMinEndDate :: !(Maybe Text)

131129 } deriving (Eq,Show,Data,Typeable,Generic)

132130

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Patch.hs+4−4

@@ -48,9 +48,9 @@ type PlacementGroupsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "placementGroups" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] PlacementGroup :>

5656 Patch '[JSON] PlacementGroup

@@ -60,9 +60,9 @@ type PlacementGroupsPatchResource =

6060--

6161-- /See:/ 'placementGroupsPatch' smart constructor.

6262data PlacementGroupsPatch = PlacementGroupsPatch

63− { _pgpProFileId :: !(JSONText Int64)

63+ { _pgpProFileId :: !(Textual Int64)

6464 , _pgpPayload :: !PlacementGroup

65− , _pgpId :: !(JSONText Int64)

65+ , _pgpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'PlacementGroupsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementGroups/Update.hs+2−2

@@ -46,7 +46,7 @@ type PlacementGroupsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementGroups" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] PlacementGroup :>

@@ -56,7 +56,7 @@ type PlacementGroupsUpdateResource =

5656--

5757-- /See:/ 'placementGroupsUpdate' smart constructor.

5858data PlacementGroupsUpdate = PlacementGroupsUpdate

59− { _pguProFileId :: !(JSONText Int64)

59+ { _pguProFileId :: !(Textual Int64)

6060 , _pguPayload :: !PlacementGroup

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Delete.hs+4−4

@@ -46,17 +46,17 @@ type PlacementStrategiesDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementStrategies" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing placement strategy.

5555--

5656-- /See:/ 'placementStrategiesDelete' smart constructor.

5757data PlacementStrategiesDelete = PlacementStrategiesDelete

58− { _psdProFileId :: !(JSONText Int64)

59− , _psdId :: !(JSONText Int64)

58+ { _psdProFileId :: !(Textual Int64)

59+ , _psdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'PlacementStrategiesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Get.hs+4−4

@@ -46,9 +46,9 @@ type PlacementStrategiesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementStrategies" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] PlacementStrategy

5454

@@ -56,8 +56,8 @@ type PlacementStrategiesGetResource =

5656--

5757-- /See:/ 'placementStrategiesGet' smart constructor.

5858data PlacementStrategiesGet = PlacementStrategiesGet

59− { _psgProFileId :: !(JSONText Int64)

60− , _psgId :: !(JSONText Int64)

59+ { _psgProFileId :: !(Textual Int64)

60+ , _psgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'PlacementStrategiesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Insert.hs+2−2

@@ -46,7 +46,7 @@ type PlacementStrategiesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementStrategies" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] PlacementStrategy :>

@@ -56,7 +56,7 @@ type PlacementStrategiesInsertResource =

5656--

5757-- /See:/ 'placementStrategiesInsert' smart constructor.

5858data PlacementStrategiesInsert = PlacementStrategiesInsert

59− { _psiProFileId :: !(JSONText Int64)

59+ { _psiProFileId :: !(Textual Int64)

6060 , _psiPayload :: !PlacementStrategy

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/List.hs+6−6

@@ -51,10 +51,10 @@ type PlacementStrategiesListResource =

5151 "dfareporting" :>

5252 "v2.2" :>

5353 "userprofiles" :>

54− Capture "profileId" (JSONText Int64) :>

54+ Capture "profileId" (Textual Int64) :>

5555 "placementStrategies" :>

5656 QueryParam "searchString" Text :>

57− QueryParams "ids" (JSONText Int64) :>

57+ QueryParams "ids" (Textual Int64) :>

5858 QueryParam "sortOrder"

5959 PlacementStrategiesListSortOrder

6060 :>

@@ -62,7 +62,7 @@ type PlacementStrategiesListResource =

6262 QueryParam "sortField"

6363 PlacementStrategiesListSortField

6464 :>

65− QueryParam "maxResults" (JSONText Int32) :>

65+ QueryParam "maxResults" (Textual Int32) :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] PlacementStrategiesListResponse

6868

@@ -71,12 +71,12 @@ type PlacementStrategiesListResource =

7171-- /See:/ 'placementStrategiesList' smart constructor.

7272data PlacementStrategiesList = PlacementStrategiesList

7373 { _pslSearchString :: !(Maybe Text)

74− , _pslIds :: !(Maybe [JSONText Int64])

75− , _pslProFileId :: !(JSONText Int64)

74+ , _pslIds :: !(Maybe [Textual Int64])

75+ , _pslProFileId :: !(Textual Int64)

7676 , _pslSortOrder :: !(Maybe PlacementStrategiesListSortOrder)

7777 , _pslPageToken :: !(Maybe Text)

7878 , _pslSortField :: !(Maybe PlacementStrategiesListSortField)

79− , _pslMaxResults :: !(Maybe (JSONText Int32))

79+ , _pslMaxResults :: !(Maybe (Textual Int32))

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

8282-- | Creates a value of 'PlacementStrategiesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Patch.hs+4−4

@@ -48,9 +48,9 @@ type PlacementStrategiesPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "placementStrategies" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] PlacementStrategy :>

5656 Patch '[JSON] PlacementStrategy

@@ -60,9 +60,9 @@ type PlacementStrategiesPatchResource =

6060--

6161-- /See:/ 'placementStrategiesPatch' smart constructor.

6262data PlacementStrategiesPatch = PlacementStrategiesPatch

63− { _pspProFileId :: !(JSONText Int64)

63+ { _pspProFileId :: !(Textual Int64)

6464 , _pspPayload :: !PlacementStrategy

65− , _pspId :: !(JSONText Int64)

65+ , _pspId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'PlacementStrategiesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlacementStrategies/Update.hs+2−2

@@ -46,7 +46,7 @@ type PlacementStrategiesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placementStrategies" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] PlacementStrategy :>

@@ -56,7 +56,7 @@ type PlacementStrategiesUpdateResource =

5656--

5757-- /See:/ 'placementStrategiesUpdate' smart constructor.

5858data PlacementStrategiesUpdate = PlacementStrategiesUpdate

59− { _psuProFileId :: !(JSONText Int64)

59+ { _psuProFileId :: !(Textual Int64)

6060 , _psuPayload :: !PlacementStrategy

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Generatetags.hs+6−6

@@ -48,14 +48,14 @@ type PlacementsGeneratetagsResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "placements" :>

5353 "generatetags" :>

5454 QueryParams "tagFormats"

5555 PlacementsGeneratetagsTagFormats

5656 :>

57− QueryParam "campaignId" (JSONText Int64) :>

58− QueryParams "placementIds" (JSONText Int64) :>

57+ QueryParam "campaignId" (Textual Int64) :>

58+ QueryParams "placementIds" (Textual Int64) :>

5959 QueryParam "alt" AltJSON :>

6060 Post '[JSON] PlacementsGenerateTagsResponse

6161

@@ -64,9 +64,9 @@ type PlacementsGeneratetagsResource =

6464-- /See:/ 'placementsGeneratetags' smart constructor.

6565data PlacementsGeneratetags = PlacementsGeneratetags

6666 { _pgsTagFormats :: !(Maybe [PlacementsGeneratetagsTagFormats])

67− , _pgsCampaignId :: !(Maybe (JSONText Int64))

68− , _pgsProFileId :: !(JSONText Int64)

69− , _pgsPlacementIds :: !(Maybe [JSONText Int64])

67+ , _pgsCampaignId :: !(Maybe (Textual Int64))

68+ , _pgsProFileId :: !(Textual Int64)

69+ , _pgsPlacementIds :: !(Maybe [Textual Int64])

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

7272-- | Creates a value of 'PlacementsGeneratetags' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Get.hs+4−4

@@ -46,17 +46,17 @@ type PlacementsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placements" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Placement

5353

5454-- | Gets one placement by ID.

5555--

5656-- /See:/ 'placementsGet' smart constructor.

5757data PlacementsGet = PlacementsGet

58− { _pgProFileId :: !(JSONText Int64)

59− , _pgId :: !(JSONText Int64)

58+ { _pgProFileId :: !(Textual Int64)

59+ , _pgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'PlacementsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Insert.hs+2−2

@@ -46,7 +46,7 @@ type PlacementsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placements" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Placement :> Post '[JSON] Placement

@@ -55,7 +55,7 @@ type PlacementsInsertResource =

5555--

5656-- /See:/ 'placementsInsert' smart constructor.

5757data PlacementsInsert = PlacementsInsert

58− { _piProFileId :: !(JSONText Int64)

58+ { _piProFileId :: !(Textual Int64)

5959 , _piPayload :: !Placement

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/List.hs+22−23

@@ -67,20 +67,19 @@ type PlacementsListResource =

6767 "dfareporting" :>

6868 "v2.2" :>

6969 "userprofiles" :>

70− Capture "profileId" (JSONText Int64) :>

70+ Capture "profileId" (Textual Int64) :>

7171 "placements" :>

72− QueryParams "placementStrategyIds" (JSONText Int64)

73− :>

74− QueryParams "contentCategoryIds" (JSONText Int64) :>

72+ QueryParams "placementStrategyIds" (Textual Int64) :>

73+ QueryParams "contentCategoryIds" (Textual Int64) :>

7574 QueryParam "maxEndDate" Text :>

76− QueryParams "campaignIds" (JSONText Int64) :>

75+ QueryParams "campaignIds" (Textual Int64) :>

7776 QueryParams "pricingTypes" PlacementsListPricingTypes

7877 :>

7978 QueryParam "searchString" Text :>

80− QueryParams "sizeIds" (JSONText Int64) :>

81− QueryParams "ids" (JSONText Int64) :>

82− QueryParams "groupIds" (JSONText Int64) :>

83− QueryParams "directorySiteIds" (JSONText Int64)

79+ QueryParams "sizeIds" (Textual Int64) :>

80+ QueryParams "ids" (Textual Int64) :>

81+ QueryParams "groupIds" (Textual Int64) :>

82+ QueryParams "directorySiteIds" (Textual Int64)

8483 :>

8584 QueryParam "sortOrder"

8685 PlacementsListSortOrder

@@ -88,7 +87,7 @@ type PlacementsListResource =

8887 QueryParam "paymentSource"

8988 PlacementsListPaymentSource

9089 :>

91− QueryParams "siteIds" (JSONText Int64) :>

90+ QueryParams "siteIds" (Textual Int64) :>

9291 QueryParam "pageToken" Text :>

9392 QueryParam "sortField"

9493 PlacementsListSortField

@@ -98,7 +97,7 @@ type PlacementsListResource =

9897 :>

9998 QueryParam "maxStartDate" Text :>

10099 QueryParams "advertiserIds"

101− (JSONText Int64)

100+ (Textual Int64)

102101 :>

103102 QueryParam "minStartDate"

104103 Text

@@ -106,7 +105,7 @@ type PlacementsListResource =

106105 QueryParam "archived" Bool

107106 :>

108107 QueryParam "maxResults"

109− (JSONText Int32)

108+ (Textual Int32)

110109 :>

111110 QueryParam "minEndDate"

112111 Text

@@ -121,28 +120,28 @@ type PlacementsListResource =

121120--

122121-- /See:/ 'placementsList' smart constructor.

123122data PlacementsList = PlacementsList

124− { _pPlacementStrategyIds :: !(Maybe [JSONText Int64])

125− , _pContentCategoryIds :: !(Maybe [JSONText Int64])

123+ { _pPlacementStrategyIds :: !(Maybe [Textual Int64])

124+ , _pContentCategoryIds :: !(Maybe [Textual Int64])

126125 , _pMaxEndDate :: !(Maybe Text)

127− , _pCampaignIds :: !(Maybe [JSONText Int64])

126+ , _pCampaignIds :: !(Maybe [Textual Int64])

128127 , _pPricingTypes :: !(Maybe [PlacementsListPricingTypes])

129128 , _pSearchString :: !(Maybe Text)

130− , _pSizeIds :: !(Maybe [JSONText Int64])

131− , _pIds :: !(Maybe [JSONText Int64])

132− , _pProFileId :: !(JSONText Int64)

133− , _pGroupIds :: !(Maybe [JSONText Int64])

134− , _pDirectorySiteIds :: !(Maybe [JSONText Int64])

129+ , _pSizeIds :: !(Maybe [Textual Int64])

130+ , _pIds :: !(Maybe [Textual Int64])

131+ , _pProFileId :: !(Textual Int64)

132+ , _pGroupIds :: !(Maybe [Textual Int64])

133+ , _pDirectorySiteIds :: !(Maybe [Textual Int64])

135134 , _pSortOrder :: !(Maybe PlacementsListSortOrder)

136135 , _pPaymentSource :: !(Maybe PlacementsListPaymentSource)

137− , _pSiteIds :: !(Maybe [JSONText Int64])

136+ , _pSiteIds :: !(Maybe [Textual Int64])

138137 , _pPageToken :: !(Maybe Text)

139138 , _pSortField :: !(Maybe PlacementsListSortField)

140139 , _pCompatibilities :: !(Maybe [PlacementsListCompatibilities])

141140 , _pMaxStartDate :: !(Maybe Text)

142− , _pAdvertiserIds :: !(Maybe [JSONText Int64])

141+ , _pAdvertiserIds :: !(Maybe [Textual Int64])

143142 , _pMinStartDate :: !(Maybe Text)

144143 , _pArchived :: !(Maybe Bool)

145− , _pMaxResults :: !(Maybe (JSONText Int32))

144+ , _pMaxResults :: !(Maybe (Textual Int32))

146145 , _pMinEndDate :: !(Maybe Text)

147146 } deriving (Eq,Show,Data,Typeable,Generic)

148147

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Patch.hs+4−4

@@ -47,9 +47,9 @@ type PlacementsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "placements" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Placement :> Patch '[JSON] Placement

5555

@@ -57,9 +57,9 @@ type PlacementsPatchResource =

5757--

5858-- /See:/ 'placementsPatch' smart constructor.

5959data PlacementsPatch = PlacementsPatch

60− { _ppProFileId :: !(JSONText Int64)

60+ { _ppProFileId :: !(Textual Int64)

6161 , _ppPayload :: !Placement

62− , _ppId :: !(JSONText Int64)

62+ , _ppId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'PlacementsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Placements/Update.hs+2−2

@@ -46,7 +46,7 @@ type PlacementsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "placements" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Placement :> Put '[JSON] Placement

@@ -55,7 +55,7 @@ type PlacementsUpdateResource =

5555--

5656-- /See:/ 'placementsUpdate' smart constructor.

5757data PlacementsUpdate = PlacementsUpdate

58− { _puProFileId :: !(JSONText Int64)

58+ { _puProFileId :: !(Textual Int64)

5959 , _puPayload :: !Placement

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/Get.hs+4−4

@@ -46,17 +46,17 @@ type PlatformTypesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "platformTypes" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] PlatformType

5353

5454-- | Gets one platform type by ID.

5555--

5656-- /See:/ 'platformTypesGet' smart constructor.

5757data PlatformTypesGet = PlatformTypesGet

58− { _ptgProFileId :: !(JSONText Int64)

59− , _ptgId :: !(JSONText Int64)

58+ { _ptgProFileId :: !(Textual Int64)

59+ , _ptgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'PlatformTypesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PlatformTypes/List.hs+2−2

@@ -45,7 +45,7 @@ type PlatformTypesListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "platformTypes" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] PlatformTypesListResponse

@@ -54,7 +54,7 @@ type PlatformTypesListResource =

5454--

5555-- /See:/ 'platformTypesList' smart constructor.

5656newtype PlatformTypesList = PlatformTypesList

57− { _ptlProFileId :: JSONText Int64

57+ { _ptlProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'PlatformTypesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/Get.hs+2−2

@@ -46,7 +46,7 @@ type PostalCodesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "postalCodes" :>

5151 Capture "code" Text :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] PostalCode

@@ -55,7 +55,7 @@ type PostalCodesGetResource =

5555--

5656-- /See:/ 'postalCodesGet' smart constructor.

5757data PostalCodesGet = PostalCodesGet

58− { _pcgProFileId :: !(JSONText Int64)

58+ { _pcgProFileId :: !(Textual Int64)

5959 , _pcgCode :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/PostalCodes/List.hs+2−2

@@ -45,7 +45,7 @@ type PostalCodesListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "postalCodes" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] PostalCodesListResponse

@@ -54,7 +54,7 @@ type PostalCodesListResource =

5454--

5555-- /See:/ 'postalCodesList' smart constructor.

5656newtype PostalCodesList = PostalCodesList

57− { _pclProFileId :: JSONText Int64

57+ { _pclProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'PostalCodesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/Get.hs+4−4

@@ -46,17 +46,17 @@ type ProjectsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "projects" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Project

5353

5454-- | Gets one project by ID.

5555--

5656-- /See:/ 'projectsGet' smart constructor.

5757data ProjectsGet = ProjectsGet

58− { _proProFileId :: !(JSONText Int64)

59− , _proId :: !(JSONText Int64)

58+ { _proProFileId :: !(Textual Int64)

59+ , _proId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'ProjectsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Projects/List.hs+8−8

@@ -52,15 +52,15 @@ type ProjectsListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "projects" :>

5757 QueryParam "searchString" Text :>

58− QueryParams "ids" (JSONText Int64) :>

58+ QueryParams "ids" (Textual Int64) :>

5959 QueryParam "sortOrder" ProjectsListSortOrder :>

6060 QueryParam "pageToken" Text :>

6161 QueryParam "sortField" ProjectsListSortField :>

62− QueryParams "advertiserIds" (JSONText Int64) :>

63− QueryParam "maxResults" (JSONText Int32) :>

62+ QueryParams "advertiserIds" (Textual Int64) :>

63+ QueryParam "maxResults" (Textual Int32) :>

6464 QueryParam "alt" AltJSON :>

6565 Get '[JSON] ProjectsListResponse

6666

@@ -69,13 +69,13 @@ type ProjectsListResource =

6969-- /See:/ 'projectsList' smart constructor.

7070data ProjectsList = ProjectsList

7171 { _plSearchString :: !(Maybe Text)

72− , _plIds :: !(Maybe [JSONText Int64])

73− , _plProFileId :: !(JSONText Int64)

72+ , _plIds :: !(Maybe [Textual Int64])

73+ , _plProFileId :: !(Textual Int64)

7474 , _plSortOrder :: !(Maybe ProjectsListSortOrder)

7575 , _plPageToken :: !(Maybe Text)

7676 , _plSortField :: !(Maybe ProjectsListSortField)

77− , _plAdvertiserIds :: !(Maybe [JSONText Int64])

78− , _plMaxResults :: !(Maybe (JSONText Int32))

77+ , _plAdvertiserIds :: !(Maybe [Textual Int64])

78+ , _plMaxResults :: !(Maybe (Textual Int32))

7979 } deriving (Eq,Show,Data,Typeable,Generic)

8080

8181-- | Creates a value of 'ProjectsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Regions/List.hs+2−2

@@ -45,7 +45,7 @@ type RegionsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "regions" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] RegionsListResponse

@@ -54,7 +54,7 @@ type RegionsListResource =

5454--

5555-- /See:/ 'regionsList' smart constructor.

5656newtype RegionsList = RegionsList

57− { _rProFileId :: JSONText Int64

57+ { _rProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'RegionsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Get.hs+4−4

@@ -46,9 +46,9 @@ type RemarketingListSharesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "remarketingListShares" :>

51− Capture "remarketingListId" (JSONText Int64) :>

51+ Capture "remarketingListId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] RemarketingListShare

5454

@@ -56,8 +56,8 @@ type RemarketingListSharesGetResource =

5656--

5757-- /See:/ 'remarketingListSharesGet' smart constructor.

5858data RemarketingListSharesGet = RemarketingListSharesGet

59− { _rlsgProFileId :: !(JSONText Int64)

60− , _rlsgRemarketingListId :: !(JSONText Int64)

59+ { _rlsgProFileId :: !(Textual Int64)

60+ , _rlsgRemarketingListId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'RemarketingListSharesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Patch.hs+4−4

@@ -48,9 +48,9 @@ type RemarketingListSharesPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "remarketingListShares" :>

53− QueryParam "remarketingListId" (JSONText Int64) :>

53+ QueryParam "remarketingListId" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] RemarketingListShare :>

5656 Patch '[JSON] RemarketingListShare

@@ -60,9 +60,9 @@ type RemarketingListSharesPatchResource =

6060--

6161-- /See:/ 'remarketingListSharesPatch' smart constructor.

6262data RemarketingListSharesPatch = RemarketingListSharesPatch

63− { _rlspProFileId :: !(JSONText Int64)

63+ { _rlspProFileId :: !(Textual Int64)

6464 , _rlspPayload :: !RemarketingListShare

65− , _rlspRemarketingListId :: !(JSONText Int64)

65+ , _rlspRemarketingListId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'RemarketingListSharesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingListShares/Update.hs+2−2

@@ -46,7 +46,7 @@ type RemarketingListSharesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "remarketingListShares" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] RemarketingListShare :>

@@ -56,7 +56,7 @@ type RemarketingListSharesUpdateResource =

5656--

5757-- /See:/ 'remarketingListSharesUpdate' smart constructor.

5858data RemarketingListSharesUpdate = RemarketingListSharesUpdate

59− { _rlsuProFileId :: !(JSONText Int64)

59+ { _rlsuProFileId :: !(Textual Int64)

6060 , _rlsuPayload :: !RemarketingListShare

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Get.hs+4−4

@@ -46,9 +46,9 @@ type RemarketingListsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "remarketingLists" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] RemarketingList

5454

@@ -56,8 +56,8 @@ type RemarketingListsGetResource =

5656--

5757-- /See:/ 'remarketingListsGet' smart constructor.

5858data RemarketingListsGet = RemarketingListsGet

59− { _rlgProFileId :: !(JSONText Int64)

60− , _rlgId :: !(JSONText Int64)

59+ { _rlgProFileId :: !(Textual Int64)

60+ , _rlgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'RemarketingListsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Insert.hs+2−2

@@ -46,7 +46,7 @@ type RemarketingListsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "remarketingLists" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] RemarketingList :>

@@ -56,7 +56,7 @@ type RemarketingListsInsertResource =

5656--

5757-- /See:/ 'remarketingListsInsert' smart constructor.

5858data RemarketingListsInsert = RemarketingListsInsert

59− { _rliProFileId :: !(JSONText Int64)

59+ { _rliProFileId :: !(Textual Int64)

6060 , _rliPayload :: !RemarketingList

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/List.hs+8−8

@@ -53,10 +53,10 @@ type RemarketingListsListResource =

5353 "dfareporting" :>

5454 "v2.2" :>

5555 "userprofiles" :>

56− Capture "profileId" (JSONText Int64) :>

56+ Capture "profileId" (Textual Int64) :>

5757 "remarketingLists" :>

58− QueryParam "advertiserId" (JSONText Int64) :>

59− QueryParam "floodlightActivityId" (JSONText Int64) :>

58+ QueryParam "advertiserId" (Textual Int64) :>

59+ QueryParam "floodlightActivityId" (Textual Int64) :>

6060 QueryParam "sortOrder" RemarketingListsListSortOrder

6161 :>

6262 QueryParam "active" Bool :>

@@ -64,7 +64,7 @@ type RemarketingListsListResource =

6464 QueryParam "pageToken" Text :>

6565 QueryParam "sortField" RemarketingListsListSortField

6666 :>

67− QueryParam "maxResults" (JSONText Int32) :>

67+ QueryParam "maxResults" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] RemarketingListsListResponse

7070

@@ -72,15 +72,15 @@ type RemarketingListsListResource =

7272--

7373-- /See:/ 'remarketingListsList' smart constructor.

7474data RemarketingListsList = RemarketingListsList

75− { _rllFloodlightActivityId :: !(Maybe (JSONText Int64))

76− , _rllAdvertiserId :: !(JSONText Int64)

77− , _rllProFileId :: !(JSONText Int64)

75+ { _rllFloodlightActivityId :: !(Maybe (Textual Int64))

76+ , _rllAdvertiserId :: !(Textual Int64)

77+ , _rllProFileId :: !(Textual Int64)

7878 , _rllSortOrder :: !(Maybe RemarketingListsListSortOrder)

7979 , _rllActive :: !(Maybe Bool)

8080 , _rllName :: !(Maybe Text)

8181 , _rllPageToken :: !(Maybe Text)

8282 , _rllSortField :: !(Maybe RemarketingListsListSortField)

83− , _rllMaxResults :: !(Maybe (JSONText Int32))

83+ , _rllMaxResults :: !(Maybe (Textual Int32))

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

8686-- | Creates a value of 'RemarketingListsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Patch.hs+4−4

@@ -48,9 +48,9 @@ type RemarketingListsPatchResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "remarketingLists" :>

53− QueryParam "id" (JSONText Int64) :>

53+ QueryParam "id" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :>

5555 ReqBody '[JSON] RemarketingList :>

5656 Patch '[JSON] RemarketingList

@@ -60,9 +60,9 @@ type RemarketingListsPatchResource =

6060--

6161-- /See:/ 'remarketingListsPatch' smart constructor.

6262data RemarketingListsPatch = RemarketingListsPatch

63− { _rlpProFileId :: !(JSONText Int64)

63+ { _rlpProFileId :: !(Textual Int64)

6464 , _rlpPayload :: !RemarketingList

65− , _rlpId :: !(JSONText Int64)

65+ , _rlpId :: !(Textual Int64)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'RemarketingListsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/RemarketingLists/Update.hs+2−2

@@ -46,7 +46,7 @@ type RemarketingListsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "remarketingLists" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] RemarketingList :>

@@ -56,7 +56,7 @@ type RemarketingListsUpdateResource =

5656--

5757-- /See:/ 'remarketingListsUpdate' smart constructor.

5858data RemarketingListsUpdate = RemarketingListsUpdate

59− { _rluProFileId :: !(JSONText Int64)

59+ { _rluProFileId :: !(Textual Int64)

6060 , _rluPayload :: !RemarketingList

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/CompatibleFields/Query.hs+2−2

@@ -48,7 +48,7 @@ type ReportsCompatibleFieldsQueryResource =

4848 "dfareporting" :>

4949 "v2.2" :>

5050 "userprofiles" :>

51− Capture "profileId" (JSONText Int64) :>

51+ Capture "profileId" (Textual Int64) :>

5252 "reports" :>

5353 "compatiblefields" :>

5454 "query" :>

@@ -62,7 +62,7 @@ type ReportsCompatibleFieldsQueryResource =

6262--

6363-- /See:/ 'reportsCompatibleFieldsQuery' smart constructor.

6464data ReportsCompatibleFieldsQuery = ReportsCompatibleFieldsQuery

65− { _rcfqProFileId :: !(JSONText Int64)

65+ { _rcfqProFileId :: !(Textual Int64)

6666 , _rcfqPayload :: !Report

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Delete.hs+4−4

@@ -46,17 +46,17 @@ type ReportsDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "reports" :>

51− Capture "reportId" (JSONText Int64) :>

51+ Capture "reportId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes a report by its ID.

5555--

5656-- /See:/ 'reportsDelete' smart constructor.

5757data ReportsDelete = ReportsDelete

58− { _rdReportId :: !(JSONText Int64)

59− , _rdProFileId :: !(JSONText Int64)

58+ { _rdReportId :: !(Textual Int64)

59+ , _rdProFileId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'ReportsDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/Get.hs+9−9

@@ -47,21 +47,21 @@ type ReportsFilesGetResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "reports" :>

52− Capture "reportId" (JSONText Int64) :>

52+ Capture "reportId" (Textual Int64) :>

5353 "files" :>

54− Capture "fileId" (JSONText Int64) :>

54+ Capture "fileId" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] File

5656 :<|>

5757 "dfareporting" :>

5858 "v2.2" :>

5959 "userprofiles" :>

60− Capture "profileId" (JSONText Int64) :>

60+ Capture "profileId" (Textual Int64) :>

6161 "reports" :>

62− Capture "reportId" (JSONText Int64) :>

62+ Capture "reportId" (Textual Int64) :>

6363 "files" :>

64− Capture "fileId" (JSONText Int64) :>

64+ Capture "fileId" (Textual Int64) :>

6565 QueryParam "alt" AltMedia :>

6666 Get '[OctetStream] Stream

6767

@@ -69,9 +69,9 @@ type ReportsFilesGetResource =

6969--

7070-- /See:/ 'reportsFilesGet' smart constructor.

7171data ReportsFilesGet = ReportsFilesGet

72− { _rfgReportId :: !(JSONText Int64)

73− , _rfgProFileId :: !(JSONText Int64)

74− , _rfgFileId :: !(JSONText Int64)

72+ { _rfgReportId :: !(Textual Int64)

73+ , _rfgProFileId :: !(Textual Int64)

74+ , _rfgFileId :: !(Textual Int64)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

7777-- | Creates a value of 'ReportsFilesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/List.hs+6−6

@@ -50,26 +50,26 @@ type ReportsFilesListResource =

5050 "dfareporting" :>

5151 "v2.2" :>

5252 "userprofiles" :>

53− Capture "profileId" (JSONText Int64) :>

53+ Capture "profileId" (Textual Int64) :>

5454 "reports" :>

55− Capture "reportId" (JSONText Int64) :>

55+ Capture "reportId" (Textual Int64) :>

5656 "files" :>

5757 QueryParam "sortOrder" ReportsFilesListSortOrder :>

5858 QueryParam "pageToken" Text :>

5959 QueryParam "sortField" ReportsFilesListSortField :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] FileList

6262

6363-- | Lists files for a report.

6464--

6565-- /See:/ 'reportsFilesList' smart constructor.

6666data ReportsFilesList = ReportsFilesList

67− { _rflReportId :: !(JSONText Int64)

68− , _rflProFileId :: !(JSONText Int64)

67+ { _rflReportId :: !(Textual Int64)

68+ , _rflProFileId :: !(Textual Int64)

6969 , _rflSortOrder :: !ReportsFilesListSortOrder

7070 , _rflPageToken :: !(Maybe Text)

7171 , _rflSortField :: !ReportsFilesListSortField

72− , _rflMaxResults :: !(Maybe (JSONText Int32))

72+ , _rflMaxResults :: !(Maybe (Textual Int32))

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'ReportsFilesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Get.hs+4−4

@@ -46,17 +46,17 @@ type ReportsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "reports" :>

51− Capture "reportId" (JSONText Int64) :>

51+ Capture "reportId" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Report

5353

5454-- | Retrieves a report by its ID.

5555--

5656-- /See:/ 'reportsGet' smart constructor.

5757data ReportsGet = ReportsGet

58− { _rgReportId :: !(JSONText Int64)

59− , _rgProFileId :: !(JSONText Int64)

58+ { _rgReportId :: !(Textual Int64)

59+ , _rgProFileId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'ReportsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Insert.hs+2−2

@@ -46,7 +46,7 @@ type ReportsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "reports" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Report :> Post '[JSON] Report

@@ -55,7 +55,7 @@ type ReportsInsertResource =

5555--

5656-- /See:/ 'reportsInsert' smart constructor.

5757data ReportsInsert = ReportsInsert

58− { _riProFileId :: !(JSONText Int64)

58+ { _riProFileId :: !(Textual Int64)

5959 , _riPayload :: !Report

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/List.hs+4−4

@@ -50,25 +50,25 @@ type ReportsListResource =

5050 "dfareporting" :>

5151 "v2.2" :>

5252 "userprofiles" :>

53− Capture "profileId" (JSONText Int64) :>

53+ Capture "profileId" (Textual Int64) :>

5454 "reports" :>

5555 QueryParam "sortOrder" ReportsListSortOrder :>

5656 QueryParam "scope" ReportsListScope :>

5757 QueryParam "pageToken" Text :>

5858 QueryParam "sortField" ReportsListSortField :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] ReportList

6161

6262-- | Retrieves list of reports.

6363--

6464-- /See:/ 'reportsList' smart constructor.

6565data ReportsList = ReportsList

66− { _rlProFileId :: !(JSONText Int64)

66+ { _rlProFileId :: !(Textual Int64)

6767 , _rlSortOrder :: !ReportsListSortOrder

6868 , _rlScope :: !ReportsListScope

6969 , _rlPageToken :: !(Maybe Text)

7070 , _rlSortField :: !ReportsListSortField

71− , _rlMaxResults :: !(Maybe (JSONText Int32))

71+ , _rlMaxResults :: !(Maybe (Textual Int32))

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'ReportsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Patch.hs+4−4

@@ -47,9 +47,9 @@ type ReportsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "reports" :>

52− Capture "reportId" (JSONText Int64) :>

52+ Capture "reportId" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Report :> Patch '[JSON] Report

5555

@@ -57,8 +57,8 @@ type ReportsPatchResource =

5757--

5858-- /See:/ 'reportsPatch' smart constructor.

5959data ReportsPatch = ReportsPatch

60− { _rpReportId :: !(JSONText Int64)

61− , _rpProFileId :: !(JSONText Int64)

60+ { _rpReportId :: !(Textual Int64)

61+ , _rpProFileId :: !(Textual Int64)

6262 , _rpPayload :: !Report

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Run.hs+4−4

@@ -47,9 +47,9 @@ type ReportsRunResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "reports" :>

52− Capture "reportId" (JSONText Int64) :>

52+ Capture "reportId" (Textual Int64) :>

5353 "run" :>

5454 QueryParam "synchronous" Bool :>

5555 QueryParam "alt" AltJSON :> Post '[JSON] File

@@ -59,8 +59,8 @@ type ReportsRunResource =

5959-- /See:/ 'reportsRun' smart constructor.

6060data ReportsRun = ReportsRun

6161 { _rrSynchronous :: !(Maybe Bool)

62− , _rrReportId :: !(JSONText Int64)

63− , _rrProFileId :: !(JSONText Int64)

62+ , _rrReportId :: !(Textual Int64)

63+ , _rrProFileId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'ReportsRun' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Update.hs+4−4

@@ -47,9 +47,9 @@ type ReportsUpdateResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "reports" :>

52− Capture "reportId" (JSONText Int64) :>

52+ Capture "reportId" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Report :> Put '[JSON] Report

5555

@@ -57,8 +57,8 @@ type ReportsUpdateResource =

5757--

5858-- /See:/ 'reportsUpdate' smart constructor.

5959data ReportsUpdate = ReportsUpdate

60− { _ruReportId :: !(JSONText Int64)

61− , _ruProFileId :: !(JSONText Int64)

60+ { _ruReportId :: !(Textual Int64)

61+ , _ruProFileId :: !(Textual Int64)

6262 , _ruPayload :: !Report

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Get.hs+4−4

@@ -46,17 +46,17 @@ type SitesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "sites" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Site

5353

5454-- | Gets one site by ID.

5555--

5656-- /See:/ 'sitesGet' smart constructor.

5757data SitesGet = SitesGet

58− { _sggProFileId :: !(JSONText Int64)

59− , _sggId :: !(JSONText Int64)

58+ { _sggProFileId :: !(Textual Int64)

59+ , _sggId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'SitesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Insert.hs+2−2

@@ -46,7 +46,7 @@ type SitesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "sites" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Site :> Post '[JSON] Site

@@ -55,7 +55,7 @@ type SitesInsertResource =

5555--

5656-- /See:/ 'sitesInsert' smart constructor.

5757data SitesInsert = SitesInsert

58− { _sProFileId :: !(JSONText Int64)

58+ { _sProFileId :: !(Textual Int64)

5959 , _sPayload :: !Site

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/List.hs+12−12

@@ -60,26 +60,26 @@ type SitesListResource =

6060 "dfareporting" :>

6161 "v2.2" :>

6262 "userprofiles" :>

63− Capture "profileId" (JSONText Int64) :>

63+ Capture "profileId" (Textual Int64) :>

6464 "sites" :>

6565 QueryParam "unmappedSite" Bool :>

66− QueryParams "campaignIds" (JSONText Int64) :>

66+ QueryParams "campaignIds" (Textual Int64) :>

6767 QueryParam "searchString" Text :>

6868 QueryParam "acceptsInterstitialPlacements" Bool :>

6969 QueryParam "acceptsPublisherPaidPlacements" Bool :>

70− QueryParams "ids" (JSONText Int64) :>

71− QueryParams "directorySiteIds" (JSONText Int64) :>

70+ QueryParams "ids" (Textual Int64) :>

71+ QueryParams "directorySiteIds" (Textual Int64) :>

7272 QueryParam "sortOrder" SitesListSortOrder :>

7373 QueryParam "pageToken" Text :>

7474 QueryParam "sortField" SitesListSortField :>

75− QueryParam "subaccountId" (JSONText Int64) :>

75+ QueryParam "subaccountId" (Textual Int64) :>

7676 QueryParam "acceptsInStreamVideoPlacements"

7777 Bool

7878 :>

7979 QueryParam "approved" Bool :>

8080 QueryParam "adWordsSite" Bool :>

8181 QueryParam "maxResults"

82− (JSONText Int32)

82+ (Textual Int32)

8383 :>

8484 QueryParam "alt" AltJSON :>

8585 Get '[JSON] SitesListResponse

@@ -89,21 +89,21 @@ type SitesListResource =

8989-- /See:/ 'sitesList' smart constructor.

9090data SitesList = SitesList

9191 { _sitUnmAppedSite :: !(Maybe Bool)

92− , _sitCampaignIds :: !(Maybe [JSONText Int64])

92+ , _sitCampaignIds :: !(Maybe [Textual Int64])

9393 , _sitSearchString :: !(Maybe Text)

9494 , _sitAcceptsInterstitialPlacements :: !(Maybe Bool)

9595 , _sitAcceptsPublisherPaidPlacements :: !(Maybe Bool)

96− , _sitIds :: !(Maybe [JSONText Int64])

97− , _sitProFileId :: !(JSONText Int64)

98− , _sitDirectorySiteIds :: !(Maybe [JSONText Int64])

96+ , _sitIds :: !(Maybe [Textual Int64])

97+ , _sitProFileId :: !(Textual Int64)

98+ , _sitDirectorySiteIds :: !(Maybe [Textual Int64])

9999 , _sitSortOrder :: !(Maybe SitesListSortOrder)

100100 , _sitPageToken :: !(Maybe Text)

101101 , _sitSortField :: !(Maybe SitesListSortField)

102− , _sitSubAccountId :: !(Maybe (JSONText Int64))

102+ , _sitSubAccountId :: !(Maybe (Textual Int64))

103103 , _sitAcceptsInStreamVideoPlacements :: !(Maybe Bool)

104104 , _sitApproved :: !(Maybe Bool)

105105 , _sitAdWordsSite :: !(Maybe Bool)

106− , _sitMaxResults :: !(Maybe (JSONText Int32))

106+ , _sitMaxResults :: !(Maybe (Textual Int32))

107107 } deriving (Eq,Show,Data,Typeable,Generic)

108108

109109-- | Creates a value of 'SitesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Patch.hs+4−4

@@ -47,9 +47,9 @@ type SitesPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "sites" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Site :> Patch '[JSON] Site

5555

@@ -57,9 +57,9 @@ type SitesPatchResource =

5757--

5858-- /See:/ 'sitesPatch' smart constructor.

5959data SitesPatch = SitesPatch

60− { _spProFileId :: !(JSONText Int64)

60+ { _spProFileId :: !(Textual Int64)

6161 , _spPayload :: !Site

62− , _spId :: !(JSONText Int64)

62+ , _spId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'SitesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sites/Update.hs+2−2

@@ -46,7 +46,7 @@ type SitesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "sites" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Site :> Put '[JSON] Site

@@ -55,7 +55,7 @@ type SitesUpdateResource =

5555--

5656-- /See:/ 'sitesUpdate' smart constructor.

5757data SitesUpdate = SitesUpdate

58− { _suProFileId :: !(JSONText Int64)

58+ { _suProFileId :: !(Textual Int64)

5959 , _suPayload :: !Site

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Get.hs+4−4

@@ -46,17 +46,17 @@ type SizesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "sizes" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Size

5353

5454-- | Gets one size by ID.

5555--

5656-- /See:/ 'sizesGet' smart constructor.

5757data SizesGet = SizesGet

58− { _sgProFileId :: !(JSONText Int64)

59− , _sgId :: !(JSONText Int64)

58+ { _sgProFileId :: !(Textual Int64)

59+ , _sgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'SizesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/Insert.hs+2−2

@@ -46,7 +46,7 @@ type SizesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "sizes" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] Size :> Post '[JSON] Size

@@ -55,7 +55,7 @@ type SizesInsertResource =

5555--

5656-- /See:/ 'sizesInsert' smart constructor.

5757data SizesInsert = SizesInsert

58− { _siProFileId :: !(JSONText Int64)

58+ { _siProFileId :: !(Textual Int64)

5959 , _siPayload :: !Size

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Sizes/List.hs+8−8

@@ -49,11 +49,11 @@ type SizesListResource =

4949 "dfareporting" :>

5050 "v2.2" :>

5151 "userprofiles" :>

52− Capture "profileId" (JSONText Int64) :>

52+ Capture "profileId" (Textual Int64) :>

5353 "sizes" :>

54− QueryParam "height" (JSONText Int32) :>

55− QueryParams "ids" (JSONText Int64) :>

56− QueryParam "width" (JSONText Int32) :>

54+ QueryParam "height" (Textual Int32) :>

55+ QueryParams "ids" (Textual Int64) :>

56+ QueryParam "width" (Textual Int32) :>

5757 QueryParam "iabStandard" Bool :>

5858 QueryParam "alt" AltJSON :>

5959 Get '[JSON] SizesListResponse

@@ -62,10 +62,10 @@ type SizesListResource =

6262--

6363-- /See:/ 'sizesList' smart constructor.

6464data SizesList = SizesList

65− { _slHeight :: !(Maybe (JSONText Int32))

66− , _slIds :: !(Maybe [JSONText Int64])

67− , _slWidth :: !(Maybe (JSONText Int32))

68− , _slProFileId :: !(JSONText Int64)

65+ { _slHeight :: !(Maybe (Textual Int32))

66+ , _slIds :: !(Maybe [Textual Int64])

67+ , _slWidth :: !(Maybe (Textual Int32))

68+ , _slProFileId :: !(Textual Int64)

6969 , _slIabStandard :: !(Maybe Bool)

7070 } deriving (Eq,Show,Data,Typeable,Generic)

7171

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Get.hs+4−4

@@ -46,17 +46,17 @@ type SubAccountsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "subaccounts" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] SubAccount

5353

5454-- | Gets one subaccount by ID.

5555--

5656-- /See:/ 'subAccountsGet' smart constructor.

5757data SubAccountsGet = SubAccountsGet

58− { _sagProFileId :: !(JSONText Int64)

59− , _sagId :: !(JSONText Int64)

58+ { _sagProFileId :: !(Textual Int64)

59+ , _sagId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'SubAccountsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Insert.hs+2−2

@@ -46,7 +46,7 @@ type SubAccountsInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "subaccounts" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] SubAccount :> Post '[JSON] SubAccount

@@ -55,7 +55,7 @@ type SubAccountsInsertResource =

5555--

5656-- /See:/ 'subAccountsInsert' smart constructor.

5757data SubAccountsInsert = SubAccountsInsert

58− { _saiProFileId :: !(JSONText Int64)

58+ { _saiProFileId :: !(Textual Int64)

5959 , _saiPayload :: !SubAccount

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/List.hs+6−6

@@ -51,14 +51,14 @@ type SubAccountsListResource =

5151 "dfareporting" :>

5252 "v2.2" :>

5353 "userprofiles" :>

54− Capture "profileId" (JSONText Int64) :>

54+ Capture "profileId" (Textual Int64) :>

5555 "subaccounts" :>

5656 QueryParam "searchString" Text :>

57− QueryParams "ids" (JSONText Int64) :>

57+ QueryParams "ids" (Textual Int64) :>

5858 QueryParam "sortOrder" SubAccountsListSortOrder :>

5959 QueryParam "pageToken" Text :>

6060 QueryParam "sortField" SubAccountsListSortField :>

61− QueryParam "maxResults" (JSONText Int32) :>

61+ QueryParam "maxResults" (Textual Int32) :>

6262 QueryParam "alt" AltJSON :>

6363 Get '[JSON] SubAccountsListResponse

6464

@@ -67,12 +67,12 @@ type SubAccountsListResource =

6767-- /See:/ 'subAccountsList' smart constructor.

6868data SubAccountsList = SubAccountsList

6969 { _salSearchString :: !(Maybe Text)

70− , _salIds :: !(Maybe [JSONText Int64])

71− , _salProFileId :: !(JSONText Int64)

70+ , _salIds :: !(Maybe [Textual Int64])

71+ , _salProFileId :: !(Textual Int64)

7272 , _salSortOrder :: !(Maybe SubAccountsListSortOrder)

7373 , _salPageToken :: !(Maybe Text)

7474 , _salSortField :: !(Maybe SubAccountsListSortField)

75− , _salMaxResults :: !(Maybe (JSONText Int32))

75+ , _salMaxResults :: !(Maybe (Textual Int32))

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'SubAccountsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Patch.hs+4−4

@@ -47,9 +47,9 @@ type SubAccountsPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "subaccounts" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] SubAccount :>

5555 Patch '[JSON] SubAccount

@@ -58,9 +58,9 @@ type SubAccountsPatchResource =

5858--

5959-- /See:/ 'subAccountsPatch' smart constructor.

6060data SubAccountsPatch = SubAccountsPatch

61− { _sapProFileId :: !(JSONText Int64)

61+ { _sapProFileId :: !(Textual Int64)

6262 , _sapPayload :: !SubAccount

63− , _sapId :: !(JSONText Int64)

63+ , _sapId :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'SubAccountsPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/SubAccounts/Update.hs+2−2

@@ -46,7 +46,7 @@ type SubAccountsUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "subaccounts" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] SubAccount :> Put '[JSON] SubAccount

@@ -55,7 +55,7 @@ type SubAccountsUpdateResource =

5555--

5656-- /See:/ 'subAccountsUpdate' smart constructor.

5757data SubAccountsUpdate = SubAccountsUpdate

58− { _sauProFileId :: !(JSONText Int64)

58+ { _sauProFileId :: !(Textual Int64)

5959 , _sauPayload :: !SubAccount

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/Get.hs+4−4

@@ -46,9 +46,9 @@ type TargetableRemarketingListsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "targetableRemarketingLists" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] TargetableRemarketingList

5454

@@ -56,8 +56,8 @@ type TargetableRemarketingListsGetResource =

5656--

5757-- /See:/ 'targetableRemarketingListsGet' smart constructor.

5858data TargetableRemarketingListsGet = TargetableRemarketingListsGet

59− { _trlgProFileId :: !(JSONText Int64)

60− , _trlgId :: !(JSONText Int64)

59+ { _trlgProFileId :: !(Textual Int64)

60+ , _trlgId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'TargetableRemarketingListsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/TargetableRemarketingLists/List.hs+6−6

@@ -52,9 +52,9 @@ type TargetableRemarketingListsListResource =

5252 "dfareporting" :>

5353 "v2.2" :>

5454 "userprofiles" :>

55− Capture "profileId" (JSONText Int64) :>

55+ Capture "profileId" (Textual Int64) :>

5656 "targetableRemarketingLists" :>

57− QueryParam "advertiserId" (JSONText Int64) :>

57+ QueryParam "advertiserId" (Textual Int64) :>

5858 QueryParam "sortOrder"

5959 TargetableRemarketingListsListSortOrder

6060 :>

@@ -64,7 +64,7 @@ type TargetableRemarketingListsListResource =

6464 QueryParam "sortField"

6565 TargetableRemarketingListsListSortField

6666 :>

67− QueryParam "maxResults" (JSONText Int32) :>

67+ QueryParam "maxResults" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON]

7070 TargetableRemarketingListsListResponse

@@ -73,14 +73,14 @@ type TargetableRemarketingListsListResource =

7373--

7474-- /See:/ 'targetableRemarketingListsList' smart constructor.

7575data TargetableRemarketingListsList = TargetableRemarketingListsList

76− { _trllAdvertiserId :: !(JSONText Int64)

77− , _trllProFileId :: !(JSONText Int64)

76+ { _trllAdvertiserId :: !(Textual Int64)

77+ , _trllProFileId :: !(Textual Int64)

7878 , _trllSortOrder :: !(Maybe TargetableRemarketingListsListSortOrder)

7979 , _trllActive :: !(Maybe Bool)

8080 , _trllName :: !(Maybe Text)

8181 , _trllPageToken :: !(Maybe Text)

8282 , _trllSortField :: !(Maybe TargetableRemarketingListsListSortField)

83− , _trllMaxResults :: !(Maybe (JSONText Int32))

83+ , _trllMaxResults :: !(Maybe (Textual Int32))

8484 } deriving (Eq,Show,Data,Typeable,Generic)

8585

8686-- | Creates a value of 'TargetableRemarketingListsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserProFiles/Get.hs+2−2

@@ -45,14 +45,14 @@ type UserProFilesGetResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 QueryParam "alt" AltJSON :> Get '[JSON] UserProFile

5050

5151-- | Gets one user profile by ID.

5252--

5353-- /See:/ 'userProFilesGet' smart constructor.

5454newtype UserProFilesGet = UserProFilesGet

55− { _upfgProFileId :: JSONText Int64

55+ { _upfgProFileId :: Textual Int64

5656 } deriving (Eq,Show,Data,Typeable,Generic)

5757

5858-- | Creates a value of 'UserProFilesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/Get.hs+4−4

@@ -46,9 +46,9 @@ type UserRolePermissionGroupsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRolePermissionGroups" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] UserRolePermissionGroup

5454

@@ -56,8 +56,8 @@ type UserRolePermissionGroupsGetResource =

5656--

5757-- /See:/ 'userRolePermissionGroupsGet' smart constructor.

5858data UserRolePermissionGroupsGet = UserRolePermissionGroupsGet

59− { _urpggProFileId :: !(JSONText Int64)

60− , _urpggId :: !(JSONText Int64)

59+ { _urpggProFileId :: !(Textual Int64)

60+ , _urpggId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'UserRolePermissionGroupsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissionGroups/List.hs+2−2

@@ -45,7 +45,7 @@ type UserRolePermissionGroupsListResource =

4545 "dfareporting" :>

4646 "v2.2" :>

4747 "userprofiles" :>

48− Capture "profileId" (JSONText Int64) :>

48+ Capture "profileId" (Textual Int64) :>

4949 "userRolePermissionGroups" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] UserRolePermissionGroupsListResponse

@@ -54,7 +54,7 @@ type UserRolePermissionGroupsListResource =

5454--

5555-- /See:/ 'userRolePermissionGroupsList' smart constructor.

5656newtype UserRolePermissionGroupsList = UserRolePermissionGroupsList

57− { _urpglProFileId :: JSONText Int64

57+ { _urpglProFileId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'UserRolePermissionGroupsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/Get.hs+4−4

@@ -46,9 +46,9 @@ type UserRolePermissionsGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRolePermissions" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] UserRolePermission

5454

@@ -56,8 +56,8 @@ type UserRolePermissionsGetResource =

5656--

5757-- /See:/ 'userRolePermissionsGet' smart constructor.

5858data UserRolePermissionsGet = UserRolePermissionsGet

59− { _uProFileId :: !(JSONText Int64)

60− , _uId :: !(JSONText Int64)

59+ { _uProFileId :: !(Textual Int64)

60+ , _uId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'UserRolePermissionsGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRolePermissions/List.hs+4−4

@@ -46,9 +46,9 @@ type UserRolePermissionsListResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRolePermissions" :>

51− QueryParams "ids" (JSONText Int64) :>

51+ QueryParams "ids" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :>

5353 Get '[JSON] UserRolePermissionsListResponse

5454

@@ -56,8 +56,8 @@ type UserRolePermissionsListResource =

5656--

5757-- /See:/ 'userRolePermissionsList' smart constructor.

5858data UserRolePermissionsList = UserRolePermissionsList

59− { _urplIds :: !(Maybe [JSONText Int64])

60− , _urplProFileId :: !(JSONText Int64)

59+ { _urplIds :: !(Maybe [Textual Int64])

60+ , _urplProFileId :: !(Textual Int64)

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

6363-- | Creates a value of 'UserRolePermissionsList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Delete.hs+4−4

@@ -46,17 +46,17 @@ type UserRolesDeleteResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRoles" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes an existing user role.

5555--

5656-- /See:/ 'userRolesDelete' smart constructor.

5757data UserRolesDelete = UserRolesDelete

58− { _urdProFileId :: !(JSONText Int64)

59− , _urdId :: !(JSONText Int64)

58+ { _urdProFileId :: !(Textual Int64)

59+ , _urdId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'UserRolesDelete' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Get.hs+4−4

@@ -46,17 +46,17 @@ type UserRolesGetResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRoles" :>

51− Capture "id" (JSONText Int64) :>

51+ Capture "id" (Textual Int64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] UserRole

5353

5454-- | Gets one user role by ID.

5555--

5656-- /See:/ 'userRolesGet' smart constructor.

5757data UserRolesGet = UserRolesGet

58− { _urgProFileId :: !(JSONText Int64)

59− , _urgId :: !(JSONText Int64)

58+ { _urgProFileId :: !(Textual Int64)

59+ , _urgId :: !(Textual Int64)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'UserRolesGet' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Insert.hs+2−2

@@ -46,7 +46,7 @@ type UserRolesInsertResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRoles" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] UserRole :> Post '[JSON] UserRole

@@ -55,7 +55,7 @@ type UserRolesInsertResource =

5555--

5656-- /See:/ 'userRolesInsert' smart constructor.

5757data UserRolesInsert = UserRolesInsert

58− { _uriProFileId :: !(JSONText Int64)

58+ { _uriProFileId :: !(Textual Int64)

5959 , _uriPayload :: !UserRole

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/List.hs+8−8

@@ -53,16 +53,16 @@ type UserRolesListResource =

5353 "dfareporting" :>

5454 "v2.2" :>

5555 "userprofiles" :>

56− Capture "profileId" (JSONText Int64) :>

56+ Capture "profileId" (Textual Int64) :>

5757 "userRoles" :>

5858 QueryParam "searchString" Text :>

59− QueryParams "ids" (JSONText Int64) :>

59+ QueryParams "ids" (Textual Int64) :>

6060 QueryParam "sortOrder" UserRolesListSortOrder :>

6161 QueryParam "accountUserRoleOnly" Bool :>

6262 QueryParam "pageToken" Text :>

6363 QueryParam "sortField" UserRolesListSortField :>

64− QueryParam "subaccountId" (JSONText Int64) :>

65− QueryParam "maxResults" (JSONText Int32) :>

64+ QueryParam "subaccountId" (Textual Int64) :>

65+ QueryParam "maxResults" (Textual Int32) :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] UserRolesListResponse

6868

@@ -71,14 +71,14 @@ type UserRolesListResource =

7171-- /See:/ 'userRolesList' smart constructor.

7272data UserRolesList = UserRolesList

7373 { _urlSearchString :: !(Maybe Text)

74− , _urlIds :: !(Maybe [JSONText Int64])

75− , _urlProFileId :: !(JSONText Int64)

74+ , _urlIds :: !(Maybe [Textual Int64])

75+ , _urlProFileId :: !(Textual Int64)

7676 , _urlSortOrder :: !(Maybe UserRolesListSortOrder)

7777 , _urlAccountUserRoleOnly :: !(Maybe Bool)

7878 , _urlPageToken :: !(Maybe Text)

7979 , _urlSortField :: !(Maybe UserRolesListSortField)

80− , _urlSubAccountId :: !(Maybe (JSONText Int64))

81− , _urlMaxResults :: !(Maybe (JSONText Int32))

80+ , _urlSubAccountId :: !(Maybe (Textual Int64))

81+ , _urlMaxResults :: !(Maybe (Textual Int32))

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

8484-- | Creates a value of 'UserRolesList' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Patch.hs+4−4

@@ -47,9 +47,9 @@ type UserRolesPatchResource =

4747 "dfareporting" :>

4848 "v2.2" :>

4949 "userprofiles" :>

50− Capture "profileId" (JSONText Int64) :>

50+ Capture "profileId" (Textual Int64) :>

5151 "userRoles" :>

52− QueryParam "id" (JSONText Int64) :>

52+ QueryParam "id" (Textual Int64) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] UserRole :> Patch '[JSON] UserRole

5555

@@ -57,9 +57,9 @@ type UserRolesPatchResource =

5757--

5858-- /See:/ 'userRolesPatch' smart constructor.

5959data UserRolesPatch = UserRolesPatch

60− { _urpProFileId :: !(JSONText Int64)

60+ { _urpProFileId :: !(Textual Int64)

6161 , _urpPayload :: !UserRole

62− , _urpId :: !(JSONText Int64)

62+ , _urpId :: !(Textual Int64)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'UserRolesPatch' with the minimum fields required to make a request.

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/UserRoles/Update.hs+2−2

@@ -46,7 +46,7 @@ type UserRolesUpdateResource =

4646 "dfareporting" :>

4747 "v2.2" :>

4848 "userprofiles" :>

49− Capture "profileId" (JSONText Int64) :>

49+ Capture "profileId" (Textual Int64) :>

5050 "userRoles" :>

5151 QueryParam "alt" AltJSON :>

5252 ReqBody '[JSON] UserRole :> Put '[JSON] UserRole

@@ -55,7 +55,7 @@ type UserRolesUpdateResource =

5555--

5656-- /See:/ 'userRolesUpdate' smart constructor.

5757data UserRolesUpdate = UserRolesUpdate

58− { _uruProFileId :: !(JSONText Int64)

58+ { _uruProFileId :: !(Textual Int64)

5959 , _uruPayload :: !UserRole

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-dns/gen/Network/Google/DNS/Types/Product.hs+9−9

@@ -98,7 +98,7 @@ instance ToJSON ChangesListResponse where

9898data Project = Project

9999 { _pKind :: !Text

100100 , _pId :: !(Maybe Text)

101− , _pNumber :: !(Maybe (JSONText Word64))

101+ , _pNumber :: !(Maybe (Textual Word64))

102102 , _pQuota :: !(Maybe Quota)

103103 } deriving (Eq,Show,Data,Typeable,Generic)

104104

@@ -329,7 +329,7 @@ instance ToJSON ResourceRecordSetsListResponse where

329329--

330330-- /See:/ 'resourceRecordSet' smart constructor.

331331data ResourceRecordSet = ResourceRecordSet

332− { _rrsTtl :: !(Maybe (JSONText Int32))

332+ { _rrsTtl :: !(Maybe (Textual Int32))

333333 , _rrsKind :: !Text

334334 , _rrsName :: !(Maybe Text)

335335 , _rrsType :: !(Maybe Text)

@@ -417,7 +417,7 @@ data ManagedZone = ManagedZone

417417 , _mzKind :: !Text

418418 , _mzNameServerSet :: !(Maybe Text)

419419 , _mzName :: !(Maybe Text)

420− , _mzId :: !(Maybe (JSONText Word64))

420+ , _mzId :: !(Maybe (Textual Word64))

421421 , _mzDNSName :: !(Maybe Text)

422422 , _mzDescription :: !(Maybe Text)

423423 , _mzNameServers :: !(Maybe [Text])

@@ -541,13 +541,13 @@ instance ToJSON ManagedZone where

541541--

542542-- /See:/ 'quota' smart constructor.

543543data Quota = Quota

544− { _qRrSetDeletionsPerChange :: !(Maybe (JSONText Int32))

545− , _qRrSetsPerManagedZone :: !(Maybe (JSONText Int32))

544+ { _qRrSetDeletionsPerChange :: !(Maybe (Textual Int32))

545+ , _qRrSetsPerManagedZone :: !(Maybe (Textual Int32))

546546 , _qKind :: !Text

547− , _qResourceRecordsPerRrSet :: !(Maybe (JSONText Int32))

548− , _qRrSetAdditionsPerChange :: !(Maybe (JSONText Int32))

549− , _qManagedZones :: !(Maybe (JSONText Int32))

550− , _qTotalRrDataSizePerChange :: !(Maybe (JSONText Int32))

547+ , _qResourceRecordsPerRrSet :: !(Maybe (Textual Int32))

548+ , _qRrSetAdditionsPerChange :: !(Maybe (Textual Int32))

549+ , _qManagedZones :: !(Maybe (Textual Int32))

550+ , _qTotalRrDataSizePerChange :: !(Maybe (Textual Int32))

551551 } deriving (Eq,Show,Data,Typeable,Generic)

552552

553553-- | Creates a value of 'Quota' with the minimum fields required to make a request.

gogol-dns/gen/Network/Google/Resource/DNS/Changes/List.hs+2−2

@@ -56,7 +56,7 @@ type ChangesListResource =

5656 "changes" :>

5757 QueryParam "sortOrder" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "sortBy" ChangesListSortBy :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] ChangesListResponse

@@ -69,7 +69,7 @@ data ChangesList = ChangesList

6969 , _clSortOrder :: !(Maybe Text)

7070 , _clPageToken :: !(Maybe Text)

7171 , _clManagedZone :: !Text

72− , _clMaxResults :: !(Maybe (JSONText Int32))

72+ , _clMaxResults :: !(Maybe (Textual Int32))

7373 , _clSortBy :: !ChangesListSortBy

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

gogol-dns/gen/Network/Google/Resource/DNS/ManagedZones/List.hs+2−2

@@ -52,7 +52,7 @@ type ManagedZonesListResource =

5252 "managedZones" :>

5353 QueryParam "pageToken" Text :>

5454 QueryParam "dnsName" Text :>

55− QueryParam "maxResults" (JSONText Int32) :>

55+ QueryParam "maxResults" (Textual Int32) :>

5656 QueryParam "alt" AltJSON :>

5757 Get '[JSON] ManagedZonesListResponse

5858

@@ -63,7 +63,7 @@ data ManagedZonesList = ManagedZonesList

6363 { _mzlProject :: !Text

6464 , _mzlPageToken :: !(Maybe Text)

6565 , _mzlDNSName :: !(Maybe Text)

66− , _mzlMaxResults :: !(Maybe (JSONText Int32))

66+ , _mzlMaxResults :: !(Maybe (Textual Int32))

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

6969-- | Creates a value of 'ManagedZonesList' with the minimum fields required to make a request.

gogol-dns/gen/Network/Google/Resource/DNS/ResourceRecordSets/List.hs+2−2

@@ -57,7 +57,7 @@ type ResourceRecordSetsListResource =

5757 QueryParam "name" Text :>

5858 QueryParam "pageToken" Text :>

5959 QueryParam "type" Text :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] ResourceRecordSetsListResponse

6363

@@ -70,7 +70,7 @@ data ResourceRecordSetsList = ResourceRecordSetsList

7070 , _rrslPageToken :: !(Maybe Text)

7171 , _rrslType :: !(Maybe Text)

7272 , _rrslManagedZone :: !Text

73− , _rrslMaxResults :: !(Maybe (JSONText Int32))

73+ , _rrslMaxResults :: !(Maybe (Textual Int32))

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

7676-- | Creates a value of 'ResourceRecordSetsList' with the minimum fields required to make a request.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Product.hs+17−17

@@ -82,8 +82,8 @@ data QueryMetadata = QueryMetadata

8282 , _qmShareEmailAddress :: !(Maybe [Text])

8383 , _qmRunning :: !(Maybe Bool)

8484 , _qmDataRange :: !(Maybe QueryMetadataDataRange)

85− , _qmLatestReportRunTimeMs :: !(Maybe (JSONText Int64))

86− , _qmReportCount :: !(Maybe (JSONText Int32))

85+ , _qmLatestReportRunTimeMs :: !(Maybe (Textual Int64))

86+ , _qmReportCount :: !(Maybe (Textual Int32))

8787 , _qmTitle :: !(Maybe Text)

8888 , _qmSendNotification :: !(Maybe Bool)

8989 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -240,9 +240,9 @@ instance ToJSON QueryMetadata where

240240--

241241-- /See:/ 'runQueryRequest' smart constructor.

242242data RunQueryRequest = RunQueryRequest

243− { _rqrReportDataEndTimeMs :: !(Maybe (JSONText Int64))

243+ { _rqrReportDataEndTimeMs :: !(Maybe (Textual Int64))

244244 , _rqrDataRange :: !(Maybe RunQueryRequestDataRange)

245− , _rqrReportDataStartTimeMs :: !(Maybe (JSONText Int64))

245+ , _rqrReportDataStartTimeMs :: !(Maybe (Textual Int64))

246246 , _rqrTimezoneCode :: !(Maybe Text)

247247 } deriving (Eq,Show,Data,Typeable,Generic)

248248

@@ -428,7 +428,7 @@ data DownloadLineItemsRequest = DownloadLineItemsRequest

428428 { _dlirFilterType :: !(Maybe DownloadLineItemsRequestFilterType)

429429 , _dlirFormat :: !(Maybe DownloadLineItemsRequestFormat)

430430 , _dlirFileSpec :: !(Maybe DownloadLineItemsRequestFileSpec)

431− , _dlirFilterIds :: !(Maybe [JSONText Int64])

431+ , _dlirFilterIds :: !(Maybe [Textual Int64])

432432 } deriving (Eq,Show,Data,Typeable,Generic)

433433

434434-- | Creates a value of 'DownloadLineItemsRequest' with the minimum fields required to make a request.

@@ -589,9 +589,9 @@ instance ToJSON UploadLineItemsResponse where

589589-- /See:/ 'reportMetadata' smart constructor.

590590data ReportMetadata = ReportMetadata

591591 { _rmStatus :: !(Maybe ReportStatus)

592− , _rmReportDataEndTimeMs :: !(Maybe (JSONText Int64))

592+ , _rmReportDataEndTimeMs :: !(Maybe (Textual Int64))

593593 , _rmGoogleCloudStoragePath :: !(Maybe Text)

594− , _rmReportDataStartTimeMs :: !(Maybe (JSONText Int64))

594+ , _rmReportDataStartTimeMs :: !(Maybe (Textual Int64))

595595 } deriving (Eq,Show,Data,Typeable,Generic)

596596

597597-- | Creates a value of 'ReportMetadata' with the minimum fields required to make a request.

@@ -723,9 +723,9 @@ data RowStatus = RowStatus

723723 { _rsEntityName :: !(Maybe Text)

724724 , _rsChanged :: !(Maybe Bool)

725725 , _rsPersisted :: !(Maybe Bool)

726− , _rsRowNumber :: !(Maybe (JSONText Int32))

726+ , _rsRowNumber :: !(Maybe (Textual Int32))

727727 , _rsErrors :: !(Maybe [Text])

728− , _rsEntityId :: !(Maybe (JSONText Int64))

728+ , _rsEntityId :: !(Maybe (Textual Int64))

729729 } deriving (Eq,Show,Data,Typeable,Generic)

730730

731731-- | Creates a value of 'RowStatus' with the minimum fields required to make a request.

@@ -815,8 +815,8 @@ instance ToJSON RowStatus where

815815--

816816-- /See:/ 'reportKey' smart constructor.

817817data ReportKey = ReportKey

818− { _rkQueryId :: !(Maybe (JSONText Int64))

819− , _rkReportId :: !(Maybe (JSONText Int64))

818+ { _rkQueryId :: !(Maybe (Textual Int64))

819+ , _rkReportId :: !(Maybe (Textual Int64))

820820 } deriving (Eq,Show,Data,Typeable,Generic)

821821

822822-- | Creates a value of 'ReportKey' with the minimum fields required to make a request.

@@ -917,8 +917,8 @@ instance ToJSON UploadStatus where

917917-- /See:/ 'querySchedule' smart constructor.

918918data QuerySchedule = QuerySchedule

919919 { _qsFrequency :: !(Maybe QueryScheduleFrequency)

920− , _qsEndTimeMs :: !(Maybe (JSONText Int64))

921− , _qsNextRunMinuteOfDay :: !(Maybe (JSONText Int32))

920+ , _qsEndTimeMs :: !(Maybe (Textual Int64))

921+ , _qsNextRunMinuteOfDay :: !(Maybe (Textual Int32))

922922 , _qsNextRunTimezoneCode :: !(Maybe Text)

923923 } deriving (Eq,Show,Data,Typeable,Generic)

924924

@@ -1031,7 +1031,7 @@ instance ToJSON DownloadLineItemsResponse where

10311031-- /See:/ 'reportStatus' smart constructor.

10321032data ReportStatus = ReportStatus

10331033 { _rsState :: !(Maybe ReportStatusState)

1034− , _rsFinishTimeMs :: !(Maybe (JSONText Int64))

1034+ , _rsFinishTimeMs :: !(Maybe (Textual Int64))

10351035 , _rsFormat :: !(Maybe ReportStatusFormat)

10361036 , _rsFailure :: !(Maybe ReportFailure)

10371037 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1099,13 +1099,13 @@ instance ToJSON ReportStatus where

10991099--

11001100-- /See:/ 'query' smart constructor.

11011101data Query = Query

1102− { _qQueryId :: !(Maybe (JSONText Int64))

1103− , _qReportDataEndTimeMs :: !(Maybe (JSONText Int64))

1102+ { _qQueryId :: !(Maybe (Textual Int64))

1103+ , _qReportDataEndTimeMs :: !(Maybe (Textual Int64))

11041104 , _qSchedule :: !(Maybe QuerySchedule)

11051105 , _qKind :: !Text

11061106 , _qParams :: !(Maybe Parameters)

11071107 , _qMetadata :: !(Maybe QueryMetadata)

1108− , _qReportDataStartTimeMs :: !(Maybe (JSONText Int64))

1108+ , _qReportDataStartTimeMs :: !(Maybe (Textual Int64))

11091109 , _qTimezoneCode :: !(Maybe Text)

11101110 } deriving (Eq,Show,Data,Typeable,Generic)

11111111

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/DeleteQuery.hs+2−2

@@ -45,14 +45,14 @@ type QueriesDeleteQueryResource =

4545 "doubleclickbidmanager" :>

4646 "v1" :>

4747 "query" :>

48− Capture "queryId" (JSONText Int64) :>

48+ Capture "queryId" (Textual Int64) :>

4949 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5050

5151-- | Deletes a stored query as well as the associated stored reports.

5252--

5353-- /See:/ 'queriesDeleteQuery' smart constructor.

5454newtype QueriesDeleteQuery = QueriesDeleteQuery

55− { _qdqQueryId :: JSONText Int64

55+ { _qdqQueryId :: Textual Int64

5656 } deriving (Eq,Show,Data,Typeable,Generic)

5757

5858-- | Creates a value of 'QueriesDeleteQuery' with the minimum fields required to make a request.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/GetQuery.hs+2−2

@@ -45,14 +45,14 @@ type QueriesGetQueryResource =

4545 "doubleclickbidmanager" :>

4646 "v1" :>

4747 "query" :>

48− Capture "queryId" (JSONText Int64) :>

48+ Capture "queryId" (Textual Int64) :>

4949 QueryParam "alt" AltJSON :> Get '[JSON] Query

5050

5151-- | Retrieves a stored query.

5252--

5353-- /See:/ 'queriesGetQuery' smart constructor.

5454newtype QueriesGetQuery = QueriesGetQuery

55− { _qgqQueryId :: JSONText Int64

55+ { _qgqQueryId :: Textual Int64

5656 } deriving (Eq,Show,Data,Typeable,Generic)

5757

5858-- | Creates a value of 'QueriesGetQuery' with the minimum fields required to make a request.

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Queries/RunQuery.hs+2−2

@@ -46,7 +46,7 @@ type QueriesRunQueryResource =

4646 "doubleclickbidmanager" :>

4747 "v1" :>

4848 "query" :>

49− Capture "queryId" (JSONText Int64) :>

49+ Capture "queryId" (Textual Int64) :>

5050 QueryParam "alt" AltJSON :>

5151 ReqBody '[JSON] RunQueryRequest :> Post '[JSON] ()

5252

@@ -54,7 +54,7 @@ type QueriesRunQueryResource =

5454--

5555-- /See:/ 'queriesRunQuery' smart constructor.

5656data QueriesRunQuery = QueriesRunQuery

57− { _qrqQueryId :: !(JSONText Int64)

57+ { _qrqQueryId :: !(Textual Int64)

5858 , _qrqPayload :: !RunQueryRequest

5959 } deriving (Eq,Show,Data,Typeable,Generic)

6060

gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Reports/Listreports.hs+2−2

@@ -45,7 +45,7 @@ type ReportsListreportsResource =

4545 "doubleclickbidmanager" :>

4646 "v1" :>

4747 "queries" :>

48− Capture "queryId" (JSONText Int64) :>

48+ Capture "queryId" (Textual Int64) :>

4949 "reports" :>

5050 QueryParam "alt" AltJSON :>

5151 Get '[JSON] ListReportsResponse

@@ -54,7 +54,7 @@ type ReportsListreportsResource =

5454--

5555-- /See:/ 'reportsListreports' smart constructor.

5656newtype ReportsListreports = ReportsListreports

57− { _rlQueryId :: JSONText Int64

57+ { _rlQueryId :: Textual Int64

5858 } deriving (Eq,Show,Data,Typeable,Generic)

5959

6060-- | Creates a value of 'ReportsListreports' with the minimum fields required to make a request.

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+33−33

@@ -59,7 +59,7 @@ instance ToJSON ReportRow where

5959--

6060-- /See:/ 'reportRequest' smart constructor.

6161data ReportRequest = ReportRequest

62− { _rrMaxRowsPerFile :: !(Maybe (JSONText Int32))

62+ { _rrMaxRowsPerFile :: !(Maybe (Textual Int32))

6363 , _rrReportScope :: !(Maybe ReportRequestReportScope)

6464 , _rrStatisticsCurrency :: !(Maybe Text)

6565 , _rrTimeRange :: !(Maybe ReportRequestTimeRange)

@@ -68,11 +68,11 @@ data ReportRequest = ReportRequest

6868 , _rrIncludeRemovedEntities :: !Bool

6969 , _rrIncludeDeletedEntities :: !Bool

7070 , _rrDownloadFormat :: !(Maybe Text)

71− , _rrStartRow :: !(JSONText Int32)

71+ , _rrStartRow :: !(Textual Int32)

7272 , _rrColumns :: !(Maybe [ReportAPIColumnSpec])

7373 , _rrReportType :: !(Maybe Text)

7474 , _rrVerifySingleTimeZone :: !Bool

75− , _rrRowCount :: !(JSONText Int32)

75+ , _rrRowCount :: !(Textual Int32)

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'ReportRequest' with the minimum fields required to make a request.

@@ -341,7 +341,7 @@ data Report = Report

341341 , _rFiles :: !(Maybe [ReportFilesItem])

342342 , _rId :: !(Maybe Text)

343343 , _rStatisticsTimeZone :: !(Maybe Text)

344− , _rRowCount :: !(Maybe (JSONText Int32))

344+ , _rRowCount :: !(Maybe (Textual Int32))

345345 , _rRequest :: !(Maybe ReportRequest)

346346 } deriving (Eq,Show,Data,Typeable,Generic)

347347

@@ -470,7 +470,7 @@ instance ToJSON Report where

470470-- /See:/ 'reportFilesItem' smart constructor.

471471data ReportFilesItem = ReportFilesItem

472472 { _rfiURL :: !(Maybe Text)

473− , _rfiByteCount :: !(Maybe (JSONText Int64))

473+ , _rfiByteCount :: !(Maybe (Textual Int64))

474474 } deriving (Eq,Show,Data,Typeable,Generic)

475475

476476-- | Creates a value of 'ReportFilesItem' with the minimum fields required to make a request.

@@ -577,11 +577,11 @@ instance ToJSON ReportRequestFiltersItem where

577577--

578578-- /See:/ 'availability' smart constructor.

579579data Availability = Availability

580− { _aAgencyId :: !(Maybe (JSONText Int64))

581− , _aAdvertiserId :: !(Maybe (JSONText Int64))

582− , _aSegmentationId :: !(Maybe (JSONText Int64))

580+ { _aAgencyId :: !(Maybe (Textual Int64))

581+ , _aAdvertiserId :: !(Maybe (Textual Int64))

582+ , _aSegmentationId :: !(Maybe (Textual Int64))

583583 , _aSegmentationName :: !(Maybe Text)

584− , _aAvailabilityTimestamp :: !(Maybe (JSONText Word64))

584+ , _aAvailabilityTimestamp :: !(Maybe (Textual Word64))

585585 , _aSegmentationType :: !(Maybe Text)

586586 } deriving (Eq,Show,Data,Typeable,Generic)

587587

@@ -722,7 +722,7 @@ instance ToJSON UpdateAvailabilityRequest where

722722--

723723-- /See:/ 'customMetric' smart constructor.

724724data CustomMetric = CustomMetric

725− { _cmValue :: !(Maybe (JSONText Double))

725+ { _cmValue :: !(Maybe (Textual Double))

726726 , _cmName :: !(Maybe Text)

727727 } deriving (Eq,Show,Data,Typeable,Generic)

728728

@@ -1065,39 +1065,39 @@ instance ToJSON ReportRequestTimeRange where

10651065--

10661066-- /See:/ 'conversion' smart constructor.

10671067data Conversion = Conversion

1068− { _cAdGroupId :: !(Maybe (JSONText Int64))

1069− , _cConversionModifiedTimestamp :: !(Maybe (JSONText Word64))

1068+ { _cAdGroupId :: !(Maybe (Textual Int64))

1069+ , _cConversionModifiedTimestamp :: !(Maybe (Textual Word64))

10701070 , _cState :: !(Maybe Text)

1071− , _cEngineAccountId :: !(Maybe (JSONText Int64))

1072− , _cAgencyId :: !(Maybe (JSONText Int64))

1071+ , _cEngineAccountId :: !(Maybe (Textual Int64))

1072+ , _cAgencyId :: !(Maybe (Textual Int64))

10731073 , _cCurrencyCode :: !(Maybe Text)

10741074 , _cStoreId :: !(Maybe Text)

1075− , _cDsConversionId :: !(Maybe (JSONText Int64))

1075+ , _cDsConversionId :: !(Maybe (Textual Int64))

10761076 , _cConversionId :: !(Maybe Text)

1077− , _cAdvertiserId :: !(Maybe (JSONText Int64))

1078− , _cSegmentationId :: !(Maybe (JSONText Int64))

1077+ , _cAdvertiserId :: !(Maybe (Textual Int64))

1078+ , _cSegmentationId :: !(Maybe (Textual Int64))

10791079 , _cChannel :: !(Maybe Text)

10801080 , _cProductCountry :: !(Maybe Text)

1081− , _cCampaignId :: !(Maybe (JSONText Int64))

1082− , _cCriterionId :: !(Maybe (JSONText Int64))

1083− , _cConversionTimestamp :: !(Maybe (JSONText Word64))

1081+ , _cCampaignId :: !(Maybe (Textual Int64))

1082+ , _cCriterionId :: !(Maybe (Textual Int64))

1083+ , _cConversionTimestamp :: !(Maybe (Textual Word64))

10841084 , _cAttributionModel :: !(Maybe Text)

10851085 , _cSegmentationName :: !(Maybe Text)

10861086 , _cProductLanguage :: !(Maybe Text)

10871087 , _cCustomMetric :: !(Maybe [CustomMetric])

1088− , _cCountMillis :: !(Maybe (JSONText Int64))

1089− , _cQuantityMillis :: !(Maybe (JSONText Int64))

1090− , _cAdId :: !(Maybe (JSONText Int64))

1088+ , _cCountMillis :: !(Maybe (Textual Int64))

1089+ , _cQuantityMillis :: !(Maybe (Textual Int64))

1090+ , _cAdId :: !(Maybe (Textual Int64))

10911091 , _cDeviceType :: !(Maybe Text)

10921092 , _cType :: !(Maybe Text)

10931093 , _cCustomDimension :: !(Maybe [CustomDimension])

10941094 , _cFloodlightOrderId :: !(Maybe Text)

1095− , _cRevenueMicros :: !(Maybe (JSONText Int64))

1095+ , _cRevenueMicros :: !(Maybe (Textual Int64))

10961096 , _cClickId :: !(Maybe Text)

1097− , _cInventoryAccountId :: !(Maybe (JSONText Int64))

1097+ , _cInventoryAccountId :: !(Maybe (Textual Int64))

10981098 , _cSegmentationType :: !(Maybe Text)

10991099 , _cProductId :: !(Maybe Text)

1100− , _cProductGroupId :: !(Maybe (JSONText Int64))

1100+ , _cProductGroupId :: !(Maybe (Textual Int64))

11011101 } deriving (Eq,Show,Data,Typeable,Generic)

11021102

11031103-- | Creates a value of 'Conversion' with the minimum fields required to make a request.

@@ -1653,13 +1653,13 @@ instance ToJSON UpdateAvailabilityResponse where

16531653--

16541654-- /See:/ 'reportRequestReportScope' smart constructor.

16551655data ReportRequestReportScope = ReportRequestReportScope

1656− { _rrrsKeywordId :: !(Maybe (JSONText Int64))

1657− , _rrrsAdGroupId :: !(Maybe (JSONText Int64))

1658− , _rrrsEngineAccountId :: !(Maybe (JSONText Int64))

1659− , _rrrsAgencyId :: !(Maybe (JSONText Int64))

1660− , _rrrsAdvertiserId :: !(Maybe (JSONText Int64))

1661− , _rrrsCampaignId :: !(Maybe (JSONText Int64))

1662− , _rrrsAdId :: !(Maybe (JSONText Int64))

1656+ { _rrrsKeywordId :: !(Maybe (Textual Int64))

1657+ , _rrrsAdGroupId :: !(Maybe (Textual Int64))

1658+ , _rrrsEngineAccountId :: !(Maybe (Textual Int64))

1659+ , _rrrsAgencyId :: !(Maybe (Textual Int64))

1660+ , _rrrsAdvertiserId :: !(Maybe (Textual Int64))

1661+ , _rrrsCampaignId :: !(Maybe (Textual Int64))

1662+ , _rrrsAdId :: !(Maybe (Textual Int64))

16631663 } deriving (Eq,Show,Data,Typeable,Generic)

16641664

16651665-- | Creates a value of 'ReportRequestReportScope' with the minimum fields required to make a request.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Get.hs+22−22

@@ -56,20 +56,20 @@ type ConversionGetResource =

5656 "doubleclicksearch" :>

5757 "v2" :>

5858 "agency" :>

59− Capture "agencyId" (JSONText Int64) :>

59+ Capture "agencyId" (Textual Int64) :>

6060 "advertiser" :>

61− Capture "advertiserId" (JSONText Int64) :>

61+ Capture "advertiserId" (Textual Int64) :>

6262 "engine" :>

63− Capture "engineAccountId" (JSONText Int64) :>

63+ Capture "engineAccountId" (Textual Int64) :>

6464 "conversion" :>

65− QueryParam "endDate" (JSONText Int32) :>

66− QueryParam "rowCount" (JSONText Int32) :>

67− QueryParam "startDate" (JSONText Int32) :>

68− QueryParam "startRow" (JSONText Word32) :>

69− QueryParam "adGroupId" (JSONText Int64) :>

70− QueryParam "campaignId" (JSONText Int64) :>

71− QueryParam "criterionId" (JSONText Int64) :>

72− QueryParam "adId" (JSONText Int64) :>

65+ QueryParam "endDate" (Textual Int32) :>

66+ QueryParam "rowCount" (Textual Int32) :>

67+ QueryParam "startDate" (Textual Int32) :>

68+ QueryParam "startRow" (Textual Word32) :>

69+ QueryParam "adGroupId" (Textual Int64) :>

70+ QueryParam "campaignId" (Textual Int64) :>

71+ QueryParam "criterionId" (Textual Int64) :>

72+ QueryParam "adId" (Textual Int64) :>

7373 QueryParam "alt" AltJSON :>

7474 Get '[JSON] ConversionList

7575

@@ -78,17 +78,17 @@ type ConversionGetResource =

7878--

7979-- /See:/ 'conversionGet' smart constructor.

8080data ConversionGet = ConversionGet

81− { _cgAdGroupId :: !(Maybe (JSONText Int64))

82− , _cgEngineAccountId :: !(JSONText Int64)

83− , _cgAgencyId :: !(JSONText Int64)

84− , _cgAdvertiserId :: !(JSONText Int64)

85− , _cgEndDate :: !(JSONText Int32)

86− , _cgCampaignId :: !(Maybe (JSONText Int64))

87− , _cgCriterionId :: !(Maybe (JSONText Int64))

88− , _cgStartDate :: !(JSONText Int32)

89− , _cgStartRow :: !(JSONText Word32)

90− , _cgAdId :: !(Maybe (JSONText Int64))

91− , _cgRowCount :: !(JSONText Int32)

81+ { _cgAdGroupId :: !(Maybe (Textual Int64))

82+ , _cgEngineAccountId :: !(Textual Int64)

83+ , _cgAgencyId :: !(Textual Int64)

84+ , _cgAdvertiserId :: !(Textual Int64)

85+ , _cgEndDate :: !(Textual Int32)

86+ , _cgCampaignId :: !(Maybe (Textual Int64))

87+ , _cgCriterionId :: !(Maybe (Textual Int64))

88+ , _cgStartDate :: !(Textual Int32)

89+ , _cgStartRow :: !(Textual Word32)

90+ , _cgAdId :: !(Maybe (Textual Int64))

91+ , _cgRowCount :: !(Textual Int32)

9292 } deriving (Eq,Show,Data,Typeable,Generic)

9393

9494-- | Creates a value of 'ConversionGet' with the minimum fields required to make a request.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Conversion/Patch.hs+14−14

@@ -53,13 +53,13 @@ type ConversionPatchResource =

5353 "doubleclicksearch" :>

5454 "v2" :>

5555 "conversion" :>

56− QueryParam "advertiserId" (JSONText Int64) :>

57− QueryParam "agencyId" (JSONText Int64) :>

58− QueryParam "endDate" (JSONText Int32) :>

59− QueryParam "engineAccountId" (JSONText Int64) :>

60− QueryParam "rowCount" (JSONText Int32) :>

61− QueryParam "startDate" (JSONText Int32) :>

62− QueryParam "startRow" (JSONText Word32) :>

56+ QueryParam "advertiserId" (Textual Int64) :>

57+ QueryParam "agencyId" (Textual Int64) :>

58+ QueryParam "endDate" (Textual Int32) :>

59+ QueryParam "engineAccountId" (Textual Int64) :>

60+ QueryParam "rowCount" (Textual Int32) :>

61+ QueryParam "startDate" (Textual Int32) :>

62+ QueryParam "startRow" (Textual Word32) :>

6363 QueryParam "alt" AltJSON :>

6464 ReqBody '[JSON] ConversionList :>

6565 Patch '[JSON] ConversionList

@@ -69,14 +69,14 @@ type ConversionPatchResource =

6969--

7070-- /See:/ 'conversionPatch' smart constructor.

7171data ConversionPatch = ConversionPatch

72− { _cpEngineAccountId :: !(JSONText Int64)

73− , _cpAgencyId :: !(JSONText Int64)

74− , _cpAdvertiserId :: !(JSONText Int64)

75− , _cpEndDate :: !(JSONText Int32)

72+ { _cpEngineAccountId :: !(Textual Int64)

73+ , _cpAgencyId :: !(Textual Int64)

74+ , _cpAdvertiserId :: !(Textual Int64)

75+ , _cpEndDate :: !(Textual Int32)

7676 , _cpPayload :: !ConversionList

77− , _cpStartDate :: !(JSONText Int32)

78− , _cpStartRow :: !(JSONText Word32)

79− , _cpRowCount :: !(JSONText Int32)

77+ , _cpStartDate :: !(Textual Int32)

78+ , _cpStartRow :: !(Textual Word32)

79+ , _cpRowCount :: !(Textual Int32)

8080 } deriving (Eq,Show,Data,Typeable,Generic)

8181

8282-- | Creates a value of 'ConversionPatch' with the minimum fields required to make a request.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/GetFile.hs+3−3

@@ -48,7 +48,7 @@ type ReportsGetFileResource =

4848 "reports" :>

4949 Capture "reportId" Text :>

5050 "files" :>

51− Capture "reportFragment" (JSONText Int32) :>

51+ Capture "reportFragment" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] ()

5353 :<|>

5454 "doubleclicksearch" :>

@@ -56,7 +56,7 @@ type ReportsGetFileResource =

5656 "reports" :>

5757 Capture "reportId" Text :>

5858 "files" :>

59− Capture "reportFragment" (JSONText Int32) :>

59+ Capture "reportFragment" (Textual Int32) :>

6060 QueryParam "alt" AltMedia :>

6161 Get '[OctetStream] Stream

6262

@@ -65,7 +65,7 @@ type ReportsGetFileResource =

6565-- /See:/ 'reportsGetFile' smart constructor.

6666data ReportsGetFile = ReportsGetFile

6767 { _rgfReportId :: !Text

68− , _rgfReportFragment :: !(JSONText Int32)

68+ , _rgfReportFragment :: !(Textual Int32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'ReportsGetFile' with the minimum fields required to make a request.

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/SavedColumns/List.hs+4−4

@@ -46,9 +46,9 @@ type SavedColumnsListResource =

4646 "doubleclicksearch" :>

4747 "v2" :>

4848 "agency" :>

49− Capture "agencyId" (JSONText Int64) :>

49+ Capture "agencyId" (Textual Int64) :>

5050 "advertiser" :>

51− Capture "advertiserId" (JSONText Int64) :>

51+ Capture "advertiserId" (Textual Int64) :>

5252 "savedcolumns" :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] SavedColumnList

@@ -57,8 +57,8 @@ type SavedColumnsListResource =

5757--

5858-- /See:/ 'savedColumnsList' smart constructor.

5959data SavedColumnsList = SavedColumnsList

60− { _sclAgencyId :: !(JSONText Int64)

61− , _sclAdvertiserId :: !(JSONText Int64)

60+ { _sclAgencyId :: !(Textual Int64)

61+ , _sclAdvertiserId :: !(Textual Int64)

6262 } deriving (Eq,Show,Data,Typeable,Generic)

6363

6464-- | Creates a value of 'SavedColumnsList' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Drive/Types/Product.hs+34−34

@@ -69,7 +69,7 @@ instance ToJSON CommentContext where

6969--

7070-- /See:/ 'appIconsItem' smart constructor.

7171data AppIconsItem = AppIconsItem

72− { _aiiSize :: !(Maybe (JSONText Int32))

72+ { _aiiSize :: !(Maybe (Textual Int32))

7373 , _aiiCategory :: !(Maybe Text)

7474 , _aiiIconURL :: !(Maybe Text)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -389,7 +389,7 @@ instance ToJSON Property where

389389--

390390-- /See:/ 'fileThumbnail' smart constructor.

391391data FileThumbnail = FileThumbnail

392− { _ftImage :: !(Maybe (JSONText Word8))

392+ { _ftImage :: !(Maybe (Textual Word8))

393393 , _ftMimeType :: !(Maybe Text)

394394 } deriving (Eq,Show,Data,Typeable,Generic)

395395

@@ -805,7 +805,7 @@ data Channel = Channel

805805 { _cResourceURI :: !(Maybe Text)

806806 , _cResourceId :: !(Maybe Text)

807807 , _cKind :: !Text

808− , _cExpiration :: !(Maybe (JSONText Int64))

808+ , _cExpiration :: !(Maybe (Textual Int64))

809809 , _cToken :: !(Maybe Text)

810810 , _cAddress :: !(Maybe Text)

811811 , _cPayload :: !(Maybe Bool)

@@ -1017,9 +1017,9 @@ instance ToJSON CommentReplyList where

10171017--

10181018-- /See:/ 'fileVideoMediaMetadata' smart constructor.

10191019data FileVideoMediaMetadata = FileVideoMediaMetadata

1020− { _fvmmHeight :: !(Maybe (JSONText Int32))

1021− , _fvmmWidth :: !(Maybe (JSONText Int32))

1022− , _fvmmDurationMillis :: !(Maybe (JSONText Int64))

1020+ { _fvmmHeight :: !(Maybe (Textual Int32))

1021+ , _fvmmWidth :: !(Maybe (Textual Int32))

1022+ , _fvmmDurationMillis :: !(Maybe (Textual Int64))

10231023 } deriving (Eq,Show,Data,Typeable,Generic)

10241024

10251025-- | Creates a value of 'FileVideoMediaMetadata' with the minimum fields required to make a request.

@@ -1082,7 +1082,7 @@ data Change = Change

10821082 { _chaKind :: !Text

10831083 , _chaSelfLink :: !(Maybe Text)

10841084 , _chaModificationDate :: !(Maybe DateTime')

1085− , _chaId :: !(Maybe (JSONText Int64))

1085+ , _chaId :: !(Maybe (Textual Int64))

10861086 , _chaDeleted :: !(Maybe Bool)

10871087 , _chaFileId :: !(Maybe Text)

10881088 , _chaFile :: !(Maybe File)

@@ -1570,7 +1570,7 @@ instance ToJSON ChildReference where

15701570--

15711571-- /See:/ 'aboutMaxUploadSizesItem' smart constructor.

15721572data AboutMaxUploadSizesItem = AboutMaxUploadSizesItem

1573− { _amusiSize :: !(Maybe (JSONText Int64))

1573+ { _amusiSize :: !(Maybe (Textual Int64))

15741574 , _amusiType :: !(Maybe Text)

15751575 } deriving (Eq,Show,Data,Typeable,Generic)

15761576

@@ -1753,7 +1753,7 @@ instance ToJSON CommentReply where

17531753--

17541754-- /See:/ 'aboutQuotaBytesByServiceItem' smart constructor.

17551755data AboutQuotaBytesByServiceItem = AboutQuotaBytesByServiceItem

1756− { _aqbbsiBytesUsed :: !(Maybe (JSONText Int64))

1756+ { _aqbbsiBytesUsed :: !(Maybe (Textual Int64))

17571757 , _aqbbsiServiceName :: !(Maybe Text)

17581758 } deriving (Eq,Show,Data,Typeable,Generic)

17591759

@@ -1952,7 +1952,7 @@ data ChangeList = ChangeList

19521952 , _cllKind :: !Text

19531953 , _cllItems :: !(Maybe [Change])

19541954 , _cllSelfLink :: !(Maybe Text)

1955− , _cllLargestChangeId :: !(Maybe (JSONText Int64))

1955+ , _cllLargestChangeId :: !(Maybe (Textual Int64))

19561956 } deriving (Eq,Show,Data,Typeable,Generic)

19571957

19581958-- | Creates a value of 'ChangeList' with the minimum fields required to make a request.

@@ -2116,7 +2116,7 @@ instance ToJSON FileIndexableText where

21162116--

21172117-- /See:/ 'aboutFeaturesItem' smart constructor.

21182118data AboutFeaturesItem = AboutFeaturesItem

2119− { _afiFeatureRate :: !(Maybe (JSONText Double))

2119+ { _afiFeatureRate :: !(Maybe (Textual Double))

21202120 , _afiFeatureName :: !(Maybe Text)

21212121 } deriving (Eq,Show,Data,Typeable,Generic)

21222122

@@ -2201,13 +2201,13 @@ instance ToJSON ChannelParams where

22012201-- /See:/ 'about' smart constructor.

22022202data About = About

22032203 { _aboExportFormats :: !(Maybe [AboutExportFormatsItem])

2204− , _aboRemainingChangeIds :: !(Maybe (JSONText Int64))

2204+ , _aboRemainingChangeIds :: !(Maybe (Textual Int64))

22052205 , _aboLanguageCode :: !(Maybe Text)

22062206 , _aboEtag :: !(Maybe Text)

22072207 , _aboImportFormats :: !(Maybe [AboutImportFormatsItem])

22082208 , _aboKind :: !Text

22092209 , _aboDomainSharingPolicy :: !(Maybe Text)

2210− , _aboQuotaBytesUsedInTrash :: !(Maybe (JSONText Int64))

2210+ , _aboQuotaBytesUsedInTrash :: !(Maybe (Textual Int64))

22112211 , _aboQuotaType :: !(Maybe Text)

22122212 , _aboMaxUploadSizes :: !(Maybe [AboutMaxUploadSizesItem])

22132213 , _aboUser :: !(Maybe User)

@@ -2215,15 +2215,15 @@ data About = About

22152215 , _aboName :: !(Maybe Text)

22162216 , _aboFeatures :: !(Maybe [AboutFeaturesItem])

22172217 , _aboIsCurrentAppInstalled :: !(Maybe Bool)

2218− , _aboQuotaBytesTotal :: !(Maybe (JSONText Int64))

2218+ , _aboQuotaBytesTotal :: !(Maybe (Textual Int64))

22192219 , _aboRootFolderId :: !(Maybe Text)

2220− , _aboQuotaBytesUsed :: !(Maybe (JSONText Int64))

2220+ , _aboQuotaBytesUsed :: !(Maybe (Textual Int64))

22212221 , _aboAdditionalRoleInfo :: !(Maybe [AboutAdditionalRoleInfoItem])

22222222 , _aboFolderColorPalette :: !(Maybe [Text])

22232223 , _aboPermissionId :: !(Maybe Text)

2224− , _aboQuotaBytesUsedAggregate :: !(Maybe (JSONText Int64))

2224+ , _aboQuotaBytesUsedAggregate :: !(Maybe (Textual Int64))

22252225 , _aboQuotaBytesByService :: !(Maybe [AboutQuotaBytesByServiceItem])

2226− , _aboLargestChangeId :: !(Maybe (JSONText Int64))

2226+ , _aboLargestChangeId :: !(Maybe (Textual Int64))

22272227 } deriving (Eq,Show,Data,Typeable,Generic)

22282228

22292229-- | Creates a value of 'About' with the minimum fields required to make a request.

@@ -2535,9 +2535,9 @@ instance ToJSON About where

25352535--

25362536-- /See:/ 'fileImageMediaMetadataLocation' smart constructor.

25372537data FileImageMediaMetadataLocation = FileImageMediaMetadataLocation

2538− { _fimmlLatitude :: !(Maybe (JSONText Double))

2539− , _fimmlAltitude :: !(Maybe (JSONText Double))

2540− , _fimmlLongitude :: !(Maybe (JSONText Double))

2538+ { _fimmlLatitude :: !(Maybe (Textual Double))

2539+ , _fimmlAltitude :: !(Maybe (Textual Double))

2540+ , _fimmlLongitude :: !(Maybe (Textual Double))

25412541 } deriving (Eq,Show,Data,Typeable,Generic)

25422542

25432543-- | Creates a value of 'FileImageMediaMetadataLocation' with the minimum fields required to make a request.

@@ -2650,23 +2650,23 @@ instance ToJSON AboutImportFormatsItem where

26502650--

26512651-- /See:/ 'fileImageMediaMetadata' smart constructor.

26522652data FileImageMediaMetadata = FileImageMediaMetadata

2653− { _fimmRotation :: !(Maybe (JSONText Int32))

2654− , _fimmHeight :: !(Maybe (JSONText Int32))

2655− , _fimmSubjectDistance :: !(Maybe (JSONText Int32))

2656− , _fimmMaxApertureValue :: !(Maybe (JSONText Float))

2657− , _fimmIsoSpeed :: !(Maybe (JSONText Int32))

2653+ { _fimmRotation :: !(Maybe (Textual Int32))

2654+ , _fimmHeight :: !(Maybe (Textual Int32))

2655+ , _fimmSubjectDistance :: !(Maybe (Textual Int32))

2656+ , _fimmMaxApertureValue :: !(Maybe (Textual Double))

2657+ , _fimmIsoSpeed :: !(Maybe (Textual Int32))

26582658 , _fimmLocation :: !(Maybe FileImageMediaMetadataLocation)

2659− , _fimmAperture :: !(Maybe (JSONText Float))

2660− , _fimmFocalLength :: !(Maybe (JSONText Float))

2659+ , _fimmAperture :: !(Maybe (Textual Double))

2660+ , _fimmFocalLength :: !(Maybe (Textual Double))

26612661 , _fimmCameraMake :: !(Maybe Text)

2662− , _fimmWidth :: !(Maybe (JSONText Int32))

2663− , _fimmExposureTime :: !(Maybe (JSONText Float))

2662+ , _fimmWidth :: !(Maybe (Textual Int32))

2663+ , _fimmExposureTime :: !(Maybe (Textual Double))

26642664 , _fimmCameraModel :: !(Maybe Text)

26652665 , _fimmWhiteBalance :: !(Maybe Text)

26662666 , _fimmDate :: !(Maybe Text)

26672667 , _fimmLens :: !(Maybe Text)

26682668 , _fimmFlashUsed :: !(Maybe Bool)

2669− , _fimmExposureBias :: !(Maybe (JSONText Float))

2669+ , _fimmExposureBias :: !(Maybe (Textual Double))

26702670 , _fimmMeteringMode :: !(Maybe Text)

26712671 , _fimmExposureMode :: !(Maybe Text)

26722672 , _fimmSensor :: !(Maybe Text)

@@ -3216,7 +3216,7 @@ data Revision = Revision

32163216 , _rPinned :: !(Maybe Bool)

32173217 , _rPublished :: !(Maybe Bool)

32183218 , _rLastModifyingUser :: !(Maybe User)

3219− , _rFileSize :: !(Maybe (JSONText Int64))

3219+ , _rFileSize :: !(Maybe (Textual Int64))

32203220 , _rPublishAuto :: !(Maybe Bool)

32213221 , _rMD5Checksum :: !(Maybe Text)

32223222 , _rMimeType :: !(Maybe Text)

@@ -3701,7 +3701,7 @@ data File = File

37013701 , _fLastModifyingUser :: !(Maybe User)

37023702 , _fIconLink :: !(Maybe Text)

37033703 , _fEmbedLink :: !(Maybe Text)

3704− , _fFileSize :: !(Maybe (JSONText Int64))

3704+ , _fFileSize :: !(Maybe (Textual Int64))

37053705 , _fAppDataContents :: !(Maybe Bool)

37063706 , _fImageMediaMetadata :: !(Maybe FileImageMediaMetadata)

37073707 , _fExplicitlyTrashed :: !(Maybe Bool)

@@ -3722,7 +3722,7 @@ data File = File

37223722 , _fParents :: !(Maybe [ParentReference])

37233723 , _fSharedWithMeDate :: !(Maybe DateTime')

37243724 , _fSpaces :: !(Maybe [Text])

3725− , _fVersion :: !(Maybe (JSONText Int64))

3725+ , _fVersion :: !(Maybe (Textual Int64))

37263726 , _fUserPermission :: !(Maybe Permission)

37273727 , _fWritersCanShare :: !(Maybe Bool)

37283728 , _fDefaultOpenWithLink :: !(Maybe Text)

@@ -3730,7 +3730,7 @@ data File = File

37303730 , _fLabels :: !(Maybe FileLabels)

37313731 , _fModifiedDate :: !(Maybe DateTime')

37323732 , _fPermissions :: !(Maybe [Permission])

3733− , _fQuotaBytesUsed :: !(Maybe (JSONText Int64))

3733+ , _fQuotaBytesUsed :: !(Maybe (Textual Int64))

37343734 , _fTitle :: !(Maybe Text)

37353735 , _fAlternateLink :: !(Maybe Text)

37363736 , _fVideoMediaMetadata :: !(Maybe FileVideoMediaMetadata)

gogol-drive/gen/Network/Google/Resource/Drive/About/Get.hs+4−4

@@ -49,8 +49,8 @@ type AboutGetResource =

4949 "v2" :>

5050 "about" :>

5151 QueryParam "includeSubscribed" Bool :>

52− QueryParam "startChangeId" (JSONText Int64) :>

53− QueryParam "maxChangeIdCount" (JSONText Int64) :>

52+ QueryParam "startChangeId" (Textual Int64) :>

53+ QueryParam "maxChangeIdCount" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] About

5555

5656-- | Gets the information about the current user along with Drive API

@@ -59,8 +59,8 @@ type AboutGetResource =

5959-- /See:/ 'aboutGet' smart constructor.

6060data AboutGet = AboutGet

6161 { _agIncludeSubscribed :: !Bool

62− , _agStartChangeId :: !(Maybe (JSONText Int64))

63− , _agMaxChangeIdCount :: !(JSONText Int64)

62+ , _agStartChangeId :: !(Maybe (Textual Int64))

63+ , _agMaxChangeIdCount :: !(Textual Int64)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'AboutGet' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs+4−4

@@ -51,10 +51,10 @@ type ChangesListResource =

5151 "v2" :>

5252 "changes" :>

5353 QueryParam "includeSubscribed" Bool :>

54− QueryParam "startChangeId" (JSONText Int64) :>

54+ QueryParam "startChangeId" (Textual Int64) :>

5555 QueryParam "spaces" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "includeDeleted" Bool :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] ChangeList

6060

@@ -63,10 +63,10 @@ type ChangesListResource =

6363-- /See:/ 'changesList' smart constructor.

6464data ChangesList = ChangesList

6565 { _clIncludeSubscribed :: !Bool

66− , _clStartChangeId :: !(Maybe (JSONText Int64))

66+ , _clStartChangeId :: !(Maybe (Textual Int64))

6767 , _clSpaces :: !(Maybe Text)

6868 , _clPageToken :: !(Maybe Text)

69− , _clMaxResults :: !(JSONText Int32)

69+ , _clMaxResults :: !(Textual Int32)

7070 , _clIncludeDeleted :: !Bool

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+4−4

@@ -53,10 +53,10 @@ type ChangesWatchResource =

5353 "changes" :>

5454 "watch" :>

5555 QueryParam "includeSubscribed" Bool :>

56− QueryParam "startChangeId" (JSONText Int64) :>

56+ QueryParam "startChangeId" (Textual Int64) :>

5757 QueryParam "spaces" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "includeDeleted" Bool :>

6161 QueryParam "alt" AltJSON :>

6262 ReqBody '[JSON] Channel :> Post '[JSON] Channel

@@ -66,11 +66,11 @@ type ChangesWatchResource =

6666-- /See:/ 'changesWatch' smart constructor.

6767data ChangesWatch = ChangesWatch

6868 { _cwIncludeSubscribed :: !Bool

69− , _cwStartChangeId :: !(Maybe (JSONText Int64))

69+ , _cwStartChangeId :: !(Maybe (Textual Int64))

7070 , _cwPayload :: !Channel

7171 , _cwSpaces :: !(Maybe Text)

7272 , _cwPageToken :: !(Maybe Text)

73− , _cwMaxResults :: !(JSONText Int32)

73+ , _cwMaxResults :: !(Textual Int32)

7474 , _cwIncludeDeleted :: !Bool

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

gogol-drive/gen/Network/Google/Resource/Drive/Children/List.hs+2−2

@@ -54,7 +54,7 @@ type ChildrenListResource =

5454 QueryParam "orderBy" Text :>

5555 QueryParam "q" Text :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] ChildList

5959

6060-- | Lists a folder\'s children.

@@ -65,7 +65,7 @@ data ChildrenList = ChildrenList

6565 , _cFolderId :: !Text

6666 , _cQ :: !(Maybe Text)

6767 , _cPageToken :: !(Maybe Text)

68− , _cMaxResults :: !(JSONText Int32)

68+ , _cMaxResults :: !(Textual Int32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'ChildrenList' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Resource/Drive/Comments/List.hs+2−2

@@ -53,7 +53,7 @@ type CommentsListResource =

5353 "comments" :>

5454 QueryParam "updatedMin" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "includeDeleted" Bool :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] CommentList

5959

@@ -64,7 +64,7 @@ data CommentsList = CommentsList

6464 { _cllUpdatedMin :: !(Maybe Text)

6565 , _cllPageToken :: !(Maybe Text)

6666 , _cllFileId :: !Text

67− , _cllMaxResults :: !(JSONText Int32)

67+ , _cllMaxResults :: !(Textual Int32)

6868 , _cllIncludeDeleted :: !Bool

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

gogol-drive/gen/Network/Google/Resource/Drive/Files/GenerateIds.hs+2−2

@@ -48,7 +48,7 @@ type FilesGenerateIdsResource =

4848 "files" :>

4949 "generateIds" :>

5050 QueryParam "space" Text :>

51− QueryParam "maxResults" (JSONText Int32) :>

51+ QueryParam "maxResults" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] GeneratedIds

5353

5454-- | Generates a set of file IDs which can be provided in insert requests.

@@ -56,7 +56,7 @@ type FilesGenerateIdsResource =

5656-- /See:/ 'filesGenerateIds' smart constructor.

5757data FilesGenerateIds = FilesGenerateIds

5858 { _fgiSpace :: !Text

59− , _fgiMaxResults :: !(JSONText Int32)

59+ , _fgiMaxResults :: !(Textual Int32)

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

6262-- | Creates a value of 'FilesGenerateIds' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs+2−2

@@ -57,7 +57,7 @@ type FilesListResource =

5757 QueryParam "projection" FilesListProjection :>

5858 QueryParam "corpus" FilesListCorpus :>

5959 QueryParam "pageToken" Text :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :> Get '[JSON] FileList

6262

6363-- | Lists the user\'s files.

@@ -70,7 +70,7 @@ data FilesList = FilesList

7070 , _flProjection :: !(Maybe FilesListProjection)

7171 , _flCorpus :: !(Maybe FilesListCorpus)

7272 , _flPageToken :: !(Maybe Text)

73− , _flMaxResults :: !(JSONText Int32)

73+ , _flMaxResults :: !(Textual Int32)

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

7676-- | Creates a value of 'FilesList' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Get.hs+3−3

@@ -49,7 +49,7 @@ type RealtimeGetResource =

4949 "files" :>

5050 Capture "fileId" Text :>

5151 "realtime" :>

52− QueryParam "revision" (JSONText Int32) :>

52+ QueryParam "revision" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :> Get '[JSON] ()

5454 :<|>

5555 "drive" :>

@@ -57,7 +57,7 @@ type RealtimeGetResource =

5757 "files" :>

5858 Capture "fileId" Text :>

5959 "realtime" :>

60− QueryParam "revision" (JSONText Int32) :>

60+ QueryParam "revision" (Textual Int32) :>

6161 QueryParam "alt" AltMedia :>

6262 Get '[OctetStream] Stream

6363

@@ -67,7 +67,7 @@ type RealtimeGetResource =

6767-- /See:/ 'realtimeGet' smart constructor.

6868data RealtimeGet = RealtimeGet

6969 { _rrFileId :: !Text

70− , _rrRevision :: !(Maybe (JSONText Int32))

70+ , _rrRevision :: !(Maybe (Textual Int32))

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

7373-- | Creates a value of 'RealtimeGet' with the minimum fields required to make a request.

gogol-drive/gen/Network/Google/Resource/Drive/Replies/List.hs+2−2

@@ -54,7 +54,7 @@ type RepliesListResource =

5454 Capture "commentId" Text :>

5555 "replies" :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Int32) :>

57+ QueryParam "maxResults" (Textual Int32) :>

5858 QueryParam "includeDeleted" Bool :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] CommentReplyList

@@ -66,7 +66,7 @@ data RepliesList = RepliesList

6666 { _rlPageToken :: !(Maybe Text)

6767 , _rlFileId :: !Text

6868 , _rlCommentId :: !Text

69− , _rlMaxResults :: !(JSONText Int32)

69+ , _rlMaxResults :: !(Textual Int32)

7070 , _rlIncludeDeleted :: !Bool

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+23−23

@@ -30,8 +30,8 @@ data DataSet = DataSet

3030 { _dsNextPageToken :: !(Maybe Text)

3131 , _dsDataSourceId :: !(Maybe Text)

3232 , _dsPoint :: !(Maybe [DataPoint])

33− , _dsMinStartTimeNs :: !(Maybe (JSONText Int64))

34− , _dsMaxEndTimeNs :: !(Maybe (JSONText Int64))

33+ , _dsMinStartTimeNs :: !(Maybe (Textual Int64))

34+ , _dsMaxEndTimeNs :: !(Maybe (Textual Int64))

3535 } deriving (Eq,Show,Data,Typeable,Generic)

3636

3737-- | Creates a value of 'DataSet' with the minimum fields required to make a request.

@@ -288,7 +288,7 @@ instance ToJSON AggregateBy where

288288--

289289-- /See:/ 'bucketByActivity' smart constructor.

290290data BucketByActivity = BucketByActivity

291− { _bbaMinDurationMillis :: !(Maybe (JSONText Int64))

291+ { _bbaMinDurationMillis :: !(Maybe (Textual Int64))

292292 , _bbaActivityDataSourceId :: !(Maybe Text)

293293 } deriving (Eq,Show,Data,Typeable,Generic)

294294

@@ -342,12 +342,12 @@ instance ToJSON BucketByActivity where

342342--

343343-- /See:/ 'aggregateRequest' smart constructor.

344344data AggregateRequest = AggregateRequest

345− { _arEndTimeMillis :: !(Maybe (JSONText Int64))

345+ { _arEndTimeMillis :: !(Maybe (Textual Int64))

346346 , _arAggregateBy :: !(Maybe [AggregateBy])

347347 , _arBucketBySession :: !(Maybe BucketBySession)

348348 , _arBucketByActivityType :: !(Maybe BucketByActivity)

349349 , _arBucketByTime :: !(Maybe BucketByTime)

350− , _arStartTimeMillis :: !(Maybe (JSONText Int64))

350+ , _arStartTimeMillis :: !(Maybe (Textual Int64))

351351 , _arBucketByActivitySegment :: !(Maybe BucketByActivity)

352352 } deriving (Eq,Show,Data,Typeable,Generic)

353353

@@ -566,8 +566,8 @@ instance ToJSON Device where

566566-- /See:/ 'value' smart constructor.

567567data Value = Value

568568 { _vMapVal :: !(Maybe [ValueMapValEntry])

569− , _vFpVal :: !(Maybe (JSONText Double))

570− , _vIntVal :: !(Maybe (JSONText Int32))

569+ , _vFpVal :: !(Maybe (Textual Double))

570+ , _vIntVal :: !(Maybe (Textual Int32))

571571 , _vStringVal :: !(Maybe Text)

572572 } deriving (Eq,Show,Data,Typeable,Generic)

573573

@@ -640,7 +640,7 @@ instance ToJSON Value where

640640--

641641-- /See:/ 'bucketBySession' smart constructor.

642642newtype BucketBySession = BucketBySession

643− { _bbsMinDurationMillis :: Maybe (JSONText Int64)

643+ { _bbsMinDurationMillis :: Maybe (Textual Int64)

644644 } deriving (Eq,Show,Data,Typeable,Generic)

645645

646646-- | Creates a value of 'BucketBySession' with the minimum fields required to make a request.

@@ -688,13 +688,13 @@ instance ToJSON BucketBySession where

688688-- /See:/ 'dataPoint' smart constructor.

689689data DataPoint = DataPoint

690690 { _dpOriginDataSourceId :: !(Maybe Text)

691− , _dpRawTimestampNanos :: !(Maybe (JSONText Int64))

691+ , _dpRawTimestampNanos :: !(Maybe (Textual Int64))

692692 , _dpDataTypeName :: !(Maybe Text)

693693 , _dpValue :: !(Maybe [Value])

694− , _dpComputationTimeMillis :: !(Maybe (JSONText Int64))

695− , _dpEndTimeNanos :: !(Maybe (JSONText Int64))

696− , _dpModifiedTimeMillis :: !(Maybe (JSONText Int64))

697− , _dpStartTimeNanos :: !(Maybe (JSONText Int64))

694+ , _dpComputationTimeMillis :: !(Maybe (Textual Int64))

695+ , _dpEndTimeNanos :: !(Maybe (Textual Int64))

696+ , _dpModifiedTimeMillis :: !(Maybe (Textual Int64))

697+ , _dpStartTimeNanos :: !(Maybe (Textual Int64))

698698 } deriving (Eq,Show,Data,Typeable,Generic)

699699

700700-- | Creates a value of 'DataPoint' with the minimum fields required to make a request.

@@ -895,11 +895,11 @@ instance ToJSON ListSessionsResponse where

895895--

896896-- /See:/ 'aggregateBucket' smart constructor.

897897data AggregateBucket = AggregateBucket

898− { _abEndTimeMillis :: !(Maybe (JSONText Int64))

898+ { _abEndTimeMillis :: !(Maybe (Textual Int64))

899899 , _abDataSet :: !(Maybe [DataSet])

900− , _abActivity :: !(Maybe (JSONText Int32))

900+ , _abActivity :: !(Maybe (Textual Int32))

901901 , _abType :: !(Maybe AggregateBucketType)

902− , _abStartTimeMillis :: !(Maybe (JSONText Int64))

902+ , _abStartTimeMillis :: !(Maybe (Textual Int64))

903903 , _abSession :: !(Maybe Session)

904904 } deriving (Eq,Show,Data,Typeable,Generic)

905905

@@ -998,7 +998,7 @@ instance ToJSON AggregateBucket where

998998--

999999-- /See:/ 'mapValue' smart constructor.

10001000newtype MapValue = MapValue

1001− { _mvFpVal :: Maybe (JSONText Double)

1001+ { _mvFpVal :: Maybe (Textual Double)

10021002 } deriving (Eq,Show,Data,Typeable,Generic)

10031003

10041004-- | Creates a value of 'MapValue' with the minimum fields required to make a request.

@@ -1318,7 +1318,7 @@ instance ToJSON ValueMapValEntry where

13181318--

13191319-- /See:/ 'bucketByTime' smart constructor.

13201320newtype BucketByTime = BucketByTime

1321− { _bbtDurationMillis :: Maybe (JSONText Int64)

1321+ { _bbtDurationMillis :: Maybe (Textual Int64)

13221322 } deriving (Eq,Show,Data,Typeable,Generic)

13231323

13241324-- | Creates a value of 'BucketByTime' with the minimum fields required to make a request.

@@ -1406,14 +1406,14 @@ instance ToJSON DataType where

14061406--

14071407-- /See:/ 'session' smart constructor.

14081408data Session = Session

1409− { _sEndTimeMillis :: !(Maybe (JSONText Int64))

1410− , _sActiveTimeMillis :: !(Maybe (JSONText Int64))

1409+ { _sEndTimeMillis :: !(Maybe (Textual Int64))

1410+ , _sActiveTimeMillis :: !(Maybe (Textual Int64))

14111411 , _sApplication :: !(Maybe Application)

1412− , _sActivityType :: !(Maybe (JSONText Int32))

1412+ , _sActivityType :: !(Maybe (Textual Int32))

14131413 , _sName :: !(Maybe Text)

1414− , _sModifiedTimeMillis :: !(Maybe (JSONText Int64))

1414+ , _sModifiedTimeMillis :: !(Maybe (Textual Int64))

14151415 , _sId :: !(Maybe Text)

1416− , _sStartTimeMillis :: !(Maybe (JSONText Int64))

1416+ , _sStartTimeMillis :: !(Maybe (Textual Int64))

14171417 , _sDescription :: !(Maybe Text)

14181418 } deriving (Eq,Show,Data,Typeable,Generic)

14191419

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Delete.hs+4−4

@@ -60,8 +60,8 @@ type UsersDataSourcesDataSetsDeleteResource =

6060 Capture "dataSourceId" Text :>

6161 "datasets" :>

6262 Capture "datasetId" Text :>

63− QueryParam "modifiedTimeMillis" (JSONText Int64) :>

64− QueryParam "currentTimeMillis" (JSONText Int64) :>

63+ QueryParam "modifiedTimeMillis" (Textual Int64) :>

64+ QueryParam "currentTimeMillis" (Textual Int64) :>

6565 QueryParam "alt" AltJSON :> Delete '[JSON] ()

6666

6767-- | Performs an inclusive delete of all data points whose start and end

@@ -77,8 +77,8 @@ data UsersDataSourcesDataSetsDelete = UsersDataSourcesDataSetsDelete

7777 { _udsdsdDataSourceId :: !Text

7878 , _udsdsdUserId :: !Text

7979 , _udsdsdDataSetId :: !Text

80− , _udsdsdModifiedTimeMillis :: !(Maybe (JSONText Int64))

81− , _udsdsdCurrentTimeMillis :: !(Maybe (JSONText Int64))

80+ , _udsdsdModifiedTimeMillis :: !(Maybe (Textual Int64))

81+ , _udsdsdCurrentTimeMillis :: !(Maybe (Textual Int64))

8282 } deriving (Eq,Show,Data,Typeable,Generic)

8383

8484-- | Creates a value of 'UsersDataSourcesDataSetsDelete' with the minimum fields required to make a request.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Get.hs+2−2

@@ -58,7 +58,7 @@ type UsersDataSourcesDataSetsGetResource =

5858 Capture "dataSourceId" Text :>

5959 "datasets" :>

6060 Capture "datasetId" Text :>

61− QueryParam "limit" (JSONText Int32) :>

61+ QueryParam "limit" (Textual Int32) :>

6262 QueryParam "pageToken" Text :>

6363 QueryParam "alt" AltJSON :> Get '[JSON] DataSet

6464

@@ -73,7 +73,7 @@ data UsersDataSourcesDataSetsGet = UsersDataSourcesDataSetsGet

7373 { _udsdsgDataSourceId :: !Text

7474 , _udsdsgUserId :: !Text

7575 , _udsdsgDataSetId :: !Text

76− , _udsdsgLimit :: !(Maybe (JSONText Int32))

76+ , _udsdsgLimit :: !(Maybe (Textual Int32))

7777 , _udsdsgPageToken :: !(Maybe Text)

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/DataSets/Patch.hs+2−2

@@ -57,7 +57,7 @@ type UsersDataSourcesDataSetsPatchResource =

5757 Capture "dataSourceId" Text :>

5858 "datasets" :>

5959 Capture "datasetId" Text :>

60− QueryParam "currentTimeMillis" (JSONText Int64) :>

60+ QueryParam "currentTimeMillis" (Textual Int64) :>

6161 QueryParam "alt" AltJSON :>

6262 ReqBody '[JSON] DataSet :> Patch '[JSON] DataSet

6363

@@ -72,7 +72,7 @@ data UsersDataSourcesDataSetsPatch = UsersDataSourcesDataSetsPatch

7272 , _udsdspPayload :: !DataSet

7373 , _udsdspUserId :: !Text

7474 , _udsdspDataSetId :: !Text

75− , _udsdspCurrentTimeMillis :: !(Maybe (JSONText Int64))

75+ , _udsdspCurrentTimeMillis :: !(Maybe (Textual Int64))

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'UsersDataSourcesDataSetsPatch' with the minimum fields required to make a request.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Delete.hs+2−2

@@ -50,7 +50,7 @@ type UsersSessionsDeleteResource =

5050 Capture "userId" Text :>

5151 "sessions" :>

5252 Capture "sessionId" Text :>

53− QueryParam "currentTimeMillis" (JSONText Int64) :>

53+ QueryParam "currentTimeMillis" (Textual Int64) :>

5454 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5555

5656-- | Deletes a session specified by the given session ID.

@@ -58,7 +58,7 @@ type UsersSessionsDeleteResource =

5858-- /See:/ 'usersSessionsDelete' smart constructor.

5959data UsersSessionsDelete = UsersSessionsDelete

6060 { _usdUserId :: !Text

61− , _usdCurrentTimeMillis :: !(Maybe (JSONText Int64))

61+ , _usdCurrentTimeMillis :: !(Maybe (Textual Int64))

6262 , _usdSessionId :: !Text

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/Update.hs+2−2

@@ -51,7 +51,7 @@ type UsersSessionsUpdateResource =

5151 Capture "userId" Text :>

5252 "sessions" :>

5353 Capture "sessionId" Text :>

54− QueryParam "currentTimeMillis" (JSONText Int64) :>

54+ QueryParam "currentTimeMillis" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :>

5656 ReqBody '[JSON] Session :> Put '[JSON] Session

5757

@@ -61,7 +61,7 @@ type UsersSessionsUpdateResource =

6161data UsersSessionsUpdate = UsersSessionsUpdate

6262 { _usuPayload :: !Session

6363 , _usuUserId :: !Text

64− , _usuCurrentTimeMillis :: !(Maybe (JSONText Int64))

64+ , _usuCurrentTimeMillis :: !(Maybe (Textual Int64))

6565 , _usuSessionId :: !Text

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+3−3

@@ -81,8 +81,8 @@ instance ToJSON ReconcileGetWarningItem where

8181--

8282-- /See:/ 'reconcileGetCosts' smart constructor.

8383data ReconcileGetCosts = ReconcileGetCosts

84− { _rgcHits :: !(Maybe (JSONText Int32))

85− , _rgcMs :: !(Maybe (JSONText Int32))

84+ { _rgcHits :: !(Maybe (Textual Int32))

85+ , _rgcMs :: !(Maybe (Textual Int32))

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

8888-- | Creates a value of 'ReconcileGetCosts' with the minimum fields required to make a request.

@@ -251,7 +251,7 @@ instance ToJSON ReconcileCandidateNotable where

251251-- /See:/ 'reconcileCandidate' smart constructor.

252252data ReconcileCandidate = ReconcileCandidate

253253 { _rcLang :: !(Maybe Text)

254− , _rcConfidence :: !(Maybe (JSONText Float))

254+ , _rcConfidence :: !(Maybe (Textual Double))

255255 , _rcName :: !(Maybe Text)

256256 , _rcNotable :: !(Maybe ReconcileCandidateNotable)

257257 , _rcMid :: !(Maybe Text)

gogol-freebasesearch/gen/Network/Google/Method/Freebase/Reconcile.hs+4−4

@@ -52,9 +52,9 @@ type ReconcileMethod =

5252 "reconcile" :>

5353 QueryParams "kind" Text :>

5454 QueryParams "lang" Text :>

55− QueryParam "confidence" (JSONText Float) :>

55+ QueryParam "confidence" (Textual Double) :>

5656 QueryParam "name" Text :>

57− QueryParam "limit" (JSONText Int32) :>

57+ QueryParam "limit" (Textual Int32) :>

5858 QueryParams "prop" Text :>

5959 QueryParam "alt" AltJSON :> Get '[JSON] ReconcileGet

6060

@@ -64,9 +64,9 @@ type ReconcileMethod =

6464data Reconcile = Reconcile

6565 { _rKind :: !(Maybe [Text])

6666 , _rLang :: !(Maybe [Text])

67− , _rConfidence :: !(JSONText Float)

67+ , _rConfidence :: !(Textual Double)

6868 , _rName :: !(Maybe Text)

69− , _rLimit :: !(JSONText Int32)

69+ , _rLimit :: !(Textual Int32)

7070 , _rProp :: !(Maybe [Text])

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

gogol-freebasesearch/gen/Network/Google/Method/Freebase/Search.hs+6−6

@@ -68,7 +68,7 @@ type SearchMethod =

6868 "v1" :>

6969 "search" :>

7070 QueryParams "without" Text :>

71− QueryParam "cursor" (JSONText Int32) :>

71+ QueryParam "cursor" (Textual Int32) :>

7272 QueryParams "with" Text :>

7373 QueryParams "domain" Text :>

7474 QueryParam "format" FreebaseSearchFormat :>

@@ -78,7 +78,7 @@ type SearchMethod =

7878 QueryParam "output" Text :>

7979 QueryParam "query" Text :>

8080 QueryParam "scoring" FreebaseSearchScoring :>

81− QueryParam "limit" (JSONText Int32) :>

81+ QueryParam "limit" (Textual Int32) :>

8282 QueryParams "filter" Text :>

8383 QueryParam "mql_output" Text :>

8484 QueryParams "mid" Text :>

@@ -105,7 +105,7 @@ type SearchMethod =

105105 "v1" :>

106106 "search" :>

107107 QueryParams "without" Text :>

108− QueryParam "cursor" (JSONText Int32) :>

108+ QueryParam "cursor" (Textual Int32) :>

109109 QueryParams "with" Text :>

110110 QueryParams "domain" Text :>

111111 QueryParam "format" FreebaseSearchFormat :>

@@ -115,7 +115,7 @@ type SearchMethod =

115115 QueryParam "output" Text :>

116116 QueryParam "query" Text :>

117117 QueryParam "scoring" FreebaseSearchScoring :>

118− QueryParam "limit" (JSONText Int32) :>

118+ QueryParam "limit" (Textual Int32) :>

119119 QueryParams "filter" Text :>

120120 QueryParam "mql_output" Text :>

121121 QueryParams "mid" Text :>

@@ -147,7 +147,7 @@ type SearchMethod =

147147-- /See:/ 'search' smart constructor.

148148data Search = Search

149149 { _sWithout :: !(Maybe [Text])

150− , _sCursor :: !(Maybe (JSONText Int32))

150+ , _sCursor :: !(Maybe (Textual Int32))

151151 , _sWith :: !(Maybe [Text])

152152 , _sDomain :: !(Maybe [Text])

153153 , _sFormat :: !FreebaseSearchFormat

@@ -157,7 +157,7 @@ data Search = Search

157157 , _sOutput :: !(Maybe Text)

158158 , _sQuery :: !(Maybe Text)

159159 , _sScoring :: !FreebaseSearchScoring

160− , _sLimit :: !(JSONText Int32)

160+ , _sLimit :: !(Textual Int32)

161161 , _sFilter :: !(Maybe [Text])

162162 , _sMqlOutput :: !(Maybe Text)

163163 , _sMid :: !(Maybe [Text])

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+26−26

@@ -24,7 +24,7 @@ import Network.Google.Prelude

2424--

2525-- /See:/ 'columnList' smart constructor.

2626data ColumnList = ColumnList

27− { _clTotalItems :: !(Maybe (JSONText Int32))

27+ { _clTotalItems :: !(Maybe (Textual Int32))

2828 , _clNextPageToken :: !(Maybe Text)

2929 , _clKind :: !Text

3030 , _clItems :: !(Maybe [Column])

@@ -236,8 +236,8 @@ instance ToJSON StyleFunction where

236236--

237237-- /See:/ 'columnBaseColumn' smart constructor.

238238data ColumnBaseColumn = ColumnBaseColumn

239− { _cbcTableIndex :: !(Maybe (JSONText Int32))

240− , _cbcColumnId :: !(Maybe (JSONText Int32))

239+ { _cbcTableIndex :: !(Maybe (Textual Int32))

240+ , _cbcColumnId :: !(Maybe (Textual Int32))

241241 } deriving (Eq,Show,Data,Typeable,Generic)

242242

243243-- | Creates a value of 'ColumnBaseColumn' with the minimum fields required to make a request.

@@ -350,7 +350,7 @@ instance ToJSON SQLresponse where

350350-- /See:/ 'styleFunctionGradientColorsItem' smart constructor.

351351data StyleFunctionGradientColorsItem = StyleFunctionGradientColorsItem

352352 { _sfgciColor :: !(Maybe Text)

353− , _sfgciOpacity :: !(Maybe (JSONText Double))

353+ , _sfgciOpacity :: !(Maybe (Textual Double))

354354 } deriving (Eq,Show,Data,Typeable,Generic)

355355

356356-- | Creates a value of 'StyleFunctionGradientColorsItem' with the minimum fields required to make a request.

@@ -398,7 +398,7 @@ instance ToJSON StyleFunctionGradientColorsItem where

398398--

399399-- /See:/ 'styleSettingList' smart constructor.

400400data StyleSettingList = StyleSettingList

401− { _sslTotalItems :: !(Maybe (JSONText Int32))

401+ { _sslTotalItems :: !(Maybe (Textual Int32))

402402 , _sslNextPageToken :: !(Maybe Text)

403403 , _sslKind :: !Text

404404 , _sslItems :: !(Maybe [StyleSetting])

@@ -474,12 +474,12 @@ instance ToJSON StyleSettingList where

474474--

475475-- /See:/ 'bucket' smart constructor.

476476data Bucket = Bucket

477− { _bMax :: !(Maybe (JSONText Double))

477+ { _bMax :: !(Maybe (Textual Double))

478478 , _bColor :: !(Maybe Text)

479− , _bWeight :: !(Maybe (JSONText Int32))

479+ , _bWeight :: !(Maybe (Textual Int32))

480480 , _bIcon :: !(Maybe Text)

481− , _bOpacity :: !(Maybe (JSONText Double))

482− , _bMin :: !(Maybe (JSONText Double))

481+ , _bOpacity :: !(Maybe (Textual Double))

482+ , _bMin :: !(Maybe (Textual Double))

483483 } deriving (Eq,Show,Data,Typeable,Generic)

484484

485485-- | Creates a value of 'Bucket' with the minimum fields required to make a request.

@@ -566,7 +566,7 @@ instance ToJSON Bucket where

566566--

567567-- /See:/ 'line' smart constructor.

568568data Line = Line

569− { _lCoordinates :: !(Maybe [[JSONText Double]])

569+ { _lCoordinates :: !(Maybe [[Textual Double]])

570570 , _lType :: !Text

571571 } deriving (Eq,Show,Data,Typeable,Generic)

572572

@@ -621,7 +621,7 @@ data StyleSetting = StyleSetting

621621 , _ssMarkerOptions :: !(Maybe PointStyle)

622622 , _ssKind :: !Text

623623 , _ssName :: !(Maybe Text)

624− , _ssStyleId :: !(Maybe (JSONText Int32))

624+ , _ssStyleId :: !(Maybe (Textual Int32))

625625 , _ssTableId :: !(Maybe Text)

626626 } deriving (Eq,Show,Data,Typeable,Generic)

627627

@@ -723,7 +723,7 @@ instance ToJSON StyleSetting where

723723--

724724-- /See:/ 'point' smart constructor.

725725data Point = Point

726− { _pCoordinates :: !(Maybe [JSONText Double])

726+ { _pCoordinates :: !(Maybe [Textual Double])

727727 , _pType :: !Text

728728 } deriving (Eq,Show,Data,Typeable,Generic)

729729

@@ -772,7 +772,7 @@ instance ToJSON Point where

772772--

773773-- /See:/ 'polygon' smart constructor.

774774data Polygon = Polygon

775− { _polCoordinates :: !(Maybe [[[JSONText Double]]])

775+ { _polCoordinates :: !(Maybe [[[Textual Double]]])

776776 , _polType :: !Text

777777 } deriving (Eq,Show,Data,Typeable,Generic)

778778

@@ -822,7 +822,7 @@ instance ToJSON Polygon where

822822--

823823-- /See:/ 'taskList' smart constructor.

824824data TaskList = TaskList

825− { _tTotalItems :: !(Maybe (JSONText Int32))

825+ { _tTotalItems :: !(Maybe (Textual Int32))

826826 , _tNextPageToken :: !(Maybe Text)

827827 , _tKind :: !Text

828828 , _tItems :: !(Maybe [Task])

@@ -952,7 +952,7 @@ instance ToJSON Geometry where

952952--

953953-- /See:/ 'templateList' smart constructor.

954954data TemplateList = TemplateList

955− { _temTotalItems :: !(Maybe (JSONText Int32))

955+ { _temTotalItems :: !(Maybe (Textual Int32))

956956 , _temNextPageToken :: !(Maybe Text)

957957 , _temKind :: !Text

958958 , _temItems :: !(Maybe [Template])

@@ -1028,7 +1028,7 @@ instance ToJSON TemplateList where

10281028-- /See:/ 'import'' smart constructor.

10291029data Import = Import

10301030 { _iKind :: !Text

1031− , _iNumRowsReceived :: !(Maybe (JSONText Int64))

1031+ , _iNumRowsReceived :: !(Maybe (Textual Int64))

10321032 } deriving (Eq,Show,Data,Typeable,Generic)

10331033

10341034-- | Creates a value of 'Import' with the minimum fields required to make a request.

@@ -1079,7 +1079,7 @@ instance ToJSON Import where

10791079-- /See:/ 'task' smart constructor.

10801080data Task = Task

10811081 { _tasProgress :: !(Maybe Text)

1082− , _tasTaskId :: !(Maybe (JSONText Int64))

1082+ , _tasTaskId :: !(Maybe (Textual Int64))

10831083 , _tasKind :: !Text

10841084 , _tasType :: !(Maybe Text)

10851085 , _tasStarted :: !(Maybe Bool)

@@ -1158,7 +1158,7 @@ instance ToJSON Task where

11581158-- /See:/ 'template' smart constructor.

11591159data Template = Template

11601160 { _ttAutomaticColumnNames :: !(Maybe [Text])

1161− , _ttTemplateId :: !(Maybe (JSONText Int32))

1161+ , _ttTemplateId :: !(Maybe (Textual Int32))

11621162 , _ttKind :: !Text

11631163 , _ttBody :: !(Maybe Text)

11641164 , _ttName :: !(Maybe Text)

@@ -1307,9 +1307,9 @@ data PolygonStyle = PolygonStyle

13071307 { _psFillColorStyler :: !(Maybe StyleFunction)

13081308 , _psFillColor :: !(Maybe Text)

13091309 , _psStrokeColorStyler :: !(Maybe StyleFunction)

1310− , _psStrokeWeight :: !(Maybe (JSONText Int32))

1311− , _psStrokeOpacity :: !(Maybe (JSONText Double))

1312− , _psFillOpacity :: !(Maybe (JSONText Double))

1310+ , _psStrokeWeight :: !(Maybe (Textual Int32))

1311+ , _psStrokeOpacity :: !(Maybe (Textual Double))

1312+ , _psFillOpacity :: !(Maybe (Textual Double))

13131313 , _psStrokeWeightStyler :: !(Maybe StyleFunction)

13141314 , _psStrokeColor :: !(Maybe Text)

13151315 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1432,8 +1432,8 @@ instance ToJSON PolygonStyle where

14321432--

14331433-- /See:/ 'styleFunctionGradient' smart constructor.

14341434data StyleFunctionGradient = StyleFunctionGradient

1435− { _sfgMax :: !(Maybe (JSONText Double))

1436− , _sfgMin :: !(Maybe (JSONText Double))

1435+ { _sfgMax :: !(Maybe (Textual Double))

1436+ , _sfgMin :: !(Maybe (Textual Double))

14371437 , _sfgColors :: !(Maybe [StyleFunctionGradientColorsItem])

14381438 } deriving (Eq,Show,Data,Typeable,Generic)

14391439

@@ -1503,7 +1503,7 @@ data Column = Column

15031503 , _cName :: !(Maybe Text)

15041504 , _cType :: !(Maybe Text)

15051505 , _cFormatPattern :: !(Maybe Text)

1506− , _cColumnId :: !(Maybe (JSONText Int32))

1506+ , _cColumnId :: !(Maybe (Textual Int32))

15071507 , _cValidValues :: !(Maybe [Text])

15081508 , _cValidateData :: !(Maybe Bool)

15091509 , _cDescription :: !(Maybe Text)

@@ -1869,8 +1869,8 @@ instance ToJSON Table where

18691869-- /See:/ 'lineStyle' smart constructor.

18701870data LineStyle = LineStyle

18711871 { _lsStrokeColorStyler :: !(Maybe StyleFunction)

1872− , _lsStrokeWeight :: !(Maybe (JSONText Int32))

1873− , _lsStrokeOpacity :: !(Maybe (JSONText Double))

1872+ , _lsStrokeWeight :: !(Maybe (Textual Int32))

1873+ , _lsStrokeOpacity :: !(Maybe (Textual Double))

18741874 , _lsStrokeWeightStyler :: !(Maybe StyleFunction)

18751875 , _lsStrokeColor :: !(Maybe Text)

18761876 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Column/List.hs+2−2

@@ -50,7 +50,7 @@ type ColumnListResource =

5050 Capture "tableId" Text :>

5151 "columns" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] ColumnList

5555

5656-- | Retrieves a list of columns.

@@ -59,7 +59,7 @@ type ColumnListResource =

5959data ColumnList' = ColumnList'

6060 { _clPageToken :: !(Maybe Text)

6161 , _clTableId :: !Text

62− , _clMaxResults :: !(Maybe (JSONText Word32))

62+ , _clMaxResults :: !(Maybe (Textual Word32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'ColumnList'' with the minimum fields required to make a request.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Delete.hs+2−2

@@ -48,14 +48,14 @@ type StyleDeleteResource =

4848 "tables" :>

4949 Capture "tableId" Text :>

5050 "styles" :>

51− Capture "styleId" (JSONText Int32) :>

51+ Capture "styleId" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes a style.

5555--

5656-- /See:/ 'styleDelete' smart constructor.

5757data StyleDelete = StyleDelete

58− { _sdStyleId :: !(JSONText Int32)

58+ { _sdStyleId :: !(Textual Int32)

5959 , _sdTableId :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Get.hs+2−2

@@ -48,14 +48,14 @@ type StyleGetResource =

4848 "tables" :>

4949 Capture "tableId" Text :>

5050 "styles" :>

51− Capture "styleId" (JSONText Int32) :>

51+ Capture "styleId" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] StyleSetting

5353

5454-- | Gets a specific style.

5555--

5656-- /See:/ 'styleGet' smart constructor.

5757data StyleGet = StyleGet

58− { _sgStyleId :: !(JSONText Int32)

58+ { _sgStyleId :: !(Textual Int32)

5959 , _sgTableId :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/List.hs+2−2

@@ -50,7 +50,7 @@ type StyleListResource =

5050 Capture "tableId" Text :>

5151 "styles" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] StyleSettingList

5656

@@ -60,7 +60,7 @@ type StyleListResource =

6060data StyleList = StyleList

6161 { _slPageToken :: !(Maybe Text)

6262 , _slTableId :: !Text

63− , _slMaxResults :: !(Maybe (JSONText Word32))

63+ , _slMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'StyleList' with the minimum fields required to make a request.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Patch.hs+2−2

@@ -49,7 +49,7 @@ type StylePatchResource =

4949 "tables" :>

5050 Capture "tableId" Text :>

5151 "styles" :>

52− Capture "styleId" (JSONText Int32) :>

52+ Capture "styleId" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] StyleSetting :>

5555 Patch '[JSON] StyleSetting

@@ -59,7 +59,7 @@ type StylePatchResource =

5959-- /See:/ 'stylePatch' smart constructor.

6060data StylePatch = StylePatch

6161 { _spPayload :: !StyleSetting

62− , _spStyleId :: !(JSONText Int32)

62+ , _spStyleId :: !(Textual Int32)

6363 , _spTableId :: !Text

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Style/Update.hs+2−2

@@ -49,7 +49,7 @@ type StyleUpdateResource =

4949 "tables" :>

5050 Capture "tableId" Text :>

5151 "styles" :>

52− Capture "styleId" (JSONText Int32) :>

52+ Capture "styleId" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] StyleSetting :>

5555 Put '[JSON] StyleSetting

@@ -59,7 +59,7 @@ type StyleUpdateResource =

5959-- /See:/ 'styleUpdate' smart constructor.

6060data StyleUpdate = StyleUpdate

6161 { _suPayload :: !StyleSetting

62− , _suStyleId :: !(JSONText Int32)

62+ , _suStyleId :: !(Textual Int32)

6363 , _suTableId :: !Text

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+6−6

@@ -52,8 +52,8 @@ type TableImportRowsResource =

5252 "tables" :>

5353 Capture "tableId" Text :>

5454 "import" :>

55− QueryParam "startLine" (JSONText Int32) :>

56− QueryParam "endLine" (JSONText Int32) :>

55+ QueryParam "startLine" (Textual Int32) :>

56+ QueryParam "endLine" (Textual Int32) :>

5757 QueryParam "delimiter" Text :>

5858 QueryParam "encoding" Text :>

5959 QueryParam "isStrict" Bool :>

@@ -65,8 +65,8 @@ type TableImportRowsResource =

6565 "tables" :>

6666 Capture "tableId" Text :>

6767 "import" :>

68− QueryParam "startLine" (JSONText Int32) :>

69− QueryParam "endLine" (JSONText Int32) :>

68+ QueryParam "startLine" (Textual Int32) :>

69+ QueryParam "endLine" (Textual Int32) :>

7070 QueryParam "delimiter" Text :>

7171 QueryParam "encoding" Text :>

7272 QueryParam "isStrict" Bool :>

@@ -79,8 +79,8 @@ type TableImportRowsResource =

7979--

8080-- /See:/ 'tableImportRows' smart constructor.

8181data TableImportRows = TableImportRows

82− { _tirStartLine :: !(Maybe (JSONText Int32))

83− , _tirEndLine :: !(Maybe (JSONText Int32))

82+ { _tirStartLine :: !(Maybe (Textual Int32))

83+ , _tirEndLine :: !(Maybe (Textual Int32))

8484 , _tirTableId :: !Text

8585 , _tirDelimiter :: !(Maybe Text)

8686 , _tirEncoding :: !(Maybe Text)

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/List.hs+2−2

@@ -47,7 +47,7 @@ type TableListResource =

4747 "v2" :>

4848 "tables" :>

4949 QueryParam "pageToken" Text :>

50− QueryParam "maxResults" (JSONText Word32) :>

50+ QueryParam "maxResults" (Textual Word32) :>

5151 QueryParam "alt" AltJSON :> Get '[JSON] TableList

5252

5353-- | Retrieves a list of tables a user owns.

@@ -55,7 +55,7 @@ type TableListResource =

5555-- /See:/ 'tableList'' smart constructor.

5656data TableList' = TableList'

5757 { _tPageToken :: !(Maybe Text)

58− , _tMaxResults :: !(Maybe (JSONText Word32))

58+ , _tMaxResults :: !(Maybe (Textual Word32))

5959 } deriving (Eq,Show,Data,Typeable,Generic)

6060

6161-- | Creates a value of 'TableList'' with the minimum fields required to make a request.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+6−6

@@ -53,8 +53,8 @@ type TableReplaceRowsResource =

5353 "tables" :>

5454 Capture "tableId" Text :>

5555 "replace" :>

56− QueryParam "startLine" (JSONText Int32) :>

57− QueryParam "endLine" (JSONText Int32) :>

56+ QueryParam "startLine" (Textual Int32) :>

57+ QueryParam "endLine" (Textual Int32) :>

5858 QueryParam "delimiter" Text :>

5959 QueryParam "encoding" Text :>

6060 QueryParam "isStrict" Bool :>

@@ -66,8 +66,8 @@ type TableReplaceRowsResource =

6666 "tables" :>

6767 Capture "tableId" Text :>

6868 "replace" :>

69− QueryParam "startLine" (JSONText Int32) :>

70− QueryParam "endLine" (JSONText Int32) :>

69+ QueryParam "startLine" (Textual Int32) :>

70+ QueryParam "endLine" (Textual Int32) :>

7171 QueryParam "delimiter" Text :>

7272 QueryParam "encoding" Text :>

7373 QueryParam "isStrict" Bool :>

@@ -81,8 +81,8 @@ type TableReplaceRowsResource =

8181--

8282-- /See:/ 'tableReplaceRows' smart constructor.

8383data TableReplaceRows = TableReplaceRows

84− { _trrStartLine :: !(Maybe (JSONText Int32))

85− , _trrEndLine :: !(Maybe (JSONText Int32))

84+ { _trrStartLine :: !(Maybe (Textual Int32))

85+ , _trrEndLine :: !(Maybe (Textual Int32))

8686 , _trrTableId :: !Text

8787 , _trrDelimiter :: !(Maybe Text)

8888 , _trrEncoding :: !(Maybe Text)

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Task/List.hs+4−4

@@ -51,8 +51,8 @@ type TaskListResource =

5151 Capture "tableId" Text :>

5252 "tasks" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "startIndex" (JSONText Word32) :>

55− QueryParam "maxResults" (JSONText Word32) :>

54+ QueryParam "startIndex" (Textual Word32) :>

55+ QueryParam "maxResults" (Textual Word32) :>

5656 QueryParam "alt" AltJSON :> Get '[JSON] TaskList

5757

5858-- | Retrieves a list of tasks.

@@ -61,8 +61,8 @@ type TaskListResource =

6161data TaskList' = TaskList'

6262 { _tlPageToken :: !(Maybe Text)

6363 , _tlTableId :: !Text

64− , _tlStartIndex :: !(Maybe (JSONText Word32))

65− , _tlMaxResults :: !(Maybe (JSONText Word32))

64+ , _tlStartIndex :: !(Maybe (Textual Word32))

65+ , _tlMaxResults :: !(Maybe (Textual Word32))

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'TaskList'' with the minimum fields required to make a request.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Delete.hs+2−2

@@ -48,14 +48,14 @@ type TemplateDeleteResource =

4848 "tables" :>

4949 Capture "tableId" Text :>

5050 "templates" :>

51− Capture "templateId" (JSONText Int32) :>

51+ Capture "templateId" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Delete '[JSON] ()

5353

5454-- | Deletes a template

5555--

5656-- /See:/ 'templateDelete' smart constructor.

5757data TemplateDelete = TemplateDelete

58− { _tTemplateId :: !(JSONText Int32)

58+ { _tTemplateId :: !(Textual Int32)

5959 , _tTableId :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Get.hs+2−2

@@ -48,14 +48,14 @@ type TemplateGetResource =

4848 "tables" :>

4949 Capture "tableId" Text :>

5050 "templates" :>

51− Capture "templateId" (JSONText Int32) :>

51+ Capture "templateId" (Textual Int32) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Template

5353

5454-- | Retrieves a specific template by its id

5555--

5656-- /See:/ 'templateGet' smart constructor.

5757data TemplateGet = TemplateGet

58− { _temeTemplateId :: !(JSONText Int32)

58+ { _temeTemplateId :: !(Textual Int32)

5959 , _temeTableId :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/List.hs+2−2

@@ -50,7 +50,7 @@ type TemplateListResource =

5050 Capture "tableId" Text :>

5151 "templates" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] TemplateList

5555

5656-- | Retrieves a list of templates.

@@ -59,7 +59,7 @@ type TemplateListResource =

5959data TemplateList' = TemplateList'

6060 { _tllPageToken :: !(Maybe Text)

6161 , _tllTableId :: !Text

62− , _tllMaxResults :: !(Maybe (JSONText Word32))

62+ , _tllMaxResults :: !(Maybe (Textual Word32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'TemplateList'' with the minimum fields required to make a request.

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Patch.hs+2−2

@@ -49,7 +49,7 @@ type TemplatePatchResource =

4949 "tables" :>

5050 Capture "tableId" Text :>

5151 "templates" :>

52− Capture "templateId" (JSONText Int32) :>

52+ Capture "templateId" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Template :> Patch '[JSON] Template

5555

@@ -57,7 +57,7 @@ type TemplatePatchResource =

5757--

5858-- /See:/ 'templatePatch' smart constructor.

5959data TemplatePatch = TemplatePatch

60− { _tppTemplateId :: !(JSONText Int32)

60+ { _tppTemplateId :: !(Textual Int32)

6161 , _tppPayload :: !Template

6262 , _tppTableId :: !Text

6363 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Template/Update.hs+2−2

@@ -49,7 +49,7 @@ type TemplateUpdateResource =

4949 "tables" :>

5050 Capture "tableId" Text :>

5151 "templates" :>

52− Capture "templateId" (JSONText Int32) :>

52+ Capture "templateId" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 ReqBody '[JSON] Template :> Put '[JSON] Template

5555

@@ -57,7 +57,7 @@ type TemplateUpdateResource =

5757--

5858-- /See:/ 'templateUpdate' smart constructor.

5959data TemplateUpdate = TemplateUpdate

60− { _tuTemplateId :: !(JSONText Int32)

60+ { _tuTemplateId :: !(Textual Int32)

6161 , _tuPayload :: !Template

6262 , _tuTableId :: !Text

6363 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Product.hs+7−7

@@ -314,11 +314,11 @@ instance ToJSON AchievementConfigurationListResponse

314314--

315315-- /See:/ 'leaderboardConfiguration' smart constructor.

316316data LeaderboardConfiguration = LeaderboardConfiguration

317− { _lcScoreMax :: !(Maybe (JSONText Int64))

317+ { _lcScoreMax :: !(Maybe (Textual Int64))

318318 , _lcKind :: !Text

319319 , _lcPublished :: !(Maybe LeaderboardConfigurationDetail)

320320 , _lcToken :: !(Maybe Text)

321− , _lcScoreMin :: !(Maybe (JSONText Int64))

321+ , _lcScoreMin :: !(Maybe (Textual Int64))

322322 , _lcDraft :: !(Maybe LeaderboardConfigurationDetail)

323323 , _lcId :: !(Maybe Text)

324324 , _lcScoreOrder :: !(Maybe Text)

@@ -430,7 +430,7 @@ instance ToJSON LeaderboardConfiguration where

430430-- /See:/ 'achievementConfiguration' smart constructor.

431431data AchievementConfiguration = AchievementConfiguration

432432 { _acAchievementType :: !(Maybe Text)

433− , _acStepsToUnlock :: !(Maybe (JSONText Int32))

433+ , _acStepsToUnlock :: !(Maybe (Textual Int32))

434434 , _acKind :: !Text

435435 , _acPublished :: !(Maybe AchievementConfigurationDetail)

436436 , _acToken :: !(Maybe Text)

@@ -609,7 +609,7 @@ data GamesNumberFormatConfiguration = GamesNumberFormatConfiguration

609609 { _gnfcSuffix :: !(Maybe GamesNumberAffixConfiguration)

610610 , _gnfcCurrencyCode :: !(Maybe Text)

611611 , _gnfcNumberFormatType :: !(Maybe Text)

612− , _gnfcNumDecimalPlaces :: !(Maybe (JSONText Int32))

612+ , _gnfcNumDecimalPlaces :: !(Maybe (Textual Int32))

613613 } deriving (Eq,Show,Data,Typeable,Generic)

614614

615615-- | Creates a value of 'GamesNumberFormatConfiguration' with the minimum fields required to make a request.

@@ -689,7 +689,7 @@ instance ToJSON GamesNumberFormatConfiguration where

689689data LeaderboardConfigurationDetail = LeaderboardConfigurationDetail

690690 { _lcdKind :: !Text

691691 , _lcdScoreFormat :: !(Maybe GamesNumberFormatConfiguration)

692− , _lcdSortRank :: !(Maybe (JSONText Int32))

692+ , _lcdSortRank :: !(Maybe (Textual Int32))

693693 , _lcdName :: !(Maybe LocalizedStringBundle)

694694 , _lcdIconURL :: !(Maybe Text)

695695 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -772,9 +772,9 @@ instance ToJSON LeaderboardConfigurationDetail where

772772-- /See:/ 'achievementConfigurationDetail' smart constructor.

773773data AchievementConfigurationDetail = AchievementConfigurationDetail

774774 { _acdKind :: !Text

775− , _acdSortRank :: !(Maybe (JSONText Int32))

775+ , _acdSortRank :: !(Maybe (Textual Int32))

776776 , _acdName :: !(Maybe LocalizedStringBundle)

777− , _acdPointValue :: !(Maybe (JSONText Int32))

777+ , _acdPointValue :: !(Maybe (Textual Int32))

778778 , _acdIconURL :: !(Maybe Text)

779779 , _acdDescription :: !(Maybe LocalizedStringBundle)

780780 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/AchievementConfigurations/List.hs+2−2

@@ -50,7 +50,7 @@ type AchievementConfigurationsListResource =

5050 Capture "applicationId" Text :>

5151 "achievements" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Int32) :>

53+ QueryParam "maxResults" (Textual Int32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] AchievementConfigurationListResponse

5656

@@ -60,7 +60,7 @@ type AchievementConfigurationsListResource =

6060data AchievementConfigurationsList = AchievementConfigurationsList

6161 { _aclApplicationId :: !Text

6262 , _aclPageToken :: !(Maybe Text)

63− , _aclMaxResults :: !(Maybe (JSONText Int32))

63+ , _aclMaxResults :: !(Maybe (Textual Int32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'AchievementConfigurationsList' with the minimum fields required to make a request.

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/LeaderboardConfigurations/List.hs+2−2

@@ -50,7 +50,7 @@ type LeaderboardConfigurationsListResource =

5050 Capture "applicationId" Text :>

5151 "leaderboards" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Int32) :>

53+ QueryParam "maxResults" (Textual Int32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] LeaderboardConfigurationListResponse

5656

@@ -60,7 +60,7 @@ type LeaderboardConfigurationsListResource =

6060data LeaderboardConfigurationsList = LeaderboardConfigurationsList

6161 { _lclApplicationId :: !Text

6262 , _lclPageToken :: !(Maybe Text)

63− , _lclMaxResults :: !(Maybe (JSONText Int32))

63+ , _lclMaxResults :: !(Maybe (Textual Int32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'LeaderboardConfigurationsList' with the minimum fields required to make a request.

gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+7−7

@@ -25,10 +25,10 @@ import Network.Google.Prelude

2525--

2626-- /See:/ 'gamesPlayerExperienceInfoResource' smart constructor.

2727data GamesPlayerExperienceInfoResource = GamesPlayerExperienceInfoResource

28− { _gpeirCurrentExperiencePoints :: !(Maybe (JSONText Int64))

28+ { _gpeirCurrentExperiencePoints :: !(Maybe (Textual Int64))

2929 , _gpeirCurrentLevel :: !(Maybe GamesPlayerLevelResource)

3030 , _gpeirNextLevel :: !(Maybe GamesPlayerLevelResource)

31− , _gpeirLastLevelUpTimestampMillis :: !(Maybe (JSONText Int64))

31+ , _gpeirLastLevelUpTimestampMillis :: !(Maybe (Textual Int64))

3232 } deriving (Eq,Show,Data,Typeable,Generic)

3333

3434-- | Creates a value of 'GamesPlayerExperienceInfoResource' with the minimum fields required to make a request.

@@ -211,7 +211,7 @@ instance ToJSON PlayerScoreResetAllResponse where

211211-- /See:/ 'gamesPlayedResource' smart constructor.

212212data GamesPlayedResource = GamesPlayedResource

213213 { _gprAutoMatched :: !(Maybe Bool)

214− , _gprTimeMillis :: !(Maybe (JSONText Int64))

214+ , _gprTimeMillis :: !(Maybe (Textual Int64))

215215 } deriving (Eq,Show,Data,Typeable,Generic)

216216

217217-- | Creates a value of 'GamesPlayedResource' with the minimum fields required to make a request.

@@ -262,9 +262,9 @@ instance ToJSON GamesPlayedResource where

262262--

263263-- /See:/ 'gamesPlayerLevelResource' smart constructor.

264264data GamesPlayerLevelResource = GamesPlayerLevelResource

265− { _gplrMaxExperiencePoints :: !(Maybe (JSONText Int64))

266− , _gplrMinExperiencePoints :: !(Maybe (JSONText Int64))

267− , _gplrLevel :: !(Maybe (JSONText Int32))

265+ { _gplrMaxExperiencePoints :: !(Maybe (Textual Int64))

266+ , _gplrMinExperiencePoints :: !(Maybe (Textual Int64))

267+ , _gplrLevel :: !(Maybe (Textual Int32))

268268 } deriving (Eq,Show,Data,Typeable,Generic)

269269

270270-- | Creates a value of 'GamesPlayerLevelResource' with the minimum fields required to make a request.

@@ -678,7 +678,7 @@ instance ToJSON AchievementResetMultipleForAllRequest

678678-- /See:/ 'hiddenPlayer' smart constructor.

679679data HiddenPlayer = HiddenPlayer

680680 { _hpKind :: !Text

681− , _hpHiddenTimeMillis :: !(Maybe (JSONText Int64))

681+ , _hpHiddenTimeMillis :: !(Maybe (Textual Int64))

682682 , _hpPlayer :: !(Maybe Player)

683683 } deriving (Eq,Show,Data,Typeable,Generic)

684684

gogol-games-management/gen/Network/Google/Resource/GamesManagement/Applications/ListHidden.hs+2−2

@@ -52,7 +52,7 @@ type ApplicationsListHiddenResource =

5252 "players" :>

5353 "hidden" :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Int32) :>

55+ QueryParam "maxResults" (Textual Int32) :>

5656 QueryParam "alt" AltJSON :>

5757 Get '[JSON] HiddenPlayerList

5858

@@ -63,7 +63,7 @@ type ApplicationsListHiddenResource =

6363data ApplicationsListHidden = ApplicationsListHidden

6464 { _alhApplicationId :: !Text

6565 , _alhPageToken :: !(Maybe Text)

66− , _alhMaxResults :: !(Maybe (JSONText Int32))

66+ , _alhMaxResults :: !(Maybe (Textual Int32))

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

6969-- | Creates a value of 'ApplicationsListHidden' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Games/Types/Product.hs+95−95

@@ -150,13 +150,13 @@ instance ToJSON PlayerName where

150150--

151151-- /See:/ 'snapshot' smart constructor.

152152data Snapshot = Snapshot

153− { _sLastModifiedMillis :: !(Maybe (JSONText Int64))

153+ { _sLastModifiedMillis :: !(Maybe (Textual Int64))

154154 , _sKind :: !Text

155− , _sProgressValue :: !(Maybe (JSONText Int64))

155+ , _sProgressValue :: !(Maybe (Textual Int64))

156156 , _sUniqueName :: !(Maybe Text)

157157 , _sCoverImage :: !(Maybe SnapshotImage)

158158 , _sId :: !(Maybe Text)

159− , _sDurationMillis :: !(Maybe (JSONText Int64))

159+ , _sDurationMillis :: !(Maybe (Textual Int64))

160160 , _sTitle :: !(Maybe Text)

161161 , _sType :: !(Maybe Text)

162162 , _sDescription :: !(Maybe Text)

@@ -304,13 +304,13 @@ instance ToJSON Snapshot where

304304-- /See:/ 'room' smart constructor.

305305data Room = Room

306306 { _rStatus :: !(Maybe Text)

307− , _rVariant :: !(Maybe (JSONText Int32))

307+ , _rVariant :: !(Maybe (Textual Int32))

308308 , _rKind :: !Text

309309 , _rAutoMatchingStatus :: !(Maybe RoomAutoMatchStatus)

310310 , _rCreationDetails :: !(Maybe RoomModification)

311311 , _rInviterId :: !(Maybe Text)

312312 , _rLastUpdateDetails :: !(Maybe RoomModification)

313− , _rRoomStatusVersion :: !(Maybe (JSONText Int32))

313+ , _rRoomStatusVersion :: !(Maybe (Textual Int32))

314314 , _rParticipants :: !(Maybe [RoomParticipant])

315315 , _rApplicationId :: !(Maybe Text)

316316 , _rAutoMatchingCriteria :: !(Maybe RoomAutoMatchingCriteria)

@@ -559,9 +559,9 @@ instance ToJSON QuestListResponse where

559559-- /See:/ 'turnBasedMatch' smart constructor.

560560data TurnBasedMatch = TurnBasedMatch

561561 { _tbmStatus :: !(Maybe Text)

562− , _tbmVariant :: !(Maybe (JSONText Int32))

562+ , _tbmVariant :: !(Maybe (Textual Int32))

563563 , _tbmResults :: !(Maybe [ParticipantResult])

564− , _tbmMatchNumber :: !(Maybe (JSONText Int32))

564+ , _tbmMatchNumber :: !(Maybe (Textual Int32))

565565 , _tbmKind :: !Text

566566 , _tbmData :: !(Maybe TurnBasedMatchData)

567567 , _tbmWithParticipantId :: !(Maybe Text)

@@ -577,7 +577,7 @@ data TurnBasedMatch = TurnBasedMatch

577577 , _tbmMatchId :: !(Maybe Text)

578578 , _tbmDescription :: !(Maybe Text)

579579 , _tbmRematchId :: !(Maybe Text)

580− , _tbmMatchVersion :: !(Maybe (JSONText Int32))

580+ , _tbmMatchVersion :: !(Maybe (Textual Int32))

581581 } deriving (Eq,Show,Data,Typeable,Generic)

582582

583583-- | Creates a value of 'TurnBasedMatch' with the minimum fields required to make a request.

@@ -847,7 +847,7 @@ instance ToJSON TurnBasedMatch where

847847-- /See:/ 'turnBasedMatchData' smart constructor.

848848data TurnBasedMatchData = TurnBasedMatchData

849849 { _tbmdKind :: !Text

850− , _tbmdData :: !(Maybe (JSONText Word8))

850+ , _tbmdData :: !(Maybe (Textual Word8))

851851 , _tbmdDataAvailable :: !(Maybe Bool)

852852 } deriving (Eq,Show,Data,Typeable,Generic)

853853

@@ -910,7 +910,7 @@ instance ToJSON TurnBasedMatchData where

910910-- /See:/ 'playerEvent' smart constructor.

911911data PlayerEvent = PlayerEvent

912912 { _peKind :: !Text

913− , _peNumEvents :: !(Maybe (JSONText Int64))

913+ , _peNumEvents :: !(Maybe (Textual Int64))

914914 , _peFormattedNumEvents :: !(Maybe Text)

915915 , _peDefinitionId :: !(Maybe Text)

916916 , _pePlayerId :: !(Maybe Text)

@@ -998,12 +998,12 @@ data PlayerLeaderboardScore = PlayerLeaderboardScore

998998 { _plsScoreTag :: !(Maybe Text)

999999 , _plsScoreString :: !(Maybe Text)

10001000 , _plsKind :: !Text

1001− , _plsScoreValue :: !(Maybe (JSONText Int64))

1001+ , _plsScoreValue :: !(Maybe (Textual Int64))

10021002 , _plsTimeSpan :: !(Maybe Text)

10031003 , _plsPublicRank :: !(Maybe LeaderboardScoreRank)

10041004 , _plsSocialRank :: !(Maybe LeaderboardScoreRank)

10051005 , _plsLeaderboardId :: !(Maybe Text)

1006− , _plsWriteTimestamp :: !(Maybe (JSONText Int64))

1006+ , _plsWriteTimestamp :: !(Maybe (Textual Int64))

10071007 } deriving (Eq,Show,Data,Typeable,Generic)

10081008

10091009-- | Creates a value of 'PlayerLeaderboardScore' with the minimum fields required to make a request.

@@ -1133,7 +1133,7 @@ instance ToJSON PlayerLeaderboardScore where

11331133-- /See:/ 'application' smart constructor.

11341134data Application = Application

11351135 { _aThemeColor :: !(Maybe Text)

1136− , _aLeaderboardCount :: !(Maybe (JSONText Int32))

1136+ , _aLeaderboardCount :: !(Maybe (Textual Int32))

11371137 , _aKind :: !Text

11381138 , _aCategory :: !(Maybe ApplicationCategory)

11391139 , _aName :: !(Maybe Text)

@@ -1141,10 +1141,10 @@ data Application = Application

11411141 , _aInstances :: !(Maybe [Instance])

11421142 , _aAuthor :: !(Maybe Text)

11431143 , _aId :: !(Maybe Text)

1144− , _aAchievementCount :: !(Maybe (JSONText Int32))

1144+ , _aAchievementCount :: !(Maybe (Textual Int32))

11451145 , _aAssets :: !(Maybe [ImageAsset])

11461146 , _aDescription :: !(Maybe Text)

1147− , _aLastUpdatedTimestamp :: !(Maybe (JSONText Int64))

1147+ , _aLastUpdatedTimestamp :: !(Maybe (Textual Int64))

11481148 } deriving (Eq,Show,Data,Typeable,Generic)

11491149

11501150-- | Creates a value of 'Application' with the minimum fields required to make a request.

@@ -1423,13 +1423,13 @@ instance ToJSON PlayerScoreListResponse where

14231423--

14241424-- /See:/ 'networkDiagnostics' smart constructor.

14251425data NetworkDiagnostics = NetworkDiagnostics

1426− { _ndAndroidNetworkType :: !(Maybe (JSONText Int32))

1426+ { _ndAndroidNetworkType :: !(Maybe (Textual Int32))

14271427 , _ndKind :: !Text

14281428 , _ndNetworkOperatorCode :: !(Maybe Text)

14291429 , _ndNetworkOperatorName :: !(Maybe Text)

1430− , _ndRegistrationLatencyMillis :: !(Maybe (JSONText Int32))

1431− , _ndIosNetworkType :: !(Maybe (JSONText Int32))

1432− , _ndAndroidNetworkSubtype :: !(Maybe (JSONText Int32))

1430+ , _ndRegistrationLatencyMillis :: !(Maybe (Textual Int32))

1431+ , _ndIosNetworkType :: !(Maybe (Textual Int32))

1432+ , _ndAndroidNetworkSubtype :: !(Maybe (Textual Int32))

14331433 } deriving (Eq,Show,Data,Typeable,Generic)

14341434

14351435-- | Creates a value of 'NetworkDiagnostics' with the minimum fields required to make a request.

@@ -1551,7 +1551,7 @@ data TurnBasedMatchTurn = TurnBasedMatchTurn

15511551 , _tbmtKind :: !Text

15521552 , _tbmtData :: !(Maybe TurnBasedMatchDataRequest)

15531553 , _tbmtPendingParticipantId :: !(Maybe Text)

1554− , _tbmtMatchVersion :: !(Maybe (JSONText Int32))

1554+ , _tbmtMatchVersion :: !(Maybe (Textual Int32))

15551555 } deriving (Eq,Show,Data,Typeable,Generic)

15561556

15571557-- | Creates a value of 'TurnBasedMatchTurn' with the minimum fields required to make a request.

@@ -1795,14 +1795,14 @@ instance ToJSON TurnBasedMatchList where

17951795--

17961796-- /See:/ 'peerChannelDiagnostics' smart constructor.

17971797data PeerChannelDiagnostics = PeerChannelDiagnostics

1798− { _pcdNumMessagesLost :: !(Maybe (JSONText Int32))

1798+ { _pcdNumMessagesLost :: !(Maybe (Textual Int32))

17991799 , _pcdBytesSent :: !(Maybe AggregateStats)

18001800 , _pcdKind :: !Text

18011801 , _pcdRoundtripLatencyMillis :: !(Maybe AggregateStats)

18021802 , _pcdBytesReceived :: !(Maybe AggregateStats)

1803− , _pcdNumMessagesReceived :: !(Maybe (JSONText Int32))

1804− , _pcdNumSendFailures :: !(Maybe (JSONText Int32))

1805− , _pcdNumMessagesSent :: !(Maybe (JSONText Int32))

1803+ , _pcdNumMessagesReceived :: !(Maybe (Textual Int32))

1804+ , _pcdNumSendFailures :: !(Maybe (Textual Int32))

1805+ , _pcdNumMessagesSent :: !(Maybe (Textual Int32))

18061806 } deriving (Eq,Show,Data,Typeable,Generic)

18071807

18081808-- | Creates a value of 'PeerChannelDiagnostics' with the minimum fields required to make a request.

@@ -2058,7 +2058,7 @@ data AchievementUpdateResponse = AchievementUpdateResponse

20582058 , _aurKind :: !Text

20592059 , _aurCurrentState :: !(Maybe Text)

20602060 , _aurNewlyUnlocked :: !(Maybe Bool)

2061− , _aurCurrentSteps :: !(Maybe (JSONText Int32))

2061+ , _aurCurrentSteps :: !(Maybe (Textual Int32))

20622062 } deriving (Eq,Show,Data,Typeable,Generic)

20632063

20642064-- | Creates a value of 'AchievementUpdateResponse' with the minimum fields required to make a request.

@@ -2155,14 +2155,14 @@ instance ToJSON AchievementUpdateResponse where

21552155-- /See:/ 'leaderboardEntry' smart constructor.

21562156data LeaderboardEntry = LeaderboardEntry

21572157 { _leScoreTag :: !(Maybe Text)

2158− , _leWriteTimestampMillis :: !(Maybe (JSONText Int64))

2158+ , _leWriteTimestampMillis :: !(Maybe (Textual Int64))

21592159 , _leKind :: !Text

2160− , _leScoreValue :: !(Maybe (JSONText Int64))

2160+ , _leScoreValue :: !(Maybe (Textual Int64))

21612161 , _leFormattedScore :: !(Maybe Text)

21622162 , _leTimeSpan :: !(Maybe Text)

21632163 , _leFormattedScoreRank :: !(Maybe Text)

21642164 , _lePlayer :: !(Maybe Player)

2165− , _leScoreRank :: !(Maybe (JSONText Int64))

2165+ , _leScoreRank :: !(Maybe (Textual Int64))

21662166 } deriving (Eq,Show,Data,Typeable,Generic)

21672167

21682168-- | Creates a value of 'LeaderboardEntry' with the minimum fields required to make a request.

@@ -2351,10 +2351,10 @@ instance ToJSON SnapshotListResponse where

23512351--

23522352-- /See:/ 'playerLevel' smart constructor.

23532353data PlayerLevel = PlayerLevel

2354− { _plMaxExperiencePoints :: !(Maybe (JSONText Int64))

2354+ { _plMaxExperiencePoints :: !(Maybe (Textual Int64))

23552355 , _plKind :: !Text

2356− , _plMinExperiencePoints :: !(Maybe (JSONText Int64))

2357− , _plLevel :: !(Maybe (JSONText Int32))

2356+ , _plMinExperiencePoints :: !(Maybe (Textual Int64))

2357+ , _plLevel :: !(Maybe (Textual Int32))

23582358 } deriving (Eq,Show,Data,Typeable,Generic)

23592359

23602360-- | Creates a value of 'PlayerLevel' with the minimum fields required to make a request.

@@ -2710,7 +2710,7 @@ instance ToJSON EventDefinitionListResponse where

27102710data Category = Category

27112711 { _cKind :: !Text

27122712 , _cCategory :: !(Maybe Text)

2713− , _cExperiencePoints :: !(Maybe (JSONText Int64))

2713+ , _cExperiencePoints :: !(Maybe (Textual Int64))

27142714 } deriving (Eq,Show,Data,Typeable,Generic)

27152715

27162716-- | Creates a value of 'Category' with the minimum fields required to make a request.

@@ -3182,7 +3182,7 @@ instance ToJSON AnonymousPlayer where

31823182-- /See:/ 'questContribution' smart constructor.

31833183data QuestContribution = QuestContribution

31843184 { _qKind :: !Text

3185− , _qValue :: !(Maybe (JSONText Int64))

3185+ , _qValue :: !(Maybe (Textual Int64))

31863186 , _qFormattedValue :: !(Maybe Text)

31873187 } deriving (Eq,Show,Data,Typeable,Generic)

31883188

@@ -3355,7 +3355,7 @@ instance ToJSON LeaderboardListResponse where

33553355-- /See:/ 'playerScore' smart constructor.

33563356data PlayerScore = PlayerScore

33573357 { _psScoreTag :: !(Maybe Text)

3358− , _psScore :: !(Maybe (JSONText Int64))

3358+ , _psScore :: !(Maybe (Textual Int64))

33593359 , _psKind :: !Text

33603360 , _psFormattedScore :: !(Maybe Text)

33613361 , _psTimeSpan :: !(Maybe Text)

@@ -3439,9 +3439,9 @@ instance ToJSON PlayerScore where

34393439-- /See:/ 'turnBasedAutoMatchingCriteria' smart constructor.

34403440data TurnBasedAutoMatchingCriteria = TurnBasedAutoMatchingCriteria

34413441 { _tbamcKind :: !Text

3442− , _tbamcExclusiveBitmask :: !(Maybe (JSONText Int64))

3443− , _tbamcMaxAutoMatchingPlayers :: !(Maybe (JSONText Int32))

3444− , _tbamcMinAutoMatchingPlayers :: !(Maybe (JSONText Int32))

3442+ , _tbamcExclusiveBitmask :: !(Maybe (Textual Int64))

3443+ , _tbamcMaxAutoMatchingPlayers :: !(Maybe (Textual Int32))

3444+ , _tbamcMinAutoMatchingPlayers :: !(Maybe (Textual Int32))

34453445 } deriving (Eq,Show,Data,Typeable,Generic)

34463446

34473447-- | Creates a value of 'TurnBasedAutoMatchingCriteria' with the minimum fields required to make a request.

@@ -3522,11 +3522,11 @@ instance ToJSON TurnBasedAutoMatchingCriteria where

35223522--

35233523-- /See:/ 'snapshotImage' smart constructor.

35243524data SnapshotImage = SnapshotImage

3525− { _siHeight :: !(Maybe (JSONText Int32))

3525+ { _siHeight :: !(Maybe (Textual Int32))

35263526 , _siKind :: !Text

35273527 , _siURL :: !(Maybe Text)

35283528 , _siMimeType :: !(Maybe Text)

3529− , _siWidth :: !(Maybe (JSONText Int32))

3529+ , _siWidth :: !(Maybe (Textual Int32))

35303530 } deriving (Eq,Show,Data,Typeable,Generic)

35313531

35323532-- | Creates a value of 'SnapshotImage' with the minimum fields required to make a request.

@@ -3608,7 +3608,7 @@ data RoomStatus = RoomStatus

36083608 { _rsStatus :: !(Maybe Text)

36093609 , _rsKind :: !Text

36103610 , _rsAutoMatchingStatus :: !(Maybe RoomAutoMatchStatus)

3611− , _rsStatusVersion :: !(Maybe (JSONText Int32))

3611+ , _rsStatusVersion :: !(Maybe (Textual Int32))

36123612 , _rsParticipants :: !(Maybe [RoomParticipant])

36133613 , _rsRoomId :: !(Maybe Text)

36143614 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -4045,7 +4045,7 @@ data ParticipantResult = ParticipantResult

40454045 { _prParticipantId :: !(Maybe Text)

40464046 , _prKind :: !Text

40474047 , _prResult :: !(Maybe Text)

4048− , _prPlacing :: !(Maybe (JSONText Int32))

4048+ , _prPlacing :: !(Maybe (Textual Int32))

40494049 } deriving (Eq,Show,Data,Typeable,Generic)

40504050

40514051-- | Creates a value of 'ParticipantResult' with the minimum fields required to make a request.

@@ -4216,7 +4216,7 @@ instance ToJSON Leaderboard where

42164216-- /See:/ 'metagameConfig' smart constructor.

42174217data MetagameConfig = MetagameConfig

42184218 { _mcKind :: !Text

4219− , _mcCurrentVersion :: !(Maybe (JSONText Int32))

4219+ , _mcCurrentVersion :: !(Maybe (Textual Int32))

42204220 , _mcPlayerLevels :: !(Maybe [PlayerLevel])

42214221 } deriving (Eq,Show,Data,Typeable,Generic)

42224222

@@ -4347,8 +4347,8 @@ data RoomP2PStatus = RoomP2PStatus

43474347 , _rppsKind :: !Text

43484348 , _rppsError :: !(Maybe Text)

43494349 , _rppsErrorReason :: !(Maybe Text)

4350− , _rppsConnectionSetupLatencyMillis :: !(Maybe (JSONText Int32))

4351− , _rppsUnreliableRoundtripLatencyMillis :: !(Maybe (JSONText Int32))

4350+ , _rppsConnectionSetupLatencyMillis :: !(Maybe (Textual Int32))

4351+ , _rppsUnreliableRoundtripLatencyMillis :: !(Maybe (Textual Int32))

43524352 } deriving (Eq,Show,Data,Typeable,Generic)

43534353

43544354-- | Creates a value of 'RoomP2PStatus' with the minimum fields required to make a request.

@@ -4465,7 +4465,7 @@ instance ToJSON RoomP2PStatus where

44654465data TurnBasedMatchModification = TurnBasedMatchModification

44664466 { _tbmmParticipantId :: !(Maybe Text)

44674467 , _tbmmKind :: !Text

4468− , _tbmmModifiedTimestampMillis :: !(Maybe (JSONText Int64))

4468+ , _tbmmModifiedTimestampMillis :: !(Maybe (Textual Int64))

44694469 } deriving (Eq,Show,Data,Typeable,Generic)

44704470

44714471-- | Creates a value of 'TurnBasedMatchModification' with the minimum fields required to make a request.

@@ -4652,7 +4652,7 @@ instance ToJSON EventDefinition where

46524652data RoomModification = RoomModification

46534653 { _rmParticipantId :: !(Maybe Text)

46544654 , _rmKind :: !Text

4655− , _rmModifiedTimestampMillis :: !(Maybe (JSONText Int64))

4655+ , _rmModifiedTimestampMillis :: !(Maybe (Textual Int64))

46564656 } deriving (Eq,Show,Data,Typeable,Generic)

46574657

46584658-- | Creates a value of 'RoomModification' with the minimum fields required to make a request.

@@ -4714,7 +4714,7 @@ instance ToJSON RoomModification where

47144714--

47154715-- /See:/ 'eventUpdateRequest' smart constructor.

47164716data EventUpdateRequest = EventUpdateRequest

4717− { _eUpdateCount :: !(Maybe (JSONText Int64))

4717+ { _eUpdateCount :: !(Maybe (Textual Int64))

47184718 , _eKind :: !Text

47194719 , _eDefinitionId :: !(Maybe Text)

47204720 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -4828,10 +4828,10 @@ data PlayerAchievement = PlayerAchievement

48284828 { _paKind :: !Text

48294829 , _paAchievementState :: !(Maybe Text)

48304830 , _paFormattedCurrentStepsString :: !(Maybe Text)

4831− , _paExperiencePoints :: !(Maybe (JSONText Int64))

4831+ , _paExperiencePoints :: !(Maybe (Textual Int64))

48324832 , _paId :: !(Maybe Text)

4833− , _paCurrentSteps :: !(Maybe (JSONText Int32))

4834− , _paLastUpdatedTimestamp :: !(Maybe (JSONText Int64))

4833+ , _paCurrentSteps :: !(Maybe (Textual Int32))

4834+ , _paLastUpdatedTimestamp :: !(Maybe (Textual Int64))

48354835 } deriving (Eq,Show,Data,Typeable,Generic)

48364836

48374837-- | Creates a value of 'PlayerAchievement' with the minimum fields required to make a request.

@@ -4992,10 +4992,10 @@ instance ToJSON RoomP2PStatuses where

49924992--

49934993-- /See:/ 'imageAsset' smart constructor.

49944994data ImageAsset = ImageAsset

4995− { _iaHeight :: !(Maybe (JSONText Int32))

4995+ { _iaHeight :: !(Maybe (Textual Int32))

49964996 , _iaKind :: !Text

49974997 , _iaURL :: !(Maybe Text)

4998− , _iaWidth :: !(Maybe (JSONText Int32))

4998+ , _iaWidth :: !(Maybe (Textual Int32))

49994999 , _iaName :: !(Maybe Text)

50005000 } deriving (Eq,Show,Data,Typeable,Generic)

50015001

@@ -5127,7 +5127,7 @@ instance ToJSON AchievementUpdateMultipleRequest

51275127-- /See:/ 'roomAutoMatchStatus' smart constructor.

51285128data RoomAutoMatchStatus = RoomAutoMatchStatus

51295129 { _ramsKind :: !Text

5130− , _ramsWaitEstimateSeconds :: !(Maybe (JSONText Int32))

5130+ , _ramsWaitEstimateSeconds :: !(Maybe (Textual Int32))

51315131 } deriving (Eq,Show,Data,Typeable,Generic)

51325132

51335133-- | Creates a value of 'RoomAutoMatchStatus' with the minimum fields required to make a request.

@@ -5269,11 +5269,11 @@ instance ToJSON AchievementUpdateRequest where

52695269--

52705270-- /See:/ 'leaderboardScoreRank' smart constructor.

52715271data LeaderboardScoreRank = LeaderboardScoreRank

5272− { _lsrNumScores :: !(Maybe (JSONText Int64))

5272+ { _lsrNumScores :: !(Maybe (Textual Int64))

52735273 , _lsrKind :: !Text

52745274 , _lsrFormattedRank :: !(Maybe Text)

52755275 , _lsrFormattedNumScores :: !(Maybe Text)

5276− , _lsrRank :: !(Maybe (JSONText Int64))

5276+ , _lsrRank :: !(Maybe (Textual Int64))

52775277 } deriving (Eq,Show,Data,Typeable,Generic)

52785278

52795279-- | Creates a value of 'LeaderboardScoreRank' with the minimum fields required to make a request.

@@ -5354,8 +5354,8 @@ instance ToJSON LeaderboardScoreRank where

53545354--

53555355-- /See:/ 'roomCreateRequest' smart constructor.

53565356data RoomCreateRequest = RoomCreateRequest

5357− { _rooRequestId :: !(Maybe (JSONText Int64))

5358− , _rooVariant :: !(Maybe (JSONText Int32))

5357+ { _rooRequestId :: !(Maybe (Textual Int64))

5358+ , _rooVariant :: !(Maybe (Textual Int32))

53595359 , _rooNetworkDiagnostics :: !(Maybe NetworkDiagnostics)

53605360 , _rooKind :: !Text

53615361 , _rooInvitedPlayerIds :: !(Maybe [Text])

@@ -5545,7 +5545,7 @@ instance ToJSON PlayerListResponse where

55455545-- /See:/ 'leaderboardScores' smart constructor.

55465546data LeaderboardScores = LeaderboardScores

55475547 { _lsNextPageToken :: !(Maybe Text)

5548− , _lsNumScores :: !(Maybe (JSONText Int64))

5548+ , _lsNumScores :: !(Maybe (Textual Int64))

55495549 , _lsKind :: !Text

55505550 , _lsPlayerScore :: !(Maybe LeaderboardEntry)

55515551 , _lsItems :: !(Maybe [LeaderboardEntry])

@@ -5648,12 +5648,12 @@ data AchievementDefinition = AchievementDefinition

56485648 , _adFormattedTotalSteps :: !(Maybe Text)

56495649 , _adRevealedIconURL :: !(Maybe Text)

56505650 , _adKind :: !Text

5651− , _adExperiencePoints :: !(Maybe (JSONText Int64))

5651+ , _adExperiencePoints :: !(Maybe (Textual Int64))

56525652 , _adInitialState :: !(Maybe Text)

56535653 , _adName :: !(Maybe Text)

56545654 , _adId :: !(Maybe Text)

56555655 , _adIsUnlockedIconURLDefault :: !(Maybe Bool)

5656− , _adTotalSteps :: !(Maybe (JSONText Int32))

5656+ , _adTotalSteps :: !(Maybe (Textual Int32))

56575657 , _adDescription :: !(Maybe Text)

56585658 , _adIsRevealedIconURLDefault :: !(Maybe Bool)

56595659 , _adUnlockedIconURL :: !(Maybe Text)

@@ -5830,8 +5830,8 @@ instance ToJSON AchievementDefinition where

58305830--

58315831-- /See:/ 'turnBasedMatchCreateRequest' smart constructor.

58325832data TurnBasedMatchCreateRequest = TurnBasedMatchCreateRequest

5833− { _tbmcrRequestId :: !(Maybe (JSONText Int64))

5834− , _tbmcrVariant :: !(Maybe (JSONText Int32))

5833+ { _tbmcrRequestId :: !(Maybe (Textual Int64))

5834+ , _tbmcrVariant :: !(Maybe (Textual Int32))

58355835 , _tbmcrKind :: !Text

58365836 , _tbmcrInvitedPlayerIds :: !(Maybe [Text])

58375837 , _tbmcrAutoMatchingCriteria :: !(Maybe TurnBasedAutoMatchingCriteria)

@@ -5994,7 +5994,7 @@ data TurnBasedMatchResults = TurnBasedMatchResults

59945994 { _tbmrResults :: !(Maybe [ParticipantResult])

59955995 , _tbmrKind :: !Text

59965996 , _tbmrData :: !(Maybe TurnBasedMatchDataRequest)

5997− , _tbmrMatchVersion :: !(Maybe (JSONText Int32))

5997+ , _tbmrMatchVersion :: !(Maybe (Textual Int32))

59985998 } deriving (Eq,Show,Data,Typeable,Generic)

59995999

60006000-- | Creates a value of 'TurnBasedMatchResults' with the minimum fields required to make a request.

@@ -6064,7 +6064,7 @@ instance ToJSON TurnBasedMatchResults where

60646064--

60656065-- /See:/ 'pushTokenIdIos' smart constructor.

60666066data PushTokenIdIos = PushTokenIdIos

6067− { _ptiiAPNSDeviceToken :: !(Maybe (JSONText Word8))

6067+ { _ptiiAPNSDeviceToken :: !(Maybe (Textual Word8))

60686068 , _ptiiAPNSEnvironment :: !(Maybe Text)

60696069 } deriving (Eq,Show,Data,Typeable,Generic)

60706070

@@ -6196,7 +6196,7 @@ instance ToJSON RoomLeaveRequest where

61966196data Played = Played

61976197 { _pKind :: !Text

61986198 , _pAutoMatched :: !(Maybe Bool)

6199− , _pTimeMillis :: !(Maybe (JSONText Int64))

6199+ , _pTimeMillis :: !(Maybe (Textual Int64))

62006200 } deriving (Eq,Show,Data,Typeable,Generic)

62016201

62026202-- | Creates a value of 'Played' with the minimum fields required to make a request.

@@ -6258,7 +6258,7 @@ instance ToJSON Played where

62586258data AchievementIncrementResponse = AchievementIncrementResponse

62596259 { _airKind :: !Text

62606260 , _airNewlyUnlocked :: !(Maybe Bool)

6261− , _airCurrentSteps :: !(Maybe (JSONText Int32))

6261+ , _airCurrentSteps :: !(Maybe (Textual Int32))

62626262 } deriving (Eq,Show,Data,Typeable,Generic)

62636263

62646264-- | Creates a value of 'AchievementIncrementResponse' with the minimum fields required to make a request.

@@ -6374,7 +6374,7 @@ instance ToJSON AchievementRevealResponse where

63746374data AchievementSetStepsAtLeastResponse = AchievementSetStepsAtLeastResponse

63756375 { _assalrKind :: !Text

63766376 , _assalrNewlyUnlocked :: !(Maybe Bool)

6377− , _assalrCurrentSteps :: !(Maybe (JSONText Int32))

6377+ , _assalrCurrentSteps :: !(Maybe (Textual Int32))

63786378 } deriving (Eq,Show,Data,Typeable,Generic)

63796379

63806380-- | Creates a value of 'AchievementSetStepsAtLeastResponse' with the minimum fields required to make a request.

@@ -6502,9 +6502,9 @@ instance ToJSON PlayerAchievementListResponse where

65026502--

65036503-- /See:/ 'eventRecordRequest' smart constructor.

65046504data EventRecordRequest = EventRecordRequest

6505− { _errRequestId :: !(Maybe (JSONText Int64))

6505+ { _errRequestId :: !(Maybe (Textual Int64))

65066506 , _errKind :: !Text

6507− , _errCurrentTimeMillis :: !(Maybe (JSONText Int64))

6507+ , _errCurrentTimeMillis :: !(Maybe (Textual Int64))

65086508 , _errTimePeriods :: !(Maybe [EventPeriodUpdate])

65096509 } deriving (Eq,Show,Data,Typeable,Generic)

65106510

@@ -6580,9 +6580,9 @@ instance ToJSON EventRecordRequest where

65806580-- /See:/ 'roomAutoMatchingCriteria' smart constructor.

65816581data RoomAutoMatchingCriteria = RoomAutoMatchingCriteria

65826582 { _ramcKind :: !Text

6583− , _ramcExclusiveBitmask :: !(Maybe (JSONText Int64))

6584− , _ramcMaxAutoMatchingPlayers :: !(Maybe (JSONText Int32))

6585− , _ramcMinAutoMatchingPlayers :: !(Maybe (JSONText Int32))

6583+ , _ramcExclusiveBitmask :: !(Maybe (Textual Int64))

6584+ , _ramcMaxAutoMatchingPlayers :: !(Maybe (Textual Int32))

6585+ , _ramcMinAutoMatchingPlayers :: !(Maybe (Textual Int32))

65866586 } deriving (Eq,Show,Data,Typeable,Generic)

65876587

65886588-- | Creates a value of 'RoomAutoMatchingCriteria' with the minimum fields required to make a request.

@@ -6664,7 +6664,7 @@ data QuestMilestone = QuestMilestone

66646664 { _qmState :: !(Maybe Text)

66656665 , _qmKind :: !Text

66666666 , _qmId :: !(Maybe Text)

6667− , _qmCompletionRewardData :: !(Maybe (JSONText Word8))

6667+ , _qmCompletionRewardData :: !(Maybe (Textual Word8))

66686668 , _qmCriteria :: !(Maybe [QuestCriterion])

66696669 } deriving (Eq,Show,Data,Typeable,Generic)

66706670

@@ -6751,7 +6751,7 @@ instance ToJSON QuestMilestone where

67516751--

67526752-- /See:/ 'peerSessionDiagnostics' smart constructor.

67536753data PeerSessionDiagnostics = PeerSessionDiagnostics

6754− { _psdConnectedTimestampMillis :: !(Maybe (JSONText Int64))

6754+ { _psdConnectedTimestampMillis :: !(Maybe (Textual Int64))

67556755 , _psdParticipantId :: !(Maybe Text)

67566756 , _psdKind :: !Text

67576757 , _psdUnreliableChannel :: !(Maybe PeerChannelDiagnostics)

@@ -7024,7 +7024,7 @@ instance ToJSON TurnBasedMatchSync where

70247024data ScoreSubmission = ScoreSubmission

70257025 { _scoSignature :: !(Maybe Text)

70267026 , _scoScoreTag :: !(Maybe Text)

7027− , _scoScore :: !(Maybe (JSONText Int64))

7027+ , _scoScore :: !(Maybe (Textual Int64))

70287028 , _scoKind :: !Text

70297029 , _scoLeaderboardId :: !(Maybe Text)

70307030 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -7107,13 +7107,13 @@ instance ToJSON ScoreSubmission where

71077107-- /See:/ 'roomLeaveDiagnostics' smart constructor.

71087108data RoomLeaveDiagnostics = RoomLeaveDiagnostics

71097109 { _rldPeerSession :: !(Maybe [PeerSessionDiagnostics])

7110− , _rldAndroidNetworkType :: !(Maybe (JSONText Int32))

7110+ , _rldAndroidNetworkType :: !(Maybe (Textual Int32))

71117111 , _rldKind :: !Text

71127112 , _rldNetworkOperatorCode :: !(Maybe Text)

71137113 , _rldNetworkOperatorName :: !(Maybe Text)

71147114 , _rldSocketsUsed :: !(Maybe Bool)

7115− , _rldIosNetworkType :: !(Maybe (JSONText Int32))

7116− , _rldAndroidNetworkSubtype :: !(Maybe (JSONText Int32))

7115+ , _rldIosNetworkType :: !(Maybe (Textual Int32))

7116+ , _rldAndroidNetworkSubtype :: !(Maybe (Textual Int32))

71177117 } deriving (Eq,Show,Data,Typeable,Generic)

71187118

71197119-- | Creates a value of 'RoomLeaveDiagnostics' with the minimum fields required to make a request.

@@ -7243,11 +7243,11 @@ instance ToJSON RoomLeaveDiagnostics where

72437243--

72447244-- /See:/ 'aggregateStats' smart constructor.

72457245data AggregateStats = AggregateStats

7246− { _asMax :: !(Maybe (JSONText Int64))

7246+ { _asMax :: !(Maybe (Textual Int64))

72477247 , _asKind :: !Text

7248− , _asCount :: !(Maybe (JSONText Int64))

7249− , _asMin :: !(Maybe (JSONText Int64))

7250− , _asSum :: !(Maybe (JSONText Int64))

7248+ , _asCount :: !(Maybe (Textual Int64))

7249+ , _asMin :: !(Maybe (Textual Int64))

7250+ , _asSum :: !(Maybe (Textual Int64))

72517251 } deriving (Eq,Show,Data,Typeable,Generic)

72527252

72537253-- | Creates a value of 'AggregateStats' with the minimum fields required to make a request.

@@ -7448,10 +7448,10 @@ instance ToJSON TurnBasedMatchRematch where

74487448-- /See:/ 'playerExperienceInfo' smart constructor.

74497449data PlayerExperienceInfo = PlayerExperienceInfo

74507450 { _peiKind :: !Text

7451− , _peiCurrentExperiencePoints :: !(Maybe (JSONText Int64))

7451+ , _peiCurrentExperiencePoints :: !(Maybe (Textual Int64))

74527452 , _peiCurrentLevel :: !(Maybe PlayerLevel)

74537453 , _peiNextLevel :: !(Maybe PlayerLevel)

7454− , _peiLastLevelUpTimestampMillis :: !(Maybe (JSONText Int64))

7454+ , _peiLastLevelUpTimestampMillis :: !(Maybe (Textual Int64))

74557455 } deriving (Eq,Show,Data,Typeable,Generic)

74567456

74577457-- | Creates a value of 'PlayerExperienceInfo' with the minimum fields required to make a request.

@@ -7539,7 +7539,7 @@ instance ToJSON PlayerExperienceInfo where

75397539-- /See:/ 'gamesAchievementSetStepsAtLeast' smart constructor.

75407540data GamesAchievementSetStepsAtLeast = GamesAchievementSetStepsAtLeast

75417541 { _gassalKind :: !Text

7542− , _gassalSteps :: !(Maybe (JSONText Int32))

7542+ , _gassalSteps :: !(Maybe (Textual Int32))

75437543 } deriving (Eq,Show,Data,Typeable,Generic)

75447544

75457545-- | Creates a value of 'GamesAchievementSetStepsAtLeast' with the minimum fields required to make a request.

@@ -7709,9 +7709,9 @@ instance ToJSON Player where

77097709--

77107710-- /See:/ 'gamesAchievementIncrement' smart constructor.

77117711data GamesAchievementIncrement = GamesAchievementIncrement

7712− { _gaiRequestId :: !(Maybe (JSONText Int64))

7712+ { _gaiRequestId :: !(Maybe (Textual Int64))

77137713 , _gaiKind :: !Text

7714− , _gaiSteps :: !(Maybe (JSONText Int32))

7714+ , _gaiSteps :: !(Maybe (Textual Int32))

77157715 } deriving (Eq,Show,Data,Typeable,Generic)

77167716

77177717-- | Creates a value of 'GamesAchievementIncrement' with the minimum fields required to make a request.

@@ -7770,22 +7770,22 @@ instance ToJSON GamesAchievementIncrement where

77707770--

77717771-- /See:/ 'quest' smart constructor.

77727772data Quest = Quest

7773− { _queLastUpdatedTimestampMillis :: !(Maybe (JSONText Int64))

7773+ { _queLastUpdatedTimestampMillis :: !(Maybe (Textual Int64))

77747774 , _queBannerURL :: !(Maybe Text)

77757775 , _queState :: !(Maybe Text)

77767776 , _queMilestones :: !(Maybe [QuestMilestone])

77777777 , _queKind :: !Text

77787778 , _queApplicationId :: !(Maybe Text)

7779− , _queEndTimestampMillis :: !(Maybe (JSONText Int64))

7779+ , _queEndTimestampMillis :: !(Maybe (Textual Int64))

77807780 , _queName :: !(Maybe Text)

77817781 , _queId :: !(Maybe Text)

77827782 , _queIconURL :: !(Maybe Text)

7783− , _queStartTimestampMillis :: !(Maybe (JSONText Int64))

7784− , _queNotifyTimestampMillis :: !(Maybe (JSONText Int64))

7783+ , _queStartTimestampMillis :: !(Maybe (Textual Int64))

7784+ , _queNotifyTimestampMillis :: !(Maybe (Textual Int64))

77857785 , _queDescription :: !(Maybe Text)

77867786 , _queIsDefaultBannerURL :: !(Maybe Bool)

77877787 , _queIsDefaultIconURL :: !(Maybe Bool)

7788− , _queAcceptedTimestampMillis :: !(Maybe (JSONText Int64))

7788+ , _queAcceptedTimestampMillis :: !(Maybe (Textual Int64))

77897789 } deriving (Eq,Show,Data,Typeable,Generic)

77907790

77917791-- | Creates a value of 'Quest' with the minimum fields required to make a request.

@@ -8115,7 +8115,7 @@ instance ToJSON PlayerEventListResponse where

81158115-- /See:/ 'turnBasedMatchDataRequest' smart constructor.

81168116data TurnBasedMatchDataRequest = TurnBasedMatchDataRequest

81178117 { _tbmdrKind :: !Text

8118− , _tbmdrData :: !(Maybe (JSONText Word8))

8118+ , _tbmdrData :: !(Maybe (Textual Word8))

81198119 } deriving (Eq,Show,Data,Typeable,Generic)

81208120

81218121-- | Creates a value of 'TurnBasedMatchDataRequest' with the minimum fields required to make a request.

@@ -8166,8 +8166,8 @@ instance ToJSON TurnBasedMatchDataRequest where

81668166-- /See:/ 'eventPeriodRange' smart constructor.

81678167data EventPeriodRange = EventPeriodRange

81688168 { _eprKind :: !Text

8169− , _eprPeriodStartMillis :: !(Maybe (JSONText Int64))

8170− , _eprPeriodEndMillis :: !(Maybe (JSONText Int64))

8169+ , _eprPeriodStartMillis :: !(Maybe (Textual Int64))

8170+ , _eprPeriodEndMillis :: !(Maybe (Textual Int64))

81718171 } deriving (Eq,Show,Data,Typeable,Generic)

81728172

81738173-- | Creates a value of 'EventPeriodRange' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/AchievementDefinitions/List.hs+2−2

@@ -49,7 +49,7 @@ type AchievementDefinitionsListResource =

4949 "achievements" :>

5050 QueryParam "language" Text :>

5151 QueryParam "pageToken" Text :>

52− QueryParam "maxResults" (JSONText Int32) :>

52+ QueryParam "maxResults" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] AchievementDefinitionsListResponse

5555

@@ -59,7 +59,7 @@ type AchievementDefinitionsListResource =

5959data AchievementDefinitionsList = AchievementDefinitionsList

6060 { _adlLanguage :: !(Maybe Text)

6161 , _adlPageToken :: !(Maybe Text)

62− , _adlMaxResults :: !(Maybe (JSONText Int32))

62+ , _adlMaxResults :: !(Maybe (Textual Int32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'AchievementDefinitionsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Achievements/Increment.hs+4−4

@@ -50,8 +50,8 @@ type AchievementsIncrementResource =

5050 "achievements" :>

5151 Capture "achievementId" Text :>

5252 "increment" :>

53− QueryParam "stepsToIncrement" (JSONText Int32) :>

54− QueryParam "requestId" (JSONText Int64) :>

53+ QueryParam "stepsToIncrement" (Textual Int32) :>

54+ QueryParam "requestId" (Textual Int64) :>

5555 QueryParam "alt" AltJSON :>

5656 Post '[JSON] AchievementIncrementResponse

5757

@@ -60,9 +60,9 @@ type AchievementsIncrementResource =

6060--

6161-- /See:/ 'achievementsIncrement' smart constructor.

6262data AchievementsIncrement = AchievementsIncrement

63− { _aiRequestId :: !(Maybe (JSONText Int64))

63+ { _aiRequestId :: !(Maybe (Textual Int64))

6464 , _aiAchievementId :: !Text

65− , _aiStepsToIncrement :: !(JSONText Int32)

65+ , _aiStepsToIncrement :: !(Textual Int32)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'AchievementsIncrement' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Achievements/List.hs+2−2

@@ -55,7 +55,7 @@ type AchievementsListResource =

5555 QueryParam "state" AchievementsListState :>

5656 QueryParam "language" Text :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Int32) :>

58+ QueryParam "maxResults" (Textual Int32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] PlayerAchievementListResponse

6161

@@ -68,7 +68,7 @@ data AchievementsList = AchievementsList

6868 , _alLanguage :: !(Maybe Text)

6969 , _alPageToken :: !(Maybe Text)

7070 , _alPlayerId :: !Text

71− , _alMaxResults :: !(Maybe (JSONText Int32))

71+ , _alMaxResults :: !(Maybe (Textual Int32))

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'AchievementsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Achievements/SetStepsAtLeast.hs+2−2

@@ -51,7 +51,7 @@ type AchievementsSetStepsAtLeastResource =

5151 "achievements" :>

5252 Capture "achievementId" Text :>

5353 "setStepsAtLeast" :>

54− QueryParam "steps" (JSONText Int32) :>

54+ QueryParam "steps" (Textual Int32) :>

5555 QueryParam "alt" AltJSON :>

5656 Post '[JSON] AchievementSetStepsAtLeastResponse

5757

@@ -63,7 +63,7 @@ type AchievementsSetStepsAtLeastResource =

6363-- /See:/ 'achievementsSetStepsAtLeast' smart constructor.

6464data AchievementsSetStepsAtLeast = AchievementsSetStepsAtLeast

6565 { _assalAchievementId :: !Text

66− , _assalSteps :: !(JSONText Int32)

66+ , _assalSteps :: !(Textual Int32)

6767 } deriving (Eq,Show,Data,Typeable,Generic)

6868

6969-- | Creates a value of 'AchievementsSetStepsAtLeast' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Events/ListByPlayer.hs+2−2

@@ -50,7 +50,7 @@ type EventsListByPlayerResource =

5050 "events" :>

5151 QueryParam "language" Text :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Int32) :>

53+ QueryParam "maxResults" (Textual Int32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] PlayerEventListResponse

5656

@@ -61,7 +61,7 @@ type EventsListByPlayerResource =

6161data EventsListByPlayer = EventsListByPlayer

6262 { _elbpLanguage :: !(Maybe Text)

6363 , _elbpPageToken :: !(Maybe Text)

64− , _elbpMaxResults :: !(Maybe (JSONText Int32))

64+ , _elbpMaxResults :: !(Maybe (Textual Int32))

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

6767-- | Creates a value of 'EventsListByPlayer' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Events/ListDefinitions.hs+2−2

@@ -49,7 +49,7 @@ type EventsListDefinitionsResource =

4949 "eventDefinitions" :>

5050 QueryParam "language" Text :>

5151 QueryParam "pageToken" Text :>

52− QueryParam "maxResults" (JSONText Int32) :>

52+ QueryParam "maxResults" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] EventDefinitionListResponse

5555

@@ -59,7 +59,7 @@ type EventsListDefinitionsResource =

5959data EventsListDefinitions = EventsListDefinitions

6060 { _eldLanguage :: !(Maybe Text)

6161 , _eldPageToken :: !(Maybe Text)

62− , _eldMaxResults :: !(Maybe (JSONText Int32))

62+ , _eldMaxResults :: !(Maybe (Textual Int32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'EventsListDefinitions' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Leaderboards/List.hs+2−2

@@ -49,7 +49,7 @@ type LeaderboardsListResource =

4949 "leaderboards" :>

5050 QueryParam "language" Text :>

5151 QueryParam "pageToken" Text :>

52− QueryParam "maxResults" (JSONText Int32) :>

52+ QueryParam "maxResults" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :>

5454 Get '[JSON] LeaderboardListResponse

5555

@@ -59,7 +59,7 @@ type LeaderboardsListResource =

5959data LeaderboardsList = LeaderboardsList

6060 { _llLanguage :: !(Maybe Text)

6161 , _llPageToken :: !(Maybe Text)

62− , _llMaxResults :: !(Maybe (JSONText Int32))

62+ , _llMaxResults :: !(Maybe (Textual Int32))

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'LeaderboardsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Metagame/ListCategoriesByPlayer.hs+2−2

@@ -57,7 +57,7 @@ type MetagameListCategoriesByPlayerResource =

5757 :>

5858 QueryParam "language" Text :>

5959 QueryParam "pageToken" Text :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] CategoryListResponse

6363

@@ -70,7 +70,7 @@ data MetagameListCategoriesByPlayer = MetagameListCategoriesByPlayer

7070 , _mlcbpLanguage :: !(Maybe Text)

7171 , _mlcbpPageToken :: !(Maybe Text)

7272 , _mlcbpPlayerId :: !Text

73− , _mlcbpMaxResults :: !(Maybe (JSONText Int32))

73+ , _mlcbpMaxResults :: !(Maybe (Textual Int32))

7474 } deriving (Eq,Show,Data,Typeable,Generic)

7575

7676-- | Creates a value of 'MetagameListCategoriesByPlayer' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Players/List.hs+2−2

@@ -53,7 +53,7 @@ type PlayersListResource =

5353 Capture "collection" PlayersListCollection :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] PlayerListResponse

5959

@@ -64,7 +64,7 @@ data PlayersList = PlayersList

6464 { _plCollection :: !PlayersListCollection

6565 , _plLanguage :: !(Maybe Text)

6666 , _plPageToken :: !(Maybe Text)

67− , _plMaxResults :: !(Maybe (JSONText Int32))

67+ , _plMaxResults :: !(Maybe (Textual Int32))

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'PlayersList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/QuestMilestones/Claim.hs+2−2

@@ -53,7 +53,7 @@ type QuestMilestonesClaimResource =

5353 "milestones" :>

5454 Capture "milestoneId" Text :>

5555 "claim" :>

56− QueryParam "requestId" (JSONText Int64) :>

56+ QueryParam "requestId" (Textual Int64) :>

5757 QueryParam "alt" AltJSON :> Put '[JSON] ()

5858

5959-- | Report that a reward for the milestone corresponding to milestoneId for

@@ -62,7 +62,7 @@ type QuestMilestonesClaimResource =

6262--

6363-- /See:/ 'questMilestonesClaim' smart constructor.

6464data QuestMilestonesClaim = QuestMilestonesClaim

65− { _qmcRequestId :: !(JSONText Int64)

65+ { _qmcRequestId :: !(Textual Int64)

6666 , _qmcMilestoneId :: !Text

6767 , _qmcQuestId :: !Text

6868 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-games/gen/Network/Google/Resource/Games/Quests/List.hs+2−2

@@ -53,7 +53,7 @@ type QuestsListResource =

5353 "quests" :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] QuestListResponse

5959

@@ -65,7 +65,7 @@ data QuestsList = QuestsList

6565 { _qlLanguage :: !(Maybe Text)

6666 , _qlPageToken :: !(Maybe Text)

6767 , _qlPlayerId :: !Text

68− , _qlMaxResults :: !(Maybe (JSONText Int32))

68+ , _qlMaxResults :: !(Maybe (Textual Int32))

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'QuestsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Rooms/List.hs+2−2

@@ -49,7 +49,7 @@ type RoomsListResource =

4949 "rooms" :>

5050 QueryParam "language" Text :>

5151 QueryParam "pageToken" Text :>

52− QueryParam "maxResults" (JSONText Int32) :>

52+ QueryParam "maxResults" (Textual Int32) :>

5353 QueryParam "alt" AltJSON :> Get '[JSON] RoomList

5454

5555-- | Returns invitations to join rooms.

@@ -58,7 +58,7 @@ type RoomsListResource =

5858data RoomsList = RoomsList

5959 { _rLanguage :: !(Maybe Text)

6060 , _rPageToken :: !(Maybe Text)

61− , _rMaxResults :: !(Maybe (JSONText Int32))

61+ , _rMaxResults :: !(Maybe (Textual Int32))

6262 } deriving (Eq,Show,Data,Typeable,Generic)

6363

6464-- | Creates a value of 'RoomsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Scores/Get.hs+2−2

@@ -64,7 +64,7 @@ type ScoresGetResource =

6464 :>

6565 QueryParam "language" Text :>

6666 QueryParam "pageToken" Text :>

67− QueryParam "maxResults" (JSONText Int32) :>

67+ QueryParam "maxResults" (Textual Int32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] PlayerLeaderboardScoreListResponse

7070

@@ -82,7 +82,7 @@ data ScoresGet = ScoresGet

8282 , _sgLanguage :: !(Maybe Text)

8383 , _sgPageToken :: !(Maybe Text)

8484 , _sgPlayerId :: !Text

85− , _sgMaxResults :: !(Maybe (JSONText Int32))

85+ , _sgMaxResults :: !(Maybe (Textual Int32))

8686 } deriving (Eq,Show,Data,Typeable,Generic)

8787

8888-- | Creates a value of 'ScoresGet' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Scores/List.hs+2−2

@@ -56,7 +56,7 @@ type ScoresListResource =

5656 QueryParam "timeSpan" ScoresListTimeSpan :>

5757 QueryParam "language" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Int32) :>

59+ QueryParam "maxResults" (Textual Int32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] LeaderboardScores

6262

@@ -69,7 +69,7 @@ data ScoresList = ScoresList

6969 , _sllLeaderboardId :: !Text

7070 , _sllLanguage :: !(Maybe Text)

7171 , _sllPageToken :: !(Maybe Text)

72− , _sllMaxResults :: !(Maybe (JSONText Int32))

72+ , _sllMaxResults :: !(Maybe (Textual Int32))

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'ScoresList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Scores/ListWindow.hs+4−4

@@ -59,9 +59,9 @@ type ScoresListWindowResource =

5959 QueryParam "timeSpan" ScoresListWindowTimeSpan :>

6060 QueryParam "returnTopIfAbsent" Bool :>

6161 QueryParam "language" Text :>

62− QueryParam "resultsAbove" (JSONText Int32) :>

62+ QueryParam "resultsAbove" (Textual Int32) :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "maxResults" (JSONText Int32) :>

64+ QueryParam "maxResults" (Textual Int32) :>

6565 QueryParam "alt" AltJSON :>

6666 Get '[JSON] LeaderboardScores

6767

@@ -75,9 +75,9 @@ data ScoresListWindow = ScoresListWindow

7575 , _slwReturnTopIfAbsent :: !(Maybe Bool)

7676 , _slwLeaderboardId :: !Text

7777 , _slwLanguage :: !(Maybe Text)

78− , _slwResultsAbove :: !(Maybe (JSONText Int32))

78+ , _slwResultsAbove :: !(Maybe (Textual Int32))

7979 , _slwPageToken :: !(Maybe Text)

80− , _slwMaxResults :: !(Maybe (JSONText Int32))

80+ , _slwMaxResults :: !(Maybe (Textual Int32))

8181 } deriving (Eq,Show,Data,Typeable,Generic)

8282

8383-- | Creates a value of 'ScoresListWindow' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/Scores/Submit.hs+2−2

@@ -50,7 +50,7 @@ type ScoresSubmitResource =

5050 "leaderboards" :>

5151 Capture "leaderboardId" Text :>

5252 "scores" :>

53− QueryParam "score" (JSONText Int64) :>

53+ QueryParam "score" (Textual Int64) :>

5454 QueryParam "scoreTag" Text :>

5555 QueryParam "language" Text :>

5656 QueryParam "alt" AltJSON :>

@@ -61,7 +61,7 @@ type ScoresSubmitResource =

6161-- /See:/ 'scoresSubmit' smart constructor.

6262data ScoresSubmit = ScoresSubmit

6363 { _ssScoreTag :: !(Maybe Text)

64− , _ssScore :: !(JSONText Int64)

64+ , _ssScore :: !(Textual Int64)

6565 , _ssLeaderboardId :: !Text

6666 , _ssLanguage :: !(Maybe Text)

6767 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-games/gen/Network/Google/Resource/Games/Snapshots/List.hs+2−2

@@ -53,7 +53,7 @@ type SnapshotsListResource =

5353 "snapshots" :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] SnapshotListResponse

5959

@@ -65,7 +65,7 @@ data SnapshotsList = SnapshotsList

6565 { _slLanguage :: !(Maybe Text)

6666 , _slPageToken :: !(Maybe Text)

6767 , _slPlayerId :: !Text

68− , _slMaxResults :: !(Maybe (JSONText Int32))

68+ , _slMaxResults :: !(Maybe (Textual Int32))

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'SnapshotsList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/LeaveTurn.hs+2−2

@@ -51,7 +51,7 @@ type TurnBasedMatchesLeaveTurnResource =

5151 "turnbasedmatches" :>

5252 Capture "matchId" Text :>

5353 "leaveTurn" :>

54− QueryParam "matchVersion" (JSONText Int32) :>

54+ QueryParam "matchVersion" (Textual Int32) :>

5555 QueryParam "language" Text :>

5656 QueryParam "pendingParticipantId" Text :>

5757 QueryParam "alt" AltJSON :>

@@ -65,7 +65,7 @@ data TurnBasedMatchesLeaveTurn = TurnBasedMatchesLeaveTurn

6565 { _tbmltLanguage :: !(Maybe Text)

6666 , _tbmltPendingParticipantId :: !(Maybe Text)

6767 , _tbmltMatchId :: !Text

68− , _tbmltMatchVersion :: !(JSONText Int32)

68+ , _tbmltMatchVersion :: !(Textual Int32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'TurnBasedMatchesLeaveTurn' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/List.hs+4−4

@@ -49,11 +49,11 @@ type TurnBasedMatchesListResource =

4949 "games" :>

5050 "v1" :>

5151 "turnbasedmatches" :>

52− QueryParam "maxCompletedMatches" (JSONText Int32) :>

52+ QueryParam "maxCompletedMatches" (Textual Int32) :>

5353 QueryParam "includeMatchData" Bool :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Int32) :>

56+ QueryParam "maxResults" (Textual Int32) :>

5757 QueryParam "alt" AltJSON :>

5858 Get '[JSON] TurnBasedMatchList

5959

@@ -61,11 +61,11 @@ type TurnBasedMatchesListResource =

6161--

6262-- /See:/ 'turnBasedMatchesList' smart constructor.

6363data TurnBasedMatchesList = TurnBasedMatchesList

64− { _tMaxCompletedMatches :: !(Maybe (JSONText Int32))

64+ { _tMaxCompletedMatches :: !(Maybe (Textual Int32))

6565 , _tIncludeMatchData :: !(Maybe Bool)

6666 , _tLanguage :: !(Maybe Text)

6767 , _tPageToken :: !(Maybe Text)

68− , _tMaxResults :: !(Maybe (JSONText Int32))

68+ , _tMaxResults :: !(Maybe (Textual Int32))

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'TurnBasedMatchesList' with the minimum fields required to make a request.

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Rematch.hs+2−2

@@ -52,7 +52,7 @@ type TurnBasedMatchesRematchResource =

5252 "turnbasedmatches" :>

5353 Capture "matchId" Text :>

5454 "rematch" :>

55− QueryParam "requestId" (JSONText Int64) :>

55+ QueryParam "requestId" (Textual Int64) :>

5656 QueryParam "language" Text :>

5757 QueryParam "alt" AltJSON :>

5858 Post '[JSON] TurnBasedMatchRematch

@@ -64,7 +64,7 @@ type TurnBasedMatchesRematchResource =

6464--

6565-- /See:/ 'turnBasedMatchesRematch' smart constructor.

6666data TurnBasedMatchesRematch = TurnBasedMatchesRematch

67− { _tbmrRequestId :: !(Maybe (JSONText Int64))

67+ { _tbmrRequestId :: !(Maybe (Textual Int64))

6868 , _tbmrLanguage :: !(Maybe Text)

6969 , _tbmrMatchId :: !Text

7070 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-games/gen/Network/Google/Resource/Games/TurnBasedMatches/Sync.hs+4−4

@@ -53,11 +53,11 @@ type TurnBasedMatchesSyncResource =

5353 "v1" :>

5454 "turnbasedmatches" :>

5555 "sync" :>

56− QueryParam "maxCompletedMatches" (JSONText Int32) :>

56+ QueryParam "maxCompletedMatches" (Textual Int32) :>

5757 QueryParam "includeMatchData" Bool :>

5858 QueryParam "language" Text :>

5959 QueryParam "pageToken" Text :>

60− QueryParam "maxResults" (JSONText Int32) :>

60+ QueryParam "maxResults" (Textual Int32) :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] TurnBasedMatchSync

6363

@@ -68,11 +68,11 @@ type TurnBasedMatchesSyncResource =

6868--

6969-- /See:/ 'turnBasedMatchesSync' smart constructor.

7070data TurnBasedMatchesSync = TurnBasedMatchesSync

71− { _tbmsMaxCompletedMatches :: !(Maybe (JSONText Int32))

71+ { _tbmsMaxCompletedMatches :: !(Maybe (Textual Int32))

7272 , _tbmsIncludeMatchData :: !(Maybe Bool)

7373 , _tbmsLanguage :: !(Maybe Text)

7474 , _tbmsPageToken :: !(Maybe Text)

75− , _tbmsMaxResults :: !(Maybe (JSONText Int32))

75+ , _tbmsMaxResults :: !(Maybe (Textual Int32))

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'TurnBasedMatchesSync' with the minimum fields required to make a request.

gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+39−39

@@ -93,7 +93,7 @@ instance ToJSON ReadInfo where

9393-- /See:/ 'status' smart constructor.

9494data Status = Status

9595 { _sDetails :: !(Maybe [StatusDetailsItem])

96− , _sCode :: !(Maybe (JSONText Int32))

96+ , _sCode :: !(Maybe (Textual Int32))

9797 , _sMessage :: !(Maybe Text)

9898 } deriving (Eq,Show,Data,Typeable,Generic)

9999

@@ -197,15 +197,15 @@ instance ToJSON OperationSchema where

197197-- /See:/ 'variant' smart constructor.

198198data Variant = Variant

199199 { _vVariantSetId :: !(Maybe Text)

200− , _vCreated :: !(Maybe (JSONText Int64))

201− , _vStart :: !(Maybe (JSONText Int64))

200+ , _vCreated :: !(Maybe (Textual Int64))

201+ , _vStart :: !(Maybe (Textual Int64))

202202 , _vAlternateBases :: !(Maybe [Text])

203203 , _vReferenceName :: !(Maybe Text)

204204 , _vNames :: !(Maybe [Text])

205− , _vEnd :: !(Maybe (JSONText Int64))

205+ , _vEnd :: !(Maybe (Textual Int64))

206206 , _vReferenceBases :: !(Maybe Text)

207207 , _vId :: !(Maybe Text)

208− , _vQuality :: !(Maybe (JSONText Double))

208+ , _vQuality :: !(Maybe (Textual Double))

209209 , _vFilter :: !(Maybe [Text])

210210 , _vInfo :: !(Maybe VariantInfo)

211211 , _vCalls :: !(Maybe [VariantCall])

@@ -381,7 +381,7 @@ instance ToJSON Variant where

381381-- /See:/ 'listBasesResponse' smart constructor.

382382data ListBasesResponse = ListBasesResponse

383383 { _lbrNextPageToken :: !(Maybe Text)

384− , _lbrOffSet :: !(Maybe (JSONText Int64))

384+ , _lbrOffSet :: !(Maybe (Textual Int64))

385385 , _lbrSequence :: !(Maybe Text)

386386 } deriving (Eq,Show,Data,Typeable,Generic)

387387

@@ -629,14 +629,14 @@ instance ToJSON DataSet where

629629--

630630-- /See:/ 'read'' smart constructor.

631631data Read' = Read'

632− { _rFragmentLength :: !(Maybe (JSONText Int32))

632+ { _rFragmentLength :: !(Maybe (Textual Int32))

633633 , _rDuplicateFragment :: !(Maybe Bool)

634634 , _rReadGroupSetId :: !(Maybe Text)

635635 , _rNextMatePosition :: !(Maybe Position)

636636 , _rFailedVendorQualityChecks :: !(Maybe Bool)

637637 , _rAlignment :: !(Maybe LinearAlignment)

638638 , _rFragmentName :: !(Maybe Text)

639− , _rNumberReads :: !(Maybe (JSONText Int32))

639+ , _rNumberReads :: !(Maybe (Textual Int32))

640640 , _rId :: !(Maybe Text)

641641 , _rSecondaryAlignment :: !(Maybe Bool)

642642 , _rReadGroupId :: !(Maybe Text)

@@ -644,8 +644,8 @@ data Read' = Read'

644644 , _rAlignedSequence :: !(Maybe Text)

645645 , _rProperPlacement :: !(Maybe Bool)

646646 , _rInfo :: !(Maybe ReadInfo)

647− , _rReadNumber :: !(Maybe (JSONText Int32))

648− , _rAlignedQuality :: !(Maybe [JSONText Int32])

647+ , _rReadNumber :: !(Maybe (Textual Int32))

648+ , _rAlignedQuality :: !(Maybe [Textual Int32])

649649 } deriving (Eq,Show,Data,Typeable,Generic)

650650

651651-- | Creates a value of 'Read' with the minimum fields required to make a request.

@@ -897,11 +897,11 @@ instance ToJSON Read' where

897897--

898898-- /See:/ 'variantCall' smart constructor.

899899data VariantCall = VariantCall

900− { _vcGenotypeLikelihood :: !(Maybe [JSONText Double])

900+ { _vcGenotypeLikelihood :: !(Maybe [Textual Double])

901901 , _vcCallSetName :: !(Maybe Text)

902902 , _vcPhaseset :: !(Maybe Text)

903903 , _vcCallSetId :: !(Maybe Text)

904− , _vcGenotype :: !(Maybe [JSONText Int32])

904+ , _vcGenotype :: !(Maybe [Textual Int32])

905905 , _vcInfo :: !(Maybe VariantCallInfo)

906906 } deriving (Eq,Show,Data,Typeable,Generic)

907907

@@ -1021,7 +1021,7 @@ data ReadGroup = ReadGroup

10211021 , _reaDataSetId :: !(Maybe Text)

10221022 , _reaId :: !(Maybe Text)

10231023 , _reaSampleId :: !(Maybe Text)

1024− , _reaPredictedInsertSize :: !(Maybe (JSONText Int32))

1024+ , _reaPredictedInsertSize :: !(Maybe (Textual Int32))

10251025 , _reaDescription :: !(Maybe Text)

10261026 , _reaInfo :: !(Maybe ReadGroupInfo)

10271027 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1254,7 +1254,7 @@ data SearchReferenceSetsRequest = SearchReferenceSetsRequest

12541254 , _srsrAccessions :: !(Maybe [Text])

12551255 , _srsrPageToken :: !(Maybe Text)

12561256 , _srsrAssemblyId :: !(Maybe Text)

1257− , _srsrPageSize :: !(Maybe (JSONText Int32))

1257+ , _srsrPageSize :: !(Maybe (Textual Int32))

12581258 } deriving (Eq,Show,Data,Typeable,Generic)

12591259

12601260-- | Creates a value of 'SearchReferenceSetsRequest' with the minimum fields required to make a request.

@@ -1528,7 +1528,7 @@ instance ToJSON VariantSetMetadata where

15281528--

15291529-- /See:/ 'callSet' smart constructor.

15301530data CallSet = CallSet

1531− { _csCreated :: !(Maybe (JSONText Int64))

1531+ { _csCreated :: !(Maybe (Textual Int64))

15321532 , _csName :: !(Maybe Text)

15331533 , _csId :: !(Maybe Text)

15341534 , _csSampleId :: !(Maybe Text)

@@ -1624,7 +1624,7 @@ instance ToJSON CallSet where

16241624-- /See:/ 'coverageBucket' smart constructor.

16251625data CoverageBucket = CoverageBucket

16261626 { _cbRange :: !(Maybe Range)

1627− , _cbMeanCoverage :: !(Maybe (JSONText Float))

1627+ , _cbMeanCoverage :: !(Maybe (Textual Double))

16281628 } deriving (Eq,Show,Data,Typeable,Generic)

16291629

16301630-- | Creates a value of 'CoverageBucket' with the minimum fields required to make a request.

@@ -1675,7 +1675,7 @@ data SearchReadGroupSetsRequest = SearchReadGroupSetsRequest

16751675 { _srgsrDataSetIds :: !(Maybe [Text])

16761676 , _srgsrName :: !(Maybe Text)

16771677 , _srgsrPageToken :: !(Maybe Text)

1678− , _srgsrPageSize :: !(Maybe (JSONText Int32))

1678+ , _srgsrPageSize :: !(Maybe (Textual Int32))

16791679 } deriving (Eq,Show,Data,Typeable,Generic)

16801680

16811681-- | Creates a value of 'SearchReadGroupSetsRequest' with the minimum fields required to make a request.

@@ -1755,11 +1755,11 @@ instance ToJSON SearchReadGroupSetsRequest where

17551755--

17561756-- /See:/ 'reference' smart constructor.

17571757data Reference = Reference

1758− { _refLength :: !(Maybe (JSONText Int64))

1758+ { _refLength :: !(Maybe (Textual Int64))

17591759 , _refSourceAccessions :: !(Maybe [Text])

17601760 , _refMD5checksum :: !(Maybe Text)

17611761 , _refName :: !(Maybe Text)

1762− , _refNcbiTaxonId :: !(Maybe (JSONText Int32))

1762+ , _refNcbiTaxonId :: !(Maybe (Textual Int32))

17631763 , _refId :: !(Maybe Text)

17641764 , _refSourceURI :: !(Maybe Text)

17651765 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2059,12 +2059,12 @@ instance ToJSON SetIAMPolicyRequest where

20592059--

20602060-- /See:/ 'searchReadsRequest' smart constructor.

20612061data SearchReadsRequest = SearchReadsRequest

2062− { _srrStart :: !(Maybe (JSONText Int64))

2062+ { _srrStart :: !(Maybe (Textual Int64))

20632063 , _srrReadGroupIds :: !(Maybe [Text])

20642064 , _srrReferenceName :: !(Maybe Text)

2065− , _srrEnd :: !(Maybe (JSONText Int64))

2065+ , _srrEnd :: !(Maybe (Textual Int64))

20662066 , _srrPageToken :: !(Maybe Text)

2067− , _srrPageSize :: !(Maybe (JSONText Int32))

2067+ , _srrPageSize :: !(Maybe (Textual Int32))

20682068 , _srrReadGroupSetIds :: !(Maybe [Text])

20692069 } deriving (Eq,Show,Data,Typeable,Generic)

20702070

@@ -2332,7 +2332,7 @@ instance ToJSON Experiment where

23322332data SearchVariantSetsRequest = SearchVariantSetsRequest

23332333 { _svsrDataSetIds :: !(Maybe [Text])

23342334 , _svsrPageToken :: !(Maybe Text)

2335− , _svsrPageSize :: !(Maybe (JSONText Int32))

2335+ , _svsrPageSize :: !(Maybe (Textual Int32))

23362336 } deriving (Eq,Show,Data,Typeable,Generic)

23372337

23382338-- | Creates a value of 'SearchVariantSetsRequest' with the minimum fields required to make a request.

@@ -2454,7 +2454,7 @@ data SearchCallSetsRequest = SearchCallSetsRequest

24542454 { _scsrName :: !(Maybe Text)

24552455 , _scsrPageToken :: !(Maybe Text)

24562456 , _scsrVariantSetIds :: !(Maybe [Text])

2457− , _scsrPageSize :: !(Maybe (JSONText Int32))

2457+ , _scsrPageSize :: !(Maybe (Textual Int32))

24582458 } deriving (Eq,Show,Data,Typeable,Generic)

24592459

24602460-- | Creates a value of 'SearchCallSetsRequest' with the minimum fields required to make a request.

@@ -2666,7 +2666,7 @@ data SearchReferencesRequest = SearchReferencesRequest

26662666 , _sMD5checksums :: !(Maybe [Text])

26672667 , _sAccessions :: !(Maybe [Text])

26682668 , _sPageToken :: !(Maybe Text)

2669− , _sPageSize :: !(Maybe (JSONText Int32))

2669+ , _sPageSize :: !(Maybe (Textual Int32))

26702670 } deriving (Eq,Show,Data,Typeable,Generic)

26712671

26722672-- | Creates a value of 'SearchReferencesRequest' with the minimum fields required to make a request.

@@ -2811,9 +2811,9 @@ instance ToJSON SearchReferenceSetsResponse where

28112811--

28122812-- /See:/ 'range' smart constructor.

28132813data Range = Range

2814− { _rStart :: !(Maybe (JSONText Int64))

2814+ { _rStart :: !(Maybe (Textual Int64))

28152815 , _rReferenceName :: !(Maybe Text)

2816− , _rEnd :: !(Maybe (JSONText Int64))

2816+ , _rEnd :: !(Maybe (Textual Int64))

28172817 } deriving (Eq,Show,Data,Typeable,Generic)

28182818

28192819-- | Creates a value of 'Range' with the minimum fields required to make a request.

@@ -3089,7 +3089,7 @@ instance ToJSON ImportVariantsResponse where

30893089-- /See:/ 'listCoverageBucketsResponse' smart constructor.

30903090data ListCoverageBucketsResponse = ListCoverageBucketsResponse

30913091 { _lcbrNextPageToken :: !(Maybe Text)

3092− , _lcbrBucketWidth :: !(Maybe (JSONText Int64))

3092+ , _lcbrBucketWidth :: !(Maybe (Textual Int64))

30933093 , _lcbrCoverageBuckets :: !(Maybe [CoverageBucket])

30943094 } deriving (Eq,Show,Data,Typeable,Generic)

30953095

@@ -3247,7 +3247,7 @@ instance ToJSON ImportReadGroupSetsResponse where

32473247-- /See:/ 'linearAlignment' smart constructor.

32483248data LinearAlignment = LinearAlignment

32493249 { _laCigar :: !(Maybe [CigarUnit])

3250− , _laMAppingQuality :: !(Maybe (JSONText Int32))

3250+ , _laMAppingQuality :: !(Maybe (Textual Int32))

32513251 , _laPosition :: !(Maybe Position)

32523252 } deriving (Eq,Show,Data,Typeable,Generic)

32533253

@@ -3652,7 +3652,7 @@ instance ToJSON ImportVariantsRequest where

36523652-- /See:/ 'cigarUnit' smart constructor.

36533653data CigarUnit = CigarUnit

36543654 { _cuOperation :: !(Maybe Text)

3655− , _cuOperationLength :: !(Maybe (JSONText Int64))

3655+ , _cuOperationLength :: !(Maybe (Textual Int64))

36563656 , _cuReferenceSequence :: !(Maybe Text)

36573657 } deriving (Eq,Show,Data,Typeable,Generic)

36583658

@@ -3725,8 +3725,8 @@ instance ToJSON CigarUnit where

37253725--

37263726-- /See:/ 'policy' smart constructor.

37273727data Policy = Policy

3728− { _polEtag :: !(Maybe (JSONText Word8))

3729− , _polVersion :: !(Maybe (JSONText Int32))

3728+ { _polEtag :: !(Maybe (Textual Word8))

3729+ , _polVersion :: !(Maybe (Textual Int32))

37303730 , _polBindings :: !(Maybe [Binding])

37313731 } deriving (Eq,Show,Data,Typeable,Generic)

37323732

@@ -4012,15 +4012,15 @@ instance ToJSON SearchVariantSetsResponse where

40124012--

40134013-- /See:/ 'searchVariantsRequest' smart constructor.

40144014data SearchVariantsRequest = SearchVariantsRequest

4015− { _svrStart :: !(Maybe (JSONText Int64))

4015+ { _svrStart :: !(Maybe (Textual Int64))

40164016 , _svrCallSetIds :: !(Maybe [Text])

40174017 , _svrReferenceName :: !(Maybe Text)

4018− , _svrEnd :: !(Maybe (JSONText Int64))

4019− , _svrMaxCalls :: !(Maybe (JSONText Int32))

4018+ , _svrEnd :: !(Maybe (Textual Int64))

4019+ , _svrMaxCalls :: !(Maybe (Textual Int32))

40204020 , _svrPageToken :: !(Maybe Text)

40214021 , _svrVariantName :: !(Maybe Text)

40224022 , _svrVariantSetIds :: !(Maybe [Text])

4023− , _svrPageSize :: !(Maybe (JSONText Int32))

4023+ , _svrPageSize :: !(Maybe (Textual Int32))

40244024 } deriving (Eq,Show,Data,Typeable,Generic)

40254025

40264026-- | Creates a value of 'SearchVariantsRequest' with the minimum fields required to make a request.

@@ -4303,7 +4303,7 @@ instance ToJSON OperationEvent where

43034303--

43044304-- /See:/ 'referenceBound' smart constructor.

43054305data ReferenceBound = ReferenceBound

4306− { _rbUpperBound :: !(Maybe (JSONText Int64))

4306+ { _rbUpperBound :: !(Maybe (Textual Int64))

43074307 , _rbReferenceName :: !(Maybe Text)

43084308 } deriving (Eq,Show,Data,Typeable,Generic)

43094309

@@ -4440,7 +4440,7 @@ instance ToJSON Binding where

44404440data Position = Position

44414441 { _pReverseStrand :: !(Maybe Bool)

44424442 , _pReferenceName :: !(Maybe Text)

4443− , _pPosition :: !(Maybe (JSONText Int64))

4443+ , _pPosition :: !(Maybe (Textual Int64))

44444444 } deriving (Eq,Show,Data,Typeable,Generic)

44454445

44464446-- | Creates a value of 'Position' with the minimum fields required to make a request.

@@ -4597,7 +4597,7 @@ data ReferenceSet = ReferenceSet

45974597 { _rsSourceAccessions :: !(Maybe [Text])

45984598 , _rsReferenceIds :: !(Maybe [Text])

45994599 , _rsMD5checksum :: !(Maybe Text)

4600− , _rsNcbiTaxonId :: !(Maybe (JSONText Int32))

4600+ , _rsNcbiTaxonId :: !(Maybe (Textual Int32))

46014601 , _rsId :: !(Maybe Text)

46024602 , _rsAssemblyId :: !(Maybe Text)

46034603 , _rsSourceURI :: !(Maybe Text)

gogol-genomics/gen/Network/Google/Resource/Genomics/DataSets/List.hs+2−2

@@ -61,7 +61,7 @@ type DataSetsListResource =

6161 QueryParam "bearer_token" Text :>

6262 QueryParam "pageToken" Text :>

6363 QueryParam "projectId" Text :>

64− QueryParam "pageSize" (JSONText Int32) :>

64+ QueryParam "pageSize" (Textual Int32) :>

6565 QueryParam "callback" Text :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] ListDataSetsResponse

@@ -78,7 +78,7 @@ data DataSetsList = DataSetsList

7878 , _dslBearerToken :: !(Maybe Text)

7979 , _dslPageToken :: !(Maybe Text)

8080 , _dslProjectId :: !(Maybe Text)

81− , _dslPageSize :: !(Maybe (JSONText Int32))

81+ , _dslPageSize :: !(Maybe (Textual Int32))

8282 , _dslCallback :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

gogol-genomics/gen/Network/Google/Resource/Genomics/Operations/List.hs+2−2

@@ -62,7 +62,7 @@ type OperationsListResource =

6262 QueryParam "bearer_token" Text :>

6363 QueryParam "filter" Text :>

6464 QueryParam "pageToken" Text :>

65− QueryParam "pageSize" (JSONText Int32) :>

65+ QueryParam "pageSize" (Textual Int32) :>

6666 QueryParam "callback" Text :>

6767 QueryParam "alt" AltJSON :>

6868 Get '[JSON] ListOperationsResponse

@@ -80,7 +80,7 @@ data OperationsList = OperationsList

8080 , _olName :: !Text

8181 , _olFilter :: !(Maybe Text)

8282 , _olPageToken :: !(Maybe Text)

83− , _olPageSize :: !(Maybe (JSONText Int32))

83+ , _olPageSize :: !(Maybe (Textual Int32))

8484 , _olCallback :: !(Maybe Text)

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

gogol-genomics/gen/Network/Google/Resource/Genomics/ReadGroupSets/CoverageBuckets/List.hs+8−8

@@ -70,14 +70,14 @@ type ReadGroupSetsCoverageBucketsListResource =

7070 QueryParam "upload_protocol" Text :>

7171 QueryParam "pp" Bool :>

7272 QueryParam "access_token" Text :>

73− QueryParam "start" (JSONText Int64) :>

73+ QueryParam "start" (Textual Int64) :>

7474 QueryParam "uploadType" Text :>

75− QueryParam "targetBucketWidth" (JSONText Int64) :>

75+ QueryParam "targetBucketWidth" (Textual Int64) :>

7676 QueryParam "referenceName" Text :>

7777 QueryParam "bearer_token" Text :>

78− QueryParam "end" (JSONText Int64) :>

78+ QueryParam "end" (Textual Int64) :>

7979 QueryParam "pageToken" Text :>

80− QueryParam "pageSize" (JSONText Int32) :>

80+ QueryParam "pageSize" (Textual Int32) :>

8181 QueryParam "callback" Text :>

8282 QueryParam "alt" AltJSON :>

8383 Get '[JSON] ListCoverageBucketsResponse

@@ -98,14 +98,14 @@ data ReadGroupSetsCoverageBucketsList = ReadGroupSetsCoverageBucketsList

9898 , _rgscblUploadProtocol :: !(Maybe Text)

9999 , _rgscblPp :: !Bool

100100 , _rgscblAccessToken :: !(Maybe Text)

101− , _rgscblStart :: !(Maybe (JSONText Int64))

101+ , _rgscblStart :: !(Maybe (Textual Int64))

102102 , _rgscblUploadType :: !(Maybe Text)

103− , _rgscblTargetBucketWidth :: !(Maybe (JSONText Int64))

103+ , _rgscblTargetBucketWidth :: !(Maybe (Textual Int64))

104104 , _rgscblReferenceName :: !(Maybe Text)

105105 , _rgscblBearerToken :: !(Maybe Text)

106− , _rgscblEnd :: !(Maybe (JSONText Int64))

106+ , _rgscblEnd :: !(Maybe (Textual Int64))

107107 , _rgscblPageToken :: !(Maybe Text)

108− , _rgscblPageSize :: !(Maybe (JSONText Int32))

108+ , _rgscblPageSize :: !(Maybe (Textual Int32))

109109 , _rgscblCallback :: !(Maybe Text)

110110 } deriving (Eq,Show,Data,Typeable,Generic)

111111

gogol-genomics/gen/Network/Google/Resource/Genomics/References/Bases/List.hs+6−6

@@ -63,12 +63,12 @@ type ReferencesBasesListResource =

6363 QueryParam "upload_protocol" Text :>

6464 QueryParam "pp" Bool :>

6565 QueryParam "access_token" Text :>

66− QueryParam "start" (JSONText Int64) :>

66+ QueryParam "start" (Textual Int64) :>

6767 QueryParam "uploadType" Text :>

6868 QueryParam "bearer_token" Text :>

69− QueryParam "end" (JSONText Int64) :>

69+ QueryParam "end" (Textual Int64) :>

7070 QueryParam "pageToken" Text :>

71− QueryParam "pageSize" (JSONText Int32) :>

71+ QueryParam "pageSize" (Textual Int32) :>

7272 QueryParam "callback" Text :>

7373 QueryParam "alt" AltJSON :>

7474 Get '[JSON] ListBasesResponse

@@ -83,13 +83,13 @@ data ReferencesBasesList = ReferencesBasesList

8383 , _rblUploadProtocol :: !(Maybe Text)

8484 , _rblPp :: !Bool

8585 , _rblAccessToken :: !(Maybe Text)

86− , _rblStart :: !(Maybe (JSONText Int64))

86+ , _rblStart :: !(Maybe (Textual Int64))

8787 , _rblUploadType :: !(Maybe Text)

8888 , _rblReferenceId :: !Text

8989 , _rblBearerToken :: !(Maybe Text)

90− , _rblEnd :: !(Maybe (JSONText Int64))

90+ , _rblEnd :: !(Maybe (Textual Int64))

9191 , _rblPageToken :: !(Maybe Text)

92− , _rblPageSize :: !(Maybe (JSONText Int32))

92+ , _rblPageSize :: !(Maybe (Textual Int32))

9393 , _rblCallback :: !(Maybe Text)

9494 } deriving (Eq,Show,Data,Typeable,Generic)

9595

gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+21−21

@@ -135,7 +135,7 @@ data History = History

135135 , _hMessagesDeleted :: !(Maybe [HistoryMessageDeleted])

136136 , _hMessagesAdded :: !(Maybe [HistoryMessageAdded])

137137 , _hLabelsAdded :: !(Maybe [HistoryLabelAdded])

138− , _hId :: !(Maybe (JSONText Word64))

138+ , _hId :: !(Maybe (Textual Word64))

139139 , _hMessages :: !(Maybe [Message])

140140 } deriving (Eq,Show,Data,Typeable,Generic)

141141

@@ -238,9 +238,9 @@ instance ToJSON History where

238238--

239239-- /See:/ 'proFile' smart constructor.

240240data ProFile = ProFile

241− { _pfMessagesTotal :: !(Maybe (JSONText Int32))

242− , _pfThreadsTotal :: !(Maybe (JSONText Int32))

243− , _pfHistoryId :: !(Maybe (JSONText Word64))

241+ { _pfMessagesTotal :: !(Maybe (Textual Int32))

242+ , _pfThreadsTotal :: !(Maybe (Textual Int32))

243+ , _pfHistoryId :: !(Maybe (Textual Word64))

244244 , _pfEmailAddress :: !(Maybe Text)

245245 } deriving (Eq,Show,Data,Typeable,Generic)

246246

@@ -359,7 +359,7 @@ instance ToJSON MessagePartHeader where

359359data ListHistoryResponse = ListHistoryResponse

360360 { _lhrNextPageToken :: !(Maybe Text)

361361 , _lhrHistory :: !(Maybe [History])

362− , _lhrHistoryId :: !(Maybe (JSONText Word64))

362+ , _lhrHistoryId :: !(Maybe (Textual Word64))

363363 } deriving (Eq,Show,Data,Typeable,Generic)

364364

365365-- | Creates a value of 'ListHistoryResponse' with the minimum fields required to make a request.

@@ -421,7 +421,7 @@ instance ToJSON ListHistoryResponse where

421421-- /See:/ 'listThreadsResponse' smart constructor.

422422data ListThreadsResponse = ListThreadsResponse

423423 { _ltrNextPageToken :: !(Maybe Text)

424− , _ltrResultSizeEstimate :: !(Maybe (JSONText Word32))

424+ , _ltrResultSizeEstimate :: !(Maybe (Textual Word32))

425425 , _ltrThreads :: !(Maybe [Thread])

426426 } deriving (Eq,Show,Data,Typeable,Generic)

427427

@@ -695,8 +695,8 @@ instance ToJSON HistoryMessageDeleted where

695695--

696696-- /See:/ 'messagePartBody' smart constructor.

697697data MessagePartBody = MessagePartBody

698− { _mpbSize :: !(Maybe (JSONText Int32))

699− , _mpbData :: !(Maybe (JSONText Word8))

698+ { _mpbSize :: !(Maybe (Textual Int32))

699+ , _mpbData :: !(Maybe (Textual Word8))

700700 , _mpbAttachmentId :: !(Maybe Text)

701701 } deriving (Eq,Show,Data,Typeable,Generic)

702702

@@ -761,7 +761,7 @@ instance ToJSON MessagePartBody where

761761-- /See:/ 'listDraftsResponse' smart constructor.

762762data ListDraftsResponse = ListDraftsResponse

763763 { _ldrNextPageToken :: !(Maybe Text)

764− , _ldrResultSizeEstimate :: !(Maybe (JSONText Word32))

764+ , _ldrResultSizeEstimate :: !(Maybe (Textual Word32))

765765 , _ldrDrafts :: !(Maybe [Draft])

766766 } deriving (Eq,Show,Data,Typeable,Generic)

767767

@@ -824,8 +824,8 @@ instance ToJSON ListDraftsResponse where

824824--

825825-- /See:/ 'watchResponse' smart constructor.

826826data WatchResponse = WatchResponse

827− { _wrExpiration :: !(Maybe (JSONText Int64))

828− , _wrHistoryId :: !(Maybe (JSONText Word64))

827+ { _wrExpiration :: !(Maybe (Textual Int64))

828+ , _wrHistoryId :: !(Maybe (Textual Word64))

829829 } deriving (Eq,Show,Data,Typeable,Generic)

830830

831831-- | Creates a value of 'WatchResponse' with the minimum fields required to make a request.

@@ -985,15 +985,15 @@ instance ToJSON WatchRequest where

985985--

986986-- /See:/ 'message' smart constructor.

987987data Message = Message

988− { _mRaw :: !(Maybe (JSONText Word8))

988+ { _mRaw :: !(Maybe (Textual Word8))

989989 , _mSnippet :: !(Maybe Text)

990− , _mSizeEstimate :: !(Maybe (JSONText Int32))

990+ , _mSizeEstimate :: !(Maybe (Textual Int32))

991991 , _mPayload :: !(Maybe MessagePart)

992− , _mHistoryId :: !(Maybe (JSONText Word64))

992+ , _mHistoryId :: !(Maybe (Textual Word64))

993993 , _mId :: !(Maybe Text)

994994 , _mLabelIds :: !(Maybe [Text])

995995 , _mThreadId :: !(Maybe Text)

996− , _mInternalDate :: !(Maybe (JSONText Int64))

996+ , _mInternalDate :: !(Maybe (Textual Int64))

997997 } deriving (Eq,Show,Data,Typeable,Generic)

998998

999999-- | Creates a value of 'Message' with the minimum fields required to make a request.

@@ -1171,7 +1171,7 @@ instance ToJSON HistoryLabelRemoved where

11711171-- /See:/ 'thread' smart constructor.

11721172data Thread = Thread

11731173 { _tSnippet :: !(Maybe Text)

1174− , _tHistoryId :: !(Maybe (JSONText Word64))

1174+ , _tHistoryId :: !(Maybe (Textual Word64))

11751175 , _tId :: !(Maybe Text)

11761176 , _tMessages :: !(Maybe [Message])

11771177 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1240,12 +1240,12 @@ instance ToJSON Thread where

12401240--

12411241-- /See:/ 'label' smart constructor.

12421242data Label = Label

1243− { _lThreadsUnread :: !(Maybe (JSONText Int32))

1243+ { _lThreadsUnread :: !(Maybe (Textual Int32))

12441244 , _lMessageListVisibility :: !(Maybe LabelMessageListVisibility)

1245− , _lMessagesTotal :: !(Maybe (JSONText Int32))

1246− , _lMessagesUnread :: !(Maybe (JSONText Int32))

1245+ , _lMessagesTotal :: !(Maybe (Textual Int32))

1246+ , _lMessagesUnread :: !(Maybe (Textual Int32))

12471247 , _lName :: !(Maybe Text)

1248− , _lThreadsTotal :: !(Maybe (JSONText Int32))

1248+ , _lThreadsTotal :: !(Maybe (Textual Int32))

12491249 , _lLabelListVisibility :: !(Maybe LabelLabelListVisibility)

12501250 , _lId :: !(Maybe Text)

12511251 , _lType :: !(Maybe LabelType)

@@ -1381,7 +1381,7 @@ instance ToJSON Label where

13811381-- /See:/ 'listMessagesResponse' smart constructor.

13821382data ListMessagesResponse = ListMessagesResponse

13831383 { _lmrNextPageToken :: !(Maybe Text)

1384− , _lmrResultSizeEstimate :: !(Maybe (JSONText Word32))

1384+ , _lmrResultSizeEstimate :: !(Maybe (Textual Word32))

13851385 , _lmrMessages :: !(Maybe [Message])

13861386 } deriving (Eq,Show,Data,Typeable,Generic)

13871387

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/List.hs+2−2

@@ -50,7 +50,7 @@ type UsersDraftsListResource =

5050 Capture "userId" Text :>

5151 "drafts" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ListDraftsResponse

5656

@@ -60,7 +60,7 @@ type UsersDraftsListResource =

6060data UsersDraftsList = UsersDraftsList

6161 { _udlUserId :: !Text

6262 , _udlPageToken :: !(Maybe Text)

63− , _udlMaxResults :: !(JSONText Word32)

63+ , _udlMaxResults :: !(Textual Word32)

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'UsersDraftsList' with the minimum fields required to make a request.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/History/List.hs+4−4

@@ -52,10 +52,10 @@ type UsersHistoryListResource =

5252 "users" :>

5353 Capture "userId" Text :>

5454 "history" :>

55− QueryParam "startHistoryId" (JSONText Word64) :>

55+ QueryParam "startHistoryId" (Textual Word64) :>

5656 QueryParam "pageToken" Text :>

5757 QueryParam "labelId" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] ListHistoryResponse

6161

@@ -65,10 +65,10 @@ type UsersHistoryListResource =

6565-- /See:/ 'usersHistoryList' smart constructor.

6666data UsersHistoryList = UsersHistoryList

6767 { _uhlUserId :: !Text

68− , _uhlStartHistoryId :: !(Maybe (JSONText Word64))

68+ , _uhlStartHistoryId :: !(Maybe (Textual Word64))

6969 , _uhlPageToken :: !(Maybe Text)

7070 , _uhlLabelId :: !(Maybe Text)

71− , _uhlMaxResults :: !(JSONText Word32)

71+ , _uhlMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'UsersHistoryList' with the minimum fields required to make a request.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/List.hs+2−2

@@ -56,7 +56,7 @@ type UsersMessagesListResource =

5656 QueryParam "includeSpamTrash" Bool :>

5757 QueryParams "labelIds" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] ListMessagesResponse

6262

@@ -69,7 +69,7 @@ data UsersMessagesList = UsersMessagesList

6969 , _umlIncludeSpamTrash :: !Bool

7070 , _umlLabelIds :: !(Maybe [Text])

7171 , _umlPageToken :: !(Maybe Text)

72− , _umlMaxResults :: !(JSONText Word32)

72+ , _umlMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'UsersMessagesList' with the minimum fields required to make a request.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Threads/List.hs+2−2

@@ -56,7 +56,7 @@ type UsersThreadsListResource =

5656 QueryParam "includeSpamTrash" Bool :>

5757 QueryParams "labelIds" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] ListThreadsResponse

6262

@@ -69,7 +69,7 @@ data UsersThreadsList = UsersThreadsList

6969 , _utlIncludeSpamTrash :: !Bool

7070 , _utlLabelIds :: !(Maybe [Text])

7171 , _utlPageToken :: !(Maybe Text)

72− , _utlMaxResults :: !(JSONText Word32)

72+ , _utlMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'UsersThreadsList' with the minimum fields required to make a request.

gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Product.hs+1−1

@@ -36,7 +36,7 @@ data Groups = Groups

3636 , _gWhoCanViewGroup :: !(Maybe Text)

3737 , _gWhoCanJoin :: !(Maybe Text)

3838 , _gArchiveOnly :: !(Maybe Text)

39− , _gMaxMessageBytes :: !(Maybe (JSONText Int32))

39+ , _gMaxMessageBytes :: !(Maybe (Textual Int32))

4040 , _gReplyTo :: !(Maybe Text)

4141 , _gMessageModerationLevel :: !(Maybe Text)

4242 , _gIncludeInGlobalAddressList :: !(Maybe Text)

gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+14−14

@@ -24,7 +24,7 @@ import Network.Google.Prelude

2424-- /See:/ 'uploadAccountResponseErrorItem' smart constructor.

2525data UploadAccountResponseErrorItem = UploadAccountResponseErrorItem

2626 { _uareiMessage :: !(Maybe Text)

27− , _uareiIndex :: !(Maybe (JSONText Int32))

27+ , _uareiIndex :: !(Maybe (Textual Int32))

2828 } deriving (Eq,Show,Data,Typeable,Generic)

2929

3030-- | Creates a value of 'UploadAccountResponseErrorItem' with the minimum fields required to make a request.

@@ -150,13 +150,13 @@ data UserInfo = UserInfo

150150 , _uiPhotoURL :: !(Maybe Text)

151151 , _uiDisabled :: !(Maybe Bool)

152152 , _uiProviderUserInfo :: !(Maybe [UserInfoProviderUserInfoItem])

153− , _uiValidSince :: !(Maybe (JSONText Int64))

154− , _uiPasswordUpdatedAt :: !(Maybe (JSONText Double))

155− , _uiVersion :: !(Maybe (JSONText Int32))

153+ , _uiValidSince :: !(Maybe (Textual Int64))

154+ , _uiPasswordUpdatedAt :: !(Maybe (Textual Double))

155+ , _uiVersion :: !(Maybe (Textual Int32))

156156 , _uiEmailVerified :: !(Maybe Bool)

157− , _uiSalt :: !(Maybe (JSONText Word8))

157+ , _uiSalt :: !(Maybe (Textual Word8))

158158 , _uiDisplayName :: !(Maybe Text)

159− , _uiPasswordHash :: !(Maybe (JSONText Word8))

159+ , _uiPasswordHash :: !(Maybe (Textual Word8))

160160 , _uiLocalId :: !(Maybe Text)

161161 } deriving (Eq,Show,Data,Typeable,Generic)

162162

@@ -473,7 +473,7 @@ data IdentitytoolkitRelyingPartySetAccountInfoRequest = IdentitytoolkitRelyingPa

473473 { _irpsairUpgradeToFederatedLogin :: !(Maybe Bool)

474474 , _irpsairEmail :: !(Maybe Text)

475475 , _irpsairCaptchaChallenge :: !(Maybe Text)

476− , _irpsairValidSince :: !(Maybe (JSONText Int64))

476+ , _irpsairValidSince :: !(Maybe (Textual Int64))

477477 , _irpsairOOBCode :: !(Maybe Text)

478478 , _irpsairPassword :: !(Maybe Text)

479479 , _irpsairCaptchaResponse :: !(Maybe Text)

@@ -1259,11 +1259,11 @@ instance ToJSON

12591259-- /See:/ 'identitytoolkitRelyingPartyUploadAccountRequest' smart constructor.

12601260data IdentitytoolkitRelyingPartyUploadAccountRequest = IdentitytoolkitRelyingPartyUploadAccountRequest

12611261 { _irpuarUsers :: !(Maybe [UserInfo])

1262− , _irpuarMemoryCost :: !(Maybe (JSONText Int32))

1263− , _irpuarSaltSeparator :: !(Maybe (JSONText Word8))

1262+ , _irpuarMemoryCost :: !(Maybe (Textual Int32))

1263+ , _irpuarSaltSeparator :: !(Maybe (Textual Word8))

12641264 , _irpuarHashAlgorithm :: !(Maybe Text)

1265− , _irpuarSignerKey :: !(Maybe (JSONText Word8))

1266− , _irpuarRounds :: !(Maybe (JSONText Int32))

1265+ , _irpuarSignerKey :: !(Maybe (Textual Word8))

1266+ , _irpuarRounds :: !(Maybe (Textual Int32))

12671267 } deriving (Eq,Show,Data,Typeable,Generic)

12681268

12691269-- | Creates a value of 'IdentitytoolkitRelyingPartyUploadAccountRequest' with the minimum fields required to make a request.

@@ -1739,7 +1739,7 @@ instance ToJSON GetOOBConfirmationCodeResponse where

17391739-- /See:/ 'identitytoolkitRelyingPartyDownloadAccountRequest' smart constructor.

17401740data IdentitytoolkitRelyingPartyDownloadAccountRequest = IdentitytoolkitRelyingPartyDownloadAccountRequest

17411741 { _irpdarNextPageToken :: !(Maybe Text)

1742− , _irpdarMaxResults :: !(Maybe (JSONText Word32))

1742+ , _irpdarMaxResults :: !(Maybe (Textual Word32))

17431743 } deriving (Eq,Show,Data,Typeable,Generic)

17441744

17451745-- | Creates a value of 'IdentitytoolkitRelyingPartyDownloadAccountRequest' with the minimum fields required to make a request.

@@ -1799,7 +1799,7 @@ data VerifyPasswordResponse = VerifyPasswordResponse

17991799 , _vprPhotoURL :: !(Maybe Text)

18001800 , _vprOAuthAccessToken :: !(Maybe Text)

18011801 , _vprKind :: !Text

1802− , _vprOAuthExpireIn :: !(Maybe (JSONText Int32))

1802+ , _vprOAuthExpireIn :: !(Maybe (Textual Int32))

18031803 , _vprDisplayName :: !(Maybe Text)

18041804 , _vprLocalId :: !(Maybe Text)

18051805 , _vprRegistered :: !(Maybe Bool)

@@ -2048,7 +2048,7 @@ data VerifyAssertionResponse = VerifyAssertionResponse

20482048 , _varOAuthAccessToken :: !(Maybe Text)

20492049 , _varDateOfBirth :: !(Maybe Text)

20502050 , _varKind :: !Text

2051− , _varOAuthExpireIn :: !(Maybe (JSONText Int32))

2051+ , _varOAuthExpireIn :: !(Maybe (Textual Int32))

20522052 , _varAppInstallationURL :: !(Maybe Text)

20532053 , _varAction :: !(Maybe Text)

20542054 , _varNeedEmail :: !(Maybe Bool)

gogol-latencytest/gen/Network/Google/LatencyTest/Types/Product.hs+3−3

@@ -23,7 +23,7 @@ import Network.Google.Prelude

2323--

2424-- /See:/ 'intValue' smart constructor.

2525data IntValue = IntValue

26− { _ivValue :: !(Maybe (JSONText Int64))

26+ { _ivValue :: !(Maybe (Textual Int64))

2727 , _ivLabel :: !(Maybe Text)

2828 } deriving (Eq,Show,Data,Typeable,Generic)

2929

@@ -66,7 +66,7 @@ instance ToJSON IntValue where

6666--

6767-- /See:/ 'doubleValue' smart constructor.

6868data DoubleValue = DoubleValue

69− { _dvValue :: !(Maybe (JSONText Float))

69+ { _dvValue :: !(Maybe (Textual Double))

7070 , _dvLabel :: !(Maybe Text)

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

@@ -182,7 +182,7 @@ instance ToJSON AggregatedStatsReply where

182182--

183183-- /See:/ 'stats' smart constructor.

184184data Stats = Stats

185− { _sTime :: !(Maybe (JSONText Double))

185+ { _sTime :: !(Maybe (Textual Double))

186186 , _sDoubleValues :: !(Maybe [DoubleValue])

187187 , _sStringValues :: !(Maybe [StringValue])

188188 , _sIntValues :: !(Maybe [IntValue])

gogol-logging/gen/Network/Google/Logging/Types/Product.hs+8−8

@@ -25,10 +25,10 @@ import Network.Google.Prelude

2525-- /See:/ 'requestLog' smart constructor.

2626data RequestLog = RequestLog

2727 { _rlTraceId :: !(Maybe Text)

28− , _rlInstanceId :: !(Maybe (JSONText Word8))

29− , _rlStatus :: !(Maybe (JSONText Int32))

30− , _rlRequestId :: !(Maybe (JSONText Word8))

31− , _rlInstanceIndex :: !(Maybe (JSONText Int32))

28+ , _rlInstanceId :: !(Maybe (Textual Word8))

29+ , _rlStatus :: !(Maybe (Textual Int32))

30+ , _rlRequestId :: !(Maybe (Textual Word8))

31+ , _rlInstanceIndex :: !(Maybe (Textual Int32))

3232 , _rlModuleId :: !(Maybe Text)

3333 , _rlVersionId :: !(Maybe Text)

3434 , _rlHTTPVersion :: !(Maybe Text)

@@ -38,7 +38,7 @@ data RequestLog = RequestLog

3838 , _rlStartTime :: !(Maybe Text)

3939 , _rlLatency :: !(Maybe Text)

4040 , _rlURLMapEntry :: !(Maybe Text)

41− , _rlCost :: !(Maybe (JSONText Double))

41+ , _rlCost :: !(Maybe (Textual Double))

4242 , _rlReferrer :: !(Maybe Text)

4343 , _rlLine :: !(Maybe [LogLine])

4444 , _rlIP :: !(Maybe Text)

@@ -47,12 +47,12 @@ data RequestLog = RequestLog

4747 , _rlResource :: !(Maybe Text)

4848 , _rlEndTime :: !(Maybe Text)

4949 , _rlFinished :: !(Maybe Bool)

50− , _rlMegaCycles :: !(Maybe (JSONText Int64))

50+ , _rlMegaCycles :: !(Maybe (Textual Int64))

5151 , _rlUserAgent :: !(Maybe Text)

5252 , _rlNickname :: !(Maybe Text)

5353 , _rlHost :: !(Maybe Text)

5454 , _rlTaskQueueName :: !(Maybe Text)

55− , _rlResponseSize :: !(Maybe (JSONText Int64))

55+ , _rlResponseSize :: !(Maybe (Textual Int64))

5656 , _rlSourceReference :: !(Maybe [SourceReference])

5757 , _rlAppEngineRelease :: !(Maybe Text)

5858 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -493,7 +493,7 @@ instance ToJSON LogLine where

493493--

494494-- /See:/ 'sourceLocation' smart constructor.

495495data SourceLocation = SourceLocation

496− { _slLine :: !(Maybe (JSONText Int64))

496+ { _slLine :: !(Maybe (Textual Int64))

497497 , _slFunctionName :: !(Maybe Text)

498498 , _slFile :: !(Maybe Text)

499499 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Product.hs+13−13

@@ -206,10 +206,10 @@ instance ToJSON WorkerListResponse where

206206-- /See:/ 'schedule' smart constructor.

207207data Schedule = Schedule

208208 { _sAllDay :: !(Maybe Bool)

209− , _sStartTime :: !(Maybe (JSONText Word64))

209+ , _sStartTime :: !(Maybe (Textual Word64))

210210 , _sKind :: !Text

211− , _sEndTime :: !(Maybe (JSONText Word64))

212− , _sDuration :: !(Maybe (JSONText Word64))

211+ , _sEndTime :: !(Maybe (Textual Word64))

212+ , _sDuration :: !(Maybe (Textual Word64))

213213 } deriving (Eq,Show,Data,Typeable,Generic)

214214

215215-- | Creates a value of 'Schedule' with the minimum fields required to make a request.

@@ -289,8 +289,8 @@ instance ToJSON Schedule where

289289data Location = Location

290290 { _lAddressLine :: !(Maybe [Text])

291291 , _lKind :: !Text

292− , _lLat :: !(Maybe (JSONText Double))

293− , _lLng :: !(Maybe (JSONText Double))

292+ , _lLat :: !(Maybe (Textual Double))

293+ , _lLng :: !(Maybe (Textual Double))

294294 } deriving (Eq,Show,Data,Typeable,Generic)

295295

296296-- | Creates a value of 'Location' with the minimum fields required to make a request.

@@ -490,7 +490,7 @@ data CustomFieldDef = CustomFieldDef

490490 , _cfdKind :: !Text

491491 , _cfdName :: !(Maybe Text)

492492 , _cfdRequiredForCheckout :: !(Maybe Bool)

493− , _cfdId :: !(Maybe (JSONText Int64))

493+ , _cfdId :: !(Maybe (Textual Int64))

494494 , _cfdEnumitems :: !(Maybe [EnumItemDef])

495495 , _cfdType :: !(Maybe Text)

496496 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -655,7 +655,7 @@ instance ToJSON JobListResponse where

655655data JobChange = JobChange

656656 { _jcState :: !(Maybe JobState)

657657 , _jcKind :: !Text

658− , _jcTimestamp :: !(Maybe (JSONText Word64))

658+ , _jcTimestamp :: !(Maybe (Textual Word64))

659659 } deriving (Eq,Show,Data,Typeable,Generic)

660660

661661-- | Creates a value of 'JobChange' with the minimum fields required to make a request.

@@ -813,7 +813,7 @@ data Job = Job

813813 { _jState :: !(Maybe JobState)

814814 , _jKind :: !Text

815815 , _jJobChange :: !(Maybe [JobChange])

816− , _jId :: !(Maybe (JSONText Word64))

816+ , _jId :: !(Maybe (Textual Word64))

817817 } deriving (Eq,Show,Data,Typeable,Generic)

818818

819819-- | Creates a value of 'Job' with the minimum fields required to make a request.

@@ -987,10 +987,10 @@ instance ToJSON Team where

987987-- /See:/ 'locationRecord' smart constructor.

988988data LocationRecord = LocationRecord

989989 { _lrKind :: !Text

990− , _lrLatitude :: !(Maybe (JSONText Double))

991− , _lrConfidenceRadius :: !(Maybe (JSONText Double))

992− , _lrLongitude :: !(Maybe (JSONText Double))

993− , _lrCollectionTime :: !(Maybe (JSONText Int64))

990+ , _lrLatitude :: !(Maybe (Textual Double))

991+ , _lrConfidenceRadius :: !(Maybe (Textual Double))

992+ , _lrLongitude :: !(Maybe (Textual Double))

993+ , _lrCollectionTime :: !(Maybe (Textual Int64))

994994 } deriving (Eq,Show,Data,Typeable,Generic)

995995

996996-- | Creates a value of 'LocationRecord' with the minimum fields required to make a request.

@@ -1119,7 +1119,7 @@ instance ToJSON Worker where

11191119--

11201120-- /See:/ 'customField' smart constructor.

11211121data CustomField = CustomField

1122− { _cCustomFieldId :: !(Maybe (JSONText Int64))

1122+ { _cCustomFieldId :: !(Maybe (Textual Int64))

11231123 , _cKind :: !Text

11241124 , _cValue :: !(Maybe Text)

11251125 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Get.hs+2−2

@@ -48,14 +48,14 @@ type JobsGetResource =

4848 "teams" :>

4949 Capture "teamId" Text :>

5050 "jobs" :>

51− Capture "jobId" (JSONText Word64) :>

51+ Capture "jobId" (Textual Word64) :>

5252 QueryParam "alt" AltJSON :> Get '[JSON] Job

5353

5454-- | Retrieves a job, including all the changes made to the job.

5555--

5656-- /See:/ 'jobsGet' smart constructor.

5757data JobsGet = JobsGet

58− { _jgJobId :: !(JSONText Word64)

58+ { _jgJobId :: !(Textual Word64)

5959 , _jgTeamId :: !Text

6060 } deriving (Eq,Show,Data,Typeable,Generic)

6161

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Insert.hs+4−4

@@ -58,8 +58,8 @@ type JobsInsertResource =

5858 Capture "teamId" Text :>

5959 "jobs" :>

6060 QueryParam "address" Text :>

61− QueryParam "lat" (JSONText Double) :>

62− QueryParam "lng" (JSONText Double) :>

61+ QueryParam "lat" (Textual Double) :>

62+ QueryParam "lng" (Textual Double) :>

6363 QueryParam "title" Text :>

6464 QueryParam "note" Text :>

6565 QueryParam "customerPhoneNumber" Text :>

@@ -80,8 +80,8 @@ data JobsInsert = JobsInsert

8080 , _jiAddress :: !Text

8181 , _jiPayload :: !Job

8282 , _jiAssignee :: !(Maybe Text)

83− , _jiLat :: !(JSONText Double)

84− , _jiLng :: !(JSONText Double)

83+ , _jiLat :: !(Textual Double)

84+ , _jiLng :: !(Textual Double)

8585 , _jiTitle :: !Text

8686 , _jiCustomField :: !(Maybe [Text])

8787 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/List.hs+4−4

@@ -51,11 +51,11 @@ type JobsListResource =

5151 "teams" :>

5252 Capture "teamId" Text :>

5353 "jobs" :>

54− QueryParam "minModifiedTimestampMs" (JSONText Word64)

54+ QueryParam "minModifiedTimestampMs" (Textual Word64)

5555 :>

5656 QueryParam "omitJobChanges" Bool :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] JobListResponse

6161

@@ -64,10 +64,10 @@ type JobsListResource =

6464-- /See:/ 'jobsList' smart constructor.

6565data JobsList = JobsList

6666 { _jlTeamId :: !Text

67− , _jlMinModifiedTimestampMs :: !(Maybe (JSONText Word64))

67+ , _jlMinModifiedTimestampMs :: !(Maybe (Textual Word64))

6868 , _jlOmitJobChanges :: !(Maybe Bool)

6969 , _jlPageToken :: !(Maybe Text)

70− , _jlMaxResults :: !(Maybe (JSONText Word32))

70+ , _jlMaxResults :: !(Maybe (Textual Word32))

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

7373-- | Creates a value of 'JobsList' with the minimum fields required to make a request.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Patch.hs+6−6

@@ -60,15 +60,15 @@ type JobsPatchResource =

6060 "teams" :>

6161 Capture "teamId" Text :>

6262 "jobs" :>

63− Capture "jobId" (JSONText Word64) :>

63+ Capture "jobId" (Textual Word64) :>

6464 QueryParam "progress" JobsPatchProgress :>

6565 QueryParam "note" Text :>

6666 QueryParam "customerPhoneNumber" Text :>

6767 QueryParam "customerName" Text :>

6868 QueryParam "address" Text :>

6969 QueryParam "assignee" Text :>

70− QueryParam "lat" (JSONText Double) :>

71− QueryParam "lng" (JSONText Double) :>

70+ QueryParam "lat" (Textual Double) :>

71+ QueryParam "lng" (Textual Double) :>

7272 QueryParam "title" Text :>

7373 QueryParams "customField" Text :>

7474 QueryParam "alt" AltJSON :>

@@ -79,7 +79,7 @@ type JobsPatchResource =

7979--

8080-- /See:/ 'jobsPatch' smart constructor.

8181data JobsPatch = JobsPatch

82− { _jpJobId :: !(JSONText Word64)

82+ { _jpJobId :: !(Textual Word64)

8383 , _jpProgress :: !(Maybe JobsPatchProgress)

8484 , _jpNote :: !(Maybe Text)

8585 , _jpTeamId :: !Text

@@ -88,8 +88,8 @@ data JobsPatch = JobsPatch

8888 , _jpAddress :: !(Maybe Text)

8989 , _jpPayload :: !Job

9090 , _jpAssignee :: !(Maybe Text)

91− , _jpLat :: !(Maybe (JSONText Double))

92− , _jpLng :: !(Maybe (JSONText Double))

91+ , _jpLat :: !(Maybe (Textual Double))

92+ , _jpLng :: !(Maybe (Textual Double))

9393 , _jpTitle :: !(Maybe Text)

9494 , _jpCustomField :: !(Maybe [Text])

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Jobs/Update.hs+6−6

@@ -59,15 +59,15 @@ type JobsUpdateResource =

5959 "teams" :>

6060 Capture "teamId" Text :>

6161 "jobs" :>

62− Capture "jobId" (JSONText Word64) :>

62+ Capture "jobId" (Textual Word64) :>

6363 QueryParam "progress" JobsUpdateProgress :>

6464 QueryParam "note" Text :>

6565 QueryParam "customerPhoneNumber" Text :>

6666 QueryParam "customerName" Text :>

6767 QueryParam "address" Text :>

6868 QueryParam "assignee" Text :>

69− QueryParam "lat" (JSONText Double) :>

70− QueryParam "lng" (JSONText Double) :>

69+ QueryParam "lat" (Textual Double) :>

70+ QueryParam "lng" (Textual Double) :>

7171 QueryParam "title" Text :>

7272 QueryParams "customField" Text :>

7373 QueryParam "alt" AltJSON :>

@@ -77,7 +77,7 @@ type JobsUpdateResource =

7777--

7878-- /See:/ 'jobsUpdate' smart constructor.

7979data JobsUpdate = JobsUpdate

80− { _juJobId :: !(JSONText Word64)

80+ { _juJobId :: !(Textual Word64)

8181 , _juProgress :: !(Maybe JobsUpdateProgress)

8282 , _juNote :: !(Maybe Text)

8383 , _juTeamId :: !Text

@@ -86,8 +86,8 @@ data JobsUpdate = JobsUpdate

8686 , _juAddress :: !(Maybe Text)

8787 , _juPayload :: !Job

8888 , _juAssignee :: !(Maybe Text)

89− , _juLat :: !(Maybe (JSONText Double))

90− , _juLng :: !(Maybe (JSONText Double))

89+ , _juLat :: !(Maybe (Textual Double))

90+ , _juLng :: !(Maybe (Textual Double))

9191 , _juTitle :: !(Maybe Text)

9292 , _juCustomField :: !(Maybe [Text])

9393 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Location/List.hs+4−4

@@ -53,9 +53,9 @@ type LocationListResource =

5353 "workers" :>

5454 Capture "workerEmail" Text :>

5555 "locations" :>

56− QueryParam "startTimestampMs" (JSONText Word64) :>

56+ QueryParam "startTimestampMs" (Textual Word64) :>

5757 QueryParam "pageToken" Text :>

58− QueryParam "maxResults" (JSONText Word32) :>

58+ QueryParam "maxResults" (Textual Word32) :>

5959 QueryParam "alt" AltJSON :>

6060 Get '[JSON] LocationListResponse

6161

@@ -64,10 +64,10 @@ type LocationListResource =

6464-- /See:/ 'locationList' smart constructor.

6565data LocationList = LocationList

6666 { _llWorkerEmail :: !Text

67− , _llStartTimestampMs :: !(JSONText Word64)

67+ , _llStartTimestampMs :: !(Textual Word64)

6868 , _llTeamId :: !Text

6969 , _llPageToken :: !(Maybe Text)

70− , _llMaxResults :: !(Maybe (JSONText Word32))

70+ , _llMaxResults :: !(Maybe (Textual Word32))

7171 } deriving (Eq,Show,Data,Typeable,Generic)

7272

7373-- | Creates a value of 'LocationList' with the minimum fields required to make a request.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Get.hs+2−2

@@ -48,7 +48,7 @@ type ScheduleGetResource =

4848 "teams" :>

4949 Capture "teamId" Text :>

5050 "jobs" :>

51− Capture "jobId" (JSONText Word64) :>

51+ Capture "jobId" (Textual Word64) :>

5252 "schedule" :>

5353 QueryParam "alt" AltJSON :> Get '[JSON] Schedule

5454

@@ -56,7 +56,7 @@ type ScheduleGetResource =

5656--

5757-- /See:/ 'scheduleGet' smart constructor.

5858data ScheduleGet = ScheduleGet

59− { _sgJobId :: !(JSONText Word64)

59+ { _sgJobId :: !(Textual Word64)

6060 , _sgTeamId :: !Text

6161 } deriving (Eq,Show,Data,Typeable,Generic)

6262

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Patch.hs+8−8

@@ -54,12 +54,12 @@ type SchedulePatchResource =

5454 "teams" :>

5555 Capture "teamId" Text :>

5656 "jobs" :>

57− Capture "jobId" (JSONText Word64) :>

57+ Capture "jobId" (Textual Word64) :>

5858 "schedule" :>

5959 QueryParam "allDay" Bool :>

60− QueryParam "startTime" (JSONText Word64) :>

61− QueryParam "endTime" (JSONText Word64) :>

62− QueryParam "duration" (JSONText Word64) :>

60+ QueryParam "startTime" (Textual Word64) :>

61+ QueryParam "endTime" (Textual Word64) :>

62+ QueryParam "duration" (Textual Word64) :>

6363 QueryParam "alt" AltJSON :>

6464 ReqBody '[JSON] Schedule :> Patch '[JSON] Schedule

6565

@@ -68,13 +68,13 @@ type SchedulePatchResource =

6868--

6969-- /See:/ 'schedulePatch' smart constructor.

7070data SchedulePatch = SchedulePatch

71− { _spJobId :: !(JSONText Word64)

71+ { _spJobId :: !(Textual Word64)

7272 , _spAllDay :: !(Maybe Bool)

73− , _spStartTime :: !(Maybe (JSONText Word64))

73+ , _spStartTime :: !(Maybe (Textual Word64))

7474 , _spTeamId :: !Text

7575 , _spPayload :: !Schedule

76− , _spEndTime :: !(Maybe (JSONText Word64))

77− , _spDuration :: !(Maybe (JSONText Word64))

76+ , _spEndTime :: !(Maybe (Textual Word64))

77+ , _spDuration :: !(Maybe (Textual Word64))

7878 } deriving (Eq,Show,Data,Typeable,Generic)

7979

8080-- | Creates a value of 'SchedulePatch' with the minimum fields required to make a request.

gogol-maps-coordinate/gen/Network/Google/Resource/Coordinate/Schedule/Update.hs+8−8

@@ -53,12 +53,12 @@ type ScheduleUpdateResource =

5353 "teams" :>

5454 Capture "teamId" Text :>

5555 "jobs" :>

56− Capture "jobId" (JSONText Word64) :>

56+ Capture "jobId" (Textual Word64) :>

5757 "schedule" :>

5858 QueryParam "allDay" Bool :>

59− QueryParam "startTime" (JSONText Word64) :>

60− QueryParam "endTime" (JSONText Word64) :>

61− QueryParam "duration" (JSONText Word64) :>

59+ QueryParam "startTime" (Textual Word64) :>

60+ QueryParam "endTime" (Textual Word64) :>

61+ QueryParam "duration" (Textual Word64) :>

6262 QueryParam "alt" AltJSON :>

6363 ReqBody '[JSON] Schedule :> Put '[JSON] Schedule

6464

@@ -66,13 +66,13 @@ type ScheduleUpdateResource =

6666--

6767-- /See:/ 'scheduleUpdate' smart constructor.

6868data ScheduleUpdate = ScheduleUpdate

69− { _suJobId :: !(JSONText Word64)

69+ { _suJobId :: !(Textual Word64)

7070 , _suAllDay :: !(Maybe Bool)

71− , _suStartTime :: !(Maybe (JSONText Word64))

71+ , _suStartTime :: !(Maybe (Textual Word64))

7272 , _suTeamId :: !Text

7373 , _suPayload :: !Schedule

74− , _suEndTime :: !(Maybe (JSONText Word64))

75− , _suDuration :: !(Maybe (JSONText Word64))

74+ , _suEndTime :: !(Maybe (Textual Word64))

75+ , _suDuration :: !(Maybe (Textual Word64))

7676 } deriving (Eq,Show,Data,Typeable,Generic)

7777

7878-- | Creates a value of 'ScheduleUpdate' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+41−41

@@ -25,8 +25,8 @@ import Network.Google.Prelude

2525--

2626-- /See:/ 'valueRange' smart constructor.

2727data ValueRange = ValueRange

28− { _vrMax :: !(Maybe (JSONText Double))

29− , _vrMin :: !(Maybe (JSONText Double))

28+ { _vrMax :: !(Maybe (Textual Double))

29+ , _vrMin :: !(Maybe (Textual Double))

3030 } deriving (Eq,Show,Data,Typeable,Generic)

3131

3232-- | Creates a value of 'ValueRange' with the minimum fields required to make a request.

@@ -333,7 +333,7 @@ instance ToJSON PermissionsBatchDeleteRequest where

333333--

334334-- /See:/ 'rasterCollectionsListResponse' smart constructor.

335335data RasterCollectionsListResponse = RasterCollectionsListResponse

336− { _rclrNextPageToken :: !(Maybe (JSONText Word8))

336+ { _rclrNextPageToken :: !(Maybe (Textual Word8))

337337 , _rclrRasterCollections :: !(Maybe [RasterCollection])

338338 } deriving (Eq,Show,Data,Typeable,Generic)

339339

@@ -443,7 +443,7 @@ instance ToJSON GeoJSONGeometry where

443443--

444444-- /See:/ 'mapLayer' smart constructor.

445445data MapLayer = MapLayer

446− { _mlDefaultViewport :: !(Maybe [JSONText Double])

446+ { _mlDefaultViewport :: !(Maybe [Textual Double])

447447 , _mlVisibility :: !(Maybe Text)

448448 , _mlKey :: !(Maybe Text)

449449 , _mlName :: !(Maybe Text)

@@ -537,8 +537,8 @@ instance ToJSON MapLayer where

537537--

538538-- /See:/ 'zoomLevels' smart constructor.

539539data ZoomLevels = ZoomLevels

540− { _zlMax :: !(Maybe (JSONText Int32))

541− , _zlMin :: !(Maybe (JSONText Int32))

540+ { _zlMax :: !(Maybe (Textual Int32))

541+ , _zlMin :: !(Maybe (Textual Int32))

542542 } deriving (Eq,Show,Data,Typeable,Generic)

543543

544544-- | Creates a value of 'ZoomLevels' with the minimum fields required to make a request.

@@ -619,8 +619,8 @@ instance ToJSON FeatureInfo where

619619--

620620-- /See:/ 'sizeRange' smart constructor.

621621data SizeRange = SizeRange

622− { _srMax :: !(Maybe (JSONText Double))

623− , _srMin :: !(Maybe (JSONText Double))

622+ { _srMax :: !(Maybe (Textual Double))

623+ , _srMin :: !(Maybe (Textual Double))

624624 } deriving (Eq,Show,Data,Typeable,Generic)

625625

626626-- | Creates a value of 'SizeRange' with the minimum fields required to make a request.

@@ -666,7 +666,7 @@ instance ToJSON SizeRange where

666666-- /See:/ 'mapFolder' smart constructor.

667667data MapFolder = MapFolder

668668 { _mfExpandable :: !(Maybe Bool)

669− , _mfDefaultViewport :: !(Maybe [JSONText Double])

669+ , _mfDefaultViewport :: !(Maybe [Textual Double])

670670 , _mfContents :: !(Maybe [MapItem])

671671 , _mfVisibility :: !(Maybe Text)

672672 , _mfKey :: !(Maybe Text)

@@ -815,7 +815,7 @@ instance ToJSON Project where

815815-- /See:/ 'color' smart constructor.

816816data Color = Color

817817 { _cColor :: !(Maybe Text)

818− , _cOpacity :: !(Maybe (JSONText Double))

818+ , _cOpacity :: !(Maybe (Textual Double))

819819 } deriving (Eq,Show,Data,Typeable,Generic)

820820

821821-- | Creates a value of 'Color' with the minimum fields required to make a request.

@@ -869,7 +869,7 @@ data RasterCollection = RasterCollection

869869 , _rcLastModifiedTime :: !(Maybe DateTime')

870870 , _rcLastModifierEmail :: !(Maybe Text)

871871 , _rcName :: !(Maybe Text)

872− , _rcBbox :: !(Maybe [JSONText Double])

872+ , _rcBbox :: !(Maybe [Textual Double])

873873 , _rcProcessingStatus :: !(Maybe RasterCollectionProcessingStatus)

874874 , _rcMosaic :: !(Maybe Bool)

875875 , _rcId :: !(Maybe Text)

@@ -1102,8 +1102,8 @@ instance ToJSON RasterCollection where

11021102-- /See:/ 'lineStyleStroke' smart constructor.

11031103data LineStyleStroke = LineStyleStroke

11041104 { _lssColor :: !(Maybe Text)

1105− , _lssWidth :: !(Maybe (JSONText Double))

1106− , _lssOpacity :: !(Maybe (JSONText Double))

1105+ , _lssWidth :: !(Maybe (Textual Double))

1106+ , _lssOpacity :: !(Maybe (Textual Double))

11071107 } deriving (Eq,Show,Data,Typeable,Generic)

11081108

11091109-- | Creates a value of 'LineStyleStroke' with the minimum fields required to make a request.

@@ -1262,7 +1262,7 @@ data Asset = Asset

12621262 , _aLastModifiedTime :: !(Maybe DateTime')

12631263 , _aLastModifierEmail :: !(Maybe Text)

12641264 , _aName :: !(Maybe Text)

1265− , _aBbox :: !(Maybe [JSONText Double])

1265+ , _aBbox :: !(Maybe [Textual Double])

12661266 , _aResource :: !(Maybe Text)

12671267 , _aId :: !(Maybe Text)

12681268 , _aProjectId :: !(Maybe Text)

@@ -1664,7 +1664,7 @@ instance ToJSON ParentsListResponse where

16641664-- /See:/ 'featuresListResponse' smart constructor.

16651665data FeaturesListResponse = FeaturesListResponse

16661666 { _flrNextPageToken :: !(Maybe Text)

1667− , _flrAllowedQueriesPerSecond :: !(Maybe (JSONText Double))

1667+ , _flrAllowedQueriesPerSecond :: !(Maybe (Textual Double))

16681668 , _flrSchema :: !(Maybe Schema)

16691669 , _flrFeatures :: !(Maybe [Feature])

16701670 , _flrType :: !Text

@@ -1829,8 +1829,8 @@ instance ToJSON IconsListResponse where

18291829data LabelStyle = LabelStyle

18301830 { _lsFontStyle :: !(Maybe LabelStyleFontStyle)

18311831 , _lsColor :: !(Maybe Text)

1832− , _lsSize :: !(Maybe (JSONText Double))

1833− , _lsOpacity :: !(Maybe (JSONText Double))

1832+ , _lsSize :: !(Maybe (Textual Double))

1833+ , _lsOpacity :: !(Maybe (Textual Double))

18341834 , _lsOutline :: !(Maybe Color)

18351835 , _lsFontWeight :: !(Maybe LabelStyleFontWeight)

18361836 , _lsColumn :: !(Maybe Text)

@@ -2095,7 +2095,7 @@ instance ToJSON

20952095--

20962096-- /See:/ 'publishedMap' smart constructor.

20972097data PublishedMap = PublishedMap

2098− { _pmDefaultViewport :: !(Maybe [JSONText Double])

2098+ { _pmDefaultViewport :: !(Maybe [Textual Double])

20992099 , _pmContents :: !(Maybe [MapItem])

21002100 , _pmName :: !(Maybe Text)

21012101 , _pmId :: !(Maybe Text)

@@ -2257,7 +2257,7 @@ instance ToJSON AcquisitionTime where

22572257--

22582258-- /See:/ 'tablesListResponse' smart constructor.

22592259data TablesListResponse = TablesListResponse

2260− { _tlrNextPageToken :: !(Maybe (JSONText Word8))

2260+ { _tlrNextPageToken :: !(Maybe (Textual Word8))

22612261 , _tlrTables :: !(Maybe [Table])

22622262 } deriving (Eq,Show,Data,Typeable,Generic)

22632263

@@ -2479,8 +2479,8 @@ instance ToJSON DisplayRule where

24792479-- /See:/ 'bOrder' smart constructor.

24802480data BOrder = BOrder

24812481 { _boColor :: !(Maybe Text)

2482− , _boWidth :: !(Maybe (JSONText Double))

2483− , _boOpacity :: !(Maybe (JSONText Double))

2482+ , _boWidth :: !(Maybe (Textual Double))

2483+ , _boOpacity :: !(Maybe (Textual Double))

24842484 } deriving (Eq,Show,Data,Typeable,Generic)

24852485

24862486-- | Creates a value of 'BOrder' with the minimum fields required to make a request.

@@ -2540,7 +2540,7 @@ data Map = Map

25402540 { _mCreationTime :: !(Maybe DateTime')

25412541 , _mWritersCanEditPermissions :: !(Maybe Bool)

25422542 , _mEtag :: !(Maybe Text)

2543− , _mDefaultViewport :: !(Maybe [JSONText Double])

2543+ , _mDefaultViewport :: !(Maybe [Textual Double])

25442544 , _mContents :: !(Maybe [MapItem])

25452545 , _mPublishingStatus :: !(Maybe MapPublishingStatus)

25462546 , _mCreatorEmail :: !(Maybe Text)

@@ -2548,7 +2548,7 @@ data Map = Map

25482548 , _mLastModifierEmail :: !(Maybe Text)

25492549 , _mVersions :: !(Maybe [Text])

25502550 , _mName :: !(Maybe Text)

2551− , _mBbox :: !(Maybe [JSONText Double])

2551+ , _mBbox :: !(Maybe [Textual Double])

25522552 , _mProcessingStatus :: !(Maybe MapProcessingStatus)

25532553 , _mId :: !(Maybe Text)

25542554 , _mProjectId :: !(Maybe Text)

@@ -2868,7 +2868,7 @@ instance ToJSON RasterCollectionsRastersListResponse

28682868--

28692869-- /See:/ 'geoJSONMultiLineString' smart constructor.

28702870data GeoJSONMultiLineString = GeoJSONMultiLineString

2871− { _gjmlsCoordinates :: !(Maybe [[[JSONText Double]]])

2871+ { _gjmlsCoordinates :: !(Maybe [[[Textual Double]]])

28722872 , _gjmlsType :: !(Maybe GeoJSONMultiLineStringType)

28732873 } deriving (Eq,Show,Data,Typeable,Generic)

28742874

@@ -2989,7 +2989,7 @@ instance ToJSON ScalingFunction where

29892989--

29902990-- /See:/ 'assetsListResponse' smart constructor.

29912991data AssetsListResponse = AssetsListResponse

2992− { _alrNextPageToken :: !(Maybe (JSONText Word8))

2992+ { _alrNextPageToken :: !(Maybe (Textual Word8))

29932993 , _alrAssets :: !(Maybe [Asset])

29942994 } deriving (Eq,Show,Data,Typeable,Generic)

29952995

@@ -3152,7 +3152,7 @@ data RasterCollectionsRaster = RasterCollectionsRaster

31523152 , _rcrRasterType :: !Text

31533153 , _rcrLastModifiedTime :: !(Maybe DateTime')

31543154 , _rcrName :: !(Maybe Text)

3155− , _rcrBbox :: !(Maybe [JSONText Double])

3155+ , _rcrBbox :: !(Maybe [Textual Double])

31563156 , _rcrId :: !(Maybe Text)

31573157 , _rcrProjectId :: !(Maybe Text)

31583158 , _rcrDescription :: !(Maybe Text)

@@ -3337,7 +3337,7 @@ instance ToJSON Filter where

33373337--

33383338-- /See:/ 'geoJSONMultiPoint' smart constructor.

33393339data GeoJSONMultiPoint = GeoJSONMultiPoint

3340− { _gjmpCoordinates :: !(Maybe [[JSONText Double]])

3340+ { _gjmpCoordinates :: !(Maybe [[Textual Double]])

33413341 , _gjmpType :: !(Maybe GeoJSONMultiPointType)

33423342 } deriving (Eq,Show,Data,Typeable,Generic)

33433343

@@ -3385,7 +3385,7 @@ instance ToJSON GeoJSONMultiPoint where

33853385--

33863386-- /See:/ 'geoJSONMultiPolygon' smart constructor.

33873387data GeoJSONMultiPolygon = GeoJSONMultiPolygon

3388− { _gjsonmpCoordinates :: !(Maybe [[[[JSONText Double]]]])

3388+ { _gjsonmpCoordinates :: !(Maybe [[[[Textual Double]]]])

33893389 , _gjsonmpType :: !(Maybe GeoJSONMultiPolygonType)

33903390 } deriving (Eq,Show,Data,Typeable,Generic)

33913391

@@ -3448,7 +3448,7 @@ data Layer = Layer

34483448 , _layDatasources :: !(Maybe [Datasource])

34493449 , _layLastModifierEmail :: !(Maybe Text)

34503450 , _layName :: !(Maybe Text)

3451− , _layBbox :: !(Maybe [JSONText Double])

3451+ , _layBbox :: !(Maybe [Textual Double])

34523452 , _layProcessingStatus :: !(Maybe LayerProcessingStatus)

34533453 , _layId :: !(Maybe Text)

34543454 , _layProjectId :: !(Maybe Text)

@@ -3784,7 +3784,7 @@ data Raster = Raster

37843784 , _rrLastModifierEmail :: !(Maybe Text)

37853785 , _rrAcquisitionTime :: !(Maybe AcquisitionTime)

37863786 , _rrName :: !(Maybe Text)

3787− , _rrBbox :: !(Maybe [JSONText Double])

3787+ , _rrBbox :: !(Maybe [Textual Double])

37883788 , _rrProcessingStatus :: !(Maybe RasterProcessingStatus)

37893789 , _rrFiles :: !(Maybe [File])

37903790 , _rrId :: !(Maybe Text)

@@ -4247,7 +4247,7 @@ data Table = Table

42474247 , _tabSchema :: !(Maybe Schema)

42484248 , _tabLastModifierEmail :: !(Maybe Text)

42494249 , _tabName :: !(Maybe Text)

4250− , _tabBbox :: !(Maybe [JSONText Double])

4250+ , _tabBbox :: !(Maybe [Textual Double])

42514251 , _tabProcessingStatus :: !(Maybe TableProcessingStatus)

42524252 , _tabFiles :: !(Maybe [File])

42534253 , _tabId :: !(Maybe Text)

@@ -4504,7 +4504,7 @@ instance ToJSON Table where

45044504--

45054505-- /See:/ 'file' smart constructor.

45064506data File = File

4507− { _fSize :: !(Maybe (JSONText Int64))

4507+ { _fSize :: !(Maybe (Textual Int64))

45084508 , _fUploadStatus :: !(Maybe FileUploadStatus)

45094509 , _fFilename :: !(Maybe Text)

45104510 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -4648,7 +4648,7 @@ instance ToJSON PermissionsBatchDeleteResponse where

46484648--

46494649-- /See:/ 'mapKmlLink' smart constructor.

46504650data MapKmlLink = MapKmlLink

4651− { _mklDefaultViewport :: !(Maybe [JSONText Double])

4651+ { _mklDefaultViewport :: !(Maybe [Textual Double])

46524652 , _mklVisibility :: !(Maybe Text)

46534653 , _mklName :: !(Maybe Text)

46544654 , _mklType :: !(Maybe MapKmlLinkType)

@@ -4754,7 +4754,7 @@ instance ToJSON PermissionsBatchUpdateResponse where

47544754--

47554755-- /See:/ 'geoJSONLineString' smart constructor.

47564756data GeoJSONLineString = GeoJSONLineString

4757− { _gjlsCoordinates :: !(Maybe [[JSONText Double]])

4757+ { _gjlsCoordinates :: !(Maybe [[Textual Double]])

47584758 , _gjlsType :: !(Maybe GeoJSONLineStringType)

47594759 } deriving (Eq,Show,Data,Typeable,Generic)

47604760

@@ -4804,7 +4804,7 @@ instance ToJSON GeoJSONLineString where

48044804-- /See:/ 'publishedMapsListResponse' smart constructor.

48054805data PublishedMapsListResponse = PublishedMapsListResponse

48064806 { _pmlrMaps :: !(Maybe [PublishedMap])

4807− , _pmlrNextPageToken :: !(Maybe (JSONText Word8))

4807+ , _pmlrNextPageToken :: !(Maybe (Textual Word8))

48084808 } deriving (Eq,Show,Data,Typeable,Generic)

48094809

48104810-- | Creates a value of 'PublishedMapsListResponse' with the minimum fields required to make a request.

@@ -4856,7 +4856,7 @@ instance ToJSON PublishedMapsListResponse where

48564856-- /See:/ 'mapsListResponse' smart constructor.

48574857data MapsListResponse = MapsListResponse

48584858 { _mlrMaps :: !(Maybe [Map])

4859− , _mlrNextPageToken :: !(Maybe (JSONText Word8))

4859+ , _mlrNextPageToken :: !(Maybe (Textual Word8))

48604860 } deriving (Eq,Show,Data,Typeable,Generic)

48614861

48624862-- | Creates a value of 'MapsListResponse' with the minimum fields required to make a request.

@@ -4955,7 +4955,7 @@ instance ToJSON GeoJSONGeometryCollection where

49554955--

49564956-- /See:/ 'geoJSONPolygon' smart constructor.

49574957data GeoJSONPolygon = GeoJSONPolygon

4958− { _gjpCoordinates :: !(Maybe [[[JSONText Double]]])

4958+ { _gjpCoordinates :: !(Maybe [[[Textual Double]]])

49594959 , _gjpType :: !(Maybe GeoJSONPolygonType)

49604960 } deriving (Eq,Show,Data,Typeable,Generic)

49614961

@@ -5007,7 +5007,7 @@ instance ToJSON GeoJSONPolygon where

50075007--

50085008-- /See:/ 'geoJSONPoint' smart constructor.

50095009data GeoJSONPoint = GeoJSONPoint

5010− { _gjsonpCoordinates :: !(Maybe [JSONText Double])

5010+ { _gjsonpCoordinates :: !(Maybe [Textual Double])

50115011 , _gjsonpType :: !(Maybe GeoJSONPointType)

50125012 } deriving (Eq,Show,Data,Typeable,Generic)

50135013

@@ -5061,7 +5061,7 @@ instance ToJSON GeoJSONPoint where

50615061--

50625062-- /See:/ 'layersListResponse' smart constructor.

50635063data LayersListResponse = LayersListResponse

5064− { _llrNextPageToken :: !(Maybe (JSONText Word8))

5064+ { _llrNextPageToken :: !(Maybe (Textual Word8))

50655065 , _llrLayers :: !(Maybe [Layer])

50665066 } deriving (Eq,Show,Data,Typeable,Generic)

50675067

@@ -5204,7 +5204,7 @@ instance ToJSON PermissionsListResponse where

52045204data LineStyle = LineStyle

52055205 { _lsStroke :: !(Maybe LineStyleStroke)

52065206 , _lsBOrder :: !(Maybe BOrder)

5207− , _lsDash :: !(Maybe [JSONText Double])

5207+ , _lsDash :: !(Maybe [Textual Double])

52085208 , _lsLabel :: !(Maybe LabelStyle)

52095209 } deriving (Eq,Show,Data,Typeable,Generic)

52105210

@@ -5271,7 +5271,7 @@ instance ToJSON LineStyle where

52715271--

52725272-- /See:/ 'publishedLayersListResponse' smart constructor.

52735273data PublishedLayersListResponse = PublishedLayersListResponse

5274− { _pllrNextPageToken :: !(Maybe (JSONText Word8))

5274+ { _pllrNextPageToken :: !(Maybe (Textual Word8))

52755275 , _pllrLayers :: !(Maybe [PublishedLayer])

52765276 } deriving (Eq,Show,Data,Typeable,Generic)

52775277

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/List.hs+2−2

@@ -67,7 +67,7 @@ type AssetsListResource =

6767 QueryParam "projectId" Text :>

6868 QueryParam "type" Text :>

6969 QueryParam "search" Text :>

70− QueryParam "maxResults" (JSONText Word32) :>

70+ QueryParam "maxResults" (Textual Word32) :>

7171 QueryParam "tags" Text :>

7272 QueryParam "createdBefore" DateTime' :>

7373 QueryParam "alt" AltJSON :>

@@ -87,7 +87,7 @@ data AssetsList = AssetsList

8787 , _alProjectId :: !(Maybe Text)

8888 , _alType :: !(Maybe Text)

8989 , _alSearch :: !(Maybe Text)

90− , _alMaxResults :: !(Maybe (JSONText Word32))

90+ , _alMaxResults :: !(Maybe (Textual Word32))

9191 , _alTags :: !(Maybe Text)

9292 , _alCreatedBefore :: !(Maybe DateTime')

9393 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Assets/Parents/List.hs+2−2

@@ -50,7 +50,7 @@ type AssetsParentsListResource =

5050 Capture "id" Text :>

5151 "parents" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ParentsListResponse

5656

@@ -60,7 +60,7 @@ type AssetsParentsListResource =

6060data AssetsParentsList = AssetsParentsList

6161 { _aplId :: !Text

6262 , _aplPageToken :: !(Maybe Text)

63− , _aplMaxResults :: !(Maybe (JSONText Word32))

63+ , _aplMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'AssetsParentsList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/List.hs+2−2

@@ -69,7 +69,7 @@ type LayersListResource =

6969 QueryParam "pageToken" Text :>

7070 QueryParam "projectId" Text :>

7171 QueryParam "search" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "tags" Text :>

7474 QueryParam "createdBefore" DateTime' :>

7575 QueryParam "alt" AltJSON :>

@@ -89,7 +89,7 @@ data LayersList = LayersList

8989 , _llPageToken :: !(Maybe Text)

9090 , _llProjectId :: !(Maybe Text)

9191 , _llSearch :: !(Maybe Text)

92− , _llMaxResults :: !(Maybe (JSONText Word32))

92+ , _llMaxResults :: !(Maybe (Textual Word32))

9393 , _llTags :: !(Maybe Text)

9494 , _llCreatedBefore :: !(Maybe DateTime')

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/ListPublished.hs+2−2

@@ -50,7 +50,7 @@ type LayersListPublishedResource =

5050 "published" :>

5151 QueryParam "pageToken" Text :>

5252 QueryParam "projectId" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] PublishedLayersListResponse

5656

@@ -60,7 +60,7 @@ type LayersListPublishedResource =

6060data LayersListPublished = LayersListPublished

6161 { _llpPageToken :: !(Maybe Text)

6262 , _llpProjectId :: !(Maybe Text)

63− , _llpMaxResults :: !(Maybe (JSONText Word32))

63+ , _llpMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'LayersListPublished' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Layers/Parents/List.hs+2−2

@@ -50,7 +50,7 @@ type LayersParentsListResource =

5050 Capture "id" Text :>

5151 "parents" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ParentsListResponse

5656

@@ -60,7 +60,7 @@ type LayersParentsListResource =

6060data LayersParentsList = LayersParentsList

6161 { _lId :: !Text

6262 , _lPageToken :: !(Maybe Text)

63− , _lMaxResults :: !(Maybe (JSONText Word32))

63+ , _lMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'LayersParentsList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/List.hs+2−2

@@ -69,7 +69,7 @@ type MapsListResource =

6969 QueryParam "pageToken" Text :>

7070 QueryParam "projectId" Text :>

7171 QueryParam "search" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "tags" Text :>

7474 QueryParam "createdBefore" DateTime' :>

7575 QueryParam "alt" AltJSON :>

@@ -89,7 +89,7 @@ data MapsList = MapsList

8989 , _mlPageToken :: !(Maybe Text)

9090 , _mlProjectId :: !(Maybe Text)

9191 , _mlSearch :: !(Maybe Text)

92− , _mlMaxResults :: !(Maybe (JSONText Word32))

92+ , _mlMaxResults :: !(Maybe (Textual Word32))

9393 , _mlTags :: !(Maybe Text)

9494 , _mlCreatedBefore :: !(Maybe DateTime')

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Maps/ListPublished.hs+2−2

@@ -50,7 +50,7 @@ type MapsListPublishedResource =

5050 "published" :>

5151 QueryParam "pageToken" Text :>

5252 QueryParam "projectId" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] PublishedMapsListResponse

5656

@@ -60,7 +60,7 @@ type MapsListPublishedResource =

6060data MapsListPublished = MapsListPublished

6161 { _mlpPageToken :: !(Maybe Text)

6262 , _mlpProjectId :: !(Maybe Text)

63− , _mlpMaxResults :: !(Maybe (JSONText Word32))

63+ , _mlpMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'MapsListPublished' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/List.hs+2−2

@@ -50,7 +50,7 @@ type ProjectsIconsListResource =

5050 Capture "projectId" Text :>

5151 "icons" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] IconsListResponse

5656

@@ -60,7 +60,7 @@ type ProjectsIconsListResource =

6060data ProjectsIconsList = ProjectsIconsList

6161 { _pilPageToken :: !(Maybe Text)

6262 , _pilProjectId :: !Text

63− , _pilMaxResults :: !(Maybe (JSONText Word32))

63+ , _pilMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'ProjectsIconsList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/List.hs+2−2

@@ -69,7 +69,7 @@ type RasterCollectionsListResource =

6969 QueryParam "pageToken" Text :>

7070 QueryParam "projectId" Text :>

7171 QueryParam "search" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "tags" Text :>

7474 QueryParam "createdBefore" DateTime' :>

7575 QueryParam "alt" AltJSON :>

@@ -89,7 +89,7 @@ data RasterCollectionsList = RasterCollectionsList

8989 , _rclPageToken :: !(Maybe Text)

9090 , _rclProjectId :: !(Maybe Text)

9191 , _rclSearch :: !(Maybe Text)

92− , _rclMaxResults :: !(Maybe (JSONText Word32))

92+ , _rclMaxResults :: !(Maybe (Textual Word32))

9393 , _rclTags :: !(Maybe Text)

9494 , _rclCreatedBefore :: !(Maybe DateTime')

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Parents/List.hs+2−2

@@ -50,7 +50,7 @@ type RasterCollectionsParentsListResource =

5050 Capture "id" Text :>

5151 "parents" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ParentsListResponse

5656

@@ -60,7 +60,7 @@ type RasterCollectionsParentsListResource =

6060data RasterCollectionsParentsList = RasterCollectionsParentsList

6161 { _rcplcId :: !Text

6262 , _rcplcPageToken :: !(Maybe Text)

63− , _rcplcMaxResults :: !(Maybe (JSONText Word32))

63+ , _rcplcMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'RasterCollectionsParentsList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/RasterCollections/Rasters/List.hs+2−2

@@ -66,7 +66,7 @@ type RasterCollectionsRastersListResource =

6666 QueryParam "modifiedBefore" DateTime' :>

6767 QueryParam "pageToken" Text :>

6868 QueryParam "search" Text :>

69− QueryParam "maxResults" (JSONText Word32) :>

69+ QueryParam "maxResults" (Textual Word32) :>

7070 QueryParam "tags" Text :>

7171 QueryParam "createdBefore" DateTime' :>

7272 QueryParam "alt" AltJSON :>

@@ -86,7 +86,7 @@ data RasterCollectionsRastersList = RasterCollectionsRastersList

8686 , _rcrlModifiedBefore :: !(Maybe DateTime')

8787 , _rcrlPageToken :: !(Maybe Text)

8888 , _rcrlSearch :: !(Maybe Text)

89− , _rcrlMaxResults :: !(Maybe (JSONText Word32))

89+ , _rcrlMaxResults :: !(Maybe (Textual Word32))

9090 , _rcrlTags :: !(Maybe Text)

9191 , _rcrlCreatedBefore :: !(Maybe DateTime')

9292 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/List.hs+2−2

@@ -69,7 +69,7 @@ type RastersListResource =

6969 QueryParam "modifiedBefore" DateTime' :>

7070 QueryParam "pageToken" Text :>

7171 QueryParam "search" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "tags" Text :>

7474 QueryParam "createdBefore" DateTime' :>

7575 QueryParam "alt" AltJSON :>

@@ -89,7 +89,7 @@ data RastersList = RastersList

8989 , _rlPageToken :: !(Maybe Text)

9090 , _rlProjectId :: !Text

9191 , _rlSearch :: !(Maybe Text)

92− , _rlMaxResults :: !(Maybe (JSONText Word32))

92+ , _rlMaxResults :: !(Maybe (Textual Word32))

9393 , _rlTags :: !(Maybe Text)

9494 , _rlCreatedBefore :: !(Maybe DateTime')

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Parents/List.hs+2−2

@@ -50,7 +50,7 @@ type RastersParentsListResource =

5050 Capture "id" Text :>

5151 "parents" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ParentsListResponse

5656

@@ -60,7 +60,7 @@ type RastersParentsListResource =

6060data RastersParentsList = RastersParentsList

6161 { _rId :: !Text

6262 , _rPageToken :: !(Maybe Text)

63− , _rMaxResults :: !(Maybe (JSONText Word32))

63+ , _rMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'RastersParentsList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Features/List.hs+4−4

@@ -60,11 +60,11 @@ type TablesFeaturesListResource =

6060 QueryParam "where" Text :>

6161 QueryParam "orderBy" Text :>

6262 QueryParam "version" TablesFeaturesListVersion :>

63− QueryParam "limit" (JSONText Word32) :>

63+ QueryParam "limit" (Textual Word32) :>

6464 QueryParam "pageToken" Text :>

6565 QueryParam "select" Text :>

6666 QueryParam "intersects" Text :>

67− QueryParam "maxResults" (JSONText Word32) :>

67+ QueryParam "maxResults" (Textual Word32) :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] FeaturesListResponse

7070

@@ -77,11 +77,11 @@ data TablesFeaturesList = TablesFeaturesList

7777 , _tflOrderBy :: !(Maybe Text)

7878 , _tflVersion :: !(Maybe TablesFeaturesListVersion)

7979 , _tflId :: !Text

80− , _tflLimit :: !(Maybe (JSONText Word32))

80+ , _tflLimit :: !(Maybe (Textual Word32))

8181 , _tflPageToken :: !(Maybe Text)

8282 , _tflSelect :: !(Maybe Text)

8383 , _tflIntersects :: !(Maybe Text)

84− , _tflMaxResults :: !(Maybe (JSONText Word32))

84+ , _tflMaxResults :: !(Maybe (Textual Word32))

8585 } deriving (Eq,Show,Data,Typeable,Generic)

8686

8787-- | Creates a value of 'TablesFeaturesList' with the minimum fields required to make a request.

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/List.hs+2−2

@@ -69,7 +69,7 @@ type TablesListResource =

6969 QueryParam "pageToken" Text :>

7070 QueryParam "projectId" Text :>

7171 QueryParam "search" Text :>

72− QueryParam "maxResults" (JSONText Word32) :>

72+ QueryParam "maxResults" (Textual Word32) :>

7373 QueryParam "tags" Text :>

7474 QueryParam "createdBefore" DateTime' :>

7575 QueryParam "alt" AltJSON :>

@@ -89,7 +89,7 @@ data TablesList = TablesList

8989 , _tlPageToken :: !(Maybe Text)

9090 , _tlProjectId :: !(Maybe Text)

9191 , _tlSearch :: !(Maybe Text)

92− , _tlMaxResults :: !(Maybe (JSONText Word32))

92+ , _tlMaxResults :: !(Maybe (Textual Word32))

9393 , _tlTags :: !(Maybe Text)

9494 , _tlCreatedBefore :: !(Maybe DateTime')

9595 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Parents/List.hs+2−2

@@ -50,7 +50,7 @@ type TablesParentsListResource =

5050 Capture "id" Text :>

5151 "parents" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :>

5555 Get '[JSON] ParentsListResponse

5656

@@ -60,7 +60,7 @@ type TablesParentsListResource =

6060data TablesParentsList = TablesParentsList

6161 { _tId :: !Text

6262 , _tPageToken :: !(Maybe Text)

63− , _tMaxResults :: !(Maybe (JSONText Word32))

63+ , _tMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'TablesParentsList' with the minimum fields required to make a request.

gogol-mirror/gen/Network/Google/Mirror/Types/Product.hs+5−5

@@ -162,12 +162,12 @@ instance ToJSON LocationsListResponse where

162162-- /See:/ 'location' smart constructor.

163163data Location = Location

164164 { _lKind :: !Text

165− , _lLatitude :: !(Maybe (JSONText Double))

165+ , _lLatitude :: !(Maybe (Textual Double))

166166 , _lAddress :: !(Maybe Text)

167167 , _lDisplayName :: !(Maybe Text)

168168 , _lId :: !(Maybe Text)

169− , _lAccuracy :: !(Maybe (JSONText Double))

170− , _lLongitude :: !(Maybe (JSONText Double))

169+ , _lAccuracy :: !(Maybe (Textual Double))

170+ , _lLongitude :: !(Maybe (Textual Double))

171171 , _lTimestamp :: !(Maybe DateTime')

172172 } deriving (Eq,Show,Data,Typeable,Generic)

173173

@@ -374,7 +374,7 @@ data Contact = Contact

374374 { _conAcceptCommands :: !(Maybe [Command])

375375 , _conSharingFeatures :: !(Maybe [Text])

376376 , _conImageURLs :: !(Maybe [Text])

377− , _conPriority :: !(Maybe (JSONText Word32))

377+ , _conPriority :: !(Maybe (Textual Word32))

378378 , _conKind :: !Text

379379 , _conAcceptTypes :: !(Maybe [Text])

380380 , _conPhoneNumber :: !(Maybe Text)

@@ -1405,7 +1405,7 @@ data TimelineItem = TimelineItem

14051405 , _tiDisplayTime :: !(Maybe DateTime')

14061406 , _tiEtag :: !(Maybe Text)

14071407 , _tiIsDeleted :: !(Maybe Bool)

1408− , _tiPinScore :: !(Maybe (JSONText Int32))

1408+ , _tiPinScore :: !(Maybe (Textual Int32))

14091409 , _tiAttachments :: !(Maybe [Attachment])

14101410 , _tiLocation :: !(Maybe Location)

14111411 , _tiMenuItems :: !(Maybe [MenuItem])

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/List.hs+2−2

@@ -56,7 +56,7 @@ type TimelineListResource =

5656 QueryParam "bundleId" Text :>

5757 QueryParam "sourceItemId" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "includeDeleted" Bool :>

6161 QueryParam "alt" AltJSON :>

6262 Get '[JSON] TimelineListResponse

@@ -70,7 +70,7 @@ data TimelineList = TimelineList

7070 , _tlBundleId :: !(Maybe Text)

7171 , _tlSourceItemId :: !(Maybe Text)

7272 , _tlPageToken :: !(Maybe Text)

73− , _tlMaxResults :: !(Maybe (JSONText Word32))

73+ , _tlMaxResults :: !(Maybe (Textual Word32))

7474 , _tlIncludeDeleted :: !(Maybe Bool)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+9−9

@@ -398,8 +398,8 @@ instance ToJSON MetricDescriptorLabelDescriptor where

398398--

399399-- /See:/ 'pointDistributionUnderflowBucket' smart constructor.

400400data PointDistributionUnderflowBucket = PointDistributionUnderflowBucket

401− { _pdubUpperBound :: !(Maybe (JSONText Double))

402− , _pdubCount :: !(Maybe (JSONText Int64))

401+ { _pdubUpperBound :: !(Maybe (Textual Double))

402+ , _pdubCount :: !(Maybe (Textual Int64))

403403 } deriving (Eq,Show,Data,Typeable,Generic)

404404

405405-- | Creates a value of 'PointDistributionUnderflowBucket' with the minimum fields required to make a request.

@@ -593,9 +593,9 @@ instance ToJSON TimeseriesDescriptorLabels where

593593--

594594-- /See:/ 'pointDistributionBucket' smart constructor.

595595data PointDistributionBucket = PointDistributionBucket

596− { _pdbUpperBound :: !(Maybe (JSONText Double))

597− , _pdbCount :: !(Maybe (JSONText Int64))

598− , _pdbLowerBound :: !(Maybe (JSONText Double))

596+ { _pdbUpperBound :: !(Maybe (Textual Double))

597+ , _pdbCount :: !(Maybe (Textual Int64))

598+ , _pdbLowerBound :: !(Maybe (Textual Double))

599599 } deriving (Eq,Show,Data,Typeable,Generic)

600600

601601-- | Creates a value of 'PointDistributionBucket' with the minimum fields required to make a request.

@@ -805,11 +805,11 @@ instance ToJSON PointDistribution where

805805data Point = Point

806806 { _pBoolValue :: !(Maybe Bool)

807807 , _pStart :: !(Maybe DateTime')

808− , _pDoubleValue :: !(Maybe (JSONText Double))

808+ , _pDoubleValue :: !(Maybe (Textual Double))

809809 , _pStringValue :: !(Maybe Text)

810810 , _pDistributionValue :: !(Maybe PointDistribution)

811811 , _pEnd :: !(Maybe DateTime')

812− , _pInt64Value :: !(Maybe (JSONText Int64))

812+ , _pInt64Value :: !(Maybe (Textual Int64))

813813 } deriving (Eq,Show,Data,Typeable,Generic)

814814

815815-- | Creates a value of 'Point' with the minimum fields required to make a request.

@@ -924,8 +924,8 @@ instance ToJSON Point where

924924--

925925-- /See:/ 'pointDistributionOverflowBucket' smart constructor.

926926data PointDistributionOverflowBucket = PointDistributionOverflowBucket

927− { _pdobCount :: !(Maybe (JSONText Int64))

928− , _pdobLowerBound :: !(Maybe (JSONText Double))

927+ { _pdobCount :: !(Maybe (Textual Int64))

928+ , _pdobLowerBound :: !(Maybe (Textual Double))

929929 } deriving (Eq,Show,Data,Typeable,Generic)

930930

931931-- | Creates a value of 'PointDistributionOverflowBucket' with the minimum fields required to make a request.

gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/List.hs+2−2

@@ -55,7 +55,7 @@ type MetricDescriptorsListResource =

5555 "projects" :>

5656 Capture "project" Text :>

5757 "metricDescriptors" :>

58− QueryParam "count" (JSONText Int32) :>

58+ QueryParam "count" (Textual Int32) :>

5959 QueryParam "query" Text :>

6060 QueryParam "pageToken" Text :>

6161 QueryParam "alt" AltJSON :>

@@ -71,7 +71,7 @@ type MetricDescriptorsListResource =

7171-- /See:/ 'metricDescriptorsList' smart constructor.

7272data MetricDescriptorsList = MetricDescriptorsList

7373 { _mdlProject :: !Text

74− , _mdlCount :: !(JSONText Int32)

74+ , _mdlCount :: !(Textual Int32)

7575 , _mdlPayload :: !ListMetricDescriptorsRequest

7676 , _mdlQuery :: !(Maybe Text)

7777 , _mdlPageToken :: !(Maybe Text)

gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/List.hs+2−2

@@ -64,7 +64,7 @@ type TimeseriesListResource =

6464 Capture "metric" Text :>

6565 QueryParam "youngest" Text :>

6666 QueryParam "window" Text :>

67− QueryParam "count" (JSONText Int32) :>

67+ QueryParam "count" (Textual Int32) :>

6868 QueryParam "aggregator" TimeseriesListAggregator :>

6969 QueryParam "timespan" Text :>

7070 QueryParam "oldest" Text :>

@@ -84,7 +84,7 @@ type TimeseriesListResource =

8484data TimeseriesList = TimeseriesList

8585 { _tlWindow :: !(Maybe Text)

8686 , _tlProject :: !Text

87− , _tlCount :: !(JSONText Int32)

87+ , _tlCount :: !(Textual Int32)

8888 , _tlPayload :: !ListTimeseriesRequest

8989 , _tlAggregator :: !(Maybe TimeseriesListAggregator)

9090 , _tlTimespan :: !(Maybe Text)

gogol-monitoring/gen/Network/Google/Resource/CloudMonitoring/TimeseriesDescriptors/List.hs+2−2

@@ -64,7 +64,7 @@ type TimeseriesDescriptorsListResource =

6464 Capture "metric" Text :>

6565 QueryParam "youngest" Text :>

6666 QueryParam "window" Text :>

67− QueryParam "count" (JSONText Int32) :>

67+ QueryParam "count" (Textual Int32) :>

6868 QueryParam "aggregator"

6969 TimeseriesDescriptorsListAggregator

7070 :>

@@ -89,7 +89,7 @@ type TimeseriesDescriptorsListResource =

8989data TimeseriesDescriptorsList = TimeseriesDescriptorsList

9090 { _tdlWindow :: !(Maybe Text)

9191 , _tdlProject :: !Text

92− , _tdlCount :: !(JSONText Int32)

92+ , _tdlCount :: !(Textual Int32)

9393 , _tdlPayload :: !ListTimeseriesDescriptorsRequest

9494 , _tdlAggregator :: !(Maybe TimeseriesDescriptorsListAggregator)

9595 , _tdlTimespan :: !(Maybe Text)

gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+1−1

@@ -25,7 +25,7 @@ import Network.Google.Prelude

2525data TokenInfo = TokenInfo

2626 { _tiAudience :: !(Maybe Text)

2727 , _tiEmail :: !(Maybe Text)

28− , _tiExpiresIn :: !(Maybe (JSONText Int32))

28+ , _tiExpiresIn :: !(Maybe (Textual Int32))

2929 , _tiAccessType :: !(Maybe Text)

3030 , _tiScope :: !(Maybe Text)

3131 , _tiVerifiedEmail :: !(Maybe Bool)

gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+33−33

@@ -80,10 +80,10 @@ instance ToJSON

8080--

8181-- /See:/ 'pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem' smart constructor.

8282data PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem = PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem

83− { _pafsvaisiHeight :: !(Maybe (JSONText Int32))

84− , _pafsvaisiLeft :: !(Maybe (JSONText Int32))

85− , _pafsvaisiWidth :: !(Maybe (JSONText Int32))

86− , _pafsvaisiTop :: !(Maybe (JSONText Int32))

83+ { _pafsvaisiHeight :: !(Maybe (Textual Int32))

84+ , _pafsvaisiLeft :: !(Maybe (Textual Int32))

85+ , _pafsvaisiWidth :: !(Maybe (Textual Int32))

86+ , _pafsvaisiTop :: !(Maybe (Textual Int32))

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

8989-- | Creates a value of 'PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem' with the minimum fields required to make a request.

@@ -162,10 +162,10 @@ instance ToJSON

162162--

163163-- /See:/ 'pagespeedAPIImageV2' smart constructor.

164164data PagespeedAPIImageV2 = PagespeedAPIImageV2

165− { _paivHeight :: !(Maybe (JSONText Int32))

166− , _paivData :: !(Maybe (JSONText Word8))

165+ { _paivHeight :: !(Maybe (Textual Int32))

166+ , _paivData :: !(Maybe (Textual Word8))

167167 , _paivMimeType :: !(Maybe Text)

168− , _paivWidth :: !(Maybe (JSONText Int32))

168+ , _paivWidth :: !(Maybe (Textual Int32))

169169 , _paivPageRect :: !(Maybe PagespeedAPIImageV2Page_rect)

170170 , _paivKey :: !(Maybe Text)

171171 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -255,10 +255,10 @@ instance ToJSON PagespeedAPIImageV2 where

255255--

256256-- /See:/ 'pagespeedAPIFormatStringV2ArgsItemRectsItem' smart constructor.

257257data PagespeedAPIFormatStringV2ArgsItemRectsItem = PagespeedAPIFormatStringV2ArgsItemRectsItem

258− { _pafsvairiHeight :: !(Maybe (JSONText Int32))

259− , _pafsvairiLeft :: !(Maybe (JSONText Int32))

260− , _pafsvairiWidth :: !(Maybe (JSONText Int32))

261− , _pafsvairiTop :: !(Maybe (JSONText Int32))

258+ { _pafsvairiHeight :: !(Maybe (Textual Int32))

259+ , _pafsvairiLeft :: !(Maybe (Textual Int32))

260+ , _pafsvairiWidth :: !(Maybe (Textual Int32))

261+ , _pafsvairiTop :: !(Maybe (Textual Int32))

262262 } deriving (Eq,Show,Data,Typeable,Generic)

263263

264264-- | Creates a value of 'PagespeedAPIFormatStringV2ArgsItemRectsItem' with the minimum fields required to make a request.

@@ -335,8 +335,8 @@ instance ToJSON

335335--

336336-- /See:/ 'resultVersion' smart constructor.

337337data ResultVersion = ResultVersion

338− { _rvMinor :: !(Maybe (JSONText Int32))

339− , _rvMajor :: !(Maybe (JSONText Int32))

338+ { _rvMinor :: !(Maybe (Textual Int32))

339+ , _rvMajor :: !(Maybe (Textual Int32))

340340 } deriving (Eq,Show,Data,Typeable,Generic)

341341

342342-- | Creates a value of 'ResultVersion' with the minimum fields required to make a request.

@@ -385,19 +385,19 @@ instance ToJSON ResultVersion where

385385--

386386-- /See:/ 'resultPageStats' smart constructor.

387387data ResultPageStats = ResultPageStats

388− { _rpsHTMLResponseBytes :: !(Maybe (JSONText Int64))

389− , _rpsTotalRequestBytes :: !(Maybe (JSONText Int64))

390− , _rpsNumberResources :: !(Maybe (JSONText Int32))

391− , _rpsNumberStaticResources :: !(Maybe (JSONText Int32))

392− , _rpsNumberHosts :: !(Maybe (JSONText Int32))

393− , _rpsNumberJsResources :: !(Maybe (JSONText Int32))

394− , _rpsNumberCssResources :: !(Maybe (JSONText Int32))

395− , _rpsTextResponseBytes :: !(Maybe (JSONText Int64))

396− , _rpsFlashResponseBytes :: !(Maybe (JSONText Int64))

397− , _rpsImageResponseBytes :: !(Maybe (JSONText Int64))

398− , _rpsOtherResponseBytes :: !(Maybe (JSONText Int64))

399− , _rpsJavascriptResponseBytes :: !(Maybe (JSONText Int64))

400− , _rpsCssResponseBytes :: !(Maybe (JSONText Int64))

388+ { _rpsHTMLResponseBytes :: !(Maybe (Textual Int64))

389+ , _rpsTotalRequestBytes :: !(Maybe (Textual Int64))

390+ , _rpsNumberResources :: !(Maybe (Textual Int32))

391+ , _rpsNumberStaticResources :: !(Maybe (Textual Int32))

392+ , _rpsNumberHosts :: !(Maybe (Textual Int32))

393+ , _rpsNumberJsResources :: !(Maybe (Textual Int32))

394+ , _rpsNumberCssResources :: !(Maybe (Textual Int32))

395+ , _rpsTextResponseBytes :: !(Maybe (Textual Int64))

396+ , _rpsFlashResponseBytes :: !(Maybe (Textual Int64))

397+ , _rpsImageResponseBytes :: !(Maybe (Textual Int64))

398+ , _rpsOtherResponseBytes :: !(Maybe (Textual Int64))

399+ , _rpsJavascriptResponseBytes :: !(Maybe (Textual Int64))

400+ , _rpsCssResponseBytes :: !(Maybe (Textual Int64))

401401 } deriving (Eq,Show,Data,Typeable,Generic)

402402

403403-- | Creates a value of 'ResultPageStats' with the minimum fields required to make a request.

@@ -586,10 +586,10 @@ instance ToJSON ResultPageStats where

586586--

587587-- /See:/ 'pagespeedAPIImageV2Page_rect' smart constructor.

588588data PagespeedAPIImageV2Page_rect = PagespeedAPIImageV2Page_rect

589− { _paivpHeight :: !(Maybe (JSONText Int32))

590− , _paivpLeft :: !(Maybe (JSONText Int32))

591− , _paivpWidth :: !(Maybe (JSONText Int32))

592− , _paivpTop :: !(Maybe (JSONText Int32))

589+ { _paivpHeight :: !(Maybe (Textual Int32))

590+ , _paivpLeft :: !(Maybe (Textual Int32))

591+ , _paivpWidth :: !(Maybe (Textual Int32))

592+ , _paivpTop :: !(Maybe (Textual Int32))

593593 } deriving (Eq,Show,Data,Typeable,Generic)

594594

595595-- | Creates a value of 'PagespeedAPIImageV2Page_rect' with the minimum fields required to make a request.

@@ -660,7 +660,7 @@ instance ToJSON PagespeedAPIImageV2Page_rect where

660660data Result = Result

661661 { _rScreenshot :: !(Maybe PagespeedAPIImageV2)

662662 , _rKind :: !Text

663− , _rResponseCode :: !(Maybe (JSONText Int32))

663+ , _rResponseCode :: !(Maybe (Textual Int32))

664664 , _rInvalidRules :: !(Maybe [Text])

665665 , _rFormattedResults :: !(Maybe ResultFormattedResults)

666666 , _rVersion :: !(Maybe ResultVersion)

@@ -891,7 +891,7 @@ instance ToJSON PagespeedAPIFormatStringV2ArgsItem

891891--

892892-- /See:/ 'resultRuleGroupsAdditional' smart constructor.

893893newtype ResultRuleGroupsAdditional = ResultRuleGroupsAdditional

894− { _rrgaScore :: Maybe (JSONText Int32)

894+ { _rrgaScore :: Maybe (Textual Int32)

895895 } deriving (Eq,Show,Data,Typeable,Generic)

896896

897897-- | Creates a value of 'ResultRuleGroupsAdditional' with the minimum fields required to make a request.

@@ -981,7 +981,7 @@ instance ToJSON ResultFormattedResults where

981981-- /See:/ 'resultFormattedResultsRuleResultsAdditional' smart constructor.

982982data ResultFormattedResultsRuleResultsAdditional = ResultFormattedResultsRuleResultsAdditional

983983 { _rfrrraSummary :: !(Maybe PagespeedAPIFormatStringV2)

984− , _rfrrraRuleImpact :: !(Maybe (JSONText Double))

984+ , _rfrrraRuleImpact :: !(Maybe (Textual Double))

985985 , _rfrrraGroups :: !(Maybe [Text])

986986 , _rfrrraLocalizedRuleName :: !(Maybe Text)

987987 , _rfrrraURLBlocks :: !(Maybe [ResultFormattedResultsRuleResultsAdditionalURLBlocksItem])

gogol-partners/gen/Network/Google/Partners/Types/Product.hs+6−6

@@ -46,8 +46,8 @@ import Network.Google.Prelude

4646--

4747-- /See:/ 'latLng' smart constructor.

4848data LatLng = LatLng

49− { _llLatitude :: !(Maybe (JSONText Double))

50− , _llLongitude :: !(Maybe (JSONText Double))

49+ { _llLatitude :: !(Maybe (Textual Double))

50+ , _llLongitude :: !(Maybe (Textual Double))

5151 } deriving (Eq,Show,Data,Typeable,Generic)

5252

5353-- | Creates a value of 'LatLng' with the minimum fields required to make a request.

@@ -519,7 +519,7 @@ instance ToJSON PublicProFile where

519519--

520520-- /See:/ 'certificationExamStatus' smart constructor.

521521data CertificationExamStatus = CertificationExamStatus

522− { _cesNumberUsersPass :: !(Maybe (JSONText Int32))

522+ { _cesNumberUsersPass :: !(Maybe (Textual Int32))

523523 , _cesType :: !(Maybe Text)

524524 } deriving (Eq,Show,Data,Typeable,Generic)

525525

@@ -664,8 +664,8 @@ instance ToJSON TrafficSource where

664664-- /See:/ 'money' smart constructor.

665665data Money = Money

666666 { _mCurrencyCode :: !(Maybe Text)

667− , _mNanos :: !(Maybe (JSONText Int32))

668− , _mUnits :: !(Maybe (JSONText Int64))

667+ , _mNanos :: !(Maybe (Textual Int32))

668+ , _mUnits :: !(Maybe (Textual Int64))

669669 } deriving (Eq,Show,Data,Typeable,Generic)

670670

671671-- | Creates a value of 'Money' with the minimum fields required to make a request.

@@ -1660,7 +1660,7 @@ instance ToJSON LogUserEventRequest where

16601660--

16611661-- /See:/ 'rank' smart constructor.

16621662data Rank = Rank

1663− { _rValue :: !(Maybe (JSONText Double))

1663+ { _rValue :: !(Maybe (Textual Double))

16641664 , _rType :: !(Maybe Text)

16651665 } deriving (Eq,Show,Data,Typeable,Generic)

16661666

gogol-partners/gen/Network/Google/Resource/Partners/Companies/List.hs+10−11

@@ -76,7 +76,7 @@ type CompaniesListResource =

7676 "companies" :>

7777 QueryParams "languageCodes" Text :>

7878 QueryParam "$.xgafv" Text :>

79− QueryParam "maxMonthlyBudget.units" (JSONText Int64)

79+ QueryParam "maxMonthlyBudget.units" (Textual Int64)

8080 :>

8181 QueryParam "upload_protocol" Text :>

8282 QueryParam "orderBy" Text :>

@@ -85,8 +85,7 @@ type CompaniesListResource =

8585 QueryParam "access_token" Text :>

8686 QueryParam "uploadType" Text :>

8787 QueryParam "address" Text :>

88− QueryParam "minMonthlyBudget.nanos"

89− (JSONText Int32)

88+ QueryParam "minMonthlyBudget.nanos" (Textual Int32)

9089 :>

9190 QueryParams "industries" Text :>

9291 QueryParam "requestMetadata.partnersSessionId"

@@ -94,7 +93,7 @@ type CompaniesListResource =

9493 :>

9594 QueryParam "bearer_token" Text :>

9695 QueryParam "maxMonthlyBudget.nanos"

97− (JSONText Int32)

96+ (Textual Int32)

9897 :>

9998 QueryParam "requestMetadata.locale" Text

10099 :>

@@ -123,7 +122,7 @@ type CompaniesListResource =

123122 Text

124123 :>

125124 QueryParam "pageSize"

126− (JSONText Int32)

125+ (Textual Int32)

127126 :>

128127 QueryParam

129128 "minMonthlyBudget.currencyCode"

@@ -139,7 +138,7 @@ type CompaniesListResource =

139138 :>

140139 QueryParam

141140 "minMonthlyBudget.units"

142− (JSONText

141+ (Textual

143142 Int64)

144143 :>

145144 QueryParam

@@ -164,7 +163,7 @@ type CompaniesListResource =

164163data CompaniesList = CompaniesList

165164 { _clLanguageCodes :: !(Maybe [Text])

166165 , _clXgafv :: !(Maybe Text)

167− , _clMaxMonthlyBudgetUnits :: !(Maybe (JSONText Int64))

166+ , _clMaxMonthlyBudgetUnits :: !(Maybe (Textual Int64))

168167 , _clUploadProtocol :: !(Maybe Text)

169168 , _clOrderBy :: !(Maybe Text)

170169 , _clPp :: !Bool

@@ -172,11 +171,11 @@ data CompaniesList = CompaniesList

172171 , _clAccessToken :: !(Maybe Text)

173172 , _clUploadType :: !(Maybe Text)

174173 , _clAddress :: !(Maybe Text)

175− , _clMinMonthlyBudgetNanos :: !(Maybe (JSONText Int32))

174+ , _clMinMonthlyBudgetNanos :: !(Maybe (Textual Int32))

176175 , _clIndustries :: !(Maybe [Text])

177176 , _clRequestMetadataPartnersSessionId :: !(Maybe Text)

178177 , _clBearerToken :: !(Maybe Text)

179− , _clMaxMonthlyBudgetNanos :: !(Maybe (JSONText Int32))

178+ , _clMaxMonthlyBudgetNanos :: !(Maybe (Textual Int32))

180179 , _clRequestMetadataLocale :: !(Maybe Text)

181180 , _clView :: !(Maybe Text)

182181 , _clRequestMetadataExperimentIds :: !(Maybe [Text])

@@ -186,11 +185,11 @@ data CompaniesList = CompaniesList

186185 , _clPageToken :: !(Maybe Text)

187186 , _clRequestMetadataTrafficSourceTrafficSubId :: !(Maybe Text)

188187 , _clGpsMotivations :: !(Maybe [Text])

189− , _clPageSize :: !(Maybe (JSONText Int32))

188+ , _clPageSize :: !(Maybe (Textual Int32))

190189 , _clMinMonthlyBudgetCurrencyCode :: !(Maybe Text)

191190 , _clServices :: !(Maybe [Text])

192191 , _clRequestMetadataUserOverridesUserId :: !(Maybe Text)

193− , _clMinMonthlyBudgetUnits :: !(Maybe (JSONText Int64))

192+ , _clMinMonthlyBudgetUnits :: !(Maybe (Textual Int64))

194193 , _clRequestMetadataTrafficSourceTrafficSourceId :: !(Maybe Text)

195194 , _clCallback :: !(Maybe Text)

196195 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Product.hs+2−2

@@ -671,7 +671,7 @@ data Order = Order

671671 , _oEarliestAvailStartTime :: !(Maybe Text)

672672 , _oStudioName :: !(Maybe Text)

673673 , _oReceivedTime :: !(Maybe Text)

674− , _oPriority :: !(Maybe (JSONText Double))

674+ , _oPriority :: !(Maybe (Textual Double))

675675 , _oChannelId :: !(Maybe Text)

676676 , _oCustomId :: !(Maybe Text)

677677 , _oApprovedTime :: !(Maybe Text)

@@ -974,7 +974,7 @@ data ExperienceLocale = ExperienceLocale

974974 , _elInventoryId :: !(Maybe Text)

975975 , _elEarliestAvailStartTime :: !(Maybe Text)

976976 , _elStudioName :: !(Maybe Text)

977− , _elPriority :: !(Maybe (JSONText Double))

977+ , _elPriority :: !(Maybe (Textual Double))

978978 , _elCustomIds :: !(Maybe [Text])

979979 , _elCreatedTime :: !(Maybe Text)

980980 , _elCountry :: !(Maybe Text)

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Avails/List.hs+2−2

@@ -76,7 +76,7 @@ type AccountsAvailsListResource =

7676 QueryParam "bearer_token" Text :>

7777 QueryParam "pageToken" Text :>

7878 QueryParam "title" Text :>

79− QueryParam "pageSize" (JSONText Int32) :>

79+ QueryParam "pageSize" (Textual Int32) :>

8080 QueryParam "callback" Text :>

8181 QueryParam "alt" AltJSON :>

8282 Get '[JSON] ListAvailsResponse

@@ -101,7 +101,7 @@ data AccountsAvailsList = AccountsAvailsList

101101 , _aalBearerToken :: !(Maybe Text)

102102 , _aalPageToken :: !(Maybe Text)

103103 , _aalTitle :: !(Maybe Text)

104− , _aalPageSize :: !(Maybe (JSONText Int32))

104+ , _aalPageSize :: !(Maybe (Textual Int32))

105105 , _aalCallback :: !(Maybe Text)

106106 } deriving (Eq,Show,Data,Typeable,Generic)

107107

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/List.hs+2−2

@@ -78,7 +78,7 @@ type AccountsExperienceLocalesListResource =

7878 QueryParam "bearer_token" Text :>

7979 QueryParam "editLevelEidr" Text :>

8080 QueryParam "pageToken" Text :>

81− QueryParam "pageSize" (JSONText Int32)

81+ QueryParam "pageSize" (Textual Int32)

8282 :>

8383 QueryParam "callback" Text :>

8484 QueryParam "alt" AltJSON :>

@@ -106,7 +106,7 @@ data AccountsExperienceLocalesList = AccountsExperienceLocalesList

106106 , _aellBearerToken :: !(Maybe Text)

107107 , _aellEditLevelEidr :: !(Maybe Text)

108108 , _aellPageToken :: !(Maybe Text)

109− , _aellPageSize :: !(Maybe (JSONText Int32))

109+ , _aellPageSize :: !(Maybe (Textual Int32))

110110 , _aellCallback :: !(Maybe Text)

111111 } deriving (Eq,Show,Data,Typeable,Generic)

112112

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/List.hs+2−2

@@ -74,7 +74,7 @@ type AccountsOrdersListResource =

7474 QueryParam "bearer_token" Text :>

7575 QueryParam "name" Text :>

7676 QueryParam "pageToken" Text :>

77− QueryParam "pageSize" (JSONText Int32) :>

77+ QueryParam "pageSize" (Textual Int32) :>

7878 QueryParam "callback" Text :>

7979 QueryParam "alt" AltJSON :>

8080 Get '[JSON] ListOrdersResponse

@@ -98,7 +98,7 @@ data AccountsOrdersList = AccountsOrdersList

9898 , _aolBearerToken :: !(Maybe Text)

9999 , _aolName :: !(Maybe Text)

100100 , _aolPageToken :: !(Maybe Text)

101− , _aolPageSize :: !(Maybe (JSONText Int32))

101+ , _aolPageSize :: !(Maybe (Textual Int32))

102102 , _aolCallback :: !(Maybe Text)

103103 } deriving (Eq,Show,Data,Typeable,Generic)

104104

gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/List.hs+2−2

@@ -76,7 +76,7 @@ type AccountsStoreInfosListResource =

7676 QueryParam "bearer_token" Text :>

7777 QueryParam "name" Text :>

7878 QueryParam "pageToken" Text :>

79− QueryParam "pageSize" (JSONText Int32) :>

79+ QueryParam "pageSize" (Textual Int32) :>

8080 QueryParam "callback" Text :>

8181 QueryParam "alt" AltJSON :>

8282 Get '[JSON] ListStoreInfosResponse

@@ -101,7 +101,7 @@ data AccountsStoreInfosList = AccountsStoreInfosList

101101 , _asilBearerToken :: !(Maybe Text)

102102 , _asilName :: !(Maybe Text)

103103 , _asilPageToken :: !(Maybe Text)

104− , _asilPageSize :: !(Maybe (JSONText Int32))

104+ , _asilPageSize :: !(Maybe (Textual Int32))

105105 , _asilCallback :: !(Maybe Text)

106106 } deriving (Eq,Show,Data,Typeable,Generic)

107107

gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+29−29

@@ -27,7 +27,7 @@ data Audience = Audience

2727 , _aKind :: !Text

2828 , _aVisibility :: !(Maybe Text)

2929 , _aItem :: !(Maybe PlusDomainsACLentryResource)

30− , _aMemberCount :: !(Maybe (JSONText Word32))

30+ , _aMemberCount :: !(Maybe (Textual Word32))

3131 } deriving (Eq,Show,Data,Typeable,Generic)

3232

3333-- | Creates a value of 'Audience' with the minimum fields required to make a request.

@@ -185,7 +185,7 @@ instance ToJSON ActivityObjectAttachmentsItemEmbed

185185--

186186-- /See:/ 'commentPlusoners' smart constructor.

187187newtype CommentPlusoners = CommentPlusoners

188− { _cpTotalItems :: Maybe (JSONText Word32)

188+ { _cpTotalItems :: Maybe (Textual Word32)

189189 } deriving (Eq,Show,Data,Typeable,Generic)

190190

191191-- | Creates a value of 'CommentPlusoners' with the minimum fields required to make a request.

@@ -305,7 +305,7 @@ instance ToJSON

305305--

306306-- /See:/ 'activityObjectPlusoners' smart constructor.

307307data ActivityObjectPlusoners = ActivityObjectPlusoners

308− { _aopTotalItems :: !(Maybe (JSONText Word32))

308+ { _aopTotalItems :: !(Maybe (Textual Word32))

309309 , _aopSelfLink :: !(Maybe Text)

310310 } deriving (Eq,Show,Data,Typeable,Generic)

311311

@@ -435,9 +435,9 @@ instance ToJSON CommentActorImage where

435435--

436436-- /See:/ 'activityObjectAttachmentsItemThumbnailsItemImage' smart constructor.

437437data ActivityObjectAttachmentsItemThumbnailsItemImage = ActivityObjectAttachmentsItemThumbnailsItemImage

438− { _aoaitiiHeight :: !(Maybe (JSONText Word32))

438+ { _aoaitiiHeight :: !(Maybe (Textual Word32))

439439 , _aoaitiiURL :: !(Maybe Text)

440− , _aoaitiiWidth :: !(Maybe (JSONText Word32))

440+ , _aoaitiiWidth :: !(Maybe (Textual Word32))

441441 , _aoaitiiType :: !(Maybe Text)

442442 } deriving (Eq,Show,Data,Typeable,Generic)

443443

@@ -513,8 +513,8 @@ instance ToJSON

513513--

514514-- /See:/ 'placePosition' smart constructor.

515515data PlacePosition = PlacePosition

516− { _ppLatitude :: !(Maybe (JSONText Double))

517− , _ppLongitude :: !(Maybe (JSONText Double))

516+ { _ppLatitude :: !(Maybe (Textual Double))

517+ , _ppLongitude :: !(Maybe (Textual Double))

518518 } deriving (Eq,Show,Data,Typeable,Generic)

519519

520520-- | Creates a value of 'PlacePosition' with the minimum fields required to make a request.

@@ -751,7 +751,7 @@ data Person = Person

751751 , _pImage :: !(Maybe PersonImage)

752752 , _pBraggingRights :: !(Maybe Text)

753753 , _pPlacesLived :: !(Maybe [PersonPlacesLivedItem])

754− , _pPlusOneCount :: !(Maybe (JSONText Int32))

754+ , _pPlusOneCount :: !(Maybe (Textual Int32))

755755 , _pObjectType :: !(Maybe Text)

756756 , _pCover :: !(Maybe PersonCover)

757757 , _pKind :: !Text

@@ -773,7 +773,7 @@ data Person = Person

773773 , _pId :: !(Maybe Text)

774774 , _pNickname :: !(Maybe Text)

775775 , _pOrganizations :: !(Maybe [PersonOrganizationsItem])

776− , _pCircledByCount :: !(Maybe (JSONText Int32))

776+ , _pCircledByCount :: !(Maybe (Textual Int32))

777777 } deriving (Eq,Show,Data,Typeable,Generic)

778778

779779-- | Creates a value of 'Person' with the minimum fields required to make a request.

@@ -1094,9 +1094,9 @@ instance ToJSON Person where

10941094--

10951095-- /See:/ 'videostream' smart constructor.

10961096data Videostream = Videostream

1097− { _vHeight :: !(Maybe (JSONText Int32))

1097+ { _vHeight :: !(Maybe (Textual Int32))

10981098 , _vURL :: !(Maybe Text)

1099− , _vWidth :: !(Maybe (JSONText Int32))

1099+ , _vWidth :: !(Maybe (Textual Int32))

11001100 , _vType :: !(Maybe Text)

11011101 } deriving (Eq,Show,Data,Typeable,Generic)

11021102

@@ -1160,7 +1160,7 @@ instance ToJSON Videostream where

11601160--

11611161-- /See:/ 'circleFeed' smart constructor.

11621162data CircleFeed = CircleFeed

1163− { _cfTotalItems :: !(Maybe (JSONText Int32))

1163+ { _cfTotalItems :: !(Maybe (Textual Int32))

11641164 , _cfEtag :: !(Maybe Text)

11651165 , _cfNextPageToken :: !(Maybe Text)

11661166 , _cfNextLink :: !(Maybe Text)

@@ -1276,9 +1276,9 @@ instance ToJSON CircleFeed where

12761276--

12771277-- /See:/ 'activityObjectAttachmentsItemImage' smart constructor.

12781278data ActivityObjectAttachmentsItemImage = ActivityObjectAttachmentsItemImage

1279− { _aoaiiHeight :: !(Maybe (JSONText Word32))

1279+ { _aoaiiHeight :: !(Maybe (Textual Word32))

12801280 , _aoaiiURL :: !(Maybe Text)

1281− , _aoaiiWidth :: !(Maybe (JSONText Word32))

1281+ , _aoaiiWidth :: !(Maybe (Textual Word32))

12821282 , _aoaiiType :: !(Maybe Text)

12831283 } deriving (Eq,Show,Data,Typeable,Generic)

12841284

@@ -1686,9 +1686,9 @@ instance ToJSON ActivityObjectActor where

16861686--

16871687-- /See:/ 'activityObjectAttachmentsItemFullImage' smart constructor.

16881688data ActivityObjectAttachmentsItemFullImage = ActivityObjectAttachmentsItemFullImage

1689− { _aoaifiHeight :: !(Maybe (JSONText Word32))

1689+ { _aoaifiHeight :: !(Maybe (Textual Word32))

16901690 , _aoaifiURL :: !(Maybe Text)

1691− , _aoaifiWidth :: !(Maybe (JSONText Word32))

1691+ , _aoaifiWidth :: !(Maybe (Textual Word32))

16921692 , _aoaifiType :: !(Maybe Text)

16931693 } deriving (Eq,Show,Data,Typeable,Generic)

16941694

@@ -1793,7 +1793,7 @@ instance ToJSON MediaAuthorImage where

17931793--

17941794-- /See:/ 'circlePeople' smart constructor.

17951795newtype CirclePeople = CirclePeople

1796− { _cTotalItems :: Maybe (JSONText Word32)

1796+ { _cTotalItems :: Maybe (Textual Word32)

17971797 } deriving (Eq,Show,Data,Typeable,Generic)

17981798

17991799-- | Creates a value of 'CirclePeople' with the minimum fields required to make a request.

@@ -1923,7 +1923,7 @@ instance ToJSON ActivityActorImage where

19231923--

19241924-- /See:/ 'peopleFeed' smart constructor.

19251925data PeopleFeed = PeopleFeed

1926− { _pfTotalItems :: !(Maybe (JSONText Int32))

1926+ { _pfTotalItems :: !(Maybe (Textual Int32))

19271927 , _pfEtag :: !(Maybe Text)

19281928 , _pfNextPageToken :: !(Maybe Text)

19291929 , _pfKind :: !Text

@@ -2031,9 +2031,9 @@ instance ToJSON PeopleFeed where

20312031--

20322032-- /See:/ 'personCoverCoverPhoto' smart constructor.

20332033data PersonCoverCoverPhoto = PersonCoverCoverPhoto

2034− { _pccpHeight :: !(Maybe (JSONText Int32))

2034+ { _pccpHeight :: !(Maybe (Textual Int32))

20352035 , _pccpURL :: !(Maybe Text)

2036− , _pccpWidth :: !(Maybe (JSONText Int32))

2036+ , _pccpWidth :: !(Maybe (Textual Int32))

20372037 } deriving (Eq,Show,Data,Typeable,Generic)

20382038

20392039-- | Creates a value of 'PersonCoverCoverPhoto' with the minimum fields required to make a request.

@@ -2231,16 +2231,16 @@ instance ToJSON

22312231--

22322232-- /See:/ 'media' smart constructor.

22332233data Media = Media

2234− { _mSizeBytes :: !(Maybe (JSONText Int64))

2234+ { _mSizeBytes :: !(Maybe (Textual Int64))

22352235 , _mSummary :: !(Maybe Text)

22362236 , _mEtag :: !(Maybe Text)

2237− , _mHeight :: !(Maybe (JSONText Word32))

2238− , _mVideoDuration :: !(Maybe (JSONText Int64))

2237+ , _mHeight :: !(Maybe (Textual Word32))

2238+ , _mVideoDuration :: !(Maybe (Textual Int64))

22392239 , _mVideoStatus :: !(Maybe Text)

22402240 , _mKind :: !Text

22412241 , _mPublished :: !(Maybe DateTime')

22422242 , _mURL :: !(Maybe Text)

2243− , _mWidth :: !(Maybe (JSONText Word32))

2243+ , _mWidth :: !(Maybe (Textual Word32))

22442244 , _mMediaURL :: !(Maybe Text)

22452245 , _mStreams :: !(Maybe [Videostream])

22462246 , _mExif :: !(Maybe MediaExif)

@@ -2464,7 +2464,7 @@ instance ToJSON Media where

24642464--

24652465-- /See:/ 'activityObjectReplies' smart constructor.

24662466data ActivityObjectReplies = ActivityObjectReplies

2467− { _aorTotalItems :: !(Maybe (JSONText Word32))

2467+ { _aorTotalItems :: !(Maybe (Textual Word32))

24682468 , _aorSelfLink :: !(Maybe Text)

24692469 } deriving (Eq,Show,Data,Typeable,Generic)

24702470

@@ -3489,7 +3489,7 @@ instance ToJSON PlaceAddress where

34893489--

34903490-- /See:/ 'audiencesFeed' smart constructor.

34913491data AudiencesFeed = AudiencesFeed

3492− { _audTotalItems :: !(Maybe (JSONText Int32))

3492+ { _audTotalItems :: !(Maybe (Textual Int32))

34933493 , _audEtag :: !(Maybe Text)

34943494 , _audNextPageToken :: !(Maybe Text)

34953495 , _audKind :: !Text

@@ -3921,8 +3921,8 @@ instance ToJSON PersonURLsItem where

39213921--

39223922-- /See:/ 'personCoverCoverInfo' smart constructor.

39233923data PersonCoverCoverInfo = PersonCoverCoverInfo

3924− { _pcciTopImageOffSet :: !(Maybe (JSONText Int32))

3925− , _pcciLeftImageOffSet :: !(Maybe (JSONText Int32))

3924+ { _pcciTopImageOffSet :: !(Maybe (Textual Int32))

3925+ , _pcciLeftImageOffSet :: !(Maybe (Textual Int32))

39263926 } deriving (Eq,Show,Data,Typeable,Generic)

39273927

39283928-- | Creates a value of 'PersonCoverCoverInfo' with the minimum fields required to make a request.

@@ -3975,7 +3975,7 @@ instance ToJSON PersonCoverCoverInfo where

39753975--

39763976-- /See:/ 'activityObjectResharers' smart constructor.

39773977data ActivityObjectResharers = ActivityObjectResharers

3978− { _aTotalItems :: !(Maybe (JSONText Word32))

3978+ { _aTotalItems :: !(Maybe (Textual Word32))

39793979 , _aSelfLink :: !(Maybe Text)

39803980 } deriving (Eq,Show,Data,Typeable,Generic)

39813981

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/List.hs+2−2

@@ -53,7 +53,7 @@ type ActivitiesListResource =

5353 "activities" :>

5454 Capture "collection" ActivitiesListCollection :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] ActivityFeed

5858

5959-- | List all of the activities in the specified collection for a particular

@@ -64,7 +64,7 @@ data ActivitiesList = ActivitiesList

6464 { _alCollection :: !ActivitiesListCollection

6565 , _alUserId :: !Text

6666 , _alPageToken :: !(Maybe Text)

67− , _alMaxResults :: !(JSONText Word32)

67+ , _alMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'ActivitiesList' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Audiences/List.hs+2−2

@@ -50,7 +50,7 @@ type AudiencesListResource =

5050 Capture "userId" Text :>

5151 "audiences" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] AudiencesFeed

5555

5656-- | List all of the audiences to which a user can share.

@@ -59,7 +59,7 @@ type AudiencesListResource =

5959data AudiencesList = AudiencesList

6060 { _aUserId :: !Text

6161 , _aPageToken :: !(Maybe Text)

62− , _aMaxResults :: !(JSONText Word32)

62+ , _aMaxResults :: !(Textual Word32)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'AudiencesList' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/List.hs+2−2

@@ -50,7 +50,7 @@ type CirclesListResource =

5050 Capture "userId" Text :>

5151 "circles" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] CircleFeed

5555

5656-- | List all of the circles for a user.

@@ -59,7 +59,7 @@ type CirclesListResource =

5959data CirclesList = CirclesList

6060 { _cUserId :: !Text

6161 , _cPageToken :: !(Maybe Text)

62− , _cMaxResults :: !(JSONText Word32)

62+ , _cMaxResults :: !(Textual Word32)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'CirclesList' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/List.hs+2−2

@@ -52,7 +52,7 @@ type CommentsListResource =

5252 "comments" :>

5353 QueryParam "sortOrder" CommentsListSortOrder :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Word32) :>

55+ QueryParam "maxResults" (Textual Word32) :>

5656 QueryParam "alt" AltJSON :> Get '[JSON] CommentFeed

5757

5858-- | List all of the comments for an activity.

@@ -62,7 +62,7 @@ data CommentsList = CommentsList

6262 { _clActivityId :: !Text

6363 , _clSortOrder :: !CommentsListSortOrder

6464 , _clPageToken :: !(Maybe Text)

65− , _clMaxResults :: !(JSONText Word32)

65+ , _clMaxResults :: !(Textual Word32)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'CommentsList' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/List.hs+2−2

@@ -54,7 +54,7 @@ type PeopleListResource =

5454 Capture "collection" PeopleListCollection :>

5555 QueryParam "orderBy" PeopleListOrderBy :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5959

6060-- | List all of the people in the specified collection.

@@ -65,7 +65,7 @@ data PeopleList = PeopleList

6565 , _plCollection :: !PeopleListCollection

6666 , _plUserId :: !Text

6767 , _plPageToken :: !(Maybe Text)

68− , _plMaxResults :: !(JSONText Word32)

68+ , _plMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'PeopleList' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByActivity.hs+2−2

@@ -54,7 +54,7 @@ type PeopleListByActivityResource =

5454 Capture "collection" PeopleListByActivityCollection

5555 :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5959

6060-- | List all of the people in the specified collection for a particular

@@ -65,7 +65,7 @@ data PeopleListByActivity = PeopleListByActivity

6565 { _plbaActivityId :: !Text

6666 , _plbaCollection :: !PeopleListByActivityCollection

6767 , _plbaPageToken :: !(Maybe Text)

68− , _plbaMaxResults :: !(JSONText Word32)

68+ , _plbaMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'PeopleListByActivity' with the minimum fields required to make a request.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByCircle.hs+2−2

@@ -50,7 +50,7 @@ type PeopleListByCircleResource =

5050 Capture "circleId" Text :>

5151 "people" :>

5252 QueryParam "pageToken" Text :>

53− QueryParam "maxResults" (JSONText Word32) :>

53+ QueryParam "maxResults" (Textual Word32) :>

5454 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5555

5656-- | List all of the people who are members of a circle.

@@ -59,7 +59,7 @@ type PeopleListByCircleResource =

5959data PeopleListByCircle = PeopleListByCircle

6060 { _plbcCircleId :: !Text

6161 , _plbcPageToken :: !(Maybe Text)

62− , _plbcMaxResults :: !(JSONText Word32)

62+ , _plbcMaxResults :: !(Textual Word32)

6363 } deriving (Eq,Show,Data,Typeable,Generic)

6464

6565-- | Creates a value of 'PeopleListByCircle' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Plus/Types/Product.hs+24−24

@@ -104,7 +104,7 @@ instance ToJSON ActivityObjectAttachmentsItemEmbed

104104--

105105-- /See:/ 'commentPlusoners' smart constructor.

106106newtype CommentPlusoners = CommentPlusoners

107− { _cpTotalItems :: Maybe (JSONText Word32)

107+ { _cpTotalItems :: Maybe (Textual Word32)

108108 } deriving (Eq,Show,Data,Typeable,Generic)

109109

110110-- | Creates a value of 'CommentPlusoners' with the minimum fields required to make a request.

@@ -224,7 +224,7 @@ instance ToJSON

224224--

225225-- /See:/ 'activityObjectPlusoners' smart constructor.

226226data ActivityObjectPlusoners = ActivityObjectPlusoners

227− { _aopTotalItems :: !(Maybe (JSONText Word32))

227+ { _aopTotalItems :: !(Maybe (Textual Word32))

228228 , _aopSelfLink :: !(Maybe Text)

229229 } deriving (Eq,Show,Data,Typeable,Generic)

230230

@@ -354,9 +354,9 @@ instance ToJSON CommentActorImage where

354354--

355355-- /See:/ 'activityObjectAttachmentsItemThumbnailsItemImage' smart constructor.

356356data ActivityObjectAttachmentsItemThumbnailsItemImage = ActivityObjectAttachmentsItemThumbnailsItemImage

357− { _aoaitiiHeight :: !(Maybe (JSONText Word32))

357+ { _aoaitiiHeight :: !(Maybe (Textual Word32))

358358 , _aoaitiiURL :: !(Maybe Text)

359− , _aoaitiiWidth :: !(Maybe (JSONText Word32))

359+ , _aoaitiiWidth :: !(Maybe (Textual Word32))

360360 , _aoaitiiType :: !(Maybe Text)

361361 } deriving (Eq,Show,Data,Typeable,Generic)

362362

@@ -432,8 +432,8 @@ instance ToJSON

432432--

433433-- /See:/ 'placePosition' smart constructor.

434434data PlacePosition = PlacePosition

435− { _ppLatitude :: !(Maybe (JSONText Double))

436− , _ppLongitude :: !(Maybe (JSONText Double))

435+ { _ppLatitude :: !(Maybe (Textual Double))

436+ , _ppLongitude :: !(Maybe (Textual Double))

437437 } deriving (Eq,Show,Data,Typeable,Generic)

438438

439439-- | Creates a value of 'PlacePosition' with the minimum fields required to make a request.

@@ -575,7 +575,7 @@ data Person = Person

575575 , _pImage :: !(Maybe PersonImage)

576576 , _pBraggingRights :: !(Maybe Text)

577577 , _pPlacesLived :: !(Maybe [PersonPlacesLivedItem])

578− , _pPlusOneCount :: !(Maybe (JSONText Int32))

578+ , _pPlusOneCount :: !(Maybe (Textual Int32))

579579 , _pObjectType :: !(Maybe Text)

580580 , _pCover :: !(Maybe PersonCover)

581581 , _pKind :: !Text

@@ -598,7 +598,7 @@ data Person = Person

598598 , _pId :: !(Maybe Text)

599599 , _pNickname :: !(Maybe Text)

600600 , _pOrganizations :: !(Maybe [PersonOrganizationsItem])

601− , _pCircledByCount :: !(Maybe (JSONText Int32))

601+ , _pCircledByCount :: !(Maybe (Textual Int32))

602602 } deriving (Eq,Show,Data,Typeable,Generic)

603603

604604-- | Creates a value of 'Person' with the minimum fields required to make a request.

@@ -942,9 +942,9 @@ instance ToJSON Person where

942942--

943943-- /See:/ 'activityObjectAttachmentsItemImage' smart constructor.

944944data ActivityObjectAttachmentsItemImage = ActivityObjectAttachmentsItemImage

945− { _aoaiiHeight :: !(Maybe (JSONText Word32))

945+ { _aoaiiHeight :: !(Maybe (Textual Word32))

946946 , _aoaiiURL :: !(Maybe Text)

947− , _aoaiiWidth :: !(Maybe (JSONText Word32))

947+ , _aoaiiWidth :: !(Maybe (Textual Word32))

948948 , _aoaiiType :: !(Maybe Text)

949949 } deriving (Eq,Show,Data,Typeable,Generic)

950950

@@ -1441,9 +1441,9 @@ instance ToJSON ActivityObjectActor where

14411441--

14421442-- /See:/ 'activityObjectAttachmentsItemFullImage' smart constructor.

14431443data ActivityObjectAttachmentsItemFullImage = ActivityObjectAttachmentsItemFullImage

1444− { _aoaifiHeight :: !(Maybe (JSONText Word32))

1444+ { _aoaifiHeight :: !(Maybe (Textual Word32))

14451445 , _aoaifiURL :: !(Maybe Text)

1446− , _aoaifiWidth :: !(Maybe (JSONText Word32))

1446+ , _aoaifiWidth :: !(Maybe (Textual Word32))

14471447 , _aoaifiType :: !(Maybe Text)

14481448 } deriving (Eq,Show,Data,Typeable,Generic)

14491449

@@ -1547,7 +1547,7 @@ instance ToJSON ActivityActorImage where

15471547--

15481548-- /See:/ 'peopleFeed' smart constructor.

15491549data PeopleFeed = PeopleFeed

1550− { _pfTotalItems :: !(Maybe (JSONText Int32))

1550+ { _pfTotalItems :: !(Maybe (Textual Int32))

15511551 , _pfEtag :: !(Maybe Text)

15521552 , _pfNextPageToken :: !(Maybe Text)

15531553 , _pfKind :: !Text

@@ -1655,9 +1655,9 @@ instance ToJSON PeopleFeed where

16551655--

16561656-- /See:/ 'personCoverCoverPhoto' smart constructor.

16571657data PersonCoverCoverPhoto = PersonCoverCoverPhoto

1658− { _pccpHeight :: !(Maybe (JSONText Int32))

1658+ { _pccpHeight :: !(Maybe (Textual Int32))

16591659 , _pccpURL :: !(Maybe Text)

1660− , _pccpWidth :: !(Maybe (JSONText Int32))

1660+ , _pccpWidth :: !(Maybe (Textual Int32))

16611661 } deriving (Eq,Show,Data,Typeable,Generic)

16621662

16631663-- | Creates a value of 'PersonCoverCoverPhoto' with the minimum fields required to make a request.

@@ -1716,8 +1716,8 @@ instance ToJSON PersonCoverCoverPhoto where

17161716--

17171717-- /See:/ 'personAgeRange' smart constructor.

17181718data PersonAgeRange = PersonAgeRange

1719− { _parMax :: !(Maybe (JSONText Int32))

1720− , _parMin :: !(Maybe (JSONText Int32))

1719+ { _parMax :: !(Maybe (Textual Int32))

1720+ , _parMin :: !(Maybe (Textual Int32))

17211721 } deriving (Eq,Show,Data,Typeable,Generic)

17221722

17231723-- | Creates a value of 'PersonAgeRange' with the minimum fields required to make a request.

@@ -1843,7 +1843,7 @@ instance ToJSON

18431843--

18441844-- /See:/ 'activityObjectReplies' smart constructor.

18451845data ActivityObjectReplies = ActivityObjectReplies

1846− { _aorTotalItems :: !(Maybe (JSONText Word32))

1846+ { _aorTotalItems :: !(Maybe (Textual Word32))

18471847 , _aorSelfLink :: !(Maybe Text)

18481848 } deriving (Eq,Show,Data,Typeable,Generic)

18491849

@@ -1942,7 +1942,7 @@ data ItemScope = ItemScope

19421942 , _isAttendees :: !(Maybe [ItemScope])

19431943 , _isText :: !(Maybe Text)

19441944 , _isKind :: !Text

1945− , _isLatitude :: !(Maybe (JSONText Double))

1945+ , _isLatitude :: !(Maybe (Textual Double))

19461946 , _isPostalCode :: !(Maybe Text)

19471947 , _isEndDate :: !(Maybe Text)

19481948 , _isAssociatedMedia :: !(Maybe [ItemScope])

@@ -1973,12 +1973,12 @@ data ItemScope = ItemScope

19731973 , _isGeo :: !(Maybe ItemScope)

19741974 , _isId :: !(Maybe Text)

19751975 , _isPerformers :: !(Maybe [ItemScope])

1976− , _isAttendeeCount :: !(Maybe (JSONText Int32))

1976+ , _isAttendeeCount :: !(Maybe (Textual Int32))

19771977 , _isInAlbum :: !(Maybe ItemScope)

19781978 , _isEmbedURL :: !(Maybe Text)

19791979 , _isType :: !(Maybe Text)

19801980 , _isContributor :: !(Maybe [ItemScope])

1981− , _isLongitude :: !(Maybe (JSONText Double))

1981+ , _isLongitude :: !(Maybe (Textual Double))

19821982 , _isDuration :: !(Maybe Text)

19831983 , _isAddressRegion :: !(Maybe Text)

19841984 , _isAudio :: !(Maybe ItemScope)

@@ -3816,8 +3816,8 @@ instance ToJSON PersonURLsItem where

38163816--

38173817-- /See:/ 'personCoverCoverInfo' smart constructor.

38183818data PersonCoverCoverInfo = PersonCoverCoverInfo

3819− { _pcciTopImageOffSet :: !(Maybe (JSONText Int32))

3820− , _pcciLeftImageOffSet :: !(Maybe (JSONText Int32))

3819+ { _pcciTopImageOffSet :: !(Maybe (Textual Int32))

3820+ , _pcciLeftImageOffSet :: !(Maybe (Textual Int32))

38213821 } deriving (Eq,Show,Data,Typeable,Generic)

38223822

38233823-- | Creates a value of 'PersonCoverCoverInfo' with the minimum fields required to make a request.

@@ -3870,7 +3870,7 @@ instance ToJSON PersonCoverCoverInfo where

38703870--

38713871-- /See:/ 'activityObjectResharers' smart constructor.

38723872data ActivityObjectResharers = ActivityObjectResharers

3873− { _aTotalItems :: !(Maybe (JSONText Word32))

3873+ { _aTotalItems :: !(Maybe (Textual Word32))

38743874 , _aSelfLink :: !(Maybe Text)

38753875 } deriving (Eq,Show,Data,Typeable,Generic)

38763876

gogol-plus/gen/Network/Google/Resource/Plus/Activities/List.hs+2−2

@@ -53,7 +53,7 @@ type ActivitiesListResource =

5353 "activities" :>

5454 Capture "collection" ActivitiesListCollection :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] ActivityFeed

5858

5959-- | List all of the activities in the specified collection for a particular

@@ -64,7 +64,7 @@ data ActivitiesList = ActivitiesList

6464 { _alCollection :: !ActivitiesListCollection

6565 , _alUserId :: !Text

6666 , _alPageToken :: !(Maybe Text)

67− , _alMaxResults :: !(JSONText Word32)

67+ , _alMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'ActivitiesList' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Search.hs+2−2

@@ -53,7 +53,7 @@ type ActivitiesSearchResource =

5353 QueryParam "orderBy" ActivitiesSearchOrderBy :>

5454 QueryParam "language" Text :>

5555 QueryParam "pageToken" Text :>

56− QueryParam "maxResults" (JSONText Word32) :>

56+ QueryParam "maxResults" (Textual Word32) :>

5757 QueryParam "alt" AltJSON :> Get '[JSON] ActivityFeed

5858

5959-- | Search public activities.

@@ -64,7 +64,7 @@ data ActivitiesSearch = ActivitiesSearch

6464 , _asQuery :: !Text

6565 , _asLanguage :: !Text

6666 , _asPageToken :: !(Maybe Text)

67− , _asMaxResults :: !(JSONText Word32)

67+ , _asMaxResults :: !(Textual Word32)

6868 } deriving (Eq,Show,Data,Typeable,Generic)

6969

7070-- | Creates a value of 'ActivitiesSearch' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/List.hs+2−2

@@ -52,7 +52,7 @@ type CommentsListResource =

5252 "comments" :>

5353 QueryParam "sortOrder" CommentsListSortOrder :>

5454 QueryParam "pageToken" Text :>

55− QueryParam "maxResults" (JSONText Word32) :>

55+ QueryParam "maxResults" (Textual Word32) :>

5656 QueryParam "alt" AltJSON :> Get '[JSON] CommentFeed

5757

5858-- | List all of the comments for an activity.

@@ -62,7 +62,7 @@ data CommentsList = CommentsList

6262 { _clActivityId :: !Text

6363 , _clSortOrder :: !CommentsListSortOrder

6464 , _clPageToken :: !(Maybe Text)

65− , _clMaxResults :: !(JSONText Word32)

65+ , _clMaxResults :: !(Textual Word32)

6666 } deriving (Eq,Show,Data,Typeable,Generic)

6767

6868-- | Creates a value of 'CommentsList' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/Moments/List.hs+2−2

@@ -56,7 +56,7 @@ type MomentsListResource =

5656 QueryParam "targetUrl" Text :>

5757 QueryParam "pageToken" Text :>

5858 QueryParam "type" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] MomentsFeed

6161

6262-- | List all of the moments for a particular user.

@@ -68,7 +68,7 @@ data MomentsList = MomentsList

6868 , _mlUserId :: !Text

6969 , _mlPageToken :: !(Maybe Text)

7070 , _mlType :: !(Maybe Text)

71− , _mlMaxResults :: !(JSONText Word32)

71+ , _mlMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'MomentsList' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/People/List.hs+2−2

@@ -54,7 +54,7 @@ type PeopleListResource =

5454 Capture "collection" PeopleListCollection :>

5555 QueryParam "orderBy" PeopleListOrderBy :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5959

6060-- | List all of the people in the specified collection.

@@ -65,7 +65,7 @@ data PeopleList = PeopleList

6565 , _plCollection :: !PeopleListCollection

6666 , _plUserId :: !Text

6767 , _plPageToken :: !(Maybe Text)

68− , _plMaxResults :: !(JSONText Word32)

68+ , _plMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'PeopleList' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/People/ListByActivity.hs+2−2

@@ -54,7 +54,7 @@ type PeopleListByActivityResource =

5454 Capture "collection" PeopleListByActivityCollection

5555 :>

5656 QueryParam "pageToken" Text :>

57− QueryParam "maxResults" (JSONText Word32) :>

57+ QueryParam "maxResults" (Textual Word32) :>

5858 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5959

6060-- | List all of the people in the specified collection for a particular

@@ -65,7 +65,7 @@ data PeopleListByActivity = PeopleListByActivity

6565 { _plbaActivityId :: !Text

6666 , _plbaCollection :: !PeopleListByActivityCollection

6767 , _plbaPageToken :: !(Maybe Text)

68− , _plbaMaxResults :: !(JSONText Word32)

68+ , _plbaMaxResults :: !(Textual Word32)

6969 } deriving (Eq,Show,Data,Typeable,Generic)

7070

7171-- | Creates a value of 'PeopleListByActivity' with the minimum fields required to make a request.

gogol-plus/gen/Network/Google/Resource/Plus/People/Search.hs+2−2

@@ -51,7 +51,7 @@ type PeopleSearchResource =

5151 QueryParam "query" Text :>

5252 QueryParam "language" Text :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Word32) :>

54+ QueryParam "maxResults" (Textual Word32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] PeopleFeed

5656

5757-- | Search all public profiles.

@@ -61,7 +61,7 @@ data PeopleSearch = PeopleSearch

6161 { _psQuery :: !Text

6262 , _psLanguage :: !Text

6363 , _psPageToken :: !(Maybe Text)

64− , _psMaxResults :: !(JSONText Word32)

64+ , _psMaxResults :: !(Textual Word32)

6565 } deriving (Eq,Show,Data,Typeable,Generic)

6666

6767-- | Creates a value of 'PeopleSearch' with the minimum fields required to make a request.

gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+10−10

@@ -28,8 +28,8 @@ data Insert2ModelInfo = Insert2ModelInfo

2828 , _imiClassWeightedAccuracy :: !(Maybe Text)

2929 , _imiClassificationAccuracy :: !(Maybe Text)

3030 , _imiMeanSquaredError :: !(Maybe Text)

31− , _imiNumberLabels :: !(Maybe (JSONText Int64))

32− , _imiNumberInstances :: !(Maybe (JSONText Int64))

31+ , _imiNumberLabels :: !(Maybe (Textual Int64))

32+ , _imiNumberInstances :: !(Maybe (Textual Int64))

3333 } deriving (Eq,Show,Data,Typeable,Generic)

3434

3535-- | Creates a value of 'Insert2ModelInfo' with the minimum fields required to make a request.

@@ -363,7 +363,7 @@ instance ToJSON List where

363363--

364364-- /See:/ 'insertUtilityItem' smart constructor.

365365newtype InsertUtilityItem = InsertUtilityItem

366− { _iuiAddtional :: HashMap Text (JSONText Double)

366+ { _iuiAddtional :: HashMap Text (Textual Double)

367367 } deriving (Eq,Show,Data,Typeable,Generic)

368368

369369-- | Creates a value of 'InsertUtilityItem' with the minimum fields required to make a request.

@@ -638,7 +638,7 @@ instance ToJSON InputInput where

638638-- /See:/ 'analyzeDataDescriptionFeaturesItemCategoricalValuesItem' smart constructor.

639639data AnalyzeDataDescriptionFeaturesItemCategoricalValuesItem = AnalyzeDataDescriptionFeaturesItemCategoricalValuesItem

640640 { _addficviValue :: !(Maybe Text)

641− , _addficviCount :: !(Maybe (JSONText Int64))

641+ , _addficviCount :: !(Maybe (Textual Int64))

642642 } deriving (Eq,Show,Data,Typeable,Generic)

643643

644644-- | Creates a value of 'AnalyzeDataDescriptionFeaturesItemCategoricalValuesItem' with the minimum fields required to make a request.

@@ -694,7 +694,7 @@ instance ToJSON

694694-- /See:/ 'analyzeDataDescriptionFeaturesItemNumeric' smart constructor.

695695data AnalyzeDataDescriptionFeaturesItemNumeric = AnalyzeDataDescriptionFeaturesItemNumeric

696696 { _addfinMean :: !(Maybe Text)

697− , _addfinCount :: !(Maybe (JSONText Int64))

697+ , _addfinCount :: !(Maybe (Textual Int64))

698698 , _addfinVariance :: !(Maybe Text)

699699 } deriving (Eq,Show,Data,Typeable,Generic)

700700

@@ -788,7 +788,7 @@ instance ToJSON Input where

788788-- /See:/ 'analyzeDataDescriptionFeaturesItemCategorical' smart constructor.

789789data AnalyzeDataDescriptionFeaturesItemCategorical = AnalyzeDataDescriptionFeaturesItemCategorical

790790 { _addficValues :: !(Maybe [AnalyzeDataDescriptionFeaturesItemCategoricalValuesItem])

791− , _addficCount :: !(Maybe (JSONText Int64))

791+ , _addficCount :: !(Maybe (Textual Int64))

792792 } deriving (Eq,Show,Data,Typeable,Generic)

793793

794794-- | Creates a value of 'AnalyzeDataDescriptionFeaturesItemCategorical' with the minimum fields required to make a request.

@@ -841,7 +841,7 @@ instance ToJSON

841841-- /See:/ 'analyzeDataDescriptionOutputFeatureTextItem' smart constructor.

842842data AnalyzeDataDescriptionOutputFeatureTextItem = AnalyzeDataDescriptionOutputFeatureTextItem

843843 { _addoftiValue :: !(Maybe Text)

844− , _addoftiCount :: !(Maybe (JSONText Int64))

844+ , _addoftiCount :: !(Maybe (Textual Int64))

845845 } deriving (Eq,Show,Data,Typeable,Generic)

846846

847847-- | Creates a value of 'AnalyzeDataDescriptionOutputFeatureTextItem' with the minimum fields required to make a request.

@@ -1165,7 +1165,7 @@ instance ToJSON Output where

11651165-- /See:/ 'analyzeDataDescriptionOutputFeatureNumeric' smart constructor.

11661166data AnalyzeDataDescriptionOutputFeatureNumeric = AnalyzeDataDescriptionOutputFeatureNumeric

11671167 { _addofnMean :: !(Maybe Text)

1168− , _addofnCount :: !(Maybe (JSONText Int64))

1168+ , _addofnCount :: !(Maybe (Textual Int64))

11691169 , _addofnVariance :: !(Maybe Text)

11701170 } deriving (Eq,Show,Data,Typeable,Generic)

11711171

@@ -1378,7 +1378,7 @@ instance ToJSON AnalyzeModelDescription where

13781378--

13791379-- /See:/ 'analyzeDataDescriptionFeaturesItemText' smart constructor.

13801380newtype AnalyzeDataDescriptionFeaturesItemText = AnalyzeDataDescriptionFeaturesItemText

1381− { _addfitCount :: Maybe (JSONText Int64)

1381+ { _addfitCount :: Maybe (Textual Int64)

13821382 } deriving (Eq,Show,Data,Typeable,Generic)

13831383

13841384-- | Creates a value of 'AnalyzeDataDescriptionFeaturesItemText' with the minimum fields required to make a request.

@@ -1461,7 +1461,7 @@ instance ToJSON

14611461data AnalyzeDataDescriptionFeaturesItem = AnalyzeDataDescriptionFeaturesItem

14621462 { _addfiText :: !(Maybe AnalyzeDataDescriptionFeaturesItemText)

14631463 , _addfiNumeric :: !(Maybe AnalyzeDataDescriptionFeaturesItemNumeric)

1464− , _addfiIndex :: !(Maybe (JSONText Int64))

1464+ , _addfiIndex :: !(Maybe (Textual Int64))

14651465 , _addfiCategorical :: !(Maybe AnalyzeDataDescriptionFeaturesItemCategorical)

14661466 } deriving (Eq,Show,Data,Typeable,Generic)

14671467

gogol-prediction/gen/Network/Google/Resource/Prediction/TrainedModels/List.hs+2−2

@@ -51,7 +51,7 @@ type TrainedModelsListResource =

5151 "trainedmodels" :>

5252 "list" :>

5353 QueryParam "pageToken" Text :>

54− QueryParam "maxResults" (JSONText Word32) :>

54+ QueryParam "maxResults" (Textual Word32) :>

5555 QueryParam "alt" AltJSON :> Get '[JSON] List

5656

5757-- | List available models.

@@ -60,7 +60,7 @@ type TrainedModelsListResource =

6060data TrainedModelsList = TrainedModelsList

6161 { _tmlProject :: !Text

6262 , _tmlPageToken :: !(Maybe Text)

63− , _tmlMaxResults :: !(Maybe (JSONText Word32))

63+ , _tmlMaxResults :: !(Maybe (Textual Word32))

6464 } deriving (Eq,Show,Data,Typeable,Generic)

6565

6666-- | Creates a value of 'TrainedModelsList' with the minimum fields required to make a request.

gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+11−11

@@ -46,8 +46,8 @@ import Network.Google.ProximityBeacon.Types.Sum

4646--

4747-- /See:/ 'latLng' smart constructor.

4848data LatLng = LatLng

49− { _llLatitude :: !(Maybe (JSONText Double))

50− , _llLongitude :: !(Maybe (JSONText Double))

49+ { _llLatitude :: !(Maybe (Textual Double))

50+ , _llLongitude :: !(Maybe (Textual Double))

5151 } deriving (Eq,Show,Data,Typeable,Generic)

5252

5353-- | Creates a value of 'LatLng' with the minimum fields required to make a request.

@@ -97,7 +97,7 @@ instance ToJSON LatLng where

9797--

9898-- /See:/ 'attachmentInfo' smart constructor.

9999data AttachmentInfo = AttachmentInfo

100− { _aiData :: !(Maybe (JSONText Word8))

100+ { _aiData :: !(Maybe (Textual Word8))

101101 , _aiNamespacedType :: !(Maybe Text)

102102 } deriving (Eq,Show,Data,Typeable,Generic)

103103

@@ -205,7 +205,7 @@ instance ToJSON Empty where

205205--

206206-- /See:/ 'deleteAttachmentsResponse' smart constructor.

207207newtype DeleteAttachmentsResponse = DeleteAttachmentsResponse

208− { _darNumDeleted :: Maybe (JSONText Int32)

208+ { _darNumDeleted :: Maybe (Textual Int32)

209209 } deriving (Eq,Show,Data,Typeable,Generic)

210210

211211-- | Creates a value of 'DeleteAttachmentsResponse' with the minimum fields required to make a request.

@@ -404,9 +404,9 @@ instance ToJSON ListNamespacesResponse where

404404--

405405-- /See:/ 'date' smart constructor.

406406data Date = Date

407− { _dDay :: !(Maybe (JSONText Int32))

408− , _dYear :: !(Maybe (JSONText Int32))

409− , _dMonth :: !(Maybe (JSONText Int32))

407+ { _dDay :: !(Maybe (Textual Int32))

408+ , _dYear :: !(Maybe (Textual Int32))

409+ , _dMonth :: !(Maybe (Textual Int32))

410410 } deriving (Eq,Show,Data,Typeable,Generic)

411411

412412-- | Creates a value of 'Date' with the minimum fields required to make a request.

@@ -820,7 +820,7 @@ instance ToJSON BeaconInfo where

820820--

821821-- /See:/ 'observation' smart constructor.

822822data Observation = Observation

823− { _oTelemetry :: !(Maybe (JSONText Word8))

823+ { _oTelemetry :: !(Maybe (Textual Word8))

824824 , _oTimestampMs :: !(Maybe Text)

825825 , _oAdvertisedId :: !(Maybe AdvertisedId)

826826 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -883,7 +883,7 @@ instance ToJSON Observation where

883883--

884884-- /See:/ 'beaconAttachment' smart constructor.

885885data BeaconAttachment = BeaconAttachment

886− { _baData :: !(Maybe (JSONText Word8))

886+ { _baData :: !(Maybe (Textual Word8))

887887 , _baAttachmentName :: !(Maybe Text)

888888 , _baNamespacedType :: !(Maybe Text)

889889 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1006,7 +1006,7 @@ instance ToJSON ListDiagnosticsResponse where

10061006--

10071007-- /See:/ 'advertisedId' smart constructor.

10081008data AdvertisedId = AdvertisedId

1009− { _aiId :: !(Maybe (JSONText Word8))

1009+ { _aiId :: !(Maybe (Textual Word8))

10101010 , _aiType :: !(Maybe Text)

10111011 } deriving (Eq,Show,Data,Typeable,Generic)

10121012

@@ -1057,7 +1057,7 @@ instance ToJSON AdvertisedId where

10571057data ListBeaconsResponse = ListBeaconsResponse

10581058 { _lbrNextPageToken :: !(Maybe Text)

10591059 , _lbrBeacons :: !(Maybe [Beacon])

1060− , _lbrTotalCount :: !(Maybe (JSONText Int64))

1060+ , _lbrTotalCount :: !(Maybe (Textual Int64))

10611061 } deriving (Eq,Show,Data,Typeable,Generic)

10621062

10631063-- | Creates a value of 'ListBeaconsResponse' with the minimum fields required to make a request.

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/Diagnostics/List.hs+2−2

@@ -64,7 +64,7 @@ type BeaconsDiagnosticsListResource =

6464 QueryParam "uploadType" Text :>

6565 QueryParam "bearer_token" Text :>

6666 QueryParam "pageToken" Text :>

67− QueryParam "pageSize" (JSONText Int32) :>

67+ QueryParam "pageSize" (Textual Int32) :>

6868 QueryParam "alertFilter" Text :>

6969 QueryParam "callback" Text :>

7070 QueryParam "alt" AltJSON :>

@@ -84,7 +84,7 @@ data BeaconsDiagnosticsList = BeaconsDiagnosticsList

8484 , _bdlUploadType :: !(Maybe Text)

8585 , _bdlBearerToken :: !(Maybe Text)

8686 , _bdlPageToken :: !(Maybe Text)

87− , _bdlPageSize :: !(Maybe (JSONText Int32))

87+ , _bdlPageSize :: !(Maybe (Textual Int32))

8888 , _bdlAlertFilter :: !(Maybe Text)

8989 , _bdlCallback :: !(Maybe Text)

9090 } deriving (Eq,Show,Data,Typeable,Generic)

gogol-proximitybeacon/gen/Network/Google/Resource/ProximityBeacon/Beacons/List.hs+2−2

@@ -63,7 +63,7 @@ type BeaconsListResource =

6363 QueryParam "q" Text :>

6464 QueryParam "bearer_token" Text :>

6565 QueryParam "pageToken" Text :>

66− QueryParam "pageSize" (JSONText Int32) :>

66+ QueryParam "pageSize" (Textual Int32) :>

6767 QueryParam "callback" Text :>

6868 QueryParam "alt" AltJSON :>

6969 Get '[JSON] ListBeaconsResponse

@@ -82,7 +82,7 @@ data BeaconsList = BeaconsList

8282 , _blQ :: !(Maybe Text)

8383 , _blBearerToken :: !(Maybe Text)

8484 , _blPageToken :: !(Maybe Text)

85− , _blPageSize :: !(Maybe (JSONText Int32))

85+ , _blPageSize :: !(Maybe (Textual Int32))

8686 , _blCallback :: !(Maybe Text)

8787 } deriving (Eq,Show,Data,Typeable,Generic)

8888

gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+6−6

@@ -134,7 +134,7 @@ instance ToJSON ReceivedMessage where

134134-- /See:/ 'modifyAckDeadlineRequest' smart constructor.

135135data ModifyAckDeadlineRequest = ModifyAckDeadlineRequest

136136 { _madrAckIds :: !(Maybe [Text])

137− , _madrAckDeadlineSeconds :: !(Maybe (JSONText Int32))

137+ , _madrAckDeadlineSeconds :: !(Maybe (Textual Int32))

138138 } deriving (Eq,Show,Data,Typeable,Generic)

139139

140140-- | Creates a value of 'ModifyAckDeadlineRequest' with the minimum fields required to make a request.

@@ -254,7 +254,7 @@ instance ToJSON Empty where

254254--

255255-- /See:/ 'pubsubMessage' smart constructor.

256256data PubsubMessage = PubsubMessage

257− { _pmData :: !(Maybe (JSONText Word8))

257+ { _pmData :: !(Maybe (Textual Word8))

258258 , _pmAttributes :: !(Maybe PubsubMessageAttributes)

259259 , _pmMessageId :: !(Maybe Text)

260260 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -542,7 +542,7 @@ instance ToJSON Topic where

542542--

543543-- /See:/ 'pullRequest' smart constructor.

544544data PullRequest = PullRequest

545− { _prMaxMessages :: !(Maybe (JSONText Int32))

545+ { _prMaxMessages :: !(Maybe (Textual Int32))

546546 , _prReturnImmediately :: !(Maybe Bool)

547547 } deriving (Eq,Show,Data,Typeable,Generic)

548548

@@ -801,8 +801,8 @@ instance ToJSON TestIAMPermissionsResponse where

801801--

802802-- /See:/ 'policy' smart constructor.

803803data Policy = Policy

804− { _pEtag :: !(Maybe (JSONText Word8))

805− , _pVersion :: !(Maybe (JSONText Int32))

804+ { _pEtag :: !(Maybe (Textual Word8))

805+ , _pVersion :: !(Maybe (Textual Int32))

806806 , _pBindings :: !(Maybe [Binding])

807807 } deriving (Eq,Show,Data,Typeable,Generic)

808808

@@ -915,7 +915,7 @@ data Subscription = Subscription

915915 { _sPushConfig :: !(Maybe PushConfig)

916916 , _sTopic :: !(Maybe Text)

917917 , _sName :: !(Maybe Text)

918− , _sAckDeadlineSeconds :: !(Maybe (JSONText Int32))

918+ , _sAckDeadlineSeconds :: !(Maybe (Textual Int32))

919919 } deriving (Eq,Show,Data,Typeable,Generic)

920920

921921-- | Creates a value of 'Subscription' with the minimum fields required to make a request.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/List.hs+2−2

@@ -61,7 +61,7 @@ type ProjectsSubscriptionsListResource =

6161 QueryParam "uploadType" Text :>

6262 QueryParam "bearer_token" Text :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (JSONText Int32) :>

64+ QueryParam "pageSize" (Textual Int32) :>

6565 QueryParam "callback" Text :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] ListSubscriptionsResponse

@@ -78,7 +78,7 @@ data ProjectsSubscriptionsList = ProjectsSubscriptionsList

7878 , _pslUploadType :: !(Maybe Text)

7979 , _pslBearerToken :: !(Maybe Text)

8080 , _pslPageToken :: !(Maybe Text)

81− , _pslPageSize :: !(Maybe (JSONText Int32))

81+ , _pslPageSize :: !(Maybe (Textual Int32))

8282 , _pslCallback :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/List.hs+2−2

@@ -61,7 +61,7 @@ type ProjectsTopicsListResource =

6161 QueryParam "uploadType" Text :>

6262 QueryParam "bearer_token" Text :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (JSONText Int32) :>

64+ QueryParam "pageSize" (Textual Int32) :>

6565 QueryParam "callback" Text :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] ListTopicsResponse

@@ -78,7 +78,7 @@ data ProjectsTopicsList = ProjectsTopicsList

7878 , _ptlUploadType :: !(Maybe Text)

7979 , _ptlBearerToken :: !(Maybe Text)

8080 , _ptlPageToken :: !(Maybe Text)

81− , _ptlPageSize :: !(Maybe (JSONText Int32))

81+ , _ptlPageSize :: !(Maybe (Textual Int32))

8282 , _ptlCallback :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Subscriptions/List.hs+2−2

@@ -61,7 +61,7 @@ type ProjectsTopicsSubscriptionsListResource =

6161 QueryParam "uploadType" Text :>

6262 QueryParam "bearer_token" Text :>

6363 QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (JSONText Int32) :>

64+ QueryParam "pageSize" (Textual Int32) :>

6565 QueryParam "callback" Text :>

6666 QueryParam "alt" AltJSON :>

6767 Get '[JSON] ListTopicSubscriptionsResponse

@@ -78,7 +78,7 @@ data ProjectsTopicsSubscriptionsList = ProjectsTopicsSubscriptionsList

7878 , _ptslTopic :: !Text

7979 , _ptslBearerToken :: !(Maybe Text)

8080 , _ptslPageToken :: !(Maybe Text)

81− , _ptslPageSize :: !(Maybe (JSONText Int32))

81+ , _ptslPageSize :: !(Maybe (Textual Int32))

8282 , _ptslCallback :: !(Maybe Text)

8383 } deriving (Eq,Show,Data,Typeable,Generic)

8484

gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+21−21

@@ -154,11 +154,11 @@ instance ToJSON CarrierData where

154154-- /See:/ 'freeBaggageAllowance' smart constructor.

155155data FreeBaggageAllowance = FreeBaggageAllowance

156156 { _fbaKind :: !Text

157− , _fbaPounds :: !(Maybe (JSONText Int32))

157+ , _fbaPounds :: !(Maybe (Textual Int32))

158158 , _fbaBagDescriptor :: !(Maybe [BagDescriptor])

159− , _fbaKilosPerPiece :: !(Maybe (JSONText Int32))

160− , _fbaKilos :: !(Maybe (JSONText Int32))

161− , _fbaPieces :: !(Maybe (JSONText Int32))

159+ , _fbaKilosPerPiece :: !(Maybe (Textual Int32))

160+ , _fbaKilos :: !(Maybe (Textual Int32))

161+ , _fbaPieces :: !(Maybe (Textual Int32))

162162 } deriving (Eq,Show,Data,Typeable,Generic)

163163

164164-- | Creates a value of 'FreeBaggageAllowance' with the minimum fields required to make a request.

@@ -483,16 +483,16 @@ data LegInfo = LegInfo

483483 , _liKind :: !Text

484484 , _liAircraft :: !(Maybe Text)

485485 , _liArrivalTime :: !(Maybe Text)

486− , _liOnTimePerformance :: !(Maybe (JSONText Int32))

486+ , _liOnTimePerformance :: !(Maybe (Textual Int32))

487487 , _liOperatingDisclosure :: !(Maybe Text)

488488 , _liMeal :: !(Maybe Text)

489489 , _liId :: !(Maybe Text)

490490 , _liOriginTerminal :: !(Maybe Text)

491491 , _liChangePlane :: !(Maybe Bool)

492492 , _liDestinationTerminal :: !(Maybe Text)

493− , _liConnectionDuration :: !(Maybe (JSONText Int32))

494− , _liDuration :: !(Maybe (JSONText Int32))

495− , _liMileage :: !(Maybe (JSONText Int32))

493+ , _liConnectionDuration :: !(Maybe (Textual Int32))

494+ , _liDuration :: !(Maybe (Textual Int32))

495+ , _liMileage :: !(Maybe (Textual Int32))

496496 , _liDePartureTime :: !(Maybe Text)

497497 } deriving (Eq,Show,Data,Typeable,Generic)

498498

@@ -859,7 +859,7 @@ instance ToJSON SegmentPricing where

859859data SliceInfo = SliceInfo

860860 { _siKind :: !Text

861861 , _siSegment :: !(Maybe [SegmentInfo])

862− , _siDuration :: !(Maybe (JSONText Int32))

862+ , _siDuration :: !(Maybe (Textual Int32))

863863 } deriving (Eq,Show,Data,Typeable,Generic)

864864

865865-- | Creates a value of 'SliceInfo' with the minimum fields required to make a request.

@@ -1054,7 +1054,7 @@ instance ToJSON TripOption where

10541054data BagDescriptor = BagDescriptor

10551055 { _bdKind :: !Text

10561056 , _bdCommercialName :: !(Maybe Text)

1057− , _bdCount :: !(Maybe (JSONText Int32))

1057+ , _bdCount :: !(Maybe (Textual Int32))

10581058 , _bdDescription :: !(Maybe [Text])

10591059 , _bdSubcode :: !(Maybe Text)

10601060 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -1208,12 +1208,12 @@ instance ToJSON CityData where

12081208--

12091209-- /See:/ 'passengerCounts' smart constructor.

12101210data PassengerCounts = PassengerCounts

1211− { _pcSeniorCount :: !(Maybe (JSONText Int32))

1211+ { _pcSeniorCount :: !(Maybe (Textual Int32))

12121212 , _pcKind :: !Text

1213− , _pcInfantInLapCount :: !(Maybe (JSONText Int32))

1214− , _pcChildCount :: !(Maybe (JSONText Int32))

1215− , _pcInfantInSeatCount :: !(Maybe (JSONText Int32))

1216− , _pcAdultCount :: !(Maybe (JSONText Int32))

1213+ , _pcInfantInLapCount :: !(Maybe (Textual Int32))

1214+ , _pcChildCount :: !(Maybe (Textual Int32))

1215+ , _pcInfantInSeatCount :: !(Maybe (Textual Int32))

1216+ , _pcAdultCount :: !(Maybe (Textual Int32))

12171217 } deriving (Eq,Show,Data,Typeable,Generic)

12181218

12191219-- | Creates a value of 'PassengerCounts' with the minimum fields required to make a request.

@@ -1314,14 +1314,14 @@ instance ToJSON PassengerCounts where

13141314data SegmentInfo = SegmentInfo

13151315 { _sBookingCode :: !(Maybe Text)

13161316 , _sCabin :: !(Maybe Text)

1317− , _sBookingCodeCount :: !(Maybe (JSONText Int32))

1317+ , _sBookingCodeCount :: !(Maybe (Textual Int32))

13181318 , _sSubjectToGovernmentApproval :: !(Maybe Bool)

13191319 , _sKind :: !Text

13201320 , _sFlight :: !(Maybe FlightInfo)

13211321 , _sId :: !(Maybe Text)

13221322 , _sMarriedSegmentGroup :: !(Maybe Text)

1323− , _sConnectionDuration :: !(Maybe (JSONText Int32))

1324− , _sDuration :: !(Maybe (JSONText Int32))

1323+ , _sConnectionDuration :: !(Maybe (Textual Int32))

1324+ , _sDuration :: !(Maybe (Textual Int32))

13251325 , _sLeg :: !(Maybe [LegInfo])

13261326 } deriving (Eq,Show,Data,Typeable,Generic)

13271327

@@ -2001,7 +2001,7 @@ data TripOptionsRequest = TripOptionsRequest

20012001 { _torRefundable :: !(Maybe Bool)

20022002 , _torSaleCountry :: !(Maybe Text)

20032003 , _torPassengers :: !(Maybe PassengerCounts)

2004− , _torSolutions :: !(Maybe (JSONText Int32))

2004+ , _torSolutions :: !(Maybe (Textual Int32))

20052005 , _torSlice :: !(Maybe [SliceInput])

20062006 , _torMaxPrice :: !(Maybe Text)

20072007 } deriving (Eq,Show,Data,Typeable,Generic)

@@ -2106,11 +2106,11 @@ instance ToJSON TripOptionsRequest where

21062106data SliceInput = SliceInput

21072107 { _sliDestination :: !(Maybe Text)

21082108 , _sliOrigin :: !(Maybe Text)

2109− , _sliMaxStops :: !(Maybe (JSONText Int32))

2109+ , _sliMaxStops :: !(Maybe (Textual Int32))

21102110 , _sliKind :: !Text

21112111 , _sliProhibitedCarrier :: !(Maybe [Text])

21122112 , _sliDate :: !(Maybe Text)

2113− , _sliMaxConnectionDuration :: !(Maybe (JSONText Int32))

2113+ , _sliMaxConnectionDuration :: !(Maybe (Textual Int32))

21142114 , _sliPreferredCabin :: !(Maybe Text)

21152115 , _sliPermittedDePartureTime :: !(Maybe TimeOfDayRange)

21162116 , _sliPermittedCarrier :: !(Maybe [Text])

gogol-replicapool-updater/gen/Network/Google/ReplicaPoolUpdater/Types/Product.hs+10−10

@@ -71,7 +71,7 @@ instance ToJSON OperationWarningsItemDataItem where

7171-- /See:/ 'rollingUpdate' smart constructor.

7272data RollingUpdate = RollingUpdate

7373 { _ruStatus :: !(Maybe Text)

74− , _ruProgress :: !(Maybe (JSONText Int32))

74+ , _ruProgress :: !(Maybe (Textual Int32))

7575 , _ruInstanceGroupManager :: !(Maybe Text)

7676 , _ruKind :: !Text

7777 , _ruError :: !(Maybe RollingUpdateError)

@@ -545,24 +545,24 @@ instance ToJSON RollingUpdateErrorErrorsItem where

545545--

546546-- /See:/ 'operation' smart constructor.

547547data Operation = Operation

548− { _oTargetId :: !(Maybe (JSONText Word64))

548+ { _oTargetId :: !(Maybe (Textual Word64))

549549 , _oStatus :: !(Maybe Text)

550550 , _oInsertTime :: !(Maybe Text)

551− , _oProgress :: !(Maybe (JSONText Int32))

551+ , _oProgress :: !(Maybe (Textual Int32))

552552 , _oStartTime :: !(Maybe Text)

553553 , _oKind :: !Text

554554 , _oError :: !(Maybe OperationError)

555555 , _oHTTPErrorMessage :: !(Maybe Text)

556556 , _oZone :: !(Maybe Text)

557557 , _oWarnings :: !(Maybe [OperationWarningsItem])

558− , _oHTTPErrorStatusCode :: !(Maybe (JSONText Int32))

558+ , _oHTTPErrorStatusCode :: !(Maybe (Textual Int32))

559559 , _oUser :: !(Maybe Text)

560560 , _oSelfLink :: !(Maybe Text)

561561 , _oName :: !(Maybe Text)

562562 , _oStatusMessage :: !(Maybe Text)

563563 , _oCreationTimestamp :: !(Maybe Text)

564564 , _oEndTime :: !(Maybe Text)

565− , _oId :: !(Maybe (JSONText Word64))

565+ , _oId :: !(Maybe (Textual Word64))

566566 , _oOperationType :: !(Maybe Text)

567567 , _oRegion :: !(Maybe Text)

568568 , _oTargetLink :: !(Maybe Text)

@@ -914,11 +914,11 @@ instance ToJSON InstanceUpdateError where

914914--

915915-- /See:/ 'rollingUpdatePolicy' smart constructor.

916916data RollingUpdatePolicy = RollingUpdatePolicy

917− { _rupMinInstanceUpdateTimeSec :: !(Maybe (JSONText Int32))

918− , _rupInstanceStartupTimeoutSec :: !(Maybe (JSONText Int32))

919− , _rupMaxNumFailedInstances :: !(Maybe (JSONText Int32))

920− , _rupAutoPauseAfterInstances :: !(Maybe (JSONText Int32))

921− , _rupMaxNumConcurrentInstances :: !(Maybe (JSONText Int32))

917+ { _rupMinInstanceUpdateTimeSec :: !(Maybe (Textual Int32))

918+ , _rupInstanceStartupTimeoutSec :: !(Maybe (Textual Int32))

919+ , _rupMaxNumFailedInstances :: !(Maybe (Textual Int32))

920+ , _rupAutoPauseAfterInstances :: !(Maybe (Textual Int32))

921+ , _rupMaxNumConcurrentInstances :: !(Maybe (Textual Int32))

922922 } deriving (Eq,Show,Data,Typeable,Generic)

923923

924924-- | Creates a value of 'RollingUpdatePolicy' with the minimum fields required to make a request.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/List.hs+2−2

@@ -56,7 +56,7 @@ type RollingUpdatesListResource =

5656 "rollingUpdates" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :>

6161 Get '[JSON] RollingUpdateList

6262

@@ -69,7 +69,7 @@ data RollingUpdatesList = RollingUpdatesList

6969 , _rulZone :: !Text

7070 , _rulFilter :: !(Maybe Text)

7171 , _rulPageToken :: !(Maybe Text)

72− , _rulMaxResults :: !(JSONText Word32)

72+ , _rulMaxResults :: !(Textual Word32)

7373 } deriving (Eq,Show,Data,Typeable,Generic)

7474

7575-- | Creates a value of 'RollingUpdatesList' with the minimum fields required to make a request.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/RollingUpdates/ListInstanceUpdates.hs+2−2

@@ -58,7 +58,7 @@ type RollingUpdatesListInstanceUpdatesResource =

5858 "instanceUpdates" :>

5959 QueryParam "filter" Text :>

6060 QueryParam "pageToken" Text :>

61− QueryParam "maxResults" (JSONText Word32) :>

61+ QueryParam "maxResults" (Textual Word32) :>

6262 QueryParam "alt" AltJSON :>

6363 Get '[JSON] InstanceUpdateList

6464

@@ -71,7 +71,7 @@ data RollingUpdatesListInstanceUpdates = RollingUpdatesListInstanceUpdates

7171 , _ruliuZone :: !Text

7272 , _ruliuFilter :: !(Maybe Text)

7373 , _ruliuPageToken :: !(Maybe Text)

74− , _ruliuMaxResults :: !(JSONText Word32)

74+ , _ruliuMaxResults :: !(Textual Word32)

7575 } deriving (Eq,Show,Data,Typeable,Generic)

7676

7777-- | Creates a value of 'RollingUpdatesListInstanceUpdates' with the minimum fields required to make a request.

gogol-replicapool-updater/gen/Network/Google/Resource/ReplicaPoolUpdater/ZoneOperations/List.hs+2−2

@@ -56,7 +56,7 @@ type ZoneOperationsListResource =

5656 "operations" :>

5757 QueryParam "filter" Text :>

5858 QueryParam "pageToken" Text :>

59− QueryParam "maxResults" (JSONText Word32) :>

59+ QueryParam "maxResults" (Textual Word32) :>

6060 QueryParam "alt" AltJSON :> Get '[JSON] OperationList

6161

6262-- | Retrieves the list of Operation resources contained within the specified

@@ -68,7 +68,7 @@ data ZoneOperationsList = ZoneOperationsList

6868 , _zolZone :: !Text

6969 , _zolFilter :: !(Maybe Text)

7070 , _zolPageToken :: !(Maybe Text)

71− , _zolMaxResults :: !(JSONText Word32)

71+ , _zolMaxResults :: !(Textual Word32)

7272 } deriving (Eq,Show,Data,Typeable,Generic)

7373

7474-- | Creates a value of 'ZoneOperationsList' with the minimum fields required to make a request.

gogol-replicapool/gen/Network/Google/ReplicaPool/Types/Product.hs+9−9