From 7a3ca33118ff0202cecab788bd6a3454a2124b12 Mon Sep 17 00:00:00 2001 From: Dima Kogan Date: Mon, 10 Aug 2009 13:04:39 -0700 Subject: [PATCH] y extents are optional Ignore-this: 809894afece147f868685c0bbeaac9f5 darcs-hash:20090810200439-0cb85-a14ece790280871a4ff71949502d1c9ae0548232.gz --- driveGnuPlots.pl | 18 +++++------------- 1 file changed, 5 insertions(+), 13 deletions(-) diff --git a/driveGnuPlots.pl b/driveGnuPlots.pl index a6e4874..f26353d 100755 --- a/driveGnuPlots.pl +++ b/driveGnuPlots.pl @@ -14,7 +14,11 @@ my @curves = (); # point plotting by default my %options = ( "stream" => 1, "points" => 0, - "lines" => 0,); + "lines" => 0, + "ymin" => "", + "ymax" => "", + "y2min" => "", + "y2max" => ""); GetOptions(\%options, "stream!", "lines!", @@ -66,18 +70,6 @@ sub main { usage; return; } - if( defined $options{"ymin"} && !defined $options{"ymax"} || - !defined $options{"ymin"} && defined $options{"ymax"} ) - { - usage; - die("Both or neither of ymin,ymax should be specified\n"); - } - if( defined $options{"y2min"} && !defined $options{"y2max"} || - !defined $options{"y2min"} && defined $options{"y2max"} ) - { - usage; - die("Both or neither of y2min,y2max should be specified\n"); - } if( defined $options{"hardcopy"} && $options{"stream"} ) { usage;