# Because Mouse::Util is loaded first in all the Mouse sub-modules,
# XS loader is placed here, not in Mouse.pm.
- our $VERSION = '0.40_07';
+ our $VERSION = '0.40_08';
my $xs = !(exists $INC{'Mouse/PurePerl.pm'} || $ENV{MOUSE_PUREPERL});
generate_isa_predicate_for('Mouse::Meta::Role' => 'is_a_metarole');
}
+our $in_global_destruction = 0;
+END{ $in_global_destruction = 1 }
# Moose::Util compatible utilities
load_class($role_name);
is_a_metarole( get_metaclass_by_name($role_name) )
- || $applicant->meta->throw_error("You can only consume roles, $role_name(".$role_name->meta.") is not a Mouse role");
+ || $applicant->meta->throw_error("You can only consume roles, $role_name is not a Mouse role");
}
if ( scalar @roles == 1 ) {
=head1 VERSION
-This document describes Mouse version 0.40_07
+This document describes Mouse version 0.40_08
=head1 IMPLEMENTATIONS FOR