all dxdebug to have other directories, add wsjtl.pl

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 36989dee124c599160c31866d34232dff7753974..07fd6ab594630c0606a48bae4932f3abf38e4d2d 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -488,7 +488,7 @@ sub setup_start
        }
 
        # open the debug file, set various FHs to be unbuffered
-       dbginit($broadcast_debug ? \&DXCommandmode::broadcast_debug : undef);
+       dbginit(undef, $broadcast_debug ? \&DXCommandmode::broadcast_debug : undef);
        foreach (@debug) {
                dbgadd($_);
        }