diff options
| -rw-r--r-- | lib/IRC/Client/Message.pm6 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/IRC/Client/Message.pm6 b/lib/IRC/Client/Message.pm6 index bb1a40b..79ef7d8 100644 --- a/lib/IRC/Client/Message.pm6 +++ b/lib/IRC/Client/Message.pm6 @@ -34,7 +34,8 @@ role Ping does M { role Privmsg does M { has $.text is rw; has Bool $.replied is rw = False; - method Str { $.text } + method Str { $.text } + method match ($v) { $.text ~~ $v } } role Privmsg::Channel does Privmsg { has $.channel; @@ -54,6 +55,7 @@ role Notice does M { has $.text is rw; has Bool $.replied is rw = False; method Str { $.text } + method match ($v) { $.text ~~ $v } } role Notice::Channel does Notice { has $.channel; |