on develop help sign in
Regenerating all services with type OAuth Scope annotations
02608fbBrendan Hay
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -590,11 +591,11 @@ import Network.Google.AdExchangeBuyer.Types.Sum
590import Network.Google.Prelude
591import Network.Google.Prelude
591
592
592-- | Default request referring to version 'v1.4' of the Ad Exchange Buyer API. This contains the host and root path used as a starting point for constructing service requests.
593-- | Default request referring to version 'v1.4' of the Ad Exchange Buyer API. This contains the host and root path used as a starting point for constructing service requests.
593−adExchangeBuyerService :: ServiceConfig
594+adExchangeBuyerService :: Service
594adExchangeBuyerService
595adExchangeBuyerService
595 = defaultService (ServiceId "adexchangebuyer:v1.4")
596 = defaultService (ServiceId "adexchangebuyer:v1.4")
596 "www.googleapis.com"
597 "www.googleapis.com"
597
598
598-- | Manage your Ad Exchange buyer account configuration
599-- | Manage your Ad Exchange buyer account configuration
599−authAdexchangeBuyerScope :: OAuthScope
600−authAdexchangeBuyerScope = "https://www.googleapis.com/auth/adexchange.buyer";
600+authAdexchangeBuyerScope :: Proxy '["https://www.googleapis.com/auth/adexchange.buyer"]
601+authAdexchangeBuyerScope = Proxy;
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/AddDeal.hs+2
@@ -103,6 +103,8 @@ cadAccountId
103
103
104instance GoogleRequest CreativesAddDeal where
104instance GoogleRequest CreativesAddDeal where
105 type Rs CreativesAddDeal = ()
105 type Rs CreativesAddDeal = ()
106+ type Scopes CreativesAddDeal =
107+ '["https://www.googleapis.com/auth/adexchange.buyer"]
106 requestClient CreativesAddDeal{..}
108 requestClient CreativesAddDeal{..}
107 = go _cadAccountId _cadBuyerCreativeId _cadDealId
109 = go _cadAccountId _cadBuyerCreativeId _cadDealId
108 (Just AltJSON)
110 (Just AltJSON)
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Creatives/RemoveDeal.hs+2
@@ -103,6 +103,8 @@ crdAccountId
103
103
104instance GoogleRequest CreativesRemoveDeal where
104instance GoogleRequest CreativesRemoveDeal where
105 type Rs CreativesRemoveDeal = ()
105 type Rs CreativesRemoveDeal = ()
106+ type Scopes CreativesRemoveDeal =
107+ '["https://www.googleapis.com/auth/adexchange.buyer"]
106 requestClient CreativesRemoveDeal{..}
108 requestClient CreativesRemoveDeal{..}
107 = go _crdAccountId _crdBuyerCreativeId _crdDealId
109 = go _crdAccountId _crdBuyerCreativeId _crdDealId
108 (Just AltJSON)
110 (Just AltJSON)
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Products/Get.hs+2
@@ -75,6 +75,8 @@ pgProductId
75
75
76instance GoogleRequest ProductsGet where
76instance GoogleRequest ProductsGet where
77 type Rs ProductsGet = Product
77 type Rs ProductsGet = Product
78+ type Scopes ProductsGet =
79+ '["https://www.googleapis.com/auth/adexchange.buyer"]
78 requestClient ProductsGet{..}
80 requestClient ProductsGet{..}
79 = go _pgProductId (Just AltJSON)
81 = go _pgProductId (Just AltJSON)
80 adExchangeBuyerService
82 adExchangeBuyerService
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Products/Search.hs+2
@@ -76,6 +76,8 @@ psPqlQuery
76
76
77instance GoogleRequest ProductsSearch where
77instance GoogleRequest ProductsSearch where
78 type Rs ProductsSearch = GetOffersResponse
78 type Rs ProductsSearch = GetOffersResponse
79+ type Scopes ProductsSearch =
80+ '["https://www.googleapis.com/auth/adexchange.buyer"]
79 requestClient ProductsSearch{..}
81 requestClient ProductsSearch{..}
80 = go _psPqlQuery (Just AltJSON)
82 = go _psPqlQuery (Just AltJSON)
81 adExchangeBuyerService
83 adExchangeBuyerService
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Get.hs+2
@@ -75,6 +75,8 @@ pgProposalId
75
75
76instance GoogleRequest ProposalsGet where
76instance GoogleRequest ProposalsGet where
77 type Rs ProposalsGet = Proposal
77 type Rs ProposalsGet = Proposal
78+ type Scopes ProposalsGet =
79+ '["https://www.googleapis.com/auth/adexchange.buyer"]
78 requestClient ProposalsGet{..}
80 requestClient ProposalsGet{..}
79 = go _pgProposalId (Just AltJSON)
81 = go _pgProposalId (Just AltJSON)
80 adExchangeBuyerService
82 adExchangeBuyerService
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Insert.hs+2
@@ -77,6 +77,8 @@ piPayload
77
77
78instance GoogleRequest ProposalsInsert where
78instance GoogleRequest ProposalsInsert where
79 type Rs ProposalsInsert = CreateOrdersResponse
79 type Rs ProposalsInsert = CreateOrdersResponse
80+ type Scopes ProposalsInsert =
81+ '["https://www.googleapis.com/auth/adexchange.buyer"]
80 requestClient ProposalsInsert{..}
82 requestClient ProposalsInsert{..}
81 = go (Just AltJSON) _piPayload adExchangeBuyerService
83 = go (Just AltJSON) _piPayload adExchangeBuyerService
82 where go
84 where go
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Patch.hs+2
@@ -117,6 +117,8 @@ ppProposalId
117
117
118instance GoogleRequest ProposalsPatch where
118instance GoogleRequest ProposalsPatch where
119 type Rs ProposalsPatch = Proposal
119 type Rs ProposalsPatch = Proposal
120+ type Scopes ProposalsPatch =
121+ '["https://www.googleapis.com/auth/adexchange.buyer"]
120 requestClient ProposalsPatch{..}
122 requestClient ProposalsPatch{..}
121 = go _ppProposalId _ppRevisionNumber _ppUpdateAction
123 = go _ppProposalId _ppRevisionNumber _ppUpdateAction
122 (Just AltJSON)
124 (Just AltJSON)
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Search.hs+2
@@ -76,6 +76,8 @@ pPqlQuery
76
76
77instance GoogleRequest ProposalsSearch where
77instance GoogleRequest ProposalsSearch where
78 type Rs ProposalsSearch = GetOrdersResponse
78 type Rs ProposalsSearch = GetOrdersResponse
79+ type Scopes ProposalsSearch =
80+ '["https://www.googleapis.com/auth/adexchange.buyer"]
79 requestClient ProposalsSearch{..}
81 requestClient ProposalsSearch{..}
80 = go _pPqlQuery (Just AltJSON) adExchangeBuyerService
82 = go _pPqlQuery (Just AltJSON) adExchangeBuyerService
81 where go
83 where go
gogol-adexchange-buyer/gen/Network/Google/Resource/AdExchangeBuyer/Proposals/Update.hs+2
@@ -117,6 +117,8 @@ puProposalId
117
117
118instance GoogleRequest ProposalsUpdate where
118instance GoogleRequest ProposalsUpdate where
119 type Rs ProposalsUpdate = Proposal
119 type Rs ProposalsUpdate = Proposal
120+ type Scopes ProposalsUpdate =
121+ '["https://www.googleapis.com/auth/adexchange.buyer"]
120 requestClient ProposalsUpdate{..}
122 requestClient ProposalsUpdate{..}
121 = go _puProposalId _puRevisionNumber _puUpdateAction
123 = go _puProposalId _puRevisionNumber _puUpdateAction
122 (Just AltJSON)
124 (Just AltJSON)
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -183,15 +184,15 @@ import Network.Google.AdExchangeSeller.Types.Sum
183import Network.Google.Prelude
184import Network.Google.Prelude
184
185
185-- | Default request referring to version 'v2.0' of the Ad Exchange Seller API. This contains the host and root path used as a starting point for constructing service requests.
186-- | Default request referring to version 'v2.0' of the Ad Exchange Seller API. This contains the host and root path used as a starting point for constructing service requests.
186−adExchangeSellerService :: ServiceConfig
187+adExchangeSellerService :: Service
187adExchangeSellerService
188adExchangeSellerService
188 = defaultService (ServiceId "adexchangeseller:v2.0")
189 = defaultService (ServiceId "adexchangeseller:v2.0")
189 "www.googleapis.com"
190 "www.googleapis.com"
190
191
191-- | View your Ad Exchange data
192-- | View your Ad Exchange data
192−authAdexchangeSellerReadonlyScope :: OAuthScope
193−authAdexchangeSellerReadonlyScope = "https://www.googleapis.com/auth/adexchange.seller.readonly";
193+authAdexchangeSellerReadonlyScope :: Proxy '["https://www.googleapis.com/auth/adexchange.seller.readonly"]
194+authAdexchangeSellerReadonlyScope = Proxy;
194
195
195-- | View and manage your Ad Exchange data
196-- | View and manage your Ad Exchange data
196−authAdexchangeSellerScope :: OAuthScope
197−authAdexchangeSellerScope = "https://www.googleapis.com/auth/adexchange.seller";
197+authAdexchangeSellerScope :: Proxy '["https://www.googleapis.com/auth/adexchange.seller"]
198+authAdexchangeSellerScope = Proxy;
gogol-admin-datatransfer/gen/Network/Google/DataTransfer/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -78,15 +79,15 @@ import Network.Google.DataTransfer.Types.Sum
78import Network.Google.Prelude
79import Network.Google.Prelude
79
80
80-- | Default request referring to version 'datatransfer_v1' of the Admin Data Transfer API. This contains the host and root path used as a starting point for constructing service requests.
81-- | Default request referring to version 'datatransfer_v1' of the Admin Data Transfer API. This contains the host and root path used as a starting point for constructing service requests.
81−dataTransferService :: ServiceConfig
82+dataTransferService :: Service
82dataTransferService
83dataTransferService
83 = defaultService (ServiceId "admin:datatransfer_v1")
84 = defaultService (ServiceId "admin:datatransfer_v1")
84 "www.googleapis.com"
85 "www.googleapis.com"
85
86
86-- | View data transfers between users in your organization
87-- | View data transfers between users in your organization
87−authAdminDatatransferReadonlyScope :: OAuthScope
88−authAdminDatatransferReadonlyScope = "https://www.googleapis.com/auth/admin.datatransfer.readonly";
88+authAdminDatatransferReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.datatransfer.readonly"]
89+authAdminDatatransferReadonlyScope = Proxy;
89
90
90-- | View and manage data transfers between users in your organization
91-- | View and manage data transfers between users in your organization
91−authAdminDatatransferScope :: OAuthScope
92−authAdminDatatransferScope = "https://www.googleapis.com/auth/admin.datatransfer";
92+authAdminDatatransferScope :: Proxy '["https://www.googleapis.com/auth/admin.datatransfer"]
93+authAdminDatatransferScope = Proxy;
gogol-admin-directory/gen/Network/Google/Directory/Types.hs+56−55
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -753,115 +754,115 @@ import Network.Google.Directory.Types.Sum
753import Network.Google.Prelude
754import Network.Google.Prelude
754
755
755-- | Default request referring to version 'directory_v1' of the Admin Directory API. This contains the host and root path used as a starting point for constructing service requests.
756-- | Default request referring to version 'directory_v1' of the Admin Directory API. This contains the host and root path used as a starting point for constructing service requests.
756−directoryService :: ServiceConfig
757+directoryService :: Service
757directoryService
758directoryService
758 = defaultService (ServiceId "admin:directory_v1")
759 = defaultService (ServiceId "admin:directory_v1")
759 "www.googleapis.com"
760 "www.googleapis.com"
760
761
761-- | View delegated admin roles for your domain
762-- | View delegated admin roles for your domain
762−authAdminDirectoryRolemanagementReadonlyScope :: OAuthScope
763−authAdminDirectoryRolemanagementReadonlyScope = "https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly";
763+authAdminDirectoryRolemanagementReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.rolemanagement.readonly"]
764+authAdminDirectoryRolemanagementReadonlyScope = Proxy;
764
765
765-- | View groups on your domain
766-- | View groups on your domain
766−authAdminDirectoryGroupReadonlyScope :: OAuthScope
767−authAdminDirectoryGroupReadonlyScope = "https://www.googleapis.com/auth/admin.directory.group.readonly";
767+authAdminDirectoryGroupReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.group.readonly"]
768+authAdminDirectoryGroupReadonlyScope = Proxy;
768
769
769-- | View your Chrome OS devices\' metadata
770-- | View your Chrome OS devices\' metadata
770−authAdminDirectoryDeviceChromeosReadonlyScope :: OAuthScope
771−authAdminDirectoryDeviceChromeosReadonlyScope = "https://www.googleapis.com/auth/admin.directory.device.chromeos.readonly";
771+authAdminDirectoryDeviceChromeosReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.device.chromeos.readonly"]
772+authAdminDirectoryDeviceChromeosReadonlyScope = Proxy;
772
773
773-- | View and manage your Chrome OS devices\' metadata
774-- | View and manage your Chrome OS devices\' metadata
774−authAdminDirectoryDeviceChromeosScope :: OAuthScope
775−authAdminDirectoryDeviceChromeosScope = "https://www.googleapis.com/auth/admin.directory.device.chromeos";
775+authAdminDirectoryDeviceChromeosScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.device.chromeos"]
776+authAdminDirectoryDeviceChromeosScope = Proxy;
776
777
777-- | View and manage the provisioning of users on your domain
778-- | View and manage the provisioning of users on your domain
778−authAdminDirectoryUserScope :: OAuthScope
779−authAdminDirectoryUserScope = "https://www.googleapis.com/auth/admin.directory.user";
779+authAdminDirectoryUserScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user"]
780+authAdminDirectoryUserScope = Proxy;
780
781
781-- | View group subscriptions on your domain
782-- | View group subscriptions on your domain
782−authAdminDirectoryGroupMemberReadonlyScope :: OAuthScope
783−authAdminDirectoryGroupMemberReadonlyScope = "https://www.googleapis.com/auth/admin.directory.group.member.readonly";
783+authAdminDirectoryGroupMemberReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.group.member.readonly"]
784+authAdminDirectoryGroupMemberReadonlyScope = Proxy;
784
785
785-- | View and manage user aliases on your domain
786-- | View and manage user aliases on your domain
786−authAdminDirectoryUserAliasScope :: OAuthScope
787−authAdminDirectoryUserAliasScope = "https://www.googleapis.com/auth/admin.directory.user.alias";
787+authAdminDirectoryUserAliasScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user.alias"]
788+authAdminDirectoryUserAliasScope = Proxy;
788
789
789-- | View and manage the provisioning of calendar resources on your domain
790-- | View and manage the provisioning of calendar resources on your domain
790−authAdminDirectoryResourceCalendarScope :: OAuthScope
791−authAdminDirectoryResourceCalendarScope = "https://www.googleapis.com/auth/admin.directory.resource.calendar";
791+authAdminDirectoryResourceCalendarScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]
792+authAdminDirectoryResourceCalendarScope = Proxy;
792
793
793-- | Manage your mobile devices by performing administrative tasks
794-- | Manage your mobile devices by performing administrative tasks
794−authAdminDirectoryDeviceMobileActionScope :: OAuthScope
795−authAdminDirectoryDeviceMobileActionScope = "https://www.googleapis.com/auth/admin.directory.device.mobile.action";
795+authAdminDirectoryDeviceMobileActionScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.device.mobile.action"]
796+authAdminDirectoryDeviceMobileActionScope = Proxy;
796
797
797-- | View calendar resources on your domain
798-- | View calendar resources on your domain
798−authAdminDirectoryResourceCalendarReadonlyScope :: OAuthScope
799−authAdminDirectoryResourceCalendarReadonlyScope = "https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly";
799+authAdminDirectoryResourceCalendarReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly"]
800+authAdminDirectoryResourceCalendarReadonlyScope = Proxy;
800
801
801-- | View domains related to your customers
802-- | View domains related to your customers
802−authAdminDirectoryDomainReadonlyScope :: OAuthScope
803−authAdminDirectoryDomainReadonlyScope = "https://www.googleapis.com/auth/admin.directory.domain.readonly";
803+authAdminDirectoryDomainReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.domain.readonly"]
804+authAdminDirectoryDomainReadonlyScope = Proxy;
804
805
805-- | View and manage the provisioning of user schemas on your domain
806-- | View and manage the provisioning of user schemas on your domain
806−authAdminDirectoryUserschemaScope :: OAuthScope
807−authAdminDirectoryUserschemaScope = "https://www.googleapis.com/auth/admin.directory.userschema";
807+authAdminDirectoryUserschemaScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.userschema"]
808+authAdminDirectoryUserschemaScope = Proxy;
808
809
809-- | View user schemas on your domain
810-- | View user schemas on your domain
810−authAdminDirectoryUserschemaReadonlyScope :: OAuthScope
811−authAdminDirectoryUserschemaReadonlyScope = "https://www.googleapis.com/auth/admin.directory.userschema.readonly";
811+authAdminDirectoryUserschemaReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.userschema.readonly"]
812+authAdminDirectoryUserschemaReadonlyScope = Proxy;
812
813
813-- | View and manage the provisioning of domains for your customers
814-- | View and manage the provisioning of domains for your customers
814−authAdminDirectoryDomainScope :: OAuthScope
815−authAdminDirectoryDomainScope = "https://www.googleapis.com/auth/admin.directory.domain";
815+authAdminDirectoryDomainScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.domain"]
816+authAdminDirectoryDomainScope = Proxy;
816
817
817-- | Manage delegated admin roles for your domain
818-- | Manage delegated admin roles for your domain
818−authAdminDirectoryRolemanagementScope :: OAuthScope
819−authAdminDirectoryRolemanagementScope = "https://www.googleapis.com/auth/admin.directory.rolemanagement";
819+authAdminDirectoryRolemanagementScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.rolemanagement"]
820+authAdminDirectoryRolemanagementScope = Proxy;
820
821
821-- | View and manage the provisioning of groups on your domain
822-- | View and manage the provisioning of groups on your domain
822−authAdminDirectoryGroupScope :: OAuthScope
823−authAdminDirectoryGroupScope = "https://www.googleapis.com/auth/admin.directory.group";
823+authAdminDirectoryGroupScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.group"]
824+authAdminDirectoryGroupScope = Proxy;
824
825
825-- | View organization units on your domain
826-- | View organization units on your domain
826−authAdminDirectoryOrgunitReadonlyScope :: OAuthScope
827−authAdminDirectoryOrgunitReadonlyScope = "https://www.googleapis.com/auth/admin.directory.orgunit.readonly";
827+authAdminDirectoryOrgunitReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.orgunit.readonly"]
828+authAdminDirectoryOrgunitReadonlyScope = Proxy;
828
829
829-- | View and manage customer related information
830-- | View and manage customer related information
830−authAdminDirectoryCustomerScope :: OAuthScope
831−authAdminDirectoryCustomerScope = "https://www.googleapis.com/auth/admin.directory.customer";
831+authAdminDirectoryCustomerScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.customer"]
832+authAdminDirectoryCustomerScope = Proxy;
832
833
833-- | View customer related information
834-- | View customer related information
834−authAdminDirectoryCustomerReadonlyScope :: OAuthScope
835−authAdminDirectoryCustomerReadonlyScope = "https://www.googleapis.com/auth/admin.directory.customer.readonly";
835+authAdminDirectoryCustomerReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.customer.readonly"]
836+authAdminDirectoryCustomerReadonlyScope = Proxy;
836
837
837-- | View and manage organization units on your domain
838-- | View and manage organization units on your domain
838−authAdminDirectoryOrgunitScope :: OAuthScope
839−authAdminDirectoryOrgunitScope = "https://www.googleapis.com/auth/admin.directory.orgunit";
839+authAdminDirectoryOrgunitScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.orgunit"]
840+authAdminDirectoryOrgunitScope = Proxy;
840
841
841-- | View users on your domain
842-- | View users on your domain
842−authAdminDirectoryUserReadonlyScope :: OAuthScope
843−authAdminDirectoryUserReadonlyScope = "https://www.googleapis.com/auth/admin.directory.user.readonly";
843+authAdminDirectoryUserReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user.readonly"]
844+authAdminDirectoryUserReadonlyScope = Proxy;
844
845
845-- | View user aliases on your domain
846-- | View user aliases on your domain
846−authAdminDirectoryUserAliasReadonlyScope :: OAuthScope
847−authAdminDirectoryUserAliasReadonlyScope = "https://www.googleapis.com/auth/admin.directory.user.alias.readonly";
847+authAdminDirectoryUserAliasReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user.alias.readonly"]
848+authAdminDirectoryUserAliasReadonlyScope = Proxy;
848
849
849-- | Manage data access permissions for users on your domain
850-- | Manage data access permissions for users on your domain
850−authAdminDirectoryUserSecurityScope :: OAuthScope
851−authAdminDirectoryUserSecurityScope = "https://www.googleapis.com/auth/admin.directory.user.security";
851+authAdminDirectoryUserSecurityScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user.security"]
852+authAdminDirectoryUserSecurityScope = Proxy;
852
853
853-- | View and manage group subscriptions on your domain
854-- | View and manage group subscriptions on your domain
854−authAdminDirectoryGroupMemberScope :: OAuthScope
855−authAdminDirectoryGroupMemberScope = "https://www.googleapis.com/auth/admin.directory.group.member";
855+authAdminDirectoryGroupMemberScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.group.member"]
856+authAdminDirectoryGroupMemberScope = Proxy;
856
857
857-- | View and manage notifications received on your domain
858-- | View and manage notifications received on your domain
858−authAdminDirectoryNotificationsScope :: OAuthScope
859−authAdminDirectoryNotificationsScope = "https://www.googleapis.com/auth/admin.directory.notifications";
859+authAdminDirectoryNotificationsScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.notifications"]
860+authAdminDirectoryNotificationsScope = Proxy;
860
861
861-- | View and manage your mobile devices\' metadata
862-- | View and manage your mobile devices\' metadata
862−authAdminDirectoryDeviceMobileScope :: OAuthScope
863−authAdminDirectoryDeviceMobileScope = "https://www.googleapis.com/auth/admin.directory.device.mobile";
863+authAdminDirectoryDeviceMobileScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.device.mobile"]
864+authAdminDirectoryDeviceMobileScope = Proxy;
864
865
865-- | View your mobile devices\' metadata
866-- | View your mobile devices\' metadata
866−authAdminDirectoryDeviceMobileReadonlyScope :: OAuthScope
867−authAdminDirectoryDeviceMobileReadonlyScope = "https://www.googleapis.com/auth/admin.directory.device.mobile.readonly";
867+authAdminDirectoryDeviceMobileReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.device.mobile.readonly"]
868+authAdminDirectoryDeviceMobileReadonlyScope = Proxy;
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Delete.hs+2
@@ -93,6 +93,8 @@ rcdCalendarResourceId
93
93
94instance GoogleRequest ResourcesCalendarsDelete where
94instance GoogleRequest ResourcesCalendarsDelete where
95 type Rs ResourcesCalendarsDelete = ()
95 type Rs ResourcesCalendarsDelete = ()
96+ type Scopes ResourcesCalendarsDelete =
97+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]
96 requestClient ResourcesCalendarsDelete{..}
98 requestClient ResourcesCalendarsDelete{..}
97 = go _rcdCustomer _rcdCalendarResourceId
99 = go _rcdCustomer _rcdCalendarResourceId
98 (Just AltJSON)
100 (Just AltJSON)
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Get.hs+3
@@ -94,6 +94,9 @@ rcgCalendarResourceId
94
94
95instance GoogleRequest ResourcesCalendarsGet where
95instance GoogleRequest ResourcesCalendarsGet where
96 type Rs ResourcesCalendarsGet = CalendarResource
96 type Rs ResourcesCalendarsGet = CalendarResource
97+ type Scopes ResourcesCalendarsGet =
98+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar",
99+ "https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly"]
97 requestClient ResourcesCalendarsGet{..}
100 requestClient ResourcesCalendarsGet{..}
98 = go _rcgCustomer _rcgCalendarResourceId
101 = go _rcgCustomer _rcgCalendarResourceId
99 (Just AltJSON)
102 (Just AltJSON)
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Insert.hs+2
@@ -93,6 +93,8 @@ rciCustomer
93
93
94instance GoogleRequest ResourcesCalendarsInsert where
94instance GoogleRequest ResourcesCalendarsInsert where
95 type Rs ResourcesCalendarsInsert = CalendarResource
95 type Rs ResourcesCalendarsInsert = CalendarResource
96+ type Scopes ResourcesCalendarsInsert =
97+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]
96 requestClient ResourcesCalendarsInsert{..}
98 requestClient ResourcesCalendarsInsert{..}
97 = go _rciCustomer (Just AltJSON) _rciPayload
99 = go _rciCustomer (Just AltJSON) _rciPayload
98 directoryService
100 directoryService
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/List.hs+3
@@ -105,6 +105,9 @@ rclMaxResults
105
105
106instance GoogleRequest ResourcesCalendarsList where
106instance GoogleRequest ResourcesCalendarsList where
107 type Rs ResourcesCalendarsList = CalendarResources
107 type Rs ResourcesCalendarsList = CalendarResources
108+ type Scopes ResourcesCalendarsList =
109+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar",
110+ "https://www.googleapis.com/auth/admin.directory.resource.calendar.readonly"]
108 requestClient ResourcesCalendarsList{..}
111 requestClient ResourcesCalendarsList{..}
109 = go _rclCustomer _rclPageToken _rclMaxResults
112 = go _rclCustomer _rclPageToken _rclMaxResults
110 (Just AltJSON)
113 (Just AltJSON)
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Patch.hs+2
@@ -106,6 +106,8 @@ rcpCalendarResourceId
106
106
107instance GoogleRequest ResourcesCalendarsPatch where
107instance GoogleRequest ResourcesCalendarsPatch where
108 type Rs ResourcesCalendarsPatch = CalendarResource
108 type Rs ResourcesCalendarsPatch = CalendarResource
109+ type Scopes ResourcesCalendarsPatch =
110+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]
109 requestClient ResourcesCalendarsPatch{..}
111 requestClient ResourcesCalendarsPatch{..}
110 = go _rcpCustomer _rcpCalendarResourceId
112 = go _rcpCustomer _rcpCalendarResourceId
111 (Just AltJSON)
113 (Just AltJSON)
gogol-admin-directory/gen/Network/Google/Resource/Directory/Resources/Calendars/Update.hs+2
@@ -106,6 +106,8 @@ rcuCalendarResourceId
106
106
107instance GoogleRequest ResourcesCalendarsUpdate where
107instance GoogleRequest ResourcesCalendarsUpdate where
108 type Rs ResourcesCalendarsUpdate = CalendarResource
108 type Rs ResourcesCalendarsUpdate = CalendarResource
109+ type Scopes ResourcesCalendarsUpdate =
110+ '["https://www.googleapis.com/auth/admin.directory.resource.calendar"]
109 requestClient ResourcesCalendarsUpdate{..}
111 requestClient ResourcesCalendarsUpdate{..}
110 = go _rcuCustomer _rcuCalendarResourceId
112 = go _rcuCustomer _rcuCalendarResourceId
111 (Just AltJSON)
113 (Just AltJSON)
gogol-admin-emailmigration/gen/Network/Google/EmailMigration/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -40,12 +41,12 @@ import Network.Google.EmailMigration.Types.Sum
40import Network.Google.Prelude
41import Network.Google.Prelude
41
42
42-- | Default request referring to version 'email_migration_v2' of the Email Migration API v2. This contains the host and root path used as a starting point for constructing service requests.
43-- | Default request referring to version 'email_migration_v2' of the Email Migration API v2. This contains the host and root path used as a starting point for constructing service requests.
43−emailMigrationService :: ServiceConfig
44+emailMigrationService :: Service
44emailMigrationService
45emailMigrationService
45 = defaultService
46 = defaultService
46 (ServiceId "admin:email_migration_v2")
47 (ServiceId "admin:email_migration_v2")
47 "www.googleapis.com"
48 "www.googleapis.com"
48
49
49-- | Manage email messages of users on your domain
50-- | Manage email messages of users on your domain
50−authEmailMigrationScope :: OAuthScope
51−authEmailMigrationScope = "https://www.googleapis.com/auth/email.migration";
51+authEmailMigrationScope :: Proxy '["https://www.googleapis.com/auth/email.migration"]
52+authEmailMigrationScope = Proxy;
gogol-admin-reports/gen/Network/Google/Reports/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -153,15 +154,15 @@ import Network.Google.Reports.Types.Product
153import Network.Google.Reports.Types.Sum
154import Network.Google.Reports.Types.Sum
154
155
155-- | Default request referring to version 'reports_v1' of the Admin Reports API. This contains the host and root path used as a starting point for constructing service requests.
156-- | Default request referring to version 'reports_v1' of the Admin Reports API. This contains the host and root path used as a starting point for constructing service requests.
156−reportsService :: ServiceConfig
157+reportsService :: Service
157reportsService
158reportsService
158 = defaultService (ServiceId "admin:reports_v1")
159 = defaultService (ServiceId "admin:reports_v1")
159 "www.googleapis.com"
160 "www.googleapis.com"
160
161
161-- | View usage reports of Google Apps for your domain
162-- | View usage reports of Google Apps for your domain
162−authAdminReportsUsageReadonlyScope :: OAuthScope
163−authAdminReportsUsageReadonlyScope = "https://www.googleapis.com/auth/admin.reports.usage.readonly";
163+authAdminReportsUsageReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.reports.usage.readonly"]
164+authAdminReportsUsageReadonlyScope = Proxy;
164
165
165-- | View audit reports of Google Apps for your domain
166-- | View audit reports of Google Apps for your domain
166−authAdminReportsAuditReadonlyScope :: OAuthScope
167−authAdminReportsAuditReadonlyScope = "https://www.googleapis.com/auth/admin.reports.audit.readonly";
167+authAdminReportsAuditReadonlyScope :: Proxy '["https://www.googleapis.com/auth/admin.reports.audit.readonly"]
168+authAdminReportsAuditReadonlyScope = Proxy;
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -195,11 +196,11 @@ import Network.Google.AdSenseHost.Types.Sum
195import Network.Google.Prelude
196import Network.Google.Prelude
196
197
197-- | Default request referring to version 'v4.1' of the AdSense Host API. This contains the host and root path used as a starting point for constructing service requests.
198-- | Default request referring to version 'v4.1' of the AdSense Host API. This contains the host and root path used as a starting point for constructing service requests.
198−adSenseHostService :: ServiceConfig
199+adSenseHostService :: Service
199adSenseHostService
200adSenseHostService
200 = defaultService (ServiceId "adsensehost:v4.1")
201 = defaultService (ServiceId "adsensehost:v4.1")
201 "www.googleapis.com"
202 "www.googleapis.com"
202
203
203-- | View and manage your AdSense host data and associated accounts
204-- | View and manage your AdSense host data and associated accounts
204−authAdsensehostScope :: OAuthScope
205−authAdsensehostScope = "https://www.googleapis.com/auth/adsensehost";
205+authAdsensehostScope :: Proxy '["https://www.googleapis.com/auth/adsensehost"]
206+authAdsensehostScope = Proxy;
gogol-adsense/gen/Network/Google/AdSense/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -284,15 +285,15 @@ import Network.Google.AdSense.Types.Sum
284import Network.Google.Prelude
285import Network.Google.Prelude
285
286
286-- | Default request referring to version 'v1.4' of the AdSense Management API. This contains the host and root path used as a starting point for constructing service requests.
287-- | Default request referring to version 'v1.4' of the AdSense Management API. This contains the host and root path used as a starting point for constructing service requests.
287−adSenseService :: ServiceConfig
288+adSenseService :: Service
288adSenseService
289adSenseService
289 = defaultService (ServiceId "adsense:v1.4")
290 = defaultService (ServiceId "adsense:v1.4")
290 "www.googleapis.com"
291 "www.googleapis.com"
291
292
292-- | View your AdSense data
293-- | View your AdSense data
293−authAdsenseReadonlyScope :: OAuthScope
294−authAdsenseReadonlyScope = "https://www.googleapis.com/auth/adsense.readonly";
294+authAdsenseReadonlyScope :: Proxy '["https://www.googleapis.com/auth/adsense.readonly"]
295+authAdsenseReadonlyScope = Proxy;
295
296
296-- | View and manage your AdSense data
297-- | View and manage your AdSense data
297−authAdsenseScope :: OAuthScope
298−authAdsenseScope = "https://www.googleapis.com/auth/adsense";
298+authAdsenseScope :: Proxy '["https://www.googleapis.com/auth/adsense"]
299+authAdsenseScope = Proxy;
gogol-affiliates/gen/Network/Google/Affiliates/Types.hs+1−1
@@ -346,7 +346,7 @@ import Network.Google.Affiliates.Types.Sum
346import Network.Google.Prelude
346import Network.Google.Prelude
347
347
348-- | Default request referring to version 'v1beta1' of the Google Affiliate Network API. This contains the host and root path used as a starting point for constructing service requests.
348-- | Default request referring to version 'v1beta1' of the Google Affiliate Network API. This contains the host and root path used as a starting point for constructing service requests.
349−affiliatesService :: ServiceConfig
349+affiliatesService :: Service
350affiliatesService
350affiliatesService
351 = defaultService (ServiceId "gan:v1beta1")
351 = defaultService (ServiceId "gan:v1beta1")
352 "www.googleapis.com"
352 "www.googleapis.com"
gogol-analytics/gen/Network/Google/Analytics/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -1025,32 +1026,32 @@ import Network.Google.Analytics.Types.Sum
1025import Network.Google.Prelude
1026import Network.Google.Prelude
1026
1027
1027-- | Default request referring to version 'v3' of the Google Analytics API. This contains the host and root path used as a starting point for constructing service requests.
1028-- | Default request referring to version 'v3' of the Google Analytics API. This contains the host and root path used as a starting point for constructing service requests.
1028−analyticsService :: ServiceConfig
1029+analyticsService :: Service
1029analyticsService
1030analyticsService
1030 = defaultService (ServiceId "analytics:v3")
1031 = defaultService (ServiceId "analytics:v3")
1031 "www.googleapis.com"
1032 "www.googleapis.com"
1032
1033
1033-- | Manage Google Analytics Account users by email address
1034-- | Manage Google Analytics Account users by email address
1034−authAnalyticsManageUsersScope :: OAuthScope
1035−authAnalyticsManageUsersScope = "https://www.googleapis.com/auth/analytics.manage.users";
1035+authAnalyticsManageUsersScope :: Proxy '["https://www.googleapis.com/auth/analytics.manage.users"]
1036+authAnalyticsManageUsersScope = Proxy;
1036
1037
1037-- | Create a new Google Analytics account along with its default property
1038-- | Create a new Google Analytics account along with its default property
1038-- and view
1039-- and view
1039−authAnalyticsProvisionScope :: OAuthScope
1040−authAnalyticsProvisionScope = "https://www.googleapis.com/auth/analytics.provision";
1040+authAnalyticsProvisionScope :: Proxy '["https://www.googleapis.com/auth/analytics.provision"]
1041+authAnalyticsProvisionScope = Proxy;
1041
1042
1042-- | View Google Analytics user permissions
1043-- | View Google Analytics user permissions
1043−authAnalyticsManageUsersReadonlyScope :: OAuthScope
1044−authAnalyticsManageUsersReadonlyScope = "https://www.googleapis.com/auth/analytics.manage.users.readonly";
1044+authAnalyticsManageUsersReadonlyScope :: Proxy '["https://www.googleapis.com/auth/analytics.manage.users.readonly"]
1045+authAnalyticsManageUsersReadonlyScope = Proxy;
1045
1046
1046-- | View and manage your Google Analytics data
1047-- | View and manage your Google Analytics data
1047−authAnalyticsScope :: OAuthScope
1048−authAnalyticsScope = "https://www.googleapis.com/auth/analytics";
1048+authAnalyticsScope :: Proxy '["https://www.googleapis.com/auth/analytics"]
1049+authAnalyticsScope = Proxy;
1049
1050
1050-- | View your Google Analytics data
1051-- | View your Google Analytics data
1051−authAnalyticsReadonlyScope :: OAuthScope
1052−authAnalyticsReadonlyScope = "https://www.googleapis.com/auth/analytics.readonly";
1052+authAnalyticsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/analytics.readonly"]
1053+authAnalyticsReadonlyScope = Proxy;
1053
1054
1054-- | Edit Google Analytics management entities
1055-- | Edit Google Analytics management entities
1055−authAnalyticsEditScope :: OAuthScope
1056−authAnalyticsEditScope = "https://www.googleapis.com/auth/analytics.edit";
1056+authAnalyticsEditScope :: Proxy '["https://www.googleapis.com/auth/analytics.edit"]
1057+authAnalyticsEditScope = Proxy;
gogol-analytics/gen/Network/Google/Resource/Analytics/Management/UnSampledReports/Delete.hs+2
@@ -120,6 +120,8 @@ musrdUnSampledReportId
120instance GoogleRequest
120instance GoogleRequest
121 ManagementUnSampledReportsDelete where
121 ManagementUnSampledReportsDelete where
122 type Rs ManagementUnSampledReportsDelete = ()
122 type Rs ManagementUnSampledReportsDelete = ()
123+ type Scopes ManagementUnSampledReportsDelete =
124+ '["https://www.googleapis.com/auth/analytics.edit"]
123 requestClient ManagementUnSampledReportsDelete{..}
125 requestClient ManagementUnSampledReportsDelete{..}
124 = go _musrdAccountId _musrdWebPropertyId
126 = go _musrdAccountId _musrdWebPropertyId
125 _musrdProFileId
127 _musrdProFileId
gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -293,11 +294,11 @@ import Network.Google.AndroidEnterprise.Types.Sum
293import Network.Google.Prelude
294import Network.Google.Prelude
294
295
295-- | Default request referring to version 'v1' of the Google Play EMM API. This contains the host and root path used as a starting point for constructing service requests.
296-- | Default request referring to version 'v1' of the Google Play EMM API. This contains the host and root path used as a starting point for constructing service requests.
296−androidEnterpriseService :: ServiceConfig
297+androidEnterpriseService :: Service
297androidEnterpriseService
298androidEnterpriseService
298 = defaultService (ServiceId "androidenterprise:v1")
299 = defaultService (ServiceId "androidenterprise:v1")
299 "www.googleapis.com"
300 "www.googleapis.com"
300
301
301-- | Manage corporate Android devices
302-- | Manage corporate Android devices
302−authAndroidenterpriseScope :: OAuthScope
303−authAndroidenterpriseScope = "https://www.googleapis.com/auth/androidenterprise";
303+authAndroidenterpriseScope :: Proxy '["https://www.googleapis.com/auth/androidenterprise"]
304+authAndroidenterpriseScope = Proxy;
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/GetStoreLayout.hs+2
@@ -78,6 +78,8 @@ egslEnterpriseId
78instance GoogleRequest EnterprisesGetStoreLayout
78instance GoogleRequest EnterprisesGetStoreLayout
79 where
79 where
80 type Rs EnterprisesGetStoreLayout = StoreLayout
80 type Rs EnterprisesGetStoreLayout = StoreLayout
81+ type Scopes EnterprisesGetStoreLayout =
82+ '["https://www.googleapis.com/auth/androidenterprise"]
81 requestClient EnterprisesGetStoreLayout{..}
83 requestClient EnterprisesGetStoreLayout{..}
82 = go _egslEnterpriseId (Just AltJSON)
84 = go _egslEnterpriseId (Just AltJSON)
83 androidEnterpriseService
85 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetStoreLayout.hs+2
@@ -91,6 +91,8 @@ esslPayload
91instance GoogleRequest EnterprisesSetStoreLayout
91instance GoogleRequest EnterprisesSetStoreLayout
92 where
92 where
93 type Rs EnterprisesSetStoreLayout = StoreLayout
93 type Rs EnterprisesSetStoreLayout = StoreLayout
94+ type Scopes EnterprisesSetStoreLayout =
95+ '["https://www.googleapis.com/auth/androidenterprise"]
94 requestClient EnterprisesSetStoreLayout{..}
96 requestClient EnterprisesSetStoreLayout{..}
95 = go _esslEnterpriseId (Just AltJSON) _esslPayload
97 = go _esslEnterpriseId (Just AltJSON) _esslPayload
96 androidEnterpriseService
98 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Delete.hs+2
@@ -104,6 +104,8 @@ sddClusterId
104instance GoogleRequest StorelayoutclustersDelete
104instance GoogleRequest StorelayoutclustersDelete
105 where
105 where
106 type Rs StorelayoutclustersDelete = ()
106 type Rs StorelayoutclustersDelete = ()
107+ type Scopes StorelayoutclustersDelete =
108+ '["https://www.googleapis.com/auth/androidenterprise"]
107 requestClient StorelayoutclustersDelete{..}
109 requestClient StorelayoutclustersDelete{..}
108 = go _sddEnterpriseId _sddPageId _sddClusterId
110 = go _sddEnterpriseId _sddPageId _sddClusterId
109 (Just AltJSON)
111 (Just AltJSON)
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Get.hs+2
@@ -103,6 +103,8 @@ stoClusterId
103
103
104instance GoogleRequest StorelayoutclustersGet where
104instance GoogleRequest StorelayoutclustersGet where
105 type Rs StorelayoutclustersGet = StoreCluster
105 type Rs StorelayoutclustersGet = StoreCluster
106+ type Scopes StorelayoutclustersGet =
107+ '["https://www.googleapis.com/auth/androidenterprise"]
106 requestClient StorelayoutclustersGet{..}
108 requestClient StorelayoutclustersGet{..}
107 = go _stoEnterpriseId _stoPageId _stoClusterId
109 = go _stoEnterpriseId _stoPageId _stoClusterId
108 (Just AltJSON)
110 (Just AltJSON)
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Insert.hs+2
@@ -103,6 +103,8 @@ sPayload = lens _sPayload (\ s a -> s{_sPayload = a})
103instance GoogleRequest StorelayoutclustersInsert
103instance GoogleRequest StorelayoutclustersInsert
104 where
104 where
105 type Rs StorelayoutclustersInsert = StoreCluster
105 type Rs StorelayoutclustersInsert = StoreCluster
106+ type Scopes StorelayoutclustersInsert =
107+ '["https://www.googleapis.com/auth/androidenterprise"]
106 requestClient StorelayoutclustersInsert{..}
108 requestClient StorelayoutclustersInsert{..}
107 = go _sEnterpriseId _sPageId (Just AltJSON) _sPayload
109 = go _sEnterpriseId _sPageId (Just AltJSON) _sPayload
108 androidEnterpriseService
110 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/List.hs+2
@@ -93,6 +93,8 @@ sllPageId
93instance GoogleRequest StorelayoutclustersList where
93instance GoogleRequest StorelayoutclustersList where
94 type Rs StorelayoutclustersList =
94 type Rs StorelayoutclustersList =
95 StoreLayoutClustersListResponse
95 StoreLayoutClustersListResponse
96+ type Scopes StorelayoutclustersList =
97+ '["https://www.googleapis.com/auth/androidenterprise"]
96 requestClient StorelayoutclustersList{..}
98 requestClient StorelayoutclustersList{..}
97 = go _sllEnterpriseId _sllPageId (Just AltJSON)
99 = go _sllEnterpriseId _sllPageId (Just AltJSON)
98 androidEnterpriseService
100 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Patch.hs+2
@@ -116,6 +116,8 @@ sppClusterId
116
116
117instance GoogleRequest StorelayoutclustersPatch where
117instance GoogleRequest StorelayoutclustersPatch where
118 type Rs StorelayoutclustersPatch = StoreCluster
118 type Rs StorelayoutclustersPatch = StoreCluster
119+ type Scopes StorelayoutclustersPatch =
120+ '["https://www.googleapis.com/auth/androidenterprise"]
119 requestClient StorelayoutclustersPatch{..}
121 requestClient StorelayoutclustersPatch{..}
120 = go _sppEnterpriseId _sppPageId _sppClusterId
122 = go _sppEnterpriseId _sppPageId _sppClusterId
121 (Just AltJSON)
123 (Just AltJSON)
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutclusters/Update.hs+2
@@ -117,6 +117,8 @@ suuClusterId
117instance GoogleRequest StorelayoutclustersUpdate
117instance GoogleRequest StorelayoutclustersUpdate
118 where
118 where
119 type Rs StorelayoutclustersUpdate = StoreCluster
119 type Rs StorelayoutclustersUpdate = StoreCluster
120+ type Scopes StorelayoutclustersUpdate =
121+ '["https://www.googleapis.com/auth/androidenterprise"]
120 requestClient StorelayoutclustersUpdate{..}
122 requestClient StorelayoutclustersUpdate{..}
121 = go _suuEnterpriseId _suuPageId _suuClusterId
123 = go _suuEnterpriseId _suuPageId _suuClusterId
122 (Just AltJSON)
124 (Just AltJSON)
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Delete.hs+2
@@ -89,6 +89,8 @@ sdPageId = lens _sdPageId (\ s a -> s{_sdPageId = a})
89
89
90instance GoogleRequest StorelayoutpagesDelete where
90instance GoogleRequest StorelayoutpagesDelete where
91 type Rs StorelayoutpagesDelete = ()
91 type Rs StorelayoutpagesDelete = ()
92+ type Scopes StorelayoutpagesDelete =
93+ '["https://www.googleapis.com/auth/androidenterprise"]
92 requestClient StorelayoutpagesDelete{..}
94 requestClient StorelayoutpagesDelete{..}
93 = go _sdEnterpriseId _sdPageId (Just AltJSON)
95 = go _sdEnterpriseId _sdPageId (Just AltJSON)
94 androidEnterpriseService
96 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Get.hs+2
@@ -89,6 +89,8 @@ sgPageId = lens _sgPageId (\ s a -> s{_sgPageId = a})
89
89
90instance GoogleRequest StorelayoutpagesGet where
90instance GoogleRequest StorelayoutpagesGet where
91 type Rs StorelayoutpagesGet = StorePage
91 type Rs StorelayoutpagesGet = StorePage
92+ type Scopes StorelayoutpagesGet =
93+ '["https://www.googleapis.com/auth/androidenterprise"]
92 requestClient StorelayoutpagesGet{..}
94 requestClient StorelayoutpagesGet{..}
93 = go _sgEnterpriseId _sgPageId (Just AltJSON)
95 = go _sgEnterpriseId _sgPageId (Just AltJSON)
94 androidEnterpriseService
96 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Insert.hs+2
@@ -90,6 +90,8 @@ siPayload
90
90
91instance GoogleRequest StorelayoutpagesInsert where
91instance GoogleRequest StorelayoutpagesInsert where
92 type Rs StorelayoutpagesInsert = StorePage
92 type Rs StorelayoutpagesInsert = StorePage
93+ type Scopes StorelayoutpagesInsert =
94+ '["https://www.googleapis.com/auth/androidenterprise"]
93 requestClient StorelayoutpagesInsert{..}
95 requestClient StorelayoutpagesInsert{..}
94 = go _siEnterpriseId (Just AltJSON) _siPayload
96 = go _siEnterpriseId (Just AltJSON) _siPayload
95 androidEnterpriseService
97 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/List.hs+2
@@ -80,6 +80,8 @@ slEnterpriseId
80instance GoogleRequest StorelayoutpagesList where
80instance GoogleRequest StorelayoutpagesList where
81 type Rs StorelayoutpagesList =
81 type Rs StorelayoutpagesList =
82 StoreLayoutPagesListResponse
82 StoreLayoutPagesListResponse
83+ type Scopes StorelayoutpagesList =
84+ '["https://www.googleapis.com/auth/androidenterprise"]
83 requestClient StorelayoutpagesList{..}
85 requestClient StorelayoutpagesList{..}
84 = go _slEnterpriseId (Just AltJSON)
86 = go _slEnterpriseId (Just AltJSON)
85 androidEnterpriseService
87 androidEnterpriseService
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Patch.hs+2
@@ -103,6 +103,8 @@ spPayload
103
103
104instance GoogleRequest StorelayoutpagesPatch where
104instance GoogleRequest StorelayoutpagesPatch where
105 type Rs StorelayoutpagesPatch = StorePage
105 type Rs StorelayoutpagesPatch = StorePage
106+ type Scopes StorelayoutpagesPatch =
107+ '["https://www.googleapis.com/auth/androidenterprise"]
106 requestClient StorelayoutpagesPatch{..}
108 requestClient StorelayoutpagesPatch{..}
107 = go _spEnterpriseId _spPageId (Just AltJSON)
109 = go _spEnterpriseId _spPageId (Just AltJSON)
108 _spPayload
110 _spPayload
gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Storelayoutpages/Update.hs+2
@@ -101,6 +101,8 @@ suPayload
101
101
102instance GoogleRequest StorelayoutpagesUpdate where
102instance GoogleRequest StorelayoutpagesUpdate where
103 type Rs StorelayoutpagesUpdate = StorePage
103 type Rs StorelayoutpagesUpdate = StorePage
104+ type Scopes StorelayoutpagesUpdate =
105+ '["https://www.googleapis.com/auth/androidenterprise"]
104 requestClient StorelayoutpagesUpdate{..}
106 requestClient StorelayoutpagesUpdate{..}
105 = go _suEnterpriseId _suPageId (Just AltJSON)
107 = go _suEnterpriseId _suPageId (Just AltJSON)
106 _suPayload
108 _suPayload
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -385,11 +386,11 @@ import Network.Google.AndroidPublisher.Types.Sum
385import Network.Google.Prelude
386import Network.Google.Prelude
386
387
387-- | Default request referring to version 'v2' of the Google Play Developer API. This contains the host and root path used as a starting point for constructing service requests.
388-- | Default request referring to version 'v2' of the Google Play Developer API. This contains the host and root path used as a starting point for constructing service requests.
388−androidPublisherService :: ServiceConfig
389+androidPublisherService :: Service
389androidPublisherService
390androidPublisherService
390 = defaultService (ServiceId "androidpublisher:v2")
391 = defaultService (ServiceId "androidpublisher:v2")
391 "www.googleapis.com"
392 "www.googleapis.com"
392
393
393-- | View and manage your Google Play Developer account
394-- | View and manage your Google Play Developer account
394−authAndroidpublisherScope :: OAuthScope
395−authAndroidpublisherScope = "https://www.googleapis.com/auth/androidpublisher";
395+authAndroidpublisherScope :: Proxy '["https://www.googleapis.com/auth/androidpublisher"]
396+authAndroidpublisherScope = Proxy;
gogol-appengine/gen/Network/Google/AppEngine/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -344,11 +345,11 @@ import Network.Google.AppEngine.Types.Sum
344import Network.Google.Prelude
345import Network.Google.Prelude
345
346
346-- | Default request referring to version 'v1beta5' of the Google App Engine Admin API. This contains the host and root path used as a starting point for constructing service requests.
347-- | Default request referring to version 'v1beta5' of the Google App Engine Admin API. This contains the host and root path used as a starting point for constructing service requests.
347−appEngineService :: ServiceConfig
348+appEngineService :: Service
348appEngineService
349appEngineService
349 = defaultService (ServiceId "appengine:v1beta5")
350 = defaultService (ServiceId "appengine:v1beta5")
350 "appengine.googleapis.com"
351 "appengine.googleapis.com"
351
352
352-- | View and manage your data across Google Cloud Platform services
353-- | View and manage your data across Google Cloud Platform services
353−authCloudPlatformScope :: OAuthScope
354−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
354+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
355+authCloudPlatformScope = Proxy;
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Delete.hs+2
@@ -169,6 +169,8 @@ asdCallback
169
169
170instance GoogleRequest AppsServicesDelete where
170instance GoogleRequest AppsServicesDelete where
171 type Rs AppsServicesDelete = Operation
171 type Rs AppsServicesDelete = Operation
172+ type Scopes AppsServicesDelete =
173+ '["https://www.googleapis.com/auth/cloud-platform"]
172 requestClient AppsServicesDelete{..}
174 requestClient AppsServicesDelete{..}
173 = go _asdAppsId _asdServicesId _asdXgafv
175 = go _asdAppsId _asdServicesId _asdXgafv
174 _asdUploadProtocol
176 _asdUploadProtocol
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Get.hs+2
@@ -168,6 +168,8 @@ asgCallback
168
168
169instance GoogleRequest AppsServicesGet where
169instance GoogleRequest AppsServicesGet where
170 type Rs AppsServicesGet = Service
170 type Rs AppsServicesGet = Service
171+ type Scopes AppsServicesGet =
172+ '["https://www.googleapis.com/auth/cloud-platform"]
171 requestClient AppsServicesGet{..}
173 requestClient AppsServicesGet{..}
172 = go _asgAppsId _asgServicesId _asgXgafv
174 = go _asgAppsId _asgServicesId _asgXgafv
173 _asgUploadProtocol
175 _asgUploadProtocol
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/List.hs+2
@@ -179,6 +179,8 @@ aslCallback
179
179
180instance GoogleRequest AppsServicesList where
180instance GoogleRequest AppsServicesList where
181 type Rs AppsServicesList = ListServicesResponse
181 type Rs AppsServicesList = ListServicesResponse
182+ type Scopes AppsServicesList =
183+ '["https://www.googleapis.com/auth/cloud-platform"]
182 requestClient AppsServicesList{..}
184 requestClient AppsServicesList{..}
183 = go _aslAppsId _aslXgafv _aslUploadProtocol
185 = go _aslAppsId _aslXgafv _aslUploadProtocol
184 (Just _aslPp)
186 (Just _aslPp)
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Patch.hs+2
@@ -204,6 +204,8 @@ aspCallback
204
204
205instance GoogleRequest AppsServicesPatch where
205instance GoogleRequest AppsServicesPatch where
206 type Rs AppsServicesPatch = Operation
206 type Rs AppsServicesPatch = Operation
207+ type Scopes AppsServicesPatch =
208+ '["https://www.googleapis.com/auth/cloud-platform"]
207 requestClient AppsServicesPatch{..}
209 requestClient AppsServicesPatch{..}
208 = go _aspAppsId _aspServicesId _aspXgafv
210 = go _aspAppsId _aspServicesId _aspXgafv
209 _aspUploadProtocol
211 _aspUploadProtocol
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Create.hs+2
@@ -184,6 +184,8 @@ asvcCallback
184instance GoogleRequest AppsServicesVersionsCreate
184instance GoogleRequest AppsServicesVersionsCreate
185 where
185 where
186 type Rs AppsServicesVersionsCreate = Operation
186 type Rs AppsServicesVersionsCreate = Operation
187+ type Scopes AppsServicesVersionsCreate =
188+ '["https://www.googleapis.com/auth/cloud-platform"]
187 requestClient AppsServicesVersionsCreate{..}
189 requestClient AppsServicesVersionsCreate{..}
188 = go _asvcAppsId _asvcServicesId _asvcXgafv
190 = go _asvcAppsId _asvcServicesId _asvcXgafv
189 _asvcUploadProtocol
191 _asvcUploadProtocol
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Delete.hs+2
@@ -185,6 +185,8 @@ asvdCallback
185instance GoogleRequest AppsServicesVersionsDelete
185instance GoogleRequest AppsServicesVersionsDelete
186 where
186 where
187 type Rs AppsServicesVersionsDelete = Operation
187 type Rs AppsServicesVersionsDelete = Operation
188+ type Scopes AppsServicesVersionsDelete =
189+ '["https://www.googleapis.com/auth/cloud-platform"]
188 requestClient AppsServicesVersionsDelete{..}
190 requestClient AppsServicesVersionsDelete{..}
189 = go _asvdAppsId _asvdServicesId _asvdVersionsId
191 = go _asvdAppsId _asvdServicesId _asvdVersionsId
190 _asvdXgafv
192 _asvdXgafv
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Get.hs+2
@@ -194,6 +194,8 @@ asvgCallback
194
194
195instance GoogleRequest AppsServicesVersionsGet where
195instance GoogleRequest AppsServicesVersionsGet where
196 type Rs AppsServicesVersionsGet = Version
196 type Rs AppsServicesVersionsGet = Version
197+ type Scopes AppsServicesVersionsGet =
198+ '["https://www.googleapis.com/auth/cloud-platform"]
197 requestClient AppsServicesVersionsGet{..}
199 requestClient AppsServicesVersionsGet{..}
198 = go _asvgAppsId _asvgServicesId _asvgVersionsId
200 = go _asvgAppsId _asvgServicesId _asvgVersionsId
199 _asvgXgafv
201 _asvgXgafv
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/List.hs+2
@@ -206,6 +206,8 @@ asvlCallback
206instance GoogleRequest AppsServicesVersionsList where
206instance GoogleRequest AppsServicesVersionsList where
207 type Rs AppsServicesVersionsList =
207 type Rs AppsServicesVersionsList =
208 ListVersionsResponse
208 ListVersionsResponse
209+ type Scopes AppsServicesVersionsList =
210+ '["https://www.googleapis.com/auth/cloud-platform"]
209 requestClient AppsServicesVersionsList{..}
211 requestClient AppsServicesVersionsList{..}
210 = go _asvlAppsId _asvlServicesId _asvlXgafv
212 = go _asvlAppsId _asvlServicesId _asvlXgafv
211 _asvlUploadProtocol
213 _asvlUploadProtocol
gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Services/Versions/Patch.hs+2
@@ -207,6 +207,8 @@ asvpCallback
207instance GoogleRequest AppsServicesVersionsPatch
207instance GoogleRequest AppsServicesVersionsPatch
208 where
208 where
209 type Rs AppsServicesVersionsPatch = Operation
209 type Rs AppsServicesVersionsPatch = Operation
210+ type Scopes AppsServicesVersionsPatch =
211+ '["https://www.googleapis.com/auth/cloud-platform"]
210 requestClient AppsServicesVersionsPatch{..}
212 requestClient AppsServicesVersionsPatch{..}
211 = go _asvpAppsId _asvpServicesId _asvpVersionsId
213 = go _asvpAppsId _asvpServicesId _asvpVersionsId
212 _asvpXgafv
214 _asvpXgafv
gogol-apps-activity/gen/Network/Google/AppsActivity/Types.hs+12−11
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -126,27 +127,27 @@ import Network.Google.AppsActivity.Types.Sum
126import Network.Google.Prelude
127import Network.Google.Prelude
127
128
128-- | Default request referring to version 'v1' of the Google Apps Activity API. This contains the host and root path used as a starting point for constructing service requests.
129-- | Default request referring to version 'v1' of the Google Apps Activity API. This contains the host and root path used as a starting point for constructing service requests.
129−appsActivityService :: ServiceConfig
130+appsActivityService :: Service
130appsActivityService
131appsActivityService
131 = defaultService (ServiceId "appsactivity:v1")
132 = defaultService (ServiceId "appsactivity:v1")
132 "www.googleapis.com"
133 "www.googleapis.com"
133
134
134-- | View metadata for files in your Google Drive
135-- | View metadata for files in your Google Drive
135−authDriveMetadataReadonlyScope :: OAuthScope
136−authDriveMetadataReadonlyScope = "https://www.googleapis.com/auth/drive.metadata.readonly";
136+authDriveMetadataReadonlyScope :: Proxy '["https://www.googleapis.com/auth/drive.metadata.readonly"]
137+authDriveMetadataReadonlyScope = Proxy;
137
138
138-- | View the activity history of your Google Apps
139-- | View the activity history of your Google Apps
139−authActivityScope :: OAuthScope
140−authActivityScope = "https://www.googleapis.com/auth/activity";
140+authActivityScope :: Proxy '["https://www.googleapis.com/auth/activity"]
141+authActivityScope = Proxy;
141
142
142-- | View the files in your Google Drive
143-- | View the files in your Google Drive
143−authDriveReadonlyScope :: OAuthScope
144−authDriveReadonlyScope = "https://www.googleapis.com/auth/drive.readonly";
144+authDriveReadonlyScope :: Proxy '["https://www.googleapis.com/auth/drive.readonly"]
145+authDriveReadonlyScope = Proxy;
145
146
146-- | View and manage the files in your Google Drive
147-- | View and manage the files in your Google Drive
147−authDriveScope :: OAuthScope
148−authDriveScope = "https://www.googleapis.com/auth/drive";
148+authDriveScope :: Proxy '["https://www.googleapis.com/auth/drive"]
149+authDriveScope = Proxy;
149
150
150-- | View and manage metadata of files in your Google Drive
151-- | View and manage metadata of files in your Google Drive
151−authDriveMetadataScope :: OAuthScope
152−authDriveMetadataScope = "https://www.googleapis.com/auth/drive.metadata";
152+authDriveMetadataScope :: Proxy '["https://www.googleapis.com/auth/drive.metadata"]
153+authDriveMetadataScope = Proxy;
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -388,15 +389,15 @@ import Network.Google.AppsCalendar.Types.Sum
388import Network.Google.Prelude
389import Network.Google.Prelude
389
390
390-- | Default request referring to version 'v3' of the Calendar API. This contains the host and root path used as a starting point for constructing service requests.
391-- | Default request referring to version 'v3' of the Calendar API. This contains the host and root path used as a starting point for constructing service requests.
391−appsCalendarService :: ServiceConfig
392+appsCalendarService :: Service
392appsCalendarService
393appsCalendarService
393 = defaultService (ServiceId "calendar:v3")
394 = defaultService (ServiceId "calendar:v3")
394 "www.googleapis.com"
395 "www.googleapis.com"
395
396
396-- | Manage your calendars
397-- | Manage your calendars
397−authCalendarScope :: OAuthScope
398−authCalendarScope = "https://www.googleapis.com/auth/calendar";
398+authCalendarScope :: Proxy '["https://www.googleapis.com/auth/calendar"]
399+authCalendarScope = Proxy;
399
400
400-- | View your calendars
401-- | View your calendars
401−authCalendarReadonlyScope :: OAuthScope
402−authCalendarReadonlyScope = "https://www.googleapis.com/auth/calendar.readonly";
402+authCalendarReadonlyScope :: Proxy '["https://www.googleapis.com/auth/calendar.readonly"]
403+authCalendarReadonlyScope = Proxy;
gogol-apps-licensing/gen/Network/Google/AppsLicensing/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -50,11 +51,11 @@ import Network.Google.AppsLicensing.Types.Sum
50import Network.Google.Prelude
51import Network.Google.Prelude
51
52
52-- | Default request referring to version 'v1' of the Enterprise License Manager API. This contains the host and root path used as a starting point for constructing service requests.
53-- | Default request referring to version 'v1' of the Enterprise License Manager API. This contains the host and root path used as a starting point for constructing service requests.
53−appsLicensingService :: ServiceConfig
54+appsLicensingService :: Service
54appsLicensingService
55appsLicensingService
55 = defaultService (ServiceId "licensing:v1")
56 = defaultService (ServiceId "licensing:v1")
56 "www.googleapis.com"
57 "www.googleapis.com"
57
58
58-- | View and manage Google Apps licenses for your domain
59-- | View and manage Google Apps licenses for your domain
59−authAppsLicensingScope :: OAuthScope
60−authAppsLicensingScope = "https://www.googleapis.com/auth/apps.licensing";
60+authAppsLicensingScope :: Proxy '["https://www.googleapis.com/auth/apps.licensing"]
61+authAppsLicensingScope = Proxy;
gogol-apps-reseller/gen/Network/Google/AppsReseller/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -131,15 +132,15 @@ import Network.Google.AppsReseller.Types.Sum
131import Network.Google.Prelude
132import Network.Google.Prelude
132
133
133-- | Default request referring to version 'v1' of the Enterprise Apps Reseller API. This contains the host and root path used as a starting point for constructing service requests.
134-- | Default request referring to version 'v1' of the Enterprise Apps Reseller API. This contains the host and root path used as a starting point for constructing service requests.
134−appsResellerService :: ServiceConfig
135+appsResellerService :: Service
135appsResellerService
136appsResellerService
136 = defaultService (ServiceId "reseller:v1")
137 = defaultService (ServiceId "reseller:v1")
137 "www.googleapis.com"
138 "www.googleapis.com"
138
139
139-- | Manage users on your domain
140-- | Manage users on your domain
140−authAppsOrderReadonlyScope :: OAuthScope
141−authAppsOrderReadonlyScope = "https://www.googleapis.com/auth/apps.order.readonly";
141+authAppsOrderReadonlyScope :: Proxy '["https://www.googleapis.com/auth/apps.order.readonly"]
142+authAppsOrderReadonlyScope = Proxy;
142
143
143-- | Manage users on your domain
144-- | Manage users on your domain
144−authAppsOrderScope :: OAuthScope
145−authAppsOrderScope = "https://www.googleapis.com/auth/apps.order";
145+authAppsOrderScope :: Proxy '["https://www.googleapis.com/auth/apps.order"]
146+authAppsOrderScope = Proxy;
gogol-apps-tasks/gen/Network/Google/AppsTasks/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -80,15 +81,15 @@ import Network.Google.AppsTasks.Types.Sum
80import Network.Google.Prelude
81import Network.Google.Prelude
81
82
82-- | Default request referring to version 'v1' of the Tasks API. This contains the host and root path used as a starting point for constructing service requests.
83-- | Default request referring to version 'v1' of the Tasks API. This contains the host and root path used as a starting point for constructing service requests.
83−appsTasksService :: ServiceConfig
84+appsTasksService :: Service
84appsTasksService
85appsTasksService
85 = defaultService (ServiceId "tasks:v1")
86 = defaultService (ServiceId "tasks:v1")
86 "www.googleapis.com"
87 "www.googleapis.com"
87
88
88-- | View your tasks
89-- | View your tasks
89−authTasksReadonlyScope :: OAuthScope
90−authTasksReadonlyScope = "https://www.googleapis.com/auth/tasks.readonly";
90+authTasksReadonlyScope :: Proxy '["https://www.googleapis.com/auth/tasks.readonly"]
91+authTasksReadonlyScope = Proxy;
91
92
92-- | Manage your tasks
93-- | Manage your tasks
93−authTasksScope :: OAuthScope
94−authTasksScope = "https://www.googleapis.com/auth/tasks";
94+authTasksScope :: Proxy '["https://www.googleapis.com/auth/tasks"]
95+authTasksScope = Proxy;
gogol-appstate/gen/Network/Google/AppState/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -55,11 +56,11 @@ import Network.Google.AppState.Types.Sum
55import Network.Google.Prelude
56import Network.Google.Prelude
56
57
57-- | Default request referring to version 'v1' of the Google App State API. This contains the host and root path used as a starting point for constructing service requests.
58-- | Default request referring to version 'v1' of the Google App State API. This contains the host and root path used as a starting point for constructing service requests.
58−appStateService :: ServiceConfig
59+appStateService :: Service
59appStateService
60appStateService
60 = defaultService (ServiceId "appstate:v1")
61 = defaultService (ServiceId "appstate:v1")
61 "www.googleapis.com"
62 "www.googleapis.com"
62
63
63-- | View and manage your data for this application
64-- | View and manage your data for this application
64−authAppstateScope :: OAuthScope
65−authAppstateScope = "https://www.googleapis.com/auth/appstate";
65+authAppstateScope :: Proxy '["https://www.googleapis.com/auth/appstate"]
66+authAppstateScope = Proxy;
gogol-autoscaler/gen/Network/Google/Autoscaler/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -174,15 +175,15 @@ import Network.Google.Autoscaler.Types.Sum
174import Network.Google.Prelude
175import Network.Google.Prelude
175
176
176-- | Default request referring to version 'v1beta2' of the Google Compute Engine Autoscaler API. This contains the host and root path used as a starting point for constructing service requests.
177-- | Default request referring to version 'v1beta2' of the Google Compute Engine Autoscaler API. This contains the host and root path used as a starting point for constructing service requests.
177−autoscalerService :: ServiceConfig
178+autoscalerService :: Service
178autoscalerService
179autoscalerService
179 = defaultService (ServiceId "autoscaler:v1beta2")
180 = defaultService (ServiceId "autoscaler:v1beta2")
180 "www.googleapis.com"
181 "www.googleapis.com"
181
182
182-- | View and manage your Google Compute Engine resources
183-- | View and manage your Google Compute Engine resources
183−authComputeScope :: OAuthScope
184−authComputeScope = "https://www.googleapis.com/auth/compute";
184+authComputeScope :: Proxy '["https://www.googleapis.com/auth/compute"]
185+authComputeScope = Proxy;
185
186
186-- | View your Google Compute Engine resources
187-- | View your Google Compute Engine resources
187−authComputeReadonlyScope :: OAuthScope
188−authComputeReadonlyScope = "https://www.googleapis.com/auth/compute.readonly";
188+authComputeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
189+authComputeReadonlyScope = Proxy;
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+16−15
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -522,35 +523,35 @@ import Network.Google.BigQuery.Types.Sum
522import Network.Google.Prelude
523import Network.Google.Prelude
523
524
524-- | Default request referring to version 'v2' of the BigQuery API. This contains the host and root path used as a starting point for constructing service requests.
525-- | Default request referring to version 'v2' of the BigQuery API. This contains the host and root path used as a starting point for constructing service requests.
525−bigQueryService :: ServiceConfig
526+bigQueryService :: Service
526bigQueryService
527bigQueryService
527 = defaultService (ServiceId "bigquery:v2")
528 = defaultService (ServiceId "bigquery:v2")
528 "www.googleapis.com"
529 "www.googleapis.com"
529
530
530-- | View your data across Google Cloud Platform services
531-- | View your data across Google Cloud Platform services
531−authCloudPlatformReadOnlyScope :: OAuthScope
532−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
532+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
533+authCloudPlatformReadOnlyScope = Proxy;
533
534
534-- | View and manage your data across Google Cloud Platform services
535-- | View and manage your data across Google Cloud Platform services
535−authCloudPlatformScope :: OAuthScope
536−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
536+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
537+authCloudPlatformScope = Proxy;
537
538
538-- | View your data in Google Cloud Storage
539-- | View your data in Google Cloud Storage
539−authDevstorageReadOnlyScope :: OAuthScope
540−authDevstorageReadOnlyScope = "https://www.googleapis.com/auth/devstorage.read_only";
540+authDevstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
541+authDevstorageReadOnlyScope = Proxy;
541
542
542-- | Insert data into Google BigQuery
543-- | Insert data into Google BigQuery
543−authBigqueryInsertdataScope :: OAuthScope
544−authBigqueryInsertdataScope = "https://www.googleapis.com/auth/bigquery.insertdata";
544+authBigqueryInsertdataScope :: Proxy '["https://www.googleapis.com/auth/bigquery.insertdata"]
545+authBigqueryInsertdataScope = Proxy;
545
546
546-- | Manage your data in Google Cloud Storage
547-- | Manage your data in Google Cloud Storage
547−authDevstorageReadWriteScope :: OAuthScope
548−authDevstorageReadWriteScope = "https://www.googleapis.com/auth/devstorage.read_write";
548+authDevstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
549+authDevstorageReadWriteScope = Proxy;
549
550
550-- | View and manage your data in Google BigQuery
551-- | View and manage your data in Google BigQuery
551−authBigqueryScope :: OAuthScope
552−authBigqueryScope = "https://www.googleapis.com/auth/bigquery";
552+authBigqueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
553+authBigqueryScope = Proxy;
553
554
554-- | Manage your data and permissions in Google Cloud Storage
555-- | Manage your data and permissions in Google Cloud Storage
555−authDevstorageFullControlScope :: OAuthScope
556−authDevstorageFullControlScope = "https://www.googleapis.com/auth/devstorage.full_control";
556+authDevstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
557+authDevstorageFullControlScope = Proxy;
gogol-billing/gen/Network/Google/Billing/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -54,11 +55,11 @@ import Network.Google.Billing.Types.Sum
54import Network.Google.Prelude
55import Network.Google.Prelude
55
56
56-- | Default request referring to version 'v1' of the Google Cloud Billing API. This contains the host and root path used as a starting point for constructing service requests.
57-- | Default request referring to version 'v1' of the Google Cloud Billing API. This contains the host and root path used as a starting point for constructing service requests.
57−billingService :: ServiceConfig
58+billingService :: Service
58billingService
59billingService
59 = defaultService (ServiceId "cloudbilling:v1")
60 = defaultService (ServiceId "cloudbilling:v1")
60 "cloudbilling.googleapis.com"
61 "cloudbilling.googleapis.com"
61
62
62-- | View and manage your data across Google Cloud Platform services
63-- | View and manage your data across Google Cloud Platform services
63−authCloudPlatformScope :: OAuthScope
64−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
64+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
65+authCloudPlatformScope = Proxy;
gogol-blogger/gen/Network/Google/Blogger/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -379,15 +380,15 @@ import Network.Google.Blogger.Types.Sum
379import Network.Google.Prelude
380import Network.Google.Prelude
380
381
381-- | Default request referring to version 'v3' of the Blogger API. This contains the host and root path used as a starting point for constructing service requests.
382-- | Default request referring to version 'v3' of the Blogger API. This contains the host and root path used as a starting point for constructing service requests.
382−bloggerService :: ServiceConfig
383+bloggerService :: Service
383bloggerService
384bloggerService
384 = defaultService (ServiceId "blogger:v3")
385 = defaultService (ServiceId "blogger:v3")
385 "www.googleapis.com"
386 "www.googleapis.com"
386
387
387-- | Manage your Blogger account
388-- | Manage your Blogger account
388−authBloggerScope :: OAuthScope
389−authBloggerScope = "https://www.googleapis.com/auth/blogger";
389+authBloggerScope :: Proxy '["https://www.googleapis.com/auth/blogger"]
390+authBloggerScope = Proxy;
390
391
391-- | View your Blogger account
392-- | View your Blogger account
392−authBloggerReadonlyScope :: OAuthScope
393−authBloggerReadonlyScope = "https://www.googleapis.com/auth/blogger.readonly";
393+authBloggerReadonlyScope :: Proxy '["https://www.googleapis.com/auth/blogger.readonly"]
394+authBloggerReadonlyScope = Proxy;
gogol-books/gen/Network/Google/Books/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -917,11 +918,11 @@ import Network.Google.Books.Types.Sum
917import Network.Google.Prelude
918import Network.Google.Prelude
918
919
919-- | Default request referring to version 'v1' of the Books API. This contains the host and root path used as a starting point for constructing service requests.
920-- | Default request referring to version 'v1' of the Books API. This contains the host and root path used as a starting point for constructing service requests.
920−booksService :: ServiceConfig
921+booksService :: Service
921booksService
922booksService
922 = defaultService (ServiceId "books:v1")
923 = defaultService (ServiceId "books:v1")
923 "www.googleapis.com"
924 "www.googleapis.com"
924
925
925-- | Manage your books
926-- | Manage your books
926−authBooksScope :: OAuthScope
927−authBooksScope = "https://www.googleapis.com/auth/books";
927+authBooksScope :: Proxy '["https://www.googleapis.com/auth/books"]
928+authBooksScope = Proxy;
gogol-books/gen/Network/Google/Resource/Books/Series/Get.hs+2
@@ -77,6 +77,8 @@ sgSeriesId
77
77
78instance GoogleRequest SeriesGet where
78instance GoogleRequest SeriesGet where
79 type Rs SeriesGet = Series
79 type Rs SeriesGet = Series
80+ type Scopes SeriesGet =
81+ '["https://www.googleapis.com/auth/books"]
80 requestClient SeriesGet{..}
82 requestClient SeriesGet{..}
81 = go _sgSeriesId (Just AltJSON) booksService
83 = go _sgSeriesId (Just AltJSON) booksService
82 where go
84 where go
gogol-books/gen/Network/Google/Resource/Books/Series/Membership/Get.hs+2
@@ -101,6 +101,8 @@ smgSeriesId
101
101
102instance GoogleRequest SeriesMembershipGet where
102instance GoogleRequest SeriesMembershipGet where
103 type Rs SeriesMembershipGet = Seriesmembership
103 type Rs SeriesMembershipGet = Seriesmembership
104+ type Scopes SeriesMembershipGet =
105+ '["https://www.googleapis.com/auth/books"]
104 requestClient SeriesMembershipGet{..}
106 requestClient SeriesMembershipGet{..}
105 = go (Just _smgSeriesId) _smgPageToken _smgPageSize
107 = go (Just _smgSeriesId) _smgPageToken _smgPageSize
106 (Just AltJSON)
108 (Just AltJSON)
gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+1−1
@@ -252,7 +252,7 @@ import Network.Google.CivicInfo.Types.Sum
252import Network.Google.Prelude
252import Network.Google.Prelude
253
253
254-- | Default request referring to version 'v2' of the Google Civic Information API. This contains the host and root path used as a starting point for constructing service requests.
254-- | Default request referring to version 'v2' of the Google Civic Information API. This contains the host and root path used as a starting point for constructing service requests.
255−civicInfoService :: ServiceConfig
255+civicInfoService :: Service
256civicInfoService
256civicInfoService
257 = defaultService (ServiceId "civicinfo:v2")
257 = defaultService (ServiceId "civicinfo:v2")
258 "www.googleapis.com"
258 "www.googleapis.com"
gogol-classroom/gen/Network/Google/Classroom/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -130,31 +131,31 @@ import Network.Google.Classroom.Types.Sum
130import Network.Google.Prelude
131import Network.Google.Prelude
131
132
132-- | Default request referring to version 'v1' of the Google Classroom API. This contains the host and root path used as a starting point for constructing service requests.
133-- | Default request referring to version 'v1' of the Google Classroom API. This contains the host and root path used as a starting point for constructing service requests.
133−classroomService :: ServiceConfig
134+classroomService :: Service
134classroomService
135classroomService
135 = defaultService (ServiceId "classroom:v1")
136 = defaultService (ServiceId "classroom:v1")
136 "classroom.googleapis.com"
137 "classroom.googleapis.com"
137
138
138-- | View your Google Classroom class rosters
139-- | View your Google Classroom class rosters
139−authClassroomRostersReadonlyScope :: OAuthScope
140−authClassroomRostersReadonlyScope = "https://www.googleapis.com/auth/classroom.rosters.readonly";
140+authClassroomRostersReadonlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.rosters.readonly"]
141+authClassroomRostersReadonlyScope = Proxy;
141
142
142-- | Manage your Google Classroom classes
143-- | Manage your Google Classroom classes
143−authClassroomCoursesScope :: OAuthScope
144−authClassroomCoursesScope = "https://www.googleapis.com/auth/classroom.courses";
144+authClassroomCoursesScope :: Proxy '["https://www.googleapis.com/auth/classroom.courses"]
145+authClassroomCoursesScope = Proxy;
145
146
146-- | View the email addresses of people in your classes
147-- | View the email addresses of people in your classes
147−authClassroomProfileEmailsScope :: OAuthScope
148−authClassroomProfileEmailsScope = "https://www.googleapis.com/auth/classroom.profile.emails";
148+authClassroomProfileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]
149+authClassroomProfileEmailsScope = Proxy;
149
150
150-- | View the profile photos of people in your classes
151-- | View the profile photos of people in your classes
151−authClassroomProfilePhotosScope :: OAuthScope
152−authClassroomProfilePhotosScope = "https://www.googleapis.com/auth/classroom.profile.photos";
152+authClassroomProfilePhotosScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.photos"]
153+authClassroomProfilePhotosScope = Proxy;
153
154
154-- | Manage your Google Classroom class rosters
155-- | Manage your Google Classroom class rosters
155−authClassroomRostersScope :: OAuthScope
156−authClassroomRostersScope = "https://www.googleapis.com/auth/classroom.rosters";
156+authClassroomRostersScope :: Proxy '["https://www.googleapis.com/auth/classroom.rosters"]
157+authClassroomRostersScope = Proxy;
157
158
158-- | View your Google Classroom classes
159-- | View your Google Classroom classes
159−authClassroomCoursesReadonlyScope :: OAuthScope
160−authClassroomCoursesReadonlyScope = "https://www.googleapis.com/auth/classroom.courses.readonly";
160+authClassroomCoursesReadonlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.courses.readonly"]
161+authClassroomCoursesReadonlyScope = Proxy;
gogol-cloudmonitoring/gen/Network/Google/CloudMonitoring/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -183,17 +184,17 @@ import Network.Google.CloudMonitoring.Types.Sum
183import Network.Google.Prelude
184import Network.Google.Prelude
184
185
185-- | Default request referring to version 'v2beta2' of the Cloud Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
186-- | Default request referring to version 'v2beta2' of the Cloud Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
186−cloudMonitoringService :: ServiceConfig
187+cloudMonitoringService :: Service
187cloudMonitoringService
188cloudMonitoringService
188 = defaultService
189 = defaultService
189 (ServiceId "cloudmonitoring:v2beta2")
190 (ServiceId "cloudmonitoring:v2beta2")
190 "www.googleapis.com"
191 "www.googleapis.com"
191
192
192-- | View and manage your data across Google Cloud Platform services
193-- | View and manage your data across Google Cloud Platform services
193−authCloudPlatformScope :: OAuthScope
194−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
194+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
195+authCloudPlatformScope = Proxy;
195
196
196-- | View and write monitoring data for all of your Google and third-party
197-- | View and write monitoring data for all of your Google and third-party
197-- Cloud and API projects
198-- Cloud and API projects
198−authMonitoringScope :: OAuthScope
199−authMonitoringScope = "https://www.googleapis.com/auth/monitoring";
199+authMonitoringScope :: Proxy '["https://www.googleapis.com/auth/monitoring"]
200+authMonitoringScope = Proxy;
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/Create.hs+3
@@ -90,6 +90,9 @@ mdcPayload
90
90
91instance GoogleRequest MetricDescriptorsCreate where
91instance GoogleRequest MetricDescriptorsCreate where
92 type Rs MetricDescriptorsCreate = MetricDescriptor
92 type Rs MetricDescriptorsCreate = MetricDescriptor
93+ type Scopes MetricDescriptorsCreate =
94+ '["https://www.googleapis.com/auth/cloud-platform",
95+ "https://www.googleapis.com/auth/monitoring"]
93 requestClient MetricDescriptorsCreate{..}
96 requestClient MetricDescriptorsCreate{..}
94 = go _mdcProject (Just AltJSON) _mdcPayload
97 = go _mdcProject (Just AltJSON) _mdcPayload
95 cloudMonitoringService
98 cloudMonitoringService
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/Delete.hs+3
@@ -90,6 +90,9 @@ mddMetric
90instance GoogleRequest MetricDescriptorsDelete where
90instance GoogleRequest MetricDescriptorsDelete where
91 type Rs MetricDescriptorsDelete =
91 type Rs MetricDescriptorsDelete =
92 DeleteMetricDescriptorResponse
92 DeleteMetricDescriptorResponse
93+ type Scopes MetricDescriptorsDelete =
94+ '["https://www.googleapis.com/auth/cloud-platform",
95+ "https://www.googleapis.com/auth/monitoring"]
93 requestClient MetricDescriptorsDelete{..}
96 requestClient MetricDescriptorsDelete{..}
94 = go _mddProject _mddMetric (Just AltJSON)
97 = go _mddProject _mddMetric (Just AltJSON)
95 cloudMonitoringService
98 cloudMonitoringService
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/MetricDescriptors/List.hs+3
@@ -139,6 +139,9 @@ mdlPageToken
139instance GoogleRequest MetricDescriptorsList where
139instance GoogleRequest MetricDescriptorsList where
140 type Rs MetricDescriptorsList =
140 type Rs MetricDescriptorsList =
141 ListMetricDescriptorsResponse
141 ListMetricDescriptorsResponse
142+ type Scopes MetricDescriptorsList =
143+ '["https://www.googleapis.com/auth/cloud-platform",
144+ "https://www.googleapis.com/auth/monitoring"]
142 requestClient MetricDescriptorsList{..}
145 requestClient MetricDescriptorsList{..}
143 = go _mdlProject (Just _mdlCount) _mdlQuery
146 = go _mdlProject (Just _mdlCount) _mdlQuery
144 _mdlPageToken
147 _mdlPageToken
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/List.hs+3
@@ -223,6 +223,9 @@ tlYoungest
223
223
224instance GoogleRequest TimeseriesList where
224instance GoogleRequest TimeseriesList where
225 type Rs TimeseriesList = ListTimeseriesResponse
225 type Rs TimeseriesList = ListTimeseriesResponse
226+ type Scopes TimeseriesList =
227+ '["https://www.googleapis.com/auth/cloud-platform",
228+ "https://www.googleapis.com/auth/monitoring"]
226 requestClient TimeseriesList{..}
229 requestClient TimeseriesList{..}
227 = go _tlProject _tlMetric (Just _tlYoungest)
230 = go _tlProject _tlMetric (Just _tlYoungest)
228 _tlWindow
231 _tlWindow
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/Timeseries/Write.hs+3
@@ -102,6 +102,9 @@ twPayload
102
102
103instance GoogleRequest TimeseriesWrite where
103instance GoogleRequest TimeseriesWrite where
104 type Rs TimeseriesWrite = WriteTimeseriesResponse
104 type Rs TimeseriesWrite = WriteTimeseriesResponse
105+ type Scopes TimeseriesWrite =
106+ '["https://www.googleapis.com/auth/cloud-platform",
107+ "https://www.googleapis.com/auth/monitoring"]
105 requestClient TimeseriesWrite{..}
108 requestClient TimeseriesWrite{..}
106 = go _twProject (Just AltJSON) _twPayload
109 = go _twProject (Just AltJSON) _twPayload
107 cloudMonitoringService
110 cloudMonitoringService
gogol-cloudmonitoring/gen/Network/Google/Resource/CloudMonitoring/TimeseriesDescriptors/List.hs+3
@@ -235,6 +235,9 @@ instance GoogleRequest TimeseriesDescriptorsList
235 where
235 where
236 type Rs TimeseriesDescriptorsList =
236 type Rs TimeseriesDescriptorsList =
237 ListTimeseriesDescriptorsResponse
237 ListTimeseriesDescriptorsResponse
238+ type Scopes TimeseriesDescriptorsList =
239+ '["https://www.googleapis.com/auth/cloud-platform",
240+ "https://www.googleapis.com/auth/monitoring"]
238 requestClient TimeseriesDescriptorsList{..}
241 requestClient TimeseriesDescriptorsList{..}
239 = go _tdlProject _tdlMetric (Just _tdlYoungest)
242 = go _tdlProject _tdlMetric (Just _tdlYoungest)
240 _tdlWindow
243 _tdlWindow
gogol-cloudtrace/gen/Network/Google/CloudTrace/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -65,11 +66,11 @@ import Network.Google.CloudTrace.Types.Sum
65import Network.Google.Prelude
66import Network.Google.Prelude
66
67
67-- | Default request referring to version 'v1' of the Google Cloud Trace API. This contains the host and root path used as a starting point for constructing service requests.
68-- | Default request referring to version 'v1' of the Google Cloud Trace API. This contains the host and root path used as a starting point for constructing service requests.
68−cloudTraceService :: ServiceConfig
69+cloudTraceService :: Service
69cloudTraceService
70cloudTraceService
70 = defaultService (ServiceId "cloudtrace:v1")
71 = defaultService (ServiceId "cloudtrace:v1")
71 "cloudtrace.googleapis.com"
72 "cloudtrace.googleapis.com"
72
73
73-- | View and manage your data across Google Cloud Platform services
74-- | View and manage your data across Google Cloud Platform services
74−authCloudPlatformScope :: OAuthScope
75−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
75+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
76+authCloudPlatformScope = Proxy;
gogol-compute/gen/Network/Google/Compute/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -1915,31 +1916,31 @@ import Network.Google.Compute.Types.Sum
1915import Network.Google.Prelude
1916import Network.Google.Prelude
1916
1917
1917-- | Default request referring to version 'v1' of the Compute Engine API. This contains the host and root path used as a starting point for constructing service requests.
1918-- | Default request referring to version 'v1' of the Compute Engine API. This contains the host and root path used as a starting point for constructing service requests.
1918−computeService :: ServiceConfig
1919+computeService :: Service
1919computeService
1920computeService
1920 = defaultService (ServiceId "compute:v1")
1921 = defaultService (ServiceId "compute:v1")
1921 "www.googleapis.com"
1922 "www.googleapis.com"
1922
1923
1923-- | View and manage your Google Compute Engine resources
1924-- | View and manage your Google Compute Engine resources
1924−authComputeScope :: OAuthScope
1925−authComputeScope = "https://www.googleapis.com/auth/compute";
1925+authComputeScope :: Proxy '["https://www.googleapis.com/auth/compute"]
1926+authComputeScope = Proxy;
1926
1927
1927-- | View and manage your data across Google Cloud Platform services
1928-- | View and manage your data across Google Cloud Platform services
1928−authCloudPlatformScope :: OAuthScope
1929−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
1929+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
1930+authCloudPlatformScope = Proxy;
1930
1931
1931-- | View your data in Google Cloud Storage
1932-- | View your data in Google Cloud Storage
1932−authDevstorageReadOnlyScope :: OAuthScope
1933−authDevstorageReadOnlyScope = "https://www.googleapis.com/auth/devstorage.read_only";
1933+authDevstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
1934+authDevstorageReadOnlyScope = Proxy;
1934
1935
1935-- | Manage your data in Google Cloud Storage
1936-- | Manage your data in Google Cloud Storage
1936−authDevstorageReadWriteScope :: OAuthScope
1937−authDevstorageReadWriteScope = "https://www.googleapis.com/auth/devstorage.read_write";
1937+authDevstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
1938+authDevstorageReadWriteScope = Proxy;
1938
1939
1939-- | View your Google Compute Engine resources
1940-- | View your Google Compute Engine resources
1940−authComputeReadonlyScope :: OAuthScope
1941−authComputeReadonlyScope = "https://www.googleapis.com/auth/compute.readonly";
1941+authComputeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
1942+authComputeReadonlyScope = Proxy;
1942
1943
1943-- | Manage your data and permissions in Google Cloud Storage
1944-- | Manage your data and permissions in Google Cloud Storage
1944−authDevstorageFullControlScope :: OAuthScope
1945−authDevstorageFullControlScope = "https://www.googleapis.com/auth/devstorage.full_control";
1945+authDevstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
1946+authDevstorageFullControlScope = Proxy;
gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetMachineType.hs+3
@@ -116,6 +116,9 @@ ismtInstance
116
116
117instance GoogleRequest InstancesSetMachineType where
117instance GoogleRequest InstancesSetMachineType where
118 type Rs InstancesSetMachineType = Operation
118 type Rs InstancesSetMachineType = Operation
119+ type Scopes InstancesSetMachineType =
120+ '["https://www.googleapis.com/auth/cloud-platform",
121+ "https://www.googleapis.com/auth/compute"]
119 requestClient InstancesSetMachineType{..}
122 requestClient InstancesSetMachineType{..}
120 = go _ismtProject _ismtZone _ismtInstance
123 = go _ismtProject _ismtZone _ismtInstance
121 (Just AltJSON)
124 (Just AltJSON)
gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/AggregatedList.hs+4
@@ -140,6 +140,10 @@ instance GoogleRequest SubnetworksAggregatedList
140 where
140 where
141 type Rs SubnetworksAggregatedList =
141 type Rs SubnetworksAggregatedList =
142 SubnetworkAggregatedList
142 SubnetworkAggregatedList
143+ type Scopes SubnetworksAggregatedList =
144+ '["https://www.googleapis.com/auth/cloud-platform",
145+ "https://www.googleapis.com/auth/compute",
146+ "https://www.googleapis.com/auth/compute.readonly"]
143 requestClient SubnetworksAggregatedList{..}
147 requestClient SubnetworksAggregatedList{..}
144 = go _salProject _salFilter _salPageToken
148 = go _salProject _salFilter _salPageToken
145 (Just _salMaxResults)
149 (Just _salMaxResults)
gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Delete.hs+3
@@ -100,6 +100,9 @@ sdRegion = lens _sdRegion (\ s a -> s{_sdRegion = a})
100
100
101instance GoogleRequest SubnetworksDelete where
101instance GoogleRequest SubnetworksDelete where
102 type Rs SubnetworksDelete = Operation
102 type Rs SubnetworksDelete = Operation
103+ type Scopes SubnetworksDelete =
104+ '["https://www.googleapis.com/auth/cloud-platform",
105+ "https://www.googleapis.com/auth/compute"]
103 requestClient SubnetworksDelete{..}
106 requestClient SubnetworksDelete{..}
104 = go _sdProject _sdRegion _sdSubnetwork
107 = go _sdProject _sdRegion _sdSubnetwork
105 (Just AltJSON)
108 (Just AltJSON)
gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Get.hs+4
@@ -102,6 +102,10 @@ sgRegion = lens _sgRegion (\ s a -> s{_sgRegion = a})
102
102
103instance GoogleRequest SubnetworksGet where
103instance GoogleRequest SubnetworksGet where
104 type Rs SubnetworksGet = Subnetwork
104 type Rs SubnetworksGet = Subnetwork
105+ type Scopes SubnetworksGet =
106+ '["https://www.googleapis.com/auth/cloud-platform",
107+ "https://www.googleapis.com/auth/compute",
108+ "https://www.googleapis.com/auth/compute.readonly"]
105 requestClient SubnetworksGet{..}
109 requestClient SubnetworksGet{..}
106 = go _sgProject _sgRegion _sgSubnetwork
110 = go _sgProject _sgRegion _sgSubnetwork
107 (Just AltJSON)
111 (Just AltJSON)
gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/Insert.hs+3
@@ -102,6 +102,9 @@ siRegion = lens _siRegion (\ s a -> s{_siRegion = a})
102
102
103instance GoogleRequest SubnetworksInsert where
103instance GoogleRequest SubnetworksInsert where
104 type Rs SubnetworksInsert = Operation
104 type Rs SubnetworksInsert = Operation
105+ type Scopes SubnetworksInsert =
106+ '["https://www.googleapis.com/auth/cloud-platform",
107+ "https://www.googleapis.com/auth/compute"]
105 requestClient SubnetworksInsert{..}
108 requestClient SubnetworksInsert{..}
106 = go _siProject _siRegion (Just AltJSON) _siPayload
109 = go _siProject _siRegion (Just AltJSON) _siPayload
107 computeService
110 computeService
gogol-compute/gen/Network/Google/Resource/Compute/Subnetworks/List.hs+4
@@ -147,6 +147,10 @@ slMaxResults
147
147
148instance GoogleRequest SubnetworksList where
148instance GoogleRequest SubnetworksList where
149 type Rs SubnetworksList = SubnetworkList
149 type Rs SubnetworksList = SubnetworkList
150+ type Scopes SubnetworksList =
151+ '["https://www.googleapis.com/auth/cloud-platform",
152+ "https://www.googleapis.com/auth/compute",
153+ "https://www.googleapis.com/auth/compute.readonly"]
150 requestClient SubnetworksList{..}
154 requestClient SubnetworksList{..}
151 = go _slProject _slRegion _slFilter _slPageToken
155 = go _slProject _slRegion _slFilter _slPageToken
152 (Just _slMaxResults)
156 (Just _slMaxResults)
gogol-container/gen/Network/Google/Container/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -110,11 +111,11 @@ import Network.Google.Container.Types.Sum
110import Network.Google.Prelude
111import Network.Google.Prelude
111
112
112-- | Default request referring to version 'v1' of the Google Container Engine API. This contains the host and root path used as a starting point for constructing service requests.
113-- | Default request referring to version 'v1' of the Google Container Engine API. This contains the host and root path used as a starting point for constructing service requests.
113−containerService :: ServiceConfig
114+containerService :: Service
114containerService
115containerService
115 = defaultService (ServiceId "container:v1")
116 = defaultService (ServiceId "container:v1")
116 "container.googleapis.com"
117 "container.googleapis.com"
117
118
118-- | View and manage your data across Google Cloud Platform services
119-- | View and manage your data across Google Cloud Platform services
119−authCloudPlatformScope :: OAuthScope
120−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
120+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
121+authCloudPlatformScope = Proxy;
gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+1−1
@@ -215,7 +215,7 @@ import Network.Google.CustomSearch.Types.Sum
215import Network.Google.Prelude
215import Network.Google.Prelude
216
216
217-- | Default request referring to version 'v1' of the CustomSearch API. This contains the host and root path used as a starting point for constructing service requests.
217-- | Default request referring to version 'v1' of the CustomSearch API. This contains the host and root path used as a starting point for constructing service requests.
218−customSearchService :: ServiceConfig
218+customSearchService :: Service
219customSearchService
219customSearchService
220 = defaultService (ServiceId "customsearch:v1")
220 = defaultService (ServiceId "customsearch:v1")
221 "www.googleapis.com"
221 "www.googleapis.com"
gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -792,15 +793,15 @@ import Network.Google.Dataflow.Types.Sum
792import Network.Google.Prelude
793import Network.Google.Prelude
793
794
794-- | Default request referring to version 'v1b3' of the Google Dataflow API. This contains the host and root path used as a starting point for constructing service requests.
795-- | Default request referring to version 'v1b3' of the Google Dataflow API. This contains the host and root path used as a starting point for constructing service requests.
795−dataflowService :: ServiceConfig
796+dataflowService :: Service
796dataflowService
797dataflowService
797 = defaultService (ServiceId "dataflow:v1b3")
798 = defaultService (ServiceId "dataflow:v1b3")
798 "dataflow.googleapis.com"
799 "dataflow.googleapis.com"
799
800
800-- | View your email address
801-- | View your email address
801−authUserinfoEmailScope :: OAuthScope
802−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
802+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
803+authUserinfoEmailScope = Proxy;
803
804
804-- | View and manage your data across Google Cloud Platform services
805-- | View and manage your data across Google Cloud Platform services
805−authCloudPlatformScope :: OAuthScope
806−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
806+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
807+authCloudPlatformScope = Proxy;
gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs+3
@@ -168,6 +168,9 @@ pwmCallback
168instance GoogleRequest ProjectsWorkerMessages where
168instance GoogleRequest ProjectsWorkerMessages where
169 type Rs ProjectsWorkerMessages =
169 type Rs ProjectsWorkerMessages =
170 SendWorkerMessagesResponse
170 SendWorkerMessagesResponse
171+ type Scopes ProjectsWorkerMessages =
172+ '["https://www.googleapis.com/auth/cloud-platform",
173+ "https://www.googleapis.com/auth/userinfo.email"]
171 requestClient ProjectsWorkerMessages{..}
174 requestClient ProjectsWorkerMessages{..}
172 = go _pwmProjectId _pwmXgafv _pwmUploadProtocol
175 = go _pwmProjectId _pwmXgafv _pwmUploadProtocol
173 (Just _pwmPp)
176 (Just _pwmPp)
gogol-dataproc/gen/Network/Google/Dataproc/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -398,23 +399,23 @@ import Network.Google.Dataproc.Types.Sum
398import Network.Google.Prelude
399import Network.Google.Prelude
399
400
400-- | Default request referring to version 'v1' of the Google Cloud Dataproc API. This contains the host and root path used as a starting point for constructing service requests.
401-- | Default request referring to version 'v1' of the Google Cloud Dataproc API. This contains the host and root path used as a starting point for constructing service requests.
401−dataprocService :: ServiceConfig
402+dataprocService :: Service
402dataprocService
403dataprocService
403 = defaultService (ServiceId "dataproc:v1")
404 = defaultService (ServiceId "dataproc:v1")
404 "dataproc.googleapis.com"
405 "dataproc.googleapis.com"
405
406
406-- | Administrate log data for your projects
407-- | Administrate log data for your projects
407−authLoggingAdminScope :: OAuthScope
408−authLoggingAdminScope = "https://www.googleapis.com/auth/logging.admin";
408+authLoggingAdminScope :: Proxy '["https://www.googleapis.com/auth/logging.admin"]
409+authLoggingAdminScope = Proxy;
409
410
410-- | View log data for your projects
411-- | View log data for your projects
411−authLoggingReadScope :: OAuthScope
412−authLoggingReadScope = "https://www.googleapis.com/auth/logging.read";
412+authLoggingReadScope :: Proxy '["https://www.googleapis.com/auth/logging.read"]
413+authLoggingReadScope = Proxy;
413
414
414-- | Submit log data for your projects
415-- | Submit log data for your projects
415−authLoggingWriteScope :: OAuthScope
416−authLoggingWriteScope = "https://www.googleapis.com/auth/logging.write";
416+authLoggingWriteScope :: Proxy '["https://www.googleapis.com/auth/logging.write"]
417+authLoggingWriteScope = Proxy;
417
418
418-- | View and manage your data across Google Cloud Platform services
419-- | View and manage your data across Google Cloud Platform services
419−authCloudPlatformScope :: OAuthScope
420−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
420+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
421+authCloudPlatformScope = Proxy;
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Media/Download.hs+7
@@ -169,6 +169,11 @@ mdCallback
169
169
170instance GoogleRequest MediaDownload' where
170instance GoogleRequest MediaDownload' where
171 type Rs MediaDownload' = Media
171 type Rs MediaDownload' = Media
172+ type Scopes MediaDownload' =
173+ '["https://www.googleapis.com/auth/cloud-platform",
174+ "https://www.googleapis.com/auth/logging.admin",
175+ "https://www.googleapis.com/auth/logging.read",
176+ "https://www.googleapis.com/auth/logging.write"]
172 requestClient MediaDownload'{..}
177 requestClient MediaDownload'{..}
173 = go _mdResourceName _mdXgafv _mdUploadProtocol
178 = go _mdResourceName _mdXgafv _mdUploadProtocol
174 (Just _mdPp)
179 (Just _mdPp)
@@ -185,6 +190,8 @@ instance GoogleRequest MediaDownload' where
185instance GoogleRequest (MediaDownload MediaDownload')
190instance GoogleRequest (MediaDownload MediaDownload')
186 where
191 where
187 type Rs (MediaDownload MediaDownload') = Stream
192 type Rs (MediaDownload MediaDownload') = Stream
193+ type Scopes (MediaDownload MediaDownload') =
194+ Scopes MediaDownload'
188 requestClient (MediaDownload MediaDownload'{..})
195 requestClient (MediaDownload MediaDownload'{..})
189 = go _mdResourceName _mdXgafv _mdUploadProtocol
196 = go _mdResourceName _mdXgafv _mdUploadProtocol
190 (Just _mdPp)
197 (Just _mdPp)
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Media/Upload.hs+7
@@ -184,6 +184,11 @@ muCallback
184
184
185instance GoogleRequest MediaUpload' where
185instance GoogleRequest MediaUpload' where
186 type Rs MediaUpload' = Media
186 type Rs MediaUpload' = Media
187+ type Scopes MediaUpload' =
188+ '["https://www.googleapis.com/auth/cloud-platform",
189+ "https://www.googleapis.com/auth/logging.admin",
190+ "https://www.googleapis.com/auth/logging.read",
191+ "https://www.googleapis.com/auth/logging.write"]
187 requestClient MediaUpload'{..}
192 requestClient MediaUpload'{..}
188 = go _muResourceName _muXgafv _muUploadProtocol
193 = go _muResourceName _muXgafv _muUploadProtocol
189 (Just _muPp)
194 (Just _muPp)
@@ -201,6 +206,8 @@ instance GoogleRequest MediaUpload' where
201instance GoogleRequest (MediaUpload MediaUpload')
206instance GoogleRequest (MediaUpload MediaUpload')
202 where
207 where
203 type Rs (MediaUpload MediaUpload') = Media
208 type Rs (MediaUpload MediaUpload') = Media
209+ type Scopes (MediaUpload MediaUpload') =
210+ Scopes MediaUpload'
204 requestClient (MediaUpload MediaUpload'{..} body)
211 requestClient (MediaUpload MediaUpload'{..} body)
205 = go _muResourceName _muXgafv _muUploadProtocol
212 = go _muResourceName _muXgafv _muUploadProtocol
206 (Just _muPp)
213 (Just _muPp)
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Create.hs+2
@@ -184,6 +184,8 @@ prccCallback
184instance GoogleRequest ProjectsRegionsClustersCreate
184instance GoogleRequest ProjectsRegionsClustersCreate
185 where
185 where
186 type Rs ProjectsRegionsClustersCreate = Operation
186 type Rs ProjectsRegionsClustersCreate = Operation
187+ type Scopes ProjectsRegionsClustersCreate =
188+ '["https://www.googleapis.com/auth/cloud-platform"]
187 requestClient ProjectsRegionsClustersCreate{..}
189 requestClient ProjectsRegionsClustersCreate{..}
188 = go _prccProjectId _prccRegion _prccXgafv
190 = go _prccProjectId _prccRegion _prccXgafv
189 _prccUploadProtocol
191 _prccUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Delete.hs+2
@@ -185,6 +185,8 @@ prcdCallback
185instance GoogleRequest ProjectsRegionsClustersDelete
185instance GoogleRequest ProjectsRegionsClustersDelete
186 where
186 where
187 type Rs ProjectsRegionsClustersDelete = Operation
187 type Rs ProjectsRegionsClustersDelete = Operation
188+ type Scopes ProjectsRegionsClustersDelete =
189+ '["https://www.googleapis.com/auth/cloud-platform"]
188 requestClient ProjectsRegionsClustersDelete{..}
190 requestClient ProjectsRegionsClustersDelete{..}
189 = go _prcdProjectId _prcdRegion _prcdClusterName
191 = go _prcdProjectId _prcdRegion _prcdClusterName
190 _prcdXgafv
192 _prcdXgafv
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Diagnose.hs+2
@@ -191,6 +191,8 @@ pCallback
191instance GoogleRequest
191instance GoogleRequest
192 ProjectsRegionsClustersDiagnose where
192 ProjectsRegionsClustersDiagnose where
193 type Rs ProjectsRegionsClustersDiagnose = Operation
193 type Rs ProjectsRegionsClustersDiagnose = Operation
194+ type Scopes ProjectsRegionsClustersDiagnose =
195+ '["https://www.googleapis.com/auth/cloud-platform"]
194 requestClient ProjectsRegionsClustersDiagnose{..}
196 requestClient ProjectsRegionsClustersDiagnose{..}
195 = go _pProjectId _pRegion _pClusterName _pXgafv
197 = go _pProjectId _pRegion _pClusterName _pXgafv
196 _pUploadProtocol
198 _pUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Get.hs+2
@@ -184,6 +184,8 @@ prcgCallback
184instance GoogleRequest ProjectsRegionsClustersGet
184instance GoogleRequest ProjectsRegionsClustersGet
185 where
185 where
186 type Rs ProjectsRegionsClustersGet = Cluster
186 type Rs ProjectsRegionsClustersGet = Cluster
187+ type Scopes ProjectsRegionsClustersGet =
188+ '["https://www.googleapis.com/auth/cloud-platform"]
187 requestClient ProjectsRegionsClustersGet{..}
189 requestClient ProjectsRegionsClustersGet{..}
188 = go _prcgProjectId _prcgRegion _prcgClusterName
190 = go _prcgProjectId _prcgRegion _prcgClusterName
189 _prcgXgafv
191 _prcgXgafv
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/List.hs+2
@@ -197,6 +197,8 @@ instance GoogleRequest ProjectsRegionsClustersList
197 where
197 where
198 type Rs ProjectsRegionsClustersList =
198 type Rs ProjectsRegionsClustersList =
199 ListClustersResponse
199 ListClustersResponse
200+ type Scopes ProjectsRegionsClustersList =
201+ '["https://www.googleapis.com/auth/cloud-platform"]
200 requestClient ProjectsRegionsClustersList{..}
202 requestClient ProjectsRegionsClustersList{..}
201 = go _prclProjectId _prclRegion _prclXgafv
203 = go _prclProjectId _prclRegion _prclXgafv
202 _prclUploadProtocol
204 _prclUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Clusters/Patch.hs+2
@@ -216,6 +216,8 @@ prcpCallback
216instance GoogleRequest ProjectsRegionsClustersPatch
216instance GoogleRequest ProjectsRegionsClustersPatch
217 where
217 where
218 type Rs ProjectsRegionsClustersPatch = Operation
218 type Rs ProjectsRegionsClustersPatch = Operation
219+ type Scopes ProjectsRegionsClustersPatch =
220+ '["https://www.googleapis.com/auth/cloud-platform"]
219 requestClient ProjectsRegionsClustersPatch{..}
221 requestClient ProjectsRegionsClustersPatch{..}
220 = go _prcpProjectId _prcpRegion _prcpClusterName
222 = go _prcpProjectId _prcpRegion _prcpClusterName
221 _prcpXgafv
223 _prcpXgafv
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Cancel.hs+2
@@ -204,6 +204,8 @@ prjcCallback
204instance GoogleRequest ProjectsRegionsJobsCancel
204instance GoogleRequest ProjectsRegionsJobsCancel
205 where
205 where
206 type Rs ProjectsRegionsJobsCancel = Job
206 type Rs ProjectsRegionsJobsCancel = Job
207+ type Scopes ProjectsRegionsJobsCancel =
208+ '["https://www.googleapis.com/auth/cloud-platform"]
207 requestClient ProjectsRegionsJobsCancel{..}
209 requestClient ProjectsRegionsJobsCancel{..}
208 = go _prjcProjectId _prjcRegion _prjcJobId _prjcXgafv
210 = go _prjcProjectId _prjcRegion _prjcJobId _prjcXgafv
209 _prjcUploadProtocol
211 _prjcUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Delete.hs+2
@@ -186,6 +186,8 @@ prjdCallback
186instance GoogleRequest ProjectsRegionsJobsDelete
186instance GoogleRequest ProjectsRegionsJobsDelete
187 where
187 where
188 type Rs ProjectsRegionsJobsDelete = Empty
188 type Rs ProjectsRegionsJobsDelete = Empty
189+ type Scopes ProjectsRegionsJobsDelete =
190+ '["https://www.googleapis.com/auth/cloud-platform"]
189 requestClient ProjectsRegionsJobsDelete{..}
191 requestClient ProjectsRegionsJobsDelete{..}
190 = go _prjdProjectId _prjdRegion _prjdJobId _prjdXgafv
192 = go _prjdProjectId _prjdRegion _prjdJobId _prjdXgafv
191 _prjdUploadProtocol
193 _prjdUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Get.hs+2
@@ -182,6 +182,8 @@ prjgCallback
182
182
183instance GoogleRequest ProjectsRegionsJobsGet where
183instance GoogleRequest ProjectsRegionsJobsGet where
184 type Rs ProjectsRegionsJobsGet = Job
184 type Rs ProjectsRegionsJobsGet = Job
185+ type Scopes ProjectsRegionsJobsGet =
186+ '["https://www.googleapis.com/auth/cloud-platform"]
185 requestClient ProjectsRegionsJobsGet{..}
187 requestClient ProjectsRegionsJobsGet{..}
186 = go _prjgProjectId _prjgRegion _prjgJobId _prjgXgafv
188 = go _prjgProjectId _prjgRegion _prjgJobId _prjgXgafv
187 _prjgUploadProtocol
189 _prjgUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/List.hs+2
@@ -221,6 +221,8 @@ prjlCallback
221
221
222instance GoogleRequest ProjectsRegionsJobsList where
222instance GoogleRequest ProjectsRegionsJobsList where
223 type Rs ProjectsRegionsJobsList = ListJobsResponse
223 type Rs ProjectsRegionsJobsList = ListJobsResponse
224+ type Scopes ProjectsRegionsJobsList =
225+ '["https://www.googleapis.com/auth/cloud-platform"]
224 requestClient ProjectsRegionsJobsList{..}
226 requestClient ProjectsRegionsJobsList{..}
225 = go _prjlProjectId _prjlRegion _prjlJobStateMatcher
227 = go _prjlProjectId _prjlRegion _prjlJobStateMatcher
226 _prjlXgafv
228 _prjlXgafv
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Jobs/Submit.hs+2
@@ -184,6 +184,8 @@ prjsCallback
184instance GoogleRequest ProjectsRegionsJobsSubmit
184instance GoogleRequest ProjectsRegionsJobsSubmit
185 where
185 where
186 type Rs ProjectsRegionsJobsSubmit = Job
186 type Rs ProjectsRegionsJobsSubmit = Job
187+ type Scopes ProjectsRegionsJobsSubmit =
188+ '["https://www.googleapis.com/auth/cloud-platform"]
187 requestClient ProjectsRegionsJobsSubmit{..}
189 requestClient ProjectsRegionsJobsSubmit{..}
188 = go _prjsProjectId _prjsRegion _prjsXgafv
190 = go _prjsProjectId _prjsRegion _prjsXgafv
189 _prjsUploadProtocol
191 _prjsUploadProtocol
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Cancel.hs+2
@@ -165,6 +165,8 @@ procCallback
165instance GoogleRequest
165instance GoogleRequest
166 ProjectsRegionsOperationsCancel where
166 ProjectsRegionsOperationsCancel where
167 type Rs ProjectsRegionsOperationsCancel = Empty
167 type Rs ProjectsRegionsOperationsCancel = Empty
168+ type Scopes ProjectsRegionsOperationsCancel =
169+ '["https://www.googleapis.com/auth/cloud-platform"]
168 requestClient ProjectsRegionsOperationsCancel{..}
170 requestClient ProjectsRegionsOperationsCancel{..}
169 = go _procName _procXgafv _procUploadProtocol
171 = go _procName _procXgafv _procUploadProtocol
170 (Just _procPp)
172 (Just _procPp)
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Delete.hs+2
@@ -159,6 +159,8 @@ prodCallback
159instance GoogleRequest
159instance GoogleRequest
160 ProjectsRegionsOperationsDelete where
160 ProjectsRegionsOperationsDelete where
161 type Rs ProjectsRegionsOperationsDelete = Empty
161 type Rs ProjectsRegionsOperationsDelete = Empty
162+ type Scopes ProjectsRegionsOperationsDelete =
163+ '["https://www.googleapis.com/auth/cloud-platform"]
162 requestClient ProjectsRegionsOperationsDelete{..}
164 requestClient ProjectsRegionsOperationsDelete{..}
163 = go _prodName _prodXgafv _prodUploadProtocol
165 = go _prodName _prodXgafv _prodUploadProtocol
164 (Just _prodPp)
166 (Just _prodPp)
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/Get.hs+2
@@ -157,6 +157,8 @@ progCallback
157instance GoogleRequest ProjectsRegionsOperationsGet
157instance GoogleRequest ProjectsRegionsOperationsGet
158 where
158 where
159 type Rs ProjectsRegionsOperationsGet = Operation
159 type Rs ProjectsRegionsOperationsGet = Operation
160+ type Scopes ProjectsRegionsOperationsGet =
161+ '["https://www.googleapis.com/auth/cloud-platform"]
160 requestClient ProjectsRegionsOperationsGet{..}
162 requestClient ProjectsRegionsOperationsGet{..}
161 = go _progName _progXgafv _progUploadProtocol
163 = go _progName _progXgafv _progUploadProtocol
162 (Just _progPp)
164 (Just _progPp)
gogol-dataproc/gen/Network/Google/Resource/Dataproc/Projects/Regions/Operations/List.hs+2
@@ -198,6 +198,8 @@ instance GoogleRequest ProjectsRegionsOperationsList
198 where
198 where
199 type Rs ProjectsRegionsOperationsList =
199 type Rs ProjectsRegionsOperationsList =
200 ListOperationsResponse
200 ListOperationsResponse
201+ type Scopes ProjectsRegionsOperationsList =
202+ '["https://www.googleapis.com/auth/cloud-platform"]
201 requestClient ProjectsRegionsOperationsList{..}
203 requestClient ProjectsRegionsOperationsList{..}
202 = go _prolName _prolXgafv _prolUploadProtocol
204 = go _prolName _prolXgafv _prolUploadProtocol
203 (Just _prolPp)
205 (Just _prolPp)
gogol-datastore/gen/Network/Google/Datastore/Types.hs+8−7
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -302,19 +303,19 @@ import Network.Google.Datastore.Types.Sum
302import Network.Google.Prelude
303import Network.Google.Prelude
303
304
304-- | Default request referring to version 'v1beta2' of the Google Cloud Datastore API. This contains the host and root path used as a starting point for constructing service requests.
305-- | Default request referring to version 'v1beta2' of the Google Cloud Datastore API. This contains the host and root path used as a starting point for constructing service requests.
305−datastoreService :: ServiceConfig
306+datastoreService :: Service
306datastoreService
307datastoreService
307 = defaultService (ServiceId "datastore:v1beta2")
308 = defaultService (ServiceId "datastore:v1beta2")
308 "www.googleapis.com"
309 "www.googleapis.com"
309
310
310-- | View your email address
311-- | View your email address
311−authUserinfoEmailScope :: OAuthScope
312−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
312+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
313+authUserinfoEmailScope = Proxy;
313
314
314-- | View and manage your data across Google Cloud Platform services
315-- | View and manage your data across Google Cloud Platform services
315−authCloudPlatformScope :: OAuthScope
316−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
316+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
317+authCloudPlatformScope = Proxy;
317
318
318-- | View and manage your Google Cloud Datastore data
319-- | View and manage your Google Cloud Datastore data
319−authDatastoreScope :: OAuthScope
320−authDatastoreScope = "https://www.googleapis.com/auth/datastore";
320+authDatastoreScope :: Proxy '["https://www.googleapis.com/auth/datastore"]
321+authDatastoreScope = Proxy;
gogol-debugger/gen/Network/Google/Debugger/Types.hs+8−7
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -234,19 +235,19 @@ import Network.Google.Debugger.Types.Sum
234import Network.Google.Prelude
235import Network.Google.Prelude
235
236
236-- | Default request referring to version 'v2' of the Google Cloud Debugger API. This contains the host and root path used as a starting point for constructing service requests.
237-- | Default request referring to version 'v2' of the Google Cloud Debugger API. This contains the host and root path used as a starting point for constructing service requests.
237−debuggerService :: ServiceConfig
238+debuggerService :: Service
238debuggerService
239debuggerService
239 = defaultService (ServiceId "clouddebugger:v2")
240 = defaultService (ServiceId "clouddebugger:v2")
240 "clouddebugger.googleapis.com"
241 "clouddebugger.googleapis.com"
241
242
242-- | Manage cloud debugger
243-- | Manage cloud debugger
243−authCloudDebuggerScope :: OAuthScope
244−authCloudDebuggerScope = "https://www.googleapis.com/auth/cloud_debugger";
244+authCloudDebuggerScope :: Proxy '["https://www.googleapis.com/auth/cloud_debugger"]
245+authCloudDebuggerScope = Proxy;
245
246
246-- | Manage active breakpoints in cloud debugger
247-- | Manage active breakpoints in cloud debugger
247−authCloudDebugletcontrollerScope :: OAuthScope
248−authCloudDebugletcontrollerScope = "https://www.googleapis.com/auth/cloud_debugletcontroller";
248+authCloudDebugletcontrollerScope :: Proxy '["https://www.googleapis.com/auth/cloud_debugletcontroller"]
249+authCloudDebugletcontrollerScope = Proxy;
249
250
250-- | View and manage your data across Google Cloud Platform services
251-- | View and manage your data across Google Cloud Platform services
251−authCloudPlatformScope :: OAuthScope
252−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
252+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
253+authCloudPlatformScope = Proxy;
gogol-deploymentmanager/gen/Network/Google/DeploymentManager/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -267,25 +268,25 @@ import Network.Google.DeploymentManager.Types.Sum
267import Network.Google.Prelude
268import Network.Google.Prelude
268
269
269-- | Default request referring to version 'v2' of the Google Cloud Deployment Manager API. This contains the host and root path used as a starting point for constructing service requests.
270-- | Default request referring to version 'v2' of the Google Cloud Deployment Manager API. This contains the host and root path used as a starting point for constructing service requests.
270−deploymentManagerService :: ServiceConfig
271+deploymentManagerService :: Service
271deploymentManagerService
272deploymentManagerService
272 = defaultService (ServiceId "deploymentmanager:v2")
273 = defaultService (ServiceId "deploymentmanager:v2")
273 "www.googleapis.com"
274 "www.googleapis.com"
274
275
275-- | View your data across Google Cloud Platform services
276-- | View your data across Google Cloud Platform services
276−authCloudPlatformReadOnlyScope :: OAuthScope
277−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
277+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
278+authCloudPlatformReadOnlyScope = Proxy;
278
279
279-- | View and manage your data across Google Cloud Platform services
280-- | View and manage your data across Google Cloud Platform services
280−authCloudPlatformScope :: OAuthScope
281−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
281+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
282+authCloudPlatformScope = Proxy;
282
283
283-- | View and manage your Google Cloud Platform management resources and
284-- | View and manage your Google Cloud Platform management resources and
284-- deployment status information
285-- deployment status information
285−authNdevCloudmanScope :: OAuthScope
286−authNdevCloudmanScope = "https://www.googleapis.com/auth/ndev.cloudman";
286+authNdevCloudmanScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman"]
287+authNdevCloudmanScope = Proxy;
287
288
288-- | View your Google Cloud Platform management resources and deployment
289-- | View your Google Cloud Platform management resources and deployment
289-- status information
290-- status information
290−authNdevCloudmanReadonlyScope :: OAuthScope
291−authNdevCloudmanReadonlyScope = "https://www.googleapis.com/auth/ndev.cloudman.readonly";
291+authNdevCloudmanReadonlyScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman.readonly"]
292+authNdevCloudmanReadonlyScope = Proxy;
gogol-dfareporting/gen/Network/Google/DFAReporting/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -2533,16 +2534,16 @@ import Network.Google.DFAReporting.Types.Sum
2533import Network.Google.Prelude
2534import Network.Google.Prelude
2534
2535
2535-- | Default request referring to version 'v2.4' of the DCM/DFA Reporting And Trafficking API. This contains the host and root path used as a starting point for constructing service requests.
2536-- | Default request referring to version 'v2.4' of the DCM/DFA Reporting And Trafficking API. This contains the host and root path used as a starting point for constructing service requests.
2536−dFAReportingService :: ServiceConfig
2537+dFAReportingService :: Service
2537dFAReportingService
2538dFAReportingService
2538 = defaultService (ServiceId "dfareporting:v2.4")
2539 = defaultService (ServiceId "dfareporting:v2.4")
2539 "www.googleapis.com"
2540 "www.googleapis.com"
2540
2541
2541-- | View and manage DoubleClick for Advertisers reports
2542-- | View and manage DoubleClick for Advertisers reports
2542−authDfareportingScope :: OAuthScope
2543−authDfareportingScope = "https://www.googleapis.com/auth/dfareporting";
2543+authDfareportingScope :: Proxy '["https://www.googleapis.com/auth/dfareporting"]
2544+authDfareportingScope = Proxy;
2544
2545
2545-- | View and manage your DoubleClick Campaign Manager\'s (DCM) display ad
2546-- | View and manage your DoubleClick Campaign Manager\'s (DCM) display ad
2546-- campaigns
2547-- campaigns
2547−authDfatraffickingScope :: OAuthScope
2548−authDfatraffickingScope = "https://www.googleapis.com/auth/dfatrafficking";
2548+authDfatraffickingScope :: Proxy '["https://www.googleapis.com/auth/dfatrafficking"]
2549+authDfatraffickingScope = Proxy;
gogol-discovery/gen/Network/Google/Discovery/Types.hs+1−1
@@ -256,7 +256,7 @@ import Network.Google.Discovery.Types.Sum
256import Network.Google.Prelude
256import Network.Google.Prelude
257
257
258-- | Default request referring to version 'v1' of the APIs Discovery Service. This contains the host and root path used as a starting point for constructing service requests.
258-- | Default request referring to version 'v1' of the APIs Discovery Service. This contains the host and root path used as a starting point for constructing service requests.
259−discoveryService :: ServiceConfig
259+discoveryService :: Service
260discoveryService
260discoveryService
261 = defaultService (ServiceId "discovery:v1")
261 = defaultService (ServiceId "discovery:v1")
262 "www.googleapis.com"
262 "www.googleapis.com"
gogol-dns/gen/Network/Google/DNS/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -107,23 +108,23 @@ import Network.Google.DNS.Types.Sum
107import Network.Google.Prelude
108import Network.Google.Prelude
108
109
109-- | Default request referring to version 'v1' of the Google Cloud DNS API. This contains the host and root path used as a starting point for constructing service requests.
110-- | Default request referring to version 'v1' of the Google Cloud DNS API. This contains the host and root path used as a starting point for constructing service requests.
110−dNSService :: ServiceConfig
111+dNSService :: Service
111dNSService
112dNSService
112 = defaultService (ServiceId "dns:v1")
113 = defaultService (ServiceId "dns:v1")
113 "www.googleapis.com"
114 "www.googleapis.com"
114
115
115-- | View your DNS records hosted by Google Cloud DNS
116-- | View your DNS records hosted by Google Cloud DNS
116−authNdevClouddnsReadonlyScope :: OAuthScope
117−authNdevClouddnsReadonlyScope = "https://www.googleapis.com/auth/ndev.clouddns.readonly";
117+authNdevClouddnsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/ndev.clouddns.readonly"]
118+authNdevClouddnsReadonlyScope = Proxy;
118
119
119-- | View your data across Google Cloud Platform services
120-- | View your data across Google Cloud Platform services
120−authCloudPlatformReadOnlyScope :: OAuthScope
121−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
121+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
122+authCloudPlatformReadOnlyScope = Proxy;
122
123
123-- | View and manage your DNS records hosted by Google Cloud DNS
124-- | View and manage your DNS records hosted by Google Cloud DNS
124−authNdevClouddnsReadwriteScope :: OAuthScope
125−authNdevClouddnsReadwriteScope = "https://www.googleapis.com/auth/ndev.clouddns.readwrite";
125+authNdevClouddnsReadwriteScope :: Proxy '["https://www.googleapis.com/auth/ndev.clouddns.readwrite"]
126+authNdevClouddnsReadwriteScope = Proxy;
126
127
127-- | View and manage your data across Google Cloud Platform services
128-- | View and manage your data across Google Cloud Platform services
128−authCloudPlatformScope :: OAuthScope
129−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
129+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
130+authCloudPlatformScope = Proxy;
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types.hs+1−1
@@ -233,7 +233,7 @@ import Network.Google.DoubleClickBids.Types.Sum
233import Network.Google.Prelude
233import Network.Google.Prelude
234
234
235-- | Default request referring to version 'v1' of the DoubleClick Bid Manager API. This contains the host and root path used as a starting point for constructing service requests.
235-- | Default request referring to version 'v1' of the DoubleClick Bid Manager API. This contains the host and root path used as a starting point for constructing service requests.
236−doubleClickBidsService :: ServiceConfig
236+doubleClickBidsService :: Service
237doubleClickBidsService
237doubleClickBidsService
238 = defaultService
238 = defaultService
239 (ServiceId "doubleclickbidmanager:v1")
239 (ServiceId "doubleclickbidmanager:v1")
gogol-doubleclick-bids/gen/Network/Google/Resource/DoubleClickBidManager/Rubicon/Notifyproposalchange.hs+1
@@ -78,6 +78,7 @@ rnPayload
78instance GoogleRequest RubiconNotifyproposalchange
78instance GoogleRequest RubiconNotifyproposalchange
79 where
79 where
80 type Rs RubiconNotifyproposalchange = ()
80 type Rs RubiconNotifyproposalchange = ()
81+ type Scopes RubiconNotifyproposalchange = '[]
81 requestClient RubiconNotifyproposalchange{..}
82 requestClient RubiconNotifyproposalchange{..}
82 = go (Just AltJSON) _rnPayload doubleClickBidsService
83 = go (Just AltJSON) _rnPayload doubleClickBidsService
83 where go
84 where go
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -203,11 +204,11 @@ import Network.Google.DoubleClickSearch.Types.Sum
203import Network.Google.Prelude
204import Network.Google.Prelude
204
205
205-- | Default request referring to version 'v2' of the DoubleClick Search API. This contains the host and root path used as a starting point for constructing service requests.
206-- | Default request referring to version 'v2' of the DoubleClick Search API. This contains the host and root path used as a starting point for constructing service requests.
206−doubleClickSearchService :: ServiceConfig
207+doubleClickSearchService :: Service
207doubleClickSearchService
208doubleClickSearchService
208 = defaultService (ServiceId "doubleclicksearch:v2")
209 = defaultService (ServiceId "doubleclicksearch:v2")
209 "www.googleapis.com"
210 "www.googleapis.com"
210
211
211-- | View and manage your advertising data in DoubleClick Search
212-- | View and manage your advertising data in DoubleClick Search
212−authDoubleclicksearchScope :: OAuthScope
213−authDoubleclicksearchScope = "https://www.googleapis.com/auth/doubleclicksearch";
213+authDoubleclicksearchScope :: Proxy '["https://www.googleapis.com/auth/doubleclicksearch"]
214+authDoubleclicksearchScope = Proxy;
gogol-drive/gen/Network/Google/Drive/Types.hs+18−17
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -346,40 +347,40 @@ import Network.Google.Drive.Types.Sum
346import Network.Google.Prelude
347import Network.Google.Prelude
347
348
348-- | Default request referring to version 'v3' of the Drive API. This contains the host and root path used as a starting point for constructing service requests.
349-- | Default request referring to version 'v3' of the Drive API. This contains the host and root path used as a starting point for constructing service requests.
349−driveService :: ServiceConfig
350+driveService :: Service
350driveService
351driveService
351 = defaultService (ServiceId "drive:v3")
352 = defaultService (ServiceId "drive:v3")
352 "www.googleapis.com"
353 "www.googleapis.com"
353
354
354-- | View metadata for files in your Google Drive
355-- | View metadata for files in your Google Drive
355−authDriveMetadataReadonlyScope :: OAuthScope
356−authDriveMetadataReadonlyScope = "https://www.googleapis.com/auth/drive.metadata.readonly";
356+authDriveMetadataReadonlyScope :: Proxy '["https://www.googleapis.com/auth/drive.metadata.readonly"]
357+authDriveMetadataReadonlyScope = Proxy;
357
358
358-- | View the photos, videos and albums in your Google Photos
359-- | View the photos, videos and albums in your Google Photos
359−authDrivePhotosReadonlyScope :: OAuthScope
360−authDrivePhotosReadonlyScope = "https://www.googleapis.com/auth/drive.photos.readonly";
360+authDrivePhotosReadonlyScope :: Proxy '["https://www.googleapis.com/auth/drive.photos.readonly"]
361+authDrivePhotosReadonlyScope = Proxy;
361
362
362-- | View and manage its own configuration data in your Google Drive
363-- | View and manage its own configuration data in your Google Drive
363−authDriveAppdataScope :: OAuthScope
364−authDriveAppdataScope = "https://www.googleapis.com/auth/drive.appdata";
364+authDriveAppdataScope :: Proxy '["https://www.googleapis.com/auth/drive.appdata"]
365+authDriveAppdataScope = Proxy;
365
366
366-- | View the files in your Google Drive
367-- | View the files in your Google Drive
367−authDriveReadonlyScope :: OAuthScope
368−authDriveReadonlyScope = "https://www.googleapis.com/auth/drive.readonly";
368+authDriveReadonlyScope :: Proxy '["https://www.googleapis.com/auth/drive.readonly"]
369+authDriveReadonlyScope = Proxy;
369
370
370-- | View and manage the files in your Google Drive
371-- | View and manage the files in your Google Drive
371−authDriveScope :: OAuthScope
372−authDriveScope = "https://www.googleapis.com/auth/drive";
372+authDriveScope :: Proxy '["https://www.googleapis.com/auth/drive"]
373+authDriveScope = Proxy;
373
374
374-- | View and manage Google Drive files and folders that you have opened or
375-- | View and manage Google Drive files and folders that you have opened or
375-- created with this app
376-- created with this app
376−authDriveFileScope :: OAuthScope
377−authDriveFileScope = "https://www.googleapis.com/auth/drive.file";
377+authDriveFileScope :: Proxy '["https://www.googleapis.com/auth/drive.file"]
378+authDriveFileScope = Proxy;
378
379
379-- | View and manage metadata of files in your Google Drive
380-- | View and manage metadata of files in your Google Drive
380−authDriveMetadataScope :: OAuthScope
381−authDriveMetadataScope = "https://www.googleapis.com/auth/drive.metadata";
381+authDriveMetadataScope :: Proxy '["https://www.googleapis.com/auth/drive.metadata"]
382+authDriveMetadataScope = Proxy;
382
383
383-- | Modify your Google Apps Script scripts\' behavior
384-- | Modify your Google Apps Script scripts\' behavior
384−authDriveScriptsScope :: OAuthScope
385−authDriveScriptsScope = "https://www.googleapis.com/auth/drive.scripts";
385+authDriveScriptsScope :: Proxy '["https://www.googleapis.com/auth/drive.scripts"]
386+authDriveScriptsScope = Proxy;
gogol-drive/gen/Network/Google/Resource/Drive/About/Get.hs+8
@@ -62,6 +62,14 @@ aboutGet = AboutGet
62
62
63instance GoogleRequest AboutGet where
63instance GoogleRequest AboutGet where
64 type Rs AboutGet = About
64 type Rs AboutGet = About
65+ type Scopes AboutGet =
66+ '["https://www.googleapis.com/auth/drive",
67+ "https://www.googleapis.com/auth/drive.appdata",
68+ "https://www.googleapis.com/auth/drive.file",
69+ "https://www.googleapis.com/auth/drive.metadata",
70+ "https://www.googleapis.com/auth/drive.metadata.readonly",
71+ "https://www.googleapis.com/auth/drive.photos.readonly",
72+ "https://www.googleapis.com/auth/drive.readonly"]
65 requestClient AboutGet{}
73 requestClient AboutGet{}
66 = go (Just AltJSON) driveService
74 = go (Just AltJSON) driveService
67 where go
75 where go
gogol-drive/gen/Network/Google/Resource/Drive/Changes/GetStartPageToken.hs+8
@@ -62,6 +62,14 @@ changesGetStartPageToken = ChangesGetStartPageToken
62
62
63instance GoogleRequest ChangesGetStartPageToken where
63instance GoogleRequest ChangesGetStartPageToken where
64 type Rs ChangesGetStartPageToken = StartPageToken
64 type Rs ChangesGetStartPageToken = StartPageToken
65+ type Scopes ChangesGetStartPageToken =
66+ '["https://www.googleapis.com/auth/drive",
67+ "https://www.googleapis.com/auth/drive.appdata",
68+ "https://www.googleapis.com/auth/drive.file",
69+ "https://www.googleapis.com/auth/drive.metadata",
70+ "https://www.googleapis.com/auth/drive.metadata.readonly",
71+ "https://www.googleapis.com/auth/drive.photos.readonly",
72+ "https://www.googleapis.com/auth/drive.readonly"]
65 requestClient ChangesGetStartPageToken{}
73 requestClient ChangesGetStartPageToken{}
66 = go (Just AltJSON) driveService
74 = go (Just AltJSON) driveService
67 where go
75 where go
gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs−1
@@ -130,7 +130,6 @@ instance GoogleRequest ChangesList where
130 type Scopes ChangesList =
130 type Scopes ChangesList =
131 '["https://www.googleapis.com/auth/drive",
131 '["https://www.googleapis.com/auth/drive",
132 "https://www.googleapis.com/auth/drive.appdata",
132 "https://www.googleapis.com/auth/drive.appdata",
133− "https://www.googleapis.com/auth/drive.apps.readonly",
134 "https://www.googleapis.com/auth/drive.file",
133 "https://www.googleapis.com/auth/drive.file",
135 "https://www.googleapis.com/auth/drive.metadata",
134 "https://www.googleapis.com/auth/drive.metadata",
136 "https://www.googleapis.com/auth/drive.metadata.readonly",
135 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs−1
@@ -143,7 +143,6 @@ instance GoogleRequest ChangesWatch where
143 type Scopes ChangesWatch =
143 type Scopes ChangesWatch =
144 '["https://www.googleapis.com/auth/drive",
144 '["https://www.googleapis.com/auth/drive",
145 "https://www.googleapis.com/auth/drive.appdata",
145 "https://www.googleapis.com/auth/drive.appdata",
146− "https://www.googleapis.com/auth/drive.apps.readonly",
147 "https://www.googleapis.com/auth/drive.file",
146 "https://www.googleapis.com/auth/drive.file",
148 "https://www.googleapis.com/auth/drive.metadata",
147 "https://www.googleapis.com/auth/drive.metadata",
149 "https://www.googleapis.com/auth/drive.metadata.readonly",
148 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Channels/Stop.hs−1
@@ -79,7 +79,6 @@ instance GoogleRequest ChannelsStop where
79 type Scopes ChannelsStop =
79 type Scopes ChannelsStop =
80 '["https://www.googleapis.com/auth/drive",
80 '["https://www.googleapis.com/auth/drive",
81 "https://www.googleapis.com/auth/drive.appdata",
81 "https://www.googleapis.com/auth/drive.appdata",
82− "https://www.googleapis.com/auth/drive.apps.readonly",
83 "https://www.googleapis.com/auth/drive.file",
82 "https://www.googleapis.com/auth/drive.file",
84 "https://www.googleapis.com/auth/drive.metadata",
83 "https://www.googleapis.com/auth/drive.metadata",
85 "https://www.googleapis.com/auth/drive.metadata.readonly",
84 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Comments/Create.hs+3
@@ -87,6 +87,9 @@ ccFileId = lens _ccFileId (\ s a -> s{_ccFileId = a})
87
87
88instance GoogleRequest CommentsCreate where
88instance GoogleRequest CommentsCreate where
89 type Rs CommentsCreate = Comment
89 type Rs CommentsCreate = Comment
90+ type Scopes CommentsCreate =
91+ '["https://www.googleapis.com/auth/drive",
92+ "https://www.googleapis.com/auth/drive.file"]
90 requestClient CommentsCreate{..}
93 requestClient CommentsCreate{..}
91 = go _ccFileId (Just AltJSON) _ccPayload driveService
94 = go _ccFileId (Just AltJSON) _ccPayload driveService
92 where go
95 where go
gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs−1
@@ -131,7 +131,6 @@ instance GoogleRequest FilesCopy where
131 type Scopes FilesCopy =
131 type Scopes FilesCopy =
132 '["https://www.googleapis.com/auth/drive",
132 '["https://www.googleapis.com/auth/drive",
133 "https://www.googleapis.com/auth/drive.appdata",
133 "https://www.googleapis.com/auth/drive.appdata",
134− "https://www.googleapis.com/auth/drive.apps.readonly",
135 "https://www.googleapis.com/auth/drive.file",
134 "https://www.googleapis.com/auth/drive.file",
136 "https://www.googleapis.com/auth/drive.photos.readonly"]
135 "https://www.googleapis.com/auth/drive.photos.readonly"]
137 requestClient FilesCopy{..}
136 requestClient FilesCopy{..}
gogol-drive/gen/Network/Google/Resource/Drive/Files/Create.hs+6
@@ -141,6 +141,10 @@ fcIgnoreDefaultVisibility
141
141
142instance GoogleRequest FilesCreate where
142instance GoogleRequest FilesCreate where
143 type Rs FilesCreate = File
143 type Rs FilesCreate = File
144+ type Scopes FilesCreate =
145+ '["https://www.googleapis.com/auth/drive",
146+ "https://www.googleapis.com/auth/drive.appdata",
147+ "https://www.googleapis.com/auth/drive.file"]
144 requestClient FilesCreate{..}
148 requestClient FilesCreate{..}
145 = go (Just _fcUseContentAsIndexableText)
149 = go (Just _fcUseContentAsIndexableText)
146 _fcOCRLanguage
150 _fcOCRLanguage
@@ -156,6 +160,8 @@ instance GoogleRequest FilesCreate where
156instance GoogleRequest (MediaUpload FilesCreate)
160instance GoogleRequest (MediaUpload FilesCreate)
157 where
161 where
158 type Rs (MediaUpload FilesCreate) = File
162 type Rs (MediaUpload FilesCreate) = File
163+ type Scopes (MediaUpload FilesCreate) =
164+ Scopes FilesCreate
159 requestClient (MediaUpload FilesCreate{..} body)
165 requestClient (MediaUpload FilesCreate{..} body)
160 = go (Just _fcUseContentAsIndexableText)
166 = go (Just _fcUseContentAsIndexableText)
161 _fcOCRLanguage
167 _fcOCRLanguage
gogol-drive/gen/Network/Google/Resource/Drive/Files/Export.hs+6
@@ -98,6 +98,10 @@ feFileId = lens _feFileId (\ s a -> s{_feFileId = a})
98
98
99instance GoogleRequest FilesExport where
99instance GoogleRequest FilesExport where
100 type Rs FilesExport = ()
100 type Rs FilesExport = ()
101+ type Scopes FilesExport =
102+ '["https://www.googleapis.com/auth/drive",
103+ "https://www.googleapis.com/auth/drive.file",
104+ "https://www.googleapis.com/auth/drive.readonly"]
101 requestClient FilesExport{..}
105 requestClient FilesExport{..}
102 = go _feFileId (Just _feMimeType) (Just AltJSON)
106 = go _feFileId (Just _feMimeType) (Just AltJSON)
103 driveService
107 driveService
@@ -108,6 +112,8 @@ instance GoogleRequest FilesExport where
108instance GoogleRequest (MediaDownload FilesExport)
112instance GoogleRequest (MediaDownload FilesExport)
109 where
113 where
110 type Rs (MediaDownload FilesExport) = Stream
114 type Rs (MediaDownload FilesExport) = Stream
115+ type Scopes (MediaDownload FilesExport) =
116+ Scopes FilesExport
111 requestClient (MediaDownload FilesExport{..})
117 requestClient (MediaDownload FilesExport{..})
112 = go _feFileId (Just _feMimeType) (Just AltMedia)
118 = go _feFileId (Just _feMimeType) (Just AltMedia)
113 driveService
119 driveService
gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs−1
@@ -98,7 +98,6 @@ instance GoogleRequest FilesGet where
98 type Scopes FilesGet =
98 type Scopes FilesGet =
99 '["https://www.googleapis.com/auth/drive",
99 '["https://www.googleapis.com/auth/drive",
100 "https://www.googleapis.com/auth/drive.appdata",
100 "https://www.googleapis.com/auth/drive.appdata",
101− "https://www.googleapis.com/auth/drive.apps.readonly",
102 "https://www.googleapis.com/auth/drive.file",
101 "https://www.googleapis.com/auth/drive.file",
103 "https://www.googleapis.com/auth/drive.metadata",
102 "https://www.googleapis.com/auth/drive.metadata",
104 "https://www.googleapis.com/auth/drive.metadata.readonly",
103 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs−1
@@ -141,7 +141,6 @@ instance GoogleRequest FilesList where
141 type Scopes FilesList =
141 type Scopes FilesList =
142 '["https://www.googleapis.com/auth/drive",
142 '["https://www.googleapis.com/auth/drive",
143 "https://www.googleapis.com/auth/drive.appdata",
143 "https://www.googleapis.com/auth/drive.appdata",
144− "https://www.googleapis.com/auth/drive.apps.readonly",
145 "https://www.googleapis.com/auth/drive.file",
144 "https://www.googleapis.com/auth/drive.file",
146 "https://www.googleapis.com/auth/drive.metadata",
145 "https://www.googleapis.com/auth/drive.metadata",
147 "https://www.googleapis.com/auth/drive.metadata.readonly",
146 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs−1
@@ -164,7 +164,6 @@ instance GoogleRequest FilesUpdate where
164 type Scopes FilesUpdate =
164 type Scopes FilesUpdate =
165 '["https://www.googleapis.com/auth/drive",
165 '["https://www.googleapis.com/auth/drive",
166 "https://www.googleapis.com/auth/drive.appdata",
166 "https://www.googleapis.com/auth/drive.appdata",
167− "https://www.googleapis.com/auth/drive.apps.readonly",
168 "https://www.googleapis.com/auth/drive.file",
167 "https://www.googleapis.com/auth/drive.file",
169 "https://www.googleapis.com/auth/drive.metadata",
168 "https://www.googleapis.com/auth/drive.metadata",
170 "https://www.googleapis.com/auth/drive.scripts"]
169 "https://www.googleapis.com/auth/drive.scripts"]
gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs−1
@@ -112,7 +112,6 @@ instance GoogleRequest FilesWatch where
112 type Scopes FilesWatch =
112 type Scopes FilesWatch =
113 '["https://www.googleapis.com/auth/drive",
113 '["https://www.googleapis.com/auth/drive",
114 "https://www.googleapis.com/auth/drive.appdata",
114 "https://www.googleapis.com/auth/drive.appdata",
115− "https://www.googleapis.com/auth/drive.apps.readonly",
116 "https://www.googleapis.com/auth/drive.file",
115 "https://www.googleapis.com/auth/drive.file",
117 "https://www.googleapis.com/auth/drive.metadata",
116 "https://www.googleapis.com/auth/drive.metadata",
118 "https://www.googleapis.com/auth/drive.metadata.readonly",
117 "https://www.googleapis.com/auth/drive.metadata.readonly",
gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Create.hs+3
@@ -127,6 +127,9 @@ pcFileId = lens _pcFileId (\ s a -> s{_pcFileId = a})
127
127
128instance GoogleRequest PermissionsCreate where
128instance GoogleRequest PermissionsCreate where
129 type Rs PermissionsCreate = Permission
129 type Rs PermissionsCreate = Permission
130+ type Scopes PermissionsCreate =
131+ '["https://www.googleapis.com/auth/drive",
132+ "https://www.googleapis.com/auth/drive.file"]
130 requestClient PermissionsCreate{..}
133 requestClient PermissionsCreate{..}
131 = go _pcFileId _pcSendNotificationEmail
134 = go _pcFileId _pcSendNotificationEmail
132 _pcEmailMessage
135 _pcEmailMessage
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Create.hs+3
@@ -100,6 +100,9 @@ rcCommentId
100
100
101instance GoogleRequest RepliesCreate where
101instance GoogleRequest RepliesCreate where
102 type Rs RepliesCreate = Reply
102 type Rs RepliesCreate = Reply
103+ type Scopes RepliesCreate =
104+ '["https://www.googleapis.com/auth/drive",
105+ "https://www.googleapis.com/auth/drive.file"]
103 requestClient RepliesCreate{..}
106 requestClient RepliesCreate{..}
104 = go _rcFileId _rcCommentId (Just AltJSON) _rcPayload
107 = go _rcFileId _rcCommentId (Just AltJSON) _rcPayload
105 driveService
108 driveService
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Get.hs+4
@@ -113,6 +113,10 @@ rgIncludeDeleted
113
113
114instance GoogleRequest RepliesGet where
114instance GoogleRequest RepliesGet where
115 type Rs RepliesGet = Reply
115 type Rs RepliesGet = Reply
116+ type Scopes RepliesGet =
117+ '["https://www.googleapis.com/auth/drive",
118+ "https://www.googleapis.com/auth/drive.file",
119+ "https://www.googleapis.com/auth/drive.readonly"]
116 requestClient RepliesGet{..}
120 requestClient RepliesGet{..}
117 = go _rgFileId _rgCommentId _rgReplyId
121 = go _rgFileId _rgCommentId _rgReplyId
118 (Just _rgIncludeDeleted)
122 (Just _rgIncludeDeleted)
gogol-drive/gen/Network/Google/Resource/Drive/Replies/List.hs+4
@@ -126,6 +126,10 @@ rlIncludeDeleted
126
126
127instance GoogleRequest RepliesList where
127instance GoogleRequest RepliesList where
128 type Rs RepliesList = ReplyList
128 type Rs RepliesList = ReplyList
129+ type Scopes RepliesList =
130+ '["https://www.googleapis.com/auth/drive",
131+ "https://www.googleapis.com/auth/drive.file",
132+ "https://www.googleapis.com/auth/drive.readonly"]
129 requestClient RepliesList{..}
133 requestClient RepliesList{..}
130 = go _rlFileId _rlCommentId _rlPageToken
134 = go _rlFileId _rlCommentId _rlPageToken
131 (Just _rlPageSize)
135 (Just _rlPageSize)
gogol-drive/gen/Network/Google/Resource/Drive/Replies/Update.hs+3
@@ -112,6 +112,9 @@ ruCommentId
112
112
113instance GoogleRequest RepliesUpdate where
113instance GoogleRequest RepliesUpdate where
114 type Rs RepliesUpdate = Reply
114 type Rs RepliesUpdate = Reply
115+ type Scopes RepliesUpdate =
116+ '["https://www.googleapis.com/auth/drive",
117+ "https://www.googleapis.com/auth/drive.file"]
115 requestClient RepliesUpdate{..}
118 requestClient RepliesUpdate{..}
116 = go _ruFileId _ruCommentId _ruReplyId (Just AltJSON)
119 = go _ruFileId _ruCommentId _ruReplyId (Just AltJSON)
117 _ruPayload
120 _ruPayload
gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Get.hs+2
@@ -132,6 +132,8 @@ instance GoogleRequest RevisionsGet where
132instance GoogleRequest (MediaDownload RevisionsGet)
132instance GoogleRequest (MediaDownload RevisionsGet)
133 where
133 where
134 type Rs (MediaDownload RevisionsGet) = Stream
134 type Rs (MediaDownload RevisionsGet) = Stream
135+ type Scopes (MediaDownload RevisionsGet) =
136+ Scopes RevisionsGet
135 requestClient (MediaDownload RevisionsGet{..})
137 requestClient (MediaDownload RevisionsGet{..})
136 = go _rggFileId _rggRevisionId
138 = go _rggFileId _rggRevisionId
137 (Just _rggAcknowledgeAbuse)
139 (Just _rggAcknowledgeAbuse)
gogol-fitness/gen/Network/Google/Fitness/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -198,31 +199,31 @@ import Network.Google.Fitness.Types.Sum
198import Network.Google.Prelude
199import Network.Google.Prelude
199
200
200-- | Default request referring to version 'v1' of the Fitness. This contains the host and root path used as a starting point for constructing service requests.
201-- | Default request referring to version 'v1' of the Fitness. This contains the host and root path used as a starting point for constructing service requests.
201−fitnessService :: ServiceConfig
202+fitnessService :: Service
202fitnessService
203fitnessService
203 = defaultService (ServiceId "fitness:v1")
204 = defaultService (ServiceId "fitness:v1")
204 "www.googleapis.com"
205 "www.googleapis.com"
205
206
206-- | View body sensor information in Google Fit
207-- | View body sensor information in Google Fit
207−authFitnessBodyReadScope :: OAuthScope
208−authFitnessBodyReadScope = "https://www.googleapis.com/auth/fitness.body.read";
208+authFitnessBodyReadScope :: Proxy '["https://www.googleapis.com/auth/fitness.body.read"]
209+authFitnessBodyReadScope = Proxy;
209
210
210-- | View your activity information in Google Fit
211-- | View your activity information in Google Fit
211−authFitnessActivityReadScope :: OAuthScope
212−authFitnessActivityReadScope = "https://www.googleapis.com/auth/fitness.activity.read";
212+authFitnessActivityReadScope :: Proxy '["https://www.googleapis.com/auth/fitness.activity.read"]
213+authFitnessActivityReadScope = Proxy;
213
214
214-- | View and store your activity information in Google Fit
215-- | View and store your activity information in Google Fit
215−authFitnessActivityWriteScope :: OAuthScope
216−authFitnessActivityWriteScope = "https://www.googleapis.com/auth/fitness.activity.write";
216+authFitnessActivityWriteScope :: Proxy '["https://www.googleapis.com/auth/fitness.activity.write"]
217+authFitnessActivityWriteScope = Proxy;
217
218
218-- | View your stored location data in Google Fit
219-- | View your stored location data in Google Fit
219−authFitnessLocationReadScope :: OAuthScope
220−authFitnessLocationReadScope = "https://www.googleapis.com/auth/fitness.location.read";
220+authFitnessLocationReadScope :: Proxy '["https://www.googleapis.com/auth/fitness.location.read"]
221+authFitnessLocationReadScope = Proxy;
221
222
222-- | View and store your location data in Google Fit
223-- | View and store your location data in Google Fit
223−authFitnessLocationWriteScope :: OAuthScope
224−authFitnessLocationWriteScope = "https://www.googleapis.com/auth/fitness.location.write";
224+authFitnessLocationWriteScope :: Proxy '["https://www.googleapis.com/auth/fitness.location.write"]
225+authFitnessLocationWriteScope = Proxy;
225
226
226-- | View and store body sensor data in Google Fit
227-- | View and store body sensor data in Google Fit
227−authFitnessBodyWriteScope :: OAuthScope
228−authFitnessBodyWriteScope = "https://www.googleapis.com/auth/fitness.body.write";
228+authFitnessBodyWriteScope :: Proxy '["https://www.googleapis.com/auth/fitness.body.write"]
229+authFitnessBodyWriteScope = Proxy;
gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSet/Aggregate.hs+4−1
@@ -97,8 +97,11 @@ udsaUserId
97instance GoogleRequest UsersDataSetAggregate where
97instance GoogleRequest UsersDataSetAggregate where
98 type Rs UsersDataSetAggregate = AggregateResponse
98 type Rs UsersDataSetAggregate = AggregateResponse
99 type Scopes UsersDataSetAggregate =
99 type Scopes UsersDataSetAggregate =
100− '["https://www.googleapis.com/auth/fitness.activity.write",
100+ '["https://www.googleapis.com/auth/fitness.activity.read",
101+ "https://www.googleapis.com/auth/fitness.activity.write",
102+ "https://www.googleapis.com/auth/fitness.body.read",
101 "https://www.googleapis.com/auth/fitness.body.write",
103 "https://www.googleapis.com/auth/fitness.body.write",
104+ "https://www.googleapis.com/auth/fitness.location.read",
102 "https://www.googleapis.com/auth/fitness.location.write"]
105 "https://www.googleapis.com/auth/fitness.location.write"]
103 requestClient UsersDataSetAggregate{..}
106 requestClient UsersDataSetAggregate{..}
104 = go _udsaUserId (Just AltJSON) _udsaPayload
107 = go _udsaUserId (Just AltJSON) _udsaPayload
gogol-fonts/gen/Network/Google/Fonts/Types.hs+1−1
@@ -51,7 +51,7 @@ import Network.Google.Fonts.Types.Sum
51import Network.Google.Prelude
51import Network.Google.Prelude
52
52
53-- | Default request referring to version 'v1' of the Google Fonts Developer API. This contains the host and root path used as a starting point for constructing service requests.
53-- | Default request referring to version 'v1' of the Google Fonts Developer API. This contains the host and root path used as a starting point for constructing service requests.
54−fontsService :: ServiceConfig
54+fontsService :: Service
55fontsService
55fontsService
56 = defaultService (ServiceId "webfonts:v1")
56 = defaultService (ServiceId "webfonts:v1")
57 "www.googleapis.com"
57 "www.googleapis.com"
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types.hs+1−1
@@ -76,7 +76,7 @@ import Network.Google.FreebaseSearch.Types.Sum
76import Network.Google.Prelude
76import Network.Google.Prelude
77
77
78-- | Default request referring to version 'v1' of the Freebase Search. This contains the host and root path used as a starting point for constructing service requests.
78-- | Default request referring to version 'v1' of the Freebase Search. This contains the host and root path used as a starting point for constructing service requests.
79−freebaseSearchService :: ServiceConfig
79+freebaseSearchService :: Service
80freebaseSearchService
80freebaseSearchService
81 = defaultService (ServiceId "freebase:v1")
81 = defaultService (ServiceId "freebase:v1")
82 "www.googleapis.com"
82 "www.googleapis.com"
gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -232,15 +233,15 @@ import Network.Google.FusionTables.Types.Sum
232import Network.Google.Prelude
233import Network.Google.Prelude
233
234
234-- | Default request referring to version 'v2' of the Fusion Tables API. This contains the host and root path used as a starting point for constructing service requests.
235-- | Default request referring to version 'v2' of the Fusion Tables API. This contains the host and root path used as a starting point for constructing service requests.
235−fusionTablesService :: ServiceConfig
236+fusionTablesService :: Service
236fusionTablesService
237fusionTablesService
237 = defaultService (ServiceId "fusiontables:v2")
238 = defaultService (ServiceId "fusiontables:v2")
238 "www.googleapis.com"
239 "www.googleapis.com"
239
240
240-- | View your Fusion Tables
241-- | View your Fusion Tables
241−authFusiontablesReadonlyScope :: OAuthScope
242−authFusiontablesReadonlyScope = "https://www.googleapis.com/auth/fusiontables.readonly";
242+authFusiontablesReadonlyScope :: Proxy '["https://www.googleapis.com/auth/fusiontables.readonly"]
243+authFusiontablesReadonlyScope = Proxy;
243
244
244-- | Manage your Fusion Tables
245-- | Manage your Fusion Tables
245−authFusiontablesScope :: OAuthScope
246−authFusiontablesScope = "https://www.googleapis.com/auth/fusiontables";
246+authFusiontablesScope :: Proxy '["https://www.googleapis.com/auth/fusiontables"]
247+authFusiontablesScope = Proxy;
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -126,12 +127,12 @@ import Network.Google.GamesConfiguration.Types.Sum
126import Network.Google.Prelude
127import Network.Google.Prelude
127
128
128-- | Default request referring to version 'v1configuration' of the Google Play Game Services Publishing API. This contains the host and root path used as a starting point for constructing service requests.
129-- | Default request referring to version 'v1configuration' of the Google Play Game Services Publishing API. This contains the host and root path used as a starting point for constructing service requests.
129−gamesConfigurationService :: ServiceConfig
130+gamesConfigurationService :: Service
130gamesConfigurationService
131gamesConfigurationService
131 = defaultService
132 = defaultService
132 (ServiceId "gamesConfiguration:v1configuration")
133 (ServiceId "gamesConfiguration:v1configuration")
133 "www.googleapis.com"
134 "www.googleapis.com"
134
135
135-- | View and manage your Google Play Developer account
136-- | View and manage your Google Play Developer account
136−authAndroidpublisherScope :: OAuthScope
137−authAndroidpublisherScope = "https://www.googleapis.com/auth/androidpublisher";
137+authAndroidpublisherScope :: Proxy '["https://www.googleapis.com/auth/androidpublisher"]
138+authAndroidpublisherScope = Proxy;
gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -135,17 +136,17 @@ import Network.Google.GamesManagement.Types.Sum
135import Network.Google.Prelude
136import Network.Google.Prelude
136
137
137-- | Default request referring to version 'v1management' of the Google Play Game Services Management API. This contains the host and root path used as a starting point for constructing service requests.
138-- | Default request referring to version 'v1management' of the Google Play Game Services Management API. This contains the host and root path used as a starting point for constructing service requests.
138−gamesManagementService :: ServiceConfig
139+gamesManagementService :: Service
139gamesManagementService
140gamesManagementService
140 = defaultService
141 = defaultService
141 (ServiceId "gamesManagement:v1management")
142 (ServiceId "gamesManagement:v1management")
142 "www.googleapis.com"
143 "www.googleapis.com"
143
144
144-- | Know the list of people in your circles, your age range, and language
145-- | Know the list of people in your circles, your age range, and language
145−authPlusLoginScope :: OAuthScope
146−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
146+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
147+authPlusLoginScope = Proxy;
147
148
148-- | Share your Google+ profile information and view and manage your game
149-- | Share your Google+ profile information and view and manage your game
149-- activity
150-- activity
150−authGamesScope :: OAuthScope
151−authGamesScope = "https://www.googleapis.com/auth/games";
151+authGamesScope :: Proxy '["https://www.googleapis.com/auth/games"]
152+authGamesScope = Proxy;
gogol-games/gen/Network/Google/Games/Types.hs+8−7
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -932,20 +933,20 @@ import Network.Google.Games.Types.Sum
932import Network.Google.Prelude
933import Network.Google.Prelude
933
934
934-- | Default request referring to version 'v1' of the Google Play Game Services API. This contains the host and root path used as a starting point for constructing service requests.
935-- | Default request referring to version 'v1' of the Google Play Game Services API. This contains the host and root path used as a starting point for constructing service requests.
935−gamesService :: ServiceConfig
936+gamesService :: Service
936gamesService
937gamesService
937 = defaultService (ServiceId "games:v1")
938 = defaultService (ServiceId "games:v1")
938 "www.googleapis.com"
939 "www.googleapis.com"
939
940
940-- | Know the list of people in your circles, your age range, and language
941-- | Know the list of people in your circles, your age range, and language
941−authPlusLoginScope :: OAuthScope
942−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
942+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
943+authPlusLoginScope = Proxy;
943
944
944-- | Share your Google+ profile information and view and manage your game
945-- | Share your Google+ profile information and view and manage your game
945-- activity
946-- activity
946−authGamesScope :: OAuthScope
947−authGamesScope = "https://www.googleapis.com/auth/games";
947+authGamesScope :: Proxy '["https://www.googleapis.com/auth/games"]
948+authGamesScope = Proxy;
948
949
949-- | View and manage its own configuration data in your Google Drive
950-- | View and manage its own configuration data in your Google Drive
950−authDriveAppdataScope :: OAuthScope
951−authDriveAppdataScope = "https://www.googleapis.com/auth/drive.appdata";
951+authDriveAppdataScope :: Proxy '["https://www.googleapis.com/auth/drive.appdata"]
952+authDriveAppdataScope = Proxy;
gogol-games/gen/Network/Google/Resource/Games/Applications/Verify.hs+3
@@ -83,6 +83,9 @@ avApplicationId
83instance GoogleRequest ApplicationsVerify where
83instance GoogleRequest ApplicationsVerify where
84 type Rs ApplicationsVerify =
84 type Rs ApplicationsVerify =
85 ApplicationVerifyResponse
85 ApplicationVerifyResponse
86+ type Scopes ApplicationsVerify =
87+ '["https://www.googleapis.com/auth/games",
88+ "https://www.googleapis.com/auth/plus.login"]
86 requestClient ApplicationsVerify{..}
89 requestClient ApplicationsVerify{..}
87 = go _avApplicationId (Just AltJSON) gamesService
90 = go _avApplicationId (Just AltJSON) gamesService
88 where go
91 where go
gogol-genomics/gen/Network/Google/Genomics/Types.hs+12−11
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -562,27 +563,27 @@ import Network.Google.Genomics.Types.Sum
562import Network.Google.Prelude
563import Network.Google.Prelude
563
564
564-- | Default request referring to version 'v1' of the Genomics API. This contains the host and root path used as a starting point for constructing service requests.
565-- | Default request referring to version 'v1' of the Genomics API. This contains the host and root path used as a starting point for constructing service requests.
565−genomicsService :: ServiceConfig
566+genomicsService :: Service
566genomicsService
567genomicsService
567 = defaultService (ServiceId "genomics:v1")
568 = defaultService (ServiceId "genomics:v1")
568 "genomics.googleapis.com"
569 "genomics.googleapis.com"
569
570
570-- | View and manage Genomics data
571-- | View and manage Genomics data
571−authGenomicsScope :: OAuthScope
572−authGenomicsScope = "https://www.googleapis.com/auth/genomics";
572+authGenomicsScope :: Proxy '["https://www.googleapis.com/auth/genomics"]
573+authGenomicsScope = Proxy;
573
574
574-- | View and manage your data across Google Cloud Platform services
575-- | View and manage your data across Google Cloud Platform services
575−authCloudPlatformScope :: OAuthScope
576−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
576+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
577+authCloudPlatformScope = Proxy;
577
578
578-- | View Genomics data
579-- | View Genomics data
579−authGenomicsReadonlyScope :: OAuthScope
580−authGenomicsReadonlyScope = "https://www.googleapis.com/auth/genomics.readonly";
580+authGenomicsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/genomics.readonly"]
581+authGenomicsReadonlyScope = Proxy;
581
582
582-- | Manage your data in Google Cloud Storage
583-- | Manage your data in Google Cloud Storage
583−authDevstorageReadWriteScope :: OAuthScope
584−authDevstorageReadWriteScope = "https://www.googleapis.com/auth/devstorage.read_write";
584+authDevstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
585+authDevstorageReadWriteScope = Proxy;
585
586
586-- | View and manage your data in Google BigQuery
587-- | View and manage your data in Google BigQuery
587−authBigqueryScope :: OAuthScope
588−authBigqueryScope = "https://www.googleapis.com/auth/bigquery";
588+authBigqueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
589+authBigqueryScope = Proxy;
gogol-genomics/gen/Network/Google/Resource/Genomics/Reads/Stream.hs+3
@@ -156,6 +156,9 @@ rssCallback
156
156
157instance GoogleRequest ReadsStream where
157instance GoogleRequest ReadsStream where
158 type Rs ReadsStream = StreamReadsResponse
158 type Rs ReadsStream = StreamReadsResponse
159+ type Scopes ReadsStream =
160+ '["https://www.googleapis.com/auth/cloud-platform",
161+ "https://www.googleapis.com/auth/genomics"]
159 requestClient ReadsStream{..}
162 requestClient ReadsStream{..}
160 = go _rssXgafv _rssUploadProtocol (Just _rssPp)
163 = go _rssXgafv _rssUploadProtocol (Just _rssPp)
161 _rssAccessToken
164 _rssAccessToken
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Merge.hs+3
@@ -169,6 +169,9 @@ vmCallback
169
169
170instance GoogleRequest VariantsMerge where
170instance GoogleRequest VariantsMerge where
171 type Rs VariantsMerge = Empty
171 type Rs VariantsMerge = Empty
172+ type Scopes VariantsMerge =
173+ '["https://www.googleapis.com/auth/cloud-platform",
174+ "https://www.googleapis.com/auth/genomics"]
172 requestClient VariantsMerge{..}
175 requestClient VariantsMerge{..}
173 = go _vmXgafv _vmUploadProtocol (Just _vmPp)
176 = go _vmXgafv _vmUploadProtocol (Just _vmPp)
174 _vmAccessToken
177 _vmAccessToken
gogol-genomics/gen/Network/Google/Resource/Genomics/Variants/Stream.hs+3
@@ -152,6 +152,9 @@ vCallback
152
152
153instance GoogleRequest VariantsStream where
153instance GoogleRequest VariantsStream where
154 type Rs VariantsStream = StreamVariantsResponse
154 type Rs VariantsStream = StreamVariantsResponse
155+ type Scopes VariantsStream =
156+ '["https://www.googleapis.com/auth/cloud-platform",
157+ "https://www.googleapis.com/auth/genomics"]
155 requestClient VariantsStream{..}
158 requestClient VariantsStream{..}
156 = go _vXgafv _vUploadProtocol (Just _vPp)
159 = go _vXgafv _vUploadProtocol (Just _vPp)
157 _vAccessToken
160 _vAccessToken
gogol-gmail/gen/Network/Google/Gmail/Types.hs+16−15
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -226,35 +227,35 @@ import Network.Google.Gmail.Types.Sum
226import Network.Google.Prelude
227import Network.Google.Prelude
227
228
228-- | Default request referring to version 'v1' of the Gmail API. This contains the host and root path used as a starting point for constructing service requests.
229-- | Default request referring to version 'v1' of the Gmail API. This contains the host and root path used as a starting point for constructing service requests.
229−gmailService :: ServiceConfig
230+gmailService :: Service
230gmailService
231gmailService
231 = defaultService (ServiceId "gmail:v1")
232 = defaultService (ServiceId "gmail:v1")
232 "www.googleapis.com"
233 "www.googleapis.com"
233
234
234-- | View and manage your mail
235-- | View and manage your mail
235−mailGoogleComScope :: OAuthScope
236+mailGoogleComScope :: Proxy '["https://mail.google.com/"]
236−mailGoogleComScope = "https://mail.google.com/";
237+mailGoogleComScope = Proxy;
237
238
238-- | View and modify but not delete your email
239-- | View and modify but not delete your email
239−authGmailModifyScope :: OAuthScope
240−authGmailModifyScope = "https://www.googleapis.com/auth/gmail.modify";
240+authGmailModifyScope :: Proxy '["https://www.googleapis.com/auth/gmail.modify"]
241+authGmailModifyScope = Proxy;
241
242
242-- | Manage mailbox labels
243-- | Manage mailbox labels
243−authGmailLabelsScope :: OAuthScope
244−authGmailLabelsScope = "https://www.googleapis.com/auth/gmail.labels";
244+authGmailLabelsScope :: Proxy '["https://www.googleapis.com/auth/gmail.labels"]
245+authGmailLabelsScope = Proxy;
245
246
246-- | Send email on your behalf
247-- | Send email on your behalf
247−authGmailSendScope :: OAuthScope
248−authGmailSendScope = "https://www.googleapis.com/auth/gmail.send";
248+authGmailSendScope :: Proxy '["https://www.googleapis.com/auth/gmail.send"]
249+authGmailSendScope = Proxy;
249
250
250-- | Insert mail into your mailbox
251-- | Insert mail into your mailbox
251−authGmailInsertScope :: OAuthScope
252−authGmailInsertScope = "https://www.googleapis.com/auth/gmail.insert";
252+authGmailInsertScope :: Proxy '["https://www.googleapis.com/auth/gmail.insert"]
253+authGmailInsertScope = Proxy;
253
254
254-- | Manage drafts and send emails
255-- | Manage drafts and send emails
255−authGmailComposeScope :: OAuthScope
256−authGmailComposeScope = "https://www.googleapis.com/auth/gmail.compose";
256+authGmailComposeScope :: Proxy '["https://www.googleapis.com/auth/gmail.compose"]
257+authGmailComposeScope = Proxy;
257
258
258-- | View your emails messages and settings
259-- | View your emails messages and settings
259−authGmailReadonlyScope :: OAuthScope
260−authGmailReadonlyScope = "https://www.googleapis.com/auth/gmail.readonly";
260+authGmailReadonlyScope :: Proxy '["https://www.googleapis.com/auth/gmail.readonly"]
261+authGmailReadonlyScope = Proxy;
gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/BatchDelete.hs+2
@@ -92,6 +92,8 @@ umbdUserId
92
92
93instance GoogleRequest UsersMessagesBatchDelete where
93instance GoogleRequest UsersMessagesBatchDelete where
94 type Rs UsersMessagesBatchDelete = ()
94 type Rs UsersMessagesBatchDelete = ()
95+ type Scopes UsersMessagesBatchDelete =
96+ '["https://mail.google.com/"]
95 requestClient UsersMessagesBatchDelete{..}
97 requestClient UsersMessagesBatchDelete{..}
96 = go _umbdUserId (Just AltJSON) _umbdPayload
98 = go _umbdUserId (Just AltJSON) _umbdPayload
97 gmailService
99 gmailService
gogol-groups-migration/gen/Network/Google/GroupsMigration/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -33,11 +34,11 @@ import Network.Google.GroupsMigration.Types.Sum
33import Network.Google.Prelude
34import Network.Google.Prelude
34
35
35-- | Default request referring to version 'v1' of the Groups Migration API. This contains the host and root path used as a starting point for constructing service requests.
36-- | Default request referring to version 'v1' of the Groups Migration API. This contains the host and root path used as a starting point for constructing service requests.
36−groupsMigrationService :: ServiceConfig
37+groupsMigrationService :: Service
37groupsMigrationService
38groupsMigrationService
38 = defaultService (ServiceId "groupsmigration:v1")
39 = defaultService (ServiceId "groupsmigration:v1")
39 "www.googleapis.com"
40 "www.googleapis.com"
40
41
41-- | Manage messages in groups on your domain
42-- | Manage messages in groups on your domain
42−authAppsGroupsMigrationScope :: OAuthScope
43−authAppsGroupsMigrationScope = "https://www.googleapis.com/auth/apps.groups.migration";
43+authAppsGroupsMigrationScope :: Proxy '["https://www.googleapis.com/auth/apps.groups.migration"]
44+authAppsGroupsMigrationScope = Proxy;
gogol-groups-settings/gen/Network/Google/GroupsSettings/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -59,11 +60,11 @@ import Network.Google.GroupsSettings.Types.Sum
59import Network.Google.Prelude
60import Network.Google.Prelude
60
61
61-- | Default request referring to version 'v1' of the Groups Settings API. This contains the host and root path used as a starting point for constructing service requests.
62-- | Default request referring to version 'v1' of the Groups Settings API. This contains the host and root path used as a starting point for constructing service requests.
62−groupsSettingsService :: ServiceConfig
63+groupsSettingsService :: Service
63groupsSettingsService
64groupsSettingsService
64 = defaultService (ServiceId "groupssettings:v1")
65 = defaultService (ServiceId "groupssettings:v1")
65 "www.googleapis.com"
66 "www.googleapis.com"
66
67
67-- | View and manage the settings of a Google Apps Group
68-- | View and manage the settings of a Google Apps Group
68−authAppsGroupsSettingsScope :: OAuthScope
69−authAppsGroupsSettingsScope = "https://www.googleapis.com/auth/apps.groups.settings";
69+authAppsGroupsSettingsScope :: Proxy '["https://www.googleapis.com/auth/apps.groups.settings"]
70+authAppsGroupsSettingsScope = Proxy;
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+1−1
@@ -405,7 +405,7 @@ import Network.Google.IdentityToolkit.Types.Sum
405import Network.Google.Prelude
405import Network.Google.Prelude
406
406
407-- | Default request referring to version 'v3' of the Google Identity Toolkit API. This contains the host and root path used as a starting point for constructing service requests.
407-- | Default request referring to version 'v3' of the Google Identity Toolkit API. This contains the host and root path used as a starting point for constructing service requests.
408−identityToolkitService :: ServiceConfig
408+identityToolkitService :: Service
409identityToolkitService
409identityToolkitService
410 = defaultService (ServiceId "identitytoolkit:v3")
410 = defaultService (ServiceId "identitytoolkit:v3")
411 "www.googleapis.com"
411 "www.googleapis.com"
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/GetProjectConfig.hs+1
@@ -92,6 +92,7 @@ instance GoogleRequest RelyingPartyGetProjectConfig
92 where
92 where
93 type Rs RelyingPartyGetProjectConfig =
93 type Rs RelyingPartyGetProjectConfig =
94 IdentitytoolkitRelyingPartyGetProjectConfigResponse
94 IdentitytoolkitRelyingPartyGetProjectConfigResponse
95+ type Scopes RelyingPartyGetProjectConfig = '[]
95 requestClient RelyingPartyGetProjectConfig{..}
96 requestClient RelyingPartyGetProjectConfig{..}
96 = go _rpgpcDelegatedProjectNumber _rpgpcProjectNumber
97 = go _rpgpcDelegatedProjectNumber _rpgpcProjectNumber
97 (Just AltJSON)
98 (Just AltJSON)
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SetProjectConfig.hs+1
@@ -82,6 +82,7 @@ instance GoogleRequest RelyingPartySetProjectConfig
82 where
82 where
83 type Rs RelyingPartySetProjectConfig =
83 type Rs RelyingPartySetProjectConfig =
84 IdentitytoolkitRelyingPartySetProjectConfigResponse
84 IdentitytoolkitRelyingPartySetProjectConfigResponse
85+ type Scopes RelyingPartySetProjectConfig = '[]
85 requestClient RelyingPartySetProjectConfig{..}
86 requestClient RelyingPartySetProjectConfig{..}
86 = go (Just AltJSON) _rpspcPayload
87 = go (Just AltJSON) _rpspcPayload
87 identityToolkitService
88 identityToolkitService
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SignOutUser.hs+1
@@ -81,6 +81,7 @@ rpsouPayload
81instance GoogleRequest RelyingPartySignOutUser where
81instance GoogleRequest RelyingPartySignOutUser where
82 type Rs RelyingPartySignOutUser =
82 type Rs RelyingPartySignOutUser =
83 IdentitytoolkitRelyingPartySignOutUserResponse
83 IdentitytoolkitRelyingPartySignOutUserResponse
84+ type Scopes RelyingPartySignOutUser = '[]
84 requestClient RelyingPartySignOutUser{..}
85 requestClient RelyingPartySignOutUser{..}
85 = go (Just AltJSON) _rpsouPayload
86 = go (Just AltJSON) _rpsouPayload
86 identityToolkitService
87 identityToolkitService
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/SignupNewUser.hs+1
@@ -80,6 +80,7 @@ instance GoogleRequest RelyingPartySignupNewUser
80 where
80 where
81 type Rs RelyingPartySignupNewUser =
81 type Rs RelyingPartySignupNewUser =
82 SignupNewUserResponse
82 SignupNewUserResponse
83+ type Scopes RelyingPartySignupNewUser = '[]
83 requestClient RelyingPartySignupNewUser{..}
84 requestClient RelyingPartySignupNewUser{..}
84 = go (Just AltJSON) _rpsnuPayload
85 = go (Just AltJSON) _rpsnuPayload
85 identityToolkitService
86 identityToolkitService
gogol-identity-toolkit/gen/Network/Google/Resource/IdentityToolkit/RelyingParty/VerifyCustomToken.hs+1
@@ -80,6 +80,7 @@ instance GoogleRequest RelyingPartyVerifyCustomToken
80 where
80 where
81 type Rs RelyingPartyVerifyCustomToken =
81 type Rs RelyingPartyVerifyCustomToken =
82 VerifyCustomTokenResponse
82 VerifyCustomTokenResponse
83+ type Scopes RelyingPartyVerifyCustomToken = '[]
83 requestClient RelyingPartyVerifyCustomToken{..}
84 requestClient RelyingPartyVerifyCustomToken{..}
84 = go (Just AltJSON) _rpvctPayload
85 = go (Just AltJSON) _rpvctPayload
85 identityToolkitService
86 identityToolkitService
gogol-kgsearch/gen/Network/Google/KnowledgeGraphSearch/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -155,11 +156,11 @@ import Network.Google.KnowledgeGraphSearch.Types.Sum
155import Network.Google.Prelude
156import Network.Google.Prelude
156
157
157-- | Default request referring to version 'v1' of the Google Identity and Access Management API. This contains the host and root path used as a starting point for constructing service requests.
158-- | Default request referring to version 'v1' of the Google Identity and Access Management API. This contains the host and root path used as a starting point for constructing service requests.
158−knowledgeGraphSearchService :: ServiceConfig
159+knowledgeGraphSearchService :: Service
159knowledgeGraphSearchService
160knowledgeGraphSearchService
160 = defaultService (ServiceId "iam:v1")
161 = defaultService (ServiceId "iam:v1")
161 "iam.googleapis.com"
162 "iam.googleapis.com"
162
163
163-- | View and manage your data across Google Cloud Platform services
164-- | View and manage your data across Google Cloud Platform services
164−authCloudPlatformScope :: OAuthScope
165−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
165+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
166+authCloudPlatformScope = Proxy;
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Create.hs+2
@@ -169,6 +169,8 @@ instance GoogleRequest ProjectsServiceAccountsCreate
169 where
169 where
170 type Rs ProjectsServiceAccountsCreate =
170 type Rs ProjectsServiceAccountsCreate =
171 ServiceAccount
171 ServiceAccount
172+ type Scopes ProjectsServiceAccountsCreate =
173+ '["https://www.googleapis.com/auth/cloud-platform"]
172 requestClient ProjectsServiceAccountsCreate{..}
174 requestClient ProjectsServiceAccountsCreate{..}
173 = go _psacName _psacXgafv _psacUploadProtocol
175 = go _psacName _psacXgafv _psacUploadProtocol
174 (Just _psacPp)
176 (Just _psacPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Delete.hs+2
@@ -157,6 +157,8 @@ psadCallback
157instance GoogleRequest ProjectsServiceAccountsDelete
157instance GoogleRequest ProjectsServiceAccountsDelete
158 where
158 where
159 type Rs ProjectsServiceAccountsDelete = Empty
159 type Rs ProjectsServiceAccountsDelete = Empty
160+ type Scopes ProjectsServiceAccountsDelete =
161+ '["https://www.googleapis.com/auth/cloud-platform"]
160 requestClient ProjectsServiceAccountsDelete{..}
162 requestClient ProjectsServiceAccountsDelete{..}
161 = go _psadName _psadXgafv _psadUploadProtocol
163 = go _psadName _psadXgafv _psadUploadProtocol
162 (Just _psadPp)
164 (Just _psadPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Get.hs+2
@@ -158,6 +158,8 @@ psagCallback
158instance GoogleRequest ProjectsServiceAccountsGet
158instance GoogleRequest ProjectsServiceAccountsGet
159 where
159 where
160 type Rs ProjectsServiceAccountsGet = ServiceAccount
160 type Rs ProjectsServiceAccountsGet = ServiceAccount
161+ type Scopes ProjectsServiceAccountsGet =
162+ '["https://www.googleapis.com/auth/cloud-platform"]
161 requestClient ProjectsServiceAccountsGet{..}
163 requestClient ProjectsServiceAccountsGet{..}
162 = go _psagName _psagXgafv _psagUploadProtocol
164 = go _psagName _psagXgafv _psagUploadProtocol
163 (Just _psagPp)
165 (Just _psagPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/GetIAMPolicy.hs+2
@@ -160,6 +160,8 @@ psagipCallback
160instance GoogleRequest
160instance GoogleRequest
161 ProjectsServiceAccountsGetIAMPolicy where
161 ProjectsServiceAccountsGetIAMPolicy where
162 type Rs ProjectsServiceAccountsGetIAMPolicy = Policy
162 type Rs ProjectsServiceAccountsGetIAMPolicy = Policy
163+ type Scopes ProjectsServiceAccountsGetIAMPolicy =
164+ '["https://www.googleapis.com/auth/cloud-platform"]
163 requestClient ProjectsServiceAccountsGetIAMPolicy{..}
165 requestClient ProjectsServiceAccountsGetIAMPolicy{..}
164 = go _psagipResource _psagipXgafv
166 = go _psagipResource _psagipXgafv
165 _psagipUploadProtocol
167 _psagipUploadProtocol
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Create.hs+2
@@ -174,6 +174,8 @@ instance GoogleRequest
174 ProjectsServiceAccountsKeysCreate where
174 ProjectsServiceAccountsKeysCreate where
175 type Rs ProjectsServiceAccountsKeysCreate =
175 type Rs ProjectsServiceAccountsKeysCreate =
176 ServiceAccountKey
176 ServiceAccountKey
177+ type Scopes ProjectsServiceAccountsKeysCreate =
178+ '["https://www.googleapis.com/auth/cloud-platform"]
177 requestClient ProjectsServiceAccountsKeysCreate{..}
179 requestClient ProjectsServiceAccountsKeysCreate{..}
178 = go _psakcName _psakcXgafv _psakcUploadProtocol
180 = go _psakcName _psakcXgafv _psakcUploadProtocol
179 (Just _psakcPp)
181 (Just _psakcPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Delete.hs+2
@@ -159,6 +159,8 @@ psakdCallback
159instance GoogleRequest
159instance GoogleRequest
160 ProjectsServiceAccountsKeysDelete where
160 ProjectsServiceAccountsKeysDelete where
161 type Rs ProjectsServiceAccountsKeysDelete = Empty
161 type Rs ProjectsServiceAccountsKeysDelete = Empty
162+ type Scopes ProjectsServiceAccountsKeysDelete =
163+ '["https://www.googleapis.com/auth/cloud-platform"]
162 requestClient ProjectsServiceAccountsKeysDelete{..}
164 requestClient ProjectsServiceAccountsKeysDelete{..}
163 = go _psakdName _psakdXgafv _psakdUploadProtocol
165 = go _psakdName _psakdXgafv _psakdUploadProtocol
164 (Just _psakdPp)
166 (Just _psakdPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/Get.hs+2
@@ -161,6 +161,8 @@ instance GoogleRequest ProjectsServiceAccountsKeysGet
161 where
161 where
162 type Rs ProjectsServiceAccountsKeysGet =
162 type Rs ProjectsServiceAccountsKeysGet =
163 ServiceAccountKey
163 ServiceAccountKey
164+ type Scopes ProjectsServiceAccountsKeysGet =
165+ '["https://www.googleapis.com/auth/cloud-platform"]
164 requestClient ProjectsServiceAccountsKeysGet{..}
166 requestClient ProjectsServiceAccountsKeysGet{..}
165 = go _psakgName _psakgXgafv _psakgUploadProtocol
167 = go _psakgName _psakgXgafv _psakgUploadProtocol
166 (Just _psakgPp)
168 (Just _psakgPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Keys/List.hs+2
@@ -177,6 +177,8 @@ instance GoogleRequest
177 ProjectsServiceAccountsKeysList where
177 ProjectsServiceAccountsKeysList where
178 type Rs ProjectsServiceAccountsKeysList =
178 type Rs ProjectsServiceAccountsKeysList =
179 ListServiceAccountKeysResponse
179 ListServiceAccountKeysResponse
180+ type Scopes ProjectsServiceAccountsKeysList =
181+ '["https://www.googleapis.com/auth/cloud-platform"]
180 requestClient ProjectsServiceAccountsKeysList{..}
182 requestClient ProjectsServiceAccountsKeysList{..}
181 = go _psaklName (_psaklKeyTypes ^. _Default)
183 = go _psaklName (_psaklKeyTypes ^. _Default)
182 _psaklXgafv
184 _psaklXgafv
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/List.hs+2
@@ -184,6 +184,8 @@ instance GoogleRequest ProjectsServiceAccountsList
184 where
184 where
185 type Rs ProjectsServiceAccountsList =
185 type Rs ProjectsServiceAccountsList =
186 ListServiceAccountsResponse
186 ListServiceAccountsResponse
187+ type Scopes ProjectsServiceAccountsList =
188+ '["https://www.googleapis.com/auth/cloud-platform"]
187 requestClient ProjectsServiceAccountsList{..}
189 requestClient ProjectsServiceAccountsList{..}
188 = go _psalName _psalXgafv _psalUploadProtocol
190 = go _psalName _psalXgafv _psalUploadProtocol
189 (Just _psalPp)
191 (Just _psalPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SetIAMPolicy.hs+2
@@ -174,6 +174,8 @@ psasipCallback
174instance GoogleRequest
174instance GoogleRequest
175 ProjectsServiceAccountsSetIAMPolicy where
175 ProjectsServiceAccountsSetIAMPolicy where
176 type Rs ProjectsServiceAccountsSetIAMPolicy = Policy
176 type Rs ProjectsServiceAccountsSetIAMPolicy = Policy
177+ type Scopes ProjectsServiceAccountsSetIAMPolicy =
178+ '["https://www.googleapis.com/auth/cloud-platform"]
177 requestClient ProjectsServiceAccountsSetIAMPolicy{..}
179 requestClient ProjectsServiceAccountsSetIAMPolicy{..}
178 = go _psasipResource _psasipXgafv
180 = go _psasipResource _psasipXgafv
179 _psasipUploadProtocol
181 _psasipUploadProtocol
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SignBlob.hs+2
@@ -173,6 +173,8 @@ instance GoogleRequest
173 ProjectsServiceAccountsSignBlob where
173 ProjectsServiceAccountsSignBlob where
174 type Rs ProjectsServiceAccountsSignBlob =
174 type Rs ProjectsServiceAccountsSignBlob =
175 SignBlobResponse
175 SignBlobResponse
176+ type Scopes ProjectsServiceAccountsSignBlob =
177+ '["https://www.googleapis.com/auth/cloud-platform"]
176 requestClient ProjectsServiceAccountsSignBlob{..}
178 requestClient ProjectsServiceAccountsSignBlob{..}
177 = go _psasbName _psasbXgafv _psasbUploadProtocol
179 = go _psasbName _psasbXgafv _psasbUploadProtocol
178 (Just _psasbPp)
180 (Just _psasbPp)
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/TestIAMPermissions.hs+2
@@ -178,6 +178,8 @@ instance GoogleRequest
178 ProjectsServiceAccountsTestIAMPermissions where
178 ProjectsServiceAccountsTestIAMPermissions where
179 type Rs ProjectsServiceAccountsTestIAMPermissions =
179 type Rs ProjectsServiceAccountsTestIAMPermissions =
180 TestIAMPermissionsResponse
180 TestIAMPermissionsResponse
181+ type Scopes ProjectsServiceAccountsTestIAMPermissions
182+ = '["https://www.googleapis.com/auth/cloud-platform"]
181 requestClient
183 requestClient
182 ProjectsServiceAccountsTestIAMPermissions{..}
184 ProjectsServiceAccountsTestIAMPermissions{..}
183 = go _psatipResource _psatipXgafv
185 = go _psatipResource _psatipXgafv
gogol-kgsearch/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Update.hs+2
@@ -174,6 +174,8 @@ instance GoogleRequest ProjectsServiceAccountsUpdate
174 where
174 where
175 type Rs ProjectsServiceAccountsUpdate =
175 type Rs ProjectsServiceAccountsUpdate =
176 ServiceAccount
176 ServiceAccount
177+ type Scopes ProjectsServiceAccountsUpdate =
178+ '["https://www.googleapis.com/auth/cloud-platform"]
177 requestClient ProjectsServiceAccountsUpdate{..}
179 requestClient ProjectsServiceAccountsUpdate{..}
178 = go _psauName _psauXgafv _psauUploadProtocol
180 = go _psauName _psauXgafv _psauUploadProtocol
179 (Just _psauPp)
181 (Just _psauPp)
gogol-latencytest/gen/Network/Google/LatencyTest/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -68,11 +69,11 @@ import Network.Google.LatencyTest.Types.Sum
68import Network.Google.Prelude
69import Network.Google.Prelude
69
70
70-- | Default request referring to version 'v2' of the Google Cloud Network Performance Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
71-- | Default request referring to version 'v2' of the Google Cloud Network Performance Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
71−latencyTestService :: ServiceConfig
72+latencyTestService :: Service
72latencyTestService
73latencyTestService
73 = defaultService (ServiceId "cloudlatencytest:v2")
74 = defaultService (ServiceId "cloudlatencytest:v2")
74 "cloudlatencytest-pa.googleapis.com"
75 "cloudlatencytest-pa.googleapis.com"
75
76
76-- | View monitoring data for all of your Google Cloud and API projects
77-- | View monitoring data for all of your Google Cloud and API projects
77−authMonitoringReadonlyScope :: OAuthScope
78−authMonitoringReadonlyScope = "https://www.googleapis.com/auth/monitoring.readonly";
78+authMonitoringReadonlyScope :: Proxy '["https://www.googleapis.com/auth/monitoring.readonly"]
79+authMonitoringReadonlyScope = Proxy;
gogol-logging/gen/Network/Google/Logging/Types.hs+11−11
@@ -235,27 +235,27 @@ import Network.Google.Logging.Types.Sum
235import Network.Google.Prelude
235import Network.Google.Prelude
236
236
237-- | Default request referring to version 'v2beta1' of the Google Cloud Logging API. This contains the host and root path used as a starting point for constructing service requests.
237-- | Default request referring to version 'v2beta1' of the Google Cloud Logging API. This contains the host and root path used as a starting point for constructing service requests.
238−loggingService :: ServiceConfig
238+loggingService :: Service
239loggingService
239loggingService
240 = defaultService (ServiceId "logging:v2beta1")
240 = defaultService (ServiceId "logging:v2beta1")
241 "logging.googleapis.com"
241 "logging.googleapis.com"
242
242
243-- | Administrate log data for your projects
243-- | Administrate log data for your projects
244−authLoggingAdminScope :: OAuthScope
245−authLoggingAdminScope = "https://www.googleapis.com/auth/logging.admin";
244+authLoggingAdminScope :: Proxy '["https://www.googleapis.com/auth/logging.admin"]
245+authLoggingAdminScope = Proxy;
246
246
247-- | View log data for your projects
247-- | View log data for your projects
248−authLoggingReadScope :: OAuthScope
249−authLoggingReadScope = "https://www.googleapis.com/auth/logging.read";
248+authLoggingReadScope :: Proxy '["https://www.googleapis.com/auth/logging.read"]
249+authLoggingReadScope = Proxy;
250
250
251-- | Submit log data for your projects
251-- | Submit log data for your projects
252−authLoggingWriteScope :: OAuthScope
253−authLoggingWriteScope = "https://www.googleapis.com/auth/logging.write";
252+authLoggingWriteScope :: Proxy '["https://www.googleapis.com/auth/logging.write"]
253+authLoggingWriteScope = Proxy;
254
254
255-- | View your data across Google Cloud Platform services
255-- | View your data across Google Cloud Platform services
256−authCloudPlatformReadOnlyScope :: OAuthScope
257−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
256+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
257+authCloudPlatformReadOnlyScope = Proxy;
258
258
259-- | View and manage your data across Google Cloud Platform services
259-- | View and manage your data across Google Cloud Platform services
260−authCloudPlatformScope :: OAuthScope
261−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
260+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
261+authCloudPlatformScope = Proxy;
gogol-logging/gen/Network/Google/Resource/Logging/Entries/List.hs+5
@@ -157,6 +157,11 @@ elCallback
157
157
158instance GoogleRequest EntriesList where
158instance GoogleRequest EntriesList where
159 type Rs EntriesList = ListLogEntriesResponse
159 type Rs EntriesList = ListLogEntriesResponse
160+ type Scopes EntriesList =
161+ '["https://www.googleapis.com/auth/cloud-platform",
162+ "https://www.googleapis.com/auth/cloud-platform.read-only",
163+ "https://www.googleapis.com/auth/logging.admin",
164+ "https://www.googleapis.com/auth/logging.read"]
160 requestClient EntriesList{..}
165 requestClient EntriesList{..}
161 = go _elXgafv _elUploadProtocol (Just _elPp)
166 = go _elXgafv _elUploadProtocol (Just _elPp)
162 _elAccessToken
167 _elAccessToken
gogol-logging/gen/Network/Google/Resource/Logging/Entries/Write.hs+4
@@ -155,6 +155,10 @@ ewCallback
155
155
156instance GoogleRequest EntriesWrite where
156instance GoogleRequest EntriesWrite where
157 type Rs EntriesWrite = WriteLogEntriesResponse
157 type Rs EntriesWrite = WriteLogEntriesResponse
158+ type Scopes EntriesWrite =
159+ '["https://www.googleapis.com/auth/cloud-platform",
160+ "https://www.googleapis.com/auth/logging.admin",
161+ "https://www.googleapis.com/auth/logging.write"]
158 requestClient EntriesWrite{..}
162 requestClient EntriesWrite{..}
159 = go _ewXgafv _ewUploadProtocol (Just _ewPp)
163 = go _ewXgafv _ewUploadProtocol (Just _ewPp)
160 _ewAccessToken
164 _ewAccessToken
gogol-logging/gen/Network/Google/Resource/Logging/MonitoredResourceDescriptors/List.hs+5
@@ -177,6 +177,11 @@ instance GoogleRequest
177 MonitoredResourceDescriptorsList where
177 MonitoredResourceDescriptorsList where
178 type Rs MonitoredResourceDescriptorsList =
178 type Rs MonitoredResourceDescriptorsList =
179 ListMonitoredResourceDescriptorsResponse
179 ListMonitoredResourceDescriptorsResponse
180+ type Scopes MonitoredResourceDescriptorsList =
181+ '["https://www.googleapis.com/auth/cloud-platform",
182+ "https://www.googleapis.com/auth/cloud-platform.read-only",
183+ "https://www.googleapis.com/auth/logging.admin",
184+ "https://www.googleapis.com/auth/logging.read"]
180 requestClient MonitoredResourceDescriptorsList{..}
185 requestClient MonitoredResourceDescriptorsList{..}
181 = go _mrdlXgafv _mrdlUploadProtocol (Just _mrdlPp)
186 = go _mrdlXgafv _mrdlUploadProtocol (Just _mrdlPp)
182 _mrdlAccessToken
187 _mrdlAccessToken
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Logs/Delete.hs+3
@@ -155,6 +155,9 @@ pldCallback
155
155
156instance GoogleRequest ProjectsLogsDelete where
156instance GoogleRequest ProjectsLogsDelete where
157 type Rs ProjectsLogsDelete = Empty
157 type Rs ProjectsLogsDelete = Empty
158+ type Scopes ProjectsLogsDelete =
159+ '["https://www.googleapis.com/auth/cloud-platform",
160+ "https://www.googleapis.com/auth/logging.admin"]
158 requestClient ProjectsLogsDelete{..}
161 requestClient ProjectsLogsDelete{..}
159 = go _pldLogName _pldXgafv _pldUploadProtocol
162 = go _pldLogName _pldXgafv _pldUploadProtocol
160 (Just _pldPp)
163 (Just _pldPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Create.hs+4
@@ -168,6 +168,10 @@ pmcCallback
168
168
169instance GoogleRequest ProjectsMetricsCreate where
169instance GoogleRequest ProjectsMetricsCreate where
170 type Rs ProjectsMetricsCreate = LogMetric
170 type Rs ProjectsMetricsCreate = LogMetric
171+ type Scopes ProjectsMetricsCreate =
172+ '["https://www.googleapis.com/auth/cloud-platform",
173+ "https://www.googleapis.com/auth/logging.admin",
174+ "https://www.googleapis.com/auth/logging.write"]
171 requestClient ProjectsMetricsCreate{..}
175 requestClient ProjectsMetricsCreate{..}
172 = go _pmcProjectName _pmcXgafv _pmcUploadProtocol
176 = go _pmcProjectName _pmcXgafv _pmcUploadProtocol
173 (Just _pmcPp)
177 (Just _pmcPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Delete.hs+4
@@ -154,6 +154,10 @@ pmdCallback
154
154
155instance GoogleRequest ProjectsMetricsDelete where
155instance GoogleRequest ProjectsMetricsDelete where
156 type Rs ProjectsMetricsDelete = Empty
156 type Rs ProjectsMetricsDelete = Empty
157+ type Scopes ProjectsMetricsDelete =
158+ '["https://www.googleapis.com/auth/cloud-platform",
159+ "https://www.googleapis.com/auth/logging.admin",
160+ "https://www.googleapis.com/auth/logging.write"]
157 requestClient ProjectsMetricsDelete{..}
161 requestClient ProjectsMetricsDelete{..}
158 = go _pmdMetricName _pmdXgafv _pmdUploadProtocol
162 = go _pmdMetricName _pmdXgafv _pmdUploadProtocol
159 (Just _pmdPp)
163 (Just _pmdPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Get.hs+5
@@ -154,6 +154,11 @@ pmgCallback
154
154
155instance GoogleRequest ProjectsMetricsGet where
155instance GoogleRequest ProjectsMetricsGet where
156 type Rs ProjectsMetricsGet = LogMetric
156 type Rs ProjectsMetricsGet = LogMetric
157+ type Scopes ProjectsMetricsGet =
158+ '["https://www.googleapis.com/auth/cloud-platform",
159+ "https://www.googleapis.com/auth/cloud-platform.read-only",
160+ "https://www.googleapis.com/auth/logging.admin",
161+ "https://www.googleapis.com/auth/logging.read"]
157 requestClient ProjectsMetricsGet{..}
162 requestClient ProjectsMetricsGet{..}
158 = go _pmgMetricName _pmgXgafv _pmgUploadProtocol
163 = go _pmgMetricName _pmgXgafv _pmgUploadProtocol
159 (Just _pmgPp)
164 (Just _pmgPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/List.hs+5
@@ -187,6 +187,11 @@ pmlCallback
187
187
188instance GoogleRequest ProjectsMetricsList where
188instance GoogleRequest ProjectsMetricsList where
189 type Rs ProjectsMetricsList = ListLogMetricsResponse
189 type Rs ProjectsMetricsList = ListLogMetricsResponse
190+ type Scopes ProjectsMetricsList =
191+ '["https://www.googleapis.com/auth/cloud-platform",
192+ "https://www.googleapis.com/auth/cloud-platform.read-only",
193+ "https://www.googleapis.com/auth/logging.admin",
194+ "https://www.googleapis.com/auth/logging.read"]
190 requestClient ProjectsMetricsList{..}
195 requestClient ProjectsMetricsList{..}
191 = go _pmlProjectName _pmlXgafv _pmlUploadProtocol
196 = go _pmlProjectName _pmlXgafv _pmlUploadProtocol
192 (Just _pmlPp)
197 (Just _pmlPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Metrics/Update.hs+4
@@ -169,6 +169,10 @@ pmuCallback
169
169
170instance GoogleRequest ProjectsMetricsUpdate where
170instance GoogleRequest ProjectsMetricsUpdate where
171 type Rs ProjectsMetricsUpdate = LogMetric
171 type Rs ProjectsMetricsUpdate = LogMetric
172+ type Scopes ProjectsMetricsUpdate =
173+ '["https://www.googleapis.com/auth/cloud-platform",
174+ "https://www.googleapis.com/auth/logging.admin",
175+ "https://www.googleapis.com/auth/logging.write"]
172 requestClient ProjectsMetricsUpdate{..}
176 requestClient ProjectsMetricsUpdate{..}
173 = go _pmuMetricName _pmuXgafv _pmuUploadProtocol
177 = go _pmuMetricName _pmuXgafv _pmuUploadProtocol
174 (Just _pmuPp)
178 (Just _pmuPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Create.hs+3
@@ -168,6 +168,9 @@ pscCallback
168
168
169instance GoogleRequest ProjectsSinksCreate where
169instance GoogleRequest ProjectsSinksCreate where
170 type Rs ProjectsSinksCreate = LogSink
170 type Rs ProjectsSinksCreate = LogSink
171+ type Scopes ProjectsSinksCreate =
172+ '["https://www.googleapis.com/auth/cloud-platform",
173+ "https://www.googleapis.com/auth/logging.admin"]
171 requestClient ProjectsSinksCreate{..}
174 requestClient ProjectsSinksCreate{..}
172 = go _pscProjectName _pscXgafv _pscUploadProtocol
175 = go _pscProjectName _pscXgafv _pscUploadProtocol
173 (Just _pscPp)
176 (Just _pscPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Delete.hs+3
@@ -153,6 +153,9 @@ psdCallback
153
153
154instance GoogleRequest ProjectsSinksDelete where
154instance GoogleRequest ProjectsSinksDelete where
155 type Rs ProjectsSinksDelete = Empty
155 type Rs ProjectsSinksDelete = Empty
156+ type Scopes ProjectsSinksDelete =
157+ '["https://www.googleapis.com/auth/cloud-platform",
158+ "https://www.googleapis.com/auth/logging.admin"]
156 requestClient ProjectsSinksDelete{..}
159 requestClient ProjectsSinksDelete{..}
157 = go _psdSinkName _psdXgafv _psdUploadProtocol
160 = go _psdSinkName _psdXgafv _psdUploadProtocol
158 (Just _psdPp)
161 (Just _psdPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Get.hs+5
@@ -153,6 +153,11 @@ psgCallback
153
153
154instance GoogleRequest ProjectsSinksGet where
154instance GoogleRequest ProjectsSinksGet where
155 type Rs ProjectsSinksGet = LogSink
155 type Rs ProjectsSinksGet = LogSink
156+ type Scopes ProjectsSinksGet =
157+ '["https://www.googleapis.com/auth/cloud-platform",
158+ "https://www.googleapis.com/auth/cloud-platform.read-only",
159+ "https://www.googleapis.com/auth/logging.admin",
160+ "https://www.googleapis.com/auth/logging.read"]
156 requestClient ProjectsSinksGet{..}
161 requestClient ProjectsSinksGet{..}
157 = go _psgSinkName _psgXgafv _psgUploadProtocol
162 = go _psgSinkName _psgXgafv _psgUploadProtocol
158 (Just _psgPp)
163 (Just _psgPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/List.hs+5
@@ -188,6 +188,11 @@ pslCallback
188
188
189instance GoogleRequest ProjectsSinksList where
189instance GoogleRequest ProjectsSinksList where
190 type Rs ProjectsSinksList = ListSinksResponse
190 type Rs ProjectsSinksList = ListSinksResponse
191+ type Scopes ProjectsSinksList =
192+ '["https://www.googleapis.com/auth/cloud-platform",
193+ "https://www.googleapis.com/auth/cloud-platform.read-only",
194+ "https://www.googleapis.com/auth/logging.admin",
195+ "https://www.googleapis.com/auth/logging.read"]
191 requestClient ProjectsSinksList{..}
196 requestClient ProjectsSinksList{..}
192 = go _pslProjectName _pslXgafv _pslUploadProtocol
197 = go _pslProjectName _pslXgafv _pslUploadProtocol
193 (Just _pslPp)
198 (Just _pslPp)
gogol-logging/gen/Network/Google/Resource/Logging/Projects/Sinks/Update.hs+3
@@ -167,6 +167,9 @@ psuCallback
167
167
168instance GoogleRequest ProjectsSinksUpdate where
168instance GoogleRequest ProjectsSinksUpdate where
169 type Rs ProjectsSinksUpdate = LogSink
169 type Rs ProjectsSinksUpdate = LogSink
170+ type Scopes ProjectsSinksUpdate =
171+ '["https://www.googleapis.com/auth/cloud-platform",
172+ "https://www.googleapis.com/auth/logging.admin"]
170 requestClient ProjectsSinksUpdate{..}
173 requestClient ProjectsSinksUpdate{..}
171 = go _psuSinkName _psuXgafv _psuUploadProtocol
174 = go _psuSinkName _psuXgafv _psuUploadProtocol
172 (Just _psuPp)
175 (Just _psuPp)
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -172,15 +173,15 @@ import Network.Google.MapsCoordinate.Types.Sum
172import Network.Google.Prelude
173import Network.Google.Prelude
173
174
174-- | Default request referring to version 'v1' of the Google Maps Coordinate API. This contains the host and root path used as a starting point for constructing service requests.
175-- | Default request referring to version 'v1' of the Google Maps Coordinate API. This contains the host and root path used as a starting point for constructing service requests.
175−mapsCoordinateService :: ServiceConfig
176+mapsCoordinateService :: Service
176mapsCoordinateService
177mapsCoordinateService
177 = defaultService (ServiceId "coordinate:v1")
178 = defaultService (ServiceId "coordinate:v1")
178 "www.googleapis.com"
179 "www.googleapis.com"
179
180
180-- | View and manage your Google Maps Coordinate jobs
181-- | View and manage your Google Maps Coordinate jobs
181−authCoordinateScope :: OAuthScope
182−authCoordinateScope = "https://www.googleapis.com/auth/coordinate";
182+authCoordinateScope :: Proxy '["https://www.googleapis.com/auth/coordinate"]
183+authCoordinateScope = Proxy;
183
184
184-- | View your Google Coordinate jobs
185-- | View your Google Coordinate jobs
185−authCoordinateReadonlyScope :: OAuthScope
186−authCoordinateReadonlyScope = "https://www.googleapis.com/auth/coordinate.readonly";
186+authCoordinateReadonlyScope :: Proxy '["https://www.googleapis.com/auth/coordinate.readonly"]
187+authCoordinateReadonlyScope = Proxy;
gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -763,15 +764,15 @@ import Network.Google.MapsEngine.Types.Sum
763import Network.Google.Prelude
764import Network.Google.Prelude
764
765
765-- | Default request referring to version 'v1' of the Google Maps Engine API. This contains the host and root path used as a starting point for constructing service requests.
766-- | Default request referring to version 'v1' of the Google Maps Engine API. This contains the host and root path used as a starting point for constructing service requests.
766−mapsEngineService :: ServiceConfig
767+mapsEngineService :: Service
767mapsEngineService
768mapsEngineService
768 = defaultService (ServiceId "mapsengine:v1")
769 = defaultService (ServiceId "mapsengine:v1")
769 "www.googleapis.com"
770 "www.googleapis.com"
770
771
771-- | View and manage your Google My Maps data
772-- | View and manage your Google My Maps data
772−authMapsengineScope :: OAuthScope
773−authMapsengineScope = "https://www.googleapis.com/auth/mapsengine";
773+authMapsengineScope :: Proxy '["https://www.googleapis.com/auth/mapsengine"]
774+authMapsengineScope = Proxy;
774
775
775-- | View your Google My Maps data
776-- | View your Google My Maps data
776−authMapsengineReadonlyScope :: OAuthScope
777−authMapsengineReadonlyScope = "https://www.googleapis.com/auth/mapsengine.readonly";
777+authMapsengineReadonlyScope :: Proxy '["https://www.googleapis.com/auth/mapsengine.readonly"]
778+authMapsengineReadonlyScope = Proxy;
gogol-mirror/gen/Network/Google/Mirror/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -212,15 +213,15 @@ import Network.Google.Mirror.Types.Sum
212import Network.Google.Prelude
213import Network.Google.Prelude
213
214
214-- | Default request referring to version 'v1' of the Google Mirror API. This contains the host and root path used as a starting point for constructing service requests.
215-- | Default request referring to version 'v1' of the Google Mirror API. This contains the host and root path used as a starting point for constructing service requests.
215−mirrorService :: ServiceConfig
216+mirrorService :: Service
216mirrorService
217mirrorService
217 = defaultService (ServiceId "mirror:v1")
218 = defaultService (ServiceId "mirror:v1")
218 "www.googleapis.com"
219 "www.googleapis.com"
219
220
220-- | View and manage your Glass timeline
221-- | View and manage your Glass timeline
221−authGlassTimelineScope :: OAuthScope
222−authGlassTimelineScope = "https://www.googleapis.com/auth/glass.timeline";
222+authGlassTimelineScope :: Proxy '["https://www.googleapis.com/auth/glass.timeline"]
223+authGlassTimelineScope = Proxy;
223
224
224-- | View your location
225-- | View your location
225−authGlassLocationScope :: OAuthScope
226−authGlassLocationScope = "https://www.googleapis.com/auth/glass.location";
226+authGlassLocationScope :: Proxy '["https://www.googleapis.com/auth/glass.location"]
227+authGlassLocationScope = Proxy;
gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -272,25 +273,25 @@ import Network.Google.Monitoring.Types.Sum
272import Network.Google.Prelude
273import Network.Google.Prelude
273
274
274-- | Default request referring to version 'v3' of the Google Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
275-- | Default request referring to version 'v3' of the Google Monitoring API. This contains the host and root path used as a starting point for constructing service requests.
275−monitoringService :: ServiceConfig
276+monitoringService :: Service
276monitoringService
277monitoringService
277 = defaultService (ServiceId "monitoring:v3")
278 = defaultService (ServiceId "monitoring:v3")
278 "monitoring.googleapis.com"
279 "monitoring.googleapis.com"
279
280
280-- | View monitoring data for all of your Google Cloud and third-party
281-- | View monitoring data for all of your Google Cloud and third-party
281-- projects
282-- projects
282−authMonitoringReadScope :: OAuthScope
283−authMonitoringReadScope = "https://www.googleapis.com/auth/monitoring.read";
283+authMonitoringReadScope :: Proxy '["https://www.googleapis.com/auth/monitoring.read"]
284+authMonitoringReadScope = Proxy;
284
285
285-- | View and manage your data across Google Cloud Platform services
286-- | View and manage your data across Google Cloud Platform services
286−authCloudPlatformScope :: OAuthScope
287−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
287+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
288+authCloudPlatformScope = Proxy;
288
289
289-- | View and write monitoring data for all of your Google and third-party
290-- | View and write monitoring data for all of your Google and third-party
290-- Cloud and API projects
291-- Cloud and API projects
291−authMonitoringScope :: OAuthScope
292−authMonitoringScope = "https://www.googleapis.com/auth/monitoring";
292+authMonitoringScope :: Proxy '["https://www.googleapis.com/auth/monitoring"]
293+authMonitoringScope = Proxy;
293
294
294-- | Publish metric data to your Google Cloud projects
295-- | Publish metric data to your Google Cloud projects
295−authMonitoringWriteScope :: OAuthScope
296−authMonitoringWriteScope = "https://www.googleapis.com/auth/monitoring.write";
296+authMonitoringWriteScope :: Proxy '["https://www.googleapis.com/auth/monitoring.write"]
297+authMonitoringWriteScope = Proxy;
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/CollectdTimeSeries/Create.hs+4
@@ -176,6 +176,10 @@ pctscCallback
176instance GoogleRequest
176instance GoogleRequest
177 ProjectsCollectdTimeSeriesCreate where
177 ProjectsCollectdTimeSeriesCreate where
178 type Rs ProjectsCollectdTimeSeriesCreate = Empty
178 type Rs ProjectsCollectdTimeSeriesCreate = Empty
179+ type Scopes ProjectsCollectdTimeSeriesCreate =
180+ '["https://www.googleapis.com/auth/cloud-platform",
181+ "https://www.googleapis.com/auth/monitoring",
182+ "https://www.googleapis.com/auth/monitoring.write"]
179 requestClient ProjectsCollectdTimeSeriesCreate{..}
183 requestClient ProjectsCollectdTimeSeriesCreate{..}
180 = go _pctscName _pctscXgafv _pctscUploadProtocol
184 = go _pctscName _pctscXgafv _pctscUploadProtocol
181 (Just _pctscPp)
185 (Just _pctscPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Create.hs+3
@@ -177,6 +177,9 @@ pgcCallback
177
177
178instance GoogleRequest ProjectsGroupsCreate where
178instance GoogleRequest ProjectsGroupsCreate where
179 type Rs ProjectsGroupsCreate = Group
179 type Rs ProjectsGroupsCreate = Group
180+ type Scopes ProjectsGroupsCreate =
181+ '["https://www.googleapis.com/auth/cloud-platform",
182+ "https://www.googleapis.com/auth/monitoring"]
180 requestClient ProjectsGroupsCreate{..}
183 requestClient ProjectsGroupsCreate{..}
181 = go _pgcName _pgcXgafv _pgcValidateOnly
184 = go _pgcName _pgcXgafv _pgcValidateOnly
182 _pgcUploadProtocol
185 _pgcUploadProtocol
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Delete.hs+3
@@ -151,6 +151,9 @@ pgdCallback
151
151
152instance GoogleRequest ProjectsGroupsDelete where
152instance GoogleRequest ProjectsGroupsDelete where
153 type Rs ProjectsGroupsDelete = Empty
153 type Rs ProjectsGroupsDelete = Empty
154+ type Scopes ProjectsGroupsDelete =
155+ '["https://www.googleapis.com/auth/cloud-platform",
156+ "https://www.googleapis.com/auth/monitoring"]
154 requestClient ProjectsGroupsDelete{..}
157 requestClient ProjectsGroupsDelete{..}
155 = go _pgdName _pgdXgafv _pgdUploadProtocol
158 = go _pgdName _pgdXgafv _pgdUploadProtocol
156 (Just _pgdPp)
159 (Just _pgdPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Get.hs+4
@@ -151,6 +151,10 @@ pggCallback
151
151
152instance GoogleRequest ProjectsGroupsGet where
152instance GoogleRequest ProjectsGroupsGet where
153 type Rs ProjectsGroupsGet = Group
153 type Rs ProjectsGroupsGet = Group
154+ type Scopes ProjectsGroupsGet =
155+ '["https://www.googleapis.com/auth/cloud-platform",
156+ "https://www.googleapis.com/auth/monitoring",
157+ "https://www.googleapis.com/auth/monitoring.read"]
154 requestClient ProjectsGroupsGet{..}
158 requestClient ProjectsGroupsGet{..}
155 = go _pggName _pggXgafv _pggUploadProtocol
159 = go _pggName _pggXgafv _pggUploadProtocol
156 (Just _pggPp)
160 (Just _pggPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/List.hs+4
@@ -221,6 +221,10 @@ pglCallback
221
221
222instance GoogleRequest ProjectsGroupsList where
222instance GoogleRequest ProjectsGroupsList where
223 type Rs ProjectsGroupsList = ListGroupsResponse
223 type Rs ProjectsGroupsList = ListGroupsResponse
224+ type Scopes ProjectsGroupsList =
225+ '["https://www.googleapis.com/auth/cloud-platform",
226+ "https://www.googleapis.com/auth/monitoring",
227+ "https://www.googleapis.com/auth/monitoring.read"]
224 requestClient ProjectsGroupsList{..}
228 requestClient ProjectsGroupsList{..}
225 = go _pglName _pglXgafv _pglUploadProtocol
229 = go _pglName _pglXgafv _pglUploadProtocol
226 _pglChildrenOfGroup
230 _pglChildrenOfGroup
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Members/List.hs+4
@@ -226,6 +226,10 @@ instance GoogleRequest ProjectsGroupsMembersList
226 where
226 where
227 type Rs ProjectsGroupsMembersList =
227 type Rs ProjectsGroupsMembersList =
228 ListGroupMembersResponse
228 ListGroupMembersResponse
229+ type Scopes ProjectsGroupsMembersList =
230+ '["https://www.googleapis.com/auth/cloud-platform",
231+ "https://www.googleapis.com/auth/monitoring",
232+ "https://www.googleapis.com/auth/monitoring.read"]
229 requestClient ProjectsGroupsMembersList{..}
233 requestClient ProjectsGroupsMembersList{..}
230 = go _pgmlName _pgmlIntervalStartTime _pgmlXgafv
234 = go _pgmlName _pgmlIntervalStartTime _pgmlXgafv
231 _pgmlUploadProtocol
235 _pgmlUploadProtocol
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/Groups/Update.hs+3
@@ -180,6 +180,9 @@ pguCallback
180
180
181instance GoogleRequest ProjectsGroupsUpdate where
181instance GoogleRequest ProjectsGroupsUpdate where
182 type Rs ProjectsGroupsUpdate = Group
182 type Rs ProjectsGroupsUpdate = Group
183+ type Scopes ProjectsGroupsUpdate =
184+ '["https://www.googleapis.com/auth/cloud-platform",
185+ "https://www.googleapis.com/auth/monitoring"]
183 requestClient ProjectsGroupsUpdate{..}
186 requestClient ProjectsGroupsUpdate{..}
184 = go _pguName _pguXgafv _pguValidateOnly
187 = go _pguName _pguXgafv _pguValidateOnly
185 _pguUploadProtocol
188 _pguUploadProtocol
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Create.hs+4
@@ -171,6 +171,10 @@ instance GoogleRequest
171 ProjectsMetricDescriptorsCreate where
171 ProjectsMetricDescriptorsCreate where
172 type Rs ProjectsMetricDescriptorsCreate =
172 type Rs ProjectsMetricDescriptorsCreate =
173 MetricDescriptor
173 MetricDescriptor
174+ type Scopes ProjectsMetricDescriptorsCreate =
175+ '["https://www.googleapis.com/auth/cloud-platform",
176+ "https://www.googleapis.com/auth/monitoring",
177+ "https://www.googleapis.com/auth/monitoring.write"]
174 requestClient ProjectsMetricDescriptorsCreate{..}
178 requestClient ProjectsMetricDescriptorsCreate{..}
175 = go _pmdcName _pmdcXgafv _pmdcUploadProtocol
179 = go _pmdcName _pmdcXgafv _pmdcUploadProtocol
176 (Just _pmdcPp)
180 (Just _pmdcPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Delete.hs+3
@@ -157,6 +157,9 @@ pmddCallback
157instance GoogleRequest
157instance GoogleRequest
158 ProjectsMetricDescriptorsDelete where
158 ProjectsMetricDescriptorsDelete where
159 type Rs ProjectsMetricDescriptorsDelete = Empty
159 type Rs ProjectsMetricDescriptorsDelete = Empty
160+ type Scopes ProjectsMetricDescriptorsDelete =
161+ '["https://www.googleapis.com/auth/cloud-platform",
162+ "https://www.googleapis.com/auth/monitoring"]
160 requestClient ProjectsMetricDescriptorsDelete{..}
163 requestClient ProjectsMetricDescriptorsDelete{..}
161 = go _pmddName _pmddXgafv _pmddUploadProtocol
164 = go _pmddName _pmddXgafv _pmddUploadProtocol
162 (Just _pmddPp)
165 (Just _pmddPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/Get.hs+5
@@ -157,6 +157,11 @@ instance GoogleRequest ProjectsMetricDescriptorsGet
157 where
157 where
158 type Rs ProjectsMetricDescriptorsGet =
158 type Rs ProjectsMetricDescriptorsGet =
159 MetricDescriptor
159 MetricDescriptor
160+ type Scopes ProjectsMetricDescriptorsGet =
161+ '["https://www.googleapis.com/auth/cloud-platform",
162+ "https://www.googleapis.com/auth/monitoring",
163+ "https://www.googleapis.com/auth/monitoring.read",
164+ "https://www.googleapis.com/auth/monitoring.write"]
160 requestClient ProjectsMetricDescriptorsGet{..}
165 requestClient ProjectsMetricDescriptorsGet{..}
161 = go _pmdgName _pmdgXgafv _pmdgUploadProtocol
166 = go _pmdgName _pmdgXgafv _pmdgUploadProtocol
162 (Just _pmdgPp)
167 (Just _pmdgPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MetricDescriptors/List.hs+5
@@ -200,6 +200,11 @@ instance GoogleRequest ProjectsMetricDescriptorsList
200 where
200 where
201 type Rs ProjectsMetricDescriptorsList =
201 type Rs ProjectsMetricDescriptorsList =
202 ListMetricDescriptorsResponse
202 ListMetricDescriptorsResponse
203+ type Scopes ProjectsMetricDescriptorsList =
204+ '["https://www.googleapis.com/auth/cloud-platform",
205+ "https://www.googleapis.com/auth/monitoring",
206+ "https://www.googleapis.com/auth/monitoring.read",
207+ "https://www.googleapis.com/auth/monitoring.write"]
203 requestClient ProjectsMetricDescriptorsList{..}
208 requestClient ProjectsMetricDescriptorsList{..}
204 = go _pmdlName _pmdlXgafv _pmdlUploadProtocol
209 = go _pmdlName _pmdlXgafv _pmdlUploadProtocol
205 (Just _pmdlPp)
210 (Just _pmdlPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MonitoredResourceDescriptors/Get.hs+5
@@ -160,6 +160,11 @@ instance GoogleRequest
160 ProjectsMonitoredResourceDescriptorsGet where
160 ProjectsMonitoredResourceDescriptorsGet where
161 type Rs ProjectsMonitoredResourceDescriptorsGet =
161 type Rs ProjectsMonitoredResourceDescriptorsGet =
162 MonitoredResourceDescriptor
162 MonitoredResourceDescriptor
163+ type Scopes ProjectsMonitoredResourceDescriptorsGet =
164+ '["https://www.googleapis.com/auth/cloud-platform",
165+ "https://www.googleapis.com/auth/monitoring",
166+ "https://www.googleapis.com/auth/monitoring.read",
167+ "https://www.googleapis.com/auth/monitoring.write"]
163 requestClient
168 requestClient
164 ProjectsMonitoredResourceDescriptorsGet{..}
169 ProjectsMonitoredResourceDescriptorsGet{..}
165 = go _pmrdgName _pmrdgXgafv _pmrdgUploadProtocol
170 = go _pmrdgName _pmrdgXgafv _pmrdgUploadProtocol
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/MonitoredResourceDescriptors/List.hs+6
@@ -204,6 +204,12 @@ instance GoogleRequest
204 ProjectsMonitoredResourceDescriptorsList where
204 ProjectsMonitoredResourceDescriptorsList where
205 type Rs ProjectsMonitoredResourceDescriptorsList =
205 type Rs ProjectsMonitoredResourceDescriptorsList =
206 ListMonitoredResourceDescriptorsResponse
206 ListMonitoredResourceDescriptorsResponse
207+ type Scopes ProjectsMonitoredResourceDescriptorsList
208+ =
209+ '["https://www.googleapis.com/auth/cloud-platform",
210+ "https://www.googleapis.com/auth/monitoring",
211+ "https://www.googleapis.com/auth/monitoring.read",
212+ "https://www.googleapis.com/auth/monitoring.write"]
207 requestClient
213 requestClient
208 ProjectsMonitoredResourceDescriptorsList{..}
214 ProjectsMonitoredResourceDescriptorsList{..}
209 = go _pmrdlName _pmrdlXgafv _pmrdlUploadProtocol
215 = go _pmrdlName _pmrdlXgafv _pmrdlUploadProtocol
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/TimeSeries/Create.hs+4
@@ -173,6 +173,10 @@ ptscCallback
173
173
174instance GoogleRequest ProjectsTimeSeriesCreate where
174instance GoogleRequest ProjectsTimeSeriesCreate where
175 type Rs ProjectsTimeSeriesCreate = Empty
175 type Rs ProjectsTimeSeriesCreate = Empty
176+ type Scopes ProjectsTimeSeriesCreate =
177+ '["https://www.googleapis.com/auth/cloud-platform",
178+ "https://www.googleapis.com/auth/monitoring",
179+ "https://www.googleapis.com/auth/monitoring.write"]
176 requestClient ProjectsTimeSeriesCreate{..}
180 requestClient ProjectsTimeSeriesCreate{..}
177 = go _ptscName _ptscXgafv _ptscUploadProtocol
181 = go _ptscName _ptscXgafv _ptscUploadProtocol
178 (Just _ptscPp)
182 (Just _ptscPp)
gogol-monitoring/gen/Network/Google/Resource/Monitoring/Projects/TimeSeries/List.hs+4
@@ -336,6 +336,10 @@ ptslCallback
336instance GoogleRequest ProjectsTimeSeriesList where
336instance GoogleRequest ProjectsTimeSeriesList where
337 type Rs ProjectsTimeSeriesList =
337 type Rs ProjectsTimeSeriesList =
338 ListTimeSeriesResponse
338 ListTimeSeriesResponse
339+ type Scopes ProjectsTimeSeriesList =
340+ '["https://www.googleapis.com/auth/cloud-platform",
341+ "https://www.googleapis.com/auth/monitoring",
342+ "https://www.googleapis.com/auth/monitoring.read"]
339 requestClient ProjectsTimeSeriesList{..}
343 requestClient ProjectsTimeSeriesList{..}
340 = go _ptslName _ptslIntervalStartTime _ptslXgafv
344 = go _ptslName _ptslIntervalStartTime _ptslXgafv
341 _ptslUploadProtocol
345 _ptslUploadProtocol
gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -73,23 +74,23 @@ import Network.Google.OAuth2.Types.Sum
73import Network.Google.Prelude
74import Network.Google.Prelude
74
75
75-- | Default request referring to version 'v2' of the Google OAuth2 API. This contains the host and root path used as a starting point for constructing service requests.
76-- | Default request referring to version 'v2' of the Google OAuth2 API. This contains the host and root path used as a starting point for constructing service requests.
76−oAuth2Service :: ServiceConfig
77+oAuth2Service :: Service
77oAuth2Service
78oAuth2Service
78 = defaultService (ServiceId "oauth2:v2")
79 = defaultService (ServiceId "oauth2:v2")
79 "www.googleapis.com"
80 "www.googleapis.com"
80
81
81-- | View your basic profile info
82-- | View your basic profile info
82−authUserinfoProfileScope :: OAuthScope
83−authUserinfoProfileScope = "https://www.googleapis.com/auth/userinfo.profile";
83+authUserinfoProfileScope :: Proxy '["https://www.googleapis.com/auth/userinfo.profile"]
84+authUserinfoProfileScope = Proxy;
84
85
85-- | Know the list of people in your circles, your age range, and language
86-- | Know the list of people in your circles, your age range, and language
86−authPlusLoginScope :: OAuthScope
87−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
87+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
88+authPlusLoginScope = Proxy;
88
89
89-- | View your email address
90-- | View your email address
90−authUserinfoEmailScope :: OAuthScope
91−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
91+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
92+authUserinfoEmailScope = Proxy;
92
93
93-- | Know who you are on Google
94-- | Know who you are on Google
94−authPlusMeScope :: OAuthScope
95−authPlusMeScope = "https://www.googleapis.com/auth/plus.me";
95+authPlusMeScope :: Proxy '["https://www.googleapis.com/auth/plus.me"]
96+authPlusMeScope = Proxy;
gogol-pagespeed/gen/Network/Google/PageSpeed/Types.hs+1−1
@@ -156,7 +156,7 @@ import Network.Google.PageSpeed.Types.Sum
156import Network.Google.Prelude
156import Network.Google.Prelude
157
157
158-- | Default request referring to version 'v2' of the PageSpeed Insights API. This contains the host and root path used as a starting point for constructing service requests.
158-- | Default request referring to version 'v2' of the PageSpeed Insights API. This contains the host and root path used as a starting point for constructing service requests.
159−pageSpeedService :: ServiceConfig
159+pageSpeedService :: Service
160pageSpeedService
160pageSpeedService
161 = defaultService (ServiceId "pagespeedonline:v2")
161 = defaultService (ServiceId "pagespeedonline:v2")
162 "www.googleapis.com"
162 "www.googleapis.com"
gogol-partners/gen/Network/Google/Partners/Types.hs+1−1
@@ -221,7 +221,7 @@ import Network.Google.Partners.Types.Sum
221import Network.Google.Prelude
221import Network.Google.Prelude
222
222
223-- | Default request referring to version 'v2' of the Google Partners API. This contains the host and root path used as a starting point for constructing service requests.
223-- | Default request referring to version 'v2' of the Google Partners API. This contains the host and root path used as a starting point for constructing service requests.
224−partnersService :: ServiceConfig
224+partnersService :: Service
225partnersService
225partnersService
226 = defaultService (ServiceId "partners:v2")
226 = defaultService (ServiceId "partners:v2")
227 "partners.googleapis.com"
227 "partners.googleapis.com"
gogol-people/gen/Network/Google/People/Types.hs+20−19
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -330,43 +331,43 @@ import Network.Google.People.Types.Sum
330import Network.Google.Prelude
331import Network.Google.Prelude
331
332
332-- | Default request referring to version 'v1' of the Google People API. This contains the host and root path used as a starting point for constructing service requests.
333-- | Default request referring to version 'v1' of the Google People API. This contains the host and root path used as a starting point for constructing service requests.
333−peopleService :: ServiceConfig
334+peopleService :: Service
334peopleService
335peopleService
335 = defaultService (ServiceId "people:v1")
336 = defaultService (ServiceId "people:v1")
336 "people.googleapis.com"
337 "people.googleapis.com"
337
338
338-- | View your complete date of birth
339-- | View your complete date of birth
339−authUserBirthdayReadScope :: OAuthScope
340−authUserBirthdayReadScope = "https://www.googleapis.com/auth/user.birthday.read";
340+authUserBirthdayReadScope :: Proxy '["https://www.googleapis.com/auth/user.birthday.read"]
341+authUserBirthdayReadScope = Proxy;
341
342
342-- | View your basic profile info
343-- | View your basic profile info
343−authUserinfoProfileScope :: OAuthScope
344−authUserinfoProfileScope = "https://www.googleapis.com/auth/userinfo.profile";
344+authUserinfoProfileScope :: Proxy '["https://www.googleapis.com/auth/userinfo.profile"]
345+authUserinfoProfileScope = Proxy;
345
346
346-- | Know your basic profile info and list of people in your circles.
347-- | Know your basic profile info and list of people in your circles.
347−authPlusLoginScope :: OAuthScope
348−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
348+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
349+authPlusLoginScope = Proxy;
349
350
350-- | View your phone numbers
351-- | View your phone numbers
351−authUserPhonenumbersReadScope :: OAuthScope
352−authUserPhonenumbersReadScope = "https://www.googleapis.com/auth/user.phonenumbers.read";
352+authUserPhonenumbersReadScope :: Proxy '["https://www.googleapis.com/auth/user.phonenumbers.read"]
353+authUserPhonenumbersReadScope = Proxy;
353
354
354-- | View your email address
355-- | View your email address
355−authUserinfoEmailScope :: OAuthScope
356−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
356+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
357+authUserinfoEmailScope = Proxy;
357
358
358-- | View your contacts
359-- | View your contacts
359−authContactsReadonlyScope :: OAuthScope
360−authContactsReadonlyScope = "https://www.googleapis.com/auth/contacts.readonly";
360+authContactsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/contacts.readonly"]
361+authContactsReadonlyScope = Proxy;
361
362
362-- | View your street addresses
363-- | View your street addresses
363−authUserAddressesReadScope :: OAuthScope
364−authUserAddressesReadScope = "https://www.googleapis.com/auth/user.addresses.read";
364+authUserAddressesReadScope :: Proxy '["https://www.googleapis.com/auth/user.addresses.read"]
365+authUserAddressesReadScope = Proxy;
365
366
366-- | Manage your contacts
367-- | Manage your contacts
367−authContactsScope :: OAuthScope
368−authContactsScope = "https://www.googleapis.com/auth/contacts";
368+authContactsScope :: Proxy '["https://www.googleapis.com/auth/contacts"]
369+authContactsScope = Proxy;
369
370
370-- | View your email addresses
371-- | View your email addresses
371−authUserEmailsReadScope :: OAuthScope
372−authUserEmailsReadScope = "https://www.googleapis.com/auth/user.emails.read";
372+authUserEmailsReadScope :: Proxy '["https://www.googleapis.com/auth/user.emails.read"]
373+authUserEmailsReadScope = Proxy;
gogol-people/gen/Network/Google/Resource/People/People/Connections/List.hs+3
@@ -222,6 +222,9 @@ pclCallback
222instance GoogleRequest PeopleConnectionsList where
222instance GoogleRequest PeopleConnectionsList where
223 type Rs PeopleConnectionsList =
223 type Rs PeopleConnectionsList =
224 ListConnectionsResponse
224 ListConnectionsResponse
225+ type Scopes PeopleConnectionsList =
226+ '["https://www.googleapis.com/auth/contacts",
227+ "https://www.googleapis.com/auth/contacts.readonly"]
225 requestClient PeopleConnectionsList{..}
228 requestClient PeopleConnectionsList{..}
226 = go _pclResourceName _pclSyncToken _pclXgafv
229 = go _pclResourceName _pclSyncToken _pclXgafv
227 _pclUploadProtocol
230 _pclUploadProtocol
gogol-people/gen/Network/Google/Resource/People/People/Get.hs+10
@@ -172,6 +172,16 @@ pgCallback
172
172
173instance GoogleRequest PeopleGet where
173instance GoogleRequest PeopleGet where
174 type Rs PeopleGet = Person
174 type Rs PeopleGet = Person
175+ type Scopes PeopleGet =
176+ '["https://www.googleapis.com/auth/contacts",
177+ "https://www.googleapis.com/auth/contacts.readonly",
178+ "https://www.googleapis.com/auth/plus.login",
179+ "https://www.googleapis.com/auth/user.addresses.read",
180+ "https://www.googleapis.com/auth/user.birthday.read",
181+ "https://www.googleapis.com/auth/user.emails.read",
182+ "https://www.googleapis.com/auth/user.phonenumbers.read",
183+ "https://www.googleapis.com/auth/userinfo.email",
184+ "https://www.googleapis.com/auth/userinfo.profile"]
175 requestClient PeopleGet{..}
185 requestClient PeopleGet{..}
176 = go _pgResourceName _pgXgafv _pgUploadProtocol
186 = go _pgResourceName _pgXgafv _pgUploadProtocol
177 _pgRequestMaskIncludeField
187 _pgRequestMaskIncludeField
gogol-people/gen/Network/Google/Resource/People/People/GetBatchGet.hs+10
@@ -178,6 +178,16 @@ pgbgCallback
178
178
179instance GoogleRequest PeopleGetBatchGet where
179instance GoogleRequest PeopleGetBatchGet where
180 type Rs PeopleGetBatchGet = GetPeopleResponse
180 type Rs PeopleGetBatchGet = GetPeopleResponse
181+ type Scopes PeopleGetBatchGet =
182+ '["https://www.googleapis.com/auth/contacts",
183+ "https://www.googleapis.com/auth/contacts.readonly",
184+ "https://www.googleapis.com/auth/plus.login",
185+ "https://www.googleapis.com/auth/user.addresses.read",
186+ "https://www.googleapis.com/auth/user.birthday.read",
187+ "https://www.googleapis.com/auth/user.emails.read",
188+ "https://www.googleapis.com/auth/user.phonenumbers.read",
189+ "https://www.googleapis.com/auth/userinfo.email",
190+ "https://www.googleapis.com/auth/userinfo.profile"]
181 requestClient PeopleGetBatchGet{..}
191 requestClient PeopleGetBatchGet{..}
182 = go _pgbgXgafv _pgbgUploadProtocol
192 = go _pgbgXgafv _pgbgUploadProtocol
183 _pgbgRequestMaskIncludeField
193 _pgbgRequestMaskIncludeField
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -170,11 +171,11 @@ import Network.Google.PlayMoviesPartner.Types.Sum
170import Network.Google.Prelude
171import Network.Google.Prelude
171
172
172-- | Default request referring to version 'v1' of the Google Play Movies Partner API. This contains the host and root path used as a starting point for constructing service requests.
173-- | Default request referring to version 'v1' of the Google Play Movies Partner API. This contains the host and root path used as a starting point for constructing service requests.
173−playMoviesPartnerService :: ServiceConfig
174+playMoviesPartnerService :: Service
174playMoviesPartnerService
175playMoviesPartnerService
175 = defaultService (ServiceId "playmoviespartner:v1")
176 = defaultService (ServiceId "playmoviespartner:v1")
176 "playmoviespartner.googleapis.com"
177 "playmoviespartner.googleapis.com"
177
178
178-- | View the digital assets you publish on Google Play Movies and TV
179-- | View the digital assets you publish on Google Play Movies and TV
179−authPlaymoviesPartnerReadonlyScope :: OAuthScope
180−authPlaymoviesPartnerReadonlyScope = "https://www.googleapis.com/auth/playmovies_partner.readonly";
180+authPlaymoviesPartnerReadonlyScope :: Proxy '["https://www.googleapis.com/auth/playmovies_partner.readonly"]
181+authPlaymoviesPartnerReadonlyScope = Proxy;
gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+22−21
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -576,49 +577,49 @@ import Network.Google.PlusDomains.Types.Sum
576import Network.Google.Prelude
577import Network.Google.Prelude
577
578
578-- | Default request referring to version 'v1' of the Google+ Domains API. This contains the host and root path used as a starting point for constructing service requests.
579-- | Default request referring to version 'v1' of the Google+ Domains API. This contains the host and root path used as a starting point for constructing service requests.
579−plusDomainsService :: ServiceConfig
580+plusDomainsService :: Service
580plusDomainsService
581plusDomainsService
581 = defaultService (ServiceId "plusDomains:v1")
582 = defaultService (ServiceId "plusDomains:v1")
582 "www.googleapis.com"
583 "www.googleapis.com"
583
584
584-- | View your basic profile info
585-- | View your basic profile info
585−authUserinfoProfileScope :: OAuthScope
586−authUserinfoProfileScope = "https://www.googleapis.com/auth/userinfo.profile";
586+authUserinfoProfileScope :: Proxy '["https://www.googleapis.com/auth/userinfo.profile"]
587+authUserinfoProfileScope = Proxy;
587
588
588-- | Know the list of people in your circles, your age range, and language
589-- | Know the list of people in your circles, your age range, and language
589−authPlusLoginScope :: OAuthScope
590−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
590+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
591+authPlusLoginScope = Proxy;
591
592
592-- | View your own Google+ profile and profiles visible to you
593-- | View your own Google+ profile and profiles visible to you
593−authPlusProfilesReadScope :: OAuthScope
594−authPlusProfilesReadScope = "https://www.googleapis.com/auth/plus.profiles.read";
594+authPlusProfilesReadScope :: Proxy '["https://www.googleapis.com/auth/plus.profiles.read"]
595+authPlusProfilesReadScope = Proxy;
595
596
596-- | View your email address
597-- | View your email address
597−authUserinfoEmailScope :: OAuthScope
598−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
598+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
599+authUserinfoEmailScope = Proxy;
599
600
600-- | Manage your Google+ posts, comments, and stream
601-- | Manage your Google+ posts, comments, and stream
601−authPlusStreamWriteScope :: OAuthScope
602−authPlusStreamWriteScope = "https://www.googleapis.com/auth/plus.stream.write";
602+authPlusStreamWriteScope :: Proxy '["https://www.googleapis.com/auth/plus.stream.write"]
603+authPlusStreamWriteScope = Proxy;
603
604
604-- | View your Google+ posts, comments, and stream
605-- | View your Google+ posts, comments, and stream
605−authPlusStreamReadScope :: OAuthScope
606−authPlusStreamReadScope = "https://www.googleapis.com/auth/plus.stream.read";
606+authPlusStreamReadScope :: Proxy '["https://www.googleapis.com/auth/plus.stream.read"]
607+authPlusStreamReadScope = Proxy;
607
608
608-- | Know who you are on Google
609-- | Know who you are on Google
609−authPlusMeScope :: OAuthScope
610−authPlusMeScope = "https://www.googleapis.com/auth/plus.me";
610+authPlusMeScope :: Proxy '["https://www.googleapis.com/auth/plus.me"]
611+authPlusMeScope = Proxy;
611
612
612-- | View your circles and the people and pages in them
613-- | View your circles and the people and pages in them
613−authPlusCirclesReadScope :: OAuthScope
614−authPlusCirclesReadScope = "https://www.googleapis.com/auth/plus.circles.read";
614+authPlusCirclesReadScope :: Proxy '["https://www.googleapis.com/auth/plus.circles.read"]
615+authPlusCirclesReadScope = Proxy;
615
616
616-- | Send your photos and videos to Google+
617-- | Send your photos and videos to Google+
617−authPlusMediaUploadScope :: OAuthScope
618−authPlusMediaUploadScope = "https://www.googleapis.com/auth/plus.media.upload";
618+authPlusMediaUploadScope :: Proxy '["https://www.googleapis.com/auth/plus.media.upload"]
619+authPlusMediaUploadScope = Proxy;
619
620
620-- | Manage your circles and add people and pages. People and pages you add
621-- | Manage your circles and add people and pages. People and pages you add
621-- to your circles will be notified. Others may see this information
622-- to your circles will be notified. Others may see this information
622-- publicly. People you add to circles can use Hangouts with you.
623-- publicly. People you add to circles can use Hangouts with you.
623−authPlusCirclesWriteScope :: OAuthScope
624−authPlusCirclesWriteScope = "https://www.googleapis.com/auth/plus.circles.write";
624+authPlusCirclesWriteScope :: Proxy '["https://www.googleapis.com/auth/plus.circles.write"]
625+authPlusCirclesWriteScope = Proxy;
gogol-plus/gen/Network/Google/Plus/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -467,23 +468,23 @@ import Network.Google.Plus.Types.Sum
467import Network.Google.Prelude
468import Network.Google.Prelude
468
469
469-- | Default request referring to version 'v1' of the Google+ API. This contains the host and root path used as a starting point for constructing service requests.
470-- | Default request referring to version 'v1' of the Google+ API. This contains the host and root path used as a starting point for constructing service requests.
470−plusService :: ServiceConfig
471+plusService :: Service
471plusService
472plusService
472 = defaultService (ServiceId "plus:v1")
473 = defaultService (ServiceId "plus:v1")
473 "www.googleapis.com"
474 "www.googleapis.com"
474
475
475-- | View your basic profile info
476-- | View your basic profile info
476−authUserinfoProfileScope :: OAuthScope
477−authUserinfoProfileScope = "https://www.googleapis.com/auth/userinfo.profile";
477+authUserinfoProfileScope :: Proxy '["https://www.googleapis.com/auth/userinfo.profile"]
478+authUserinfoProfileScope = Proxy;
478
479
479-- | Know the list of people in your circles, your age range, and language
480-- | Know the list of people in your circles, your age range, and language
480−authPlusLoginScope :: OAuthScope
481−authPlusLoginScope = "https://www.googleapis.com/auth/plus.login";
481+authPlusLoginScope :: Proxy '["https://www.googleapis.com/auth/plus.login"]
482+authPlusLoginScope = Proxy;
482
483
483-- | View your email address
484-- | View your email address
484−authUserinfoEmailScope :: OAuthScope
485−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
485+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
486+authUserinfoEmailScope = Proxy;
486
487
487-- | Know who you are on Google
488-- | Know who you are on Google
488−authPlusMeScope :: OAuthScope
489−authPlusMeScope = "https://www.googleapis.com/auth/plus.me";
489+authPlusMeScope :: Proxy '["https://www.googleapis.com/auth/plus.me"]
490+authPlusMeScope = Proxy;
gogol-prediction/gen/Network/Google/Prediction/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -212,23 +213,23 @@ import Network.Google.Prediction.Types.Sum
212import Network.Google.Prelude
213import Network.Google.Prelude
213
214
214-- | Default request referring to version 'v1.6' of the Prediction API. This contains the host and root path used as a starting point for constructing service requests.
215-- | Default request referring to version 'v1.6' of the Prediction API. This contains the host and root path used as a starting point for constructing service requests.
215−predictionService :: ServiceConfig
216+predictionService :: Service
216predictionService
217predictionService
217 = defaultService (ServiceId "prediction:v1.6")
218 = defaultService (ServiceId "prediction:v1.6")
218 "www.googleapis.com"
219 "www.googleapis.com"
219
220
220-- | View your data in Google Cloud Storage
221-- | View your data in Google Cloud Storage
221−authDevstorageReadOnlyScope :: OAuthScope
222−authDevstorageReadOnlyScope = "https://www.googleapis.com/auth/devstorage.read_only";
222+authDevstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
223+authDevstorageReadOnlyScope = Proxy;
223
224
224-- | Manage your data in Google Cloud Storage
225-- | Manage your data in Google Cloud Storage
225−authDevstorageReadWriteScope :: OAuthScope
226−authDevstorageReadWriteScope = "https://www.googleapis.com/auth/devstorage.read_write";
226+authDevstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
227+authDevstorageReadWriteScope = Proxy;
227
228
228-- | Manage your data in the Google Prediction API
229-- | Manage your data in the Google Prediction API
229−authPredictionScope :: OAuthScope
230−authPredictionScope = "https://www.googleapis.com/auth/prediction";
230+authPredictionScope :: Proxy '["https://www.googleapis.com/auth/prediction"]
231+authPredictionScope = Proxy;
231
232
232-- | Manage your data and permissions in Google Cloud Storage
233-- | Manage your data and permissions in Google Cloud Storage
233−authDevstorageFullControlScope :: OAuthScope
234−authDevstorageFullControlScope = "https://www.googleapis.com/auth/devstorage.full_control";
234+authDevstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
235+authDevstorageFullControlScope = Proxy;
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+1−1
@@ -151,7 +151,7 @@ import Network.Google.ProximityBeacon.Types.Product
151import Network.Google.ProximityBeacon.Types.Sum
151import Network.Google.ProximityBeacon.Types.Sum
152
152
153-- | Default request referring to version 'v1beta1' of the Google Proximity Beacon API. This contains the host and root path used as a starting point for constructing service requests.
153-- | Default request referring to version 'v1beta1' of the Google Proximity Beacon API. This contains the host and root path used as a starting point for constructing service requests.
154−proximityBeaconService :: ServiceConfig
154+proximityBeaconService :: Service
155proximityBeaconService
155proximityBeaconService
156 = defaultService
156 = defaultService
157 (ServiceId "proximitybeacon:v1beta1")
157 (ServiceId "proximitybeacon:v1beta1")
gogol-pubsub/gen/Network/Google/PubSub/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -158,15 +159,15 @@ import Network.Google.PubSub.Types.Product
158import Network.Google.PubSub.Types.Sum
159import Network.Google.PubSub.Types.Sum
159
160
160-- | Default request referring to version 'v1' of the Google Cloud Pub/Sub API. This contains the host and root path used as a starting point for constructing service requests.
161-- | Default request referring to version 'v1' of the Google Cloud Pub/Sub API. This contains the host and root path used as a starting point for constructing service requests.
161−pubSubService :: ServiceConfig
162+pubSubService :: Service
162pubSubService
163pubSubService
163 = defaultService (ServiceId "pubsub:v1")
164 = defaultService (ServiceId "pubsub:v1")
164 "pubsub.googleapis.com"
165 "pubsub.googleapis.com"
165
166
166-- | View and manage your data across Google Cloud Platform services
167-- | View and manage your data across Google Cloud Platform services
167−authCloudPlatformScope :: OAuthScope
168−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
168+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
169+authCloudPlatformScope = Proxy;
169
170
170-- | View and manage Pub\/Sub topics and subscriptions
171-- | View and manage Pub\/Sub topics and subscriptions
171−authPubsubScope :: OAuthScope
172−authPubsubScope = "https://www.googleapis.com/auth/pubsub";
172+authPubsubScope :: Proxy '["https://www.googleapis.com/auth/pubsub"]
173+authPubsubScope = Proxy;
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+1−1
@@ -256,7 +256,7 @@ import Network.Google.QPXExpress.Types.Product
256import Network.Google.QPXExpress.Types.Sum
256import Network.Google.QPXExpress.Types.Sum
257
257
258-- | Default request referring to version 'v1' of the QPX Express API. This contains the host and root path used as a starting point for constructing service requests.
258-- | Default request referring to version 'v1' of the QPX Express API. This contains the host and root path used as a starting point for constructing service requests.
259−qPXExpressService :: ServiceConfig
259+qPXExpressService :: Service
260qPXExpressService
260qPXExpressService
261 = defaultService (ServiceId "qpxExpress:v1")
261 = defaultService (ServiceId "qpxExpress:v1")
262 "www.googleapis.com"
262 "www.googleapis.com"
gogol-replicapool-updater/gen/Network/Google/ReplicaPoolUpdater/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -166,24 +167,24 @@ import Network.Google.ReplicaPoolUpdater.Types.Product
166import Network.Google.ReplicaPoolUpdater.Types.Sum
167import Network.Google.ReplicaPoolUpdater.Types.Sum
167
168
168-- | Default request referring to version 'v1beta1' of the Google Compute Engine Instance Group Updater API. This contains the host and root path used as a starting point for constructing service requests.
169-- | Default request referring to version 'v1beta1' of the Google Compute Engine Instance Group Updater API. This contains the host and root path used as a starting point for constructing service requests.
169−replicaPoolUpdaterService :: ServiceConfig
170+replicaPoolUpdaterService :: Service
170replicaPoolUpdaterService
171replicaPoolUpdaterService
171 = defaultService
172 = defaultService
172 (ServiceId "replicapoolupdater:v1beta1")
173 (ServiceId "replicapoolupdater:v1beta1")
173 "www.googleapis.com"
174 "www.googleapis.com"
174
175
175-- | View your data across Google Cloud Platform services
176-- | View your data across Google Cloud Platform services
176−authCloudPlatformReadOnlyScope :: OAuthScope
177−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
177+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
178+authCloudPlatformReadOnlyScope = Proxy;
178
179
179-- | View and manage your data across Google Cloud Platform services
180-- | View and manage your data across Google Cloud Platform services
180−authCloudPlatformScope :: OAuthScope
181−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
181+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
182+authCloudPlatformScope = Proxy;
182
183
183-- | View and manage replica pools
184-- | View and manage replica pools
184−authReplicapoolScope :: OAuthScope
185−authReplicapoolScope = "https://www.googleapis.com/auth/replicapool";
185+authReplicapoolScope :: Proxy '["https://www.googleapis.com/auth/replicapool"]
186+authReplicapoolScope = Proxy;
186
187
187-- | View replica pools
188-- | View replica pools
188−authReplicapoolReadonlyScope :: OAuthScope
189−authReplicapoolReadonlyScope = "https://www.googleapis.com/auth/replicapool.readonly";
189+authReplicapoolReadonlyScope :: Proxy '["https://www.googleapis.com/auth/replicapool.readonly"]
190+authReplicapoolReadonlyScope = Proxy;
gogol-replicapool/gen/Network/Google/ReplicaPool/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -158,23 +159,23 @@ import Network.Google.ReplicaPool.Types.Product
158import Network.Google.ReplicaPool.Types.Sum
159import Network.Google.ReplicaPool.Types.Sum
159
160
160-- | Default request referring to version 'v1beta2' of the Google Compute Engine Instance Group Manager API. This contains the host and root path used as a starting point for constructing service requests.
161-- | Default request referring to version 'v1beta2' of the Google Compute Engine Instance Group Manager API. This contains the host and root path used as a starting point for constructing service requests.
161−replicaPoolService :: ServiceConfig
162+replicaPoolService :: Service
162replicaPoolService
163replicaPoolService
163 = defaultService (ServiceId "replicapool:v1beta2")
164 = defaultService (ServiceId "replicapool:v1beta2")
164 "www.googleapis.com"
165 "www.googleapis.com"
165
166
166-- | View and manage your Google Compute Engine resources
167-- | View and manage your Google Compute Engine resources
167−authComputeScope :: OAuthScope
168−authComputeScope = "https://www.googleapis.com/auth/compute";
168+authComputeScope :: Proxy '["https://www.googleapis.com/auth/compute"]
169+authComputeScope = Proxy;
169
170
170-- | View your data across Google Cloud Platform services
171-- | View your data across Google Cloud Platform services
171−authCloudPlatformReadOnlyScope :: OAuthScope
172−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
172+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
173+authCloudPlatformReadOnlyScope = Proxy;
173
174
174-- | View and manage your data across Google Cloud Platform services
175-- | View and manage your data across Google Cloud Platform services
175−authCloudPlatformScope :: OAuthScope
176−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
176+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
177+authCloudPlatformScope = Proxy;
177
178
178-- | View your Google Compute Engine resources
179-- | View your Google Compute Engine resources
179−authComputeReadonlyScope :: OAuthScope
180−authComputeReadonlyScope = "https://www.googleapis.com/auth/compute.readonly";
180+authComputeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
181+authComputeReadonlyScope = Proxy;
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/Get.hs+2−1
@@ -157,7 +157,8 @@ pgCallback
157instance GoogleRequest ProjectsGet where
157instance GoogleRequest ProjectsGet where
158 type Rs ProjectsGet = Project
158 type Rs ProjectsGet = Project
159 type Scopes ProjectsGet =
159 type Scopes ProjectsGet =
160− '["https://www.googleapis.com/auth/cloud-platform"]
160+ '["https://www.googleapis.com/auth/cloud-platform",
161+ "https://www.googleapis.com/auth/cloud-platform.read-only"]
161 requestClient ProjectsGet{..}
162 requestClient ProjectsGet{..}
162 = go _pgProjectId _pgXgafv _pgUploadProtocol
163 = go _pgProjectId _pgXgafv _pgUploadProtocol
163 (Just _pgPp)
164 (Just _pgPp)
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/GetIAMPolicy.hs+2−1
@@ -174,7 +174,8 @@ pgipCallback
174instance GoogleRequest ProjectsGetIAMPolicy where
174instance GoogleRequest ProjectsGetIAMPolicy where
175 type Rs ProjectsGetIAMPolicy = Policy
175 type Rs ProjectsGetIAMPolicy = Policy
176 type Scopes ProjectsGetIAMPolicy =
176 type Scopes ProjectsGetIAMPolicy =
177− '["https://www.googleapis.com/auth/cloud-platform"]
177+ '["https://www.googleapis.com/auth/cloud-platform",
178+ "https://www.googleapis.com/auth/cloud-platform.read-only"]
178 requestClient ProjectsGetIAMPolicy{..}
179 requestClient ProjectsGetIAMPolicy{..}
179 = go _pgipResource _pgipXgafv _pgipUploadProtocol
180 = go _pgipResource _pgipXgafv _pgipUploadProtocol
180 (Just _pgipPp)
181 (Just _pgipPp)
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/List.hs+2−1
@@ -192,7 +192,8 @@ plCallback
192instance GoogleRequest ProjectsList where
192instance GoogleRequest ProjectsList where
193 type Rs ProjectsList = ListProjectsResponse
193 type Rs ProjectsList = ListProjectsResponse
194 type Scopes ProjectsList =
194 type Scopes ProjectsList =
195− '["https://www.googleapis.com/auth/cloud-platform"]
195+ '["https://www.googleapis.com/auth/cloud-platform",
196+ "https://www.googleapis.com/auth/cloud-platform.read-only"]
196 requestClient ProjectsList{..}
197 requestClient ProjectsList{..}
197 = go _plXgafv _plUploadProtocol (Just _plPp)
198 = go _plXgafv _plUploadProtocol (Just _plPp)
198 _plAccessToken
199 _plAccessToken
gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Projects/TestIAMPermissions.hs+2−1
@@ -174,7 +174,8 @@ instance GoogleRequest ProjectsTestIAMPermissions
174 type Rs ProjectsTestIAMPermissions =
174 type Rs ProjectsTestIAMPermissions =
175 TestIAMPermissionsResponse
175 TestIAMPermissionsResponse
176 type Scopes ProjectsTestIAMPermissions =
176 type Scopes ProjectsTestIAMPermissions =
177− '["https://www.googleapis.com/auth/cloud-platform"]
177+ '["https://www.googleapis.com/auth/cloud-platform",
178+ "https://www.googleapis.com/auth/cloud-platform.read-only"]
178 requestClient ProjectsTestIAMPermissions{..}
179 requestClient ProjectsTestIAMPermissions{..}
179 = go _ptipResource _ptipXgafv _ptipUploadProtocol
180 = go _ptipResource _ptipXgafv _ptipUploadProtocol
180 (Just _ptipPp)
181 (Just _ptipPp)
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -96,16 +97,16 @@ import Network.Google.ResourceManager.Types.Product
96import Network.Google.ResourceManager.Types.Sum
97import Network.Google.ResourceManager.Types.Sum
97
98
98-- | Default request referring to version 'v1' of the Google Cloud Resource Manager API. This contains the host and root path used as a starting point for constructing service requests.
99-- | Default request referring to version 'v1' of the Google Cloud Resource Manager API. This contains the host and root path used as a starting point for constructing service requests.
99−resourceManagerService :: ServiceConfig
100+resourceManagerService :: Service
100resourceManagerService
101resourceManagerService
101 = defaultService
102 = defaultService
102 (ServiceId "cloudresourcemanager:v1")
103 (ServiceId "cloudresourcemanager:v1")
103 "cloudresourcemanager.googleapis.com"
104 "cloudresourcemanager.googleapis.com"
104
105
105-- | View your data across Google Cloud Platform services
106-- | View your data across Google Cloud Platform services
106−authCloudPlatformReadOnlyScope :: OAuthScope
107−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
107+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
108+authCloudPlatformReadOnlyScope = Proxy;
108
109
109-- | View and manage your data across Google Cloud Platform services
110-- | View and manage your data across Google Cloud Platform services
110−authCloudPlatformScope :: OAuthScope
111−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
111+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
112+authCloudPlatformScope = Proxy;
gogol-resourceviews/gen/Network/Google/ResourceViews/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -175,33 +176,33 @@ import Network.Google.ResourceViews.Types.Product
175import Network.Google.ResourceViews.Types.Sum
176import Network.Google.ResourceViews.Types.Sum
176
177
177-- | Default request referring to version 'v1beta2' of the Google Compute Engine Instance Groups API. This contains the host and root path used as a starting point for constructing service requests.
178-- | Default request referring to version 'v1beta2' of the Google Compute Engine Instance Groups API. This contains the host and root path used as a starting point for constructing service requests.
178−resourceViewsService :: ServiceConfig
179+resourceViewsService :: Service
179resourceViewsService
180resourceViewsService
180 = defaultService (ServiceId "resourceviews:v1beta2")
181 = defaultService (ServiceId "resourceviews:v1beta2")
181 "www.googleapis.com"
182 "www.googleapis.com"
182
183
183-- | View and manage your Google Compute Engine resources
184-- | View and manage your Google Compute Engine resources
184−authComputeScope :: OAuthScope
185−authComputeScope = "https://www.googleapis.com/auth/compute";
185+authComputeScope :: Proxy '["https://www.googleapis.com/auth/compute"]
186+authComputeScope = Proxy;
186
187
187-- | View your data across Google Cloud Platform services
188-- | View your data across Google Cloud Platform services
188−authCloudPlatformReadOnlyScope :: OAuthScope
189−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
189+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
190+authCloudPlatformReadOnlyScope = Proxy;
190
191
191-- | View and manage your data across Google Cloud Platform services
192-- | View and manage your data across Google Cloud Platform services
192−authCloudPlatformScope :: OAuthScope
193−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
193+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
194+authCloudPlatformScope = Proxy;
194
195
195-- | View and manage your Google Cloud Platform management resources and
196-- | View and manage your Google Cloud Platform management resources and
196-- deployment status information
197-- deployment status information
197−authNdevCloudmanScope :: OAuthScope
198−authNdevCloudmanScope = "https://www.googleapis.com/auth/ndev.cloudman";
198+authNdevCloudmanScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman"]
199+authNdevCloudmanScope = Proxy;
199
200
200-- | View your Google Cloud Platform management resources and deployment
201-- | View your Google Cloud Platform management resources and deployment
201-- status information
202-- status information
202−authNdevCloudmanReadonlyScope :: OAuthScope
203−authNdevCloudmanReadonlyScope = "https://www.googleapis.com/auth/ndev.cloudman.readonly";
203+authNdevCloudmanReadonlyScope :: Proxy '["https://www.googleapis.com/auth/ndev.cloudman.readonly"]
204+authNdevCloudmanReadonlyScope = Proxy;
204
205
205-- | View your Google Compute Engine resources
206-- | View your Google Compute Engine resources
206−authComputeReadonlyScope :: OAuthScope
207−authComputeReadonlyScope = "https://www.googleapis.com/auth/compute.readonly";
207+authComputeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
208+authComputeReadonlyScope = Proxy;
gogol-script/gen/Network/Google/Resource/Script/Scripts/Run.hs+11
@@ -181,6 +181,17 @@ srCallback
181
181
182instance GoogleRequest ScriptsRun where
182instance GoogleRequest ScriptsRun where
183 type Rs ScriptsRun = Operation
183 type Rs ScriptsRun = Operation
184+ type Scopes ScriptsRun =
185+ '["https://mail.google.com/",
186+ "https://www.google.com/calendar/feeds",
187+ "https://www.google.com/m8/feeds",
188+ "https://www.googleapis.com/auth/admin.directory.group",
189+ "https://www.googleapis.com/auth/admin.directory.user",
190+ "https://www.googleapis.com/auth/drive",
191+ "https://www.googleapis.com/auth/forms",
192+ "https://www.googleapis.com/auth/forms.currentonly",
193+ "https://www.googleapis.com/auth/groups",
194+ "https://www.googleapis.com/auth/userinfo.email"]
184 requestClient ScriptsRun{..}
195 requestClient ScriptsRun{..}
185 = go _srScriptId _srXgafv _srUploadProtocol
196 = go _srScriptId _srXgafv _srUploadProtocol
186 (Just _srPp)
197 (Just _srPp)
gogol-script/gen/Network/Google/Script/Types.hs+22−21
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -93,47 +94,47 @@ import Network.Google.Script.Types.Product
93import Network.Google.Script.Types.Sum
94import Network.Google.Script.Types.Sum
94
95
95-- | Default request referring to version 'v1' of the Google Apps Script Execution API. This contains the host and root path used as a starting point for constructing service requests.
96-- | Default request referring to version 'v1' of the Google Apps Script Execution API. This contains the host and root path used as a starting point for constructing service requests.
96−scriptService :: ServiceConfig
97+scriptService :: Service
97scriptService
98scriptService
98 = defaultService (ServiceId "script:v1")
99 = defaultService (ServiceId "script:v1")
99 "script.googleapis.com"
100 "script.googleapis.com"
100
101
101-- | View and manage your mail
102-- | View and manage your mail
102−mailGoogleComScope :: OAuthScope
103+mailGoogleComScope :: Proxy '["https://mail.google.com/"]
103−mailGoogleComScope = "https://mail.google.com/";
104+mailGoogleComScope = Proxy;
104
105
105-- | Manage your contacts
106-- | Manage your contacts
106−m8FeedsScope :: OAuthScope
107−m8FeedsScope = "https://www.google.com/m8/feeds";
107+m8FeedsScope :: Proxy '["https://www.google.com/m8/feeds"]
108+m8FeedsScope = Proxy;
108
109
109-- | View and manage the provisioning of users on your domain
110-- | View and manage the provisioning of users on your domain
110−authAdminDirectoryUserScope :: OAuthScope
111−authAdminDirectoryUserScope = "https://www.googleapis.com/auth/admin.directory.user";
111+authAdminDirectoryUserScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.user"]
112+authAdminDirectoryUserScope = Proxy;
112
113
113-- | View your email address
114-- | View your email address
114−authUserinfoEmailScope :: OAuthScope
115−authUserinfoEmailScope = "https://www.googleapis.com/auth/userinfo.email";
115+authUserinfoEmailScope :: Proxy '["https://www.googleapis.com/auth/userinfo.email"]
116+authUserinfoEmailScope = Proxy;
116
117
117-- | View and manage forms that this application has been installed in
118-- | View and manage forms that this application has been installed in
118−authFormsCurrentonlyScope :: OAuthScope
119−authFormsCurrentonlyScope = "https://www.googleapis.com/auth/forms.currentonly";
119+authFormsCurrentonlyScope :: Proxy '["https://www.googleapis.com/auth/forms.currentonly"]
120+authFormsCurrentonlyScope = Proxy;
120
121
121-- | View and manage the files in your Google Drive
122-- | View and manage the files in your Google Drive
122−authDriveScope :: OAuthScope
123−authDriveScope = "https://www.googleapis.com/auth/drive";
123+authDriveScope :: Proxy '["https://www.googleapis.com/auth/drive"]
124+authDriveScope = Proxy;
124
125
125-- | View and manage the provisioning of groups on your domain
126-- | View and manage the provisioning of groups on your domain
126−authAdminDirectoryGroupScope :: OAuthScope
127−authAdminDirectoryGroupScope = "https://www.googleapis.com/auth/admin.directory.group";
127+authAdminDirectoryGroupScope :: Proxy '["https://www.googleapis.com/auth/admin.directory.group"]
128+authAdminDirectoryGroupScope = Proxy;
128
129
129-- | Manage your calendars
130-- | Manage your calendars
130−calendarFeedsScope :: OAuthScope
131−calendarFeedsScope = "https://www.google.com/calendar/feeds";
131+calendarFeedsScope :: Proxy '["https://www.google.com/calendar/feeds"]
132+calendarFeedsScope = Proxy;
132
133
133-- | View and manage your forms in Google Drive
134-- | View and manage your forms in Google Drive
134−authFormsScope :: OAuthScope
135−authFormsScope = "https://www.googleapis.com/auth/forms";
135+authFormsScope :: Proxy '["https://www.googleapis.com/auth/forms"]
136+authFormsScope = Proxy;
136
137
137-- | View and manage your Google Groups
138-- | View and manage your Google Groups
138−authGroupsScope :: OAuthScope
139−authGroupsScope = "https://www.googleapis.com/auth/groups";
139+authGroupsScope :: Proxy '["https://www.googleapis.com/auth/groups"]
140+authGroupsScope = Proxy;
gogol-shopping-content/gen/Network/Google/ShoppingContent/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -1283,11 +1284,11 @@ import Network.Google.ShoppingContent.Types.Product
1283import Network.Google.ShoppingContent.Types.Sum
1284import Network.Google.ShoppingContent.Types.Sum
1284
1285
1285-- | Default request referring to version 'v2' of the Content API for Shopping. This contains the host and root path used as a starting point for constructing service requests.
1286-- | Default request referring to version 'v2' of the Content API for Shopping. This contains the host and root path used as a starting point for constructing service requests.
1286−shoppingContentService :: ServiceConfig
1287+shoppingContentService :: Service
1287shoppingContentService
1288shoppingContentService
1288 = defaultService (ServiceId "content:v2")
1289 = defaultService (ServiceId "content:v2")
1289 "www.googleapis.com"
1290 "www.googleapis.com"
1290
1291
1291-- | Manage your product listings and accounts for Google Shopping
1292-- | Manage your product listings and accounts for Google Shopping
1292−authContentScope :: OAuthScope
1293−authContentScope = "https://www.googleapis.com/auth/content";
1293+authContentScope :: Proxy '["https://www.googleapis.com/auth/content"]
1294+authContentScope = Proxy;
gogol-siteverification/gen/Network/Google/SiteVerification/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -64,15 +65,15 @@ import Network.Google.SiteVerification.Types.Product
64import Network.Google.SiteVerification.Types.Sum
65import Network.Google.SiteVerification.Types.Sum
65
66
66-- | Default request referring to version 'v1' of the Google Site Verification API. This contains the host and root path used as a starting point for constructing service requests.
67-- | Default request referring to version 'v1' of the Google Site Verification API. This contains the host and root path used as a starting point for constructing service requests.
67−siteVerificationService :: ServiceConfig
68+siteVerificationService :: Service
68siteVerificationService
69siteVerificationService
69 = defaultService (ServiceId "siteVerification:v1")
70 = defaultService (ServiceId "siteVerification:v1")
70 "www.googleapis.com"
71 "www.googleapis.com"
71
72
72-- | Manage your new site verifications with Google
73-- | Manage your new site verifications with Google
73−authSiteverificationVerifyOnlyScope :: OAuthScope
74−authSiteverificationVerifyOnlyScope = "https://www.googleapis.com/auth/siteverification.verify_only";
74+authSiteverificationVerifyOnlyScope :: Proxy '["https://www.googleapis.com/auth/siteverification.verify_only"]
75+authSiteverificationVerifyOnlyScope = Proxy;
75
76
76-- | Manage the list of sites and domains you control
77-- | Manage the list of sites and domains you control
77−authSiteverificationScope :: OAuthScope
78−authSiteverificationScope = "https://www.googleapis.com/auth/siteverification";
78+authSiteverificationScope :: Proxy '["https://www.googleapis.com/auth/siteverification"]
79+authSiteverificationScope = Proxy;
gogol-spectrum/gen/Network/Google/Spectrum/Types.hs+1−1
@@ -293,7 +293,7 @@ import Network.Google.Spectrum.Types.Product
293import Network.Google.Spectrum.Types.Sum
293import Network.Google.Spectrum.Types.Sum
294
294
295-- | Default request referring to version 'v1explorer' of the Google Spectrum Database API. This contains the host and root path used as a starting point for constructing service requests.
295-- | Default request referring to version 'v1explorer' of the Google Spectrum Database API. This contains the host and root path used as a starting point for constructing service requests.
296−spectrumService :: ServiceConfig
296+spectrumService :: Service
297spectrumService
297spectrumService
298 = defaultService (ServiceId "spectrum:v1explorer")
298 = defaultService (ServiceId "spectrum:v1explorer")
299 "www.googleapis.com"
299 "www.googleapis.com"
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -425,15 +426,15 @@ import Network.Google.SQLAdmin.Types.Product
425import Network.Google.SQLAdmin.Types.Sum
426import Network.Google.SQLAdmin.Types.Sum
426
427
427-- | Default request referring to version 'v1beta4' of the Cloud SQL Administration API. This contains the host and root path used as a starting point for constructing service requests.
428-- | Default request referring to version 'v1beta4' of the Cloud SQL Administration API. This contains the host and root path used as a starting point for constructing service requests.
428−sQLAdminService :: ServiceConfig
429+sQLAdminService :: Service
429sQLAdminService
430sQLAdminService
430 = defaultService (ServiceId "sqladmin:v1beta4")
431 = defaultService (ServiceId "sqladmin:v1beta4")
431 "www.googleapis.com"
432 "www.googleapis.com"
432
433
433-- | Manage your Google SQL Service instances
434-- | Manage your Google SQL Service instances
434−authSqlserviceAdminScope :: OAuthScope
435−authSqlserviceAdminScope = "https://www.googleapis.com/auth/sqlservice.admin";
435+authSqlserviceAdminScope :: Proxy '["https://www.googleapis.com/auth/sqlservice.admin"]
436+authSqlserviceAdminScope = Proxy;
436
437
437-- | View and manage your data across Google Cloud Platform services
438-- | View and manage your data across Google Cloud Platform services
438−authCloudPlatformScope :: OAuthScope
439−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
439+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
440+authCloudPlatformScope = Proxy;
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -222,11 +223,11 @@ import Network.Google.StorageTransfer.Types.Product
222import Network.Google.StorageTransfer.Types.Sum
223import Network.Google.StorageTransfer.Types.Sum
223
224
224-- | Default request referring to version 'v1' of the Google Storage Transfer API. This contains the host and root path used as a starting point for constructing service requests.
225-- | Default request referring to version 'v1' of the Google Storage Transfer API. This contains the host and root path used as a starting point for constructing service requests.
225−storageTransferService :: ServiceConfig
226+storageTransferService :: Service
226storageTransferService
227storageTransferService
227 = defaultService (ServiceId "storagetransfer:v1")
228 = defaultService (ServiceId "storagetransfer:v1")
228 "storagetransfer.googleapis.com"
229 "storagetransfer.googleapis.com"
229
230
230-- | View and manage your data across Google Cloud Platform services
231-- | View and manage your data across Google Cloud Platform services
231−authCloudPlatformScope :: OAuthScope
232−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
232+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
233+authCloudPlatformScope = Proxy;
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Delete.hs+2−1
@@ -94,7 +94,8 @@ instance GoogleRequest BucketAccessControlsDelete
94 where
94 where
95 type Rs BucketAccessControlsDelete = ()
95 type Rs BucketAccessControlsDelete = ()
96 type Scopes BucketAccessControlsDelete =
96 type Scopes BucketAccessControlsDelete =
97− '["https://www.googleapis.com/auth/devstorage.full_control"]
97+ '["https://www.googleapis.com/auth/cloud-platform",
98+ "https://www.googleapis.com/auth/devstorage.full_control"]
98 requestClient BucketAccessControlsDelete{..}
99 requestClient BucketAccessControlsDelete{..}
99 = go _bacdBucket _bacdEntity (Just AltJSON)
100 = go _bacdBucket _bacdEntity (Just AltJSON)
100 storageService
101 storageService
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Get.hs+2−1
@@ -92,7 +92,8 @@ bacgEntity
92instance GoogleRequest BucketAccessControlsGet where
92instance GoogleRequest BucketAccessControlsGet where
93 type Rs BucketAccessControlsGet = BucketAccessControl
93 type Rs BucketAccessControlsGet = BucketAccessControl
94 type Scopes BucketAccessControlsGet =
94 type Scopes BucketAccessControlsGet =
95− '["https://www.googleapis.com/auth/devstorage.full_control"]
95+ '["https://www.googleapis.com/auth/cloud-platform",
96+ "https://www.googleapis.com/auth/devstorage.full_control"]
96 requestClient BucketAccessControlsGet{..}
97 requestClient BucketAccessControlsGet{..}
97 = go _bacgBucket _bacgEntity (Just AltJSON)
98 = go _bacgBucket _bacgEntity (Just AltJSON)
98 storageService
99 storageService
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Insert.hs+2−1
@@ -92,7 +92,8 @@ instance GoogleRequest BucketAccessControlsInsert
92 type Rs BucketAccessControlsInsert =
92 type Rs BucketAccessControlsInsert =
93 BucketAccessControl
93 BucketAccessControl
94 type Scopes BucketAccessControlsInsert =
94 type Scopes BucketAccessControlsInsert =
95− '["https://www.googleapis.com/auth/devstorage.full_control"]
95+ '["https://www.googleapis.com/auth/cloud-platform",
96+ "https://www.googleapis.com/auth/devstorage.full_control"]
96 requestClient BucketAccessControlsInsert{..}
97 requestClient BucketAccessControlsInsert{..}
97 = go _baciBucket (Just AltJSON) _baciPayload
98 = go _baciBucket (Just AltJSON) _baciPayload
98 storageService
99 storageService
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/List.hs+2−1
@@ -79,7 +79,8 @@ instance GoogleRequest BucketAccessControlsList where
79 type Rs BucketAccessControlsList =
79 type Rs BucketAccessControlsList =
80 BucketAccessControls
80 BucketAccessControls
81 type Scopes BucketAccessControlsList =
81 type Scopes BucketAccessControlsList =
82− '["https://www.googleapis.com/auth/devstorage.full_control"]
82+ '["https://www.googleapis.com/auth/cloud-platform",
83+ "https://www.googleapis.com/auth/devstorage.full_control"]
83 requestClient BucketAccessControlsList{..}
84 requestClient BucketAccessControlsList{..}
84 = go _baclBucket (Just AltJSON) storageService
85 = go _baclBucket (Just AltJSON) storageService
85 where go
86 where go
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Patch.hs+2−1
@@ -108,7 +108,8 @@ instance GoogleRequest BucketAccessControlsPatch
108 type Rs BucketAccessControlsPatch =
108 type Rs BucketAccessControlsPatch =
109 BucketAccessControl
109 BucketAccessControl
110 type Scopes BucketAccessControlsPatch =
110 type Scopes BucketAccessControlsPatch =
111− '["https://www.googleapis.com/auth/devstorage.full_control"]
111+ '["https://www.googleapis.com/auth/cloud-platform",
112+ "https://www.googleapis.com/auth/devstorage.full_control"]
112 requestClient BucketAccessControlsPatch{..}
113 requestClient BucketAccessControlsPatch{..}
113 = go _bacpBucket _bacpEntity (Just AltJSON)
114 = go _bacpBucket _bacpEntity (Just AltJSON)
114 _bacpPayload
115 _bacpPayload
gogol-storage/gen/Network/Google/Resource/Storage/BucketAccessControls/Update.hs+2−1
@@ -106,7 +106,8 @@ instance GoogleRequest BucketAccessControlsUpdate
106 type Rs BucketAccessControlsUpdate =
106 type Rs BucketAccessControlsUpdate =
107 BucketAccessControl
107 BucketAccessControl
108 type Scopes BucketAccessControlsUpdate =
108 type Scopes BucketAccessControlsUpdate =
109− '["https://www.googleapis.com/auth/devstorage.full_control"]
109+ '["https://www.googleapis.com/auth/cloud-platform",
110+ "https://www.googleapis.com/auth/devstorage.full_control"]
110 requestClient BucketAccessControlsUpdate{..}
111 requestClient BucketAccessControlsUpdate{..}
111 = go _bacuBucket _bacuEntity (Just AltJSON)
112 = go _bacuBucket _bacuEntity (Just AltJSON)
112 _bacuPayload
113 _bacuPayload
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Delete.hs+2−1
@@ -94,7 +94,8 @@ instance GoogleRequest
94 DefaultObjectAccessControlsDelete where
94 DefaultObjectAccessControlsDelete where
95 type Rs DefaultObjectAccessControlsDelete = ()
95 type Rs DefaultObjectAccessControlsDelete = ()
96 type Scopes DefaultObjectAccessControlsDelete =
96 type Scopes DefaultObjectAccessControlsDelete =
97− '["https://www.googleapis.com/auth/devstorage.full_control"]
97+ '["https://www.googleapis.com/auth/cloud-platform",
98+ "https://www.googleapis.com/auth/devstorage.full_control"]
98 requestClient DefaultObjectAccessControlsDelete{..}
99 requestClient DefaultObjectAccessControlsDelete{..}
99 = go _doacdBucket _doacdEntity (Just AltJSON)
100 = go _doacdBucket _doacdEntity (Just AltJSON)
100 storageService
101 storageService
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Get.hs+2−1
@@ -96,7 +96,8 @@ instance GoogleRequest DefaultObjectAccessControlsGet
96 type Rs DefaultObjectAccessControlsGet =
96 type Rs DefaultObjectAccessControlsGet =
97 ObjectAccessControl
97 ObjectAccessControl
98 type Scopes DefaultObjectAccessControlsGet =
98 type Scopes DefaultObjectAccessControlsGet =
99− '["https://www.googleapis.com/auth/devstorage.full_control"]
99+ '["https://www.googleapis.com/auth/cloud-platform",
100+ "https://www.googleapis.com/auth/devstorage.full_control"]
100 requestClient DefaultObjectAccessControlsGet{..}
101 requestClient DefaultObjectAccessControlsGet{..}
101 = go _doacgBucket _doacgEntity (Just AltJSON)
102 = go _doacgBucket _doacgEntity (Just AltJSON)
102 storageService
103 storageService
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Insert.hs+2−1
@@ -92,7 +92,8 @@ instance GoogleRequest
92 type Rs DefaultObjectAccessControlsInsert =
92 type Rs DefaultObjectAccessControlsInsert =
93 ObjectAccessControl
93 ObjectAccessControl
94 type Scopes DefaultObjectAccessControlsInsert =
94 type Scopes DefaultObjectAccessControlsInsert =
95− '["https://www.googleapis.com/auth/devstorage.full_control"]
95+ '["https://www.googleapis.com/auth/cloud-platform",
96+ "https://www.googleapis.com/auth/devstorage.full_control"]
96 requestClient DefaultObjectAccessControlsInsert{..}
97 requestClient DefaultObjectAccessControlsInsert{..}
97 = go _doaciBucket (Just AltJSON) _doaciPayload
98 = go _doaciBucket (Just AltJSON) _doaciPayload
98 storageService
99 storageService
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/List.hs+2−1
@@ -109,7 +109,8 @@ instance GoogleRequest
109 type Rs DefaultObjectAccessControlsList =
109 type Rs DefaultObjectAccessControlsList =
110 ObjectAccessControls
110 ObjectAccessControls
111 type Scopes DefaultObjectAccessControlsList =
111 type Scopes DefaultObjectAccessControlsList =
112− '["https://www.googleapis.com/auth/devstorage.full_control"]
112+ '["https://www.googleapis.com/auth/cloud-platform",
113+ "https://www.googleapis.com/auth/devstorage.full_control"]
113 requestClient DefaultObjectAccessControlsList{..}
114 requestClient DefaultObjectAccessControlsList{..}
114 = go _doaclBucket _doaclIfMetagenerationMatch
115 = go _doaclBucket _doaclIfMetagenerationMatch
115 _doaclIfMetagenerationNotMatch
116 _doaclIfMetagenerationNotMatch
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Patch.hs+2−1
@@ -108,7 +108,8 @@ instance GoogleRequest
108 type Rs DefaultObjectAccessControlsPatch =
108 type Rs DefaultObjectAccessControlsPatch =
109 ObjectAccessControl
109 ObjectAccessControl
110 type Scopes DefaultObjectAccessControlsPatch =
110 type Scopes DefaultObjectAccessControlsPatch =
111− '["https://www.googleapis.com/auth/devstorage.full_control"]
111+ '["https://www.googleapis.com/auth/cloud-platform",
112+ "https://www.googleapis.com/auth/devstorage.full_control"]
112 requestClient DefaultObjectAccessControlsPatch{..}
113 requestClient DefaultObjectAccessControlsPatch{..}
113 = go _doacpBucket _doacpEntity (Just AltJSON)
114 = go _doacpBucket _doacpEntity (Just AltJSON)
114 _doacpPayload
115 _doacpPayload
gogol-storage/gen/Network/Google/Resource/Storage/DefaultObjectAccessControls/Update.hs+2−1
@@ -106,7 +106,8 @@ instance GoogleRequest
106 type Rs DefaultObjectAccessControlsUpdate =
106 type Rs DefaultObjectAccessControlsUpdate =
107 ObjectAccessControl
107 ObjectAccessControl
108 type Scopes DefaultObjectAccessControlsUpdate =
108 type Scopes DefaultObjectAccessControlsUpdate =
109− '["https://www.googleapis.com/auth/devstorage.full_control"]
109+ '["https://www.googleapis.com/auth/cloud-platform",
110+ "https://www.googleapis.com/auth/devstorage.full_control"]
110 requestClient DefaultObjectAccessControlsUpdate{..}
111 requestClient DefaultObjectAccessControlsUpdate{..}
111 = go _doacuBucket _doacuEntity (Just AltJSON)
112 = go _doacuBucket _doacuEntity (Just AltJSON)
112 _doacuPayload
113 _doacuPayload
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Delete.hs+2−1
@@ -122,7 +122,8 @@ instance GoogleRequest ObjectAccessControlsDelete
122 where
122 where
123 type Rs ObjectAccessControlsDelete = ()
123 type Rs ObjectAccessControlsDelete = ()
124 type Scopes ObjectAccessControlsDelete =
124 type Scopes ObjectAccessControlsDelete =
125− '["https://www.googleapis.com/auth/devstorage.full_control"]
125+ '["https://www.googleapis.com/auth/cloud-platform",
126+ "https://www.googleapis.com/auth/devstorage.full_control"]
126 requestClient ObjectAccessControlsDelete{..}
127 requestClient ObjectAccessControlsDelete{..}
127 = go _oacdBucket _oacdObject _oacdEntity
128 = go _oacdBucket _oacdObject _oacdEntity
128 _oacdGeneration
129 _oacdGeneration
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Get.hs+2−1
@@ -120,7 +120,8 @@ oacgGeneration
120instance GoogleRequest ObjectAccessControlsGet where
120instance GoogleRequest ObjectAccessControlsGet where
121 type Rs ObjectAccessControlsGet = ObjectAccessControl
121 type Rs ObjectAccessControlsGet = ObjectAccessControl
122 type Scopes ObjectAccessControlsGet =
122 type Scopes ObjectAccessControlsGet =
123− '["https://www.googleapis.com/auth/devstorage.full_control"]
123+ '["https://www.googleapis.com/auth/cloud-platform",
124+ "https://www.googleapis.com/auth/devstorage.full_control"]
124 requestClient ObjectAccessControlsGet{..}
125 requestClient ObjectAccessControlsGet{..}
125 = go _oacgBucket _oacgObject _oacgEntity
126 = go _oacgBucket _oacgObject _oacgEntity
126 _oacgGeneration
127 _oacgGeneration
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Insert.hs+2−1
@@ -120,7 +120,8 @@ instance GoogleRequest ObjectAccessControlsInsert
120 type Rs ObjectAccessControlsInsert =
120 type Rs ObjectAccessControlsInsert =
121 ObjectAccessControl
121 ObjectAccessControl
122 type Scopes ObjectAccessControlsInsert =
122 type Scopes ObjectAccessControlsInsert =
123− '["https://www.googleapis.com/auth/devstorage.full_control"]
123+ '["https://www.googleapis.com/auth/cloud-platform",
124+ "https://www.googleapis.com/auth/devstorage.full_control"]
124 requestClient ObjectAccessControlsInsert{..}
125 requestClient ObjectAccessControlsInsert{..}
125 = go _oaciBucket _oaciObject _oaciGeneration
126 = go _oaciBucket _oaciObject _oaciGeneration
126 (Just AltJSON)
127 (Just AltJSON)
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/List.hs+2−1
@@ -107,7 +107,8 @@ instance GoogleRequest ObjectAccessControlsList where
107 type Rs ObjectAccessControlsList =
107 type Rs ObjectAccessControlsList =
108 ObjectAccessControls
108 ObjectAccessControls
109 type Scopes ObjectAccessControlsList =
109 type Scopes ObjectAccessControlsList =
110− '["https://www.googleapis.com/auth/devstorage.full_control"]
110+ '["https://www.googleapis.com/auth/cloud-platform",
111+ "https://www.googleapis.com/auth/devstorage.full_control"]
111 requestClient ObjectAccessControlsList{..}
112 requestClient ObjectAccessControlsList{..}
112 = go _oaclBucket _oaclObject _oaclGeneration
113 = go _oaclBucket _oaclObject _oaclGeneration
113 (Just AltJSON)
114 (Just AltJSON)
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Patch.hs+2−1
@@ -136,7 +136,8 @@ instance GoogleRequest ObjectAccessControlsPatch
136 type Rs ObjectAccessControlsPatch =
136 type Rs ObjectAccessControlsPatch =
137 ObjectAccessControl
137 ObjectAccessControl
138 type Scopes ObjectAccessControlsPatch =
138 type Scopes ObjectAccessControlsPatch =
139− '["https://www.googleapis.com/auth/devstorage.full_control"]
139+ '["https://www.googleapis.com/auth/cloud-platform",
140+ "https://www.googleapis.com/auth/devstorage.full_control"]
140 requestClient ObjectAccessControlsPatch{..}
141 requestClient ObjectAccessControlsPatch{..}
141 = go _oacpBucket _oacpObject _oacpEntity
142 = go _oacpBucket _oacpObject _oacpEntity
142 _oacpGeneration
143 _oacpGeneration
gogol-storage/gen/Network/Google/Resource/Storage/ObjectAccessControls/Update.hs+2−1
@@ -134,7 +134,8 @@ instance GoogleRequest ObjectAccessControlsUpdate
134 type Rs ObjectAccessControlsUpdate =
134 type Rs ObjectAccessControlsUpdate =
135 ObjectAccessControl
135 ObjectAccessControl
136 type Scopes ObjectAccessControlsUpdate =
136 type Scopes ObjectAccessControlsUpdate =
137− '["https://www.googleapis.com/auth/devstorage.full_control"]
137+ '["https://www.googleapis.com/auth/cloud-platform",
138+ "https://www.googleapis.com/auth/devstorage.full_control"]
138 requestClient ObjectAccessControlsUpdate{..}
139 requestClient ObjectAccessControlsUpdate{..}
139 = go _oacuBucket _oacuObject _oacuEntity
140 = go _oacuBucket _oacuObject _oacuEntity
140 _oacuGeneration
141 _oacuGeneration
gogol-storage/gen/Network/Google/Storage/Types.hs+12−11
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -350,27 +351,27 @@ import Network.Google.Storage.Types.Product
350import Network.Google.Storage.Types.Sum
351import Network.Google.Storage.Types.Sum
351
352
352-- | Default request referring to version 'v1' of the Cloud Storage JSON API. This contains the host and root path used as a starting point for constructing service requests.
353-- | Default request referring to version 'v1' of the Cloud Storage JSON API. This contains the host and root path used as a starting point for constructing service requests.
353−storageService :: ServiceConfig
354+storageService :: Service
354storageService
355storageService
355 = defaultService (ServiceId "storage:v1")
356 = defaultService (ServiceId "storage:v1")
356 "www.googleapis.com"
357 "www.googleapis.com"
357
358
358-- | View your data across Google Cloud Platform services
359-- | View your data across Google Cloud Platform services
359−authCloudPlatformReadOnlyScope :: OAuthScope
360−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
360+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
361+authCloudPlatformReadOnlyScope = Proxy;
361
362
362-- | View and manage your data across Google Cloud Platform services
363-- | View and manage your data across Google Cloud Platform services
363−authCloudPlatformScope :: OAuthScope
364−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
364+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
365+authCloudPlatformScope = Proxy;
365
366
366-- | View your data in Google Cloud Storage
367-- | View your data in Google Cloud Storage
367−authDevstorageReadOnlyScope :: OAuthScope
368−authDevstorageReadOnlyScope = "https://www.googleapis.com/auth/devstorage.read_only";
368+authDevstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
369+authDevstorageReadOnlyScope = Proxy;
369
370
370-- | Manage your data in Google Cloud Storage
371-- | Manage your data in Google Cloud Storage
371−authDevstorageReadWriteScope :: OAuthScope
372−authDevstorageReadWriteScope = "https://www.googleapis.com/auth/devstorage.read_write";
372+authDevstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
373+authDevstorageReadWriteScope = Proxy;
373
374
374-- | Manage your data and permissions in Google Cloud Storage
375-- | Manage your data and permissions in Google Cloud Storage
375−authDevstorageFullControlScope :: OAuthScope
376−authDevstorageFullControlScope = "https://www.googleapis.com/auth/devstorage.full_control";
376+authDevstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
377+authDevstorageFullControlScope = Proxy;
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Create.hs+2
@@ -106,6 +106,8 @@ instance GoogleRequest
106 AccountsContainersEnvironmentsCreate where
106 AccountsContainersEnvironmentsCreate where
107 type Rs AccountsContainersEnvironmentsCreate =
107 type Rs AccountsContainersEnvironmentsCreate =
108 Environment
108 Environment
109+ type Scopes AccountsContainersEnvironmentsCreate =
110+ '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
109 requestClient
111 requestClient
110 AccountsContainersEnvironmentsCreate{..}
112 AccountsContainersEnvironmentsCreate{..}
111 = go _acecAccountId _acecContainerId (Just AltJSON)
113 = go _acecAccountId _acecContainerId (Just AltJSON)
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Delete.hs+2
@@ -105,6 +105,8 @@ acedEnvironmentId
105instance GoogleRequest
105instance GoogleRequest
106 AccountsContainersEnvironmentsDelete where
106 AccountsContainersEnvironmentsDelete where
107 type Rs AccountsContainersEnvironmentsDelete = ()
107 type Rs AccountsContainersEnvironmentsDelete = ()
108+ type Scopes AccountsContainersEnvironmentsDelete =
109+ '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
108 requestClient
110 requestClient
109 AccountsContainersEnvironmentsDelete{..}
111 AccountsContainersEnvironmentsDelete{..}
110 = go _acedAccountId _acedContainerId
112 = go _acedAccountId _acedContainerId
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Get.hs+3
@@ -106,6 +106,9 @@ instance GoogleRequest
106 AccountsContainersEnvironmentsGet where
106 AccountsContainersEnvironmentsGet where
107 type Rs AccountsContainersEnvironmentsGet =
107 type Rs AccountsContainersEnvironmentsGet =
108 Environment
108 Environment
109+ type Scopes AccountsContainersEnvironmentsGet =
110+ '["https://www.googleapis.com/auth/tagmanager.edit.containers",
111+ "https://www.googleapis.com/auth/tagmanager.readonly"]
109 requestClient AccountsContainersEnvironmentsGet{..}
112 requestClient AccountsContainersEnvironmentsGet{..}
110 = go _acegAccountId _acegContainerId
113 = go _acegAccountId _acegContainerId
111 _acegEnvironmentId
114 _acegEnvironmentId
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/List.hs+3
@@ -94,6 +94,9 @@ instance GoogleRequest
94 AccountsContainersEnvironmentsList where
94 AccountsContainersEnvironmentsList where
95 type Rs AccountsContainersEnvironmentsList =
95 type Rs AccountsContainersEnvironmentsList =
96 ListEnvironmentsResponse
96 ListEnvironmentsResponse
97+ type Scopes AccountsContainersEnvironmentsList =
98+ '["https://www.googleapis.com/auth/tagmanager.edit.containers",
99+ "https://www.googleapis.com/auth/tagmanager.readonly"]
97 requestClient AccountsContainersEnvironmentsList{..}
100 requestClient AccountsContainersEnvironmentsList{..}
98 = go _acelAccountId _acelContainerId (Just AltJSON)
101 = go _acelAccountId _acelContainerId (Just AltJSON)
99 tagManagerService
102 tagManagerService
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Patch.hs+2
@@ -132,6 +132,8 @@ instance GoogleRequest
132 AccountsContainersEnvironmentsPatch where
132 AccountsContainersEnvironmentsPatch where
133 type Rs AccountsContainersEnvironmentsPatch =
133 type Rs AccountsContainersEnvironmentsPatch =
134 Environment
134 Environment
135+ type Scopes AccountsContainersEnvironmentsPatch =
136+ '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
135 requestClient AccountsContainersEnvironmentsPatch{..}
137 requestClient AccountsContainersEnvironmentsPatch{..}
136 = go _acepAccountId _acepContainerId
138 = go _acepAccountId _acepContainerId
137 _acepEnvironmentId
139 _acepEnvironmentId
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Update.hs+2
@@ -132,6 +132,8 @@ instance GoogleRequest
132 AccountsContainersEnvironmentsUpdate where
132 AccountsContainersEnvironmentsUpdate where
133 type Rs AccountsContainersEnvironmentsUpdate =
133 type Rs AccountsContainersEnvironmentsUpdate =
134 Environment
134 Environment
135+ type Scopes AccountsContainersEnvironmentsUpdate =
136+ '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
135 requestClient
137 requestClient
136 AccountsContainersEnvironmentsUpdate{..}
138 AccountsContainersEnvironmentsUpdate{..}
137 = go _aceuAccountId _aceuContainerId
139 = go _aceuAccountId _aceuContainerId
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/MoveFolders/Update.hs+2−1
@@ -158,7 +158,8 @@ acmfuTagId
158instance GoogleRequest
158instance GoogleRequest
159 AccountsContainersMoveFoldersUpdate where
159 AccountsContainersMoveFoldersUpdate where
160 type Rs AccountsContainersMoveFoldersUpdate = ()
160 type Rs AccountsContainersMoveFoldersUpdate = ()
161− type Scopes AccountsContainersMoveFoldersUpdate = '[]
161+ type Scopes AccountsContainersMoveFoldersUpdate =
162+ '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
162 requestClient AccountsContainersMoveFoldersUpdate{..}
163 requestClient AccountsContainersMoveFoldersUpdate{..}
163 = go _acmfuAccountId _acmfuContainerId _acmfuFolderId
164 = go _acmfuAccountId _acmfuContainerId _acmfuFolderId
164 (_acmfuTriggerId ^. _Default)
165 (_acmfuTriggerId ^. _Default)
gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/ReauthorizeEnvironments/Update.hs+4
@@ -121,6 +121,10 @@ instance GoogleRequest
121 type Rs
121 type Rs
122 AccountsContainersReauthorizeEnvironmentsUpdate
122 AccountsContainersReauthorizeEnvironmentsUpdate
123 = Environment
123 = Environment
124+ type Scopes
125+ AccountsContainersReauthorizeEnvironmentsUpdate
126+ =
127+ '["https://www.googleapis.com/auth/tagmanager.publish"]
124 requestClient
128 requestClient
125 AccountsContainersReauthorizeEnvironmentsUpdate{..}
129 AccountsContainersReauthorizeEnvironmentsUpdate{..}
126 = go _acreuAccountId _acreuContainerId
130 = go _acreuAccountId _acreuContainerId
gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+16−15
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -351,35 +352,35 @@ import Network.Google.TagManager.Types.Product
351import Network.Google.TagManager.Types.Sum
352import Network.Google.TagManager.Types.Sum
352
353
353-- | Default request referring to version 'v1' of the Tag Manager API. This contains the host and root path used as a starting point for constructing service requests.
354-- | Default request referring to version 'v1' of the Tag Manager API. This contains the host and root path used as a starting point for constructing service requests.
354−tagManagerService :: ServiceConfig
355+tagManagerService :: Service
355tagManagerService
356tagManagerService
356 = defaultService (ServiceId "tagmanager:v1")
357 = defaultService (ServiceId "tagmanager:v1")
357 "www.googleapis.com"
358 "www.googleapis.com"
358
359
359-- | View your Google Tag Manager containers
360-- | View your Google Tag Manager containers
360−authTagmanagerReadonlyScope :: OAuthScope
361−authTagmanagerReadonlyScope = "https://www.googleapis.com/auth/tagmanager.readonly";
361+authTagmanagerReadonlyScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.readonly"]
362+authTagmanagerReadonlyScope = Proxy;
362
363
363-- | Manage your Google Tag Manager containers
364-- | Manage your Google Tag Manager containers
364−authTagmanagerEditContainersScope :: OAuthScope
365−authTagmanagerEditContainersScope = "https://www.googleapis.com/auth/tagmanager.edit.containers";
365+authTagmanagerEditContainersScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.edit.containers"]
366+authTagmanagerEditContainersScope = Proxy;
366
367
367-- | Manage your Google Tag Manager accounts
368-- | Manage your Google Tag Manager accounts
368−authTagmanagerManageAccountsScope :: OAuthScope
369−authTagmanagerManageAccountsScope = "https://www.googleapis.com/auth/tagmanager.manage.accounts";
369+authTagmanagerManageAccountsScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.manage.accounts"]
370+authTagmanagerManageAccountsScope = Proxy;
370
371
371-- | Delete your Google Tag Manager containers
372-- | Delete your Google Tag Manager containers
372−authTagmanagerDeleteContainersScope :: OAuthScope
373−authTagmanagerDeleteContainersScope = "https://www.googleapis.com/auth/tagmanager.delete.containers";
373+authTagmanagerDeleteContainersScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.delete.containers"]
374+authTagmanagerDeleteContainersScope = Proxy;
374
375
375-- | Manage user permissions of your Google Tag Manager data
376-- | Manage user permissions of your Google Tag Manager data
376−authTagmanagerManageUsersScope :: OAuthScope
377−authTagmanagerManageUsersScope = "https://www.googleapis.com/auth/tagmanager.manage.users";
377+authTagmanagerManageUsersScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.manage.users"]
378+authTagmanagerManageUsersScope = Proxy;
378
379
379-- | Publish your Google Tag Manager containers
380-- | Publish your Google Tag Manager containers
380−authTagmanagerPublishScope :: OAuthScope
381−authTagmanagerPublishScope = "https://www.googleapis.com/auth/tagmanager.publish";
381+authTagmanagerPublishScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.publish"]
382+authTagmanagerPublishScope = Proxy;
382
383
383-- | Manage your Google Tag Manager container versions
384-- | Manage your Google Tag Manager container versions
384−authTagmanagerEditContainerversionsScope :: OAuthScope
385−authTagmanagerEditContainerversionsScope = "https://www.googleapis.com/auth/tagmanager.edit.containerversions";
385+authTagmanagerEditContainerversionsScope :: Proxy '["https://www.googleapis.com/auth/tagmanager.edit.containerversions"]
386+authTagmanagerEditContainerversionsScope = Proxy;
gogol-taskqueue/gen/Network/Google/TaskQueue/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -76,15 +77,15 @@ import Network.Google.TaskQueue.Types.Product
76import Network.Google.TaskQueue.Types.Sum
77import Network.Google.TaskQueue.Types.Sum
77
78
78-- | Default request referring to version 'v1beta2' of the TaskQueue API. This contains the host and root path used as a starting point for constructing service requests.
79-- | Default request referring to version 'v1beta2' of the TaskQueue API. This contains the host and root path used as a starting point for constructing service requests.
79−taskQueueService :: ServiceConfig
80+taskQueueService :: Service
80taskQueueService
81taskQueueService
81 = defaultService (ServiceId "taskqueue:v1beta2")
82 = defaultService (ServiceId "taskqueue:v1beta2")
82 "www.googleapis.com"
83 "www.googleapis.com"
83
84
84-- | Consume Tasks from your Taskqueues
85-- | Consume Tasks from your Taskqueues
85−authTaskqueueConsumerScope :: OAuthScope
86−authTaskqueueConsumerScope = "https://www.googleapis.com/auth/taskqueue.consumer";
86+authTaskqueueConsumerScope :: Proxy '["https://www.googleapis.com/auth/taskqueue.consumer"]
87+authTaskqueueConsumerScope = Proxy;
87
88
88-- | Manage your Tasks and Taskqueues
89-- | Manage your Tasks and Taskqueues
89−authTaskqueueScope :: OAuthScope
90−authTaskqueueScope = "https://www.googleapis.com/auth/taskqueue";
90+authTaskqueueScope :: Proxy '["https://www.googleapis.com/auth/taskqueue"]
91+authTaskqueueScope = Proxy;
gogol-translate/gen/Network/Google/Translate/Types.hs+1−1
@@ -62,7 +62,7 @@ import Network.Google.Translate.Types.Product
62import Network.Google.Translate.Types.Sum
62import Network.Google.Translate.Types.Sum
63
63
64-- | Default request referring to version 'v2' of the Translate API. This contains the host and root path used as a starting point for constructing service requests.
64-- | Default request referring to version 'v2' of the Translate API. This contains the host and root path used as a starting point for constructing service requests.
65−translateService :: ServiceConfig
65+translateService :: Service
66translateService
66translateService
67 = defaultService (ServiceId "translate:v2")
67 = defaultService (ServiceId "translate:v2")
68 "www.googleapis.com"
68 "www.googleapis.com"
gogol-urlshortener/gen/Network/Google/URLShortener/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -77,11 +78,11 @@ import Network.Google.URLShortener.Types.Product
77import Network.Google.URLShortener.Types.Sum
78import Network.Google.URLShortener.Types.Sum
78
79
79-- | Default request referring to version 'v1' of the URL Shortener API. This contains the host and root path used as a starting point for constructing service requests.
80-- | Default request referring to version 'v1' of the URL Shortener API. This contains the host and root path used as a starting point for constructing service requests.
80−uRLShortenerService :: ServiceConfig
81+uRLShortenerService :: Service
81uRLShortenerService
82uRLShortenerService
82 = defaultService (ServiceId "urlshortener:v1")
83 = defaultService (ServiceId "urlshortener:v1")
83 "www.googleapis.com"
84 "www.googleapis.com"
84
85
85-- | Manage your goo.gl short URLs
86-- | Manage your goo.gl short URLs
86−authUrlshortenerScope :: OAuthScope
87−authUrlshortenerScope = "https://www.googleapis.com/auth/urlshortener";
87+authUrlshortenerScope :: Proxy '["https://www.googleapis.com/auth/urlshortener"]
88+authUrlshortenerScope = Proxy;
gogol-useraccounts/gen/Network/Google/UserAccounts/Types.hs+10−9
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -198,23 +199,23 @@ import Network.Google.UserAccounts.Types.Product
198import Network.Google.UserAccounts.Types.Sum
199import Network.Google.UserAccounts.Types.Sum
199
200
200-- | Default request referring to version 'beta' of the Cloud User Accounts API. This contains the host and root path used as a starting point for constructing service requests.
201-- | Default request referring to version 'beta' of the Cloud User Accounts API. This contains the host and root path used as a starting point for constructing service requests.
201−userAccountsService :: ServiceConfig
202+userAccountsService :: Service
202userAccountsService
203userAccountsService
203 = defaultService (ServiceId "clouduseraccounts:beta")
204 = defaultService (ServiceId "clouduseraccounts:beta")
204 "www.googleapis.com"
205 "www.googleapis.com"
205
206
206-- | View your data across Google Cloud Platform services
207-- | View your data across Google Cloud Platform services
207−authCloudPlatformReadOnlyScope :: OAuthScope
208−authCloudPlatformReadOnlyScope = "https://www.googleapis.com/auth/cloud-platform.read-only";
208+authCloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]
209+authCloudPlatformReadOnlyScope = Proxy;
209
210
210-- | View and manage your data across Google Cloud Platform services
211-- | View and manage your data across Google Cloud Platform services
211−authCloudPlatformScope :: OAuthScope
212−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
212+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
213+authCloudPlatformScope = Proxy;
213
214
214-- | Manage your Google Cloud User Accounts
215-- | Manage your Google Cloud User Accounts
215−authCloudUseraccountsScope :: OAuthScope
216−authCloudUseraccountsScope = "https://www.googleapis.com/auth/cloud.useraccounts";
216+authCloudUseraccountsScope :: Proxy '["https://www.googleapis.com/auth/cloud.useraccounts"]
217+authCloudUseraccountsScope = Proxy;
217
218
218-- | View your Google Cloud User Accounts
219-- | View your Google Cloud User Accounts
219−authCloudUseraccountsReadonlyScope :: OAuthScope
220−authCloudUseraccountsReadonlyScope = "https://www.googleapis.com/auth/cloud.useraccounts.readonly";
220+authCloudUseraccountsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/cloud.useraccounts.readonly"]
221+authCloudUseraccountsReadonlyScope = Proxy;
gogol-vision/gen/Network/Google/Resource/Vision/Images/Annotate.hs+2
@@ -153,6 +153,8 @@ iaCallback
153
153
154instance GoogleRequest ImagesAnnotate where
154instance GoogleRequest ImagesAnnotate where
155 type Rs ImagesAnnotate = BatchAnnotateImagesResponse
155 type Rs ImagesAnnotate = BatchAnnotateImagesResponse
156+ type Scopes ImagesAnnotate =
157+ '["https://www.googleapis.com/auth/cloud-platform"]
156 requestClient ImagesAnnotate{..}
158 requestClient ImagesAnnotate{..}
157 = go _iaXgafv _iaUploadProtocol (Just _iaPp)
159 = go _iaXgafv _iaUploadProtocol (Just _iaPp)
158 _iaAccessToken
160 _iaAccessToken
gogol-vision/gen/Network/Google/Vision/Types.hs+4−3
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -245,11 +246,11 @@ import Network.Google.Vision.Types.Product
245import Network.Google.Vision.Types.Sum
246import Network.Google.Vision.Types.Sum
246
247
247-- | Default request referring to version 'v1' of the Cloud Vision API. This contains the host and root path used as a starting point for constructing service requests.
248-- | Default request referring to version 'v1' of the Cloud Vision API. This contains the host and root path used as a starting point for constructing service requests.
248−visionService :: ServiceConfig
249+visionService :: Service
249visionService
250visionService
250 = defaultService (ServiceId "vision:v1")
251 = defaultService (ServiceId "vision:v1")
251 "vision.googleapis.com"
252 "vision.googleapis.com"
252
253
253-- | View and manage your data across Google Cloud Platform services
254-- | View and manage your data across Google Cloud Platform services
254−authCloudPlatformScope :: OAuthScope
255−authCloudPlatformScope = "https://www.googleapis.com/auth/cloud-platform";
255+authCloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
256+authCloudPlatformScope = Proxy;
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -166,15 +167,15 @@ import Network.Google.WebmasterTools.Types.Product
166import Network.Google.WebmasterTools.Types.Sum
167import Network.Google.WebmasterTools.Types.Sum
167
168
168-- | Default request referring to version 'v3' of the Search Console API. This contains the host and root path used as a starting point for constructing service requests.
169-- | Default request referring to version 'v3' of the Search Console API. This contains the host and root path used as a starting point for constructing service requests.
169−webmasterToolsService :: ServiceConfig
170+webmasterToolsService :: Service
170webmasterToolsService
171webmasterToolsService
171 = defaultService (ServiceId "webmasters:v3")
172 = defaultService (ServiceId "webmasters:v3")
172 "www.googleapis.com"
173 "www.googleapis.com"
173
174
174-- | View and manage Search Console data for your verified sites
175-- | View and manage Search Console data for your verified sites
175−authWebmastersScope :: OAuthScope
176−authWebmastersScope = "https://www.googleapis.com/auth/webmasters";
176+authWebmastersScope :: Proxy '["https://www.googleapis.com/auth/webmasters"]
177+authWebmastersScope = Proxy;
177
178
178-- | View Search Console data for your verified sites
179-- | View Search Console data for your verified sites
179−authWebmastersReadonlyScope :: OAuthScope
180−authWebmastersReadonlyScope = "https://www.googleapis.com/auth/webmasters.readonly";
180+authWebmastersReadonlyScope :: Proxy '["https://www.googleapis.com/auth/webmasters.readonly"]
181+authWebmastersReadonlyScope = Proxy;
gogol-youtube-analytics/gen/Network/Google/Resource/YouTubeAnalytics/Reports/Query.hs+3−1
@@ -208,7 +208,9 @@ rqStartDate
208instance GoogleRequest ReportsQuery where
208instance GoogleRequest ReportsQuery where
209 type Rs ReportsQuery = ResultTable
209 type Rs ReportsQuery = ResultTable
210 type Scopes ReportsQuery =
210 type Scopes ReportsQuery =
211− '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly",
211+ '["https://www.googleapis.com/auth/youtube",
212+ "https://www.googleapis.com/auth/youtube.readonly",
213+ "https://www.googleapis.com/auth/yt-analytics-monetary.readonly",
212 "https://www.googleapis.com/auth/yt-analytics.readonly"]
214 "https://www.googleapis.com/auth/yt-analytics.readonly"]
213 requestClient ReportsQuery{..}
215 requestClient ReportsQuery{..}
214 = go (Just _rqIds) (Just _rqStartDate)
216 = go (Just _rqIds) (Just _rqStartDate)
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+12−11
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -140,28 +141,28 @@ import Network.Google.YouTubeAnalytics.Types.Product
140import Network.Google.YouTubeAnalytics.Types.Sum
141import Network.Google.YouTubeAnalytics.Types.Sum
141
142
142-- | Default request referring to version 'v1' of the YouTube Analytics API. This contains the host and root path used as a starting point for constructing service requests.
143-- | Default request referring to version 'v1' of the YouTube Analytics API. This contains the host and root path used as a starting point for constructing service requests.
143−youTubeAnalyticsService :: ServiceConfig
144+youTubeAnalyticsService :: Service
144youTubeAnalyticsService
145youTubeAnalyticsService
145 = defaultService (ServiceId "youtubeAnalytics:v1")
146 = defaultService (ServiceId "youtubeAnalytics:v1")
146 "www.googleapis.com"
147 "www.googleapis.com"
147
148
148-- | Manage your YouTube account
149-- | Manage your YouTube account
149−authYoutubeScope :: OAuthScope
150−authYoutubeScope = "https://www.googleapis.com/auth/youtube";
150+authYoutubeScope :: Proxy '["https://www.googleapis.com/auth/youtube"]
151+authYoutubeScope = Proxy;
151
152
152-- | View YouTube Analytics reports for your YouTube content
153-- | View YouTube Analytics reports for your YouTube content
153−authYtAnalyticsReadonlyScope :: OAuthScope
154−authYtAnalyticsReadonlyScope = "https://www.googleapis.com/auth/yt-analytics.readonly";
154+authYtAnalyticsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
155+authYtAnalyticsReadonlyScope = Proxy;
155
156
156-- | View and manage your assets and associated content on YouTube
157-- | View and manage your assets and associated content on YouTube
157−authYoutubepartnerScope :: OAuthScope
158−authYoutubepartnerScope = "https://www.googleapis.com/auth/youtubepartner";
158+authYoutubepartnerScope :: Proxy '["https://www.googleapis.com/auth/youtubepartner"]
159+authYoutubepartnerScope = Proxy;
159
160
160-- | View monetary and non-monetary YouTube Analytics reports for your
161-- | View monetary and non-monetary YouTube Analytics reports for your
161-- YouTube content
162-- YouTube content
162−authYtAnalyticsMonetaryReadonlyScope :: OAuthScope
163−authYtAnalyticsMonetaryReadonlyScope = "https://www.googleapis.com/auth/yt-analytics-monetary.readonly";
163+authYtAnalyticsMonetaryReadonlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
164+authYtAnalyticsMonetaryReadonlyScope = Proxy;
164
165
165-- | View your YouTube account
166-- | View your YouTube account
166−authYoutubeReadonlyScope :: OAuthScope
167−authYoutubeReadonlyScope = "https://www.googleapis.com/auth/youtube.readonly";
167+authYoutubeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/youtube.readonly"]
168+authYoutubeReadonlyScope = Proxy;
gogol-youtube-reporting/gen/Network/Google/YouTubeReporting/Types.hs+6−5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -81,16 +82,16 @@ import Network.Google.YouTubeReporting.Types.Product
81import Network.Google.YouTubeReporting.Types.Sum
82import Network.Google.YouTubeReporting.Types.Sum
82
83
83-- | Default request referring to version 'v1' of the YouTube Reporting API. This contains the host and root path used as a starting point for constructing service requests.
84-- | Default request referring to version 'v1' of the YouTube Reporting API. This contains the host and root path used as a starting point for constructing service requests.
84−youTubeReportingService :: ServiceConfig
85+youTubeReportingService :: Service
85youTubeReportingService
86youTubeReportingService
86 = defaultService (ServiceId "youtubereporting:v1")
87 = defaultService (ServiceId "youtubereporting:v1")
87 "youtubereporting.googleapis.com"
88 "youtubereporting.googleapis.com"
88
89
89-- | View YouTube Analytics reports for your YouTube content
90-- | View YouTube Analytics reports for your YouTube content
90−authYtAnalyticsReadonlyScope :: OAuthScope
91−authYtAnalyticsReadonlyScope = "https://www.googleapis.com/auth/yt-analytics.readonly";
91+authYtAnalyticsReadonlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
92+authYtAnalyticsReadonlyScope = Proxy;
92
93
93-- | View monetary and non-monetary YouTube Analytics reports for your
94-- | View monetary and non-monetary YouTube Analytics reports for your
94-- YouTube content
95-- YouTube content
95−authYtAnalyticsMonetaryReadonlyScope :: OAuthScope
96−authYtAnalyticsMonetaryReadonlyScope = "https://www.googleapis.com/auth/yt-analytics-monetary.readonly";
96+authYtAnalyticsMonetaryReadonlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
97+authYtAnalyticsMonetaryReadonlyScope = Proxy;
gogol-youtube/gen/Network/Google/Resource/YouTube/FanFundingEvents/List.hs+4
@@ -122,6 +122,10 @@ ffelMaxResults
122instance GoogleRequest FanFundingEventsList where
122instance GoogleRequest FanFundingEventsList where
123 type Rs FanFundingEventsList =
123 type Rs FanFundingEventsList =
124 FanFundingEventListResponse
124 FanFundingEventListResponse
125+ type Scopes FanFundingEventsList =
126+ '["https://www.googleapis.com/auth/youtube",
127+ "https://www.googleapis.com/auth/youtube.force-ssl",
128+ "https://www.googleapis.com/auth/youtube.readonly"]
125 requestClient FanFundingEventsList{..}
129 requestClient FanFundingEventsList{..}
126 = go (Just _ffelPart) _ffelHl _ffelPageToken
130 = go (Just _ffelPart) _ffelHl _ffelPageToken
127 (Just _ffelMaxResults)
131 (Just _ffelMaxResults)
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatBans/Delete.hs+3
@@ -76,6 +76,9 @@ lcbdId = lens _lcbdId (\ s a -> s{_lcbdId = a})
76
76
77instance GoogleRequest LiveChatBansDelete where
77instance GoogleRequest LiveChatBansDelete where
78 type Rs LiveChatBansDelete = ()
78 type Rs LiveChatBansDelete = ()
79+ type Scopes LiveChatBansDelete =
80+ '["https://www.googleapis.com/auth/youtube",
81+ "https://www.googleapis.com/auth/youtube.force-ssl"]
79 requestClient LiveChatBansDelete{..}
82 requestClient LiveChatBansDelete{..}
80 = go (Just _lcbdId) (Just AltJSON) youTubeService
83 = go (Just _lcbdId) (Just AltJSON) youTubeService
81 where go
84 where go
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatBans/Insert.hs+3
@@ -91,6 +91,9 @@ lcbiPayload
91
91
92instance GoogleRequest LiveChatBansInsert where
92instance GoogleRequest LiveChatBansInsert where
93 type Rs LiveChatBansInsert = LiveChatBan
93 type Rs LiveChatBansInsert = LiveChatBan
94+ type Scopes LiveChatBansInsert =
95+ '["https://www.googleapis.com/auth/youtube",
96+ "https://www.googleapis.com/auth/youtube.force-ssl"]
94 requestClient LiveChatBansInsert{..}
97 requestClient LiveChatBansInsert{..}
95 = go (Just _lcbiPart) (Just AltJSON) _lcbiPayload
98 = go (Just _lcbiPart) (Just AltJSON) _lcbiPayload
96 youTubeService
99 youTubeService
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/Delete.hs+3
@@ -76,6 +76,9 @@ lId = lens _lId (\ s a -> s{_lId = a})
76
76
77instance GoogleRequest LiveChatMessagesDelete where
77instance GoogleRequest LiveChatMessagesDelete where
78 type Rs LiveChatMessagesDelete = ()
78 type Rs LiveChatMessagesDelete = ()
79+ type Scopes LiveChatMessagesDelete =
80+ '["https://www.googleapis.com/auth/youtube",
81+ "https://www.googleapis.com/auth/youtube.force-ssl"]
79 requestClient LiveChatMessagesDelete{..}
82 requestClient LiveChatMessagesDelete{..}
80 = go (Just _lId) (Just AltJSON) youTubeService
83 = go (Just _lId) (Just AltJSON) youTubeService
81 where go
84 where go
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/Insert.hs+3
@@ -90,6 +90,9 @@ lcmiPayload
90
90
91instance GoogleRequest LiveChatMessagesInsert where
91instance GoogleRequest LiveChatMessagesInsert where
92 type Rs LiveChatMessagesInsert = LiveChatMessage
92 type Rs LiveChatMessagesInsert = LiveChatMessage
93+ type Scopes LiveChatMessagesInsert =
94+ '["https://www.googleapis.com/auth/youtube",
95+ "https://www.googleapis.com/auth/youtube.force-ssl"]
93 requestClient LiveChatMessagesInsert{..}
96 requestClient LiveChatMessagesInsert{..}
94 = go (Just _lcmiPart) (Just AltJSON) _lcmiPayload
97 = go (Just _lcmiPart) (Just AltJSON) _lcmiPayload
95 youTubeService
98 youTubeService
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatMessages/List.hs+4
@@ -151,6 +151,10 @@ lcmlProFileImageSize
151instance GoogleRequest LiveChatMessagesList where
151instance GoogleRequest LiveChatMessagesList where
152 type Rs LiveChatMessagesList =
152 type Rs LiveChatMessagesList =
153 LiveChatMessageListResponse
153 LiveChatMessageListResponse
154+ type Scopes LiveChatMessagesList =
155+ '["https://www.googleapis.com/auth/youtube",
156+ "https://www.googleapis.com/auth/youtube.force-ssl",
157+ "https://www.googleapis.com/auth/youtube.readonly"]
154 requestClient LiveChatMessagesList{..}
158 requestClient LiveChatMessagesList{..}
155 = go (Just _lcmlLiveChatId) (Just _lcmlPart) _lcmlHl
159 = go (Just _lcmlLiveChatId) (Just _lcmlPart) _lcmlHl
156 _lcmlPageToken
160 _lcmlPageToken
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/Delete.hs+3
@@ -76,6 +76,9 @@ lcmdId = lens _lcmdId (\ s a -> s{_lcmdId = a})
76
76
77instance GoogleRequest LiveChatModeratorsDelete where
77instance GoogleRequest LiveChatModeratorsDelete where
78 type Rs LiveChatModeratorsDelete = ()
78 type Rs LiveChatModeratorsDelete = ()
79+ type Scopes LiveChatModeratorsDelete =
80+ '["https://www.googleapis.com/auth/youtube",
81+ "https://www.googleapis.com/auth/youtube.force-ssl"]
79 requestClient LiveChatModeratorsDelete{..}
82 requestClient LiveChatModeratorsDelete{..}
80 = go (Just _lcmdId) (Just AltJSON) youTubeService
83 = go (Just _lcmdId) (Just AltJSON) youTubeService
81 where go
84 where go
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/Insert.hs+3
@@ -90,6 +90,9 @@ lPayload = lens _lPayload (\ s a -> s{_lPayload = a})
90
90
91instance GoogleRequest LiveChatModeratorsInsert where
91instance GoogleRequest LiveChatModeratorsInsert where
92 type Rs LiveChatModeratorsInsert = LiveChatModerator
92 type Rs LiveChatModeratorsInsert = LiveChatModerator
93+ type Scopes LiveChatModeratorsInsert =
94+ '["https://www.googleapis.com/auth/youtube",
95+ "https://www.googleapis.com/auth/youtube.force-ssl"]
93 requestClient LiveChatModeratorsInsert{..}
96 requestClient LiveChatModeratorsInsert{..}
94 = go (Just _lPart) (Just AltJSON) _lPayload
97 = go (Just _lPart) (Just AltJSON) _lPayload
95 youTubeService
98 youTubeService
gogol-youtube/gen/Network/Google/Resource/YouTube/LiveChatModerators/List.hs+4
@@ -119,6 +119,10 @@ livMaxResults
119instance GoogleRequest LiveChatModeratorsList where
119instance GoogleRequest LiveChatModeratorsList where
120 type Rs LiveChatModeratorsList =
120 type Rs LiveChatModeratorsList =
121 LiveChatModeratorListResponse
121 LiveChatModeratorListResponse
122+ type Scopes LiveChatModeratorsList =
123+ '["https://www.googleapis.com/auth/youtube",
124+ "https://www.googleapis.com/auth/youtube.force-ssl",
125+ "https://www.googleapis.com/auth/youtube.readonly"]
122 requestClient LiveChatModeratorsList{..}
126 requestClient LiveChatModeratorsList{..}
123 = go (Just _livLiveChatId) (Just _livPart)
127 = go (Just _livLiveChatId) (Just _livPart)
124 _livPageToken
128 _livPageToken
gogol-youtube/gen/Network/Google/Resource/YouTube/Sponsors/List.hs+4
@@ -112,6 +112,10 @@ sMaxResults
112
112
113instance GoogleRequest SponsorsList where
113instance GoogleRequest SponsorsList where
114 type Rs SponsorsList = SponsorListResponse
114 type Rs SponsorsList = SponsorListResponse
115+ type Scopes SponsorsList =
116+ '["https://www.googleapis.com/auth/youtube",
117+ "https://www.googleapis.com/auth/youtube.force-ssl",
118+ "https://www.googleapis.com/auth/youtube.readonly"]
115 requestClient SponsorsList{..}
119 requestClient SponsorsList{..}
116 = go (Just _sPart) (Just _sFilter) _sPageToken
120 = go (Just _sPart) (Just _sFilter) _sPageToken
117 (Just _sMaxResults)
121 (Just _sMaxResults)
gogol-youtube/gen/Network/Google/YouTube/Types.hs+14−13
@@ -1,3 +1,4 @@
1+{-# LANGUAGE DataKinds #-}
1{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE DeriveGeneric #-}
3{-# LANGUAGE NoImplicitPrelude #-}
4{-# LANGUAGE NoImplicitPrelude #-}
@@ -2031,32 +2032,32 @@ import Network.Google.YouTube.Types.Product
2031import Network.Google.YouTube.Types.Sum
2032import Network.Google.YouTube.Types.Sum
2032
2033
2033-- | Default request referring to version 'v3' of the YouTube Data API. This contains the host and root path used as a starting point for constructing service requests.
2034-- | Default request referring to version 'v3' of the YouTube Data API. This contains the host and root path used as a starting point for constructing service requests.
2034−youTubeService :: ServiceConfig
2035+youTubeService :: Service
2035youTubeService
2036youTubeService
2036 = defaultService (ServiceId "youtube:v3")
2037 = defaultService (ServiceId "youtube:v3")
2037 "www.googleapis.com"
2038 "www.googleapis.com"
2038
2039
2039-- | Manage your YouTube videos
2040-- | Manage your YouTube videos
2040−authYoutubeUploadScope :: OAuthScope
2041−authYoutubeUploadScope = "https://www.googleapis.com/auth/youtube.upload";
2041+authYoutubeUploadScope :: Proxy '["https://www.googleapis.com/auth/youtube.upload"]
2042+authYoutubeUploadScope = Proxy;
2042
2043
2043-- | Manage your YouTube account
2044-- | Manage your YouTube account
2044−authYoutubeScope :: OAuthScope
2045−authYoutubeScope = "https://www.googleapis.com/auth/youtube";
2045+authYoutubeScope :: Proxy '["https://www.googleapis.com/auth/youtube"]
2046+authYoutubeScope = Proxy;
2046
2047
2047-- | View and manage your assets and associated content on YouTube
2048-- | View and manage your assets and associated content on YouTube
2048−authYoutubepartnerScope :: OAuthScope
2049−authYoutubepartnerScope = "https://www.googleapis.com/auth/youtubepartner";
2049+authYoutubepartnerScope :: Proxy '["https://www.googleapis.com/auth/youtubepartner"]
2050+authYoutubepartnerScope = Proxy;
2050
2051
2051-- | Manage your YouTube account
2052-- | Manage your YouTube account
2052−authYoutubeForceSslScope :: OAuthScope
2053−authYoutubeForceSslScope = "https://www.googleapis.com/auth/youtube.force-ssl";
2053+authYoutubeForceSslScope :: Proxy '["https://www.googleapis.com/auth/youtube.force-ssl"]
2054+authYoutubeForceSslScope = Proxy;
2054
2055
2055-- | View your YouTube account
2056-- | View your YouTube account
2056−authYoutubeReadonlyScope :: OAuthScope
2057−authYoutubeReadonlyScope = "https://www.googleapis.com/auth/youtube.readonly";
2057+authYoutubeReadonlyScope :: Proxy '["https://www.googleapis.com/auth/youtube.readonly"]
2058+authYoutubeReadonlyScope = Proxy;
2058
2059
2059-- | View private information of your YouTube channel relevant during the
2060-- | View private information of your YouTube channel relevant during the
2060-- audit process with a YouTube partner
2061-- audit process with a YouTube partner
2061−authYoutubepartnerChannelAuditScope :: OAuthScope
2062−authYoutubepartnerChannelAuditScope = "https://www.googleapis.com/auth/youtubepartner-channel-audit";
2062+authYoutubepartnerChannelAuditScope :: Proxy '["https://www.googleapis.com/auth/youtubepartner-channel-audit"]
2063+authYoutubepartnerChannelAuditScope = Proxy;