aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Rpmdrake/gui.pm12
1 files changed, 11 insertions, 1 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index fe3333df..a986d894 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -492,8 +492,18 @@ sub toggle_nodes {
my @deps = sort { $a cmp $b } difference2($nodes_with_deps, $nodes);
@deps > 0 or return 1;
deps_msg_again:
+ # workaround s/formatlistpkg()/urpm::select::translate_why_removed()/ introducing regression
+ # in (un)selecting packages with deps (#28613):
+ my $cmd = bg_command->new(sub {
+ my $str = urpm::select::translate_why_removed($urpm, $urpm->{state}, @deps);
+ print "$str\n";
+ });
+ my $fd = $cmd->{fd};
+ my $reasons;
+ local $_;
+ $reasons .= $_ while <$fd>;
my $results = interactive_msg(
- $title, $msg . urpm::select::translate_why_removed($urpm, $urpm->{state}, @deps),
+ $title, $msg . $reasons,
yesno => [ N("Cancel"), N("More info"), N("Ok") ],
scroll => 1,
);