From: Mike Taylor <mike@indexdata.com>
Date: Wed, 31 Oct 2007 16:07:40 +0000 (+0000)
Subject: Fix args-checking.
X-Git-Tag: CPAN-v1.02~340
X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=4d2d5cf57e5e39b8977330a1c0599185d82cf370;p=irspy-moved-to-github.git

Fix args-checking.
---

diff --git a/bin/irspy-stats.pl b/bin/irspy-stats.pl
index a9b9ade..5e03c7a 100755
--- a/bin/irspy-stats.pl
+++ b/bin/irspy-stats.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-# $Id: irspy-stats.pl,v 1.4 2007-01-24 09:28:02 mike Exp $
+# $Id: irspy-stats.pl,v 1.5 2007-10-31 16:07:40 mike Exp $
 #
 #	perl -I ../lib irspy-stats.pl localhost:8018/IR-Explain---1 "net.host=*indexdata*"
 
@@ -8,7 +8,7 @@ use strict;
 use warnings;
 use ZOOM::IRSpy;
 
-if (@ARGV > 2) {
+if (@ARGV < 2) {
     print STDERR "Usage: $0 [CQL-query]\n";
     exit 1;
 }