X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;fp=perl%2Fcluster.pl;h=9e14396b9018ed5a4d1f7e66173e5174113a3636;hb=abbcfa7500858a2eba4135b0af5db9f3fca8d68e;hp=87811af8457f11004dc972e114e56d728443d8b2;hpb=1eabcdd60799121b40f4d2ddb3b977fa0b2aeb94;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 87811af8..9e14396b 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -634,6 +634,8 @@ our $io_disconnected;
 sub idle_loop
 {
 	BPQMsg::process();
+	DXCommandmode::process(); # process ongoing command mode stuff
+	DXProt::process();		# process ongoing ak1a pcxx stuff
 
 	if (defined &Local::process) {
 		eval {
@@ -679,9 +681,7 @@ sub per_sec
 	}
 	IsoTime::update($systime);
 	DXCron::process();      # do cron jobs
-	DXCommandmode::process(); # process ongoing command mode stuff
 	DXXml::process();
-	DXProt::process();		# process ongoing ak1a pcxx stuff
 	DXConnect::process();
 	DXMsg::process();
 	DXDb::process();
@@ -689,7 +689,6 @@ sub per_sec
 	DXDupe::process();
 	DXCron::process();			# do cron jobs
 	IsoTime::update($systime);
-	DXProt::process();			# process ongoing ak1a pcxx stuff
 	DXConnect::process();
 	DXUser::process();
 	AGWMsg::process();