hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-21 07:47:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

Drop PC12 from pc9x nodes, increase ann dup age.

Browse Source 
Assume that PC12s coming from pc9x nodes are coming via some other
route and have been converted.

Increase the default announce dup age from 5 to 18 hrs.
This commit is contained in:
Dirk Koopman 2010-10-25 10:42:08 +01:00
parent 7d74331026
commit 2110beabbe
4 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Changes
View File

@ -1,3 +1,7 @@
25Oct10=======================================================================
1. Drop PC12s purporting to originate at nodes that do PC9x (suggestion from
Lee VE1CC).
2. Increase default dup age for announces from 5 -> 18 hours.
23Oct10=======================================================================
1. add dbexport command to allow the export of ak1a style databases to a
file.

2
perl/AnnTalk.pm
View File

@ -18,7 +18,7 @@ use DXVars;
use vars qw(%dup $duplth $dupage $filterdef);
$duplth = 30; # the length of text to use in the deduping
$dupage = 5*3600; # the length of time to hold ann dups
$dupage = 18*3600; # the length of time to hold ann dups
$filterdef = bless ([
# tag, sort, field, priv, special parser
['by', 'c', 0],

6
perl/DXProtHandle.pm
View File

@ -321,6 +321,12 @@ sub handle_12
return;
}
# ignore PC12s from origins that use PCxx protocol
my $oref = Route::get($origin);
if ($oref->do_pc9x) {
dbg("PCPROT: PC12 rxed from PC9x node, ignored") if isdbg('chanerr');
return;
}
my $dxchan;

4
perl/Version.pm
View File

@ -11,7 +11,7 @@ use vars qw($version $subversion $build $gitversion);
$version = '1.55';
$subversion = '0';
$build = '76';
$gitversion = '75987f0';
$build = '77';
$gitversion = '7d74331';
1;