From 0474105ebaa5a55bc5ed3964ee7a92de4bee4b2b Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Thu, 22 Jul 2021 08:37:36 +0000 Subject: t/solver_git: use like() to improve error reporting I hit a test failure here, but haven't been able to reproduce it... --- t/solver_git.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/solver_git.t b/t/solver_git.t index 13e478b3..fe1aff0b 100644 --- a/t/solver_git.t +++ b/t/solver_git.t @@ -84,7 +84,7 @@ index 15ac20eb..771486c4 @@ -1,13 +1,12 @@ #!perl -w EOM - ok(index($lei_out, $exp) >= 0, + like($lei_out, qr/\Q$exp\E/, 'preserve mode, regen header + context from -U0 patch'); my $e = { GIT_DIR => "$ENV{HOME}/.local/share/lei/store/ALL.git" }; my @x = xqx([qw(git cat-file --batch-all-objects --batch-check)], $e); -- cgit v1.2.3-24-ge0c7