Be a bit more diligent with task creation
This commit is contained in:
parent
c377ec25dc
commit
12d0ecf0e6
1 changed files with 1 additions and 2 deletions
|
|
@ -28,8 +28,7 @@ let private publishZigbeeCommands (mqttClient: IMqttClient) (logger: ILogger) (c
|
||||||
return!
|
return!
|
||||||
commands
|
commands
|
||||||
|> Seq.map generateMqttMessage
|
|> Seq.map generateMqttMessage
|
||||||
|> Seq.map mqttClient.PublishAsync
|
|> Seq.map (fun message -> async { return! mqttClient.PublishAsync message |> Async.AwaitTask })
|
||||||
|> Seq.map Async.AwaitTask
|
|
||||||
|> Async.Sequential
|
|> Async.Sequential
|
||||||
|> Async.Ignore
|
|> Async.Ignore
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue