diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-02-06 14:42:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-02-06 14:42:52 +0000 |
commit | 333a9d4701a9709791a65e67a6d2fa17fd09100c (patch) | |
tree | 00ab461d6cb8b61ebe0ec111a937083333baeea7 /perl-install/bootloader.pm | |
parent | 063be9b8241e6f4707cd557ab0f40aa068f21a4d (diff) | |
download | drakx-backup-do-not-use-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar drakx-backup-do-not-use-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.gz drakx-backup-do-not-use-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.bz2 drakx-backup-do-not-use-333a9d4701a9709791a65e67a6d2fa17fd09100c.tar.xz drakx-backup-do-not-use-333a9d4701a9709791a65e67a6d2fa17fd09100c.zip |
please perl_checker
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r-- | perl-install/bootloader.pm | 2 |
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; |