mirror of
https://github.com/dkogan/feedgnuplot.git
synced 2025-05-06 06:21:16 +08:00
added --geometry option to specify plot dimensions
This commit is contained in:
parent
7d7374e628
commit
e30f0c792e
@ -102,7 +102,8 @@ sub interpretCommandline
|
|||||||
'title=s', 'xlen=f', 'ymin=f', 'ymax=f', 'xmin=f', 'xmax=f', 'y2min=f', 'y2max=f',
|
'title=s', 'xlen=f', 'ymin=f', 'ymax=f', 'xmin=f', 'xmax=f', 'y2min=f', 'y2max=f',
|
||||||
'zmin=f', 'zmax=f', 'y2=s@', 'curvestyle=s{2}', 'curvestyleall=s', 'extracmds=s@',
|
'zmin=f', 'zmax=f', 'y2=s@', 'curvestyle=s{2}', 'curvestyleall=s', 'extracmds=s@',
|
||||||
'size=s', 'square!', 'square_xy!', 'hardcopy=s', 'maxcurves=i', 'monotonic!',
|
'size=s', 'square!', 'square_xy!', 'hardcopy=s', 'maxcurves=i', 'monotonic!',
|
||||||
'extraValuesPerPoint=i', 'help', 'dump') or pod2usage(1);
|
'extraValuesPerPoint=i', 'help', 'dump',
|
||||||
|
'geometry=s') or pod2usage(1);
|
||||||
|
|
||||||
# handle various cmdline-option errors
|
# handle various cmdline-option errors
|
||||||
if ( $options->{help} )
|
if ( $options->{help} )
|
||||||
@ -252,7 +253,9 @@ sub mainThread
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
open PIPE, "|gnuplot $dopersist" or die "Can't initialize gnuplot\n";
|
my $geometry = defined $options{geometry} ?
|
||||||
|
"-geometry $options{geometry}" : '';
|
||||||
|
open PIPE, "|gnuplot $geometry $dopersist" or die "Can't initialize gnuplot\n";
|
||||||
}
|
}
|
||||||
autoflush PIPE 1;
|
autoflush PIPE 1;
|
||||||
|
|
||||||
@ -961,6 +964,8 @@ As an example, if line 3 of the input is "0 9 1 20"
|
|||||||
--dump Instead of printing to gnuplot, print to STDOUT. For
|
--dump Instead of printing to gnuplot, print to STDOUT. For
|
||||||
debugging.
|
debugging.
|
||||||
|
|
||||||
|
--geometry If using X11, specifies the size, position of the plot window
|
||||||
|
|
||||||
=head1 ACKNOWLEDGEMENT
|
=head1 ACKNOWLEDGEMENT
|
||||||
|
|
||||||
This program is originally based on the driveGnuPlots.pl script from
|
This program is originally based on the driveGnuPlots.pl script from
|
||||||
|
@ -35,5 +35,6 @@ complete -W \
|
|||||||
--monotonic \
|
--monotonic \
|
||||||
--extraValuesPerPoint \
|
--extraValuesPerPoint \
|
||||||
--dump \
|
--dump \
|
||||||
|
--geometry \
|
||||||
--curvestyle \
|
--curvestyle \
|
||||||
--legend' feedgnuplot
|
--legend' feedgnuplot
|
||||||
|
@ -36,5 +36,6 @@ _arguments -S
|
|||||||
'(--3d)--monotonic[Resets plot if an X in the past is seen]' \
|
'(--3d)--monotonic[Resets plot if an X in the past is seen]' \
|
||||||
'--extraValuesPerPoint[How many extra values are given for each data point]:' \
|
'--extraValuesPerPoint[How many extra values are given for each data point]:' \
|
||||||
'--dump[Instead of printing to gnuplot, print to STDOUT]' \
|
'--dump[Instead of printing to gnuplot, print to STDOUT]' \
|
||||||
|
'--geometry[The X11 geometry string]:geometry string:' \
|
||||||
'*--curvestyle[Additional styles for a curve]:curve id: :style:' \
|
'*--curvestyle[Additional styles for a curve]:curve id: :style:' \
|
||||||
'*--legend[Legend for a curve]:curve id: :legend:'
|
'*--legend[Legend for a curve]:curve id: :legend:'
|
||||||
|
Loading…
Reference in New Issue
Block a user