projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
improve debugging of obscounting
[spider.git]
/
perl
/
DXProtHandle.pm
diff --git
a/perl/DXProtHandle.pm
b/perl/DXProtHandle.pm
index b8c31542285b4c9f45c985795b1d3a1076a8e6b3..4a2be35765f854d815ae805a28847ac399d869ed 100644
(file)
--- a/
perl/DXProtHandle.pm
+++ b/
perl/DXProtHandle.pm
@@
-1594,10
+1594,10
@@
sub handle_92
# we only reset obscounts on config records
$oparent->reset_obs;
# we only reset obscounts on config records
$oparent->reset_obs;
- dbg("ROUTE: reset obscount on $pcall now " . $oparent->obscount) if isdbg('
route
');
+ dbg("ROUTE: reset obscount on $pcall now " . $oparent->obscount) if isdbg('
obscount
');
if ($oparent != $parent) {
$parent->reset_obs;
if ($oparent != $parent) {
$parent->reset_obs;
- dbg("ROUTE: reset obscount on $parent->{call} now " . $parent->obscount) if isdbg('
route
');
+ dbg("ROUTE: reset obscount on $parent->{call} now " . $parent->obscount) if isdbg('
obscount
');
}
#
}
#
@@
-1759,9
+1759,7
@@
sub handle_default
my $line = shift;
my $origin = shift;
my $line = shift;
my $origin = shift;
- if (eph_dup($line)) {
- dbg("PCPROT: Ephemeral dup, dropped") if isdbg('chanerr');
- } else {
+ unless (eph_dup($line)) {
if ($pcno >= 90) {
my $pcall = $_[1];
unless (is_callsign($pcall)) {
if ($pcno >= 90) {
my $pcall = $_[1];
unless (is_callsign($pcall)) {