From e68a27ec7b22753dd2a61585a69290ca2e3c9d80 Mon Sep 17 00:00:00 2001 From: Paul Smith Date: Wed, 9 Feb 2000 07:02:18 +0000 Subject: * Fix some warnings in gettext.c and function.c * Don't try to execute tests which are actually directories. --- tests/ChangeLog | 5 +++++ tests/test_driver.pl | 5 +++-- 2 files changed, 8 insertions(+), 2 deletions(-) (limited to 'tests') diff --git a/tests/ChangeLog b/tests/ChangeLog index 231c486..fe8b25c 100644 --- a/tests/ChangeLog +++ b/tests/ChangeLog @@ -17,6 +17,11 @@ * scripts/targets/SECONDARY: Ditto. * scripts/targets/INTERMEDIATE: Ditto. +2000-01-27 Paul D. Smith + + * test_driver.pl (toplevel): Don't try to run test scripts which + are really directories. + 2000-01-23 Paul D. Smith * scripts/features/include: Remove a check; the fix caused more diff --git a/tests/test_driver.pl b/tests/test_driver.pl index 4fb738b..18dcc4b 100644 --- a/tests/test_driver.pl +++ b/tests/test_driver.pl @@ -117,7 +117,8 @@ sub toplevel closedir (SCRIPTDIR); foreach $dir (@dirs) { - next if ! -d "$scriptpath/$dir" || $dir =~ /^\.\.?$/ || $dir eq 'CVS'; + next if ($dir =~ /^\.\.?$/ || $dir eq 'CVS' || $dir eq 'RCS' + || ! -d "$scriptpath/$dir"); push (@rmdirs, $dir); mkdir ("$workpath/$dir", 0777) || &error ("Couldn't mkdir $workpath/$dir: $!\n"); @@ -127,7 +128,7 @@ sub toplevel closedir (SCRIPTDIR); foreach $test (@files) { - next if $test =~ /^\.\.?$/ || $test =~ /~$/ || $test eq 'CVS'; + next if $test =~ /~$/ || -d $test; push (@TESTS, "$dir/$test"); } } -- cgit v1.2.3