diff options
Diffstat (limited to 'RPM4')
| -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"); |