Fix indents et add more comment

master
heuzef 4 years ago
parent fec798e9e2
commit 303bba08ca
  1. 9
      Check.pm

@ -47,7 +47,7 @@ sub action
next if ( $Conf{XferMethod} eq "archive" ); next if ( $Conf{XferMethod} eq "archive" );
next if ( !$Privileged && !CheckPermission($host) ); next if ( !$Privileged && !CheckPermission($host) );
# Get number of total backups # Get number of total backups (full + incr)
for ( my $i = 0 ; $i < @Backups ; $i++ ) { for ( my $i = 0 ; $i < @Backups ; $i++ ) {
if ( $Backups[$i]{type} eq "full" ) { $fullCnt++; } if ( $Backups[$i]{type} eq "full" ) { $fullCnt++; }
elsif ( $Backups[$i]{type} eq "incr" ) { $incrCnt++; } elsif ( $Backups[$i]{type} eq "incr" ) { $incrCnt++; }
@ -129,7 +129,7 @@ sub action
$toosmall = 1; $toosmall = 1;
} }
# Get result, if we don't have enough backup (< 4) we can't calcul a realist average # If we don't have enough backup (< 4) we can't calcul a realist average
if ( not $nbBackups > 4) { if ( not $nbBackups > 4) {
$sizeConsistencyColor = "Gray"; $sizeConsistencyColor = "Gray";
$sizeConsistency = "Not enough backups"; $sizeConsistency = "Not enough backups";
@ -156,8 +156,8 @@ EOF
# End loop # End loop
# Time set # Time set
my $now = timeStamp2(time); my $now = timeStamp2(time);
my $DUmaxTime = timeStamp2($Info{DUDailyMaxTime}); my $DUmaxTime = timeStamp2($Info{DUDailyMaxTime});
my $DUInodemaxTime = timeStamp2($Info{DUInodeDailyMaxTime}); my $DUInodemaxTime = timeStamp2($Info{DUInodeDailyMaxTime});
# Show header # Show header
@ -188,7 +188,6 @@ EOF
</table> </table>
EOF EOF
my $content = eval ("qq{$header}"); my $content = eval ("qq{$header}");
Header("BackupPC: Check", $content); Header("BackupPC: Check", $content);
Trailer(); Trailer();

Loading…
Cancel
Save