From 45dbc8fb3a9dbbef4ceea42953ef1875b4fa8276 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 17 Oct 2023 23:38:03 +0000 Subject: [PATCH] t/lei-up: additional diagnostics for match failures I'm not sure why, but this test just failed for some odd reason from `make check-run' on my Debian bullseye workstatation. --- t/lei-up.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/lei-up.t b/t/lei-up.t index baed65079..2d3afd82e 100644 --- a/t/lei-up.t +++ b/t/lei-up.t @@ -18,11 +18,11 @@ test_lei(sub { gunzip("$home/$x.mbox.gz" => \$uc, MultiStream => 1) or xbail "gunzip $GunzipError"; ok(index($uc, $qp->body_raw) >= 0, - "original mail in $x.mbox.gz"); + "original mail in $x.mbox.gz") or diag $uc; open my $fh, '<', "$home/$x" or xbail $!; $uc = do { local $/; <$fh> } // xbail $!; ok(index($uc, $qp->body_raw) >= 0, - "original mail in uncompressed $x"); + "original mail in uncompressed $x") or diag $uc; } lei_ok qw(ls-search); $s = eml_load('t/utf8.eml')->as_string; -- 2.47.2