package MooseX::Declare::Syntax::MethodDeclaration::Parameterized; BEGIN { $MooseX::Declare::Syntax::MethodDeclaration::Parameterized::AUTHORITY = 'cpan:FLORA'; } { $MooseX::Declare::Syntax::MethodDeclaration::Parameterized::VERSION = '0.35'; } use Moose::Role; use MooseX::Role::Parameterized 0.12 (); use namespace::autoclean; around register_method_declaration => sub { my ($next, $self, $parameterizable_meta, $name, $method) = @_; my $meta = $self->metaclass_for_method_application($parameterizable_meta, $name, $method); $self->$next($meta, $name, $method); }; sub metaclass_for_method_application { return MooseX::Role::Parameterized->current_metaclass; } 1; __END__ =pod =encoding utf-8 =head1 NAME MooseX::Declare::Syntax::MethodDeclaration::Parameterized =head1 AUTHORS =over 4 =item * Florian Ragwitz =item * Ash Berlin =item * Chas. J. Owens IV =item * Chris Prather =item * Dave Rolsky =item * Devin Austin =item * Hans Dieter Pearcey =item * Justin Hunter =item * Matt Kraai =item * Michele Beltrame =item * Nelo Onyiah =item * nperez =item * Piers Cawley =item * Rafael Kitover =item * Robert 'phaylon' Sedlacek =item * Stevan Little =item * Tomas Doran =item * Yanick Champoux =back =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2011 by Florian Ragwitz. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut