Fixed #10967: Using a round bracket (parenthesis) in a macro. Unbalanced parentheses can now be escaped in macro calls using the backslash character.

2009-09-14 14:27:14 -04:00 · 2009-09-14 14:27:14 -04:00 · a48b16dbfc
commit a48b16dbfc
parent f40992f217
5 changed files with 55 additions and 2 deletions
--- a/lib/WebGUI/Macro.pm
+++ b/lib/WebGUI/Macro.pm
@ -46,7 +46,9 @@ my $parenthesis;
 $parenthesis = qr{
    \(                      # Start with '(',
    (?:                     # Followed by
-        (?>[^()]+)              # Non-parenthesis
+        (?>\\[()])              # Escaped parenthesis
+    |                       # or
+        (?>[^()])               # Non-parenthesis
    |                       # or
        (??{ $parenthesis })    # a balanced parenthesis block
    )*                      # zero or more times