loncom/homework/matchresponse.pm - diff

Return to matchresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.22, 2003/09/15 18:13:52	version 1.25, 2003/10/10 16:47:25
Line 369 sub displayfoils {	Line 369 sub displayfoils {
%name_letter_map=	%name_letter_map=
%{ $Apache::response::itemgroup{'name_letter_map'} };	%{ $Apache::response::itemgroup{'name_letter_map'} };
}	}
if (($solved =~ /^correct/) \|\| ($status eq 'SHOW_ANSWER')) {	if ( &Apache::response::show_answer() && ($target ne 'tex')) {
foreach my $name (@whichfoils) {	foreach my $name (@whichfoils) {
my $text=$Apache::response::foilgroup{$name.'.text'};	my $text=$Apache::response::foilgroup{$name.'.text'};
my $value=$Apache::response::foilgroup{$name.'.value'};	my $value=$Apache::response::foilgroup{$name.'.value'};
Line 590 sub end_foil {	Line 590 sub end_foil {
}	}
} else {	} else {
if ($target eq 'tex') {	if ($target eq 'tex') {
$Apache::response::foilgroup{"$name.text"} = ' $\triangleright$ '.$text;	$Apache::response::foilgroup{"$name.text"} = $text;
} else {	} else {
$Apache::response::foilgroup{"$name.text"} = $text;	$Apache::response::foilgroup{"$name.text"} = $text;
}	}