diff options
author | ivan <ivan> | 2004-03-24 15:38:49 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-03-24 15:38:49 +0000 |
commit | 0b2226da8fe347736b32ff293a99ed2f5a9db71c (patch) | |
tree | cd83bc798ce55ed5001c0390925393a5ae002d39 | |
parent | 2aa498df9ee8bda6b29bb63a04376f4ce2688138 (diff) |
catch misconfigured exports
-rw-r--r-- | httemplate/edit/part_export.cgi | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/httemplate/edit/part_export.cgi b/httemplate/edit/part_export.cgi index 4d0c7391f..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) |