X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F000-load.t;h=e22f9abf10b74abaa1dbaca597f9ed2129c50640;hb=92583b3320b6ed8b4673fc94e68af64b3cf106e3;hp=a78968a09a9d795cd3cee2d8f149e286c98181e1;hpb=00136d64cc7c83ea95e623e045d0aa2963e7eb2a;p=gitmo%2FMouse.git diff --git a/t/000-load.t b/t/000-load.t index a78968a..e22f9ab 100644 --- a/t/000-load.t +++ b/t/000-load.t @@ -1,21 +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"; -} +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::Fast }; +diag " Class::Method::Modifiers::Fast: $Class::Method::Modifiers::Fast::VERSION";