From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 18 Aug 2000 13:35:57 +0000 (+0000)
Subject: Tiny Getopt::Long patch from Johan Vromans.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c3d5f6091c78d2ee74b393e25c2d7898a77f0cc8;p=p5sagit%2Fp5-mst-13.2.git

Tiny Getopt::Long patch from Johan Vromans.

p4raw-id: //depot/perl@6697
---

diff --git a/lib/Getopt/Long.pm b/lib/Getopt/Long.pm
index 7c64c88..b3d4622 100644
--- a/lib/Getopt/Long.pm
+++ b/lib/Getopt/Long.pm
@@ -36,7 +36,7 @@ BEGIN {
     require 5.004;
     use Exporter ();
     use vars     qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
-    $VERSION     = "2.23_05";
+    $VERSION     = 2.23_05;
 
     @ISA         = qw(Exporter);
     @EXPORT      = qw(&GetOptions $REQUIRE_ORDER $PERMUTE $RETURN_IN_ORDER);
diff --git a/t/lib/gol-basic.t b/t/lib/gol-basic.t
index 6707ef1..0443816 100755
--- a/t/lib/gol-basic.t
+++ b/t/lib/gol-basic.t
@@ -8,7 +8,7 @@ BEGIN {
 use Getopt::Long qw(:config no_ignore_case);
 die("Getopt::Long version 2.23_03 required--this is only version ".
     $Getopt::Long::VERSION)
-  unless $Getopt::Long::VERSION ge "2.23_03";
+  unless $Getopt::Long::VERSION >= 2.23_03;
 
 print "1..9\n";
 
diff --git a/t/lib/gol-oo.t b/t/lib/gol-oo.t
index 106d54f..b344e4c 100644
--- a/t/lib/gol-oo.t
+++ b/t/lib/gol-oo.t
@@ -8,7 +8,7 @@ BEGIN {
 use Getopt::Long;
 die("Getopt::Long version 2.23_03 required--this is only version ".
     $Getopt::Long::VERSION)
-  unless $Getopt::Long::VERSION ge "2.23_03";
+  unless $Getopt::Long::VERSION >= 2.23_03;
 print "1..9\n";
 
 @ARGV = qw(-Foo -baR --foo bar);