Author: richter Date: Wed Nov 19 05:34:26 2014 New Revision: 1640490 URL: http://svn.apache.org/r1640490 Log: Create empty validate function, in case there is no validate in the form
Modified: perl/embperl/trunk/Embperl/Form.pm Modified: perl/embperl/trunk/Embperl/Form.pm URL: http://svn.apache.org/viewvc/perl/embperl/trunk/Embperl/Form.pm?rev=1640490&r1=1640489&r2=1640490&view=diff ============================================================================== --- perl/embperl/trunk/Embperl/Form.pm (original) +++ perl/embperl/trunk/Embperl/Form.pm Wed Nov 19 05:34:26 2014 @@ -582,6 +582,7 @@ sub init_validate } else { + $self -> add_code_at_bottom (" function epform_validate_$self->{formname} () { return false } ") ; $self -> {validate} = 0 ; } } --------------------------------------------------------------------- To unsubscribe, e-mail: embperl-cvs-unsubscr...@perl.apache.org For additional commands, e-mail: embperl-cvs-h...@perl.apache.org