X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=f96b6173a5550ce590203fce3c3461ec09817b23;hb=f0910da57e166acb22e83de4e4b771d175074c80;hp=572be7a9d6cdae83abe7a0ced707773ff692096d;hpb=ece0b001419b8e755540eaff4ce3a558fd7d939f;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 572be7a9..f96b6173 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -455,6 +455,9 @@ eval {
 };
 dbg("Local::init error $@") if $@;
 
+dbg("cleaning out old debug files");
+DXDebug::dbgclean();
+
 # print various flags
 #dbg("seful info - \$^D: $^D \$^W: $^W \$^S: $^S \$^P: $^P");