diff options
Diffstat (limited to 't/superuser--split-transactions--strict-require.t')
-rw-r--r-- | t/superuser--split-transactions--strict-require.t | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/t/superuser--split-transactions--strict-require.t b/t/superuser--split-transactions--strict-require.t new file mode 100644 index 00000000..e6d60a3d --- /dev/null +++ b/t/superuser--split-transactions--strict-require.t @@ -0,0 +1,33 @@ +#!/usr/bin/perl + +# a requires b : bb-1 or b-2 +# bb requires c-1 +# b requires c-2 +# b obsoletes bb +# +# 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; +use urpm::util; +use Test::More 'no_plan'; + +need_root_and_prepare(); + +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'); # broken (#31969) + +sub test { + my ($option) = @_; + + urpmi("--media $name-1 --auto a"); + check_installed_fullnames('a-1-1', 'bb-1-1', 'c-1-1'); + + urpmi("--media $name-2 $option --auto --auto-select"); + check_installed_fullnames_and_remove('a-1-1', 'b-2-1', 'c-2-1'); +} |