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

sakharuk lon-capa-cvs@mail.lon-capa.org
Fri, 25 Jul 2003 19:29:15 -0000


sakharuk		Fri Jul 25 15:29:15 2003 EDT

  Modified files:              
    /loncom/homework	optionresponse.pm 
  Log:
  Lingvistic changes are done.
  
  
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.80 loncom/homework/optionresponse.pm:1.81
--- loncom/homework/optionresponse.pm:1.80	Fri Jul 25 14:46:19 2003
+++ loncom/homework/optionresponse.pm	Fri Jul 25 15:29:15 2003
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.80 2003/07/25 18:46:19 sakharuk Exp $
+# $Id: optionresponse.pm,v 1.81 2003/07/25 19:29:15 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -152,11 +152,11 @@
   
   my $result;
   if ($target eq 'grade' || $target eq 'web' || $target eq 'answer' || $target eq 'tex' || $target eq 'analyze') {
-    my $tex_option_switch=&Apache::lonxml::get_param('texout',$parstack,$safeeval);
+    my $tex_option_switch=&Apache::lonxml::get_param('texoptions',$parstack,$safeeval);
     my $name;
     my @opt;
     eval '@opt ='.&Apache::lonxml::get_param('options',$parstack,$safeeval);
-    if ($target eq 'tex' && $tex_option_switch eq 'nooptions') {@opt=();}
+    if ($target eq 'tex' && $tex_option_switch eq 'nochoice') {@opt=();}
     &Apache::lonxml::debug("Options are $#opt");
     my $max = &Apache::lonxml::get_param('max',$parstack,$safeeval,'-2');
     my $randomize = &Apache::lonxml::get_param('randomize',$parstack,