From c2ef4a362e13249d8a774c7c5b7d0a8ab5df7d11 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 27 Feb 2008 10:43:55 +0000 Subject: - do not assign a mount point to partitions of type "Compaq diagnostics" --- perl-install/fs/mount_point.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/fs') diff --git a/perl-install/fs/mount_point.pm b/perl-install/fs/mount_point.pm index b21a37b62..608e3062e 100644 --- a/perl-install/fs/mount_point.pm +++ b/perl-install/fs/mount_point.pm @@ -47,7 +47,7 @@ sub suggest_mount_points { sub suggest_mount_points_always { my ($fstab) = @_; - my @win = grep { isFat_or_NTFS($_) && maybeFormatted($_) && !$_->{is_removable} } @$fstab; + my @win = grep { isFat_or_NTFS($_) && maybeFormatted($_) && !$_->{is_removable} && $_->{pt_type} != 0x12 } @$fstab; log::l("win parts: ", join ",", map { $_->{device} } @win) if @win; if (@win == 1) { #- Suggest /boot/efi on ia64. -- cgit v1.2.1