X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdisconnect.pl;h=afe9b5419fd38ffc841396f86bedbaf090c3bc03;hb=5275b86607057a0960cdf03b41b8092a3d813e57;hp=9e6b67dff927a521d5cb7db530927cf6aec8ef4d;hpb=586cbb347e7639f5575b48572e75140501a109c0;p=spider.git diff --git a/cmd/disconnect.pl b/cmd/disconnect.pl index 9e6b67df..afe9b541 100644 --- a/cmd/disconnect.pl +++ b/cmd/disconnect.pl @@ -25,6 +25,13 @@ foreach $call (@calls) { push @out, $self->msg('disc2', $call); } elsif (my $conn = Msg->conns($call)) { $conn->disconnect; + push @out, $self->msg('disc3', $call); +# } elsif (my $ref = DXCluster->get_exact($call)) { +# my $dxchancall = $ref->dxchancall; +# if ($dxchancall eq $main::mycall || !DXChannel->get($dxchancall)) { +# $ref->del; +# push @out, $self->msg('disc4', $call); +# } } else { push @out, $self->msg('e10', $call); }