diff options
author | Siri Hansen <[email protected]> | 2011-06-15 16:52:12 +0200 |
---|---|---|
committer | Siri Hansen <[email protected]> | 2011-06-15 16:52:12 +0200 |
commit | 03842c215fa5cd90ea72bc135e29a25065199e4e (patch) | |
tree | 561c0453029d33edf4a1478381180d7960651d98 /lib/sasl/test/release_handler_SUITE.erl | |
parent | e751eb8d6e8fd5945d4a14ebbc10b9cd858521e1 (diff) | |
download | otp-03842c215fa5cd90ea72bc135e29a25065199e4e.tar.gz otp-03842c215fa5cd90ea72bc135e29a25065199e4e.tar.bz2 otp-03842c215fa5cd90ea72bc135e29a25065199e4e.zip |
Remove path to erts bin dir from erlsrv arguments
The service will automatically use the start_erl.exe from the same
directory as erlsrv.exe, and heart will use $PATH, which will
always have the erts bin dir first. The reason is to avoid using old
executables after upgrading erts via the release_handler.
Diffstat (limited to 'lib/sasl/test/release_handler_SUITE.erl')
-rw-r--r-- | lib/sasl/test/release_handler_SUITE.erl | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/lib/sasl/test/release_handler_SUITE.erl b/lib/sasl/test/release_handler_SUITE.erl index d56c90d979..16267ba0d4 100644 --- a/lib/sasl/test/release_handler_SUITE.erl +++ b/lib/sasl/test/release_handler_SUITE.erl @@ -1039,17 +1039,17 @@ delete_release(Conf) -> ?t:format("======== deleting ~p~n",[Dirs]), ok = delete_release_os(Dirs--["save"]), - {ok,Remaining} = file:list_dir(PrivDir), + {ok,Remaining} = file:list_dir(PrivDir), ?t:format("======== remaining ~p~n",[Remaining]), - case Remaining of - [] -> ok; + case Remaining of + [] -> + ok; _ -> - delete_release_os(Remaining), - Remaining2 = file:list_dir(PrivDir), - ?t:format("======== remaining after second try ~p~n",[Remaining2]) - end, - + delete_release_os(Remaining), + Remaining2 = file:list_dir(PrivDir), + ?t:format("======== remaining after second try ~p~n",[Remaining2]) + end, ok = file:set_cwd(OrigWd), ok. @@ -1608,8 +1608,7 @@ start_node_win32(Sname,NodeDir) -> ErtsBinDir = filename:join(NodeDir,"erts-4.4/bin"), StartErlArgs = rh_test_lib:get_start_erl_args(NodeDir), - ServiceArgs = rh_test_lib:get_service_args("4.4", NodeDir, Sname, - StartErlArgs), + ServiceArgs = rh_test_lib:get_service_args(NodeDir, Sname, StartErlArgs), Erlsrv = filename:nativename(filename:join(ErtsBinDir,"erlsrv")), rh_test_lib:erlsrv(Erlsrv,stop,Name), |