X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=1ecbc094a704487fd96c3998a560eb493d02f976;hb=4e5b3de7a26563d94678fb790b8a1e2c4daaac8d;hp=6f82b0d0bdebdeecaba15df94448e7a57d7bda59;hpb=44803b76e72d76567f70a11e150a53a1cd87c2d3;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 6f82b0d0..1ecbc094 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -340,7 +340,7 @@ $SIG{KILL} = 'DEFAULT'; # as if it matters.... # catch the rest with a hopeful message for (keys %SIG) { if (!$SIG{$_}) { - dbg('chan', "Catching SIG $_"); +# dbg('chan', "Catching SIG $_"); $SIG{$_} = sub { my $sig = shift; DXDebug::confess("Caught signal $sig"); }; } }