Commit 366be504 authored by Frédéric Buclin's avatar Frédéric Buclin

Bug 771100: Unable to attach a file to a bug with perl 5.16

r=dkl a=LpSolit
parent faf9c432
...@@ -350,7 +350,7 @@ sub param { ...@@ -350,7 +350,7 @@ sub param {
sub _fix_utf8 { sub _fix_utf8 {
my $input = shift; my $input = shift;
# The is_utf8 is here in case CGI gets smart about utf8 someday. # 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; return $input;
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment