From 87ddd7d37d6f5880757a71bfedd3459f4a511d2b Mon Sep 17 00:00:00 2001 From: Michael Andreen Date: Fri, 21 Aug 2009 17:32:50 +0200 Subject: [PATCH] Fix, we don't use the HEAP anymore --- Bot.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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} -- 2.39.2