カラクリスタ

『輝かしい青春』なんて失かったヒトのブログ

Catalyst::Plugin::Hookableの試案

ざっとこれだけ。多分これだけでいけるんじゃないかなぁ。

package Catalyst::Plugin::Hookable;

use strict;
use warnings;

our $VERSION = '0.01';

use base qw(
    Class::Hookable
    Class::Data::Inheritable
);

__PACKAGE__->mk_classdata(
    hookable_stash => {},
);

undef *new;
1;