summaryrefslogtreecommitdiffstats
path: root/t/superuser--split-transactions--strict-require.t
diff options
context:
space:
mode:
Diffstat (limited to 't/superuser--split-transactions--strict-require.t')
-rw-r--r--t/superuser--split-transactions--strict-require.t25
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');
}