Return to lonsimpleproblemedit.pm CVS log | Up to [LON-CAPA] / loncom / homework |
version 1.6, 2003/09/21 21:40:06 | version 1.7, 2003/11/04 16:44:50 |
---|---|
Line 168 sub handler { | Line 168 sub handler { |
} | } |
$ENV{'form.options'}="('".join("','",keys %curoptions)."')"; | $ENV{'form.options'}="('".join("','",keys %curoptions)."')"; |
} | } |
$ENV{'form.hiddenparts'}='!'.$ENV{'form.questiontype'}; | |
foreach (keys %ENV) { | foreach (keys %ENV) { |
if ($_=~/^form\.(\w+)$/) { | if ($_=~/^form\.(\w+)$/) { |
my $parm=$1; | my $parm=$1; |