From: Frédéric Buclin <LpSolit@gmail.com>
Date: Wed, 15 Aug 2012 19:27:47 +0000 (+0200)
Subject: Bug 771100: Unable to attach a file to a bug with perl 5.16
X-Git-Tag: bugzilla-4.3.3~25
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=366be5044d13da8e493a3a1e3d7153a18470c170;p=thirdparty%2Fbugzilla.git

Bug 771100: Unable to attach a file to a bug with perl 5.16
r=dkl a=LpSolit
---

diff --git a/Bugzilla/CGI.pm b/Bugzilla/CGI.pm
index febbff6182..09907fb552 100644
--- a/Bugzilla/CGI.pm
+++ b/Bugzilla/CGI.pm
@@ -350,7 +350,7 @@ sub param {
 sub _fix_utf8 {
     my $input = shift;
     # The is_utf8 is here in case CGI gets smart about utf8 someday.
-    utf8::decode($input) if defined $input && !utf8::is_utf8($input);
+    utf8::decode($input) if defined $input && !ref $input && !utf8::is_utf8($input);
     return $input;
 }