From d7f6e600ea74dd810ec5995f54e48ab6551fdf0f Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Tue, 26 Jul 2016 13:37:39 -0400
Subject: Call .reply only when the Message Object has it

---
 lib/IRC/Client.pm6 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib')

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;
 
-- 
cgit v1.1