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.pm9
1 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 6e08d3824..5f5d4384f 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -643,11 +643,10 @@ wait for default boot.
}
}
}
- foreach ('secure', 'enterprise', 'smp') {
- if (get_label("linux-$_", $bootloader)) {
- $bootloader->{default} ||= "linux-$_";
- last;
- }
+
+ my @preferred = map { "linux-$_" } 'p3-smp-64GB', 'secure', 'enterprise', 'smp', 'i686-up-4GB';
+ if (my $preferred = find { get_label($_, $bootloader) } @preferred) {
+ $bootloader->{default} ||= $preferred;
}
$bootloader->{default} ||= "linux";
$bootloader->{method} ||= first(method_choices($fstab, $bootloader));