[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

[sakharuk]

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";