Typo fixes in obsolete P5 regex syntax detectors.

perl6 · Jun 27, 2012 · fd2647b · fd2647b
1 parent 30385f8
commit fd2647b
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/STD.pm6 b/STD.pm6
@@ -4964,10 +4964,10 @@ grammar Regex is STD {
     }
 
     token metachar:sym<(?: )> { '(?:' <.obs("(?: ... ) for grouping", "[ ... ]")> }
-    token metachar:sym<(?= )> { '(?:' <.obs("(?= ... ) for lookahead", "<?before ... >")> }
-    token metachar:sym<(?! )> { '(?:' <.obs("(?! ... ) for lookahead", "<!before ... >")> }
-    token metachar:sym<(?\<= )> { '(?:' <.obs("(?<= ... ) for lookbehind", "<?after ... >")> }
-    token metachar:sym<(?\<! )> { '(?:' <.obs("(?<! ... ) for lookbehind", "<!after ... >")> }
+    token metachar:sym<(?= )> { '(?=' <.obs("(?= ... ) for lookahead", "<?before ... >")> }
+    token metachar:sym<(?! )> { '(?!' <.obs("(?! ... ) for lookahead", "<!before ... >")> }
+    token metachar:sym<(?\<= )> { '(?<=' <.obs("(?<= ... ) for lookbehind", "<?after ... >")> }
+    token metachar:sym<(?\<! )> { '(?<!' <.obs("(?<! ... ) for lookbehind", "<!after ... >")> }
     token metachar:sym<( )> {
         :dba("capture parens")
         '(' ~ ')' <nibbler>