From cd91defa2fd138b6bbd6d7bd71542c8d931357da Mon Sep 17 00:00:00 2001 From: minima Date: Fri, 14 Dec 2001 17:51:28 +0000 Subject: [PATCH] make DK0WCY the only allowed WCYer --- perl/WCY.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/WCY.pm b/perl/WCY.pm index 4974d939..ff2df512 100644 --- a/perl/WCY.pm +++ b/perl/WCY.pm @@ -40,7 +40,7 @@ $gmf = ""; # Geomag activity $au = 'no'; # aurora warning $node = ""; # originating node $from = ""; # who this came from -@allowed = (); # if present only these callsigns are regarded as valid WWV updators +@allowed = qw(DK0WCY); # if present only these callsigns are regarded as valid WWV updators @denied = (); # if present ignore any wwv from these callsigns $duplth = 20; # the length of text to use in the deduping $dupage = 12*3600; # the length of time to hold spot dups -- 2.43.0