on develop help sign in
Regenerating all services
commitcaf669de42ee9476b1eeccc78759378f460fd7ad authorBrendan Hay <brendan.g.hay@gmail.com> dateFri 2 Oct 2015, 10:08 (11 years ago) parentbec6ff8
207 files changed+4159−4136
gen/src/Gen/Text.hs+5−1 gen/template/toc.ede+1−1 gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer.hs+1−1 gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller.hs+2−2 gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/URLChannels/List.hs+3−3 gogol-admin-datatransfer/gen/Network/Google/AdminDataTransfer.hs+1−1 gogol-admin-directory/gen/Network/Google/AdminDirectory.hs+2−2 gogol-admin-directory/gen/Network/Google/AdminDirectory/Types.hs+1−1 gogol-admin-directory/gen/Network/Google/AdminDirectory/Types/Product.hs+7−8 gogol-admin-emailmigration/gen/Network/Google/AdminEmailMigration.hs+1−1 gogol-admin-reports/gen/Network/Google/AdminReports.hs+1−1 gogol-adsense-host/gen/Network/Google/AdSenseHost.hs+4−4 gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs+3−3 gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs+3−3 gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs+3−3 gogol-adsense/gen/Network/Google/AdSense.hs+3−3 gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+3−3 gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+3−3 gogol-affiliates/gen/Network/Google/Affiliates.hs+1−1 gogol-affiliates/gen/Network/Google/Affiliates/Types/Sum.hs+12−12 gogol-analytics/gen/Network/Google/Analytics.hs+39−39 gogol-analytics/gen/Network/Google/Analytics/Types.hs+26−26 gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+170−168 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Get.hs+216 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hs+216 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hs+232 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Get.hs−216 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Insert.hs−216 gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/List.hs−232 gogol-analytics/gogol-analytics.cabal+3−3 gogol-android-enterprise/gen/Network/Google/AndroidEnterprise.hs+1−1 gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+10−10 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Delete.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Deleteall.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Get.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/List.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Addexternallyhosted.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/List.hs+3−3 gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+3−3 gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue.hs+1−1 gogol-appengine/gen/Network/Google/AppEngine.hs+1−1 gogol-apps-activity/gen/Network/Google/AppsActivity.hs+1−1 gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Sum.hs+45−45 gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Delete.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Get.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+3−3 gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+3−3 gogol-apps-licensing/gen/Network/Google/AppsLicensing.hs+1−1 gogol-apps-reseller/gen/Network/Google/AppsReseller.hs+1−1 gogol-apps-tasks/gen/Network/Google/AppsTasks.hs+1−1 gogol-autoscaler/gen/Network/Google/Autoscaler.hs+1−1 gogol-bigquery/gen/Network/Google/BigQuery.hs+1−1 gogol-billing/gen/Network/Google/Billing.hs+1−1 gogol-blogger/gen/Network/Google/Blogger.hs+1−1 gogol-books/gen/Network/Google/Books.hs+1−1 gogol-civicinfo/gen/Network/Google/CivicInfo.hs+1−1 gogol-classroom/gen/Network/Google/Classroom.hs+1−1 gogol-compute/gen/Network/Google/Compute.hs+19−19 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Delete.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Get.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Insert.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/List.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Patch.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Update.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Delete.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Get.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Insert.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/List.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Patch.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Update.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Validate.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/AggregatedList.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Delete.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Get.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Insert.hs+3−3 gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/List.hs+3−3 gogol-container/gen/Network/Google/Container.hs+1−1 gogol-customsearch/gen/Network/Google/CustomSearch.hs+1−1 gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+3−3 gogol-dataflow/gen/Network/Google/Dataflow.hs+1−1 gogol-datastore/gen/Network/Google/Datastore.hs+1−1 gogol-debugger/gen/Network/Google/Debugger.hs+1−1 gogol-deploymentmanager/gen/Network/Google/DeploymentManager.hs+1−1 gogol-dfareporting/gen/Network/Google/DFAReporting.hs+1−1 gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+12−12 gogol-discovery/gen/Network/Google/Discovery.hs+4−4 gogol-discovery/gen/Network/Google/Discovery/Types.hs+2−2 gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+18−18 gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/GetRest.hs+3−3 gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/List.hs+3−3 gogol-dns/gen/Network/Google/DNS.hs+1−1 gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids.hs+1−1 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+1−1 gogol-drive/gen/Network/Google/Drive.hs+1−1 gogol-fitness/gen/Network/Google/Fitness.hs+1−1 gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+33−33 gogol-fonts/gen/Network/Google/Fonts.hs+1−1 gogol-freebasesearch/gen/Network/Google/FreebaseSearch.hs+1−1 gogol-fusiontables/gen/Network/Google/FusionTables.hs+3−3 gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQL.hs+4−4 gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQLGet.hs+4−4 gogol-games-appstate/gen/Network/Google/AppState.hs+1−1 gogol-games-configuration/gen/Network/Google/GamesConfiguration.hs+1−1 gogol-games-management/gen/Network/Google/GamesManagement.hs+1−1 gogol-games/gen/Network/Google/Games.hs+1−1 gogol-genomics/gen/Network/Google/Genomics.hs+1−1 gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+12−12 gogol-gmail/gen/Network/Google/Gmail.hs+1−1 gogol-groups-migration/gen/Network/Google/GroupsMigration.hs+1−1 gogol-groups-migration/gen/Network/Google/GroupsSettings.hs+1−1 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit.hs+89−89 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+40−40 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+230−238 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/CreateAuthURI.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/CreateAuthURI.hs+50−50 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/DeleteAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DeleteAccount.hs+51−51 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/DownloadAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DownloadAccount.hs+50−51 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetAccountInfo.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetAccountInfo.hs+50−51 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetOOBConfirmationCode.hs+173 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetPublicKeys.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetPublicKeys.hs+29−29 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetRecaptchaParam.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetRecaptchaParam.hs+28−28 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/ResetPassword.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/ResetPassword.hs+50−50 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/SetAccountInfo.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetAccountInfo.hs+44−45 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/UploadAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/UploadAccount.hs+50−50 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/VerifyAssertion.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyAssertion.hs+50−51 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/VerifyPassword.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyPassword.hs+51−52 gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetOobConfirmationCode.hs−171 gogol-identity-toolkit/gogol-identity-toolkit.cabal+12−12 gogol-latencytest/gen/Network/Google/LatencyTest.hs+1−1 gogol-logging/gen/Network/Google/Logging.hs+1−1 gogol-maps-coordinate/gen/Network/Google/MapsCoordinate.hs+1−1 gogol-maps-engine/gen/Network/Google/MapsEngine.hs+1−1 gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Sum.hs+6−6 gogol-mirror/gen/Network/Google/Mirror.hs+1−1 gogol-monitoring/gen/Network/Google/Monitoring.hs+1−1 gogol-oauth2/gen/Network/Google/OAuth2.hs+1−1 gogol-pagespeed/gen/Network/Google/PageSpeed.hs+1−1 gogol-partners/gen/Network/Google/Partners.hs+1−1 gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner.hs+8−8 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Avails/List.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/Get.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/List.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/Get.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/List.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/Country/Get.hs+2−2 gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/List.hs+2−2 gogol-plus-domains/gen/Network/Google/PlusDomains.hs+2−2 gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+1−1 gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+7−8 gogol-plus/gen/Network/Google/Plus.hs+2−2 gogol-plus/gen/Network/Google/Plus/Types.hs+1−1 gogol-plus/gen/Network/Google/Plus/Types/Product.hs+7−8 gogol-prediction/gen/Network/Google/Prediction.hs+1−1 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+1−1 gogol-pubsub/gen/Network/Google/PubSub.hs+1−1 gogol-qpxexpress/gen/Network/Google/QPXExpress.hs+3−3 gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+2−2 gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+26−26 gogol-replicapool-updater/gen/Network/Google/ReplicaPoolUpdater.hs+1−1 gogol-replicapool/gen/Network/Google/ReplicaPool.hs+1−1 gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+1−1 gogol-resourceviews/gen/Network/Google/ResourceViews.hs+1−1 gogol-shopping-content/gen/Network/Google/ShoppingContent.hs+1−1 gogol-siteverification/gen/Network/Google/SiteVerification.hs+1−1 gogol-spectrum/gen/Network/Google/Spectrum.hs+1−1 gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/CreateEphemeral.hs+3−3 gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Delete.hs+3−3 gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Get.hs+3−3 gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Insert.hs+3−3 gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/List.hs+3−3 gogol-sqladmin/gen/Network/Google/SQLAdmin.hs+6−6 gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+1−1 gogol-storage/gen/Network/Google/Storage.hs+1−1 gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Macros/Update.hs+95−95 gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MoveFolders/Update.hs+236 gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Move_folders/Update.hs−235 gogol-tagmanager/gen/Network/Google/TagManager.hs+4−4 gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+126−126 gogol-tagmanager/gogol-tagmanager.cabal+1−1 gogol-translate/gen/Network/Google/Translate.hs+1−1 gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Get.hs+3−3 gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Insert.hs+3−3 gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/List.hs+3−3 gogol-urlshortener/gen/Network/Google/URLShortener.hs+3−3 gogol-useraccounts/gen/Network/Google/UserAccounts.hs+1−1 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/Get.hs+215 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/List.hs+202 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/MarkAsFixed.hs+223 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorscounts/Query.hs+214 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorscounts/Query.hs−209 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/Get.hs−209 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/List.hs−196 gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/MarkAsFixed.hs−216 gogol-webmaster-tools/gen/Network/Google/WebmasterTools.hs+33−33 gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+16−16 gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+161−161 gogol-webmaster-tools/gogol-webmaster-tools.cabal+4−4 gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics.hs+1−1 gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Bind_direct.hs → gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/BindDirect.hs+110−104 gogol-youtube/gen/Network/Google/YouTube.hs+4−4 gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+48−48 gogol-youtube/gogol-youtube.cabal+1−1
gen/src/Gen/Text.hs+5−1
@@ -201,6 +201,7 @@ upperAcronym x = Fold.foldl' (flip (uncurry RE.replaceAll)) x xs
201201 , ("Sql", "SQL")
202202 , ("Apk", "APK")
203203 , ("Os", "OS")
204+ , ("Oob", "OOB")
204205
205206 , ("access", "Access")
206207 , ("account", "Account")
@@ -226,7 +227,7 @@ upperAcronym x = Fold.foldl' (flip (uncurry RE.replaceAll)) x xs
226227 , ("monitor", "Monitor")
227228 , ("note", "Note")
228229 , ("offer", "Offer")
229− , ("part", "Party")
230+ , ("part", "Part")
230231 , ("proper", "Proper")
231232 , ("publish", "Publish")
232233 , ("resource", "Resource")
@@ -240,6 +241,9 @@ upperAcronym x = Fold.foldl' (flip (uncurry RE.replaceAll)) x xs
240241 , ("observe", "Observe")
241242 , ("order", "Order")
242243 , ("position", "Position")
244+ , ("crawl", "Crawl")
245+ , ("error", "Error")
246+ , ("sample", "Sample")
243247 ]
244248
245249acronyms :: [(String, String)]
gen/template/toc.ede+1−1
@@ -6,7 +6,7 @@
66
77{% include "_include/license.ede" %}
88--
9−-- {{ description }}
9+{{ description }}
1010--
1111-- /See:/ <{{ documentationLink }} {{ title }} Reference>
1212module {{ moduleName }}
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Accesses your bidding-account information, submits creatives for
15+-- | Accesses your bidding-account information, submits creatives for
1616-- validation, finds available direct deals, and retrieves performance
1717-- reports.
1818--
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller.hs+2−2
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Gives Ad Exchange seller users access to their inventory and the ability
15+-- | Gives Ad Exchange seller users access to their inventory and the ability
1616-- to generate reports
1717--
1818-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference>
@@ -254,7 +254,7 @@ type AdExchangeSellerAPI =
254254 :<|> AccountsReportsSavedGenerateResource
255255 :<|> AccountsReportsGenerateResource
256256 :<|> AccountsAlertsListResource
257− :<|> AccountsUrlChannelsListResource
257+ :<|> AccountsURLChannelsListResource
258258 :<|> AccountsCustomChannelsListResource
259259 :<|> AccountsCustomChannelsGetResource
260260 :<|> AccountsPreferredDealsListResource
gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/URLChannels/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AdExchangeSeller.Accounts.URLChannels.List
2525 (
2626 -- * REST Resource
27− AccountsUrlChannelsListResource
27+ AccountsURLChannelsListResource
2828
2929 -- * Creating a Request
3030 , accountsURLChannelsList'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @AdexchangesellerAccountsURLChannelsList@ which the
5050-- 'AccountsURLChannelsList'' request conforms to.
51−type AccountsUrlChannelsListResource =
51+type AccountsURLChannelsListResource =
5252 "accounts" :>
5353 Capture "accountId" Text :>
5454 "adclients" :>
@@ -207,6 +207,6 @@ instance GoogleRequest AccountsURLChannelsList' where
207207 (Just AltJSON)
208208 where go
209209 = clientWithRoute
210− (Proxy :: Proxy AccountsUrlChannelsListResource)
210+ (Proxy :: Proxy AccountsURLChannelsListResource)
211211 r
212212 u
gogol-admin-datatransfer/gen/Network/Google/AdminDataTransfer.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Admin Data Transfer API lets you transfer user data from one user to
15+-- | Admin Data Transfer API lets you transfer user data from one user to
1616-- another.
1717--
1818-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference>
gogol-admin-directory/gen/Network/Google/AdminDirectory.hs+2−2
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Admin SDK Directory API lets you view and manage enterprise
15+-- | The Admin SDK Directory API lets you view and manage enterprise
1616-- resources such as users and groups, administrative notifications,
1717-- security features, and more.
1818--
@@ -620,7 +620,7 @@ module Network.Google.AdminDirectory
620620 -- ** UserOrganization
621621 , UserOrganization
622622 , userOrganization
623− , uoDePartyment
623+ , uoDePartment
624624 , uoLocation
625625 , uoCostCenter
626626 , uoDomain
gogol-admin-directory/gen/Network/Google/AdminDirectory/Types.hs+1−1
@@ -406,7 +406,7 @@ module Network.Google.AdminDirectory.Types
406406 -- * UserOrganization
407407 , UserOrganization
408408 , userOrganization
409− , uoDePartyment
409+ , uoDePartment
410410 , uoLocation
411411 , uoCostCenter
412412 , uoDomain
gogol-admin-directory/gen/Network/Google/AdminDirectory/Types/Product.hs+7−8
@@ -3083,7 +3083,7 @@ instance ToJSON UserWebsite where
30833083--
30843084-- /See:/ 'userOrganization' smart constructor.
30853085data UserOrganization = UserOrganization
3086− { _uoDePartyment :: !(Maybe Text)
3086+ { _uoDePartment :: !(Maybe Text)
30873087 , _uoLocation :: !(Maybe Text)
30883088 , _uoCostCenter :: !(Maybe Text)
30893089 , _uoDomain :: !(Maybe Text)
@@ -3100,7 +3100,7 @@ data UserOrganization = UserOrganization
31003100--
31013101-- Use one of the following lenses to modify other fields as desired:
31023102--
3103−-- * 'uoDePartyment'
3103+-- * 'uoDePartment'
31043104--
31053105-- * 'uoLocation'
31063106--
@@ -3125,7 +3125,7 @@ userOrganization
31253125 :: UserOrganization
31263126userOrganization =
31273127 UserOrganization
3128− { _uoDePartyment = Nothing
3128+ { _uoDePartment = Nothing
31293129 , _uoLocation = Nothing
31303130 , _uoCostCenter = Nothing
31313131 , _uoDomain = Nothing
@@ -3139,10 +3139,9 @@ userOrganization =
31393139 }
31403140
31413141-- | Department within the organization.
3142−uoDePartyment :: Lens' UserOrganization (Maybe Text)
3143−uoDePartyment
3144− = lens _uoDePartyment
3145− (\ s a -> s{_uoDePartyment = a})
3142+uoDePartment :: Lens' UserOrganization (Maybe Text)
3143+uoDePartment
3144+ = lens _uoDePartment (\ s a -> s{_uoDePartment = a})
31463145
31473146-- | Location of the organization. This need not be fully qualified address.
31483147uoLocation :: Lens' UserOrganization (Maybe Text)
@@ -3214,7 +3213,7 @@ instance ToJSON UserOrganization where
32143213 toJSON UserOrganization{..}
32153214 = object
32163215 (catMaybes
3217− [("department" .=) <$> _uoDePartyment,
3216+ [("department" .=) <$> _uoDePartment,
32183217 ("location" .=) <$> _uoLocation,
32193218 ("costCenter" .=) <$> _uoCostCenter,
32203219 ("domain" .=) <$> _uoDomain,
gogol-admin-emailmigration/gen/Network/Google/AdminEmailMigration.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Email Migration API lets you migrate emails of users to Google backends.
15+-- | Email Migration API lets you migrate emails of users to Google backends.
1616--
1717-- /See:/ <https://developers.google.com/admin-sdk/email-migration/v2/ Email Migration API v2 Reference>
1818module Network.Google.AdminEmailMigration
gogol-admin-reports/gen/Network/Google/AdminReports.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Allows the administrators of Google Apps customers to fetch reports
15+-- | Allows the administrators of Google Apps customers to fetch reports
1616-- about the usage, collaboration, security and risk for their users.
1717--
1818-- /See:/ <https://developers.google.com/admin-sdk/reports/ Admin Reports API Reference>
gogol-adsense-host/gen/Network/Google/AdSenseHost.hs+4−4
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Gives AdSense Hosts access to report generation, ad code generation, and
15+-- | Gives AdSense Hosts access to report generation, ad code generation, and
1616-- publisher management capabilities.
1717--
1818-- /See:/ <https://developers.google.com/adsense/host/ AdSense Host API Reference>
@@ -327,9 +327,9 @@ type AdSenseHostAPI =
327327 :<|> AccountsListResource
328328 :<|> AccountsGetResource
329329 :<|> ReportsGenerateResource
330− :<|> UrlChannelsInsertResource
331− :<|> UrlChannelsListResource
332− :<|> UrlChannelsDeleteResource
330+ :<|> URLChannelsInsertResource
331+ :<|> URLChannelsListResource
332+ :<|> URLChannelsDeleteResource
333333 :<|> CustomChannelsInsertResource
334334 :<|> CustomChannelsListResource
335335 :<|> CustomChannelsPatchResource
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Delete.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AdSenseHost.URLChannels.Delete
2424 (
2525 -- * REST Resource
26− UrlChannelsDeleteResource
26+ URLChannelsDeleteResource
2727
2828 -- * Creating a Request
2929 , uRLChannelsDelete'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @AdsensehostURLChannelsDelete@ which the
4747-- 'URLChannelsDelete'' request conforms to.
48−type UrlChannelsDeleteResource =
48+type URLChannelsDeleteResource =
4949 "adclients" :>
5050 Capture "adClientId" Text :>
5151 "urlchannels" :>
@@ -173,6 +173,6 @@ instance GoogleRequest URLChannelsDelete' where
173173 (Just AltJSON)
174174 where go
175175 = clientWithRoute
176− (Proxy :: Proxy UrlChannelsDeleteResource)
176+ (Proxy :: Proxy URLChannelsDeleteResource)
177177 r
178178 u
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/Insert.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AdSenseHost.URLChannels.Insert
2424 (
2525 -- * REST Resource
26− UrlChannelsInsertResource
26+ URLChannelsInsertResource
2727
2828 -- * Creating a Request
2929 , uRLChannelsInsert'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @AdsensehostURLChannelsInsert@ which the
4747-- 'URLChannelsInsert'' request conforms to.
48−type UrlChannelsInsertResource =
48+type URLChannelsInsertResource =
4949 "adclients" :>
5050 Capture "adClientId" Text :>
5151 "urlchannels" :>
@@ -172,6 +172,6 @@ instance GoogleRequest URLChannelsInsert' where
172172 _uciURLChannel
173173 where go
174174 = clientWithRoute
175− (Proxy :: Proxy UrlChannelsInsertResource)
175+ (Proxy :: Proxy URLChannelsInsertResource)
176176 r
177177 u
gogol-adsense-host/gen/Network/Google/Resource/AdSenseHost/URLChannels/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AdSenseHost.URLChannels.List
2424 (
2525 -- * REST Resource
26− UrlChannelsListResource
26+ URLChannelsListResource
2727
2828 -- * Creating a Request
2929 , uRLChannelsList'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @AdsensehostURLChannelsList@ which the
4848-- 'URLChannelsList'' request conforms to.
49−type UrlChannelsListResource =
49+type URLChannelsListResource =
5050 "adclients" :>
5151 Capture "adClientId" Text :>
5252 "urlchannels" :>
@@ -186,6 +186,6 @@ instance GoogleRequest URLChannelsList' where
186186 (Just AltJSON)
187187 where go
188188 = clientWithRoute
189− (Proxy :: Proxy UrlChannelsListResource)
189+ (Proxy :: Proxy URLChannelsListResource)
190190 r
191191 u
gogol-adsense/gen/Network/Google/AdSense.hs+3−3
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Gives AdSense publishers access to their inventory and the ability to
15+-- | Gives AdSense publishers access to their inventory and the ability to
1616-- generate reports
1717--
1818-- /See:/ <https://developers.google.com/adsense/management/ AdSense Management API Reference>
@@ -457,7 +457,7 @@ type AdSenseAPI =
457457 :<|> AccountsAdUnitsListResource
458458 :<|> AccountsAdUnitsGetResource
459459 :<|> AccountsAdUnitsGetAdCodeResource
460− :<|> AccountsUrlChannelsListResource
460+ :<|> AccountsURLChannelsListResource
461461 :<|> AccountsCustomChannelsAdUnitsListResource
462462 :<|> AccountsCustomChannelsListResource
463463 :<|> AccountsCustomChannelsGetResource
@@ -475,7 +475,7 @@ type AdSenseAPI =
475475 :<|> AdUnitsListResource
476476 :<|> AdUnitsGetResource
477477 :<|> AdUnitsGetAdCodeResource
478− :<|> UrlChannelsListResource
478+ :<|> URLChannelsListResource
479479 :<|> CustomChannelsAdUnitsListResource
480480 :<|> CustomChannelsListResource
481481 :<|> CustomChannelsGetResource
gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/URLChannels/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AdSense.Accounts.URLChannels.List
2525 (
2626 -- * REST Resource
27− AccountsUrlChannelsListResource
27+ AccountsURLChannelsListResource
2828
2929 -- * Creating a Request
3030 , accountsURLChannelsList'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @AdsenseAccountsURLChannelsList@ which the
5050-- 'AccountsURLChannelsList'' request conforms to.
51−type AccountsUrlChannelsListResource =
51+type AccountsURLChannelsListResource =
5252 "accounts" :>
5353 Capture "accountId" Text :>
5454 "adclients" :>
@@ -207,6 +207,6 @@ instance GoogleRequest AccountsURLChannelsList' where
207207 (Just AltJSON)
208208 where go
209209 = clientWithRoute
210− (Proxy :: Proxy AccountsUrlChannelsListResource)
210+ (Proxy :: Proxy AccountsURLChannelsListResource)
211211 r
212212 u
gogol-adsense/gen/Network/Google/Resource/AdSense/URLChannels/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AdSense.URLChannels.List
2525 (
2626 -- * REST Resource
27− UrlChannelsListResource
27+ URLChannelsListResource
2828
2929 -- * Creating a Request
3030 , uRLChannelsList'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @AdsenseURLChannelsList@ which the
4949-- 'URLChannelsList'' request conforms to.
50−type UrlChannelsListResource =
50+type URLChannelsListResource =
5151 "adclients" :>
5252 Capture "adClientId" Text :>
5353 "urlchannels" :>
@@ -188,6 +188,6 @@ instance GoogleRequest URLChannelsList' where
188188 (Just AltJSON)
189189 where go
190190 = clientWithRoute
191− (Proxy :: Proxy UrlChannelsListResource)
191+ (Proxy :: Proxy URLChannelsListResource)
192192 r
193193 u
gogol-affiliates/gen/Network/Google/Affiliates.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you have programmatic access to your Google Affiliate Network data.
15+-- | Lets you have programmatic access to your Google Affiliate Network data.
1616--
1717-- /See:/ <https://developers.google.com/affiliate-network/ Google Affiliate Network API Reference>
1818module Network.Google.Affiliates
gogol-affiliates/gen/Network/Google/Affiliates/Types/Sum.hs+12−12
@@ -20,10 +20,10 @@ import Network.Google.Prelude
2020-- | The role of the requester. Valid values: \'advertisers\' or
2121-- \'publishers\'.
2222data GanPublishersGetRole
23− = Advertisers
23+ = GPGRAdvertisers
2424 -- ^ @advertisers@
2525 -- The requester is requesting as an advertiser.
26− | Publishers
26+ | GPGRPublishers
2727 -- ^ @publishers@
2828 -- The requester is requesting as a publisher.
2929 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
@@ -32,14 +32,14 @@ instance Hashable GanPublishersGetRole
3232
3333instance FromText GanPublishersGetRole where
3434 fromText = \case
35− "advertisers" -> Just Advertisers
36− "publishers" -> Just Publishers
35+ "advertisers" -> Just GPGRAdvertisers
36+ "publishers" -> Just GPGRPublishers
3737 _ -> Nothing
3838
3939instance ToText GanPublishersGetRole where
4040 toText = \case
41− Advertisers -> "advertisers"
42− Publishers -> "publishers"
41+ GPGRAdvertisers -> "advertisers"
42+ GPGRPublishers -> "publishers"
4343
4444instance FromJSON GanPublishersGetRole where
4545 parseJSON = parseJSONText "GanPublishersGetRole"
@@ -343,9 +343,9 @@ instance ToJSON GanPublishersListRole where
343343
344344-- | The role of the author of the link.
345345data GanLinksListAuthorship
346− = Advertiser
346+ = GLLAAdvertiser
347347 -- ^ @advertiser@
348− | Publisher
348+ | GLLAPublisher
349349 -- ^ @publisher@
350350 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
351351
@@ -353,14 +353,14 @@ instance Hashable GanLinksListAuthorship
353353
354354instance FromText GanLinksListAuthorship where
355355 fromText = \case
356− "advertiser" -> Just Advertiser
357− "publisher" -> Just Publisher
356+ "advertiser" -> Just GLLAAdvertiser
357+ "publisher" -> Just GLLAPublisher
358358 _ -> Nothing
359359
360360instance ToText GanLinksListAuthorship where
361361 toText = \case
362− Advertiser -> "advertiser"
363− Publisher -> "publisher"
362+ GLLAAdvertiser -> "advertiser"
363+ GLLAPublisher -> "publisher"
364364
365365instance FromJSON GanLinksListAuthorship where
366366 parseJSON = parseJSONText "GanLinksListAuthorship"
gogol-analytics/gen/Network/Google/Analytics.hs+39−39
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | View and manage your Google Analytics data
15+-- | View and manage your Google Analytics data
1616--
1717-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference>
1818module Network.Google.Analytics
@@ -188,14 +188,14 @@ module Network.Google.Analytics
188188 -- ** AnalyticsManagementSegmentsList
189189 , module Network.Google.Resource.Analytics.Management.Segments.List
190190
191− -- ** AnalyticsManagementUnsampledReportsGet
192− , module Network.Google.Resource.Analytics.Management.UnsampledReports.Get
191+ -- ** AnalyticsManagementUnSampledReportsGet
192+ , module Network.Google.Resource.Analytics.Management.UnSampledReports.Get
193193
194− -- ** AnalyticsManagementUnsampledReportsInsert
195− , module Network.Google.Resource.Analytics.Management.UnsampledReports.Insert
194+ -- ** AnalyticsManagementUnSampledReportsInsert
195+ , module Network.Google.Resource.Analytics.Management.UnSampledReports.Insert
196196
197− -- ** AnalyticsManagementUnsampledReportsList
198− , module Network.Google.Resource.Analytics.Management.UnsampledReports.List
197+ -- ** AnalyticsManagementUnSampledReportsList
198+ , module Network.Google.Resource.Analytics.Management.UnSampledReports.List
199199
200200 -- ** AnalyticsManagementUploadsDeleteUploadData
201201 , module Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData
@@ -269,17 +269,17 @@ module Network.Google.Analytics
269269 , gdchName
270270 , gdchDataType
271271
272− -- ** UnsampledReports
273− , UnsampledReports
274− , unsampledReports
275− , urNextLink
276− , urItemsPerPage
277− , urKind
278− , urUsername
279− , urItems
280− , urTotalResults
281− , urStartIndex
282− , urPreviousLink
272+ -- ** UnSampledReports
273+ , UnSampledReports
274+ , unSampledReports
275+ , usrNextLink
276+ , usrItemsPerPage
277+ , usrKind
278+ , usrUsername
279+ , usrItems
280+ , usrTotalResults
281+ , usrStartIndex
282+ , usrPreviousLink
283283
284284 -- ** GaDataQuery
285285 , GaDataQuery
@@ -296,9 +296,9 @@ module Network.Google.Analytics
296296 , gdqSegment
297297 , gdqStartDate
298298
299− -- ** UnsampledReport
300− , UnsampledReport
301− , unsampledReport
299+ -- ** UnSampledReport
300+ , UnSampledReport
301+ , unSampledReport
302302 , uDownloadType
303303 , uStatus
304304 , uMetrics
@@ -408,10 +408,10 @@ module Network.Google.Analytics
408408 -- ** AnalyticsDataMcfGetSamplingLevel
409409 , AnalyticsDataMcfGetSamplingLevel (..)
410410
411− -- ** UnsampledReportDriveDownloadDetails
412− , UnsampledReportDriveDownloadDetails
413− , unsampledReportDriveDownloadDetails
414− , urdddDocumentId
411+ -- ** UnSampledReportDriveDownloadDetails
412+ , UnSampledReportDriveDownloadDetails
413+ , unSampledReportDriveDownloadDetails
414+ , usrdddDocumentId
415415
416416 -- ** WebPropertyChildLink
417417 , WebPropertyChildLink
@@ -505,9 +505,9 @@ module Network.Google.Analytics
505505 -- ** UserRef
506506 , UserRef
507507 , userRef
508− , useEmail
509− , useKind
510− , useId
508+ , urEmail
509+ , urKind
510+ , urId
511511
512512 -- ** ProfilePermissions
513513 , ProfilePermissions
@@ -1210,11 +1210,11 @@ module Network.Google.Analytics
12101210 , McfDataTotalsForAllResults
12111211 , mcfDataTotalsForAllResults
12121212
1213− -- ** UnsampledReportCloudStorageDownloadDetails
1214− , UnsampledReportCloudStorageDownloadDetails
1215− , unsampledReportCloudStorageDownloadDetails
1216− , urcsddObjectId
1217− , urcsddBucketId
1213+ -- ** UnSampledReportCloudStorageDownloadDetails
1214+ , UnSampledReportCloudStorageDownloadDetails
1215+ , unSampledReportCloudStorageDownloadDetails
1216+ , usrcsddObjectId
1217+ , usrcsddBucketId
12181218
12191219 -- ** GoalURLDestinationDetailsSteps
12201220 , GoalURLDestinationDetailsSteps
@@ -1301,9 +1301,9 @@ import Network.Google.Resource.Analytics.Management.ProfileUserLinks.I
13011301import Network.Google.Resource.Analytics.Management.ProfileUserLinks.List
13021302import Network.Google.Resource.Analytics.Management.ProfileUserLinks.Update
13031303import Network.Google.Resource.Analytics.Management.Segments.List
1304−import Network.Google.Resource.Analytics.Management.UnsampledReports.Get
1305−import Network.Google.Resource.Analytics.Management.UnsampledReports.Insert
1306−import Network.Google.Resource.Analytics.Management.UnsampledReports.List
1304+import Network.Google.Resource.Analytics.Management.UnSampledReports.Get
1305+import Network.Google.Resource.Analytics.Management.UnSampledReports.Insert
1306+import Network.Google.Resource.Analytics.Management.UnSampledReports.List
13071307import Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData
13081308import Network.Google.Resource.Analytics.Management.Uploads.Get
13091309import Network.Google.Resource.Analytics.Management.Uploads.List
@@ -1339,9 +1339,9 @@ type AnalyticsAPI =
13391339 :<|> ManagementWebPropertyAdWordsLinksGetResource
13401340 :<|> ManagementWebPropertyAdWordsLinksDeleteResource
13411341 :<|> ManagementWebPropertyAdWordsLinksUpdateResource
1342− :<|> ManagementUnsampledReportsInsertResource
1343− :<|> ManagementUnsampledReportsListResource
1344− :<|> ManagementUnsampledReportsGetResource
1342+ :<|> ManagementUnSampledReportsInsertResource
1343+ :<|> ManagementUnSampledReportsListResource
1344+ :<|> ManagementUnSampledReportsGetResource
13451345 :<|> ManagementAccountsListResource
13461346 :<|> ManagementExperimentsInsertResource
13471347 :<|> ManagementExperimentsListResource
gogol-analytics/gen/Network/Google/Analytics/Types.hs+26−26
@@ -24,17 +24,17 @@ module Network.Google.Analytics.Types
2424 , gdchName
2525 , gdchDataType
2626
27− -- * UnsampledReports
28− , UnsampledReports
29− , unsampledReports
30− , urNextLink
31− , urItemsPerPage
32− , urKind
33− , urUsername
34− , urItems
35− , urTotalResults
36− , urStartIndex
37− , urPreviousLink
27+ -- * UnSampledReports
28+ , UnSampledReports
29+ , unSampledReports
30+ , usrNextLink
31+ , usrItemsPerPage
32+ , usrKind
33+ , usrUsername
34+ , usrItems
35+ , usrTotalResults
36+ , usrStartIndex
37+ , usrPreviousLink
3838
3939 -- * GaDataQuery
4040 , GaDataQuery
@@ -51,9 +51,9 @@ module Network.Google.Analytics.Types
5151 , gdqSegment
5252 , gdqStartDate
5353
54− -- * UnsampledReport
55− , UnsampledReport
56− , unsampledReport
54+ -- * UnSampledReport
55+ , UnSampledReport
56+ , unSampledReport
5757 , uDownloadType
5858 , uStatus
5959 , uMetrics
@@ -163,10 +163,10 @@ module Network.Google.Analytics.Types
163163 -- * AnalyticsDataMcfGetSamplingLevel
164164 , AnalyticsDataMcfGetSamplingLevel (..)
165165
166− -- * UnsampledReportDriveDownloadDetails
167− , UnsampledReportDriveDownloadDetails
168− , unsampledReportDriveDownloadDetails
169− , urdddDocumentId
166+ -- * UnSampledReportDriveDownloadDetails
167+ , UnSampledReportDriveDownloadDetails
168+ , unSampledReportDriveDownloadDetails
169+ , usrdddDocumentId
170170
171171 -- * WebPropertyChildLink
172172 , WebPropertyChildLink
@@ -260,9 +260,9 @@ module Network.Google.Analytics.Types
260260 -- * UserRef
261261 , UserRef
262262 , userRef
263− , useEmail
264− , useKind
265− , useId
263+ , urEmail
264+ , urKind
265+ , urId
266266
267267 -- * ProfilePermissions
268268 , ProfilePermissions
@@ -965,11 +965,11 @@ module Network.Google.Analytics.Types
965965 , McfDataTotalsForAllResults
966966 , mcfDataTotalsForAllResults
967967
968− -- * UnsampledReportCloudStorageDownloadDetails
969− , UnsampledReportCloudStorageDownloadDetails
970− , unsampledReportCloudStorageDownloadDetails
971− , urcsddObjectId
972− , urcsddBucketId
968+ -- * UnSampledReportCloudStorageDownloadDetails
969+ , UnSampledReportCloudStorageDownloadDetails
970+ , unSampledReportCloudStorageDownloadDetails
971+ , usrcsddObjectId
972+ , usrcsddBucketId
973973
974974 -- * GoalURLDestinationDetailsSteps
975975 , GoalURLDestinationDetailsSteps
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+170−168
@@ -82,104 +82,106 @@ instance ToJSON GaDataColumnHeaders where
8282-- unsampled reports. Each resource in the unsampled report collection
8383-- corresponds to a single Analytics unsampled report.
8484--
85−-- /See:/ 'unsampledReports' smart constructor.
86−data UnsampledReports = UnsampledReports
87− { _urNextLink :: !(Maybe Text)
88− , _urItemsPerPage :: !(Maybe Int32)
89− , _urKind :: !Text
90− , _urUsername :: !(Maybe Text)
91− , _urItems :: !(Maybe [UnsampledReport])
92− , _urTotalResults :: !(Maybe Int32)
93− , _urStartIndex :: !(Maybe Int32)
94− , _urPreviousLink :: !(Maybe Text)
85+-- /See:/ 'unSampledReports' smart constructor.
86+data UnSampledReports = UnSampledReports
87+ { _usrNextLink :: !(Maybe Text)
88+ , _usrItemsPerPage :: !(Maybe Int32)
89+ , _usrKind :: !Text
90+ , _usrUsername :: !(Maybe Text)
91+ , _usrItems :: !(Maybe [UnSampledReport])
92+ , _usrTotalResults :: !(Maybe Int32)
93+ , _usrStartIndex :: !(Maybe Int32)
94+ , _usrPreviousLink :: !(Maybe Text)
9595 } deriving (Eq,Read,Show,Data,Typeable,Generic)
9696
97−-- | Creates a value of 'UnsampledReports' with the minimum fields required to make a request.
97+-- | Creates a value of 'UnSampledReports' with the minimum fields required to make a request.
9898--
9999-- Use one of the following lenses to modify other fields as desired:
100100--
101−-- * 'urNextLink'
101+-- * 'usrNextLink'
102102--
103−-- * 'urItemsPerPage'
103+-- * 'usrItemsPerPage'
104104--
105−-- * 'urKind'
105+-- * 'usrKind'
106106--
107−-- * 'urUsername'
107+-- * 'usrUsername'
108108--
109−-- * 'urItems'
109+-- * 'usrItems'
110110--
111−-- * 'urTotalResults'
111+-- * 'usrTotalResults'
112112--
113−-- * 'urStartIndex'
113+-- * 'usrStartIndex'
114114--
115−-- * 'urPreviousLink'
116−unsampledReports
117− :: UnsampledReports
118−unsampledReports =
119− UnsampledReports
120− { _urNextLink = Nothing
121− , _urItemsPerPage = Nothing
122− , _urKind = "analytics#unsampledReports"
123− , _urUsername = Nothing
124− , _urItems = Nothing
125− , _urTotalResults = Nothing
126− , _urStartIndex = Nothing
127− , _urPreviousLink = Nothing
115+-- * 'usrPreviousLink'
116+unSampledReports
117+ :: UnSampledReports
118+unSampledReports =
119+ UnSampledReports
120+ { _usrNextLink = Nothing
121+ , _usrItemsPerPage = Nothing
122+ , _usrKind = "analytics#unsampledReports"
123+ , _usrUsername = Nothing
124+ , _usrItems = Nothing
125+ , _usrTotalResults = Nothing
126+ , _usrStartIndex = Nothing
127+ , _usrPreviousLink = Nothing
128128 }
129129
130130-- | Link to next page for this unsampled report collection.
131−urNextLink :: Lens' UnsampledReports (Maybe Text)
132−urNextLink
133− = lens _urNextLink (\ s a -> s{_urNextLink = a})
131+usrNextLink :: Lens' UnSampledReports (Maybe Text)
132+usrNextLink
133+ = lens _usrNextLink (\ s a -> s{_usrNextLink = a})
134134
135135-- | The maximum number of resources the response can contain, regardless of
136136-- the actual number of resources returned. Its value ranges from 1 to 1000
137137-- with a value of 1000 by default, or otherwise specified by the
138138-- max-results query parameter.
139−urItemsPerPage :: Lens' UnsampledReports (Maybe Int32)
140−urItemsPerPage
141− = lens _urItemsPerPage
142− (\ s a -> s{_urItemsPerPage = a})
139+usrItemsPerPage :: Lens' UnSampledReports (Maybe Int32)
140+usrItemsPerPage
141+ = lens _usrItemsPerPage
142+ (\ s a -> s{_usrItemsPerPage = a})
143143
144144-- | Collection type.
145−urKind :: Lens' UnsampledReports Text
146−urKind = lens _urKind (\ s a -> s{_urKind = a})
145+usrKind :: Lens' UnSampledReports Text
146+usrKind = lens _usrKind (\ s a -> s{_usrKind = a})
147147
148148-- | Email ID of the authenticated user
149−urUsername :: Lens' UnsampledReports (Maybe Text)
150−urUsername
151− = lens _urUsername (\ s a -> s{_urUsername = a})
149+usrUsername :: Lens' UnSampledReports (Maybe Text)
150+usrUsername
151+ = lens _usrUsername (\ s a -> s{_usrUsername = a})
152152
153153-- | A list of unsampled reports.
154−urItems :: Lens' UnsampledReports [UnsampledReport]
155−urItems
156− = lens _urItems (\ s a -> s{_urItems = a}) . _Default
154+usrItems :: Lens' UnSampledReports [UnSampledReport]
155+usrItems
156+ = lens _usrItems (\ s a -> s{_usrItems = a}) .
157+ _Default
157158 . _Coerce
158159
159160-- | The total number of results for the query, regardless of the number of
160161-- resources in the result.
161−urTotalResults :: Lens' UnsampledReports (Maybe Int32)
162−urTotalResults
163− = lens _urTotalResults
164− (\ s a -> s{_urTotalResults = a})
162+usrTotalResults :: Lens' UnSampledReports (Maybe Int32)
163+usrTotalResults
164+ = lens _usrTotalResults
165+ (\ s a -> s{_usrTotalResults = a})
165166
166167-- | The starting index of the resources, which is 1 by default or otherwise
167168-- specified by the start-index query parameter.
168−urStartIndex :: Lens' UnsampledReports (Maybe Int32)
169−urStartIndex
170− = lens _urStartIndex (\ s a -> s{_urStartIndex = a})
169+usrStartIndex :: Lens' UnSampledReports (Maybe Int32)
170+usrStartIndex
171+ = lens _usrStartIndex
172+ (\ s a -> s{_usrStartIndex = a})
171173
172174-- | Link to previous page for this unsampled report collection.
173−urPreviousLink :: Lens' UnsampledReports (Maybe Text)
174−urPreviousLink
175− = lens _urPreviousLink
176− (\ s a -> s{_urPreviousLink = a})
175+usrPreviousLink :: Lens' UnSampledReports (Maybe Text)
176+usrPreviousLink
177+ = lens _usrPreviousLink
178+ (\ s a -> s{_usrPreviousLink = a})
177179
178−instance FromJSON UnsampledReports where
180+instance FromJSON UnSampledReports where
179181 parseJSON
180− = withObject "UnsampledReports"
182+ = withObject "UnSampledReports"
181183 (\ o ->
182− UnsampledReports <$>
184+ UnSampledReports <$>
183185 (o .:? "nextLink") <*> (o .:? "itemsPerPage") <*>
184186 (o .:? "kind" .!= "analytics#unsampledReports")
185187 <*> (o .:? "username")
@@ -188,18 +190,18 @@ instance FromJSON UnsampledReports where
188190 <*> (o .:? "startIndex")
189191 <*> (o .:? "previousLink"))
190192
191−instance ToJSON UnsampledReports where
192− toJSON UnsampledReports{..}
193+instance ToJSON UnSampledReports where
194+ toJSON UnSampledReports{..}
193195 = object
194196 (catMaybes
195− [("nextLink" .=) <$> _urNextLink,
196− ("itemsPerPage" .=) <$> _urItemsPerPage,
197− Just ("kind" .= _urKind),
198− ("username" .=) <$> _urUsername,
199− ("items" .=) <$> _urItems,
200− ("totalResults" .=) <$> _urTotalResults,
201− ("startIndex" .=) <$> _urStartIndex,
202− ("previousLink" .=) <$> _urPreviousLink])
197+ [("nextLink" .=) <$> _usrNextLink,
198+ ("itemsPerPage" .=) <$> _usrItemsPerPage,
199+ Just ("kind" .= _usrKind),
200+ ("username" .=) <$> _usrUsername,
201+ ("items" .=) <$> _usrItems,
202+ ("totalResults" .=) <$> _usrTotalResults,
203+ ("startIndex" .=) <$> _usrStartIndex,
204+ ("previousLink" .=) <$> _usrPreviousLink])
203205
204206-- | Analytics data request query parameters.
205207--
@@ -356,12 +358,12 @@ instance ToJSON GaDataQuery where
356358
357359-- | JSON template for Analytics unsampled report resource.
358360--
359−-- /See:/ 'unsampledReport' smart constructor.
360−data UnsampledReport = UnsampledReport
361+-- /See:/ 'unSampledReport' smart constructor.
362+data UnSampledReport = UnSampledReport
361363 { _uDownloadType :: !(Maybe Text)
362364 , _uStatus :: !(Maybe Text)
363365 , _uMetrics :: !(Maybe Text)
364− , _uDriveDownloadDetails :: !(Maybe UnsampledReportDriveDownloadDetails)
366+ , _uDriveDownloadDetails :: !(Maybe UnSampledReportDriveDownloadDetails)
365367 , _uWebPropertyId :: !(Maybe Text)
366368 , _uKind :: !Text
367369 , _uCreated :: !(Maybe UTCTime)
@@ -375,11 +377,11 @@ data UnsampledReport = UnsampledReport
375377 , _uTitle :: !(Maybe Text)
376378 , _uDimensions :: !(Maybe Text)
377379 , _uSegment :: !(Maybe Text)
378− , _uCloudStorageDownloadDetails :: !(Maybe UnsampledReportCloudStorageDownloadDetails)
380+ , _uCloudStorageDownloadDetails :: !(Maybe UnSampledReportCloudStorageDownloadDetails)
379381 , _uStartDate :: !(Maybe Text)
380382 } deriving (Eq,Read,Show,Data,Typeable,Generic)
381383
382−-- | Creates a value of 'UnsampledReport' with the minimum fields required to make a request.
384+-- | Creates a value of 'UnSampledReport' with the minimum fields required to make a request.
383385--
384386-- Use one of the following lenses to modify other fields as desired:
385387--
@@ -420,10 +422,10 @@ data UnsampledReport = UnsampledReport
420422-- * 'uCloudStorageDownloadDetails'
421423--
422424-- * 'uStartDate'
423−unsampledReport
424− :: UnsampledReport
425−unsampledReport =
426− UnsampledReport
425+unSampledReport
426+ :: UnSampledReport
427+unSampledReport =
428+ UnSampledReport
427429 { _uDownloadType = Nothing
428430 , _uStatus = Nothing
429431 , _uMetrics = Nothing
@@ -446,101 +448,101 @@ unsampledReport =
446448 }
447449
448450-- | The type of download you need to use for the report data file.
449−uDownloadType :: Lens' UnsampledReport (Maybe Text)
451+uDownloadType :: Lens' UnSampledReport (Maybe Text)
450452uDownloadType
451453 = lens _uDownloadType
452454 (\ s a -> s{_uDownloadType = a})
453455
454456-- | Status of this unsampled report. Possible values are PENDING, COMPLETED,
455457-- or FAILED.
456−uStatus :: Lens' UnsampledReport (Maybe Text)
458+uStatus :: Lens' UnSampledReport (Maybe Text)
457459uStatus = lens _uStatus (\ s a -> s{_uStatus = a})
458460
459461-- | The metrics for the unsampled report.
460−uMetrics :: Lens' UnsampledReport (Maybe Text)
462+uMetrics :: Lens' UnSampledReport (Maybe Text)
461463uMetrics = lens _uMetrics (\ s a -> s{_uMetrics = a})
462464
463465-- | Download details for a file stored in Google Drive.
464−uDriveDownloadDetails :: Lens' UnsampledReport (Maybe UnsampledReportDriveDownloadDetails)
466+uDriveDownloadDetails :: Lens' UnSampledReport (Maybe UnSampledReportDriveDownloadDetails)
465467uDriveDownloadDetails
466468 = lens _uDriveDownloadDetails
467469 (\ s a -> s{_uDriveDownloadDetails = a})
468470
469471-- | Web property ID to which this unsampled report belongs. The web property
470472-- ID is of the form UA-XXXXX-YY.
471−uWebPropertyId :: Lens' UnsampledReport (Maybe Text)
473+uWebPropertyId :: Lens' UnSampledReport (Maybe Text)
472474uWebPropertyId
473475 = lens _uWebPropertyId
474476 (\ s a -> s{_uWebPropertyId = a})
475477
476478-- | Resource type for an Analytics unsampled report.
477−uKind :: Lens' UnsampledReport Text
479+uKind :: Lens' UnSampledReport Text
478480uKind = lens _uKind (\ s a -> s{_uKind = a})
479481
480482-- | Time this unsampled report was created.
481−uCreated :: Lens' UnsampledReport (Maybe UTCTime)
483+uCreated :: Lens' UnSampledReport (Maybe UTCTime)
482484uCreated = lens _uCreated (\ s a -> s{_uCreated = a})
483485
484486-- | The filters for the unsampled report.
485−uFilters :: Lens' UnsampledReport (Maybe Text)
487+uFilters :: Lens' UnSampledReport (Maybe Text)
486488uFilters = lens _uFilters (\ s a -> s{_uFilters = a})
487489
488490-- | View (Profile) ID to which this unsampled report belongs.
489−uProfileId :: Lens' UnsampledReport (Maybe Text)
491+uProfileId :: Lens' UnSampledReport (Maybe Text)
490492uProfileId
491493 = lens _uProfileId (\ s a -> s{_uProfileId = a})
492494
493495-- | The end date for the unsampled report.
494−uEndDate :: Lens' UnsampledReport (Maybe Text)
496+uEndDate :: Lens' UnSampledReport (Maybe Text)
495497uEndDate = lens _uEndDate (\ s a -> s{_uEndDate = a})
496498
497499-- | Link for this unsampled report.
498−uSelfLink :: Lens' UnsampledReport (Maybe Text)
500+uSelfLink :: Lens' UnSampledReport (Maybe Text)
499501uSelfLink
500502 = lens _uSelfLink (\ s a -> s{_uSelfLink = a})
501503
502504-- | Account ID to which this unsampled report belongs.
503−uAccountId :: Lens' UnsampledReport (Maybe Text)
505+uAccountId :: Lens' UnSampledReport (Maybe Text)
504506uAccountId
505507 = lens _uAccountId (\ s a -> s{_uAccountId = a})
506508
507509-- | Unsampled report ID.
508−uId :: Lens' UnsampledReport (Maybe Text)
510+uId :: Lens' UnSampledReport (Maybe Text)
509511uId = lens _uId (\ s a -> s{_uId = a})
510512
511513-- | Time this unsampled report was last modified.
512−uUpdated :: Lens' UnsampledReport (Maybe UTCTime)
514+uUpdated :: Lens' UnSampledReport (Maybe UTCTime)
513515uUpdated = lens _uUpdated (\ s a -> s{_uUpdated = a})
514516
515517-- | Title of the unsampled report.
516−uTitle :: Lens' UnsampledReport (Maybe Text)
518+uTitle :: Lens' UnSampledReport (Maybe Text)
517519uTitle = lens _uTitle (\ s a -> s{_uTitle = a})
518520
519521-- | The dimensions for the unsampled report.
520−uDimensions :: Lens' UnsampledReport (Maybe Text)
522+uDimensions :: Lens' UnSampledReport (Maybe Text)
521523uDimensions
522524 = lens _uDimensions (\ s a -> s{_uDimensions = a})
523525
524526-- | The segment for the unsampled report.
525−uSegment :: Lens' UnsampledReport (Maybe Text)
527+uSegment :: Lens' UnSampledReport (Maybe Text)
526528uSegment = lens _uSegment (\ s a -> s{_uSegment = a})
527529
528530-- | Download details for a file stored in Google Cloud Storage.
529−uCloudStorageDownloadDetails :: Lens' UnsampledReport (Maybe UnsampledReportCloudStorageDownloadDetails)
531+uCloudStorageDownloadDetails :: Lens' UnSampledReport (Maybe UnSampledReportCloudStorageDownloadDetails)
530532uCloudStorageDownloadDetails
531533 = lens _uCloudStorageDownloadDetails
532534 (\ s a -> s{_uCloudStorageDownloadDetails = a})
533535
534536-- | The start date for the unsampled report.
535−uStartDate :: Lens' UnsampledReport (Maybe Text)
537+uStartDate :: Lens' UnSampledReport (Maybe Text)
536538uStartDate
537539 = lens _uStartDate (\ s a -> s{_uStartDate = a})
538540
539−instance FromJSON UnsampledReport where
541+instance FromJSON UnSampledReport where
540542 parseJSON
541− = withObject "UnsampledReport"
543+ = withObject "UnSampledReport"
542544 (\ o ->
543− UnsampledReport <$>
545+ UnSampledReport <$>
544546 (o .:? "downloadType") <*> (o .:? "status") <*>
545547 (o .:? "metrics")
546548 <*> (o .:? "driveDownloadDetails")
@@ -560,8 +562,8 @@ instance FromJSON UnsampledReport where
560562 <*> (o .:? "cloudStorageDownloadDetails")
561563 <*> (o .:? "start-date"))
562564
563−instance ToJSON UnsampledReport where
564− toJSON UnsampledReport{..}
565+instance ToJSON UnSampledReport where
566+ toJSON UnSampledReport{..}
565567 = object
566568 (catMaybes
567569 [("downloadType" .=) <$> _uDownloadType,
@@ -1420,42 +1422,42 @@ instance ToJSON ExperimentParentLink where
14201422
14211423-- | Download details for a file stored in Google Drive.
14221424--
1423−-- /See:/ 'unsampledReportDriveDownloadDetails' smart constructor.
1424−newtype UnsampledReportDriveDownloadDetails = UnsampledReportDriveDownloadDetails
1425− { _urdddDocumentId :: Maybe Text
1425+-- /See:/ 'unSampledReportDriveDownloadDetails' smart constructor.
1426+newtype UnSampledReportDriveDownloadDetails = UnSampledReportDriveDownloadDetails
1427+ { _usrdddDocumentId :: Maybe Text
14261428 } deriving (Eq,Read,Show,Data,Typeable,Generic)
14271429
1428−-- | Creates a value of 'UnsampledReportDriveDownloadDetails' with the minimum fields required to make a request.
1430+-- | Creates a value of 'UnSampledReportDriveDownloadDetails' with the minimum fields required to make a request.
14291431--
14301432-- Use one of the following lenses to modify other fields as desired:
14311433--
1432−-- * 'urdddDocumentId'
1433−unsampledReportDriveDownloadDetails
1434− :: UnsampledReportDriveDownloadDetails
1435−unsampledReportDriveDownloadDetails =
1436− UnsampledReportDriveDownloadDetails
1437− { _urdddDocumentId = Nothing
1434+-- * 'usrdddDocumentId'
1435+unSampledReportDriveDownloadDetails
1436+ :: UnSampledReportDriveDownloadDetails
1437+unSampledReportDriveDownloadDetails =
1438+ UnSampledReportDriveDownloadDetails
1439+ { _usrdddDocumentId = Nothing
14381440 }
14391441
14401442-- | Id of the document\/file containing the report data.
1441−urdddDocumentId :: Lens' UnsampledReportDriveDownloadDetails (Maybe Text)
1442−urdddDocumentId
1443− = lens _urdddDocumentId
1444− (\ s a -> s{_urdddDocumentId = a})
1443+usrdddDocumentId :: Lens' UnSampledReportDriveDownloadDetails (Maybe Text)
1444+usrdddDocumentId
1445+ = lens _usrdddDocumentId
1446+ (\ s a -> s{_usrdddDocumentId = a})
14451447
1446−instance FromJSON UnsampledReportDriveDownloadDetails
1448+instance FromJSON UnSampledReportDriveDownloadDetails
14471449 where
14481450 parseJSON
1449− = withObject "UnsampledReportDriveDownloadDetails"
1451+ = withObject "UnSampledReportDriveDownloadDetails"
14501452 (\ o ->
1451− UnsampledReportDriveDownloadDetails <$>
1453+ UnSampledReportDriveDownloadDetails <$>
14521454 (o .:? "documentId"))
14531455
1454−instance ToJSON UnsampledReportDriveDownloadDetails
1456+instance ToJSON UnSampledReportDriveDownloadDetails
14551457 where
1456− toJSON UnsampledReportDriveDownloadDetails{..}
1458+ toJSON UnSampledReportDriveDownloadDetails{..}
14571459 = object
1458− (catMaybes [("documentId" .=) <$> _urdddDocumentId])
1460+ (catMaybes [("documentId" .=) <$> _usrdddDocumentId])
14591461
14601462-- | Child link for this web property. Points to the list of views (profiles)
14611463-- for this web property.
@@ -2336,39 +2338,39 @@ instance ToJSON Profiles where
23362338--
23372339-- /See:/ 'userRef' smart constructor.
23382340data UserRef = UserRef
2339− { _useEmail :: !(Maybe Text)
2340− , _useKind :: !Text
2341− , _useId :: !(Maybe Text)
2341+ { _urEmail :: !(Maybe Text)
2342+ , _urKind :: !Text
2343+ , _urId :: !(Maybe Text)
23422344 } deriving (Eq,Read,Show,Data,Typeable,Generic)
23432345
23442346-- | Creates a value of 'UserRef' with the minimum fields required to make a request.
23452347--
23462348-- Use one of the following lenses to modify other fields as desired:
23472349--
2348−-- * 'useEmail'
2350+-- * 'urEmail'
23492351--
2350−-- * 'useKind'
2352+-- * 'urKind'
23512353--
2352−-- * 'useId'
2354+-- * 'urId'
23532355userRef
23542356 :: UserRef
23552357userRef =
23562358 UserRef
2357− { _useEmail = Nothing
2358− , _useKind = "analytics#userRef"
2359− , _useId = Nothing
2359+ { _urEmail = Nothing
2360+ , _urKind = "analytics#userRef"
2361+ , _urId = Nothing
23602362 }
23612363
23622364-- | Email ID of this user.
2363−useEmail :: Lens' UserRef (Maybe Text)
2364−useEmail = lens _useEmail (\ s a -> s{_useEmail = a})
2365+urEmail :: Lens' UserRef (Maybe Text)
2366+urEmail = lens _urEmail (\ s a -> s{_urEmail = a})
23652367
2366−useKind :: Lens' UserRef Text
2367−useKind = lens _useKind (\ s a -> s{_useKind = a})
2368+urKind :: Lens' UserRef Text
2369+urKind = lens _urKind (\ s a -> s{_urKind = a})
23682370
23692371-- | User ID.
2370−useId :: Lens' UserRef (Maybe Text)
2371−useId = lens _useId (\ s a -> s{_useId = a})
2372+urId :: Lens' UserRef (Maybe Text)
2373+urId = lens _urId (\ s a -> s{_urId = a})
23722374
23732375instance FromJSON UserRef where
23742376 parseJSON
@@ -2383,8 +2385,8 @@ instance ToJSON UserRef where
23832385 toJSON UserRef{..}
23842386 = object
23852387 (catMaybes
2386− [("email" .=) <$> _useEmail,
2387− Just ("kind" .= _useKind), ("id" .=) <$> _useId])
2388+ [("email" .=) <$> _urEmail, Just ("kind" .= _urKind),
2389+ ("id" .=) <$> _urId])
23882390
23892391-- | Permissions the user has for this view (profile).
23902392--
@@ -9082,55 +9084,55 @@ instance ToJSON McfDataTotalsForAllResults where
90829084
90839085-- | Download details for a file stored in Google Cloud Storage.
90849086--
9085−-- /See:/ 'unsampledReportCloudStorageDownloadDetails' smart constructor.
9086−data UnsampledReportCloudStorageDownloadDetails = UnsampledReportCloudStorageDownloadDetails
9087− { _urcsddObjectId :: !(Maybe Text)
9088− , _urcsddBucketId :: !(Maybe Text)
9087+-- /See:/ 'unSampledReportCloudStorageDownloadDetails' smart constructor.
9088+data UnSampledReportCloudStorageDownloadDetails = UnSampledReportCloudStorageDownloadDetails
9089+ { _usrcsddObjectId :: !(Maybe Text)
9090+ , _usrcsddBucketId :: !(Maybe Text)
90899091 } deriving (Eq,Read,Show,Data,Typeable,Generic)
90909092
9091−-- | Creates a value of 'UnsampledReportCloudStorageDownloadDetails' with the minimum fields required to make a request.
9093+-- | Creates a value of 'UnSampledReportCloudStorageDownloadDetails' with the minimum fields required to make a request.
90929094--
90939095-- Use one of the following lenses to modify other fields as desired:
90949096--
9095−-- * 'urcsddObjectId'
9097+-- * 'usrcsddObjectId'
90969098--
9097−-- * 'urcsddBucketId'
9098−unsampledReportCloudStorageDownloadDetails
9099− :: UnsampledReportCloudStorageDownloadDetails
9100−unsampledReportCloudStorageDownloadDetails =
9101− UnsampledReportCloudStorageDownloadDetails
9102− { _urcsddObjectId = Nothing
9103− , _urcsddBucketId = Nothing
9099+-- * 'usrcsddBucketId'
9100+unSampledReportCloudStorageDownloadDetails
9101+ :: UnSampledReportCloudStorageDownloadDetails
9102+unSampledReportCloudStorageDownloadDetails =
9103+ UnSampledReportCloudStorageDownloadDetails
9104+ { _usrcsddObjectId = Nothing
9105+ , _usrcsddBucketId = Nothing
91049106 }
91059107
91069108-- | Id of the file object containing the report data.
9107−urcsddObjectId :: Lens' UnsampledReportCloudStorageDownloadDetails (Maybe Text)
9108−urcsddObjectId
9109− = lens _urcsddObjectId
9110− (\ s a -> s{_urcsddObjectId = a})
9109+usrcsddObjectId :: Lens' UnSampledReportCloudStorageDownloadDetails (Maybe Text)
9110+usrcsddObjectId
9111+ = lens _usrcsddObjectId
9112+ (\ s a -> s{_usrcsddObjectId = a})
91119113
91129114-- | Id of the bucket the file object is stored in.
9113−urcsddBucketId :: Lens' UnsampledReportCloudStorageDownloadDetails (Maybe Text)
9114−urcsddBucketId
9115− = lens _urcsddBucketId
9116− (\ s a -> s{_urcsddBucketId = a})
9115+usrcsddBucketId :: Lens' UnSampledReportCloudStorageDownloadDetails (Maybe Text)
9116+usrcsddBucketId
9117+ = lens _usrcsddBucketId
9118+ (\ s a -> s{_usrcsddBucketId = a})
91179119
91189120instance FromJSON
9119− UnsampledReportCloudStorageDownloadDetails where
9121+ UnSampledReportCloudStorageDownloadDetails where
91209122 parseJSON
91219123 = withObject
9122− "UnsampledReportCloudStorageDownloadDetails"
9124+ "UnSampledReportCloudStorageDownloadDetails"
91239125 (\ o ->
9124− UnsampledReportCloudStorageDownloadDetails <$>
9126+ UnSampledReportCloudStorageDownloadDetails <$>
91259127 (o .:? "objectId") <*> (o .:? "bucketId"))
91269128
91279129instance ToJSON
9128− UnsampledReportCloudStorageDownloadDetails where
9129− toJSON UnsampledReportCloudStorageDownloadDetails{..}
9130+ UnSampledReportCloudStorageDownloadDetails where
9131+ toJSON UnSampledReportCloudStorageDownloadDetails{..}
91309132 = object
91319133 (catMaybes
9132− [("objectId" .=) <$> _urcsddObjectId,
9133− ("bucketId" .=) <$> _urcsddBucketId])
9134+ [("objectId" .=) <$> _usrcsddObjectId,
9135+ ("bucketId" .=) <$> _usrcsddBucketId])
91349136
91359137--
91369138-- /See:/ 'goalURLDestinationDetailsSteps' smart constructor.
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Get.hsnew file+216
@@ -0,0 +1,216 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Analytics.Management.UnSampledReports.Get
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Returns a single unsampled report.
21+--
22+-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnSampledReportsGet@.
23+module Network.Google.Resource.Analytics.Management.UnSampledReports.Get
24+ (
25+ -- * REST Resource
26+ ManagementUnSampledReportsGetResource
27+
28+ -- * Creating a Request
29+ , managementUnSampledReportsGet'
30+ , ManagementUnSampledReportsGet'
31+
32+ -- * Request Lenses
33+ , musrgQuotaUser
34+ , musrgPrettyPrint
35+ , musrgWebPropertyId
36+ , musrgUserIP
37+ , musrgProfileId
38+ , musrgAccountId
39+ , musrgKey
40+ , musrgUnSampledReportId
41+ , musrgOAuthToken
42+ , musrgFields
43+ ) where
44+
45+import Network.Google.Analytics.Types
46+import Network.Google.Prelude
47+
48+-- | A resource alias for @AnalyticsManagementUnSampledReportsGet@ which the
49+-- 'ManagementUnSampledReportsGet'' request conforms to.
50+type ManagementUnSampledReportsGetResource =
51+ "management" :>
52+ "accounts" :>
53+ Capture "accountId" Text :>
54+ "webproperties" :>
55+ Capture "webPropertyId" Text :>
56+ "profiles" :>
57+ Capture "profileId" Text :>
58+ "unsampledReports" :>
59+ Capture "unsampledReportId" Text :>
60+ QueryParam "quotaUser" Text :>
61+ QueryParam "prettyPrint" Bool :>
62+ QueryParam "userIp" Text :>
63+ QueryParam "key" Key :>
64+ QueryParam "oauth_token" OAuthToken :>
65+ QueryParam "fields" Text :>
66+ QueryParam "alt" AltJSON :>
67+ Get '[JSON] UnSampledReport
68+
69+-- | Returns a single unsampled report.
70+--
71+-- /See:/ 'managementUnSampledReportsGet'' smart constructor.
72+data ManagementUnSampledReportsGet' = ManagementUnSampledReportsGet'
73+ { _musrgQuotaUser :: !(Maybe Text)
74+ , _musrgPrettyPrint :: !Bool
75+ , _musrgWebPropertyId :: !Text
76+ , _musrgUserIP :: !(Maybe Text)
77+ , _musrgProfileId :: !Text
78+ , _musrgAccountId :: !Text
79+ , _musrgKey :: !(Maybe Key)
80+ , _musrgUnSampledReportId :: !Text
81+ , _musrgOAuthToken :: !(Maybe OAuthToken)
82+ , _musrgFields :: !(Maybe Text)
83+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
84+
85+-- | Creates a value of 'ManagementUnSampledReportsGet'' with the minimum fields required to make a request.
86+--
87+-- Use one of the following lenses to modify other fields as desired:
88+--
89+-- * 'musrgQuotaUser'
90+--
91+-- * 'musrgPrettyPrint'
92+--
93+-- * 'musrgWebPropertyId'
94+--
95+-- * 'musrgUserIP'
96+--
97+-- * 'musrgProfileId'
98+--
99+-- * 'musrgAccountId'
100+--
101+-- * 'musrgKey'
102+--
103+-- * 'musrgUnSampledReportId'
104+--
105+-- * 'musrgOAuthToken'
106+--
107+-- * 'musrgFields'
108+managementUnSampledReportsGet'
109+ :: Text -- ^ 'webPropertyId'
110+ -> Text -- ^ 'profileId'
111+ -> Text -- ^ 'accountId'
112+ -> Text -- ^ 'unsampledReportId'
113+ -> ManagementUnSampledReportsGet'
114+managementUnSampledReportsGet' pMusrgWebPropertyId_ pMusrgProfileId_ pMusrgAccountId_ pMusrgUnSampledReportId_ =
115+ ManagementUnSampledReportsGet'
116+ { _musrgQuotaUser = Nothing
117+ , _musrgPrettyPrint = False
118+ , _musrgWebPropertyId = pMusrgWebPropertyId_
119+ , _musrgUserIP = Nothing
120+ , _musrgProfileId = pMusrgProfileId_
121+ , _musrgAccountId = pMusrgAccountId_
122+ , _musrgKey = Nothing
123+ , _musrgUnSampledReportId = pMusrgUnSampledReportId_
124+ , _musrgOAuthToken = Nothing
125+ , _musrgFields = Nothing
126+ }
127+
128+-- | Available to use for quota purposes for server-side applications. Can be
129+-- any arbitrary string assigned to a user, but should not exceed 40
130+-- characters. Overrides userIp if both are provided.
131+musrgQuotaUser :: Lens' ManagementUnSampledReportsGet' (Maybe Text)
132+musrgQuotaUser
133+ = lens _musrgQuotaUser
134+ (\ s a -> s{_musrgQuotaUser = a})
135+
136+-- | Returns response with indentations and line breaks.
137+musrgPrettyPrint :: Lens' ManagementUnSampledReportsGet' Bool
138+musrgPrettyPrint
139+ = lens _musrgPrettyPrint
140+ (\ s a -> s{_musrgPrettyPrint = a})
141+
142+-- | Web property ID to retrieve unsampled reports for.
143+musrgWebPropertyId :: Lens' ManagementUnSampledReportsGet' Text
144+musrgWebPropertyId
145+ = lens _musrgWebPropertyId
146+ (\ s a -> s{_musrgWebPropertyId = a})
147+
148+-- | IP address of the site where the request originates. Use this if you
149+-- want to enforce per-user limits.
150+musrgUserIP :: Lens' ManagementUnSampledReportsGet' (Maybe Text)
151+musrgUserIP
152+ = lens _musrgUserIP (\ s a -> s{_musrgUserIP = a})
153+
154+-- | View (Profile) ID to retrieve unsampled report for.
155+musrgProfileId :: Lens' ManagementUnSampledReportsGet' Text
156+musrgProfileId
157+ = lens _musrgProfileId
158+ (\ s a -> s{_musrgProfileId = a})
159+
160+-- | Account ID to retrieve unsampled report for.
161+musrgAccountId :: Lens' ManagementUnSampledReportsGet' Text
162+musrgAccountId
163+ = lens _musrgAccountId
164+ (\ s a -> s{_musrgAccountId = a})
165+
166+-- | API key. Your API key identifies your project and provides you with API
167+-- access, quota, and reports. Required unless you provide an OAuth 2.0
168+-- token.
169+musrgKey :: Lens' ManagementUnSampledReportsGet' (Maybe Key)
170+musrgKey = lens _musrgKey (\ s a -> s{_musrgKey = a})
171+
172+-- | ID of the unsampled report to retrieve.
173+musrgUnSampledReportId :: Lens' ManagementUnSampledReportsGet' Text
174+musrgUnSampledReportId
175+ = lens _musrgUnSampledReportId
176+ (\ s a -> s{_musrgUnSampledReportId = a})
177+
178+-- | OAuth 2.0 token for the current user.
179+musrgOAuthToken :: Lens' ManagementUnSampledReportsGet' (Maybe OAuthToken)
180+musrgOAuthToken
181+ = lens _musrgOAuthToken
182+ (\ s a -> s{_musrgOAuthToken = a})
183+
184+-- | Selector specifying which fields to include in a partial response.
185+musrgFields :: Lens' ManagementUnSampledReportsGet' (Maybe Text)
186+musrgFields
187+ = lens _musrgFields (\ s a -> s{_musrgFields = a})
188+
189+instance GoogleAuth ManagementUnSampledReportsGet'
190+ where
191+ authKey = musrgKey . _Just
192+ authToken = musrgOAuthToken . _Just
193+
194+instance GoogleRequest ManagementUnSampledReportsGet'
195+ where
196+ type Rs ManagementUnSampledReportsGet' =
197+ UnSampledReport
198+ request = requestWithRoute defReq analyticsURL
199+ requestWithRoute r u
200+ ManagementUnSampledReportsGet'{..}
201+ = go _musrgQuotaUser (Just _musrgPrettyPrint)
202+ _musrgWebPropertyId
203+ _musrgUserIP
204+ _musrgProfileId
205+ _musrgAccountId
206+ _musrgKey
207+ _musrgUnSampledReportId
208+ _musrgOAuthToken
209+ _musrgFields
210+ (Just AltJSON)
211+ where go
212+ = clientWithRoute
213+ (Proxy ::
214+ Proxy ManagementUnSampledReportsGetResource)
215+ r
216+ u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Insert.hsnew file+216
@@ -0,0 +1,216 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Analytics.Management.UnSampledReports.Insert
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Create a new unsampled report.
21+--
22+-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnSampledReportsInsert@.
23+module Network.Google.Resource.Analytics.Management.UnSampledReports.Insert
24+ (
25+ -- * REST Resource
26+ ManagementUnSampledReportsInsertResource
27+
28+ -- * Creating a Request
29+ , managementUnSampledReportsInsert'
30+ , ManagementUnSampledReportsInsert'
31+
32+ -- * Request Lenses
33+ , musriQuotaUser
34+ , musriUnSampledReport
35+ , musriPrettyPrint
36+ , musriWebPropertyId
37+ , musriUserIP
38+ , musriProfileId
39+ , musriAccountId
40+ , musriKey
41+ , musriOAuthToken
42+ , musriFields
43+ ) where
44+
45+import Network.Google.Analytics.Types
46+import Network.Google.Prelude
47+
48+-- | A resource alias for @AnalyticsManagementUnSampledReportsInsert@ which the
49+-- 'ManagementUnSampledReportsInsert'' request conforms to.
50+type ManagementUnSampledReportsInsertResource =
51+ "management" :>
52+ "accounts" :>
53+ Capture "accountId" Text :>
54+ "webproperties" :>
55+ Capture "webPropertyId" Text :>
56+ "profiles" :>
57+ Capture "profileId" Text :>
58+ "unsampledReports" :>
59+ QueryParam "quotaUser" Text :>
60+ QueryParam "prettyPrint" Bool :>
61+ QueryParam "userIp" Text :>
62+ QueryParam "key" Key :>
63+ QueryParam "oauth_token" OAuthToken :>
64+ QueryParam "fields" Text :>
65+ QueryParam "alt" AltJSON :>
66+ ReqBody '[JSON] UnSampledReport :>
67+ Post '[JSON] UnSampledReport
68+
69+-- | Create a new unsampled report.
70+--
71+-- /See:/ 'managementUnSampledReportsInsert'' smart constructor.
72+data ManagementUnSampledReportsInsert' = ManagementUnSampledReportsInsert'
73+ { _musriQuotaUser :: !(Maybe Text)
74+ , _musriUnSampledReport :: !UnSampledReport
75+ , _musriPrettyPrint :: !Bool
76+ , _musriWebPropertyId :: !Text
77+ , _musriUserIP :: !(Maybe Text)
78+ , _musriProfileId :: !Text
79+ , _musriAccountId :: !Text
80+ , _musriKey :: !(Maybe Key)
81+ , _musriOAuthToken :: !(Maybe OAuthToken)
82+ , _musriFields :: !(Maybe Text)
83+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
84+
85+-- | Creates a value of 'ManagementUnSampledReportsInsert'' with the minimum fields required to make a request.
86+--
87+-- Use one of the following lenses to modify other fields as desired:
88+--
89+-- * 'musriQuotaUser'
90+--
91+-- * 'musriUnSampledReport'
92+--
93+-- * 'musriPrettyPrint'
94+--
95+-- * 'musriWebPropertyId'
96+--
97+-- * 'musriUserIP'
98+--
99+-- * 'musriProfileId'
100+--
101+-- * 'musriAccountId'
102+--
103+-- * 'musriKey'
104+--
105+-- * 'musriOAuthToken'
106+--
107+-- * 'musriFields'
108+managementUnSampledReportsInsert'
109+ :: UnSampledReport -- ^ 'UnSampledReport'
110+ -> Text -- ^ 'webPropertyId'
111+ -> Text -- ^ 'profileId'
112+ -> Text -- ^ 'accountId'
113+ -> ManagementUnSampledReportsInsert'
114+managementUnSampledReportsInsert' pMusriUnSampledReport_ pMusriWebPropertyId_ pMusriProfileId_ pMusriAccountId_ =
115+ ManagementUnSampledReportsInsert'
116+ { _musriQuotaUser = Nothing
117+ , _musriUnSampledReport = pMusriUnSampledReport_
118+ , _musriPrettyPrint = False
119+ , _musriWebPropertyId = pMusriWebPropertyId_
120+ , _musriUserIP = Nothing
121+ , _musriProfileId = pMusriProfileId_
122+ , _musriAccountId = pMusriAccountId_
123+ , _musriKey = Nothing
124+ , _musriOAuthToken = Nothing
125+ , _musriFields = Nothing
126+ }
127+
128+-- | Available to use for quota purposes for server-side applications. Can be
129+-- any arbitrary string assigned to a user, but should not exceed 40
130+-- characters. Overrides userIp if both are provided.
131+musriQuotaUser :: Lens' ManagementUnSampledReportsInsert' (Maybe Text)
132+musriQuotaUser
133+ = lens _musriQuotaUser
134+ (\ s a -> s{_musriQuotaUser = a})
135+
136+-- | Multipart request metadata.
137+musriUnSampledReport :: Lens' ManagementUnSampledReportsInsert' UnSampledReport
138+musriUnSampledReport
139+ = lens _musriUnSampledReport
140+ (\ s a -> s{_musriUnSampledReport = a})
141+
142+-- | Returns response with indentations and line breaks.
143+musriPrettyPrint :: Lens' ManagementUnSampledReportsInsert' Bool
144+musriPrettyPrint
145+ = lens _musriPrettyPrint
146+ (\ s a -> s{_musriPrettyPrint = a})
147+
148+-- | Web property ID to create the unsampled report for.
149+musriWebPropertyId :: Lens' ManagementUnSampledReportsInsert' Text
150+musriWebPropertyId
151+ = lens _musriWebPropertyId
152+ (\ s a -> s{_musriWebPropertyId = a})
153+
154+-- | IP address of the site where the request originates. Use this if you
155+-- want to enforce per-user limits.
156+musriUserIP :: Lens' ManagementUnSampledReportsInsert' (Maybe Text)
157+musriUserIP
158+ = lens _musriUserIP (\ s a -> s{_musriUserIP = a})
159+
160+-- | View (Profile) ID to create the unsampled report for.
161+musriProfileId :: Lens' ManagementUnSampledReportsInsert' Text
162+musriProfileId
163+ = lens _musriProfileId
164+ (\ s a -> s{_musriProfileId = a})
165+
166+-- | Account ID to create the unsampled report for.
167+musriAccountId :: Lens' ManagementUnSampledReportsInsert' Text
168+musriAccountId
169+ = lens _musriAccountId
170+ (\ s a -> s{_musriAccountId = a})
171+
172+-- | API key. Your API key identifies your project and provides you with API
173+-- access, quota, and reports. Required unless you provide an OAuth 2.0
174+-- token.
175+musriKey :: Lens' ManagementUnSampledReportsInsert' (Maybe Key)
176+musriKey = lens _musriKey (\ s a -> s{_musriKey = a})
177+
178+-- | OAuth 2.0 token for the current user.
179+musriOAuthToken :: Lens' ManagementUnSampledReportsInsert' (Maybe OAuthToken)
180+musriOAuthToken
181+ = lens _musriOAuthToken
182+ (\ s a -> s{_musriOAuthToken = a})
183+
184+-- | Selector specifying which fields to include in a partial response.
185+musriFields :: Lens' ManagementUnSampledReportsInsert' (Maybe Text)
186+musriFields
187+ = lens _musriFields (\ s a -> s{_musriFields = a})
188+
189+instance GoogleAuth ManagementUnSampledReportsInsert'
190+ where
191+ authKey = musriKey . _Just
192+ authToken = musriOAuthToken . _Just
193+
194+instance GoogleRequest
195+ ManagementUnSampledReportsInsert' where
196+ type Rs ManagementUnSampledReportsInsert' =
197+ UnSampledReport
198+ request = requestWithRoute defReq analyticsURL
199+ requestWithRoute r u
200+ ManagementUnSampledReportsInsert'{..}
201+ = go _musriQuotaUser (Just _musriPrettyPrint)
202+ _musriWebPropertyId
203+ _musriUserIP
204+ _musriProfileId
205+ _musriAccountId
206+ _musriKey
207+ _musriOAuthToken
208+ _musriFields
209+ (Just AltJSON)
210+ _musriUnSampledReport
211+ where go
212+ = clientWithRoute
213+ (Proxy ::
214+ Proxy ManagementUnSampledReportsInsertResource)
215+ r
216+ u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/List.hsnew file+232
@@ -0,0 +1,232 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Analytics.Management.UnSampledReports.List
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Lists unsampled reports to which the user has access.
21+--
22+-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnSampledReportsList@.
23+module Network.Google.Resource.Analytics.Management.UnSampledReports.List
24+ (
25+ -- * REST Resource
26+ ManagementUnSampledReportsListResource
27+
28+ -- * Creating a Request
29+ , managementUnSampledReportsList'
30+ , ManagementUnSampledReportsList'
31+
32+ -- * Request Lenses
33+ , musrlQuotaUser
34+ , musrlPrettyPrint
35+ , musrlWebPropertyId
36+ , musrlUserIP
37+ , musrlProfileId
38+ , musrlAccountId
39+ , musrlKey
40+ , musrlOAuthToken
41+ , musrlStartIndex
42+ , musrlMaxResults
43+ , musrlFields
44+ ) where
45+
46+import Network.Google.Analytics.Types
47+import Network.Google.Prelude
48+
49+-- | A resource alias for @AnalyticsManagementUnSampledReportsList@ which the
50+-- 'ManagementUnSampledReportsList'' request conforms to.
51+type ManagementUnSampledReportsListResource =
52+ "management" :>
53+ "accounts" :>
54+ Capture "accountId" Text :>
55+ "webproperties" :>
56+ Capture "webPropertyId" Text :>
57+ "profiles" :>
58+ Capture "profileId" Text :>
59+ "unsampledReports" :>
60+ QueryParam "quotaUser" Text :>
61+ QueryParam "prettyPrint" Bool :>
62+ QueryParam "userIp" Text :>
63+ QueryParam "key" Key :>
64+ QueryParam "oauth_token" OAuthToken :>
65+ QueryParam "start-index" Int32 :>
66+ QueryParam "max-results" Int32 :>
67+ QueryParam "fields" Text :>
68+ QueryParam "alt" AltJSON :>
69+ Get '[JSON] UnSampledReports
70+
71+-- | Lists unsampled reports to which the user has access.
72+--
73+-- /See:/ 'managementUnSampledReportsList'' smart constructor.
74+data ManagementUnSampledReportsList' = ManagementUnSampledReportsList'
75+ { _musrlQuotaUser :: !(Maybe Text)
76+ , _musrlPrettyPrint :: !Bool
77+ , _musrlWebPropertyId :: !Text
78+ , _musrlUserIP :: !(Maybe Text)
79+ , _musrlProfileId :: !Text
80+ , _musrlAccountId :: !Text
81+ , _musrlKey :: !(Maybe Key)
82+ , _musrlOAuthToken :: !(Maybe OAuthToken)
83+ , _musrlStartIndex :: !(Maybe Int32)
84+ , _musrlMaxResults :: !(Maybe Int32)
85+ , _musrlFields :: !(Maybe Text)
86+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
87+
88+-- | Creates a value of 'ManagementUnSampledReportsList'' with the minimum fields required to make a request.
89+--
90+-- Use one of the following lenses to modify other fields as desired:
91+--
92+-- * 'musrlQuotaUser'
93+--
94+-- * 'musrlPrettyPrint'
95+--
96+-- * 'musrlWebPropertyId'
97+--
98+-- * 'musrlUserIP'
99+--
100+-- * 'musrlProfileId'
101+--
102+-- * 'musrlAccountId'
103+--
104+-- * 'musrlKey'
105+--
106+-- * 'musrlOAuthToken'
107+--
108+-- * 'musrlStartIndex'
109+--
110+-- * 'musrlMaxResults'
111+--
112+-- * 'musrlFields'
113+managementUnSampledReportsList'
114+ :: Text -- ^ 'webPropertyId'
115+ -> Text -- ^ 'profileId'
116+ -> Text -- ^ 'accountId'
117+ -> ManagementUnSampledReportsList'
118+managementUnSampledReportsList' pMusrlWebPropertyId_ pMusrlProfileId_ pMusrlAccountId_ =
119+ ManagementUnSampledReportsList'
120+ { _musrlQuotaUser = Nothing
121+ , _musrlPrettyPrint = False
122+ , _musrlWebPropertyId = pMusrlWebPropertyId_
123+ , _musrlUserIP = Nothing
124+ , _musrlProfileId = pMusrlProfileId_
125+ , _musrlAccountId = pMusrlAccountId_
126+ , _musrlKey = Nothing
127+ , _musrlOAuthToken = Nothing
128+ , _musrlStartIndex = Nothing
129+ , _musrlMaxResults = Nothing
130+ , _musrlFields = Nothing
131+ }
132+
133+-- | Available to use for quota purposes for server-side applications. Can be
134+-- any arbitrary string assigned to a user, but should not exceed 40
135+-- characters. Overrides userIp if both are provided.
136+musrlQuotaUser :: Lens' ManagementUnSampledReportsList' (Maybe Text)
137+musrlQuotaUser
138+ = lens _musrlQuotaUser
139+ (\ s a -> s{_musrlQuotaUser = a})
140+
141+-- | Returns response with indentations and line breaks.
142+musrlPrettyPrint :: Lens' ManagementUnSampledReportsList' Bool
143+musrlPrettyPrint
144+ = lens _musrlPrettyPrint
145+ (\ s a -> s{_musrlPrettyPrint = a})
146+
147+-- | Web property ID to retrieve unsampled reports for. Must be a specific
148+-- web property ID, ~all is not supported.
149+musrlWebPropertyId :: Lens' ManagementUnSampledReportsList' Text
150+musrlWebPropertyId
151+ = lens _musrlWebPropertyId
152+ (\ s a -> s{_musrlWebPropertyId = a})
153+
154+-- | IP address of the site where the request originates. Use this if you
155+-- want to enforce per-user limits.
156+musrlUserIP :: Lens' ManagementUnSampledReportsList' (Maybe Text)
157+musrlUserIP
158+ = lens _musrlUserIP (\ s a -> s{_musrlUserIP = a})
159+
160+-- | View (Profile) ID to retrieve unsampled reports for. Must be a specific
161+-- view (profile) ID, ~all is not supported.
162+musrlProfileId :: Lens' ManagementUnSampledReportsList' Text
163+musrlProfileId
164+ = lens _musrlProfileId
165+ (\ s a -> s{_musrlProfileId = a})
166+
167+-- | Account ID to retrieve unsampled reports for. Must be a specific account
168+-- ID, ~all is not supported.
169+musrlAccountId :: Lens' ManagementUnSampledReportsList' Text
170+musrlAccountId
171+ = lens _musrlAccountId
172+ (\ s a -> s{_musrlAccountId = a})
173+
174+-- | API key. Your API key identifies your project and provides you with API
175+-- access, quota, and reports. Required unless you provide an OAuth 2.0
176+-- token.
177+musrlKey :: Lens' ManagementUnSampledReportsList' (Maybe Key)
178+musrlKey = lens _musrlKey (\ s a -> s{_musrlKey = a})
179+
180+-- | OAuth 2.0 token for the current user.
181+musrlOAuthToken :: Lens' ManagementUnSampledReportsList' (Maybe OAuthToken)
182+musrlOAuthToken
183+ = lens _musrlOAuthToken
184+ (\ s a -> s{_musrlOAuthToken = a})
185+
186+-- | An index of the first unsampled report to retrieve. Use this parameter
187+-- as a pagination mechanism along with the max-results parameter.
188+musrlStartIndex :: Lens' ManagementUnSampledReportsList' (Maybe Int32)
189+musrlStartIndex
190+ = lens _musrlStartIndex
191+ (\ s a -> s{_musrlStartIndex = a})
192+
193+-- | The maximum number of unsampled reports to include in this response.
194+musrlMaxResults :: Lens' ManagementUnSampledReportsList' (Maybe Int32)
195+musrlMaxResults
196+ = lens _musrlMaxResults
197+ (\ s a -> s{_musrlMaxResults = a})
198+
199+-- | Selector specifying which fields to include in a partial response.
200+musrlFields :: Lens' ManagementUnSampledReportsList' (Maybe Text)
201+musrlFields
202+ = lens _musrlFields (\ s a -> s{_musrlFields = a})
203+
204+instance GoogleAuth ManagementUnSampledReportsList'
205+ where
206+ authKey = musrlKey . _Just
207+ authToken = musrlOAuthToken . _Just
208+
209+instance GoogleRequest
210+ ManagementUnSampledReportsList' where
211+ type Rs ManagementUnSampledReportsList' =
212+ UnSampledReports
213+ request = requestWithRoute defReq analyticsURL
214+ requestWithRoute r u
215+ ManagementUnSampledReportsList'{..}
216+ = go _musrlQuotaUser (Just _musrlPrettyPrint)
217+ _musrlWebPropertyId
218+ _musrlUserIP
219+ _musrlProfileId
220+ _musrlAccountId
221+ _musrlKey
222+ _musrlOAuthToken
223+ _musrlStartIndex
224+ _musrlMaxResults
225+ _musrlFields
226+ (Just AltJSON)
227+ where go
228+ = clientWithRoute
229+ (Proxy ::
230+ Proxy ManagementUnSampledReportsListResource)
231+ r
232+ u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Get.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Analytics.Management.UnsampledReports.Get
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Returns a single unsampled report.
21−--
22−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnsampledReportsGet@.
23−module Network.Google.Resource.Analytics.Management.UnsampledReports.Get
24− (
25− -- * REST Resource
26− ManagementUnsampledReportsGetResource
27−
28− -- * Creating a Request
29− , managementUnsampledReportsGet'
30− , ManagementUnsampledReportsGet'
31−
32− -- * Request Lenses
33− , murgQuotaUser
34− , murgPrettyPrint
35− , murgWebPropertyId
36− , murgUserIP
37− , murgProfileId
38− , murgAccountId
39− , murgKey
40− , murgUnsampledReportId
41− , murgOAuthToken
42− , murgFields
43− ) where
44−
45−import Network.Google.Analytics.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AnalyticsManagementUnsampledReportsGet@ which the
49−-- 'ManagementUnsampledReportsGet'' request conforms to.
50−type ManagementUnsampledReportsGetResource =
51− "management" :>
52− "accounts" :>
53− Capture "accountId" Text :>
54− "webproperties" :>
55− Capture "webPropertyId" Text :>
56− "profiles" :>
57− Capture "profileId" Text :>
58− "unsampledReports" :>
59− Capture "unsampledReportId" Text :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "key" Key :>
64− QueryParam "oauth_token" OAuthToken :>
65− QueryParam "fields" Text :>
66− QueryParam "alt" AltJSON :>
67− Get '[JSON] UnsampledReport
68−
69−-- | Returns a single unsampled report.
70−--
71−-- /See:/ 'managementUnsampledReportsGet'' smart constructor.
72−data ManagementUnsampledReportsGet' = ManagementUnsampledReportsGet'
73− { _murgQuotaUser :: !(Maybe Text)
74− , _murgPrettyPrint :: !Bool
75− , _murgWebPropertyId :: !Text
76− , _murgUserIP :: !(Maybe Text)
77− , _murgProfileId :: !Text
78− , _murgAccountId :: !Text
79− , _murgKey :: !(Maybe Key)
80− , _murgUnsampledReportId :: !Text
81− , _murgOAuthToken :: !(Maybe OAuthToken)
82− , _murgFields :: !(Maybe Text)
83− } deriving (Eq,Read,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'ManagementUnsampledReportsGet'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'murgQuotaUser'
90−--
91−-- * 'murgPrettyPrint'
92−--
93−-- * 'murgWebPropertyId'
94−--
95−-- * 'murgUserIP'
96−--
97−-- * 'murgProfileId'
98−--
99−-- * 'murgAccountId'
100−--
101−-- * 'murgKey'
102−--
103−-- * 'murgUnsampledReportId'
104−--
105−-- * 'murgOAuthToken'
106−--
107−-- * 'murgFields'
108−managementUnsampledReportsGet'
109− :: Text -- ^ 'webPropertyId'
110− -> Text -- ^ 'profileId'
111− -> Text -- ^ 'accountId'
112− -> Text -- ^ 'unsampledReportId'
113− -> ManagementUnsampledReportsGet'
114−managementUnsampledReportsGet' pMurgWebPropertyId_ pMurgProfileId_ pMurgAccountId_ pMurgUnsampledReportId_ =
115− ManagementUnsampledReportsGet'
116− { _murgQuotaUser = Nothing
117− , _murgPrettyPrint = False
118− , _murgWebPropertyId = pMurgWebPropertyId_
119− , _murgUserIP = Nothing
120− , _murgProfileId = pMurgProfileId_
121− , _murgAccountId = pMurgAccountId_
122− , _murgKey = Nothing
123− , _murgUnsampledReportId = pMurgUnsampledReportId_
124− , _murgOAuthToken = Nothing
125− , _murgFields = Nothing
126− }
127−
128−-- | Available to use for quota purposes for server-side applications. Can be
129−-- any arbitrary string assigned to a user, but should not exceed 40
130−-- characters. Overrides userIp if both are provided.
131−murgQuotaUser :: Lens' ManagementUnsampledReportsGet' (Maybe Text)
132−murgQuotaUser
133− = lens _murgQuotaUser
134− (\ s a -> s{_murgQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−murgPrettyPrint :: Lens' ManagementUnsampledReportsGet' Bool
138−murgPrettyPrint
139− = lens _murgPrettyPrint
140− (\ s a -> s{_murgPrettyPrint = a})
141−
142−-- | Web property ID to retrieve unsampled reports for.
143−murgWebPropertyId :: Lens' ManagementUnsampledReportsGet' Text
144−murgWebPropertyId
145− = lens _murgWebPropertyId
146− (\ s a -> s{_murgWebPropertyId = a})
147−
148−-- | IP address of the site where the request originates. Use this if you
149−-- want to enforce per-user limits.
150−murgUserIP :: Lens' ManagementUnsampledReportsGet' (Maybe Text)
151−murgUserIP
152− = lens _murgUserIP (\ s a -> s{_murgUserIP = a})
153−
154−-- | View (Profile) ID to retrieve unsampled report for.
155−murgProfileId :: Lens' ManagementUnsampledReportsGet' Text
156−murgProfileId
157− = lens _murgProfileId
158− (\ s a -> s{_murgProfileId = a})
159−
160−-- | Account ID to retrieve unsampled report for.
161−murgAccountId :: Lens' ManagementUnsampledReportsGet' Text
162−murgAccountId
163− = lens _murgAccountId
164− (\ s a -> s{_murgAccountId = a})
165−
166−-- | API key. Your API key identifies your project and provides you with API
167−-- access, quota, and reports. Required unless you provide an OAuth 2.0
168−-- token.
169−murgKey :: Lens' ManagementUnsampledReportsGet' (Maybe Key)
170−murgKey = lens _murgKey (\ s a -> s{_murgKey = a})
171−
172−-- | ID of the unsampled report to retrieve.
173−murgUnsampledReportId :: Lens' ManagementUnsampledReportsGet' Text
174−murgUnsampledReportId
175− = lens _murgUnsampledReportId
176− (\ s a -> s{_murgUnsampledReportId = a})
177−
178−-- | OAuth 2.0 token for the current user.
179−murgOAuthToken :: Lens' ManagementUnsampledReportsGet' (Maybe OAuthToken)
180−murgOAuthToken
181− = lens _murgOAuthToken
182− (\ s a -> s{_murgOAuthToken = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−murgFields :: Lens' ManagementUnsampledReportsGet' (Maybe Text)
186−murgFields
187− = lens _murgFields (\ s a -> s{_murgFields = a})
188−
189−instance GoogleAuth ManagementUnsampledReportsGet'
190− where
191− authKey = murgKey . _Just
192− authToken = murgOAuthToken . _Just
193−
194−instance GoogleRequest ManagementUnsampledReportsGet'
195− where
196− type Rs ManagementUnsampledReportsGet' =
197− UnsampledReport
198− request = requestWithRoute defReq analyticsURL
199− requestWithRoute r u
200− ManagementUnsampledReportsGet'{..}
201− = go _murgQuotaUser (Just _murgPrettyPrint)
202− _murgWebPropertyId
203− _murgUserIP
204− _murgProfileId
205− _murgAccountId
206− _murgKey
207− _murgUnsampledReportId
208− _murgOAuthToken
209− _murgFields
210− (Just AltJSON)
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy ManagementUnsampledReportsGetResource)
215− r
216− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/Insert.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Analytics.Management.UnsampledReports.Insert
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Create a new unsampled report.
21−--
22−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnsampledReportsInsert@.
23−module Network.Google.Resource.Analytics.Management.UnsampledReports.Insert
24− (
25− -- * REST Resource
26− ManagementUnsampledReportsInsertResource
27−
28− -- * Creating a Request
29− , managementUnsampledReportsInsert'
30− , ManagementUnsampledReportsInsert'
31−
32− -- * Request Lenses
33− , muriQuotaUser
34− , muriUnsampledReport
35− , muriPrettyPrint
36− , muriWebPropertyId
37− , muriUserIP
38− , muriProfileId
39− , muriAccountId
40− , muriKey
41− , muriOAuthToken
42− , muriFields
43− ) where
44−
45−import Network.Google.Analytics.Types
46−import Network.Google.Prelude
47−
48−-- | A resource alias for @AnalyticsManagementUnsampledReportsInsert@ which the
49−-- 'ManagementUnsampledReportsInsert'' request conforms to.
50−type ManagementUnsampledReportsInsertResource =
51− "management" :>
52− "accounts" :>
53− Capture "accountId" Text :>
54− "webproperties" :>
55− Capture "webPropertyId" Text :>
56− "profiles" :>
57− Capture "profileId" Text :>
58− "unsampledReports" :>
59− QueryParam "quotaUser" Text :>
60− QueryParam "prettyPrint" Bool :>
61− QueryParam "userIp" Text :>
62− QueryParam "key" Key :>
63− QueryParam "oauth_token" OAuthToken :>
64− QueryParam "fields" Text :>
65− QueryParam "alt" AltJSON :>
66− ReqBody '[JSON] UnsampledReport :>
67− Post '[JSON] UnsampledReport
68−
69−-- | Create a new unsampled report.
70−--
71−-- /See:/ 'managementUnsampledReportsInsert'' smart constructor.
72−data ManagementUnsampledReportsInsert' = ManagementUnsampledReportsInsert'
73− { _muriQuotaUser :: !(Maybe Text)
74− , _muriUnsampledReport :: !UnsampledReport
75− , _muriPrettyPrint :: !Bool
76− , _muriWebPropertyId :: !Text
77− , _muriUserIP :: !(Maybe Text)
78− , _muriProfileId :: !Text
79− , _muriAccountId :: !Text
80− , _muriKey :: !(Maybe Key)
81− , _muriOAuthToken :: !(Maybe OAuthToken)
82− , _muriFields :: !(Maybe Text)
83− } deriving (Eq,Read,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'ManagementUnsampledReportsInsert'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'muriQuotaUser'
90−--
91−-- * 'muriUnsampledReport'
92−--
93−-- * 'muriPrettyPrint'
94−--
95−-- * 'muriWebPropertyId'
96−--
97−-- * 'muriUserIP'
98−--
99−-- * 'muriProfileId'
100−--
101−-- * 'muriAccountId'
102−--
103−-- * 'muriKey'
104−--
105−-- * 'muriOAuthToken'
106−--
107−-- * 'muriFields'
108−managementUnsampledReportsInsert'
109− :: UnsampledReport -- ^ 'UnsampledReport'
110− -> Text -- ^ 'webPropertyId'
111− -> Text -- ^ 'profileId'
112− -> Text -- ^ 'accountId'
113− -> ManagementUnsampledReportsInsert'
114−managementUnsampledReportsInsert' pMuriUnsampledReport_ pMuriWebPropertyId_ pMuriProfileId_ pMuriAccountId_ =
115− ManagementUnsampledReportsInsert'
116− { _muriQuotaUser = Nothing
117− , _muriUnsampledReport = pMuriUnsampledReport_
118− , _muriPrettyPrint = False
119− , _muriWebPropertyId = pMuriWebPropertyId_
120− , _muriUserIP = Nothing
121− , _muriProfileId = pMuriProfileId_
122− , _muriAccountId = pMuriAccountId_
123− , _muriKey = Nothing
124− , _muriOAuthToken = Nothing
125− , _muriFields = Nothing
126− }
127−
128−-- | Available to use for quota purposes for server-side applications. Can be
129−-- any arbitrary string assigned to a user, but should not exceed 40
130−-- characters. Overrides userIp if both are provided.
131−muriQuotaUser :: Lens' ManagementUnsampledReportsInsert' (Maybe Text)
132−muriQuotaUser
133− = lens _muriQuotaUser
134− (\ s a -> s{_muriQuotaUser = a})
135−
136−-- | Multipart request metadata.
137−muriUnsampledReport :: Lens' ManagementUnsampledReportsInsert' UnsampledReport
138−muriUnsampledReport
139− = lens _muriUnsampledReport
140− (\ s a -> s{_muriUnsampledReport = a})
141−
142−-- | Returns response with indentations and line breaks.
143−muriPrettyPrint :: Lens' ManagementUnsampledReportsInsert' Bool
144−muriPrettyPrint
145− = lens _muriPrettyPrint
146− (\ s a -> s{_muriPrettyPrint = a})
147−
148−-- | Web property ID to create the unsampled report for.
149−muriWebPropertyId :: Lens' ManagementUnsampledReportsInsert' Text
150−muriWebPropertyId
151− = lens _muriWebPropertyId
152− (\ s a -> s{_muriWebPropertyId = a})
153−
154−-- | IP address of the site where the request originates. Use this if you
155−-- want to enforce per-user limits.
156−muriUserIP :: Lens' ManagementUnsampledReportsInsert' (Maybe Text)
157−muriUserIP
158− = lens _muriUserIP (\ s a -> s{_muriUserIP = a})
159−
160−-- | View (Profile) ID to create the unsampled report for.
161−muriProfileId :: Lens' ManagementUnsampledReportsInsert' Text
162−muriProfileId
163− = lens _muriProfileId
164− (\ s a -> s{_muriProfileId = a})
165−
166−-- | Account ID to create the unsampled report for.
167−muriAccountId :: Lens' ManagementUnsampledReportsInsert' Text
168−muriAccountId
169− = lens _muriAccountId
170− (\ s a -> s{_muriAccountId = a})
171−
172−-- | API key. Your API key identifies your project and provides you with API
173−-- access, quota, and reports. Required unless you provide an OAuth 2.0
174−-- token.
175−muriKey :: Lens' ManagementUnsampledReportsInsert' (Maybe Key)
176−muriKey = lens _muriKey (\ s a -> s{_muriKey = a})
177−
178−-- | OAuth 2.0 token for the current user.
179−muriOAuthToken :: Lens' ManagementUnsampledReportsInsert' (Maybe OAuthToken)
180−muriOAuthToken
181− = lens _muriOAuthToken
182− (\ s a -> s{_muriOAuthToken = a})
183−
184−-- | Selector specifying which fields to include in a partial response.
185−muriFields :: Lens' ManagementUnsampledReportsInsert' (Maybe Text)
186−muriFields
187− = lens _muriFields (\ s a -> s{_muriFields = a})
188−
189−instance GoogleAuth ManagementUnsampledReportsInsert'
190− where
191− authKey = muriKey . _Just
192− authToken = muriOAuthToken . _Just
193−
194−instance GoogleRequest
195− ManagementUnsampledReportsInsert' where
196− type Rs ManagementUnsampledReportsInsert' =
197− UnsampledReport
198− request = requestWithRoute defReq analyticsURL
199− requestWithRoute r u
200− ManagementUnsampledReportsInsert'{..}
201− = go _muriQuotaUser (Just _muriPrettyPrint)
202− _muriWebPropertyId
203− _muriUserIP
204− _muriProfileId
205− _muriAccountId
206− _muriKey
207− _muriOAuthToken
208− _muriFields
209− (Just AltJSON)
210− _muriUnsampledReport
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy ManagementUnsampledReportsInsertResource)
215− r
216− u
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnsampledReports/List.hsdeleted−232
@@ -1,232 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Analytics.Management.UnsampledReports.List
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Lists unsampled reports to which the user has access.
21−--
22−-- /See:/ <https://developers.google.com/analytics/ Google Analytics API Reference> for @AnalyticsManagementUnsampledReportsList@.
23−module Network.Google.Resource.Analytics.Management.UnsampledReports.List
24− (
25− -- * REST Resource
26− ManagementUnsampledReportsListResource
27−
28− -- * Creating a Request
29− , managementUnsampledReportsList'
30− , ManagementUnsampledReportsList'
31−
32− -- * Request Lenses
33− , murlQuotaUser
34− , murlPrettyPrint
35− , murlWebPropertyId
36− , murlUserIP
37− , murlProfileId
38− , murlAccountId
39− , murlKey
40− , murlOAuthToken
41− , murlStartIndex
42− , murlMaxResults
43− , murlFields
44− ) where
45−
46−import Network.Google.Analytics.Types
47−import Network.Google.Prelude
48−
49−-- | A resource alias for @AnalyticsManagementUnsampledReportsList@ which the
50−-- 'ManagementUnsampledReportsList'' request conforms to.
51−type ManagementUnsampledReportsListResource =
52− "management" :>
53− "accounts" :>
54− Capture "accountId" Text :>
55− "webproperties" :>
56− Capture "webPropertyId" Text :>
57− "profiles" :>
58− Capture "profileId" Text :>
59− "unsampledReports" :>
60− QueryParam "quotaUser" Text :>
61− QueryParam "prettyPrint" Bool :>
62− QueryParam "userIp" Text :>
63− QueryParam "key" Key :>
64− QueryParam "oauth_token" OAuthToken :>
65− QueryParam "start-index" Int32 :>
66− QueryParam "max-results" Int32 :>
67− QueryParam "fields" Text :>
68− QueryParam "alt" AltJSON :>
69− Get '[JSON] UnsampledReports
70−
71−-- | Lists unsampled reports to which the user has access.
72−--
73−-- /See:/ 'managementUnsampledReportsList'' smart constructor.
74−data ManagementUnsampledReportsList' = ManagementUnsampledReportsList'
75− { _murlQuotaUser :: !(Maybe Text)
76− , _murlPrettyPrint :: !Bool
77− , _murlWebPropertyId :: !Text
78− , _murlUserIP :: !(Maybe Text)
79− , _murlProfileId :: !Text
80− , _murlAccountId :: !Text
81− , _murlKey :: !(Maybe Key)
82− , _murlOAuthToken :: !(Maybe OAuthToken)
83− , _murlStartIndex :: !(Maybe Int32)
84− , _murlMaxResults :: !(Maybe Int32)
85− , _murlFields :: !(Maybe Text)
86− } deriving (Eq,Read,Show,Data,Typeable,Generic)
87−
88−-- | Creates a value of 'ManagementUnsampledReportsList'' with the minimum fields required to make a request.
89−--
90−-- Use one of the following lenses to modify other fields as desired:
91−--
92−-- * 'murlQuotaUser'
93−--
94−-- * 'murlPrettyPrint'
95−--
96−-- * 'murlWebPropertyId'
97−--
98−-- * 'murlUserIP'
99−--
100−-- * 'murlProfileId'
101−--
102−-- * 'murlAccountId'
103−--
104−-- * 'murlKey'
105−--
106−-- * 'murlOAuthToken'
107−--
108−-- * 'murlStartIndex'
109−--
110−-- * 'murlMaxResults'
111−--
112−-- * 'murlFields'
113−managementUnsampledReportsList'
114− :: Text -- ^ 'webPropertyId'
115− -> Text -- ^ 'profileId'
116− -> Text -- ^ 'accountId'
117− -> ManagementUnsampledReportsList'
118−managementUnsampledReportsList' pMurlWebPropertyId_ pMurlProfileId_ pMurlAccountId_ =
119− ManagementUnsampledReportsList'
120− { _murlQuotaUser = Nothing
121− , _murlPrettyPrint = False
122− , _murlWebPropertyId = pMurlWebPropertyId_
123− , _murlUserIP = Nothing
124− , _murlProfileId = pMurlProfileId_
125− , _murlAccountId = pMurlAccountId_
126− , _murlKey = Nothing
127− , _murlOAuthToken = Nothing
128− , _murlStartIndex = Nothing
129− , _murlMaxResults = Nothing
130− , _murlFields = Nothing
131− }
132−
133−-- | Available to use for quota purposes for server-side applications. Can be
134−-- any arbitrary string assigned to a user, but should not exceed 40
135−-- characters. Overrides userIp if both are provided.
136−murlQuotaUser :: Lens' ManagementUnsampledReportsList' (Maybe Text)
137−murlQuotaUser
138− = lens _murlQuotaUser
139− (\ s a -> s{_murlQuotaUser = a})
140−
141−-- | Returns response with indentations and line breaks.
142−murlPrettyPrint :: Lens' ManagementUnsampledReportsList' Bool
143−murlPrettyPrint
144− = lens _murlPrettyPrint
145− (\ s a -> s{_murlPrettyPrint = a})
146−
147−-- | Web property ID to retrieve unsampled reports for. Must be a specific
148−-- web property ID, ~all is not supported.
149−murlWebPropertyId :: Lens' ManagementUnsampledReportsList' Text
150−murlWebPropertyId
151− = lens _murlWebPropertyId
152− (\ s a -> s{_murlWebPropertyId = a})
153−
154−-- | IP address of the site where the request originates. Use this if you
155−-- want to enforce per-user limits.
156−murlUserIP :: Lens' ManagementUnsampledReportsList' (Maybe Text)
157−murlUserIP
158− = lens _murlUserIP (\ s a -> s{_murlUserIP = a})
159−
160−-- | View (Profile) ID to retrieve unsampled reports for. Must be a specific
161−-- view (profile) ID, ~all is not supported.
162−murlProfileId :: Lens' ManagementUnsampledReportsList' Text
163−murlProfileId
164− = lens _murlProfileId
165− (\ s a -> s{_murlProfileId = a})
166−
167−-- | Account ID to retrieve unsampled reports for. Must be a specific account
168−-- ID, ~all is not supported.
169−murlAccountId :: Lens' ManagementUnsampledReportsList' Text
170−murlAccountId
171− = lens _murlAccountId
172− (\ s a -> s{_murlAccountId = a})
173−
174−-- | API key. Your API key identifies your project and provides you with API
175−-- access, quota, and reports. Required unless you provide an OAuth 2.0
176−-- token.
177−murlKey :: Lens' ManagementUnsampledReportsList' (Maybe Key)
178−murlKey = lens _murlKey (\ s a -> s{_murlKey = a})
179−
180−-- | OAuth 2.0 token for the current user.
181−murlOAuthToken :: Lens' ManagementUnsampledReportsList' (Maybe OAuthToken)
182−murlOAuthToken
183− = lens _murlOAuthToken
184− (\ s a -> s{_murlOAuthToken = a})
185−
186−-- | An index of the first unsampled report to retrieve. Use this parameter
187−-- as a pagination mechanism along with the max-results parameter.
188−murlStartIndex :: Lens' ManagementUnsampledReportsList' (Maybe Int32)
189−murlStartIndex
190− = lens _murlStartIndex
191− (\ s a -> s{_murlStartIndex = a})
192−
193−-- | The maximum number of unsampled reports to include in this response.
194−murlMaxResults :: Lens' ManagementUnsampledReportsList' (Maybe Int32)
195−murlMaxResults
196− = lens _murlMaxResults
197− (\ s a -> s{_murlMaxResults = a})
198−
199−-- | Selector specifying which fields to include in a partial response.
200−murlFields :: Lens' ManagementUnsampledReportsList' (Maybe Text)
201−murlFields
202− = lens _murlFields (\ s a -> s{_murlFields = a})
203−
204−instance GoogleAuth ManagementUnsampledReportsList'
205− where
206− authKey = murlKey . _Just
207− authToken = murlOAuthToken . _Just
208−
209−instance GoogleRequest
210− ManagementUnsampledReportsList' where
211− type Rs ManagementUnsampledReportsList' =
212− UnsampledReports
213− request = requestWithRoute defReq analyticsURL
214− requestWithRoute r u
215− ManagementUnsampledReportsList'{..}
216− = go _murlQuotaUser (Just _murlPrettyPrint)
217− _murlWebPropertyId
218− _murlUserIP
219− _murlProfileId
220− _murlAccountId
221− _murlKey
222− _murlOAuthToken
223− _murlStartIndex
224− _murlMaxResults
225− _murlFields
226− (Just AltJSON)
227− where go
228− = clientWithRoute
229− (Proxy ::
230− Proxy ManagementUnsampledReportsListResource)
231− r
232− u
gogol-analytics/gogol-analytics.cabal+3−3
@@ -86,9 +86,9 @@ library
8686 , Network.Google.Resource.Analytics.Management.Profiles.Patch
8787 , Network.Google.Resource.Analytics.Management.Profiles.Update
8888 , Network.Google.Resource.Analytics.Management.Segments.List
89− , Network.Google.Resource.Analytics.Management.UnsampledReports.Get
90− , Network.Google.Resource.Analytics.Management.UnsampledReports.Insert
91− , Network.Google.Resource.Analytics.Management.UnsampledReports.List
89+ , Network.Google.Resource.Analytics.Management.UnSampledReports.Get
90+ , Network.Google.Resource.Analytics.Management.UnSampledReports.Insert
91+ , Network.Google.Resource.Analytics.Management.UnSampledReports.List
9292 , Network.Google.Resource.Analytics.Management.Uploads.DeleteUploadData
9393 , Network.Google.Resource.Analytics.Management.Uploads.Get
9494 , Network.Google.Resource.Analytics.Management.Uploads.List
gogol-android-enterprise/gen/Network/Google/AndroidEnterprise.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Allows MDMs\/EMMs and enterprises to manage the deployment of apps to
15+-- | Allows MDMs\/EMMs and enterprises to manage the deployment of apps to
1616-- Android for Work users.
1717--
1818-- /See:/ <https://developers.google.com/play/enterprise Google Play EMM API Reference>
gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+10−10
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets Android application developers access their Google Play accounts.
15+-- | Lets Android application developers access their Google Play accounts.
1616--
1717-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference>
1818module Network.Google.AndroidPublisher
@@ -619,15 +619,15 @@ type AndroidPublisherAPI =
619619 :<|> EditsDetailsPatchResource
620620 :<|> EditsDetailsGetResource
621621 :<|> EditsDetailsUpdateResource
622− :<|> EditsApkListingsListResource
623− :<|> EditsApkListingsDeleteallResource
624− :<|> EditsApkListingsPatchResource
625− :<|> EditsApkListingsGetResource
626− :<|> EditsApkListingsDeleteResource
627− :<|> EditsApkListingsUpdateResource
628− :<|> EditsApksListResource
629− :<|> EditsApksAddexternallyhostedResource
630− :<|> EditsApksUploadResource
622+ :<|> EditsAPKListingsListResource
623+ :<|> EditsAPKListingsDeleteallResource
624+ :<|> EditsAPKListingsPatchResource
625+ :<|> EditsAPKListingsGetResource
626+ :<|> EditsAPKListingsDeleteResource
627+ :<|> EditsAPKListingsUpdateResource
628+ :<|> EditsAPKsListResource
629+ :<|> EditsAPKsAddexternallyhostedResource
630+ :<|> EditsAPKsUploadResource
631631 :<|> EditsListingsListResource
632632 :<|> EditsListingsDeleteallResource
633633 :<|> EditsListingsPatchResource
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Delete.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Delete
2525 (
2626 -- * REST Resource
27− EditsApkListingsDeleteResource
27+ EditsAPKListingsDeleteResource
2828
2929 -- * Creating a Request
3030 , editsAPKListingsDelete'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @AndroidPublisherEditsAPKListingsDelete@ which the
5050-- 'EditsAPKListingsDelete'' request conforms to.
51−type EditsApkListingsDeleteResource =
51+type EditsAPKListingsDeleteResource =
5252 Capture "packageName" Text :>
5353 "edits" :>
5454 Capture "editId" Text :>
@@ -209,6 +209,6 @@ instance GoogleRequest EditsAPKListingsDelete' where
209209 (Just AltJSON)
210210 where go
211211 = clientWithRoute
212− (Proxy :: Proxy EditsApkListingsDeleteResource)
212+ (Proxy :: Proxy EditsAPKListingsDeleteResource)
213213 r
214214 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Deleteall.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Deleteall
2424 (
2525 -- * REST Resource
26− EditsApkListingsDeleteallResource
26+ EditsAPKListingsDeleteallResource
2727
2828 -- * Creating a Request
2929 , editsAPKListingsDeleteall'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @AndroidPublisherEditsAPKListingsDeleteall@ which the
4848-- 'EditsAPKListingsDeleteall'' request conforms to.
49−type EditsApkListingsDeleteallResource =
49+type EditsAPKListingsDeleteallResource =
5050 Capture "packageName" Text :>
5151 "edits" :>
5252 Capture "editId" Text :>
@@ -195,6 +195,6 @@ instance GoogleRequest EditsAPKListingsDeleteall'
195195 (Just AltJSON)
196196 where go
197197 = clientWithRoute
198− (Proxy :: Proxy EditsApkListingsDeleteallResource)
198+ (Proxy :: Proxy EditsAPKListingsDeleteallResource)
199199 r
200200 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Get.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Get
2525 (
2626 -- * REST Resource
27− EditsApkListingsGetResource
27+ EditsAPKListingsGetResource
2828
2929 -- * Creating a Request
3030 , editsAPKListingsGet'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @AndroidPublisherEditsAPKListingsGet@ which the
5050-- 'EditsAPKListingsGet'' request conforms to.
51−type EditsApkListingsGetResource =
51+type EditsAPKListingsGetResource =
5252 Capture "packageName" Text :>
5353 "edits" :>
5454 Capture "editId" Text :>
@@ -210,6 +210,6 @@ instance GoogleRequest EditsAPKListingsGet' where
210210 (Just AltJSON)
211211 where go
212212 = clientWithRoute
213− (Proxy :: Proxy EditsApkListingsGetResource)
213+ (Proxy :: Proxy EditsAPKListingsGetResource)
214214 r
215215 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AndroidPublisher.Edits.APKListings.List
2424 (
2525 -- * REST Resource
26− EditsApkListingsListResource
26+ EditsAPKListingsListResource
2727
2828 -- * Creating a Request
2929 , editsAPKListingsList'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @AndroidPublisherEditsAPKListingsList@ which the
4848-- 'EditsAPKListingsList'' request conforms to.
49−type EditsApkListingsListResource =
49+type EditsAPKListingsListResource =
5050 Capture "packageName" Text :>
5151 "edits" :>
5252 Capture "editId" Text :>
@@ -193,6 +193,6 @@ instance GoogleRequest EditsAPKListingsList' where
193193 (Just AltJSON)
194194 where go
195195 = clientWithRoute
196− (Proxy :: Proxy EditsApkListingsListResource)
196+ (Proxy :: Proxy EditsAPKListingsListResource)
197197 r
198198 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Patch.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Patch
2525 (
2626 -- * REST Resource
27− EditsApkListingsPatchResource
27+ EditsAPKListingsPatchResource
2828
2929 -- * Creating a Request
3030 , editsAPKListingsPatch'
@@ -49,7 +49,7 @@ import Network.Google.Prelude
4949
5050-- | A resource alias for @AndroidPublisherEditsAPKListingsPatch@ which the
5151-- 'EditsAPKListingsPatch'' request conforms to.
52−type EditsApkListingsPatchResource =
52+type EditsAPKListingsPatchResource =
5353 Capture "packageName" Text :>
5454 "edits" :>
5555 Capture "editId" Text :>
@@ -224,6 +224,6 @@ instance GoogleRequest EditsAPKListingsPatch' where
224224 _eapklpAPKListing
225225 where go
226226 = clientWithRoute
227− (Proxy :: Proxy EditsApkListingsPatchResource)
227+ (Proxy :: Proxy EditsAPKListingsPatchResource)
228228 r
229229 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKListings/Update.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.AndroidPublisher.Edits.APKListings.Update
2525 (
2626 -- * REST Resource
27− EditsApkListingsUpdateResource
27+ EditsAPKListingsUpdateResource
2828
2929 -- * Creating a Request
3030 , editsAPKListingsUpdate'
@@ -49,7 +49,7 @@ import Network.Google.Prelude
4949
5050-- | A resource alias for @AndroidPublisherEditsAPKListingsUpdate@ which the
5151-- 'EditsAPKListingsUpdate'' request conforms to.
52−type EditsApkListingsUpdateResource =
52+type EditsAPKListingsUpdateResource =
5353 Capture "packageName" Text :>
5454 "edits" :>
5555 Capture "editId" Text :>
@@ -224,6 +224,6 @@ instance GoogleRequest EditsAPKListingsUpdate' where
224224 _eapkluAPKListing
225225 where go
226226 = clientWithRoute
227− (Proxy :: Proxy EditsApkListingsUpdateResource)
227+ (Proxy :: Proxy EditsAPKListingsUpdateResource)
228228 r
229229 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Addexternallyhosted.hs+3−3
@@ -26,7 +26,7 @@
2626module Network.Google.Resource.AndroidPublisher.Edits.APKs.Addexternallyhosted
2727 (
2828 -- * REST Resource
29− EditsApksAddexternallyhostedResource
29+ EditsAPKsAddexternallyhostedResource
3030
3131 -- * Creating a Request
3232 , editsAPKsAddexternallyhosted'
@@ -49,7 +49,7 @@ import Network.Google.Prelude
4949
5050-- | A resource alias for @AndroidPublisherEditsAPKsAddexternallyhosted@ which the
5151-- 'EditsAPKsAddexternallyhosted'' request conforms to.
52−type EditsApksAddexternallyhostedResource =
52+type EditsAPKsAddexternallyhostedResource =
5353 Capture "packageName" Text :>
5454 "edits" :>
5555 Capture "editId" Text :>
@@ -201,6 +201,6 @@ instance GoogleRequest EditsAPKsAddexternallyhosted'
201201 _eapkaAPKsAddExternallyHostedRequest
202202 where go
203203 = clientWithRoute
204− (Proxy :: Proxy EditsApksAddexternallyhostedResource)
204+ (Proxy :: Proxy EditsAPKsAddexternallyhostedResource)
205205 r
206206 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AndroidPublisher.Edits.APKs.List
2424 (
2525 -- * REST Resource
26− EditsApksListResource
26+ EditsAPKsListResource
2727
2828 -- * Creating a Request
2929 , editsAPKsList'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @AndroidPublisherEditsAPKsList@ which the
4747-- 'EditsAPKsList'' request conforms to.
48−type EditsApksListResource =
48+type EditsAPKsListResource =
4949 Capture "packageName" Text :>
5050 "edits" :>
5151 Capture "editId" Text :>
@@ -174,6 +174,6 @@ instance GoogleRequest EditsAPKsList' where
174174 (Just AltJSON)
175175 where go
176176 = clientWithRoute
177− (Proxy :: Proxy EditsApksListResource)
177+ (Proxy :: Proxy EditsAPKsListResource)
178178 r
179179 u
gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.AndroidPublisher.Edits.APKs.Upload
2424 (
2525 -- * REST Resource
26− EditsApksUploadResource
26+ EditsAPKsUploadResource
2727
2828 -- * Creating a Request
2929 , editsAPKsUpload'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @AndroidPublisherEditsAPKsUpload@ which the
4848-- 'EditsAPKsUpload'' request conforms to.
49−type EditsApksUploadResource =
49+type EditsAPKsUploadResource =
5050 Capture "packageName" Text :>
5151 "edits" :>
5252 Capture "editId" Text :>
@@ -184,6 +184,6 @@ instance GoogleRequest EditsAPKsUpload' where
184184 (Just AltJSON)
185185 where go
186186 = clientWithRoute
187− (Proxy :: Proxy EditsApksUploadResource)
187+ (Proxy :: Proxy EditsAPKsUploadResource)
188188 r
189189 u
gogol-appengine-taskqueue/gen/Network/Google/AppEngineTaskQueue.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you access a Google App Engine Pull Task Queue over REST.
15+-- | Lets you access a Google App Engine Pull Task Queue over REST.
1616--
1717-- /See:/ <https://developers.google.com/appengine/docs/python/taskqueue/rest TaskQueue API Reference>
1818module Network.Google.AppEngineTaskQueue
gogol-appengine/gen/Network/Google/AppEngine.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google App Engine Admin API enables developers to provision and
15+-- | The Google App Engine Admin API enables developers to provision and
1616-- manage their App Engine applications.
1717--
1818-- /See:/ <https://developers.google.com/appengine/ Google App Engine Admin API Reference>
gogol-apps-activity/gen/Network/Google/AppsActivity.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Provides a historical view of activity.
15+-- | Provides a historical view of activity.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/activity/ Google Apps Activity API Reference>
1818module Network.Google.AppsActivity
gogol-apps-activity/gen/Network/Google/AppsActivity/Types/Sum.hs+45−45
@@ -19,27 +19,27 @@ import Network.Google.Prelude
1919
2020-- | The main type of event that occurred.
2121data EventPrimaryEventType
22− = Comment
22+ = EPETComment
2323 -- ^ @comment@
24− | Create
24+ | EPETCreate
2525 -- ^ @create@
26− | Edit
26+ | EPETEdit
2727 -- ^ @edit@
28− | EmptyTrash
28+ | EPETEmptyTrash
2929 -- ^ @emptyTrash@
30− | Move
30+ | EPETMove
3131 -- ^ @move@
32− | PermissionChange
32+ | EPETPermissionChange
3333 -- ^ @permissionChange@
34− | Rename
34+ | EPETRename
3535 -- ^ @rename@
36− | Trash
36+ | EPETTrash
3737 -- ^ @trash@
38− | Unknown
38+ | EPETUnknown
3939 -- ^ @unknown@
40− | Untrash
40+ | EPETUntrash
4141 -- ^ @untrash@
42− | Upload
42+ | EPETUpload
4343 -- ^ @upload@
4444 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
4545
@@ -47,32 +47,32 @@ instance Hashable EventPrimaryEventType
4747
4848instance FromText EventPrimaryEventType where
4949 fromText = \case
50− "comment" -> Just Comment
51− "create" -> Just Create
52− "edit" -> Just Edit
53− "emptyTrash" -> Just EmptyTrash
54− "move" -> Just Move
55− "permissionChange" -> Just PermissionChange
56− "rename" -> Just Rename
57− "trash" -> Just Trash
58− "unknown" -> Just Unknown
59− "untrash" -> Just Untrash
60− "upload" -> Just Upload
50+ "comment" -> Just EPETComment
51+ "create" -> Just EPETCreate
52+ "edit" -> Just EPETEdit
53+ "emptyTrash" -> Just EPETEmptyTrash
54+ "move" -> Just EPETMove
55+ "permissionChange" -> Just EPETPermissionChange
56+ "rename" -> Just EPETRename
57+ "trash" -> Just EPETTrash
58+ "unknown" -> Just EPETUnknown
59+ "untrash" -> Just EPETUntrash
60+ "upload" -> Just EPETUpload
6161 _ -> Nothing
6262
6363instance ToText EventPrimaryEventType where
6464 toText = \case
65− Comment -> "comment"
66− Create -> "create"
67− Edit -> "edit"
68− EmptyTrash -> "emptyTrash"
69− Move -> "move"
70− PermissionChange -> "permissionChange"
71− Rename -> "rename"
72− Trash -> "trash"
73− Unknown -> "unknown"
74− Untrash -> "untrash"
75− Upload -> "upload"
65+ EPETComment -> "comment"
66+ EPETCreate -> "create"
67+ EPETEdit -> "edit"
68+ EPETEmptyTrash -> "emptyTrash"
69+ EPETMove -> "move"
70+ EPETPermissionChange -> "permissionChange"
71+ EPETRename -> "rename"
72+ EPETTrash -> "trash"
73+ EPETUnknown -> "unknown"
74+ EPETUntrash -> "untrash"
75+ EPETUpload -> "upload"
7676
7777instance FromJSON EventPrimaryEventType where
7878 parseJSON = parseJSONText "EventPrimaryEventType"
@@ -208,13 +208,13 @@ instance ToJSON AppsactivityActivitiesListGroupingStrategy where
208208
209209-- | Indicates how widely permissions are granted.
210210data PermissionType
211− = Anyone
211+ = PTAnyone
212212 -- ^ @anyone@
213− | Domain
213+ | PTDomain
214214 -- ^ @domain@
215− | Group
215+ | PTGroup
216216 -- ^ @group@
217− | User
217+ | PTUser
218218 -- ^ @user@
219219 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
220220
@@ -222,18 +222,18 @@ instance Hashable PermissionType
222222
223223instance FromText PermissionType where
224224 fromText = \case
225− "anyone" -> Just Anyone
226− "domain" -> Just Domain
227− "group" -> Just Group
228− "user" -> Just User
225+ "anyone" -> Just PTAnyone
226+ "domain" -> Just PTDomain
227+ "group" -> Just PTGroup
228+ "user" -> Just PTUser
229229 _ -> Nothing
230230
231231instance ToText PermissionType where
232232 toText = \case
233− Anyone -> "anyone"
234− Domain -> "domain"
235− Group -> "group"
236− User -> "user"
233+ PTAnyone -> "anyone"
234+ PTDomain -> "domain"
235+ PTGroup -> "group"
236+ PTUser -> "user"
237237
238238instance FromJSON PermissionType where
239239 parseJSON = parseJSONText "PermissionType"
gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you manipulate events and other calendar data.
15+-- | Lets you manipulate events and other calendar data.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/calendar/firstapp Calendar API Reference>
1818module Network.Google.AppsCalendar
@@ -564,13 +564,13 @@ type AppsCalendarAPI =
564564 :<|> CalendarListDeleteResource
565565 :<|> CalendarListUpdateResource
566566 :<|> CalendarListWatchResource
567− :<|> AclInsertResource
568− :<|> AclListResource
569− :<|> AclPatchResource
570− :<|> AclGetResource
571− :<|> AclDeleteResource
572− :<|> AclUpdateResource
573− :<|> AclWatchResource
567+ :<|> ACLInsertResource
568+ :<|> ACLListResource
569+ :<|> ACLPatchResource
570+ :<|> ACLGetResource
571+ :<|> ACLDeleteResource
572+ :<|> ACLUpdateResource
573+ :<|> ACLWatchResource
574574 :<|> ColorsGetResource
575575 :<|> FreeBusyQueryResource
576576
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Delete.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Delete
2424 (
2525 -- * REST Resource
26− AclDeleteResource
26+ ACLDeleteResource
2727
2828 -- * Creating a Request
2929 , aCLDelete'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @CalendarACLDelete@ which the
4747-- 'ACLDelete'' request conforms to.
48−type AclDeleteResource =
48+type ACLDeleteResource =
4949 "calendars" :>
5050 Capture "calendarId" Text :>
5151 "acl" :>
@@ -167,6 +167,6 @@ instance GoogleRequest ACLDelete' where
167167 _adFields
168168 (Just AltJSON)
169169 where go
170− = clientWithRoute (Proxy :: Proxy AclDeleteResource)
170+ = clientWithRoute (Proxy :: Proxy ACLDeleteResource)
171171 r
172172 u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Get.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Get
2424 (
2525 -- * REST Resource
26− AclGetResource
26+ ACLGetResource
2727
2828 -- * Creating a Request
2929 , aCLGet'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @CalendarACLGet@ which the
4747-- 'ACLGet'' request conforms to.
48−type AclGetResource =
48+type ACLGetResource =
4949 "calendars" :>
5050 Capture "calendarId" Text :>
5151 "acl" :>
@@ -167,4 +167,4 @@ instance GoogleRequest ACLGet' where
167167 _agFields
168168 (Just AltJSON)
169169 where go
170− = clientWithRoute (Proxy :: Proxy AclGetResource) r u
170+ = clientWithRoute (Proxy :: Proxy ACLGetResource) r u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Insert.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Insert
2424 (
2525 -- * REST Resource
26− AclInsertResource
26+ ACLInsertResource
2727
2828 -- * Creating a Request
2929 , aCLInsert'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @CalendarACLInsert@ which the
4747-- 'ACLInsert'' request conforms to.
48−type AclInsertResource =
48+type ACLInsertResource =
4949 "calendars" :>
5050 Capture "calendarId" Text :>
5151 "acl" :>
@@ -168,6 +168,6 @@ instance GoogleRequest ACLInsert' where
168168 (Just AltJSON)
169169 _aiACLRule
170170 where go
171− = clientWithRoute (Proxy :: Proxy AclInsertResource)
171+ = clientWithRoute (Proxy :: Proxy ACLInsertResource)
172172 r
173173 u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.List
2424 (
2525 -- * REST Resource
26− AclListResource
26+ ACLListResource
2727
2828 -- * Creating a Request
2929 , aCLList'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @CalendarACLList@ which the
5050-- 'ACLList'' request conforms to.
51−type AclListResource =
51+type ACLListResource =
5252 "calendars" :>
5353 Capture "calendarId" Text :>
5454 "acl" :>
@@ -216,5 +216,5 @@ instance GoogleRequest ACLList' where
216216 _alFields
217217 (Just AltJSON)
218218 where go
219− = clientWithRoute (Proxy :: Proxy AclListResource) r
219+ = clientWithRoute (Proxy :: Proxy ACLListResource) r
220220 u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Patch.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Patch
2424 (
2525 -- * REST Resource
26− AclPatchResource
26+ ACLPatchResource
2727
2828 -- * Creating a Request
2929 , aCLPatch'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @CalendarACLPatch@ which the
4848-- 'ACLPatch'' request conforms to.
49−type AclPatchResource =
49+type ACLPatchResource =
5050 "calendars" :>
5151 Capture "calendarId" Text :>
5252 "acl" :>
@@ -180,5 +180,5 @@ instance GoogleRequest ACLPatch' where
180180 (Just AltJSON)
181181 _apACLRule
182182 where go
183− = clientWithRoute (Proxy :: Proxy AclPatchResource) r
183+ = clientWithRoute (Proxy :: Proxy ACLPatchResource) r
184184 u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Update.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Update
2424 (
2525 -- * REST Resource
26− AclUpdateResource
26+ ACLUpdateResource
2727
2828 -- * Creating a Request
2929 , aCLUpdate'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @CalendarACLUpdate@ which the
4848-- 'ACLUpdate'' request conforms to.
49−type AclUpdateResource =
49+type ACLUpdateResource =
5050 "calendars" :>
5151 Capture "calendarId" Text :>
5252 "acl" :>
@@ -180,6 +180,6 @@ instance GoogleRequest ACLUpdate' where
180180 (Just AltJSON)
181181 _auACLRule
182182 where go
183− = clientWithRoute (Proxy :: Proxy AclUpdateResource)
183+ = clientWithRoute (Proxy :: Proxy ACLUpdateResource)
184184 r
185185 u
gogol-apps-calendar/gen/Network/Google/Resource/Calendar/ACL/Watch.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Calendar.ACL.Watch
2424 (
2525 -- * REST Resource
26− AclWatchResource
26+ ACLWatchResource
2727
2828 -- * Creating a Request
2929 , aCLWatch'
@@ -49,7 +49,7 @@ import Network.Google.Prelude
4949
5050-- | A resource alias for @CalendarACLWatch@ which the
5151-- 'ACLWatch'' request conforms to.
52−type AclWatchResource =
52+type ACLWatchResource =
5353 "calendars" :>
5454 Capture "calendarId" Text :>
5555 "acl" :>
@@ -231,5 +231,5 @@ instance GoogleRequest ACLWatch' where
231231 (Just AltJSON)
232232 _awChannel
233233 where go
234− = clientWithRoute (Proxy :: Proxy AclWatchResource) r
234+ = clientWithRoute (Proxy :: Proxy ACLWatchResource) r
235235 u
gogol-apps-licensing/gen/Network/Google/AppsLicensing.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Licensing API to view and manage license for your domain.
15+-- | Licensing API to view and manage license for your domain.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/licensing/ Enterprise License Manager API Reference>
1818module Network.Google.AppsLicensing
gogol-apps-reseller/gen/Network/Google/AppsReseller.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you create and manage your customers and their subscriptions.
15+-- | Lets you create and manage your customers and their subscriptions.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference>
1818module Network.Google.AppsReseller
gogol-apps-tasks/gen/Network/Google/AppsTasks.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you manage your tasks and task lists.
15+-- | Lets you manage your tasks and task lists.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>
1818module Network.Google.AppsTasks
gogol-autoscaler/gen/Network/Google/Autoscaler.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Compute Engine Autoscaler API provides autoscaling for groups
15+-- | The Google Compute Engine Autoscaler API provides autoscaling for groups
1616-- of Cloud VMs.
1717--
1818-- /See:/ <http://developers.google.com/compute/docs/autoscaler Google Compute Engine Autoscaler API Reference>
gogol-bigquery/gen/Network/Google/BigQuery.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | A data platform for customers to create, manage, share and query data.
15+-- | A data platform for customers to create, manage, share and query data.
1616--
1717-- /See:/ <https://cloud.google.com/bigquery/ BigQuery API Reference>
1818module Network.Google.BigQuery
gogol-billing/gen/Network/Google/Billing.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Retrieves Google Developers Console billing accounts and associates them
15+-- | Retrieves Google Developers Console billing accounts and associates them
1616-- with projects.
1717--
1818-- /See:/ <https://cloud.google.com/billing/ Google Cloud Billing API Reference>
gogol-blogger/gen/Network/Google/Blogger.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for access to the data within Blogger.
15+-- | API for access to the data within Blogger.
1616--
1717-- /See:/ <https://developers.google.com/blogger/docs/3.0/getting_started Blogger API Reference>
1818module Network.Google.Blogger
gogol-books/gen/Network/Google/Books.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you search for books and manage your Google Books library.
15+-- | Lets you search for books and manage your Google Books library.
1616--
1717-- /See:/ <https://developers.google.com/books/docs/v1/getting_started Books API Reference>
1818module Network.Google.Books
gogol-civicinfo/gen/Network/Google/CivicInfo.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | An API for accessing civic information.
15+-- | An API for accessing civic information.
1616--
1717-- /See:/ <https://developers.google.com/civic-information Google Civic Information API Reference>
1818module Network.Google.CivicInfo
gogol-classroom/gen/Network/Google/Classroom.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Google Classroom API
15+-- | Google Classroom API
1616--
1717-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference>
1818module Network.Google.Classroom
gogol-compute/gen/Network/Google/Compute.hs+19−19
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for the Google Compute Engine service.
15+-- | API for the Google Compute Engine service.
1616--
1717-- /See:/ <https://developers.google.com/compute/docs/reference/latest/ Compute Engine API Reference>
1818module Network.Google.Compute
@@ -2462,13 +2462,13 @@ type ComputeAPI =
24622462 ImagesGetResource
24632463 :<|> ImagesDeprecateResource
24642464 :<|> ImagesDeleteResource
2465− :<|> UrlMapsInsertResource
2466− :<|> UrlMapsListResource
2467− :<|> UrlMapsPatchResource
2468− :<|> UrlMapsGetResource
2469− :<|> UrlMapsValidateResource
2470− :<|> UrlMapsDeleteResource
2471− :<|> UrlMapsUpdateResource
2465+ :<|> URLMapsInsertResource
2466+ :<|> URLMapsListResource
2467+ :<|> URLMapsPatchResource
2468+ :<|> URLMapsGetResource
2469+ :<|> URLMapsValidateResource
2470+ :<|> URLMapsDeleteResource
2471+ :<|> URLMapsUpdateResource
24722472 :<|> InstanceTemplatesInsertResource
24732473 :<|> InstanceTemplatesListResource
24742474 :<|> InstanceTemplatesGetResource
@@ -2498,11 +2498,11 @@ type ComputeAPI =
24982498 :<|> AddressesListResource
24992499 :<|> AddressesGetResource
25002500 :<|> AddressesDeleteResource
2501− :<|> VpnTunnelsAggregatedListResource
2502− :<|> VpnTunnelsInsertResource
2503− :<|> VpnTunnelsListResource
2504− :<|> VpnTunnelsGetResource
2505− :<|> VpnTunnelsDeleteResource
2501+ :<|> VPNTunnelsAggregatedListResource
2502+ :<|> VPNTunnelsInsertResource
2503+ :<|> VPNTunnelsListResource
2504+ :<|> VPNTunnelsGetResource
2505+ :<|> VPNTunnelsDeleteResource
25062506 :<|> RegionsListResource
25072507 :<|> RegionsGetResource
25082508 :<|> GlobalAddressesInsertResource
@@ -2530,12 +2530,12 @@ type ComputeAPI =
25302530 :<|> MachineTypesAggregatedListResource
25312531 :<|> MachineTypesListResource
25322532 :<|> MachineTypesGetResource
2533− :<|> HttpHealthChecksInsertResource
2534− :<|> HttpHealthChecksListResource
2535− :<|> HttpHealthChecksPatchResource
2536− :<|> HttpHealthChecksGetResource
2537− :<|> HttpHealthChecksDeleteResource
2538− :<|> HttpHealthChecksUpdateResource
2533+ :<|> HTTPHealthChecksInsertResource
2534+ :<|> HTTPHealthChecksListResource
2535+ :<|> HTTPHealthChecksPatchResource
2536+ :<|> HTTPHealthChecksGetResource
2537+ :<|> HTTPHealthChecksDeleteResource
2538+ :<|> HTTPHealthChecksUpdateResource
25392539 :<|> SnapshotsListResource
25402540 :<|> SnapshotsGetResource
25412541 :<|> SnapshotsDeleteResource
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Delete.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.HTTPHealthChecks.Delete
2424 (
2525 -- * REST Resource
26− HttpHealthChecksDeleteResource
26+ HTTPHealthChecksDeleteResource
2727
2828 -- * Creating a Request
2929 , hTTPHealthChecksDelete'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @ComputeHTTPHealthChecksDelete@ which the
4747-- 'HTTPHealthChecksDelete'' request conforms to.
48−type HttpHealthChecksDeleteResource =
48+type HTTPHealthChecksDeleteResource =
4949 Capture "project" Text :>
5050 "global" :>
5151 "httpHealthChecks" :>
@@ -177,6 +177,6 @@ instance GoogleRequest HTTPHealthChecksDelete' where
177177 (Just AltJSON)
178178 where go
179179 = clientWithRoute
180− (Proxy :: Proxy HttpHealthChecksDeleteResource)
180+ (Proxy :: Proxy HTTPHealthChecksDeleteResource)
181181 r
182182 u
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Get.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.HTTPHealthChecks.Get
2424 (
2525 -- * REST Resource
26− HttpHealthChecksGetResource
26+ HTTPHealthChecksGetResource
2727
2828 -- * Creating a Request
2929 , hTTPHealthChecksGet'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @ComputeHTTPHealthChecksGet@ which the
4747-- 'HTTPHealthChecksGet'' request conforms to.
48−type HttpHealthChecksGetResource =
48+type HTTPHealthChecksGetResource =
4949 Capture "project" Text :>
5050 "global" :>
5151 "httpHealthChecks" :>
@@ -178,6 +178,6 @@ instance GoogleRequest HTTPHealthChecksGet' where
178178 (Just AltJSON)
179179 where go
180180 = clientWithRoute
181− (Proxy :: Proxy HttpHealthChecksGetResource)
181+ (Proxy :: Proxy HTTPHealthChecksGetResource)
182182 r
183183 u
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Insert.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.HTTPHealthChecks.Insert
2525 (
2626 -- * REST Resource
27− HttpHealthChecksInsertResource
27+ HTTPHealthChecksInsertResource
2828
2929 -- * Creating a Request
3030 , hTTPHealthChecksInsert'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @ComputeHTTPHealthChecksInsert@ which the
4848-- 'HTTPHealthChecksInsert'' request conforms to.
49−type HttpHealthChecksInsertResource =
49+type HTTPHealthChecksInsertResource =
5050 Capture "project" Text :>
5151 "global" :>
5252 "httpHealthChecks" :>
@@ -180,6 +180,6 @@ instance GoogleRequest HTTPHealthChecksInsert' where
180180 _httphciHTTPHealthCheck
181181 where go
182182 = clientWithRoute
183− (Proxy :: Proxy HttpHealthChecksInsertResource)
183+ (Proxy :: Proxy HTTPHealthChecksInsertResource)
184184 r
185185 u
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.HTTPHealthChecks.List
2525 (
2626 -- * REST Resource
27− HttpHealthChecksListResource
27+ HTTPHealthChecksListResource
2828
2929 -- * Creating a Request
3030 , hTTPHealthChecksList'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @ComputeHTTPHealthChecksList@ which the
5050-- 'HTTPHealthChecksList'' request conforms to.
51−type HttpHealthChecksListResource =
51+type HTTPHealthChecksListResource =
5252 Capture "project" Text :>
5353 "global" :>
5454 "httpHealthChecks" :>
@@ -217,6 +217,6 @@ instance GoogleRequest HTTPHealthChecksList' where
217217 (Just AltJSON)
218218 where go
219219 = clientWithRoute
220− (Proxy :: Proxy HttpHealthChecksListResource)
220+ (Proxy :: Proxy HTTPHealthChecksListResource)
221221 r
222222 u
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Patch.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.HTTPHealthChecks.Patch
2525 (
2626 -- * REST Resource
27− HttpHealthChecksPatchResource
27+ HTTPHealthChecksPatchResource
2828
2929 -- * Creating a Request
3030 , hTTPHealthChecksPatch'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @ComputeHTTPHealthChecksPatch@ which the
4949-- 'HTTPHealthChecksPatch'' request conforms to.
50−type HttpHealthChecksPatchResource =
50+type HTTPHealthChecksPatchResource =
5151 Capture "project" Text :>
5252 "global" :>
5353 "httpHealthChecks" :>
@@ -194,6 +194,6 @@ instance GoogleRequest HTTPHealthChecksPatch' where
194194 _httphcpHTTPHealthCheck
195195 where go
196196 = clientWithRoute
197− (Proxy :: Proxy HttpHealthChecksPatchResource)
197+ (Proxy :: Proxy HTTPHealthChecksPatchResource)
198198 r
199199 u
gogol-compute/gen/Network/Google/Resource/Compute/HTTPHealthChecks/Update.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.HTTPHealthChecks.Update
2525 (
2626 -- * REST Resource
27− HttpHealthChecksUpdateResource
27+ HTTPHealthChecksUpdateResource
2828
2929 -- * Creating a Request
3030 , hTTPHealthChecksUpdate'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @ComputeHTTPHealthChecksUpdate@ which the
4949-- 'HTTPHealthChecksUpdate'' request conforms to.
50−type HttpHealthChecksUpdateResource =
50+type HTTPHealthChecksUpdateResource =
5151 Capture "project" Text :>
5252 "global" :>
5353 "httpHealthChecks" :>
@@ -194,6 +194,6 @@ instance GoogleRequest HTTPHealthChecksUpdate' where
194194 _httphcuHTTPHealthCheck
195195 where go
196196 = clientWithRoute
197− (Proxy :: Proxy HttpHealthChecksUpdateResource)
197+ (Proxy :: Proxy HTTPHealthChecksUpdateResource)
198198 r
199199 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Delete.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.URLMaps.Delete
2424 (
2525 -- * REST Resource
26− UrlMapsDeleteResource
26+ URLMapsDeleteResource
2727
2828 -- * Creating a Request
2929 , uRLMapsDelete'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @ComputeURLMapsDelete@ which the
4747-- 'URLMapsDelete'' request conforms to.
48−type UrlMapsDeleteResource =
48+type URLMapsDeleteResource =
4949 Capture "project" Text :>
5050 "global" :>
5151 "urlMaps" :>
@@ -170,6 +170,6 @@ instance GoogleRequest URLMapsDelete' where
170170 (Just AltJSON)
171171 where go
172172 = clientWithRoute
173− (Proxy :: Proxy UrlMapsDeleteResource)
173+ (Proxy :: Proxy URLMapsDeleteResource)
174174 r
175175 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Get.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.URLMaps.Get
2424 (
2525 -- * REST Resource
26− UrlMapsGetResource
26+ URLMapsGetResource
2727
2828 -- * Creating a Request
2929 , uRLMapsGet'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @ComputeURLMapsGet@ which the
4747-- 'URLMapsGet'' request conforms to.
48−type UrlMapsGetResource =
48+type URLMapsGetResource =
4949 Capture "project" Text :>
5050 "global" :>
5151 "urlMaps" :>
@@ -169,6 +169,6 @@ instance GoogleRequest URLMapsGet' where
169169 _umgFields
170170 (Just AltJSON)
171171 where go
172− = clientWithRoute (Proxy :: Proxy UrlMapsGetResource)
172+ = clientWithRoute (Proxy :: Proxy URLMapsGetResource)
173173 r
174174 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Insert.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.URLMaps.Insert
2525 (
2626 -- * REST Resource
27− UrlMapsInsertResource
27+ URLMapsInsertResource
2828
2929 -- * Creating a Request
3030 , uRLMapsInsert'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @ComputeURLMapsInsert@ which the
4848-- 'URLMapsInsert'' request conforms to.
49−type UrlMapsInsertResource =
49+type URLMapsInsertResource =
5050 Capture "project" Text :>
5151 "global" :>
5252 "urlMaps" :>
@@ -172,6 +172,6 @@ instance GoogleRequest URLMapsInsert' where
172172 _umiURLMap
173173 where go
174174 = clientWithRoute
175− (Proxy :: Proxy UrlMapsInsertResource)
175+ (Proxy :: Proxy URLMapsInsertResource)
176176 r
177177 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.URLMaps.List
2525 (
2626 -- * REST Resource
27− UrlMapsListResource
27+ URLMapsListResource
2828
2929 -- * Creating a Request
3030 , uRLMapsList'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @ComputeURLMapsList@ which the
5050-- 'URLMapsList'' request conforms to.
51−type UrlMapsListResource =
51+type URLMapsListResource =
5252 Capture "project" Text :>
5353 "global" :>
5454 "urlMaps" :>
@@ -208,6 +208,6 @@ instance GoogleRequest URLMapsList' where
208208 (Just AltJSON)
209209 where go
210210 = clientWithRoute
211− (Proxy :: Proxy UrlMapsListResource)
211+ (Proxy :: Proxy URLMapsListResource)
212212 r
213213 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Patch.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.URLMaps.Patch
2525 (
2626 -- * REST Resource
27− UrlMapsPatchResource
27+ URLMapsPatchResource
2828
2929 -- * Creating a Request
3030 , uRLMapsPatch'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @ComputeURLMapsPatch@ which the
4949-- 'URLMapsPatch'' request conforms to.
50−type UrlMapsPatchResource =
50+type URLMapsPatchResource =
5151 Capture "project" Text :>
5252 "global" :>
5353 "urlMaps" :>
@@ -185,6 +185,6 @@ instance GoogleRequest URLMapsPatch' where
185185 _umpURLMap
186186 where go
187187 = clientWithRoute
188− (Proxy :: Proxy UrlMapsPatchResource)
188+ (Proxy :: Proxy URLMapsPatchResource)
189189 r
190190 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Update.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.URLMaps.Update
2424 (
2525 -- * REST Resource
26− UrlMapsUpdateResource
26+ URLMapsUpdateResource
2727
2828 -- * Creating a Request
2929 , uRLMapsUpdate'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @ComputeURLMapsUpdate@ which the
4848-- 'URLMapsUpdate'' request conforms to.
49−type UrlMapsUpdateResource =
49+type URLMapsUpdateResource =
5050 Capture "project" Text :>
5151 "global" :>
5252 "urlMaps" :>
@@ -183,6 +183,6 @@ instance GoogleRequest URLMapsUpdate' where
183183 _umuURLMap
184184 where go
185185 = clientWithRoute
186− (Proxy :: Proxy UrlMapsUpdateResource)
186+ (Proxy :: Proxy URLMapsUpdateResource)
187187 r
188188 u
gogol-compute/gen/Network/Google/Resource/Compute/URLMaps/Validate.hs+3−3
@@ -25,7 +25,7 @@
2525module Network.Google.Resource.Compute.URLMaps.Validate
2626 (
2727 -- * REST Resource
28− UrlMapsValidateResource
28+ URLMapsValidateResource
2929
3030 -- * Creating a Request
3131 , uRLMapsValidate'
@@ -48,7 +48,7 @@ import Network.Google.Prelude
4848
4949-- | A resource alias for @ComputeURLMapsValidate@ which the
5050-- 'URLMapsValidate'' request conforms to.
51−type UrlMapsValidateResource =
51+type URLMapsValidateResource =
5252 Capture "project" Text :>
5353 "global" :>
5454 "urlMaps" :>
@@ -190,6 +190,6 @@ instance GoogleRequest URLMapsValidate' where
190190 _umvURLMapsValidateRequest
191191 where go
192192 = clientWithRoute
193− (Proxy :: Proxy UrlMapsValidateResource)
193+ (Proxy :: Proxy URLMapsValidateResource)
194194 r
195195 u
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/AggregatedList.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.VPNTunnels.AggregatedList
2424 (
2525 -- * REST Resource
26− VpnTunnelsAggregatedListResource
26+ VPNTunnelsAggregatedListResource
2727
2828 -- * Creating a Request
2929 , vPNTunnelsAggregatedList'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @ComputeVPNTunnelsAggregatedList@ which the
4949-- 'VPNTunnelsAggregatedList'' request conforms to.
50−type VpnTunnelsAggregatedListResource =
50+type VPNTunnelsAggregatedListResource =
5151 Capture "project" Text :>
5252 "aggregated" :>
5353 "vpnTunnels" :>
@@ -212,6 +212,6 @@ instance GoogleRequest VPNTunnelsAggregatedList'
212212 (Just AltJSON)
213213 where go
214214 = clientWithRoute
215− (Proxy :: Proxy VpnTunnelsAggregatedListResource)
215+ (Proxy :: Proxy VPNTunnelsAggregatedListResource)
216216 r
217217 u
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Delete.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.VPNTunnels.Delete
2424 (
2525 -- * REST Resource
26− VpnTunnelsDeleteResource
26+ VPNTunnelsDeleteResource
2727
2828 -- * Creating a Request
2929 , vPNTunnelsDelete'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @ComputeVPNTunnelsDelete@ which the
4848-- 'VPNTunnelsDelete'' request conforms to.
49−type VpnTunnelsDeleteResource =
49+type VPNTunnelsDeleteResource =
5050 Capture "project" Text :>
5151 "regions" :>
5252 Capture "region" Text :>
@@ -183,6 +183,6 @@ instance GoogleRequest VPNTunnelsDelete' where
183183 (Just AltJSON)
184184 where go
185185 = clientWithRoute
186− (Proxy :: Proxy VpnTunnelsDeleteResource)
186+ (Proxy :: Proxy VPNTunnelsDeleteResource)
187187 r
188188 u
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Get.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Compute.VPNTunnels.Get
2424 (
2525 -- * REST Resource
26− VpnTunnelsGetResource
26+ VPNTunnelsGetResource
2727
2828 -- * Creating a Request
2929 , vPNTunnelsGet'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @ComputeVPNTunnelsGet@ which the
4848-- 'VPNTunnelsGet'' request conforms to.
49−type VpnTunnelsGetResource =
49+type VPNTunnelsGetResource =
5050 Capture "project" Text :>
5151 "regions" :>
5252 Capture "region" Text :>
@@ -183,6 +183,6 @@ instance GoogleRequest VPNTunnelsGet' where
183183 (Just AltJSON)
184184 where go
185185 = clientWithRoute
186− (Proxy :: Proxy VpnTunnelsGetResource)
186+ (Proxy :: Proxy VPNTunnelsGetResource)
187187 r
188188 u
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/Insert.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.VPNTunnels.Insert
2525 (
2626 -- * REST Resource
27− VpnTunnelsInsertResource
27+ VPNTunnelsInsertResource
2828
2929 -- * Creating a Request
3030 , vPNTunnelsInsert'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @ComputeVPNTunnelsInsert@ which the
4949-- 'VPNTunnelsInsert'' request conforms to.
50−type VpnTunnelsInsertResource =
50+type VPNTunnelsInsertResource =
5151 Capture "project" Text :>
5252 "regions" :>
5353 Capture "region" Text :>
@@ -185,6 +185,6 @@ instance GoogleRequest VPNTunnelsInsert' where
185185 _vtiVPNTunnel
186186 where go
187187 = clientWithRoute
188− (Proxy :: Proxy VpnTunnelsInsertResource)
188+ (Proxy :: Proxy VPNTunnelsInsertResource)
189189 r
190190 u
gogol-compute/gen/Network/Google/Resource/Compute/VPNTunnels/List.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.Compute.VPNTunnels.List
2525 (
2626 -- * REST Resource
27− VpnTunnelsListResource
27+ VPNTunnelsListResource
2828
2929 -- * Creating a Request
3030 , vPNTunnelsList'
@@ -49,7 +49,7 @@ import Network.Google.Prelude
4949
5050-- | A resource alias for @ComputeVPNTunnelsList@ which the
5151-- 'VPNTunnelsList'' request conforms to.
52−type VpnTunnelsListResource =
52+type VPNTunnelsListResource =
5353 Capture "project" Text :>
5454 "regions" :>
5555 Capture "region" Text :>
@@ -222,6 +222,6 @@ instance GoogleRequest VPNTunnelsList' where
222222 (Just AltJSON)
223223 where go
224224 = clientWithRoute
225− (Proxy :: Proxy VpnTunnelsListResource)
225+ (Proxy :: Proxy VPNTunnelsListResource)
226226 r
227227 u
gogol-container/gen/Network/Google/Container.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Container Engine API is used for building and managing
15+-- | The Google Container Engine API is used for building and managing
1616-- container based applications, powered by the open source Kubernetes
1717-- technology.
1818--
gogol-customsearch/gen/Network/Google/CustomSearch.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you search over a website or collection of websites
15+-- | Lets you search over a website or collection of websites
1616--
1717-- /See:/ <https://developers.google.com/custom-search/v1/using_rest CustomSearch API Reference>
1818module Network.Google.CustomSearch
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+3−3
@@ -85,7 +85,7 @@ instance ToJSON SearchCseListImgColorType where
8585-- | Returns images of a type, which can be one of: clipart, face, lineart,
8686-- news, and photo.
8787data SearchCseListImgType
88− = CliParty
88+ = CliPart
8989 -- ^ @clipart@
9090 -- clipart
9191 | Face
@@ -106,7 +106,7 @@ instance Hashable SearchCseListImgType
106106
107107instance FromText SearchCseListImgType where
108108 fromText = \case
109− "clipart" -> Just CliParty
109+ "clipart" -> Just CliPart
110110 "face" -> Just Face
111111 "lineart" -> Just Lineart
112112 "news" -> Just News
@@ -115,7 +115,7 @@ instance FromText SearchCseListImgType where
115115
116116instance ToText SearchCseListImgType where
117117 toText = \case
118− CliParty -> "clipart"
118+ CliPart -> "clipart"
119119 Face -> "face"
120120 Lineart -> "lineart"
121121 News -> "news"
gogol-dataflow/gen/Network/Google/Dataflow.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Google Dataflow API.
15+-- | Google Dataflow API.
1616--
1717-- /See:/ <https://cloud.google.com/dataflow Google Dataflow API Reference>
1818module Network.Google.Dataflow
gogol-datastore/gen/Network/Google/Datastore.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for accessing Google Cloud Datastore.
15+-- | API for accessing Google Cloud Datastore.
1616--
1717-- /See:/ <https://developers.google.com/datastore/ Google Cloud Datastore API Reference>
1818module Network.Google.Datastore
gogol-debugger/gen/Network/Google/Debugger.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you examine the stack and variables of your running application
15+-- | Lets you examine the stack and variables of your running application
1616-- without stopping or slowing it down.
1717--
1818-- /See:/ <https://cloud.google.com/tools/cloud-debugger Google Cloud Debugger API Reference>
gogol-deploymentmanager/gen/Network/Google/DeploymentManager.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Deployment Manager API allows users to declaratively configure,
15+-- | The Deployment Manager API allows users to declaratively configure,
1616-- deploy and run complex solutions on the Google Cloud Platform.
1717--
1818-- /See:/ <https://developers.google.com/deployment-manager/ Google Cloud Deployment Manager API Reference>
gogol-dfareporting/gen/Network/Google/DFAReporting.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Manage your DoubleClick Campaign Manager ad campaigns and reports.
15+-- | Manage your DoubleClick Campaign Manager ad campaigns and reports.
1616--
1717-- /See:/ <https://developers.google.com/doubleclick-advertisers/reporting/ DCM/DFA Reporting And Trafficking API Reference>
1818module Network.Google.DFAReporting
gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+12−12
@@ -6747,13 +6747,13 @@ instance ToJSON CreativeCustomEventAdvertiserCustomEventType where
67476747
67486748-- | The dimension option.
67496749data ReportCrossDimensionReachCriteriaDimension
6750− = Advertiser
6750+ = RCDRCDAdvertiser
67516751 -- ^ @ADVERTISER@
6752− | Campaign
6752+ | RCDRCDCampaign
67536753 -- ^ @CAMPAIGN@
6754− | SiteByAdvertiser
6754+ | RCDRCDSiteByAdvertiser
67556755 -- ^ @SITE_BY_ADVERTISER@
6756− | SiteByCampaign
6756+ | RCDRCDSiteByCampaign
67576757 -- ^ @SITE_BY_CAMPAIGN@
67586758 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
67596759
@@ -6761,18 +6761,18 @@ instance Hashable ReportCrossDimensionReachCriteriaDimension
67616761
67626762instance FromText ReportCrossDimensionReachCriteriaDimension where
67636763 fromText = \case
6764− "ADVERTISER" -> Just Advertiser
6765− "CAMPAIGN" -> Just Campaign
6766− "SITE_BY_ADVERTISER" -> Just SiteByAdvertiser
6767− "SITE_BY_CAMPAIGN" -> Just SiteByCampaign
6764+ "ADVERTISER" -> Just RCDRCDAdvertiser
6765+ "CAMPAIGN" -> Just RCDRCDCampaign
6766+ "SITE_BY_ADVERTISER" -> Just RCDRCDSiteByAdvertiser
6767+ "SITE_BY_CAMPAIGN" -> Just RCDRCDSiteByCampaign
67686768 _ -> Nothing
67696769
67706770instance ToText ReportCrossDimensionReachCriteriaDimension where
67716771 toText = \case
6772− Advertiser -> "ADVERTISER"
6773− Campaign -> "CAMPAIGN"
6774− SiteByAdvertiser -> "SITE_BY_ADVERTISER"
6775− SiteByCampaign -> "SITE_BY_CAMPAIGN"
6772+ RCDRCDAdvertiser -> "ADVERTISER"
6773+ RCDRCDCampaign -> "CAMPAIGN"
6774+ RCDRCDSiteByAdvertiser -> "SITE_BY_ADVERTISER"
6775+ RCDRCDSiteByCampaign -> "SITE_BY_CAMPAIGN"
67766776
67776777instance FromJSON ReportCrossDimensionReachCriteriaDimension where
67786778 parseJSON = parseJSONText "ReportCrossDimensionReachCriteriaDimension"
gogol-discovery/gen/Network/Google/Discovery.hs+4−4
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you discover information about other Google APIs, such as what APIs
15+-- | Lets you discover information about other Google APIs, such as what APIs
1616-- are available, the resource and method details for each API.
1717--
1818-- /See:/ <https://developers.google.com/discovery/ APIs Discovery Service Reference>
@@ -97,7 +97,7 @@ module Network.Google.Discovery
9797 , RestMethodMediaUploadProtocolsSimple
9898 , restMethodMediaUploadProtocolsSimple
9999 , rmmupsPath
100− , rmmupsMultiParty
100+ , rmmupsMultiPart
101101
102102 -- ** RestDescriptionAuthOAuth2
103103 , RestDescriptionAuthOAuth2
@@ -243,7 +243,7 @@ module Network.Google.Discovery
243243 , RestMethodMediaUploadProtocolsResumable
244244 , restMethodMediaUploadProtocolsResumable
245245 , rmmuprPath
246− , rmmuprMultiParty
246+ , rmmuprMultiPart
247247
248248 -- ** RestMethodRequest
249249 , RestMethodRequest
@@ -262,7 +262,7 @@ TODO
262262-}
263263
264264type DiscoveryAPI =
265− ApisListResource :<|> ApisGetRestResource
265+ APIsListResource :<|> APIsGetRestResource
266266
267267discoveryAPI :: Proxy DiscoveryAPI
268268discoveryAPI = Proxy
gogol-discovery/gen/Network/Google/Discovery/Types.hs+2−2
@@ -79,7 +79,7 @@ module Network.Google.Discovery.Types
7979 , RestMethodMediaUploadProtocolsSimple
8080 , restMethodMediaUploadProtocolsSimple
8181 , rmmupsPath
82− , rmmupsMultiParty
82+ , rmmupsMultiPart
8383
8484 -- * RestDescriptionAuthOAuth2
8585 , RestDescriptionAuthOAuth2
@@ -225,7 +225,7 @@ module Network.Google.Discovery.Types
225225 , RestMethodMediaUploadProtocolsResumable
226226 , restMethodMediaUploadProtocolsResumable
227227 , rmmuprPath
228− , rmmuprMultiParty
228+ , rmmuprMultiPart
229229
230230 -- * RestMethodRequest
231231 , RestMethodRequest
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+18−18
@@ -484,8 +484,8 @@ instance ToJSON RestResourceResources where
484484--
485485-- /See:/ 'restMethodMediaUploadProtocolsSimple' smart constructor.
486486data RestMethodMediaUploadProtocolsSimple = RestMethodMediaUploadProtocolsSimple
487− { _rmmupsPath :: !(Maybe Text)
488− , _rmmupsMultiParty :: !Bool
487+ { _rmmupsPath :: !(Maybe Text)
488+ , _rmmupsMultiPart :: !Bool
489489 } deriving (Eq,Read,Show,Data,Typeable,Generic)
490490
491491-- | Creates a value of 'RestMethodMediaUploadProtocolsSimple' with the minimum fields required to make a request.
@@ -494,13 +494,13 @@ data RestMethodMediaUploadProtocolsSimple = RestMethodMediaUploadProtocolsSimple
494494--
495495-- * 'rmmupsPath'
496496--
497−-- * 'rmmupsMultiParty'
497+-- * 'rmmupsMultiPart'
498498restMethodMediaUploadProtocolsSimple
499499 :: RestMethodMediaUploadProtocolsSimple
500500restMethodMediaUploadProtocolsSimple =
501501 RestMethodMediaUploadProtocolsSimple
502502 { _rmmupsPath = Nothing
503− , _rmmupsMultiParty = True
503+ , _rmmupsMultiPart = True
504504 }
505505
506506-- | The URI path to be used for upload. Should be used in conjunction with
@@ -510,10 +510,10 @@ rmmupsPath
510510 = lens _rmmupsPath (\ s a -> s{_rmmupsPath = a})
511511
512512-- | True if this endpoint supports upload multipart media.
513−rmmupsMultiParty :: Lens' RestMethodMediaUploadProtocolsSimple Bool
514−rmmupsMultiParty
515− = lens _rmmupsMultiParty
516− (\ s a -> s{_rmmupsMultiParty = a})
513+rmmupsMultiPart :: Lens' RestMethodMediaUploadProtocolsSimple Bool
514+rmmupsMultiPart
515+ = lens _rmmupsMultiPart
516+ (\ s a -> s{_rmmupsMultiPart = a})
517517
518518instance FromJSON
519519 RestMethodMediaUploadProtocolsSimple where
@@ -529,7 +529,7 @@ instance ToJSON RestMethodMediaUploadProtocolsSimple
529529 = object
530530 (catMaybes
531531 [("path" .=) <$> _rmmupsPath,
532− Just ("multipart" .= _rmmupsMultiParty)])
532+ Just ("multipart" .= _rmmupsMultiPart)])
533533
534534-- | OAuth 2.0 authentication information.
535535--
@@ -1774,8 +1774,8 @@ instance ToJSON DirectoryList where
17741774--
17751775-- /See:/ 'restMethodMediaUploadProtocolsResumable' smart constructor.
17761776data RestMethodMediaUploadProtocolsResumable = RestMethodMediaUploadProtocolsResumable
1777− { _rmmuprPath :: !(Maybe Text)
1778− , _rmmuprMultiParty :: !Bool
1777+ { _rmmuprPath :: !(Maybe Text)
1778+ , _rmmuprMultiPart :: !Bool
17791779 } deriving (Eq,Read,Show,Data,Typeable,Generic)
17801780
17811781-- | Creates a value of 'RestMethodMediaUploadProtocolsResumable' with the minimum fields required to make a request.
@@ -1784,13 +1784,13 @@ data RestMethodMediaUploadProtocolsResumable = RestMethodMediaUploadProtocolsRes
17841784--
17851785-- * 'rmmuprPath'
17861786--
1787−-- * 'rmmuprMultiParty'
1787+-- * 'rmmuprMultiPart'
17881788restMethodMediaUploadProtocolsResumable
17891789 :: RestMethodMediaUploadProtocolsResumable
17901790restMethodMediaUploadProtocolsResumable =
17911791 RestMethodMediaUploadProtocolsResumable
17921792 { _rmmuprPath = Nothing
1793− , _rmmuprMultiParty = True
1793+ , _rmmuprMultiPart = True
17941794 }
17951795
17961796-- | The URI path to be used for upload. Should be used in conjunction with
@@ -1800,10 +1800,10 @@ rmmuprPath
18001800 = lens _rmmuprPath (\ s a -> s{_rmmuprPath = a})
18011801
18021802-- | True if this endpoint supports uploading multipart media.
1803−rmmuprMultiParty :: Lens' RestMethodMediaUploadProtocolsResumable Bool
1804−rmmuprMultiParty
1805− = lens _rmmuprMultiParty
1806− (\ s a -> s{_rmmuprMultiParty = a})
1803+rmmuprMultiPart :: Lens' RestMethodMediaUploadProtocolsResumable Bool
1804+rmmuprMultiPart
1805+ = lens _rmmuprMultiPart
1806+ (\ s a -> s{_rmmuprMultiPart = a})
18071807
18081808instance FromJSON
18091809 RestMethodMediaUploadProtocolsResumable where
@@ -1820,7 +1820,7 @@ instance ToJSON
18201820 = object
18211821 (catMaybes
18221822 [("path" .=) <$> _rmmuprPath,
1823− Just ("multipart" .= _rmmuprMultiParty)])
1823+ Just ("multipart" .= _rmmuprMultiPart)])
18241824
18251825-- | The schema for the request.
18261826--
gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/GetRest.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Discovery.APIs.GetRest
2424 (
2525 -- * REST Resource
26− ApisGetRestResource
26+ APIsGetRestResource
2727
2828 -- * Creating a Request
2929 , aPIsGetRest'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @DiscoveryAPIsGetRest@ which the
4747-- 'APIsGetRest'' request conforms to.
48−type ApisGetRestResource =
48+type APIsGetRestResource =
4949 "apis" :>
5050 Capture "api" Text :>
5151 Capture "version" Text :>
@@ -170,6 +170,6 @@ instance GoogleRequest APIsGetRest' where
170170 (Just AltJSON)
171171 where go
172172 = clientWithRoute
173− (Proxy :: Proxy ApisGetRestResource)
173+ (Proxy :: Proxy APIsGetRestResource)
174174 r
175175 u
gogol-discovery/gen/Network/Google/Resource/Discovery/APIs/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.Discovery.APIs.List
2424 (
2525 -- * REST Resource
26− ApisListResource
26+ APIsListResource
2727
2828 -- * Creating a Request
2929 , aPIsList'
@@ -45,7 +45,7 @@ import Network.Google.Prelude
4545
4646-- | A resource alias for @DiscoveryAPIsList@ which the
4747-- 'APIsList'' request conforms to.
48−type ApisListResource =
48+type APIsListResource =
4949 "apis" :>
5050 QueryParam "quotaUser" Text :>
5151 QueryParam "prettyPrint" Bool :>
@@ -163,5 +163,5 @@ instance GoogleRequest APIsList' where
163163 _alFields
164164 (Just AltJSON)
165165 where go
166− = clientWithRoute (Proxy :: Proxy ApisListResource) r
166+ = clientWithRoute (Proxy :: Proxy APIsListResource) r
167167 u
gogol-dns/gen/Network/Google/DNS.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Cloud DNS API provides services for configuring and serving
15+-- | The Google Cloud DNS API provides services for configuring and serving
1616-- authoritative DNS records.
1717--
1818-- /See:/ <https://developers.google.com/cloud-dns Google Cloud DNS API Reference>
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for viewing and managing your reports in DoubleClick Bid Manager.
15+-- | API for viewing and managing your reports in DoubleClick Bid Manager.
1616--
1717-- /See:/ <https://developers.google.com/bid-manager/ DoubleClick Bid Manager API Reference>
1818module Network.Google.DoubleClickBids
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Report and modify your advertising data in DoubleClick Search (for
15+-- | Report and modify your advertising data in DoubleClick Search (for
1616-- example, campaigns, ad groups, keywords, and conversions).
1717--
1818-- /See:/ <https://developers.google.com/doubleclick-search/ DoubleClick Search API Reference>
gogol-drive/gen/Network/Google/Drive.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The API to interact with Drive.
15+-- | The API to interact with Drive.
1616--
1717-- /See:/ <https://developers.google.com/drive/ Drive API Reference>
1818module Network.Google.Drive
gogol-fitness/gen/Network/Google/Fitness.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Google Fit API
15+-- | Google Fit API
1616--
1717-- /See:/ <https://developers.google.com/fit/rest/ Fitness Reference>
1818module Network.Google.Fitness
gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+33−33
@@ -20,15 +20,15 @@ import Network.Google.Prelude
2020-- | The type of a bucket signifies how the data aggregation is performed in
2121-- the bucket.
2222data AggregateBucketType
23− = ActivitySegment
23+ = ABTActivitySegment
2424 -- ^ @activitySegment@
25− | ActivityType
25+ | ABTActivityType
2626 -- ^ @activityType@
27− | Session
27+ | ABTSession
2828 -- ^ @session@
29− | Time
29+ | ABTTime
3030 -- ^ @time@
31− | Unknown
31+ | ABTUnknown
3232 -- ^ @unknown@
3333 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
3434
@@ -36,20 +36,20 @@ instance Hashable AggregateBucketType
3636
3737instance FromText AggregateBucketType where
3838 fromText = \case
39− "activitySegment" -> Just ActivitySegment
40− "activityType" -> Just ActivityType
41− "session" -> Just Session
42− "time" -> Just Time
43− "unknown" -> Just Unknown
39+ "activitySegment" -> Just ABTActivitySegment
40+ "activityType" -> Just ABTActivityType
41+ "session" -> Just ABTSession
42+ "time" -> Just ABTTime
43+ "unknown" -> Just ABTUnknown
4444 _ -> Nothing
4545
4646instance ToText AggregateBucketType where
4747 toText = \case
48− ActivitySegment -> "activitySegment"
49− ActivityType -> "activityType"
50− Session -> "session"
51− Time -> "time"
52− Unknown -> "unknown"
48+ ABTActivitySegment -> "activitySegment"
49+ ABTActivityType -> "activityType"
50+ ABTSession -> "session"
51+ ABTTime -> "time"
52+ ABTUnknown -> "unknown"
5353
5454instance FromJSON AggregateBucketType where
5555 parseJSON = parseJSONText "AggregateBucketType"
@@ -87,17 +87,17 @@ instance ToJSON DataSourceType where
8787
8888-- | A constant representing the type of the device.
8989data DeviceType
90− = DTChestStrap
90+ = ChestStrap
9191 -- ^ @chestStrap@
92− | DTPhone
92+ | Phone
9393 -- ^ @phone@
94− | DTScale
94+ | Scale
9595 -- ^ @scale@
96− | DTTablet
96+ | Tablet
9797 -- ^ @tablet@
98− | DTUnknown
98+ | Unknown
9999 -- ^ @unknown@
100− | DTWatch
100+ | Watch
101101 -- ^ @watch@
102102 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
103103
@@ -105,22 +105,22 @@ instance Hashable DeviceType
105105
106106instance FromText DeviceType where
107107 fromText = \case
108− "chestStrap" -> Just DTChestStrap
109− "phone" -> Just DTPhone
110− "scale" -> Just DTScale
111− "tablet" -> Just DTTablet
112− "unknown" -> Just DTUnknown
113− "watch" -> Just DTWatch
108+ "chestStrap" -> Just ChestStrap
109+ "phone" -> Just Phone
110+ "scale" -> Just Scale
111+ "tablet" -> Just Tablet
112+ "unknown" -> Just Unknown
113+ "watch" -> Just Watch
114114 _ -> Nothing
115115
116116instance ToText DeviceType where
117117 toText = \case
118− DTChestStrap -> "chestStrap"
119− DTPhone -> "phone"
120− DTScale -> "scale"
121− DTTablet -> "tablet"
122− DTUnknown -> "unknown"
123− DTWatch -> "watch"
118+ ChestStrap -> "chestStrap"
119+ Phone -> "phone"
120+ Scale -> "scale"
121+ Tablet -> "tablet"
122+ Unknown -> "unknown"
123+ Watch -> "watch"
124124
125125instance FromJSON DeviceType where
126126 parseJSON = parseJSONText "DeviceType"
gogol-fonts/gen/Network/Google/Fonts.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Fonts Developer API.
15+-- | The Google Fonts Developer API.
1616--
1717-- /See:/ <https://developers.google.com/fonts/docs/developer_api Google Fonts Developer API Reference>
1818module Network.Google.Fonts
gogol-freebasesearch/gen/Network/Google/FreebaseSearch.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Find Freebase entities using textual queries and other constraints.
15+-- | Find Freebase entities using textual queries and other constraints.
1616--
1717-- /See:/ <https://developers.google.com/freebase/ Freebase Search Reference>
1818module Network.Google.FreebaseSearch
gogol-fusiontables/gen/Network/Google/FusionTables.hs+3−3
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for working with Fusion Tables data.
15+-- | API for working with Fusion Tables data.
1616--
1717-- /See:/ <https://developers.google.com/fusiontables Fusion Tables API Reference>
1818module Network.Google.FusionTables
@@ -378,8 +378,8 @@ type FusionTablesAPI =
378378 :<|> StyleGetResource
379379 :<|> StyleDeleteResource
380380 :<|> StyleUpdateResource
381− :<|> QuerySqlGetResource
382− :<|> QuerySqlResource
381+ :<|> QuerySQLGetResource
382+ :<|> QuerySQLResource
383383 :<|> TaskListResource
384384 :<|> TaskGetResource
385385 :<|> TaskDeleteResource
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQL.hs+4−4
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.FusionTables.Query.SQL
2525 (
2626 -- * REST Resource
27− QuerySqlResource
27+ QuerySQLResource
2828
2929 -- * Creating a Request
3030 , querySQL'
@@ -47,7 +47,7 @@ import Network.Google.Prelude
4747
4848-- | A resource alias for @FusiontablesQuerySQL@ which the
4949-- 'QuerySQL'' request conforms to.
50−type QuerySqlResource =
50+type QuerySQLResource =
5151 "query" :>
5252 QueryParam "typed" Bool :>
5353 QueryParam "quotaUser" Text :>
@@ -195,7 +195,7 @@ instance GoogleRequest QuerySQL' where
195195 _qsqlFields
196196 (Just AltJSON)
197197 where go :<|> _
198− = clientWithRoute (Proxy :: Proxy QuerySqlResource) r
198+ = clientWithRoute (Proxy :: Proxy QuerySQLResource) r
199199 u
200200
201201instance GoogleRequest QuerySQL' where
@@ -212,5 +212,5 @@ instance GoogleRequest QuerySQL' where
212212 _qsqlFields
213213 (Just Media)
214214 where go :<|> _
215− = clientWithRoute (Proxy :: Proxy QuerySqlResource) r
215+ = clientWithRoute (Proxy :: Proxy QuerySQLResource) r
216216 u
gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQLGet.hs+4−4
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.FusionTables.Query.SQLGet
2424 (
2525 -- * REST Resource
26− QuerySqlGetResource
26+ QuerySQLGetResource
2727
2828 -- * Creating a Request
2929 , querySQLGet'
@@ -46,7 +46,7 @@ import Network.Google.Prelude
4646
4747-- | A resource alias for @FusiontablesQuerySQLGet@ which the
4848-- 'QuerySQLGet'' request conforms to.
49−type QuerySqlGetResource =
49+type QuerySQLGetResource =
5050 "query" :>
5151 QueryParam "typed" Bool :>
5252 QueryParam "quotaUser" Text :>
@@ -194,7 +194,7 @@ instance GoogleRequest QuerySQLGet' where
194194 (Just AltJSON)
195195 where go :<|> _
196196 = clientWithRoute
197− (Proxy :: Proxy QuerySqlGetResource)
197+ (Proxy :: Proxy QuerySQLGetResource)
198198 r
199199 u
200200
@@ -213,6 +213,6 @@ instance GoogleRequest QuerySQLGet' where
213213 (Just Media)
214214 where go :<|> _
215215 = clientWithRoute
216− (Proxy :: Proxy QuerySqlGetResource)
216+ (Proxy :: Proxy QuerySQLGetResource)
217217 r
218218 u
gogol-games-appstate/gen/Network/Google/AppState.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google App State API.
15+-- | The Google App State API.
1616--
1717-- /See:/ <https://developers.google.com/games/services/web/api/states Google App State API Reference>
1818module Network.Google.AppState
gogol-games-configuration/gen/Network/Google/GamesConfiguration.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Publishing API for Google Play Game Services.
15+-- | The Publishing API for Google Play Game Services.
1616--
1717-- /See:/ <https://developers.google.com/games/services Google Play Game Services Publishing API Reference>
1818module Network.Google.GamesConfiguration
gogol-games-management/gen/Network/Google/GamesManagement.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Management API for Google Play Game Services.
15+-- | The Management API for Google Play Game Services.
1616--
1717-- /See:/ <https://developers.google.com/games/services Google Play Game Services Management API Reference>
1818module Network.Google.GamesManagement
gogol-games/gen/Network/Google/Games.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The API for Google Play Game Services.
15+-- | The API for Google Play Game Services.
1616--
1717-- /See:/ <https://developers.google.com/games/services/ Google Play Game Services API Reference>
1818module Network.Google.Games
gogol-genomics/gen/Network/Google/Genomics.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Provides access to Genomics data.
15+-- | Provides access to Genomics data.
1616--
1717-- /See:/ <https://developers.google.com/genomics/v1beta2/reference Genomics API Reference>
1818module Network.Google.Genomics
gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+12−12
@@ -120,13 +120,13 @@ instance ToJSON SearchJobsRequestStatus where
120120
121121-- | The type of annotations contained within this set.
122122data AnnotationSetType
123− = Gene
123+ = ASTGene
124124 -- ^ @GENE@
125− | Generic
125+ | ASTGeneric
126126 -- ^ @GENERIC@
127− | Transcript
127+ | ASTTranscript
128128 -- ^ @TRANSCRIPT@
129− | Variant
129+ | ASTVariant
130130 -- ^ @VARIANT@
131131 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
132132
@@ -134,18 +134,18 @@ instance Hashable AnnotationSetType
134134
135135instance FromText AnnotationSetType where
136136 fromText = \case
137− "GENE" -> Just Gene
138− "GENERIC" -> Just Generic
139− "TRANSCRIPT" -> Just Transcript
140− "VARIANT" -> Just Variant
137+ "GENE" -> Just ASTGene
138+ "GENERIC" -> Just ASTGeneric
139+ "TRANSCRIPT" -> Just ASTTranscript
140+ "VARIANT" -> Just ASTVariant
141141 _ -> Nothing
142142
143143instance ToText AnnotationSetType where
144144 toText = \case
145− Gene -> "GENE"
146− Generic -> "GENERIC"
147− Transcript -> "TRANSCRIPT"
148− Variant -> "VARIANT"
145+ ASTGene -> "GENE"
146+ ASTGeneric -> "GENERIC"
147+ ASTTranscript -> "TRANSCRIPT"
148+ ASTVariant -> "VARIANT"
149149
150150instance FromJSON AnnotationSetType where
151151 parseJSON = parseJSONText "AnnotationSetType"
gogol-gmail/gen/Network/Google/Gmail.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Gmail REST API.
15+-- | The Gmail REST API.
1616--
1717-- /See:/ <https://developers.google.com/gmail/api/ Gmail API Reference>
1818module Network.Google.Gmail
gogol-groups-migration/gen/Network/Google/GroupsMigration.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Groups Migration Api.
15+-- | Groups Migration Api.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/groups-migration/ Groups Migration API Reference>
1818module Network.Google.GroupsMigration
gogol-groups-migration/gen/Network/Google/GroupsSettings.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you manage permission levels and related settings of a group.
15+-- | Lets you manage permission levels and related settings of a group.
1616--
1717-- /See:/ <https://developers.google.com/google-apps/groups-settings/get_started Groups Settings API Reference>
1818module Network.Google.GroupsSettings
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit.hs+89−89
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Help the third party sites to implement federated login.
15+-- | Help the third party sites to implement federated login.
1616--
1717-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference>
1818module Network.Google.IdentityToolkit
@@ -26,41 +26,41 @@ module Network.Google.IdentityToolkit
2626
2727 -- * REST Resources
2828
29− -- ** IdentitytoolkitRelyingPartyyCreateAuthURI
30− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.CreateAuthURI
29+ -- ** IdentitytoolkitRelyingPartyCreateAuthURI
30+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.CreateAuthURI
3131
32− -- ** IdentitytoolkitRelyingPartyyDeleteAccount
33− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
32+ -- ** IdentitytoolkitRelyingPartyDeleteAccount
33+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.DeleteAccount
3434
35− -- ** IdentitytoolkitRelyingPartyyDownloadAccount
36− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
35+ -- ** IdentitytoolkitRelyingPartyDownloadAccount
36+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.DownloadAccount
3737
38− -- ** IdentitytoolkitRelyingPartyyGetAccountInfo
39− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
38+ -- ** IdentitytoolkitRelyingPartyGetAccountInfo
39+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.GetAccountInfo
4040
41− -- ** IdentitytoolkitRelyingPartyyGetOobConfirmationCode
42− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetOobConfirmationCode
41+ -- ** IdentitytoolkitRelyingPartyGetOOBConfirmationCode
42+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.GetOOBConfirmationCode
4343
44− -- ** IdentitytoolkitRelyingPartyyGetPublicKeys
45− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
44+ -- ** IdentitytoolkitRelyingPartyGetPublicKeys
45+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.GetPublicKeys
4646
47− -- ** IdentitytoolkitRelyingPartyyGetRecaptchaParam
48− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
47+ -- ** IdentitytoolkitRelyingPartyGetRecaptchaParam
48+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.GetRecaptchaParam
4949
50− -- ** IdentitytoolkitRelyingPartyyResetPassword
51− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.ResetPassword
50+ -- ** IdentitytoolkitRelyingPartyResetPassword
51+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.ResetPassword
5252
53− -- ** IdentitytoolkitRelyingPartyySetAccountInfo
54− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
53+ -- ** IdentitytoolkitRelyingPartySetAccountInfo
54+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.SetAccountInfo
5555
56− -- ** IdentitytoolkitRelyingPartyyUploadAccount
57− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.UploadAccount
56+ -- ** IdentitytoolkitRelyingPartyUploadAccount
57+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.UploadAccount
5858
59− -- ** IdentitytoolkitRelyingPartyyVerifyAssertion
60− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyAssertion
59+ -- ** IdentitytoolkitRelyingPartyVerifyAssertion
60+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyAssertion
6161
62− -- ** IdentitytoolkitRelyingPartyyVerifyPassword
63− , module Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
62+ -- ** IdentitytoolkitRelyingPartyVerifyPassword
63+ , module Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyPassword
6464
6565 -- * Types
6666
@@ -80,31 +80,31 @@ module Network.Google.IdentityToolkit
8080 , uiPasswordHash
8181 , uiLocalId
8282
83− -- ** IdentitytoolkitRelyingPartyyVerifyPasswordRequest
84− , IdentitytoolkitRelyingPartyyVerifyPasswordRequest
85− , identitytoolkitRelyingPartyyVerifyPasswordRequest
83+ -- ** IdentitytoolkitRelyingPartyVerifyPasswordRequest
84+ , IdentitytoolkitRelyingPartyVerifyPasswordRequest
85+ , identitytoolkitRelyingPartyVerifyPasswordRequest
8686 , irpvprEmail
8787 , irpvprCaptchaChallenge
8888 , irpvprPassword
8989 , irpvprCaptchaResponse
9090 , irpvprPendingIdToken
9191
92− -- ** IdentitytoolkitRelyingPartyyVerifyAssertionRequest
93− , IdentitytoolkitRelyingPartyyVerifyAssertionRequest
94− , identitytoolkitRelyingPartyyVerifyAssertionRequest
92+ -- ** IdentitytoolkitRelyingPartyVerifyAssertionRequest
93+ , IdentitytoolkitRelyingPartyVerifyAssertionRequest
94+ , identitytoolkitRelyingPartyVerifyAssertionRequest
9595 , irpvarPostBody
9696 , irpvarReturnRefreshToken
9797 , irpvarRequestURI
9898 , irpvarPendingIdToken
9999
100− -- ** IdentitytoolkitRelyingPartyySetAccountInfoRequest
101− , IdentitytoolkitRelyingPartyySetAccountInfoRequest
102− , identitytoolkitRelyingPartyySetAccountInfoRequest
100+ -- ** IdentitytoolkitRelyingPartySetAccountInfoRequest
101+ , IdentitytoolkitRelyingPartySetAccountInfoRequest
102+ , identitytoolkitRelyingPartySetAccountInfoRequest
103103 , irpsairUpgradeToFederatedLogin
104104 , irpsairEmail
105105 , irpsairCaptchaChallenge
106106 , irpsairValidSince
107− , irpsairOobCode
107+ , irpsairOOBCode
108108 , irpsairPassword
109109 , irpsairCaptchaResponse
110110 , irpsairEmailVerified
@@ -148,9 +148,9 @@ module Network.Google.IdentityToolkit
148148 , caurRegistered
149149 , caurForExistingProvider
150150
151− -- ** RelyingPartyy
152− , RelyingPartyy
153− , relyingPartyy
151+ -- ** RelyingParty
152+ , RelyingParty
153+ , relyingParty
154154 , rpEmail
155155 , rpKind
156156 , rpUserIP
@@ -160,20 +160,20 @@ module Network.Google.IdentityToolkit
160160 , rpChallenge
161161 , rpIdToken
162162
163− -- ** IdentitytoolkitRelyingPartyyGetAccountInfoRequest
164− , IdentitytoolkitRelyingPartyyGetAccountInfoRequest
165− , identitytoolkitRelyingPartyyGetAccountInfoRequest
163+ -- ** IdentitytoolkitRelyingPartyGetAccountInfoRequest
164+ , IdentitytoolkitRelyingPartyGetAccountInfoRequest
165+ , identitytoolkitRelyingPartyGetAccountInfoRequest
166166 , irpgairEmail
167167 , irpgairLocalId
168168 , irpgairIdToken
169169
170− -- ** IdentitytoolkitRelyingPartyyGetPublicKeysResponse
171− , IdentitytoolkitRelyingPartyyGetPublicKeysResponse
172− , identitytoolkitRelyingPartyyGetPublicKeysResponse
170+ -- ** IdentitytoolkitRelyingPartyGetPublicKeysResponse
171+ , IdentitytoolkitRelyingPartyGetPublicKeysResponse
172+ , identitytoolkitRelyingPartyGetPublicKeysResponse
173173
174− -- ** IdentitytoolkitRelyingPartyyCreateAuthURIRequest
175− , IdentitytoolkitRelyingPartyyCreateAuthURIRequest
176− , identitytoolkitRelyingPartyyCreateAuthURIRequest
174+ -- ** IdentitytoolkitRelyingPartyCreateAuthURIRequest
175+ , IdentitytoolkitRelyingPartyCreateAuthURIRequest
176+ , identitytoolkitRelyingPartyCreateAuthURIRequest
177177 , irpcaurProviderId
178178 , irpcaurClientId
179179 , irpcaurContext
@@ -185,9 +185,9 @@ module Network.Google.IdentityToolkit
185185 , irpcaurOAuthScope
186186 , irpcaurOpenidRealm
187187
188− -- ** IdentitytoolkitRelyingPartyyUploadAccountRequest
189− , IdentitytoolkitRelyingPartyyUploadAccountRequest
190− , identitytoolkitRelyingPartyyUploadAccountRequest
188+ -- ** IdentitytoolkitRelyingPartyUploadAccountRequest
189+ , IdentitytoolkitRelyingPartyUploadAccountRequest
190+ , identitytoolkitRelyingPartyUploadAccountRequest
191191 , irpuarUsers
192192 , irpuarMemoryCost
193193 , irpuarSaltSeparator
@@ -195,12 +195,12 @@ module Network.Google.IdentityToolkit
195195 , irpuarSignerKey
196196 , irpuarRounds
197197
198− -- ** IdentitytoolkitRelyingPartyyResetPasswordRequest
199− , IdentitytoolkitRelyingPartyyResetPasswordRequest
200− , identitytoolkitRelyingPartyyResetPasswordRequest
198+ -- ** IdentitytoolkitRelyingPartyResetPasswordRequest
199+ , IdentitytoolkitRelyingPartyResetPasswordRequest
200+ , identitytoolkitRelyingPartyResetPasswordRequest
201201 , irprprEmail
202202 , irprprNewPassword
203− , irprprOobCode
203+ , irprprOOBCode
204204 , irprprOldPassword
205205
206206 -- ** GetAccountInfoResponse
@@ -209,15 +209,15 @@ module Network.Google.IdentityToolkit
209209 , gairUsers
210210 , gairKind
211211
212− -- ** GetOobConfirmationCodeResponse
213− , GetOobConfirmationCodeResponse
214− , getOobConfirmationCodeResponse
215− , goccrKind
216− , goccrOobCode
212+ -- ** GetOOBConfirmationCodeResponse
213+ , GetOOBConfirmationCodeResponse
214+ , getOOBConfirmationCodeResponse
215+ , goobccrKind
216+ , goobccrOOBCode
217217
218− -- ** IdentitytoolkitRelyingPartyyDeleteAccountRequest
219− , IdentitytoolkitRelyingPartyyDeleteAccountRequest
220− , identitytoolkitRelyingPartyyDeleteAccountRequest
218+ -- ** IdentitytoolkitRelyingPartyDeleteAccountRequest
219+ , IdentitytoolkitRelyingPartyDeleteAccountRequest
220+ , identitytoolkitRelyingPartyDeleteAccountRequest
221221 , irpdarLocalId
222222
223223 -- ** SetAccountInfoResponseProviderUserInfo
@@ -227,9 +227,9 @@ module Network.Google.IdentityToolkit
227227 , sairpuiPhotoURL
228228 , sairpuiDisplayName
229229
230− -- ** IdentitytoolkitRelyingPartyyDownloadAccountRequest
231− , IdentitytoolkitRelyingPartyyDownloadAccountRequest
232− , identitytoolkitRelyingPartyyDownloadAccountRequest
230+ -- ** IdentitytoolkitRelyingPartyDownloadAccountRequest
231+ , IdentitytoolkitRelyingPartyDownloadAccountRequest
232+ , identitytoolkitRelyingPartyDownloadAccountRequest
233233 , irpdarNextPageToken
234234 , irpdarMaxResults
235235
@@ -315,36 +315,36 @@ module Network.Google.IdentityToolkit
315315
316316import Network.Google.IdentityToolkit.Types
317317import Network.Google.Prelude
318−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.CreateAuthURI
319−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
320−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
321−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
322−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetOobConfirmationCode
323−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
324−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
325−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.ResetPassword
326−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
327−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.UploadAccount
328−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyAssertion
329−import Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
318+import Network.Google.Resource.IdentityToolkit.RelyingParty.CreateAuthURI
319+import Network.Google.Resource.IdentityToolkit.RelyingParty.DeleteAccount
320+import Network.Google.Resource.IdentityToolkit.RelyingParty.DownloadAccount
321+import Network.Google.Resource.IdentityToolkit.RelyingParty.GetAccountInfo
322+import Network.Google.Resource.IdentityToolkit.RelyingParty.GetOOBConfirmationCode
323+import Network.Google.Resource.IdentityToolkit.RelyingParty.GetPublicKeys
324+import Network.Google.Resource.IdentityToolkit.RelyingParty.GetRecaptchaParam
325+import Network.Google.Resource.IdentityToolkit.RelyingParty.ResetPassword
326+import Network.Google.Resource.IdentityToolkit.RelyingParty.SetAccountInfo
327+import Network.Google.Resource.IdentityToolkit.RelyingParty.UploadAccount
328+import Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyAssertion
329+import Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyPassword
330330
331331{- $resources
332332TODO
333333-}
334334
335335type IdentityToolkitAPI =
336− RelyingPartyyCreateAuthURIResource :<|>
337− RelyingPartyyUploadAccountResource
338− :<|> RelyingPartyyResetPasswordResource
339− :<|> RelyingPartyySetAccountInfoResource
340− :<|> RelyingPartyyVerifyAssertionResource
341− :<|> RelyingPartyyDeleteAccountResource
342− :<|> RelyingPartyyGetOobConfirmationCodeResource
343− :<|> RelyingPartyyGetRecaptchaParamResource
344− :<|> RelyingPartyyDownloadAccountResource
345− :<|> RelyingPartyyVerifyPasswordResource
346− :<|> RelyingPartyyGetPublicKeysResource
347− :<|> RelyingPartyyGetAccountInfoResource
336+ RelyingPartyCreateAuthURIResource :<|>
337+ RelyingPartyUploadAccountResource
338+ :<|> RelyingPartyResetPasswordResource
339+ :<|> RelyingPartySetAccountInfoResource
340+ :<|> RelyingPartyVerifyAssertionResource
341+ :<|> RelyingPartyDeleteAccountResource
342+ :<|> RelyingPartyGetOOBConfirmationCodeResource
343+ :<|> RelyingPartyGetRecaptchaParamResource
344+ :<|> RelyingPartyDownloadAccountResource
345+ :<|> RelyingPartyVerifyPasswordResource
346+ :<|> RelyingPartyGetPublicKeysResource
347+ :<|> RelyingPartyGetAccountInfoResource
348348
349349identityToolkitAPI :: Proxy IdentityToolkitAPI
350350identityToolkitAPI = Proxy
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+40−40
@@ -33,31 +33,31 @@ module Network.Google.IdentityToolkit.Types
3333 , uiPasswordHash
3434 , uiLocalId
3535
36− -- * IdentitytoolkitRelyingPartyyVerifyPasswordRequest
37− , IdentitytoolkitRelyingPartyyVerifyPasswordRequest
38− , identitytoolkitRelyingPartyyVerifyPasswordRequest
36+ -- * IdentitytoolkitRelyingPartyVerifyPasswordRequest
37+ , IdentitytoolkitRelyingPartyVerifyPasswordRequest
38+ , identitytoolkitRelyingPartyVerifyPasswordRequest
3939 , irpvprEmail
4040 , irpvprCaptchaChallenge
4141 , irpvprPassword
4242 , irpvprCaptchaResponse
4343 , irpvprPendingIdToken
4444
45− -- * IdentitytoolkitRelyingPartyyVerifyAssertionRequest
46− , IdentitytoolkitRelyingPartyyVerifyAssertionRequest
47− , identitytoolkitRelyingPartyyVerifyAssertionRequest
45+ -- * IdentitytoolkitRelyingPartyVerifyAssertionRequest
46+ , IdentitytoolkitRelyingPartyVerifyAssertionRequest
47+ , identitytoolkitRelyingPartyVerifyAssertionRequest
4848 , irpvarPostBody
4949 , irpvarReturnRefreshToken
5050 , irpvarRequestURI
5151 , irpvarPendingIdToken
5252
53− -- * IdentitytoolkitRelyingPartyySetAccountInfoRequest
54− , IdentitytoolkitRelyingPartyySetAccountInfoRequest
55− , identitytoolkitRelyingPartyySetAccountInfoRequest
53+ -- * IdentitytoolkitRelyingPartySetAccountInfoRequest
54+ , IdentitytoolkitRelyingPartySetAccountInfoRequest
55+ , identitytoolkitRelyingPartySetAccountInfoRequest
5656 , irpsairUpgradeToFederatedLogin
5757 , irpsairEmail
5858 , irpsairCaptchaChallenge
5959 , irpsairValidSince
60− , irpsairOobCode
60+ , irpsairOOBCode
6161 , irpsairPassword
6262 , irpsairCaptchaResponse
6363 , irpsairEmailVerified
@@ -101,9 +101,9 @@ module Network.Google.IdentityToolkit.Types
101101 , caurRegistered
102102 , caurForExistingProvider
103103
104− -- * RelyingPartyy
105− , RelyingPartyy
106− , relyingPartyy
104+ -- * RelyingParty
105+ , RelyingParty
106+ , relyingParty
107107 , rpEmail
108108 , rpKind
109109 , rpUserIP
@@ -113,20 +113,20 @@ module Network.Google.IdentityToolkit.Types
113113 , rpChallenge
114114 , rpIdToken
115115
116− -- * IdentitytoolkitRelyingPartyyGetAccountInfoRequest
117− , IdentitytoolkitRelyingPartyyGetAccountInfoRequest
118− , identitytoolkitRelyingPartyyGetAccountInfoRequest
116+ -- * IdentitytoolkitRelyingPartyGetAccountInfoRequest
117+ , IdentitytoolkitRelyingPartyGetAccountInfoRequest
118+ , identitytoolkitRelyingPartyGetAccountInfoRequest
119119 , irpgairEmail
120120 , irpgairLocalId
121121 , irpgairIdToken
122122
123− -- * IdentitytoolkitRelyingPartyyGetPublicKeysResponse
124− , IdentitytoolkitRelyingPartyyGetPublicKeysResponse
125− , identitytoolkitRelyingPartyyGetPublicKeysResponse
123+ -- * IdentitytoolkitRelyingPartyGetPublicKeysResponse
124+ , IdentitytoolkitRelyingPartyGetPublicKeysResponse
125+ , identitytoolkitRelyingPartyGetPublicKeysResponse
126126
127− -- * IdentitytoolkitRelyingPartyyCreateAuthURIRequest
128− , IdentitytoolkitRelyingPartyyCreateAuthURIRequest
129− , identitytoolkitRelyingPartyyCreateAuthURIRequest
127+ -- * IdentitytoolkitRelyingPartyCreateAuthURIRequest
128+ , IdentitytoolkitRelyingPartyCreateAuthURIRequest
129+ , identitytoolkitRelyingPartyCreateAuthURIRequest
130130 , irpcaurProviderId
131131 , irpcaurClientId
132132 , irpcaurContext
@@ -138,9 +138,9 @@ module Network.Google.IdentityToolkit.Types
138138 , irpcaurOAuthScope
139139 , irpcaurOpenidRealm
140140
141− -- * IdentitytoolkitRelyingPartyyUploadAccountRequest
142− , IdentitytoolkitRelyingPartyyUploadAccountRequest
143− , identitytoolkitRelyingPartyyUploadAccountRequest
141+ -- * IdentitytoolkitRelyingPartyUploadAccountRequest
142+ , IdentitytoolkitRelyingPartyUploadAccountRequest
143+ , identitytoolkitRelyingPartyUploadAccountRequest
144144 , irpuarUsers
145145 , irpuarMemoryCost
146146 , irpuarSaltSeparator
@@ -148,12 +148,12 @@ module Network.Google.IdentityToolkit.Types
148148 , irpuarSignerKey
149149 , irpuarRounds
150150
151− -- * IdentitytoolkitRelyingPartyyResetPasswordRequest
152− , IdentitytoolkitRelyingPartyyResetPasswordRequest
153− , identitytoolkitRelyingPartyyResetPasswordRequest
151+ -- * IdentitytoolkitRelyingPartyResetPasswordRequest
152+ , IdentitytoolkitRelyingPartyResetPasswordRequest
153+ , identitytoolkitRelyingPartyResetPasswordRequest
154154 , irprprEmail
155155 , irprprNewPassword
156− , irprprOobCode
156+ , irprprOOBCode
157157 , irprprOldPassword
158158
159159 -- * GetAccountInfoResponse
@@ -162,15 +162,15 @@ module Network.Google.IdentityToolkit.Types
162162 , gairUsers
163163 , gairKind
164164
165− -- * GetOobConfirmationCodeResponse
166− , GetOobConfirmationCodeResponse
167− , getOobConfirmationCodeResponse
168− , goccrKind
169− , goccrOobCode
165+ -- * GetOOBConfirmationCodeResponse
166+ , GetOOBConfirmationCodeResponse
167+ , getOOBConfirmationCodeResponse
168+ , goobccrKind
169+ , goobccrOOBCode
170170
171− -- * IdentitytoolkitRelyingPartyyDeleteAccountRequest
172− , IdentitytoolkitRelyingPartyyDeleteAccountRequest
173− , identitytoolkitRelyingPartyyDeleteAccountRequest
171+ -- * IdentitytoolkitRelyingPartyDeleteAccountRequest
172+ , IdentitytoolkitRelyingPartyDeleteAccountRequest
173+ , identitytoolkitRelyingPartyDeleteAccountRequest
174174 , irpdarLocalId
175175
176176 -- * SetAccountInfoResponseProviderUserInfo
@@ -180,9 +180,9 @@ module Network.Google.IdentityToolkit.Types
180180 , sairpuiPhotoURL
181181 , sairpuiDisplayName
182182
183− -- * IdentitytoolkitRelyingPartyyDownloadAccountRequest
184− , IdentitytoolkitRelyingPartyyDownloadAccountRequest
185− , identitytoolkitRelyingPartyyDownloadAccountRequest
183+ -- * IdentitytoolkitRelyingPartyDownloadAccountRequest
184+ , IdentitytoolkitRelyingPartyDownloadAccountRequest
185+ , identitytoolkitRelyingPartyDownloadAccountRequest
186186 , irpdarNextPageToken
187187 , irpdarMaxResults
188188
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+230−238
@@ -182,8 +182,8 @@ instance ToJSON UserInfo where
182182
183183-- | Request to verify the password.
184184--
185−-- /See:/ 'identitytoolkitRelyingPartyyVerifyPasswordRequest' smart constructor.
186−data IdentitytoolkitRelyingPartyyVerifyPasswordRequest = IdentitytoolkitRelyingPartyyVerifyPasswordRequest
185+-- /See:/ 'identitytoolkitRelyingPartyVerifyPasswordRequest' smart constructor.
186+data IdentitytoolkitRelyingPartyVerifyPasswordRequest = IdentitytoolkitRelyingPartyVerifyPasswordRequest
187187 { _irpvprEmail :: !(Maybe Text)
188188 , _irpvprCaptchaChallenge :: !(Maybe Text)
189189 , _irpvprPassword :: !(Maybe Text)
@@ -191,7 +191,7 @@ data IdentitytoolkitRelyingPartyyVerifyPasswordRequest = IdentitytoolkitRelyingP
191191 , _irpvprPendingIdToken :: !(Maybe Text)
192192 } deriving (Eq,Read,Show,Data,Typeable,Generic)
193193
194−-- | Creates a value of 'IdentitytoolkitRelyingPartyyVerifyPasswordRequest' with the minimum fields required to make a request.
194+-- | Creates a value of 'IdentitytoolkitRelyingPartyVerifyPasswordRequest' with the minimum fields required to make a request.
195195--
196196-- Use one of the following lenses to modify other fields as desired:
197197--
@@ -204,10 +204,10 @@ data IdentitytoolkitRelyingPartyyVerifyPasswordRequest = IdentitytoolkitRelyingP
204204-- * 'irpvprCaptchaResponse'
205205--
206206-- * 'irpvprPendingIdToken'
207−identitytoolkitRelyingPartyyVerifyPasswordRequest
208− :: IdentitytoolkitRelyingPartyyVerifyPasswordRequest
209−identitytoolkitRelyingPartyyVerifyPasswordRequest =
210− IdentitytoolkitRelyingPartyyVerifyPasswordRequest
207+identitytoolkitRelyingPartyVerifyPasswordRequest
208+ :: IdentitytoolkitRelyingPartyVerifyPasswordRequest
209+identitytoolkitRelyingPartyVerifyPasswordRequest =
210+ IdentitytoolkitRelyingPartyVerifyPasswordRequest
211211 { _irpvprEmail = Nothing
212212 , _irpvprCaptchaChallenge = Nothing
213213 , _irpvprPassword = Nothing
@@ -216,53 +216,53 @@ identitytoolkitRelyingPartyyVerifyPasswordRequest =
216216 }
217217
218218-- | The email of the user.
219−irpvprEmail :: Lens' IdentitytoolkitRelyingPartyyVerifyPasswordRequest (Maybe Text)
219+irpvprEmail :: Lens' IdentitytoolkitRelyingPartyVerifyPasswordRequest (Maybe Text)
220220irpvprEmail
221221 = lens _irpvprEmail (\ s a -> s{_irpvprEmail = a})
222222
223223-- | The captcha challenge.
224−irpvprCaptchaChallenge :: Lens' IdentitytoolkitRelyingPartyyVerifyPasswordRequest (Maybe Text)
224+irpvprCaptchaChallenge :: Lens' IdentitytoolkitRelyingPartyVerifyPasswordRequest (Maybe Text)
225225irpvprCaptchaChallenge
226226 = lens _irpvprCaptchaChallenge
227227 (\ s a -> s{_irpvprCaptchaChallenge = a})
228228
229229-- | The password inputed by the user.
230−irpvprPassword :: Lens' IdentitytoolkitRelyingPartyyVerifyPasswordRequest (Maybe Text)
230+irpvprPassword :: Lens' IdentitytoolkitRelyingPartyVerifyPasswordRequest (Maybe Text)
231231irpvprPassword
232232 = lens _irpvprPassword
233233 (\ s a -> s{_irpvprPassword = a})
234234
235235-- | Response to the captcha.
236−irpvprCaptchaResponse :: Lens' IdentitytoolkitRelyingPartyyVerifyPasswordRequest (Maybe Text)
236+irpvprCaptchaResponse :: Lens' IdentitytoolkitRelyingPartyVerifyPasswordRequest (Maybe Text)
237237irpvprCaptchaResponse
238238 = lens _irpvprCaptchaResponse
239239 (\ s a -> s{_irpvprCaptchaResponse = a})
240240
241241-- | The GITKit token for the non-trusted IDP, which is to be confirmed by
242242-- the user.
243−irpvprPendingIdToken :: Lens' IdentitytoolkitRelyingPartyyVerifyPasswordRequest (Maybe Text)
243+irpvprPendingIdToken :: Lens' IdentitytoolkitRelyingPartyVerifyPasswordRequest (Maybe Text)
244244irpvprPendingIdToken
245245 = lens _irpvprPendingIdToken
246246 (\ s a -> s{_irpvprPendingIdToken = a})
247247
248248instance FromJSON
249− IdentitytoolkitRelyingPartyyVerifyPasswordRequest
249+ IdentitytoolkitRelyingPartyVerifyPasswordRequest
250250 where
251251 parseJSON
252252 = withObject
253− "IdentitytoolkitRelyingPartyyVerifyPasswordRequest"
253+ "IdentitytoolkitRelyingPartyVerifyPasswordRequest"
254254 (\ o ->
255− IdentitytoolkitRelyingPartyyVerifyPasswordRequest <$>
255+ IdentitytoolkitRelyingPartyVerifyPasswordRequest <$>
256256 (o .:? "email") <*> (o .:? "captchaChallenge") <*>
257257 (o .:? "password")
258258 <*> (o .:? "captchaResponse")
259259 <*> (o .:? "pendingIdToken"))
260260
261261instance ToJSON
262− IdentitytoolkitRelyingPartyyVerifyPasswordRequest
262+ IdentitytoolkitRelyingPartyVerifyPasswordRequest
263263 where
264264 toJSON
265− IdentitytoolkitRelyingPartyyVerifyPasswordRequest{..}
265+ IdentitytoolkitRelyingPartyVerifyPasswordRequest{..}
266266 = object
267267 (catMaybes
268268 [("email" .=) <$> _irpvprEmail,
@@ -273,15 +273,15 @@ instance ToJSON
273273
274274-- | Request to verify the IDP assertion.
275275--
276−-- /See:/ 'identitytoolkitRelyingPartyyVerifyAssertionRequest' smart constructor.
277−data IdentitytoolkitRelyingPartyyVerifyAssertionRequest = IdentitytoolkitRelyingPartyyVerifyAssertionRequest
276+-- /See:/ 'identitytoolkitRelyingPartyVerifyAssertionRequest' smart constructor.
277+data IdentitytoolkitRelyingPartyVerifyAssertionRequest = IdentitytoolkitRelyingPartyVerifyAssertionRequest
278278 { _irpvarPostBody :: !(Maybe Text)
279279 , _irpvarReturnRefreshToken :: !(Maybe Bool)
280280 , _irpvarRequestURI :: !(Maybe Text)
281281 , _irpvarPendingIdToken :: !(Maybe Text)
282282 } deriving (Eq,Read,Show,Data,Typeable,Generic)
283283
284−-- | Creates a value of 'IdentitytoolkitRelyingPartyyVerifyAssertionRequest' with the minimum fields required to make a request.
284+-- | Creates a value of 'IdentitytoolkitRelyingPartyVerifyAssertionRequest' with the minimum fields required to make a request.
285285--
286286-- Use one of the following lenses to modify other fields as desired:
287287--
@@ -292,10 +292,10 @@ data IdentitytoolkitRelyingPartyyVerifyAssertionRequest = IdentitytoolkitRelying
292292-- * 'irpvarRequestURI'
293293--
294294-- * 'irpvarPendingIdToken'
295−identitytoolkitRelyingPartyyVerifyAssertionRequest
296− :: IdentitytoolkitRelyingPartyyVerifyAssertionRequest
297−identitytoolkitRelyingPartyyVerifyAssertionRequest =
298− IdentitytoolkitRelyingPartyyVerifyAssertionRequest
295+identitytoolkitRelyingPartyVerifyAssertionRequest
296+ :: IdentitytoolkitRelyingPartyVerifyAssertionRequest
297+identitytoolkitRelyingPartyVerifyAssertionRequest =
298+ IdentitytoolkitRelyingPartyVerifyAssertionRequest
299299 { _irpvarPostBody = Nothing
300300 , _irpvarReturnRefreshToken = Nothing
301301 , _irpvarRequestURI = Nothing
@@ -303,49 +303,48 @@ identitytoolkitRelyingPartyyVerifyAssertionRequest =
303303 }
304304
305305-- | The post body if the request is a HTTP POST.
306−irpvarPostBody :: Lens' IdentitytoolkitRelyingPartyyVerifyAssertionRequest (Maybe Text)
306+irpvarPostBody :: Lens' IdentitytoolkitRelyingPartyVerifyAssertionRequest (Maybe Text)
307307irpvarPostBody
308308 = lens _irpvarPostBody
309309 (\ s a -> s{_irpvarPostBody = a})
310310
311311-- | Whether to return refresh tokens.
312−irpvarReturnRefreshToken :: Lens' IdentitytoolkitRelyingPartyyVerifyAssertionRequest (Maybe Bool)
312+irpvarReturnRefreshToken :: Lens' IdentitytoolkitRelyingPartyVerifyAssertionRequest (Maybe Bool)
313313irpvarReturnRefreshToken
314314 = lens _irpvarReturnRefreshToken
315315 (\ s a -> s{_irpvarReturnRefreshToken = a})
316316
317317-- | The URI to which the IDP redirects the user back. It may contain
318318-- federated login result params added by the IDP.
319−irpvarRequestURI :: Lens' IdentitytoolkitRelyingPartyyVerifyAssertionRequest (Maybe Text)
319+irpvarRequestURI :: Lens' IdentitytoolkitRelyingPartyVerifyAssertionRequest (Maybe Text)
320320irpvarRequestURI
321321 = lens _irpvarRequestURI
322322 (\ s a -> s{_irpvarRequestURI = a})
323323
324324-- | The GITKit token for the non-trusted IDP pending to be confirmed by the
325325-- user.
326−irpvarPendingIdToken :: Lens' IdentitytoolkitRelyingPartyyVerifyAssertionRequest (Maybe Text)
326+irpvarPendingIdToken :: Lens' IdentitytoolkitRelyingPartyVerifyAssertionRequest (Maybe Text)
327327irpvarPendingIdToken
328328 = lens _irpvarPendingIdToken
329329 (\ s a -> s{_irpvarPendingIdToken = a})
330330
331331instance FromJSON
332− IdentitytoolkitRelyingPartyyVerifyAssertionRequest
332+ IdentitytoolkitRelyingPartyVerifyAssertionRequest
333333 where
334334 parseJSON
335335 = withObject
336− "IdentitytoolkitRelyingPartyyVerifyAssertionRequest"
336+ "IdentitytoolkitRelyingPartyVerifyAssertionRequest"
337337 (\ o ->
338− IdentitytoolkitRelyingPartyyVerifyAssertionRequest
339− <$>
338+ IdentitytoolkitRelyingPartyVerifyAssertionRequest <$>
340339 (o .:? "postBody") <*> (o .:? "returnRefreshToken")
341340 <*> (o .:? "requestUri")
342341 <*> (o .:? "pendingIdToken"))
343342
344343instance ToJSON
345− IdentitytoolkitRelyingPartyyVerifyAssertionRequest
344+ IdentitytoolkitRelyingPartyVerifyAssertionRequest
346345 where
347346 toJSON
348− IdentitytoolkitRelyingPartyyVerifyAssertionRequest{..}
347+ IdentitytoolkitRelyingPartyVerifyAssertionRequest{..}
349348 = object
350349 (catMaybes
351350 [("postBody" .=) <$> _irpvarPostBody,
@@ -356,13 +355,13 @@ instance ToJSON
356355
357356-- | Request to set the account information.
358357--
359−-- /See:/ 'identitytoolkitRelyingPartyySetAccountInfoRequest' smart constructor.
360−data IdentitytoolkitRelyingPartyySetAccountInfoRequest = IdentitytoolkitRelyingPartyySetAccountInfoRequest
358+-- /See:/ 'identitytoolkitRelyingPartySetAccountInfoRequest' smart constructor.
359+data IdentitytoolkitRelyingPartySetAccountInfoRequest = IdentitytoolkitRelyingPartySetAccountInfoRequest
361360 { _irpsairUpgradeToFederatedLogin :: !(Maybe Bool)
362361 , _irpsairEmail :: !(Maybe Text)
363362 , _irpsairCaptchaChallenge :: !(Maybe Text)
364363 , _irpsairValidSince :: !(Maybe Int64)
365− , _irpsairOobCode :: !(Maybe Text)
364+ , _irpsairOOBCode :: !(Maybe Text)
366365 , _irpsairPassword :: !(Maybe Text)
367366 , _irpsairCaptchaResponse :: !(Maybe Text)
368367 , _irpsairEmailVerified :: !(Maybe Bool)
@@ -373,7 +372,7 @@ data IdentitytoolkitRelyingPartyySetAccountInfoRequest = IdentitytoolkitRelyingP
373372 , _irpsairProvider :: !(Maybe [Text])
374373 } deriving (Eq,Read,Show,Data,Typeable,Generic)
375374
376−-- | Creates a value of 'IdentitytoolkitRelyingPartyySetAccountInfoRequest' with the minimum fields required to make a request.
375+-- | Creates a value of 'IdentitytoolkitRelyingPartySetAccountInfoRequest' with the minimum fields required to make a request.
377376--
378377-- Use one of the following lenses to modify other fields as desired:
379378--
@@ -385,7 +384,7 @@ data IdentitytoolkitRelyingPartyySetAccountInfoRequest = IdentitytoolkitRelyingP
385384--
386385-- * 'irpsairValidSince'
387386--
388−-- * 'irpsairOobCode'
387+-- * 'irpsairOOBCode'
389388--
390389-- * 'irpsairPassword'
391390--
@@ -402,15 +401,15 @@ data IdentitytoolkitRelyingPartyySetAccountInfoRequest = IdentitytoolkitRelyingP
402401-- * 'irpsairIdToken'
403402--
404403-- * 'irpsairProvider'
405−identitytoolkitRelyingPartyySetAccountInfoRequest
406− :: IdentitytoolkitRelyingPartyySetAccountInfoRequest
407−identitytoolkitRelyingPartyySetAccountInfoRequest =
408− IdentitytoolkitRelyingPartyySetAccountInfoRequest
404+identitytoolkitRelyingPartySetAccountInfoRequest
405+ :: IdentitytoolkitRelyingPartySetAccountInfoRequest
406+identitytoolkitRelyingPartySetAccountInfoRequest =
407+ IdentitytoolkitRelyingPartySetAccountInfoRequest
409408 { _irpsairUpgradeToFederatedLogin = Nothing
410409 , _irpsairEmail = Nothing
411410 , _irpsairCaptchaChallenge = Nothing
412411 , _irpsairValidSince = Nothing
413− , _irpsairOobCode = Nothing
412+ , _irpsairOOBCode = Nothing
414413 , _irpsairPassword = Nothing
415414 , _irpsairCaptchaResponse = Nothing
416415 , _irpsairEmailVerified = Nothing
@@ -422,78 +421,78 @@ identitytoolkitRelyingPartyySetAccountInfoRequest =
422421 }
423422
424423-- | Mark the user to upgrade to federated login.
425−irpsairUpgradeToFederatedLogin :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Bool)
424+irpsairUpgradeToFederatedLogin :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Bool)
426425irpsairUpgradeToFederatedLogin
427426 = lens _irpsairUpgradeToFederatedLogin
428427 (\ s a -> s{_irpsairUpgradeToFederatedLogin = a})
429428
430429-- | The email of the user.
431−irpsairEmail :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
430+irpsairEmail :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
432431irpsairEmail
433432 = lens _irpsairEmail (\ s a -> s{_irpsairEmail = a})
434433
435434-- | The captcha challenge.
436−irpsairCaptchaChallenge :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
435+irpsairCaptchaChallenge :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
437436irpsairCaptchaChallenge
438437 = lens _irpsairCaptchaChallenge
439438 (\ s a -> s{_irpsairCaptchaChallenge = a})
440439
441440-- | Timestamp in seconds for valid login token.
442−irpsairValidSince :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Int64)
441+irpsairValidSince :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Int64)
443442irpsairValidSince
444443 = lens _irpsairValidSince
445444 (\ s a -> s{_irpsairValidSince = a})
446445
447446-- | The out-of-band code of the change email request.
448−irpsairOobCode :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
449−irpsairOobCode
450− = lens _irpsairOobCode
451− (\ s a -> s{_irpsairOobCode = a})
447+irpsairOOBCode :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
448+irpsairOOBCode
449+ = lens _irpsairOOBCode
450+ (\ s a -> s{_irpsairOOBCode = a})
452451
453452-- | The new password of the user.
454−irpsairPassword :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
453+irpsairPassword :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
455454irpsairPassword
456455 = lens _irpsairPassword
457456 (\ s a -> s{_irpsairPassword = a})
458457
459458-- | Response to the captcha.
460−irpsairCaptchaResponse :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
459+irpsairCaptchaResponse :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
461460irpsairCaptchaResponse
462461 = lens _irpsairCaptchaResponse
463462 (\ s a -> s{_irpsairCaptchaResponse = a})
464463
465464-- | Mark the email as verified or not.
466−irpsairEmailVerified :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Bool)
465+irpsairEmailVerified :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Bool)
467466irpsairEmailVerified
468467 = lens _irpsairEmailVerified
469468 (\ s a -> s{_irpsairEmailVerified = a})
470469
471470-- | The name of the user.
472−irpsairDisplayName :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
471+irpsairDisplayName :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
473472irpsairDisplayName
474473 = lens _irpsairDisplayName
475474 (\ s a -> s{_irpsairDisplayName = a})
476475
477476-- | Whether to disable the user.
478−irpsairDisableUser :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Bool)
477+irpsairDisableUser :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Bool)
479478irpsairDisableUser
480479 = lens _irpsairDisableUser
481480 (\ s a -> s{_irpsairDisableUser = a})
482481
483482-- | The local ID of the user.
484−irpsairLocalId :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
483+irpsairLocalId :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
485484irpsairLocalId
486485 = lens _irpsairLocalId
487486 (\ s a -> s{_irpsairLocalId = a})
488487
489488-- | The GITKit token of the authenticated user.
490−irpsairIdToken :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest (Maybe Text)
489+irpsairIdToken :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest (Maybe Text)
491490irpsairIdToken
492491 = lens _irpsairIdToken
493492 (\ s a -> s{_irpsairIdToken = a})
494493
495494-- | The associated IDPs of the user.
496−irpsairProvider :: Lens' IdentitytoolkitRelyingPartyySetAccountInfoRequest [Text]
495+irpsairProvider :: Lens' IdentitytoolkitRelyingPartySetAccountInfoRequest [Text]
497496irpsairProvider
498497 = lens _irpsairProvider
499498 (\ s a -> s{_irpsairProvider = a})
@@ -501,13 +500,13 @@ irpsairProvider
501500 . _Coerce
502501
503502instance FromJSON
504− IdentitytoolkitRelyingPartyySetAccountInfoRequest
503+ IdentitytoolkitRelyingPartySetAccountInfoRequest
505504 where
506505 parseJSON
507506 = withObject
508− "IdentitytoolkitRelyingPartyySetAccountInfoRequest"
507+ "IdentitytoolkitRelyingPartySetAccountInfoRequest"
509508 (\ o ->
510− IdentitytoolkitRelyingPartyySetAccountInfoRequest <$>
509+ IdentitytoolkitRelyingPartySetAccountInfoRequest <$>
511510 (o .:? "upgradeToFederatedLogin") <*> (o .:? "email")
512511 <*> (o .:? "captchaChallenge")
513512 <*> (o .:? "validSince")
@@ -522,10 +521,10 @@ instance FromJSON
522521 <*> (o .:? "provider" .!= mempty))
523522
524523instance ToJSON
525− IdentitytoolkitRelyingPartyySetAccountInfoRequest
524+ IdentitytoolkitRelyingPartySetAccountInfoRequest
526525 where
527526 toJSON
528− IdentitytoolkitRelyingPartyySetAccountInfoRequest{..}
527+ IdentitytoolkitRelyingPartySetAccountInfoRequest{..}
529528 = object
530529 (catMaybes
531530 [("upgradeToFederatedLogin" .=) <$>
@@ -533,7 +532,7 @@ instance ToJSON
533532 ("email" .=) <$> _irpsairEmail,
534533 ("captchaChallenge" .=) <$> _irpsairCaptchaChallenge,
535534 ("validSince" .=) <$> _irpsairValidSince,
536− ("oobCode" .=) <$> _irpsairOobCode,
535+ ("oobCode" .=) <$> _irpsairOOBCode,
537536 ("password" .=) <$> _irpsairPassword,
538537 ("captchaResponse" .=) <$> _irpsairCaptchaResponse,
539538 ("emailVerified" .=) <$> _irpsairEmailVerified,
@@ -837,8 +836,8 @@ instance ToJSON CreateAuthURIResponse where
837836-- | Request of getting a code for user confirmation (reset password, change
838837-- email etc.)
839838--
840−-- /See:/ 'relyingPartyy' smart constructor.
841−data RelyingPartyy = RelyingPartyy
839+-- /See:/ 'relyingParty' smart constructor.
840+data RelyingParty = RelyingParty
842841 { _rpEmail :: !(Maybe Text)
843842 , _rpKind :: !Text
844843 , _rpUserIP :: !(Maybe Text)
@@ -849,7 +848,7 @@ data RelyingPartyy = RelyingPartyy
849848 , _rpIdToken :: !(Maybe Text)
850849 } deriving (Eq,Read,Show,Data,Typeable,Generic)
851850
852−-- | Creates a value of 'RelyingPartyy' with the minimum fields required to make a request.
851+-- | Creates a value of 'RelyingParty' with the minimum fields required to make a request.
853852--
854853-- Use one of the following lenses to modify other fields as desired:
855854--
@@ -868,10 +867,10 @@ data RelyingPartyy = RelyingPartyy
868867-- * 'rpChallenge'
869868--
870869-- * 'rpIdToken'
871−relyingPartyy
872− :: RelyingPartyy
873−relyingPartyy =
874− RelyingPartyy
870+relyingParty
871+ :: RelyingParty
872+relyingParty =
873+ RelyingParty
875874 { _rpEmail = Nothing
876875 , _rpKind = "identitytoolkit#relyingparty"
877876 , _rpUserIP = Nothing
@@ -883,49 +882,49 @@ relyingPartyy =
883882 }
884883
885884-- | The email of the user.
886−rpEmail :: Lens' RelyingPartyy (Maybe Text)
885+rpEmail :: Lens' RelyingParty (Maybe Text)
887886rpEmail = lens _rpEmail (\ s a -> s{_rpEmail = a})
888887
889888-- | The fixed string \"identitytoolkit#relyingparty\".
890−rpKind :: Lens' RelyingPartyy Text
889+rpKind :: Lens' RelyingParty Text
891890rpKind = lens _rpKind (\ s a -> s{_rpKind = a})
892891
893892-- | The IP address of the user.
894−rpUserIP :: Lens' RelyingPartyy (Maybe Text)
893+rpUserIP :: Lens' RelyingParty (Maybe Text)
895894rpUserIP = lens _rpUserIP (\ s a -> s{_rpUserIP = a})
896895
897896-- | The request type.
898−rpRequestType :: Lens' RelyingPartyy (Maybe Text)
897+rpRequestType :: Lens' RelyingParty (Maybe Text)
899898rpRequestType
900899 = lens _rpRequestType
901900 (\ s a -> s{_rpRequestType = a})
902901
903902-- | The recaptcha response from the user.
904−rpCaptchaResp :: Lens' RelyingPartyy (Maybe Text)
903+rpCaptchaResp :: Lens' RelyingParty (Maybe Text)
905904rpCaptchaResp
906905 = lens _rpCaptchaResp
907906 (\ s a -> s{_rpCaptchaResp = a})
908907
909908-- | The new email if the code is for email change.
910−rpNewEmail :: Lens' RelyingPartyy (Maybe Text)
909+rpNewEmail :: Lens' RelyingParty (Maybe Text)
911910rpNewEmail
912911 = lens _rpNewEmail (\ s a -> s{_rpNewEmail = a})
913912
914913-- | The recaptcha challenge presented to the user.
915−rpChallenge :: Lens' RelyingPartyy (Maybe Text)
914+rpChallenge :: Lens' RelyingParty (Maybe Text)
916915rpChallenge
917916 = lens _rpChallenge (\ s a -> s{_rpChallenge = a})
918917
919918-- | The user\'s Gitkit login token for email change.
920−rpIdToken :: Lens' RelyingPartyy (Maybe Text)
919+rpIdToken :: Lens' RelyingParty (Maybe Text)
921920rpIdToken
922921 = lens _rpIdToken (\ s a -> s{_rpIdToken = a})
923922
924−instance FromJSON RelyingPartyy where
923+instance FromJSON RelyingParty where
925924 parseJSON
926− = withObject "RelyingPartyy"
925+ = withObject "RelyingParty"
927926 (\ o ->
928− RelyingPartyy <$>
927+ RelyingParty <$>
929928 (o .:? "email") <*>
930929 (o .:? "kind" .!= "identitytoolkit#relyingparty")
931930 <*> (o .:? "userIp")
@@ -935,8 +934,8 @@ instance FromJSON RelyingPartyy where
935934 <*> (o .:? "challenge")
936935 <*> (o .:? "idToken"))
937936
938−instance ToJSON RelyingPartyy where
939− toJSON RelyingPartyy{..}
937+instance ToJSON RelyingParty where
938+ toJSON RelyingParty{..}
940939 = object
941940 (catMaybes
942941 [("email" .=) <$> _rpEmail, Just ("kind" .= _rpKind),
@@ -949,14 +948,14 @@ instance ToJSON RelyingPartyy where
949948
950949-- | Request to get the account information.
951950--
952−-- /See:/ 'identitytoolkitRelyingPartyyGetAccountInfoRequest' smart constructor.
953−data IdentitytoolkitRelyingPartyyGetAccountInfoRequest = IdentitytoolkitRelyingPartyyGetAccountInfoRequest
951+-- /See:/ 'identitytoolkitRelyingPartyGetAccountInfoRequest' smart constructor.
952+data IdentitytoolkitRelyingPartyGetAccountInfoRequest = IdentitytoolkitRelyingPartyGetAccountInfoRequest
954953 { _irpgairEmail :: !(Maybe [Text])
955954 , _irpgairLocalId :: !(Maybe [Text])
956955 , _irpgairIdToken :: !(Maybe Text)
957956 } deriving (Eq,Read,Show,Data,Typeable,Generic)
958957
959−-- | Creates a value of 'IdentitytoolkitRelyingPartyyGetAccountInfoRequest' with the minimum fields required to make a request.
958+-- | Creates a value of 'IdentitytoolkitRelyingPartyGetAccountInfoRequest' with the minimum fields required to make a request.
960959--
961960-- Use one of the following lenses to modify other fields as desired:
962961--
@@ -965,24 +964,24 @@ data IdentitytoolkitRelyingPartyyGetAccountInfoRequest = IdentitytoolkitRelyingP
965964-- * 'irpgairLocalId'
966965--
967966-- * 'irpgairIdToken'
968−identitytoolkitRelyingPartyyGetAccountInfoRequest
969− :: IdentitytoolkitRelyingPartyyGetAccountInfoRequest
970−identitytoolkitRelyingPartyyGetAccountInfoRequest =
971− IdentitytoolkitRelyingPartyyGetAccountInfoRequest
967+identitytoolkitRelyingPartyGetAccountInfoRequest
968+ :: IdentitytoolkitRelyingPartyGetAccountInfoRequest
969+identitytoolkitRelyingPartyGetAccountInfoRequest =
970+ IdentitytoolkitRelyingPartyGetAccountInfoRequest
972971 { _irpgairEmail = Nothing
973972 , _irpgairLocalId = Nothing
974973 , _irpgairIdToken = Nothing
975974 }
976975
977976-- | The list of emails of the users to inquiry.
978−irpgairEmail :: Lens' IdentitytoolkitRelyingPartyyGetAccountInfoRequest [Text]
977+irpgairEmail :: Lens' IdentitytoolkitRelyingPartyGetAccountInfoRequest [Text]
979978irpgairEmail
980979 = lens _irpgairEmail (\ s a -> s{_irpgairEmail = a})
981980 . _Default
982981 . _Coerce
983982
984983-- | The list of local ID\'s of the users to inquiry.
985−irpgairLocalId :: Lens' IdentitytoolkitRelyingPartyyGetAccountInfoRequest [Text]
984+irpgairLocalId :: Lens' IdentitytoolkitRelyingPartyGetAccountInfoRequest [Text]
986985irpgairLocalId
987986 = lens _irpgairLocalId
988987 (\ s a -> s{_irpgairLocalId = a})
@@ -990,28 +989,28 @@ irpgairLocalId
990989 . _Coerce
991990
992991-- | The GITKit token of the authenticated user.
993−irpgairIdToken :: Lens' IdentitytoolkitRelyingPartyyGetAccountInfoRequest (Maybe Text)
992+irpgairIdToken :: Lens' IdentitytoolkitRelyingPartyGetAccountInfoRequest (Maybe Text)
994993irpgairIdToken
995994 = lens _irpgairIdToken
996995 (\ s a -> s{_irpgairIdToken = a})
997996
998997instance FromJSON
999− IdentitytoolkitRelyingPartyyGetAccountInfoRequest
998+ IdentitytoolkitRelyingPartyGetAccountInfoRequest
1000999 where
10011000 parseJSON
10021001 = withObject
1003− "IdentitytoolkitRelyingPartyyGetAccountInfoRequest"
1002+ "IdentitytoolkitRelyingPartyGetAccountInfoRequest"
10041003 (\ o ->
1005− IdentitytoolkitRelyingPartyyGetAccountInfoRequest <$>
1004+ IdentitytoolkitRelyingPartyGetAccountInfoRequest <$>
10061005 (o .:? "email" .!= mempty) <*>
10071006 (o .:? "localId" .!= mempty)
10081007 <*> (o .:? "idToken"))
10091008
10101009instance ToJSON
1011− IdentitytoolkitRelyingPartyyGetAccountInfoRequest
1010+ IdentitytoolkitRelyingPartyGetAccountInfoRequest
10121011 where
10131012 toJSON
1014− IdentitytoolkitRelyingPartyyGetAccountInfoRequest{..}
1013+ IdentitytoolkitRelyingPartyGetAccountInfoRequest{..}
10151014 = object
10161015 (catMaybes
10171016 [("email" .=) <$> _irpgairEmail,
@@ -1020,37 +1019,37 @@ instance ToJSON
10201019
10211020-- | Respone of getting public keys.
10221021--
1023−-- /See:/ 'identitytoolkitRelyingPartyyGetPublicKeysResponse' smart constructor.
1024−data IdentitytoolkitRelyingPartyyGetPublicKeysResponse =
1025− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
1022+-- /See:/ 'identitytoolkitRelyingPartyGetPublicKeysResponse' smart constructor.
1023+data IdentitytoolkitRelyingPartyGetPublicKeysResponse =
1024+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
10261025 deriving (Eq,Read,Show,Data,Typeable,Generic)
10271026
1028−-- | Creates a value of 'IdentitytoolkitRelyingPartyyGetPublicKeysResponse' with the minimum fields required to make a request.
1027+-- | Creates a value of 'IdentitytoolkitRelyingPartyGetPublicKeysResponse' with the minimum fields required to make a request.
10291028--
1030−identitytoolkitRelyingPartyyGetPublicKeysResponse
1031− :: IdentitytoolkitRelyingPartyyGetPublicKeysResponse
1032−identitytoolkitRelyingPartyyGetPublicKeysResponse =
1033− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
1029+identitytoolkitRelyingPartyGetPublicKeysResponse
1030+ :: IdentitytoolkitRelyingPartyGetPublicKeysResponse
1031+identitytoolkitRelyingPartyGetPublicKeysResponse =
1032+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
10341033
10351034instance FromJSON
1036− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
1035+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
10371036 where
10381037 parseJSON
10391038 = withObject
1040− "IdentitytoolkitRelyingPartyyGetPublicKeysResponse"
1039+ "IdentitytoolkitRelyingPartyGetPublicKeysResponse"
10411040 (\ o ->
10421041 pure
1043− IdentitytoolkitRelyingPartyyGetPublicKeysResponse)
1042+ IdentitytoolkitRelyingPartyGetPublicKeysResponse)
10441043
10451044instance ToJSON
1046− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
1045+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
10471046 where
10481047 toJSON = const (Object mempty)
10491048
10501049-- | Request to get the IDP authentication URL.
10511050--
1052−-- /See:/ 'identitytoolkitRelyingPartyyCreateAuthURIRequest' smart constructor.
1053−data IdentitytoolkitRelyingPartyyCreateAuthURIRequest = IdentitytoolkitRelyingPartyyCreateAuthURIRequest
1051+-- /See:/ 'identitytoolkitRelyingPartyCreateAuthURIRequest' smart constructor.
1052+data IdentitytoolkitRelyingPartyCreateAuthURIRequest = IdentitytoolkitRelyingPartyCreateAuthURIRequest
10541053 { _irpcaurProviderId :: !(Maybe Text)
10551054 , _irpcaurClientId :: !(Maybe Text)
10561055 , _irpcaurContext :: !(Maybe Text)
@@ -1063,7 +1062,7 @@ data IdentitytoolkitRelyingPartyyCreateAuthURIRequest = IdentitytoolkitRelyingPa
10631062 , _irpcaurOpenidRealm :: !(Maybe Text)
10641063 } deriving (Eq,Read,Show,Data,Typeable,Generic)
10651064
1066−-- | Creates a value of 'IdentitytoolkitRelyingPartyyCreateAuthURIRequest' with the minimum fields required to make a request.
1065+-- | Creates a value of 'IdentitytoolkitRelyingPartyCreateAuthURIRequest' with the minimum fields required to make a request.
10671066--
10681067-- Use one of the following lenses to modify other fields as desired:
10691068--
@@ -1086,10 +1085,10 @@ data IdentitytoolkitRelyingPartyyCreateAuthURIRequest = IdentitytoolkitRelyingPa
10861085-- * 'irpcaurOAuthScope'
10871086--
10881087-- * 'irpcaurOpenidRealm'
1089−identitytoolkitRelyingPartyyCreateAuthURIRequest
1090− :: IdentitytoolkitRelyingPartyyCreateAuthURIRequest
1091−identitytoolkitRelyingPartyyCreateAuthURIRequest =
1092− IdentitytoolkitRelyingPartyyCreateAuthURIRequest
1088+identitytoolkitRelyingPartyCreateAuthURIRequest
1089+ :: IdentitytoolkitRelyingPartyCreateAuthURIRequest
1090+identitytoolkitRelyingPartyCreateAuthURIRequest =
1091+ IdentitytoolkitRelyingPartyCreateAuthURIRequest
10931092 { _irpcaurProviderId = Nothing
10941093 , _irpcaurClientId = Nothing
10951094 , _irpcaurContext = Nothing
@@ -1105,58 +1104,58 @@ identitytoolkitRelyingPartyyCreateAuthURIRequest =
11051104-- | The IdP ID. For white listed IdPs it\'s a short domain name e.g.
11061105-- google.com, aol.com, live.net and yahoo.com. For other OpenID IdPs it\'s
11071106-- the OP identifier.
1108−irpcaurProviderId :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1107+irpcaurProviderId :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11091108irpcaurProviderId
11101109 = lens _irpcaurProviderId
11111110 (\ s a -> s{_irpcaurProviderId = a})
11121111
11131112-- | The relying party OAuth client ID.
1114−irpcaurClientId :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1113+irpcaurClientId :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11151114irpcaurClientId
11161115 = lens _irpcaurClientId
11171116 (\ s a -> s{_irpcaurClientId = a})
11181117
11191118-- | The opaque value used by the client to maintain context info between the
11201119-- authentication request and the IDP callback.
1121−irpcaurContext :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1120+irpcaurContext :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11221121irpcaurContext
11231122 = lens _irpcaurContext
11241123 (\ s a -> s{_irpcaurContext = a})
11251124
11261125-- | The email or federated ID of the user.
1127−irpcaurIdentifier :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1126+irpcaurIdentifier :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11281127irpcaurIdentifier
11291128 = lens _irpcaurIdentifier
11301129 (\ s a -> s{_irpcaurIdentifier = a})
11311130
11321131-- | The native app package for OTA installation.
1133−irpcaurOtaApp :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1132+irpcaurOtaApp :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11341133irpcaurOtaApp
11351134 = lens _irpcaurOtaApp
11361135 (\ s a -> s{_irpcaurOtaApp = a})
11371136
11381137-- | The developer\'s consumer key for OpenId OAuth Extension
1139−irpcaurOAuthConsumerKey :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1138+irpcaurOAuthConsumerKey :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11401139irpcaurOAuthConsumerKey
11411140 = lens _irpcaurOAuthConsumerKey
11421141 (\ s a -> s{_irpcaurOAuthConsumerKey = a})
11431142
11441143-- | The app ID of the mobile app, base64(CERT_SHA1):PACKAGE_NAME for
11451144-- Android, BUNDLE_ID for iOS.
1146−irpcaurAppId :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1145+irpcaurAppId :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11471146irpcaurAppId
11481147 = lens _irpcaurAppId (\ s a -> s{_irpcaurAppId = a})
11491148
11501149-- | The URI to which the IDP redirects the user after the federated login
11511150-- flow.
1152−irpcaurContinueURI :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1151+irpcaurContinueURI :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11531152irpcaurContinueURI
11541153 = lens _irpcaurContinueURI
11551154 (\ s a -> s{_irpcaurContinueURI = a})
11561155
11571156-- | Additional oauth scopes, beyond the basid user profile, that the user
11581157-- would be prompted to grant
1159−irpcaurOAuthScope :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1158+irpcaurOAuthScope :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11601159irpcaurOAuthScope
11611160 = lens _irpcaurOAuthScope
11621161 (\ s a -> s{_irpcaurOAuthScope = a})
@@ -1164,19 +1163,18 @@ irpcaurOAuthScope
11641163-- | Optional realm for OpenID protocol. The sub string
11651164-- \"scheme:\/\/domain:port\" of the param \"continueUri\" is used if this
11661165-- is not set.
1167−irpcaurOpenidRealm :: Lens' IdentitytoolkitRelyingPartyyCreateAuthURIRequest (Maybe Text)
1166+irpcaurOpenidRealm :: Lens' IdentitytoolkitRelyingPartyCreateAuthURIRequest (Maybe Text)
11681167irpcaurOpenidRealm
11691168 = lens _irpcaurOpenidRealm
11701169 (\ s a -> s{_irpcaurOpenidRealm = a})
11711170
11721171instance FromJSON
1173− IdentitytoolkitRelyingPartyyCreateAuthURIRequest
1174− where
1172+ IdentitytoolkitRelyingPartyCreateAuthURIRequest where
11751173 parseJSON
11761174 = withObject
1177− "IdentitytoolkitRelyingPartyyCreateAuthURIRequest"
1175+ "IdentitytoolkitRelyingPartyCreateAuthURIRequest"
11781176 (\ o ->
1179− IdentitytoolkitRelyingPartyyCreateAuthURIRequest <$>
1177+ IdentitytoolkitRelyingPartyCreateAuthURIRequest <$>
11801178 (o .:? "providerId") <*> (o .:? "clientId") <*>
11811179 (o .:? "context")
11821180 <*> (o .:? "identifier")
@@ -1188,10 +1186,9 @@ instance FromJSON
11881186 <*> (o .:? "openidRealm"))
11891187
11901188instance ToJSON
1191− IdentitytoolkitRelyingPartyyCreateAuthURIRequest
1192− where
1189+ IdentitytoolkitRelyingPartyCreateAuthURIRequest where
11931190 toJSON
1194− IdentitytoolkitRelyingPartyyCreateAuthURIRequest{..}
1191+ IdentitytoolkitRelyingPartyCreateAuthURIRequest{..}
11951192 = object
11961193 (catMaybes
11971194 [("providerId" .=) <$> _irpcaurProviderId,
@@ -1207,8 +1204,8 @@ instance ToJSON
12071204
12081205-- | Request to upload user account in batch.
12091206--
1210−-- /See:/ 'identitytoolkitRelyingPartyyUploadAccountRequest' smart constructor.
1211−data IdentitytoolkitRelyingPartyyUploadAccountRequest = IdentitytoolkitRelyingPartyyUploadAccountRequest
1207+-- /See:/ 'identitytoolkitRelyingPartyUploadAccountRequest' smart constructor.
1208+data IdentitytoolkitRelyingPartyUploadAccountRequest = IdentitytoolkitRelyingPartyUploadAccountRequest
12121209 { _irpuarUsers :: !(Maybe [UserInfo])
12131210 , _irpuarMemoryCost :: !(Maybe Int32)
12141211 , _irpuarSaltSeparator :: !(Maybe Word8)
@@ -1217,7 +1214,7 @@ data IdentitytoolkitRelyingPartyyUploadAccountRequest = IdentitytoolkitRelyingPa
12171214 , _irpuarRounds :: !(Maybe Int32)
12181215 } deriving (Eq,Read,Show,Data,Typeable,Generic)
12191216
1220−-- | Creates a value of 'IdentitytoolkitRelyingPartyyUploadAccountRequest' with the minimum fields required to make a request.
1217+-- | Creates a value of 'IdentitytoolkitRelyingPartyUploadAccountRequest' with the minimum fields required to make a request.
12211218--
12221219-- Use one of the following lenses to modify other fields as desired:
12231220--
@@ -1232,10 +1229,10 @@ data IdentitytoolkitRelyingPartyyUploadAccountRequest = IdentitytoolkitRelyingPa
12321229-- * 'irpuarSignerKey'
12331230--
12341231-- * 'irpuarRounds'
1235−identitytoolkitRelyingPartyyUploadAccountRequest
1236− :: IdentitytoolkitRelyingPartyyUploadAccountRequest
1237−identitytoolkitRelyingPartyyUploadAccountRequest =
1238− IdentitytoolkitRelyingPartyyUploadAccountRequest
1232+identitytoolkitRelyingPartyUploadAccountRequest
1233+ :: IdentitytoolkitRelyingPartyUploadAccountRequest
1234+identitytoolkitRelyingPartyUploadAccountRequest =
1235+ IdentitytoolkitRelyingPartyUploadAccountRequest
12391236 { _irpuarUsers = Nothing
12401237 , _irpuarMemoryCost = Nothing
12411238 , _irpuarSaltSeparator = Nothing
@@ -1245,49 +1242,48 @@ identitytoolkitRelyingPartyyUploadAccountRequest =
12451242 }
12461243
12471244-- | The account info to be stored.
1248−irpuarUsers :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest [UserInfo]
1245+irpuarUsers :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest [UserInfo]
12491246irpuarUsers
12501247 = lens _irpuarUsers (\ s a -> s{_irpuarUsers = a}) .
12511248 _Default
12521249 . _Coerce
12531250
12541251-- | Memory cost for hash calculation. Used by scrypt similar algorithms.
1255−irpuarMemoryCost :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest (Maybe Int32)
1252+irpuarMemoryCost :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest (Maybe Int32)
12561253irpuarMemoryCost
12571254 = lens _irpuarMemoryCost
12581255 (\ s a -> s{_irpuarMemoryCost = a})
12591256
12601257-- | The salt separator.
1261−irpuarSaltSeparator :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest (Maybe Word8)
1258+irpuarSaltSeparator :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest (Maybe Word8)
12621259irpuarSaltSeparator
12631260 = lens _irpuarSaltSeparator
12641261 (\ s a -> s{_irpuarSaltSeparator = a})
12651262
12661263-- | The password hash algorithm.
1267−irpuarHashAlgorithm :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest (Maybe Text)
1264+irpuarHashAlgorithm :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest (Maybe Text)
12681265irpuarHashAlgorithm
12691266 = lens _irpuarHashAlgorithm
12701267 (\ s a -> s{_irpuarHashAlgorithm = a})
12711268
12721269-- | The key for to hash the password.
1273−irpuarSignerKey :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest (Maybe Word8)
1270+irpuarSignerKey :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest (Maybe Word8)
12741271irpuarSignerKey
12751272 = lens _irpuarSignerKey
12761273 (\ s a -> s{_irpuarSignerKey = a})
12771274
12781275-- | Rounds for hash calculation. Used by scrypt and similar algorithms.
1279−irpuarRounds :: Lens' IdentitytoolkitRelyingPartyyUploadAccountRequest (Maybe Int32)
1276+irpuarRounds :: Lens' IdentitytoolkitRelyingPartyUploadAccountRequest (Maybe Int32)
12801277irpuarRounds
12811278 = lens _irpuarRounds (\ s a -> s{_irpuarRounds = a})
12821279
12831280instance FromJSON
1284− IdentitytoolkitRelyingPartyyUploadAccountRequest
1285− where
1281+ IdentitytoolkitRelyingPartyUploadAccountRequest where
12861282 parseJSON
12871283 = withObject
1288− "IdentitytoolkitRelyingPartyyUploadAccountRequest"
1284+ "IdentitytoolkitRelyingPartyUploadAccountRequest"
12891285 (\ o ->
1290− IdentitytoolkitRelyingPartyyUploadAccountRequest <$>
1286+ IdentitytoolkitRelyingPartyUploadAccountRequest <$>
12911287 (o .:? "users" .!= mempty) <*> (o .:? "memoryCost")
12921288 <*> (o .:? "saltSeparator")
12931289 <*> (o .:? "hashAlgorithm")
@@ -1295,10 +1291,9 @@ instance FromJSON
12951291 <*> (o .:? "rounds"))
12961292
12971293instance ToJSON
1298− IdentitytoolkitRelyingPartyyUploadAccountRequest
1299− where
1294+ IdentitytoolkitRelyingPartyUploadAccountRequest where
13001295 toJSON
1301− IdentitytoolkitRelyingPartyyUploadAccountRequest{..}
1296+ IdentitytoolkitRelyingPartyUploadAccountRequest{..}
13021297 = object
13031298 (catMaybes
13041299 [("users" .=) <$> _irpuarUsers,
@@ -1310,15 +1305,15 @@ instance ToJSON
13101305
13111306-- | Request to reset the password.
13121307--
1313−-- /See:/ 'identitytoolkitRelyingPartyyResetPasswordRequest' smart constructor.
1314−data IdentitytoolkitRelyingPartyyResetPasswordRequest = IdentitytoolkitRelyingPartyyResetPasswordRequest
1308+-- /See:/ 'identitytoolkitRelyingPartyResetPasswordRequest' smart constructor.
1309+data IdentitytoolkitRelyingPartyResetPasswordRequest = IdentitytoolkitRelyingPartyResetPasswordRequest
13151310 { _irprprEmail :: !(Maybe Text)
13161311 , _irprprNewPassword :: !(Maybe Text)
1317− , _irprprOobCode :: !(Maybe Text)
1312+ , _irprprOOBCode :: !(Maybe Text)
13181313 , _irprprOldPassword :: !(Maybe Text)
13191314 } deriving (Eq,Read,Show,Data,Typeable,Generic)
13201315
1321−-- | Creates a value of 'IdentitytoolkitRelyingPartyyResetPasswordRequest' with the minimum fields required to make a request.
1316+-- | Creates a value of 'IdentitytoolkitRelyingPartyResetPasswordRequest' with the minimum fields required to make a request.
13221317--
13231318-- Use one of the following lenses to modify other fields as desired:
13241319--
@@ -1326,64 +1321,62 @@ data IdentitytoolkitRelyingPartyyResetPasswordRequest = IdentitytoolkitRelyingPa
13261321--
13271322-- * 'irprprNewPassword'
13281323--
1329−-- * 'irprprOobCode'
1324+-- * 'irprprOOBCode'
13301325--
13311326-- * 'irprprOldPassword'
1332−identitytoolkitRelyingPartyyResetPasswordRequest
1333− :: IdentitytoolkitRelyingPartyyResetPasswordRequest
1334−identitytoolkitRelyingPartyyResetPasswordRequest =
1335− IdentitytoolkitRelyingPartyyResetPasswordRequest
1327+identitytoolkitRelyingPartyResetPasswordRequest
1328+ :: IdentitytoolkitRelyingPartyResetPasswordRequest
1329+identitytoolkitRelyingPartyResetPasswordRequest =
1330+ IdentitytoolkitRelyingPartyResetPasswordRequest
13361331 { _irprprEmail = Nothing
13371332 , _irprprNewPassword = Nothing
1338− , _irprprOobCode = Nothing
1333+ , _irprprOOBCode = Nothing
13391334 , _irprprOldPassword = Nothing
13401335 }
13411336
13421337-- | The email address of the user.
1343−irprprEmail :: Lens' IdentitytoolkitRelyingPartyyResetPasswordRequest (Maybe Text)
1338+irprprEmail :: Lens' IdentitytoolkitRelyingPartyResetPasswordRequest (Maybe Text)
13441339irprprEmail
13451340 = lens _irprprEmail (\ s a -> s{_irprprEmail = a})
13461341
13471342-- | The new password inputted by the user.
1348−irprprNewPassword :: Lens' IdentitytoolkitRelyingPartyyResetPasswordRequest (Maybe Text)
1343+irprprNewPassword :: Lens' IdentitytoolkitRelyingPartyResetPasswordRequest (Maybe Text)
13491344irprprNewPassword
13501345 = lens _irprprNewPassword
13511346 (\ s a -> s{_irprprNewPassword = a})
13521347
13531348-- | The confirmation code.
1354−irprprOobCode :: Lens' IdentitytoolkitRelyingPartyyResetPasswordRequest (Maybe Text)
1355−irprprOobCode
1356− = lens _irprprOobCode
1357− (\ s a -> s{_irprprOobCode = a})
1349+irprprOOBCode :: Lens' IdentitytoolkitRelyingPartyResetPasswordRequest (Maybe Text)
1350+irprprOOBCode
1351+ = lens _irprprOOBCode
1352+ (\ s a -> s{_irprprOOBCode = a})
13581353
13591354-- | The old password inputted by the user.
1360−irprprOldPassword :: Lens' IdentitytoolkitRelyingPartyyResetPasswordRequest (Maybe Text)
1355+irprprOldPassword :: Lens' IdentitytoolkitRelyingPartyResetPasswordRequest (Maybe Text)
13611356irprprOldPassword
13621357 = lens _irprprOldPassword
13631358 (\ s a -> s{_irprprOldPassword = a})
13641359
13651360instance FromJSON
1366− IdentitytoolkitRelyingPartyyResetPasswordRequest
1367− where
1361+ IdentitytoolkitRelyingPartyResetPasswordRequest where
13681362 parseJSON
13691363 = withObject
1370− "IdentitytoolkitRelyingPartyyResetPasswordRequest"
1364+ "IdentitytoolkitRelyingPartyResetPasswordRequest"
13711365 (\ o ->
1372− IdentitytoolkitRelyingPartyyResetPasswordRequest <$>
1366+ IdentitytoolkitRelyingPartyResetPasswordRequest <$>
13731367 (o .:? "email") <*> (o .:? "newPassword") <*>
13741368 (o .:? "oobCode")
13751369 <*> (o .:? "oldPassword"))
13761370
13771371instance ToJSON
1378− IdentitytoolkitRelyingPartyyResetPasswordRequest
1379− where
1372+ IdentitytoolkitRelyingPartyResetPasswordRequest where
13801373 toJSON
1381− IdentitytoolkitRelyingPartyyResetPasswordRequest{..}
1374+ IdentitytoolkitRelyingPartyResetPasswordRequest{..}
13821375 = object
13831376 (catMaybes
13841377 [("email" .=) <$> _irprprEmail,
13851378 ("newPassword" .=) <$> _irprprNewPassword,
1386− ("oobCode" .=) <$> _irprprOobCode,
1379+ ("oobCode" .=) <$> _irprprOOBCode,
13871380 ("oldPassword" .=) <$> _irprprOldPassword])
13881381
13891382-- | Response of getting account information.
@@ -1439,94 +1432,93 @@ instance ToJSON GetAccountInfoResponse where
14391432-- | Response of getting a code for user confirmation (reset password, change
14401433-- email etc.).
14411434--
1442−-- /See:/ 'getOobConfirmationCodeResponse' smart constructor.
1443−data GetOobConfirmationCodeResponse = GetOobConfirmationCodeResponse
1444− { _goccrKind :: !Text
1445− , _goccrOobCode :: !(Maybe Text)
1435+-- /See:/ 'getOOBConfirmationCodeResponse' smart constructor.
1436+data GetOOBConfirmationCodeResponse = GetOOBConfirmationCodeResponse
1437+ { _goobccrKind :: !Text
1438+ , _goobccrOOBCode :: !(Maybe Text)
14461439 } deriving (Eq,Read,Show,Data,Typeable,Generic)
14471440
1448−-- | Creates a value of 'GetOobConfirmationCodeResponse' with the minimum fields required to make a request.
1441+-- | Creates a value of 'GetOOBConfirmationCodeResponse' with the minimum fields required to make a request.
14491442--
14501443-- Use one of the following lenses to modify other fields as desired:
14511444--
1452−-- * 'goccrKind'
1445+-- * 'goobccrKind'
14531446--
1454−-- * 'goccrOobCode'
1455−getOobConfirmationCodeResponse
1456− :: GetOobConfirmationCodeResponse
1457−getOobConfirmationCodeResponse =
1458− GetOobConfirmationCodeResponse
1459− { _goccrKind = "identitytoolkit#GetOobConfirmationCodeResponse"
1460− , _goccrOobCode = Nothing
1447+-- * 'goobccrOOBCode'
1448+getOOBConfirmationCodeResponse
1449+ :: GetOOBConfirmationCodeResponse
1450+getOOBConfirmationCodeResponse =
1451+ GetOOBConfirmationCodeResponse
1452+ { _goobccrKind = "identitytoolkit#GetOobConfirmationCodeResponse"
1453+ , _goobccrOOBCode = Nothing
14611454 }
14621455
14631456-- | The fixed string \"identitytoolkit#GetOobConfirmationCodeResponse\".
1464−goccrKind :: Lens' GetOobConfirmationCodeResponse Text
1465−goccrKind
1466− = lens _goccrKind (\ s a -> s{_goccrKind = a})
1457+goobccrKind :: Lens' GetOOBConfirmationCodeResponse Text
1458+goobccrKind
1459+ = lens _goobccrKind (\ s a -> s{_goobccrKind = a})
14671460
14681461-- | The code to be send to the user.
1469−goccrOobCode :: Lens' GetOobConfirmationCodeResponse (Maybe Text)
1470−goccrOobCode
1471− = lens _goccrOobCode (\ s a -> s{_goccrOobCode = a})
1462+goobccrOOBCode :: Lens' GetOOBConfirmationCodeResponse (Maybe Text)
1463+goobccrOOBCode
1464+ = lens _goobccrOOBCode
1465+ (\ s a -> s{_goobccrOOBCode = a})
14721466
1473−instance FromJSON GetOobConfirmationCodeResponse
1467+instance FromJSON GetOOBConfirmationCodeResponse
14741468 where
14751469 parseJSON
1476− = withObject "GetOobConfirmationCodeResponse"
1470+ = withObject "GetOOBConfirmationCodeResponse"
14771471 (\ o ->
1478− GetOobConfirmationCodeResponse <$>
1472+ GetOOBConfirmationCodeResponse <$>
14791473 (o .:? "kind" .!=
14801474 "identitytoolkit#GetOobConfirmationCodeResponse")
14811475 <*> (o .:? "oobCode"))
14821476
1483−instance ToJSON GetOobConfirmationCodeResponse where
1484− toJSON GetOobConfirmationCodeResponse{..}
1477+instance ToJSON GetOOBConfirmationCodeResponse where
1478+ toJSON GetOOBConfirmationCodeResponse{..}
14851479 = object
14861480 (catMaybes
1487− [Just ("kind" .= _goccrKind),
1488− ("oobCode" .=) <$> _goccrOobCode])
1481+ [Just ("kind" .= _goobccrKind),
1482+ ("oobCode" .=) <$> _goobccrOOBCode])
14891483
14901484-- | Request to delete account.
14911485--
1492−-- /See:/ 'identitytoolkitRelyingPartyyDeleteAccountRequest' smart constructor.
1493−newtype IdentitytoolkitRelyingPartyyDeleteAccountRequest = IdentitytoolkitRelyingPartyyDeleteAccountRequest
1486+-- /See:/ 'identitytoolkitRelyingPartyDeleteAccountRequest' smart constructor.
1487+newtype IdentitytoolkitRelyingPartyDeleteAccountRequest = IdentitytoolkitRelyingPartyDeleteAccountRequest
14941488 { _irpdarLocalId :: Maybe Text
14951489 } deriving (Eq,Read,Show,Data,Typeable,Generic)
14961490
1497−-- | Creates a value of 'IdentitytoolkitRelyingPartyyDeleteAccountRequest' with the minimum fields required to make a request.
1491+-- | Creates a value of 'IdentitytoolkitRelyingPartyDeleteAccountRequest' with the minimum fields required to make a request.
14981492--
14991493-- Use one of the following lenses to modify other fields as desired:
15001494--
15011495-- * 'irpdarLocalId'
1502−identitytoolkitRelyingPartyyDeleteAccountRequest
1503− :: IdentitytoolkitRelyingPartyyDeleteAccountRequest
1504−identitytoolkitRelyingPartyyDeleteAccountRequest =
1505− IdentitytoolkitRelyingPartyyDeleteAccountRequest
1496+identitytoolkitRelyingPartyDeleteAccountRequest
1497+ :: IdentitytoolkitRelyingPartyDeleteAccountRequest
1498+identitytoolkitRelyingPartyDeleteAccountRequest =
1499+ IdentitytoolkitRelyingPartyDeleteAccountRequest
15061500 { _irpdarLocalId = Nothing
15071501 }
15081502
15091503-- | The local ID of the user.
1510−irpdarLocalId :: Lens' IdentitytoolkitRelyingPartyyDeleteAccountRequest (Maybe Text)
1504+irpdarLocalId :: Lens' IdentitytoolkitRelyingPartyDeleteAccountRequest (Maybe Text)
15111505irpdarLocalId
15121506 = lens _irpdarLocalId
15131507 (\ s a -> s{_irpdarLocalId = a})
15141508
15151509instance FromJSON
1516− IdentitytoolkitRelyingPartyyDeleteAccountRequest
1517− where
1510+ IdentitytoolkitRelyingPartyDeleteAccountRequest where
15181511 parseJSON
15191512 = withObject
1520− "IdentitytoolkitRelyingPartyyDeleteAccountRequest"
1513+ "IdentitytoolkitRelyingPartyDeleteAccountRequest"
15211514 (\ o ->
1522− IdentitytoolkitRelyingPartyyDeleteAccountRequest <$>
1515+ IdentitytoolkitRelyingPartyDeleteAccountRequest <$>
15231516 (o .:? "localId"))
15241517
15251518instance ToJSON
1526− IdentitytoolkitRelyingPartyyDeleteAccountRequest
1527− where
1519+ IdentitytoolkitRelyingPartyDeleteAccountRequest where
15281520 toJSON
1529− IdentitytoolkitRelyingPartyyDeleteAccountRequest{..}
1521+ IdentitytoolkitRelyingPartyDeleteAccountRequest{..}
15301522 = object
15311523 (catMaybes [("localId" .=) <$> _irpdarLocalId])
15321524
@@ -1596,55 +1588,55 @@ instance ToJSON
15961588
15971589-- | Request to download user account in batch.
15981590--
1599−-- /See:/ 'identitytoolkitRelyingPartyyDownloadAccountRequest' smart constructor.
1600−data IdentitytoolkitRelyingPartyyDownloadAccountRequest = IdentitytoolkitRelyingPartyyDownloadAccountRequest
1591+-- /See:/ 'identitytoolkitRelyingPartyDownloadAccountRequest' smart constructor.
1592+data IdentitytoolkitRelyingPartyDownloadAccountRequest = IdentitytoolkitRelyingPartyDownloadAccountRequest
16011593 { _irpdarNextPageToken :: !(Maybe Text)
16021594 , _irpdarMaxResults :: !(Maybe Word32)
16031595 } deriving (Eq,Read,Show,Data,Typeable,Generic)
16041596
1605−-- | Creates a value of 'IdentitytoolkitRelyingPartyyDownloadAccountRequest' with the minimum fields required to make a request.
1597+-- | Creates a value of 'IdentitytoolkitRelyingPartyDownloadAccountRequest' with the minimum fields required to make a request.
16061598--
16071599-- Use one of the following lenses to modify other fields as desired:
16081600--
16091601-- * 'irpdarNextPageToken'
16101602--
16111603-- * 'irpdarMaxResults'
1612−identitytoolkitRelyingPartyyDownloadAccountRequest
1613− :: IdentitytoolkitRelyingPartyyDownloadAccountRequest
1614−identitytoolkitRelyingPartyyDownloadAccountRequest =
1615− IdentitytoolkitRelyingPartyyDownloadAccountRequest
1604+identitytoolkitRelyingPartyDownloadAccountRequest
1605+ :: IdentitytoolkitRelyingPartyDownloadAccountRequest
1606+identitytoolkitRelyingPartyDownloadAccountRequest =
1607+ IdentitytoolkitRelyingPartyDownloadAccountRequest
16161608 { _irpdarNextPageToken = Nothing
16171609 , _irpdarMaxResults = Nothing
16181610 }
16191611
16201612-- | The token for the next page. This should be taken from the previous
16211613-- response.
1622−irpdarNextPageToken :: Lens' IdentitytoolkitRelyingPartyyDownloadAccountRequest (Maybe Text)
1614+irpdarNextPageToken :: Lens' IdentitytoolkitRelyingPartyDownloadAccountRequest (Maybe Text)
16231615irpdarNextPageToken
16241616 = lens _irpdarNextPageToken
16251617 (\ s a -> s{_irpdarNextPageToken = a})
16261618
16271619-- | The max number of results to return in the response.
1628−irpdarMaxResults :: Lens' IdentitytoolkitRelyingPartyyDownloadAccountRequest (Maybe Word32)
1620+irpdarMaxResults :: Lens' IdentitytoolkitRelyingPartyDownloadAccountRequest (Maybe Word32)
16291621irpdarMaxResults
16301622 = lens _irpdarMaxResults
16311623 (\ s a -> s{_irpdarMaxResults = a})
16321624
16331625instance FromJSON
1634− IdentitytoolkitRelyingPartyyDownloadAccountRequest
1626+ IdentitytoolkitRelyingPartyDownloadAccountRequest
16351627 where
16361628 parseJSON
16371629 = withObject
1638− "IdentitytoolkitRelyingPartyyDownloadAccountRequest"
1630+ "IdentitytoolkitRelyingPartyDownloadAccountRequest"
16391631 (\ o ->
1640− IdentitytoolkitRelyingPartyyDownloadAccountRequest
1641− <$> (o .:? "nextPageToken") <*> (o .:? "maxResults"))
1632+ IdentitytoolkitRelyingPartyDownloadAccountRequest <$>
1633+ (o .:? "nextPageToken") <*> (o .:? "maxResults"))
16421634
16431635instance ToJSON
1644− IdentitytoolkitRelyingPartyyDownloadAccountRequest
1636+ IdentitytoolkitRelyingPartyDownloadAccountRequest
16451637 where
16461638 toJSON
1647− IdentitytoolkitRelyingPartyyDownloadAccountRequest{..}
1639+ IdentitytoolkitRelyingPartyDownloadAccountRequest{..}
16481640 = object
16491641 (catMaybes
16501642 [("nextPageToken" .=) <$> _irpdarNextPageToken,
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/CreateAuthURI.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/CreateAuthURI.hsrenamed+50−50
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.CreateAuthURI
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.CreateAuthURI
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,32 +19,32 @@
1919--
2020-- | Creates the URI used by the IdP to authenticate the user.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyCreateAuthURI@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.CreateAuthURI
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyCreateAuthURI@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.CreateAuthURI
2424 (
2525 -- * REST Resource
26− RelyingPartyyCreateAuthURIResource
26+ RelyingPartyCreateAuthURIResource
2727
2828 -- * Creating a Request
29− , relyingPartyyCreateAuthURI'
30− , RelyingPartyyCreateAuthURI'
29+ , relyingPartyCreateAuthURI'
30+ , RelyingPartyCreateAuthURI'
3131
3232 -- * Request Lenses
3333 , rpcauQuotaUser
3434 , rpcauPrettyPrint
3535 , rpcauUserIP
3636 , rpcauKey
37+ , rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest
3738 , rpcauOAuthToken
38− , rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest
3939 , rpcauFields
4040 ) where
4141
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyCreateAuthURI@ which the
46−-- 'RelyingPartyyCreateAuthURI'' request conforms to.
47−type RelyingPartyyCreateAuthURIResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyCreateAuthURI@ which the
46+-- 'RelyingPartyCreateAuthURI'' request conforms to.
47+type RelyingPartyCreateAuthURIResource =
4848 "createAuthUri" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyCreateAuthURIResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyCreateAuthURIRequest
57+ IdentitytoolkitRelyingPartyCreateAuthURIRequest
5858 :> Post '[JSON] CreateAuthURIResponse
5959
6060-- | Creates the URI used by the IdP to authenticate the user.
6161--
62−-- /See:/ 'relyingPartyyCreateAuthURI'' smart constructor.
63−data RelyingPartyyCreateAuthURI' = RelyingPartyyCreateAuthURI'
64− { _rpcauQuotaUser :: !(Maybe Text)
65− , _rpcauPrettyPrint :: !Bool
66− , _rpcauUserIP :: !(Maybe Text)
67− , _rpcauKey :: !(Maybe Key)
68− , _rpcauOAuthToken :: !(Maybe OAuthToken)
69− , _rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest :: !IdentitytoolkitRelyingPartyyCreateAuthURIRequest
70− , _rpcauFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyCreateAuthURI'' smart constructor.
63+data RelyingPartyCreateAuthURI' = RelyingPartyCreateAuthURI'
64+ { _rpcauQuotaUser :: !(Maybe Text)
65+ , _rpcauPrettyPrint :: !Bool
66+ , _rpcauUserIP :: !(Maybe Text)
67+ , _rpcauKey :: !(Maybe Key)
68+ , _rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest :: !IdentitytoolkitRelyingPartyCreateAuthURIRequest
69+ , _rpcauOAuthToken :: !(Maybe OAuthToken)
70+ , _rpcauFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyCreateAuthURI'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyCreateAuthURI'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -82,90 +82,90 @@ data RelyingPartyyCreateAuthURI' = RelyingPartyyCreateAuthURI'
8282--
8383-- * 'rpcauKey'
8484--
85−-- * 'rpcauOAuthToken'
85+-- * 'rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest'
8686--
87−-- * 'rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest'
87+-- * 'rpcauOAuthToken'
8888--
8989-- * 'rpcauFields'
90−relyingPartyyCreateAuthURI'
91− :: IdentitytoolkitRelyingPartyyCreateAuthURIRequest -- ^ 'IdentitytoolkitRelyingPartyyCreateAuthURIRequest'
92− -> RelyingPartyyCreateAuthURI'
93−relyingPartyyCreateAuthURI' pRpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest_ =
94− RelyingPartyyCreateAuthURI'
90+relyingPartyCreateAuthURI'
91+ :: IdentitytoolkitRelyingPartyCreateAuthURIRequest -- ^ 'IdentitytoolkitRelyingPartyCreateAuthURIRequest'
92+ -> RelyingPartyCreateAuthURI'
93+relyingPartyCreateAuthURI' pRpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest_ =
94+ RelyingPartyCreateAuthURI'
9595 { _rpcauQuotaUser = Nothing
9696 , _rpcauPrettyPrint = True
9797 , _rpcauUserIP = Nothing
9898 , _rpcauKey = Nothing
99+ , _rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest = pRpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest_
99100 , _rpcauOAuthToken = Nothing
100− , _rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest = pRpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest_
101101 , _rpcauFields = Nothing
102102 }
103103
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpcauQuotaUser :: Lens' RelyingPartyyCreateAuthURI' (Maybe Text)
107+rpcauQuotaUser :: Lens' RelyingPartyCreateAuthURI' (Maybe Text)
108108rpcauQuotaUser
109109 = lens _rpcauQuotaUser
110110 (\ s a -> s{_rpcauQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpcauPrettyPrint :: Lens' RelyingPartyyCreateAuthURI' Bool
113+rpcauPrettyPrint :: Lens' RelyingPartyCreateAuthURI' Bool
114114rpcauPrettyPrint
115115 = lens _rpcauPrettyPrint
116116 (\ s a -> s{_rpcauPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpcauUserIP :: Lens' RelyingPartyyCreateAuthURI' (Maybe Text)
120+rpcauUserIP :: Lens' RelyingPartyCreateAuthURI' (Maybe Text)
121121rpcauUserIP
122122 = lens _rpcauUserIP (\ s a -> s{_rpcauUserIP = a})
123123
124124-- | API key. Your API key identifies your project and provides you with API
125125-- access, quota, and reports. Required unless you provide an OAuth 2.0
126126-- token.
127−rpcauKey :: Lens' RelyingPartyyCreateAuthURI' (Maybe Key)
127+rpcauKey :: Lens' RelyingPartyCreateAuthURI' (Maybe Key)
128128rpcauKey = lens _rpcauKey (\ s a -> s{_rpcauKey = a})
129129
130−-- | OAuth 2.0 token for the current user.
131−rpcauOAuthToken :: Lens' RelyingPartyyCreateAuthURI' (Maybe OAuthToken)
132−rpcauOAuthToken
133− = lens _rpcauOAuthToken
134− (\ s a -> s{_rpcauOAuthToken = a})
135−
136130-- | Multipart request metadata.
137−rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest :: Lens' RelyingPartyyCreateAuthURI' IdentitytoolkitRelyingPartyyCreateAuthURIRequest
138−rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest
131+rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest :: Lens' RelyingPartyCreateAuthURI' IdentitytoolkitRelyingPartyCreateAuthURIRequest
132+rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest
139133 = lens
140− _rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest
134+ _rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest
141135 (\ s a ->
142− s{_rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest
136+ s{_rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest
143137 = a})
144138
139+-- | OAuth 2.0 token for the current user.
140+rpcauOAuthToken :: Lens' RelyingPartyCreateAuthURI' (Maybe OAuthToken)
141+rpcauOAuthToken
142+ = lens _rpcauOAuthToken
143+ (\ s a -> s{_rpcauOAuthToken = a})
144+
145145-- | Selector specifying which fields to include in a partial response.
146−rpcauFields :: Lens' RelyingPartyyCreateAuthURI' (Maybe Text)
146+rpcauFields :: Lens' RelyingPartyCreateAuthURI' (Maybe Text)
147147rpcauFields
148148 = lens _rpcauFields (\ s a -> s{_rpcauFields = a})
149149
150−instance GoogleAuth RelyingPartyyCreateAuthURI' where
150+instance GoogleAuth RelyingPartyCreateAuthURI' where
151151 authKey = rpcauKey . _Just
152152 authToken = rpcauOAuthToken . _Just
153153
154−instance GoogleRequest RelyingPartyyCreateAuthURI'
154+instance GoogleRequest RelyingPartyCreateAuthURI'
155155 where
156− type Rs RelyingPartyyCreateAuthURI' =
156+ type Rs RelyingPartyCreateAuthURI' =
157157 CreateAuthURIResponse
158158 request = requestWithRoute defReq identityToolkitURL
159− requestWithRoute r u RelyingPartyyCreateAuthURI'{..}
159+ requestWithRoute r u RelyingPartyCreateAuthURI'{..}
160160 = go _rpcauQuotaUser (Just _rpcauPrettyPrint)
161161 _rpcauUserIP
162162 _rpcauKey
163163 _rpcauOAuthToken
164164 _rpcauFields
165165 (Just AltJSON)
166− _rpcauIdentitytoolkitRelyingPartyyCreateAuthURIRequest
166+ _rpcauIdentitytoolkitRelyingPartyCreateAuthURIRequest
167167 where go
168168 = clientWithRoute
169− (Proxy :: Proxy RelyingPartyyCreateAuthURIResource)
169+ (Proxy :: Proxy RelyingPartyCreateAuthURIResource)
170170 r
171171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/DeleteAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DeleteAccount.hsrenamed+51−51
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.DeleteAccount
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,22 +19,22 @@
1919--
2020-- | Delete user account.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyDeleteAccount@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyDeleteAccount@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.DeleteAccount
2424 (
2525 -- * REST Resource
26− RelyingPartyyDeleteAccountResource
26+ RelyingPartyDeleteAccountResource
2727
2828 -- * Creating a Request
29− , relyingPartyyDeleteAccount'
30− , RelyingPartyyDeleteAccount'
29+ , relyingPartyDeleteAccount'
30+ , RelyingPartyDeleteAccount'
3131
3232 -- * Request Lenses
33− , rIdentitytoolkitRelyingPartyyDeleteAccountRequest
3433 , rQuotaUser
3534 , rPrettyPrint
3635 , rUserIP
3736 , rKey
37+ , rIdentitytoolkitRelyingPartyDeleteAccountRequest
3838 , rOAuthToken
3939 , rFields
4040 ) where
@@ -42,9 +42,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyDeleteAccount@ which the
46−-- 'RelyingPartyyDeleteAccount'' request conforms to.
47−type RelyingPartyyDeleteAccountResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyDeleteAccount@ which the
46+-- 'RelyingPartyDeleteAccount'' request conforms to.
47+type RelyingPartyDeleteAccountResource =
4848 "deleteAccount" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,28 +54,26 @@ type RelyingPartyyDeleteAccountResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyDeleteAccountRequest
57+ IdentitytoolkitRelyingPartyDeleteAccountRequest
5858 :> Post '[JSON] DeleteAccountResponse
5959
6060-- | Delete user account.
6161--
62−-- /See:/ 'relyingPartyyDeleteAccount'' smart constructor.
63−data RelyingPartyyDeleteAccount' = RelyingPartyyDeleteAccount'
64− { _rIdentitytoolkitRelyingPartyyDeleteAccountRequest :: !IdentitytoolkitRelyingPartyyDeleteAccountRequest
65− , _rQuotaUser :: !(Maybe Text)
66− , _rPrettyPrint :: !Bool
67− , _rUserIP :: !(Maybe Text)
68− , _rKey :: !(Maybe Key)
69− , _rOAuthToken :: !(Maybe OAuthToken)
70− , _rFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyDeleteAccount'' smart constructor.
63+data RelyingPartyDeleteAccount' = RelyingPartyDeleteAccount'
64+ { _rQuotaUser :: !(Maybe Text)
65+ , _rPrettyPrint :: !Bool
66+ , _rUserIP :: !(Maybe Text)
67+ , _rKey :: !(Maybe Key)
68+ , _rIdentitytoolkitRelyingPartyDeleteAccountRequest :: !IdentitytoolkitRelyingPartyDeleteAccountRequest
69+ , _rOAuthToken :: !(Maybe OAuthToken)
70+ , _rFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyDeleteAccount'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyDeleteAccount'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
77−-- * 'rIdentitytoolkitRelyingPartyyDeleteAccountRequest'
78−--
7977-- * 'rQuotaUser'
8078--
8179-- * 'rPrettyPrint'
@@ -84,81 +82,83 @@ data RelyingPartyyDeleteAccount' = RelyingPartyyDeleteAccount'
8482--
8583-- * 'rKey'
8684--
85+-- * 'rIdentitytoolkitRelyingPartyDeleteAccountRequest'
86+--
8787-- * 'rOAuthToken'
8888--
8989-- * 'rFields'
90−relyingPartyyDeleteAccount'
91− :: IdentitytoolkitRelyingPartyyDeleteAccountRequest -- ^ 'IdentitytoolkitRelyingPartyyDeleteAccountRequest'
92− -> RelyingPartyyDeleteAccount'
93−relyingPartyyDeleteAccount' pRIdentitytoolkitRelyingPartyyDeleteAccountRequest_ =
94− RelyingPartyyDeleteAccount'
95− { _rIdentitytoolkitRelyingPartyyDeleteAccountRequest = pRIdentitytoolkitRelyingPartyyDeleteAccountRequest_
96− , _rQuotaUser = Nothing
90+relyingPartyDeleteAccount'
91+ :: IdentitytoolkitRelyingPartyDeleteAccountRequest -- ^ 'IdentitytoolkitRelyingPartyDeleteAccountRequest'
92+ -> RelyingPartyDeleteAccount'
93+relyingPartyDeleteAccount' pRIdentitytoolkitRelyingPartyDeleteAccountRequest_ =
94+ RelyingPartyDeleteAccount'
95+ { _rQuotaUser = Nothing
9796 , _rPrettyPrint = True
9897 , _rUserIP = Nothing
9998 , _rKey = Nothing
99+ , _rIdentitytoolkitRelyingPartyDeleteAccountRequest = pRIdentitytoolkitRelyingPartyDeleteAccountRequest_
100100 , _rOAuthToken = Nothing
101101 , _rFields = Nothing
102102 }
103103
104−-- | Multipart request metadata.
105−rIdentitytoolkitRelyingPartyyDeleteAccountRequest :: Lens' RelyingPartyyDeleteAccount' IdentitytoolkitRelyingPartyyDeleteAccountRequest
106−rIdentitytoolkitRelyingPartyyDeleteAccountRequest
107− = lens
108− _rIdentitytoolkitRelyingPartyyDeleteAccountRequest
109− (\ s a ->
110− s{_rIdentitytoolkitRelyingPartyyDeleteAccountRequest
111− = a})
112−
113104-- | Available to use for quota purposes for server-side applications. Can be
114105-- any arbitrary string assigned to a user, but should not exceed 40
115106-- characters. Overrides userIp if both are provided.
116−rQuotaUser :: Lens' RelyingPartyyDeleteAccount' (Maybe Text)
107+rQuotaUser :: Lens' RelyingPartyDeleteAccount' (Maybe Text)
117108rQuotaUser
118109 = lens _rQuotaUser (\ s a -> s{_rQuotaUser = a})
119110
120111-- | Returns response with indentations and line breaks.
121−rPrettyPrint :: Lens' RelyingPartyyDeleteAccount' Bool
112+rPrettyPrint :: Lens' RelyingPartyDeleteAccount' Bool
122113rPrettyPrint
123114 = lens _rPrettyPrint (\ s a -> s{_rPrettyPrint = a})
124115
125116-- | IP address of the site where the request originates. Use this if you
126117-- want to enforce per-user limits.
127−rUserIP :: Lens' RelyingPartyyDeleteAccount' (Maybe Text)
118+rUserIP :: Lens' RelyingPartyDeleteAccount' (Maybe Text)
128119rUserIP = lens _rUserIP (\ s a -> s{_rUserIP = a})
129120
130121-- | API key. Your API key identifies your project and provides you with API
131122-- access, quota, and reports. Required unless you provide an OAuth 2.0
132123-- token.
133−rKey :: Lens' RelyingPartyyDeleteAccount' (Maybe Key)
124+rKey :: Lens' RelyingPartyDeleteAccount' (Maybe Key)
134125rKey = lens _rKey (\ s a -> s{_rKey = a})
135126
127+-- | Multipart request metadata.
128+rIdentitytoolkitRelyingPartyDeleteAccountRequest :: Lens' RelyingPartyDeleteAccount' IdentitytoolkitRelyingPartyDeleteAccountRequest
129+rIdentitytoolkitRelyingPartyDeleteAccountRequest
130+ = lens
131+ _rIdentitytoolkitRelyingPartyDeleteAccountRequest
132+ (\ s a ->
133+ s{_rIdentitytoolkitRelyingPartyDeleteAccountRequest =
134+ a})
135+
136136-- | OAuth 2.0 token for the current user.
137−rOAuthToken :: Lens' RelyingPartyyDeleteAccount' (Maybe OAuthToken)
137+rOAuthToken :: Lens' RelyingPartyDeleteAccount' (Maybe OAuthToken)
138138rOAuthToken
139139 = lens _rOAuthToken (\ s a -> s{_rOAuthToken = a})
140140
141141-- | Selector specifying which fields to include in a partial response.
142−rFields :: Lens' RelyingPartyyDeleteAccount' (Maybe Text)
142+rFields :: Lens' RelyingPartyDeleteAccount' (Maybe Text)
143143rFields = lens _rFields (\ s a -> s{_rFields = a})
144144
145−instance GoogleAuth RelyingPartyyDeleteAccount' where
145+instance GoogleAuth RelyingPartyDeleteAccount' where
146146 authKey = rKey . _Just
147147 authToken = rOAuthToken . _Just
148148
149−instance GoogleRequest RelyingPartyyDeleteAccount'
149+instance GoogleRequest RelyingPartyDeleteAccount'
150150 where
151− type Rs RelyingPartyyDeleteAccount' =
151+ type Rs RelyingPartyDeleteAccount' =
152152 DeleteAccountResponse
153153 request = requestWithRoute defReq identityToolkitURL
154− requestWithRoute r u RelyingPartyyDeleteAccount'{..}
154+ requestWithRoute r u RelyingPartyDeleteAccount'{..}
155155 = go _rQuotaUser (Just _rPrettyPrint) _rUserIP _rKey
156156 _rOAuthToken
157157 _rFields
158158 (Just AltJSON)
159− _rIdentitytoolkitRelyingPartyyDeleteAccountRequest
159+ _rIdentitytoolkitRelyingPartyDeleteAccountRequest
160160 where go
161161 = clientWithRoute
162− (Proxy :: Proxy RelyingPartyyDeleteAccountResource)
162+ (Proxy :: Proxy RelyingPartyDeleteAccountResource)
163163 r
164164 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/DownloadAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/DownloadAccount.hsrenamed+50−51
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.DownloadAccount
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,22 +19,22 @@
1919--
2020-- | Batch download user accounts.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyDownloadAccount@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyDownloadAccount@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.DownloadAccount
2424 (
2525 -- * REST Resource
26− RelyingPartyyDownloadAccountResource
26+ RelyingPartyDownloadAccountResource
2727
2828 -- * Creating a Request
29− , relyingPartyyDownloadAccount'
30− , RelyingPartyyDownloadAccount'
29+ , relyingPartyDownloadAccount'
30+ , RelyingPartyDownloadAccount'
3131
3232 -- * Request Lenses
3333 , rpdaQuotaUser
3434 , rpdaPrettyPrint
3535 , rpdaUserIP
36− , rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest
3736 , rpdaKey
37+ , rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest
3838 , rpdaOAuthToken
3939 , rpdaFields
4040 ) where
@@ -42,9 +42,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyDownloadAccount@ which the
46−-- 'RelyingPartyyDownloadAccount'' request conforms to.
47−type RelyingPartyyDownloadAccountResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyDownloadAccount@ which the
46+-- 'RelyingPartyDownloadAccount'' request conforms to.
47+type RelyingPartyDownloadAccountResource =
4848 "downloadAccount" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyDownloadAccountResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyDownloadAccountRequest
57+ IdentitytoolkitRelyingPartyDownloadAccountRequest
5858 :> Post '[JSON] DownloadAccountResponse
5959
6060-- | Batch download user accounts.
6161--
62−-- /See:/ 'relyingPartyyDownloadAccount'' smart constructor.
63−data RelyingPartyyDownloadAccount' = RelyingPartyyDownloadAccount'
64− { _rpdaQuotaUser :: !(Maybe Text)
65− , _rpdaPrettyPrint :: !Bool
66− , _rpdaUserIP :: !(Maybe Text)
67− , _rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest :: !IdentitytoolkitRelyingPartyyDownloadAccountRequest
68− , _rpdaKey :: !(Maybe Key)
69− , _rpdaOAuthToken :: !(Maybe OAuthToken)
70− , _rpdaFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyDownloadAccount'' smart constructor.
63+data RelyingPartyDownloadAccount' = RelyingPartyDownloadAccount'
64+ { _rpdaQuotaUser :: !(Maybe Text)
65+ , _rpdaPrettyPrint :: !Bool
66+ , _rpdaUserIP :: !(Maybe Text)
67+ , _rpdaKey :: !(Maybe Key)
68+ , _rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest :: !IdentitytoolkitRelyingPartyDownloadAccountRequest
69+ , _rpdaOAuthToken :: !(Maybe OAuthToken)
70+ , _rpdaFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyDownloadAccount'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyDownloadAccount'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -80,23 +80,23 @@ data RelyingPartyyDownloadAccount' = RelyingPartyyDownloadAccount'
8080--
8181-- * 'rpdaUserIP'
8282--
83−-- * 'rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest'
84−--
8583-- * 'rpdaKey'
8684--
85+-- * 'rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest'
86+--
8787-- * 'rpdaOAuthToken'
8888--
8989-- * 'rpdaFields'
90−relyingPartyyDownloadAccount'
91− :: IdentitytoolkitRelyingPartyyDownloadAccountRequest -- ^ 'IdentitytoolkitRelyingPartyyDownloadAccountRequest'
92− -> RelyingPartyyDownloadAccount'
93−relyingPartyyDownloadAccount' pRpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest_ =
94− RelyingPartyyDownloadAccount'
90+relyingPartyDownloadAccount'
91+ :: IdentitytoolkitRelyingPartyDownloadAccountRequest -- ^ 'IdentitytoolkitRelyingPartyDownloadAccountRequest'
92+ -> RelyingPartyDownloadAccount'
93+relyingPartyDownloadAccount' pRpdaIdentitytoolkitRelyingPartyDownloadAccountRequest_ =
94+ RelyingPartyDownloadAccount'
9595 { _rpdaQuotaUser = Nothing
9696 , _rpdaPrettyPrint = True
9797 , _rpdaUserIP = Nothing
98− , _rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest = pRpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest_
9998 , _rpdaKey = Nothing
99+ , _rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest = pRpdaIdentitytoolkitRelyingPartyDownloadAccountRequest_
100100 , _rpdaOAuthToken = Nothing
101101 , _rpdaFields = Nothing
102102 }
@@ -104,70 +104,69 @@ relyingPartyyDownloadAccount' pRpdaIdentitytoolkitRelyingPartyyDownloadAccountRe
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpdaQuotaUser :: Lens' RelyingPartyyDownloadAccount' (Maybe Text)
107+rpdaQuotaUser :: Lens' RelyingPartyDownloadAccount' (Maybe Text)
108108rpdaQuotaUser
109109 = lens _rpdaQuotaUser
110110 (\ s a -> s{_rpdaQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpdaPrettyPrint :: Lens' RelyingPartyyDownloadAccount' Bool
113+rpdaPrettyPrint :: Lens' RelyingPartyDownloadAccount' Bool
114114rpdaPrettyPrint
115115 = lens _rpdaPrettyPrint
116116 (\ s a -> s{_rpdaPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpdaUserIP :: Lens' RelyingPartyyDownloadAccount' (Maybe Text)
120+rpdaUserIP :: Lens' RelyingPartyDownloadAccount' (Maybe Text)
121121rpdaUserIP
122122 = lens _rpdaUserIP (\ s a -> s{_rpdaUserIP = a})
123123
124−-- | Multipart request metadata.
125−rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest :: Lens' RelyingPartyyDownloadAccount' IdentitytoolkitRelyingPartyyDownloadAccountRequest
126−rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest
127− = lens
128− _rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest
129− (\ s a ->
130− s{_rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest
131− = a})
132−
133124-- | API key. Your API key identifies your project and provides you with API
134125-- access, quota, and reports. Required unless you provide an OAuth 2.0
135126-- token.
136−rpdaKey :: Lens' RelyingPartyyDownloadAccount' (Maybe Key)
127+rpdaKey :: Lens' RelyingPartyDownloadAccount' (Maybe Key)
137128rpdaKey = lens _rpdaKey (\ s a -> s{_rpdaKey = a})
138129
130+-- | Multipart request metadata.
131+rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest :: Lens' RelyingPartyDownloadAccount' IdentitytoolkitRelyingPartyDownloadAccountRequest
132+rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest
133+ = lens
134+ _rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest
135+ (\ s a ->
136+ s{_rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest
137+ = a})
138+
139139-- | OAuth 2.0 token for the current user.
140−rpdaOAuthToken :: Lens' RelyingPartyyDownloadAccount' (Maybe OAuthToken)
140+rpdaOAuthToken :: Lens' RelyingPartyDownloadAccount' (Maybe OAuthToken)
141141rpdaOAuthToken
142142 = lens _rpdaOAuthToken
143143 (\ s a -> s{_rpdaOAuthToken = a})
144144
145145-- | Selector specifying which fields to include in a partial response.
146−rpdaFields :: Lens' RelyingPartyyDownloadAccount' (Maybe Text)
146+rpdaFields :: Lens' RelyingPartyDownloadAccount' (Maybe Text)
147147rpdaFields
148148 = lens _rpdaFields (\ s a -> s{_rpdaFields = a})
149149
150−instance GoogleAuth RelyingPartyyDownloadAccount'
150+instance GoogleAuth RelyingPartyDownloadAccount'
151151 where
152152 authKey = rpdaKey . _Just
153153 authToken = rpdaOAuthToken . _Just
154154
155−instance GoogleRequest RelyingPartyyDownloadAccount'
155+instance GoogleRequest RelyingPartyDownloadAccount'
156156 where
157− type Rs RelyingPartyyDownloadAccount' =
157+ type Rs RelyingPartyDownloadAccount' =
158158 DownloadAccountResponse
159159 request = requestWithRoute defReq identityToolkitURL
160− requestWithRoute r u
161− RelyingPartyyDownloadAccount'{..}
160+ requestWithRoute r u RelyingPartyDownloadAccount'{..}
162161 = go _rpdaQuotaUser (Just _rpdaPrettyPrint)
163162 _rpdaUserIP
164163 _rpdaKey
165164 _rpdaOAuthToken
166165 _rpdaFields
167166 (Just AltJSON)
168− _rpdaIdentitytoolkitRelyingPartyyDownloadAccountRequest
167+ _rpdaIdentitytoolkitRelyingPartyDownloadAccountRequest
169168 where go
170169 = clientWithRoute
171− (Proxy :: Proxy RelyingPartyyDownloadAccountResource)
170+ (Proxy :: Proxy RelyingPartyDownloadAccountResource)
172171 r
173172 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetAccountInfo.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetAccountInfo.hsrenamed+50−51
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.GetAccountInfo
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,22 +19,22 @@
1919--
2020-- | Returns the account info.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyGetAccountInfo@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyGetAccountInfo@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.GetAccountInfo
2424 (
2525 -- * REST Resource
26− RelyingPartyyGetAccountInfoResource
26+ RelyingPartyGetAccountInfoResource
2727
2828 -- * Creating a Request
29− , relyingPartyyGetAccountInfo'
30− , RelyingPartyyGetAccountInfo'
29+ , relyingPartyGetAccountInfo'
30+ , RelyingPartyGetAccountInfo'
3131
3232 -- * Request Lenses
3333 , rpgaiQuotaUser
3434 , rpgaiPrettyPrint
3535 , rpgaiUserIP
36+ , rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest
3637 , rpgaiKey
37− , rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest
3838 , rpgaiOAuthToken
3939 , rpgaiFields
4040 ) where
@@ -42,9 +42,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyGetAccountInfo@ which the
46−-- 'RelyingPartyyGetAccountInfo'' request conforms to.
47−type RelyingPartyyGetAccountInfoResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyGetAccountInfo@ which the
46+-- 'RelyingPartyGetAccountInfo'' request conforms to.
47+type RelyingPartyGetAccountInfoResource =
4848 "getAccountInfo" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyGetAccountInfoResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyGetAccountInfoRequest
57+ IdentitytoolkitRelyingPartyGetAccountInfoRequest
5858 :> Post '[JSON] GetAccountInfoResponse
5959
6060-- | Returns the account info.
6161--
62−-- /See:/ 'relyingPartyyGetAccountInfo'' smart constructor.
63−data RelyingPartyyGetAccountInfo' = RelyingPartyyGetAccountInfo'
64− { _rpgaiQuotaUser :: !(Maybe Text)
65− , _rpgaiPrettyPrint :: !Bool
66− , _rpgaiUserIP :: !(Maybe Text)
67− , _rpgaiKey :: !(Maybe Key)
68− , _rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest :: !IdentitytoolkitRelyingPartyyGetAccountInfoRequest
69− , _rpgaiOAuthToken :: !(Maybe OAuthToken)
70− , _rpgaiFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyGetAccountInfo'' smart constructor.
63+data RelyingPartyGetAccountInfo' = RelyingPartyGetAccountInfo'
64+ { _rpgaiQuotaUser :: !(Maybe Text)
65+ , _rpgaiPrettyPrint :: !Bool
66+ , _rpgaiUserIP :: !(Maybe Text)
67+ , _rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest :: !IdentitytoolkitRelyingPartyGetAccountInfoRequest
68+ , _rpgaiKey :: !(Maybe Key)
69+ , _rpgaiOAuthToken :: !(Maybe OAuthToken)
70+ , _rpgaiFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyGetAccountInfo'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyGetAccountInfo'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -80,23 +80,23 @@ data RelyingPartyyGetAccountInfo' = RelyingPartyyGetAccountInfo'
8080--
8181-- * 'rpgaiUserIP'
8282--
83−-- * 'rpgaiKey'
83+-- * 'rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest'
8484--
85−-- * 'rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest'
85+-- * 'rpgaiKey'
8686--
8787-- * 'rpgaiOAuthToken'
8888--
8989-- * 'rpgaiFields'
90−relyingPartyyGetAccountInfo'
91− :: IdentitytoolkitRelyingPartyyGetAccountInfoRequest -- ^ 'IdentitytoolkitRelyingPartyyGetAccountInfoRequest'
92− -> RelyingPartyyGetAccountInfo'
93−relyingPartyyGetAccountInfo' pRpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest_ =
94− RelyingPartyyGetAccountInfo'
90+relyingPartyGetAccountInfo'
91+ :: IdentitytoolkitRelyingPartyGetAccountInfoRequest -- ^ 'IdentitytoolkitRelyingPartyGetAccountInfoRequest'
92+ -> RelyingPartyGetAccountInfo'
93+relyingPartyGetAccountInfo' pRpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest_ =
94+ RelyingPartyGetAccountInfo'
9595 { _rpgaiQuotaUser = Nothing
9696 , _rpgaiPrettyPrint = True
9797 , _rpgaiUserIP = Nothing
98+ , _rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest = pRpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest_
9899 , _rpgaiKey = Nothing
99− , _rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest = pRpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest_
100100 , _rpgaiOAuthToken = Nothing
101101 , _rpgaiFields = Nothing
102102 }
@@ -104,69 +104,68 @@ relyingPartyyGetAccountInfo' pRpgaiIdentitytoolkitRelyingPartyyGetAccountInfoReq
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpgaiQuotaUser :: Lens' RelyingPartyyGetAccountInfo' (Maybe Text)
107+rpgaiQuotaUser :: Lens' RelyingPartyGetAccountInfo' (Maybe Text)
108108rpgaiQuotaUser
109109 = lens _rpgaiQuotaUser
110110 (\ s a -> s{_rpgaiQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpgaiPrettyPrint :: Lens' RelyingPartyyGetAccountInfo' Bool
113+rpgaiPrettyPrint :: Lens' RelyingPartyGetAccountInfo' Bool
114114rpgaiPrettyPrint
115115 = lens _rpgaiPrettyPrint
116116 (\ s a -> s{_rpgaiPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpgaiUserIP :: Lens' RelyingPartyyGetAccountInfo' (Maybe Text)
120+rpgaiUserIP :: Lens' RelyingPartyGetAccountInfo' (Maybe Text)
121121rpgaiUserIP
122122 = lens _rpgaiUserIP (\ s a -> s{_rpgaiUserIP = a})
123123
124−-- | API key. Your API key identifies your project and provides you with API
125−-- access, quota, and reports. Required unless you provide an OAuth 2.0
126−-- token.
127−rpgaiKey :: Lens' RelyingPartyyGetAccountInfo' (Maybe Key)
128−rpgaiKey = lens _rpgaiKey (\ s a -> s{_rpgaiKey = a})
129−
130124-- | Multipart request metadata.
131−rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest :: Lens' RelyingPartyyGetAccountInfo' IdentitytoolkitRelyingPartyyGetAccountInfoRequest
132−rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest
125+rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest :: Lens' RelyingPartyGetAccountInfo' IdentitytoolkitRelyingPartyGetAccountInfoRequest
126+rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest
133127 = lens
134− _rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest
128+ _rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest
135129 (\ s a ->
136− s{_rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest
130+ s{_rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest
137131 = a})
138132
133+-- | API key. Your API key identifies your project and provides you with API
134+-- access, quota, and reports. Required unless you provide an OAuth 2.0
135+-- token.
136+rpgaiKey :: Lens' RelyingPartyGetAccountInfo' (Maybe Key)
137+rpgaiKey = lens _rpgaiKey (\ s a -> s{_rpgaiKey = a})
138+
139139-- | OAuth 2.0 token for the current user.
140−rpgaiOAuthToken :: Lens' RelyingPartyyGetAccountInfo' (Maybe OAuthToken)
140+rpgaiOAuthToken :: Lens' RelyingPartyGetAccountInfo' (Maybe OAuthToken)
141141rpgaiOAuthToken
142142 = lens _rpgaiOAuthToken
143143 (\ s a -> s{_rpgaiOAuthToken = a})
144144
145145-- | Selector specifying which fields to include in a partial response.
146−rpgaiFields :: Lens' RelyingPartyyGetAccountInfo' (Maybe Text)
146+rpgaiFields :: Lens' RelyingPartyGetAccountInfo' (Maybe Text)
147147rpgaiFields
148148 = lens _rpgaiFields (\ s a -> s{_rpgaiFields = a})
149149
150−instance GoogleAuth RelyingPartyyGetAccountInfo'
151− where
150+instance GoogleAuth RelyingPartyGetAccountInfo' where
152151 authKey = rpgaiKey . _Just
153152 authToken = rpgaiOAuthToken . _Just
154153
155−instance GoogleRequest RelyingPartyyGetAccountInfo'
154+instance GoogleRequest RelyingPartyGetAccountInfo'
156155 where
157− type Rs RelyingPartyyGetAccountInfo' =
156+ type Rs RelyingPartyGetAccountInfo' =
158157 GetAccountInfoResponse
159158 request = requestWithRoute defReq identityToolkitURL
160− requestWithRoute r u RelyingPartyyGetAccountInfo'{..}
159+ requestWithRoute r u RelyingPartyGetAccountInfo'{..}
161160 = go _rpgaiQuotaUser (Just _rpgaiPrettyPrint)
162161 _rpgaiUserIP
163162 _rpgaiKey
164163 _rpgaiOAuthToken
165164 _rpgaiFields
166165 (Just AltJSON)
167− _rpgaiIdentitytoolkitRelyingPartyyGetAccountInfoRequest
166+ _rpgaiIdentitytoolkitRelyingPartyGetAccountInfoRequest
168167 where go
169168 = clientWithRoute
170− (Proxy :: Proxy RelyingPartyyGetAccountInfoResource)
169+ (Proxy :: Proxy RelyingPartyGetAccountInfoResource)
171170 r
172171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetOOBConfirmationCode.hsnew file+173
@@ -0,0 +1,173 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.GetOOBConfirmationCode
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Get a code for user action confirmation.
21+--
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyGetOOBConfirmationCode@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.GetOOBConfirmationCode
24+ (
25+ -- * REST Resource
26+ RelyingPartyGetOOBConfirmationCodeResource
27+
28+ -- * Creating a Request
29+ , relyingPartyGetOOBConfirmationCode'
30+ , RelyingPartyGetOOBConfirmationCode'
31+
32+ -- * Request Lenses
33+ , rpgoobccQuotaUser
34+ , rpgoobccPrettyPrint
35+ , rpgoobccUserIP
36+ , rpgoobccRelyingParty
37+ , rpgoobccKey
38+ , rpgoobccOAuthToken
39+ , rpgoobccFields
40+ ) where
41+
42+import Network.Google.IdentityToolkit.Types
43+import Network.Google.Prelude
44+
45+-- | A resource alias for @IdentitytoolkitRelyingPartyGetOOBConfirmationCode@ which the
46+-- 'RelyingPartyGetOOBConfirmationCode'' request conforms to.
47+type RelyingPartyGetOOBConfirmationCodeResource =
48+ "getOobConfirmationCode" :>
49+ QueryParam "quotaUser" Text :>
50+ QueryParam "prettyPrint" Bool :>
51+ QueryParam "userIp" Text :>
52+ QueryParam "key" Key :>
53+ QueryParam "oauth_token" OAuthToken :>
54+ QueryParam "fields" Text :>
55+ QueryParam "alt" AltJSON :>
56+ ReqBody '[JSON] RelyingParty :>
57+ Post '[JSON] GetOOBConfirmationCodeResponse
58+
59+-- | Get a code for user action confirmation.
60+--
61+-- /See:/ 'relyingPartyGetOOBConfirmationCode'' smart constructor.
62+data RelyingPartyGetOOBConfirmationCode' = RelyingPartyGetOOBConfirmationCode'
63+ { _rpgoobccQuotaUser :: !(Maybe Text)
64+ , _rpgoobccPrettyPrint :: !Bool
65+ , _rpgoobccUserIP :: !(Maybe Text)
66+ , _rpgoobccRelyingParty :: !RelyingParty
67+ , _rpgoobccKey :: !(Maybe Key)
68+ , _rpgoobccOAuthToken :: !(Maybe OAuthToken)
69+ , _rpgoobccFields :: !(Maybe Text)
70+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
71+
72+-- | Creates a value of 'RelyingPartyGetOOBConfirmationCode'' with the minimum fields required to make a request.
73+--
74+-- Use one of the following lenses to modify other fields as desired:
75+--
76+-- * 'rpgoobccQuotaUser'
77+--
78+-- * 'rpgoobccPrettyPrint'
79+--
80+-- * 'rpgoobccUserIP'
81+--
82+-- * 'rpgoobccRelyingParty'
83+--
84+-- * 'rpgoobccKey'
85+--
86+-- * 'rpgoobccOAuthToken'
87+--
88+-- * 'rpgoobccFields'
89+relyingPartyGetOOBConfirmationCode'
90+ :: RelyingParty -- ^ 'RelyingParty'
91+ -> RelyingPartyGetOOBConfirmationCode'
92+relyingPartyGetOOBConfirmationCode' pRpgoobccRelyingParty_ =
93+ RelyingPartyGetOOBConfirmationCode'
94+ { _rpgoobccQuotaUser = Nothing
95+ , _rpgoobccPrettyPrint = True
96+ , _rpgoobccUserIP = Nothing
97+ , _rpgoobccRelyingParty = pRpgoobccRelyingParty_
98+ , _rpgoobccKey = Nothing
99+ , _rpgoobccOAuthToken = Nothing
100+ , _rpgoobccFields = Nothing
101+ }
102+
103+-- | Available to use for quota purposes for server-side applications. Can be
104+-- any arbitrary string assigned to a user, but should not exceed 40
105+-- characters. Overrides userIp if both are provided.
106+rpgoobccQuotaUser :: Lens' RelyingPartyGetOOBConfirmationCode' (Maybe Text)
107+rpgoobccQuotaUser
108+ = lens _rpgoobccQuotaUser
109+ (\ s a -> s{_rpgoobccQuotaUser = a})
110+
111+-- | Returns response with indentations and line breaks.
112+rpgoobccPrettyPrint :: Lens' RelyingPartyGetOOBConfirmationCode' Bool
113+rpgoobccPrettyPrint
114+ = lens _rpgoobccPrettyPrint
115+ (\ s a -> s{_rpgoobccPrettyPrint = a})
116+
117+-- | IP address of the site where the request originates. Use this if you
118+-- want to enforce per-user limits.
119+rpgoobccUserIP :: Lens' RelyingPartyGetOOBConfirmationCode' (Maybe Text)
120+rpgoobccUserIP
121+ = lens _rpgoobccUserIP
122+ (\ s a -> s{_rpgoobccUserIP = a})
123+
124+-- | Multipart request metadata.
125+rpgoobccRelyingParty :: Lens' RelyingPartyGetOOBConfirmationCode' RelyingParty
126+rpgoobccRelyingParty
127+ = lens _rpgoobccRelyingParty
128+ (\ s a -> s{_rpgoobccRelyingParty = a})
129+
130+-- | API key. Your API key identifies your project and provides you with API
131+-- access, quota, and reports. Required unless you provide an OAuth 2.0
132+-- token.
133+rpgoobccKey :: Lens' RelyingPartyGetOOBConfirmationCode' (Maybe Key)
134+rpgoobccKey
135+ = lens _rpgoobccKey (\ s a -> s{_rpgoobccKey = a})
136+
137+-- | OAuth 2.0 token for the current user.
138+rpgoobccOAuthToken :: Lens' RelyingPartyGetOOBConfirmationCode' (Maybe OAuthToken)
139+rpgoobccOAuthToken
140+ = lens _rpgoobccOAuthToken
141+ (\ s a -> s{_rpgoobccOAuthToken = a})
142+
143+-- | Selector specifying which fields to include in a partial response.
144+rpgoobccFields :: Lens' RelyingPartyGetOOBConfirmationCode' (Maybe Text)
145+rpgoobccFields
146+ = lens _rpgoobccFields
147+ (\ s a -> s{_rpgoobccFields = a})
148+
149+instance GoogleAuth
150+ RelyingPartyGetOOBConfirmationCode' where
151+ authKey = rpgoobccKey . _Just
152+ authToken = rpgoobccOAuthToken . _Just
153+
154+instance GoogleRequest
155+ RelyingPartyGetOOBConfirmationCode' where
156+ type Rs RelyingPartyGetOOBConfirmationCode' =
157+ GetOOBConfirmationCodeResponse
158+ request = requestWithRoute defReq identityToolkitURL
159+ requestWithRoute r u
160+ RelyingPartyGetOOBConfirmationCode'{..}
161+ = go _rpgoobccQuotaUser (Just _rpgoobccPrettyPrint)
162+ _rpgoobccUserIP
163+ _rpgoobccKey
164+ _rpgoobccOAuthToken
165+ _rpgoobccFields
166+ (Just AltJSON)
167+ _rpgoobccRelyingParty
168+ where go
169+ = clientWithRoute
170+ (Proxy ::
171+ Proxy RelyingPartyGetOOBConfirmationCodeResource)
172+ r
173+ u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetPublicKeys.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetPublicKeys.hsrenamed+29−29
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.GetPublicKeys
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,15 +19,15 @@
1919--
2020-- | Get token signing public key.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyGetPublicKeys@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyGetPublicKeys@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.GetPublicKeys
2424 (
2525 -- * REST Resource
26− RelyingPartyyGetPublicKeysResource
26+ RelyingPartyGetPublicKeysResource
2727
2828 -- * Creating a Request
29− , relyingPartyyGetPublicKeys'
30− , RelyingPartyyGetPublicKeys'
29+ , relyingPartyGetPublicKeys'
30+ , RelyingPartyGetPublicKeys'
3131
3232 -- * Request Lenses
3333 , rpgpkQuotaUser
@@ -41,9 +41,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
4141import Network.Google.IdentityToolkit.Types
4242import Network.Google.Prelude
4343
44−-- | A resource alias for @IdentitytoolkitRelyingPartyyGetPublicKeys@ which the
45−-- 'RelyingPartyyGetPublicKeys'' request conforms to.
46−type RelyingPartyyGetPublicKeysResource =
44+-- | A resource alias for @IdentitytoolkitRelyingPartyGetPublicKeys@ which the
45+-- 'RelyingPartyGetPublicKeys'' request conforms to.
46+type RelyingPartyGetPublicKeysResource =
4747 "publicKeys" :>
4848 QueryParam "quotaUser" Text :>
4949 QueryParam "prettyPrint" Bool :>
@@ -53,12 +53,12 @@ type RelyingPartyyGetPublicKeysResource =
5353 QueryParam "fields" Text :>
5454 QueryParam "alt" AltJSON :>
5555 Get '[JSON]
56− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
56+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
5757
5858-- | Get token signing public key.
5959--
60−-- /See:/ 'relyingPartyyGetPublicKeys'' smart constructor.
61−data RelyingPartyyGetPublicKeys' = RelyingPartyyGetPublicKeys'
60+-- /See:/ 'relyingPartyGetPublicKeys'' smart constructor.
61+data RelyingPartyGetPublicKeys' = RelyingPartyGetPublicKeys'
6262 { _rpgpkQuotaUser :: !(Maybe Text)
6363 , _rpgpkPrettyPrint :: !Bool
6464 , _rpgpkUserIP :: !(Maybe Text)
@@ -67,7 +67,7 @@ data RelyingPartyyGetPublicKeys' = RelyingPartyyGetPublicKeys'
6767 , _rpgpkFields :: !(Maybe Text)
6868 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6969
70−-- | Creates a value of 'RelyingPartyyGetPublicKeys'' with the minimum fields required to make a request.
70+-- | Creates a value of 'RelyingPartyGetPublicKeys'' with the minimum fields required to make a request.
7171--
7272-- Use one of the following lenses to modify other fields as desired:
7373--
@@ -82,10 +82,10 @@ data RelyingPartyyGetPublicKeys' = RelyingPartyyGetPublicKeys'
8282-- * 'rpgpkOAuthToken'
8383--
8484-- * 'rpgpkFields'
85−relyingPartyyGetPublicKeys'
86− :: RelyingPartyyGetPublicKeys'
87−relyingPartyyGetPublicKeys' =
88− RelyingPartyyGetPublicKeys'
85+relyingPartyGetPublicKeys'
86+ :: RelyingPartyGetPublicKeys'
87+relyingPartyGetPublicKeys' =
88+ RelyingPartyGetPublicKeys'
8989 { _rpgpkQuotaUser = Nothing
9090 , _rpgpkPrettyPrint = True
9191 , _rpgpkUserIP = Nothing
@@ -97,50 +97,50 @@ relyingPartyyGetPublicKeys' =
9797-- | Available to use for quota purposes for server-side applications. Can be
9898-- any arbitrary string assigned to a user, but should not exceed 40
9999-- characters. Overrides userIp if both are provided.
100−rpgpkQuotaUser :: Lens' RelyingPartyyGetPublicKeys' (Maybe Text)
100+rpgpkQuotaUser :: Lens' RelyingPartyGetPublicKeys' (Maybe Text)
101101rpgpkQuotaUser
102102 = lens _rpgpkQuotaUser
103103 (\ s a -> s{_rpgpkQuotaUser = a})
104104
105105-- | Returns response with indentations and line breaks.
106−rpgpkPrettyPrint :: Lens' RelyingPartyyGetPublicKeys' Bool
106+rpgpkPrettyPrint :: Lens' RelyingPartyGetPublicKeys' Bool
107107rpgpkPrettyPrint
108108 = lens _rpgpkPrettyPrint
109109 (\ s a -> s{_rpgpkPrettyPrint = a})
110110
111111-- | IP address of the site where the request originates. Use this if you
112112-- want to enforce per-user limits.
113−rpgpkUserIP :: Lens' RelyingPartyyGetPublicKeys' (Maybe Text)
113+rpgpkUserIP :: Lens' RelyingPartyGetPublicKeys' (Maybe Text)
114114rpgpkUserIP
115115 = lens _rpgpkUserIP (\ s a -> s{_rpgpkUserIP = a})
116116
117117-- | API key. Your API key identifies your project and provides you with API
118118-- access, quota, and reports. Required unless you provide an OAuth 2.0
119119-- token.
120−rpgpkKey :: Lens' RelyingPartyyGetPublicKeys' (Maybe Key)
120+rpgpkKey :: Lens' RelyingPartyGetPublicKeys' (Maybe Key)
121121rpgpkKey = lens _rpgpkKey (\ s a -> s{_rpgpkKey = a})
122122
123123-- | OAuth 2.0 token for the current user.
124−rpgpkOAuthToken :: Lens' RelyingPartyyGetPublicKeys' (Maybe OAuthToken)
124+rpgpkOAuthToken :: Lens' RelyingPartyGetPublicKeys' (Maybe OAuthToken)
125125rpgpkOAuthToken
126126 = lens _rpgpkOAuthToken
127127 (\ s a -> s{_rpgpkOAuthToken = a})
128128
129129-- | Selector specifying which fields to include in a partial response.
130−rpgpkFields :: Lens' RelyingPartyyGetPublicKeys' (Maybe Text)
130+rpgpkFields :: Lens' RelyingPartyGetPublicKeys' (Maybe Text)
131131rpgpkFields
132132 = lens _rpgpkFields (\ s a -> s{_rpgpkFields = a})
133133
134−instance GoogleAuth RelyingPartyyGetPublicKeys' where
134+instance GoogleAuth RelyingPartyGetPublicKeys' where
135135 authKey = rpgpkKey . _Just
136136 authToken = rpgpkOAuthToken . _Just
137137
138−instance GoogleRequest RelyingPartyyGetPublicKeys'
138+instance GoogleRequest RelyingPartyGetPublicKeys'
139139 where
140− type Rs RelyingPartyyGetPublicKeys' =
141− IdentitytoolkitRelyingPartyyGetPublicKeysResponse
140+ type Rs RelyingPartyGetPublicKeys' =
141+ IdentitytoolkitRelyingPartyGetPublicKeysResponse
142142 request = requestWithRoute defReq identityToolkitURL
143− requestWithRoute r u RelyingPartyyGetPublicKeys'{..}
143+ requestWithRoute r u RelyingPartyGetPublicKeys'{..}
144144 = go _rpgpkQuotaUser (Just _rpgpkPrettyPrint)
145145 _rpgpkUserIP
146146 _rpgpkKey
@@ -149,6 +149,6 @@ instance GoogleRequest RelyingPartyyGetPublicKeys'
149149 (Just AltJSON)
150150 where go
151151 = clientWithRoute
152− (Proxy :: Proxy RelyingPartyyGetPublicKeysResource)
152+ (Proxy :: Proxy RelyingPartyGetPublicKeysResource)
153153 r
154154 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetRecaptchaParam.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetRecaptchaParam.hsrenamed+28−28
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.GetRecaptchaParam
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,15 +19,15 @@
1919--
2020-- | Get recaptcha secure param.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyGetRecaptchaParam@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyGetRecaptchaParam@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.GetRecaptchaParam
2424 (
2525 -- * REST Resource
26− RelyingPartyyGetRecaptchaParamResource
26+ RelyingPartyGetRecaptchaParamResource
2727
2828 -- * Creating a Request
29− , relyingPartyyGetRecaptchaParam'
30− , RelyingPartyyGetRecaptchaParam'
29+ , relyingPartyGetRecaptchaParam'
30+ , RelyingPartyGetRecaptchaParam'
3131
3232 -- * Request Lenses
3333 , rpgrpQuotaUser
@@ -41,9 +41,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
4141import Network.Google.IdentityToolkit.Types
4242import Network.Google.Prelude
4343
44−-- | A resource alias for @IdentitytoolkitRelyingPartyyGetRecaptchaParam@ which the
45−-- 'RelyingPartyyGetRecaptchaParam'' request conforms to.
46−type RelyingPartyyGetRecaptchaParamResource =
44+-- | A resource alias for @IdentitytoolkitRelyingPartyGetRecaptchaParam@ which the
45+-- 'RelyingPartyGetRecaptchaParam'' request conforms to.
46+type RelyingPartyGetRecaptchaParamResource =
4747 "getRecaptchaParam" :>
4848 QueryParam "quotaUser" Text :>
4949 QueryParam "prettyPrint" Bool :>
@@ -56,8 +56,8 @@ type RelyingPartyyGetRecaptchaParamResource =
5656
5757-- | Get recaptcha secure param.
5858--
59−-- /See:/ 'relyingPartyyGetRecaptchaParam'' smart constructor.
60−data RelyingPartyyGetRecaptchaParam' = RelyingPartyyGetRecaptchaParam'
59+-- /See:/ 'relyingPartyGetRecaptchaParam'' smart constructor.
60+data RelyingPartyGetRecaptchaParam' = RelyingPartyGetRecaptchaParam'
6161 { _rpgrpQuotaUser :: !(Maybe Text)
6262 , _rpgrpPrettyPrint :: !Bool
6363 , _rpgrpUserIP :: !(Maybe Text)
@@ -66,7 +66,7 @@ data RelyingPartyyGetRecaptchaParam' = RelyingPartyyGetRecaptchaParam'
6666 , _rpgrpFields :: !(Maybe Text)
6767 } deriving (Eq,Read,Show,Data,Typeable,Generic)
6868
69−-- | Creates a value of 'RelyingPartyyGetRecaptchaParam'' with the minimum fields required to make a request.
69+-- | Creates a value of 'RelyingPartyGetRecaptchaParam'' with the minimum fields required to make a request.
7070--
7171-- Use one of the following lenses to modify other fields as desired:
7272--
@@ -81,10 +81,10 @@ data RelyingPartyyGetRecaptchaParam' = RelyingPartyyGetRecaptchaParam'
8181-- * 'rpgrpOAuthToken'
8282--
8383-- * 'rpgrpFields'
84−relyingPartyyGetRecaptchaParam'
85− :: RelyingPartyyGetRecaptchaParam'
86−relyingPartyyGetRecaptchaParam' =
87− RelyingPartyyGetRecaptchaParam'
84+relyingPartyGetRecaptchaParam'
85+ :: RelyingPartyGetRecaptchaParam'
86+relyingPartyGetRecaptchaParam' =
87+ RelyingPartyGetRecaptchaParam'
8888 { _rpgrpQuotaUser = Nothing
8989 , _rpgrpPrettyPrint = True
9090 , _rpgrpUserIP = Nothing
@@ -96,52 +96,52 @@ relyingPartyyGetRecaptchaParam' =
9696-- | Available to use for quota purposes for server-side applications. Can be
9797-- any arbitrary string assigned to a user, but should not exceed 40
9898-- characters. Overrides userIp if both are provided.
99−rpgrpQuotaUser :: Lens' RelyingPartyyGetRecaptchaParam' (Maybe Text)
99+rpgrpQuotaUser :: Lens' RelyingPartyGetRecaptchaParam' (Maybe Text)
100100rpgrpQuotaUser
101101 = lens _rpgrpQuotaUser
102102 (\ s a -> s{_rpgrpQuotaUser = a})
103103
104104-- | Returns response with indentations and line breaks.
105−rpgrpPrettyPrint :: Lens' RelyingPartyyGetRecaptchaParam' Bool
105+rpgrpPrettyPrint :: Lens' RelyingPartyGetRecaptchaParam' Bool
106106rpgrpPrettyPrint
107107 = lens _rpgrpPrettyPrint
108108 (\ s a -> s{_rpgrpPrettyPrint = a})
109109
110110-- | IP address of the site where the request originates. Use this if you
111111-- want to enforce per-user limits.
112−rpgrpUserIP :: Lens' RelyingPartyyGetRecaptchaParam' (Maybe Text)
112+rpgrpUserIP :: Lens' RelyingPartyGetRecaptchaParam' (Maybe Text)
113113rpgrpUserIP
114114 = lens _rpgrpUserIP (\ s a -> s{_rpgrpUserIP = a})
115115
116116-- | API key. Your API key identifies your project and provides you with API
117117-- access, quota, and reports. Required unless you provide an OAuth 2.0
118118-- token.
119−rpgrpKey :: Lens' RelyingPartyyGetRecaptchaParam' (Maybe Key)
119+rpgrpKey :: Lens' RelyingPartyGetRecaptchaParam' (Maybe Key)
120120rpgrpKey = lens _rpgrpKey (\ s a -> s{_rpgrpKey = a})
121121
122122-- | OAuth 2.0 token for the current user.
123−rpgrpOAuthToken :: Lens' RelyingPartyyGetRecaptchaParam' (Maybe OAuthToken)
123+rpgrpOAuthToken :: Lens' RelyingPartyGetRecaptchaParam' (Maybe OAuthToken)
124124rpgrpOAuthToken
125125 = lens _rpgrpOAuthToken
126126 (\ s a -> s{_rpgrpOAuthToken = a})
127127
128128-- | Selector specifying which fields to include in a partial response.
129−rpgrpFields :: Lens' RelyingPartyyGetRecaptchaParam' (Maybe Text)
129+rpgrpFields :: Lens' RelyingPartyGetRecaptchaParam' (Maybe Text)
130130rpgrpFields
131131 = lens _rpgrpFields (\ s a -> s{_rpgrpFields = a})
132132
133−instance GoogleAuth RelyingPartyyGetRecaptchaParam'
133+instance GoogleAuth RelyingPartyGetRecaptchaParam'
134134 where
135135 authKey = rpgrpKey . _Just
136136 authToken = rpgrpOAuthToken . _Just
137137
138−instance GoogleRequest
139− RelyingPartyyGetRecaptchaParam' where
140− type Rs RelyingPartyyGetRecaptchaParam' =
138+instance GoogleRequest RelyingPartyGetRecaptchaParam'
139+ where
140+ type Rs RelyingPartyGetRecaptchaParam' =
141141 GetRecaptchaParamResponse
142142 request = requestWithRoute defReq identityToolkitURL
143143 requestWithRoute r u
144− RelyingPartyyGetRecaptchaParam'{..}
144+ RelyingPartyGetRecaptchaParam'{..}
145145 = go _rpgrpQuotaUser (Just _rpgrpPrettyPrint)
146146 _rpgrpUserIP
147147 _rpgrpKey
@@ -151,6 +151,6 @@ instance GoogleRequest
151151 where go
152152 = clientWithRoute
153153 (Proxy ::
154− Proxy RelyingPartyyGetRecaptchaParamResource)
154+ Proxy RelyingPartyGetRecaptchaParamResource)
155155 r
156156 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/ResetPassword.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/ResetPassword.hsrenamed+50−50
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.ResetPassword
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.ResetPassword
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,32 +19,32 @@
1919--
2020-- | Reset password for a user.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyResetPassword@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.ResetPassword
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyResetPassword@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.ResetPassword
2424 (
2525 -- * REST Resource
26− RelyingPartyyResetPasswordResource
26+ RelyingPartyResetPasswordResource
2727
2828 -- * Creating a Request
29− , relyingPartyyResetPassword'
30− , RelyingPartyyResetPassword'
29+ , relyingPartyResetPassword'
30+ , RelyingPartyResetPassword'
3131
3232 -- * Request Lenses
3333 , rprpQuotaUser
3434 , rprpPrettyPrint
3535 , rprpUserIP
3636 , rprpKey
37+ , rprpIdentitytoolkitRelyingPartyResetPasswordRequest
3738 , rprpOAuthToken
38− , rprpIdentitytoolkitRelyingPartyyResetPasswordRequest
3939 , rprpFields
4040 ) where
4141
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyResetPassword@ which the
46−-- 'RelyingPartyyResetPassword'' request conforms to.
47−type RelyingPartyyResetPasswordResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyResetPassword@ which the
46+-- 'RelyingPartyResetPassword'' request conforms to.
47+type RelyingPartyResetPasswordResource =
4848 "resetPassword" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyResetPasswordResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyResetPasswordRequest
57+ IdentitytoolkitRelyingPartyResetPasswordRequest
5858 :> Post '[JSON] ResetPasswordResponse
5959
6060-- | Reset password for a user.
6161--
62−-- /See:/ 'relyingPartyyResetPassword'' smart constructor.
63−data RelyingPartyyResetPassword' = RelyingPartyyResetPassword'
64− { _rprpQuotaUser :: !(Maybe Text)
65− , _rprpPrettyPrint :: !Bool
66− , _rprpUserIP :: !(Maybe Text)
67− , _rprpKey :: !(Maybe Key)
68− , _rprpOAuthToken :: !(Maybe OAuthToken)
69− , _rprpIdentitytoolkitRelyingPartyyResetPasswordRequest :: !IdentitytoolkitRelyingPartyyResetPasswordRequest
70− , _rprpFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyResetPassword'' smart constructor.
63+data RelyingPartyResetPassword' = RelyingPartyResetPassword'
64+ { _rprpQuotaUser :: !(Maybe Text)
65+ , _rprpPrettyPrint :: !Bool
66+ , _rprpUserIP :: !(Maybe Text)
67+ , _rprpKey :: !(Maybe Key)
68+ , _rprpIdentitytoolkitRelyingPartyResetPasswordRequest :: !IdentitytoolkitRelyingPartyResetPasswordRequest
69+ , _rprpOAuthToken :: !(Maybe OAuthToken)
70+ , _rprpFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyResetPassword'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyResetPassword'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -82,90 +82,90 @@ data RelyingPartyyResetPassword' = RelyingPartyyResetPassword'
8282--
8383-- * 'rprpKey'
8484--
85−-- * 'rprpOAuthToken'
85+-- * 'rprpIdentitytoolkitRelyingPartyResetPasswordRequest'
8686--
87−-- * 'rprpIdentitytoolkitRelyingPartyyResetPasswordRequest'
87+-- * 'rprpOAuthToken'
8888--
8989-- * 'rprpFields'
90−relyingPartyyResetPassword'
91− :: IdentitytoolkitRelyingPartyyResetPasswordRequest -- ^ 'IdentitytoolkitRelyingPartyyResetPasswordRequest'
92− -> RelyingPartyyResetPassword'
93−relyingPartyyResetPassword' pRprpIdentitytoolkitRelyingPartyyResetPasswordRequest_ =
94− RelyingPartyyResetPassword'
90+relyingPartyResetPassword'
91+ :: IdentitytoolkitRelyingPartyResetPasswordRequest -- ^ 'IdentitytoolkitRelyingPartyResetPasswordRequest'
92+ -> RelyingPartyResetPassword'
93+relyingPartyResetPassword' pRprpIdentitytoolkitRelyingPartyResetPasswordRequest_ =
94+ RelyingPartyResetPassword'
9595 { _rprpQuotaUser = Nothing
9696 , _rprpPrettyPrint = True
9797 , _rprpUserIP = Nothing
9898 , _rprpKey = Nothing
99+ , _rprpIdentitytoolkitRelyingPartyResetPasswordRequest = pRprpIdentitytoolkitRelyingPartyResetPasswordRequest_
99100 , _rprpOAuthToken = Nothing
100− , _rprpIdentitytoolkitRelyingPartyyResetPasswordRequest = pRprpIdentitytoolkitRelyingPartyyResetPasswordRequest_
101101 , _rprpFields = Nothing
102102 }
103103
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rprpQuotaUser :: Lens' RelyingPartyyResetPassword' (Maybe Text)
107+rprpQuotaUser :: Lens' RelyingPartyResetPassword' (Maybe Text)
108108rprpQuotaUser
109109 = lens _rprpQuotaUser
110110 (\ s a -> s{_rprpQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rprpPrettyPrint :: Lens' RelyingPartyyResetPassword' Bool
113+rprpPrettyPrint :: Lens' RelyingPartyResetPassword' Bool
114114rprpPrettyPrint
115115 = lens _rprpPrettyPrint
116116 (\ s a -> s{_rprpPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rprpUserIP :: Lens' RelyingPartyyResetPassword' (Maybe Text)
120+rprpUserIP :: Lens' RelyingPartyResetPassword' (Maybe Text)
121121rprpUserIP
122122 = lens _rprpUserIP (\ s a -> s{_rprpUserIP = a})
123123
124124-- | API key. Your API key identifies your project and provides you with API
125125-- access, quota, and reports. Required unless you provide an OAuth 2.0
126126-- token.
127−rprpKey :: Lens' RelyingPartyyResetPassword' (Maybe Key)
127+rprpKey :: Lens' RelyingPartyResetPassword' (Maybe Key)
128128rprpKey = lens _rprpKey (\ s a -> s{_rprpKey = a})
129129
130−-- | OAuth 2.0 token for the current user.
131−rprpOAuthToken :: Lens' RelyingPartyyResetPassword' (Maybe OAuthToken)
132−rprpOAuthToken
133− = lens _rprpOAuthToken
134− (\ s a -> s{_rprpOAuthToken = a})
135−
136130-- | Multipart request metadata.
137−rprpIdentitytoolkitRelyingPartyyResetPasswordRequest :: Lens' RelyingPartyyResetPassword' IdentitytoolkitRelyingPartyyResetPasswordRequest
138−rprpIdentitytoolkitRelyingPartyyResetPasswordRequest
131+rprpIdentitytoolkitRelyingPartyResetPasswordRequest :: Lens' RelyingPartyResetPassword' IdentitytoolkitRelyingPartyResetPasswordRequest
132+rprpIdentitytoolkitRelyingPartyResetPasswordRequest
139133 = lens
140− _rprpIdentitytoolkitRelyingPartyyResetPasswordRequest
134+ _rprpIdentitytoolkitRelyingPartyResetPasswordRequest
141135 (\ s a ->
142− s{_rprpIdentitytoolkitRelyingPartyyResetPasswordRequest
136+ s{_rprpIdentitytoolkitRelyingPartyResetPasswordRequest
143137 = a})
144138
139+-- | OAuth 2.0 token for the current user.
140+rprpOAuthToken :: Lens' RelyingPartyResetPassword' (Maybe OAuthToken)
141+rprpOAuthToken
142+ = lens _rprpOAuthToken
143+ (\ s a -> s{_rprpOAuthToken = a})
144+
145145-- | Selector specifying which fields to include in a partial response.
146−rprpFields :: Lens' RelyingPartyyResetPassword' (Maybe Text)
146+rprpFields :: Lens' RelyingPartyResetPassword' (Maybe Text)
147147rprpFields
148148 = lens _rprpFields (\ s a -> s{_rprpFields = a})
149149
150−instance GoogleAuth RelyingPartyyResetPassword' where
150+instance GoogleAuth RelyingPartyResetPassword' where
151151 authKey = rprpKey . _Just
152152 authToken = rprpOAuthToken . _Just
153153
154−instance GoogleRequest RelyingPartyyResetPassword'
154+instance GoogleRequest RelyingPartyResetPassword'
155155 where
156− type Rs RelyingPartyyResetPassword' =
156+ type Rs RelyingPartyResetPassword' =
157157 ResetPasswordResponse
158158 request = requestWithRoute defReq identityToolkitURL
159− requestWithRoute r u RelyingPartyyResetPassword'{..}
159+ requestWithRoute r u RelyingPartyResetPassword'{..}
160160 = go _rprpQuotaUser (Just _rprpPrettyPrint)
161161 _rprpUserIP
162162 _rprpKey
163163 _rprpOAuthToken
164164 _rprpFields
165165 (Just AltJSON)
166− _rprpIdentitytoolkitRelyingPartyyResetPasswordRequest
166+ _rprpIdentitytoolkitRelyingPartyResetPasswordRequest
167167 where go
168168 = clientWithRoute
169− (Proxy :: Proxy RelyingPartyyResetPasswordResource)
169+ (Proxy :: Proxy RelyingPartyResetPasswordResource)
170170 r
171171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/SetAccountInfo.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetAccountInfo.hsrenamed+44−45
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.SetAccountInfo
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,21 +19,21 @@
1919--
2020-- | Set account info for a user.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyySetAccountInfo@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartySetAccountInfo@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.SetAccountInfo
2424 (
2525 -- * REST Resource
26− RelyingPartyySetAccountInfoResource
26+ RelyingPartySetAccountInfoResource
2727
2828 -- * Creating a Request
29− , relyingPartyySetAccountInfo'
30− , RelyingPartyySetAccountInfo'
29+ , relyingPartySetAccountInfo'
30+ , RelyingPartySetAccountInfo'
3131
3232 -- * Request Lenses
3333 , rpsaiQuotaUser
3434 , rpsaiPrettyPrint
3535 , rpsaiUserIP
36− , rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest
36+ , rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest
3737 , rpsaiKey
3838 , rpsaiOAuthToken
3939 , rpsaiFields
@@ -42,9 +42,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyySetAccountInfo@ which the
46−-- 'RelyingPartyySetAccountInfo'' request conforms to.
47−type RelyingPartyySetAccountInfoResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartySetAccountInfo@ which the
46+-- 'RelyingPartySetAccountInfo'' request conforms to.
47+type RelyingPartySetAccountInfoResource =
4848 "setAccountInfo" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyySetAccountInfoResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyySetAccountInfoRequest
57+ IdentitytoolkitRelyingPartySetAccountInfoRequest
5858 :> Post '[JSON] SetAccountInfoResponse
5959
6060-- | Set account info for a user.
6161--
62−-- /See:/ 'relyingPartyySetAccountInfo'' smart constructor.
63−data RelyingPartyySetAccountInfo' = RelyingPartyySetAccountInfo'
64− { _rpsaiQuotaUser :: !(Maybe Text)
65− , _rpsaiPrettyPrint :: !Bool
66− , _rpsaiUserIP :: !(Maybe Text)
67− , _rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest :: !IdentitytoolkitRelyingPartyySetAccountInfoRequest
68− , _rpsaiKey :: !(Maybe Key)
69− , _rpsaiOAuthToken :: !(Maybe OAuthToken)
70− , _rpsaiFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartySetAccountInfo'' smart constructor.
63+data RelyingPartySetAccountInfo' = RelyingPartySetAccountInfo'
64+ { _rpsaiQuotaUser :: !(Maybe Text)
65+ , _rpsaiPrettyPrint :: !Bool
66+ , _rpsaiUserIP :: !(Maybe Text)
67+ , _rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest :: !IdentitytoolkitRelyingPartySetAccountInfoRequest
68+ , _rpsaiKey :: !(Maybe Key)
69+ , _rpsaiOAuthToken :: !(Maybe OAuthToken)
70+ , _rpsaiFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyySetAccountInfo'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartySetAccountInfo'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -80,22 +80,22 @@ data RelyingPartyySetAccountInfo' = RelyingPartyySetAccountInfo'
8080--
8181-- * 'rpsaiUserIP'
8282--
83−-- * 'rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest'
83+-- * 'rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest'
8484--
8585-- * 'rpsaiKey'
8686--
8787-- * 'rpsaiOAuthToken'
8888--
8989-- * 'rpsaiFields'
90−relyingPartyySetAccountInfo'
91− :: IdentitytoolkitRelyingPartyySetAccountInfoRequest -- ^ 'IdentitytoolkitRelyingPartyySetAccountInfoRequest'
92− -> RelyingPartyySetAccountInfo'
93−relyingPartyySetAccountInfo' pRpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest_ =
94− RelyingPartyySetAccountInfo'
90+relyingPartySetAccountInfo'
91+ :: IdentitytoolkitRelyingPartySetAccountInfoRequest -- ^ 'IdentitytoolkitRelyingPartySetAccountInfoRequest'
92+ -> RelyingPartySetAccountInfo'
93+relyingPartySetAccountInfo' pRpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest_ =
94+ RelyingPartySetAccountInfo'
9595 { _rpsaiQuotaUser = Nothing
9696 , _rpsaiPrettyPrint = True
9797 , _rpsaiUserIP = Nothing
98− , _rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest = pRpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest_
98+ , _rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest = pRpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest_
9999 , _rpsaiKey = Nothing
100100 , _rpsaiOAuthToken = Nothing
101101 , _rpsaiFields = Nothing
@@ -104,69 +104,68 @@ relyingPartyySetAccountInfo' pRpsaiIdentitytoolkitRelyingPartyySetAccountInfoReq
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpsaiQuotaUser :: Lens' RelyingPartyySetAccountInfo' (Maybe Text)
107+rpsaiQuotaUser :: Lens' RelyingPartySetAccountInfo' (Maybe Text)
108108rpsaiQuotaUser
109109 = lens _rpsaiQuotaUser
110110 (\ s a -> s{_rpsaiQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpsaiPrettyPrint :: Lens' RelyingPartyySetAccountInfo' Bool
113+rpsaiPrettyPrint :: Lens' RelyingPartySetAccountInfo' Bool
114114rpsaiPrettyPrint
115115 = lens _rpsaiPrettyPrint
116116 (\ s a -> s{_rpsaiPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpsaiUserIP :: Lens' RelyingPartyySetAccountInfo' (Maybe Text)
120+rpsaiUserIP :: Lens' RelyingPartySetAccountInfo' (Maybe Text)
121121rpsaiUserIP
122122 = lens _rpsaiUserIP (\ s a -> s{_rpsaiUserIP = a})
123123
124124-- | Multipart request metadata.
125−rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest :: Lens' RelyingPartyySetAccountInfo' IdentitytoolkitRelyingPartyySetAccountInfoRequest
126−rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest
125+rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest :: Lens' RelyingPartySetAccountInfo' IdentitytoolkitRelyingPartySetAccountInfoRequest
126+rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest
127127 = lens
128− _rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest
128+ _rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest
129129 (\ s a ->
130− s{_rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest
130+ s{_rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest
131131 = a})
132132
133133-- | API key. Your API key identifies your project and provides you with API
134134-- access, quota, and reports. Required unless you provide an OAuth 2.0
135135-- token.
136−rpsaiKey :: Lens' RelyingPartyySetAccountInfo' (Maybe Key)
136+rpsaiKey :: Lens' RelyingPartySetAccountInfo' (Maybe Key)
137137rpsaiKey = lens _rpsaiKey (\ s a -> s{_rpsaiKey = a})
138138
139139-- | OAuth 2.0 token for the current user.
140−rpsaiOAuthToken :: Lens' RelyingPartyySetAccountInfo' (Maybe OAuthToken)
140+rpsaiOAuthToken :: Lens' RelyingPartySetAccountInfo' (Maybe OAuthToken)
141141rpsaiOAuthToken
142142 = lens _rpsaiOAuthToken
143143 (\ s a -> s{_rpsaiOAuthToken = a})
144144
145145-- | Selector specifying which fields to include in a partial response.
146−rpsaiFields :: Lens' RelyingPartyySetAccountInfo' (Maybe Text)
146+rpsaiFields :: Lens' RelyingPartySetAccountInfo' (Maybe Text)
147147rpsaiFields
148148 = lens _rpsaiFields (\ s a -> s{_rpsaiFields = a})
149149
150−instance GoogleAuth RelyingPartyySetAccountInfo'
151− where
150+instance GoogleAuth RelyingPartySetAccountInfo' where
152151 authKey = rpsaiKey . _Just
153152 authToken = rpsaiOAuthToken . _Just
154153
155−instance GoogleRequest RelyingPartyySetAccountInfo'
154+instance GoogleRequest RelyingPartySetAccountInfo'
156155 where
157− type Rs RelyingPartyySetAccountInfo' =
156+ type Rs RelyingPartySetAccountInfo' =
158157 SetAccountInfoResponse
159158 request = requestWithRoute defReq identityToolkitURL
160− requestWithRoute r u RelyingPartyySetAccountInfo'{..}
159+ requestWithRoute r u RelyingPartySetAccountInfo'{..}
161160 = go _rpsaiQuotaUser (Just _rpsaiPrettyPrint)
162161 _rpsaiUserIP
163162 _rpsaiKey
164163 _rpsaiOAuthToken
165164 _rpsaiFields
166165 (Just AltJSON)
167− _rpsaiIdentitytoolkitRelyingPartyySetAccountInfoRequest
166+ _rpsaiIdentitytoolkitRelyingPartySetAccountInfoRequest
168167 where go
169168 = clientWithRoute
170− (Proxy :: Proxy RelyingPartyySetAccountInfoResource)
169+ (Proxy :: Proxy RelyingPartySetAccountInfoResource)
171170 r
172171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/UploadAccount.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/UploadAccount.hsrenamed+50−50
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.UploadAccount
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.UploadAccount
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,32 +19,32 @@
1919--
2020-- | Batch upload existing user accounts.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyUploadAccount@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.UploadAccount
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyUploadAccount@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.UploadAccount
2424 (
2525 -- * REST Resource
26− RelyingPartyyUploadAccountResource
26+ RelyingPartyUploadAccountResource
2727
2828 -- * Creating a Request
29− , relyingPartyyUploadAccount'
30− , RelyingPartyyUploadAccount'
29+ , relyingPartyUploadAccount'
30+ , RelyingPartyUploadAccount'
3131
3232 -- * Request Lenses
3333 , rpuaQuotaUser
3434 , rpuaPrettyPrint
3535 , rpuaUserIP
3636 , rpuaKey
37+ , rpuaIdentitytoolkitRelyingPartyUploadAccountRequest
3738 , rpuaOAuthToken
38− , rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest
3939 , rpuaFields
4040 ) where
4141
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyUploadAccount@ which the
46−-- 'RelyingPartyyUploadAccount'' request conforms to.
47−type RelyingPartyyUploadAccountResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyUploadAccount@ which the
46+-- 'RelyingPartyUploadAccount'' request conforms to.
47+type RelyingPartyUploadAccountResource =
4848 "uploadAccount" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyUploadAccountResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyUploadAccountRequest
57+ IdentitytoolkitRelyingPartyUploadAccountRequest
5858 :> Post '[JSON] UploadAccountResponse
5959
6060-- | Batch upload existing user accounts.
6161--
62−-- /See:/ 'relyingPartyyUploadAccount'' smart constructor.
63−data RelyingPartyyUploadAccount' = RelyingPartyyUploadAccount'
64− { _rpuaQuotaUser :: !(Maybe Text)
65− , _rpuaPrettyPrint :: !Bool
66− , _rpuaUserIP :: !(Maybe Text)
67− , _rpuaKey :: !(Maybe Key)
68− , _rpuaOAuthToken :: !(Maybe OAuthToken)
69− , _rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest :: !IdentitytoolkitRelyingPartyyUploadAccountRequest
70− , _rpuaFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyUploadAccount'' smart constructor.
63+data RelyingPartyUploadAccount' = RelyingPartyUploadAccount'
64+ { _rpuaQuotaUser :: !(Maybe Text)
65+ , _rpuaPrettyPrint :: !Bool
66+ , _rpuaUserIP :: !(Maybe Text)
67+ , _rpuaKey :: !(Maybe Key)
68+ , _rpuaIdentitytoolkitRelyingPartyUploadAccountRequest :: !IdentitytoolkitRelyingPartyUploadAccountRequest
69+ , _rpuaOAuthToken :: !(Maybe OAuthToken)
70+ , _rpuaFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyUploadAccount'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyUploadAccount'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -82,90 +82,90 @@ data RelyingPartyyUploadAccount' = RelyingPartyyUploadAccount'
8282--
8383-- * 'rpuaKey'
8484--
85−-- * 'rpuaOAuthToken'
85+-- * 'rpuaIdentitytoolkitRelyingPartyUploadAccountRequest'
8686--
87−-- * 'rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest'
87+-- * 'rpuaOAuthToken'
8888--
8989-- * 'rpuaFields'
90−relyingPartyyUploadAccount'
91− :: IdentitytoolkitRelyingPartyyUploadAccountRequest -- ^ 'IdentitytoolkitRelyingPartyyUploadAccountRequest'
92− -> RelyingPartyyUploadAccount'
93−relyingPartyyUploadAccount' pRpuaIdentitytoolkitRelyingPartyyUploadAccountRequest_ =
94− RelyingPartyyUploadAccount'
90+relyingPartyUploadAccount'
91+ :: IdentitytoolkitRelyingPartyUploadAccountRequest -- ^ 'IdentitytoolkitRelyingPartyUploadAccountRequest'
92+ -> RelyingPartyUploadAccount'
93+relyingPartyUploadAccount' pRpuaIdentitytoolkitRelyingPartyUploadAccountRequest_ =
94+ RelyingPartyUploadAccount'
9595 { _rpuaQuotaUser = Nothing
9696 , _rpuaPrettyPrint = True
9797 , _rpuaUserIP = Nothing
9898 , _rpuaKey = Nothing
99+ , _rpuaIdentitytoolkitRelyingPartyUploadAccountRequest = pRpuaIdentitytoolkitRelyingPartyUploadAccountRequest_
99100 , _rpuaOAuthToken = Nothing
100− , _rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest = pRpuaIdentitytoolkitRelyingPartyyUploadAccountRequest_
101101 , _rpuaFields = Nothing
102102 }
103103
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpuaQuotaUser :: Lens' RelyingPartyyUploadAccount' (Maybe Text)
107+rpuaQuotaUser :: Lens' RelyingPartyUploadAccount' (Maybe Text)
108108rpuaQuotaUser
109109 = lens _rpuaQuotaUser
110110 (\ s a -> s{_rpuaQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpuaPrettyPrint :: Lens' RelyingPartyyUploadAccount' Bool
113+rpuaPrettyPrint :: Lens' RelyingPartyUploadAccount' Bool
114114rpuaPrettyPrint
115115 = lens _rpuaPrettyPrint
116116 (\ s a -> s{_rpuaPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpuaUserIP :: Lens' RelyingPartyyUploadAccount' (Maybe Text)
120+rpuaUserIP :: Lens' RelyingPartyUploadAccount' (Maybe Text)
121121rpuaUserIP
122122 = lens _rpuaUserIP (\ s a -> s{_rpuaUserIP = a})
123123
124124-- | API key. Your API key identifies your project and provides you with API
125125-- access, quota, and reports. Required unless you provide an OAuth 2.0
126126-- token.
127−rpuaKey :: Lens' RelyingPartyyUploadAccount' (Maybe Key)
127+rpuaKey :: Lens' RelyingPartyUploadAccount' (Maybe Key)
128128rpuaKey = lens _rpuaKey (\ s a -> s{_rpuaKey = a})
129129
130−-- | OAuth 2.0 token for the current user.
131−rpuaOAuthToken :: Lens' RelyingPartyyUploadAccount' (Maybe OAuthToken)
132−rpuaOAuthToken
133− = lens _rpuaOAuthToken
134− (\ s a -> s{_rpuaOAuthToken = a})
135−
136130-- | Multipart request metadata.
137−rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest :: Lens' RelyingPartyyUploadAccount' IdentitytoolkitRelyingPartyyUploadAccountRequest
138−rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest
131+rpuaIdentitytoolkitRelyingPartyUploadAccountRequest :: Lens' RelyingPartyUploadAccount' IdentitytoolkitRelyingPartyUploadAccountRequest
132+rpuaIdentitytoolkitRelyingPartyUploadAccountRequest
139133 = lens
140− _rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest
134+ _rpuaIdentitytoolkitRelyingPartyUploadAccountRequest
141135 (\ s a ->
142− s{_rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest
136+ s{_rpuaIdentitytoolkitRelyingPartyUploadAccountRequest
143137 = a})
144138
139+-- | OAuth 2.0 token for the current user.
140+rpuaOAuthToken :: Lens' RelyingPartyUploadAccount' (Maybe OAuthToken)
141+rpuaOAuthToken
142+ = lens _rpuaOAuthToken
143+ (\ s a -> s{_rpuaOAuthToken = a})
144+
145145-- | Selector specifying which fields to include in a partial response.
146−rpuaFields :: Lens' RelyingPartyyUploadAccount' (Maybe Text)
146+rpuaFields :: Lens' RelyingPartyUploadAccount' (Maybe Text)
147147rpuaFields
148148 = lens _rpuaFields (\ s a -> s{_rpuaFields = a})
149149
150−instance GoogleAuth RelyingPartyyUploadAccount' where
150+instance GoogleAuth RelyingPartyUploadAccount' where
151151 authKey = rpuaKey . _Just
152152 authToken = rpuaOAuthToken . _Just
153153
154−instance GoogleRequest RelyingPartyyUploadAccount'
154+instance GoogleRequest RelyingPartyUploadAccount'
155155 where
156− type Rs RelyingPartyyUploadAccount' =
156+ type Rs RelyingPartyUploadAccount' =
157157 UploadAccountResponse
158158 request = requestWithRoute defReq identityToolkitURL
159− requestWithRoute r u RelyingPartyyUploadAccount'{..}
159+ requestWithRoute r u RelyingPartyUploadAccount'{..}
160160 = go _rpuaQuotaUser (Just _rpuaPrettyPrint)
161161 _rpuaUserIP
162162 _rpuaKey
163163 _rpuaOAuthToken
164164 _rpuaFields
165165 (Just AltJSON)
166− _rpuaIdentitytoolkitRelyingPartyyUploadAccountRequest
166+ _rpuaIdentitytoolkitRelyingPartyUploadAccountRequest
167167 where go
168168 = clientWithRoute
169− (Proxy :: Proxy RelyingPartyyUploadAccountResource)
169+ (Proxy :: Proxy RelyingPartyUploadAccountResource)
170170 r
171171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/VerifyAssertion.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyAssertion.hsrenamed+50−51
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyAssertion
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyAssertion
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,32 +19,32 @@
1919--
2020-- | Verifies the assertion returned by the IdP.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyVerifyAssertion@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyAssertion
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyVerifyAssertion@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyAssertion
2424 (
2525 -- * REST Resource
26− RelyingPartyyVerifyAssertionResource
26+ RelyingPartyVerifyAssertionResource
2727
2828 -- * Creating a Request
29− , relyingPartyyVerifyAssertion'
30− , RelyingPartyyVerifyAssertion'
29+ , relyingPartyVerifyAssertion'
30+ , RelyingPartyVerifyAssertion'
3131
3232 -- * Request Lenses
3333 , rpvaQuotaUser
3434 , rpvaPrettyPrint
3535 , rpvaUserIP
36+ , rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest
3637 , rpvaKey
3738 , rpvaOAuthToken
38− , rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest
3939 , rpvaFields
4040 ) where
4141
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyVerifyAssertion@ which the
46−-- 'RelyingPartyyVerifyAssertion'' request conforms to.
47−type RelyingPartyyVerifyAssertionResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyVerifyAssertion@ which the
46+-- 'RelyingPartyVerifyAssertion'' request conforms to.
47+type RelyingPartyVerifyAssertionResource =
4848 "verifyAssertion" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,23 +54,23 @@ type RelyingPartyyVerifyAssertionResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyVerifyAssertionRequest
57+ IdentitytoolkitRelyingPartyVerifyAssertionRequest
5858 :> Post '[JSON] VerifyAssertionResponse
5959
6060-- | Verifies the assertion returned by the IdP.
6161--
62−-- /See:/ 'relyingPartyyVerifyAssertion'' smart constructor.
63−data RelyingPartyyVerifyAssertion' = RelyingPartyyVerifyAssertion'
64− { _rpvaQuotaUser :: !(Maybe Text)
65− , _rpvaPrettyPrint :: !Bool
66− , _rpvaUserIP :: !(Maybe Text)
67− , _rpvaKey :: !(Maybe Key)
68− , _rpvaOAuthToken :: !(Maybe OAuthToken)
69− , _rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest :: !IdentitytoolkitRelyingPartyyVerifyAssertionRequest
70− , _rpvaFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyVerifyAssertion'' smart constructor.
63+data RelyingPartyVerifyAssertion' = RelyingPartyVerifyAssertion'
64+ { _rpvaQuotaUser :: !(Maybe Text)
65+ , _rpvaPrettyPrint :: !Bool
66+ , _rpvaUserIP :: !(Maybe Text)
67+ , _rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest :: !IdentitytoolkitRelyingPartyVerifyAssertionRequest
68+ , _rpvaKey :: !(Maybe Key)
69+ , _rpvaOAuthToken :: !(Maybe OAuthToken)
70+ , _rpvaFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyVerifyAssertion'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyVerifyAssertion'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
@@ -80,94 +80,93 @@ data RelyingPartyyVerifyAssertion' = RelyingPartyyVerifyAssertion'
8080--
8181-- * 'rpvaUserIP'
8282--
83+-- * 'rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest'
84+--
8385-- * 'rpvaKey'
8486--
8587-- * 'rpvaOAuthToken'
8688--
87−-- * 'rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest'
88−--
8989-- * 'rpvaFields'
90−relyingPartyyVerifyAssertion'
91− :: IdentitytoolkitRelyingPartyyVerifyAssertionRequest -- ^ 'IdentitytoolkitRelyingPartyyVerifyAssertionRequest'
92− -> RelyingPartyyVerifyAssertion'
93−relyingPartyyVerifyAssertion' pRpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest_ =
94− RelyingPartyyVerifyAssertion'
90+relyingPartyVerifyAssertion'
91+ :: IdentitytoolkitRelyingPartyVerifyAssertionRequest -- ^ 'IdentitytoolkitRelyingPartyVerifyAssertionRequest'
92+ -> RelyingPartyVerifyAssertion'
93+relyingPartyVerifyAssertion' pRpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest_ =
94+ RelyingPartyVerifyAssertion'
9595 { _rpvaQuotaUser = Nothing
9696 , _rpvaPrettyPrint = True
9797 , _rpvaUserIP = Nothing
98+ , _rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest = pRpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest_
9899 , _rpvaKey = Nothing
99100 , _rpvaOAuthToken = Nothing
100− , _rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest = pRpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest_
101101 , _rpvaFields = Nothing
102102 }
103103
104104-- | Available to use for quota purposes for server-side applications. Can be
105105-- any arbitrary string assigned to a user, but should not exceed 40
106106-- characters. Overrides userIp if both are provided.
107−rpvaQuotaUser :: Lens' RelyingPartyyVerifyAssertion' (Maybe Text)
107+rpvaQuotaUser :: Lens' RelyingPartyVerifyAssertion' (Maybe Text)
108108rpvaQuotaUser
109109 = lens _rpvaQuotaUser
110110 (\ s a -> s{_rpvaQuotaUser = a})
111111
112112-- | Returns response with indentations and line breaks.
113−rpvaPrettyPrint :: Lens' RelyingPartyyVerifyAssertion' Bool
113+rpvaPrettyPrint :: Lens' RelyingPartyVerifyAssertion' Bool
114114rpvaPrettyPrint
115115 = lens _rpvaPrettyPrint
116116 (\ s a -> s{_rpvaPrettyPrint = a})
117117
118118-- | IP address of the site where the request originates. Use this if you
119119-- want to enforce per-user limits.
120−rpvaUserIP :: Lens' RelyingPartyyVerifyAssertion' (Maybe Text)
120+rpvaUserIP :: Lens' RelyingPartyVerifyAssertion' (Maybe Text)
121121rpvaUserIP
122122 = lens _rpvaUserIP (\ s a -> s{_rpvaUserIP = a})
123123
124+-- | Multipart request metadata.
125+rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest :: Lens' RelyingPartyVerifyAssertion' IdentitytoolkitRelyingPartyVerifyAssertionRequest
126+rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest
127+ = lens
128+ _rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest
129+ (\ s a ->
130+ s{_rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest
131+ = a})
132+
124133-- | API key. Your API key identifies your project and provides you with API
125134-- access, quota, and reports. Required unless you provide an OAuth 2.0
126135-- token.
127−rpvaKey :: Lens' RelyingPartyyVerifyAssertion' (Maybe Key)
136+rpvaKey :: Lens' RelyingPartyVerifyAssertion' (Maybe Key)
128137rpvaKey = lens _rpvaKey (\ s a -> s{_rpvaKey = a})
129138
130139-- | OAuth 2.0 token for the current user.
131−rpvaOAuthToken :: Lens' RelyingPartyyVerifyAssertion' (Maybe OAuthToken)
140+rpvaOAuthToken :: Lens' RelyingPartyVerifyAssertion' (Maybe OAuthToken)
132141rpvaOAuthToken
133142 = lens _rpvaOAuthToken
134143 (\ s a -> s{_rpvaOAuthToken = a})
135144
136−-- | Multipart request metadata.
137−rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest :: Lens' RelyingPartyyVerifyAssertion' IdentitytoolkitRelyingPartyyVerifyAssertionRequest
138−rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest
139− = lens
140− _rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest
141− (\ s a ->
142− s{_rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest
143− = a})
144−
145145-- | Selector specifying which fields to include in a partial response.
146−rpvaFields :: Lens' RelyingPartyyVerifyAssertion' (Maybe Text)
146+rpvaFields :: Lens' RelyingPartyVerifyAssertion' (Maybe Text)
147147rpvaFields
148148 = lens _rpvaFields (\ s a -> s{_rpvaFields = a})
149149
150−instance GoogleAuth RelyingPartyyVerifyAssertion'
150+instance GoogleAuth RelyingPartyVerifyAssertion'
151151 where
152152 authKey = rpvaKey . _Just
153153 authToken = rpvaOAuthToken . _Just
154154
155−instance GoogleRequest RelyingPartyyVerifyAssertion'
155+instance GoogleRequest RelyingPartyVerifyAssertion'
156156 where
157− type Rs RelyingPartyyVerifyAssertion' =
157+ type Rs RelyingPartyVerifyAssertion' =
158158 VerifyAssertionResponse
159159 request = requestWithRoute defReq identityToolkitURL
160− requestWithRoute r u
161− RelyingPartyyVerifyAssertion'{..}
160+ requestWithRoute r u RelyingPartyVerifyAssertion'{..}
162161 = go _rpvaQuotaUser (Just _rpvaPrettyPrint)
163162 _rpvaUserIP
164163 _rpvaKey
165164 _rpvaOAuthToken
166165 _rpvaFields
167166 (Just AltJSON)
168− _rpvaIdentitytoolkitRelyingPartyyVerifyAssertionRequest
167+ _rpvaIdentitytoolkitRelyingPartyVerifyAssertionRequest
169168 where go
170169 = clientWithRoute
171− (Proxy :: Proxy RelyingPartyyVerifyAssertionResource)
170+ (Proxy :: Proxy RelyingPartyVerifyAssertionResource)
172171 r
173172 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/VerifyPassword.hs → gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyPassword.hsrenamed+51−52
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
13+-- Module : Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyPassword
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -19,20 +19,20 @@
1919--
2020-- | Verifies the user entered password.
2121--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyVerifyPassword@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
22+-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyVerifyPassword@.
23+module Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyPassword
2424 (
2525 -- * REST Resource
26− RelyingPartyyVerifyPasswordResource
26+ RelyingPartyVerifyPasswordResource
2727
2828 -- * Creating a Request
29− , relyingPartyyVerifyPassword'
30− , RelyingPartyyVerifyPassword'
29+ , relyingPartyVerifyPassword'
30+ , RelyingPartyVerifyPassword'
3131
3232 -- * Request Lenses
33− , rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest
3433 , rpvpQuotaUser
3534 , rpvpPrettyPrint
35+ , rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest
3636 , rpvpUserIP
3737 , rpvpKey
3838 , rpvpOAuthToken
@@ -42,9 +42,9 @@ module Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
4242import Network.Google.IdentityToolkit.Types
4343import Network.Google.Prelude
4444
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyVerifyPassword@ which the
46−-- 'RelyingPartyyVerifyPassword'' request conforms to.
47−type RelyingPartyyVerifyPasswordResource =
45+-- | A resource alias for @IdentitytoolkitRelyingPartyVerifyPassword@ which the
46+-- 'RelyingPartyVerifyPassword'' request conforms to.
47+type RelyingPartyVerifyPasswordResource =
4848 "verifyPassword" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -54,32 +54,32 @@ type RelyingPartyyVerifyPasswordResource =
5454 QueryParam "fields" Text :>
5555 QueryParam "alt" AltJSON :>
5656 ReqBody '[JSON]
57− IdentitytoolkitRelyingPartyyVerifyPasswordRequest
57+ IdentitytoolkitRelyingPartyVerifyPasswordRequest
5858 :> Post '[JSON] VerifyPasswordResponse
5959
6060-- | Verifies the user entered password.
6161--
62−-- /See:/ 'relyingPartyyVerifyPassword'' smart constructor.
63−data RelyingPartyyVerifyPassword' = RelyingPartyyVerifyPassword'
64− { _rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest :: !IdentitytoolkitRelyingPartyyVerifyPasswordRequest
65− , _rpvpQuotaUser :: !(Maybe Text)
66− , _rpvpPrettyPrint :: !Bool
67− , _rpvpUserIP :: !(Maybe Text)
68− , _rpvpKey :: !(Maybe Key)
69− , _rpvpOAuthToken :: !(Maybe OAuthToken)
70− , _rpvpFields :: !(Maybe Text)
62+-- /See:/ 'relyingPartyVerifyPassword'' smart constructor.
63+data RelyingPartyVerifyPassword' = RelyingPartyVerifyPassword'
64+ { _rpvpQuotaUser :: !(Maybe Text)
65+ , _rpvpPrettyPrint :: !Bool
66+ , _rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest :: !IdentitytoolkitRelyingPartyVerifyPasswordRequest
67+ , _rpvpUserIP :: !(Maybe Text)
68+ , _rpvpKey :: !(Maybe Key)
69+ , _rpvpOAuthToken :: !(Maybe OAuthToken)
70+ , _rpvpFields :: !(Maybe Text)
7171 } deriving (Eq,Read,Show,Data,Typeable,Generic)
7272
73−-- | Creates a value of 'RelyingPartyyVerifyPassword'' with the minimum fields required to make a request.
73+-- | Creates a value of 'RelyingPartyVerifyPassword'' with the minimum fields required to make a request.
7474--
7575-- Use one of the following lenses to modify other fields as desired:
7676--
77−-- * 'rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest'
78−--
7977-- * 'rpvpQuotaUser'
8078--
8179-- * 'rpvpPrettyPrint'
8280--
81+-- * 'rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest'
82+--
8383-- * 'rpvpUserIP'
8484--
8585-- * 'rpvpKey'
@@ -87,86 +87,85 @@ data RelyingPartyyVerifyPassword' = RelyingPartyyVerifyPassword'
8787-- * 'rpvpOAuthToken'
8888--
8989-- * 'rpvpFields'
90−relyingPartyyVerifyPassword'
91− :: IdentitytoolkitRelyingPartyyVerifyPasswordRequest -- ^ 'IdentitytoolkitRelyingPartyyVerifyPasswordRequest'
92− -> RelyingPartyyVerifyPassword'
93−relyingPartyyVerifyPassword' pRpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest_ =
94− RelyingPartyyVerifyPassword'
95− { _rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest = pRpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest_
96− , _rpvpQuotaUser = Nothing
90+relyingPartyVerifyPassword'
91+ :: IdentitytoolkitRelyingPartyVerifyPasswordRequest -- ^ 'IdentitytoolkitRelyingPartyVerifyPasswordRequest'
92+ -> RelyingPartyVerifyPassword'
93+relyingPartyVerifyPassword' pRpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest_ =
94+ RelyingPartyVerifyPassword'
95+ { _rpvpQuotaUser = Nothing
9796 , _rpvpPrettyPrint = True
97+ , _rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest = pRpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest_
9898 , _rpvpUserIP = Nothing
9999 , _rpvpKey = Nothing
100100 , _rpvpOAuthToken = Nothing
101101 , _rpvpFields = Nothing
102102 }
103103
104−-- | Multipart request metadata.
105−rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest :: Lens' RelyingPartyyVerifyPassword' IdentitytoolkitRelyingPartyyVerifyPasswordRequest
106−rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest
107− = lens
108− _rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest
109− (\ s a ->
110− s{_rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest
111− = a})
112−
113104-- | Available to use for quota purposes for server-side applications. Can be
114105-- any arbitrary string assigned to a user, but should not exceed 40
115106-- characters. Overrides userIp if both are provided.
116−rpvpQuotaUser :: Lens' RelyingPartyyVerifyPassword' (Maybe Text)
107+rpvpQuotaUser :: Lens' RelyingPartyVerifyPassword' (Maybe Text)
117108rpvpQuotaUser
118109 = lens _rpvpQuotaUser
119110 (\ s a -> s{_rpvpQuotaUser = a})
120111
121112-- | Returns response with indentations and line breaks.
122−rpvpPrettyPrint :: Lens' RelyingPartyyVerifyPassword' Bool
113+rpvpPrettyPrint :: Lens' RelyingPartyVerifyPassword' Bool
123114rpvpPrettyPrint
124115 = lens _rpvpPrettyPrint
125116 (\ s a -> s{_rpvpPrettyPrint = a})
126117
118+-- | Multipart request metadata.
119+rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest :: Lens' RelyingPartyVerifyPassword' IdentitytoolkitRelyingPartyVerifyPasswordRequest
120+rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest
121+ = lens
122+ _rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest
123+ (\ s a ->
124+ s{_rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest
125+ = a})
126+
127127-- | IP address of the site where the request originates. Use this if you
128128-- want to enforce per-user limits.
129−rpvpUserIP :: Lens' RelyingPartyyVerifyPassword' (Maybe Text)
129+rpvpUserIP :: Lens' RelyingPartyVerifyPassword' (Maybe Text)
130130rpvpUserIP
131131 = lens _rpvpUserIP (\ s a -> s{_rpvpUserIP = a})
132132
133133-- | API key. Your API key identifies your project and provides you with API
134134-- access, quota, and reports. Required unless you provide an OAuth 2.0
135135-- token.
136−rpvpKey :: Lens' RelyingPartyyVerifyPassword' (Maybe Key)
136+rpvpKey :: Lens' RelyingPartyVerifyPassword' (Maybe Key)
137137rpvpKey = lens _rpvpKey (\ s a -> s{_rpvpKey = a})
138138
139139-- | OAuth 2.0 token for the current user.
140−rpvpOAuthToken :: Lens' RelyingPartyyVerifyPassword' (Maybe OAuthToken)
140+rpvpOAuthToken :: Lens' RelyingPartyVerifyPassword' (Maybe OAuthToken)
141141rpvpOAuthToken
142142 = lens _rpvpOAuthToken
143143 (\ s a -> s{_rpvpOAuthToken = a})
144144
145145-- | Selector specifying which fields to include in a partial response.
146−rpvpFields :: Lens' RelyingPartyyVerifyPassword' (Maybe Text)
146+rpvpFields :: Lens' RelyingPartyVerifyPassword' (Maybe Text)
147147rpvpFields
148148 = lens _rpvpFields (\ s a -> s{_rpvpFields = a})
149149
150−instance GoogleAuth RelyingPartyyVerifyPassword'
151− where
150+instance GoogleAuth RelyingPartyVerifyPassword' where
152151 authKey = rpvpKey . _Just
153152 authToken = rpvpOAuthToken . _Just
154153
155−instance GoogleRequest RelyingPartyyVerifyPassword'
154+instance GoogleRequest RelyingPartyVerifyPassword'
156155 where
157− type Rs RelyingPartyyVerifyPassword' =
156+ type Rs RelyingPartyVerifyPassword' =
158157 VerifyPasswordResponse
159158 request = requestWithRoute defReq identityToolkitURL
160− requestWithRoute r u RelyingPartyyVerifyPassword'{..}
159+ requestWithRoute r u RelyingPartyVerifyPassword'{..}
161160 = go _rpvpQuotaUser (Just _rpvpPrettyPrint)
162161 _rpvpUserIP
163162 _rpvpKey
164163 _rpvpOAuthToken
165164 _rpvpFields
166165 (Just AltJSON)
167− _rpvpIdentitytoolkitRelyingPartyyVerifyPasswordRequest
166+ _rpvpIdentitytoolkitRelyingPartyVerifyPasswordRequest
168167 where go
169168 = clientWithRoute
170− (Proxy :: Proxy RelyingPartyyVerifyPasswordResource)
169+ (Proxy :: Proxy RelyingPartyVerifyPasswordResource)
171170 r
172171 u
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingPartyy/GetOobConfirmationCode.hsdeleted−171
@@ -1,171 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetOobConfirmationCode
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Get a code for user action confirmation.
21−--
22−-- /See:/ <https://developers.google.com/identity-toolkit/v3/ Google Identity Toolkit API Reference> for @IdentitytoolkitRelyingPartyyGetOobConfirmationCode@.
23−module Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetOobConfirmationCode
24− (
25− -- * REST Resource
26− RelyingPartyyGetOobConfirmationCodeResource
27−
28− -- * Creating a Request
29− , relyingPartyyGetOobConfirmationCode'
30− , RelyingPartyyGetOobConfirmationCode'
31−
32− -- * Request Lenses
33− , rpgoccQuotaUser
34− , rpgoccPrettyPrint
35− , rpgoccRelyingPartyy
36− , rpgoccUserIP
37− , rpgoccKey
38− , rpgoccOAuthToken
39− , rpgoccFields
40− ) where
41−
42−import Network.Google.IdentityToolkit.Types
43−import Network.Google.Prelude
44−
45−-- | A resource alias for @IdentitytoolkitRelyingPartyyGetOobConfirmationCode@ which the
46−-- 'RelyingPartyyGetOobConfirmationCode'' request conforms to.
47−type RelyingPartyyGetOobConfirmationCodeResource =
48− "getOobConfirmationCode" :>
49− QueryParam "quotaUser" Text :>
50− QueryParam "prettyPrint" Bool :>
51− QueryParam "userIp" Text :>
52− QueryParam "key" Key :>
53− QueryParam "oauth_token" OAuthToken :>
54− QueryParam "fields" Text :>
55− QueryParam "alt" AltJSON :>
56− ReqBody '[JSON] RelyingPartyy :>
57− Post '[JSON] GetOobConfirmationCodeResponse
58−
59−-- | Get a code for user action confirmation.
60−--
61−-- /See:/ 'relyingPartyyGetOobConfirmationCode'' smart constructor.
62−data RelyingPartyyGetOobConfirmationCode' = RelyingPartyyGetOobConfirmationCode'
63− { _rpgoccQuotaUser :: !(Maybe Text)
64− , _rpgoccPrettyPrint :: !Bool
65− , _rpgoccRelyingPartyy :: !RelyingPartyy
66− , _rpgoccUserIP :: !(Maybe Text)
67− , _rpgoccKey :: !(Maybe Key)
68− , _rpgoccOAuthToken :: !(Maybe OAuthToken)
69− , _rpgoccFields :: !(Maybe Text)
70− } deriving (Eq,Read,Show,Data,Typeable,Generic)
71−
72−-- | Creates a value of 'RelyingPartyyGetOobConfirmationCode'' with the minimum fields required to make a request.
73−--
74−-- Use one of the following lenses to modify other fields as desired:
75−--
76−-- * 'rpgoccQuotaUser'
77−--
78−-- * 'rpgoccPrettyPrint'
79−--
80−-- * 'rpgoccRelyingPartyy'
81−--
82−-- * 'rpgoccUserIP'
83−--
84−-- * 'rpgoccKey'
85−--
86−-- * 'rpgoccOAuthToken'
87−--
88−-- * 'rpgoccFields'
89−relyingPartyyGetOobConfirmationCode'
90− :: RelyingPartyy -- ^ 'RelyingPartyy'
91− -> RelyingPartyyGetOobConfirmationCode'
92−relyingPartyyGetOobConfirmationCode' pRpgoccRelyingPartyy_ =
93− RelyingPartyyGetOobConfirmationCode'
94− { _rpgoccQuotaUser = Nothing
95− , _rpgoccPrettyPrint = True
96− , _rpgoccRelyingPartyy = pRpgoccRelyingPartyy_
97− , _rpgoccUserIP = Nothing
98− , _rpgoccKey = Nothing
99− , _rpgoccOAuthToken = Nothing
100− , _rpgoccFields = Nothing
101− }
102−
103−-- | Available to use for quota purposes for server-side applications. Can be
104−-- any arbitrary string assigned to a user, but should not exceed 40
105−-- characters. Overrides userIp if both are provided.
106−rpgoccQuotaUser :: Lens' RelyingPartyyGetOobConfirmationCode' (Maybe Text)
107−rpgoccQuotaUser
108− = lens _rpgoccQuotaUser
109− (\ s a -> s{_rpgoccQuotaUser = a})
110−
111−-- | Returns response with indentations and line breaks.
112−rpgoccPrettyPrint :: Lens' RelyingPartyyGetOobConfirmationCode' Bool
113−rpgoccPrettyPrint
114− = lens _rpgoccPrettyPrint
115− (\ s a -> s{_rpgoccPrettyPrint = a})
116−
117−-- | Multipart request metadata.
118−rpgoccRelyingPartyy :: Lens' RelyingPartyyGetOobConfirmationCode' RelyingPartyy
119−rpgoccRelyingPartyy
120− = lens _rpgoccRelyingPartyy
121− (\ s a -> s{_rpgoccRelyingPartyy = a})
122−
123−-- | IP address of the site where the request originates. Use this if you
124−-- want to enforce per-user limits.
125−rpgoccUserIP :: Lens' RelyingPartyyGetOobConfirmationCode' (Maybe Text)
126−rpgoccUserIP
127− = lens _rpgoccUserIP (\ s a -> s{_rpgoccUserIP = a})
128−
129−-- | API key. Your API key identifies your project and provides you with API
130−-- access, quota, and reports. Required unless you provide an OAuth 2.0
131−-- token.
132−rpgoccKey :: Lens' RelyingPartyyGetOobConfirmationCode' (Maybe Key)
133−rpgoccKey
134− = lens _rpgoccKey (\ s a -> s{_rpgoccKey = a})
135−
136−-- | OAuth 2.0 token for the current user.
137−rpgoccOAuthToken :: Lens' RelyingPartyyGetOobConfirmationCode' (Maybe OAuthToken)
138−rpgoccOAuthToken
139− = lens _rpgoccOAuthToken
140− (\ s a -> s{_rpgoccOAuthToken = a})
141−
142−-- | Selector specifying which fields to include in a partial response.
143−rpgoccFields :: Lens' RelyingPartyyGetOobConfirmationCode' (Maybe Text)
144−rpgoccFields
145− = lens _rpgoccFields (\ s a -> s{_rpgoccFields = a})
146−
147−instance GoogleAuth
148− RelyingPartyyGetOobConfirmationCode' where
149− authKey = rpgoccKey . _Just
150− authToken = rpgoccOAuthToken . _Just
151−
152−instance GoogleRequest
153− RelyingPartyyGetOobConfirmationCode' where
154− type Rs RelyingPartyyGetOobConfirmationCode' =
155− GetOobConfirmationCodeResponse
156− request = requestWithRoute defReq identityToolkitURL
157− requestWithRoute r u
158− RelyingPartyyGetOobConfirmationCode'{..}
159− = go _rpgoccQuotaUser (Just _rpgoccPrettyPrint)
160− _rpgoccUserIP
161− _rpgoccKey
162− _rpgoccOAuthToken
163− _rpgoccFields
164− (Just AltJSON)
165− _rpgoccRelyingPartyy
166− where go
167− = clientWithRoute
168− (Proxy ::
169− Proxy RelyingPartyyGetOobConfirmationCodeResource)
170− r
171− u
gogol-identity-toolkit/gogol-identity-toolkit.cabal+12−12
@@ -32,18 +32,18 @@ library
3232 exposed-modules:
3333 Network.Google.IdentityToolkit
3434 , Network.Google.IdentityToolkit.Types
35− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.CreateAuthURI
36− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.DeleteAccount
37− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.DownloadAccount
38− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetAccountInfo
39− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetOobConfirmationCode
40− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetPublicKeys
41− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.GetRecaptchaParam
42− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.ResetPassword
43− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.SetAccountInfo
44− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.UploadAccount
45− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyAssertion
46− , Network.Google.Resource.IdentityToolkit.RelyingPartyy.VerifyPassword
35+ , Network.Google.Resource.IdentityToolkit.RelyingParty.CreateAuthURI
36+ , Network.Google.Resource.IdentityToolkit.RelyingParty.DeleteAccount
37+ , Network.Google.Resource.IdentityToolkit.RelyingParty.DownloadAccount
38+ , Network.Google.Resource.IdentityToolkit.RelyingParty.GetAccountInfo
39+ , Network.Google.Resource.IdentityToolkit.RelyingParty.GetOOBConfirmationCode
40+ , Network.Google.Resource.IdentityToolkit.RelyingParty.GetPublicKeys
41+ , Network.Google.Resource.IdentityToolkit.RelyingParty.GetRecaptchaParam
42+ , Network.Google.Resource.IdentityToolkit.RelyingParty.ResetPassword
43+ , Network.Google.Resource.IdentityToolkit.RelyingParty.SetAccountInfo
44+ , Network.Google.Resource.IdentityToolkit.RelyingParty.UploadAccount
45+ , Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyAssertion
46+ , Network.Google.Resource.IdentityToolkit.RelyingParty.VerifyPassword
4747
4848 other-modules:
4949 Network.Google.IdentityToolkit.Types.Product
gogol-latencytest/gen/Network/Google/LatencyTest.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | A Test API to report latency data.
15+-- | A Test API to report latency data.
1616--
1717-- /See:/ < Google Cloud Network Performance Monitoring API Reference>
1818module Network.Google.LatencyTest
gogol-logging/gen/Network/Google/Logging.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Google Cloud Logging API lets you create logs, ingest log entries, and
15+-- | Google Cloud Logging API lets you create logs, ingest log entries, and
1616-- manage log sinks.
1717--
1818-- /See:/ <https://cloud.google.com/logging/docs/ Google Cloud Logging API Reference>
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you view and manage jobs in a Coordinate team.
15+-- | Lets you view and manage jobs in a Coordinate team.
1616--
1717-- /See:/ <https://developers.google.com/coordinate/ Google Maps Coordinate API Reference>
1818module Network.Google.MapsCoordinate
gogol-maps-engine/gen/Network/Google/MapsEngine.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Maps Engine API allows developers to store and query
15+-- | The Google Maps Engine API allows developers to store and query
1616-- geospatial vector and raster data.
1717--
1818-- /See:/ <https://developers.google.com/maps-engine/ Google Maps Engine API Reference>
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Sum.hs+6−6
@@ -658,7 +658,7 @@ instance ToJSON GeoJSONLineStringType where
658658
659659-- | The type of the vector style. Currently, only displayRule is supported.
660660data VectorStyleType
661− = DisplayRule
661+ = VSTDisplayRule
662662 -- ^ @displayRule@
663663 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
664664
@@ -666,12 +666,12 @@ instance Hashable VectorStyleType
666666
667667instance FromText VectorStyleType where
668668 fromText = \case
669− "displayRule" -> Just DisplayRule
669+ "displayRule" -> Just VSTDisplayRule
670670 _ -> Nothing
671671
672672instance ToText VectorStyleType where
673673 toText = \case
674− DisplayRule -> "displayRule"
674+ VSTDisplayRule -> "displayRule"
675675
676676instance FromJSON VectorStyleType where
677677 parseJSON = parseJSONText "VectorStyleType"
@@ -907,7 +907,7 @@ instance ToJSON MapsEngineAssetsListRole where
907907
908908-- | Identifies this object as a MapLayer.
909909data MapLayerType
910− = Layer
910+ = MLTLayer
911911 -- ^ @layer@
912912 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
913913
@@ -915,12 +915,12 @@ instance Hashable MapLayerType
915915
916916instance FromText MapLayerType where
917917 fromText = \case
918− "layer" -> Just Layer
918+ "layer" -> Just MLTLayer
919919 _ -> Nothing
920920
921921instance ToText MapLayerType where
922922 toText = \case
923− Layer -> "layer"
923+ MLTLayer -> "layer"
924924
925925instance FromJSON MapLayerType where
926926 parseJSON = parseJSONText "MapLayerType"
gogol-mirror/gen/Network/Google/Mirror.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for interacting with Glass users via the timeline.
15+-- | API for interacting with Glass users via the timeline.
1616--
1717-- /See:/ <https://developers.google.com/glass Google Mirror API Reference>
1818module Network.Google.Mirror
gogol-monitoring/gen/Network/Google/Monitoring.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for accessing Google Cloud and API monitoring data.
15+-- | API for accessing Google Cloud and API monitoring data.
1616--
1717-- /See:/ <https://cloud.google.com/monitoring/v2beta2/ Cloud Monitoring API Reference>
1818module Network.Google.Monitoring
gogol-oauth2/gen/Network/Google/OAuth2.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you access OAuth2 protocol related APIs.
15+-- | Lets you access OAuth2 protocol related APIs.
1616--
1717-- /See:/ <https://developers.google.com/accounts/docs/OAuth2 Google OAuth2 API Reference>
1818module Network.Google.OAuth2
gogol-pagespeed/gen/Network/Google/PageSpeed.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you analyze the performance of a web page and get tailored
15+-- | Lets you analyze the performance of a web page and get tailored
1616-- suggestions to make that page faster.
1717--
1818-- /See:/ <https://developers.google.com/speed/docs/insights/v2/getting-started PageSpeed Insights API Reference>
gogol-partners/gen/Network/Google/Partners.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets advertisers search certified companies and create contact leads
15+-- | Lets advertisers search certified companies and create contact leads
1616-- with them, and also audits the usage of clients.
1717--
1818-- /See:/ <https://developers.google.com/partners/ Google Partners API Reference>
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner.hs+8−8
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets Google Play Movies Partners get the delivery status of their
15+-- | Lets Google Play Movies Partners get the delivery status of their
1616-- titles.
1717--
1818-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference>
@@ -27,25 +27,25 @@ module Network.Google.PlayMoviesPartner
2727
2828 -- * REST Resources
2929
30− -- ** PlaymoviesPartynerAccountsAvailsList
30+ -- ** PlaymoviesPartnerAccountsAvailsList
3131 , module Network.Google.Resource.PlayMoviesPartner.Accounts.Avails.List
3232
33− -- ** PlaymoviesPartynerAccountsExperienceLocalesGet
33+ -- ** PlaymoviesPartnerAccountsExperienceLocalesGet
3434 , module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.Get
3535
36− -- ** PlaymoviesPartynerAccountsExperienceLocalesList
36+ -- ** PlaymoviesPartnerAccountsExperienceLocalesList
3737 , module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.List
3838
39− -- ** PlaymoviesPartynerAccountsOrdersGet
39+ -- ** PlaymoviesPartnerAccountsOrdersGet
4040 , module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.Get
4141
42− -- ** PlaymoviesPartynerAccountsOrdersList
42+ -- ** PlaymoviesPartnerAccountsOrdersList
4343 , module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.List
4444
45− -- ** PlaymoviesPartynerAccountsStoreInfosCountryGet
45+ -- ** PlaymoviesPartnerAccountsStoreInfosCountryGet
4646 , module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.Country.Get
4747
48− -- ** PlaymoviesPartynerAccountsStoreInfosList
48+ -- ** PlaymoviesPartnerAccountsStoreInfosList
4949 , module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.List
5050
5151 -- * Types
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Avails/List.hs+2−2
@@ -21,7 +21,7 @@
2121-- Authorization rules_ and _List methods rules_ for more information about
2222-- this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsAvailsList@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsAvailsList@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.Avails.List
2626 (
2727 -- * REST Resource
@@ -58,7 +58,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.Avails.List
5858import Network.Google.PlayMoviesPartner.Types
5959import Network.Google.Prelude
6060
61−-- | A resource alias for @PlaymoviesPartynerAccountsAvailsList@ which the
61+-- | A resource alias for @PlaymoviesPartnerAccountsAvailsList@ which the
6262-- 'AccountsAvailsList'' request conforms to.
6363type AccountsAvailsListResource =
6464 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/Get.hs+2−2
@@ -21,7 +21,7 @@
2121-- Authorization rules_ and _Get methods rules_ for more information about
2222-- this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsExperienceLocalesGet@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsExperienceLocalesGet@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.Get
2626 (
2727 -- * REST Resource
@@ -51,7 +51,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.Get
5151import Network.Google.PlayMoviesPartner.Types
5252import Network.Google.Prelude
5353
54−-- | A resource alias for @PlaymoviesPartynerAccountsExperienceLocalesGet@ which the
54+-- | A resource alias for @PlaymoviesPartnerAccountsExperienceLocalesGet@ which the
5555-- 'AccountsExperienceLocalesGet'' request conforms to.
5656type AccountsExperienceLocalesGetResource =
5757 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/ExperienceLocales/List.hs+2−2
@@ -21,7 +21,7 @@
2121-- _Authentication and Authorization rules_ and _List methods rules_ for
2222-- more information about this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsExperienceLocalesList@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsExperienceLocalesList@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.List
2626 (
2727 -- * REST Resource
@@ -59,7 +59,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.ExperienceLocales.List
5959import Network.Google.PlayMoviesPartner.Types
6060import Network.Google.Prelude
6161
62−-- | A resource alias for @PlaymoviesPartynerAccountsExperienceLocalesList@ which the
62+-- | A resource alias for @PlaymoviesPartnerAccountsExperienceLocalesList@ which the
6363-- 'AccountsExperienceLocalesList'' request conforms to.
6464type AccountsExperienceLocalesListResource =
6565 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/Get.hs+2−2
@@ -20,7 +20,7 @@
2020-- | Get an Order given its id. See _Authentication and Authorization rules_
2121-- and _Get methods rules_ for more information about this method.
2222--
23−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsOrdersGet@.
23+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsOrdersGet@.
2424module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.Get
2525 (
2626 -- * REST Resource
@@ -50,7 +50,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.Get
5050import Network.Google.PlayMoviesPartner.Types
5151import Network.Google.Prelude
5252
53−-- | A resource alias for @PlaymoviesPartynerAccountsOrdersGet@ which the
53+-- | A resource alias for @PlaymoviesPartnerAccountsOrdersGet@ which the
5454-- 'AccountsOrdersGet'' request conforms to.
5555type AccountsOrdersGetResource =
5656 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/Orders/List.hs+2−2
@@ -21,7 +21,7 @@
2121-- Authorization rules_ and _List methods rules_ for more information about
2222-- this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsOrdersList@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsOrdersList@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.List
2626 (
2727 -- * REST Resource
@@ -57,7 +57,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.Orders.List
5757import Network.Google.PlayMoviesPartner.Types
5858import Network.Google.Prelude
5959
60−-- | A resource alias for @PlaymoviesPartynerAccountsOrdersList@ which the
60+-- | A resource alias for @PlaymoviesPartnerAccountsOrdersList@ which the
6161-- 'AccountsOrdersList'' request conforms to.
6262type AccountsOrdersListResource =
6363 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/Country/Get.hs+2−2
@@ -21,7 +21,7 @@
2121-- Authorization rules_ and _Get methods rules_ for more information about
2222-- this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsStoreInfosCountryGet@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsStoreInfosCountryGet@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.Country.Get
2626 (
2727 -- * REST Resource
@@ -52,7 +52,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.Country.Get
5252import Network.Google.PlayMoviesPartner.Types
5353import Network.Google.Prelude
5454
55−-- | A resource alias for @PlaymoviesPartynerAccountsStoreInfosCountryGet@ which the
55+-- | A resource alias for @PlaymoviesPartnerAccountsStoreInfosCountryGet@ which the
5656-- 'AccountsStoreInfosCountryGet'' request conforms to.
5757type AccountsStoreInfosCountryGetResource =
5858 "v1" :>
gogol-play-moviespartner/gen/Network/Google/Resource/PlayMoviesPartner/Accounts/StoreInfos/List.hs+2−2
@@ -21,7 +21,7 @@
2121-- Authorization rules_ and _List methods rules_ for more information about
2222-- this method.
2323--
24−-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartynerAccountsStoreInfosList@.
24+-- /See:/ <https://developers.google.com/playmoviespartner/ Google Play Movies Partner API Reference> for @PlaymoviesPartnerAccountsStoreInfosList@.
2525module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.List
2626 (
2727 -- * REST Resource
@@ -58,7 +58,7 @@ module Network.Google.Resource.PlayMoviesPartner.Accounts.StoreInfos.List
5858import Network.Google.PlayMoviesPartner.Types
5959import Network.Google.Prelude
6060
61−-- | A resource alias for @PlaymoviesPartynerAccountsStoreInfosList@ which the
61+-- | A resource alias for @PlaymoviesPartnerAccountsStoreInfosList@ which the
6262-- 'AccountsStoreInfosList'' request conforms to.
6363type AccountsStoreInfosListResource =
6464 "v1" :>
gogol-plus-domains/gen/Network/Google/PlusDomains.hs+2−2
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google+ API enables developers to build on top of the Google+
15+-- | The Google+ API enables developers to build on top of the Google+
1616-- platform.
1717--
1818-- /See:/ <https://developers.google.com/+/domains/ Google+ Domains API Reference>
@@ -222,7 +222,7 @@ module Network.Google.PlusDomains
222222 -- ** PersonOrganizations
223223 , PersonOrganizations
224224 , personOrganizations
225− , poDePartyment
225+ , poDePartment
226226 , poLocation
227227 , poEndDate
228228 , poPrimary
gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+1−1
@@ -150,7 +150,7 @@ module Network.Google.PlusDomains.Types
150150 -- * PersonOrganizations
151151 , PersonOrganizations
152152 , personOrganizations
153− , poDePartyment
153+ , poDePartment
154154 , poLocation
155155 , poEndDate
156156 , poPrimary
gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+7−8
@@ -1151,7 +1151,7 @@ instance ToJSON CommentInReplyTo where
11511151--
11521152-- /See:/ 'personOrganizations' smart constructor.
11531153data PersonOrganizations = PersonOrganizations
1154− { _poDePartyment :: !(Maybe Text)
1154+ { _poDePartment :: !(Maybe Text)
11551155 , _poLocation :: !(Maybe Text)
11561156 , _poEndDate :: !(Maybe Text)
11571157 , _poPrimary :: !(Maybe Bool)
@@ -1166,7 +1166,7 @@ data PersonOrganizations = PersonOrganizations
11661166--
11671167-- Use one of the following lenses to modify other fields as desired:
11681168--
1169−-- * 'poDePartyment'
1169+-- * 'poDePartment'
11701170--
11711171-- * 'poLocation'
11721172--
@@ -1187,7 +1187,7 @@ personOrganizations
11871187 :: PersonOrganizations
11881188personOrganizations =
11891189 PersonOrganizations
1190− { _poDePartyment = Nothing
1190+ { _poDePartment = Nothing
11911191 , _poLocation = Nothing
11921192 , _poEndDate = Nothing
11931193 , _poPrimary = Nothing
@@ -1199,10 +1199,9 @@ personOrganizations =
11991199 }
12001200
12011201-- | The department within the organization. Deprecated.
1202−poDePartyment :: Lens' PersonOrganizations (Maybe Text)
1203−poDePartyment
1204− = lens _poDePartyment
1205− (\ s a -> s{_poDePartyment = a})
1202+poDePartment :: Lens' PersonOrganizations (Maybe Text)
1203+poDePartment
1204+ = lens _poDePartment (\ s a -> s{_poDePartment = a})
12061205
12071206-- | The location of this organization. Deprecated.
12081207poLocation :: Lens' PersonOrganizations (Maybe Text)
@@ -1263,7 +1262,7 @@ instance ToJSON PersonOrganizations where
12631262 toJSON PersonOrganizations{..}
12641263 = object
12651264 (catMaybes
1266− [("department" .=) <$> _poDePartyment,
1265+ [("department" .=) <$> _poDePartment,
12671266 ("location" .=) <$> _poLocation,
12681267 ("endDate" .=) <$> _poEndDate,
12691268 ("primary" .=) <$> _poPrimary,
gogol-plus/gen/Network/Google/Plus.hs+2−2
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google+ API enables developers to build on top of the Google+
15+-- | The Google+ API enables developers to build on top of the Google+
1616-- platform.
1717--
1818-- /See:/ <https://developers.google.com/+/api/ Google+ API Reference>
@@ -169,7 +169,7 @@ module Network.Google.Plus
169169 -- ** PersonOrganizations
170170 , PersonOrganizations
171171 , personOrganizations
172− , poDePartyment
172+ , poDePartment
173173 , poLocation
174174 , poEndDate
175175 , poPrimary
gogol-plus/gen/Network/Google/Plus/Types.hs+1−1
@@ -124,7 +124,7 @@ module Network.Google.Plus.Types
124124 -- * PersonOrganizations
125125 , PersonOrganizations
126126 , personOrganizations
127− , poDePartyment
127+ , poDePartment
128128 , poLocation
129129 , poEndDate
130130 , poPrimary
gogol-plus/gen/Network/Google/Plus/Types/Product.hs+7−8
@@ -885,7 +885,7 @@ instance ToJSON CommentInReplyTo where
885885--
886886-- /See:/ 'personOrganizations' smart constructor.
887887data PersonOrganizations = PersonOrganizations
888− { _poDePartyment :: !(Maybe Text)
888+ { _poDePartment :: !(Maybe Text)
889889 , _poLocation :: !(Maybe Text)
890890 , _poEndDate :: !(Maybe Text)
891891 , _poPrimary :: !(Maybe Bool)
@@ -900,7 +900,7 @@ data PersonOrganizations = PersonOrganizations
900900--
901901-- Use one of the following lenses to modify other fields as desired:
902902--
903−-- * 'poDePartyment'
903+-- * 'poDePartment'
904904--
905905-- * 'poLocation'
906906--
@@ -921,7 +921,7 @@ personOrganizations
921921 :: PersonOrganizations
922922personOrganizations =
923923 PersonOrganizations
924− { _poDePartyment = Nothing
924+ { _poDePartment = Nothing
925925 , _poLocation = Nothing
926926 , _poEndDate = Nothing
927927 , _poPrimary = Nothing
@@ -933,10 +933,9 @@ personOrganizations =
933933 }
934934
935935-- | The department within the organization. Deprecated.
936−poDePartyment :: Lens' PersonOrganizations (Maybe Text)
937−poDePartyment
938− = lens _poDePartyment
939− (\ s a -> s{_poDePartyment = a})
936+poDePartment :: Lens' PersonOrganizations (Maybe Text)
937+poDePartment
938+ = lens _poDePartment (\ s a -> s{_poDePartment = a})
940939
941940-- | The location of this organization. Deprecated.
942941poLocation :: Lens' PersonOrganizations (Maybe Text)
@@ -997,7 +996,7 @@ instance ToJSON PersonOrganizations where
997996 toJSON PersonOrganizations{..}
998997 = object
999998 (catMaybes
1000− [("department" .=) <$> _poDePartyment,
999+ [("department" .=) <$> _poDePartment,
10011000 ("location" .=) <$> _poLocation,
10021001 ("endDate" .=) <$> _poEndDate,
10031002 ("primary" .=) <$> _poPrimary,
gogol-prediction/gen/Network/Google/Prediction.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you access a cloud hosted machine learning service that makes it
15+-- | Lets you access a cloud hosted machine learning service that makes it
1616-- easy to build smart apps
1717--
1818-- /See:/ <https://developers.google.com/prediction/docs/developer-guide Prediction API Reference>
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | This API provides services to register, manage, index, and search
15+-- | This API provides services to register, manage, index, and search
1616-- beacons.
1717--
1818-- /See:/ <https://developers.google.com/beacons/proximity/ Google Proximity Beacon API Reference>
gogol-pubsub/gen/Network/Google/PubSub.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Provides reliable, many-to-many, asynchronous messaging between
15+-- | Provides reliable, many-to-many, asynchronous messaging between
1616-- applications.
1717--
1818-- /See:/ <https://cloud.google.com/pubsub/docs Google Cloud Pub/Sub API Reference>
gogol-qpxexpress/gen/Network/Google/QPXExpress.hs+3−3
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you find the least expensive flights between an origin and a
15+-- | Lets you find the least expensive flights between an origin and a
1616-- destination.
1717--
1818-- /See:/ <http://developers.google.com/qpx-express QPX Express API Reference>
@@ -100,7 +100,7 @@ module Network.Google.QPXExpress
100100 , liConnectionDuration
101101 , liDuration
102102 , liMileage
103− , liDePartyureTime
103+ , liDePartureTime
104104
105105 -- ** AirportData
106106 , AirportData
@@ -249,7 +249,7 @@ module Network.Google.QPXExpress
249249 , sliDate
250250 , sliMaxConnectionDuration
251251 , sliPreferredCabin
252− , sliPermittedDePartyureTime
252+ , sliPermittedDePartureTime
253253 , sliPermittedCarrier
254254 , sliAlliance
255255
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+2−2
@@ -85,7 +85,7 @@ module Network.Google.QPXExpress.Types
8585 , liConnectionDuration
8686 , liDuration
8787 , liMileage
88− , liDePartyureTime
88+ , liDePartureTime
8989
9090 -- * AirportData
9191 , AirportData
@@ -234,7 +234,7 @@ module Network.Google.QPXExpress.Types
234234 , sliDate
235235 , sliMaxConnectionDuration
236236 , sliPreferredCabin
237− , sliPermittedDePartyureTime
237+ , sliPermittedDePartureTime
238238 , sliPermittedCarrier
239239 , sliAlliance
240240
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+26−26
@@ -486,7 +486,7 @@ data LegInfo = LegInfo
486486 , _liConnectionDuration :: !(Maybe Int32)
487487 , _liDuration :: !(Maybe Int32)
488488 , _liMileage :: !(Maybe Int32)
489− , _liDePartyureTime :: !(Maybe Text)
489+ , _liDePartureTime :: !(Maybe Text)
490490 } deriving (Eq,Read,Show,Data,Typeable,Generic)
491491
492492-- | Creates a value of 'LegInfo' with the minimum fields required to make a request.
@@ -525,7 +525,7 @@ data LegInfo = LegInfo
525525--
526526-- * 'liMileage'
527527--
528−-- * 'liDePartyureTime'
528+-- * 'liDePartureTime'
529529legInfo
530530 :: LegInfo
531531legInfo =
@@ -546,7 +546,7 @@ legInfo =
546546 , _liConnectionDuration = Nothing
547547 , _liDuration = Nothing
548548 , _liMileage = Nothing
549− , _liDePartyureTime = Nothing
549+ , _liDePartureTime = Nothing
550550 }
551551
552552-- | The leg destination as a city and airport.
@@ -646,10 +646,10 @@ liMileage
646646
647647-- | The scheduled departure time of the leg, local to the point of
648648-- departure.
649−liDePartyureTime :: Lens' LegInfo (Maybe Text)
650−liDePartyureTime
651− = lens _liDePartyureTime
652− (\ s a -> s{_liDePartyureTime = a})
649+liDePartureTime :: Lens' LegInfo (Maybe Text)
650+liDePartureTime
651+ = lens _liDePartureTime
652+ (\ s a -> s{_liDePartureTime = a})
653653
654654instance FromJSON LegInfo where
655655 parseJSON
@@ -694,7 +694,7 @@ instance ToJSON LegInfo where
694694 ("connectionDuration" .=) <$> _liConnectionDuration,
695695 ("duration" .=) <$> _liDuration,
696696 ("mileage" .=) <$> _liMileage,
697− ("departureTime" .=) <$> _liDePartyureTime])
697+ ("departureTime" .=) <$> _liDePartureTime])
698698
699699-- | An airport.
700700--
@@ -1976,17 +1976,17 @@ instance ToJSON FareInfo where
19761976--
19771977-- /See:/ 'sliceInput' smart constructor.
19781978data SliceInput = SliceInput
1979− { _sliDestination :: !(Maybe Text)
1980− , _sliOrigin :: !(Maybe Text)
1981− , _sliMaxStops :: !(Maybe Int32)
1982− , _sliKind :: !Text
1983− , _sliProhibitedCarrier :: !(Maybe [Text])
1984− , _sliDate :: !(Maybe Text)
1985− , _sliMaxConnectionDuration :: !(Maybe Int32)
1986− , _sliPreferredCabin :: !(Maybe Text)
1987− , _sliPermittedDePartyureTime :: !(Maybe TimeOfDayRange)
1988− , _sliPermittedCarrier :: !(Maybe [Text])
1989− , _sliAlliance :: !(Maybe Text)
1979+ { _sliDestination :: !(Maybe Text)
1980+ , _sliOrigin :: !(Maybe Text)
1981+ , _sliMaxStops :: !(Maybe Int32)
1982+ , _sliKind :: !Text
1983+ , _sliProhibitedCarrier :: !(Maybe [Text])
1984+ , _sliDate :: !(Maybe Text)
1985+ , _sliMaxConnectionDuration :: !(Maybe Int32)
1986+ , _sliPreferredCabin :: !(Maybe Text)
1987+ , _sliPermittedDePartureTime :: !(Maybe TimeOfDayRange)
1988+ , _sliPermittedCarrier :: !(Maybe [Text])
1989+ , _sliAlliance :: !(Maybe Text)
19901990 } deriving (Eq,Read,Show,Data,Typeable,Generic)
19911991
19921992-- | Creates a value of 'SliceInput' with the minimum fields required to make a request.
@@ -2009,7 +2009,7 @@ data SliceInput = SliceInput
20092009--
20102010-- * 'sliPreferredCabin'
20112011--
2012−-- * 'sliPermittedDePartyureTime'
2012+-- * 'sliPermittedDePartureTime'
20132013--
20142014-- * 'sliPermittedCarrier'
20152015--
@@ -2026,7 +2026,7 @@ sliceInput =
20262026 , _sliDate = Nothing
20272027 , _sliMaxConnectionDuration = Nothing
20282028 , _sliPreferredCabin = Nothing
2029− , _sliPermittedDePartyureTime = Nothing
2029+ , _sliPermittedDePartureTime = Nothing
20302030 , _sliPermittedCarrier = Nothing
20312031 , _sliAlliance = Nothing
20322032 }
@@ -2082,10 +2082,10 @@ sliPreferredCabin
20822082
20832083-- | Slices must depart in this time of day range, local to the point of
20842084-- departure.
2085−sliPermittedDePartyureTime :: Lens' SliceInput (Maybe TimeOfDayRange)
2086−sliPermittedDePartyureTime
2087− = lens _sliPermittedDePartyureTime
2088− (\ s a -> s{_sliPermittedDePartyureTime = a})
2085+sliPermittedDePartureTime :: Lens' SliceInput (Maybe TimeOfDayRange)
2086+sliPermittedDePartureTime
2087+ = lens _sliPermittedDePartureTime
2088+ (\ s a -> s{_sliPermittedDePartureTime = a})
20892089
20902090-- | A list of 2-letter IATA airline designators. Slices with only these
20912091-- carriers should be returned.
@@ -2133,7 +2133,7 @@ instance ToJSON SliceInput where
21332133 _sliMaxConnectionDuration,
21342134 ("preferredCabin" .=) <$> _sliPreferredCabin,
21352135 ("permittedDepartureTime" .=) <$>
2136− _sliPermittedDePartyureTime,
2136+ _sliPermittedDePartureTime,
21372137 ("permittedCarrier" .=) <$> _sliPermittedCarrier,
21382138 ("alliance" .=) <$> _sliAlliance])
21392139
gogol-replicapool-updater/gen/Network/Google/ReplicaPoolUpdater.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Compute Engine Instance Group Updater API provides services
15+-- | The Google Compute Engine Instance Group Updater API provides services
1616-- for updating groups of Compute Engine Instances.
1717--
1818-- /See:/ <https://cloud.google.com/compute/docs/instance-groups/manager/#applying_rolling_updates_using_the_updater_service Google Compute Engine Instance Group Updater API Reference>
gogol-replicapool/gen/Network/Google/ReplicaPool.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Compute Engine Instance Group Manager API provides groups of
15+-- | The Google Compute Engine Instance Group Manager API provides groups of
1616-- homogenous Compute Engine Instances.
1717--
1818-- /See:/ <https://developers.google.com/compute/docs/instance-groups/manager/v1beta2 Google Compute Engine Instance Group Manager API Reference>
gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Google Cloud Resource Manager API provides methods for creating,
15+-- | The Google Cloud Resource Manager API provides methods for creating,
1616-- reading, and updating of project metadata.
1717--
1818-- /See:/ <https://cloud.google.com/resource-manager Google Cloud Resource Manager API Reference>
gogol-resourceviews/gen/Network/Google/ResourceViews.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | The Resource View API allows users to create and manage logical sets of
15+-- | The Resource View API allows users to create and manage logical sets of
1616-- Google Compute Engine instances.
1717--
1818-- /See:/ <https://developers.google.com/compute/ Google Compute Engine Instance Groups API Reference>
gogol-shopping-content/gen/Network/Google/ShoppingContent.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Manage product items, inventory, and Merchant Center accounts for Google
15+-- | Manage product items, inventory, and Merchant Center accounts for Google
1616-- Shopping.
1717--
1818-- /See:/ <https://developers.google.com/shopping-content Content API for Shopping Reference>
gogol-siteverification/gen/Network/Google/SiteVerification.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you programatically verify ownership of websites or domains with
15+-- | Lets you programatically verify ownership of websites or domains with
1616-- Google.
1717--
1818-- /See:/ <https://developers.google.com/site-verification/ Google Site Verification API Reference>
gogol-spectrum/gen/Network/Google/Spectrum.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for spectrum-management functions.
15+-- | API for spectrum-management functions.
1616--
1717-- /See:/ <http://developers.google.com/spectrum Google Spectrum Database API Reference>
1818module Network.Google.Spectrum
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/CreateEphemeral.hs+3−3
@@ -26,7 +26,7 @@
2626module Network.Google.Resource.SQL.SSLCerts.CreateEphemeral
2727 (
2828 -- * REST Resource
29− SslCertsCreateEphemeralResource
29+ SSLCertsCreateEphemeralResource
3030
3131 -- * Creating a Request
3232 , sSLCertsCreateEphemeral'
@@ -49,7 +49,7 @@ import Network.Google.SQLAdmin.Types
4949
5050-- | A resource alias for @SQLSSLCertsCreateEphemeral@ which the
5151-- 'SSLCertsCreateEphemeral'' request conforms to.
52−type SslCertsCreateEphemeralResource =
52+type SSLCertsCreateEphemeralResource =
5353 "projects" :>
5454 Capture "project" Text :>
5555 "instances" :>
@@ -194,6 +194,6 @@ instance GoogleRequest SSLCertsCreateEphemeral' where
194194 _scceSSLCertsCreateEphemeralRequest
195195 where go
196196 = clientWithRoute
197− (Proxy :: Proxy SslCertsCreateEphemeralResource)
197+ (Proxy :: Proxy SSLCertsCreateEphemeralResource)
198198 r
199199 u
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Delete.hs+3−3
@@ -24,7 +24,7 @@
2424module Network.Google.Resource.SQL.SSLCerts.Delete
2525 (
2626 -- * REST Resource
27− SslCertsDeleteResource
27+ SSLCertsDeleteResource
2828
2929 -- * Creating a Request
3030 , sSLCertsDelete'
@@ -47,7 +47,7 @@ import Network.Google.SQLAdmin.Types
4747
4848-- | A resource alias for @SQLSSLCertsDelete@ which the
4949-- 'SSLCertsDelete'' request conforms to.
50−type SslCertsDeleteResource =
50+type SSLCertsDeleteResource =
5151 "projects" :>
5252 Capture "project" Text :>
5353 "instances" :>
@@ -188,6 +188,6 @@ instance GoogleRequest SSLCertsDelete' where
188188 (Just AltJSON)
189189 where go
190190 = clientWithRoute
191− (Proxy :: Proxy SslCertsDeleteResource)
191+ (Proxy :: Proxy SSLCertsDeleteResource)
192192 r
193193 u
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Get.hs+3−3
@@ -25,7 +25,7 @@
2525module Network.Google.Resource.SQL.SSLCerts.Get
2626 (
2727 -- * REST Resource
28− SslCertsGetResource
28+ SSLCertsGetResource
2929
3030 -- * Creating a Request
3131 , sSLCertsGet'
@@ -48,7 +48,7 @@ import Network.Google.SQLAdmin.Types
4848
4949-- | A resource alias for @SQLSSLCertsGet@ which the
5050-- 'SSLCertsGet'' request conforms to.
51−type SslCertsGetResource =
51+type SSLCertsGetResource =
5252 "projects" :>
5353 Capture "project" Text :>
5454 "instances" :>
@@ -189,6 +189,6 @@ instance GoogleRequest SSLCertsGet' where
189189 (Just AltJSON)
190190 where go
191191 = clientWithRoute
192− (Proxy :: Proxy SslCertsGetResource)
192+ (Proxy :: Proxy SSLCertsGetResource)
193193 r
194194 u
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/Insert.hs+3−3
@@ -25,7 +25,7 @@
2525module Network.Google.Resource.SQL.SSLCerts.Insert
2626 (
2727 -- * REST Resource
28− SslCertsInsertResource
28+ SSLCertsInsertResource
2929
3030 -- * Creating a Request
3131 , sSLCertsInsert'
@@ -48,7 +48,7 @@ import Network.Google.SQLAdmin.Types
4848
4949-- | A resource alias for @SQLSSLCertsInsert@ which the
5050-- 'SSLCertsInsert'' request conforms to.
51−type SslCertsInsertResource =
51+type SSLCertsInsertResource =
5252 "projects" :>
5353 Capture "project" Text :>
5454 "instances" :>
@@ -191,6 +191,6 @@ instance GoogleRequest SSLCertsInsert' where
191191 _sciSSLCertsInsertRequest
192192 where go
193193 = clientWithRoute
194− (Proxy :: Proxy SslCertsInsertResource)
194+ (Proxy :: Proxy SSLCertsInsertResource)
195195 r
196196 u
gogol-sqladmin/gen/Network/Google/Resource/SQL/SSLCerts/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.SQL.SSLCerts.List
2424 (
2525 -- * REST Resource
26− SslCertsListResource
26+ SSLCertsListResource
2727
2828 -- * Creating a Request
2929 , sSLCertsList'
@@ -45,7 +45,7 @@ import Network.Google.SQLAdmin.Types
4545
4646-- | A resource alias for @SQLSSLCertsList@ which the
4747-- 'SSLCertsList'' request conforms to.
48−type SslCertsListResource =
48+type SSLCertsListResource =
4949 "projects" :>
5050 Capture "project" Text :>
5151 "instances" :>
@@ -172,6 +172,6 @@ instance GoogleRequest SSLCertsList' where
172172 (Just AltJSON)
173173 where go
174174 = clientWithRoute
175− (Proxy :: Proxy SslCertsListResource)
175+ (Proxy :: Proxy SSLCertsListResource)
176176 r
177177 u
gogol-sqladmin/gen/Network/Google/SQLAdmin.hs+6−6
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for Cloud SQL database instance management.
15+-- | API for Cloud SQL database instance management.
1616--
1717-- /See:/ <https://cloud.google.com/sql/docs/reference/latest Cloud SQL Administration API Reference>
1818module Network.Google.SQLAdmin
@@ -557,11 +557,11 @@ type SQLAdminAPI =
557557 :<|> BackupRunsListResource
558558 :<|> BackupRunsGetResource
559559 :<|> BackupRunsDeleteResource
560− :<|> SslCertsInsertResource
561− :<|> SslCertsListResource
562− :<|> SslCertsGetResource
563− :<|> SslCertsCreateEphemeralResource
564− :<|> SslCertsDeleteResource
560+ :<|> SSLCertsInsertResource
561+ :<|> SSLCertsListResource
562+ :<|> SSLCertsGetResource
563+ :<|> SSLCertsCreateEphemeralResource
564+ :<|> SSLCertsDeleteResource
565565 :<|> InstancesExportResource
566566 :<|> InstancesInsertResource
567567 :<|> InstancesListResource
gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Transfers data from external data sources to a Google Cloud Storage
15+-- | Transfers data from external data sources to a Google Cloud Storage
1616-- bucket or between Google Cloud Storage buckets.
1717--
1818-- /See:/ <https://cloud.google.com/storage/transfer Google Storage Transfer API Reference>
gogol-storage/gen/Network/Google/Storage.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you store and retrieve potentially-large, immutable data objects.
15+-- | Lets you store and retrieve potentially-large, immutable data objects.
1616--
1717-- /See:/ <https://developers.google.com/storage/docs/json_api/ Cloud Storage API Reference>
1818module Network.Google.Storage
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Macros/Update.hs+95−95
@@ -30,17 +30,17 @@ module Network.Google.Resource.TagManager.Accounts.Containers.Macros.Update
3030 , AccountsContainersMacrosUpdate'
3131
3232 -- * Request Lenses
33− , acmucQuotaUser
34− , acmucPrettyPrint
35− , acmucMacro
36− , acmucContainerId
37− , acmucUserIP
38− , acmucFingerprint
39− , acmucAccountId
40− , acmucKey
41− , acmucMacroId
42− , acmucOAuthToken
43− , acmucFields
33+ , acmuQuotaUser
34+ , acmuPrettyPrint
35+ , acmuMacro
36+ , acmuContainerId
37+ , acmuUserIP
38+ , acmuFingerprint
39+ , acmuAccountId
40+ , acmuKey
41+ , acmuMacroId
42+ , acmuOAuthToken
43+ , acmuFields
4444 ) where
4545
4646import Network.Google.Prelude
@@ -69,135 +69,135 @@ type AccountsContainersMacrosUpdateResource =
6969--
7070-- /See:/ 'accountsContainersMacrosUpdate'' smart constructor.
7171data AccountsContainersMacrosUpdate' = AccountsContainersMacrosUpdate'
72− { _acmucQuotaUser :: !(Maybe Text)
73− , _acmucPrettyPrint :: !Bool
74− , _acmucMacro :: !Macro
75− , _acmucContainerId :: !Text
76− , _acmucUserIP :: !(Maybe Text)
77− , _acmucFingerprint :: !(Maybe Text)
78− , _acmucAccountId :: !Text
79− , _acmucKey :: !(Maybe Key)
80− , _acmucMacroId :: !Text
81− , _acmucOAuthToken :: !(Maybe OAuthToken)
82− , _acmucFields :: !(Maybe Text)
72+ { _acmuQuotaUser :: !(Maybe Text)
73+ , _acmuPrettyPrint :: !Bool
74+ , _acmuMacro :: !Macro
75+ , _acmuContainerId :: !Text
76+ , _acmuUserIP :: !(Maybe Text)
77+ , _acmuFingerprint :: !(Maybe Text)
78+ , _acmuAccountId :: !Text
79+ , _acmuKey :: !(Maybe Key)
80+ , _acmuMacroId :: !Text
81+ , _acmuOAuthToken :: !(Maybe OAuthToken)
82+ , _acmuFields :: !(Maybe Text)
8383 } deriving (Eq,Read,Show,Data,Typeable,Generic)
8484
8585-- | Creates a value of 'AccountsContainersMacrosUpdate'' with the minimum fields required to make a request.
8686--
8787-- Use one of the following lenses to modify other fields as desired:
8888--
89−-- * 'acmucQuotaUser'
89+-- * 'acmuQuotaUser'
9090--
91−-- * 'acmucPrettyPrint'
91+-- * 'acmuPrettyPrint'
9292--
93−-- * 'acmucMacro'
93+-- * 'acmuMacro'
9494--
95−-- * 'acmucContainerId'
95+-- * 'acmuContainerId'
9696--
97−-- * 'acmucUserIP'
97+-- * 'acmuUserIP'
9898--
99−-- * 'acmucFingerprint'
99+-- * 'acmuFingerprint'
100100--
101−-- * 'acmucAccountId'
101+-- * 'acmuAccountId'
102102--
103−-- * 'acmucKey'
103+-- * 'acmuKey'
104104--
105−-- * 'acmucMacroId'
105+-- * 'acmuMacroId'
106106--
107−-- * 'acmucOAuthToken'
107+-- * 'acmuOAuthToken'
108108--
109−-- * 'acmucFields'
109+-- * 'acmuFields'
110110accountsContainersMacrosUpdate'
111111 :: Macro -- ^ 'Macro'
112112 -> Text -- ^ 'containerId'
113113 -> Text -- ^ 'accountId'
114114 -> Text -- ^ 'macroId'
115115 -> AccountsContainersMacrosUpdate'
116−accountsContainersMacrosUpdate' pAcmucMacro_ pAcmucContainerId_ pAcmucAccountId_ pAcmucMacroId_ =
116+accountsContainersMacrosUpdate' pAcmuMacro_ pAcmuContainerId_ pAcmuAccountId_ pAcmuMacroId_ =
117117 AccountsContainersMacrosUpdate'
118− { _acmucQuotaUser = Nothing
119− , _acmucPrettyPrint = True
120− , _acmucMacro = pAcmucMacro_
121− , _acmucContainerId = pAcmucContainerId_
122− , _acmucUserIP = Nothing
123− , _acmucFingerprint = Nothing
124− , _acmucAccountId = pAcmucAccountId_
125− , _acmucKey = Nothing
126− , _acmucMacroId = pAcmucMacroId_
127− , _acmucOAuthToken = Nothing
128− , _acmucFields = Nothing
118+ { _acmuQuotaUser = Nothing
119+ , _acmuPrettyPrint = True
120+ , _acmuMacro = pAcmuMacro_
121+ , _acmuContainerId = pAcmuContainerId_
122+ , _acmuUserIP = Nothing
123+ , _acmuFingerprint = Nothing
124+ , _acmuAccountId = pAcmuAccountId_
125+ , _acmuKey = Nothing
126+ , _acmuMacroId = pAcmuMacroId_
127+ , _acmuOAuthToken = Nothing
128+ , _acmuFields = Nothing
129129 }
130130
131131-- | Available to use for quota purposes for server-side applications. Can be
132132-- any arbitrary string assigned to a user, but should not exceed 40
133133-- characters. Overrides userIp if both are provided.
134−acmucQuotaUser :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
135−acmucQuotaUser
136− = lens _acmucQuotaUser
137− (\ s a -> s{_acmucQuotaUser = a})
134+acmuQuotaUser :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
135+acmuQuotaUser
136+ = lens _acmuQuotaUser
137+ (\ s a -> s{_acmuQuotaUser = a})
138138
139139-- | Returns response with indentations and line breaks.
140−acmucPrettyPrint :: Lens' AccountsContainersMacrosUpdate' Bool
141−acmucPrettyPrint
142− = lens _acmucPrettyPrint
143− (\ s a -> s{_acmucPrettyPrint = a})
140+acmuPrettyPrint :: Lens' AccountsContainersMacrosUpdate' Bool
141+acmuPrettyPrint
142+ = lens _acmuPrettyPrint
143+ (\ s a -> s{_acmuPrettyPrint = a})
144144
145145-- | Multipart request metadata.
146−acmucMacro :: Lens' AccountsContainersMacrosUpdate' Macro
147−acmucMacro
148− = lens _acmucMacro (\ s a -> s{_acmucMacro = a})
146+acmuMacro :: Lens' AccountsContainersMacrosUpdate' Macro
147+acmuMacro
148+ = lens _acmuMacro (\ s a -> s{_acmuMacro = a})
149149
150150-- | The GTM Container ID.
151−acmucContainerId :: Lens' AccountsContainersMacrosUpdate' Text
152−acmucContainerId
153− = lens _acmucContainerId
154− (\ s a -> s{_acmucContainerId = a})
151+acmuContainerId :: Lens' AccountsContainersMacrosUpdate' Text
152+acmuContainerId
153+ = lens _acmuContainerId
154+ (\ s a -> s{_acmuContainerId = a})
155155
156156-- | IP address of the site where the request originates. Use this if you
157157-- want to enforce per-user limits.
158−acmucUserIP :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
159−acmucUserIP
160− = lens _acmucUserIP (\ s a -> s{_acmucUserIP = a})
158+acmuUserIP :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
159+acmuUserIP
160+ = lens _acmuUserIP (\ s a -> s{_acmuUserIP = a})
161161
162162-- | When provided, this fingerprint must match the fingerprint of the macro
163163-- in storage.
164−acmucFingerprint :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
165−acmucFingerprint
166− = lens _acmucFingerprint
167− (\ s a -> s{_acmucFingerprint = a})
164+acmuFingerprint :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
165+acmuFingerprint
166+ = lens _acmuFingerprint
167+ (\ s a -> s{_acmuFingerprint = a})
168168
169169-- | The GTM Account ID.
170−acmucAccountId :: Lens' AccountsContainersMacrosUpdate' Text
171−acmucAccountId
172− = lens _acmucAccountId
173− (\ s a -> s{_acmucAccountId = a})
170+acmuAccountId :: Lens' AccountsContainersMacrosUpdate' Text
171+acmuAccountId
172+ = lens _acmuAccountId
173+ (\ s a -> s{_acmuAccountId = a})
174174
175175-- | API key. Your API key identifies your project and provides you with API
176176-- access, quota, and reports. Required unless you provide an OAuth 2.0
177177-- token.
178−acmucKey :: Lens' AccountsContainersMacrosUpdate' (Maybe Key)
179−acmucKey = lens _acmucKey (\ s a -> s{_acmucKey = a})
178+acmuKey :: Lens' AccountsContainersMacrosUpdate' (Maybe Key)
179+acmuKey = lens _acmuKey (\ s a -> s{_acmuKey = a})
180180
181181-- | The GTM Macro ID.
182−acmucMacroId :: Lens' AccountsContainersMacrosUpdate' Text
183−acmucMacroId
184− = lens _acmucMacroId (\ s a -> s{_acmucMacroId = a})
182+acmuMacroId :: Lens' AccountsContainersMacrosUpdate' Text
183+acmuMacroId
184+ = lens _acmuMacroId (\ s a -> s{_acmuMacroId = a})
185185
186186-- | OAuth 2.0 token for the current user.
187−acmucOAuthToken :: Lens' AccountsContainersMacrosUpdate' (Maybe OAuthToken)
188−acmucOAuthToken
189− = lens _acmucOAuthToken
190− (\ s a -> s{_acmucOAuthToken = a})
187+acmuOAuthToken :: Lens' AccountsContainersMacrosUpdate' (Maybe OAuthToken)
188+acmuOAuthToken
189+ = lens _acmuOAuthToken
190+ (\ s a -> s{_acmuOAuthToken = a})
191191
192192-- | Selector specifying which fields to include in a partial response.
193−acmucFields :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
194−acmucFields
195− = lens _acmucFields (\ s a -> s{_acmucFields = a})
193+acmuFields :: Lens' AccountsContainersMacrosUpdate' (Maybe Text)
194+acmuFields
195+ = lens _acmuFields (\ s a -> s{_acmuFields = a})
196196
197197instance GoogleAuth AccountsContainersMacrosUpdate'
198198 where
199− authKey = acmucKey . _Just
200− authToken = acmucOAuthToken . _Just
199+ authKey = acmuKey . _Just
200+ authToken = acmuOAuthToken . _Just
201201
202202instance GoogleRequest
203203 AccountsContainersMacrosUpdate' where
@@ -205,17 +205,17 @@ instance GoogleRequest
205205 request = requestWithRoute defReq tagManagerURL
206206 requestWithRoute r u
207207 AccountsContainersMacrosUpdate'{..}
208− = go _acmucQuotaUser (Just _acmucPrettyPrint)
209− _acmucContainerId
210− _acmucUserIP
211− _acmucFingerprint
212− _acmucAccountId
213− _acmucKey
214− _acmucMacroId
215− _acmucOAuthToken
216− _acmucFields
208+ = go _acmuQuotaUser (Just _acmuPrettyPrint)
209+ _acmuContainerId
210+ _acmuUserIP
211+ _acmuFingerprint
212+ _acmuAccountId
213+ _acmuKey
214+ _acmuMacroId
215+ _acmuOAuthToken
216+ _acmuFields
217217 (Just AltJSON)
218− _acmucMacro
218+ _acmuMacro
219219 where go
220220 = clientWithRoute
221221 (Proxy ::
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MoveFolders/Update.hsnew file+236
@@ -0,0 +1,236 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.TagManager.Accounts.Containers.MoveFolders.Update
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Moves entities to a GTM Folder.
21+--
22+-- /See:/ <https://developers.google.com/tag-manager/api/v1/ Tag Manager API Reference> for @TagManagerAccountsContainersMove_foldersUpdate@.
23+module Network.Google.Resource.TagManager.Accounts.Containers.MoveFolders.Update
24+ (
25+ -- * REST Resource
26+ AccountsContainersMoveFoldersUpdateResource
27+
28+ -- * Creating a Request
29+ , accountsContainersMoveFoldersUpdate'
30+ , AccountsContainersMoveFoldersUpdate'
31+
32+ -- * Request Lenses
33+ , acmfuQuotaUser
34+ , acmfuPrettyPrint
35+ , acmfuContainerId
36+ , acmfuTriggerId
37+ , acmfuUserIP
38+ , acmfuVariableId
39+ , acmfuFolderId
40+ , acmfuAccountId
41+ , acmfuTagId
42+ , acmfuKey
43+ , acmfuOAuthToken
44+ , acmfuFields
45+ ) where
46+
47+import Network.Google.Prelude
48+import Network.Google.TagManager.Types
49+
50+-- | A resource alias for @TagManagerAccountsContainersMove_foldersUpdate@ which the
51+-- 'AccountsContainersMoveFoldersUpdate'' request conforms to.
52+type AccountsContainersMoveFoldersUpdateResource =
53+ "accounts" :>
54+ Capture "accountId" Text :>
55+ "containers" :>
56+ Capture "containerId" Text :>
57+ "move_folders" :>
58+ Capture "folderId" Text :>
59+ QueryParam "quotaUser" Text :>
60+ QueryParam "prettyPrint" Bool :>
61+ QueryParams "triggerId" Text :>
62+ QueryParam "userIp" Text :>
63+ QueryParams "variableId" Text :>
64+ QueryParams "tagId" Text :>
65+ QueryParam "key" Key :>
66+ QueryParam "oauth_token" OAuthToken :>
67+ QueryParam "fields" Text :>
68+ QueryParam "alt" AltJSON :> Put '[JSON] ()
69+
70+-- | Moves entities to a GTM Folder.
71+--
72+-- /See:/ 'accountsContainersMoveFoldersUpdate'' smart constructor.
73+data AccountsContainersMoveFoldersUpdate' = AccountsContainersMoveFoldersUpdate'
74+ { _acmfuQuotaUser :: !(Maybe Text)
75+ , _acmfuPrettyPrint :: !Bool
76+ , _acmfuContainerId :: !Text
77+ , _acmfuTriggerId :: !(Maybe Text)
78+ , _acmfuUserIP :: !(Maybe Text)
79+ , _acmfuVariableId :: !(Maybe Text)
80+ , _acmfuFolderId :: !Text
81+ , _acmfuAccountId :: !Text
82+ , _acmfuTagId :: !(Maybe Text)
83+ , _acmfuKey :: !(Maybe Key)
84+ , _acmfuOAuthToken :: !(Maybe OAuthToken)
85+ , _acmfuFields :: !(Maybe Text)
86+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
87+
88+-- | Creates a value of 'AccountsContainersMoveFoldersUpdate'' with the minimum fields required to make a request.
89+--
90+-- Use one of the following lenses to modify other fields as desired:
91+--
92+-- * 'acmfuQuotaUser'
93+--
94+-- * 'acmfuPrettyPrint'
95+--
96+-- * 'acmfuContainerId'
97+--
98+-- * 'acmfuTriggerId'
99+--
100+-- * 'acmfuUserIP'
101+--
102+-- * 'acmfuVariableId'
103+--
104+-- * 'acmfuFolderId'
105+--
106+-- * 'acmfuAccountId'
107+--
108+-- * 'acmfuTagId'
109+--
110+-- * 'acmfuKey'
111+--
112+-- * 'acmfuOAuthToken'
113+--
114+-- * 'acmfuFields'
115+accountsContainersMoveFoldersUpdate'
116+ :: Text -- ^ 'containerId'
117+ -> Text -- ^ 'folderId'
118+ -> Text -- ^ 'accountId'
119+ -> AccountsContainersMoveFoldersUpdate'
120+accountsContainersMoveFoldersUpdate' pAcmfuContainerId_ pAcmfuFolderId_ pAcmfuAccountId_ =
121+ AccountsContainersMoveFoldersUpdate'
122+ { _acmfuQuotaUser = Nothing
123+ , _acmfuPrettyPrint = True
124+ , _acmfuContainerId = pAcmfuContainerId_
125+ , _acmfuTriggerId = Nothing
126+ , _acmfuUserIP = Nothing
127+ , _acmfuVariableId = Nothing
128+ , _acmfuFolderId = pAcmfuFolderId_
129+ , _acmfuAccountId = pAcmfuAccountId_
130+ , _acmfuTagId = Nothing
131+ , _acmfuKey = Nothing
132+ , _acmfuOAuthToken = Nothing
133+ , _acmfuFields = Nothing
134+ }
135+
136+-- | Available to use for quota purposes for server-side applications. Can be
137+-- any arbitrary string assigned to a user, but should not exceed 40
138+-- characters. Overrides userIp if both are provided.
139+acmfuQuotaUser :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
140+acmfuQuotaUser
141+ = lens _acmfuQuotaUser
142+ (\ s a -> s{_acmfuQuotaUser = a})
143+
144+-- | Returns response with indentations and line breaks.
145+acmfuPrettyPrint :: Lens' AccountsContainersMoveFoldersUpdate' Bool
146+acmfuPrettyPrint
147+ = lens _acmfuPrettyPrint
148+ (\ s a -> s{_acmfuPrettyPrint = a})
149+
150+-- | The GTM Container ID.
151+acmfuContainerId :: Lens' AccountsContainersMoveFoldersUpdate' Text
152+acmfuContainerId
153+ = lens _acmfuContainerId
154+ (\ s a -> s{_acmfuContainerId = a})
155+
156+-- | The triggers to be moved to the folder.
157+acmfuTriggerId :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
158+acmfuTriggerId
159+ = lens _acmfuTriggerId
160+ (\ s a -> s{_acmfuTriggerId = a})
161+
162+-- | IP address of the site where the request originates. Use this if you
163+-- want to enforce per-user limits.
164+acmfuUserIP :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
165+acmfuUserIP
166+ = lens _acmfuUserIP (\ s a -> s{_acmfuUserIP = a})
167+
168+-- | The variables to be moved to the folder.
169+acmfuVariableId :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
170+acmfuVariableId
171+ = lens _acmfuVariableId
172+ (\ s a -> s{_acmfuVariableId = a})
173+
174+-- | The GTM Folder ID.
175+acmfuFolderId :: Lens' AccountsContainersMoveFoldersUpdate' Text
176+acmfuFolderId
177+ = lens _acmfuFolderId
178+ (\ s a -> s{_acmfuFolderId = a})
179+
180+-- | The GTM Account ID.
181+acmfuAccountId :: Lens' AccountsContainersMoveFoldersUpdate' Text
182+acmfuAccountId
183+ = lens _acmfuAccountId
184+ (\ s a -> s{_acmfuAccountId = a})
185+
186+-- | The tags to be moved to the folder.
187+acmfuTagId :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
188+acmfuTagId
189+ = lens _acmfuTagId (\ s a -> s{_acmfuTagId = a})
190+
191+-- | API key. Your API key identifies your project and provides you with API
192+-- access, quota, and reports. Required unless you provide an OAuth 2.0
193+-- token.
194+acmfuKey :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Key)
195+acmfuKey = lens _acmfuKey (\ s a -> s{_acmfuKey = a})
196+
197+-- | OAuth 2.0 token for the current user.
198+acmfuOAuthToken :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe OAuthToken)
199+acmfuOAuthToken
200+ = lens _acmfuOAuthToken
201+ (\ s a -> s{_acmfuOAuthToken = a})
202+
203+-- | Selector specifying which fields to include in a partial response.
204+acmfuFields :: Lens' AccountsContainersMoveFoldersUpdate' (Maybe Text)
205+acmfuFields
206+ = lens _acmfuFields (\ s a -> s{_acmfuFields = a})
207+
208+instance GoogleAuth
209+ AccountsContainersMoveFoldersUpdate' where
210+ authKey = acmfuKey . _Just
211+ authToken = acmfuOAuthToken . _Just
212+
213+instance GoogleRequest
214+ AccountsContainersMoveFoldersUpdate' where
215+ type Rs AccountsContainersMoveFoldersUpdate' = ()
216+ request = requestWithRoute defReq tagManagerURL
217+ requestWithRoute r u
218+ AccountsContainersMoveFoldersUpdate'{..}
219+ = go _acmfuQuotaUser (Just _acmfuPrettyPrint)
220+ _acmfuContainerId
221+ _acmfuTriggerId
222+ _acmfuUserIP
223+ _acmfuVariableId
224+ _acmfuFolderId
225+ _acmfuAccountId
226+ _acmfuTagId
227+ _acmfuKey
228+ _acmfuOAuthToken
229+ _acmfuFields
230+ (Just AltJSON)
231+ where go
232+ = clientWithRoute
233+ (Proxy ::
234+ Proxy AccountsContainersMoveFoldersUpdateResource)
235+ r
236+ u
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Move_folders/Update.hsdeleted−235
@@ -1,235 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.TagManager.Accounts.Containers.Move_folders.Update
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Moves entities to a GTM Folder.
21−--
22−-- /See:/ <https://developers.google.com/tag-manager/api/v1/ Tag Manager API Reference> for @TagManagerAccountsContainersMove_foldersUpdate@.
23−module Network.Google.Resource.TagManager.Accounts.Containers.Move_folders.Update
24− (
25− -- * REST Resource
26− AccountsContainersMove_foldersUpdateResource
27−
28− -- * Creating a Request
29− , accountsContainersMove_foldersUpdate'
30− , AccountsContainersMove_foldersUpdate'
31−
32− -- * Request Lenses
33− , acmuQuotaUser
34− , acmuPrettyPrint
35− , acmuContainerId
36− , acmuTriggerId
37− , acmuUserIP
38− , acmuVariableId
39− , acmuFolderId
40− , acmuAccountId
41− , acmuTagId
42− , acmuKey
43− , acmuOAuthToken
44− , acmuFields
45− ) where
46−
47−import Network.Google.Prelude
48−import Network.Google.TagManager.Types
49−
50−-- | A resource alias for @TagManagerAccountsContainersMove_foldersUpdate@ which the
51−-- 'AccountsContainersMove_foldersUpdate'' request conforms to.
52−type AccountsContainersMove_foldersUpdateResource =
53− "accounts" :>
54− Capture "accountId" Text :>
55− "containers" :>
56− Capture "containerId" Text :>
57− "move_folders" :>
58− Capture "folderId" Text :>
59− QueryParam "quotaUser" Text :>
60− QueryParam "prettyPrint" Bool :>
61− QueryParams "triggerId" Text :>
62− QueryParam "userIp" Text :>
63− QueryParams "variableId" Text :>
64− QueryParams "tagId" Text :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "fields" Text :>
68− QueryParam "alt" AltJSON :> Put '[JSON] ()
69−
70−-- | Moves entities to a GTM Folder.
71−--
72−-- /See:/ 'accountsContainersMove_foldersUpdate'' smart constructor.
73−data AccountsContainersMove_foldersUpdate' = AccountsContainersMove_foldersUpdate'
74− { _acmuQuotaUser :: !(Maybe Text)
75− , _acmuPrettyPrint :: !Bool
76− , _acmuContainerId :: !Text
77− , _acmuTriggerId :: !(Maybe Text)
78− , _acmuUserIP :: !(Maybe Text)
79− , _acmuVariableId :: !(Maybe Text)
80− , _acmuFolderId :: !Text
81− , _acmuAccountId :: !Text
82− , _acmuTagId :: !(Maybe Text)
83− , _acmuKey :: !(Maybe Key)
84− , _acmuOAuthToken :: !(Maybe OAuthToken)
85− , _acmuFields :: !(Maybe Text)
86− } deriving (Eq,Read,Show,Data,Typeable,Generic)
87−
88−-- | Creates a value of 'AccountsContainersMove_foldersUpdate'' with the minimum fields required to make a request.
89−--
90−-- Use one of the following lenses to modify other fields as desired:
91−--
92−-- * 'acmuQuotaUser'
93−--
94−-- * 'acmuPrettyPrint'
95−--
96−-- * 'acmuContainerId'
97−--
98−-- * 'acmuTriggerId'
99−--
100−-- * 'acmuUserIP'
101−--
102−-- * 'acmuVariableId'
103−--
104−-- * 'acmuFolderId'
105−--
106−-- * 'acmuAccountId'
107−--
108−-- * 'acmuTagId'
109−--
110−-- * 'acmuKey'
111−--
112−-- * 'acmuOAuthToken'
113−--
114−-- * 'acmuFields'
115−accountsContainersMove_foldersUpdate'
116− :: Text -- ^ 'containerId'
117− -> Text -- ^ 'folderId'
118− -> Text -- ^ 'accountId'
119− -> AccountsContainersMove_foldersUpdate'
120−accountsContainersMove_foldersUpdate' pAcmuContainerId_ pAcmuFolderId_ pAcmuAccountId_ =
121− AccountsContainersMove_foldersUpdate'
122− { _acmuQuotaUser = Nothing
123− , _acmuPrettyPrint = True
124− , _acmuContainerId = pAcmuContainerId_
125− , _acmuTriggerId = Nothing
126− , _acmuUserIP = Nothing
127− , _acmuVariableId = Nothing
128− , _acmuFolderId = pAcmuFolderId_
129− , _acmuAccountId = pAcmuAccountId_
130− , _acmuTagId = Nothing
131− , _acmuKey = Nothing
132− , _acmuOAuthToken = Nothing
133− , _acmuFields = Nothing
134− }
135−
136−-- | Available to use for quota purposes for server-side applications. Can be
137−-- any arbitrary string assigned to a user, but should not exceed 40
138−-- characters. Overrides userIp if both are provided.
139−acmuQuotaUser :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
140−acmuQuotaUser
141− = lens _acmuQuotaUser
142− (\ s a -> s{_acmuQuotaUser = a})
143−
144−-- | Returns response with indentations and line breaks.
145−acmuPrettyPrint :: Lens' AccountsContainersMove_foldersUpdate' Bool
146−acmuPrettyPrint
147− = lens _acmuPrettyPrint
148− (\ s a -> s{_acmuPrettyPrint = a})
149−
150−-- | The GTM Container ID.
151−acmuContainerId :: Lens' AccountsContainersMove_foldersUpdate' Text
152−acmuContainerId
153− = lens _acmuContainerId
154− (\ s a -> s{_acmuContainerId = a})
155−
156−-- | The triggers to be moved to the folder.
157−acmuTriggerId :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
158−acmuTriggerId
159− = lens _acmuTriggerId
160− (\ s a -> s{_acmuTriggerId = a})
161−
162−-- | IP address of the site where the request originates. Use this if you
163−-- want to enforce per-user limits.
164−acmuUserIP :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
165−acmuUserIP
166− = lens _acmuUserIP (\ s a -> s{_acmuUserIP = a})
167−
168−-- | The variables to be moved to the folder.
169−acmuVariableId :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
170−acmuVariableId
171− = lens _acmuVariableId
172− (\ s a -> s{_acmuVariableId = a})
173−
174−-- | The GTM Folder ID.
175−acmuFolderId :: Lens' AccountsContainersMove_foldersUpdate' Text
176−acmuFolderId
177− = lens _acmuFolderId (\ s a -> s{_acmuFolderId = a})
178−
179−-- | The GTM Account ID.
180−acmuAccountId :: Lens' AccountsContainersMove_foldersUpdate' Text
181−acmuAccountId
182− = lens _acmuAccountId
183− (\ s a -> s{_acmuAccountId = a})
184−
185−-- | The tags to be moved to the folder.
186−acmuTagId :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
187−acmuTagId
188− = lens _acmuTagId (\ s a -> s{_acmuTagId = a})
189−
190−-- | API key. Your API key identifies your project and provides you with API
191−-- access, quota, and reports. Required unless you provide an OAuth 2.0
192−-- token.
193−acmuKey :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Key)
194−acmuKey = lens _acmuKey (\ s a -> s{_acmuKey = a})
195−
196−-- | OAuth 2.0 token for the current user.
197−acmuOAuthToken :: Lens' AccountsContainersMove_foldersUpdate' (Maybe OAuthToken)
198−acmuOAuthToken
199− = lens _acmuOAuthToken
200− (\ s a -> s{_acmuOAuthToken = a})
201−
202−-- | Selector specifying which fields to include in a partial response.
203−acmuFields :: Lens' AccountsContainersMove_foldersUpdate' (Maybe Text)
204−acmuFields
205− = lens _acmuFields (\ s a -> s{_acmuFields = a})
206−
207−instance GoogleAuth
208− AccountsContainersMove_foldersUpdate' where
209− authKey = acmuKey . _Just
210− authToken = acmuOAuthToken . _Just
211−
212−instance GoogleRequest
213− AccountsContainersMove_foldersUpdate' where
214− type Rs AccountsContainersMove_foldersUpdate' = ()
215− request = requestWithRoute defReq tagManagerURL
216− requestWithRoute r u
217− AccountsContainersMove_foldersUpdate'{..}
218− = go _acmuQuotaUser (Just _acmuPrettyPrint)
219− _acmuContainerId
220− _acmuTriggerId
221− _acmuUserIP
222− _acmuVariableId
223− _acmuFolderId
224− _acmuAccountId
225− _acmuTagId
226− _acmuKey
227− _acmuOAuthToken
228− _acmuFields
229− (Just AltJSON)
230− where go
231− = clientWithRoute
232− (Proxy ::
233− Proxy AccountsContainersMove_foldersUpdateResource)
234− r
235− u
gogol-tagmanager/gen/Network/Google/TagManager.hs+4−4
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for accessing Tag Manager accounts and containers.
15+-- | API for accessing Tag Manager accounts and containers.
1616--
1717-- /See:/ <https://developers.google.com/tag-manager/api/v1/ Tag Manager API Reference>
1818module Network.Google.TagManager
@@ -72,7 +72,7 @@ module Network.Google.TagManager
7272 , module Network.Google.Resource.TagManager.Accounts.Containers.Macros.Update
7373
7474 -- ** TagManagerAccountsContainersMove_foldersUpdate
75− , module Network.Google.Resource.TagManager.Accounts.Containers.Move_folders.Update
75+ , module Network.Google.Resource.TagManager.Accounts.Containers.MoveFolders.Update
7676
7777 -- ** TagManagerAccountsContainersRulesCreate
7878 , module Network.Google.Resource.TagManager.Accounts.Containers.Rules.Create
@@ -508,7 +508,7 @@ import Network.Google.Resource.TagManager.Accounts.Containers.Macros.D
508508import Network.Google.Resource.TagManager.Accounts.Containers.Macros.Get
509509import Network.Google.Resource.TagManager.Accounts.Containers.Macros.List
510510import Network.Google.Resource.TagManager.Accounts.Containers.Macros.Update
511−import Network.Google.Resource.TagManager.Accounts.Containers.Move_folders.Update
511+import Network.Google.Resource.TagManager.Accounts.Containers.MoveFolders.Update
512512import Network.Google.Resource.TagManager.Accounts.Containers.Rules.Create
513513import Network.Google.Resource.TagManager.Accounts.Containers.Rules.Delete
514514import Network.Google.Resource.TagManager.Accounts.Containers.Rules.Get
@@ -582,7 +582,7 @@ type TagManagerAPI =
582582 :<|> AccountsContainersVersionsDeleteResource
583583 :<|> AccountsContainersVersionsUpdateResource
584584 :<|> AccountsContainersVersionsPublishResource
585− :<|> AccountsContainersMove_foldersUpdateResource
585+ :<|> AccountsContainersMoveFoldersUpdateResource
586586 :<|> AccountsContainersMacrosListResource
587587 :<|> AccountsContainersMacrosGetResource
588588 :<|> AccountsContainersMacrosCreateResource
gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+126−126
@@ -304,89 +304,89 @@ instance ToJSON ParameterType where
304304 toJSON = toJSONText
305305
306306data ContainerEnabledBuiltInVariable
307− = AdvertiserId
307+ = CEBIVAdvertiserId
308308 -- ^ @advertiserId@
309− | AdvertisingTrackingEnabled
309+ | CEBIVAdvertisingTrackingEnabled
310310 -- ^ @advertisingTrackingEnabled@
311− | AppId
311+ | CEBIVAppId
312312 -- ^ @appId@
313− | AppName
313+ | CEBIVAppName
314314 -- ^ @appName@
315− | AppVersionCode
315+ | CEBIVAppVersionCode
316316 -- ^ @appVersionCode@
317− | AppVersionName
317+ | CEBIVAppVersionName
318318 -- ^ @appVersionName@
319− | ClickClasses
319+ | CEBIVClickClasses
320320 -- ^ @clickClasses@
321− | ClickElement
321+ | CEBIVClickElement
322322 -- ^ @clickElement@
323− | ClickId
323+ | CEBIVClickId
324324 -- ^ @clickId@
325− | ClickTarget
325+ | CEBIVClickTarget
326326 -- ^ @clickTarget@
327− | ClickText
327+ | CEBIVClickText
328328 -- ^ @clickText@
329− | ClickURL
329+ | CEBIVClickURL
330330 -- ^ @clickUrl@
331− | ContainerId
331+ | CEBIVContainerId
332332 -- ^ @containerId@
333− | ContainerVersion
333+ | CEBIVContainerVersion
334334 -- ^ @containerVersion@
335− | DebugMode
335+ | CEBIVDebugMode
336336 -- ^ @debugMode@
337− | DeviceName
337+ | CEBIVDeviceName
338338 -- ^ @deviceName@
339− | ErrorLine
339+ | CEBIVErrorLine
340340 -- ^ @errorLine@
341− | ErrorMessage
341+ | CEBIVErrorMessage
342342 -- ^ @errorMessage@
343− | ErrorURL
343+ | CEBIVErrorURL
344344 -- ^ @errorUrl@
345− | Event
345+ | CEBIVEvent
346346 -- ^ @event@
347− | FormClasses
347+ | CEBIVFormClasses
348348 -- ^ @formClasses@
349− | FormElement
349+ | CEBIVFormElement
350350 -- ^ @formElement@
351− | FormId
351+ | CEBIVFormId
352352 -- ^ @formId@
353− | FormTarget
353+ | CEBIVFormTarget
354354 -- ^ @formTarget@
355− | FormText
355+ | CEBIVFormText
356356 -- ^ @formText@
357− | FormURL
357+ | CEBIVFormURL
358358 -- ^ @formUrl@
359− | HistorySource
359+ | CEBIVHistorySource
360360 -- ^ @historySource@
361− | HTMLId
361+ | CEBIVHTMLId
362362 -- ^ @htmlId@
363− | Language
363+ | CEBIVLanguage
364364 -- ^ @language@
365− | NewHistoryFragment
365+ | CEBIVNewHistoryFragment
366366 -- ^ @newHistoryFragment@
367− | NewHistoryState
367+ | CEBIVNewHistoryState
368368 -- ^ @newHistoryState@
369− | OldHistoryFragment
369+ | CEBIVOldHistoryFragment
370370 -- ^ @oldHistoryFragment@
371− | OldHistoryState
371+ | CEBIVOldHistoryState
372372 -- ^ @oldHistoryState@
373− | OSVersion
373+ | CEBIVOSVersion
374374 -- ^ @osVersion@
375− | PageHostname
375+ | CEBIVPageHostname
376376 -- ^ @pageHostname@
377− | PagePath
377+ | CEBIVPagePath
378378 -- ^ @pagePath@
379− | PageURL
379+ | CEBIVPageURL
380380 -- ^ @pageUrl@
381− | Platform
381+ | CEBIVPlatform
382382 -- ^ @platform@
383− | RandomNumber
383+ | CEBIVRandomNumber
384384 -- ^ @randomNumber@
385− | Referrer
385+ | CEBIVReferrer
386386 -- ^ @referrer@
387− | Resolution
387+ | CEBIVResolution
388388 -- ^ @resolution@
389− | SdkVersion
389+ | CEBIVSdkVersion
390390 -- ^ @sdkVersion@
391391 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
392392
@@ -394,94 +394,94 @@ instance Hashable ContainerEnabledBuiltInVariable
394394
395395instance FromText ContainerEnabledBuiltInVariable where
396396 fromText = \case
397− "advertiserId" -> Just AdvertiserId
398− "advertisingTrackingEnabled" -> Just AdvertisingTrackingEnabled
399− "appId" -> Just AppId
400− "appName" -> Just AppName
401− "appVersionCode" -> Just AppVersionCode
402− "appVersionName" -> Just AppVersionName
403− "clickClasses" -> Just ClickClasses
404− "clickElement" -> Just ClickElement
405− "clickId" -> Just ClickId
406− "clickTarget" -> Just ClickTarget
407− "clickText" -> Just ClickText
408− "clickUrl" -> Just ClickURL
409− "containerId" -> Just ContainerId
410− "containerVersion" -> Just ContainerVersion
411− "debugMode" -> Just DebugMode
412− "deviceName" -> Just DeviceName
413− "errorLine" -> Just ErrorLine
414− "errorMessage" -> Just ErrorMessage
415− "errorUrl" -> Just ErrorURL
416− "event" -> Just Event
417− "formClasses" -> Just FormClasses
418− "formElement" -> Just FormElement
419− "formId" -> Just FormId
420− "formTarget" -> Just FormTarget
421− "formText" -> Just FormText
422− "formUrl" -> Just FormURL
423− "historySource" -> Just HistorySource
424− "htmlId" -> Just HTMLId
425− "language" -> Just Language
426− "newHistoryFragment" -> Just NewHistoryFragment
427− "newHistoryState" -> Just NewHistoryState
428− "oldHistoryFragment" -> Just OldHistoryFragment
429− "oldHistoryState" -> Just OldHistoryState
430− "osVersion" -> Just OSVersion
431− "pageHostname" -> Just PageHostname
432− "pagePath" -> Just PagePath
433− "pageUrl" -> Just PageURL
434− "platform" -> Just Platform
435− "randomNumber" -> Just RandomNumber
436− "referrer" -> Just Referrer
437− "resolution" -> Just Resolution
438− "sdkVersion" -> Just SdkVersion
397+ "advertiserId" -> Just CEBIVAdvertiserId
398+ "advertisingTrackingEnabled" -> Just CEBIVAdvertisingTrackingEnabled
399+ "appId" -> Just CEBIVAppId
400+ "appName" -> Just CEBIVAppName
401+ "appVersionCode" -> Just CEBIVAppVersionCode
402+ "appVersionName" -> Just CEBIVAppVersionName
403+ "clickClasses" -> Just CEBIVClickClasses
404+ "clickElement" -> Just CEBIVClickElement
405+ "clickId" -> Just CEBIVClickId
406+ "clickTarget" -> Just CEBIVClickTarget
407+ "clickText" -> Just CEBIVClickText
408+ "clickUrl" -> Just CEBIVClickURL
409+ "containerId" -> Just CEBIVContainerId
410+ "containerVersion" -> Just CEBIVContainerVersion
411+ "debugMode" -> Just CEBIVDebugMode
412+ "deviceName" -> Just CEBIVDeviceName
413+ "errorLine" -> Just CEBIVErrorLine
414+ "errorMessage" -> Just CEBIVErrorMessage
415+ "errorUrl" -> Just CEBIVErrorURL
416+ "event" -> Just CEBIVEvent
417+ "formClasses" -> Just CEBIVFormClasses
418+ "formElement" -> Just CEBIVFormElement
419+ "formId" -> Just CEBIVFormId
420+ "formTarget" -> Just CEBIVFormTarget
421+ "formText" -> Just CEBIVFormText
422+ "formUrl" -> Just CEBIVFormURL
423+ "historySource" -> Just CEBIVHistorySource
424+ "htmlId" -> Just CEBIVHTMLId
425+ "language" -> Just CEBIVLanguage
426+ "newHistoryFragment" -> Just CEBIVNewHistoryFragment
427+ "newHistoryState" -> Just CEBIVNewHistoryState
428+ "oldHistoryFragment" -> Just CEBIVOldHistoryFragment
429+ "oldHistoryState" -> Just CEBIVOldHistoryState
430+ "osVersion" -> Just CEBIVOSVersion
431+ "pageHostname" -> Just CEBIVPageHostname
432+ "pagePath" -> Just CEBIVPagePath
433+ "pageUrl" -> Just CEBIVPageURL
434+ "platform" -> Just CEBIVPlatform
435+ "randomNumber" -> Just CEBIVRandomNumber
436+ "referrer" -> Just CEBIVReferrer
437+ "resolution" -> Just CEBIVResolution
438+ "sdkVersion" -> Just CEBIVSdkVersion
439439 _ -> Nothing
440440
441441instance ToText ContainerEnabledBuiltInVariable where
442442 toText = \case
443− AdvertiserId -> "advertiserId"
444− AdvertisingTrackingEnabled -> "advertisingTrackingEnabled"
445− AppId -> "appId"
446− AppName -> "appName"
447− AppVersionCode -> "appVersionCode"
448− AppVersionName -> "appVersionName"
449− ClickClasses -> "clickClasses"
450− ClickElement -> "clickElement"
451− ClickId -> "clickId"
452− ClickTarget -> "clickTarget"
453− ClickText -> "clickText"
454− ClickURL -> "clickUrl"
455− ContainerId -> "containerId"
456− ContainerVersion -> "containerVersion"
457− DebugMode -> "debugMode"
458− DeviceName -> "deviceName"
459− ErrorLine -> "errorLine"
460− ErrorMessage -> "errorMessage"
461− ErrorURL -> "errorUrl"
462− Event -> "event"
463− FormClasses -> "formClasses"
464− FormElement -> "formElement"
465− FormId -> "formId"
466− FormTarget -> "formTarget"
467− FormText -> "formText"
468− FormURL -> "formUrl"
469− HistorySource -> "historySource"
470− HTMLId -> "htmlId"
471− Language -> "language"
472− NewHistoryFragment -> "newHistoryFragment"
473− NewHistoryState -> "newHistoryState"
474− OldHistoryFragment -> "oldHistoryFragment"
475− OldHistoryState -> "oldHistoryState"
476− OSVersion -> "osVersion"
477− PageHostname -> "pageHostname"
478− PagePath -> "pagePath"
479− PageURL -> "pageUrl"
480− Platform -> "platform"
481− RandomNumber -> "randomNumber"
482− Referrer -> "referrer"
483− Resolution -> "resolution"
484− SdkVersion -> "sdkVersion"
443+ CEBIVAdvertiserId -> "advertiserId"
444+ CEBIVAdvertisingTrackingEnabled -> "advertisingTrackingEnabled"
445+ CEBIVAppId -> "appId"
446+ CEBIVAppName -> "appName"
447+ CEBIVAppVersionCode -> "appVersionCode"
448+ CEBIVAppVersionName -> "appVersionName"
449+ CEBIVClickClasses -> "clickClasses"
450+ CEBIVClickElement -> "clickElement"
451+ CEBIVClickId -> "clickId"
452+ CEBIVClickTarget -> "clickTarget"
453+ CEBIVClickText -> "clickText"
454+ CEBIVClickURL -> "clickUrl"
455+ CEBIVContainerId -> "containerId"
456+ CEBIVContainerVersion -> "containerVersion"
457+ CEBIVDebugMode -> "debugMode"
458+ CEBIVDeviceName -> "deviceName"
459+ CEBIVErrorLine -> "errorLine"
460+ CEBIVErrorMessage -> "errorMessage"
461+ CEBIVErrorURL -> "errorUrl"
462+ CEBIVEvent -> "event"
463+ CEBIVFormClasses -> "formClasses"
464+ CEBIVFormElement -> "formElement"
465+ CEBIVFormId -> "formId"
466+ CEBIVFormTarget -> "formTarget"
467+ CEBIVFormText -> "formText"
468+ CEBIVFormURL -> "formUrl"
469+ CEBIVHistorySource -> "historySource"
470+ CEBIVHTMLId -> "htmlId"
471+ CEBIVLanguage -> "language"
472+ CEBIVNewHistoryFragment -> "newHistoryFragment"
473+ CEBIVNewHistoryState -> "newHistoryState"
474+ CEBIVOldHistoryFragment -> "oldHistoryFragment"
475+ CEBIVOldHistoryState -> "oldHistoryState"
476+ CEBIVOSVersion -> "osVersion"
477+ CEBIVPageHostname -> "pageHostname"
478+ CEBIVPagePath -> "pagePath"
479+ CEBIVPageURL -> "pageUrl"
480+ CEBIVPlatform -> "platform"
481+ CEBIVRandomNumber -> "randomNumber"
482+ CEBIVReferrer -> "referrer"
483+ CEBIVResolution -> "resolution"
484+ CEBIVSdkVersion -> "sdkVersion"
485485
486486instance FromJSON ContainerEnabledBuiltInVariable where
487487 parseJSON = parseJSONText "ContainerEnabledBuiltInVariable"
gogol-tagmanager/gogol-tagmanager.cabal+1−1
@@ -45,7 +45,7 @@ library
4545 , Network.Google.Resource.TagManager.Accounts.Containers.Macros.Get
4646 , Network.Google.Resource.TagManager.Accounts.Containers.Macros.List
4747 , Network.Google.Resource.TagManager.Accounts.Containers.Macros.Update
48− , Network.Google.Resource.TagManager.Accounts.Containers.Move_folders.Update
48+ , Network.Google.Resource.TagManager.Accounts.Containers.MoveFolders.Update
4949 , Network.Google.Resource.TagManager.Accounts.Containers.Rules.Create
5050 , Network.Google.Resource.TagManager.Accounts.Containers.Rules.Delete
5151 , Network.Google.Resource.TagManager.Accounts.Containers.Rules.Get
gogol-translate/gen/Network/Google/Translate.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you translate text from one language to another
15+-- | Lets you translate text from one language to another
1616--
1717-- /See:/ <https://developers.google.com/translate/v2/using_rest Translate API Reference>
1818module Network.Google.Translate
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Get.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.URLShortener.URL.Get
2424 (
2525 -- * REST Resource
26− UrlGetResource
26+ URLGetResource
2727
2828 -- * Creating a Request
2929 , uRLGet'
@@ -45,7 +45,7 @@ import Network.Google.URLShortener.Types
4545
4646-- | A resource alias for @URLshortenerURLGet@ which the
4747-- 'URLGet'' request conforms to.
48−type UrlGetResource =
48+type URLGetResource =
4949 "url" :>
5050 QueryParam "quotaUser" Text :>
5151 QueryParam "prettyPrint" Bool :>
@@ -165,4 +165,4 @@ instance GoogleRequest URLGet' where
165165 _ugFields
166166 (Just AltJSON)
167167 where go
168− = clientWithRoute (Proxy :: Proxy UrlGetResource) r u
168+ = clientWithRoute (Proxy :: Proxy URLGetResource) r u
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/Insert.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.URLShortener.URL.Insert
2424 (
2525 -- * REST Resource
26− UrlInsertResource
26+ URLInsertResource
2727
2828 -- * Creating a Request
2929 , uRLInsert'
@@ -44,7 +44,7 @@ import Network.Google.URLShortener.Types
4444
4545-- | A resource alias for @URLshortenerURLInsert@ which the
4646-- 'URLInsert'' request conforms to.
47−type UrlInsertResource =
47+type URLInsertResource =
4848 "url" :>
4949 QueryParam "quotaUser" Text :>
5050 QueryParam "prettyPrint" Bool :>
@@ -151,6 +151,6 @@ instance GoogleRequest URLInsert' where
151151 (Just AltJSON)
152152 _uiURL
153153 where go
154− = clientWithRoute (Proxy :: Proxy UrlInsertResource)
154+ = clientWithRoute (Proxy :: Proxy URLInsertResource)
155155 r
156156 u
gogol-urlshortener/gen/Network/Google/Resource/URLShortener/URL/List.hs+3−3
@@ -23,7 +23,7 @@
2323module Network.Google.Resource.URLShortener.URL.List
2424 (
2525 -- * REST Resource
26− UrlListResource
26+ URLListResource
2727
2828 -- * Creating a Request
2929 , uRLList'
@@ -45,7 +45,7 @@ import Network.Google.URLShortener.Types
4545
4646-- | A resource alias for @URLshortenerURLList@ which the
4747-- 'URLList'' request conforms to.
48−type UrlListResource =
48+type URLListResource =
4949 "url" :>
5050 "history" :>
5151 QueryParam "quotaUser" Text :>
@@ -165,5 +165,5 @@ instance GoogleRequest URLList' where
165165 _ulFields
166166 (Just AltJSON)
167167 where go
168− = clientWithRoute (Proxy :: Proxy UrlListResource) r
168+ = clientWithRoute (Proxy :: Proxy URLListResource) r
169169 u
gogol-urlshortener/gen/Network/Google/URLShortener.hs+3−3
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you create, inspect, and manage goo.gl short URLs
15+-- | Lets you create, inspect, and manage goo.gl short URLs
1616--
1717-- /See:/ <https://developers.google.com/url-shortener/v1/getting_started URL Shortener API Reference>
1818module Network.Google.URLShortener
@@ -99,8 +99,8 @@ TODO
9999-}
100100
101101type URLShortenerAPI =
102− UrlInsertResource :<|> UrlListResource :<|>
103− UrlGetResource
102+ URLInsertResource :<|> URLListResource :<|>
103+ URLGetResource
104104
105105uRLShortenerAPI :: Proxy URLShortenerAPI
106106uRLShortenerAPI = Proxy
gogol-useraccounts/gen/Network/Google/UserAccounts.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | API for the Google Cloud User Accounts service.
15+-- | API for the Google Cloud User Accounts service.
1616--
1717-- /See:/ <https://cloud.google.com/compute/docs/access/user-accounts/api/latest/ Cloud User Accounts API Reference>
1818module Network.Google.UserAccounts
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/Get.hsnew file+215
@@ -0,0 +1,215 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.Get
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Retrieves details about crawl errors for a site\'s sample URL.
21+--
22+-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLCrawlErrorsSamplesGet@.
23+module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.Get
24+ (
25+ -- * REST Resource
26+ URLCrawlErrorsSamplesGetResource
27+
28+ -- * Creating a Request
29+ , uRLCrawlErrorsSamplesGet'
30+ , URLCrawlErrorsSamplesGet'
31+
32+ -- * Request Lenses
33+ , ucesgQuotaUser
34+ , ucesgPrettyPrint
35+ , ucesgPlatform
36+ , ucesgUserIP
37+ , ucesgCategory
38+ , ucesgSiteURL
39+ , ucesgURL
40+ , ucesgKey
41+ , ucesgOAuthToken
42+ , ucesgFields
43+ ) where
44+
45+import Network.Google.Prelude
46+import Network.Google.WebmasterTools.Types
47+
48+-- | A resource alias for @WebmastersURLCrawlErrorsSamplesGet@ which the
49+-- 'URLCrawlErrorsSamplesGet'' request conforms to.
50+type URLCrawlErrorsSamplesGetResource =
51+ "sites" :>
52+ Capture "siteUrl" Text :>
53+ "urlCrawlErrorsSamples" :>
54+ Capture "url" Text :>
55+ QueryParam "quotaUser" Text :>
56+ QueryParam "prettyPrint" Bool :>
57+ QueryParam "platform"
58+ WebmastersURLCrawlErrorsSamplesGetPlatform
59+ :>
60+ QueryParam "userIp" Text :>
61+ QueryParam "category"
62+ WebmastersURLCrawlErrorsSamplesGetCategory
63+ :>
64+ QueryParam "key" Key :>
65+ QueryParam "oauth_token" OAuthToken :>
66+ QueryParam "fields" Text :>
67+ QueryParam "alt" AltJSON :>
68+ Get '[JSON] URLCrawlErrorsSample
69+
70+-- | Retrieves details about crawl errors for a site\'s sample URL.
71+--
72+-- /See:/ 'uRLCrawlErrorsSamplesGet'' smart constructor.
73+data URLCrawlErrorsSamplesGet' = URLCrawlErrorsSamplesGet'
74+ { _ucesgQuotaUser :: !(Maybe Text)
75+ , _ucesgPrettyPrint :: !Bool
76+ , _ucesgPlatform :: !WebmastersURLCrawlErrorsSamplesGetPlatform
77+ , _ucesgUserIP :: !(Maybe Text)
78+ , _ucesgCategory :: !WebmastersURLCrawlErrorsSamplesGetCategory
79+ , _ucesgSiteURL :: !Text
80+ , _ucesgURL :: !Text
81+ , _ucesgKey :: !(Maybe Key)
82+ , _ucesgOAuthToken :: !(Maybe OAuthToken)
83+ , _ucesgFields :: !(Maybe Text)
84+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
85+
86+-- | Creates a value of 'URLCrawlErrorsSamplesGet'' with the minimum fields required to make a request.
87+--
88+-- Use one of the following lenses to modify other fields as desired:
89+--
90+-- * 'ucesgQuotaUser'
91+--
92+-- * 'ucesgPrettyPrint'
93+--
94+-- * 'ucesgPlatform'
95+--
96+-- * 'ucesgUserIP'
97+--
98+-- * 'ucesgCategory'
99+--
100+-- * 'ucesgSiteURL'
101+--
102+-- * 'ucesgURL'
103+--
104+-- * 'ucesgKey'
105+--
106+-- * 'ucesgOAuthToken'
107+--
108+-- * 'ucesgFields'
109+uRLCrawlErrorsSamplesGet'
110+ :: WebmastersURLCrawlErrorsSamplesGetPlatform -- ^ 'platform'
111+ -> WebmastersURLCrawlErrorsSamplesGetCategory -- ^ 'category'
112+ -> Text -- ^ 'siteUrl'
113+ -> Text -- ^ 'url'
114+ -> URLCrawlErrorsSamplesGet'
115+uRLCrawlErrorsSamplesGet' pUcesgPlatform_ pUcesgCategory_ pUcesgSiteURL_ pUcesgURL_ =
116+ URLCrawlErrorsSamplesGet'
117+ { _ucesgQuotaUser = Nothing
118+ , _ucesgPrettyPrint = True
119+ , _ucesgPlatform = pUcesgPlatform_
120+ , _ucesgUserIP = Nothing
121+ , _ucesgCategory = pUcesgCategory_
122+ , _ucesgSiteURL = pUcesgSiteURL_
123+ , _ucesgURL = pUcesgURL_
124+ , _ucesgKey = Nothing
125+ , _ucesgOAuthToken = Nothing
126+ , _ucesgFields = Nothing
127+ }
128+
129+-- | Available to use for quota purposes for server-side applications. Can be
130+-- any arbitrary string assigned to a user, but should not exceed 40
131+-- characters. Overrides userIp if both are provided.
132+ucesgQuotaUser :: Lens' URLCrawlErrorsSamplesGet' (Maybe Text)
133+ucesgQuotaUser
134+ = lens _ucesgQuotaUser
135+ (\ s a -> s{_ucesgQuotaUser = a})
136+
137+-- | Returns response with indentations and line breaks.
138+ucesgPrettyPrint :: Lens' URLCrawlErrorsSamplesGet' Bool
139+ucesgPrettyPrint
140+ = lens _ucesgPrettyPrint
141+ (\ s a -> s{_ucesgPrettyPrint = a})
142+
143+-- | The user agent type (platform) that made the request. For example: web
144+ucesgPlatform :: Lens' URLCrawlErrorsSamplesGet' WebmastersURLCrawlErrorsSamplesGetPlatform
145+ucesgPlatform
146+ = lens _ucesgPlatform
147+ (\ s a -> s{_ucesgPlatform = a})
148+
149+-- | IP address of the site where the request originates. Use this if you
150+-- want to enforce per-user limits.
151+ucesgUserIP :: Lens' URLCrawlErrorsSamplesGet' (Maybe Text)
152+ucesgUserIP
153+ = lens _ucesgUserIP (\ s a -> s{_ucesgUserIP = a})
154+
155+-- | The crawl error category. For example: authPermissions
156+ucesgCategory :: Lens' URLCrawlErrorsSamplesGet' WebmastersURLCrawlErrorsSamplesGetCategory
157+ucesgCategory
158+ = lens _ucesgCategory
159+ (\ s a -> s{_ucesgCategory = a})
160+
161+-- | The site\'s URL, including protocol. For example:
162+-- http:\/\/www.example.com\/
163+ucesgSiteURL :: Lens' URLCrawlErrorsSamplesGet' Text
164+ucesgSiteURL
165+ = lens _ucesgSiteURL (\ s a -> s{_ucesgSiteURL = a})
166+
167+-- | The relative path (without the site) of the sample URL. It must be one
168+-- of the URLs returned by list(). For example, for the URL
169+-- https:\/\/www.example.com\/pagename on the site
170+-- https:\/\/www.example.com\/, the url value is pagename
171+ucesgURL :: Lens' URLCrawlErrorsSamplesGet' Text
172+ucesgURL = lens _ucesgURL (\ s a -> s{_ucesgURL = a})
173+
174+-- | API key. Your API key identifies your project and provides you with API
175+-- access, quota, and reports. Required unless you provide an OAuth 2.0
176+-- token.
177+ucesgKey :: Lens' URLCrawlErrorsSamplesGet' (Maybe Key)
178+ucesgKey = lens _ucesgKey (\ s a -> s{_ucesgKey = a})
179+
180+-- | OAuth 2.0 token for the current user.
181+ucesgOAuthToken :: Lens' URLCrawlErrorsSamplesGet' (Maybe OAuthToken)
182+ucesgOAuthToken
183+ = lens _ucesgOAuthToken
184+ (\ s a -> s{_ucesgOAuthToken = a})
185+
186+-- | Selector specifying which fields to include in a partial response.
187+ucesgFields :: Lens' URLCrawlErrorsSamplesGet' (Maybe Text)
188+ucesgFields
189+ = lens _ucesgFields (\ s a -> s{_ucesgFields = a})
190+
191+instance GoogleAuth URLCrawlErrorsSamplesGet' where
192+ authKey = ucesgKey . _Just
193+ authToken = ucesgOAuthToken . _Just
194+
195+instance GoogleRequest URLCrawlErrorsSamplesGet'
196+ where
197+ type Rs URLCrawlErrorsSamplesGet' =
198+ URLCrawlErrorsSample
199+ request = requestWithRoute defReq webmasterToolsURL
200+ requestWithRoute r u URLCrawlErrorsSamplesGet'{..}
201+ = go _ucesgQuotaUser (Just _ucesgPrettyPrint)
202+ (Just _ucesgPlatform)
203+ _ucesgUserIP
204+ (Just _ucesgCategory)
205+ _ucesgSiteURL
206+ _ucesgURL
207+ _ucesgKey
208+ _ucesgOAuthToken
209+ _ucesgFields
210+ (Just AltJSON)
211+ where go
212+ = clientWithRoute
213+ (Proxy :: Proxy URLCrawlErrorsSamplesGetResource)
214+ r
215+ u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/List.hsnew file+202
@@ -0,0 +1,202 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.List
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Lists a site\'s sample URLs for the specified crawl error category and
21+-- platform.
22+--
23+-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLCrawlErrorsSamplesList@.
24+module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.List
25+ (
26+ -- * REST Resource
27+ URLCrawlErrorsSamplesListResource
28+
29+ -- * Creating a Request
30+ , uRLCrawlErrorsSamplesList'
31+ , URLCrawlErrorsSamplesList'
32+
33+ -- * Request Lenses
34+ , uceslQuotaUser
35+ , uceslPrettyPrint
36+ , uceslPlatform
37+ , uceslUserIP
38+ , uceslCategory
39+ , uceslSiteURL
40+ , uceslKey
41+ , uceslOAuthToken
42+ , uceslFields
43+ ) where
44+
45+import Network.Google.Prelude
46+import Network.Google.WebmasterTools.Types
47+
48+-- | A resource alias for @WebmastersURLCrawlErrorsSamplesList@ which the
49+-- 'URLCrawlErrorsSamplesList'' request conforms to.
50+type URLCrawlErrorsSamplesListResource =
51+ "sites" :>
52+ Capture "siteUrl" Text :>
53+ "urlCrawlErrorsSamples" :>
54+ QueryParam "quotaUser" Text :>
55+ QueryParam "prettyPrint" Bool :>
56+ QueryParam "platform"
57+ WebmastersURLCrawlErrorsSamplesListPlatform
58+ :>
59+ QueryParam "userIp" Text :>
60+ QueryParam "category"
61+ WebmastersURLCrawlErrorsSamplesListCategory
62+ :>
63+ QueryParam "key" Key :>
64+ QueryParam "oauth_token" OAuthToken :>
65+ QueryParam "fields" Text :>
66+ QueryParam "alt" AltJSON :>
67+ Get '[JSON] URLCrawlErrorsSamplesListResponse
68+
69+-- | Lists a site\'s sample URLs for the specified crawl error category and
70+-- platform.
71+--
72+-- /See:/ 'uRLCrawlErrorsSamplesList'' smart constructor.
73+data URLCrawlErrorsSamplesList' = URLCrawlErrorsSamplesList'
74+ { _uceslQuotaUser :: !(Maybe Text)
75+ , _uceslPrettyPrint :: !Bool
76+ , _uceslPlatform :: !WebmastersURLCrawlErrorsSamplesListPlatform
77+ , _uceslUserIP :: !(Maybe Text)
78+ , _uceslCategory :: !WebmastersURLCrawlErrorsSamplesListCategory
79+ , _uceslSiteURL :: !Text
80+ , _uceslKey :: !(Maybe Key)
81+ , _uceslOAuthToken :: !(Maybe OAuthToken)
82+ , _uceslFields :: !(Maybe Text)
83+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
84+
85+-- | Creates a value of 'URLCrawlErrorsSamplesList'' with the minimum fields required to make a request.
86+--
87+-- Use one of the following lenses to modify other fields as desired:
88+--
89+-- * 'uceslQuotaUser'
90+--
91+-- * 'uceslPrettyPrint'
92+--
93+-- * 'uceslPlatform'
94+--
95+-- * 'uceslUserIP'
96+--
97+-- * 'uceslCategory'
98+--
99+-- * 'uceslSiteURL'
100+--
101+-- * 'uceslKey'
102+--
103+-- * 'uceslOAuthToken'
104+--
105+-- * 'uceslFields'
106+uRLCrawlErrorsSamplesList'
107+ :: WebmastersURLCrawlErrorsSamplesListPlatform -- ^ 'platform'
108+ -> WebmastersURLCrawlErrorsSamplesListCategory -- ^ 'category'
109+ -> Text -- ^ 'siteUrl'
110+ -> URLCrawlErrorsSamplesList'
111+uRLCrawlErrorsSamplesList' pUceslPlatform_ pUceslCategory_ pUceslSiteURL_ =
112+ URLCrawlErrorsSamplesList'
113+ { _uceslQuotaUser = Nothing
114+ , _uceslPrettyPrint = True
115+ , _uceslPlatform = pUceslPlatform_
116+ , _uceslUserIP = Nothing
117+ , _uceslCategory = pUceslCategory_
118+ , _uceslSiteURL = pUceslSiteURL_
119+ , _uceslKey = Nothing
120+ , _uceslOAuthToken = Nothing
121+ , _uceslFields = Nothing
122+ }
123+
124+-- | Available to use for quota purposes for server-side applications. Can be
125+-- any arbitrary string assigned to a user, but should not exceed 40
126+-- characters. Overrides userIp if both are provided.
127+uceslQuotaUser :: Lens' URLCrawlErrorsSamplesList' (Maybe Text)
128+uceslQuotaUser
129+ = lens _uceslQuotaUser
130+ (\ s a -> s{_uceslQuotaUser = a})
131+
132+-- | Returns response with indentations and line breaks.
133+uceslPrettyPrint :: Lens' URLCrawlErrorsSamplesList' Bool
134+uceslPrettyPrint
135+ = lens _uceslPrettyPrint
136+ (\ s a -> s{_uceslPrettyPrint = a})
137+
138+-- | The user agent type (platform) that made the request. For example: web
139+uceslPlatform :: Lens' URLCrawlErrorsSamplesList' WebmastersURLCrawlErrorsSamplesListPlatform
140+uceslPlatform
141+ = lens _uceslPlatform
142+ (\ s a -> s{_uceslPlatform = a})
143+
144+-- | IP address of the site where the request originates. Use this if you
145+-- want to enforce per-user limits.
146+uceslUserIP :: Lens' URLCrawlErrorsSamplesList' (Maybe Text)
147+uceslUserIP
148+ = lens _uceslUserIP (\ s a -> s{_uceslUserIP = a})
149+
150+-- | The crawl error category. For example: authPermissions
151+uceslCategory :: Lens' URLCrawlErrorsSamplesList' WebmastersURLCrawlErrorsSamplesListCategory
152+uceslCategory
153+ = lens _uceslCategory
154+ (\ s a -> s{_uceslCategory = a})
155+
156+-- | The site\'s URL, including protocol. For example:
157+-- http:\/\/www.example.com\/
158+uceslSiteURL :: Lens' URLCrawlErrorsSamplesList' Text
159+uceslSiteURL
160+ = lens _uceslSiteURL (\ s a -> s{_uceslSiteURL = a})
161+
162+-- | API key. Your API key identifies your project and provides you with API
163+-- access, quota, and reports. Required unless you provide an OAuth 2.0
164+-- token.
165+uceslKey :: Lens' URLCrawlErrorsSamplesList' (Maybe Key)
166+uceslKey = lens _uceslKey (\ s a -> s{_uceslKey = a})
167+
168+-- | OAuth 2.0 token for the current user.
169+uceslOAuthToken :: Lens' URLCrawlErrorsSamplesList' (Maybe OAuthToken)
170+uceslOAuthToken
171+ = lens _uceslOAuthToken
172+ (\ s a -> s{_uceslOAuthToken = a})
173+
174+-- | Selector specifying which fields to include in a partial response.
175+uceslFields :: Lens' URLCrawlErrorsSamplesList' (Maybe Text)
176+uceslFields
177+ = lens _uceslFields (\ s a -> s{_uceslFields = a})
178+
179+instance GoogleAuth URLCrawlErrorsSamplesList' where
180+ authKey = uceslKey . _Just
181+ authToken = uceslOAuthToken . _Just
182+
183+instance GoogleRequest URLCrawlErrorsSamplesList'
184+ where
185+ type Rs URLCrawlErrorsSamplesList' =
186+ URLCrawlErrorsSamplesListResponse
187+ request = requestWithRoute defReq webmasterToolsURL
188+ requestWithRoute r u URLCrawlErrorsSamplesList'{..}
189+ = go _uceslQuotaUser (Just _uceslPrettyPrint)
190+ (Just _uceslPlatform)
191+ _uceslUserIP
192+ (Just _uceslCategory)
193+ _uceslSiteURL
194+ _uceslKey
195+ _uceslOAuthToken
196+ _uceslFields
197+ (Just AltJSON)
198+ where go
199+ = clientWithRoute
200+ (Proxy :: Proxy URLCrawlErrorsSamplesListResource)
201+ r
202+ u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorsSamples/MarkAsFixed.hsnew file+223
@@ -0,0 +1,223 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.MarkAsFixed
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Marks the provided site\'s sample URL as fixed, and removes it from the
21+-- samples list.
22+--
23+-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLCrawlErrorsSamplesMarkAsFixed@.
24+module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.MarkAsFixed
25+ (
26+ -- * REST Resource
27+ URLCrawlErrorsSamplesMarkAsFixedResource
28+
29+ -- * Creating a Request
30+ , uRLCrawlErrorsSamplesMarkAsFixed'
31+ , URLCrawlErrorsSamplesMarkAsFixed'
32+
33+ -- * Request Lenses
34+ , ucesmafQuotaUser
35+ , ucesmafPrettyPrint
36+ , ucesmafPlatform
37+ , ucesmafUserIP
38+ , ucesmafCategory
39+ , ucesmafSiteURL
40+ , ucesmafURL
41+ , ucesmafKey
42+ , ucesmafOAuthToken
43+ , ucesmafFields
44+ ) where
45+
46+import Network.Google.Prelude
47+import Network.Google.WebmasterTools.Types
48+
49+-- | A resource alias for @WebmastersURLCrawlErrorsSamplesMarkAsFixed@ which the
50+-- 'URLCrawlErrorsSamplesMarkAsFixed'' request conforms to.
51+type URLCrawlErrorsSamplesMarkAsFixedResource =
52+ "sites" :>
53+ Capture "siteUrl" Text :>
54+ "urlCrawlErrorsSamples" :>
55+ Capture "url" Text :>
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "platform"
59+ WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
60+ :>
61+ QueryParam "userIp" Text :>
62+ QueryParam "category"
63+ WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
64+ :>
65+ QueryParam "key" Key :>
66+ QueryParam "oauth_token" OAuthToken :>
67+ QueryParam "fields" Text :>
68+ QueryParam "alt" AltJSON :> Delete '[JSON] ()
69+
70+-- | Marks the provided site\'s sample URL as fixed, and removes it from the
71+-- samples list.
72+--
73+-- /See:/ 'uRLCrawlErrorsSamplesMarkAsFixed'' smart constructor.
74+data URLCrawlErrorsSamplesMarkAsFixed' = URLCrawlErrorsSamplesMarkAsFixed'
75+ { _ucesmafQuotaUser :: !(Maybe Text)
76+ , _ucesmafPrettyPrint :: !Bool
77+ , _ucesmafPlatform :: !WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
78+ , _ucesmafUserIP :: !(Maybe Text)
79+ , _ucesmafCategory :: !WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
80+ , _ucesmafSiteURL :: !Text
81+ , _ucesmafURL :: !Text
82+ , _ucesmafKey :: !(Maybe Key)
83+ , _ucesmafOAuthToken :: !(Maybe OAuthToken)
84+ , _ucesmafFields :: !(Maybe Text)
85+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
86+
87+-- | Creates a value of 'URLCrawlErrorsSamplesMarkAsFixed'' with the minimum fields required to make a request.
88+--
89+-- Use one of the following lenses to modify other fields as desired:
90+--
91+-- * 'ucesmafQuotaUser'
92+--
93+-- * 'ucesmafPrettyPrint'
94+--
95+-- * 'ucesmafPlatform'
96+--
97+-- * 'ucesmafUserIP'
98+--
99+-- * 'ucesmafCategory'
100+--
101+-- * 'ucesmafSiteURL'
102+--
103+-- * 'ucesmafURL'
104+--
105+-- * 'ucesmafKey'
106+--
107+-- * 'ucesmafOAuthToken'
108+--
109+-- * 'ucesmafFields'
110+uRLCrawlErrorsSamplesMarkAsFixed'
111+ :: WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform -- ^ 'platform'
112+ -> WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory -- ^ 'category'
113+ -> Text -- ^ 'siteUrl'
114+ -> Text -- ^ 'url'
115+ -> URLCrawlErrorsSamplesMarkAsFixed'
116+uRLCrawlErrorsSamplesMarkAsFixed' pUcesmafPlatform_ pUcesmafCategory_ pUcesmafSiteURL_ pUcesmafURL_ =
117+ URLCrawlErrorsSamplesMarkAsFixed'
118+ { _ucesmafQuotaUser = Nothing
119+ , _ucesmafPrettyPrint = True
120+ , _ucesmafPlatform = pUcesmafPlatform_
121+ , _ucesmafUserIP = Nothing
122+ , _ucesmafCategory = pUcesmafCategory_
123+ , _ucesmafSiteURL = pUcesmafSiteURL_
124+ , _ucesmafURL = pUcesmafURL_
125+ , _ucesmafKey = Nothing
126+ , _ucesmafOAuthToken = Nothing
127+ , _ucesmafFields = Nothing
128+ }
129+
130+-- | Available to use for quota purposes for server-side applications. Can be
131+-- any arbitrary string assigned to a user, but should not exceed 40
132+-- characters. Overrides userIp if both are provided.
133+ucesmafQuotaUser :: Lens' URLCrawlErrorsSamplesMarkAsFixed' (Maybe Text)
134+ucesmafQuotaUser
135+ = lens _ucesmafQuotaUser
136+ (\ s a -> s{_ucesmafQuotaUser = a})
137+
138+-- | Returns response with indentations and line breaks.
139+ucesmafPrettyPrint :: Lens' URLCrawlErrorsSamplesMarkAsFixed' Bool
140+ucesmafPrettyPrint
141+ = lens _ucesmafPrettyPrint
142+ (\ s a -> s{_ucesmafPrettyPrint = a})
143+
144+-- | The user agent type (platform) that made the request. For example: web
145+ucesmafPlatform :: Lens' URLCrawlErrorsSamplesMarkAsFixed' WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
146+ucesmafPlatform
147+ = lens _ucesmafPlatform
148+ (\ s a -> s{_ucesmafPlatform = a})
149+
150+-- | IP address of the site where the request originates. Use this if you
151+-- want to enforce per-user limits.
152+ucesmafUserIP :: Lens' URLCrawlErrorsSamplesMarkAsFixed' (Maybe Text)
153+ucesmafUserIP
154+ = lens _ucesmafUserIP
155+ (\ s a -> s{_ucesmafUserIP = a})
156+
157+-- | The crawl error category. For example: authPermissions
158+ucesmafCategory :: Lens' URLCrawlErrorsSamplesMarkAsFixed' WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
159+ucesmafCategory
160+ = lens _ucesmafCategory
161+ (\ s a -> s{_ucesmafCategory = a})
162+
163+-- | The site\'s URL, including protocol. For example:
164+-- http:\/\/www.example.com\/
165+ucesmafSiteURL :: Lens' URLCrawlErrorsSamplesMarkAsFixed' Text
166+ucesmafSiteURL
167+ = lens _ucesmafSiteURL
168+ (\ s a -> s{_ucesmafSiteURL = a})
169+
170+-- | The relative path (without the site) of the sample URL. It must be one
171+-- of the URLs returned by list(). For example, for the URL
172+-- https:\/\/www.example.com\/pagename on the site
173+-- https:\/\/www.example.com\/, the url value is pagename
174+ucesmafURL :: Lens' URLCrawlErrorsSamplesMarkAsFixed' Text
175+ucesmafURL
176+ = lens _ucesmafURL (\ s a -> s{_ucesmafURL = a})
177+
178+-- | API key. Your API key identifies your project and provides you with API
179+-- access, quota, and reports. Required unless you provide an OAuth 2.0
180+-- token.
181+ucesmafKey :: Lens' URLCrawlErrorsSamplesMarkAsFixed' (Maybe Key)
182+ucesmafKey
183+ = lens _ucesmafKey (\ s a -> s{_ucesmafKey = a})
184+
185+-- | OAuth 2.0 token for the current user.
186+ucesmafOAuthToken :: Lens' URLCrawlErrorsSamplesMarkAsFixed' (Maybe OAuthToken)
187+ucesmafOAuthToken
188+ = lens _ucesmafOAuthToken
189+ (\ s a -> s{_ucesmafOAuthToken = a})
190+
191+-- | Selector specifying which fields to include in a partial response.
192+ucesmafFields :: Lens' URLCrawlErrorsSamplesMarkAsFixed' (Maybe Text)
193+ucesmafFields
194+ = lens _ucesmafFields
195+ (\ s a -> s{_ucesmafFields = a})
196+
197+instance GoogleAuth URLCrawlErrorsSamplesMarkAsFixed'
198+ where
199+ authKey = ucesmafKey . _Just
200+ authToken = ucesmafOAuthToken . _Just
201+
202+instance GoogleRequest
203+ URLCrawlErrorsSamplesMarkAsFixed' where
204+ type Rs URLCrawlErrorsSamplesMarkAsFixed' = ()
205+ request = requestWithRoute defReq webmasterToolsURL
206+ requestWithRoute r u
207+ URLCrawlErrorsSamplesMarkAsFixed'{..}
208+ = go _ucesmafQuotaUser (Just _ucesmafPrettyPrint)
209+ (Just _ucesmafPlatform)
210+ _ucesmafUserIP
211+ (Just _ucesmafCategory)
212+ _ucesmafSiteURL
213+ _ucesmafURL
214+ _ucesmafKey
215+ _ucesmafOAuthToken
216+ _ucesmafFields
217+ (Just AltJSON)
218+ where go
219+ = clientWithRoute
220+ (Proxy ::
221+ Proxy URLCrawlErrorsSamplesMarkAsFixedResource)
222+ r
223+ u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLCrawlErrorscounts/Query.hsnew file+214
@@ -0,0 +1,214 @@
1+{-# LANGUAGE DataKinds #-}
2+{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE DeriveGeneric #-}
4+{-# LANGUAGE OverloadedStrings #-}
5+{-# LANGUAGE RecordWildCards #-}
6+{-# LANGUAGE TypeFamilies #-}
7+{-# LANGUAGE TypeOperators #-}
8+
9+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11+
12+-- |
13+-- Module : Network.Google.Resource.Webmasters.URLCrawlErrorscounts.Query
14+-- Copyright : (c) 2015 Brendan Hay
15+-- License : Mozilla Public License, v. 2.0.
16+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17+-- Stability : auto-generated
18+-- Portability : non-portable (GHC extensions)
19+--
20+-- | Retrieves a time series of the number of URL crawl errors per error
21+-- category and platform.
22+--
23+-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLCrawlErrorscountsQuery@.
24+module Network.Google.Resource.Webmasters.URLCrawlErrorscounts.Query
25+ (
26+ -- * REST Resource
27+ URLCrawlErrorscountsQueryResource
28+
29+ -- * Creating a Request
30+ , uRLCrawlErrorscountsQuery'
31+ , URLCrawlErrorscountsQuery'
32+
33+ -- * Request Lenses
34+ , uceqQuotaUser
35+ , uceqPrettyPrint
36+ , uceqPlatform
37+ , uceqUserIP
38+ , uceqCategory
39+ , uceqSiteURL
40+ , uceqKey
41+ , uceqLatestCountsOnly
42+ , uceqOAuthToken
43+ , uceqFields
44+ ) where
45+
46+import Network.Google.Prelude
47+import Network.Google.WebmasterTools.Types
48+
49+-- | A resource alias for @WebmastersURLCrawlErrorscountsQuery@ which the
50+-- 'URLCrawlErrorscountsQuery'' request conforms to.
51+type URLCrawlErrorscountsQueryResource =
52+ "sites" :>
53+ Capture "siteUrl" Text :>
54+ "urlCrawlErrorsCounts" :>
55+ "query" :>
56+ QueryParam "quotaUser" Text :>
57+ QueryParam "prettyPrint" Bool :>
58+ QueryParam "platform"
59+ WebmastersURLCrawlErrorscountsQueryPlatform
60+ :>
61+ QueryParam "userIp" Text :>
62+ QueryParam "category"
63+ WebmastersURLCrawlErrorscountsQueryCategory
64+ :>
65+ QueryParam "key" Key :>
66+ QueryParam "latestCountsOnly" Bool :>
67+ QueryParam "oauth_token" OAuthToken :>
68+ QueryParam "fields" Text :>
69+ QueryParam "alt" AltJSON :>
70+ Get '[JSON] URLCrawlErrorsCountsQueryResponse
71+
72+-- | Retrieves a time series of the number of URL crawl errors per error
73+-- category and platform.
74+--
75+-- /See:/ 'uRLCrawlErrorscountsQuery'' smart constructor.
76+data URLCrawlErrorscountsQuery' = URLCrawlErrorscountsQuery'
77+ { _uceqQuotaUser :: !(Maybe Text)
78+ , _uceqPrettyPrint :: !Bool
79+ , _uceqPlatform :: !(Maybe WebmastersURLCrawlErrorscountsQueryPlatform)
80+ , _uceqUserIP :: !(Maybe Text)
81+ , _uceqCategory :: !(Maybe WebmastersURLCrawlErrorscountsQueryCategory)
82+ , _uceqSiteURL :: !Text
83+ , _uceqKey :: !(Maybe Key)
84+ , _uceqLatestCountsOnly :: !Bool
85+ , _uceqOAuthToken :: !(Maybe OAuthToken)
86+ , _uceqFields :: !(Maybe Text)
87+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
88+
89+-- | Creates a value of 'URLCrawlErrorscountsQuery'' with the minimum fields required to make a request.
90+--
91+-- Use one of the following lenses to modify other fields as desired:
92+--
93+-- * 'uceqQuotaUser'
94+--
95+-- * 'uceqPrettyPrint'
96+--
97+-- * 'uceqPlatform'
98+--
99+-- * 'uceqUserIP'
100+--
101+-- * 'uceqCategory'
102+--
103+-- * 'uceqSiteURL'
104+--
105+-- * 'uceqKey'
106+--
107+-- * 'uceqLatestCountsOnly'
108+--
109+-- * 'uceqOAuthToken'
110+--
111+-- * 'uceqFields'
112+uRLCrawlErrorscountsQuery'
113+ :: Text -- ^ 'siteUrl'
114+ -> URLCrawlErrorscountsQuery'
115+uRLCrawlErrorscountsQuery' pUceqSiteURL_ =
116+ URLCrawlErrorscountsQuery'
117+ { _uceqQuotaUser = Nothing
118+ , _uceqPrettyPrint = True
119+ , _uceqPlatform = Nothing
120+ , _uceqUserIP = Nothing
121+ , _uceqCategory = Nothing
122+ , _uceqSiteURL = pUceqSiteURL_
123+ , _uceqKey = Nothing
124+ , _uceqLatestCountsOnly = True
125+ , _uceqOAuthToken = Nothing
126+ , _uceqFields = Nothing
127+ }
128+
129+-- | Available to use for quota purposes for server-side applications. Can be
130+-- any arbitrary string assigned to a user, but should not exceed 40
131+-- characters. Overrides userIp if both are provided.
132+uceqQuotaUser :: Lens' URLCrawlErrorscountsQuery' (Maybe Text)
133+uceqQuotaUser
134+ = lens _uceqQuotaUser
135+ (\ s a -> s{_uceqQuotaUser = a})
136+
137+-- | Returns response with indentations and line breaks.
138+uceqPrettyPrint :: Lens' URLCrawlErrorscountsQuery' Bool
139+uceqPrettyPrint
140+ = lens _uceqPrettyPrint
141+ (\ s a -> s{_uceqPrettyPrint = a})
142+
143+-- | The user agent type (platform) that made the request. For example: web.
144+-- If not specified, returns results for all platforms.
145+uceqPlatform :: Lens' URLCrawlErrorscountsQuery' (Maybe WebmastersURLCrawlErrorscountsQueryPlatform)
146+uceqPlatform
147+ = lens _uceqPlatform (\ s a -> s{_uceqPlatform = a})
148+
149+-- | IP address of the site where the request originates. Use this if you
150+-- want to enforce per-user limits.
151+uceqUserIP :: Lens' URLCrawlErrorscountsQuery' (Maybe Text)
152+uceqUserIP
153+ = lens _uceqUserIP (\ s a -> s{_uceqUserIP = a})
154+
155+-- | The crawl error category. For example: serverError. If not specified,
156+-- returns results for all categories.
157+uceqCategory :: Lens' URLCrawlErrorscountsQuery' (Maybe WebmastersURLCrawlErrorscountsQueryCategory)
158+uceqCategory
159+ = lens _uceqCategory (\ s a -> s{_uceqCategory = a})
160+
161+-- | The site\'s URL, including protocol. For example:
162+-- http:\/\/www.example.com\/
163+uceqSiteURL :: Lens' URLCrawlErrorscountsQuery' Text
164+uceqSiteURL
165+ = lens _uceqSiteURL (\ s a -> s{_uceqSiteURL = a})
166+
167+-- | API key. Your API key identifies your project and provides you with API
168+-- access, quota, and reports. Required unless you provide an OAuth 2.0
169+-- token.
170+uceqKey :: Lens' URLCrawlErrorscountsQuery' (Maybe Key)
171+uceqKey = lens _uceqKey (\ s a -> s{_uceqKey = a})
172+
173+-- | If true, returns only the latest crawl error counts.
174+uceqLatestCountsOnly :: Lens' URLCrawlErrorscountsQuery' Bool
175+uceqLatestCountsOnly
176+ = lens _uceqLatestCountsOnly
177+ (\ s a -> s{_uceqLatestCountsOnly = a})
178+
179+-- | OAuth 2.0 token for the current user.
180+uceqOAuthToken :: Lens' URLCrawlErrorscountsQuery' (Maybe OAuthToken)
181+uceqOAuthToken
182+ = lens _uceqOAuthToken
183+ (\ s a -> s{_uceqOAuthToken = a})
184+
185+-- | Selector specifying which fields to include in a partial response.
186+uceqFields :: Lens' URLCrawlErrorscountsQuery' (Maybe Text)
187+uceqFields
188+ = lens _uceqFields (\ s a -> s{_uceqFields = a})
189+
190+instance GoogleAuth URLCrawlErrorscountsQuery' where
191+ authKey = uceqKey . _Just
192+ authToken = uceqOAuthToken . _Just
193+
194+instance GoogleRequest URLCrawlErrorscountsQuery'
195+ where
196+ type Rs URLCrawlErrorscountsQuery' =
197+ URLCrawlErrorsCountsQueryResponse
198+ request = requestWithRoute defReq webmasterToolsURL
199+ requestWithRoute r u URLCrawlErrorscountsQuery'{..}
200+ = go _uceqQuotaUser (Just _uceqPrettyPrint)
201+ _uceqPlatform
202+ _uceqUserIP
203+ _uceqCategory
204+ _uceqSiteURL
205+ _uceqKey
206+ (Just _uceqLatestCountsOnly)
207+ _uceqOAuthToken
208+ _uceqFields
209+ (Just AltJSON)
210+ where go
211+ = clientWithRoute
212+ (Proxy :: Proxy URLCrawlErrorscountsQueryResource)
213+ r
214+ u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorscounts/Query.hsdeleted−209
@@ -1,209 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Webmasters.URLcrawlerrorscounts.Query
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Retrieves a time series of the number of URL crawl errors per error
21−-- category and platform.
22−--
23−-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLcrawlerrorscountsQuery@.
24−module Network.Google.Resource.Webmasters.URLcrawlerrorscounts.Query
25− (
26− -- * REST Resource
27− UrlcrawlerrorscountsQueryResource
28−
29− -- * Creating a Request
30− , uRLcrawlerrorscountsQuery'
31− , URLcrawlerrorscountsQuery'
32−
33− -- * Request Lenses
34− , uqQuotaUser
35− , uqPrettyPrint
36− , uqPlatform
37− , uqUserIP
38− , uqCategory
39− , uqSiteURL
40− , uqKey
41− , uqLatestCountsOnly
42− , uqOAuthToken
43− , uqFields
44− ) where
45−
46−import Network.Google.Prelude
47−import Network.Google.WebmasterTools.Types
48−
49−-- | A resource alias for @WebmastersURLcrawlerrorscountsQuery@ which the
50−-- 'URLcrawlerrorscountsQuery'' request conforms to.
51−type UrlcrawlerrorscountsQueryResource =
52− "sites" :>
53− Capture "siteUrl" Text :>
54− "urlCrawlErrorsCounts" :>
55− "query" :>
56− QueryParam "quotaUser" Text :>
57− QueryParam "prettyPrint" Bool :>
58− QueryParam "platform"
59− WebmastersURLcrawlerrorscountsQueryPlatform
60− :>
61− QueryParam "userIp" Text :>
62− QueryParam "category"
63− WebmastersURLcrawlerrorscountsQueryCategory
64− :>
65− QueryParam "key" Key :>
66− QueryParam "latestCountsOnly" Bool :>
67− QueryParam "oauth_token" OAuthToken :>
68− QueryParam "fields" Text :>
69− QueryParam "alt" AltJSON :>
70− Get '[JSON] URLCrawlErrorsCountsQueryResponse
71−
72−-- | Retrieves a time series of the number of URL crawl errors per error
73−-- category and platform.
74−--
75−-- /See:/ 'uRLcrawlerrorscountsQuery'' smart constructor.
76−data URLcrawlerrorscountsQuery' = URLcrawlerrorscountsQuery'
77− { _uqQuotaUser :: !(Maybe Text)
78− , _uqPrettyPrint :: !Bool
79− , _uqPlatform :: !(Maybe WebmastersURLcrawlerrorscountsQueryPlatform)
80− , _uqUserIP :: !(Maybe Text)
81− , _uqCategory :: !(Maybe WebmastersURLcrawlerrorscountsQueryCategory)
82− , _uqSiteURL :: !Text
83− , _uqKey :: !(Maybe Key)
84− , _uqLatestCountsOnly :: !Bool
85− , _uqOAuthToken :: !(Maybe OAuthToken)
86− , _uqFields :: !(Maybe Text)
87− } deriving (Eq,Read,Show,Data,Typeable,Generic)
88−
89−-- | Creates a value of 'URLcrawlerrorscountsQuery'' with the minimum fields required to make a request.
90−--
91−-- Use one of the following lenses to modify other fields as desired:
92−--
93−-- * 'uqQuotaUser'
94−--
95−-- * 'uqPrettyPrint'
96−--
97−-- * 'uqPlatform'
98−--
99−-- * 'uqUserIP'
100−--
101−-- * 'uqCategory'
102−--
103−-- * 'uqSiteURL'
104−--
105−-- * 'uqKey'
106−--
107−-- * 'uqLatestCountsOnly'
108−--
109−-- * 'uqOAuthToken'
110−--
111−-- * 'uqFields'
112−uRLcrawlerrorscountsQuery'
113− :: Text -- ^ 'siteUrl'
114− -> URLcrawlerrorscountsQuery'
115−uRLcrawlerrorscountsQuery' pUqSiteURL_ =
116− URLcrawlerrorscountsQuery'
117− { _uqQuotaUser = Nothing
118− , _uqPrettyPrint = True
119− , _uqPlatform = Nothing
120− , _uqUserIP = Nothing
121− , _uqCategory = Nothing
122− , _uqSiteURL = pUqSiteURL_
123− , _uqKey = Nothing
124− , _uqLatestCountsOnly = True
125− , _uqOAuthToken = Nothing
126− , _uqFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−uqQuotaUser :: Lens' URLcrawlerrorscountsQuery' (Maybe Text)
133−uqQuotaUser
134− = lens _uqQuotaUser (\ s a -> s{_uqQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−uqPrettyPrint :: Lens' URLcrawlerrorscountsQuery' Bool
138−uqPrettyPrint
139− = lens _uqPrettyPrint
140− (\ s a -> s{_uqPrettyPrint = a})
141−
142−-- | The user agent type (platform) that made the request. For example: web.
143−-- If not specified, returns results for all platforms.
144−uqPlatform :: Lens' URLcrawlerrorscountsQuery' (Maybe WebmastersURLcrawlerrorscountsQueryPlatform)
145−uqPlatform
146− = lens _uqPlatform (\ s a -> s{_uqPlatform = a})
147−
148−-- | IP address of the site where the request originates. Use this if you
149−-- want to enforce per-user limits.
150−uqUserIP :: Lens' URLcrawlerrorscountsQuery' (Maybe Text)
151−uqUserIP = lens _uqUserIP (\ s a -> s{_uqUserIP = a})
152−
153−-- | The crawl error category. For example: serverError. If not specified,
154−-- returns results for all categories.
155−uqCategory :: Lens' URLcrawlerrorscountsQuery' (Maybe WebmastersURLcrawlerrorscountsQueryCategory)
156−uqCategory
157− = lens _uqCategory (\ s a -> s{_uqCategory = a})
158−
159−-- | The site\'s URL, including protocol. For example:
160−-- http:\/\/www.example.com\/
161−uqSiteURL :: Lens' URLcrawlerrorscountsQuery' Text
162−uqSiteURL
163− = lens _uqSiteURL (\ s a -> s{_uqSiteURL = a})
164−
165−-- | API key. Your API key identifies your project and provides you with API
166−-- access, quota, and reports. Required unless you provide an OAuth 2.0
167−-- token.
168−uqKey :: Lens' URLcrawlerrorscountsQuery' (Maybe Key)
169−uqKey = lens _uqKey (\ s a -> s{_uqKey = a})
170−
171−-- | If true, returns only the latest crawl error counts.
172−uqLatestCountsOnly :: Lens' URLcrawlerrorscountsQuery' Bool
173−uqLatestCountsOnly
174− = lens _uqLatestCountsOnly
175− (\ s a -> s{_uqLatestCountsOnly = a})
176−
177−-- | OAuth 2.0 token for the current user.
178−uqOAuthToken :: Lens' URLcrawlerrorscountsQuery' (Maybe OAuthToken)
179−uqOAuthToken
180− = lens _uqOAuthToken (\ s a -> s{_uqOAuthToken = a})
181−
182−-- | Selector specifying which fields to include in a partial response.
183−uqFields :: Lens' URLcrawlerrorscountsQuery' (Maybe Text)
184−uqFields = lens _uqFields (\ s a -> s{_uqFields = a})
185−
186−instance GoogleAuth URLcrawlerrorscountsQuery' where
187− authKey = uqKey . _Just
188− authToken = uqOAuthToken . _Just
189−
190−instance GoogleRequest URLcrawlerrorscountsQuery'
191− where
192− type Rs URLcrawlerrorscountsQuery' =
193− URLCrawlErrorsCountsQueryResponse
194− request = requestWithRoute defReq webmasterToolsURL
195− requestWithRoute r u URLcrawlerrorscountsQuery'{..}
196− = go _uqQuotaUser (Just _uqPrettyPrint) _uqPlatform
197− _uqUserIP
198− _uqCategory
199− _uqSiteURL
200− _uqKey
201− (Just _uqLatestCountsOnly)
202− _uqOAuthToken
203− _uqFields
204− (Just AltJSON)
205− where go
206− = clientWithRoute
207− (Proxy :: Proxy UrlcrawlerrorscountsQueryResource)
208− r
209− u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/Get.hsdeleted−209
@@ -1,209 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Webmasters.URLcrawlerrorssamples.Get
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Retrieves details about crawl errors for a site\'s sample URL.
21−--
22−-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLcrawlerrorssamplesGet@.
23−module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.Get
24− (
25− -- * REST Resource
26− UrlcrawlerrorssamplesGetResource
27−
28− -- * Creating a Request
29− , uRLcrawlerrorssamplesGet'
30− , URLcrawlerrorssamplesGet'
31−
32− -- * Request Lenses
33− , ugQuotaUser
34− , ugPrettyPrint
35− , ugPlatform
36− , ugUserIP
37− , ugCategory
38− , ugSiteURL
39− , ugURL
40− , ugKey
41− , ugOAuthToken
42− , ugFields
43− ) where
44−
45−import Network.Google.Prelude
46−import Network.Google.WebmasterTools.Types
47−
48−-- | A resource alias for @WebmastersURLcrawlerrorssamplesGet@ which the
49−-- 'URLcrawlerrorssamplesGet'' request conforms to.
50−type UrlcrawlerrorssamplesGetResource =
51− "sites" :>
52− Capture "siteUrl" Text :>
53− "urlCrawlErrorsSamples" :>
54− Capture "url" Text :>
55− QueryParam "quotaUser" Text :>
56− QueryParam "prettyPrint" Bool :>
57− QueryParam "platform"
58− WebmastersURLcrawlerrorssamplesGetPlatform
59− :>
60− QueryParam "userIp" Text :>
61− QueryParam "category"
62− WebmastersURLcrawlerrorssamplesGetCategory
63− :>
64− QueryParam "key" Key :>
65− QueryParam "oauth_token" OAuthToken :>
66− QueryParam "fields" Text :>
67− QueryParam "alt" AltJSON :>
68− Get '[JSON] URLCrawlErrorsSample
69−
70−-- | Retrieves details about crawl errors for a site\'s sample URL.
71−--
72−-- /See:/ 'uRLcrawlerrorssamplesGet'' smart constructor.
73−data URLcrawlerrorssamplesGet' = URLcrawlerrorssamplesGet'
74− { _ugQuotaUser :: !(Maybe Text)
75− , _ugPrettyPrint :: !Bool
76− , _ugPlatform :: !WebmastersURLcrawlerrorssamplesGetPlatform
77− , _ugUserIP :: !(Maybe Text)
78− , _ugCategory :: !WebmastersURLcrawlerrorssamplesGetCategory
79− , _ugSiteURL :: !Text
80− , _ugURL :: !Text
81− , _ugKey :: !(Maybe Key)
82− , _ugOAuthToken :: !(Maybe OAuthToken)
83− , _ugFields :: !(Maybe Text)
84− } deriving (Eq,Read,Show,Data,Typeable,Generic)
85−
86−-- | Creates a value of 'URLcrawlerrorssamplesGet'' with the minimum fields required to make a request.
87−--
88−-- Use one of the following lenses to modify other fields as desired:
89−--
90−-- * 'ugQuotaUser'
91−--
92−-- * 'ugPrettyPrint'
93−--
94−-- * 'ugPlatform'
95−--
96−-- * 'ugUserIP'
97−--
98−-- * 'ugCategory'
99−--
100−-- * 'ugSiteURL'
101−--
102−-- * 'ugURL'
103−--
104−-- * 'ugKey'
105−--
106−-- * 'ugOAuthToken'
107−--
108−-- * 'ugFields'
109−uRLcrawlerrorssamplesGet'
110− :: WebmastersURLcrawlerrorssamplesGetPlatform -- ^ 'platform'
111− -> WebmastersURLcrawlerrorssamplesGetCategory -- ^ 'category'
112− -> Text -- ^ 'siteUrl'
113− -> Text -- ^ 'url'
114− -> URLcrawlerrorssamplesGet'
115−uRLcrawlerrorssamplesGet' pUgPlatform_ pUgCategory_ pUgSiteURL_ pUgURL_ =
116− URLcrawlerrorssamplesGet'
117− { _ugQuotaUser = Nothing
118− , _ugPrettyPrint = True
119− , _ugPlatform = pUgPlatform_
120− , _ugUserIP = Nothing
121− , _ugCategory = pUgCategory_
122− , _ugSiteURL = pUgSiteURL_
123− , _ugURL = pUgURL_
124− , _ugKey = Nothing
125− , _ugOAuthToken = Nothing
126− , _ugFields = Nothing
127− }
128−
129−-- | Available to use for quota purposes for server-side applications. Can be
130−-- any arbitrary string assigned to a user, but should not exceed 40
131−-- characters. Overrides userIp if both are provided.
132−ugQuotaUser :: Lens' URLcrawlerrorssamplesGet' (Maybe Text)
133−ugQuotaUser
134− = lens _ugQuotaUser (\ s a -> s{_ugQuotaUser = a})
135−
136−-- | Returns response with indentations and line breaks.
137−ugPrettyPrint :: Lens' URLcrawlerrorssamplesGet' Bool
138−ugPrettyPrint
139− = lens _ugPrettyPrint
140− (\ s a -> s{_ugPrettyPrint = a})
141−
142−-- | The user agent type (platform) that made the request. For example: web
143−ugPlatform :: Lens' URLcrawlerrorssamplesGet' WebmastersURLcrawlerrorssamplesGetPlatform
144−ugPlatform
145− = lens _ugPlatform (\ s a -> s{_ugPlatform = a})
146−
147−-- | IP address of the site where the request originates. Use this if you
148−-- want to enforce per-user limits.
149−ugUserIP :: Lens' URLcrawlerrorssamplesGet' (Maybe Text)
150−ugUserIP = lens _ugUserIP (\ s a -> s{_ugUserIP = a})
151−
152−-- | The crawl error category. For example: authPermissions
153−ugCategory :: Lens' URLcrawlerrorssamplesGet' WebmastersURLcrawlerrorssamplesGetCategory
154−ugCategory
155− = lens _ugCategory (\ s a -> s{_ugCategory = a})
156−
157−-- | The site\'s URL, including protocol. For example:
158−-- http:\/\/www.example.com\/
159−ugSiteURL :: Lens' URLcrawlerrorssamplesGet' Text
160−ugSiteURL
161− = lens _ugSiteURL (\ s a -> s{_ugSiteURL = a})
162−
163−-- | The relative path (without the site) of the sample URL. It must be one
164−-- of the URLs returned by list(). For example, for the URL
165−-- https:\/\/www.example.com\/pagename on the site
166−-- https:\/\/www.example.com\/, the url value is pagename
167−ugURL :: Lens' URLcrawlerrorssamplesGet' Text
168−ugURL = lens _ugURL (\ s a -> s{_ugURL = a})
169−
170−-- | API key. Your API key identifies your project and provides you with API
171−-- access, quota, and reports. Required unless you provide an OAuth 2.0
172−-- token.
173−ugKey :: Lens' URLcrawlerrorssamplesGet' (Maybe Key)
174−ugKey = lens _ugKey (\ s a -> s{_ugKey = a})
175−
176−-- | OAuth 2.0 token for the current user.
177−ugOAuthToken :: Lens' URLcrawlerrorssamplesGet' (Maybe OAuthToken)
178−ugOAuthToken
179− = lens _ugOAuthToken (\ s a -> s{_ugOAuthToken = a})
180−
181−-- | Selector specifying which fields to include in a partial response.
182−ugFields :: Lens' URLcrawlerrorssamplesGet' (Maybe Text)
183−ugFields = lens _ugFields (\ s a -> s{_ugFields = a})
184−
185−instance GoogleAuth URLcrawlerrorssamplesGet' where
186− authKey = ugKey . _Just
187− authToken = ugOAuthToken . _Just
188−
189−instance GoogleRequest URLcrawlerrorssamplesGet'
190− where
191− type Rs URLcrawlerrorssamplesGet' =
192− URLCrawlErrorsSample
193− request = requestWithRoute defReq webmasterToolsURL
194− requestWithRoute r u URLcrawlerrorssamplesGet'{..}
195− = go _ugQuotaUser (Just _ugPrettyPrint)
196− (Just _ugPlatform)
197− _ugUserIP
198− (Just _ugCategory)
199− _ugSiteURL
200− _ugURL
201− _ugKey
202− _ugOAuthToken
203− _ugFields
204− (Just AltJSON)
205− where go
206− = clientWithRoute
207− (Proxy :: Proxy UrlcrawlerrorssamplesGetResource)
208− r
209− u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/List.hsdeleted−196
@@ -1,196 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Webmasters.URLcrawlerrorssamples.List
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Lists a site\'s sample URLs for the specified crawl error category and
21−-- platform.
22−--
23−-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLcrawlerrorssamplesList@.
24−module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.List
25− (
26− -- * REST Resource
27− UrlcrawlerrorssamplesListResource
28−
29− -- * Creating a Request
30− , uRLcrawlerrorssamplesList'
31− , URLcrawlerrorssamplesList'
32−
33− -- * Request Lenses
34− , ulQuotaUser
35− , ulPrettyPrint
36− , ulPlatform
37− , ulUserIP
38− , ulCategory
39− , ulSiteURL
40− , ulKey
41− , ulOAuthToken
42− , ulFields
43− ) where
44−
45−import Network.Google.Prelude
46−import Network.Google.WebmasterTools.Types
47−
48−-- | A resource alias for @WebmastersURLcrawlerrorssamplesList@ which the
49−-- 'URLcrawlerrorssamplesList'' request conforms to.
50−type UrlcrawlerrorssamplesListResource =
51− "sites" :>
52− Capture "siteUrl" Text :>
53− "urlCrawlErrorsSamples" :>
54− QueryParam "quotaUser" Text :>
55− QueryParam "prettyPrint" Bool :>
56− QueryParam "platform"
57− WebmastersURLcrawlerrorssamplesListPlatform
58− :>
59− QueryParam "userIp" Text :>
60− QueryParam "category"
61− WebmastersURLcrawlerrorssamplesListCategory
62− :>
63− QueryParam "key" Key :>
64− QueryParam "oauth_token" OAuthToken :>
65− QueryParam "fields" Text :>
66− QueryParam "alt" AltJSON :>
67− Get '[JSON] URLCrawlErrorsSamplesListResponse
68−
69−-- | Lists a site\'s sample URLs for the specified crawl error category and
70−-- platform.
71−--
72−-- /See:/ 'uRLcrawlerrorssamplesList'' smart constructor.
73−data URLcrawlerrorssamplesList' = URLcrawlerrorssamplesList'
74− { _ulQuotaUser :: !(Maybe Text)
75− , _ulPrettyPrint :: !Bool
76− , _ulPlatform :: !WebmastersURLcrawlerrorssamplesListPlatform
77− , _ulUserIP :: !(Maybe Text)
78− , _ulCategory :: !WebmastersURLcrawlerrorssamplesListCategory
79− , _ulSiteURL :: !Text
80− , _ulKey :: !(Maybe Key)
81− , _ulOAuthToken :: !(Maybe OAuthToken)
82− , _ulFields :: !(Maybe Text)
83− } deriving (Eq,Read,Show,Data,Typeable,Generic)
84−
85−-- | Creates a value of 'URLcrawlerrorssamplesList'' with the minimum fields required to make a request.
86−--
87−-- Use one of the following lenses to modify other fields as desired:
88−--
89−-- * 'ulQuotaUser'
90−--
91−-- * 'ulPrettyPrint'
92−--
93−-- * 'ulPlatform'
94−--
95−-- * 'ulUserIP'
96−--
97−-- * 'ulCategory'
98−--
99−-- * 'ulSiteURL'
100−--
101−-- * 'ulKey'
102−--
103−-- * 'ulOAuthToken'
104−--
105−-- * 'ulFields'
106−uRLcrawlerrorssamplesList'
107− :: WebmastersURLcrawlerrorssamplesListPlatform -- ^ 'platform'
108− -> WebmastersURLcrawlerrorssamplesListCategory -- ^ 'category'
109− -> Text -- ^ 'siteUrl'
110− -> URLcrawlerrorssamplesList'
111−uRLcrawlerrorssamplesList' pUlPlatform_ pUlCategory_ pUlSiteURL_ =
112− URLcrawlerrorssamplesList'
113− { _ulQuotaUser = Nothing
114− , _ulPrettyPrint = True
115− , _ulPlatform = pUlPlatform_
116− , _ulUserIP = Nothing
117− , _ulCategory = pUlCategory_
118− , _ulSiteURL = pUlSiteURL_
119− , _ulKey = Nothing
120− , _ulOAuthToken = Nothing
121− , _ulFields = Nothing
122− }
123−
124−-- | Available to use for quota purposes for server-side applications. Can be
125−-- any arbitrary string assigned to a user, but should not exceed 40
126−-- characters. Overrides userIp if both are provided.
127−ulQuotaUser :: Lens' URLcrawlerrorssamplesList' (Maybe Text)
128−ulQuotaUser
129− = lens _ulQuotaUser (\ s a -> s{_ulQuotaUser = a})
130−
131−-- | Returns response with indentations and line breaks.
132−ulPrettyPrint :: Lens' URLcrawlerrorssamplesList' Bool
133−ulPrettyPrint
134− = lens _ulPrettyPrint
135− (\ s a -> s{_ulPrettyPrint = a})
136−
137−-- | The user agent type (platform) that made the request. For example: web
138−ulPlatform :: Lens' URLcrawlerrorssamplesList' WebmastersURLcrawlerrorssamplesListPlatform
139−ulPlatform
140− = lens _ulPlatform (\ s a -> s{_ulPlatform = a})
141−
142−-- | IP address of the site where the request originates. Use this if you
143−-- want to enforce per-user limits.
144−ulUserIP :: Lens' URLcrawlerrorssamplesList' (Maybe Text)
145−ulUserIP = lens _ulUserIP (\ s a -> s{_ulUserIP = a})
146−
147−-- | The crawl error category. For example: authPermissions
148−ulCategory :: Lens' URLcrawlerrorssamplesList' WebmastersURLcrawlerrorssamplesListCategory
149−ulCategory
150− = lens _ulCategory (\ s a -> s{_ulCategory = a})
151−
152−-- | The site\'s URL, including protocol. For example:
153−-- http:\/\/www.example.com\/
154−ulSiteURL :: Lens' URLcrawlerrorssamplesList' Text
155−ulSiteURL
156− = lens _ulSiteURL (\ s a -> s{_ulSiteURL = a})
157−
158−-- | API key. Your API key identifies your project and provides you with API
159−-- access, quota, and reports. Required unless you provide an OAuth 2.0
160−-- token.
161−ulKey :: Lens' URLcrawlerrorssamplesList' (Maybe Key)
162−ulKey = lens _ulKey (\ s a -> s{_ulKey = a})
163−
164−-- | OAuth 2.0 token for the current user.
165−ulOAuthToken :: Lens' URLcrawlerrorssamplesList' (Maybe OAuthToken)
166−ulOAuthToken
167− = lens _ulOAuthToken (\ s a -> s{_ulOAuthToken = a})
168−
169−-- | Selector specifying which fields to include in a partial response.
170−ulFields :: Lens' URLcrawlerrorssamplesList' (Maybe Text)
171−ulFields = lens _ulFields (\ s a -> s{_ulFields = a})
172−
173−instance GoogleAuth URLcrawlerrorssamplesList' where
174− authKey = ulKey . _Just
175− authToken = ulOAuthToken . _Just
176−
177−instance GoogleRequest URLcrawlerrorssamplesList'
178− where
179− type Rs URLcrawlerrorssamplesList' =
180− URLCrawlErrorsSamplesListResponse
181− request = requestWithRoute defReq webmasterToolsURL
182− requestWithRoute r u URLcrawlerrorssamplesList'{..}
183− = go _ulQuotaUser (Just _ulPrettyPrint)
184− (Just _ulPlatform)
185− _ulUserIP
186− (Just _ulCategory)
187− _ulSiteURL
188− _ulKey
189− _ulOAuthToken
190− _ulFields
191− (Just AltJSON)
192− where go
193− = clientWithRoute
194− (Proxy :: Proxy UrlcrawlerrorssamplesListResource)
195− r
196− u
gogol-webmaster-tools/gen/Network/Google/Resource/Webmasters/URLcrawlerrorssamples/MarkAsFixed.hsdeleted−216
@@ -1,216 +0,0 @@
1−{-# LANGUAGE DataKinds #-}
2−{-# LANGUAGE DeriveDataTypeable #-}
3−{-# LANGUAGE DeriveGeneric #-}
4−{-# LANGUAGE OverloadedStrings #-}
5−{-# LANGUAGE RecordWildCards #-}
6−{-# LANGUAGE TypeFamilies #-}
7−{-# LANGUAGE TypeOperators #-}
8−
9−{-# OPTIONS_GHC -fno-warn-unused-imports #-}
10−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
11−
12−-- |
13−-- Module : Network.Google.Resource.Webmasters.URLcrawlerrorssamples.MarkAsFixed
14−-- Copyright : (c) 2015 Brendan Hay
15−-- License : Mozilla Public License, v. 2.0.
16−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
17−-- Stability : auto-generated
18−-- Portability : non-portable (GHC extensions)
19−--
20−-- | Marks the provided site\'s sample URL as fixed, and removes it from the
21−-- samples list.
22−--
23−-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference> for @WebmastersURLcrawlerrorssamplesMarkAsFixed@.
24−module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.MarkAsFixed
25− (
26− -- * REST Resource
27− UrlcrawlerrorssamplesMarkAsFixedResource
28−
29− -- * Creating a Request
30− , uRLcrawlerrorssamplesMarkAsFixed'
31− , URLcrawlerrorssamplesMarkAsFixed'
32−
33− -- * Request Lenses
34− , umafQuotaUser
35− , umafPrettyPrint
36− , umafPlatform
37− , umafUserIP
38− , umafCategory
39− , umafSiteURL
40− , umafURL
41− , umafKey
42− , umafOAuthToken
43− , umafFields
44− ) where
45−
46−import Network.Google.Prelude
47−import Network.Google.WebmasterTools.Types
48−
49−-- | A resource alias for @WebmastersURLcrawlerrorssamplesMarkAsFixed@ which the
50−-- 'URLcrawlerrorssamplesMarkAsFixed'' request conforms to.
51−type UrlcrawlerrorssamplesMarkAsFixedResource =
52− "sites" :>
53− Capture "siteUrl" Text :>
54− "urlCrawlErrorsSamples" :>
55− Capture "url" Text :>
56− QueryParam "quotaUser" Text :>
57− QueryParam "prettyPrint" Bool :>
58− QueryParam "platform"
59− WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
60− :>
61− QueryParam "userIp" Text :>
62− QueryParam "category"
63− WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
64− :>
65− QueryParam "key" Key :>
66− QueryParam "oauth_token" OAuthToken :>
67− QueryParam "fields" Text :>
68− QueryParam "alt" AltJSON :> Delete '[JSON] ()
69−
70−-- | Marks the provided site\'s sample URL as fixed, and removes it from the
71−-- samples list.
72−--
73−-- /See:/ 'uRLcrawlerrorssamplesMarkAsFixed'' smart constructor.
74−data URLcrawlerrorssamplesMarkAsFixed' = URLcrawlerrorssamplesMarkAsFixed'
75− { _umafQuotaUser :: !(Maybe Text)
76− , _umafPrettyPrint :: !Bool
77− , _umafPlatform :: !WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
78− , _umafUserIP :: !(Maybe Text)
79− , _umafCategory :: !WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
80− , _umafSiteURL :: !Text
81− , _umafURL :: !Text
82− , _umafKey :: !(Maybe Key)
83− , _umafOAuthToken :: !(Maybe OAuthToken)
84− , _umafFields :: !(Maybe Text)
85− } deriving (Eq,Read,Show,Data,Typeable,Generic)
86−
87−-- | Creates a value of 'URLcrawlerrorssamplesMarkAsFixed'' with the minimum fields required to make a request.
88−--
89−-- Use one of the following lenses to modify other fields as desired:
90−--
91−-- * 'umafQuotaUser'
92−--
93−-- * 'umafPrettyPrint'
94−--
95−-- * 'umafPlatform'
96−--
97−-- * 'umafUserIP'
98−--
99−-- * 'umafCategory'
100−--
101−-- * 'umafSiteURL'
102−--
103−-- * 'umafURL'
104−--
105−-- * 'umafKey'
106−--
107−-- * 'umafOAuthToken'
108−--
109−-- * 'umafFields'
110−uRLcrawlerrorssamplesMarkAsFixed'
111− :: WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform -- ^ 'platform'
112− -> WebmastersURLcrawlerrorssamplesMarkAsFixedCategory -- ^ 'category'
113− -> Text -- ^ 'siteUrl'
114− -> Text -- ^ 'url'
115− -> URLcrawlerrorssamplesMarkAsFixed'
116−uRLcrawlerrorssamplesMarkAsFixed' pUmafPlatform_ pUmafCategory_ pUmafSiteURL_ pUmafURL_ =
117− URLcrawlerrorssamplesMarkAsFixed'
118− { _umafQuotaUser = Nothing
119− , _umafPrettyPrint = True
120− , _umafPlatform = pUmafPlatform_
121− , _umafUserIP = Nothing
122− , _umafCategory = pUmafCategory_
123− , _umafSiteURL = pUmafSiteURL_
124− , _umafURL = pUmafURL_
125− , _umafKey = Nothing
126− , _umafOAuthToken = Nothing
127− , _umafFields = Nothing
128− }
129−
130−-- | Available to use for quota purposes for server-side applications. Can be
131−-- any arbitrary string assigned to a user, but should not exceed 40
132−-- characters. Overrides userIp if both are provided.
133−umafQuotaUser :: Lens' URLcrawlerrorssamplesMarkAsFixed' (Maybe Text)
134−umafQuotaUser
135− = lens _umafQuotaUser
136− (\ s a -> s{_umafQuotaUser = a})
137−
138−-- | Returns response with indentations and line breaks.
139−umafPrettyPrint :: Lens' URLcrawlerrorssamplesMarkAsFixed' Bool
140−umafPrettyPrint
141− = lens _umafPrettyPrint
142− (\ s a -> s{_umafPrettyPrint = a})
143−
144−-- | The user agent type (platform) that made the request. For example: web
145−umafPlatform :: Lens' URLcrawlerrorssamplesMarkAsFixed' WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
146−umafPlatform
147− = lens _umafPlatform (\ s a -> s{_umafPlatform = a})
148−
149−-- | IP address of the site where the request originates. Use this if you
150−-- want to enforce per-user limits.
151−umafUserIP :: Lens' URLcrawlerrorssamplesMarkAsFixed' (Maybe Text)
152−umafUserIP
153− = lens _umafUserIP (\ s a -> s{_umafUserIP = a})
154−
155−-- | The crawl error category. For example: authPermissions
156−umafCategory :: Lens' URLcrawlerrorssamplesMarkAsFixed' WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
157−umafCategory
158− = lens _umafCategory (\ s a -> s{_umafCategory = a})
159−
160−-- | The site\'s URL, including protocol. For example:
161−-- http:\/\/www.example.com\/
162−umafSiteURL :: Lens' URLcrawlerrorssamplesMarkAsFixed' Text
163−umafSiteURL
164− = lens _umafSiteURL (\ s a -> s{_umafSiteURL = a})
165−
166−-- | The relative path (without the site) of the sample URL. It must be one
167−-- of the URLs returned by list(). For example, for the URL
168−-- https:\/\/www.example.com\/pagename on the site
169−-- https:\/\/www.example.com\/, the url value is pagename
170−umafURL :: Lens' URLcrawlerrorssamplesMarkAsFixed' Text
171−umafURL = lens _umafURL (\ s a -> s{_umafURL = a})
172−
173−-- | API key. Your API key identifies your project and provides you with API
174−-- access, quota, and reports. Required unless you provide an OAuth 2.0
175−-- token.
176−umafKey :: Lens' URLcrawlerrorssamplesMarkAsFixed' (Maybe Key)
177−umafKey = lens _umafKey (\ s a -> s{_umafKey = a})
178−
179−-- | OAuth 2.0 token for the current user.
180−umafOAuthToken :: Lens' URLcrawlerrorssamplesMarkAsFixed' (Maybe OAuthToken)
181−umafOAuthToken
182− = lens _umafOAuthToken
183− (\ s a -> s{_umafOAuthToken = a})
184−
185−-- | Selector specifying which fields to include in a partial response.
186−umafFields :: Lens' URLcrawlerrorssamplesMarkAsFixed' (Maybe Text)
187−umafFields
188− = lens _umafFields (\ s a -> s{_umafFields = a})
189−
190−instance GoogleAuth URLcrawlerrorssamplesMarkAsFixed'
191− where
192− authKey = umafKey . _Just
193− authToken = umafOAuthToken . _Just
194−
195−instance GoogleRequest
196− URLcrawlerrorssamplesMarkAsFixed' where
197− type Rs URLcrawlerrorssamplesMarkAsFixed' = ()
198− request = requestWithRoute defReq webmasterToolsURL
199− requestWithRoute r u
200− URLcrawlerrorssamplesMarkAsFixed'{..}
201− = go _umafQuotaUser (Just _umafPrettyPrint)
202− (Just _umafPlatform)
203− _umafUserIP
204− (Just _umafCategory)
205− _umafSiteURL
206− _umafURL
207− _umafKey
208− _umafOAuthToken
209− _umafFields
210− (Just AltJSON)
211− where go
212− = clientWithRoute
213− (Proxy ::
214− Proxy UrlcrawlerrorssamplesMarkAsFixedResource)
215− r
216− u
gogol-webmaster-tools/gen/Network/Google/WebmasterTools.hs+33−33
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Lets you view Google Webmaster Tools data for your verified sites.
15+-- | Lets you view Google Webmaster Tools data for your verified sites.
1616--
1717-- /See:/ <https://developers.google.com/webmaster-tools/ Webmaster Tools API Reference>
1818module Network.Google.WebmasterTools
@@ -53,17 +53,17 @@ module Network.Google.WebmasterTools
5353 -- ** WebmastersSitesList
5454 , module Network.Google.Resource.Webmasters.Sites.List
5555
56− -- ** WebmastersURLcrawlerrorscountsQuery
57− , module Network.Google.Resource.Webmasters.URLcrawlerrorscounts.Query
56+ -- ** WebmastersURLCrawlErrorscountsQuery
57+ , module Network.Google.Resource.Webmasters.URLCrawlErrorscounts.Query
5858
59− -- ** WebmastersURLcrawlerrorssamplesGet
60− , module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.Get
59+ -- ** WebmastersURLCrawlErrorsSamplesGet
60+ , module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.Get
6161
62− -- ** WebmastersURLcrawlerrorssamplesList
63− , module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.List
62+ -- ** WebmastersURLCrawlErrorsSamplesList
63+ , module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.List
6464
65− -- ** WebmastersURLcrawlerrorssamplesMarkAsFixed
66− , module Network.Google.Resource.Webmasters.URLcrawlerrorssamples.MarkAsFixed
65+ -- ** WebmastersURLCrawlErrorsSamplesMarkAsFixed
66+ , module Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.MarkAsFixed
6767
6868 -- * Types
6969
@@ -115,8 +115,8 @@ module Network.Google.WebmasterTools
115115 , ucecCount
116116 , ucecTimestamp
117117
118− -- ** WebmastersURLcrawlerrorscountsQueryCategory
119− , WebmastersURLcrawlerrorscountsQueryCategory (..)
118+ -- ** WebmastersURLCrawlErrorscountsQueryCategory
119+ , WebmastersURLCrawlErrorscountsQueryCategory (..)
120120
121121 -- ** SearchAnalyticsQueryResponse
122122 , SearchAnalyticsQueryResponse
@@ -124,14 +124,14 @@ module Network.Google.WebmasterTools
124124 , saqrRows
125125 , saqrResponseAggregationType
126126
127− -- ** WebmastersURLcrawlerrorssamplesListPlatform
128− , WebmastersURLcrawlerrorssamplesListPlatform (..)
127+ -- ** WebmastersURLCrawlErrorsSamplesListPlatform
128+ , WebmastersURLCrawlErrorsSamplesListPlatform (..)
129129
130− -- ** WebmastersURLcrawlerrorssamplesGetCategory
131− , WebmastersURLcrawlerrorssamplesGetCategory (..)
130+ -- ** WebmastersURLCrawlErrorsSamplesGetCategory
131+ , WebmastersURLCrawlErrorsSamplesGetCategory (..)
132132
133− -- ** WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
134− , WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform (..)
133+ -- ** WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
134+ , WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform (..)
135135
136136 -- ** URLCrawlErrorsSamplesListResponse
137137 , URLCrawlErrorsSamplesListResponse
@@ -170,11 +170,11 @@ module Network.Google.WebmasterTools
170170 , wsType
171171 , wsErrors
172172
173− -- ** WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
174− , WebmastersURLcrawlerrorssamplesMarkAsFixedCategory (..)
173+ -- ** WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
174+ , WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory (..)
175175
176− -- ** WebmastersURLcrawlerrorssamplesGetPlatform
177− , WebmastersURLcrawlerrorssamplesGetPlatform (..)
176+ -- ** WebmastersURLCrawlErrorsSamplesGetPlatform
177+ , WebmastersURLCrawlErrorsSamplesGetPlatform (..)
178178
179179 -- ** SearchAnalyticsQueryRequest
180180 , SearchAnalyticsQueryRequest
@@ -187,8 +187,8 @@ module Network.Google.WebmasterTools
187187 , saqrStartDate
188188 , saqrDimensions
189189
190− -- ** WebmastersURLcrawlerrorssamplesListCategory
191− , WebmastersURLcrawlerrorssamplesListCategory (..)
190+ -- ** WebmastersURLCrawlErrorsSamplesListCategory
191+ , WebmastersURLCrawlErrorsSamplesListCategory (..)
192192
193193 -- ** SitesListResponse
194194 , SitesListResponse
@@ -201,8 +201,8 @@ module Network.Google.WebmasterTools
201201 , wsPermissionLevel
202202 , wsSiteURL
203203
204− -- ** WebmastersURLcrawlerrorscountsQueryPlatform
205− , WebmastersURLcrawlerrorscountsQueryPlatform (..)
204+ -- ** WebmastersURLCrawlErrorscountsQueryPlatform
205+ , WebmastersURLCrawlErrorscountsQueryPlatform (..)
206206 ) where
207207
208208import Network.Google.Prelude
@@ -215,10 +215,10 @@ import Network.Google.Resource.Webmasters.Sites.Add
215215import Network.Google.Resource.Webmasters.Sites.Delete
216216import Network.Google.Resource.Webmasters.Sites.Get
217217import Network.Google.Resource.Webmasters.Sites.List
218−import Network.Google.Resource.Webmasters.URLcrawlerrorscounts.Query
219−import Network.Google.Resource.Webmasters.URLcrawlerrorssamples.Get
220−import Network.Google.Resource.Webmasters.URLcrawlerrorssamples.List
221−import Network.Google.Resource.Webmasters.URLcrawlerrorssamples.MarkAsFixed
218+import Network.Google.Resource.Webmasters.URLCrawlErrorscounts.Query
219+import Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.Get
220+import Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.List
221+import Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.MarkAsFixed
222222import Network.Google.WebmasterTools.Types
223223
224224{- $resources
@@ -226,9 +226,9 @@ TODO
226226-}
227227
228228type WebmasterToolsAPI =
229− UrlcrawlerrorssamplesListResource :<|>
230− UrlcrawlerrorssamplesGetResource
231− :<|> UrlcrawlerrorssamplesMarkAsFixedResource
229+ URLCrawlErrorsSamplesListResource :<|>
230+ URLCrawlErrorsSamplesGetResource
231+ :<|> URLCrawlErrorsSamplesMarkAsFixedResource
232232 :<|> SitemapsListResource
233233 :<|> SitemapsGetResource
234234 :<|> SitemapsSubmitResource
@@ -238,7 +238,7 @@ type WebmasterToolsAPI =
238238 :<|> SitesGetResource
239239 :<|> SitesAddResource
240240 :<|> SitesDeleteResource
241− :<|> UrlcrawlerrorscountsQueryResource
241+ :<|> URLCrawlErrorscountsQueryResource
242242
243243webmasterToolsAPI :: Proxy WebmasterToolsAPI
244244webmasterToolsAPI = Proxy
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+16−16
@@ -65,8 +65,8 @@ module Network.Google.WebmasterTools.Types
6565 , ucecCount
6666 , ucecTimestamp
6767
68− -- * WebmastersURLcrawlerrorscountsQueryCategory
69− , WebmastersURLcrawlerrorscountsQueryCategory (..)
68+ -- * WebmastersURLCrawlErrorscountsQueryCategory
69+ , WebmastersURLCrawlErrorscountsQueryCategory (..)
7070
7171 -- * SearchAnalyticsQueryResponse
7272 , SearchAnalyticsQueryResponse
@@ -74,14 +74,14 @@ module Network.Google.WebmasterTools.Types
7474 , saqrRows
7575 , saqrResponseAggregationType
7676
77− -- * WebmastersURLcrawlerrorssamplesListPlatform
78− , WebmastersURLcrawlerrorssamplesListPlatform (..)
77+ -- * WebmastersURLCrawlErrorsSamplesListPlatform
78+ , WebmastersURLCrawlErrorsSamplesListPlatform (..)
7979
80− -- * WebmastersURLcrawlerrorssamplesGetCategory
81− , WebmastersURLcrawlerrorssamplesGetCategory (..)
80+ -- * WebmastersURLCrawlErrorsSamplesGetCategory
81+ , WebmastersURLCrawlErrorsSamplesGetCategory (..)
8282
83− -- * WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
84− , WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform (..)
83+ -- * WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
84+ , WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform (..)
8585
8686 -- * URLCrawlErrorsSamplesListResponse
8787 , URLCrawlErrorsSamplesListResponse
@@ -120,11 +120,11 @@ module Network.Google.WebmasterTools.Types
120120 , wsType
121121 , wsErrors
122122
123− -- * WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
124− , WebmastersURLcrawlerrorssamplesMarkAsFixedCategory (..)
123+ -- * WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
124+ , WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory (..)
125125
126− -- * WebmastersURLcrawlerrorssamplesGetPlatform
127− , WebmastersURLcrawlerrorssamplesGetPlatform (..)
126+ -- * WebmastersURLCrawlErrorsSamplesGetPlatform
127+ , WebmastersURLCrawlErrorsSamplesGetPlatform (..)
128128
129129 -- * SearchAnalyticsQueryRequest
130130 , SearchAnalyticsQueryRequest
@@ -137,8 +137,8 @@ module Network.Google.WebmasterTools.Types
137137 , saqrStartDate
138138 , saqrDimensions
139139
140− -- * WebmastersURLcrawlerrorssamplesListCategory
141− , WebmastersURLcrawlerrorssamplesListCategory (..)
140+ -- * WebmastersURLCrawlErrorsSamplesListCategory
141+ , WebmastersURLCrawlErrorsSamplesListCategory (..)
142142
143143 -- * SitesListResponse
144144 , SitesListResponse
@@ -151,8 +151,8 @@ module Network.Google.WebmasterTools.Types
151151 , wsPermissionLevel
152152 , wsSiteURL
153153
154− -- * WebmastersURLcrawlerrorscountsQueryPlatform
155− , WebmastersURLcrawlerrorscountsQueryPlatform (..)
154+ -- * WebmastersURLCrawlErrorscountsQueryPlatform
155+ , WebmastersURLCrawlErrorscountsQueryPlatform (..)
156156 ) where
157157
158158import Network.Google.Prelude
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+161−161
@@ -19,7 +19,7 @@ import Network.Google.Prelude
1919
2020-- | The crawl error category. For example: serverError. If not specified,
2121-- returns results for all categories.
22−data WebmastersURLcrawlerrorscountsQueryCategory
22+data WebmastersURLCrawlErrorscountsQueryCategory
2323 = AuthPermissions
2424 -- ^ @authPermissions@
2525 | ManyToOneRedirect
@@ -38,9 +38,9 @@ data WebmastersURLcrawlerrorscountsQueryCategory
3838 -- ^ @soft404@
3939 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
4040
41−instance Hashable WebmastersURLcrawlerrorscountsQueryCategory
41+instance Hashable WebmastersURLCrawlErrorscountsQueryCategory
4242
43−instance FromText WebmastersURLcrawlerrorscountsQueryCategory where
43+instance FromText WebmastersURLCrawlErrorscountsQueryCategory where
4444 fromText = \case
4545 "authPermissions" -> Just AuthPermissions
4646 "manyToOneRedirect" -> Just ManyToOneRedirect
@@ -52,7 +52,7 @@ instance FromText WebmastersURLcrawlerrorscountsQueryCategory where
5252 "soft404" -> Just SOFT404
5353 _ -> Nothing
5454
55−instance ToText WebmastersURLcrawlerrorscountsQueryCategory where
55+instance ToText WebmastersURLCrawlErrorscountsQueryCategory where
5656 toText = \case
5757 AuthPermissions -> "authPermissions"
5858 ManyToOneRedirect -> "manyToOneRedirect"
@@ -63,14 +63,14 @@ instance ToText WebmastersURLcrawlerrorscountsQueryCategory where
6363 ServerError -> "serverError"
6464 SOFT404 -> "soft404"
6565
66−instance FromJSON WebmastersURLcrawlerrorscountsQueryCategory where
67− parseJSON = parseJSONText "WebmastersURLcrawlerrorscountsQueryCategory"
66+instance FromJSON WebmastersURLCrawlErrorscountsQueryCategory where
67+ parseJSON = parseJSONText "WebmastersURLCrawlErrorscountsQueryCategory"
6868
69−instance ToJSON WebmastersURLcrawlerrorscountsQueryCategory where
69+instance ToJSON WebmastersURLCrawlErrorscountsQueryCategory where
7070 toJSON = toJSONText
7171
7272-- | The user agent type (platform) that made the request. For example: web
73−data WebmastersURLcrawlerrorssamplesListPlatform
73+data WebmastersURLCrawlErrorsSamplesListPlatform
7474 = Mobile
7575 -- ^ @mobile@
7676 | SmartphoneOnly
@@ -79,270 +79,270 @@ data WebmastersURLcrawlerrorssamplesListPlatform
7979 -- ^ @web@
8080 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
8181
82−instance Hashable WebmastersURLcrawlerrorssamplesListPlatform
82+instance Hashable WebmastersURLCrawlErrorsSamplesListPlatform
8383
84−instance FromText WebmastersURLcrawlerrorssamplesListPlatform where
84+instance FromText WebmastersURLCrawlErrorsSamplesListPlatform where
8585 fromText = \case
8686 "mobile" -> Just Mobile
8787 "smartphoneOnly" -> Just SmartphoneOnly
8888 "web" -> Just Web
8989 _ -> Nothing
9090
91−instance ToText WebmastersURLcrawlerrorssamplesListPlatform where
91+instance ToText WebmastersURLCrawlErrorsSamplesListPlatform where
9292 toText = \case
9393 Mobile -> "mobile"
9494 SmartphoneOnly -> "smartphoneOnly"
9595 Web -> "web"
9696
97−instance FromJSON WebmastersURLcrawlerrorssamplesListPlatform where
98− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesListPlatform"
97+instance FromJSON WebmastersURLCrawlErrorsSamplesListPlatform where
98+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesListPlatform"
9999
100−instance ToJSON WebmastersURLcrawlerrorssamplesListPlatform where
100+instance ToJSON WebmastersURLCrawlErrorsSamplesListPlatform where
101101 toJSON = toJSONText
102102
103103-- | The crawl error category. For example: authPermissions
104−data WebmastersURLcrawlerrorssamplesGetCategory
105− = WUGCAuthPermissions
104+data WebmastersURLCrawlErrorsSamplesGetCategory
105+ = WUCESGCAuthPermissions
106106 -- ^ @authPermissions@
107− | WUGCManyToOneRedirect
107+ | WUCESGCManyToOneRedirect
108108 -- ^ @manyToOneRedirect@
109− | WUGCNotFollowed
109+ | WUCESGCNotFollowed
110110 -- ^ @notFollowed@
111− | WUGCNotFound
111+ | WUCESGCNotFound
112112 -- ^ @notFound@
113− | WUGCOther
113+ | WUCESGCOther
114114 -- ^ @other@
115− | WUGCRoboted
115+ | WUCESGCRoboted
116116 -- ^ @roboted@
117− | WUGCServerError
117+ | WUCESGCServerError
118118 -- ^ @serverError@
119− | WUGCSOFT404
119+ | WUCESGCSOFT404
120120 -- ^ @soft404@
121121 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
122122
123−instance Hashable WebmastersURLcrawlerrorssamplesGetCategory
123+instance Hashable WebmastersURLCrawlErrorsSamplesGetCategory
124124
125−instance FromText WebmastersURLcrawlerrorssamplesGetCategory where
125+instance FromText WebmastersURLCrawlErrorsSamplesGetCategory where
126126 fromText = \case
127− "authPermissions" -> Just WUGCAuthPermissions
128− "manyToOneRedirect" -> Just WUGCManyToOneRedirect
129− "notFollowed" -> Just WUGCNotFollowed
130− "notFound" -> Just WUGCNotFound
131− "other" -> Just WUGCOther
132− "roboted" -> Just WUGCRoboted
133− "serverError" -> Just WUGCServerError
134− "soft404" -> Just WUGCSOFT404
127+ "authPermissions" -> Just WUCESGCAuthPermissions
128+ "manyToOneRedirect" -> Just WUCESGCManyToOneRedirect
129+ "notFollowed" -> Just WUCESGCNotFollowed
130+ "notFound" -> Just WUCESGCNotFound
131+ "other" -> Just WUCESGCOther
132+ "roboted" -> Just WUCESGCRoboted
133+ "serverError" -> Just WUCESGCServerError
134+ "soft404" -> Just WUCESGCSOFT404
135135 _ -> Nothing
136136
137−instance ToText WebmastersURLcrawlerrorssamplesGetCategory where
137+instance ToText WebmastersURLCrawlErrorsSamplesGetCategory where
138138 toText = \case
139− WUGCAuthPermissions -> "authPermissions"
140− WUGCManyToOneRedirect -> "manyToOneRedirect"
141− WUGCNotFollowed -> "notFollowed"
142− WUGCNotFound -> "notFound"
143− WUGCOther -> "other"
144− WUGCRoboted -> "roboted"
145− WUGCServerError -> "serverError"
146− WUGCSOFT404 -> "soft404"
147−
148−instance FromJSON WebmastersURLcrawlerrorssamplesGetCategory where
149− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesGetCategory"
150−
151−instance ToJSON WebmastersURLcrawlerrorssamplesGetCategory where
139+ WUCESGCAuthPermissions -> "authPermissions"
140+ WUCESGCManyToOneRedirect -> "manyToOneRedirect"
141+ WUCESGCNotFollowed -> "notFollowed"
142+ WUCESGCNotFound -> "notFound"
143+ WUCESGCOther -> "other"
144+ WUCESGCRoboted -> "roboted"
145+ WUCESGCServerError -> "serverError"
146+ WUCESGCSOFT404 -> "soft404"
147+
148+instance FromJSON WebmastersURLCrawlErrorsSamplesGetCategory where
149+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesGetCategory"
150+
151+instance ToJSON WebmastersURLCrawlErrorsSamplesGetCategory where
152152 toJSON = toJSONText
153153
154154-- | The user agent type (platform) that made the request. For example: web
155−data WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
156− = WUMAFPMobile
155+data WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
156+ = WUCESMAFPMobile
157157 -- ^ @mobile@
158− | WUMAFPSmartphoneOnly
158+ | WUCESMAFPSmartphoneOnly
159159 -- ^ @smartphoneOnly@
160− | WUMAFPWeb
160+ | WUCESMAFPWeb
161161 -- ^ @web@
162162 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
163163
164−instance Hashable WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform
164+instance Hashable WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform
165165
166−instance FromText WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform where
166+instance FromText WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform where
167167 fromText = \case
168− "mobile" -> Just WUMAFPMobile
169− "smartphoneOnly" -> Just WUMAFPSmartphoneOnly
170− "web" -> Just WUMAFPWeb
168+ "mobile" -> Just WUCESMAFPMobile
169+ "smartphoneOnly" -> Just WUCESMAFPSmartphoneOnly
170+ "web" -> Just WUCESMAFPWeb
171171 _ -> Nothing
172172
173−instance ToText WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform where
173+instance ToText WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform where
174174 toText = \case
175− WUMAFPMobile -> "mobile"
176− WUMAFPSmartphoneOnly -> "smartphoneOnly"
177− WUMAFPWeb -> "web"
175+ WUCESMAFPMobile -> "mobile"
176+ WUCESMAFPSmartphoneOnly -> "smartphoneOnly"
177+ WUCESMAFPWeb -> "web"
178178
179−instance FromJSON WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform where
180− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform"
179+instance FromJSON WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform where
180+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform"
181181
182−instance ToJSON WebmastersURLcrawlerrorssamplesMarkAsFixedPlatform where
182+instance ToJSON WebmastersURLCrawlErrorsSamplesMarkAsFixedPlatform where
183183 toJSON = toJSONText
184184
185185-- | The crawl error category. For example: authPermissions
186−data WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
187− = WUMAFCAuthPermissions
186+data WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
187+ = WUCESMAFCAuthPermissions
188188 -- ^ @authPermissions@
189− | WUMAFCManyToOneRedirect
189+ | WUCESMAFCManyToOneRedirect
190190 -- ^ @manyToOneRedirect@
191− | WUMAFCNotFollowed
191+ | WUCESMAFCNotFollowed
192192 -- ^ @notFollowed@
193− | WUMAFCNotFound
193+ | WUCESMAFCNotFound
194194 -- ^ @notFound@
195− | WUMAFCOther
195+ | WUCESMAFCOther
196196 -- ^ @other@
197− | WUMAFCRoboted
197+ | WUCESMAFCRoboted
198198 -- ^ @roboted@
199− | WUMAFCServerError
199+ | WUCESMAFCServerError
200200 -- ^ @serverError@
201− | WUMAFCSOFT404
201+ | WUCESMAFCSOFT404
202202 -- ^ @soft404@
203203 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
204204
205−instance Hashable WebmastersURLcrawlerrorssamplesMarkAsFixedCategory
205+instance Hashable WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory
206206
207−instance FromText WebmastersURLcrawlerrorssamplesMarkAsFixedCategory where
207+instance FromText WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory where
208208 fromText = \case
209− "authPermissions" -> Just WUMAFCAuthPermissions
210− "manyToOneRedirect" -> Just WUMAFCManyToOneRedirect
211− "notFollowed" -> Just WUMAFCNotFollowed
212− "notFound" -> Just WUMAFCNotFound
213− "other" -> Just WUMAFCOther
214− "roboted" -> Just WUMAFCRoboted
215− "serverError" -> Just WUMAFCServerError
216− "soft404" -> Just WUMAFCSOFT404
209+ "authPermissions" -> Just WUCESMAFCAuthPermissions
210+ "manyToOneRedirect" -> Just WUCESMAFCManyToOneRedirect
211+ "notFollowed" -> Just WUCESMAFCNotFollowed
212+ "notFound" -> Just WUCESMAFCNotFound
213+ "other" -> Just WUCESMAFCOther
214+ "roboted" -> Just WUCESMAFCRoboted
215+ "serverError" -> Just WUCESMAFCServerError
216+ "soft404" -> Just WUCESMAFCSOFT404
217217 _ -> Nothing
218218
219−instance ToText WebmastersURLcrawlerrorssamplesMarkAsFixedCategory where
219+instance ToText WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory where
220220 toText = \case
221− WUMAFCAuthPermissions -> "authPermissions"
222− WUMAFCManyToOneRedirect -> "manyToOneRedirect"
223− WUMAFCNotFollowed -> "notFollowed"
224− WUMAFCNotFound -> "notFound"
225− WUMAFCOther -> "other"
226− WUMAFCRoboted -> "roboted"
227− WUMAFCServerError -> "serverError"
228− WUMAFCSOFT404 -> "soft404"
229−
230−instance FromJSON WebmastersURLcrawlerrorssamplesMarkAsFixedCategory where
231− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesMarkAsFixedCategory"
232−
233−instance ToJSON WebmastersURLcrawlerrorssamplesMarkAsFixedCategory where
221+ WUCESMAFCAuthPermissions -> "authPermissions"
222+ WUCESMAFCManyToOneRedirect -> "manyToOneRedirect"
223+ WUCESMAFCNotFollowed -> "notFollowed"
224+ WUCESMAFCNotFound -> "notFound"
225+ WUCESMAFCOther -> "other"
226+ WUCESMAFCRoboted -> "roboted"
227+ WUCESMAFCServerError -> "serverError"
228+ WUCESMAFCSOFT404 -> "soft404"
229+
230+instance FromJSON WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory where
231+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory"
232+
233+instance ToJSON WebmastersURLCrawlErrorsSamplesMarkAsFixedCategory where
234234 toJSON = toJSONText
235235
236236-- | The user agent type (platform) that made the request. For example: web
237−data WebmastersURLcrawlerrorssamplesGetPlatform
238− = WUGPMobile
237+data WebmastersURLCrawlErrorsSamplesGetPlatform
238+ = WUCESGPMobile
239239 -- ^ @mobile@
240− | WUGPSmartphoneOnly
240+ | WUCESGPSmartphoneOnly
241241 -- ^ @smartphoneOnly@
242− | WUGPWeb
242+ | WUCESGPWeb
243243 -- ^ @web@
244244 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
245245
246−instance Hashable WebmastersURLcrawlerrorssamplesGetPlatform
246+instance Hashable WebmastersURLCrawlErrorsSamplesGetPlatform
247247
248−instance FromText WebmastersURLcrawlerrorssamplesGetPlatform where
248+instance FromText WebmastersURLCrawlErrorsSamplesGetPlatform where
249249 fromText = \case
250− "mobile" -> Just WUGPMobile
251− "smartphoneOnly" -> Just WUGPSmartphoneOnly
252− "web" -> Just WUGPWeb
250+ "mobile" -> Just WUCESGPMobile
251+ "smartphoneOnly" -> Just WUCESGPSmartphoneOnly
252+ "web" -> Just WUCESGPWeb
253253 _ -> Nothing
254254
255−instance ToText WebmastersURLcrawlerrorssamplesGetPlatform where
255+instance ToText WebmastersURLCrawlErrorsSamplesGetPlatform where
256256 toText = \case
257− WUGPMobile -> "mobile"
258− WUGPSmartphoneOnly -> "smartphoneOnly"
259− WUGPWeb -> "web"
257+ WUCESGPMobile -> "mobile"
258+ WUCESGPSmartphoneOnly -> "smartphoneOnly"
259+ WUCESGPWeb -> "web"
260260
261−instance FromJSON WebmastersURLcrawlerrorssamplesGetPlatform where
262− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesGetPlatform"
261+instance FromJSON WebmastersURLCrawlErrorsSamplesGetPlatform where
262+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesGetPlatform"
263263
264−instance ToJSON WebmastersURLcrawlerrorssamplesGetPlatform where
264+instance ToJSON WebmastersURLCrawlErrorsSamplesGetPlatform where
265265 toJSON = toJSONText
266266
267267-- | The crawl error category. For example: authPermissions
268−data WebmastersURLcrawlerrorssamplesListCategory
269− = WULCAuthPermissions
268+data WebmastersURLCrawlErrorsSamplesListCategory
269+ = WUCESLCAuthPermissions
270270 -- ^ @authPermissions@
271− | WULCManyToOneRedirect
271+ | WUCESLCManyToOneRedirect
272272 -- ^ @manyToOneRedirect@
273− | WULCNotFollowed
273+ | WUCESLCNotFollowed
274274 -- ^ @notFollowed@
275− | WULCNotFound
275+ | WUCESLCNotFound
276276 -- ^ @notFound@
277− | WULCOther
277+ | WUCESLCOther
278278 -- ^ @other@
279− | WULCRoboted
279+ | WUCESLCRoboted
280280 -- ^ @roboted@
281− | WULCServerError
281+ | WUCESLCServerError
282282 -- ^ @serverError@
283− | WULCSOFT404
283+ | WUCESLCSOFT404
284284 -- ^ @soft404@
285285 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
286286
287−instance Hashable WebmastersURLcrawlerrorssamplesListCategory
287+instance Hashable WebmastersURLCrawlErrorsSamplesListCategory
288288
289−instance FromText WebmastersURLcrawlerrorssamplesListCategory where
289+instance FromText WebmastersURLCrawlErrorsSamplesListCategory where
290290 fromText = \case
291− "authPermissions" -> Just WULCAuthPermissions
292− "manyToOneRedirect" -> Just WULCManyToOneRedirect
293− "notFollowed" -> Just WULCNotFollowed
294− "notFound" -> Just WULCNotFound
295− "other" -> Just WULCOther
296− "roboted" -> Just WULCRoboted
297− "serverError" -> Just WULCServerError
298− "soft404" -> Just WULCSOFT404
291+ "authPermissions" -> Just WUCESLCAuthPermissions
292+ "manyToOneRedirect" -> Just WUCESLCManyToOneRedirect
293+ "notFollowed" -> Just WUCESLCNotFollowed
294+ "notFound" -> Just WUCESLCNotFound
295+ "other" -> Just WUCESLCOther
296+ "roboted" -> Just WUCESLCRoboted
297+ "serverError" -> Just WUCESLCServerError
298+ "soft404" -> Just WUCESLCSOFT404
299299 _ -> Nothing
300300
301−instance ToText WebmastersURLcrawlerrorssamplesListCategory where
301+instance ToText WebmastersURLCrawlErrorsSamplesListCategory where
302302 toText = \case
303− WULCAuthPermissions -> "authPermissions"
304− WULCManyToOneRedirect -> "manyToOneRedirect"
305− WULCNotFollowed -> "notFollowed"
306− WULCNotFound -> "notFound"
307− WULCOther -> "other"
308− WULCRoboted -> "roboted"
309− WULCServerError -> "serverError"
310− WULCSOFT404 -> "soft404"
311−
312−instance FromJSON WebmastersURLcrawlerrorssamplesListCategory where
313− parseJSON = parseJSONText "WebmastersURLcrawlerrorssamplesListCategory"
314−
315−instance ToJSON WebmastersURLcrawlerrorssamplesListCategory where
303+ WUCESLCAuthPermissions -> "authPermissions"
304+ WUCESLCManyToOneRedirect -> "manyToOneRedirect"
305+ WUCESLCNotFollowed -> "notFollowed"
306+ WUCESLCNotFound -> "notFound"
307+ WUCESLCOther -> "other"
308+ WUCESLCRoboted -> "roboted"
309+ WUCESLCServerError -> "serverError"
310+ WUCESLCSOFT404 -> "soft404"
311+
312+instance FromJSON WebmastersURLCrawlErrorsSamplesListCategory where
313+ parseJSON = parseJSONText "WebmastersURLCrawlErrorsSamplesListCategory"
314+
315+instance ToJSON WebmastersURLCrawlErrorsSamplesListCategory where
316316 toJSON = toJSONText
317317
318318-- | The user agent type (platform) that made the request. For example: web.
319319-- If not specified, returns results for all platforms.
320−data WebmastersURLcrawlerrorscountsQueryPlatform
321− = WUQPMobile
320+data WebmastersURLCrawlErrorscountsQueryPlatform
321+ = WUCEQPMobile
322322 -- ^ @mobile@
323− | WUQPSmartphoneOnly
323+ | WUCEQPSmartphoneOnly
324324 -- ^ @smartphoneOnly@
325− | WUQPWeb
325+ | WUCEQPWeb
326326 -- ^ @web@
327327 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
328328
329−instance Hashable WebmastersURLcrawlerrorscountsQueryPlatform
329+instance Hashable WebmastersURLCrawlErrorscountsQueryPlatform
330330
331−instance FromText WebmastersURLcrawlerrorscountsQueryPlatform where
331+instance FromText WebmastersURLCrawlErrorscountsQueryPlatform where
332332 fromText = \case
333− "mobile" -> Just WUQPMobile
334− "smartphoneOnly" -> Just WUQPSmartphoneOnly
335− "web" -> Just WUQPWeb
333+ "mobile" -> Just WUCEQPMobile
334+ "smartphoneOnly" -> Just WUCEQPSmartphoneOnly
335+ "web" -> Just WUCEQPWeb
336336 _ -> Nothing
337337
338−instance ToText WebmastersURLcrawlerrorscountsQueryPlatform where
338+instance ToText WebmastersURLCrawlErrorscountsQueryPlatform where
339339 toText = \case
340− WUQPMobile -> "mobile"
341− WUQPSmartphoneOnly -> "smartphoneOnly"
342− WUQPWeb -> "web"
340+ WUCEQPMobile -> "mobile"
341+ WUCEQPSmartphoneOnly -> "smartphoneOnly"
342+ WUCEQPWeb -> "web"
343343
344−instance FromJSON WebmastersURLcrawlerrorscountsQueryPlatform where
345− parseJSON = parseJSONText "WebmastersURLcrawlerrorscountsQueryPlatform"
344+instance FromJSON WebmastersURLCrawlErrorscountsQueryPlatform where
345+ parseJSON = parseJSONText "WebmastersURLCrawlErrorscountsQueryPlatform"
346346
347−instance ToJSON WebmastersURLcrawlerrorscountsQueryPlatform where
347+instance ToJSON WebmastersURLCrawlErrorscountsQueryPlatform where
348348 toJSON = toJSONText
gogol-webmaster-tools/gogol-webmaster-tools.cabal+4−4
@@ -39,10 +39,10 @@ library
3939 , Network.Google.Resource.Webmasters.Sites.Delete
4040 , Network.Google.Resource.Webmasters.Sites.Get
4141 , Network.Google.Resource.Webmasters.Sites.List
42− , Network.Google.Resource.Webmasters.URLcrawlerrorscounts.Query
43− , Network.Google.Resource.Webmasters.URLcrawlerrorssamples.Get
44− , Network.Google.Resource.Webmasters.URLcrawlerrorssamples.List
45− , Network.Google.Resource.Webmasters.URLcrawlerrorssamples.MarkAsFixed
42+ , Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.Get
43+ , Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.List
44+ , Network.Google.Resource.Webmasters.URLCrawlErrorsSamples.MarkAsFixed
45+ , Network.Google.Resource.Webmasters.URLCrawlErrorscounts.Query
4646 , Network.Google.WebmasterTools
4747 , Network.Google.WebmasterTools.Types
4848
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics.hs+1−1
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Retrieve your YouTube Analytics reports.
15+-- | Retrieve your YouTube Analytics reports.
1616--
1717-- /See:/ <http://developers.google.com/youtube/analytics/ YouTube Analytics API Reference>
1818module Network.Google.YouTubeAnalytics
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/Bind_direct.hs → gogol-youtube/gen/Network/Google/Resource/YouTube/LiveBroadcasts/BindDirect.hsrenamed+110−104
@@ -10,7 +10,7 @@
1010{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
1111
1212-- |
13−-- Module : Network.Google.Resource.YouTube.LiveBroadcasts.Bind_direct
13+-- Module : Network.Google.Resource.YouTube.LiveBroadcasts.BindDirect
1414-- Copyright : (c) 2015 Brendan Hay
1515-- License : Mozilla Public License, v. 2.0.
1616-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -23,35 +23,35 @@
2323-- broadcast.
2424--
2525-- /See:/ <https://developers.google.com/youtube/v3 YouTube Data API Reference> for @YouTubeLiveBroadcastsBind_direct@.
26−module Network.Google.Resource.YouTube.LiveBroadcasts.Bind_direct
26+module Network.Google.Resource.YouTube.LiveBroadcasts.BindDirect
2727 (
2828 -- * REST Resource
29− LiveBroadcastsBind_directResource
29+ LiveBroadcastsBindDirectResource
3030
3131 -- * Creating a Request
32− , liveBroadcastsBind_direct'
33− , LiveBroadcastsBind_direct'
32+ , liveBroadcastsBindDirect'
33+ , LiveBroadcastsBindDirect'
3434
3535 -- * Request Lenses
36− , lQuotaUser
37− , lPart
38− , lPrettyPrint
39− , lUserIP
40− , lOnBehalfOfContentOwner
41− , lKey
42− , lOnBehalfOfContentOwnerChannel
43− , lId
44− , lOAuthToken
45− , lStreamId
46− , lFields
36+ , lbbdQuotaUser
37+ , lbbdPart
38+ , lbbdPrettyPrint
39+ , lbbdUserIP
40+ , lbbdOnBehalfOfContentOwner
41+ , lbbdKey
42+ , lbbdOnBehalfOfContentOwnerChannel
43+ , lbbdId
44+ , lbbdOAuthToken
45+ , lbbdStreamId
46+ , lbbdFields
4747 ) where
4848
4949import Network.Google.Prelude
5050import Network.Google.YouTube.Types
5151
5252-- | A resource alias for @YouTubeLiveBroadcastsBind_direct@ which the
53−-- 'LiveBroadcastsBind_direct'' request conforms to.
54−type LiveBroadcastsBind_directResource =
53+-- 'LiveBroadcastsBindDirect'' request conforms to.
54+type LiveBroadcastsBindDirectResource =
5555 "liveBroadcasts" :>
5656 "bind" :>
5757 "direct" :>
@@ -74,88 +74,91 @@ type LiveBroadcastsBind_directResource =
7474-- video stream, though a video stream may be bound to more than one
7575-- broadcast.
7676--
77−-- /See:/ 'liveBroadcastsBind_direct'' smart constructor.
78−data LiveBroadcastsBind_direct' = LiveBroadcastsBind_direct'
79− { _lQuotaUser :: !(Maybe Text)
80− , _lPart :: !Text
81− , _lPrettyPrint :: !Bool
82− , _lUserIP :: !(Maybe Text)
83− , _lOnBehalfOfContentOwner :: !(Maybe Text)
84− , _lKey :: !(Maybe Key)
85− , _lOnBehalfOfContentOwnerChannel :: !(Maybe Text)
86− , _lId :: !Text
87− , _lOAuthToken :: !(Maybe OAuthToken)
88− , _lStreamId :: !(Maybe Text)
89− , _lFields :: !(Maybe Text)
77+-- /See:/ 'liveBroadcastsBindDirect'' smart constructor.
78+data LiveBroadcastsBindDirect' = LiveBroadcastsBindDirect'
79+ { _lbbdQuotaUser :: !(Maybe Text)
80+ , _lbbdPart :: !Text
81+ , _lbbdPrettyPrint :: !Bool
82+ , _lbbdUserIP :: !(Maybe Text)
83+ , _lbbdOnBehalfOfContentOwner :: !(Maybe Text)
84+ , _lbbdKey :: !(Maybe Key)
85+ , _lbbdOnBehalfOfContentOwnerChannel :: !(Maybe Text)
86+ , _lbbdId :: !Text
87+ , _lbbdOAuthToken :: !(Maybe OAuthToken)
88+ , _lbbdStreamId :: !(Maybe Text)
89+ , _lbbdFields :: !(Maybe Text)
9090 } deriving (Eq,Read,Show,Data,Typeable,Generic)
9191
92−-- | Creates a value of 'LiveBroadcastsBind_direct'' with the minimum fields required to make a request.
92+-- | Creates a value of 'LiveBroadcastsBindDirect'' with the minimum fields required to make a request.
9393--
9494-- Use one of the following lenses to modify other fields as desired:
9595--
96−-- * 'lQuotaUser'
96+-- * 'lbbdQuotaUser'
9797--
98−-- * 'lPart'
98+-- * 'lbbdPart'
9999--
100−-- * 'lPrettyPrint'
100+-- * 'lbbdPrettyPrint'
101101--
102−-- * 'lUserIP'
102+-- * 'lbbdUserIP'
103103--
104−-- * 'lOnBehalfOfContentOwner'
104+-- * 'lbbdOnBehalfOfContentOwner'
105105--
106−-- * 'lKey'
106+-- * 'lbbdKey'
107107--
108−-- * 'lOnBehalfOfContentOwnerChannel'
108+-- * 'lbbdOnBehalfOfContentOwnerChannel'
109109--
110−-- * 'lId'
110+-- * 'lbbdId'
111111--
112−-- * 'lOAuthToken'
112+-- * 'lbbdOAuthToken'
113113--
114−-- * 'lStreamId'
114+-- * 'lbbdStreamId'
115115--
116−-- * 'lFields'
117−liveBroadcastsBind_direct'
116+-- * 'lbbdFields'
117+liveBroadcastsBindDirect'
118118 :: Text -- ^ 'part'
119119 -> Text -- ^ 'id'
120− -> LiveBroadcastsBind_direct'
121−liveBroadcastsBind_direct' pLPart_ pLId_ =
122− LiveBroadcastsBind_direct'
123− { _lQuotaUser = Nothing
124− , _lPart = pLPart_
125− , _lPrettyPrint = True
126− , _lUserIP = Nothing
127− , _lOnBehalfOfContentOwner = Nothing
128− , _lKey = Nothing
129− , _lOnBehalfOfContentOwnerChannel = Nothing
130− , _lId = pLId_
131− , _lOAuthToken = Nothing
132− , _lStreamId = Nothing
133− , _lFields = Nothing
120+ -> LiveBroadcastsBindDirect'
121+liveBroadcastsBindDirect' pLbbdPart_ pLbbdId_ =
122+ LiveBroadcastsBindDirect'
123+ { _lbbdQuotaUser = Nothing
124+ , _lbbdPart = pLbbdPart_
125+ , _lbbdPrettyPrint = True
126+ , _lbbdUserIP = Nothing
127+ , _lbbdOnBehalfOfContentOwner = Nothing
128+ , _lbbdKey = Nothing
129+ , _lbbdOnBehalfOfContentOwnerChannel = Nothing
130+ , _lbbdId = pLbbdId_
131+ , _lbbdOAuthToken = Nothing
132+ , _lbbdStreamId = Nothing
133+ , _lbbdFields = Nothing
134134 }
135135
136136-- | Available to use for quota purposes for server-side applications. Can be
137137-- any arbitrary string assigned to a user, but should not exceed 40
138138-- characters. Overrides userIp if both are provided.
139−lQuotaUser :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
140−lQuotaUser
141− = lens _lQuotaUser (\ s a -> s{_lQuotaUser = a})
139+lbbdQuotaUser :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
140+lbbdQuotaUser
141+ = lens _lbbdQuotaUser
142+ (\ s a -> s{_lbbdQuotaUser = a})
142143
143144-- | The part parameter specifies a comma-separated list of one or more
144145-- liveBroadcast resource properties that the API response will include.
145146-- The part names that you can include in the parameter value are id,
146147-- snippet, contentDetails, and status.
147−lPart :: Lens' LiveBroadcastsBind_direct' Text
148−lPart = lens _lPart (\ s a -> s{_lPart = a})
148+lbbdPart :: Lens' LiveBroadcastsBindDirect' Text
149+lbbdPart = lens _lbbdPart (\ s a -> s{_lbbdPart = a})
149150
150151-- | Returns response with indentations and line breaks.
151−lPrettyPrint :: Lens' LiveBroadcastsBind_direct' Bool
152−lPrettyPrint
153− = lens _lPrettyPrint (\ s a -> s{_lPrettyPrint = a})
152+lbbdPrettyPrint :: Lens' LiveBroadcastsBindDirect' Bool
153+lbbdPrettyPrint
154+ = lens _lbbdPrettyPrint
155+ (\ s a -> s{_lbbdPrettyPrint = a})
154156
155157-- | IP address of the site where the request originates. Use this if you
156158-- want to enforce per-user limits.
157−lUserIP :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
158−lUserIP = lens _lUserIP (\ s a -> s{_lUserIP = a})
159+lbbdUserIP :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
160+lbbdUserIP
161+ = lens _lbbdUserIP (\ s a -> s{_lbbdUserIP = a})
159162
160163-- | Note: This parameter is intended exclusively for YouTube content
161164-- partners. The onBehalfOfContentOwner parameter indicates that the
@@ -167,16 +170,16 @@ lUserIP = lens _lUserIP (\ s a -> s{_lUserIP = a})
167170-- without having to provide authentication credentials for each individual
168171-- channel. The CMS account that the user authenticates with must be linked
169172-- to the specified YouTube content owner.
170−lOnBehalfOfContentOwner :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
171−lOnBehalfOfContentOwner
172− = lens _lOnBehalfOfContentOwner
173− (\ s a -> s{_lOnBehalfOfContentOwner = a})
173+lbbdOnBehalfOfContentOwner :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
174+lbbdOnBehalfOfContentOwner
175+ = lens _lbbdOnBehalfOfContentOwner
176+ (\ s a -> s{_lbbdOnBehalfOfContentOwner = a})
174177
175178-- | API key. Your API key identifies your project and provides you with API
176179-- access, quota, and reports. Required unless you provide an OAuth 2.0
177180-- token.
178−lKey :: Lens' LiveBroadcastsBind_direct' (Maybe Key)
179−lKey = lens _lKey (\ s a -> s{_lKey = a})
181+lbbdKey :: Lens' LiveBroadcastsBindDirect' (Maybe Key)
182+lbbdKey = lens _lbbdKey (\ s a -> s{_lbbdKey = a})
180183
181184-- | This parameter can only be used in a properly authorized request. Note:
182185-- This parameter is intended exclusively for YouTube content partners. The
@@ -194,54 +197,57 @@ lKey = lens _lKey (\ s a -> s{_lKey = a})
194197-- actions on behalf of the channel specified in the parameter value,
195198-- without having to provide authentication credentials for each separate
196199-- channel.
197−lOnBehalfOfContentOwnerChannel :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
198−lOnBehalfOfContentOwnerChannel
199− = lens _lOnBehalfOfContentOwnerChannel
200− (\ s a -> s{_lOnBehalfOfContentOwnerChannel = a})
200+lbbdOnBehalfOfContentOwnerChannel :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
201+lbbdOnBehalfOfContentOwnerChannel
202+ = lens _lbbdOnBehalfOfContentOwnerChannel
203+ (\ s a -> s{_lbbdOnBehalfOfContentOwnerChannel = a})
201204
202205-- | The id parameter specifies the unique ID of the broadcast that is being
203206-- bound to a video stream.
204−lId :: Lens' LiveBroadcastsBind_direct' Text
205−lId = lens _lId (\ s a -> s{_lId = a})
207+lbbdId :: Lens' LiveBroadcastsBindDirect' Text
208+lbbdId = lens _lbbdId (\ s a -> s{_lbbdId = a})
206209
207210-- | OAuth 2.0 token for the current user.
208−lOAuthToken :: Lens' LiveBroadcastsBind_direct' (Maybe OAuthToken)
209−lOAuthToken
210− = lens _lOAuthToken (\ s a -> s{_lOAuthToken = a})
211+lbbdOAuthToken :: Lens' LiveBroadcastsBindDirect' (Maybe OAuthToken)
212+lbbdOAuthToken
213+ = lens _lbbdOAuthToken
214+ (\ s a -> s{_lbbdOAuthToken = a})
211215
212216-- | The streamId parameter specifies the unique ID of the video stream that
213217-- is being bound to a broadcast. If this parameter is omitted, the API
214218-- will remove any existing binding between the broadcast and a video
215219-- stream.
216−lStreamId :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
217−lStreamId
218− = lens _lStreamId (\ s a -> s{_lStreamId = a})
220+lbbdStreamId :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
221+lbbdStreamId
222+ = lens _lbbdStreamId (\ s a -> s{_lbbdStreamId = a})
219223
220224-- | Selector specifying which fields to include in a partial response.
221−lFields :: Lens' LiveBroadcastsBind_direct' (Maybe Text)
222−lFields = lens _lFields (\ s a -> s{_lFields = a})
225+lbbdFields :: Lens' LiveBroadcastsBindDirect' (Maybe Text)
226+lbbdFields
227+ = lens _lbbdFields (\ s a -> s{_lbbdFields = a})
223228
224−instance GoogleAuth LiveBroadcastsBind_direct' where
225− authKey = lKey . _Just
226− authToken = lOAuthToken . _Just
229+instance GoogleAuth LiveBroadcastsBindDirect' where
230+ authKey = lbbdKey . _Just
231+ authToken = lbbdOAuthToken . _Just
227232
228−instance GoogleRequest LiveBroadcastsBind_direct'
233+instance GoogleRequest LiveBroadcastsBindDirect'
229234 where
230− type Rs LiveBroadcastsBind_direct' = LiveBroadcast
235+ type Rs LiveBroadcastsBindDirect' = LiveBroadcast
231236 request = requestWithRoute defReq youTubeURL
232− requestWithRoute r u LiveBroadcastsBind_direct'{..}
233− = go _lQuotaUser (Just _lPart) (Just _lPrettyPrint)
234− _lUserIP
235− _lOnBehalfOfContentOwner
236− _lKey
237− _lOnBehalfOfContentOwnerChannel
238− (Just _lId)
239− _lOAuthToken
240− _lStreamId
241− _lFields
237+ requestWithRoute r u LiveBroadcastsBindDirect'{..}
238+ = go _lbbdQuotaUser (Just _lbbdPart)
239+ (Just _lbbdPrettyPrint)
240+ _lbbdUserIP
241+ _lbbdOnBehalfOfContentOwner
242+ _lbbdKey
243+ _lbbdOnBehalfOfContentOwnerChannel
244+ (Just _lbbdId)
245+ _lbbdOAuthToken
246+ _lbbdStreamId
247+ _lbbdFields
242248 (Just AltJSON)
243249 where go
244250 = clientWithRoute
245− (Proxy :: Proxy LiveBroadcastsBind_directResource)
251+ (Proxy :: Proxy LiveBroadcastsBindDirectResource)
246252 r
247253 u
gogol-youtube/gen/Network/Google/YouTube.hs+4−4
@@ -12,7 +12,7 @@
1212-- Stability : auto-generated
1313-- Portability : non-portable (GHC extensions)
1414--
15−-- -- | Programmatic access to YouTube features.
15+-- | Programmatic access to YouTube features.
1616--
1717-- /See:/ <https://developers.google.com/youtube/v3 YouTube Data API Reference>
1818module Network.Google.YouTube
@@ -108,7 +108,7 @@ module Network.Google.YouTube
108108 , module Network.Google.Resource.YouTube.LiveBroadcasts.Bind
109109
110110 -- ** YouTubeLiveBroadcastsBind_direct
111− , module Network.Google.Resource.YouTube.LiveBroadcasts.Bind_direct
111+ , module Network.Google.Resource.YouTube.LiveBroadcasts.BindDirect
112112
113113 -- ** YouTubeLiveBroadcastsControl
114114 , module Network.Google.Resource.YouTube.LiveBroadcasts.Control
@@ -2066,7 +2066,7 @@ import Network.Google.Resource.YouTube.GuideCategories.List
20662066import Network.Google.Resource.YouTube.I18nLanguages.List
20672067import Network.Google.Resource.YouTube.I18nRegions.List
20682068import Network.Google.Resource.YouTube.LiveBroadcasts.Bind
2069−import Network.Google.Resource.YouTube.LiveBroadcasts.Bind_direct
2069+import Network.Google.Resource.YouTube.LiveBroadcasts.BindDirect
20702070import Network.Google.Resource.YouTube.LiveBroadcasts.Control
20712071import Network.Google.Resource.YouTube.LiveBroadcasts.Delete
20722072import Network.Google.Resource.YouTube.LiveBroadcasts.Insert
@@ -2123,7 +2123,7 @@ type YouTubeAPI =
21232123 :<|> LiveBroadcastsInsertResource
21242124 :<|> LiveBroadcastsListResource
21252125 :<|> LiveBroadcastsBindResource
2126− :<|> LiveBroadcastsBind_directResource
2126+ :<|> LiveBroadcastsBindDirectResource
21272127 :<|> LiveBroadcastsDeleteResource
21282128 :<|> LiveBroadcastsUpdateResource
21292129 :<|> CaptionsInsertResource
gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+48−48
@@ -1021,11 +1021,11 @@ instance ToJSON ContentRatingAnatelRating where
10211021
10221022-- | Describes the type of the promoted item.
10231023data PromotedItemIdType
1024− = RecentUpload
1024+ = PIITRecentUpload
10251025 -- ^ @recentUpload@
1026− | Video
1026+ | PIITVideo
10271027 -- ^ @video@
1028− | Website
1028+ | PIITWebsite
10291029 -- ^ @website@
10301030 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
10311031
@@ -1033,16 +1033,16 @@ instance Hashable PromotedItemIdType
10331033
10341034instance FromText PromotedItemIdType where
10351035 fromText = \case
1036− "recentUpload" -> Just RecentUpload
1037− "video" -> Just Video
1038− "website" -> Just Website
1036+ "recentUpload" -> Just PIITRecentUpload
1037+ "video" -> Just PIITVideo
1038+ "website" -> Just PIITWebsite
10391039 _ -> Nothing
10401040
10411041instance ToText PromotedItemIdType where
10421042 toText = \case
1043− RecentUpload -> "recentUpload"
1044− Video -> "video"
1045− Website -> "website"
1043+ PIITRecentUpload -> "recentUpload"
1044+ PIITVideo -> "video"
1045+ PIITWebsite -> "website"
10461046
10471047instance FromJSON PromotedItemIdType where
10481048 parseJSON = parseJSONText "PromotedItemIdType"
@@ -4545,27 +4545,27 @@ instance ToJSON YouTubeSearchListVideoDimension where
45454545
45464546-- | The type of activity that the resource describes.
45474547data ActivitySnippetType
4548− = Bulletin
4548+ = ASTBulletin
45494549 -- ^ @bulletin@
4550− | ChannelItem
4550+ | ASTChannelItem
45514551 -- ^ @channelItem@
4552− | Comment
4552+ | ASTComment
45534553 -- ^ @comment@
4554− | Favorite
4554+ | ASTFavorite
45554555 -- ^ @favorite@
4556− | Like
4556+ | ASTLike
45574557 -- ^ @like@
4558− | PlayListItem
4558+ | ASTPlayListItem
45594559 -- ^ @playlistItem@
4560− | PromotedItem
4560+ | ASTPromotedItem
45614561 -- ^ @promotedItem@
4562− | Recommendation
4562+ | ASTRecommendation
45634563 -- ^ @recommendation@
4564− | Social
4564+ | ASTSocial
45654565 -- ^ @social@
4566− | Subscription
4566+ | ASTSubscription
45674567 -- ^ @subscription@
4568− | Upload
4568+ | ASTUpload
45694569 -- ^ @upload@
45704570 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
45714571
@@ -4573,32 +4573,32 @@ instance Hashable ActivitySnippetType
45734573
45744574instance FromText ActivitySnippetType where
45754575 fromText = \case
4576− "bulletin" -> Just Bulletin
4577− "channelItem" -> Just ChannelItem
4578− "comment" -> Just Comment
4579− "favorite" -> Just Favorite
4580− "like" -> Just Like
4581− "playlistItem" -> Just PlayListItem
4582− "promotedItem" -> Just PromotedItem
4583− "recommendation" -> Just Recommendation
4584− "social" -> Just Social
4585− "subscription" -> Just Subscription
4586− "upload" -> Just Upload
4576+ "bulletin" -> Just ASTBulletin
4577+ "channelItem" -> Just ASTChannelItem
4578+ "comment" -> Just ASTComment
4579+ "favorite" -> Just ASTFavorite
4580+ "like" -> Just ASTLike
4581+ "playlistItem" -> Just ASTPlayListItem
4582+ "promotedItem" -> Just ASTPromotedItem
4583+ "recommendation" -> Just ASTRecommendation
4584+ "social" -> Just ASTSocial
4585+ "subscription" -> Just ASTSubscription
4586+ "upload" -> Just ASTUpload
45874587 _ -> Nothing
45884588
45894589instance ToText ActivitySnippetType where
45904590 toText = \case
4591− Bulletin -> "bulletin"
4592− ChannelItem -> "channelItem"
4593− Comment -> "comment"
4594− Favorite -> "favorite"
4595− Like -> "like"
4596− PlayListItem -> "playlistItem"
4597− PromotedItem -> "promotedItem"
4598− Recommendation -> "recommendation"
4599− Social -> "social"
4600− Subscription -> "subscription"
4601− Upload -> "upload"
4591+ ASTBulletin -> "bulletin"
4592+ ASTChannelItem -> "channelItem"
4593+ ASTComment -> "comment"
4594+ ASTFavorite -> "favorite"
4595+ ASTLike -> "like"
4596+ ASTPlayListItem -> "playlistItem"
4597+ ASTPromotedItem -> "promotedItem"
4598+ ASTRecommendation -> "recommendation"
4599+ ASTSocial -> "social"
4600+ ASTSubscription -> "subscription"
4601+ ASTUpload -> "upload"
46024602
46034603instance FromJSON ActivitySnippetType where
46044604 parseJSON = parseJSONText "ActivitySnippetType"
@@ -5146,10 +5146,10 @@ instance ToJSON VideoSuggestionsProcessingErrors where
51465146-- | Set this parameter\'s value to like or dislike to instruct the API to
51475147-- only return videos liked or disliked by the authenticated user.
51485148data YouTubeVideosListMyRating
5149− = YTVLMRDislike
5149+ = Dislike
51505150 -- ^ @dislike@
51515151 -- Returns only videos disliked by the authenticated user.
5152− | YTVLMRLike
5152+ | Like
51535153 -- ^ @like@
51545154 -- Returns only video liked by the authenticated user.
51555155 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
@@ -5158,14 +5158,14 @@ instance Hashable YouTubeVideosListMyRating
51585158
51595159instance FromText YouTubeVideosListMyRating where
51605160 fromText = \case
5161− "dislike" -> Just YTVLMRDislike
5162− "like" -> Just YTVLMRLike
5161+ "dislike" -> Just Dislike
5162+ "like" -> Just Like
51635163 _ -> Nothing
51645164
51655165instance ToText YouTubeVideosListMyRating where
51665166 toText = \case
5167− YTVLMRDislike -> "dislike"
5168− YTVLMRLike -> "like"
5167+ Dislike -> "dislike"
5168+ Like -> "like"
51695169
51705170instance FromJSON YouTubeVideosListMyRating where
51715171 parseJSON = parseJSONText "YouTubeVideosListMyRating"
gogol-youtube/gogol-youtube.cabal+1−1
@@ -57,7 +57,7 @@ library
5757 , Network.Google.Resource.YouTube.I18nLanguages.List
5858 , Network.Google.Resource.YouTube.I18nRegions.List
5959 , Network.Google.Resource.YouTube.LiveBroadcasts.Bind
60− , Network.Google.Resource.YouTube.LiveBroadcasts.Bind_direct
60+ , Network.Google.Resource.YouTube.LiveBroadcasts.BindDirect
6161 , Network.Google.Resource.YouTube.LiveBroadcasts.Control
6262 , Network.Google.Resource.YouTube.LiveBroadcasts.Delete
6363 , Network.Google.Resource.YouTube.LiveBroadcasts.Insert