diff options
| -rwxr-xr-x | perl-install/standalone/drakboot | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot index 75056571f..a7b253017 100755 --- a/perl-install/standalone/drakboot +++ b/perl-install/standalone/drakboot @@ -45,13 +45,17 @@ my $fstab = [ fs::get::fstab($all_hds) ]; my $cmdline = cat_('/proc/cmdline'); my $bootloader; -if (!$in->isa('interactive::gtk') || any { /^--boot$/ } @ARGV) { +my $is_bootloader_mode = !$in->isa('interactive::gtk') || any { /^--boot$/ } @ARGV; + +if ($is_bootloader_mode || any { /^--splash$/ } @ARGV) { $bootloader = bootloader::read($all_hds); if (!$bootloader) { $in->ask_okcancel('', N("No bootloader found, creating a new configuration"), 0) or $in->exit; any::setupBootloaderBeforeStandalone($in->do_pkgs, $bootloader ||= {}, $all_hds, $fstab); } +} +if ($is_bootloader_mode) { $::isWizard = 1; eval { any::setupBootloaderUntilInstalled($in, $bootloader, $all_hds, $fstab, $ENV{SECURE_LEVEL}) }; die if $@ && $@ !~ /^wizcancel/; |