aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xrpmdrake6
1 files changed, 4 insertions, 2 deletions
diff --git a/rpmdrake b/rpmdrake
index 23991f89..4aa89c0f 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -617,9 +617,11 @@ sub run_treeview_dialog {
}
}
my $callback = sub { interactive_msg_(N("More information on package..."), $options->{get_info}->($_[0]), scroll => 1) };
- $choices->[interactive_list_(N("Please choose"), N("One of the following packages is needed:"),
- [ map { my_fullname($_) } @$choices ], $callback)];
+ my @choices = interactive_list_(N("Please choose"), N("One of the following packages is needed:"),
+ [ map { my_fullname($_) } @$choices ], $callback);
+ $choices->[@choices];
};
+
my $closure_removal = sub {
my @to_remove;
$urpm->{state} = {};