loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.37, 2001/07/12 19:27:48	version 1.38, 2001/07/13 14:02:35
Line 31 sub initialize_inputtags {	Line 31 sub initialize_inputtags {
sub start_input {	sub start_input {
my ($parstack,$safeeval)=@_;	my ($parstack,$safeeval)=@_;
my $id = &Apache::lonxml::get_param('id',$parstack,$safeeval);	my $id = &Apache::lonxml::get_param('id',$parstack,$safeeval);
	if ($id eq '') { $id = $Apache::lonxml::curdepth; }
push (@Apache::inputtags::input,$id);	push (@Apache::inputtags::input,$id);
push (@Apache::inputtags::inputlist,$id);	push (@Apache::inputtags::inputlist,$id);
return $id;	return $id;