don't substitute defaults for empty options when editing exports
authorivan <ivan>
Sat, 24 Aug 2002 07:20:24 +0000 (07:20 +0000)
committerivan <ivan>
Sat, 24 Aug 2002 07:20:24 +0000 (07:20 +0000)
httemplate/edit/part_export.cgi

index 486bd43..bd427aa 100644 (file)
@@ -50,7 +50,10 @@ my $widget = new HTML::Widgets::SelectLayers(
       my $type = defined($optinfo->{type}) ? $optinfo->{type} : 'text';
       my $value = $cgi->param($option)
                   || $part_export->option($option)
-                  || (exists $optinfo->{default} ? $optinfo->{default} : '');
+                  || ( (exists $optinfo->{default} && !$part_export->exportnum)
+                       ? $optinfo->{default}
+                       : ''
+                     );
       $html .= qq!<TR><TD ALIGN="right">$label</TD><TD>!;
       if ( $type eq 'select' ) {
         $html .= qq!<SELECT NAME="$option">!;