diff options
| -rw-r--r-- | src/mirrored_supervisor_tests.erl | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/src/mirrored_supervisor_tests.erl b/src/mirrored_supervisor_tests.erl index ede2779839..60192b34d7 100644 --- a/src/mirrored_supervisor_tests.erl +++ b/src/mirrored_supervisor_tests.erl @@ -290,17 +290,10 @@ kill(Pid, Waits) -> [kill_wait(P) || P <- Waits]. kill_registered(Pid, Child) -> - erlang:monitor(process, Pid), - erlang:monitor(process, Child), {registered_name, Name} = erlang:process_info(Child, registered_name), - exit(Pid, kill), - kill_wait(Pid), - %% exit(Child, kill), - receive - {'DOWN', _Ref, process, Child, _Reason} -> - false = (Child =:= whereis(Name)), - ok - end. + kill(Pid, Child), + false = (Child =:= whereis(Name)), + ok. kill_wait(Pid) -> receive |