diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-11-01 17:39:04 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-11-06 11:20:57 +0100 |
| commit | 5503525f4b98b2b06781b609d44d9ac78999e31d (patch) | |
| tree | f430677f1d306626321f1466df3bc4423e573d1d | |
| parent | 47719544a26daa4c83225b9d53b95771d67c2e4b (diff) | |
| download | perl-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
| -rw-r--r-- | RPM4/NEWS | 1 | ||||
| -rwxr-xr-x | RPM4/t/03rpmlib.t | 7 |
2 files changed, 6 insertions, 2 deletions
@@ -1,5 +1,6 @@ - cpan testers: o list dependancies + o skip a test with rpm-4.1[12] due to a segfault o use PkgConfig in order to find rpm Version 0.37 - 27 October 2017 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"); |