peer disc retry

Author: dumbbell

deps/rabbit/src/rabbit_peer_discovery.erl

@@ -705,16 +705,16 @@ erpc_call(Node, Mod, Fun, Args, FromNode) ->
     try
         erpc:call(Node, Mod, Fun, Args)
     catch
-        error:{erpc, Reason}:Stacktrace ->
+        error:{erpc, Reason} ->
             Peer = node(),
             _ = catch erpc:call(
                         FromNode,
-                        logger, alert, % XXX
-                        ["Peer discovery: temporary hidden node '~ts' failed to connect to '~ts': ~0p",
+                        logger, debug,
+                        ["Peer discovery: temporary hidden node '~ts' "
+                        "failed to connect to '~ts': ~0p",
                          [Peer, Node, Reason]]),
-            erlang:raise(error, {erpc, Reason}, Stacktrace)
-            %timer:sleep(200),
-            %erpc_call(Node, Mod, Fun, Args, FromNode)
+            timer:sleep(200),
+            erpc_call(Node, Mod, Fun, Args, FromNode)
     end.
 
 -spec sort_nodes_and_props(NodesAndProps) ->