X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;fp=perl%2Fcluster.pl;h=b45213a71ba4a5dd4f2b18bb43b24c08a2db989d;hb=433209e1efed23493f25f1357d9c003696c1fb59;hp=93e769ba4e788a2d4ccf0dcac3d0e592b2f7fb94;hpb=766014807e2521cc60a219c6eda5b49d13ffc70f;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 93e769ba..b45213a7 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -734,10 +734,11 @@ sub setup_start
 
 
 	# initialise the Geomagnetic data engine
-	dbg("Start WWV");
+	dbg("Start WWV system");
 	Geomag->init();
-	dbg("Start WCY");
+	dbg("Start WCY system");
 	WCY->init();
+	dbg("Start Announce and Talk system");
 	AnnTalk::init();			# initialise announce cache
    
 
@@ -757,24 +758,26 @@ sub setup_start
 	Spot->init();
 
 	# read in any existing message headers and clean out old crap
-	dbg("reading existing message headers ...");
+	dbg("Reading existing Message/Bulletine headers ...");
 	DXMsg->init();
 	DXMsg::clean_old();
 
 	# read in any cron jobs
-	dbg("reading cron jobs ...");
+	dbg("Reading cron jobs ...");
 	DXCron->init();
 
 	# read in database desriptors
-	dbg("reading database descriptors ...");
+	dbg("Reading database descriptors ...");
 	DXDb::load();
 
-	dbg("starting RBN ...");
+	dbg("Rtarting RBN ...");
 	RBN::init();
 
 	# starting local stuff
-	dbg("doing local initialisation ...");
+	dbg("Starting DXQsl system");
 	QSL::init(1);
+
+	dbg("Ooing local initialisations ...");
 	if (defined &Local::init) {
 		eval {
 			Local::init();
@@ -784,7 +787,7 @@ sub setup_start
 
 
 	# this, such as it is, is the main loop!
-	dbg("orft we jolly well go ...");
+	dbg("Orft we jolly well go ...");
 
 	#open(DB::OUT, "|tee /tmp/aa");
 }