From 872088062e1be624952038424854b5bd454d6307 Mon Sep 17 00:00:00 2001 From: Frédéric Buclin Date: Wed, 15 Aug 2012 21:29:25 +0200 Subject: Bug 771100: Unable to attach a file to a bug with perl 5.16 r=dkl a=LpSolit --- Bugzilla/CGI.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Bugzilla/CGI.pm') diff --git a/Bugzilla/CGI.pm b/Bugzilla/CGI.pm index e0e1c40ba..21d4303a8 100644 --- a/Bugzilla/CGI.pm +++ b/Bugzilla/CGI.pm @@ -353,7 +353,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; } -- cgit v1.2.3-24-g4f1b