From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 30 Jan 2001 12:47:02 +0000 (+0000)
Subject: - typo for already-run check. should work now.
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=296e931c104750327d9f341725cf110f1eaacbba;p=infobot.git

- typo for already-run check. should work now.


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

diff --git a/src/IRC/Schedulers.pl b/src/IRC/Schedulers.pl
index c1d4975..f34ac51 100644
--- a/src/IRC/Schedulers.pl
+++ b/src/IRC/Schedulers.pl
@@ -42,10 +42,10 @@ sub setupSchedulers {
     &wingateWriteFile(1);
     &factoidCheck(1);
 
-#    my $count = map { exists $sched{$_}{RUNNING} } keys %sched;
+#    my $count = map { exists $sched{$_}{TIME} } keys %sched;
     my $count	= 0;
     foreach (keys %sched) {
-	next unless (exists $sched{$_}{RUNNING});
+	next unless (exists $sched{$_}{TIME});
 	$count++;
     }
 
@@ -62,7 +62,7 @@ sub ScheduleThis {
 	return;
     }
 
-    if (exists $sched{$codename}) {
+    if (exists $sched{$codename}{RUNNING}) {
 	&WARN("Sched for $codename already exists.");
 	return;
     }
@@ -79,7 +79,7 @@ sub ScheduleChecked {
 
     # what the hell is this for?
     if (exists $sched{$codename}{RUNNING}) {
-	&DEBUG("SC: Removed $codename.");
+###	&DEBUG("SC: Removed $codename.");
 	delete $sched{$codename}{RUNNING};
     } else {
 ###	&WARN("sched $codename already removed.");
@@ -357,7 +357,8 @@ sub floodCycle {
     my $time	= time();
     foreach $who (keys %flood) {
 	foreach (keys %{$flood{$who}}) {
-	    if (!exists $flood{$who}{$_} or defined $flood{$who}{$_}) {
+	    if (!exists $flood{$who}{$_}) {
+# or !defined $flood{$who}{$_}) {
 		&WARN("flood{$who}{$_} undefined?");
 		next;
 	    }