lib/Reaction/Meta/Class.pm


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

package Reaction::Meta::Class;

use Moose;
use Reaction::Meta::Attribute;

extends 'Moose::Meta::Class';

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

1;