Report $Mouse::VERSION and the backend (Pure Perl or XS) in load.t
gfx [Sun, 25 Oct 2009 05:37:08 +0000 (14:37 +0900)]
t/000-load.t

index 3c02f2d..720ceeb 100644 (file)
@@ -9,6 +9,8 @@ require_ok 'Mouse::Role';
 
 no warnings 'uninitialized';
 
+diag "Testing Mouse/$Mouse::VERSION (", exists $INC{'Mouse/PurePerl.pm'} ? 'Pure Perl' : 'XS', ")";
+
 diag "Soft dependency versions:";
 
 eval{ require MRO::Compat };