fix beacons on RBN

[spider.git] / perl / RBN.pm

diff --git a/perl/RBN.pm b/perl/RBN.pm
index 158fefc5fda3fc4f472c06072dd60140035286e0..30667d61b48abb160595cfbc54f862af1e9490c1 100644 (file)
--- 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 =5*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