--- loncom/xml/lonplot.pm 2005/02/24 22:01:40 1.105 +++ loncom/xml/lonplot.pm 2005/04/07 06:56:27 1.106 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Dynamic plot # -# $Id: lonplot.pm,v 1.105 2005/02/24 22:01:40 matthew Exp $ +# $Id: lonplot.pm,v 1.106 2005/04/07 06:56:27 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -35,6 +35,7 @@ use Apache::File; use Apache::response; use Apache::lonxml; use Apache::edit; +use Apache::lonnet; use vars qw/$weboutputformat $versionstring/; @@ -513,7 +514,7 @@ sub end_gnuplot { ## ## Determine filename my $tmpdir = '/home/httpd/perl/tmp/'; - my $filename = $ENV{'user.name'}.'_'.$ENV{'user.domain'}. + my $filename = $env{'user.name'}.'_'.$env{'user.domain'}. '_'.time.'_'.$$.$randnumber.'_plot'; ## Write the plot description to the file &write_gnuplot_file($tmpdir,$filename,$target);