GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-10-01 17:16:39 +02:00
Code Issues Projects Releases Wiki Activity

Timer: eventqueue remove will now list removed events

Browse Source
This commit is contained in:
Pragmatic Software 2020-04-24 17:28:27 -07:00
parent 8d9e3da249
commit e31fe57017
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
PBot/Timer.pm
View File

@ -212,10 +212,11 @@ sub dequeue_event {
$id =~ s/\\\.\\\*/.*/g;
my $regex = qr/^$id$/i;
my $count = @{$self->{event_queue}};
my @removed = grep { $_->{id} =~ /$regex/i; } @{$self->{event_queue}};
@{$self->{event_queue}} = grep { $_->{id} !~ /$regex/i; } @{$self->{event_queue}};
my $removed = $count - @{$self->{event_queue}};
return "No matching events." if not $removed;
return "Removed $removed event" . ($removed == 1 ? '' : 's') . '.';
$count -= @{$self->{event_queue}};
return "No matching events." if not $count;
return "Removed $count event" . ($count == 1 ? '' : 's') . ': ' . join(', ', map { $_->{id} } @removed);
};
if ($@) {