- From: Ville Skytta via cvs-syncmail <cvsmail@w3.org>
- Date: Sat, 12 Sep 2009 14:49:30 +0000
- To: www-validator-cvs@w3.org
Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv8825
Modified Files:
check
Log Message:
Fix tidy output with "wide" characters (#7592).
Strangely, at least with Fedora 11's perl 5.10.0-73.fc11.x86_64, Encode 2.23,
Encode::decode_utf8(...) is documented to be equivalent to
Encode::decode("utf8", ...) but for some inputs the former has no problems
with, the latter barfs "Cannot decode string with wide characters" or results
in corrupt conversions. So switch to using the former.
Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.688
retrieving revision 1.689
diff -u -d -r1.688 -r1.689
--- check 12 Sep 2009 14:29:28 -0000 1.688
+++ check 12 Sep 2009 14:49:28 -0000 1.689
@@ -1220,7 +1220,7 @@
require HTML::Tidy;
my $tidy = HTML::Tidy->new({config_file => $CFG->{Paths}->{TidyConf}});
my $cleaned = $tidy->clean(join("\n", @{$File->{Content}}));
- $cleaned = Encode::decode('utf-8', $cleaned);
+ $cleaned = Encode::decode_utf8($cleaned);
$File->{Tidy} = $cleaned;
};
$File->{Tidy_OK} = !$@;
Received on Saturday, 12 September 2009 15:01:21 UTC