From cec6895a09453567dfdef304dcf0f4bec970c073 Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Sat, 5 Feb 2011 21:22:15 +0000
Subject: [PATCH] use "set style data ..." instead of "set data style ..."

---
 TimeSeries.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/TimeSeries.pm b/TimeSeries.pm
index bb45393..67812d8 100644
--- a/TimeSeries.pm
+++ b/TimeSeries.pm
@@ -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});