(run_treeview_dialog) be more user-friendly by sorting packages by name

1 files changed, 1 insertions, 0 deletions

diff --git a/rpmdrake b/rpmdrake
index cc7eafd9..d17e24b1 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -669,6 +669,7 @@ sub run_treeview_dialog {
 	    }
 	}
 	my $callback = sub { interactive_msg_(N("More information on package..."), $options->{get_info}->($_[0]), scroll => 1) };
+	$choices = [ sort { $a->name cmp $b->name } @$choices ];
 	my @choices = interactive_list_(N("Please choose"), N("One of the following packages is needed:"),
                                      [ map { my_fullname($_) } @$choices ], $callback);
      $choices->[@choices];