loncom/homework/rankresponse.pm - diff

Return to rankresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.11, 2003/03/27 16:55:31	version 1.12, 2003/04/02 20:23:52
Line 264 sub displayfoils {	Line 264 sub displayfoils {
if ($target ne 'tex') {$optionlist.="<option>$option</option>\n";}	if ($target ne 'tex') {$optionlist.="<option>$option</option>\n";}
}	}
}	}
if ($target ne 'tex') {	if ($target ne 'tex' && $Apache::lonhomework::type ne 'exam') {
$optionlist='<select name="HWVAL_'.	$optionlist='<select name="HWVAL_'.
$Apache::inputtags::response[-1].':'.$temp.'">'.	$Apache::inputtags::response[-1].':'.$temp.'">'.
$optionlist."</select>\n";	$optionlist."</select>\n";
Line 273 sub displayfoils {	Line 273 sub displayfoils {
}	}
my $text=$Apache::response::foilgroup{$name.'.text'};	my $text=$Apache::response::foilgroup{$name.'.text'};
if ($target ne 'tex') {	if ($target ne 'tex') {
$result.='<br />'.$optionlist.$text."\n";	if ($Apache::lonhomework::type ne 'exam') {
	$result.='<br />'.$optionlist.$text."\n";
	} else {
	$result.='<br />'.$text."\n";
	}
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$result.=&Apache::optionresponse::webbubbles(\@alp,\@whichopt);	$result.=&Apache::optionresponse::webbubbles(\@alp,\@whichopt,$temp);
}	}
} else {	} else {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {