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

[sakharuk]

sakharuk		Tue Oct 29 15:58:50 2002 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
   Corrections for printing (group printing).
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.84 loncom/interface/lonprintout.pm:1.85
--- loncom/interface/lonprintout.pm:1.84	Tue Oct 29 08:42:14 2002
+++ loncom/interface/lonprintout.pm	Tue Oct 29 15:58:50 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.84 2002/10/29 13:42:14 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.85 2002/10/29 20:58:50 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -518,7 +518,7 @@
 	    }
 	    if ($current_output=~/\\documentclass/) {
 		my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'};
-		$current_output =~ s/\\begin{document}/\\begin{document}\\noindent\\parbox{\\minipagewidth}{\\noindent{\\textbf{$ENV{'environment.firstname'} $ENV{'environment.lastname'}} $courseidinfo  - $assignment}\\hskip 1\.4in } \\vskip 5 mm /;
+		$current_output =~ s/\\begin{document}/\\setlength{\\topmargin}{1cm}\\setlength{\\headheight}{1cm}\\setlength{\\headsep}{0.5cm}\\pagestyle{myheadings}\\markboth{}{{\\textbf{$fullname} $courseidinfo  - $assignment}}\\begin{document} /;
 	    } else {
 		$current_output = '\\vskip 3mm\noindent\parbox{\minipagewidth}{\noindent\fbox{\textbf{'.$fullname.'}}\hskip 1.4in } \vskip 5 mm '.$current_output;
 	    }