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.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index d1a0b08e9..b3c9b045b 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -1253,10 +1253,8 @@ sub install_grub {
if (!$::testing) {
log::l("Installing boot loader...");
- symlink "$::prefix/boot", "/boot";
my $error;
- run_program::run("sh", '/boot/grub/install.sh', "2>", \$error) or die "grub failed: $error";
- unlink "/boot";
+ run_program::rooted($::prefix, "sh", '/boot/grub/install.sh', "2>", \$error) or die "grub failed: $error";
}
}
sub when_config_changed_grub {