Uppercase only type, not args, in ActionTrigger departure handler

This commit is contained in:
Pragmatic Software 2017-08-15 20:12:07 -07:00
parent dc69010cad
commit 05c47bc675
1 changed files with 1 additions and 1 deletions

View File

@ -300,7 +300,7 @@ sub on_departure {
my ($self, $event_type, $event) = @_;
my ($nick, $user, $host, $channel, $args) = ($event->{event}->nick, $event->{event}->user, $event->{event}->host, $event->{event}->to, $event->{event}->args);
$channel = lc $channel;
$self->check_trigger($nick, $user, $host, $channel, uc $event->{event}->type . " $args");
$self->check_trigger($nick, $user, $host, $channel, (uc $event->{event}->type) . " $args");
return 0;
}