X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fpart_export.cgi;h=6a8a0deb69dfcda9c6fbb018adf5104e3da53881;hb=2c757d7db4cb6a7b9655de13206fcc84fb7ce61f;hp=839a114fbf0d85e5a4576760935d0a6e4a15888d;hpb=6b081fe282b98f7075b83c107bc598d4fa3b7b2f;p=freeside.git
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi
index 839a114fb..6a8a0deb6 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,19 +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!
-<%= header("$action Export", menubar(
+<%= include("/elements/header.html","$action Export", menubar(
'Main Menu' => popurl(2),
), ' onLoad="visualize()"')
%>