From: Eric Wong <e@80x24.org>
Date: Wed, 15 Nov 2023 01:04:57 +0000 (+0000)
Subject: t/lei-import: account for more verbose error
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=247282c2d38426eae6a471b2aeebbf5d449dbc3e;p=thirdparty%2Fpublic-inbox.git

t/lei-import: account for more verbose error

Perl 5.16.3 on CentOS seems more verbose in one of the EIO
tests.  Relax the regexp so we can account for extra errors
reported by Perl.
---

diff --git a/t/lei-import.t b/t/lei-import.t
index bd5626170..b4446b566 100644
--- a/t/lei-import.t
+++ b/t/lei-import.t
@@ -172,12 +172,12 @@ SKIP: {
 	tick; # wait for strace to attach
 	ok(!lei(qw(import -F eml t/plack-qp.eml)),
 		'-F eml import fails on pathname error injection');
-	like($lei_err, qr!error reading t/plack-qp\.eml: Input/output error!,
+	like($lei_err, qr!error reading t/plack-qp\.eml: .*Input/output error!,
 		'EIO noted in stderr');
 	open $fh, '<', 't/plack-qp.eml';
 	ok(!lei(qw(import -F eml -), undef, { %$lei_opt, 0 => $fh }),
 		'-F eml import fails on stdin error injection');
-	like($lei_err, qr!error reading .*?: Input/output error!,
+	like($lei_err, qr!error reading .*?: .*Input/output error!,
 		'EIO noted in stderr');
 }