diff options
| -rw-r--r-- | perl-install/NEWS | 4 | ||||
| -rw-r--r-- | perl-install/any.pm | 8 | ||||
| -rw-r--r-- | perl-install/bootloader.pm | 3 | ||||
| -rw-r--r-- | perl-install/install/steps.pm | 2 |
4 files changed, 12 insertions, 5 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 33e966eb9..8bd102364 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,7 @@ +- use "splash" on the kernel command line vs. "splash=silent" as per upstream + code (e.g. plymouth, systemd and others) +- support the "quiet" kernel command line argument to hide kernel text + Version 13.93 - 12 March 2012 - fix mgaapplet crashing on live migration when there's a new major version of diff --git a/perl-install/any.pm b/perl-install/any.pm index 056566314..47b6d2f60 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -130,12 +130,13 @@ sub setupBootloaderBeforeStandalone { my $allow_fb = listlength(cat_("/proc/fb")); my $cmdline = cat_('/proc/cmdline'); my $vga_fb = first($cmdline =~ /\bvga=(\S+)/); - my $quiet = $cmdline =~ /\bsplash=silent\b/; - setupBootloaderBefore($do_pkgs, $b, $all_hds, $fstab, $keyboard, $allow_fb, $vga_fb, $quiet); + my $splash = $cmdline =~ /\bsplash\b/; + my $quiet = $cmdline =~ /\bquiet\b/; + setupBootloaderBefore($do_pkgs, $b, $all_hds, $fstab, $keyboard, $allow_fb, $vga_fb, $splash, $quiet); } sub setupBootloaderBefore { - my ($_do_pkgs, $bootloader, $all_hds, $fstab, $keyboard, $allow_fb, $vga_fb, $quiet) = @_; + my ($_do_pkgs, $bootloader, $all_hds, $fstab, $keyboard, $allow_fb, $vga_fb, $splash, $quiet) = @_; require bootloader; #- auto_install backward compatibility @@ -207,6 +208,7 @@ sub setupBootloaderBefore { my $need_fb = -e "$::prefix/usr/share/bootsplash/scripts/make-boot-splash"; bootloader::suggest($bootloader, $all_hds, vga_fb => ($force_vga || $vga && $need_fb) && $vga_fb, + splash => $splash, quiet => $quiet); $bootloader->{keytable} ||= keyboard::keyboard2kmap($keyboard); diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 28a21a242..766cd2cf6 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -1057,7 +1057,8 @@ sub suggest { { root => $root, if_($options{vga_fb}, vga => $options{vga_fb}), #- using framebuffer - if_($options{vga_fb} && $options{quiet}, append => "splash=silent"), + if_($options{vga_fb} && $options{splash}, append => "splash"), + if_($options{quiet}, append => "quiet"), }); if ($options{vga_fb} && $e->{label} eq 'linux') { diff --git a/perl-install/install/steps.pm b/perl-install/install/steps.pm index 968f076f1..4d9e2a0c3 100644 --- a/perl-install/install/steps.pm +++ b/perl-install/install/steps.pm @@ -754,7 +754,7 @@ sub read_bootloader_config { sub setupBootloaderBefore { my ($o) = @_; any::setupBootloaderBefore($o->do_pkgs, $o->{bootloader}, $o->{all_hds}, $o->{fstab}, $o->{keyboard}, - $o->{allowFB}, $o->{vga}, $o->{meta_class} ne 'server'); + $o->{allowFB}, $o->{vga}, $o->{meta_class} ne 'server', $o->{meta_class} ne 'server'); } sub setupBootloader { |