diff options
-rw-r--r-- | lib/IRC/Client.pm6 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index bcc1c6e..7cbe1ef 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -78,16 +78,16 @@ method handle-event ($e) { } my $nick = $!nick; - if ( ( $e<command> eq 'PRIVMSG' and $e<params>[0] eq $!nick ) - or ( $e<command> eq 'NOTICE' and $e<params>[0] eq $!nick ) + if ( ( $e<command> eq 'PRIVMSG' and $e<params>[0] eq $nick ) + or ( $e<command> eq 'NOTICE' and $e<params>[0] eq $nick ) or ( $e<command> eq 'PRIVMSG' and $e<params>[1] ~~ /:i ^ $nick <[,:]> \s+/ ) ) { 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 ); + 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); |