NAME

Devel::Events::Generator::ClassPublisher - Relay events from Class::Publisher

SYNOPSIS

use Devel::Events::Generator::ClassPublisher;

my $gen = Devel::Events::Generator::ClassPublisher->new(
	handler => $handler,
);

$gen->subscribe( $publisher, $event );

DESCRIPTION

This event generator can glue events from Class::Publisher into the Devel::Events framework.

This is useful if you wish to place certain events like Devel::Events::Objects's ones in a certain context by later analyzing the in memory log.

METHODS

subscribe $publisher, [ $event ]

unsubscribe $publisher, [ $event ]

These convenience methods are provided if you prefer calling

$gen->subscribe($publisher, $event);

over

$publisher->add_subscriber($event, $gen);

If $event is omitted then all events are assumed.

update $publisher, $event, @args

Called by "notify_subscribers" in Class::Publisher. Will raise an event with the value:

$event, publisher => $publisher, @args

A custom filter right after this generator to munge @args into a key value pair list is reccomended if your events are not structured that way to begin with.

SEE ALSO

Devel::Events, Class::Publisher

AUTHOR

Yuval Kogman <nothingmuch@woobling.org>

COPYRIGHT & LICENSE

Copyright (c) 2007 Yuval Kogman. All rights reserved
This program is free software; you can redistribute it and/or modify it
under the terms of the MIT license or the same terms as Perl itself.