Changeset 42 in text-formbuilder for trunk/lib/Text/FormBuilder/grammar
- Timestamp:
- 12/09/04 11:33:17 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/Text/FormBuilder/grammar
r39 r42 75 75 76 76 validate_def: '!validate' var_name <perl_codeblock> 77 { $subs{$item{var_name}} = $item[3]}77 { $subs{$item{var_name}} = eval "sub $item[3]" } 78 78 79 79 group_def: '!group' { $context = 'group' } var_name '{' field_line(s) '}' { $context = 'line' }
Note: See TracChangeset
for help on using the changeset viewer.