X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=ffdfa42df1fd691acca53f4ed674a8c48cc8032c;hb=b55a5be0062fb96613a2f42c25de550d69283b7a;hp=919c59db4278b0fc586db283202dc14c5aa65c41;hpb=f6d0b05b25a61cb6d3aa671b7a8f5d4a69817b1c;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 919c59db..ffdfa42d 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -138,7 +138,7 @@ use AnnTalk;
 use BBS;
 use WCY;
 use BadWords;
-use Timer;
+use DXTimer;
 use Route;
 use Route::Node;
 use Route::User;
@@ -578,6 +578,9 @@ sub setup_start
 	DXUser::init(4);			# version 4 == json format
 
 	Filter::init();				# doesn't do much, but has to be done
+
+	AnnTalk::init();			# initialise announce cache
+	
 	
 
 	# look for the sysop and the alias user and complain if they aren't there
@@ -791,7 +794,7 @@ sub per_sec
 	DXCron::process();			# do cron jobs
 	RBN::process();
 
-	Timer::handler();
+	DXTimer::handler();
 	DXLog::flushall();
 }