diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-06 19:34:57 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-06 19:35:02 +0200 |
| commit | ebce08681c86f8106331ab4ba56871ef6d811dc2 (patch) | |
| tree | 77bc15a84564b4e260110f642c973ed0e3b7cc94 /perl-install | |
| parent | 1e9ac30cf4db720a18019e55403ff867a6f5cf18 (diff) | |
| download | drakx-ebce08681c86f8106331ab4ba56871ef6d811dc2.tar drakx-ebce08681c86f8106331ab4ba56871ef6d811dc2.tar.gz drakx-ebce08681c86f8106331ab4ba56871ef6d811dc2.tar.bz2 drakx-ebce08681c86f8106331ab4ba56871ef6d811dc2.tar.xz drakx-ebce08681c86f8106331ab4ba56871ef6d811dc2.zip | |
perl_checker cleanup
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/bootloader.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index e8d7d1973..1088c4e43 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -2013,12 +2013,10 @@ sub restore_previous_MBR_bootloader { sub install_grub2 { my ($bootloader, $all_hds) = @_; write_grub2($bootloader, $all_hds); - my $boot = $bootloader->{boot}; - install_raw_grub2($boot); + install_raw_grub2(); } -sub install_raw_grub2 { - my ($boot) = @_; +sub install_raw_grub2() { my $error; my $f = '/boot/grub2/install.sh'; if (!run_program::rooted($::prefix, "sh", "2>", \$error, $f)) { |