X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FClass.pm;h=27a48db3433a9a7d15e6845f751f9fb16f674c26;hb=9293fc9987237cca0e0072c9f9d670ea0ba3e47b;hp=be957020151edfcc50bd9fb6c4d8e5686d698933;hpb=7778ab1ec4652cd0c12f7004ad300cf714a334f0;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index be95702..27a48db 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -78,9 +78,7 @@ sub verify_superclass { # The metaclass of $super is not initialized. # i.e. it might be Mouse::Object, a mixin package (e.g. Exporter), # or a foreign class including Moose classes. - - # checks if $super is a foreign class (i.e. non-Mouse class) - # see also Mouse::Foreign::Meta::Role::Class + # See also Mouse::Foreign::Meta::Role::Class. my $mm = $super->can('meta'); if(!($mm && $mm == \&Mouse::Util::meta)) { if($super->can('new') or $super->can('DESTROY')) {