--- loncom/interface/printout.pl	2005/05/02 21:57:44	1.77
+++ loncom/interface/printout.pl	2005/05/03 21:15:28	1.79
@@ -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.79 2005/05/03 21:15:28 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 "<br>-------------------<br>";
+    print "<p>-------------------</p>";
     foreach my $key (sort (keys %env)) {
-	print "<br>$key -> $env{$key}";
+	print "<br />$key -> $env{$key}";
     }
-    print "<br>-------------------<br>";
+    print "<p>-------------------</p>";
 }
 
 #
@@ -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.<br>";
+	    print "sending message to course coordinators.<br />";
 	    
 	    my $subject  = "Print failed for $user".'@'.$domain;
 	    my $message .= "Print failed to render LaTeX for $user".'@'."$domain\n";
@@ -201,12 +201,12 @@ END
   my $numberofcolumns = $env{'cgi.'.$identifier.'.numcol'};
   my $paper = $env{'cgi.'.$identifier.'.paper'};
   my $selectionmade = $env{'cgi.'.$identifier.'.selection'};
-  my $tableofcontents = $env{'cgi.'.$identifier.'tableofcontents'};
-  my $tableofindex = $env{'cgi.'.$identifier.'tableofindex'};
-  my $advanced_role = $env{'cgi.'.$identifier.'role'};
-  my $number_of_files = $env{'cgi.'.$identifier.'numberoffiles'}+1;
-  my $student_names = $env{'cgi.'.$identifier.'studentnames'};
-  my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'backref'});
+  my $tableofcontents = $env{'cgi.'.$identifier.'.tableofcontents'};
+  my $tableofindex = $env{'cgi.'.$identifier.'.tableofindex'};
+  my $advanced_role = $env{'cgi.'.$identifier.'.role'};
+  my $number_of_files = $env{'cgi.'.$identifier.'.numberoffiles'}+1;
+  my $student_names = $env{'cgi.'.$identifier.'.studentnames'};
+  my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'.backref'});
 
 
   my $adv = $env{'request.role.adv'};
@@ -382,7 +382,7 @@ foreach $texfile (@texfile) {
 	  }
 	  print "</pre>\n";
           if ($advanced_role) {  
-	      print "<br> Advanced role <br>";
+	      print "<p> Advanced role </p>";
               print "<b><big>The link to ";
               $logfilename=~s/\/home\/httpd//;
 	      print "<a href=\"$logfilename\">Your log file </a></big></b>";