diff options
| -rw-r--r-- | Rpmdrake/gui.pm | 12 |
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, ); |