Add `unhandled` event

1 files changed, 8 insertions, 3 deletions

diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6
index fe6d962..7b1c7e5 100644
--- a/lib/IRC/Client.pm6
+++ b/lib/IRC/Client.pm6
@@ -52,14 +52,19 @@ class IRC::Client:ver<1.002001> {
                             }
                         }
 
+                        for @!plugs.grep(*.^can: 'all-events') -> $p {
+                            my $res = $p.all-events(self, $e);
+                            next EVENTS unless $res === IRC_NOT_HANDLED;
+                        }
+
                         my $cmd = 'irc-' ~ $e<command>.lc;
                         for @!plugs.grep(*.^can: $cmd) -> $p {
                             my $res = $p."$cmd"(self, $e);
                             next EVENTS unless $res === IRC_NOT_HANDLED;
                         }
 
-                        for @!plugs.grep(*.^can: 'all-events') -> $p {
-                            my $res = $p.all-events(self, $e);
+                        for @!plugs.grep(*.^can: 'unhandled') -> $p {
+                            my $res = $p.unhandled(self, $e);
                             next EVENTS unless $res === IRC_NOT_HANDLED;
                         }
                     }
@@ -93,4 +98,4 @@ sub plug-name {
     $plug ~~ s:g/^ $cur '/' | '.pm6'$//;
     $plug ~~ s/'/'/::/;
     return "[$plug] ";
-}
\ No newline at end of file
+}