From a3624ab24535458b13abb7e314ed7dfbe3da09ba Mon Sep 17 00:00:00 2001
From: Dan Gudmundsson <dgud@erlang.org>
Date: Tue, 22 Aug 2017 14:43:54 +0200
Subject: system (test): Do not use deprecated functions in string(3)

---
 erts/test/run_erl_SUITE.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'erts/test/run_erl_SUITE.erl')

diff --git a/erts/test/run_erl_SUITE.erl b/erts/test/run_erl_SUITE.erl
index fe1ccba1e2..08edd930b4 100644
--- a/erts/test/run_erl_SUITE.erl
+++ b/erts/test/run_erl_SUITE.erl
@@ -255,7 +255,7 @@ do_run_erl(Config, Case, Opt) ->
     
     net_kernel:monitor_nodes(true),
     open_port({spawn,Cmd}, []),
-    [_,Host] = string:tokens(atom_to_list(node()), "@"),
+    [_,Host] = string:lexemes(atom_to_list(node()), "@"),
     Node = list_to_atom(NodeName++"@"++Host),
 
     receive
-- 
cgit v1.2.3