From c341e8432ef33b5a598e6b9d3a75855f02104b6c Mon Sep 17 00:00:00 2001 From: Zoffix Znet Date: Tue, 19 Jul 2016 13:16:16 -0400 Subject: Blahg --- examples/bot.pl6 | 6 +++--- lib/IRC/Client.pm6 | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/examples/bot.pl6 b/examples/bot.pl6 index 7d76630..47b7149 100644 --- a/examples/bot.pl6 +++ b/examples/bot.pl6 @@ -15,11 +15,11 @@ my $irc = IRC::Client.new( :channels<#perl6 #perl7> # :host :port<6667> - :servers( - mine => { :port<5667> }, + # :servers( + # mine => { :port<5667> }, # inspircd => { }, # freenode => { :host }, - ) + # ) :plugins(MyPlug.new) ).run; diff --git a/lib/IRC/Client.pm6 b/lib/IRC/Client.pm6 index 6803203..dc86287 100644 --- a/lib/IRC/Client.pm6 +++ b/lib/IRC/Client.pm6 @@ -93,7 +93,7 @@ method !handle-event ($e) { .lc.subst: '::', '-', :g; $!debug >= 2 and debug-print "emitting `$method`", :sys; for self!plugs-that-can: $method { - last if ."$method"($e).^name eq 'IRC_FLAG_HANDLED'; + last if ."$method"($e).?^name.&[eq]: 'IRC_FLAG_HANDLED'; } } -- cgit v1.1