projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix problem with only some 17m spots coming out in sh/dx on 17m
[spider.git]
/
perl
/
DXProt.pm
diff --git
a/perl/DXProt.pm
b/perl/DXProt.pm
index c26016ee5048ce9205175a484ae042c3be8b1b31..056402b9501257fc410ba747e72bfb3e49949e9b 100644
(file)
--- a/
perl/DXProt.pm
+++ b/
perl/DXProt.pm
@@
-1046,7
+1046,12
@@
sub normal
for (@{$tochan->{pingtime}}) {
$st += $_;
}
for (@{$tochan->{pingtime}}) {
$st += $_;
}
- $tochan->{pingave} = $st / @{$tochan->{pingtime}};
+ if (@{$tochan->{pingtime}} == 1) {
+ $tochan->{pingave} = $t;
+ } else {
+ $tochan->{pingave} = $tochan->{pingave} + (($t - $tochan->{pingave}) / 8);
+ }
+# $tochan->{pingave} = $st / @{$tochan->{pingtime}};
}
}
}
}
}
}