generic-library/curl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

runtests.pl: Don't expect $TESTDIR/DISABLED to exist

Browse Source 
If a non-standard $TESTDIR is used the file may not be necessary.

Previously a "missing" file resulted in the warning:
readline() on closed filehandle D at ./runtests.pl line 4940.
This commit is contained in:
Fabian Keil
2014-06-19 16:40:06 +02:00
committed by Dan Fandrich
parent 5828e886e6
commit dc7a598126
1 changed files with 11 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
tests/runtests.pl
View File

@@ -4865,20 +4865,21 @@ if(!$listonly) {
} }
####################################################################### #######################################################################
# Fetch all disabled tests # Fetch all disabled tests, if there are any
# #
open(D, "<$TESTDIR/DISABLED"); if(open(D, "<$TESTDIR/DISABLED")) {
while(<D>) { while(<D>) {
if(/^ *\#/) { if(/^ *\#/) {
# allow comments # allow comments
next; next;
} }
if($_ =~ /(\d+)/) { if($_ =~ /(\d+)/) {
$disabled{$1}=$1; # disable this test number $disabled{$1}=$1; # disable this test number
}
} }
close(D);
} }
close(D);
####################################################################### #######################################################################
# If 'all' tests are requested, find out all test numbers # If 'all' tests are requested, find out all test numbers