tyler.durden
/
squidanalyzer
mirror of https://github.com/darold/squidanalyzer.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix extra .0 in networks report. Thanks to Ben Tullis for the report.

This commit is contained in:
Darold Gilles 2012-11-30 19:21:52 +01:00
parent 34782f0bfd
commit ce0b1caf02
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
SquidAnalyzer.pm
View File

@ -1699,8 +1699,8 @@ sub _print_network_stat
$network_stat{$net}{duration} = &parse_duration(int($network_stat{$net}{duration}/1000));
my $total_cost = sprintf("%2.2f", int($network_stat{$net}{bytes}/1000000) * $self->{CostPrice});
my $show = $net;
if ($net =~ /^\d+\.\d+\.\d+/) {
$show .= ".0";
if ($net =~ /^(\d+\.\d+\.\d+)/) {
$show = "$1.0";
foreach my $n (keys %{$self->{NetworkAlias}}) {
if ($show =~ /$self->{NetworkAlias}->{$n}/) {
$show = $n;