summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Radestock <matthias@lshift.net>2008-10-01 12:39:26 +0100
committerMatthias Radestock <matthias@lshift.net>2008-10-01 12:39:26 +0100
commit581757b0122d58aaac458c7f03e7576ac928453e (patch)
treeb837f783f991ad53a4b15c1b1b4bfc7506b01dfb
parent61d631e74034074cb6fca2e542f1c014431e134f (diff)
downloadrabbitmq-server-bug19219.tar.gz
cosmetic refactoringbug19219
-rw-r--r--src/rabbit_amqqueue.erl14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/rabbit_amqqueue.erl b/src/rabbit_amqqueue.erl
index 193b1076..bd64f1e4 100644
--- a/src/rabbit_amqqueue.erl
+++ b/src/rabbit_amqqueue.erl
@@ -389,13 +389,13 @@ pseudo_queue(QueueName, Pid) ->
pid = Pid}.
safe_pmap_ok(F, L) ->
- case lists:filter(fun (R) -> R =/= ok end,
- rabbit_misc:upmap(
- fun (V) ->
- try F(V)
- catch Class:Reason -> {Class, Reason}
- end
- end, L)) of
+ case [R || R <- rabbit_misc:upmap(
+ fun (V) ->
+ try F(V)
+ catch Class:Reason -> {Class, Reason}
+ end
+ end, L),
+ R =/= ok] of
[] -> ok;
Errors -> {error, Errors}
end.