use Scalar::Util 'blessed';
-our $VERSION = '1.07';
+our $VERSION = '1.25';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
roles => [ @composition_roles ],
cache => 1,
);
- $meta->add_method(meta => sub { $meta });
$class = $meta->name;
}
return keys %{ $self->_method_map };
}
+sub _get_local_methods {
+ my $self = shift;
+ return values %{ $self->_method_map };
+}
+
sub has_method {
my ($self, $method_name) = @_;