projects
/
BackupPC.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* Copyright date update
[BackupPC.git]
/
lib
/
BackupPC
/
CGI
/
Summary.pm
diff --git
a/lib/BackupPC/CGI/Summary.pm
b/lib/BackupPC/CGI/Summary.pm
index
f818fdf
..
ac390a1
100644
(file)
--- a/
lib/BackupPC/CGI/Summary.pm
+++ b/
lib/BackupPC/CGI/Summary.pm
@@
-10,7
+10,7
@@
# Craig Barratt <cbarratt@users.sourceforge.net>
#
# COPYRIGHT
# Craig Barratt <cbarratt@users.sourceforge.net>
#
# COPYRIGHT
-# Copyright (C) 2003-200
7
Craig Barratt
+# Copyright (C) 2003-200
9
Craig Barratt
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@
-28,7
+28,7
@@
#
#========================================================================
#
#
#========================================================================
#
-# Version 3.
1.0beta0, released 3 Sep 2007
.
+# Version 3.
2.0beta0, released 5 April 2009
.
#
# See http://backuppc.sourceforge.net.
#
#
# See http://backuppc.sourceforge.net.
#
@@
-50,7
+50,7
@@
sub action
foreach my $host ( GetUserHosts(1) ) {
my($fullDur, $incrCnt, $incrAge, $fullSize, $fullRate, $reasonHilite,
foreach my $host ( GetUserHosts(1) ) {
my($fullDur, $incrCnt, $incrAge, $fullSize, $fullRate, $reasonHilite,
- $lastAge, $tempState, $tempReason);
+ $lastAge, $tempState, $tempReason
, $lastXferErrors
);
my($shortErr);
my @Backups = $bpc->BackupInfoRead($host);
my $fullCnt = $incrCnt = 0;
my($shortErr);
my @Backups = $bpc->BackupInfoRead($host);
my $fullCnt = $incrCnt = 0;
@@
-106,6
+106,7
@@
sub action
$incrTot += $incrCnt;
$fullSize = sprintf("%.2f", $fullSize / 1000);
$incrAge = " " if ( $incrAge eq "" );
$incrTot += $incrCnt;
$fullSize = sprintf("%.2f", $fullSize / 1000);
$incrAge = " " if ( $incrAge eq "" );
+ $lastXferErrors = $Backups[@Backups-1]{xferErrs} if ( @Backups );
$reasonHilite = $Conf{CgiStatusHilightColor}{$Status{$host}{reason}}
|| $Conf{CgiStatusHilightColor}{$Status{$host}{state}};
if ( $Conf{BackupsDisable} == 1 ) {
$reasonHilite = $Conf{CgiStatusHilightColor}{$Status{$host}{reason}}
|| $Conf{CgiStatusHilightColor}{$Status{$host}{state}};
if ( $Conf{BackupsDisable} == 1 ) {
@@
-147,6
+148,7
@@
sub action
<td align="center" class="border">$incrAge</td>
<td align="center" class="border">$lastAge</td>
<td align="center" class="border">$Lang->{$tempState}</td>
<td align="center" class="border">$incrAge</td>
<td align="center" class="border">$lastAge</td>
<td align="center" class="border">$Lang->{$tempState}</td>
+ <td align="center" class="border">$lastXferErrors</td>
<td class="border">$Lang->{$tempReason}$shortErr</td></tr>
EOF
if ( @Backups == 0 ) {
<td class="border">$Lang->{$tempReason}$shortErr</td></tr>
EOF
if ( @Backups == 0 ) {