Updated Module::Loaded to CPAN version 0.06

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index bcbe645..c2d6f0d 100755 (executable)
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -1195,7 +1195,7 @@ package Maintainers;
     'Module::Loaded' =>
        {
        'MAINTAINER'    => 'kane',
-       'DISTRIBUTION'  => 'KANE/Module-Loaded-0.02.tar.gz',
+       'DISTRIBUTION'  => 'KANE/Module-Loaded-0.06.tar.gz',
        'FILES'         => q[ext/Module-Loaded],
        'CPAN'          => 1,
        'UPSTREAM'      => 'cpan',

diff --git a/ext/Module-Loaded/lib/Module/Loaded.pm b/ext/Module-Loaded/lib/Module/Loaded.pm
index 6741844..26cf07e 100644 (file)
--- a/ext/Module-Loaded/lib/Module/Loaded.pm
+++ b/ext/Module-Loaded/lib/Module/Loaded.pm
@@ -6,7 +6,7 @@ use Carp qw[carp];
 BEGIN { use base 'Exporter';
         use vars qw[@EXPORT $VERSION];
         
-        $VERSION = '0.02';
+        $VERSION = '0.06';
         @EXPORT  = qw[mark_as_loaded mark_as_unloaded is_loaded];
 }
 

diff --git a/ext/Module-Loaded/t/01_Module-Loaded.t b/ext/Module-Loaded/t/01_Module-Loaded.t
index 9f478af..672bcf2 100644 (file)
--- a/ext/Module-Loaded/t/01_Module-Loaded.t
+++ b/ext/Module-Loaded/t/01_Module-Loaded.t
@@ -1,11 +1,11 @@
 use strict;
+use less;
 use Test::More  'no_plan';
 
 my $Class   = 'Module::Loaded';
 my @Funcs   = qw[mark_as_loaded mark_as_unloaded is_loaded];
 my $Mod     = 'Foo::Bar'.$$;
-my $Strict  = 'less';
-use less;
+my $Strict  = $ENV{'PERL_CORE'} ? 'less' : 'strict';
 
 ### load the thing
 {   use_ok( $Class );