- $dxchan->send_now("D", $self->pc39('Disconnected'));
- } else {
- $dxchan->disconnect;
- }
- push @out, "disconnected $call";
+ $dxchan->send_now("D", DXProt::pc39($main::mycall, $self->msg('disc1')));
+ } else {
+ $dxchan->send_now('D', $self->msg('disc1', $self->call));
+ }
+ $dxchan->disconnect;
+ push @out, $self->msg('disc2', $call);