2 files changed, 4 insertions, 4 deletions
diff --git a/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Devel/InnerPackage.pm b/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Devel/InnerPackage.pm
index 614a59a85e5..69f8dcaa447 100644
--- a/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Devel/InnerPackage.pm
+++ b/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Devel/InnerPackage.pm
@@ -4,7 +4,7 @@ use strict;
 use base qw(Exporter);
 use vars qw($VERSION @EXPORT_OK);
 
-$VERSION = '0.3';
+$VERSION = '0.4';
 @EXPORT_OK = qw(list_packages);
 
 =pod
@@ -83,12 +83,12 @@ sub list_packages {
 sub _loaded {
        my ($class, $name) = @_;
 
-    no strict 'refs';
+        no strict 'refs';
 
        # Handle by far the two most common cases
        # This is very fast and handles 99% of cases.
        return 1 if defined ${"${name}::VERSION"};
-       return 1 if defined @{"${name}::ISA"};
+       return 1 if @{"${name}::ISA"};
 
        # Are there any symbol table entries other than other namespaces
        foreach ( keys %{"${name}::"} ) {
diff --git a/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Module/Pluggable.pm b/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Module/Pluggable.pm
index bbdb49b6bca..55cf7269e70 100644
--- a/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Module/Pluggable.pm
+++ b/gnu/usr.bin/perl/cpan/Module-Pluggable/lib/Module/Pluggable.pm
@@ -9,7 +9,7 @@ use Module::Pluggable::Object;
 # Peter Gibbons: I wouldn't say I've been missing it, Bob! 
 
 
-$VERSION = '3.9';
+$VERSION = '4.0';
 
 sub import {
     my $class        = shift;