File 1332-kernel-Fix-test-case-monitor_nodess_down_up.patch of Package erlang

From 2c1d5d4ffd9a6ccf72ca5ae4ae8700966116b9f3 Mon Sep 17 00:00:00 2001
From: Sverker Eriksson <sverker@erlang.org>
Date: Fri, 25 Oct 2019 19:22:52 +0200
Subject: [PATCH 2/7] kernel: Fix test case monitor_nodess_down_up

---
 lib/kernel/test/erl_distribution_SUITE.erl | 25 +++++-----------------
 1 file changed, 5 insertions(+), 20 deletions(-)

diff --git a/lib/kernel/test/erl_distribution_SUITE.erl b/lib/kernel/test/erl_distribution_SUITE.erl
index 200ef244f2..e4fe27c619 100644
--- a/lib/kernel/test/erl_distribution_SUITE.erl
+++ b/lib/kernel/test/erl_distribution_SUITE.erl
@@ -1511,7 +1511,7 @@ monitor_nodes_yoyo(A) ->
          [P ! monitor_node || P <- NodeMons],
          [receive ready -> ok end || _ <- NodeMons],
 
-         {Owner,_ConnId} = get_node_owner(A),
+         Owner = get_conn_owner(A),
          exit(Owner, kill),
 
          {nodedown, A} = receive_any(),
@@ -1545,25 +1545,10 @@ my_spawn_opt(Fun, Opts) ->
         Pid -> Pid
     end.
 
--record(connection, {
-		     node,          %% remote node name
-                     conn_id,       %% Connection identity
-		     state,         %% pending | up | up_pending
-		     owner,         %% owner pid
-	             pending_owner, %% possible new owner
-		     address,       %% #net_address
-		     waiting = [],  %% queued processes
-		     type           %% normal | hidden
-		    }).
-
-get_node_owner(Node) ->
-    case ets:lookup(sys_dist, Node) of
-        [#connection{owner = Owner, conn_id = ConnId}] ->
-            {Owner, ConnId};
-        _ ->
-            error
-    end.
-
+get_conn_owner(Node) ->
+    {ok, NodeInfo} = net_kernel:node_info(Node),
+    {value,{owner, Owner}} = lists:keysearch(owner, 1, NodeInfo),
+    Owner.
 
 dist_ctrl_proc_smoke(Config) when is_list(Config) ->
     ThisNode = node(),
-- 
2.35.3