[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm
sakharuk
lon-capa-cvs@mail.lon-capa.org
Mon, 20 May 2002 19:05:39 -0000
sakharuk Mon May 20 15:05:39 2002 EDT
Modified files:
/loncom/interface lonprintout.pm
Log:
corrections for printing pages
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.28 loncom/interface/lonprintout.pm:1.29
--- loncom/interface/lonprintout.pm:1.28 Fri May 17 17:53:50 2002
+++ loncom/interface/lonprintout.pm Mon May 20 15:05:39 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Printout
#
-# $Id: lonprintout.pm,v 1.28 2002/05/17 21:53:50 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.29 2002/05/20 19:05:39 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -126,7 +126,7 @@
$moreenv{'request.filename'}=$currequest;
&Apache::lonnet::appenv(%moreenv);
$result .= $texversion;
-
+ $result = &additional_cleanup($result);
} elsif ($choice eq 'Standard LaTeX output for the primary sequence' or $choice eq 'Standard LaTeX output for whole primary sequence') {
#-- where is the primary sequence containing file?
my %moreenv;
@@ -269,6 +269,7 @@
$result =~ s/{\\par }\s*\\\\/\\\\/gm;
$result =~ s/\\\\\s+\[/ \[/g;
$result =~ s/θ/\$\\theta\$/g; #converts theta from html into tex
+ $result =~ s/\b_+\b/\\makebox\[1 cm\]\[b\]{\\hrulefill}/g;
#-- writing .tex file in prtspool
my $temp_file;
$filename = "/home/httpd/prtspool/$ENV{'user.name'}$ENV{'user.domain'}temp$ENV{'user.login.time'}.tex";