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~54^2~285
X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=2fb568f4f70d00ea50eecf25cb36689d738cdfb7;hp=df249d500ca3cfefbc1e0fd82e3a7c1bd7f85142

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;
 }