loncom/homework/response.pm - diff

Return to response.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.60, 2002/02/15 22:16:04	version 1.61, 2002/03/14 20:30:36
Line 363 sub start_responseparam {	Line 363 sub start_responseparam {
if ($ENV{'request.state'} eq 'construct') {	if ($ENV{'request.state'} eq 'construct') {
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);	my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
my $default = &Apache::lonxml::get_param('default',$parstack,$safeeval);	my $default = &Apache::lonxml::get_param('default',$parstack,$safeeval);
$Apache::inputtags::params{$name}=$default;	if ($name) {$Apache::inputtags::params{$name}=$default;}
}	}
}	}
return $result;	return $result;