From 0522831b021c55984699ce20fd4e19950d055161 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 19 Apr 2002 22:24:20 +0000
Subject: [PATCH] fix form_select, should work now

---
 SelectLayers.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/SelectLayers.pm b/SelectLayers.pm
index 58e1700..6acb19d 100644
--- a/SelectLayers.pm
+++ b/SelectLayers.pm
@@ -127,6 +127,8 @@ sub html {
     exists($self->{form_text}) ? $self->{form_text} : [];
   my $form_checkbox =
     exists($self->{form_checkbox}) ? $self->{form_checkbox} : [];
+  my $form_select =
+    exists($self->{form_select}) ? $self->{form_select} : [];
 
   my $html = $self->_safeonload.
              $self->_visualize.
@@ -157,7 +159,7 @@ END
     $html .= <<END;
       <FORM NAME="${key}$layer" ACTION="$form_action" METHOD=POST onSubmit="${key}fixup(this)">
 END
-    foreach my $f ( @$form_text, @$form_checkbox ) {
+    foreach my $f ( @$form_text, @$form_checkbox, @$form_select ) {
       $html .= <<END;
         <INPUT TYPE="hidden" NAME="$f" VALUE="">
 END
-- 
2.11.0