From 1282acf6b53a8cea447a254107659db4ae3b45a2 Mon Sep 17 00:00:00 2001
From: Adam Spiers <stow@adamspiers.org>
Date: Mon, 1 Apr 2024 22:56:32 +0100
Subject: [PATCH] t/stow: use like() instead of ok(... =~ /.../)

---
 t/stow.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/t/stow.t b/t/stow.t
index 9e97b48..b7260f5 100755
--- a/t/stow.t
+++ b/t/stow.t
@@ -101,7 +101,8 @@ subtest("Link to a new dir 'bin4' conflicts with existing non-dir so can't unfol
     $stow->plan_stow('pkg4');
     %conflicts = $stow->get_conflicts();
     is($stow->get_conflict_count, 1);
-    ok($conflicts{stow}{pkg4}[0] =~
+    like(
+        $conflicts{stow}{pkg4}[0],
         qr/existing target is neither a link nor a directory/
         => 'link to new dir bin4 conflicts with existing non-directory'
     );