$user->lastin($main::systime) unless DXChannel::get($call);
$user->put;
}
- $self->route_pc16($origin, $line, $parent, @rout) if @rout;
-
+ if (@rout) {
+ $self->route_pc16($origin, $line, $parent, @rout);
+ $self->route_pc92a($main::mycall, undef, $parent, @rout);
+ }
}
# remove a user
$uref = Route->new($ucall) unless $uref; # throw away
$self->route_pc17($origin, $line, $parent, $uref);
+ $self->route_pc92d($main::mycall, undef, $parent, $uref);
}
# link request
$flag |= $ref->here ? 1 : 0;
if ($ref->isa('Route::Node') || $ref->isa('DXProt')) {
$flag |= 4;
- $flag |= 2 if $call ne $main::mycall && DXChannel::get($call);
+ my $dxchan = DXChannel::get($call);
+ $flag |= 2 if $call ne $main::mycall && $dxchan && !$dxchan->{do_pc92};
if ($ext) {
if ($ref->version) {
my $version = $ref->version || 1.0;