gogol-adsense 0.4.0 → 0.5.0
raw patch · 43 files changed
+507/−292 lines, 43 filesdep ~gogol-corePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: gogol-core
API changes (from Hackage documentation)
Files
- README.md +1/−1
- gen/Network/Google/AdSense/Types.hs +2/−2
- gen/Network/Google/AdSense/Types/Product.hs +227/−128
- gen/Network/Google/Resource/AdSense/Accounts/AdClients/GetAdCode.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs +9/−4
- gen/Network/Google/Resource/AdSense/Accounts/AdUnits/Get.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/AdUnits/GetAdCode.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs +8/−6
- gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs +7/−6
- gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs +9/−4
- gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/Get.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/Get.hs +7/−6
- gen/Network/Google/Resource/AdSense/Accounts/List.hs +7/−7
- gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs +7/−5
- gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs +9/−4
- gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs +8/−6
- gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/AdClients/List.hs +7/−6
- gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/AdUnits/Get.hs +7/−6
- gen/Network/Google/Resource/AdSense/AdUnits/GetAdCode.hs +8/−6
- gen/Network/Google/Resource/AdSense/AdUnits/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Alerts/Delete.hs +7/−6
- gen/Network/Google/Resource/AdSense/Alerts/List.hs +7/−6
- gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/CustomChannels/Get.hs +7/−3
- gen/Network/Google/Resource/AdSense/CustomChannels/List.hs +7/−3
- gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs +4/−2
- gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs +4/−2
- gen/Network/Google/Resource/AdSense/Payments/List.hs +4/−2
- gen/Network/Google/Resource/AdSense/Reports/Generate.hs +9/−4
- gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs +7/−3
- gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs +7/−6
- gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs +7/−5
- gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs +7/−6
- gen/Network/Google/Resource/AdSense/URLChannels/List.hs +7/−3
- gogol-adsense.cabal +2/−2
README.md view
@@ -8,7 +8,7 @@ ## Version -`0.3.0`+`0.5.0` ## Description
gen/Network/Google/AdSense/Types.hs view
@@ -294,8 +294,8 @@ -- | View your AdSense data adSenseReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/adsense.readonly"]-adSenseReadOnlyScope = Proxy;+adSenseReadOnlyScope = Proxy -- | View and manage your AdSense data adSenseScope :: Proxy '["https://www.googleapis.com/auth/adsense"]-adSenseScope = Proxy;+adSenseScope = Proxy
gen/Network/Google/AdSense/Types/Product.hs view
@@ -22,13 +22,16 @@ -- -- /See:/ 'adClients' smart constructor.-data AdClients = AdClients'+data AdClients =+ AdClients' { _acEtag :: !(Maybe Text) , _acNextPageToken :: !(Maybe Text) , _acKind :: !Text , _acItems :: !(Maybe [AdClient])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdClients' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -43,13 +46,14 @@ adClients :: AdClients adClients =- AdClients'+ AdClients' { _acEtag = Nothing , _acNextPageToken = Nothing , _acKind = "adsense#adClients" , _acItems = Nothing } + -- | ETag of this response for caching purposes. acEtag :: Lens' AdClients (Maybe Text) acEtag = lens _acEtag (\ s a -> s{_acEtag = a})@@ -90,7 +94,8 @@ -- -- /See:/ 'reportingMetadataEntry' smart constructor.-data ReportingMetadataEntry = ReportingMetadataEntry'+data ReportingMetadataEntry =+ ReportingMetadataEntry' { _rmeKind :: !Text , _rmeRequiredMetrics :: !(Maybe [Text]) , _rmeCompatibleMetrics :: !(Maybe [Text])@@ -98,8 +103,10 @@ , _rmeId :: !(Maybe Text) , _rmeCompatibleDimensions :: !(Maybe [Text]) , _rmeSupportedProducts :: !(Maybe [Text])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReportingMetadataEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -120,7 +127,7 @@ reportingMetadataEntry :: ReportingMetadataEntry reportingMetadataEntry =- ReportingMetadataEntry'+ ReportingMetadataEntry' { _rmeKind = "adsense#reportingMetadataEntry" , _rmeRequiredMetrics = Nothing , _rmeCompatibleMetrics = Nothing@@ -130,6 +137,7 @@ , _rmeSupportedProducts = Nothing } + -- | Kind of resource this is, in this case adsense#reportingMetadataEntry. rmeKind :: Lens' ReportingMetadataEntry Text rmeKind = lens _rmeKind (\ s a -> s{_rmeKind = a})@@ -217,12 +225,15 @@ -- -- /See:/ 'adsenseReportsGenerateResponseHeadersItem' smart constructor.-data AdsenseReportsGenerateResponseHeadersItem = AdsenseReportsGenerateResponseHeadersItem'+data AdsenseReportsGenerateResponseHeadersItem =+ AdsenseReportsGenerateResponseHeadersItem' { _argrhiName :: !(Maybe Text) , _argrhiCurrency :: !(Maybe Text) , _argrhiType :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdsenseReportsGenerateResponseHeadersItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -235,12 +246,10 @@ adsenseReportsGenerateResponseHeadersItem :: AdsenseReportsGenerateResponseHeadersItem adsenseReportsGenerateResponseHeadersItem =- AdsenseReportsGenerateResponseHeadersItem'- { _argrhiName = Nothing- , _argrhiCurrency = Nothing- , _argrhiType = Nothing- }+ AdsenseReportsGenerateResponseHeadersItem'+ {_argrhiName = Nothing, _argrhiCurrency = Nothing, _argrhiType = Nothing} + -- | The name of the header. argrhiName :: Lens' AdsenseReportsGenerateResponseHeadersItem (Maybe Text) argrhiName@@ -260,7 +269,8 @@ = lens _argrhiType (\ s a -> s{_argrhiType = a}) instance FromJSON- AdsenseReportsGenerateResponseHeadersItem where+ AdsenseReportsGenerateResponseHeadersItem+ where parseJSON = withObject "AdsenseReportsGenerateResponseHeadersItem"@@ -270,7 +280,8 @@ (o .:? "type")) instance ToJSON- AdsenseReportsGenerateResponseHeadersItem where+ AdsenseReportsGenerateResponseHeadersItem+ where toJSON AdsenseReportsGenerateResponseHeadersItem'{..} = object (catMaybes@@ -280,14 +291,17 @@ -- -- /See:/ 'payment' smart constructor.-data Payment = Payment'+data Payment =+ Payment' { _pPaymentAmountCurrencyCode :: !(Maybe Text) , _pKind :: !Text , _pPaymentDate :: !(Maybe Text) , _pId :: !(Maybe Text) , _pPaymentAmount :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Payment' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -304,7 +318,7 @@ payment :: Payment payment =- Payment'+ Payment' { _pPaymentAmountCurrencyCode = Nothing , _pKind = "adsense#payment" , _pPaymentDate = Nothing@@ -312,6 +326,7 @@ , _pPaymentAmount = Nothing } + -- | The currency code for the amount to be paid. pPaymentAmountCurrencyCode :: Lens' Payment (Maybe Text) pPaymentAmountCurrencyCode@@ -362,13 +377,16 @@ -- -- /See:/ 'accounts' smart constructor.-data Accounts = Accounts'+data Accounts =+ Accounts' { _aEtag :: !(Maybe Text) , _aNextPageToken :: !(Maybe Text) , _aKind :: !Text , _aItems :: !(Maybe [Account])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Accounts' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -383,13 +401,14 @@ accounts :: Accounts accounts =- Accounts'+ Accounts' { _aEtag = Nothing , _aNextPageToken = Nothing , _aKind = "adsense#accounts" , _aItems = Nothing } + -- | ETag of this response for caching purposes. aEtag :: Lens' Accounts (Maybe Text) aEtag = lens _aEtag (\ s a -> s{_aEtag = a})@@ -430,11 +449,14 @@ -- -- /See:/ 'alerts' smart constructor.-data Alerts = Alerts'+data Alerts =+ Alerts' { _aleKind :: !Text , _aleItems :: !(Maybe [Alert])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Alerts' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -444,12 +466,9 @@ -- * 'aleItems' alerts :: Alerts-alerts =- Alerts'- { _aleKind = "adsense#alerts"- , _aleItems = Nothing- }+alerts = Alerts' {_aleKind = "adsense#alerts", _aleItems = Nothing} + -- | Kind of list this is, in this case adsense#alerts. aleKind :: Lens' Alerts Text aleKind = lens _aleKind (\ s a -> s{_aleKind = a})@@ -478,13 +497,16 @@ -- -- /See:/ 'savedReports' smart constructor.-data SavedReports = SavedReports'+data SavedReports =+ SavedReports' { _srEtag :: !(Maybe Text) , _srNextPageToken :: !(Maybe Text) , _srKind :: !Text , _srItems :: !(Maybe [SavedReport])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedReports' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -499,13 +521,14 @@ savedReports :: SavedReports savedReports =- SavedReports'+ SavedReports' { _srEtag = Nothing , _srNextPageToken = Nothing , _srKind = "adsense#savedReports" , _srItems = Nothing } + -- | ETag of this response for caching purposes. srEtag :: Lens' SavedReports (Maybe Text) srEtag = lens _srEtag (\ s a -> s{_srEtag = a})@@ -547,13 +570,16 @@ -- -- /See:/ 'adUnits' smart constructor.-data AdUnits = AdUnits'+data AdUnits =+ AdUnits' { _auEtag :: !(Maybe Text) , _auNextPageToken :: !(Maybe Text) , _auKind :: !Text , _auItems :: !(Maybe [AdUnit])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnits' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -568,13 +594,14 @@ adUnits :: AdUnits adUnits =- AdUnits'+ AdUnits' { _auEtag = Nothing , _auNextPageToken = Nothing , _auKind = "adsense#adUnits" , _auItems = Nothing } + -- | ETag of this response for caching purposes. auEtag :: Lens' AdUnits (Maybe Text) auEtag = lens _auEtag (\ s a -> s{_auEtag = a})@@ -615,12 +642,15 @@ -- -- /See:/ 'savedReport' smart constructor.-data SavedReport = SavedReport'+data SavedReport =+ SavedReport' { _sKind :: !Text , _sName :: !(Maybe Text) , _sId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedReport' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -633,12 +663,10 @@ savedReport :: SavedReport savedReport =- SavedReport'- { _sKind = "adsense#savedReport"- , _sName = Nothing- , _sId = Nothing- }+ SavedReport'+ {_sKind = "adsense#savedReport", _sName = Nothing, _sId = Nothing} + -- | Kind of resource this is, in this case adsense#savedReport. sKind :: Lens' SavedReport Text sKind = lens _sKind (\ s a -> s{_sKind = a})@@ -669,13 +697,16 @@ -- -- /See:/ 'urlChannels' smart constructor.-data URLChannels = URLChannels'+data URLChannels =+ URLChannels' { _ucEtag :: !(Maybe Text) , _ucNextPageToken :: !(Maybe Text) , _ucKind :: !Text , _ucItems :: !(Maybe [URLChannel])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'URLChannels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -690,13 +721,14 @@ urlChannels :: URLChannels urlChannels =- URLChannels'+ URLChannels' { _ucEtag = Nothing , _ucNextPageToken = Nothing , _ucKind = "adsense#urlChannels" , _ucItems = Nothing } + -- | ETag of this response for caching purposes. ucEtag :: Lens' URLChannels (Maybe Text) ucEtag = lens _ucEtag (\ s a -> s{_ucEtag = a})@@ -738,13 +770,16 @@ -- -- /See:/ 'customChannels' smart constructor.-data CustomChannels = CustomChannels'+data CustomChannels =+ CustomChannels' { _ccEtag :: !(Maybe Text) , _ccNextPageToken :: !(Maybe Text) , _ccKind :: !Text , _ccItems :: !(Maybe [CustomChannel])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -759,13 +794,14 @@ customChannels :: CustomChannels customChannels =- CustomChannels'+ CustomChannels' { _ccEtag = Nothing , _ccNextPageToken = Nothing , _ccKind = "adsense#customChannels" , _ccItems = Nothing } + -- | ETag of this response for caching purposes. ccEtag :: Lens' CustomChannels (Maybe Text) ccEtag = lens _ccEtag (\ s a -> s{_ccEtag = a})@@ -807,7 +843,8 @@ -- -- /See:/ 'adUnit' smart constructor.-data AdUnit = AdUnit'+data AdUnit =+ AdUnit' { _auuStatus :: !(Maybe Text) , _auuMobileContentAdsSettings :: !(Maybe AdUnitMobileContentAdsSettings) , _auuKind :: !Text@@ -818,8 +855,10 @@ , _auuContentAdsSettings :: !(Maybe AdUnitContentAdsSettings) , _auuCode :: !(Maybe Text) , _auuId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnit' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -846,7 +885,7 @@ adUnit :: AdUnit adUnit =- AdUnit'+ AdUnit' { _auuStatus = Nothing , _auuMobileContentAdsSettings = Nothing , _auuKind = "adsense#adUnit"@@ -859,6 +898,7 @@ , _auuId = Nothing } + -- | Status of this ad unit. Possible values are: NEW: Indicates that the ad -- unit was created within the last seven days and does not yet have any -- activity associated with it. ACTIVE: Indicates that there has been@@ -949,15 +989,18 @@ -- -- /See:/ 'alert' smart constructor.-data Alert = Alert'+data Alert =+ Alert' { _aaIsDismissible :: !(Maybe Bool) , _aaKind :: !Text , _aaSeverity :: !(Maybe Text) , _aaId :: !(Maybe Text) , _aaType :: !(Maybe Text) , _aaMessage :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Alert' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -976,7 +1019,7 @@ alert :: Alert alert =- Alert'+ Alert' { _aaIsDismissible = Nothing , _aaKind = "adsense#alert" , _aaSeverity = Nothing@@ -985,6 +1028,7 @@ , _aaMessage = Nothing } + -- | Whether this alert can be dismissed. aaIsDismissible :: Lens' Alert (Maybe Bool) aaIsDismissible@@ -1041,11 +1085,14 @@ -- | The font which is included in the style. -- -- /See:/ 'adStyleFont' smart constructor.-data AdStyleFont = AdStyleFont'+data AdStyleFont =+ AdStyleFont' { _asfSize :: !(Maybe Text) , _asfFamily :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdStyleFont' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1055,12 +1102,9 @@ -- * 'asfFamily' adStyleFont :: AdStyleFont-adStyleFont =- AdStyleFont'- { _asfSize = Nothing- , _asfFamily = Nothing- }+adStyleFont = AdStyleFont' {_asfSize = Nothing, _asfFamily = Nothing} + -- | The size of the font. asfSize :: Lens' AdStyleFont (Maybe Text) asfSize = lens _asfSize (\ s a -> s{_asfSize = a})@@ -1085,7 +1129,8 @@ -- -- /See:/ 'account' smart constructor.-data Account = Account'+data Account =+ Account' { _accKind :: !Text , _accCreationTime :: !(Maybe (Textual Int64)) , _accPremium :: !(Maybe Bool)@@ -1093,8 +1138,10 @@ , _accId :: !(Maybe Text) , _accTimezone :: !(Maybe Text) , _accSubAccounts :: !(Maybe [Account])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Account' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1115,7 +1162,7 @@ account :: Account account =- Account'+ Account' { _accKind = "adsense#account" , _accCreationTime = Nothing , _accPremium = Nothing@@ -1125,6 +1172,7 @@ , _accSubAccounts = Nothing } + -- | Kind of resource this is, in this case adsense#account. accKind :: Lens' Account Text accKind = lens _accKind (\ s a -> s{_accKind = a})@@ -1188,13 +1236,16 @@ -- | Settings specific to WAP mobile content ads (AFMC) - deprecated. -- -- /See:/ 'adUnitMobileContentAdsSettings' smart constructor.-data AdUnitMobileContentAdsSettings = AdUnitMobileContentAdsSettings'+data AdUnitMobileContentAdsSettings =+ AdUnitMobileContentAdsSettings' { _aumcasSize :: !(Maybe Text) , _aumcasScriptingLanguage :: !(Maybe Text) , _aumcasMarkupLanguage :: !(Maybe Text) , _aumcasType :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitMobileContentAdsSettings' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1209,13 +1260,14 @@ adUnitMobileContentAdsSettings :: AdUnitMobileContentAdsSettings adUnitMobileContentAdsSettings =- AdUnitMobileContentAdsSettings'+ AdUnitMobileContentAdsSettings' { _aumcasSize = Nothing , _aumcasScriptingLanguage = Nothing , _aumcasMarkupLanguage = Nothing , _aumcasType = Nothing } + -- | Size of this ad unit. aumcasSize :: Lens' AdUnitMobileContentAdsSettings (Maybe Text) aumcasSize@@ -1260,13 +1312,16 @@ -- -- /See:/ 'savedAdStyles' smart constructor.-data SavedAdStyles = SavedAdStyles'+data SavedAdStyles =+ SavedAdStyles' { _sasEtag :: !(Maybe Text) , _sasNextPageToken :: !(Maybe Text) , _sasKind :: !Text , _sasItems :: !(Maybe [SavedAdStyle])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedAdStyles' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1281,13 +1336,14 @@ savedAdStyles :: SavedAdStyles savedAdStyles =- SavedAdStyles'+ SavedAdStyles' { _sasEtag = Nothing , _sasNextPageToken = Nothing , _sasKind = "adsense#savedAdStyles" , _sasItems = Nothing } + -- | ETag of this response for caching purposes. sasEtag :: Lens' SavedAdStyles (Maybe Text) sasEtag = lens _sasEtag (\ s a -> s{_sasEtag = a})@@ -1333,14 +1389,17 @@ -- leading hash. -- -- /See:/ 'adStyleColors' smart constructor.-data AdStyleColors = AdStyleColors'+data AdStyleColors =+ AdStyleColors' { _ascText :: !(Maybe Text) , _ascURL :: !(Maybe Text) , _ascBOrder :: !(Maybe Text) , _ascTitle :: !(Maybe Text) , _ascBackgRound :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdStyleColors' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1357,7 +1416,7 @@ adStyleColors :: AdStyleColors adStyleColors =- AdStyleColors'+ AdStyleColors' { _ascText = Nothing , _ascURL = Nothing , _ascBOrder = Nothing@@ -1365,6 +1424,7 @@ , _ascBackgRound = Nothing } + -- | The color of the ad text. ascText :: Lens' AdStyleColors (Maybe Text) ascText = lens _ascText (\ s a -> s{_ascText = a})@@ -1409,12 +1469,15 @@ -- | The backup option to be used in instances where no ad is available. -- -- /See:/ 'adUnitContentAdsSettingsBackupOption' smart constructor.-data AdUnitContentAdsSettingsBackupOption = AdUnitContentAdsSettingsBackupOption'+data AdUnitContentAdsSettingsBackupOption =+ AdUnitContentAdsSettingsBackupOption' { _aucasboColor :: !(Maybe Text) , _aucasboURL :: !(Maybe Text) , _aucasboType :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitContentAdsSettingsBackupOption' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1427,12 +1490,10 @@ adUnitContentAdsSettingsBackupOption :: AdUnitContentAdsSettingsBackupOption adUnitContentAdsSettingsBackupOption =- AdUnitContentAdsSettingsBackupOption'- { _aucasboColor = Nothing- , _aucasboURL = Nothing- , _aucasboType = Nothing- }+ AdUnitContentAdsSettingsBackupOption'+ {_aucasboColor = Nothing, _aucasboURL = Nothing, _aucasboType = Nothing} + -- | Color to use when type is set to COLOR. aucasboColor :: Lens' AdUnitContentAdsSettingsBackupOption (Maybe Text) aucasboColor@@ -1449,7 +1510,8 @@ = lens _aucasboType (\ s a -> s{_aucasboType = a}) instance FromJSON- AdUnitContentAdsSettingsBackupOption where+ AdUnitContentAdsSettingsBackupOption+ where parseJSON = withObject "AdUnitContentAdsSettingsBackupOption" (\ o ->@@ -1467,14 +1529,17 @@ -- -- /See:/ 'adClient' smart constructor.-data AdClient = AdClient'+data AdClient =+ AdClient' { _adKind :: !Text , _adArcOptIn :: !(Maybe Bool) , _adSupportsReporting :: !(Maybe Bool) , _adId :: !(Maybe Text) , _adProductCode :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdClient' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1491,7 +1556,7 @@ adClient :: AdClient adClient =- AdClient'+ AdClient' { _adKind = "adsense#adClient" , _adArcOptIn = Nothing , _adSupportsReporting = Nothing@@ -1499,6 +1564,7 @@ , _adProductCode = Nothing } + -- | Kind of resource this is, in this case adsense#adClient. adKind :: Lens' AdClient Text adKind = lens _adKind (\ s a -> s{_adKind = a})@@ -1548,13 +1614,16 @@ -- -- /See:/ 'savedAdStyle' smart constructor.-data SavedAdStyle = SavedAdStyle'+data SavedAdStyle =+ SavedAdStyle' { _savKind :: !Text , _savName :: !(Maybe Text) , _savAdStyle :: !(Maybe AdStyle) , _savId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedAdStyle' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1569,13 +1638,14 @@ savedAdStyle :: SavedAdStyle savedAdStyle =- SavedAdStyle'+ SavedAdStyle' { _savKind = "adsense#savedAdStyle" , _savName = Nothing , _savAdStyle = Nothing , _savId = Nothing } + -- | Kind of resource this is, in this case adsense#savedAdStyle. savKind :: Lens' SavedAdStyle Text savKind = lens _savKind (\ s a -> s{_savKind = a})@@ -1616,13 +1686,16 @@ -- | The targeting information of this custom channel, if activated. -- -- /See:/ 'customChannelTargetingInfo' smart constructor.-data CustomChannelTargetingInfo = CustomChannelTargetingInfo'+data CustomChannelTargetingInfo =+ CustomChannelTargetingInfo' { _cctiLocation :: !(Maybe Text) , _cctiSiteLanguage :: !(Maybe Text) , _cctiAdsAppearOn :: !(Maybe Text) , _cctiDescription :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannelTargetingInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1637,13 +1710,14 @@ customChannelTargetingInfo :: CustomChannelTargetingInfo customChannelTargetingInfo =- CustomChannelTargetingInfo'+ CustomChannelTargetingInfo' { _cctiLocation = Nothing , _cctiSiteLanguage = Nothing , _cctiAdsAppearOn = Nothing , _cctiDescription = Nothing } + -- | The locations in which ads appear. (Only valid for content and mobile -- content ads (deprecated)). Acceptable values for content ads are: -- TOP_LEFT, TOP_CENTER, TOP_RIGHT, MIDDLE_LEFT, MIDDLE_CENTER,@@ -1692,13 +1766,16 @@ -- -- /See:/ 'adStyle' smart constructor.-data AdStyle = AdStyle'+data AdStyle =+ AdStyle' { _asCorners :: !(Maybe Text) , _asKind :: !Text , _asFont :: !(Maybe AdStyleFont) , _asColors :: !(Maybe AdStyleColors)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdStyle' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1713,13 +1790,14 @@ adStyle :: AdStyle adStyle =- AdStyle'+ AdStyle' { _asCorners = Nothing , _asKind = "adsense#adStyle" , _asFont = Nothing , _asColors = Nothing } + -- | The style of the corners in the ad (deprecated: never populated, -- ignored). asCorners :: Lens' AdStyle (Maybe Text)@@ -1761,13 +1839,16 @@ -- | Settings specific to feed ads (AFF) - deprecated. -- -- /See:/ 'adUnitFeedAdsSettings' smart constructor.-data AdUnitFeedAdsSettings = AdUnitFeedAdsSettings'+data AdUnitFeedAdsSettings =+ AdUnitFeedAdsSettings' { _aufasFrequency :: !(Maybe (Textual Int32)) , _aufasAdPosition :: !(Maybe Text) , _aufasType :: !(Maybe Text) , _aufasMinimumWordCount :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitFeedAdsSettings' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1782,13 +1863,14 @@ adUnitFeedAdsSettings :: AdUnitFeedAdsSettings adUnitFeedAdsSettings =- AdUnitFeedAdsSettings'+ AdUnitFeedAdsSettings' { _aufasFrequency = Nothing , _aufasAdPosition = Nothing , _aufasType = Nothing , _aufasMinimumWordCount = Nothing } + -- | The frequency at which ads should appear in the feed (i.e. every N -- entries). aufasFrequency :: Lens' AdUnitFeedAdsSettings (Maybe Int32)@@ -1835,11 +1917,14 @@ -- -- /See:/ 'metadata' smart constructor.-data Metadata = Metadata'+data Metadata =+ Metadata' { _mKind :: !Text , _mItems :: !(Maybe [ReportingMetadataEntry])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Metadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1849,12 +1934,9 @@ -- * 'mItems' metadata :: Metadata-metadata =- Metadata'- { _mKind = "adsense#metadata"- , _mItems = Nothing- }+metadata = Metadata' {_mKind = "adsense#metadata", _mItems = Nothing} + -- | Kind of list this is, in this case adsense#metadata. mKind :: Lens' Metadata Text mKind = lens _mKind (\ s a -> s{_mKind = a})@@ -1880,14 +1962,17 @@ -- -- /See:/ 'customChannel' smart constructor.-data CustomChannel = CustomChannel'+data CustomChannel =+ CustomChannel' { _cTargetingInfo :: !(Maybe CustomChannelTargetingInfo) , _cKind :: !Text , _cName :: !(Maybe Text) , _cCode :: !(Maybe Text) , _cId :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1904,7 +1989,7 @@ customChannel :: CustomChannel customChannel =- CustomChannel'+ CustomChannel' { _cTargetingInfo = Nothing , _cKind = "adsense#customChannel" , _cName = Nothing@@ -1912,6 +1997,7 @@ , _cId = Nothing } + -- | The targeting information of this custom channel, if activated. cTargetingInfo :: Lens' CustomChannel (Maybe CustomChannelTargetingInfo) cTargetingInfo@@ -1957,12 +2043,15 @@ -- -- /See:/ 'urlChannel' smart constructor.-data URLChannel = URLChannel'+data URLChannel =+ URLChannel' { _urlcKind :: !Text , _urlcId :: !(Maybe Text) , _urlcURLPattern :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'URLChannel' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1975,12 +2064,13 @@ urlChannel :: URLChannel urlChannel =- URLChannel'+ URLChannel' { _urlcKind = "adsense#urlChannel" , _urlcId = Nothing , _urlcURLPattern = Nothing } + -- | Kind of resource this is, in this case adsense#urlChannel. urlcKind :: Lens' URLChannel Text urlcKind = lens _urlcKind (\ s a -> s{_urlcKind = a})@@ -2016,13 +2106,16 @@ -- -- /See:/ 'adCode' smart constructor.-data AdCode = AdCode'+data AdCode =+ AdCode' { _addKind :: !Text , _addAmpHead :: !(Maybe Text) , _addAmpBody :: !(Maybe Text) , _addAdCode :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdCode' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2037,13 +2130,14 @@ adCode :: AdCode adCode =- AdCode'+ AdCode' { _addKind = "adsense#adCode" , _addAmpHead = Nothing , _addAmpBody = Nothing , _addAdCode = Nothing } + -- | Kind this is, in this case adsense#adCode. addKind :: Lens' AdCode Text addKind = lens _addKind (\ s a -> s{_addKind = a})@@ -2084,7 +2178,8 @@ -- -- /See:/ 'adsenseReportsGenerateResponse' smart constructor.-data AdsenseReportsGenerateResponse = AdsenseReportsGenerateResponse'+data AdsenseReportsGenerateResponse =+ AdsenseReportsGenerateResponse' { _argrKind :: !Text , _argrAverages :: !(Maybe [Text]) , _argrEndDate :: !(Maybe Text)@@ -2094,8 +2189,10 @@ , _argrStartDate :: !(Maybe Text) , _argrHeaders :: !(Maybe [AdsenseReportsGenerateResponseHeadersItem]) , _argrTotalMatchedRows :: !(Maybe (Textual Int64))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdsenseReportsGenerateResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2120,7 +2217,7 @@ adsenseReportsGenerateResponse :: AdsenseReportsGenerateResponse adsenseReportsGenerateResponse =- AdsenseReportsGenerateResponse'+ AdsenseReportsGenerateResponse' { _argrKind = "adsense#report" , _argrAverages = Nothing , _argrEndDate = Nothing@@ -2132,6 +2229,7 @@ , _argrTotalMatchedRows = Nothing } + -- | Kind this is, in this case adsense#report. argrKind :: Lens' AdsenseReportsGenerateResponse Text argrKind = lens _argrKind (\ s a -> s{_argrKind = a})@@ -2232,12 +2330,15 @@ -- (AFMC - deprecated). -- -- /See:/ 'adUnitContentAdsSettings' smart constructor.-data AdUnitContentAdsSettings = AdUnitContentAdsSettings'+data AdUnitContentAdsSettings =+ AdUnitContentAdsSettings' { _aucasBackupOption :: !(Maybe AdUnitContentAdsSettingsBackupOption) , _aucasSize :: !(Maybe Text) , _aucasType :: !(Maybe Text)- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitContentAdsSettings' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2250,12 +2351,10 @@ adUnitContentAdsSettings :: AdUnitContentAdsSettings adUnitContentAdsSettings =- AdUnitContentAdsSettings'- { _aucasBackupOption = Nothing- , _aucasSize = Nothing- , _aucasType = Nothing- }+ AdUnitContentAdsSettings'+ {_aucasBackupOption = Nothing, _aucasSize = Nothing, _aucasType = Nothing} + -- | The backup option to be used in instances where no ad is available. aucasBackupOption :: Lens' AdUnitContentAdsSettings (Maybe AdUnitContentAdsSettingsBackupOption) aucasBackupOption@@ -2290,11 +2389,14 @@ -- -- /See:/ 'payments' smart constructor.-data Payments = Payments'+data Payments =+ Payments' { _payKind :: !Text , _payItems :: !(Maybe [Payment])- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Payments' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -2304,11 +2406,8 @@ -- * 'payItems' payments :: Payments-payments =- Payments'- { _payKind = "adsense#payments"- , _payItems = Nothing- }+payments = Payments' {_payKind = "adsense#payments", _payItems = Nothing}+ -- | Kind of list this is, in this case adsense#payments. payKind :: Lens' Payments Text
gen/Network/Google/Resource/AdSense/Accounts/AdClients/GetAdCode.hs view
@@ -55,11 +55,14 @@ -- | Get Auto ad code for a given ad client. -- -- /See:/ 'accountsAdClientsGetAdCode' smart constructor.-data AccountsAdClientsGetAdCode = AccountsAdClientsGetAdCode'+data AccountsAdClientsGetAdCode =+ AccountsAdClientsGetAdCode' { _aacgacAdClientId :: !Text , _aacgacAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdClientsGetAdCode' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -72,10 +75,11 @@ -> Text -- ^ 'aacgacAccountId' -> AccountsAdClientsGetAdCode accountsAdClientsGetAdCode pAacgacAdClientId_ pAacgacAccountId_ =- AccountsAdClientsGetAdCode'+ AccountsAdClientsGetAdCode' { _aacgacAdClientId = pAacgacAdClientId_ , _aacgacAccountId = pAacgacAccountId_ }+ -- | Ad client to get the code for. aacgacAdClientId :: Lens' AccountsAdClientsGetAdCode Text
gen/Network/Google/Resource/AdSense/Accounts/AdClients/List.hs view
@@ -56,12 +56,15 @@ -- | List all ad clients in the specified account. -- -- /See:/ 'accountsAdClientsList' smart constructor.-data AccountsAdClientsList = AccountsAdClientsList'+data AccountsAdClientsList =+ AccountsAdClientsList' { _aaclAccountId :: !Text , _aaclPageToken :: !(Maybe Text) , _aaclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdClientsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -75,11 +78,12 @@ :: Text -- ^ 'aaclAccountId' -> AccountsAdClientsList accountsAdClientsList pAaclAccountId_ =- AccountsAdClientsList'+ AccountsAdClientsList' { _aaclAccountId = pAaclAccountId_ , _aaclPageToken = Nothing , _aaclMaxResults = Nothing }+ -- | Account for which to list ad clients. aaclAccountId :: Lens' AccountsAdClientsList Text
gen/Network/Google/Resource/AdSense/Accounts/AdUnits/CustomChannels/List.hs view
@@ -63,14 +63,17 @@ -- | List all custom channels which the specified ad unit belongs to. -- -- /See:/ 'accountsAdUnitsCustomChannelsList' smart constructor.-data AccountsAdUnitsCustomChannelsList = AccountsAdUnitsCustomChannelsList'+data AccountsAdUnitsCustomChannelsList =+ AccountsAdUnitsCustomChannelsList' { _aaucclAdUnitId :: !Text , _aaucclAdClientId :: !Text , _aaucclAccountId :: !Text , _aaucclPageToken :: !(Maybe Text) , _aaucclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdUnitsCustomChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -90,7 +93,7 @@ -> Text -- ^ 'aaucclAccountId' -> AccountsAdUnitsCustomChannelsList accountsAdUnitsCustomChannelsList pAaucclAdUnitId_ pAaucclAdClientId_ pAaucclAccountId_ =- AccountsAdUnitsCustomChannelsList'+ AccountsAdUnitsCustomChannelsList' { _aaucclAdUnitId = pAaucclAdUnitId_ , _aaucclAdClientId = pAaucclAdClientId_ , _aaucclAccountId = pAaucclAccountId_@@ -98,6 +101,7 @@ , _aaucclMaxResults = Nothing } + -- | Ad unit for which to list custom channels. aaucclAdUnitId :: Lens' AccountsAdUnitsCustomChannelsList Text aaucclAdUnitId@@ -133,7 +137,8 @@ . mapping _Coerce instance GoogleRequest- AccountsAdUnitsCustomChannelsList where+ AccountsAdUnitsCustomChannelsList+ where type Rs AccountsAdUnitsCustomChannelsList = CustomChannels type Scopes AccountsAdUnitsCustomChannelsList =
gen/Network/Google/Resource/AdSense/Accounts/AdUnits/Get.hs view
@@ -59,12 +59,15 @@ -- account. -- -- /See:/ 'accountsAdUnitsGet' smart constructor.-data AccountsAdUnitsGet = AccountsAdUnitsGet'+data AccountsAdUnitsGet =+ AccountsAdUnitsGet' { _aaugAdUnitId :: !Text , _aaugAdClientId :: !Text , _aaugAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdUnitsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -80,11 +83,12 @@ -> Text -- ^ 'aaugAccountId' -> AccountsAdUnitsGet accountsAdUnitsGet pAaugAdUnitId_ pAaugAdClientId_ pAaugAccountId_ =- AccountsAdUnitsGet'+ AccountsAdUnitsGet' { _aaugAdUnitId = pAaugAdUnitId_ , _aaugAdClientId = pAaugAdClientId_ , _aaugAccountId = pAaugAccountId_ }+ -- | Ad unit to retrieve. aaugAdUnitId :: Lens' AccountsAdUnitsGet Text
gen/Network/Google/Resource/AdSense/Accounts/AdUnits/GetAdCode.hs view
@@ -58,12 +58,15 @@ -- | Get ad code for the specified ad unit. -- -- /See:/ 'accountsAdUnitsGetAdCode' smart constructor.-data AccountsAdUnitsGetAdCode = AccountsAdUnitsGetAdCode'+data AccountsAdUnitsGetAdCode =+ AccountsAdUnitsGetAdCode' { _aaugacAdUnitId :: !Text , _aaugacAdClientId :: !Text , _aaugacAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdUnitsGetAdCode' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -79,11 +82,12 @@ -> Text -- ^ 'aaugacAccountId' -> AccountsAdUnitsGetAdCode accountsAdUnitsGetAdCode pAaugacAdUnitId_ pAaugacAdClientId_ pAaugacAccountId_ =- AccountsAdUnitsGetAdCode'+ AccountsAdUnitsGetAdCode' { _aaugacAdUnitId = pAaugacAdUnitId_ , _aaugacAdClientId = pAaugacAdClientId_ , _aaugacAccountId = pAaugacAccountId_ }+ -- | Ad unit to get the code for. aaugacAdUnitId :: Lens' AccountsAdUnitsGetAdCode Text
gen/Network/Google/Resource/AdSense/Accounts/AdUnits/List.hs view
@@ -61,14 +61,17 @@ -- | List all ad units in the specified ad client for the specified account. -- -- /See:/ 'accountsAdUnitsList' smart constructor.-data AccountsAdUnitsList = AccountsAdUnitsList'+data AccountsAdUnitsList =+ AccountsAdUnitsList' { _aaulIncludeInactive :: !(Maybe Bool) , _aaulAdClientId :: !Text , _aaulAccountId :: !Text , _aaulPageToken :: !(Maybe Text) , _aaulMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAdUnitsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,13 +90,14 @@ -> Text -- ^ 'aaulAccountId' -> AccountsAdUnitsList accountsAdUnitsList pAaulAdClientId_ pAaulAccountId_ =- AccountsAdUnitsList'+ AccountsAdUnitsList' { _aaulIncludeInactive = Nothing , _aaulAdClientId = pAaulAdClientId_ , _aaulAccountId = pAaulAccountId_ , _aaulPageToken = Nothing , _aaulMaxResults = Nothing }+ -- | Whether to include inactive ad units. Default: true. aaulIncludeInactive :: Lens' AccountsAdUnitsList (Maybe Bool)
gen/Network/Google/Resource/AdSense/Accounts/Alerts/Delete.hs view
@@ -56,11 +56,14 @@ -- AdSense account. -- -- /See:/ 'accountsAlertsDelete' smart constructor.-data AccountsAlertsDelete = AccountsAlertsDelete'+data AccountsAlertsDelete =+ AccountsAlertsDelete' { _aadAlertId :: !Text , _aadAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAlertsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -73,10 +76,9 @@ -> Text -- ^ 'aadAccountId' -> AccountsAlertsDelete accountsAlertsDelete pAadAlertId_ pAadAccountId_ =- AccountsAlertsDelete'- { _aadAlertId = pAadAlertId_- , _aadAccountId = pAadAccountId_- }+ AccountsAlertsDelete'+ {_aadAlertId = pAadAlertId_, _aadAccountId = pAadAccountId_}+ -- | Alert to delete. aadAlertId :: Lens' AccountsAlertsDelete Text
gen/Network/Google/Resource/AdSense/Accounts/Alerts/List.hs view
@@ -54,11 +54,14 @@ -- | List the alerts for the specified AdSense account. -- -- /See:/ 'accountsAlertsList' smart constructor.-data AccountsAlertsList = AccountsAlertsList'+data AccountsAlertsList =+ AccountsAlertsList' { _aalLocale :: !(Maybe Text) , _aalAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsAlertsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -70,10 +73,8 @@ :: Text -- ^ 'aalAccountId' -> AccountsAlertsList accountsAlertsList pAalAccountId_ =- AccountsAlertsList'- { _aalLocale = Nothing- , _aalAccountId = pAalAccountId_- }+ AccountsAlertsList' {_aalLocale = Nothing, _aalAccountId = pAalAccountId_}+ -- | The locale to use for translating alert messages. The account locale -- will be used if this is not supplied. The AdSense default (English) will
gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/AdUnits/List.hs view
@@ -64,15 +64,18 @@ -- | List all ad units in the specified custom channel. -- -- /See:/ 'accountsCustomChannelsAdUnitsList' smart constructor.-data AccountsCustomChannelsAdUnitsList = AccountsCustomChannelsAdUnitsList'+data AccountsCustomChannelsAdUnitsList =+ AccountsCustomChannelsAdUnitsList' { _accaulIncludeInactive :: !(Maybe Bool) , _accaulCustomChannelId :: !Text , _accaulAdClientId :: !Text , _accaulAccountId :: !Text , _accaulPageToken :: !(Maybe Text) , _accaulMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsCustomChannelsAdUnitsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -94,7 +97,7 @@ -> Text -- ^ 'accaulAccountId' -> AccountsCustomChannelsAdUnitsList accountsCustomChannelsAdUnitsList pAccaulCustomChannelId_ pAccaulAdClientId_ pAccaulAccountId_ =- AccountsCustomChannelsAdUnitsList'+ AccountsCustomChannelsAdUnitsList' { _accaulIncludeInactive = Nothing , _accaulCustomChannelId = pAccaulCustomChannelId_ , _accaulAdClientId = pAccaulAdClientId_@@ -103,6 +106,7 @@ , _accaulMaxResults = Nothing } + -- | Whether to include inactive ad units. Default: true. accaulIncludeInactive :: Lens' AccountsCustomChannelsAdUnitsList (Maybe Bool) accaulIncludeInactive@@ -144,7 +148,8 @@ . mapping _Coerce instance GoogleRequest- AccountsCustomChannelsAdUnitsList where+ AccountsCustomChannelsAdUnitsList+ where type Rs AccountsCustomChannelsAdUnitsList = AdUnits type Scopes AccountsCustomChannelsAdUnitsList = '["https://www.googleapis.com/auth/adsense",
gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/Get.hs view
@@ -59,12 +59,15 @@ -- specified account. -- -- /See:/ 'accountsCustomChannelsGet' smart constructor.-data AccountsCustomChannelsGet = AccountsCustomChannelsGet'+data AccountsCustomChannelsGet =+ AccountsCustomChannelsGet' { _accgCustomChannelId :: !Text , _accgAdClientId :: !Text , _accgAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsCustomChannelsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -80,11 +83,12 @@ -> Text -- ^ 'accgAccountId' -> AccountsCustomChannelsGet accountsCustomChannelsGet pAccgCustomChannelId_ pAccgAdClientId_ pAccgAccountId_ =- AccountsCustomChannelsGet'+ AccountsCustomChannelsGet' { _accgCustomChannelId = pAccgCustomChannelId_ , _accgAdClientId = pAccgAdClientId_ , _accgAccountId = pAccgAccountId_ }+ -- | Custom channel to retrieve. accgCustomChannelId :: Lens' AccountsCustomChannelsGet Text
gen/Network/Google/Resource/AdSense/Accounts/CustomChannels/List.hs view
@@ -62,13 +62,16 @@ -- account. -- -- /See:/ 'accountsCustomChannelsList' smart constructor.-data AccountsCustomChannelsList = AccountsCustomChannelsList'+data AccountsCustomChannelsList =+ AccountsCustomChannelsList' { _acclAdClientId :: !Text , _acclAccountId :: !Text , _acclPageToken :: !(Maybe Text) , _acclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsCustomChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -85,12 +88,13 @@ -> Text -- ^ 'acclAccountId' -> AccountsCustomChannelsList accountsCustomChannelsList pAcclAdClientId_ pAcclAccountId_ =- AccountsCustomChannelsList'+ AccountsCustomChannelsList' { _acclAdClientId = pAcclAdClientId_ , _acclAccountId = pAcclAccountId_ , _acclPageToken = Nothing , _acclMaxResults = Nothing }+ -- | Ad client for which to list custom channels. acclAdClientId :: Lens' AccountsCustomChannelsList Text
gen/Network/Google/Resource/AdSense/Accounts/Get.hs view
@@ -53,11 +53,14 @@ -- | Get information about the selected AdSense account. -- -- /See:/ 'accountsGet' smart constructor.-data AccountsGet = AccountsGet'+data AccountsGet =+ AccountsGet' { _agTree :: !(Maybe Bool) , _agAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -69,10 +72,8 @@ :: Text -- ^ 'agAccountId' -> AccountsGet accountsGet pAgAccountId_ =- AccountsGet'- { _agTree = Nothing- , _agAccountId = pAgAccountId_- }+ AccountsGet' {_agTree = Nothing, _agAccountId = pAgAccountId_}+ -- | Whether the tree of sub accounts should be returned. agTree :: Lens' AccountsGet (Maybe Bool)
gen/Network/Google/Resource/AdSense/Accounts/List.hs view
@@ -53,11 +53,14 @@ -- | List all accounts available to this AdSense account. -- -- /See:/ 'accountsList' smart constructor.-data AccountsList = AccountsList'+data AccountsList =+ AccountsList' { _alPageToken :: !(Maybe Text) , _alMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -67,11 +70,8 @@ -- * 'alMaxResults' accountsList :: AccountsList-accountsList =- AccountsList'- { _alPageToken = Nothing- , _alMaxResults = Nothing- }+accountsList = AccountsList' {_alPageToken = Nothing, _alMaxResults = Nothing}+ -- | A continuation token, used to page through accounts. To retrieve the -- next page, set this parameter to the value of \"nextPageToken\" from the
gen/Network/Google/Resource/AdSense/Accounts/Payments/List.hs view
@@ -52,10 +52,13 @@ -- | List the payments for the specified AdSense account. -- -- /See:/ 'accountsPaymentsList' smart constructor.-newtype AccountsPaymentsList = AccountsPaymentsList'+newtype AccountsPaymentsList =+ AccountsPaymentsList' { _aplAccountId :: Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsPaymentsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,9 +68,8 @@ :: Text -- ^ 'aplAccountId' -> AccountsPaymentsList accountsPaymentsList pAplAccountId_ =- AccountsPaymentsList'- { _aplAccountId = pAplAccountId_- }+ AccountsPaymentsList' {_aplAccountId = pAplAccountId_}+ -- | Account for which to retrieve the payments. aplAccountId :: Lens' AccountsPaymentsList Text
gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs view
@@ -99,7 +99,8 @@ -- specify \"alt=csv\" as a query parameter. -- -- /See:/ 'accountsReportsGenerate' smart constructor.-data AccountsReportsGenerate = AccountsReportsGenerate'+data AccountsReportsGenerate =+ AccountsReportsGenerate' { _argDimension :: !(Maybe [Text]) , _argLocale :: !(Maybe Text) , _argEndDate :: !Text@@ -112,8 +113,10 @@ , _argStartIndex :: !(Maybe (Textual Int32)) , _argUseTimezoneReporting :: !(Maybe Bool) , _argMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsReportsGenerate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -147,7 +150,7 @@ -> Text -- ^ 'argAccountId' -> AccountsReportsGenerate accountsReportsGenerate pArgEndDate_ pArgStartDate_ pArgAccountId_ =- AccountsReportsGenerate'+ AccountsReportsGenerate' { _argDimension = Nothing , _argLocale = Nothing , _argEndDate = pArgEndDate_@@ -162,6 +165,7 @@ , _argMaxResults = Nothing } + -- | Dimensions to base the report on. argDimension :: Lens' AccountsReportsGenerate [Text] argDimension@@ -266,7 +270,8 @@ mempty instance GoogleRequest- (MediaDownload AccountsReportsGenerate) where+ (MediaDownload AccountsReportsGenerate)+ where type Rs (MediaDownload AccountsReportsGenerate) = Stream type Scopes (MediaDownload AccountsReportsGenerate) =
gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/Generate.hs view
@@ -63,14 +63,17 @@ -- query parameters. -- -- /See:/ 'accountsReportsSavedGenerate' smart constructor.-data AccountsReportsSavedGenerate = AccountsReportsSavedGenerate'+data AccountsReportsSavedGenerate =+ AccountsReportsSavedGenerate' { _arsgLocale :: !(Maybe Text) , _arsgSavedReportId :: !Text , _arsgAccountId :: !Text , _arsgStartIndex :: !(Maybe (Textual Int32)) , _arsgMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsReportsSavedGenerate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,13 +92,14 @@ -> Text -- ^ 'arsgAccountId' -> AccountsReportsSavedGenerate accountsReportsSavedGenerate pArsgSavedReportId_ pArsgAccountId_ =- AccountsReportsSavedGenerate'+ AccountsReportsSavedGenerate' { _arsgLocale = Nothing , _arsgSavedReportId = pArsgSavedReportId_ , _arsgAccountId = pArsgAccountId_ , _arsgStartIndex = Nothing , _arsgMaxResults = Nothing }+ -- | Optional locale to use for translating report output to a local -- language. Defaults to \"en_US\" if not specified.
gen/Network/Google/Resource/AdSense/Accounts/Reports/Saved/List.hs view
@@ -57,12 +57,15 @@ -- | List all saved reports in the specified AdSense account. -- -- /See:/ 'accountsReportsSavedList' smart constructor.-data AccountsReportsSavedList = AccountsReportsSavedList'+data AccountsReportsSavedList =+ AccountsReportsSavedList' { _arslAccountId :: !Text , _arslPageToken :: !(Maybe Text) , _arslMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsReportsSavedList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -76,11 +79,12 @@ :: Text -- ^ 'arslAccountId' -> AccountsReportsSavedList accountsReportsSavedList pArslAccountId_ =- AccountsReportsSavedList'+ AccountsReportsSavedList' { _arslAccountId = pArslAccountId_ , _arslPageToken = Nothing , _arslMaxResults = Nothing }+ -- | Account to which the saved reports belong. arslAccountId :: Lens' AccountsReportsSavedList Text
gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/Get.hs view
@@ -54,11 +54,14 @@ -- | List a specific saved ad style for the specified account. -- -- /See:/ 'accountsSavedadstylesGet' smart constructor.-data AccountsSavedadstylesGet = AccountsSavedadstylesGet'+data AccountsSavedadstylesGet =+ AccountsSavedadstylesGet' { _asgSavedAdStyleId :: !Text , _asgAccountId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsSavedadstylesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,9 @@ -> Text -- ^ 'asgAccountId' -> AccountsSavedadstylesGet accountsSavedadstylesGet pAsgSavedAdStyleId_ pAsgAccountId_ =- AccountsSavedadstylesGet'- { _asgSavedAdStyleId = pAsgSavedAdStyleId_- , _asgAccountId = pAsgAccountId_- }+ AccountsSavedadstylesGet'+ {_asgSavedAdStyleId = pAsgSavedAdStyleId_, _asgAccountId = pAsgAccountId_}+ -- | Saved ad style to retrieve. asgSavedAdStyleId :: Lens' AccountsSavedadstylesGet Text
gen/Network/Google/Resource/AdSense/Accounts/Savedadstyles/List.hs view
@@ -56,12 +56,15 @@ -- | List all saved ad styles in the specified account. -- -- /See:/ 'accountsSavedadstylesList' smart constructor.-data AccountsSavedadstylesList = AccountsSavedadstylesList'+data AccountsSavedadstylesList =+ AccountsSavedadstylesList' { _aslAccountId :: !Text , _aslPageToken :: !(Maybe Text) , _aslMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsSavedadstylesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -75,11 +78,12 @@ :: Text -- ^ 'aslAccountId' -> AccountsSavedadstylesList accountsSavedadstylesList pAslAccountId_ =- AccountsSavedadstylesList'+ AccountsSavedadstylesList' { _aslAccountId = pAslAccountId_ , _aslPageToken = Nothing , _aslMaxResults = Nothing }+ -- | Account for which to list saved ad styles. aslAccountId :: Lens' AccountsSavedadstylesList Text
gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs view
@@ -61,13 +61,16 @@ -- account. -- -- /See:/ 'accountsURLChannelsList' smart constructor.-data AccountsURLChannelsList = AccountsURLChannelsList'+data AccountsURLChannelsList =+ AccountsURLChannelsList' { _auclAdClientId :: !Text , _auclAccountId :: !Text , _auclPageToken :: !(Maybe Text) , _auclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AccountsURLChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -84,12 +87,13 @@ -> Text -- ^ 'auclAccountId' -> AccountsURLChannelsList accountsURLChannelsList pAuclAdClientId_ pAuclAccountId_ =- AccountsURLChannelsList'+ AccountsURLChannelsList' { _auclAdClientId = pAuclAdClientId_ , _auclAccountId = pAuclAccountId_ , _auclPageToken = Nothing , _auclMaxResults = Nothing }+ -- | Ad client for which to list URL channels. auclAdClientId :: Lens' AccountsURLChannelsList Text
gen/Network/Google/Resource/AdSense/AdClients/List.hs view
@@ -53,11 +53,14 @@ -- | List all ad clients in this AdSense account. -- -- /See:/ 'adClientsList' smart constructor.-data AdClientsList = AdClientsList'+data AdClientsList =+ AdClientsList' { _aclPageToken :: !(Maybe Text) , _aclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdClientsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -68,10 +71,8 @@ adClientsList :: AdClientsList adClientsList =- AdClientsList'- { _aclPageToken = Nothing- , _aclMaxResults = Nothing- }+ AdClientsList' {_aclPageToken = Nothing, _aclMaxResults = Nothing}+ -- | A continuation token, used to page through ad clients. To retrieve the -- next page, set this parameter to the value of \"nextPageToken\" from the
gen/Network/Google/Resource/AdSense/AdUnits/CustomChannels/List.hs view
@@ -60,13 +60,16 @@ -- | List all custom channels which the specified ad unit belongs to. -- -- /See:/ 'adUnitsCustomChannelsList' smart constructor.-data AdUnitsCustomChannelsList = AdUnitsCustomChannelsList'+data AdUnitsCustomChannelsList =+ AdUnitsCustomChannelsList' { _aucclAdUnitId :: !Text , _aucclAdClientId :: !Text , _aucclPageToken :: !(Maybe Text) , _aucclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitsCustomChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -83,12 +86,13 @@ -> Text -- ^ 'aucclAdClientId' -> AdUnitsCustomChannelsList adUnitsCustomChannelsList pAucclAdUnitId_ pAucclAdClientId_ =- AdUnitsCustomChannelsList'+ AdUnitsCustomChannelsList' { _aucclAdUnitId = pAucclAdUnitId_ , _aucclAdClientId = pAucclAdClientId_ , _aucclPageToken = Nothing , _aucclMaxResults = Nothing }+ -- | Ad unit for which to list custom channels. aucclAdUnitId :: Lens' AdUnitsCustomChannelsList Text
gen/Network/Google/Resource/AdSense/AdUnits/Get.hs view
@@ -54,11 +54,14 @@ -- | Gets the specified ad unit in the specified ad client. -- -- /See:/ 'adUnitsGet' smart constructor.-data AdUnitsGet = AdUnitsGet'+data AdUnitsGet =+ AdUnitsGet' { _augAdUnitId :: !Text , _augAdClientId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,8 @@ -> Text -- ^ 'augAdClientId' -> AdUnitsGet adUnitsGet pAugAdUnitId_ pAugAdClientId_ =- AdUnitsGet'- { _augAdUnitId = pAugAdUnitId_- , _augAdClientId = pAugAdClientId_- }+ AdUnitsGet' {_augAdUnitId = pAugAdUnitId_, _augAdClientId = pAugAdClientId_}+ -- | Ad unit to retrieve. augAdUnitId :: Lens' AdUnitsGet Text
gen/Network/Google/Resource/AdSense/AdUnits/GetAdCode.hs view
@@ -55,11 +55,14 @@ -- | Get ad code for the specified ad unit. -- -- /See:/ 'adUnitsGetAdCode' smart constructor.-data AdUnitsGetAdCode = AdUnitsGetAdCode'+data AdUnitsGetAdCode =+ AdUnitsGetAdCode' { _augacAdUnitId :: !Text , _augacAdClientId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitsGetAdCode' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -72,10 +75,9 @@ -> Text -- ^ 'augacAdClientId' -> AdUnitsGetAdCode adUnitsGetAdCode pAugacAdUnitId_ pAugacAdClientId_ =- AdUnitsGetAdCode'- { _augacAdUnitId = pAugacAdUnitId_- , _augacAdClientId = pAugacAdClientId_- }+ AdUnitsGetAdCode'+ {_augacAdUnitId = pAugacAdUnitId_, _augacAdClientId = pAugacAdClientId_}+ -- | Ad unit to get the code for. augacAdUnitId :: Lens' AdUnitsGetAdCode Text
gen/Network/Google/Resource/AdSense/AdUnits/List.hs view
@@ -58,13 +58,16 @@ -- | List all ad units in the specified ad client for this AdSense account. -- -- /See:/ 'adUnitsList' smart constructor.-data AdUnitsList = AdUnitsList'+data AdUnitsList =+ AdUnitsList' { _aulIncludeInactive :: !(Maybe Bool) , _aulAdClientId :: !Text , _aulPageToken :: !(Maybe Text) , _aulMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AdUnitsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -80,12 +83,13 @@ :: Text -- ^ 'aulAdClientId' -> AdUnitsList adUnitsList pAulAdClientId_ =- AdUnitsList'+ AdUnitsList' { _aulIncludeInactive = Nothing , _aulAdClientId = pAulAdClientId_ , _aulPageToken = Nothing , _aulMaxResults = Nothing }+ -- | Whether to include inactive ad units. Default: true. aulIncludeInactive :: Lens' AdUnitsList (Maybe Bool)
gen/Network/Google/Resource/AdSense/Alerts/Delete.hs view
@@ -53,10 +53,13 @@ -- account. -- -- /See:/ 'alertsDelete' smart constructor.-newtype AlertsDelete = AlertsDelete'+newtype AlertsDelete =+ AlertsDelete' { _adAlertId :: Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AlertsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,10 +68,8 @@ alertsDelete :: Text -- ^ 'adAlertId' -> AlertsDelete-alertsDelete pAdAlertId_ =- AlertsDelete'- { _adAlertId = pAdAlertId_- }+alertsDelete pAdAlertId_ = AlertsDelete' {_adAlertId = pAdAlertId_}+ -- | Alert to delete. adAlertId :: Lens' AlertsDelete Text
gen/Network/Google/Resource/AdSense/Alerts/List.hs view
@@ -51,10 +51,13 @@ -- | List the alerts for this AdSense account. -- -- /See:/ 'alertsList' smart constructor.-newtype AlertsList = AlertsList'+newtype AlertsList =+ AlertsList' { _alLocale :: Maybe Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AlertsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -62,10 +65,8 @@ -- * 'alLocale' alertsList :: AlertsList-alertsList =- AlertsList'- { _alLocale = Nothing- }+alertsList = AlertsList' {_alLocale = Nothing}+ -- | The locale to use for translating alert messages. The account locale -- will be used if this is not supplied. The AdSense default (English) will
gen/Network/Google/Resource/AdSense/CustomChannels/AdUnits/List.hs view
@@ -61,14 +61,17 @@ -- | List all ad units in the specified custom channel. -- -- /See:/ 'customChannelsAdUnitsList' smart constructor.-data CustomChannelsAdUnitsList = CustomChannelsAdUnitsList'+data CustomChannelsAdUnitsList =+ CustomChannelsAdUnitsList' { _ccaulIncludeInactive :: !(Maybe Bool) , _ccaulCustomChannelId :: !Text , _ccaulAdClientId :: !Text , _ccaulPageToken :: !(Maybe Text) , _ccaulMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannelsAdUnitsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,13 +90,14 @@ -> Text -- ^ 'ccaulAdClientId' -> CustomChannelsAdUnitsList customChannelsAdUnitsList pCcaulCustomChannelId_ pCcaulAdClientId_ =- CustomChannelsAdUnitsList'+ CustomChannelsAdUnitsList' { _ccaulIncludeInactive = Nothing , _ccaulCustomChannelId = pCcaulCustomChannelId_ , _ccaulAdClientId = pCcaulAdClientId_ , _ccaulPageToken = Nothing , _ccaulMaxResults = Nothing }+ -- | Whether to include inactive ad units. Default: true. ccaulIncludeInactive :: Lens' CustomChannelsAdUnitsList (Maybe Bool)
gen/Network/Google/Resource/AdSense/CustomChannels/Get.hs view
@@ -54,11 +54,14 @@ -- | Get the specified custom channel from the specified ad client. -- -- /See:/ 'customChannelsGet' smart constructor.-data CustomChannelsGet = CustomChannelsGet'+data CustomChannelsGet =+ CustomChannelsGet' { _ccgCustomChannelId :: !Text , _ccgAdClientId :: !Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannelsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,11 @@ -> Text -- ^ 'ccgAdClientId' -> CustomChannelsGet customChannelsGet pCcgCustomChannelId_ pCcgAdClientId_ =- CustomChannelsGet'+ CustomChannelsGet' { _ccgCustomChannelId = pCcgCustomChannelId_ , _ccgAdClientId = pCcgAdClientId_ }+ -- | Custom channel to retrieve. ccgCustomChannelId :: Lens' CustomChannelsGet Text
gen/Network/Google/Resource/AdSense/CustomChannels/List.hs view
@@ -59,12 +59,15 @@ -- account. -- -- /See:/ 'customChannelsList' smart constructor.-data CustomChannelsList = CustomChannelsList'+data CustomChannelsList =+ CustomChannelsList' { _cclAdClientId :: !Text , _cclPageToken :: !(Maybe Text) , _cclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CustomChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -78,11 +81,12 @@ :: Text -- ^ 'cclAdClientId' -> CustomChannelsList customChannelsList pCclAdClientId_ =- CustomChannelsList'+ CustomChannelsList' { _cclAdClientId = pCclAdClientId_ , _cclPageToken = Nothing , _cclMaxResults = Nothing }+ -- | Ad client for which to list custom channels. cclAdClientId :: Lens' CustomChannelsList Text
gen/Network/Google/Resource/AdSense/Metadata/Dimensions/List.hs view
@@ -50,14 +50,16 @@ -- -- /See:/ 'metadataDimensionsList' smart constructor. data MetadataDimensionsList =- MetadataDimensionsList'- deriving (Eq,Show,Data,Typeable,Generic)+ MetadataDimensionsList'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MetadataDimensionsList' with the minimum fields required to make a request. -- metadataDimensionsList :: MetadataDimensionsList metadataDimensionsList = MetadataDimensionsList'+ instance GoogleRequest MetadataDimensionsList where type Rs MetadataDimensionsList = Metadata
gen/Network/Google/Resource/AdSense/Metadata/Metrics/List.hs view
@@ -50,14 +50,16 @@ -- -- /See:/ 'metadataMetricsList' smart constructor. data MetadataMetricsList =- MetadataMetricsList'- deriving (Eq,Show,Data,Typeable,Generic)+ MetadataMetricsList'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'MetadataMetricsList' with the minimum fields required to make a request. -- metadataMetricsList :: MetadataMetricsList metadataMetricsList = MetadataMetricsList'+ instance GoogleRequest MetadataMetricsList where type Rs MetadataMetricsList = Metadata
gen/Network/Google/Resource/AdSense/Payments/List.hs view
@@ -49,14 +49,16 @@ -- -- /See:/ 'paymentsList' smart constructor. data PaymentsList =- PaymentsList'- deriving (Eq,Show,Data,Typeable,Generic)+ PaymentsList'+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'PaymentsList' with the minimum fields required to make a request. -- paymentsList :: PaymentsList paymentsList = PaymentsList'+ instance GoogleRequest PaymentsList where type Rs PaymentsList = Payments
gen/Network/Google/Resource/AdSense/Reports/Generate.hs view
@@ -96,7 +96,8 @@ -- specify \"alt=csv\" as a query parameter. -- -- /See:/ 'reportsGenerate' smart constructor.-data ReportsGenerate = ReportsGenerate'+data ReportsGenerate =+ ReportsGenerate' { _rgDimension :: !(Maybe [Text]) , _rgLocale :: !(Maybe Text) , _rgEndDate :: !Text@@ -109,8 +110,10 @@ , _rgStartIndex :: !(Maybe (Textual Int32)) , _rgUseTimezoneReporting :: !(Maybe Bool) , _rgMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReportsGenerate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -143,7 +146,7 @@ -> Text -- ^ 'rgStartDate' -> ReportsGenerate reportsGenerate pRgEndDate_ pRgStartDate_ =- ReportsGenerate'+ ReportsGenerate' { _rgDimension = Nothing , _rgLocale = Nothing , _rgEndDate = pRgEndDate_@@ -158,6 +161,7 @@ , _rgMaxResults = Nothing } + -- | Dimensions to base the report on. rgDimension :: Lens' ReportsGenerate [Text] rgDimension@@ -261,7 +265,8 @@ mempty instance GoogleRequest- (MediaDownload ReportsGenerate) where+ (MediaDownload ReportsGenerate)+ where type Rs (MediaDownload ReportsGenerate) = Stream type Scopes (MediaDownload ReportsGenerate) = Scopes ReportsGenerate
gen/Network/Google/Resource/AdSense/Reports/Saved/Generate.hs view
@@ -60,13 +60,16 @@ -- query parameters. -- -- /See:/ 'reportsSavedGenerate' smart constructor.-data ReportsSavedGenerate = ReportsSavedGenerate'+data ReportsSavedGenerate =+ ReportsSavedGenerate' { _rsgLocale :: !(Maybe Text) , _rsgSavedReportId :: !Text , _rsgStartIndex :: !(Maybe (Textual Int32)) , _rsgMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReportsSavedGenerate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -82,12 +85,13 @@ :: Text -- ^ 'rsgSavedReportId' -> ReportsSavedGenerate reportsSavedGenerate pRsgSavedReportId_ =- ReportsSavedGenerate'+ ReportsSavedGenerate' { _rsgLocale = Nothing , _rsgSavedReportId = pRsgSavedReportId_ , _rsgStartIndex = Nothing , _rsgMaxResults = Nothing }+ -- | Optional locale to use for translating report output to a local -- language. Defaults to \"en_US\" if not specified.
gen/Network/Google/Resource/AdSense/Reports/Saved/List.hs view
@@ -54,11 +54,14 @@ -- | List all saved reports in this AdSense account. -- -- /See:/ 'reportsSavedList' smart constructor.-data ReportsSavedList = ReportsSavedList'+data ReportsSavedList =+ ReportsSavedList' { _rslPageToken :: !(Maybe Text) , _rslMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReportsSavedList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -69,10 +72,8 @@ reportsSavedList :: ReportsSavedList reportsSavedList =- ReportsSavedList'- { _rslPageToken = Nothing- , _rslMaxResults = Nothing- }+ ReportsSavedList' {_rslPageToken = Nothing, _rslMaxResults = Nothing}+ -- | A continuation token, used to page through saved reports. To retrieve -- the next page, set this parameter to the value of \"nextPageToken\" from
gen/Network/Google/Resource/AdSense/Savedadstyles/Get.hs view
@@ -51,10 +51,13 @@ -- | Get a specific saved ad style from the user\'s account. -- -- /See:/ 'savedadstylesGet' smart constructor.-newtype SavedadstylesGet = SavedadstylesGet'+newtype SavedadstylesGet =+ SavedadstylesGet' { _sgSavedAdStyleId :: Text- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedadstylesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -64,9 +67,8 @@ :: Text -- ^ 'sgSavedAdStyleId' -> SavedadstylesGet savedadstylesGet pSgSavedAdStyleId_ =- SavedadstylesGet'- { _sgSavedAdStyleId = pSgSavedAdStyleId_- }+ SavedadstylesGet' {_sgSavedAdStyleId = pSgSavedAdStyleId_}+ -- | Saved ad style to retrieve. sgSavedAdStyleId :: Lens' SavedadstylesGet Text
gen/Network/Google/Resource/AdSense/Savedadstyles/List.hs view
@@ -53,11 +53,14 @@ -- | List all saved ad styles in the user\'s account. -- -- /See:/ 'savedadstylesList' smart constructor.-data SavedadstylesList = SavedadstylesList'+data SavedadstylesList =+ SavedadstylesList' { _slPageToken :: !(Maybe Text) , _slMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'SavedadstylesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -68,10 +71,8 @@ savedadstylesList :: SavedadstylesList savedadstylesList =- SavedadstylesList'- { _slPageToken = Nothing- , _slMaxResults = Nothing- }+ SavedadstylesList' {_slPageToken = Nothing, _slMaxResults = Nothing}+ -- | A continuation token, used to page through saved ad styles. To retrieve -- the next page, set this parameter to the value of \"nextPageToken\" from
gen/Network/Google/Resource/AdSense/URLChannels/List.hs view
@@ -58,12 +58,15 @@ -- account. -- -- /See:/ 'urlChannelsList' smart constructor.-data URLChannelsList = URLChannelsList'+data URLChannelsList =+ URLChannelsList' { _uclAdClientId :: !Text , _uclPageToken :: !(Maybe Text) , _uclMaxResults :: !(Maybe (Textual Int32))- } deriving (Eq,Show,Data,Typeable,Generic)+ }+ deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'URLChannelsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -77,11 +80,12 @@ :: Text -- ^ 'uclAdClientId' -> URLChannelsList urlChannelsList pUclAdClientId_ =- URLChannelsList'+ URLChannelsList' { _uclAdClientId = pUclAdClientId_ , _uclPageToken = Nothing , _uclMaxResults = Nothing }+ -- | Ad client for which to list URL channels. uclAdClientId :: Lens' URLChannelsList Text
gogol-adsense.cabal view
@@ -1,5 +1,5 @@ name: gogol-adsense-version: 0.4.0+version: 0.5.0 synopsis: Google AdSense Management SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues@@ -81,5 +81,5 @@ , Network.Google.AdSense.Types.Sum build-depends:- gogol-core == 0.4.0.*+ gogol-core == 0.5.0.* , base >= 4.7 && < 5