--- loncom/xml/lonplot.pm 2002/04/25 17:25:36 1.69 +++ loncom/xml/lonplot.pm 2002/04/25 17:40:50 1.71 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Dynamic plot # -# $Id: lonplot.pm,v 1.69 2002/04/25 17:25:36 matthew Exp $ +# $Id: lonplot.pm,v 1.71 2002/04/25 17:40:50 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -498,7 +498,7 @@ sub end_gnuplot { alt = "$plot{'alttag'}" /> ENDIMAGE } elsif ($target eq 'tex') { - &Apache::lonnet::ssi("/cgi-bin/plot.gif?file=$filename&output=eps"); + &Apache::lonnet::ssi("/cgi-bin/plot.gif?file=$filename.data&output=eps"); $result = '\\\\ \graphicspath{/home/httpd/perl/tmp/}\fbox{\includegraphics[width=9.0 cm]{'.&Apache::lonnet::unescape($filename).'.eps}} \\\\'; } } elsif ($target eq 'edit') { @@ -1068,7 +1068,7 @@ sub write_gnuplot_file { # Store data values in $datatext my $datatext = ''; # get new filename - my $datafilename = "$tmpdir/$filename.$i"; + my $datafilename = "$tmpdir/$filename.data.$i"; my $fh=Apache::File->new(">$datafilename"); # Compile data my @Data = @{$curve->{'data'}}; @@ -1099,7 +1099,7 @@ sub write_gnuplot_file { } } # Write the output to a file. - my $fh=Apache::File->new(">$tmpdir$filename"); + my $fh=Apache::File->new(">$tmpdir$filename.data"); print $fh $gnuplot_input; close($fh); # That's all folks.