--- loncom/interface/printout.pl 2005/05/02 21:57:44 1.77 +++ loncom/interface/printout.pl 2005/05/02 22:59:11 1.78 @@ -1,7 +1,7 @@ #!/usr/bin/perl # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc. # -# $Id: printout.pl,v 1.77 2005/05/02 21:57:44 foxr Exp $ +# $Id: printout.pl,v 1.78 2005/05/02 22:59:11 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -97,11 +97,11 @@ sub is_student { # Debugging: Dump the environment for debugging. # sub dumpenv { - print "
-------------------
"; + print "

-------------------

"; foreach my $key (sort (keys %env)) { - print "
$key -> $env{$key}"; + print "
$key -> $env{$key}"; } - print "
-------------------
"; + print "

-------------------

"; } # @@ -148,7 +148,7 @@ sub send_error_mail { if (&is_student( $courseid, $coursedom)) { # build the subject and message body: - print "sending message to course coordinators.
"; + print "sending message to course coordinators.
"; my $subject = "Print failed for $user".'@'.$domain; my $message .= "Print failed to render LaTeX for $user".'@'."$domain\n"; @@ -382,7 +382,7 @@ foreach $texfile (@texfile) { } print "\n"; if ($advanced_role) { - print "
Advanced role
"; + print "

Advanced role

"; print "The link to "; $logfilename=~s/\/home\/httpd//; print "Your log file ";