rabbitmq_peer_discovery_common: Use the rabbit_nodes:list_unreachable/0

... instead of using an internal implementation.

References #7058.

Author: dumbbell

deps/rabbitmq_peer_discovery_common/src/rabbit_peer_discovery_cleanup.erl

@@ -288,13 +288,7 @@ maybe_remove_nodes([Node | Nodes], false) ->
 %%--------------------------------------------------------------------
 -spec unreachable_nodes() -> [node()].
 unreachable_nodes() ->
-    Status = rabbit_mnesia:status(),
-    Nodes = proplists:get_value(nodes, Status, []),
-    Running = proplists:get_value(running_nodes, Status, []),
-    All = lists:merge(proplists:get_value(disc, Nodes, []),
-                      proplists:get_value(ram, Nodes, [])),
-    lists:subtract(All, Running).
-
+    rabbit_nodes:list_unreachable().
 
 %%--------------------------------------------------------------------
 %% @private