From b9bb780015a57f1df1080175bce0e501d4825593 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 11 Jul 2016 17:14:10 +0200
Subject: BIOS boot partition cannot be mounted

---
 perl-install/NEWS         | 3 +++
 perl-install/fs/type.pm   | 2 +-
 perl-install/install/NEWS | 2 ++
 3 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/perl-install/NEWS b/perl-install/NEWS
index 4a64a685d..e63beb6f0 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,6 @@
+- diskdrake:
+  o make clear a BIOS boot partition cannot have a mount point
+
 Version 17.50 - 8 July 2016
 
 - diskdrake:
diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm
index ac4b08896..c38e9e497 100644
--- a/perl-install/fs/type.pm
+++ b/perl-install/fs/type.pm
@@ -326,7 +326,7 @@ sub isOtherAvailableFS { isESP($_[0]) || isFat_or_NTFS($_[0]) || member($_[0]{fs
 sub isMountableRW { (isTrueFS($_[0]) || isOtherAvailableFS($_[0])) && $_[0]{fs_type} ne 'ntfs' }
 sub cannotBeMountable { 
     my ($part) = @_;
-    isRawRAID($part) || isRawLUKS($part) || isRawLVM($part);
+    isRawRAID($part) || isRawLUKS($part) || isRawLVM($part) || isBIOS_GRUB($part);
 }
 sub isNonMountable { 
     my ($part) = @_;
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index edc1f081f..78c21cf86 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,4 +1,6 @@
 - fix starting spice-vdagentd
+- partionning:
+  o make clear a BIOS boot partition cannot have a mount point
 
 Version 17.50 - 8 July 2016
 
-- 
cgit v1.2.1