X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRBN.pm;h=ba81f735a79ec0f10858eaa19e58e6e2636741c9;hb=157f14220c0cbc875729be41a3e3a2acd18f51e1;hp=158fefc5fda3fc4f472c06072dd60140035286e0;hpb=7d4b15681464d77945e7ea78ef60ed3305d57d95;p=spider.git diff --git a/perl/RBN.pm b/perl/RBN.pm index 158fefc5..ba81f735 100644 --- a/perl/RBN.pm +++ b/perl/RBN.pm @@ -21,7 +21,7 @@ use Date::Parse; our @ISA = qw(DXChannel); -our $startup_delay = 0;# 5*60; # don't send anything out until this timer has expired +our $startup_delay =3*60; # don't send anything out until this timer has expired # this is to allow the feed to "warm up" with duplicates # so that the "big rush" doesn't happen. @@ -189,6 +189,9 @@ sub normal $mode = $sort; $t = $tx; } + if ($sort && $sort eq 'BEACON') { + $mode = 'BECON'; + } # We have an RBN data line, dedupe it very simply on time, ignore QRG completely. # This works because the skimmers are NTP controlled (or should be) and will receive