Skip to content

Commit 82b270e

Browse files
fixup! Introduce attemptEach to run a list of concurrent tasks
1 parent b5e9b71 commit 82b270e

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

src/ConcurrentTask.elm

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -932,6 +932,7 @@ attemptEach :
932932
-> ( Pool msg, Cmd msg )
933933
attemptEach config taskList =
934934
let
935+
attemptAccum : ConcurrentTask x a -> ( Pool msg, List (Cmd msg) ) -> ( Pool msg, List (Cmd msg) )
935936
attemptAccum task ( pool_, cmds_ ) =
936937
attempt { config | pool = pool_ } task
937938
|> Tuple.mapSecond (\cmd -> cmd :: cmds_)

0 commit comments

Comments
 (0)