Changeset 84 in text-formbuilder

Timestamp:

05/11/05 14:28:57 (20 years ago)

Author:

peichman

Message:

added support for the 'multiple' attribute on fields

Location:

trunk

Files:

• Changes (modified) (1 diff)
• lib/Text/FormBuilder.pm (modified) (2 diffs)
• lib/Text/FormBuilder/grammar (modified) (5 diffs)
• t/01-field.t (modified) (1 diff)

trunk/Changes

@@ -2 +2 @@
 
 0.11
+    * added support for the 'multiple' attribute on fields
     * added as_script and as_module methods that just return the
       Perl code

trunk/lib/Text/FormBuilder.pm

@@ -1135 +1135 @@
     static
 
+For multi-select fields, append a C<*> to the field type:
+
+    colors:select*
+
 To change the size of the input field, add a bracketed subscript after the
 field name (but before the descriptive label):
@@ -1291 +1295 @@
 =head2 Language/Parser
 
-Support the C<multiple> attribute for a field.
-
 Make sure that multiple runs of the parser don't share data.
 

trunk/lib/Text/FormBuilder/grammar

@@ -19 +19 @@
         @options,
         $required,
+        $multiple,
         $list_var,
         $size,
@@ -187 +188 @@
 
 # this is the real heart of the thing
-field: name field_size(?) growable(?) label(?) hint(?) type(?) other(?) default(?) option_list(?) validate(?) comment(?)
+field: name field_size(?) growable(?) label(?) hint(?) type(?) multi(?) other(?) default(?) option_list(?) validate(?) comment(?)
     {
         my $field = {
@@ -194 +195 @@
             label    => $item{'label(?)'}[0],
             comment  => $item{'hint(?)'}[0],
+            multiple => $item{'multi(?)'}[0],
             type     => $item{'type(?)'}[0],
             other    => $item{'other(?)'}[0],
@@ -218 +220 @@
         $type = undef;
         $required = undef;
+        $multiple = undef;
         $list_var = undef;
         $size = undef;
@@ -254 +257 @@
 builtin_field: /textarea|text|password|file|checkbox|radio|select|hidden|static/
 
+multi: '*' { 1 }
+
 other: '+' 'other' { 1 }
 

trunk/t/01-field.t

@@ -12 +12 @@
     label    => undef,
     list     => undef,
+    multiple => undef,
     name     => undef,
     other    => undef,