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, 4 insertions, 0 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index e6428ae92..c685b86d1 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -593,6 +593,10 @@ wait %d seconds for default boot.
$bootloader->{method} = first(method_choices($fstab, $bootloader));
}
+sub detect_bootloader() {
+ chomp_(run_program::rooted_get_stdout($::prefix, 'detectloader'));
+}
+
sub method_choices {
my ($fstab, $bootloader) = @_;
my %choices = (