From a66cbbf42475b2f759f52ed3bbc3cab15d86390c Mon Sep 17 00:00:00 2001
From: Dima Kogan <dkogan@cds.caltech.edu>
Date: Tue, 8 Sep 2009 11:17:44 -0700
Subject: [PATCH] no y2 tics if not needed. other script

Ignore-this: 7da813657e0093494b2428919c94f393

darcs-hash:20090908181744-0cb85-73f5f460de655559c8d1ef503a20e869d400ec72.gz
---
 driveGnuPlots.pl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/driveGnuPlots.pl b/driveGnuPlots.pl
index c90ba88..109ed77 100755
--- a/driveGnuPlots.pl
+++ b/driveGnuPlots.pl
@@ -143,10 +143,13 @@ sub mainThread {
     }
 
     print PIPE "set xtics\n";
-    print PIPE "set ytics nomirror\n";
-    print PIPE "set y2tics\n";
+    if($options{"y2"})
+    {
+      print PIPE "set ytics nomirror\n";
+      print PIPE "set y2tics\n";
+      print PIPE "set y2range [". $options{"y2min"} . ":" . $options{"y2max"} ."]\n" if $options{"y2max"};
+    }
     print PIPE "set yrange [". $options{"ymin"} . ":" . $options{"ymax"} ."]\n" if $options{"y2max"};
-    print PIPE "set y2range [". $options{"y2min"} . ":" . $options{"y2max"} ."]\n" if $options{"y2max"};
     print PIPE "set style data $style\n";
     print PIPE "set grid\n";