From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Thu, 21 Nov 2002 13:25:00 +0000 (+0000)
Subject: - fixed up message flood message (still not ideal)
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a60d94f335cb276754fb315e2a90d3cc9d666f58;p=infobot.git

- fixed up message flood message (still not ideal)


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@654 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/IRC/IrcHelpers.pl b/blootbot/src/IRC/IrcHelpers.pl
index 893011f..18ff34a 100644
--- a/blootbot/src/IRC/IrcHelpers.pl
+++ b/blootbot/src/IRC/IrcHelpers.pl
@@ -6,7 +6,7 @@
 #        NOTE: Based on code by Kevin Lenzo & Patrick Cole  (c) 1997
 #
 
-if (&IsParam("useStrict")) { use strict; }
+# use strict;	# TODO
 
 #######################################################################
 ####### IRC HOOK HELPERS   IRC HOOK HELPERS   IRC HOOK HELPERS ########
@@ -196,10 +196,12 @@ sub hookMsg {
 
 	my $i = scalar keys %{ $flood{$floodwho} };
 	if ($i > $count) {
-	    &msg($who,"overflow of messages ($i > $count)");
+	    my $expire = $param{'ignoreAutoExpire'} || 5;
+
+#	    &msg($who,"overflow of messages ($i > $count)");
+	    &msg($who,"Too many queries from you, ignoring for $expire minutes.");
 	    &status("FLOOD overflow detected from $floodwho; ignoring");
 
-	    my $expire = $param{'ignoreAutoExpire'} || 5;
 	    &ignoreAdd("*!$uh", $chan, $expire, "flood overflow auto-detected.");
 	    return;
 	}