From 0689e707a304e57e8b2e233567a08535f59edaf5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 20 Jul 2001 14:22:10 +0000 Subject: fix --- perl-install/bootloader.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index a28684f5b..73db24299 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -614,7 +614,7 @@ sub install_lilo ($$) { if (arch() =~ /ia64/) { (my $part, $file) = fsedit::file2part($prefix, $fstab, $file); my %hds = map_index { $_ => "hd$::i" } map { $_->{device} } - sort { isFat($b) <=> isFat($a) || $a->{device} cmp $b->{device} } get_fstab(@$hds); + sort { isFat($b) <=> isFat($a) || $a->{device} cmp $b->{device} } fsedit::get_fstab(@$hds); %hds->{$part->{device}} . ":" . $file; } else { $file -- cgit v1.2.1