remove removal of debug files from startup

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 8798392b8541152633ce50445d3a97666de3cff3..61478887d1b29f7c1cf39f73a74061cd4e6d7227 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -466,12 +466,6 @@ 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");
-
 # this, such as it is, is the main loop!
 dbg("orft we jolly well go ...");
 my $script = new Script "startup";