aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake
diff options
context:
space:
mode:
Diffstat (limited to 'Rpmdrake')
-rw-r--r--Rpmdrake/gui.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 7cf196f6..e686fc71 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -703,7 +703,9 @@ sub is_locale_available {
}
sub callback_choices {
- my (undef, undef, undef, $choices) = @_;
+ my ($urpm, undef, undef, $choices) = @_;
+ my ($prefered, $other) = urpm::select::get_preferred($urpm, $choices, undef);
+ $choices = [ @$prefered, @$other ];
return $choices->[0] if $::rpmdrake_options{auto};
foreach my $pkg (@$choices) {
foreach ($pkg->requires_nosense) {
@@ -712,7 +714,6 @@ sub callback_choices {
}
}
my $callback = sub { interactive_msg(N("More information on package..."), get_info($_[0]), scroll => 1) };
- $choices = [ sort { $a->name cmp $b->name } @$choices ];
my @choices = interactive_list_(N("Please choose"), (scalar(@$choices) == 1 ?
N("The following package is needed:") : N("One of the following packages is needed:")),
[ map { urpm_name($_) } @$choices ], $callback, nocancel => 1);