From ecd1e4dc86fc83026eabc7badd8bf2b361c32f69 Mon Sep 17 00:00:00 2001 From: Pragmatic Software Date: Sat, 15 Feb 2020 07:26:29 -0800 Subject: [PATCH] Registerable: add unregister_all() subroutine --- PBot/Registerable.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/PBot/Registerable.pm b/PBot/Registerable.pm index 7416183a..7e01bc9d 100644 --- a/PBot/Registerable.pm +++ b/PBot/Registerable.pm @@ -62,4 +62,9 @@ sub unregister { @{ $self->{handlers} } = grep { $_ != $ref } @{ $self->{handlers} }; } +sub unregister_all { + my ($self) = @_; + $self->{handlers} = []; +} + 1;