summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2022-04-26 22:16:34 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2022-04-27 00:05:48 +0200
commite2c45e167796ffb6d6d5c21e0fadfec82d2d4ebf (patch)
tree2a78e9c046a15af35f9281797b8dbd7f2842fa33
parent44a3df205e31fc4c8d5a83925efb0cd0f7cf3cca (diff)
downloadperl-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.t5
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");