on develop help sign in
Regenerating services
4592e14Brendan Hay
gogol-bigquery/gen/Network/Google/BigQuery.hs+3−3
@@ -24,11 +24,11 @@ module Network.Google.BigQuery
24 -- * OAuth Scopes
24 -- * OAuth Scopes
25 , cloudPlatformReadOnlyScope
25 , cloudPlatformReadOnlyScope
26 , cloudPlatformScope
26 , cloudPlatformScope
27− , devstorageReadOnlyScope
27+ , storageReadOnlyScope
28 , bigQueryInsertDataScope
28 , bigQueryInsertDataScope
29− , devstorageReadWriteScope
29+ , storageReadWriteScope
30 , bigQueryScope
30 , bigQueryScope
31− , devstorageFullControlScope
31+ , storageFullControlScope
32
32
33 -- * API Declaration
33 -- * API Declaration
34 , BigQueryAPI
34 , BigQueryAPI
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+9−9
@@ -22,11 +22,11 @@ module Network.Google.BigQuery.Types
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23 , cloudPlatformReadOnlyScope
23 , cloudPlatformReadOnlyScope
24 , cloudPlatformScope
24 , cloudPlatformScope
25− , devstorageReadOnlyScope
25+ , storageReadOnlyScope
26 , bigQueryInsertDataScope
26 , bigQueryInsertDataScope
27− , devstorageReadWriteScope
27+ , storageReadWriteScope
28 , bigQueryScope
28 , bigQueryScope
29− , devstorageFullControlScope
29+ , storageFullControlScope
30
30
31 -- * JobReference
31 -- * JobReference
32 , JobReference
32 , JobReference
@@ -537,21 +537,21 @@ cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
537cloudPlatformScope = Proxy;
537cloudPlatformScope = Proxy;
538
538
539-- | View your data in Google Cloud Storage
539-- | View your data in Google Cloud Storage
540−devstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
540+storageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
541−devstorageReadOnlyScope = Proxy;
541+storageReadOnlyScope = Proxy;
542
542
543-- | Insert data into Google BigQuery
543-- | Insert data into Google BigQuery
544bigQueryInsertDataScope :: Proxy '["https://www.googleapis.com/auth/bigquery.insertdata"]
544bigQueryInsertDataScope :: Proxy '["https://www.googleapis.com/auth/bigquery.insertdata"]
545bigQueryInsertDataScope = Proxy;
545bigQueryInsertDataScope = Proxy;
546
546
547-- | Manage your data in Google Cloud Storage
547-- | Manage your data in Google Cloud Storage
548−devstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
548+storageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
549−devstorageReadWriteScope = Proxy;
549+storageReadWriteScope = Proxy;
550
550
551-- | View and manage your data in Google BigQuery
551-- | View and manage your data in Google BigQuery
552bigQueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
552bigQueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
553bigQueryScope = Proxy;
553bigQueryScope = Proxy;
554
554
555-- | Manage your data and permissions in Google Cloud Storage
555-- | Manage your data and permissions in Google Cloud Storage
556−devstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
556+storageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
557−devstorageFullControlScope = Proxy;
557+storageFullControlScope = Proxy;
gogol-compute/gen/Network/Google/Compute.hs+3−3
@@ -24,10 +24,10 @@ module Network.Google.Compute
24 -- * OAuth Scopes
24 -- * OAuth Scopes
25 , computeScope
25 , computeScope
26 , cloudPlatformScope
26 , cloudPlatformScope
27− , devstorageReadOnlyScope
27+ , storageReadOnlyScope
28− , devstorageReadWriteScope
28+ , storageReadWriteScope
29 , computeReadOnlyScope
29 , computeReadOnlyScope
30− , devstorageFullControlScope
30+ , storageFullControlScope
31
31
32 -- * API Declaration
32 -- * API Declaration
33 , ComputeAPI
33 , ComputeAPI
gogol-compute/gen/Network/Google/Compute/Types.hs+9−9
@@ -22,10 +22,10 @@ module Network.Google.Compute.Types
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23 , computeScope
23 , computeScope
24 , cloudPlatformScope
24 , cloudPlatformScope
25− , devstorageReadOnlyScope
25+ , storageReadOnlyScope
26− , devstorageReadWriteScope
26+ , storageReadWriteScope
27 , computeReadOnlyScope
27 , computeReadOnlyScope
28− , devstorageFullControlScope
28+ , storageFullControlScope
29
29
30 -- * TargetHTTPSProxyList
30 -- * TargetHTTPSProxyList
31 , TargetHTTPSProxyList
31 , TargetHTTPSProxyList
@@ -1930,17 +1930,17 @@ cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
1930cloudPlatformScope = Proxy;
1930cloudPlatformScope = Proxy;
1931
1931
1932-- | View your data in Google Cloud Storage
1932-- | View your data in Google Cloud Storage
1933−devstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
1933+storageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
1934−devstorageReadOnlyScope = Proxy;
1934+storageReadOnlyScope = Proxy;
1935
1935
1936-- | Manage your data in Google Cloud Storage
1936-- | Manage your data in Google Cloud Storage
1937−devstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
1937+storageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
1938−devstorageReadWriteScope = Proxy;
1938+storageReadWriteScope = Proxy;
1939
1939
1940-- | View your Google Compute Engine resources
1940-- | View your Google Compute Engine resources
1941computeReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
1941computeReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/compute.readonly"]
1942computeReadOnlyScope = Proxy;
1942computeReadOnlyScope = Proxy;
1943
1943
1944-- | Manage your data and permissions in Google Cloud Storage
1944-- | Manage your data and permissions in Google Cloud Storage
1945−devstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
1945+storageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
1946−devstorageFullControlScope = Proxy;
1946+storageFullControlScope = Proxy;
gogol-genomics/gen/Network/Google/Genomics.hs+1−1
@@ -27,7 +27,7 @@ module Network.Google.Genomics
27 , genomicsScope
27 , genomicsScope
28 , cloudPlatformScope
28 , cloudPlatformScope
29 , genomicsReadOnlyScope
29 , genomicsReadOnlyScope
30− , devstorageReadWriteScope
30+ , storageReadWriteScope
31 , bigQueryScope
31 , bigQueryScope
32
32
33 -- * API Declaration
33 -- * API Declaration
gogol-genomics/gen/Network/Google/Genomics/Types.hs+3−3
@@ -23,7 +23,7 @@ module Network.Google.Genomics.Types
23 , genomicsScope
23 , genomicsScope
24 , cloudPlatformScope
24 , cloudPlatformScope
25 , genomicsReadOnlyScope
25 , genomicsReadOnlyScope
26− , devstorageReadWriteScope
26+ , storageReadWriteScope
27 , bigQueryScope
27 , bigQueryScope
28
28
29 -- * ReadInfo
29 -- * ReadInfo
@@ -581,8 +581,8 @@ genomicsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/genomics.reado
581genomicsReadOnlyScope = Proxy;
581genomicsReadOnlyScope = Proxy;
582
582
583-- | Manage your data in Google Cloud Storage
583-- | Manage your data in Google Cloud Storage
584−devstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
584+storageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
585−devstorageReadWriteScope = Proxy;
585+storageReadWriteScope = Proxy;
586
586
587-- | View and manage your data in Google BigQuery
587-- | View and manage your data in Google BigQuery
588bigQueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
588bigQueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]
gogol-prediction/gen/Network/Google/Prediction.hs+3−3
@@ -23,10 +23,10 @@ module Network.Google.Prediction
23 predictionService
23 predictionService
24
24
25 -- * OAuth Scopes
25 -- * OAuth Scopes
26− , devstorageReadOnlyScope
26+ , storageReadOnlyScope
27− , devstorageReadWriteScope
27+ , storageReadWriteScope
28 , predictionScope
28 , predictionScope
29− , devstorageFullControlScope
29+ , storageFullControlScope
30
30
31 -- * API Declaration
31 -- * API Declaration
32 , PredictionAPI
32 , PredictionAPI
gogol-prediction/gen/Network/Google/Prediction/Types.hs+9−9
@@ -20,10 +20,10 @@ module Network.Google.Prediction.Types
20 predictionService
20 predictionService
21
21
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23− , devstorageReadOnlyScope
23+ , storageReadOnlyScope
24− , devstorageReadWriteScope
24+ , storageReadWriteScope
25 , predictionScope
25 , predictionScope
26− , devstorageFullControlScope
26+ , storageFullControlScope
27
27
28 -- * Insert2ModelInfo
28 -- * Insert2ModelInfo
29 , Insert2ModelInfo
29 , Insert2ModelInfo
@@ -219,17 +219,17 @@ predictionService
219 "www.googleapis.com"
219 "www.googleapis.com"
220
220
221-- | View your data in Google Cloud Storage
221-- | View your data in Google Cloud Storage
222−devstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
222+storageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
223−devstorageReadOnlyScope = Proxy;
223+storageReadOnlyScope = Proxy;
224
224
225-- | Manage your data in Google Cloud Storage
225-- | Manage your data in Google Cloud Storage
226−devstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
226+storageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
227−devstorageReadWriteScope = Proxy;
227+storageReadWriteScope = Proxy;
228
228
229-- | Manage your data in the Google Prediction API
229-- | Manage your data in the Google Prediction API
230predictionScope :: Proxy '["https://www.googleapis.com/auth/prediction"]
230predictionScope :: Proxy '["https://www.googleapis.com/auth/prediction"]
231predictionScope = Proxy;
231predictionScope = Proxy;
232
232
233-- | Manage your data and permissions in Google Cloud Storage
233-- | Manage your data and permissions in Google Cloud Storage
234−devstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
234+storageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
235−devstorageFullControlScope = Proxy;
235+storageFullControlScope = Proxy;
gogol-sqladmin/gen/Network/Google/SQLAdmin.hs+1−1
@@ -406,7 +406,7 @@ module Network.Google.SQLAdmin
406 , brSelfLink
406 , brSelfLink
407 , brEndTime
407 , brEndTime
408 , brId
408 , brId
409− , brEnqueuedTime
409+ , brEnQueuedTime
410 , brInstance
410 , brInstance
411
411
412 -- ** ACLEntry
412 -- ** ACLEntry
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+1−1
@@ -283,7 +283,7 @@ module Network.Google.SQLAdmin.Types
283 , brSelfLink
283 , brSelfLink
284 , brEndTime
284 , brEndTime
285 , brId
285 , brId
286− , brEnqueuedTime
286+ , brEnQueuedTime
287 , brInstance
287 , brInstance
288
288
289 -- * ACLEntry
289 -- * ACLEntry
gogol-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+8−8
@@ -2434,7 +2434,7 @@ data BackupRun = BackupRun'
2434 , _brSelfLink :: !(Maybe Text)
2434 , _brSelfLink :: !(Maybe Text)
2435 , _brEndTime :: !(Maybe DateTime')
2435 , _brEndTime :: !(Maybe DateTime')
2436 , _brId :: !(Maybe (Textual Int64))
2436 , _brId :: !(Maybe (Textual Int64))
2437− , _brEnqueuedTime :: !(Maybe DateTime')
2437+ , _brEnQueuedTime :: !(Maybe DateTime')
2438 , _brInstance :: !(Maybe Text)
2438 , _brInstance :: !(Maybe Text)
2439 } deriving (Eq,Show,Data,Typeable,Generic)
2439 } deriving (Eq,Show,Data,Typeable,Generic)
2440
2440
@@ -2458,7 +2458,7 @@ data BackupRun = BackupRun'
2458--
2458--
2459-- * 'brId'
2459-- * 'brId'
2460--
2460--
2461−-- * 'brEnqueuedTime'
2461+-- * 'brEnQueuedTime'
2462--
2462--
2463-- * 'brInstance'
2463-- * 'brInstance'
2464backupRun
2464backupRun
@@ -2473,7 +2473,7 @@ backupRun =
2473 , _brSelfLink = Nothing
2473 , _brSelfLink = Nothing
2474 , _brEndTime = Nothing
2474 , _brEndTime = Nothing
2475 , _brId = Nothing
2475 , _brId = Nothing
2476− , _brEnqueuedTime = Nothing
2476+ , _brEnQueuedTime = Nothing
2477 , _brInstance = Nothing
2477 , _brInstance = Nothing
2478 }
2478 }
2479
2479
@@ -2526,10 +2526,10 @@ brId
2526
2526
2527-- | The time the run was enqueued in UTC timezone in RFC 3339 format, for
2527-- | The time the run was enqueued in UTC timezone in RFC 3339 format, for
2528-- example 2012-11-15T16:19:00.094Z.
2528-- example 2012-11-15T16:19:00.094Z.
2529−brEnqueuedTime :: Lens' BackupRun (Maybe UTCTime)
2529+brEnQueuedTime :: Lens' BackupRun (Maybe UTCTime)
2530−brEnqueuedTime
2530+brEnQueuedTime
2531− = lens _brEnqueuedTime
2531+ = lens _brEnQueuedTime
2532− (\ s a -> s{_brEnqueuedTime = a})
2532+ (\ s a -> s{_brEnQueuedTime = a})
2533 . mapping _DateTime
2533 . mapping _DateTime
2534
2534
2535-- | Name of the database instance.
2535-- | Name of the database instance.
@@ -2562,7 +2562,7 @@ instance ToJSON BackupRun where
2562 ("windowStartTime" .=) <$> _brWindowStartTime,
2562 ("windowStartTime" .=) <$> _brWindowStartTime,
2563 ("selfLink" .=) <$> _brSelfLink,
2563 ("selfLink" .=) <$> _brSelfLink,
2564 ("endTime" .=) <$> _brEndTime, ("id" .=) <$> _brId,
2564 ("endTime" .=) <$> _brEndTime, ("id" .=) <$> _brId,
2565− ("enqueuedTime" .=) <$> _brEnqueuedTime,
2565+ ("enqueuedTime" .=) <$> _brEnQueuedTime,
2566 ("instance" .=) <$> _brInstance])
2566 ("instance" .=) <$> _brInstance])
2567
2567
2568-- | An entry for an Access Control list.
2568-- | An entry for an Access Control list.
gogol-storage/gen/Network/Google/Storage.hs+3−3
@@ -24,9 +24,9 @@ module Network.Google.Storage
24 -- * OAuth Scopes
24 -- * OAuth Scopes
25 , cloudPlatformReadOnlyScope
25 , cloudPlatformReadOnlyScope
26 , cloudPlatformScope
26 , cloudPlatformScope
27− , devstorageReadOnlyScope
27+ , storageReadOnlyScope
28− , devstorageReadWriteScope
28+ , storageReadWriteScope
29− , devstorageFullControlScope
29+ , storageFullControlScope
30
30
31 -- * API Declaration
31 -- * API Declaration
32 , StorageAPI
32 , StorageAPI
gogol-storage/gen/Network/Google/Storage/Types.hs+9−9
@@ -22,9 +22,9 @@ module Network.Google.Storage.Types
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23 , cloudPlatformReadOnlyScope
23 , cloudPlatformReadOnlyScope
24 , cloudPlatformScope
24 , cloudPlatformScope
25− , devstorageReadOnlyScope
25+ , storageReadOnlyScope
26− , devstorageReadWriteScope
26+ , storageReadWriteScope
27− , devstorageFullControlScope
27+ , storageFullControlScope
28
28
29 -- * ObjectOwner
29 -- * ObjectOwner
30 , ObjectOwner
30 , ObjectOwner
@@ -365,13 +365,13 @@ cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]
365cloudPlatformScope = Proxy;
365cloudPlatformScope = Proxy;
366
366
367-- | View your data in Google Cloud Storage
367-- | View your data in Google Cloud Storage
368−devstorageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
368+storageReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_only"]
369−devstorageReadOnlyScope = Proxy;
369+storageReadOnlyScope = Proxy;
370
370
371-- | Manage your data in Google Cloud Storage
371-- | Manage your data in Google Cloud Storage
372−devstorageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
372+storageReadWriteScope :: Proxy '["https://www.googleapis.com/auth/devstorage.read_write"]
373−devstorageReadWriteScope = Proxy;
373+storageReadWriteScope = Proxy;
374
374
375-- | Manage your data and permissions in Google Cloud Storage
375-- | Manage your data and permissions in Google Cloud Storage
376−devstorageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
376+storageFullControlScope :: Proxy '["https://www.googleapis.com/auth/devstorage.full_control"]
377−devstorageFullControlScope = Proxy;
377+storageFullControlScope = Proxy;
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Taskqueues/Get.hs → gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/TaskQueues/Get.hsrenamed+43−43
@@ -13,7 +13,7 @@
13{-# OPTIONS_GHC -fno-warn-unused-imports #-}
13{-# OPTIONS_GHC -fno-warn-unused-imports #-}
14
14
15-- |
15-- |
16−-- Module : Network.Google.Resource.TaskQueue.Taskqueues.Get
16+-- Module : Network.Google.Resource.TaskQueue.TaskQueues.Get
17-- Copyright : (c) 2015-2016 Brendan Hay
17-- Copyright : (c) 2015-2016 Brendan Hay
18-- License : Mozilla Public License, v. 2.0.
18-- License : Mozilla Public License, v. 2.0.
19-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
19-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@@ -23,27 +23,27 @@
23-- Get detailed information about a TaskQueue.
23-- Get detailed information about a TaskQueue.
24--
24--
25-- /See:/ <https://developers.google.com/appengine/docs/python/taskqueue/rest TaskQueue API Reference> for @taskqueue.taskqueues.get@.
25-- /See:/ <https://developers.google.com/appengine/docs/python/taskqueue/rest TaskQueue API Reference> for @taskqueue.taskqueues.get@.
26−module Network.Google.Resource.TaskQueue.Taskqueues.Get
26+module Network.Google.Resource.TaskQueue.TaskQueues.Get
27 (
27 (
28 -- * REST Resource
28 -- * REST Resource
29− TaskqueuesGetResource
29+ TaskQueuesGetResource
30
30
31 -- * Creating a Request
31 -- * Creating a Request
32− , taskqueuesGet
32+ , taskQueuesGet
33− , TaskqueuesGet
33+ , TaskQueuesGet
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tasTaskqueue
36+ , tqgTaskQueue
37− , tasProject
37+ , tqgProject
38− , tasGetStats
38+ , tqgGetStats
39 ) where
39 ) where
40
40
41import Network.Google.Prelude
41import Network.Google.Prelude
42import Network.Google.TaskQueue.Types
42import Network.Google.TaskQueue.Types
43
43
44-- | A resource alias for @taskqueue.taskqueues.get@ method which the
44-- | A resource alias for @taskqueue.taskqueues.get@ method which the
45−-- 'TaskqueuesGet' request conforms to.
45+-- 'TaskQueuesGet' request conforms to.
46−type TaskqueuesGetResource =
46+type TaskQueuesGetResource =
47 "taskqueue" :>
47 "taskqueue" :>
48 "v1beta2" :>
48 "v1beta2" :>
49 "projects" :>
49 "projects" :>
@@ -55,57 +55,57 @@ type TaskqueuesGetResource =
55
55
56-- | Get detailed information about a TaskQueue.
56-- | Get detailed information about a TaskQueue.
57--
57--
58−-- /See:/ 'taskqueuesGet' smart constructor.
58+-- /See:/ 'taskQueuesGet' smart constructor.
59−data TaskqueuesGet = TaskqueuesGet'
59+data TaskQueuesGet = TaskQueuesGet'
60− { _tasTaskqueue :: !Text
60+ { _tqgTaskQueue :: !Text
61− , _tasProject :: !Text
61+ , _tqgProject :: !Text
62− , _tasGetStats :: !(Maybe Bool)
62+ , _tqgGetStats :: !(Maybe Bool)
63 } deriving (Eq,Show,Data,Typeable,Generic)
63 } deriving (Eq,Show,Data,Typeable,Generic)
64
64
65−-- | Creates a value of 'TaskqueuesGet' with the minimum fields required to make a request.
65+-- | Creates a value of 'TaskQueuesGet' with the minimum fields required to make a request.
66--
66--
67-- Use one of the following lenses to modify other fields as desired:
67-- Use one of the following lenses to modify other fields as desired:
68--
68--
69−-- * 'tasTaskqueue'
69+-- * 'tqgTaskQueue'
70--
70--
71−-- * 'tasProject'
71+-- * 'tqgProject'
72--
72--
73−-- * 'tasGetStats'
73+-- * 'tqgGetStats'
74−taskqueuesGet
74+taskQueuesGet
75− :: Text -- ^ 'tasTaskqueue'
75+ :: Text -- ^ 'tqgTaskQueue'
76− -> Text -- ^ 'tasProject'
76+ -> Text -- ^ 'tqgProject'
77− -> TaskqueuesGet
77+ -> TaskQueuesGet
78−taskqueuesGet pTasTaskqueue_ pTasProject_ =
78+taskQueuesGet pTqgTaskQueue_ pTqgProject_ =
79− TaskqueuesGet'
79+ TaskQueuesGet'
80− { _tasTaskqueue = pTasTaskqueue_
80+ { _tqgTaskQueue = pTqgTaskQueue_
81− , _tasProject = pTasProject_
81+ , _tqgProject = pTqgProject_
82− , _tasGetStats = Nothing
82+ , _tqgGetStats = Nothing
83 }
83 }
84
84
85-- | The id of the taskqueue to get the properties of.
85-- | The id of the taskqueue to get the properties of.
86−tasTaskqueue :: Lens' TaskqueuesGet Text
86+tqgTaskQueue :: Lens' TaskQueuesGet Text
87−tasTaskqueue
87+tqgTaskQueue
88− = lens _tasTaskqueue (\ s a -> s{_tasTaskqueue = a})
88+ = lens _tqgTaskQueue (\ s a -> s{_tqgTaskQueue = a})
89
89
90-- | The project under which the queue lies.
90-- | The project under which the queue lies.
91−tasProject :: Lens' TaskqueuesGet Text
91+tqgProject :: Lens' TaskQueuesGet Text
92−tasProject
92+tqgProject
93− = lens _tasProject (\ s a -> s{_tasProject = a})
93+ = lens _tqgProject (\ s a -> s{_tqgProject = a})
94
94
95-- | Whether to get stats. Optional.
95-- | Whether to get stats. Optional.
96−tasGetStats :: Lens' TaskqueuesGet (Maybe Bool)
96+tqgGetStats :: Lens' TaskQueuesGet (Maybe Bool)
97−tasGetStats
97+tqgGetStats
98− = lens _tasGetStats (\ s a -> s{_tasGetStats = a})
98+ = lens _tqgGetStats (\ s a -> s{_tqgGetStats = a})
99
99
100−instance GoogleRequest TaskqueuesGet where
100+instance GoogleRequest TaskQueuesGet where
101− type Rs TaskqueuesGet = TaskQueue
101+ type Rs TaskQueuesGet = TaskQueue
102− type Scopes TaskqueuesGet =
102+ type Scopes TaskQueuesGet =
103 '["https://www.googleapis.com/auth/taskqueue",
103 '["https://www.googleapis.com/auth/taskqueue",
104 "https://www.googleapis.com/auth/taskqueue.consumer"]
104 "https://www.googleapis.com/auth/taskqueue.consumer"]
105− requestClient TaskqueuesGet'{..}
105+ requestClient TaskQueuesGet'{..}
106− = go _tasProject _tasTaskqueue _tasGetStats
106+ = go _tqgProject _tqgTaskQueue _tqgGetStats
107 (Just AltJSON)
107 (Just AltJSON)
108 taskQueueService
108 taskQueueService
109 where go
109 where go
110− = buildClient (Proxy :: Proxy TaskqueuesGetResource)
110+ = buildClient (Proxy :: Proxy TaskQueuesGetResource)
111 mempty
111 mempty
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Delete.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Delete
33 , TasksDelete
33 , TasksDelete
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tdTaskqueue
36+ , tdTaskQueue
37 , tdProject
37 , tdProject
38 , tdTask
38 , tdTask
39 ) where
39 ) where
@@ -58,7 +58,7 @@ type TasksDeleteResource =
58--
58--
59-- /See:/ 'tasksDelete' smart constructor.
59-- /See:/ 'tasksDelete' smart constructor.
60data TasksDelete = TasksDelete'
60data TasksDelete = TasksDelete'
61− { _tdTaskqueue :: !Text
61+ { _tdTaskQueue :: !Text
62 , _tdProject :: !Text
62 , _tdProject :: !Text
63 , _tdTask :: !Text
63 , _tdTask :: !Text
64 } deriving (Eq,Show,Data,Typeable,Generic)
64 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -67,27 +67,27 @@ data TasksDelete = TasksDelete'
67--
67--
68-- Use one of the following lenses to modify other fields as desired:
68-- Use one of the following lenses to modify other fields as desired:
69--
69--
70−-- * 'tdTaskqueue'
70+-- * 'tdTaskQueue'
71--
71--
72-- * 'tdProject'
72-- * 'tdProject'
73--
73--
74-- * 'tdTask'
74-- * 'tdTask'
75tasksDelete
75tasksDelete
76− :: Text -- ^ 'tdTaskqueue'
76+ :: Text -- ^ 'tdTaskQueue'
77 -> Text -- ^ 'tdProject'
77 -> Text -- ^ 'tdProject'
78 -> Text -- ^ 'tdTask'
78 -> Text -- ^ 'tdTask'
79 -> TasksDelete
79 -> TasksDelete
80−tasksDelete pTdTaskqueue_ pTdProject_ pTdTask_ =
80+tasksDelete pTdTaskQueue_ pTdProject_ pTdTask_ =
81 TasksDelete'
81 TasksDelete'
82− { _tdTaskqueue = pTdTaskqueue_
82+ { _tdTaskQueue = pTdTaskQueue_
83 , _tdProject = pTdProject_
83 , _tdProject = pTdProject_
84 , _tdTask = pTdTask_
84 , _tdTask = pTdTask_
85 }
85 }
86
86
87-- | The taskqueue to delete a task from.
87-- | The taskqueue to delete a task from.
88−tdTaskqueue :: Lens' TasksDelete Text
88+tdTaskQueue :: Lens' TasksDelete Text
89−tdTaskqueue
89+tdTaskQueue
90− = lens _tdTaskqueue (\ s a -> s{_tdTaskqueue = a})
90+ = lens _tdTaskQueue (\ s a -> s{_tdTaskQueue = a})
91
91
92-- | The project under which the queue lies.
92-- | The project under which the queue lies.
93tdProject :: Lens' TasksDelete Text
93tdProject :: Lens' TasksDelete Text
@@ -104,7 +104,7 @@ instance GoogleRequest TasksDelete where
104 '["https://www.googleapis.com/auth/taskqueue",
104 '["https://www.googleapis.com/auth/taskqueue",
105 "https://www.googleapis.com/auth/taskqueue.consumer"]
105 "https://www.googleapis.com/auth/taskqueue.consumer"]
106 requestClient TasksDelete'{..}
106 requestClient TasksDelete'{..}
107− = go _tdProject _tdTaskqueue _tdTask (Just AltJSON)
107+ = go _tdProject _tdTaskQueue _tdTask (Just AltJSON)
108 taskQueueService
108 taskQueueService
109 where go
109 where go
110 = buildClient (Proxy :: Proxy TasksDeleteResource)
110 = buildClient (Proxy :: Proxy TasksDeleteResource)
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Get.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Get
33 , TasksGet
33 , TasksGet
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tgTaskqueue
36+ , tgTaskQueue
37 , tgProject
37 , tgProject
38 , tgTask
38 , tgTask
39 ) where
39 ) where
@@ -58,7 +58,7 @@ type TasksGetResource =
58--
58--
59-- /See:/ 'tasksGet' smart constructor.
59-- /See:/ 'tasksGet' smart constructor.
60data TasksGet = TasksGet'
60data TasksGet = TasksGet'
61− { _tgTaskqueue :: !Text
61+ { _tgTaskQueue :: !Text
62 , _tgProject :: !Text
62 , _tgProject :: !Text
63 , _tgTask :: !Text
63 , _tgTask :: !Text
64 } deriving (Eq,Show,Data,Typeable,Generic)
64 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -67,27 +67,27 @@ data TasksGet = TasksGet'
67--
67--
68-- Use one of the following lenses to modify other fields as desired:
68-- Use one of the following lenses to modify other fields as desired:
69--
69--
70−-- * 'tgTaskqueue'
70+-- * 'tgTaskQueue'
71--
71--
72-- * 'tgProject'
72-- * 'tgProject'
73--
73--
74-- * 'tgTask'
74-- * 'tgTask'
75tasksGet
75tasksGet
76− :: Text -- ^ 'tgTaskqueue'
76+ :: Text -- ^ 'tgTaskQueue'
77 -> Text -- ^ 'tgProject'
77 -> Text -- ^ 'tgProject'
78 -> Text -- ^ 'tgTask'
78 -> Text -- ^ 'tgTask'
79 -> TasksGet
79 -> TasksGet
80−tasksGet pTgTaskqueue_ pTgProject_ pTgTask_ =
80+tasksGet pTgTaskQueue_ pTgProject_ pTgTask_ =
81 TasksGet'
81 TasksGet'
82− { _tgTaskqueue = pTgTaskqueue_
82+ { _tgTaskQueue = pTgTaskQueue_
83 , _tgProject = pTgProject_
83 , _tgProject = pTgProject_
84 , _tgTask = pTgTask_
84 , _tgTask = pTgTask_
85 }
85 }
86
86
87-- | The taskqueue in which the task belongs.
87-- | The taskqueue in which the task belongs.
88−tgTaskqueue :: Lens' TasksGet Text
88+tgTaskQueue :: Lens' TasksGet Text
89−tgTaskqueue
89+tgTaskQueue
90− = lens _tgTaskqueue (\ s a -> s{_tgTaskqueue = a})
90+ = lens _tgTaskQueue (\ s a -> s{_tgTaskQueue = a})
91
91
92-- | The project under which the queue lies.
92-- | The project under which the queue lies.
93tgProject :: Lens' TasksGet Text
93tgProject :: Lens' TasksGet Text
@@ -104,7 +104,7 @@ instance GoogleRequest TasksGet where
104 '["https://www.googleapis.com/auth/taskqueue",
104 '["https://www.googleapis.com/auth/taskqueue",
105 "https://www.googleapis.com/auth/taskqueue.consumer"]
105 "https://www.googleapis.com/auth/taskqueue.consumer"]
106 requestClient TasksGet'{..}
106 requestClient TasksGet'{..}
107− = go _tgProject _tgTaskqueue _tgTask (Just AltJSON)
107+ = go _tgProject _tgTaskQueue _tgTask (Just AltJSON)
108 taskQueueService
108 taskQueueService
109 where go
109 where go
110 = buildClient (Proxy :: Proxy TasksGetResource)
110 = buildClient (Proxy :: Proxy TasksGetResource)
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Insert.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Insert
33 , TasksInsert
33 , TasksInsert
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tiTaskqueue
36+ , tiTaskQueue
37 , tiProject
37 , tiProject
38 , tiPayload
38 , tiPayload
39 ) where
39 ) where
@@ -58,7 +58,7 @@ type TasksInsertResource =
58--
58--
59-- /See:/ 'tasksInsert' smart constructor.
59-- /See:/ 'tasksInsert' smart constructor.
60data TasksInsert = TasksInsert'
60data TasksInsert = TasksInsert'
61− { _tiTaskqueue :: !Text
61+ { _tiTaskQueue :: !Text
62 , _tiProject :: !Text
62 , _tiProject :: !Text
63 , _tiPayload :: !Task
63 , _tiPayload :: !Task
64 } deriving (Eq,Show,Data,Typeable,Generic)
64 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -67,27 +67,27 @@ data TasksInsert = TasksInsert'
67--
67--
68-- Use one of the following lenses to modify other fields as desired:
68-- Use one of the following lenses to modify other fields as desired:
69--
69--
70−-- * 'tiTaskqueue'
70+-- * 'tiTaskQueue'
71--
71--
72-- * 'tiProject'
72-- * 'tiProject'
73--
73--
74-- * 'tiPayload'
74-- * 'tiPayload'
75tasksInsert
75tasksInsert
76− :: Text -- ^ 'tiTaskqueue'
76+ :: Text -- ^ 'tiTaskQueue'
77 -> Text -- ^ 'tiProject'
77 -> Text -- ^ 'tiProject'
78 -> Task -- ^ 'tiPayload'
78 -> Task -- ^ 'tiPayload'
79 -> TasksInsert
79 -> TasksInsert
80−tasksInsert pTiTaskqueue_ pTiProject_ pTiPayload_ =
80+tasksInsert pTiTaskQueue_ pTiProject_ pTiPayload_ =
81 TasksInsert'
81 TasksInsert'
82− { _tiTaskqueue = pTiTaskqueue_
82+ { _tiTaskQueue = pTiTaskQueue_
83 , _tiProject = pTiProject_
83 , _tiProject = pTiProject_
84 , _tiPayload = pTiPayload_
84 , _tiPayload = pTiPayload_
85 }
85 }
86
86
87-- | The taskqueue to insert the task into
87-- | The taskqueue to insert the task into
88−tiTaskqueue :: Lens' TasksInsert Text
88+tiTaskQueue :: Lens' TasksInsert Text
89−tiTaskqueue
89+tiTaskQueue
90− = lens _tiTaskqueue (\ s a -> s{_tiTaskqueue = a})
90+ = lens _tiTaskQueue (\ s a -> s{_tiTaskQueue = a})
91
91
92-- | The project under which the queue lies
92-- | The project under which the queue lies
93tiProject :: Lens' TasksInsert Text
93tiProject :: Lens' TasksInsert Text
@@ -105,7 +105,7 @@ instance GoogleRequest TasksInsert where
105 '["https://www.googleapis.com/auth/taskqueue",
105 '["https://www.googleapis.com/auth/taskqueue",
106 "https://www.googleapis.com/auth/taskqueue.consumer"]
106 "https://www.googleapis.com/auth/taskqueue.consumer"]
107 requestClient TasksInsert'{..}
107 requestClient TasksInsert'{..}
108− = go _tiProject _tiTaskqueue (Just AltJSON)
108+ = go _tiProject _tiTaskQueue (Just AltJSON)
109 _tiPayload
109 _tiPayload
110 taskQueueService
110 taskQueueService
111 where go
111 where go
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Lease.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Lease
33 , TasksLease
33 , TasksLease
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tlTaskqueue
36+ , tlTaskQueue
37 , tlTag
37 , tlTag
38 , tlProject
38 , tlProject
39 , tlNumTasks
39 , tlNumTasks
@@ -65,7 +65,7 @@ type TasksLeaseResource =
65--
65--
66-- /See:/ 'tasksLease' smart constructor.
66-- /See:/ 'tasksLease' smart constructor.
67data TasksLease = TasksLease'
67data TasksLease = TasksLease'
68− { _tlTaskqueue :: !Text
68+ { _tlTaskQueue :: !Text
69 , _tlTag :: !(Maybe Text)
69 , _tlTag :: !(Maybe Text)
70 , _tlProject :: !Text
70 , _tlProject :: !Text
71 , _tlNumTasks :: !(Textual Int32)
71 , _tlNumTasks :: !(Textual Int32)
@@ -77,7 +77,7 @@ data TasksLease = TasksLease'
77--
77--
78-- Use one of the following lenses to modify other fields as desired:
78-- Use one of the following lenses to modify other fields as desired:
79--
79--
80−-- * 'tlTaskqueue'
80+-- * 'tlTaskQueue'
81--
81--
82-- * 'tlTag'
82-- * 'tlTag'
83--
83--
@@ -89,14 +89,14 @@ data TasksLease = TasksLease'
89--
89--
90-- * 'tlGroupByTag'
90-- * 'tlGroupByTag'
91tasksLease
91tasksLease
92− :: Text -- ^ 'tlTaskqueue'
92+ :: Text -- ^ 'tlTaskQueue'
93 -> Text -- ^ 'tlProject'
93 -> Text -- ^ 'tlProject'
94 -> Int32 -- ^ 'tlNumTasks'
94 -> Int32 -- ^ 'tlNumTasks'
95 -> Int32 -- ^ 'tlLeaseSecs'
95 -> Int32 -- ^ 'tlLeaseSecs'
96 -> TasksLease
96 -> TasksLease
97−tasksLease pTlTaskqueue_ pTlProject_ pTlNumTasks_ pTlLeaseSecs_ =
97+tasksLease pTlTaskQueue_ pTlProject_ pTlNumTasks_ pTlLeaseSecs_ =
98 TasksLease'
98 TasksLease'
99− { _tlTaskqueue = pTlTaskqueue_
99+ { _tlTaskQueue = pTlTaskQueue_
100 , _tlTag = Nothing
100 , _tlTag = Nothing
101 , _tlProject = pTlProject_
101 , _tlProject = pTlProject_
102 , _tlNumTasks = _Coerce # pTlNumTasks_
102 , _tlNumTasks = _Coerce # pTlNumTasks_
@@ -105,9 +105,9 @@ tasksLease pTlTaskqueue_ pTlProject_ pTlNumTasks_ pTlLeaseSecs_ =
105 }
105 }
106
106
107-- | The taskqueue to lease a task from.
107-- | The taskqueue to lease a task from.
108−tlTaskqueue :: Lens' TasksLease Text
108+tlTaskQueue :: Lens' TasksLease Text
109−tlTaskqueue
109+tlTaskQueue
110− = lens _tlTaskqueue (\ s a -> s{_tlTaskqueue = a})
110+ = lens _tlTaskQueue (\ s a -> s{_tlTaskQueue = a})
111
111
112-- | The tag allowed for tasks in the response. Must only be specified if
112-- | The tag allowed for tasks in the response. Must only be specified if
113-- group_by_tag is true. If group_by_tag is true and tag is not specified
113-- group_by_tag is true. If group_by_tag is true and tag is not specified
@@ -144,7 +144,7 @@ instance GoogleRequest TasksLease where
144 '["https://www.googleapis.com/auth/taskqueue",
144 '["https://www.googleapis.com/auth/taskqueue",
145 "https://www.googleapis.com/auth/taskqueue.consumer"]
145 "https://www.googleapis.com/auth/taskqueue.consumer"]
146 requestClient TasksLease'{..}
146 requestClient TasksLease'{..}
147− = go _tlProject _tlTaskqueue (Just _tlNumTasks)
147+ = go _tlProject _tlTaskQueue (Just _tlNumTasks)
148 (Just _tlLeaseSecs)
148 (Just _tlLeaseSecs)
149 _tlTag
149 _tlTag
150 _tlGroupByTag
150 _tlGroupByTag
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/List.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.List
33 , TasksList
33 , TasksList
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tTaskqueue
36+ , tTaskQueue
37 , tProject
37 , tProject
38 ) where
38 ) where
39
39
@@ -56,7 +56,7 @@ type TasksListResource =
56--
56--
57-- /See:/ 'tasksList' smart constructor.
57-- /See:/ 'tasksList' smart constructor.
58data TasksList = TasksList'
58data TasksList = TasksList'
59− { _tTaskqueue :: !Text
59+ { _tTaskQueue :: !Text
60 , _tProject :: !Text
60 , _tProject :: !Text
61 } deriving (Eq,Show,Data,Typeable,Generic)
61 } deriving (Eq,Show,Data,Typeable,Generic)
62
62
@@ -64,23 +64,23 @@ data TasksList = TasksList'
64--
64--
65-- Use one of the following lenses to modify other fields as desired:
65-- Use one of the following lenses to modify other fields as desired:
66--
66--
67−-- * 'tTaskqueue'
67+-- * 'tTaskQueue'
68--
68--
69-- * 'tProject'
69-- * 'tProject'
70tasksList
70tasksList
71− :: Text -- ^ 'tTaskqueue'
71+ :: Text -- ^ 'tTaskQueue'
72 -> Text -- ^ 'tProject'
72 -> Text -- ^ 'tProject'
73 -> TasksList
73 -> TasksList
74−tasksList pTTaskqueue_ pTProject_ =
74+tasksList pTTaskQueue_ pTProject_ =
75 TasksList'
75 TasksList'
76− { _tTaskqueue = pTTaskqueue_
76+ { _tTaskQueue = pTTaskQueue_
77 , _tProject = pTProject_
77 , _tProject = pTProject_
78 }
78 }
79
79
80-- | The id of the taskqueue to list tasks from.
80-- | The id of the taskqueue to list tasks from.
81−tTaskqueue :: Lens' TasksList Text
81+tTaskQueue :: Lens' TasksList Text
82−tTaskqueue
82+tTaskQueue
83− = lens _tTaskqueue (\ s a -> s{_tTaskqueue = a})
83+ = lens _tTaskQueue (\ s a -> s{_tTaskQueue = a})
84
84
85-- | The project under which the queue lies.
85-- | The project under which the queue lies.
86tProject :: Lens' TasksList Text
86tProject :: Lens' TasksList Text
@@ -92,7 +92,7 @@ instance GoogleRequest TasksList where
92 '["https://www.googleapis.com/auth/taskqueue",
92 '["https://www.googleapis.com/auth/taskqueue",
93 "https://www.googleapis.com/auth/taskqueue.consumer"]
93 "https://www.googleapis.com/auth/taskqueue.consumer"]
94 requestClient TasksList'{..}
94 requestClient TasksList'{..}
95− = go _tProject _tTaskqueue (Just AltJSON)
95+ = go _tProject _tTaskQueue (Just AltJSON)
96 taskQueueService
96 taskQueueService
97 where go
97 where go
98 = buildClient (Proxy :: Proxy TasksListResource)
98 = buildClient (Proxy :: Proxy TasksListResource)
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Patch.hs+10−10
@@ -34,7 +34,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Patch
34 , TasksPatch
34 , TasksPatch
35
35
36 -- * Request Lenses
36 -- * Request Lenses
37− , tpTaskqueue
37+ , tpTaskQueue
38 , tpProject
38 , tpProject
39 , tpPayload
39 , tpPayload
40 , tpTask
40 , tpTask
@@ -64,7 +64,7 @@ type TasksPatchResource =
64--
64--
65-- /See:/ 'tasksPatch' smart constructor.
65-- /See:/ 'tasksPatch' smart constructor.
66data TasksPatch = TasksPatch'
66data TasksPatch = TasksPatch'
67− { _tpTaskqueue :: !Text
67+ { _tpTaskQueue :: !Text
68 , _tpProject :: !Text
68 , _tpProject :: !Text
69 , _tpPayload :: !Task
69 , _tpPayload :: !Task
70 , _tpTask :: !Text
70 , _tpTask :: !Text
@@ -75,7 +75,7 @@ data TasksPatch = TasksPatch'
75--
75--
76-- Use one of the following lenses to modify other fields as desired:
76-- Use one of the following lenses to modify other fields as desired:
77--
77--
78−-- * 'tpTaskqueue'
78+-- * 'tpTaskQueue'
79--
79--
80-- * 'tpProject'
80-- * 'tpProject'
81--
81--
@@ -85,24 +85,24 @@ data TasksPatch = TasksPatch'
85--
85--
86-- * 'tpNewLeaseSeconds'
86-- * 'tpNewLeaseSeconds'
87tasksPatch
87tasksPatch
88− :: Text -- ^ 'tpTaskqueue'
88+ :: Text -- ^ 'tpTaskQueue'
89 -> Text -- ^ 'tpProject'
89 -> Text -- ^ 'tpProject'
90 -> Task -- ^ 'tpPayload'
90 -> Task -- ^ 'tpPayload'
91 -> Text -- ^ 'tpTask'
91 -> Text -- ^ 'tpTask'
92 -> Int32 -- ^ 'tpNewLeaseSeconds'
92 -> Int32 -- ^ 'tpNewLeaseSeconds'
93 -> TasksPatch
93 -> TasksPatch
94−tasksPatch pTpTaskqueue_ pTpProject_ pTpPayload_ pTpTask_ pTpNewLeaseSeconds_ =
94+tasksPatch pTpTaskQueue_ pTpProject_ pTpPayload_ pTpTask_ pTpNewLeaseSeconds_ =
95 TasksPatch'
95 TasksPatch'
96− { _tpTaskqueue = pTpTaskqueue_
96+ { _tpTaskQueue = pTpTaskQueue_
97 , _tpProject = pTpProject_
97 , _tpProject = pTpProject_
98 , _tpPayload = pTpPayload_
98 , _tpPayload = pTpPayload_
99 , _tpTask = pTpTask_
99 , _tpTask = pTpTask_
100 , _tpNewLeaseSeconds = _Coerce # pTpNewLeaseSeconds_
100 , _tpNewLeaseSeconds = _Coerce # pTpNewLeaseSeconds_
101 }
101 }
102
102
103−tpTaskqueue :: Lens' TasksPatch Text
103+tpTaskQueue :: Lens' TasksPatch Text
104−tpTaskqueue
104+tpTaskQueue
105− = lens _tpTaskqueue (\ s a -> s{_tpTaskqueue = a})
105+ = lens _tpTaskQueue (\ s a -> s{_tpTaskQueue = a})
106
106
107-- | The project under which the queue lies.
107-- | The project under which the queue lies.
108tpProject :: Lens' TasksPatch Text
108tpProject :: Lens' TasksPatch Text
@@ -130,7 +130,7 @@ instance GoogleRequest TasksPatch where
130 '["https://www.googleapis.com/auth/taskqueue",
130 '["https://www.googleapis.com/auth/taskqueue",
131 "https://www.googleapis.com/auth/taskqueue.consumer"]
131 "https://www.googleapis.com/auth/taskqueue.consumer"]
132 requestClient TasksPatch'{..}
132 requestClient TasksPatch'{..}
133− = go _tpProject _tpTaskqueue _tpTask
133+ = go _tpProject _tpTaskQueue _tpTask
134 (Just _tpNewLeaseSeconds)
134 (Just _tpNewLeaseSeconds)
135 (Just AltJSON)
135 (Just AltJSON)
136 _tpPayload
136 _tpPayload
gogol-taskqueue/gen/Network/Google/Resource/TaskQueue/Tasks/Update.hs+10−10
@@ -33,7 +33,7 @@ module Network.Google.Resource.TaskQueue.Tasks.Update
33 , TasksUpdate
33 , TasksUpdate
34
34
35 -- * Request Lenses
35 -- * Request Lenses
36− , tuTaskqueue
36+ , tuTaskQueue
37 , tuProject
37 , tuProject
38 , tuPayload
38 , tuPayload
39 , tuTask
39 , tuTask
@@ -62,7 +62,7 @@ type TasksUpdateResource =
62--
62--
63-- /See:/ 'tasksUpdate' smart constructor.
63-- /See:/ 'tasksUpdate' smart constructor.
64data TasksUpdate = TasksUpdate'
64data TasksUpdate = TasksUpdate'
65− { _tuTaskqueue :: !Text
65+ { _tuTaskQueue :: !Text
66 , _tuProject :: !Text
66 , _tuProject :: !Text
67 , _tuPayload :: !Task
67 , _tuPayload :: !Task
68 , _tuTask :: !Text
68 , _tuTask :: !Text
@@ -73,7 +73,7 @@ data TasksUpdate = TasksUpdate'
73--
73--
74-- Use one of the following lenses to modify other fields as desired:
74-- Use one of the following lenses to modify other fields as desired:
75--
75--
76−-- * 'tuTaskqueue'
76+-- * 'tuTaskQueue'
77--
77--
78-- * 'tuProject'
78-- * 'tuProject'
79--
79--
@@ -83,24 +83,24 @@ data TasksUpdate = TasksUpdate'
83--
83--
84-- * 'tuNewLeaseSeconds'
84-- * 'tuNewLeaseSeconds'
85tasksUpdate
85tasksUpdate
86− :: Text -- ^ 'tuTaskqueue'
86+ :: Text -- ^ 'tuTaskQueue'
87 -> Text -- ^ 'tuProject'
87 -> Text -- ^ 'tuProject'
88 -> Task -- ^ 'tuPayload'
88 -> Task -- ^ 'tuPayload'
89 -> Text -- ^ 'tuTask'
89 -> Text -- ^ 'tuTask'
90 -> Int32 -- ^ 'tuNewLeaseSeconds'
90 -> Int32 -- ^ 'tuNewLeaseSeconds'
91 -> TasksUpdate
91 -> TasksUpdate
92−tasksUpdate pTuTaskqueue_ pTuProject_ pTuPayload_ pTuTask_ pTuNewLeaseSeconds_ =
92+tasksUpdate pTuTaskQueue_ pTuProject_ pTuPayload_ pTuTask_ pTuNewLeaseSeconds_ =
93 TasksUpdate'
93 TasksUpdate'
94− { _tuTaskqueue = pTuTaskqueue_
94+ { _tuTaskQueue = pTuTaskQueue_
95 , _tuProject = pTuProject_
95 , _tuProject = pTuProject_
96 , _tuPayload = pTuPayload_
96 , _tuPayload = pTuPayload_
97 , _tuTask = pTuTask_
97 , _tuTask = pTuTask_
98 , _tuNewLeaseSeconds = _Coerce # pTuNewLeaseSeconds_
98 , _tuNewLeaseSeconds = _Coerce # pTuNewLeaseSeconds_
99 }
99 }
100
100
101−tuTaskqueue :: Lens' TasksUpdate Text
101+tuTaskQueue :: Lens' TasksUpdate Text
102−tuTaskqueue
102+tuTaskQueue
103− = lens _tuTaskqueue (\ s a -> s{_tuTaskqueue = a})
103+ = lens _tuTaskQueue (\ s a -> s{_tuTaskQueue = a})
104
104
105-- | The project under which the queue lies.
105-- | The project under which the queue lies.
106tuProject :: Lens' TasksUpdate Text
106tuProject :: Lens' TasksUpdate Text
@@ -128,7 +128,7 @@ instance GoogleRequest TasksUpdate where
128 '["https://www.googleapis.com/auth/taskqueue",
128 '["https://www.googleapis.com/auth/taskqueue",
129 "https://www.googleapis.com/auth/taskqueue.consumer"]
129 "https://www.googleapis.com/auth/taskqueue.consumer"]
130 requestClient TasksUpdate'{..}
130 requestClient TasksUpdate'{..}
131− = go _tuProject _tuTaskqueue _tuTask
131+ = go _tuProject _tuTaskQueue _tuTask
132 (Just _tuNewLeaseSeconds)
132 (Just _tuNewLeaseSeconds)
133 (Just AltJSON)
133 (Just AltJSON)
134 _tuPayload
134 _tuPayload
gogol-taskqueue/gen/Network/Google/TaskQueue.hs+4−4
@@ -31,7 +31,7 @@ module Network.Google.TaskQueue
31 -- * Resources
31 -- * Resources
32
32
33 -- ** taskqueue.taskqueues.get
33 -- ** taskqueue.taskqueues.get
34− , module Network.Google.Resource.TaskQueue.Taskqueues.Get
34+ , module Network.Google.Resource.TaskQueue.TaskQueues.Get
35
35
36 -- ** taskqueue.tasks.delete
36 -- ** taskqueue.tasks.delete
37 , module Network.Google.Resource.TaskQueue.Tasks.Delete
37 , module Network.Google.Resource.TaskQueue.Tasks.Delete
@@ -96,7 +96,7 @@ module Network.Google.TaskQueue
96 , Task
96 , Task
97 , task
97 , task
98 , ttRetryCount
98 , ttRetryCount
99− , ttEnqueueTimestamp
99+ , ttEnQueueTimestamp
100 , ttTag
100 , ttTag
101 , ttKind
101 , ttKind
102 , ttQueueName
102 , ttQueueName
@@ -106,7 +106,7 @@ module Network.Google.TaskQueue
106 ) where
106 ) where
107
107
108import Network.Google.Prelude
108import Network.Google.Prelude
109−import Network.Google.Resource.TaskQueue.Taskqueues.Get
109+import Network.Google.Resource.TaskQueue.TaskQueues.Get
110import Network.Google.Resource.TaskQueue.Tasks.Delete
110import Network.Google.Resource.TaskQueue.Tasks.Delete
111import Network.Google.Resource.TaskQueue.Tasks.Get
111import Network.Google.Resource.TaskQueue.Tasks.Get
112import Network.Google.Resource.TaskQueue.Tasks.Insert
112import Network.Google.Resource.TaskQueue.Tasks.Insert
@@ -128,4 +128,4 @@ type TaskQueueAPI =
128 :<|> TasksLeaseResource
128 :<|> TasksLeaseResource
129 :<|> TasksDeleteResource
129 :<|> TasksDeleteResource
130 :<|> TasksUpdateResource
130 :<|> TasksUpdateResource
131− :<|> TaskqueuesGetResource
131+ :<|> TaskQueuesGetResource
gogol-taskqueue/gen/Network/Google/TaskQueue/Types.hs+1−1
@@ -63,7 +63,7 @@ module Network.Google.TaskQueue.Types
63 , Task
63 , Task
64 , task
64 , task
65 , ttRetryCount
65 , ttRetryCount
66− , ttEnqueueTimestamp
66+ , ttEnQueueTimestamp
67 , ttTag
67 , ttTag
68 , ttKind
68 , ttKind
69 , ttQueueName
69 , ttQueueName
gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Product.hs+8−8
@@ -343,7 +343,7 @@ instance ToJSON Tasks where
343-- /See:/ 'task' smart constructor.
343-- /See:/ 'task' smart constructor.
344data Task = Task'
344data Task = Task'
345 { _ttRetryCount :: !(Maybe (Textual Int32))
345 { _ttRetryCount :: !(Maybe (Textual Int32))
346− , _ttEnqueueTimestamp :: !(Maybe (Textual Int64))
346+ , _ttEnQueueTimestamp :: !(Maybe (Textual Int64))
347 , _ttTag :: !(Maybe Text)
347 , _ttTag :: !(Maybe Text)
348 , _ttKind :: !Text
348 , _ttKind :: !Text
349 , _ttQueueName :: !(Maybe Text)
349 , _ttQueueName :: !(Maybe Text)
@@ -358,7 +358,7 @@ data Task = Task'
358--
358--
359-- * 'ttRetryCount'
359-- * 'ttRetryCount'
360--
360--
361−-- * 'ttEnqueueTimestamp'
361+-- * 'ttEnQueueTimestamp'
362--
362--
363-- * 'ttTag'
363-- * 'ttTag'
364--
364--
@@ -376,7 +376,7 @@ task
376task =
376task =
377 Task'
377 Task'
378 { _ttRetryCount = Nothing
378 { _ttRetryCount = Nothing
379− , _ttEnqueueTimestamp = Nothing
379+ , _ttEnQueueTimestamp = Nothing
380 , _ttTag = Nothing
380 , _ttTag = Nothing
381 , _ttKind = "taskqueues#task"
381 , _ttKind = "taskqueues#task"
382 , _ttQueueName = Nothing
382 , _ttQueueName = Nothing
@@ -392,10 +392,10 @@ ttRetryCount
392 . mapping _Coerce
392 . mapping _Coerce
393
393
394-- | Time (in seconds since the epoch) at which the task was enqueued.
394-- | Time (in seconds since the epoch) at which the task was enqueued.
395−ttEnqueueTimestamp :: Lens' Task (Maybe Int64)
395+ttEnQueueTimestamp :: Lens' Task (Maybe Int64)
396−ttEnqueueTimestamp
396+ttEnQueueTimestamp
397− = lens _ttEnqueueTimestamp
397+ = lens _ttEnQueueTimestamp
398− (\ s a -> s{_ttEnqueueTimestamp = a})
398+ (\ s a -> s{_ttEnQueueTimestamp = a})
399 . mapping _Coerce
399 . mapping _Coerce
400
400
401-- | Tag for the task, could be used later to lease tasks grouped by a
401-- | Tag for the task, could be used later to lease tasks grouped by a
@@ -449,7 +449,7 @@ instance ToJSON Task where
449 = object
449 = object
450 (catMaybes
450 (catMaybes
451 [("retry_count" .=) <$> _ttRetryCount,
451 [("retry_count" .=) <$> _ttRetryCount,
452− ("enqueueTimestamp" .=) <$> _ttEnqueueTimestamp,
452+ ("enqueueTimestamp" .=) <$> _ttEnQueueTimestamp,
453 ("tag" .=) <$> _ttTag, Just ("kind" .= _ttKind),
453 ("tag" .=) <$> _ttTag, Just ("kind" .= _ttKind),
454 ("queueName" .=) <$> _ttQueueName,
454 ("queueName" .=) <$> _ttQueueName,
455 ("payloadBase64" .=) <$> _ttPayloadBase64,
455 ("payloadBase64" .=) <$> _ttPayloadBase64,
gogol-taskqueue/gogol-taskqueue.cabal+1−1
@@ -33,7 +33,7 @@ library
33 ghc-options: -Wall
33 ghc-options: -Wall
34
34
35 exposed-modules:
35 exposed-modules:
36− Network.Google.Resource.TaskQueue.Taskqueues.Get
36+ Network.Google.Resource.TaskQueue.TaskQueues.Get
37 , Network.Google.Resource.TaskQueue.Tasks.Delete
37 , Network.Google.Resource.TaskQueue.Tasks.Delete
38 , Network.Google.Resource.TaskQueue.Tasks.Get
38 , Network.Google.Resource.TaskQueue.Tasks.Get
39 , Network.Google.Resource.TaskQueue.Tasks.Insert
39 , Network.Google.Resource.TaskQueue.Tasks.Insert
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics.hs+2−2
@@ -23,9 +23,9 @@ module Network.Google.YouTubeAnalytics
23
23
24 -- * OAuth Scopes
24 -- * OAuth Scopes
25 , youTubeScope
25 , youTubeScope
26− , ytAnalyticsReadOnlyScope
26+ , youTubeAnalyticsReadOnlyScope
27 , youTubePartnerScope
27 , youTubePartnerScope
28− , ytAnalyticsMonetaryReadOnlyScope
28+ , youTubeAnalyticsMonetaryReadOnlyScope
29 , youTubeReadOnlyScope
29 , youTubeReadOnlyScope
30
30
31 -- * API Declaration
31 -- * API Declaration
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+6−6
@@ -21,9 +21,9 @@ module Network.Google.YouTubeAnalytics.Types
21
21
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23 , youTubeScope
23 , youTubeScope
24− , ytAnalyticsReadOnlyScope
24+ , youTubeAnalyticsReadOnlyScope
25 , youTubePartnerScope
25 , youTubePartnerScope
26− , ytAnalyticsMonetaryReadOnlyScope
26+ , youTubeAnalyticsMonetaryReadOnlyScope
27 , youTubeReadOnlyScope
27 , youTubeReadOnlyScope
28
28
29 -- * GroupContentDetails
29 -- * GroupContentDetails
@@ -151,8 +151,8 @@ youTubeScope :: Proxy '["https://www.googleapis.com/auth/youtube"]
151youTubeScope = Proxy;
151youTubeScope = Proxy;
152
152
153-- | View YouTube Analytics reports for your YouTube content
153-- | View YouTube Analytics reports for your YouTube content
154−ytAnalyticsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
154+youTubeAnalyticsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
155−ytAnalyticsReadOnlyScope = Proxy;
155+youTubeAnalyticsReadOnlyScope = Proxy;
156
156
157-- | View and manage your assets and associated content on YouTube
157-- | View and manage your assets and associated content on YouTube
158youTubePartnerScope :: Proxy '["https://www.googleapis.com/auth/youtubepartner"]
158youTubePartnerScope :: Proxy '["https://www.googleapis.com/auth/youtubepartner"]
@@ -160,8 +160,8 @@ youTubePartnerScope = Proxy;
160
160
161-- | View monetary and non-monetary YouTube Analytics reports for your
161-- | View monetary and non-monetary YouTube Analytics reports for your
162-- YouTube content
162-- YouTube content
163−ytAnalyticsMonetaryReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
163+youTubeAnalyticsMonetaryReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
164−ytAnalyticsMonetaryReadOnlyScope = Proxy;
164+youTubeAnalyticsMonetaryReadOnlyScope = Proxy;
165
165
166-- | View your YouTube account
166-- | View your YouTube account
167youTubeReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/youtube.readonly"]
167youTubeReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/youtube.readonly"]
gogol-youtube-reporting/gen/Network/Google/YouTubeReporting.hs+2−2
@@ -23,8 +23,8 @@ module Network.Google.YouTubeReporting
23 youTubeReportingService
23 youTubeReportingService
24
24
25 -- * OAuth Scopes
25 -- * OAuth Scopes
26− , ytAnalyticsReadOnlyScope
26+ , youTubeAnalyticsReadOnlyScope
27− , ytAnalyticsMonetaryReadOnlyScope
27+ , youTubeAnalyticsMonetaryReadOnlyScope
28
28
29 -- * API Declaration
29 -- * API Declaration
30 , YouTubeReportingAPI
30 , YouTubeReportingAPI
gogol-youtube-reporting/gen/Network/Google/YouTubeReporting/Types.hs+6−6
@@ -20,8 +20,8 @@ module Network.Google.YouTubeReporting.Types
20 youTubeReportingService
20 youTubeReportingService
21
21
22 -- * OAuth Scopes
22 -- * OAuth Scopes
23− , ytAnalyticsReadOnlyScope
23+ , youTubeAnalyticsReadOnlyScope
24− , ytAnalyticsMonetaryReadOnlyScope
24+ , youTubeAnalyticsMonetaryReadOnlyScope
25
25
26 -- * ListReportsResponse
26 -- * ListReportsResponse
27 , ListReportsResponse
27 , ListReportsResponse
@@ -88,10 +88,10 @@ youTubeReportingService
88 "youtubereporting.googleapis.com"
88 "youtubereporting.googleapis.com"
89
89
90-- | View YouTube Analytics reports for your YouTube content
90-- | View YouTube Analytics reports for your YouTube content
91−ytAnalyticsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
91+youTubeAnalyticsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics.readonly"]
92−ytAnalyticsReadOnlyScope = Proxy;
92+youTubeAnalyticsReadOnlyScope = Proxy;
93
93
94-- | View monetary and non-monetary YouTube Analytics reports for your
94-- | View monetary and non-monetary YouTube Analytics reports for your
95-- YouTube content
95-- YouTube content
96−ytAnalyticsMonetaryReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
96+youTubeAnalyticsMonetaryReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/yt-analytics-monetary.readonly"]
97−ytAnalyticsMonetaryReadOnlyScope = Proxy;
97+youTubeAnalyticsMonetaryReadOnlyScope = Proxy;