projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
more developed version
[spider.git]
/
perl
/
cluster.pl
diff --git
a/perl/cluster.pl
b/perl/cluster.pl
index 4965a49fd3ebb0c8e8a0b798093a2aec36bcc052..6d4dc90f66b2fc523a8d735069f231642d253341 100755
(executable)
--- 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?)
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;
if ($self->{disconnecting}) {
dbg('In disconnection, ignored');
next;