diff options
author | Zoffix Znet <cpan@zoffix.com> | 2016-07-19 13:16:16 -0400 |
---|---|---|
committer | Zoffix Znet <cpan@zoffix.com> | 2016-07-19 13:16:16 -0400 |
commit | c341e8432ef33b5a598e6b9d3a75855f02104b6c (patch) | |
tree | b07602cf2ebb555ec0377a63b0dd84c0197c7205 | |
parent | 505933841a1384c234be7b05739c4713b0ee4022 (diff) |
Blahg
-rw-r--r-- | examples/bot.pl6 | 6 | ||||
-rw-r--r-- | 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<irc.freenode.net> :port<6667> - :servers( - mine => { :port<5667> }, + # :servers( + # mine => { :port<5667> }, # inspircd => { }, # freenode => { :host<irc.freenode.net> }, - ) + # ) :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'; } } |