From fd521832774555c4fafd1513e319f4c81c7a67af Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 3 Jul 2008 16:39:37 +0000 Subject: handle transaction set with only removed packages (for upcoming orphans handling) --- urpm/main_loop.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'urpm/main_loop.pm') diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm index 5d7074e2..3dec70c8 100644 --- a/urpm/main_loop.pm +++ b/urpm/main_loop.pm @@ -172,7 +172,7 @@ foreach my $set (@{$state->{transaction} || []}) { } } - if (keys(%transaction_sources_install) || keys(%transaction_sources)) { + if (keys(%transaction_sources_install) || keys(%transaction_sources) || $set->{remove}) { if ($parallel) { print N("distributing %s", join(' ', values %transaction_sources_install, values %transaction_sources)), "\n"; #- no remove are handle here, automatically done by each distant node. @@ -185,7 +185,7 @@ foreach my $set (@{$state->{transaction} || []}) { ); } else { if ($options{verbose} >= 0) { - my @packnames = (values %transaction_sources_install, values %transaction_sources); + if (my @packnames = (values %transaction_sources_install, values %transaction_sources)) { (my $common_prefix) = $packnames[0] =~ m!^(.*)/!; if (length($common_prefix) && @packnames == grep { m!^\Q$common_prefix/! } @packnames) { #- there's a common prefix, simplify message @@ -193,6 +193,7 @@ foreach my $set (@{$state->{transaction} || []}) { } else { print N("installing %s", join "\n", @packnames), "\n"; } + } } my $to_remove = $urpm->{options}{'allow-force'} ? [] : $set->{remove} || []; bug_log(scalar localtime(), " ", join(' ', values %transaction_sources_install, values %transaction_sources), "\n"); -- cgit v1.2.1