loncom/xml/lonplot.pm - diff

Return to lonplot.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.71, 2002/04/25 17:40:50	version 1.72, 2002/04/25 20:39:50
Line 1050 sub write_gnuplot_file {	Line 1050 sub write_gnuplot_file {
$gnuplot_input.=	$gnuplot_input.=
$curve->{'function'}.' title "'.	$curve->{'function'}.' title "'.
$curve->{'name'}.'" with '.	$curve->{'name'}.'" with '.
$curve->{'linestyle'};	$curve->{'linestyle'};
#	$gnuplot_input.= ' linewidth 2 ' if ($target eq 'tex');
# gnuplot's term=gif driver does not handle linewidths :(
# . ' linewidth '. $curve->{'linewidth'};
#
if (($curve->{'linestyle'} eq 'points') \|\|	if (($curve->{'linestyle'} eq 'points') \|\|
($curve->{'linestyle'} eq 'linespoints') \|\|	($curve->{'linestyle'} eq 'linespoints') \|\|
($curve->{'linestyle'} eq 'errorbars') \|\|	($curve->{'linestyle'} eq 'errorbars') \|\|
Line 1087 sub write_gnuplot_file {	Line 1084 sub write_gnuplot_file {
$gnuplot_input.= '"'.$datafilename.'" title "'.	$gnuplot_input.= '"'.$datafilename.'" title "'.
$curve->{'name'}.'" with '.	$curve->{'name'}.'" with '.
$curve->{'linestyle'};	$curve->{'linestyle'};
	$gnuplot_input.= ' linewidth 2 ' if ($target eq 'tex');
if (($curve->{'linestyle'} eq 'points') \|\|	if (($curve->{'linestyle'} eq 'points') \|\|
($curve->{'linestyle'} eq 'linespoints') \|\|	($curve->{'linestyle'} eq 'linespoints') \|\|
($curve->{'linestyle'} eq 'errorbars') \|\|	($curve->{'linestyle'} eq 'errorbars') \|\|