Index: perl-CGI-FormMagick/perl-CGI-FormMagick.spec
diff -u perl-CGI-FormMagick/lib/CGI/FormMagick.pm:1.22 perl-CGI-FormMagick/lib/CGI/FormMagick.pm:1.23
--- perl-CGI-FormMagick/lib/CGI/FormMagick.pm:1.22	Tue May 17 15:21:25 2005
+++ perl-CGI-FormMagick/lib/CGI/FormMagick.pm	Fri May 20 16:34:24 2005
@@ -1144,13 +1144,13 @@
     if ($options_field =~ /=>/) {           # user supplied a hash  
         $self->debug_msg("options_ref should be a hashref");
         $options_ref = { eval $options_field }; # make options_ref a hashref
-    } elsif ($options_field =~ /,/) {       # user supplied an array
+    } elsif ($options_field =~ /,/ and not $options_field =~ /\(/) {
+        # user supplied an array
         $self->debug_msg("options ref should be an arrayref");
         $options_ref = [ eval $options_field ]; # make options_ref an arrayref
         $self->debug_msg("we have " . scalar(@$options_ref) . " elements");
     } else {                    # user supplied a sub name
         $self->debug_msg("i think i should call an external routine");
-        $options_field =~ s/\(.*\)$//;      # strip parens
         $options_ref = $self->do_external_routine($options_field);
     }
     return $options_ref;