[LON-CAPA-cvs] cvs: loncom /homework convertjme.pl
albertel
lon-capa-cvs@mail.lon-capa.org
Wed, 09 Feb 2005 21:50:06 -0000
albertel Wed Feb 9 16:50:06 2005 EDT
Modified files:
/loncom/homework convertjme.pl
Log:
- BUG#3926
Index: loncom/homework/convertjme.pl
diff -u loncom/homework/convertjme.pl:1.12 loncom/homework/convertjme.pl:1.13
--- loncom/homework/convertjme.pl:1.12 Wed Feb 2 15:08:05 2005
+++ loncom/homework/convertjme.pl Wed Feb 9 16:50:06 2005
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# Dynamically converts JME strings into either a png or ps file.
#
-# $Id: convertjme.pl,v 1.12 2005/02/02 20:08:05 albertel Exp $
+# $Id: convertjme.pl,v 1.13 2005/02/09 21:50:06 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -396,7 +396,7 @@
(shift @formula) =~ /([A-Z][a-z]?)(\d*)/;
my $carrige = $x[$i]-stringWidth($1)/2;
$carrige = printElement ($1,$2,$carrige,$y[$i]);
- my $y = (@formula > 0) ? $y[$i] + fm2cm(800) : $y[$i];
+ my $y = (@formula > 0) ? $y[$i] + fm2cm(900) : $y[$i];
$carrige =
(@formula > 0) ? $x[$i]-stringWidth($1)/2 : $carrige;
foreach (@formula) {
@@ -409,7 +409,7 @@
(shift @formula) =~ /([A-Z][a-z]?)(\d*)/;
my $carrige = $x[$i]-stringWidth($1)/2;
$carrige = printElement ($1,$2,$carrige,$y[$i]);
- my $y = (@formula > 0) ? $y[$i] + fm2cm(-800) : $y[$i];
+ my $y = (@formula > 0) ? $y[$i] + fm2cm(-900) : $y[$i];
$carrige =
(@formula > 0) ? $x[$i]-stringWidth($1)/2 : $carrige;
foreach (@formula) {