Author: richter
Date: Sat Dec 24 05:14:08 2005
New Revision: 358931
URL: http://svn.apache.org/viewcvs?rev=358931&view=rev
Log:
Embperl::Form
Modified:
perl/embperl/trunk/Embperl/Form.pm
Modified: perl/embperl/trunk/Embperl/Form.pm
URL:
http://svn.apache.org/viewcvs/perl/embperl/trunk/Embperl/Form.pm?rev=358931&r1=358930&r2=358931&view=diff
==============================================================================
--- perl/embperl/trunk/Embperl/Form.pm (original)
+++ perl/embperl/trunk/Embperl/Form.pm Sat Dec 24 05:14:08 2005
@@ -53,7 +53,7 @@
$self -> {controls} = $controls ;
$self -> {id} = $id ;
$self -> {parentid} = $parentid ;
- $self -> {formname} = 'topform' ;
+ $self -> {formname} = $options -> {formname} || 'topform' ;
$self -> {bottom_code} = [] ;
$self -> {validate_rules} = [] ;
$self -> {toplevel} = $toplevel ;
@@ -724,6 +724,12 @@
Hash ref which can take the following parameters:
=over 4
+
+=item * formname
+
+Will be used as name and id attribute of the form. If you have more
+then one form on a page it's necessary to have different form names
+to make form validation work correctly.
=item * masks
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
