match only against whole words

Raku · Nov 28, 2018 · 84b072a · 84b072a
1 parent 7770a5c
commit 84b072a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/xt/braces.t b/xt/braces.t
@@ -24,12 +24,12 @@ sub test-it(Str $output, Str $file) {
 
     my $line = $output.subst(/\s+/, ' ', :g); # canonicalize whitespace
 
-    if $line ~~ /:i <!after curly> ' ' 'braces' / {
+    if $line ~~ /:i <!after curly> ' ' 'braces' >> / {
         $msg ~= "Found 'braces' without 'curly'. ";
         $ok = False;
     }
 
-    if $line ~~ /:i <!after square><!after angle> ' ' ('bracket' [s|ed]?) / {
+    if $line ~~ /:i <!after square><!after angle> ' ' ('bracket' [s|ed]?) >> / {
         $msg ~= "Found '{~$0}' without 'square' or 'angle'.";
         $ok = False;
     }