summaryrefslogtreecommitdiffstats
path: root/RPM4/t
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2017-11-01 17:39:04 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2017-11-06 11:20:57 +0100
commit5503525f4b98b2b06781b609d44d9ac78999e31d (patch)
treef430677f1d306626321f1466df3bc4423e573d1d /RPM4/t
parent47719544a26daa4c83225b9d53b95771d67c2e4b (diff)
downloadperl-RPM4-5503525f4b98b2b06781b609d44d9ac78999e31d.tar
perl-RPM4-5503525f4b98b2b06781b609d44d9ac78999e31d.tar.gz
perl-RPM4-5503525f4b98b2b06781b609d44d9ac78999e31d.tar.bz2
perl-RPM4-5503525f4b98b2b06781b609d44d9ac78999e31d.tar.xz
perl-RPM4-5503525f4b98b2b06781b609d44d9ac78999e31d.zip
skip a test with rpm-4.1[12] due to a segfault
Diffstat (limited to 'RPM4/t')
-rwxr-xr-xRPM4/t/03rpmlib.t7
1 files changed, 5 insertions, 2 deletions
diff --git a/RPM4/t/03rpmlib.t b/RPM4/t/03rpmlib.t
index 13117b2..41f0f34 100755
--- a/RPM4/t/03rpmlib.t
+++ b/RPM4/t/03rpmlib.t
@@ -11,8 +11,11 @@ ok(! defined(RPM4::setverbosity("DEBUG")), "Set verbosity works");
my $marker = 0;
ok(!defined(RPM4::setlogcallback(sub { my %m = @_; $marker = 1; print "$m{priority}: $m{msg}\n" })),
"Setting log callback function works");
-ok(!defined(RPM4::rpmlog("ERR", "This is a rpm debug message")), "rpmlog function works");
-ok($marker == 1, "rpmlogcallback has been called");
+ SKIP: {
+ skip 'segfault in rpm-4.1[12]', 2 if `rpm --version` =~ /4\.1[12]\./;
+ ok(!defined(RPM4::rpmlog("ERR", "This is a rpm debug message")), "rpmlog function works");
+ ok($marker == 1, "rpmlogcallback has been called");
+};
}
ok(! defined(RPM4::setlogcallback(undef)), "remove callback function");
ok(RPM4::setlogfile("logfile"), "set a log file");