if ($s) {
my $dxchan = DXChannel->get($s->{call});
my $ref = DXChannel->get($user) || $dxchan;
+ if ($ref->{call} eq $main::mycall) {
+ $ref = DXChannel->get($main::myalias) || $ref;
+ }
$ref->send($line) if $ref;
delete $rcmds{$fromnode} if !$dxchan;
} else {