X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdx.pl;h=a4ea8464b8a807b669e58ce4d7a31429221142bb;hb=55f14d9038abb44d61ac63298f9f39b9e53a39d1;hp=3f366dffb20f82ef5bb508c370b55f836066ce9e;hpb=8e0eef80216fbb2bca3606daf5797e39b2889d7a;p=spider.git diff --git a/cmd/dx.pl b/cmd/dx.pl index 3f366dff..a4ea8464 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -103,9 +103,13 @@ if (grep $_ eq $spotted, @DXProt::baddx) { my $buf = Spot::formatb($self->user->wantgrid, $freq, $spotted, $main::systime, $line, $spotter); push @out, $buf; } else { - return (1, $self->msg('dup')) if Spot::dup($freq, $spotted, (int ($main::systime/60)) * 60, $line); - my @spot = Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall); + my $t = (int ($main::systime/60)) * 60; + return (1, $self->msg('dup')) if Spot::dup($freq, $spotted, $t, $line); + my @spot = Spot::prepare($freq, $spotted, $t, $line, $spotter, $main::mycall); if (@spot) { + # store it + Spot::add(@spot); + # send orf to the users DXProt::send_dx_spot($self, DXProt::pc11($spotter, $freq, $spotted, $line), @spot); }