summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-06-23 16:40:43 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-06-24 00:56:42 +0200
commita13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b (patch)
treea850571582d90bc5e474348b7b9d0172ce01553e /perl-install
parent2ab5ba31869a8e38305503367bffa827a71665a4 (diff)
downloaddrakx-a13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b.tar
drakx-a13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b.tar.gz
drakx-a13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b.tar.bz2
drakx-a13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b.tar.xz
drakx-a13cd7e81288d76d0c6dc8264cae8b76e1f0ff5b.zip
filter GPT disks w/o a BIOS boot part (mga#18770)
else grub2-install failed with:r "this GPT Partition label contains no BIOS Boot Partition: embedding won't be possible."
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 23331d1b2..d0d8def1f 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -694,14 +694,18 @@ sub suggest_onmbr {
=item allowed_boot_parts($bootloader, $all_hds)
-Returns list of places where we can install the bootloader
+Returns list of places where we can install the bootloader when not in UEFI mode
+(in UEFI mode, grub2 automatically look for the ESP).
=cut
sub allowed_boot_parts {
my ($bootloader, $all_hds) = @_;
(
- @{$all_hds->{hds}}, # MBR
+ ( # GPT disks w/o a BIOS boot partition do not have free space for grub2 to embed:
+ grep { c::get_disk_type($_->{file}) ne 'gpt' ||
+ any { isBIOS_GRUB($_) } map { partition_table::get_normal_parts($_) } $_;
+ } @{$all_hds->{hds}}), # MBR
if_($bootloader->{method} =~ /lilo/,
grep { $_->{level} eq '1' } @{$all_hds->{raids}}