summaryrefslogtreecommitdiffstats
path: root/perl-install/bootloader.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r--perl-install/bootloader.pm7
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index da26c5672..a7758e897 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -504,9 +504,12 @@ sub install_yaboot($$$) {
}
log::l("Installing boot loader...");
my $f = "$prefix/tmp/of_boot_dev";
- my $of_dev = get_of_dev($prefix, $lilo->{boot});
- output($f, "$of_dev\n");
+ my $of_dev = get_of_dev($prefix, $lilo->{boot});
+ output($f, "$of_dev\n");
$::testing and return;
+ if (defined $install_steps_interactive::new_bootstrap) {
+ run_program::run("hformat", "$lilo->{boot}") or die "hformat failed";
+ }
run_program::rooted($prefix, "/sbin/ybin", "2>", "/tmp/.error") or die "ybin failed";
unlink "$prefix/tmp/.error";
}