[LON-CAPA-cvs] cvs: loncom /xml londefdef.pm
sakharuk
lon-capa-cvs@mail.lon-capa.org
Mon, 28 Oct 2002 19:20:15 -0000
sakharuk Mon Oct 28 14:20:15 2002 EDT
Modified files:
/loncom/xml londefdef.pm
Log:
Changes in <img and <br tags to make printing output better (Ed wanted this).
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.95 loncom/xml/londefdef.pm:1.96
--- loncom/xml/londefdef.pm:1.95 Mon Oct 28 13:20:08 2002
+++ loncom/xml/londefdef.pm Mon Oct 28 14:20:15 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Tags Default Definition Module
#
-# $Id: londefdef.pm,v 1.95 2002/10/28 18:20:08 sakharuk Exp $
+# $Id: londefdef.pm,v 1.96 2002/10/28 19:20:15 sakharuk Exp $
#
#
# Copyright Michigan State University Board of Trustees
@@ -845,7 +845,7 @@
$currentstring .= $token->[4];
} elsif ($target eq 'tex') {
if ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') {
- $currentstring .= '\vskip 0 mm';
+ $currentstring .= '\vskip 0.2 mm';
}
} elsif ($target eq 'latexsource') {
$currentstring .= '\\';
@@ -1591,7 +1591,7 @@
if (-e $newsrc) {
#eps counterpart for image exist
if ($path) {
- $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
+ $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';
}
} else {
#there is no eps counterpart for image - check for ps one
@@ -1600,7 +1600,7 @@
#ps counterpart for image exist
$file =~ s/\.eps$/\.ps/;
if ($path) {
- $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
+ $currentstring .= '\vskip 1 mm \noindent\graphicspath{{'.$path.'}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';
}
} else {
#there aren't eps or ps - so create eps
@@ -1608,7 +1608,7 @@
my $filename = "/home/httpd/prtspool/$ENV{'user.name'}_$ENV{'user.domain'}_printout.dat";
$temp_file = Apache::File->new('>>'.$filename);
print $temp_file "$src\n";
- $currentstring .= '\vskip 1 mm \graphicspath{{/home/httpd/prtspool/}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}}\vskip 1 mm ';
+ $currentstring .= '\vskip 1 mm \graphicspath{{/home/httpd/prtspool/}}\fbox{\includegraphics[width='.$width_param.' mm]{'.$file.'}} ';
}
}
} else {