X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Bot.pm;h=823daaca3f3096e54c3a405ba66d86fbf03ace6f;hb=2138721402023284bb9976e4b2e636814dbbce96;hp=1200424a94cfba04219b6415cc1dfd685ce222e2;hpb=84affcdf70684e8f29e83dc2c3ab75520da383d7;p=NDIRC.git diff --git a/Bot.pm b/Bot.pm index 1200424..823daac 100644 --- a/Bot.pm +++ b/Bot.pm @@ -82,8 +82,8 @@ sub _start { )); $heap->{connector} = POE::Component::IRC::Plugin::Connector->new( - servers => ['irc.netgamers.org', 'underworld.no.eu.netgamers.org' - ,'firefly.no.eu.netgamers.org', 'underworld.ca.us.netgamers.org' ] + servers => [['irc.netgamers.org'], ['underworld.no.eu.netgamers.org'] + ,['firefly.no.eu.netgamers.org'], ['underworld.ca.us.netgamers.org'] ] ); $irc->plugin_add( 'Connector' => $heap->{connector} ); @@ -196,7 +196,7 @@ sub irc_001 { } sub irc_invite { - my ($self,$sender, $who, $channel) = @_[OBJECT,SENDER, HEAP, ARG0 .. ARG1]; + my ($self,$sender, $who, $channel) = @_[OBJECT,SENDER, ARG0 .. ARG1]; my $irc = $sender->get_heap(); $irc->yield( join => $_ ) for grep /^$channel$/i, keys %{$self->disp->channels}