From cbb395b92b08e7e95a277f88474873a5ea5805fb Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Fri, 3 May 2019 08:46:55 +0200
Subject: [PATCH] workaround for RT#129403
---
t/1-basic.t | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/t/1-basic.t b/t/1-basic.t
index b5b3311..8f83b80 100755
--- a/t/1-basic.t
+++ b/t/1-basic.t
@@ -10,7 +10,10 @@ ok("Hello, world" =~ /(?<=Hello|Hi), (world)/);
is($1, 'world');
no re::engine::PCRE;
-is(eval '"Hello, world" =~ /(?<=Moose|Mo), (world)/', undef);
+{
+ local $TODO = "Does not fail anymore since perl 5.29.x; need another failure case";
+ is(eval '"Hello, world" =~ /(?<=Moose|Mo), (world)/', undef);
+}
if (fork) {
ok(1);
--
2.1.4