diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-25 09:14:09 -0400 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-25 19:55:51 +0100 |
commit | adfebc5bb2c3ef4c14bea85ef4b5112f13453745 (patch) | |
tree | 2ac6c24809ca22b73c0febfaac13b5751a4d5d9a /perl-install | |
parent | 8d8e7bd48c35338cbdd84f957d51f7f02ad920fa (diff) | |
download | drakx-adfebc5bb2c3ef4c14bea85ef4b5112f13453745.tar drakx-adfebc5bb2c3ef4c14bea85ef4b5112f13453745.tar.gz drakx-adfebc5bb2c3ef4c14bea85ef4b5112f13453745.tar.bz2 drakx-adfebc5bb2c3ef4c14bea85ef4b5112f13453745.tar.xz drakx-adfebc5bb2c3ef4c14bea85ef4b5112f13453745.zip |
reuse is_uefi()
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootloader.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 0ee49b862..6ea0c23d4 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -2058,7 +2058,7 @@ sub install { sub ensure_pkg_is_installed { my ($do_pkgs, $bootloader) = @_; - my %pkg = ('grub2' => glob_("/sys/firmware/efi/*") ? 'grub2-efi' : 'grub2'); + my %pkg = ('grub2' => is_uefi() ? 'grub2-efi' : 'grub2'); my %h = ('grub2' => 'grub2-install'); my $main_method = main_method($bootloader->{method}); if (member($main_method, qw(grub grub2 lilo))) { |