- my $value = $cgi->param($option) || $part_export->option($option);
- $html .= qq!<TR><TD ALIGN="right">$label</TD><TD>!.
- qq!<TD><INPUT TYPE="text" NAME="$option" VALUE="$value"></TD>!.
+ my $value = $cgi->param($option)
+ || $part_export->option($option)
+ || (exists $optinfo->{default} ? $optinfo->{default} : '');
+ $html .= qq!<TR><TD ALIGN="right">$label</TD>!.
+ qq!<TD><INPUT TYPE="text" NAME="$option" VALUE="$value" SIZE=64></TD>!.