From: djk <djk>
Date: Sat, 10 Jun 2000 14:27:32 +0000 (+0000)
Subject: store the correct duptext for PC11
X-Git-Tag: R_1_40~3
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=aafd54016bd01fa5b3dc717dbb9cb267f5376dc4;p=spider.git

store the correct duptext for PC11
---

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index ecb6cfc6..aacd5660 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -240,7 +240,7 @@ sub normal
 			
 			# do some de-duping
 			my $freq = $field[1] - 0;
-			my $dupkey = "$freq$field[2]$d$text$spotter";
+			my $dupkey = "$freq$field[2]$d$duptext$spotter";
 			if ($spotdup{$dupkey}) {
 				dbg('chan', "Duplicate Spot ignored\n");
 				return;