Bug 405404: HTML::Scrubber throws "undef error - Wide character in subroutine entry" when a field filtered with html_light contains UTF-8 characters - Patch by Fr��d��ric Buclin <LpSolit@gmail.com> r/a=mkanat

This commit is contained in:
lpsolit%gmail.com 2007-11-28 19:39:29 +00:00
Родитель c682d10bb8
Коммит 9dfa83b013
1 изменённых файлов: 1 добавлений и 8 удалений

Просмотреть файл

@ -107,8 +107,7 @@ sub html_light_quote {
require HTML::Parser;
};
# We need utf8_mode() from HTML::Parser 3.40.
if ($@ || $HTML::Parser::VERSION < 3.40) { # Package(s) not installed.
if ($@) { # Package(s) not installed.
my $safe = join('|', @allow);
my $chr = chr(1);
@ -172,12 +171,6 @@ sub html_light_quote {
comment => 0,
process => 0);
# Avoid filling the web server error log.
# In HTML::Scrubber 0.08, the HTML::Parser object is stored in
# the "_p" key, but this may change in future versions.
if (ref($scrubber->{_p}) eq 'HTML::Parser') {
$scrubber->{_p}->utf8_mode(1);
}
return $scrubber->scrub($text);
}
}