aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-05-25 13:46:17 +0300
committerEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-05-25 13:46:17 +0300
commit50327a0cfc74cc8d17daf0eb79c4e4f87ba3e5f6 (patch)
tree1a6b95ed58dff7b9485f11954cc3f62fce367944
parentCosmetic change: Fix indentation errors (diff)
Fix case clause
Fixes #1746
-rw-r--r--src/ejabberd_s2s.erl10
1 files changed, 7 insertions, 3 deletions
diff --git a/src/ejabberd_s2s.erl b/src/ejabberd_s2s.erl
index d972f5866..4b74b8c4a 100644
--- a/src/ejabberd_s2s.erl
+++ b/src/ejabberd_s2s.erl
@@ -480,9 +480,13 @@ new_connection(MyServer, Server, From, FromTo,
end,
TRes = mnesia:transaction(F),
case TRes of
- {atomic, Pid} ->
- ejabberd_s2s_out:connect(Pid),
- [Pid];
+ {atomic, Pid1} ->
+ if Pid1 == Pid ->
+ ejabberd_s2s_out:connect(Pid);
+ true ->
+ ejabberd_s2s_out:stop(Pid)
+ end,
+ [Pid1];
{aborted, Reason} ->
?ERROR_MSG("failed to register connection ~s -> ~s: ~p",
[MyServer, Server, Reason]),