};
}
-my $usage = "$PROGRAM_NAME: Usage: $PROGRAM_NAME [--ignore-transfer-speed=<pd> [--ignore-transfer-speed=<pd> ...]]\n";
+my $usage = "$PROGRAM_NAME: Usage: $PROGRAM_NAME [--no-battery] [--ignore-transfer-speed=<pd> [--ignore-transfer-speed=<pd> ...]]\n";
my $params;
Getopt::Long::Configure('bundling');
if (!GetOptions (
'--help' => \$params->{'help'},
+ '--no-battery' => \$params->{'no-battery'},
'--ignore-transfer-speed=s@' => \$params->{'ignore-transfer-speed'},
)) {
die ($usage);
my $status = $2;
push @{$status{$status}}, $system;
if ($status ne 'OK') {
+ next if ($params->{'no-battery'} && $system eq 'Cache');
+ next if ($params->{'no-battery'} && $system eq 'Battery/Capacitor');
record('WARNING');
};
} else {
packages, but it makes things work again for now.
* dsa-check-packages: A better multi-arch capable version.
* dsa-check-backuppg: Ignore .dotfiles and *.old in rootdir.
+ * dsa-check-hpacucli: Add --no-battery to ignore battery/capacitor failures
+ and disabled caches.
[ Stephen Gran ]
* dsa-check-udldap-freshness: check new last_update.trace if it