From: minima <minima>
Date: Fri, 14 Dec 2001 17:51:28 +0000 (+0000)
Subject: make DK0WCY the only allowed WCYer
X-Git-Tag: R_1_50~141
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=cd91defa2fd138b6bbd6d7bd71542c8d931357da;p=spider.git

make DK0WCY the only allowed WCYer
---

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