diff options
Diffstat (limited to 't/superuser--split-transactions--strict-require.t')
-rw-r--r-- | t/superuser--split-transactions--strict-require.t | 25 |
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'); } |