- enhance sorted graph by better taking into account conflicts from state->{rejected}

  (fixes "big transaction" in urpmi split-transactions--strict-require.t test)

2 files changed, 12 insertions, 1 deletions

diff --git a/NEWS b/NEWS
index 9e1feb7..99dccf5 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,6 @@
+- enhance sorted graph by better taking into account conflicts from state->{rejected}
+  (fixes "big transaction" in urpmi split-transactions--strict-require.t test)
+
 Version 2.04 - 27 September 2007, by Pascal "Pixel" Rigaux
 
 - handle promotion via obsolete, not only provides
diff --git a/URPM/Resolve.pm b/URPM/Resolve.pm
index 82a1890..2d68424 100644
--- a/URPM/Resolve.pm
+++ b/URPM/Resolve.pm
@@ -1641,9 +1641,17 @@ sub _sort_by_dependencies__add_obsolete_edges {
 
     my @obsoletes = grep { $_->{obsoleted} } values %{$state->{rejected}} or return;
     my @groups = grep { @$_ > 1 } map { [ keys %{$_->{closure}} ] } @obsoletes;
+    my %groups;
+    foreach my $group (@groups) {
+	_add_group(\%groups, $group);
+	foreach (@$group) {
+	    my $rej = $state->{rejected}{$_} or next;
+	    _add_group(\%groups, [ $_, keys %{$rej->{closure}} ]);
+	}
+    }
 
     my %fullnames = map { scalar($urpm->{depslist}[$_]->fullname) => $_ } @$l;
-    foreach my $group (@groups) {
+    foreach my $group (uniq(values %groups)) {
 	my @group = grep { defined $_ } map { $fullnames{$_} } @$group;
 	foreach (@group) {
 	    @{$requires->{$_}} = uniq(@{$requires->{$_}}, @group);