From 573e3487d99e76a311cf4b82ba0af95943182d20 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 7 Sep 2007 11:45:59 +0000 Subject: add a test showing the lack of promotion --- ...user--split-transactions--strict-require-and-obsolete.t | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/t/superuser--split-transactions--strict-require-and-obsolete.t b/t/superuser--split-transactions--strict-require-and-obsolete.t index 6ad4aec9..f02cfbeb 100644 --- a/t/superuser--split-transactions--strict-require-and-obsolete.t +++ b/t/superuser--split-transactions--strict-require-and-obsolete.t @@ -22,6 +22,9 @@ urpmi_addmedia("$name-2 $::pwd/media/$name-2"); test('--split-length 0'); test('--split-level 1'); # was broken (#31969) +test_c('--split-length 0'); +test_c('--split-level 1'); + sub test { my ($option) = @_; @@ -31,3 +34,14 @@ sub test { urpmi("--media $name-2 $option --auto --auto-select"); check_installed_fullnames_and_remove('a-1-1', 'b-2-1', 'c-2-1'); } + +sub test_c { + my ($option) = @_; + + urpmi("--media $name-1 --auto a"); + check_installed_fullnames('a-1-1', 'bb-1-1', 'c-1-1'); + + #- below would need the promotion of "b" (obsoleting bb) to work + urpmi("--media $name-2 $option --auto c"); + check_installed_fullnames_and_remove('c-2-1'); # a and bb are removed +} -- cgit v1.2.1