--- loncom/homework/optionresponse.pm	2008/11/20 15:19:15	1.156
+++ loncom/homework/optionresponse.pm	2009/05/04 13:42:50	1.158
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.156 2008/11/20 15:19:15 jms Exp $
+# $Id: optionresponse.pm,v 1.158 2009/05/04 13:42:50 onken Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -65,8 +65,8 @@ sub start_optionresponse {
         &Apache::edit::select_arg('Randomize Foil Order:','randomize',
 				  ['yes','no'],$token).
         &Apache::edit::select_arg(&mt('Display of options when printed'),'TeXlayout',
-				  [['horizontal',&mt('Normal list')],
-				   ['vertical',&mt('Listed in a vertical column')]],$token).
+				  [['horizontal','Normal list'],
+				   ['vertical','Listed in a vertical column']],$token).
         &Apache::edit::end_row().&Apache::edit::start_spanning_row();
   } elsif ($target eq 'modified') {
     my $constructtag=&Apache::edit::get_new_args($token,$parstack,
@@ -439,7 +439,8 @@ sub displayfoils {
       my $lastopt=$lastresponse{$name};
       my $optionlist="<option></option>\n";
 
-      if($target eq 'tex' and $env{'form.pdfFormFields'} eq 'yes') {
+      if($target eq 'tex' and $env{'form.pdfFormFields'} eq 'yes'
+         && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') {
           my $fieldname = $env{'request.symb'}.'&part_'.$Apache::inputtags::part.'&optionresponse'.'&HWVAL_'.$Apache::inputtags::response['-1'].':'.$temp;
           $optionlist =  &Apache::lonxml::print_pdf_start_combobox($fieldname);
       }
@@ -447,13 +448,15 @@ sub displayfoils {
       foreach my $option (@opt) {
 	  my $escopt=&HTML::Entities::encode($option,'\'"&<>');
           if ($option eq $lastopt) {
-              if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
+              if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
+                  && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') {
                   $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option);
               } else {
                   $optionlist.="<option value='".$escopt."' selected=\"selected\">$option</option>\n";
               }
           } else {
-              if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
+              if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
+                  && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') {
                   $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option);
               } else {
                   $optionlist.="<option value='".$escopt."'>$option</option>\n";
@@ -516,9 +519,9 @@ sub displayfoils {
 		  '\end{enumerate} \vskip -8 mm \strut ';
 	      $internal_counter++;
 	  }
-          if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
-              $text =~ s/.*indent(.*)$/$1/;
-              $text = $1;
+          if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
+              && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') {
+              $text =~ s/\\item//m;
               $result .= " $optionlist ". &Apache::lonxml::print_pdf_end_combobox($text).'\strut \\\\';
               $temp++;
           }
@@ -841,4 +844,4 @@ start_optionresponse()
 
 =back
 
-=cut
\ No newline at end of file
+=cut