From 93eb520d8e5ebbdea3a20029d9d95e0d4e848901 Mon Sep 17 00:00:00 2001
From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 11 Nov 2003 21:05:00 +0000
Subject: [PATCH] are they FIXMEs or not? ;-)

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@879 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/DynaConfig.pl     |  4 ++--
 src/IRC/IrcHelpers.pl | 11 +++++++----
 src/IRC/IrcHooks.pl   |  4 ++--
 src/IRC/Schedulers.pl |  6 ++----
 src/Modules/Math.pl   |  2 +-
 5 files changed, 14 insertions(+), 13 deletions(-)

diff --git a/src/DynaConfig.pl b/src/DynaConfig.pl
index f2158b7..5d9a1bc 100644
--- a/src/DynaConfig.pl
+++ b/src/DynaConfig.pl
@@ -32,7 +32,7 @@ sub readUserFile {
 	my $s2 = -s "$f~";
 
 	if ($s2 > $s1*3) {
-	    &DEBUG("rUF: backup file bigger than current file. FIXME");
+	    &FIXME("rUF: backup file bigger than current file.");
 	}
     }
 
@@ -239,7 +239,7 @@ sub readChanFile {
 	my $s2 = -s "$f~";
 
 	if ($s2 > $s1*3) {
-	    &DEBUG("rCF: backup file bigger than current file. FIXME");
+	    &FIXME("rCF: backup file bigger than current file.");
 	}
     }
 
diff --git a/src/IRC/IrcHelpers.pl b/src/IRC/IrcHelpers.pl
index 2518772..c472894 100644
--- a/src/IRC/IrcHelpers.pl
+++ b/src/IRC/IrcHelpers.pl
@@ -115,12 +115,15 @@ sub hookMsg {
 
     # Determine floodwho.
     my $c	= "_default";
-    if ($msgType =~ /public/i) {		# public.
+    if ($msgType =~ /public/i) {
+	# public.
 	$floodwho = $c = lc $chan;
-    } elsif ($msgType =~ /private/i) {	# private.
+    } elsif ($msgType =~ /private/i) {
+	# private.
 	$floodwho = lc $who;
-    } else {				# dcc?
-	&DEBUG("FIXME: floodwho = ???");
+    } else {
+	# dcc?
+	&FIXME("floodwho = ???");
     }
 
     my $val = &getChanConfDefault("floodRepeat", "2:5", $c);
diff --git a/src/IRC/IrcHooks.pl b/src/IRC/IrcHooks.pl
index 8c36f59..4697d3f 100644
--- a/src/IRC/IrcHooks.pl
+++ b/src/IRC/IrcHooks.pl
@@ -89,7 +89,7 @@ sub on_chat {
 	    &DEBUG("chat: sock => '$sock'.");
 ###	    $sock->close();
 	    delete $dcc{'CHAT'}{$nick};
-	    &DEBUG("chat: after closing sock. FIXME");
+	    &FIXME("chat: after closing sock.");
 	    ### BUG: close seizes bot. why?
 	}
 
@@ -327,7 +327,7 @@ sub on_dcc_open_chat {
     my(undef, $nick, $sock) = @_;
 
     if ($nuh{$nick} eq "GETTING-NOW") {
-	&DEBUG("getting nuh for $nick failed. FIXME.");
+	&FIXME("getting nuh for $nick failed.");
 	return;
     }
 
diff --git a/src/IRC/Schedulers.pl b/src/IRC/Schedulers.pl
index cfc87ba..56b9438 100644
--- a/src/IRC/Schedulers.pl
+++ b/src/IRC/Schedulers.pl
@@ -399,7 +399,7 @@ sub chanlimitCheck {
 	}
 
 	if (defined $limit and scalar keys %{ $channels{$chan}{''} } > $limit) {
-	    &FIXME("LIMIT: set too low!!! FIXME");
+	    &FIXME("LIMIT: set too low!!!");
 	    ### run NAMES again and flush it.
 	}
 
@@ -678,9 +678,7 @@ sub ircCheck {
     my $iconf	= scalar( @x );
     my $inow	= scalar( keys %channels );
     if ($iconf > 2 and $inow * 2 <= $iconf) {
-	&FIXME("ircCheck: current channels * 2 <= config channels. FIXME.");
-	&FIXME("ircCheck: iconf = $iconf");
-	&FIXME("ircCheck: inow  = $inow");
+	&FIXME("ircCheck: current channels ($inow) * 2 <= config channels ($iconf).");
 #	@joinchan	= @x;
 	&joinNextChan();
     }
diff --git a/src/Modules/Math.pl b/src/Modules/Math.pl
index a0b991e..b91f8fe 100644
--- a/src/Modules/Math.pl
+++ b/src/Modules/Math.pl
@@ -118,7 +118,7 @@ sub perlMath {
 	    }
 	} else {
 	    if (defined $locMsg) {
-		&DEBUG("math: locMsg => '$locMsg'... FIXME");
+		&FIXME("math: locMsg => '$locMsg'...");
 	    } else {
 		&status("math: could not really compute.");
 		$locMsg = "";
-- 
2.39.2