loncom/xml/lonplot.pm - diff

Return to lonplot.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.158, 2012/07/04 11:09:22	version 1.159, 2012/07/09 11:11:47
Line 1653 sub write_gnuplot_file {	Line 1653 sub write_gnuplot_file {
$gnuplot_input .= "set encoding iso_8859_1\n"; # Get access to extended font.	$gnuplot_input .= "set encoding iso_8859_1\n"; # Get access to extended font.

}	}
	$gnuplot_input .= "set encoding utf8\n";
# cartesian or polar plot?	# cartesian or polar plot?
if (lc($Apache::lonplot::plot{'plottype'}) eq 'polar') {	if (lc($Apache::lonplot::plot{'plottype'}) eq 'polar') {
$gnuplot_input .= 'set polar'.$/;	$gnuplot_input .= 'set polar'.$/;
Line 1929 sub write_gnuplot_file {	Line 1930 sub write_gnuplot_file {
}	}
# Write the output to a file.	# Write the output to a file.
open (my $fh,">$tmpdir$filename.data");	open (my $fh,">$tmpdir$filename.data");
binmode($fh, ":utf8");	# binmode($fh, ":utf8");
print $fh $gnuplot_input;	print $fh $gnuplot_input;
close($fh);	close($fh);
# That's all folks.	# That's all folks.