X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdisconnect.pl;h=9acf0ce336fa5f37d5621b80139803097187c67b;hb=a6e52cc1680c2c30ef874e2e6c16d00c956624ee;hp=00a462a70e4955b44f252b77621dcb01956f9c50;hpb=6e1e3dbb021d95286ba02e27ac96d53abdbb3823;p=spider.git

diff --git a/cmd/disconnect.pl b/cmd/disconnect.pl
index 00a462a7..9acf0ce3 100644
--- a/cmd/disconnect.pl
+++ b/cmd/disconnect.pl
@@ -26,9 +26,9 @@ foreach $call (@calls) {
 	} elsif (my $conn = Msg->conns($call)) {
 		$conn->disconnect;
 		push @out, $self->msg('disc3', $call);
-	} elsif (my $ref = DXCLuster->get_exact($call)) {
-		my $dxchan = $ref->dxchan;
-		if ($dxchan && $dxchan->call eq $main::mycall) {
+	} 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);
 		}