zhangyiss/feedgnuplot
1
0
Fork 0
mirror of https://github.com/dkogan/feedgnuplot.git synced 2025-05-06 14:31:11 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

style is handled completely in the main thread

Browse Source
This commit is contained in:
Dima Kogan 2011-01-06 15:59:57 -08:00
parent 030676037d
commit 400ed04b31
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
feedGnuplot.pl
View File

@ -224,11 +224,6 @@ elsif(!$options{colormap})
} }
} }
# set up plotting style
my $style = '';
if($options{lines}) { $style .= 'lines';}
if($options{points}) { $style .= 'points';}
# list containing the plot data. Each element is a reference to a list, representing the data for # list containing the plot data. Each element is a reference to a list, representing the data for
# one curve. The first 'point' is a hash describing various curve parameters. The rest are all # one curve. The first 'point' is a hash describing various curve parameters. The rest are all
# references to lists of (x,y) tuples # references to lists of (x,y) tuples
@ -353,6 +348,11 @@ sub mainThread
print PIPE "set y2range [". $options{y2min} . ":" . $options{y2max} ."]\n" if length( $options{y2min} . $options{y2max} ); print PIPE "set y2range [". $options{y2min} . ":" . $options{y2max} ."]\n" if length( $options{y2min} . $options{y2max} );
} }
# set up plotting style
my $style = '';
if($options{lines}) { $style .= 'lines';}
if($options{points}) { $style .= 'points';}
# if any of the ranges are given, set the range # if any of the ranges are given, set the range
print PIPE "set xrange [". $options{xmin} . ":" . $options{xmax} ."]\n" if length( $options{xmin} . $options{xmax} ); print PIPE "set xrange [". $options{xmin} . ":" . $options{xmax} ."]\n" if length( $options{xmin} . $options{xmax} );
print PIPE "set yrange [". $options{ymin} . ":" . $options{ymax} ."]\n" if length( $options{ymin} . $options{ymax} ); print PIPE "set yrange [". $options{ymin} . ":" . $options{ymax} ."]\n" if length( $options{ymin} . $options{ymax} );