loncom/homework/optionresponse.pm - diff

Return to optionresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.116, 2004/07/29 19:40:23	version 1.117, 2004/07/30 18:45:49
Line 649 sub end_foil {	Line 649 sub end_foil {

sub start_drawoptionlist {	sub start_drawoptionlist {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
return $token->[4];	if ($target ne 'meta') {
	return $token->[4];
	}
}	}

sub end_drawoptionlist {	sub end_drawoptionlist {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
return $token->[2];	if ($target ne 'meta') {
	return $token->[2];
	}
}	}

sub insert_foil {	sub insert_foil {