From: minima Date: Sat, 14 Jan 2006 23:02:59 +0000 (+0000) Subject: undo rounding change X-Git-Tag: 1.53~80 X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;ds=sidebyside;h=20efba5d5f656113144785e0ef84296e6d2c2e69;p=spider.git undo rounding change --- 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;