diff options
| author | Zoffix Znet <cpan@zoffix.com> | 2016-07-26 13:37:39 -0400 |
|---|---|---|
| committer | Zoffix Znet <cpan@zoffix.com> | 2016-07-26 13:37:39 -0400 |
| commit | d7f6e600ea74dd810ec5995f54e48ab6551fdf0f (patch) | |
| tree | 9780245bbd0a1e21b9a5c5a119cc185974fe5a37 /lib | |
| parent | 74e4c7e39f8f73b0e7bef457585e6352505a355f (diff) | |
Call .reply only when the Message Object has it
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/IRC/Client.pm6 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index bd10196..91690e7 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -188,9 +188,9 @@ method !handle-event ($e) { my $res = ."$event"($e); next if $res ~~ IRC_FLAG_NEXT; if $res ~~ Promise { - $res.then: { $e.reply: $^r unless $^r ~~ Nil or $e.replied; } + $res.then: { $e.?reply: $^r unless $^r ~~ Nil or $e.?replied; } } else { - $e.reply: $res unless $res ~~ Nil or $e.replied; + $e.?reply: $res unless $res ~~ Nil or $e.?replied; } last EVENT; |