version 1.17, 2003/10/06 20:38:25
|
version 1.19, 2003/10/23 21:01:54
|
Line 91 sub handler {
|
Line 91 sub handler {
|
$type{'parameter_mapalias'}='string'; |
$type{'parameter_mapalias'}='string'; |
$display{'parameter_mapalias'}='Resource alias name for conditions'; |
$display{'parameter_mapalias'}='Resource alias name for conditions'; |
} |
} |
if ($uri=~/\.(problem|exam|quiz|assess|survey|form|library)\.meta$/) { |
|
$content{'parameter_hiddenparts'}=''; |
|
$type{'parameter_hiddenparts'}='string'; |
|
$display{'parameter_hiddenparts'}= |
|
'A comma separted list of Part Ids to not display.'; |
|
} |
|
# ---------------------------------------------------------- Current Parameters |
# ---------------------------------------------------------- Current Parameters |
|
|
foreach (split(/\:/,$ENV{'form.parms'})) { |
foreach (split(/\:/,$ENV{'form.parms'})) { |
Line 159 $bodytag
|
Line 153 $bodytag
|
ENDDOCUMENT |
ENDDOCUMENT |
### %display=&Apache::lonlocal::texthash(%display); |
### %display=&Apache::lonlocal::texthash(%display); |
my $enter=&mt('Enter'); |
my $enter=&mt('Enter'); |
foreach (keys(%content)) { |
foreach (sort(keys(%content))) { |
my $cur=$content{$_}; |
my $cur=$content{$_}; |
# Should if(defined($value{$_})) be if(exists($value{$_})) ? |
# Should if(defined($value{$_})) be if(exists($value{$_})) ? |
if (defined($value{$_})) { $cur=$value{$_}; }; |
if (defined($value{$_})) { $cur=$value{$_}; }; |