diff options
author | Thierry Vignaud <tv@mageia.org> | 2013-02-27 06:40:09 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2013-02-27 06:40:09 +0000 |
commit | 391be023560b677b5b51bb4e664619a589d7c9a5 (patch) | |
tree | eaa056381dbfcc85cb0657889ca3de8ef92df61f /perl-install | |
parent | 94bf8374a5ee847592471087fd6090a690c8cff4 (diff) | |
download | drakx-391be023560b677b5b51bb4e664619a589d7c9a5.tar drakx-391be023560b677b5b51bb4e664619a589d7c9a5.tar.gz drakx-391be023560b677b5b51bb4e664619a589d7c9a5.tar.bz2 drakx-391be023560b677b5b51bb4e664619a589d7c9a5.tar.xz drakx-391be023560b677b5b51bb4e664619a589d7c9a5.zip |
set default parameters in grub2 config (mga#9177)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/NEWS | 1 | ||||
-rw-r--r-- | perl-install/bootloader.pm | 12 | ||||
-rw-r--r-- | perl-install/install/NEWS | 1 |
3 files changed, 14 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 321c85543..853bcecd4 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,6 +1,7 @@ - drakboot: o fix detecting grub2 if there's a remaining grub-legacy signature o read more of grub2 config + o set default parameters in grub2 config (mga#9177) Version 15.21 - 26 February 2013 diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index f7d13ac5c..0a3363d52 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1794,6 +1794,18 @@ sub crypt_grub_password { sub write_grub2 { my ($bootloader, $_all_hds, $o_backup_extension) = @_; my $error; + + # set default parameters: + my ($entry) = grep { $_->{kernel_or_dev} =~ /vmlin/ } @{$bootloader->{entries}}; + my $append = $entry->{append}; + $append =~ s/root=\S+//; + $append =~ s/\bro\b//; + + my $f = "$::prefix/etc/default/grub"; + my %conf = getVarsFromSh($f); + $conf{GRUB_CMDLINE_LINUX_DEFAULT} = $append; + setVarsInSh($f, \%conf); + my $grub2_cfg = '/boot/grub2/grub.cfg'; run_program::rooted($::prefix, 'grub2-mkconfig', '2>', \$error, '-o', $grub2_cfg) or die "grub2-mkconfig failed: $error"; } diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 1f5055a68..b77bb223f 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,6 +1,7 @@ - bootloader: o fix detecting grub2 if there's a remaining grub-legacy signature o read more of grub2 config + o set default parameters in grub2 config (mga#9177) - do not attempt to use gurpmi.addmedia or gurpmi if in text mode Version 15.22 - 26 February 2013 |