diff options
author | Zoffix Znet <cpan@zoffix.com> | 2016-06-05 11:17:15 -0400 |
---|---|---|
committer | Zoffix Znet <cpan@zoffix.com> | 2016-06-05 11:17:15 -0400 |
commit | 16056e8af837a4d982d23728adf24b4cc406576c (patch) | |
tree | c124b0d77711ef4d903a67d05969a35c84a766e4 /lib/IRC/Client/Message.pm6 | |
parent | a1ea399a2e4c36949959fa22ecfac5fe583f1775 (diff) |
Bug commit
Diffstat (limited to 'lib/IRC/Client/Message.pm6')
-rw-r--r-- | lib/IRC/Client/Message.pm6 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/IRC/Client/Message.pm6 b/lib/IRC/Client/Message.pm6 index e7478de..9a51803 100644 --- a/lib/IRC/Client/Message.pm6 +++ b/lib/IRC/Client/Message.pm6 @@ -8,9 +8,9 @@ role IRC::Client::Message { has Str:D $.usermask is required; has Str:D $.command is required; has Str:D $.server is required; - has @.args is required; + has $.args is required; - method Str { ":$!usermask $!command @!args[]" } + method Str { ":$!usermask $!command $!args[]" } } constant M = IRC::Client::Message; @@ -26,11 +26,11 @@ role Numeric does M { } role Part does M { has $.channel; } role Quit does M { } role Unknown does M { - method Str { "❚⚠❚ :$.usermask $.command @.args[]" } + method Str { "❚⚠❚ :$.usermask $.command $.args[]" } } role Ping does M { - method reply { $.irc.send-cmd: 'PONG', @.args; } + method reply { $.irc.send-cmd: 'PONG', $.args, :$.server; } } role Privmsg does M { has $.text; } |