1package Class::Component::Attribute::Hook;
2
3use strict;
4use warnings;
5use base 'Class::Component::Attribute';
6
7sub register {
8    my($class, $plugin, $c, $method, $value) = @_;
9
10    $value ||= $method;
11    $c->register_hook( $value => { plugin => $plugin, method => $method } );
12}
13
141;
15