lib/Reaction/Role/Meta/Role.pm


1
2
3
4
5
6
7
8
9
10
11
12

package Reaction::Role::Meta::Role;

use Moose::Role;

around initialize => sub {
    my $super = shift;
    my $class = shift;
    my $pkg   = shift;
    $super->($class, $pkg, 'applied_attribute_metaclass' => 'Reaction::Meta::Attribute', @_ );
};

1;