Changeset 59 in text-formbuilder for trunk/lib/Text/FormBuilder

Timestamp:

01/31/05 14:58:23 (20 years ago)

Author:

peichman

Message:

added a class="fieldgroup" attr to field group spans
added a brace_block to the parser, to parse [...] with nested [...]'s

File:

• trunk/lib/Text/FormBuilder/grammar (modified) (1 diff)

trunk/lib/Text/FormBuilder/grammar

@@ -234 +234 @@
 value: identifier
 
-display_text: '[' /[^\]]+/i ']'    { $item[2] }
+display_text: brace_block
+    { (my $text = $item[1]) =~ s/^\[\s*|\s*\]$//g; $text }
+
+# square brace delimited block, that can contain properly
+# nested square braces, along with any other characters
+# return with the '[...]' so that nested blocks get the
+# braces treated as literals
+brace_block: '[' <skip:''> brace_block_content(s) ']'
+    {
+        '[' . join('', @{ $item[3] }) . ']';
+    }
+brace_block_content: /[^\[\]]+?/ | brace_block
+
 
 validate: '//' (optional_pattern | required_pattern)    { $item[2] }