use "set style data ..." instead of "set data style ..."
This commit is contained in:
parent
4e7a5cd120
commit
cec6895a09
|
@ -33,7 +33,7 @@ use HTTP::Date qw(parse_date);
|
|||
use Time::Local qw(timegm_nocheck);
|
||||
use POSIX qw(strftime);
|
||||
|
||||
our $VERSION = do { my @r=(q$Revision: 1.21 $=~/\d+/g);sprintf "%d."."%02d"x$#r,@r};
|
||||
our $VERSION = do { my @r=(q$Revision: 1.22 $=~/\d+/g);sprintf "%d."."%02d"x$#r,@r};
|
||||
|
||||
our $debug;
|
||||
|
||||
|
@ -368,7 +368,7 @@ sub plot {
|
|||
|
||||
print $ctlfh "set term postscript color solid 10\n";
|
||||
print $ctlfh "set output '$psfn'\n";
|
||||
print $ctlfh "set data style $self->{style}\n";
|
||||
print $ctlfh "set style data $self->{style}\n";
|
||||
print $ctlfh "set grid\n";
|
||||
print $ctlfh "set log x\n" if ($self->{log_x});
|
||||
print $ctlfh "set log y\n" if ($self->{log_y});
|
||||
|
|
Loading…
Reference in New Issue