package MooseCompat;
# Moose compatible methods/functions
+
+use Test::Builder (); # should load Test::Builder first
+
use Mouse ();
use Mouse::Util::MetaRole;
use Mouse::Meta::Method;
$INC{'Mouse/Meta/Instance.pm'} = __FILE__;
$INC{'Mouse/Deprecated.pm'} = __FILE__;
-
*UNIVERSAL::DOES = sub {
my($thing, $role) = @_;
$thing->isa($role);