In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/6d3855bd855c011550d9ba2222b9974ade8046c3?hp=0ebb4f02532851260491496174fb796b13b8b961>
- Log ----------------------------------------------------------------- commit 6d3855bd855c011550d9ba2222b9974ade8046c3 Author: Chris Williams <[email protected]> Date: Thu Apr 22 12:51:50 2010 +0100 Fix for find_version() in Module::CoreList. ----------------------------------------------------------------------- Summary of changes: dist/Module-CoreList/lib/Module/CoreList.pm | 3 +-- 1 files changed, 1 insertions(+), 2 deletions(-) diff --git a/dist/Module-CoreList/lib/Module/CoreList.pm b/dist/Module-CoreList/lib/Module/CoreList.pm index 911e9d6..64d0a9b 100644 --- a/dist/Module-CoreList/lib/Module/CoreList.pm +++ b/dist/Module-CoreList/lib/Module/CoreList.pm @@ -140,9 +140,8 @@ sub find_modules { } sub find_version { - my $class = shift; - $class = shift if $class->isa(__PACKAGE__); my $v = shift; + $v = shift if $v->isa(__PACKAGE__); return $version{$v} if defined $version{$v}; return undef; } -- Perl5 Master Repository
