--- loncom/homework/optionresponse.pm 2004/04/23 21:37:41 1.108 +++ loncom/homework/optionresponse.pm 2004/05/27 04:25:13 1.110 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.108 2004/04/23 21:37:41 albertel Exp $ +# $Id: optionresponse.pm,v 1.110 2004/05/27 04:25:13 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -92,7 +92,7 @@ sub start_foilgroup { my $result=''; %Apache::response::foilgroup=(); $Apache::optionresponse::conceptgroup=0; - &Apache::response::setrandomnumber(); + &Apache::response::pushrandomnumber(); if ($target eq 'edit') { my $optionlist="\n"; my $option; @@ -148,7 +148,8 @@ ENDTABLE } # else nothing changed so just use the default mechanism } if ($target eq 'tex' and $Apache::lonhomework::type ne 'exam') { - $result .= ' \begin{enumerate} '; + $result .= ' \renewcommand{\labelenumi}{\Alph{enumi}.} + \begin{enumerate} '; } return $result; } @@ -256,6 +257,7 @@ sub end_foilgroup { if ($target eq 'tex' and $Apache::lonhomework::type ne 'exam') { $result .= '\end{enumerate}'; } + &Apache::response::poprandomnumber(); return $result; }