X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=6d4dc90f66b2fc523a8d735069f231642d253341;hb=25140d3e8633cbf9e25b6528248405ec8ed125e3;hp=4965a49fd3ebb0c8e8a0b798093a2aec36bcc052;hpb=ab10b5e76b152d41273281b30b019e4c82ed22d8;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 4965a49f..6d4dc90f 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -336,7 +336,7 @@ sub process_inqueue return unless defined $sort; # do the really sexy console interface bit! (Who is going to do the TK interface then?) - dbg("<- $sort $call $line\n") if $sort ne 'D' && isdbg('chan'); + dbg("<- $sort $call $line") if $sort ne 'D' && isdbg('chan'); if ($self->{disconnecting}) { dbg('In disconnection, ignored'); next;