mess with scheduling

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

diff --git a/blootbot/src/IRC/IrcHooks.pl b/blootbot/src/IRC/IrcHooks.pl
index 7b098ae13d07e732019b0859eb4eb5d14af750fd..9b25f6b19041b7da7edbefff61f5b21c2aa918c5 100644 (file)
--- a/blootbot/src/IRC/IrcHooks.pl
+++ b/blootbot/src/IRC/IrcHooks.pl
@@ -209,7 +209,7 @@ sub on_endofmotd {
     }
 
     &status("End of motd. Now lets join some channels...");
-    &joinNextChan();
+    #&joinNextChan();
 }
 
 sub on_endofwho {

diff --git a/blootbot/src/Misc.pl b/blootbot/src/Misc.pl
index 10609fe1da4f4b7860959bcfe5c6f0b136e3c365..45bfab9b131fe5e5be0fa7f366bf46b8ab51152a 100644 (file)
--- a/blootbot/src/Misc.pl
+++ b/blootbot/src/Misc.pl
@@ -375,7 +375,7 @@ sub getRandomInt {
        my $i = $1;
        my $fuzzy = int(rand 5);
        if ($i < 10) {
-           return $i*60;
+           return $i;
        }
        if (rand > 0.5) {
            return ($i - $fuzzy)*60;

diff --git a/blootbot/src/Shm.pl b/blootbot/src/Shm.pl
index f9b93624b1227c29581d5d3a39042afafbd6b519..3ce116c761cd90cd473eab25e85e8147cb587c9e 100644 (file)
--- a/blootbot/src/Shm.pl
+++ b/blootbot/src/Shm.pl
@@ -229,7 +229,7 @@ sub shmFlush {
     return if ($$ != $::bot_pid); # fork protection.
 
     if (@_) {
-       &ScheduleThis(5, "shmFlush");
+       &ScheduleThis(15, "shmFlush");
        return if ($_[0] eq "2");
     }