From 249e1e6c2d48237221d87485cafd179d46082361 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sat, 18 Jun 2016 16:06:22 +0200 Subject: add a failsafe for ESP tagging sometimes we end with bogus 'fat32' fs --- perl-install/fs/type.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fs') diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm index f4ca32238..b8262b30e 100644 --- a/perl-install/fs/type.pm +++ b/perl-install/fs/type.pm @@ -293,7 +293,7 @@ sub true_local_fs_types() { qw(btrfs ext3 ext2 ext4 reiserfs xfs jfs) } sub isEmpty { !$_[0]{fs_type} && $_[0]{pt_type} == 0 } sub isBIOS_GRUB { $_[0]{pt_type} == 'BIOS_GRUB' } -sub isESP { $_[0]{pt_type} == 0xef && $_[0]{fs_type} eq 'vfat' } +sub isESP { $_[0]{pt_type} == 0xef && member($_[0]{fs_type}, qw(fat32 vfat)) } sub isExtended { $_[0]{pt_type} == 5 || $_[0]{pt_type} == 0xf || $_[0]{pt_type} == 0x85 } sub isRawLVM { $_[0]{pt_type} == 0x8e || $_[0]{type_name} eq 'Linux Logical Volume Manager' } sub isRawRAID { $_[0]{pt_type} == 0xfd || $_[0]{type_name} eq 'Linux RAID' } -- cgit v1.2.1