diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/delegate.erl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/delegate.erl b/src/delegate.erl index 8907f43aa3..6dd9d3974e 100644 --- a/src/delegate.erl +++ b/src/delegate.erl @@ -112,18 +112,18 @@ local_delegate(Pids, FPid) -> delegate_per_node(NodePids, FPid, DelegateFun) -> Self = self(), - [spawn(fun() -> - Self ! {result, DelegateFun(Node, + [spawn( + fun() -> Self ! {result, + DelegateFun(Node, fun() -> local_delegate(Pids, FPid) end)} - end) || {Node, Pids} <- NodePids], + end) || {Node, Pids} <- NodePids], gather_results([], length(NodePids)). gather_results(ResultsAcc, 0) -> ResultsAcc; - gather_results(ResultsAcc, ToGo) -> - receive {result, Result} -> - gather_results([Result | ResultsAcc], ToGo - 1) + receive + {result, Result} -> gather_results([Result | ResultsAcc], ToGo - 1) end. server(Node) when is_atom(Node) -> |