loncom/xml/lonplot.pm - diff

Return to lonplot.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.184, 2020/02/02 20:12:31	version 1.185, 2022/09/21 11:49:48
Line 40 use Apache::lonxml;	Line 40 use Apache::lonxml;
use Apache::edit;	use Apache::edit;
use Apache::lonnet;	use Apache::lonnet;
use Apache::lonlocal;	use Apache::lonlocal;
	use Time::HiRes qw(gettimeofday);
use LONCAPA;	use LONCAPA;

use vars qw/$weboutputformat $version $colorprefix/;	use vars qw/$weboutputformat $version $colorprefix/;
Line 728 sub end_gnuplot {	Line 729 sub end_gnuplot {
&check_inputs(); # Make sure we have all the data we need	&check_inputs(); # Make sure we have all the data we need
##	##
## Determine filename	## Determine filename
	my ($seconds, $microseconds) = gettimeofday;
my $filename = $env{'user.name'}.'_'.$env{'user.domain'}.	my $filename = $env{'user.name'}.'_'.$env{'user.domain'}.
'_'.time.'_'.$$.$randnumber.'_plot';	'_'.$seconds.'_'.$microseconds.'_'.$$.$randnumber.'_plot';
## Write the plot description to the file	## Write the plot description to the file
&write_gnuplot_file($tmpdir,$filename,$target);	&write_gnuplot_file($tmpdir,$filename,$target);
$filename = &escape($filename);	$filename = &escape($filename);