GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

EventDispatcher: rename `event_id` to `handler_id`

This commit is contained in:
Pragmatic Software 2021-07-04 23:26:54 -07:00
parent 2546b13ba6
commit 7fb48f9b5d
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
PBot/EventDispatcher.pm
View File

@ -28,14 +28,14 @@ sub register_handler {
my ($package) = caller(0); my ($package) = caller(0);
# internal identifier to find calling package's event handler # internal identifier to find calling package's event handler
my $event_id = "$package-$event_name"; my $handler_id = "$package-$event_name";
# add the event handler # add the event handler
$self->{handlers}->{$event_name}->{$event_id} = $subref; $self->{handlers}->{$event_name}->{$handler_id} = $subref;
# debugging # debugging
if ($self->{pbot}->{registry}->get_value('eventdispatcher', 'debug')) { if ($self->{pbot}->{registry}->get_value('eventdispatcher', 'debug')) {
$self->{pbot}->{logger}->log("EventDispatcher: Add handler: $event_id\n"); $self->{pbot}->{logger}->log("EventDispatcher: Add handler: $handler_id\n");
} }
} }
@ -47,13 +47,13 @@ sub remove_handler {
my ($package) = caller(0); my ($package) = caller(0);
# internal identifier to find calling package's event handler # internal identifier to find calling package's event handler
my $event_id = "$package-$event_name"; my $handler_id = "$package-$event_name";
# remove the event handler # remove the event handler
if (exists $self->{handlers}->{$event_name}) { if (exists $self->{handlers}->{$event_name}) {
delete $self->{handlers}->{$event_name}->{$event_id}; delete $self->{handlers}->{$event_name}->{$handler_id};
# remove root event-name key if it has are no more handlers # remove root event-name key if it has no more handlers
if (not keys %{$self->{handlers}->{$event_name}}) { if (not keys %{$self->{handlers}->{$event_name}}) {
delete $self->{handlers}->{$event_name}; delete $self->{handlers}->{$event_name};
} }
@ -61,7 +61,7 @@ sub remove_handler {
# debugging # debugging
if ($self->{pbot}->{registry}->get_value('eventdispatcher', 'debug')) { if ($self->{pbot}->{registry}->get_value('eventdispatcher', 'debug')) {
$self->{pbot}->{logger}->log("EventDispatcher: Remove handler: $event_id\n"); $self->{pbot}->{logger}->log("EventDispatcher: Remove handler: $handler_id\n");
} }
} }
@ -78,13 +78,13 @@ sub dispatch_event {
# if the event-name has handlers # if the event-name has handlers
if (exists $self->{handlers}->{$event_name}) { if (exists $self->{handlers}->{$event_name}) {
# then dispatch the event to each one # then dispatch the event to each one
foreach my $event_id (keys %{$self->{handlers}->{$event_name}}) { foreach my $handler_id (keys %{$self->{handlers}->{$event_name}}) {
# event handler subref # event handler subref
my $subref = $self->{handlers}->{$event_name}->{$event_id}; my $subref = $self->{handlers}->{$event_name}->{$handler_id};
# debugging # debugging
if ($debug) { if ($debug) {
$self->{pbot}->{logger}->log("Dispatching $event_name to handler $event_id\n"); $self->{pbot}->{logger}->log("Dispatching $event_name to handler $handler_id\n");
} }
# invoke event handler # invoke event handler