1 package MooseX::Declare::Syntax::MethodDeclaration::Parameterized;
4 use MooseX::Role::Parameterized ();
5 use namespace::autoclean;
7 around register_method_declaration => sub {
8 my ($next, $self, $parameterizable_meta, $name, $method) = @_;
9 my $meta = $self->metaclass_for_method_application($parameterizable_meta, $name, $method);
10 $self->$next($meta, $name, $method);
13 sub metaclass_for_method_application {
14 return MooseX::Role::Parameterized->current_metaclass;