X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FClass.pm;h=93b6f6c77e663ca18e38a46af9cec42c2fbb995e;hp=5ee9049c463e782e3c93c3c124c46ff7c80783e6;hb=478cab2c569b5da1c9ba0883de7a516d931b8a72;hpb=d8b10b3268f3ff4fadb7f7fc2b578a335bcda416 diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index 5ee9049..93b6f6c 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -76,7 +76,7 @@ sub get_method_list { no strict 'refs'; # Get all the CODE symbol table entries my @functions = - grep !/^(?:has|with|around|before|after|blessed|extends|confess)$/, + grep !/^(?:has|with|around|before|after|blessed|extends|confess|override|super)$/, grep { defined &{"${name}::$_"} } keys %{"${name}::"}; push @functions, keys %{$self->{'methods'}->{$name}};