X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F000-load.t;h=e22f9abf10b74abaa1dbaca597f9ed2129c50640;hb=43e6a50b260b096a34b0c46da87296bd220c4184;hp=66fe9bd77b91beee9c967e36595e5e08c9728296;hpb=46fce5c9be3cf473b747bec5439cd8cefdb14bd2;p=gitmo%2FMouse.git diff --git a/t/000-load.t b/t/000-load.t index 66fe9bd..e22f9ab 100644 --- a/t/000-load.t +++ b/t/000-load.t @@ -1,30 +1,21 @@ #!perl -T +package Foo; use strict; use warnings; use Test::More tests => 1; use_ok 'Mouse'; +no warnings 'uninitialized'; + 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'; +eval{ require MRO::Compat }; +diag " MRO::Compat: $MRO::Compat::VERSION"; eval { require Moose }; diag " Class::MOP: $Class::MOP::VERSION"; diag " Moose: $Moose::VERSION"; -eval { require Class::Method::Modifiers }; -diag " Class::Method::Modifiers: $Class::Method::Modifiers::VERSION"; - +eval { require Class::Method::Modifiers::Fast }; +diag " Class::Method::Modifiers::Fast: $Class::Method::Modifiers::Fast::VERSION";