summaryrefslogtreecommitdiff
path: root/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs
diff options
context:
space:
mode:
authorBrendanHay <>2019-08-23 07:38:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2019-08-23 07:38:00 (GMT)
commit0af3651629f3e89aa162b41a30b0053fbed90862 (patch)
tree59ff9350963a013659ac088f4b1e824af3e35805 /gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs
parent0631d46cd089382f5521238cbe93c6e551d2ee6e (diff)
version 0.5.0HEAD0.5.0master
Diffstat (limited to 'gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs')
-rw-r--r--gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs10
1 files changed, 7 insertions, 3 deletions
diff --git a/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs b/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs
index f60dac2..25102f6 100644
--- a/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs
+++ b/gen/Network/Google/Resource/Dataflow/Projects/WorkerMessages.hs
@@ -64,7 +64,8 @@ type ProjectsWorkerMessagesResource =
-- | Send a worker_message to the service.
--
-- /See:/ 'projectsWorkerMessages' smart constructor.
-data ProjectsWorkerMessages = ProjectsWorkerMessages'
+data ProjectsWorkerMessages =
+ ProjectsWorkerMessages'
{ _pwmXgafv :: !(Maybe Xgafv)
, _pwmUploadProtocol :: !(Maybe Text)
, _pwmAccessToken :: !(Maybe Text)
@@ -72,7 +73,9 @@ data ProjectsWorkerMessages = ProjectsWorkerMessages'
, _pwmPayload :: !SendWorkerMessagesRequest
, _pwmProjectId :: !Text
, _pwmCallback :: !(Maybe Text)
- } deriving (Eq,Show,Data,Typeable,Generic)
+ }
+ deriving (Eq, Show, Data, Typeable, Generic)
+
-- | Creates a value of 'ProjectsWorkerMessages' with the minimum fields required to make a request.
--
@@ -96,7 +99,7 @@ projectsWorkerMessages
-> Text -- ^ 'pwmProjectId'
-> ProjectsWorkerMessages
projectsWorkerMessages pPwmPayload_ pPwmProjectId_ =
- ProjectsWorkerMessages'
+ ProjectsWorkerMessages'
{ _pwmXgafv = Nothing
, _pwmUploadProtocol = Nothing
, _pwmAccessToken = Nothing
@@ -106,6 +109,7 @@ projectsWorkerMessages pPwmPayload_ pPwmProjectId_ =
, _pwmCallback = Nothing
}
+
-- | V1 error format.
pwmXgafv :: Lens' ProjectsWorkerMessages (Maybe Xgafv)
pwmXgafv = lens _pwmXgafv (\ s a -> s{_pwmXgafv = a})