loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.76, 2002/04/09 04:46:33	version 1.77, 2002/04/11 16:02:32
Line 472 sub handler {	Line 472 sub handler {
# some times multiple problemmodes are submitted, need to select	# some times multiple problemmodes are submitted, need to select
# the last one	# the last one
if ( defined($ENV{'form.problemmode'}) &&	if ( defined($ENV{'form.problemmode'}) &&
defined(@{ $ENV{'form.problemmode'} })) {	ref($ENV{'form.problemmode'}) ) {
my $mode=$ENV{'form.problemmode'}->[-1];	my $mode=$ENV{'form.problemmode'}->[-1];
undef $ENV{'form.problemmode'};	undef $ENV{'form.problemmode'};
$ENV{'form.problemmode'}=$mode;	$ENV{'form.problemmode'}=$mode;