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


Ignore:
Timestamp:
06/29/05 16:02:34 (19 years ago)
Author:
peichman
Message:

added !fb directive to hold FB parameters as YAML serialized values
updated and expanded the documentation

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lib/Text/FormBuilder/grammar

    r84 r87  
    4040        %formspec = ();  # clear the old formspec data 
    4141    } 
    42     (list_def | description_def | group_def | note | unknown_block_directive | line)(s) 
     42    (list_def | description_def | group_def | note | fb_params | unknown_block_directive | line)(s) 
    4343    { 
    4444        # grab the last section, if there is any 
     
    5353         
    5454        $return = { 
    55             title    => $formspec{title}, 
    56             author   => $formspec{author}, 
     55            fb_params   => $formspec{fb_params}, 
     56            title       => $formspec{title}, 
     57            author      => $formspec{author}, 
    5758            description => $formspec{description}, 
    58             lists    => \%lists, 
    59             patterns => \%patterns, 
    60             subs     => \%subs, 
    61             groups   => \%groups, 
    62             sections => \@sections, 
     59            lists       => \%lists, 
     60            patterns    => \%patterns, 
     61            subs        => \%subs, 
     62            groups      => \%groups, 
     63            sections    => \@sections, 
    6364            ( @submit ?  
    6465                (submit => @submit == 1 ? $submit[0] : \@submit) : 
    6566                () 
    6667            ), 
    67             reset => $formspec{reset}, 
     68            reset       => $formspec{reset}, 
    6869        } 
    6970    } 
     
    173174group_name: /%[A-Z_]+/ 
    174175 
     176# parameters that get passed to the FB constructor; these are serialized in YAML 
     177fb_params: '!fb' block 
     178    { $formspec{fb_params} .= $item{block}; } 
     179 
    175180field_group: name label(?) hint(?) group_type comment(?) 
    176181    { 
     
    189194# this is the real heart of the thing 
    190195field: name field_size(?) growable(?) label(?) hint(?) type(?) multi(?) other(?) default(?) option_list(?) validate(?) comment(?) 
    191     { 
     196    {    
    192197        my $field = { 
    193198            name     => $item{name}, 
Note: See TracChangeset for help on using the changeset viewer.