X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=aacd56603904bcbb5ff1acb5ebe0b610b985cd37;hb=aafd54016bd01fa5b3dc717dbb9cb267f5376dc4;hp=ecb6cfc638edad38d15fc4b509fb838cc748b595;hpb=f7ce6f45eae627c1368ffea0e1e56e84fec676be;p=spider.git 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;