From: djk <djk>
Date: Wed, 20 Oct 1999 10:21:17 +0000 (+0000)
Subject: removed extranous , in qw
X-Git-Tag: R_1_32~16
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=47c1e91e4d503904e0b35e49952f75866d96fe1d;p=spider.git

removed extranous , in qw
---

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 11d37f25..caa01789 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -31,7 +31,7 @@ use strict;
 use vars qw($me $pc11_max_age $pc23_max_age $pc11_dup_age $pc23_dup_age
 			%spotdup %wwvdup $last_hour %pings %rcmds
 			%nodehops @baddx $baddxfn $pc12_dup_age
-			%anndup $allowzero, $pc12_dup_lth);
+			%anndup $allowzero $pc12_dup_lth);
 
 $me = undef;					# the channel id for this cluster
 $pc11_max_age = 1*3600;			# the maximum age for an incoming 'real-time' pc11