X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FModule.pm;h=4384fa0e32fe728f3aa5ab84272e485c2af01f61;hb=da4432f337513a1c3c791a4e6753a4b743cf3f62;hp=4c67e488a4195a480dee91452b2d423618103a0a;hpb=81bc06755835d2ec08a9f1058b97d7273a6e4d43;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Module.pm b/lib/Mouse/Meta/Module.pm index 4c67e48..4384fa0 100755 --- a/lib/Mouse/Meta/Module.pm +++ b/lib/Mouse/Meta/Module.pm @@ -1,8 +1,6 @@ package Mouse::Meta::Module; use Mouse::Util qw/:meta get_code_package get_code_ref load_class not_supported/; # enables strict and warnings -use Mouse::Util::TypeConstraints (); - use Carp (); use Scalar::Util (); @@ -143,7 +141,7 @@ sub get_method_list { my $superclasses; if(exists $options{superclasses}){ - if(Mouse::Util::TypeConstraints::_is_a_metarole($self)){ + if(Mouse::Util::is_a_metarole($self)){ delete $options{superclasses}; } else{ @@ -290,7 +288,7 @@ Mouse::Meta::Module - The base class for Mouse::Meta::Class and Mouse::Meta::Rol =head1 VERSION -This document describes Mouse version 0.40_01 +This document describes Mouse version 0.40_05 =head1 SEE ALSO