(run_treeview_dialog) fix selecting the actually selected package in the

choice dialog

1 files changed, 1 insertions, 1 deletions

diff --git a/rpmdrake b/rpmdrake
index d17e24b1..07c5549b 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -672,7 +672,7 @@ sub run_treeview_dialog {
 	$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];
+     $choices->[$choices[0]];
     };
 
     my $closure_removal = sub {