summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c>2016-10-26 16:11:03 +0000
committertv <tv@971eb68f-4bfb-0310-8326-d2484c010a4c>2016-10-26 16:11:03 +0000
commit096dfdb61e1a1ae1a05cbf02371dd22232f31681 (patch)
treebe944d90581fc94a6a86ea2284a03d9412058a7b
parent9a9f859245f6bf362d1672f406219d4b10f6f3d8 (diff)
downloadperl-RPM4-096dfdb61e1a1ae1a05cbf02371dd22232f31681.tar
perl-RPM4-096dfdb61e1a1ae1a05cbf02371dd22232f31681.tar.gz
perl-RPM4-096dfdb61e1a1ae1a05cbf02371dd22232f31681.tar.bz2
perl-RPM4-096dfdb61e1a1ae1a05cbf02371dd22232f31681.tar.xz
perl-RPM4-096dfdb61e1a1ae1a05cbf02371dd22232f31681.zip
reenable some tests
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@264 971eb68f-4bfb-0310-8326-d2484c010a4c
-rw-r--r--RPM4/NEWS1
-rw-r--r--RPM4/t/05transaction.t6
2 files changed, 4 insertions, 3 deletions
diff --git a/RPM4/NEWS b/RPM4/NEWS
index 55df342..602cddc 100644
--- a/RPM4/NEWS
+++ b/RPM4/NEWS
@@ -1,4 +1,5 @@
- fix segfault in testsuite
+- reenable some tests
Version 0.35 - 1 August 2015
diff --git a/RPM4/t/05transaction.t b/RPM4/t/05transaction.t
index dfee605..fe6e405 100644
--- a/RPM4/t/05transaction.t
+++ b/RPM4/t/05transaction.t
@@ -2,7 +2,7 @@
# $Id$
use strict;
-use Test::More tests => 43;
+use Test::More tests => 45;
use FindBin qw($Bin);
use File::Path;
use File::Temp qw(tempdir);
@@ -103,11 +103,11 @@ ok($ts->traverse(sub {
ok($found == 1, "The previously installed rpm is found");
ok($roffset > 0, "Retrieve offset db");
-#ok($ts->transremove_pkg("test-rpm(1.0-1mdk)") == 1, "Try to remove a rpm");
+ok($ts->transremove_pkg("test-rpm(1.0-1mdk)") == 1, "Try to remove a rpm");
ok($ts->transcheck == 0, "Checking transaction works");
ok(!defined($ts->transreset), "Reseting current transaction");
-#ok($ts->transremove($roffset), "Removing pkg from header and offset");
+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");