00dani/stow
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

t/unstow_orig.t: use like() for regexp matching tests

Browse source 
This is better because it outputs the mismatching value when
the matching check fails.
This commit is contained in:
Adam Spiers 2024-04-06 11:58:56 +01:00
parent 599944bce1
commit 6d6781dcef
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
t/unstow_orig.t
View file

@ -330,8 +330,9 @@ subtest("Unstowing when target contains a real file shouldn't be an issue", sub
is($stow->get_tasks, 0, 'no tasks to process when unstowing pkg12 for third time'); is($stow->get_tasks, 0, 'no tasks to process when unstowing pkg12 for third time');
%conflicts = $stow->get_conflicts; %conflicts = $stow->get_conflicts;
is($stow->get_conflict_count, 1); is($stow->get_conflict_count, 1);
ok($conflicts{unstow}{pkg12}[0] like(
=~ m!existing target is neither a link nor a directory: man12/man1/file12\.1! $conflicts{unstow}{pkg12}[0],
qr!existing target is neither a link nor a directory: man12/man1/file12\.1!
=> 'unstow pkg12 for third time' => 'unstow pkg12 for third time'
); );
}); });