use strict;
use warnings;
-our $VERSION = '1.08';
+our $VERSION = '1.11';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
);
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