From 20efba5d5f656113144785e0ef84296e6d2c2e69 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sat, 14 Jan 2006 23:02:59 +0000
Subject: [PATCH] undo rounding change

---
 Changes            | 2 ++
 perl/DXXml/Ping.pm | 1 -
 perl/Spot.pm       | 2 +-
 3 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/Changes b/Changes
index b94c786d..47dd017c 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+14Jan06=======================================================================
+1. undo frequency rounding change, it causes more problems than it solves.
 11Jan06=======================================================================
 1. Fixed problem with badspotters doing ann/full as pointed out by Luigi 
 IK5ZUK.
diff --git a/perl/DXXml/Ping.pm b/perl/DXXml/Ping.pm
index 0fc4426a..21662dae 100644
--- a/perl/DXXml/Ping.pm
+++ b/perl/DXXml/Ping.pm
@@ -66,7 +66,6 @@ sub add
 	$self->{u} = $from;
 	$self->{'-via'} = $via if $via && DXChannel::get($via);
 	$self->{o} = $main::mycall;
-	$self->{id} = $self->nextid;
 	$self->route($dxchan);
 
 	push @$ref, $self;
diff --git a/perl/Spot.pm b/perl/Spot.pm
index b4fd27c4..5ea169f2 100644
--- a/perl/Spot.pm
+++ b/perl/Spot.pm
@@ -169,7 +169,7 @@ sub prepare
 	my @out = @_[0..4];      # just up to the spotter
 
 	# normalise frequency
-	$out[0] = sprintf "%.1f", $out[0]+0.05;
+	$out[0] = sprintf "%.1f", $out[0];
   
 	# remove ssids and /xxx if present on spotter
 	$out[4] =~ s/-\d+$//o;
-- 
2.34.1