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

made pushNewEmptyCurve() a local subroutine of the subroutine that uses it

Browse Source
This commit is contained in:
Dima Kogan 2010-10-23 00:50:32 -07:00
parent cbba09917b
commit 78bb507f36
1 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
feedGnuplot.pl
View File

@ -496,6 +496,12 @@ sub plotStoredData
sub newCurve sub newCurve
{ {
sub pushNewEmptyCurve
{
my $opts = "notitle ";
push @curves, [{"options" => " $opts"}];
}
# I optionally pass in the title of this plot and any additional options separately. The title # I optionally pass in the title of this plot and any additional options separately. The title
# COULD be a part of $opts, but this raises an issue in the no-title case. When no title is # COULD be a part of $opts, but this raises an issue in the no-title case. When no title is
# specified, gnuplot will still add a legend entry with an unhelpful '-' label. I can still grep # specified, gnuplot will still add a legend entry with an unhelpful '-' label. I can still grep
@ -550,12 +556,7 @@ sub addCurveOption
} }
} }
sub pushNewEmptyCurve # function to add a point to the plot. Assumes that the curve indexed by $idx already exists
{
my $opts = "notitle ";
push @curves, [{"options" => " $opts"}];
}
sub pushPoint sub pushPoint
{ {
my ($idx, $xy) = @_; my ($idx, $xy) = @_;