aboutsummaryrefslogtreecommitdiffstats
path: root/lib/test_server/src/test_server_ctrl.erl
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2010-08-20 16:26:13 +0200
committerPeter Andersson <[email protected]>2010-09-02 14:44:55 +0200
commit69712817f573695d0a80dbeac5f4510da0b1bca3 (patch)
treee197d89ca98d15ab5a4a99cca59d235a4768f076 /lib/test_server/src/test_server_ctrl.erl
parentedde5c4fd84cf06070c7fc4f8c159fc7ecba5099 (diff)
downloadotp-69712817f573695d0a80dbeac5f4510da0b1bca3.tar.gz
otp-69712817f573695d0a80dbeac5f4510da0b1bca3.tar.bz2
otp-69712817f573695d0a80dbeac5f4510da0b1bca3.zip
Fix error in the repeat_until_* group property handling
Diffstat (limited to 'lib/test_server/src/test_server_ctrl.erl')
-rw-r--r--lib/test_server/src/test_server_ctrl.erl7
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/test_server/src/test_server_ctrl.erl b/lib/test_server/src/test_server_ctrl.erl
index 9ab526a26b..1d8eebe843 100644
--- a/lib/test_server/src/test_server_ctrl.erl
+++ b/lib/test_server/src/test_server_ctrl.erl
@@ -2567,7 +2567,7 @@ run_test_cases_loop([{conf,Ref,Props,{Mod,Func}}|_Cases]=Cs0,
{true,EndStatus,RestCs,Fun};
{repeat_until_any_ok,_} ->
{RestCs,Fun} = case get_tc_results(Status1) of
- {Ok,_,_} when length(Ok) > 0 ->
+ {Ok,_,_Fails} when length(Ok) > 0 ->
{Cases1,ReportStop};
_ ->
{CopiedCases++Cases1,?void_fun}
@@ -2734,9 +2734,10 @@ run_test_cases_loop([{conf,Ref,Props,{Mod,Func}}|_Cases]=Cs0,
end;
{value,{_,GroupResult}} ->
{Cases,update_status(GroupResult, group_result, GrName,
- delete_status(Ref, Status2))};
+ delete_status(Ref, Status2))};
false ->
- {Cases,delete_status(Ref, Status2)}
+ {Cases,update_status(ok, group_result, GrName,
+ delete_status(Ref, Status2))}
end,
print_conf_time(ConfTime),
ReportRepeatStop(),