root/lang/perl/Gopper/trunk/lib/Gopper/Attribute/Handler.pm @ 659

Revision 659, 220 bytes (checked in by yappo, 6 years ago)

lang/perl/Gopper: add Handler attribute

Line 
1package Gopper::Attribute::Handler;
2use strict;
3use warnings;
4use base 'Class::Component::Attribute';
5
6sub register {
7    my($class, $plugin, $c, $method, $value, $code) = @_;
8    $plugin->handler_method($method);
9}
10
111;
Note: See TracBrowser for help on using the browser.