diff options
| author | Peter Andersson <[email protected]> | 2016-03-09 10:31:16 +0100 |
|---|---|---|
| committer | Peter Andersson <[email protected]> | 2016-03-09 10:31:16 +0100 |
| commit | 0b7c58e52ab6650d41be2ca58c4dc301287ba68a (patch) | |
| tree | da33d769de67b93da11702f3824cc654ef521f32 /lib/common_test/src/ct_util.erl | |
| parent | 21e395b93eafe68544b7ee5dd186c01bcfc5d02e (diff) | |
| parent | fb44a4de532ae97b3424078577dee7370078dea0 (diff) | |
| download | otp-0b7c58e52ab6650d41be2ca58c4dc301287ba68a.tar.gz otp-0b7c58e52ab6650d41be2ca58c4dc301287ba68a.tar.bz2 otp-0b7c58e52ab6650d41be2ca58c4dc301287ba68a.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib/common_test/src/ct_util.erl')
| -rw-r--r-- | lib/common_test/src/ct_util.erl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/common_test/src/ct_util.erl b/lib/common_test/src/ct_util.erl index 445fce1db8..b7fa7947e2 100644 --- a/lib/common_test/src/ct_util.erl +++ b/lib/common_test/src/ct_util.erl @@ -485,6 +485,8 @@ loop(Mode,TestData,StartDir) -> {'EXIT',Pid,Reason} -> case ets:lookup(?conn_table,Pid) of [#conn{address=A,callback=CB}] -> + ErrorStr = io_lib:format("~tp", [Reason]), + ErrorHtml = ct_logs:escape_chars(ErrorStr), %% A connection crashed - remove the connection but don't die ct_logs:tc_log_async(ct_error_notify, ?MAX_IMPORTANCE, @@ -492,8 +494,8 @@ loop(Mode,TestData,StartDir) -> "Connection process died: " "Pid: ~w, Address: ~p, " "Callback: ~w\n" - "Reason: ~p\n\n", - [Pid,A,CB,Reason]), + "Reason: ~ts\n\n", + [Pid,A,CB,ErrorHtml]), catch CB:close(Pid), %% in case CB:close failed to do this: unregister_connection(Pid), |