summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-07 11:34:54 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-07 11:34:54 +0000
commit8872bb0056e12dbdeee8b406558c6e8e91117489 (patch)
tree5d0a2a89e2ece552d317e10466316f8501e29ce8 /perl-install
parent1e2c383108a6ab96a7f968e9b34f1d276e0fe340 (diff)
downloaddrakx-8872bb0056e12dbdeee8b406558c6e8e91117489.tar
drakx-8872bb0056e12dbdeee8b406558c6e8e91117489.tar.gz
drakx-8872bb0056e12dbdeee8b406558c6e8e91117489.tar.bz2
drakx-8872bb0056e12dbdeee8b406558c6e8e91117489.tar.xz
drakx-8872bb0056e12dbdeee8b406558c6e8e91117489.zip
extract hash into a variable (needed for next commit)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm13
1 files changed, 7 insertions, 6 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 60972d42a..8c615da26 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1129,12 +1129,13 @@ sub suggest {
if (main_method($bootloader->{method}) eq 'grub') {
foreach my $c (find_other_distros_grub_conf($fstab)) {
- add_entry($bootloader, {
- type => 'grub_configfile',
- label => $c->{name},
- kernel_or_dev => "/dev/$c->{bootpart}{device}",
- configfile => $c->{grub_conf},
- });
+ my %h = (
+ type => 'grub_configfile',
+ label => $c->{name},
+ kernel_or_dev => "/dev/$c->{bootpart}{device}",
+ configfile => $c->{grub_conf},
+ );
+ add_entry($bootloader, \%h);
}
}
}