--- loncom/cgi/graph.png	2004/01/08 15:50:17	1.33
+++ loncom/cgi/graph.png	2005/04/07 06:56:21	1.34
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: graph.png,v 1.33 2004/01/08 15:50:17 matthew Exp $
+# $Id: graph.png,v 1.34 2005/04/07 06:56:21 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -59,7 +59,7 @@ use GD::Graph::bars;
 use GD::Graph::lines;
 use GD::Graph::colour;
 use GD::Graph::Data;
-use LONCAPA::loncgi();
+use LONCAPA::loncgi;
 
 sub unescape {
     my $str=shift;
@@ -92,8 +92,8 @@ my $id = $ENV{'QUERY_STRING'};
 # usage: &get_env($name,$default)
 sub get_env {
     my $key = 'cgi.'.$id.'.'.(shift());
-    return shift if (! exists($ENV{$key}));
-    return $ENV{$key};
+    return shift if (! exists($env{$key}));
+    return $env{$key};
 }
 
 if (! &LONCAPA::loncgi::check_cookie_and_load_env()) {