[FormMagick-devel] CVS: formmagick/lib/CGI FormMagick.pm,1.26,1.27

[Shane L. <sr...@us...>]

Update of /cvsroot/formmagick/formmagick/lib/CGI
In directory usw-pr-cvs1:/tmp/cvs-serv881/formmagick/lib/CGI

Modified Files:
	FormMagick.pm 
Log Message:
Added more POD about what's required in the XML files, since I think
the example's getting sufficiently complicated.

Added SIZE as a supported option for TEXT, TEXTAREA, and SELECT.
See validtest if you want to watch how it works. 


Index: FormMagick.pm
===================================================================
RCS file: /cvsroot/formmagick/formmagick/lib/CGI/FormMagick.pm,v
retrieving revision 1.26
retrieving revision 1.27
diff -C2 -r1.26 -r1.27
*** FormMagick.pm	2001/03/13 17:14:27	1.26
--- FormMagick.pm	2001/03/13 17:54:50	1.27
***************
*** 491,494 ****
--- 491,495 ----
  	my $checked = $fieldinfo->{CHECKED};
  	my $multiple = $fieldinfo->{MULTIPLE};
+ 	my $size = $fieldinfo->{SIZE};
  
      $self->print_field_description($description) if $description;
***************
*** 521,525 ****
  									  		TAGMAKER => $tagmaker,
  					  						CHECKED => $checked,
! 											MULTIPLE => $multiple});
  	
  	
--- 522,527 ----
  									  		TAGMAKER => $tagmaker,
  					  						CHECKED => $checked,
! 											MULTIPLE => $multiple,
! 											SIZE=> $size});
  	
  	
***************
*** 1061,1064 ****
--- 1063,1067 ----
  	my $label = $forminfo->{'LABEL'};
   	my $multiple = $forminfo->{'MULTIPLE'};
+ 	my $size = $forminfo->{'SIZE'};
  	
  	#debug ($self, join(" ", @option_labels) );
***************
*** 1075,1078 ****
--- 1078,1082 ----
  		name => $fieldname,
  		multiple => $multiple,
+ 		size => $size,
  	    ) .  $tagmaker->option_group( 
  	    		value => @option_values, 
***************
*** 1102,1105 ****
--- 1106,1110 ----
  						    name => "$fieldname",
  						    value => "$value",
+ 							size => "$size",
  						    );
      }
***************
*** 1327,1331 ****
      Your card will be charged within 48 hours.">
        <FIELD ID="cardtype" LABEL="Credit card type" TYPE="SELECT" 
!         OPTIONS="list_credit_card_types" VALIDATION="credit_card_type"/>
        <FIELD ID="cardnumber" LABEL="Credit card number" TYPE="TEXT" 
          VALIDATION="credit_card_number"/>
--- 1332,1337 ----
      Your card will be charged within 48 hours.">
        <FIELD ID="cardtype" LABEL="Credit card type" TYPE="SELECT" 
!         OPTIONS="list_credit_card_types" VALIDATION="credit_card_type"
! 		MULTIPLE="NO"/>
        <FIELD ID="cardnumber" LABEL="Credit card number" TYPE="TEXT" 
          VALIDATION="credit_card_number"/>
***************
*** 1345,1349 ****
  is planned for a future release.
  
! =head2 Field types
  
  The following values are permitted in the TYPE attribute of the FIELD
--- 1351,1379 ----
  is planned for a future release.
  
! =head2 Field parameters
! 
! Fields must ALWAYS have an ID value. Optional parameters are:
! 
! =over 4
! 
! =item * LABEL (a short description)
! 
! =item * DESCRIPTION (a more verbose description)
! 
! =item * VALUE (the default value)
! 
! =item * VALIDATION (a list of validation functions: see CGI::FM::Validator)
! 
! =item * VALIDATION-ERROR-MESSAGE
! 
! =item * TYPE (see below)
! 
! =item * OPTIONS (see below)
! 
! =item * CHECKED (for CHECKBOX fields, does this start off checked?)
! 
! =item * MULTIPLE (for SELECT fields, can user select more than one value?)
! 
! =item * SIZE (for SELECT fields, height; for TEXT and TEXTAREA fields, length)
  
  The following values are permitted in the TYPE attribute of the FIELD