Patch for bug 238683: fix for usage of uninitialized value in concatenation in Bugzil...

diff --git a/Bugzilla/CGI.pm b/Bugzilla/CGI.pm
index 40c160b83638656cfcb51d464bc05e72e14ad62b..21cfa19b2b282faccadaf87bd37c2e1fec0b396a 100644 (file)
--- a/Bugzilla/CGI.pm
+++ b/Bugzilla/CGI.pm
@@ -118,7 +118,7 @@ sub multipart_init {
     my($self,@p) = @_;
     my($boundary,$nph,@other) = rearrange(['BOUNDARY','NPH'],@p);
     $boundary = $boundary || '------- =_aaaaaaaaaa0';
-    $self->{'separator'} = "\r\n--$boundary$\r\n";
+    $self->{'separator'} = "\r\n--$boundary\r\n";
     $self->{'final_separator'} = "\r\n--$boundary--\r\n";
     my $type = SERVER_PUSH($boundary);
     return $self->header(