diff options
| author | ivan <ivan> | 2003-06-13 08:44:52 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-06-13 08:44:52 +0000 |
| commit | 499b8660e2aa5632fc14e8fcfa6631800ade1e35 (patch) | |
| tree | a714081ac0a52b3dd82ef8c63a1be0e144ccc333 /httemplate/edit/part_export.cgi | |
| parent | 4a02b0fa8b35533d8d938941cbb5ca89903132c0 (diff) | |
correct stickiness for checkbox options on export edit
Diffstat (limited to 'httemplate/edit/part_export.cgi')
| -rw-r--r-- | httemplate/edit/part_export.cgi | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi index 4defbc8..0590549 100644 --- a/httemplate/edit/part_export.cgi +++ b/httemplate/edit/part_export.cgi @@ -72,7 +72,9 @@ my $widget = new HTML::Widgets::SelectLayers( } elsif ( $type eq 'text' ) { $html .= qq!<INPUT TYPE="text" NAME="$option" VALUE="$value" SIZE=64>!; } elsif ( $type eq 'checkbox' ) { - $html .= qq!<INPUT TYPE="checkbox" NAME="$option" VALUE="1">!; + $html .= qq!<INPUT TYPE="checkbox" NAME="$option" VALUE="1"! + $html .= ' CHECKED' if $value; + $html .= '>'; } else { $html .= "unknown type $type"; } |