--- loncom/interface/printout.pl	2009/11/17 01:21:08	1.137.2.1
+++ loncom/interface/printout.pl	2009/03/24 10:29:39	1.140
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc.
 #
-# $Id: printout.pl,v 1.137.2.1 2009/11/17 01:21:08 raeburn Exp $
+# $Id: printout.pl,v 1.140 2009/03/24 10:29:39 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -166,7 +166,7 @@ Your cookie information is incorrect.
 </body>
 </html>
 END
-    exit;
+    return;
 }
 
 my %perlvar=%{&LONCAPA::Configuration::read_conf('loncapa.conf')};
@@ -403,7 +403,8 @@ foreach $texfile (@texfile) {
 	  my $papera=$paper;
 	  if ($papera eq 'letter') {$papera='';}
 	  if ($papera ne '') {$papera='-t'.$papera;}
-	  my $comma = "dvips $papera -Ppdf -G0 -o $new_name_file";
+	  my $extra_ps_header = $perlvar{'lonLib'} .'/includepsheader.ps';
+	  my $comma = "dvips $papera -h $extra_ps_header -Ppdf -G0 -o  $new_name_file";
 	  &busy_wait_command("$comma $name_file 1>/dev/null 2>/dev/null",
 			     "for $status_statement now Converting to PS",
 			     \%prog_state,$new_name_file);
@@ -972,7 +973,7 @@ sub analyze_logfile {
 
 	if ($advanced_role) {  
 	    #LaTeX failed to parse tex file 
-	    print "<h2>".&mt('LaTeX could not successfully parse your tex file.')."</h2>";
+	    print "<h2>".&mt('LaTeX could not successfully parse your TeX file.')."</h2>";
 	    print &mt('It probably has errors in it.')."<br />";
 	    if ($badtext) {
                 print &mt('With very high probability this error occured in [_1].',$badtext)