NAME

Devel::Events::Generator - An optional base role for event generators.

VERSION

version 0.10

SYNOPSIS

        package MyGen;
        use Moose;
        with qw/Devel::Events::Generator/;
        sub whatever {
                my ( $self, @args ) = @_;
                # ...
                $self->send_event( @event );
        }

DESCRIPTION

This convenience role provides a basic "send_event" method, useful for implementing generators.

ATTRIBUTES

handler

Accepts any object.

Required.

METHODS

send_event @event

Delegates to "handler", calling the method "new_event" on it.

The field "generator" with the value of the generator object will be prepended.

SUPPORT

Bugs may be submitted through the RT bug tracker <https://rt.cpan.org/Public/Dist/Display.html?Name=Devel-Events> (or bug-Devel-Events@rt.cpan.org <mailto:bug-Devel-Events@rt.cpan.org>).

AUTHOR

יובל קוג'מן (Yuval Kogman) <nothingmuch@woobling.org>

COPYRIGHT AND LICENCE

This software is copyright (c) 2007 by יובל קוג'מן (Yuval Kogman).

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.