diff options
| author | Zoffix Znet <cpan@zoffix.com> | 2016-08-07 18:39:37 -0400 |
|---|---|---|
| committer | Zoffix Znet <cpan@zoffix.com> | 2016-08-07 18:39:37 -0400 |
| commit | dd4390ce747b2aa4e5e1b3c7bea3640b4abea271 (patch) | |
| tree | 3d503edab07a5b765c4f8d956b320ab875aa8d3d /lib | |
| parent | 0e7c7f8d9da5806ece7b14734a402721127ffbc8 (diff) | |
Make addressed regex more restrictive
Fixes #21
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/IRC/Client.pm6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 486bfcd..7dbadf9 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -235,7 +235,7 @@ method !handle-event ($e) { given $event-name { when 'irc-privmsg-channel' | 'irc-notice-channel' { my $nick = $s.current-nick; - if $e.text.subst-mutate: /^ $nick <[,:\s]> \s* /, '' { + if $e.text.subst-mutate: /^ $nick <[,:]> \s* /, '' { take 'irc-addressed', ('irc-to-me' if $s.is-connected); } elsif $e.text ~~ / << $nick >> / and $s.is-connected { |