--- loncom/cgi/decompress.pl	2004/06/09 19:04:47	1.12
+++ loncom/cgi/decompress.pl	2005/04/07 06:56:21	1.13
@@ -31,8 +31,8 @@
 ####
 use strict;
 use lib '/home/httpd/lib/perl';
-use LONCAPA::loncgi ();
-my %origENV=%ENV;
+use LONCAPA::loncgi;
+
 if(! &LONCAPA::loncgi::check_cookie_and_load_env()) {
     print "Content-type: text/html\n\n";
     print <<END;
@@ -40,9 +40,8 @@ if(! &LONCAPA::loncgi::check_cookie_and_
 END
 } else {
     print "Content-type: text/html\n\n";
-    my $file=$ENV{'cgi.file'};
-    my $dir=$ENV{'cgi.dir'}; 
-    %ENV=%origENV;
+    my $file=$env{'cgi.file'};
+    my $dir=$env{'cgi.dir'}; 
     if(! $file || ! $dir) {
         print <<END;
         <html><body>Bad Enviroment!</body></html>
