Skip to content

Commit 84b072a

Browse files
committed
match only against whole words
1 parent 7770a5c commit 84b072a

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

xt/braces.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -24,12 +24,12 @@ sub test-it(Str $output, Str $file) {
2424

2525
my $line = $output.subst(/\s+/, ' ', :g); # canonicalize whitespace
2626

27-
if $line ~~ /:i <!after curly> ' ' 'braces' / {
27+
if $line ~~ /:i <!after curly> ' ' 'braces' >> / {
2828
$msg ~= "Found 'braces' without 'curly'. ";
2929
$ok = False;
3030
}
3131

32-
if $line ~~ /:i <!after square><!after angle> ' ' ('bracket' [s|ed]?) / {
32+
if $line ~~ /:i <!after square><!after angle> ' ' ('bracket' [s|ed]?) >> / {
3333
$msg ~= "Found '{~$0}' without 'square' or 'angle'.";
3434
$ok = False;
3535
}

0 commit comments

Comments
 (0)