diff options
Diffstat (limited to 'lib/IRC/Client/Message.pm6')
-rw-r--r-- | lib/IRC/Client/Message.pm6 | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/IRC/Client/Message.pm6 b/lib/IRC/Client/Message.pm6 index a62972d..6e92e82 100644 --- a/lib/IRC/Client/Message.pm6 +++ b/lib/IRC/Client/Message.pm6 @@ -28,7 +28,7 @@ role Unknown does M { } role Ping does M { - method reply { $.irc!IRC::Client::send-cmd: 'PONG', $.args, :$.server; } + method reply { $.irc.send-cmd: 'PONG', $.args, :$.server; } } role Privmsg does M { @@ -39,13 +39,13 @@ role Privmsg does M { role Privmsg::Channel does Privmsg { has $.channel; method reply ($text, :$where) { - $.irc!IRC::Client::send-cmd: 'PRIVMSG', $where // $.channel, $text, + $.irc.send-cmd: 'PRIVMSG', $where // $.channel, $text, :$.server, :prefix("$.nick, "); } } role Privmsg::Me does Privmsg { method reply ($text, :$where) { - $.irc!IRC::Client::send-cmd: 'PRIVMSG', $where // $.nick, $text, + $.irc.send-cmd: 'PRIVMSG', $where // $.nick, $text, :$.server; } } @@ -58,14 +58,14 @@ role Notice does M { role Notice::Channel does Notice { has $.channel; method reply ($text, :$where) { - $.irc!IRC::Client::send-cmd: 'NOTICE', $where // $.channel, $text, + $.irc.send-cmd: 'NOTICE', $where // $.channel, $text, :$.server, :prefix("$.nick, "); $.replied = True; } } role Notice::Me does Notice { method reply ($text, :$where) { - $.irc!IRC::Client::send-cmd: 'NOTICE', $where // $.nick, $text, + $.irc.send-cmd: 'NOTICE', $where // $.nick, $text, :$.server; $.replied = True; } |