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

Change "params" to "parameters" now the output field is wider

Copied from Perforce
 Change: 20176
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1998-10-07 14:38:21 +01:00
parent 214d1e642d
commit 3a9fdbf893

View file

@ -1,5 +1,5 @@
#!/usr/local/bin/perl
# $HopeName: MMQA_harness!script:headread(trunk.8) $
# $HopeName: MMQA_harness!script:headread(trunk.9) $
#
# subroutines to assist in
# 1. reading test headers
@ -173,8 +173,8 @@ sub get_parmdefs {
local ($var, $missing);
$missing = "";
%parmdefs = ();
if (exists $test_header{"params"}) {
foreach (split /\s+/, $test_header{"params"}) {
if (exists $test_header{"parameters"}) {
foreach (split /\s+/, $test_header{"parameters"}) {
$var = getparameter($_);
if (defined $var) {
$parmdefs{$_} = $var;