fix very long standing bug in storing and transmitting spots. The decimal

point was left off :-(

diff --git a/Changes b/Changes
index e8fa06901438e1aae529792deeedf4a5e68413e6..b33f106ce9e1069ac79c2f20c841efe6d8a6887b 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+23Apr01=======================================================================
+1. fix very long standing bug in storing and transmitting spots. The decimal
+point was left off :-(
 22Apr01=======================================================================
 1. Sysops can now have full privileges if there is a ExtMsg listener on 
 localhost (or everything) and they telnet to localhost and login with their

diff --git a/perl/Spot.pm b/perl/Spot.pm
index b5b75e3883fcbb9825ffd788eaea94502dd77eae..a37a195ea8469ce55b6a65b89be35cbb39fbeaf8 100644 (file)
--- a/perl/Spot.pm
+++ b/perl/Spot.pm
@@ -102,7 +102,7 @@ sub prepare
        my @out = @_[0..4];      # just up to the spotter
 
        # normalise frequency
-       $_[0] = sprintf "%.f", $_[0];
+       $_[0] = sprintf "%.1f", $_[0];
   
        # remove ssids if present on spotter
        $out[4] =~ s/-\d+$//o;