projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
alias 'w' to 'who'
[spider.git]
/
perl
/
cluster.pl
diff --git
a/perl/cluster.pl
b/perl/cluster.pl
index 16458073b837bf7005718fac05fe2b66e5af7aa6..b7ac117773e9f398f8a777e6d21abd56cd0d4e7e 100755
(executable)
--- a/
perl/cluster.pl
+++ b/
perl/cluster.pl
@@
-311,7
+311,6
@@
sub process_inqueue
die "\$user not defined for $call" if !defined $user;
# normal input
$dxchan->normal($line);
die "\$user not defined for $call" if !defined $user;
# normal input
$dxchan->normal($line);
- $dxchan->disconnect if ($dxchan->{state} eq 'bye');
} elsif ($sort eq 'Z') {
$dxchan->disconnect;
} elsif ($sort eq 'D') {
} elsif ($sort eq 'Z') {
$dxchan->disconnect;
} elsif ($sort eq 'D') {