X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fedit%2Fpart_export.cgi;h=b3d42bd9608c6ce2fee2874a057222e3c7b9800b;hb=af37880d5ac36f2b141b2eeeb1c7aa49a50d0c5b;hp=8a829e57a79c1828c46d1dfe8eb6727c21aef832;hpb=7f089ef86f1e695fabf6b046e00f8cef14af9000;p=freeside.git
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi
index 8a829e57a..b3d42bd96 100644
--- a/httemplate/edit/part_export.cgi
+++ b/httemplate/edit/part_export.cgi
@@ -46,6 +46,8 @@ my $widget = new HTML::Widgets::SelectLayers(
foreach my $option ( keys %{$exports->{$layer}{options}} ) {
my $optinfo = $exports->{$layer}{options}{$option};
+ die "Retreived non-ref export info option from $layer export: $optinfo"
+ unless ref($optinfo);
my $label = $optinfo->{label};
my $type = defined($optinfo->{type}) ? $optinfo->{type} : 'text';
my $value = $cgi->param($option)
@@ -60,18 +62,22 @@ my $widget = new HTML::Widgets::SelectLayers(
foreach my $select_option ( @{$optinfo->{options}} ) {
#if ( ref($select_option) ) {
#} else {
- $selected = $select_option eq $value ? ' SELECTED' : '';
+ my $selected = $select_option eq $value ? ' SELECTED' : '';
$html .= qq!!;
#}
}
$html .= '';
} elsif ( $type eq 'textarea' ) {
- $html .= qq!!;
+ $html .= qq!';
} elsif ( $type eq 'text' ) {
- $html .= qq!!;
+ $html .= qq!';
} elsif ( $type eq 'checkbox' ) {
- $html .= qq!!;
+ $html .= qq!