MRO::Compat is the only module loaded by Mouse::Util now so we have to check it directly
Shawn M Moore [Tue, 16 Dec 2008 07:06:33 +0000 (07:06 +0000)]
t/000-load.t

index 66fe9bd..a4df79e 100644 (file)
@@ -5,22 +5,11 @@ use Test::More tests => 1;
 
 use_ok 'Mouse';
 
-diag "Soft dependency versions:";
-for my $module_name (keys %Mouse::Util::loaded) {
-    my $version;
-    if ($Mouse::Util::loaded{$module_name}) {
-        no strict 'refs';
-        $version = ${$module_name . '::VERSION'};
-    }
-    else {
-        $version = "(provided by Mouse::Util)";
-    }
-
-    diag "    $module_name: $version";
-}
-
 no warnings 'uninitialized';
 
+diag "Soft dependency versions:";
+diag "    MRO::Compat: $MRO::Compat::VERSION";
+
 eval { require Moose };
 diag "    Class::MOP: $Class::MOP::VERSION";
 diag "    Moose: $Moose::VERSION";