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

Fix remaining _SPC_ in username. Thanks to roshanroche for the report.

This commit is contained in:
Darold Gilles 2016-10-09 11:53:09 +02:00
parent 81392c8ce0
commit aa7b70a36b
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
SquidAnalyzer.pm
View File

@ -3994,7 +3994,6 @@ sub _print_network_stat
my $outnet = new IO::File; my $outnet = new IO::File;
$outnet->open(">$outdir/networks/$net/$net.html") || return; $outnet->open(">$outdir/networks/$net/$net.html") || return;
# Print the HTML header # Print the HTML header
#my $cal = 'SA_CALENDAR_SA';
my $cal = ''; my $cal = '';
$self->_print_header(\$outnet, $self->{menu2}, $cal, $sortpos); $self->_print_header(\$outnet, $self->{menu2}, $cal, $sortpos);
print $outnet $self->_print_title("$Translate{'Network_title'} $show -", $stat_date, $week); print $outnet $self->_print_title("$Translate{'Network_title'} $show -", $stat_date, $week);
@ -4296,10 +4295,11 @@ sub _print_user_stat
my $outusr = new IO::File; my $outusr = new IO::File;
$outusr->open(">$outdir/users/$upath/$upath.html") || return; $outusr->open(">$outdir/users/$upath/$upath.html") || return;
# Print the HTML header # Print the HTML header
#my $cal = 'SA_CALENDAR_SA';
my $cal = ''; my $cal = '';
$self->_print_header(\$outusr, $self->{menu2}, $cal, $sortpos); $self->_print_header(\$outusr, $self->{menu2}, $cal, $sortpos);
print $outusr $self->_print_title("$Translate{'User_title'} $usr -", $stat_date, $week); my $usr_lbl = $usr;
$usr_lbl =~ s/_SPC_/ /g;
print $outusr $self->_print_title("$Translate{'User_title'} $usr_lbl -", $stat_date, $week);
my @hits = (); my @hits = ();
my @bytes = (); my @bytes = ();
@ -5055,7 +5055,9 @@ sub _print_top_url_stat
} elsif ($tpe eq 'Duration') { } elsif ($tpe eq 'Duration') {
$value = &parse_duration(int($value/1000)); $value = &parse_duration(int($value/1000));
} }
print $out "<tr><td>$user</td><td>$value</td></tr>\n"; my $usr_lbl = $user;
$usr_lbl =~ s/_SPC_/ /g;
print $out "<tr><td>$usr_lbl</td><td>$value</td></tr>\n";
$k++; $k++;
last if ($k > $self->{TopUrlUser}); last if ($k > $self->{TopUrlUser});
} }
@ -5680,7 +5682,9 @@ $domain2_bytes
} elsif ($tpe eq 'Duration') { } elsif ($tpe eq 'Duration') {
$value = &parse_duration(int($value/1000)); $value = &parse_duration(int($value/1000));
} }
print $out "<tr><td>$user</td><td>$value</td></td></tr>\n"; my $usr_lbl = $user;
$usr_lbl =~ s/_SPC_/ /g;
print $out "<tr><td>$usr_lbl</td><td>$value</td></td></tr>\n";
$k++; $k++;
last if ($k > $self->{TopUrlUser}); last if ($k > $self->{TopUrlUser});
} }