X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdx.pl;h=a7dc99ada65910c810fb45b8d31cb339de175067;hb=06963a9fca5e08982934c10946b8452f13feba2c;hp=3876ff1f643228248b7c65a2cd79812cebb88994;hpb=5a5a0fce49c14f8fa065fd3601a36535625087b6;p=spider.git diff --git a/cmd/dx.pl b/cmd/dx.pl index 3876ff1f..a7dc99ad 100644 --- a/cmd/dx.pl +++ b/cmd/dx.pl @@ -52,7 +52,6 @@ if (is_freq($f[1]) && $f[0] =~ m{^[\w\d]+(?:/[\w\d]+){0,2}$}) { return (1, $self->msg('dx3')); } - # make line the rest of the line $line = $f[2] || " "; @f = split /\s+/, $line; @@ -97,14 +96,16 @@ push @out, $self->msg('dx1', $freq) unless $valid; # check we have a callsign :-) if ($spotted le ' ') { push @out, $self->msg('dx2'); - $valid = 0; } return (1, @out) unless $valid; - # Store it here (but only if it isn't baddx) +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 ($DXProt::baddx->in($spotted) || $freq =~ /^69/ || $localonly) { # heaven forfend that we get a 69Mhz band :-) @@ -112,12 +113,9 @@ if ($DXProt::baddx->in($spotted) || $freq =~ /^69/ || $localonly) { $self->badcount(($self->badcount||0) + 1); } - my $buf = Spot::formatb($self->user->wantgrid, $freq, $spotted, $main::systime, $line, $spotter); - push @out, $buf; + $self->dx_spot(undef, undef, @spot); + return (1); } else { - 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);