add a simple test that shows urpmi promotes pkgs when a strict require fails

1 files changed, 12 insertions, 13 deletions

diff --git a/t/superuser--split-transactions--strict-require.t b/t/superuser--split-transactions--strict-require.t
index f89947d8..f1493857 100644
--- a/t/superuser--split-transactions--strict-require.t
+++ b/t/superuser--split-transactions--strict-require.t
@@ -1,12 +1,8 @@
 #!/usr/bin/perl
 
-# a requires b : bb or b
-# bb requires c-1
-# b requires c-2
-# b obsoletes bb
+# a-1 requires b-1
+# a-2 requires b-2
 #
-# upgrading { bb, c-1 } to { b, c-2 } must be done in the same transaction,
-# otherwise { c-1 } to { c-2 } implies removing { a, bb }
 use strict;
 use lib '.', 't';
 use helper;
@@ -19,15 +15,18 @@ my $name = 'split-transactions--strict-require';
 urpmi_addmedia("$name-1 $::pwd/media/$name-1");    
 urpmi_addmedia("$name-2 $::pwd/media/$name-2");
 
-test('--split-length 0');
-test('--split-level 1'); # was broken (#31969)
+test('--split-length 0 b');
+test('--split-level 1 b');
+
+test('--split-length 0 --auto-select');
+test('--split-level 1 --auto-select');
 
 sub test {
-    my ($option) = @_;
+    my ($para) = @_;
 
-    urpmi("--media $name-1 --auto a");
-    check_installed_fullnames('a-1-1', 'bb-1-1', 'c-1-1');
+    urpmi("--media $name-1 --auto a b");
+    check_installed_names('a', 'b');
 
-    urpmi("--media $name-2 $option --auto --auto-select");
-    check_installed_fullnames_and_remove('a-1-1', 'b-2-1', 'c-2-1');
+    urpmi("--media $name-2 --auto $para");
+    check_installed_fullnames_and_remove('a-2-1', 'b-2-1');
 }