File 0485-Fix-debug-printouts.patch of Package erlang
From dd4a1fca580b057a4ac16c67080e460630e6695c Mon Sep 17 00:00:00 2001
From: Dan Gudmundsson <dgud@erlang.org>
Date: Mon, 17 Jun 2019 16:36:03 +0200
Subject: [PATCH 3/4] Fix debug printouts
---
lib/sasl/test/installer.erl | 2 +-
lib/sasl/test/release_handler_SUITE.erl | 2 +-
lib/sasl/test/rh_test_lib.erl | 2 +-
3 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lib/sasl/test/installer.erl b/lib/sasl/test/installer.erl
index 5429008a5f..d763fad11b 100644
--- a/lib/sasl/test/installer.erl
+++ b/lib/sasl/test/installer.erl
@@ -903,7 +903,7 @@ start_client(TestNode,Client,Sname) ->
receive
{nodeup, Node} ->
wait_started(TestNode,Node)
- after 30000 ->
+ after 60000 ->
?print([{start_client,failed,Node},net_adm:ping(Node)]),
?fail({"can not start", Node})
end.
diff --git a/lib/sasl/test/release_handler_SUITE.erl b/lib/sasl/test/release_handler_SUITE.erl
index 2ff2f29591..98f96b7170 100644
--- a/lib/sasl/test/release_handler_SUITE.erl
+++ b/lib/sasl/test/release_handler_SUITE.erl
@@ -2331,7 +2331,7 @@ reg_print_proc() ->
rh_print() ->
receive
{print, {Module,Line}, [H|T]} ->
- ?t:format("=== ~p:~p - ~p",[Module,Line,H]),
+ ?t:format("=== ~p:~p - ~tp",[Module,Line,H]),
lists:foreach(fun(Term) -> ?t:format(" ~tp",[Term]) end, T),
?t:format("",[]),
rh_print();
diff --git a/lib/sasl/test/rh_test_lib.erl b/lib/sasl/test/rh_test_lib.erl
index dacd8b6b9f..6425fce7a7 100644
--- a/lib/sasl/test/rh_test_lib.erl
+++ b/lib/sasl/test/rh_test_lib.erl
@@ -29,7 +29,7 @@ erlsrv(Erlsrv,Action,Name) ->
erlsrv(Erlsrv,Action,Name,Rest) ->
Cmd = "\"" ++ Erlsrv ++ "\" " ++ atom_to_list(Action) ++ " " ++
Name ++ " " ++ Rest,
- io:format("erlsrv cmd: ~p~n",[Cmd]),
+ io:format("erlsrv cmd: ~tp~n",[Cmd]),
Port = open_port({spawn, Cmd}, [stream, {line, 100}, eof, in]),
Res = recv_prog_output(Port),
case Res of
--
2.16.4