X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=b4fd27c4c1f5c69c757120742f61fecc62b5b568;hb=7555c945f91caaf7a4d7deb8a24bea616f426503;hp=92f705523a364652c2320ef37814ef9548f42905;hpb=da65011693cc9a7a33f09424f7a19a51937d986c;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