diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/IRC/Client.pm6 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 7cbe1ef..6eb610f 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -84,13 +84,13 @@ method handle-event ($e) { and $e<params>[1] ~~ /:i ^ $nick <[,:]> \s+/ ) ) { - my $where = ($e<who><nick>, $e<who><nick>); - $where[0] = $e<params>[0] + my @where = ($e<who><nick>, $e<who><nick>); + @where[0] = $e<params>[0] unless ( $e<command> eq 'PRIVMSG' and $e<params>[0] eq $nick ) or ( $e<command> eq 'NOTICE' and $e<params>[0] eq $nick ); for @!plugs.grep(*.^can: 'irc-to-me') -> $p { - my $res = $p.irc-to-me(self, $e, |$where); + my $res = $p.irc-to-me(self, $e, |@where); return unless $res === IRC_NOT_HANDLED; } } |