[LON-CAPA-cvs] cvs: loncom /homework optionresponse.pm

sakharuk lon-capa-cvs@mail.lon-capa.org
Thu, 18 Jul 2002 15:45:41 -0000


sakharuk		Thu Jul 18 11:45:41 2002 EDT

  Modified files:              
    /loncom/homework	optionresponse.pm 
  Log:
  Correctly prints problems in both possibilities: without answers and with ones.
  
  
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.42 loncom/homework/optionresponse.pm:1.43
--- loncom/homework/optionresponse.pm:1.42	Tue Jul 16 17:02:29 2002
+++ loncom/homework/optionresponse.pm	Thu Jul 18 11:45:41 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.42 2002/07/16 21:02:29 sakharuk Exp $
+# $Id: optionresponse.pm,v 1.43 2002/07/18 15:45:41 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -140,10 +140,6 @@
   }
   if ($target eq 'tex') {
       $result .= ' \begin{enumerate} ';
-      my $option_list = &Apache::lonxml::get_param('options',$parstack,$safeeval);
-      $option_list =~ s/^\(//;
-      $option_list =~ s/\)$//;
-      $result .= ' \item[] Use the following options: \textbf{'.$option_list.'}. ';
   }
   return $result;
 }
@@ -318,10 +314,10 @@
 	      $durtyoptionlist =~ s/>/\$>\$/g;
 	      $durtyoptionlist =~ s/</\$<\$/g;
 	      $durtyoptionlist =~ s/=/\$=\$/g;
-	      $result.= $durtyoptionlist.$Apache::response::foilgroup{$name.'.text'};
+	      $result.= $durtyoptionlist.'\item '.$Apache::response::foilgroup{$name.'.text'};
 	      $Apache::optionresponse::displayoptionintex=1;
 	  } else {
-	      $result.= $Apache::response::foilgroup{$name.'.text'};
+	      $result.= '\item '.$Apache::response::foilgroup{$name.'.text'};
 	  }
       } 
     }