[LON-CAPA-cvs] cvs: loncom /homework/caparesponse caparesponse.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 04 Sep 2002 04:57:13 -0000
albertel Wed Sep 4 00:57:13 2002 EDT
Modified files:
/loncom/homework/caparesponse caparesponse.pm
Log:
- trying to convert to using the latex symbol helper function
Index: loncom/homework/caparesponse/caparesponse.pm
diff -u loncom/homework/caparesponse/caparesponse.pm:1.55 loncom/homework/caparesponse/caparesponse.pm:1.56
--- loncom/homework/caparesponse/caparesponse.pm:1.55 Wed Aug 28 10:22:15 2002
+++ loncom/homework/caparesponse/caparesponse.pm Wed Sep 4 00:57:13 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# caparesponse definition
#
-# $Id: caparesponse.pm,v 1.55 2002/08/28 14:22:15 sakharuk Exp $
+# $Id: caparesponse.pm,v 1.56 2002/09/04 04:57:13 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -169,7 +169,7 @@
if ($target eq 'web') {
$result="<br />The computer got ";
} elsif ($target eq 'tex') {
- $result='\vskip 0 mm The computer got \verb|';
+ $result='\vskip 0 mm The computer got ';
}
for (my $i=0; $i <= $#answers; $i++) {
my $answer=$answers[$i];
@@ -189,9 +189,10 @@
}
chop $result;
if ($target eq 'web') {
- $result.=" $unit.<br></br>";
+ $result.=" $unit.<br />";
} elsif ($target eq 'tex') {
- $result.=" $unit.| \\vskip 0 mm ";
+ $result.="$unit. \\vskip 0 mm ";
+ $result=&Apache::lonxml::latex_special_symbols($result,$tagstack,$parstack);
}
}
} elsif ($target eq 'edit') {