diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2022-04-26 22:16:34 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2022-04-27 00:05:48 +0200 |
commit | e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf (patch) | |
tree | 2a78e9c046a15af35f9281797b8dbd7f2842fa33 | |
parent | 44a3df205e31fc4c8d5a83925efb0cd0f7cf3cca (diff) | |
download | perl-RPM4-e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf.tar perl-RPM4-e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf.tar.gz perl-RPM4-e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf.tar.bz2 perl-RPM4-e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf.tar.xz perl-RPM4-e2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf.zip |
Reenable the removing transaction
-rw-r--r-- | RPM4/t/05transaction.t | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/RPM4/t/05transaction.t b/RPM4/t/05transaction.t index 289f0f9..2a27ae8 100644 --- a/RPM4/t/05transaction.t +++ b/RPM4/t/05transaction.t @@ -107,7 +107,8 @@ ok($ts->transremove($roffset), "Removing pkg from header and offset"); ok($ts->transorder == 0, "Run transaction order"); ok($ts->transcheck == 0, "Checking transaction works"); ok(defined($ts->transflag([qw(JUSTDB)])), "Set transflags"); -#ok($ts->transrun([ qw(LABEL PERCENT) ]) == 0, "Running transaction justdb"); +ok($ts->transrun(\&callback) == 0, "Running transaction justdb"); +process_problems(); $found = 0; @@ -120,7 +121,7 @@ ok($ts->traverse(sub { 1; }), "Running traverse"); -#ok($found == 0, "The previously removed rpm is not found"); +ok($found == 0, "The previously removed rpm is not found"); ok($ts->transadd($h, "test-rpm-1.0-1mdk.noarch.rpm", 1, "/usr", 1) == 0, "Adding a package to transaction with prefix"); ok($ts->transorder == 0, "Run transaction order"); |