The fix in rev 1.48 was not placed high enough in the program. Correcting that now.

This commit is contained in:
pschwartau%netscape.com 2003-03-26 21:28:19 +00:00
Родитель b3d9493f77
Коммит 0845ca0953
1 изменённых файлов: 4 добавлений и 4 удалений

Просмотреть файл

@ -151,9 +151,6 @@ sub execute_tests {
my $file_param = " -f "; my $file_param = " -f ";
my ($last_suite, $last_test_dir); my ($last_suite, $last_test_dir);
# Don't run any shell.js files as tests; they are only utility files
@test_list = grep (!/shell\.js$/, @test_list);
&status ("Executing " . ($#test_list + 1) . " test(s)."); &status ("Executing " . ($#test_list + 1) . " test(s).");
foreach $test (@test_list) { foreach $test (@test_list) {
@ -887,9 +884,12 @@ sub get_test_list {
&dd ((($#neg_list + 1) - $actually_skipped) . " skip tests were " . &dd ((($#neg_list + 1) - $actually_skipped) . " skip tests were " .
"not actually part of the test list."); "not actually part of the test list.");
} }
# Don't run any shell.js files as tests; they are only utility files
@test_list = grep (!/shell\.js$/, @test_list);
return @test_list; return @test_list;
} }