rootwarn is borken

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

diff --git a/src/Modules/RootWarn.pl b/src/Modules/RootWarn.pl
index ffd7ee2ad5941864ddb20e00e2e4d0bd1d18f901..a0c7bc5fe386536340c6eec59fd7a1571b202fca 100644 (file)
--- a/src/Modules/RootWarn.pl
+++ b/src/Modules/RootWarn.pl
@@ -21,11 +21,11 @@ sub rootWarn {
            &status("rootwarn: Detected root user; notifying user");
        } else {
            &status("rootwarn: Detected root user; notifying nick and channel.");
-           &msg($chan, "ROO".("O" x int(rand 68))."T has landed!");
+           &msg($chan, "ROO".("O" x int(rand 8))."T has landed!");
        }
 
        if ($_ = &getFactoid("root")) {
-           &msg($nick, "root is $_");
+           &msg($nick, "rootwarn: $attempt : $_");
        } else {
            &status("root needs to be defined in database.");
        }
@@ -33,13 +33,12 @@ sub rootWarn {
     } elsif ($attempt < 2) {   # 2nd/3rd time occurrance.
        &status("RootWarn: not first time root user; msg'ing $nick.");
        if ($_ = &getFactoid("root again")) {
-           &msg($nick, $_);
+           &msg($nick, "rootwarn: $attempt : $_");
        } else {
            &status("root again needs to be defined in database.");
        }
 
     } else {                   # >3rd time occurrance.
-
        # disable this for the time being.
        if (0 and $warnmode =~ /aggressive/i) {
            if ($channels{$chan}{'o'}{$ident}) {