From 4f85b0d92b9246709a53a85b45b15f73c7d97086 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 30 Jan 2003 22:54:49 +0000 Subject: add isFat_or_NTFS() and use it where possible instead of isFat() since Windows is now using ntfs, not only Windows NT --- perl-install/bootloader.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index c286c1457..79e77c87f 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -521,10 +521,10 @@ wait %d seconds for default boot. my %nbs; foreach (@$hds) { foreach (@{$_->{primary}{normal}}) { - isNT($_) || isFat($_) or next; + isFat_or_NTFS($_) or next; my $from_magic = { type => fsedit::typeOfPart($_->{device}) }; - isNT($from_magic) || isFat($from_magic) or next; - my $label = isNT($_) ? 'NT' : isDos($_) ? 'dos' : 'windows'; + isFat_or_NTFS($from_magic) or next; + my $label = isDos($_) ? 'dos' : 'windows'; add_entry($bootloader, { type => 'other', -- cgit v1.2.1