version 1.160.2.3, 2003/03/14 22:54:26
|
version 1.160.2.4, 2003/03/19 17:16:23
|
Line 833 sub expandnamed {
|
Line 833 sub expandnamed {
|
push @matches,$parameter if ($parameter =~ /$expression/); |
push @matches,$parameter if ($parameter =~ /$expression/); |
} |
} |
if (scalar(@matches) == 0) { |
if (scalar(@matches) == 0) { |
$returnvalue = 'unmatched parameter: '.$parameter; |
$returnvalue = undef; #'unmatched parameter: '.$parameter; |
} elsif (scalar(@matches) == 1) { |
} elsif (scalar(@matches) == 1) { |
$returnvalue = '$c{\''.$matches[0].'\'}'; |
$returnvalue = '$c{\''.$matches[0].'\'}'; |
} elsif (scalar(@matches) > 0) { |
} elsif (scalar(@matches) > 0) { |
Line 3035 sub handler {
|
Line 3035 sub handler {
|
$ENV{'form.ufn'} eq 'default')) { |
$ENV{'form.ufn'} eq 'default')) { |
$ENV{'form.ufn'}='default_'.$1; |
$ENV{'form.ufn'}='default_'.$1; |
} |
} |
if (!$ENV{'form.ufn'} || $ENV{'form.ufn'} eq 'default') { |
# if (!$ENV{'form.ufn'} || $ENV{'form.ufn'} eq 'default') { |
$ENV{'form.ufn'}='course_default_'.$sheettype; |
# $ENV{'form.ufn'}='course_default_'.$sheettype; |
} |
# } |
# |
# |
# Interactive loading of specific sheet? |
# Interactive loading of specific sheet? |
# |
# |