summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-06 14:42:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-06 14:42:52 +0000
commit333a9d4701a9709791a65e67a6d2fa17fd09100c (patch)
tree00ab461d6cb8b61ebe0ec111a937083333baeea7 /perl-install
parent063be9b8241e6f4707cd557ab0f40aa068f21a4d (diff)
downloaddrakx-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar
drakx-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.gz
drakx-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.bz2
drakx-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.xz
drakx-333a9d4701a9709791a65e67a6d2fa17fd09100c.zip
please perl_checker
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index d1e706d70..4a83f3c3a 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -133,7 +133,7 @@ sub read_grub() {
$b{nowarn} = 1;
# handle broken installkernel -r:
- $b{default} = min($b{default}, scalar(@{$b{entries}}) -1);
+ $b{default} = min($b{default}, scalar(@{$b{entries}}) - 1);
$b{default} = $b{entries}[$b{default}]{label};
\%b;