X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdx.pl;h=5e9eec1ccf6e78a12a358b46eb11b7c51ff200f7;hb=88665a2bed3b9ec9e97237938a95a045b2a21bb4;hp=7684542eb19251f1d87dafa8253232f4b8bea4e9;hpb=19f68ea69f734f50b46fba21aab99315d5803e09;p=spider.git diff --git a/cmd/dx.pl b/cmd/dx.pl index 7684542e..5e9eec1c 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -100,6 +100,7 @@ if (grep $_ eq $spotted, @DXProt::baddx) { my $buf = Spot::formatb($freq, $spotted, $main::systime, $line, $spotter); push @out, $buf; } else { + return (1, $self->msg('dup')) if Spot::dup($freq, $spotted, $main::systime, $line); my @spot = Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall); if (@spot) { # send orf to the users @@ -108,3 +109,8 @@ if (grep $_ eq $spotted, @DXProt::baddx) { } return (1, @out); + + + + +