diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-07-20 13:20:19 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-07-20 13:20:19 +0000 |
| commit | 982276b91c37240a34ea6a6f4baaa981af10e289 (patch) | |
| tree | b2b02dd3db93aa3f1fbee8f48ec564948bc83f87 /perl-install/bootloader.pm | |
| parent | 393a1f6897917ed72268218092ffd3499b5313b2 (diff) | |
| download | drakx-backup-do-not-use-982276b91c37240a34ea6a6f4baaa981af10e289.tar drakx-backup-do-not-use-982276b91c37240a34ea6a6f4baaa981af10e289.tar.gz drakx-backup-do-not-use-982276b91c37240a34ea6a6f4baaa981af10e289.tar.bz2 drakx-backup-do-not-use-982276b91c37240a34ea6a6f4baaa981af10e289.tar.xz drakx-backup-do-not-use-982276b91c37240a34ea6a6f4baaa981af10e289.zip | |
(install_lilo): order fat partitions first
Diffstat (limited to 'perl-install/bootloader.pm')
| -rw-r--r-- | perl-install/bootloader.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index e7aec8add..a28684f5b 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -613,8 +613,8 @@ sub install_lilo ($$) { my ($file) = @_; if (arch() =~ /ia64/) { (my $part, $file) = fsedit::file2part($prefix, $fstab, $file); -# my %hds = map_index { $_ => "hd$::i" } sort map { $_->{device} } @$hds; - my %hds = map_index { $_ => "hd$::i" } sort map { $_->{device} } map { @{$_->{primary}{normal}}, map {$_->{normal} } @{$_->{extended} || []} } @$hds; + my %hds = map_index { $_ => "hd$::i" } map { $_->{device} } + sort { isFat($b) <=> isFat($a) || $a->{device} cmp $b->{device} } get_fstab(@$hds); %hds->{$part->{device}} . ":" . $file; } else { $file |