From defc60bc4257601364a037c02057dadc6410a7dd Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sun, 25 Mar 2001 20:14:12 +0000 Subject: (suggest): add entry for nt --- perl-install/bootloader.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index b2b91278e..fd0ef7f61 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -356,17 +356,18 @@ wait %d seconds for default boot. } } else { #- search for dos (or windows) boot partition. Don't look in extended partitions! - my ($dos, $win) = 0, 0; + my %nbs; foreach (@$hds) { foreach (@{$_->{primary}{normal}}) { + my $label = isNT($_) ? 'NT' : isDos($_) ? 'dos' : 'windows'; add_entry($lilo->{entries}, { type => 'other', kernel_or_dev => "/dev/$_->{device}", - label => isDos($_) ? "dos" . ($dos++ ? $dos : '') : "windows" . ($win++ ? $win : '') , + label => $label . ($nbs{$label}++ ? $nbs{$label} : ''), table => "/dev/$_->{rootDevice}", unsafe => 1 - }) if isFat($_) && isFat({ type => fsedit::typeOfPart($_->{device}) }); + }) if isNT($_) || isFat($_) && isFat({ type => fsedit::typeOfPart($_->{device}) }); } } } -- cgit v1.2.1