X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=b4fd27c4c1f5c69c757120742f61fecc62b5b568;hb=dab8b370e48c980fa354dedd17d5a0c75b481862;hp=92f705523a364652c2320ef37814ef9548f42905;hpb=3b26752b143965dec4a078106b98c960dd8c2fee;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index 92f70552..b4fd27c4 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -169,13 +169,13 @@ sub prepare my @out = @_[0..4]; # just up to the spotter # normalise frequency - $_[0] = sprintf "%.1f", $_[0]; + $out[0] = sprintf "%.1f", $out[0]+0.05; # remove ssids and /xxx if present on spotter $out[4] =~ s/-\d+$//o; # remove leading and trailing spaces - $_[3] = unpad($_[3]); + $out[3] = unpad($out[3]); # add the 'dxcc' country on the end for both spotted and spotter, then the cluster call