- nice patch from Phil Edwards <pme@devphil.com>. Thanks!

[infobot.git] / src / IRC / Irc.pl

diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl
index 8350e4d716a045ec18940603dfbd96d9551eb6e4..a73a51aea777508938ece215f74e560aa8362d7c 100644 (file)
--- a/src/IRC/Irc.pl
+++ b/src/IRC/Irc.pl
@@ -868,7 +868,10 @@ sub joinfloodCheck {
 
        my $time;
        foreach (keys %{ $floodjoin{$c} }) {
-           $time += $floodjoin{$c}{$_}{Time};
+           my $t = $floodjoin{$c}{$_}{Time};
+           next unless (defined $t);
+
+           $time += $t;
        }
        &DEBUG("joinflood: time => $time");
        $time /= $count;