1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-14 23:40:39 -08:00

Bug whereby test with non-defaulted parameters don't appear in index

Copied from Perforce
 Change: 20207
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1998-10-08 15:24:47 +01:00
parent f065a87499
commit 8e40752920

View file

@ -1,5 +1,5 @@
#!/usr/local/bin/perl
# $HopeName: MMQA_harness!script:headread(trunk.10) $
# $HopeName: MMQA_harness!script:headread(trunk.11) $
#
# subroutines to assist in
# 1. reading test headers
@ -34,7 +34,7 @@
#
sub readheader {
local($infile) = @_;
local($infile, $parms) = @_;
unless (open(IN, $infile)) {
die "File ".$infile." not found.";
@ -71,7 +71,9 @@ sub readheader {
%spec_rel = %keyrelations;
close(IN);
&get_parmdefs();
if ($parms) {
&get_parmdefs();
}
}
sub readvals {