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

	package MyGen;
	use Moose;

	with qw/Devel::Events::Generator/;

	sub whatever {
		my ( $self, @args ) = @_;

		# ...

		$self->send_event( @event );
	}

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

handler

Accepts any object.

Required.

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.