X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdisconnect.pl;h=a023c609ee72388bcee49bed1adbaa79ab141524;hb=75abae88c65a19102d4a633a273a71750aa97728;hp=9e6b67dff927a521d5cb7db530927cf6aec8ef4d;hpb=586cbb347e7639f5575b48572e75140501a109c0;p=spider.git diff --git a/cmd/disconnect.pl b/cmd/disconnect.pl index 9e6b67df..a023c609 100644 --- a/cmd/disconnect.pl +++ b/cmd/disconnect.pl @@ -16,7 +16,7 @@ foreach $call (@calls) { my $dxchan = DXChannel->get($call); if ($dxchan) { if ($dxchan->is_node) { -# $dxchan->send_now("D", DXProt::pc39($main::mycall, $self->msg('disc1', $self->call))); +# $dxchan->send_pc39($self->msg('disc1', $self->call)); } else { return (1, $self->msg('e5')) if $self->priv < 8; $dxchan->send_now('D', $self->msg('disc1', $self->call)); @@ -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); }