--- loncom/interface/printout.pl	2004/03/04 05:21:34	1.40.2.2
+++ loncom/interface/printout.pl	2004/03/15 19:26:49	1.40.2.3
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc.
 #
-# $Id: printout.pl,v 1.40.2.2 2004/03/04 05:21:34 albertel Exp $
+# $Id: printout.pl,v 1.40.2.3 2004/03/15 19:26:49 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -59,6 +59,9 @@ END
   my $tableofindex = $ENV{'cgi.'.$identifier.'tableofindex'};
   my $advans_role = $ENV{'cgi.'.$identifier.'role'};
 
+  #got what we needed reset ENV in case it is to big for system
+  %ENV=%origENV;
+
   my $figfile = $texfile;
   $figfile =~ s/^([^\.]+printout)[^t]+\.tex/$1\.dat/;
   my $duefile = $texfile;
@@ -278,8 +281,6 @@ END
   } else {
       print "LaTeX file $texfile was not created successfully";
   }
-  #got what we needed reset ENV in case it is to big for system
-  %ENV=%origENV;