summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2006-12-05 21:00:38 +0000
committerSteve Peters <steve@fisharerojo.org>2006-12-05 21:00:38 +0000
commit482096f125c7b414421b33a75e090d36897a5f3e (patch)
tree938c97f55c1ce5d64c9f07b7a9a6b82651dda536 /lib
parent1fd1213a7b551f5b3fc24c317118ef268b06783e (diff)
downloadperl-482096f125c7b414421b33a75e090d36897a5f3e.tar.gz
Silence a warning from Module::CoreList that occurs when the module version is
something like X.XX_XX. p4raw-id: //depot/perl@29471
Diffstat (limited to 'lib')
-rw-r--r--lib/Module/CoreList.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Module/CoreList.pm b/lib/Module/CoreList.pm
index add89ff93c..f6c69b0190 100644
--- a/lib/Module/CoreList.pm
+++ b/lib/Module/CoreList.pm
@@ -1,7 +1,7 @@
package Module::CoreList;
use strict;
use vars qw/$VERSION %released %patchlevel %version %families/;
-$VERSION = '2.09';
+$VERSION = '2.09_01';
=head1 NAME
@@ -97,7 +97,7 @@ sub first_release {
my @perls = $version
? grep { exists $version{$_}{ $module } &&
- $version{$_}{ $module } >= $version } keys %version
+ $version{$_}{ $module } ge $version } keys %version
: grep { exists $version{$_}{ $module } } keys %version;
return unless @perls;