--- loncom/homework/optionresponse.pm 2010/04/27 14:11:17 1.164
+++ loncom/homework/optionresponse.pm 2010/08/23 03:57:48 1.166
@@ -1,7 +1,7 @@
# LearningOnline Network with CAPA
# option list style responses
#
-# $Id: optionresponse.pm,v 1.164 2010/04/27 14:11:17 onken Exp $
+# $Id: optionresponse.pm,v 1.166 2010/08/23 03:57:48 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -467,8 +467,7 @@ sub displayfoils {
my $internal_counter=$Apache::lonxml::counter;
my $checkboxopt=&check_box_opt($target,$checkboxvalue,@opt);
if ($checkboxopt) {
- $result.='
'.&mt('Choices: ').''.$opt[0].','.$opt[1].'. '.
- &mt('Select all that are [_1].',$checkboxopt);
+ $result.='
'.&mt('Select all that are [_1].',$checkboxopt);
}
foreach $name (@whichopt) {
my $text=$Apache::response::foilgroup{$name.'.text'};
@@ -583,9 +582,9 @@ sub displayfoils {
}
}
if ($Apache::lonhomework::type eq 'exam') {
- $result.='\vskip -1 mm\noindent\begin{enumerate}\item[\textbf{'.
- $internal_counter.'}.]'.&bubbles(\@alphabet,\@opt).
- '\end{enumerate} \vskip -8 mm \strut ';
+ $result.='\vskip -1 mm\noindent';
+ $result.= '\textbf{'. $internal_counter.'}. \vskip -3mm'.&bubbles(\@alphabet,\@opt).
+ ' \strut ';
$internal_counter++;
}
if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
@@ -692,7 +691,7 @@ sub bubbles {
$current_length += (length($opt[$ind])+length($alphabet[$ind])+4)*2;
if ($current_length<($textwidth-$leftmargin) and $ind!=$number_of_bubbles) {
- $line.='\hskip -1 mm {\small \textbf{'.$alphabet[$ind].'}}$\bigcirc$\hskip -1 mm & \hskip -3 mm {\small '.$opt[$ind].'} & ';
+ $line.='\hskip 1pc {\small \textbf{'.$alphabet[$ind].'}}$\bigcirc$\hskip -1 mm & \hskip -3 mm {\small '.$opt[$ind].'} & ';
$head.='lr';
} else {
$line=~s/\&\s*$//;