diff options
Diffstat (limited to 'Rpmdrake/gui.pm')
| -rw-r--r-- | Rpmdrake/gui.pm | 5 |
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); |