From 0daa494480f7abe37a6e593c6238811009b7b914 Mon Sep 17 00:00:00 2001 From: Zoffix Znet Date: Fri, 3 Jun 2016 07:01:14 -0400 Subject: Start rewrite --- examples/bot.pl6 | 16 ++-------------- 1 file changed, 2 insertions(+), 14 deletions(-) (limited to 'examples') diff --git a/examples/bot.pl6 b/examples/bot.pl6 index 524a74f..3737de1 100644 --- a/examples/bot.pl6 +++ b/examples/bot.pl6 @@ -1,20 +1,8 @@ use v6; use lib 'lib'; use IRC::Client; -use IRC::Client::Plugin::Debugger; - -class IRC::Client::Plugin::AddressedPlugin is IRC::Client::Plugin { - method irc-addressed ($irc, $e, $where) { - $irc.privmsg: $where[0], "$where[1], you addressed me"; - } -} my $irc = IRC::Client.new( - :host - :channels<#perl6bot #zofbot> :debug - :plugins( - IRC::Client::Plugin::Debugger.new, - IRC::Client::Plugin::AddressedPlugin.new - ) -).run; \ No newline at end of file + :port<5667> +).run; -- cgit v1.1