Index: perl-CGI-FormMagick/perl-CGI-FormMagick.spec
diff -u perl-CGI-FormMagick/lib/CGI/FormMagick/HTML.pm:1.15 perl-CGI-FormMagick/lib/CGI/FormMagick/HTML.pm:1.16
--- perl-CGI-FormMagick/lib/CGI/FormMagick/HTML.pm:1.15	Thu Jul 15 11:45:02 2004
+++ perl-CGI-FormMagick/lib/CGI/FormMagick/HTML.pm	Tue Mar 29 18:17:20 2005
@@ -453,7 +453,15 @@
         ) .  $tagmaker->select_end;
 
     # nasty hack required here to select the desired value if it's preset
-        $inputfield =~ s/(<OPTION VALUE="$value")/$1 SELECTED/;
+        if (ref($value) eq 'ARRAY') {
+            foreach (@$value) {
+                $inputfield =~ s/(<OPTION VALUE="$_")/$1 SELECTED/;
+            }
+        } else {
+            foreach (split /\s*[;,]\s*/, $value) {
+                $inputfield =~ s/(<OPTION VALUE="$_")/$1 SELECTED/;
+            }
+        }
 
     } elsif ($info->{type} eq "radio") {
         my @labels = map { $fm->localise($_) } @{$info->{option_labels}};