projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix init list and add pc92a/d to pc16/17 handlers
[spider.git]
/
perl
/
DXProtHandle.pm
diff --git
a/perl/DXProtHandle.pm
b/perl/DXProtHandle.pm
index 5715902c2cfa1c0fe8ed487237bbb33b80f73abf..20eb37e417db85cb7d9ec2e9158b796df14f32e2 100644
(file)
--- a/
perl/DXProtHandle.pm
+++ b/
perl/DXProtHandle.pm
@@
-473,8
+473,10
@@
sub handle_16
$user->lastin($main::systime) unless DXChannel::get($call);
$user->put;
}
$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
}
# remove a user
@@
-541,6
+543,7
@@
sub handle_17
$uref = Route->new($ucall) unless $uref; # throw away
$self->route_pc17($origin, $line, $parent, $uref);
$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
}
# link request