summaryrefslogtreecommitdiff
path: root/lib/Multi/IRC.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2009-08-09 15:12:27 +0200
committerYorhel <git@yorhel.nl>2009-08-09 15:12:27 +0200
commit87b80e878f3cc068099c036ec04863c38eaad600 (patch)
treeaa05ade44956d88c79e280ac98c0ea47ea016104 /lib/Multi/IRC.pm
parent500a9c017f3d033fa4eaa336c5d116bcbe31cf70 (diff)
Multi::IRC: Got rid of crash in the throttle function
Diffstat (limited to 'lib/Multi/IRC.pm')
-rw-r--r--lib/Multi/IRC.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Multi/IRC.pm b/lib/Multi/IRC.pm
index 63acd0a9..e18a8e5d 100644
--- a/lib/Multi/IRC.pm
+++ b/lib/Multi/IRC.pm
@@ -96,7 +96,7 @@ sub throttle {
# garbage collect
return ($heap->{throttle} = {
- map $_->[$#$_] > time-3600 ? ($_, $heap->{throttle}{$_}) : (), keys %{$heap->{throttle}}
+ map $heap->{throttle}{$_}[$#{$heap->{throttle}{$_}}] > time-3600 ? ($_, $heap->{throttle}{$_}) : (), keys %{$heap->{throttle}}
}) if !$key;
$num ||= 1;