loncom/homework/imageresponse.pm - diff

Return to imageresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.30, 2003/06/09 22:31:56	version 1.31, 2003/06/09 22:42:49
Line 218 sub end_conceptgroup {	Line 218 sub end_conceptgroup {
return $result;	return $result;
}	}

	sub insert_foil {
	return '
	<foil>
	<image></image>
	<text></text>
	<rectangle></rectangle>
	</foil>
	';
	}

$Apache::imageresponse::curname='';	$Apache::imageresponse::curname='';
sub start_foil {	sub start_foil {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;