Changeset 59 in text-formbuilder for trunk/lib/Text/FormBuilder/grammar
- Timestamp:
- 01/31/05 14:58:23 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/Text/FormBuilder/grammar
r57 r59 234 234 value: identifier 235 235 236 display_text: '[' /[^\]]+/i ']' { $item[2] } 236 display_text: brace_block 237 { (my $text = $item[1]) =~ s/^\[\s*|\s*\]$//g; $text } 238 239 # square brace delimited block, that can contain properly 240 # nested square braces, along with any other characters 241 # return with the '[...]' so that nested blocks get the 242 # braces treated as literals 243 brace_block: '[' <skip:''> brace_block_content(s) ']' 244 { 245 '[' . join('', @{ $item[3] }) . ']'; 246 } 247 brace_block_content: /[^\[\]]+?/ | brace_block 248 237 249 238 250 validate: '//' (optional_pattern | required_pattern) { $item[2] }
Note: See TracChangeset
for help on using the changeset viewer.