aboutsummaryrefslogtreecommitdiffstats
path: root/lib/reltool/test/reltool_server_SUITE.erl
diff options
context:
space:
mode:
authorSiri Hansen <[email protected]>2012-09-17 12:27:05 +0200
committerSiri Hansen <[email protected]>2012-09-17 12:27:05 +0200
commit04c6b9a40f782099ece28dbde39c35f25dd2e37b (patch)
treef580dc9c18dbb948d771cbda65c1da57a9170a52 /lib/reltool/test/reltool_server_SUITE.erl
parent6a40b71e364fd0ac7f68bebfdd51c80f9f66730a (diff)
downloadotp-04c6b9a40f782099ece28dbde39c35f25dd2e37b.tar.gz
otp-04c6b9a40f782099ece28dbde39c35f25dd2e37b.tar.bz2
otp-04c6b9a40f782099ece28dbde39c35f25dd2e37b.zip
[reltool] Keep order from rel spec when sorting used and included applications
The rel specification now dictates the order in which included and used applications are loaded/started by the boot file. If the applications are not specified in the rel spec, then the order from the .app file is used. This was a bug earlier reported on systools, and is now also implemented in reltool. Example: If a .app file specified {applications,[x,y]} {included_applications,[b,c]} And the reltool.config has {rel, "myrel", "1.0", [a,y,x,c,b]} Then the boot file will load/start y before x and c before b. Earlier x would always be started before y and b always before c due to the order in the .app file.
Diffstat (limited to 'lib/reltool/test/reltool_server_SUITE.erl')
-rw-r--r--lib/reltool/test/reltool_server_SUITE.erl21
1 files changed, 8 insertions, 13 deletions
diff --git a/lib/reltool/test/reltool_server_SUITE.erl b/lib/reltool/test/reltool_server_SUITE.erl
index 2cf4e5b916..8cff86d2a0 100644
--- a/lib/reltool/test/reltool_server_SUITE.erl
+++ b/lib/reltool/test/reltool_server_SUITE.erl
@@ -299,7 +299,6 @@ create_release(_Config) ->
%% started before the including application.
%% Circular dependencies shall also be detected and cause error.
-create_release_sort(_Config) -> {skip, "Two bugs related to sorting"};
create_release_sort(Config) ->
DataDir = ?config(data_dir,Config),
%% Configure the server
@@ -375,7 +374,6 @@ create_release_sort(Config) ->
{mnesia, _}]}},
reltool:get_rel([{config, Sys}], RelName3)),
- %%! BUG: same as OTP-4121, but for reltool???? Or revert tools and mnesia
?msym({ok, {release, {RelName4, RelVsn},
{erts, _},
[{kernel, _},
@@ -426,7 +424,6 @@ create_release_sort(Config) ->
{z,_,[]}]}},
reltool:get_rel([{config, Sys}], RelName9)),
- %%! BUG: same as OTP-9984, but for reltool???? Or revert inets and sasl?
?msym({ok,{release,{RelName10,RelVsn},
{erts,_},
[{kernel,_},
@@ -665,11 +662,10 @@ create_script_sort(Config) ->
{ok, Script3} = ?msym({ok, _}, reltool:get_script(Pid, RelName3)),
?m(equal, diff_script(SystoolsScript3, Script3)),
- %% BUG, same as OTP-4121, but for reltool
- %% ?msym({ok,_,_}, systools_make_script(FullName4,ZPath)),
- %% {ok, [SystoolsScript4]} = ?msym({ok,[_]}, file:consult(FullName4++".script")),
- %% {ok, Script4} = ?msym({ok, _}, reltool:get_script(Pid, RelName4)),
- %% ?m(equal, diff_script(SystoolsScript4, Script4)),
+ ?msym({ok,_,_}, systools_make_script(FullName4,ZPath)),
+ {ok, [SystoolsScript4]} = ?msym({ok,[_]}, file:consult(FullName4++".script")),
+ {ok, Script4} = ?msym({ok, _}, reltool:get_script(Pid, RelName4)),
+ ?m(equal, diff_script(SystoolsScript4, Script4)),
?msym({error,_,[{error_reading,{sasl,{override_include,_}}}]},
systools_make_script(FullName5,ZPath)),
@@ -698,11 +694,10 @@ create_script_sort(Config) ->
{ok, Script9} = ?msym({ok, _}, reltool:get_script(Pid, RelName9)),
?m(equal, diff_script(SystoolsScript9, Script9)),
- %% BUG, same as OTP-9984, but for reltool
- %% ?msym({ok,_,_}, systools_make_script(FullName10,ZPath)),
- %% {ok, [SystoolsScript10]} = ?msym({ok,[_]}, file:consult(FullName10++".script")),
- %% {ok, Script10} = ?msym({ok, _}, reltool:get_script(Pid, RelName10)),
- %% ?m(equal, diff_script(SystoolsScript10, Script10)),
+ ?msym({ok,_,_}, systools_make_script(FullName10,ZPath)),
+ {ok, [SystoolsScript10]} = ?msym({ok,[_]}, file:consult(FullName10++".script")),
+ {ok, Script10} = ?msym({ok, _}, reltool:get_script(Pid, RelName10)),
+ ?m(equal, diff_script(SystoolsScript10, Script10)),
%% Stop server
?m(ok, reltool:stop(Pid)),