X-Git-Url: https://ruin.nu/git/?p=NDIRC.git;a=blobdiff_plain;f=Bot.pm;h=ccc322941e6ba80c2dcf50c6f68576d0accf67d3;hp=1200424a94cfba04219b6415cc1dfd685ce222e2;hb=87ddd7d37d6f5880757a71bfedd3459f4a511d2b;hpb=84affcdf70684e8f29e83dc2c3ab75520da383d7

diff --git a/Bot.pm b/Bot.pm
index 1200424..ccc3229 100644
--- a/Bot.pm
+++ b/Bot.pm
@@ -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}