- do propose "Suisse" after selecting french language (#34675)

- use time() to know when to timeout (when launching installer X server)

since the loop may be slower than 1 second (xf86misc::main::Xtest takes time

$best;

}

detect_devices::is_xbox() ? '-xbox' :

detect_devices::is_i586() ? '-desktop586' :

detect_devices::isLaptop() ? '-laptop' :

detect_devices::dmi_detect_memory() > 3.8 * 1024 ? '-server' :

'-desktop';

my @kernels = grep { $_ } map { packageByName($packages, "kernel$_-latest") } @preferred_exts;

log::l("bestKernelPackage (" . join(':', @preferred_exts) . "): " . join(' ', map { $_->name } @kernels) . (@kernels > 1 ? ' (choosing the first)' : ''));

if ($prefered && @$prefered) {

@$prefered;

@l;

} else {

log::l("packageCallbackChoices: default choice from " . join(",", map { $_->name } @$choices) . " for $virtual_pkg_name");

}

sub packageCallbackChoices_ {

my ($prefer, $_other) = urpm::select::get_preferred($urpm, $choices, '');

if (@$prefer) {

@$prefer;

} elsif ($choices->[0]->name =~ /^kernel-(.*source-|.*-devel-)/) {

my @l = grep {

if ($_->name =~ /^kernel-.*source-stripped-(.*)/) {