From 2d17815c831829af13899c23b320b884e790cf9b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= Date: Thu, 3 Mar 2016 15:14:01 +0100 Subject: Eliminate use of test_server:sleep/1 --- lib/kernel/test/erl_prim_loader_SUITE.erl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lib/kernel/test/erl_prim_loader_SUITE.erl') diff --git a/lib/kernel/test/erl_prim_loader_SUITE.erl b/lib/kernel/test/erl_prim_loader_SUITE.erl index 3c4fda2910..a8e610a7d8 100644 --- a/lib/kernel/test/erl_prim_loader_SUITE.erl +++ b/lib/kernel/test/erl_prim_loader_SUITE.erl @@ -181,7 +181,7 @@ inet_coming_up(Config) when is_list(Config) -> Node = start_node_using_inet(Name, [{wait,false}]), %% Wait a while, then start boot server, and wait for node to start. - test_server:sleep(test_server:seconds(6)), + ct:sleep({seconds,6}), BootPid = start_boot_server(), wait_really_started(Node, 25), @@ -199,7 +199,7 @@ wait_really_started(Node, N) -> {started, _} -> ok; _ -> - test_server:sleep(1000), + ct:sleep(1000), wait_really_started(Node, N - 1) end. @@ -295,11 +295,11 @@ multiple_slaves(Config) when is_list(Config) -> %% (note: test_server supervises each node start by accept() %% on a socket, the timeout value for the accept has to be quite %% long for this test to work). - ?line test_server:sleep(test_server:seconds(5)), + ct:sleep({seconds,5}), %% start the code loading circus! BootPid = start_boot_server(), %% give the nodes a chance to boot up before attempting to stop them - ?line test_server:sleep(test_server:seconds(10)), + ct:sleep({seconds,10}), ?line wait_and_shutdown(lists:reverse(Nodes), 30), -- cgit v1.2.1