*** /var/tmp/,RCSt1a21503	Tue Feb 25 15:30:13 2003
--- /var/tmp/,RCSt2a21503	Tue Feb 25 15:30:13 2003
***************
*** 449,455
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text .= "<input type=\"hidden\" name=\"$theName\" value=\"$theValue\" />";
  
!     } else {  # if( $type eq "text" )
          $size = 16 if $size < 1;
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text = "<input type=\"text\" name=\"$theName\" size=\"$size\" value=\"$theValue\" />";

--- 449,463 -----
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text .= "<input type=\"hidden\" name=\"$theName\" value=\"$theValue\" />";
  
!     } elsif( $type eq "textarea" ) {
!         my ($rows, $cols) = split( /x/, $size );
!         $rows = 3 if $rows < 1;
!         $cols = 30 if $cols < 1;
! 
!         $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
!         $text .= "<textarea rows=\"$rows\" cols=\"$cols\" name=\"$theName\">$theValue</textarea>";
!         
!     } else { #  if( $type eq "text") 
          $size = 16 if $size < 1;
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text = "<input type=\"text\" name=\"$theName\" size=\"$size\" value=\"$theValue\" />";
***************
*** 453,459
          $size = 16 if $size < 1;
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text = "<input type=\"text\" name=\"$theName\" size=\"$size\" value=\"$theValue\" />";
!     }
      return $text;
  }
  

--- 461,467 -----
          $size = 16 if $size < 1;
          $theValue = $encodeStart . encodeValue( $theValue ) . $encodeEnd if $theValue;
          $text = "<input type=\"text\" name=\"$theName\" size=\"$size\" value=\"$theValue\" />";
!     }  
      return $text;
  }