summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorPeter Eisentraut <peter_e@gmx.net>2014-10-26 10:26:36 -0400
committerPeter Eisentraut <peter_e@gmx.net>2014-10-26 10:27:15 -0400
commit76e190d52225fc1124efc7d77f773643405b263e (patch)
treef083cc0ff3401ce7c6f50582d69519fdebab0c4d /src
parent6b531cd077eeacce25106f5456876b57ad68a834 (diff)
Fix TAP tests with Perl 5.12
Perl 5.12 ships with a somewhat broken version of Test::Simple, so skip the tests if that is found. The relevant fix is 0.98 Wed, 23 Feb 2011 14:38:02 +1100 Bug Fixes * subtest() should not fail if $? is non-zero. (Aaron Crane)
Diffstat (limited to 'src')
-rw-r--r--src/test/perl/TestLib.pm8
1 files changed, 8 insertions, 0 deletions
diff --git a/src/test/perl/TestLib.pm b/src/test/perl/TestLib.pm
index 545b2f3e502..fa8e67d0040 100644
--- a/src/test/perl/TestLib.pm
+++ b/src/test/perl/TestLib.pm
@@ -44,6 +44,14 @@ BEGIN
{
plan skip_all => "version of Test::More is too old to support subplans";
};
+
+ eval {
+ require Test::Simple;
+ Test::Simple->VERSION('0.98');
+ } or do
+ {
+ plan skip_all => "version of Test::Simple is too old to support subplans properly";
+ };
}
# Set to untranslated messages, to be able to compare program output