loncom/homework/rankresponse.pm - diff

Return to rankresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.33, 2004/04/07 19:31:06	version 1.36, 2004/08/25 20:00:31
Line 89 sub start_foilgroup {	Line 89 sub start_foilgroup {
my $result;	my $result;
%Apache::response::foilgroup=();	%Apache::response::foilgroup=();
$Apache::rankresponse::conceptgroup=0;	$Apache::rankresponse::conceptgroup=0;
&Apache::response::setrandomnumber();	&Apache::response::pushrandomnumber();
return $result;	return $result;
}	}

Line 118 sub end_foilgroup {	Line 118 sub end_foilgroup {
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result=&Apache::edit::end_table();	$result=&Apache::edit::end_table();
}	}
	&Apache::response::poprandomnumber();
return $result;	return $result;
}	}

Line 299 sub displayfoils {	Line 300 sub displayfoils {
} else {	} else {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$result.='\vskip 0 mm '.$text.' \vskip 0 mm '."\n";	$result.='\vskip 0 mm '.$text.' \vskip 0 mm '."\n";
$result.='\vskip -1 mm\noindent\begin{enumerate}\item[\textbf{'.$internal_counter.'}.]'.&Apache::optionresponse::bubbles(\@alp,\@whichopt).'\end{enumerate} \vskip -8 mm \strut ';	$result.='\vskip -1 mm\noindent\begin{enumerate}\item[\textbf{'.$internal_counter.'}.]'.&Apache::optionresponse::bubbles(\@alp,\@whichopt,'rankresponse').'\end{enumerate} \vskip -8 mm \strut ';
$internal_counter++;	$internal_counter++;
} else {	} else {
$result.=' \vskip 0mm \framebox[5 mm][s]{\tiny\strut} '.$text."\n";	$result.=' \vskip 0mm \framebox[5 mm][s]{\tiny\strut} '.$text."\n";