From c9816a228f0898bbc82041f4ef7f0ced07d82d27 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 20 Jun 2016 17:19:39 +0200
Subject: simplify generic case

---
 perl-install/bootloader.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 23f3d26f3..446df0ade 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -2154,7 +2154,7 @@ sub ensure_pkg_is_installed {
     if ($main_method eq 'grub2') {
 	$do_pkgs->ensure_binary_is_installed($pkg{grub2}, 'grub2-install', 1) or return 0;
     } elsif (member($main_method, qw(grub grub2 lilo))) {
-	$do_pkgs->ensure_binary_is_installed($pkg{$main_method} || $main_method, $h{$main_method} || $main_method, 1) or return 0;
+	$do_pkgs->ensure_binary_is_installed($main_method, $main_method, 1) or return 0;
     }
     # Install gfx theme if needed:
     if (my $pkg = $suppl{$bootloader->{method}}) {
-- 
cgit v1.2.1