view release on metacpan or  search on metacpan

lib/Devel/Events/Generator/ClassPublisher.pm  view on Meta::CPAN

	$publisher->add_subscriber( $event, $self );
}

sub unsubscribe {
	my ( $self, $publisher, $event ) = @_;

	$publisher->delete_subscriber($event, $self);
}

sub update {
	my ( $self, $publisher, $type, @data ) = @_;
	$self->send_event( $type, publisher => $publisher, @data );
}

__PACKAGE__;

__END__

=pod