X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FDeprecated.pm;h=57200aac072257cffc2d85efe090f0843dbd11c9;hb=d004c8d565f9b314da7652e9368aeb4587ffaa3d;hp=a79244e17b690f4a58b6c507405a5cf253d1836a;hpb=67f694add1dd6c3c8d78a7aa991e65ff71dd1395;p=gitmo%2FClass-MOP.git

diff --git a/lib/Class/MOP/Deprecated.pm b/lib/Class/MOP/Deprecated.pm
index a79244e..57200aa 100644
--- a/lib/Class/MOP/Deprecated.pm
+++ b/lib/Class/MOP/Deprecated.pm
@@ -3,7 +3,7 @@ package Class::MOP::Deprecated;
 use strict;
 use warnings;
 
-our $VERSION = '1.04';
+our $VERSION = '1.12';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
@@ -86,12 +86,7 @@ sub get_method_map {
     );
     my $self = shift;
 
-    my $map = $self->_full_method_map;
-
-    $map->{$_} = $self->get_method($_)
-        for grep { !blessed( $map->{$_} ) } keys %{$map};
-
-    return $map;
+    return { map { $_->name => $_ } $self->_get_local_methods };
 }
 
 package