are they FIXMEs or not? ;-)

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

diff --git a/src/DynaConfig.pl b/src/DynaConfig.pl
index f2158b710228ac9cd29c51b1ed15652c8bd31de9..5d9a1bc401c6958b028ae44357f703d2cb785c1d 100644 (file)
--- 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 2518772fd6339b939579a827a952af5c188d61b0..c472894a13796a97e69cb9cdcfa09acc6bb5c051 100644 (file)
--- 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 8c36f59a8880132e9b1dacf2b54ae0daf6c3be28..4697d3f564a066a4c3c0055cf710a2eda9e77a89 100644 (file)
--- 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 cfc87ba7b43a3e97d4abfaa1a0dccd93f984fffc..56b943846b9d7d783521a073afb3c6c6fb9e25c8 100644 (file)
--- 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 a0b991e62c0ab69e5a7648365df347fa83371597..b91f8fe64ff7d1f5bc8623b271cf5cfd8183dc2b 100644 (file)
--- 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 = "";