summaryrefslogtreecommitdiffstats
path: root/perl-install/bootloader.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-09 19:58:34 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-09 19:58:34 +0000
commit4dc01a41ffd6f93017515d742ece55dfad1194a0 (patch)
tree4683e883bda6ac8824b1e677ef338c683132bbfa /perl-install/bootloader.pm
parent76b83cdb6af224735852532c06f7d6cd493b0697 (diff)
downloaddrakx-4dc01a41ffd6f93017515d742ece55dfad1194a0.tar
drakx-4dc01a41ffd6f93017515d742ece55dfad1194a0.tar.gz
drakx-4dc01a41ffd6f93017515d742ece55dfad1194a0.tar.bz2
drakx-4dc01a41ffd6f93017515d742ece55dfad1194a0.tar.xz
drakx-4dc01a41ffd6f93017515d742ece55dfad1194a0.zip
perl_checker cleanup
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r--perl-install/bootloader.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 8ef24ffcf..4f01093b2 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1971,7 +1971,7 @@ sub restore_previous_MBR_bootloader {
}
sub install_grub2 {
- my ($bootloader, $all_hds) = @_;
+ my ($bootloader, $_all_hds) = @_;
my $error;
run_program::rooted($::prefix, 'grub2-install', '2>', \$error, $bootloader->{boot}) or die "grub2 failed: $error";
}