diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-06-14 12:45:26 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-06-14 12:45:26 +0000 |
| commit | 265873689d80f7228f836d28de9d344b97026869 (patch) | |
| tree | de34e7b3c4a0a4163ce9685794d1ea559d87bb56 /perl-install | |
| parent | 70607f20d15531bb83f3a7e590076abc89a0f356 (diff) | |
| download | drakx-265873689d80f7228f836d28de9d344b97026869.tar drakx-265873689d80f7228f836d28de9d344b97026869.tar.gz drakx-265873689d80f7228f836d28de9d344b97026869.tar.bz2 drakx-265873689d80f7228f836d28de9d344b97026869.tar.xz drakx-265873689d80f7228f836d28de9d344b97026869.zip | |
(write_grub) adapt to grub-0.97-2mdk
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/bootloader.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 534dfe895..fd13a797f 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1339,7 +1339,8 @@ sub write_grub { { my $f = "$::prefix/boot/grub/install.sh"; my $dev = device_string2grub($bootloader->{boot}, \@legacy_floppies, \@sorted_hds); - my ($stage1, $stage2, $menu_lst) = map { $file2grub->("/boot/grub/$_") } qw(stage1 stage2 menu.lst); + my ($stage1, $stage2) = map { $file2grub->(glob("/lib/grub/*/$_")) } qw(stage1 stage2); + my ($menu_lst) = $file2grub->("/boot/grub/menu.lst"); renamef($f, "$f.old"); output_with_perm("$::prefix/boot/grub/install.sh", 0755, "grub --device-map=/boot/grub/device.map --batch <<EOF |