diff options
| author | Zandra Hird <zandra@erlang.org> | 2016-06-08 12:04:32 +0200 |
|---|---|---|
| committer | Zandra Hird <zandra@erlang.org> | 2016-06-10 09:57:46 +0200 |
| commit | e65fed9a0a10c9c308dcc71ec025c10293c68928 (patch) | |
| tree | 6956e83f1726291e13750b252cce814611b7ad7b /lib/common_test | |
| parent | e7588998f05f92f1056e4259452f8a8363d732b5 (diff) | |
| download | erlang-e65fed9a0a10c9c308dcc71ec025c10293c68928.tar.gz | |
Avoid crash when monitored ct_logs process is not responding
Diffstat (limited to 'lib/common_test')
| -rw-r--r-- | lib/common_test/src/ct_logs.erl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/common_test/src/ct_logs.erl b/lib/common_test/src/ct_logs.erl index e6d683c8a9..2a23e3274a 100644 --- a/lib/common_test/src/ct_logs.erl +++ b/lib/common_test/src/ct_logs.erl @@ -137,7 +137,8 @@ close(Info, StartDir) -> %% so we need to use a local copy of the log cache data LogCacheBin = case make_last_run_index() of - {error,_} -> % log server not responding + {error, Reason} -> % log server not responding + io:format("Warning! ct_logs not responding: ~p~n", [Reason]), undefined; LCB -> LCB @@ -240,7 +241,7 @@ call(Msg) -> Pid -> MRef = erlang:monitor(process,Pid), Ref = make_ref(), - ?MODULE ! {Msg,{self(),Ref}}, + Pid ! {Msg,{self(),Ref}}, receive {Ref, Result} -> erlang:demonitor(MRef, [flush]), |