diff options
-rw-r--r-- | CGI.pl | 8 |
1 files changed, 8 insertions, 0 deletions
@@ -1065,7 +1065,15 @@ Content-type: text/html # (except for Bugzilla_login and Bugzilla_password which we # already added as text fields above). foreach my $i ( grep( $_ !~ /^Bugzilla_/ , keys %::FORM ) ) { + if (scalar(@{$::MFORM{$i}}) > 1) { + # This field has multiple values; add each one separately. + foreach my $val (@{$::MFORM{$i}}) { + print qq|<input type="hidden" name="$i" value="@{[value_quote($val)]}">\n|; + } + } else { + # This field has a single value; add it. print qq|<input type="hidden" name="$i" value="@{[value_quote($::FORM{$i})]}">\n|; + } } print qq| |