next if ($pkg || '') ne $role_name &&
($name || '') ne '__ANON__';
}
-
+
$map->{$symbol} = $method_metaclass->wrap($code);
}
sub get_method {
my ($self, $name) = @_;
- $self->get_method_map->{$name}
+ $self->get_method_map->{$name};
}
sub has_method {