X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FUtil.pm;h=32f8f7b547dbebedd49ee8031c83f17eb104d77c;hb=refs%2Ftags%2F0.39;hp=4356daaafed49ff30ee10dc2571f2f78772870c2;hpb=fc8628e3caca3f21818dc6b9e1541c92767ffb57;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm index 4356daa..32f8f7b 100644 --- a/lib/Mouse/Util.pm +++ b/lib/Mouse/Util.pm @@ -30,6 +30,8 @@ Mouse::Exporter->setup_import_methods( )], groups => { default => [], # export no functions by default + + # The ':meta' group is 'use metaclass' for Mouse meta => [qw(does meta dump _MOUSE_VERBOSE)], }, _export_to_main => 1, @@ -281,6 +283,7 @@ sub apply_all_roles { } my $role_name = $roles[-1][0]; load_class($role_name); + my $metarole = get_metaclass_by_name($role_name); ( $metarole && $metarole->isa('Mouse::Meta::Role') ) || $applicant->meta->throw_error("You can only consume roles, $role_name(".$role_name->meta.") is not a Mouse role"); @@ -349,6 +352,10 @@ __END__ Mouse::Util - Features, with or without their dependencies +=head1 VERSION + +This document describes Mouse version 0.39 + =head1 IMPLEMENTATIONS FOR =head2 Moose::Util