[Bug 1092015] mojomojo-1.10-2.fc21 FTBFS

bugzilla at redhat.com bugzilla at redhat.com
Mon Apr 28 14:19:41 UTC 2014


https://bugzilla.redhat.com/show_bug.cgi?id=1092015



--- Comment #1 from Petr Pisar <ppisar at redhat.com> ---
The test is:

$test = 'Unicode wikilinks';
my $unicode_string = 'განეკუთვნება';
$content = "[[$unicode_string]]";
$mech->post('/.jsrpc/render', { content => $content });
$mech->content_is(<<"HTML", $test);
<p><span class="newWikiWord"><a title="Not found. Click to create this page."
href="/$unicode_string.edit">$unicode_string?</a></span></p>
HTML

The Encode::decode_utf8() complains on:

"\x{10d2}\x{10d0}\x{10dc}\x{10d4}\x{10d9}\x{10e3}\x{10d7}\x{10d5}\x{10dc}\x{10d4}\x{10d1}\x{10d0}"

$ perl -MEncode -e
'decode_utf8(qq{\x{10d2}\x{10d0}\x{10dc}\x{10d4}\x{10d9}\x{10e3}\x{10d7}\x{10d5}\x{10dc}\x{10d4}\x{10d1}\x{10d0}},
1)'
Cannot decode string with wide characters at
/usr/lib64/perl5/vendor_perl/Encode.pm line 215.

The \x{} notation corresponds to the 'განეკუთვნება' string.

It looks like the unicode string is double-decoded, second decoding is
performed on string with UTF-8 flag up instead of on bit-stream.

-- 
You are receiving this mail because:
You are on the CC list for the bug.
Unsubscribe from this bug https://bugzilla.redhat.com/token.cgi?t=liHASe49Id&a=cc_unsubscribe


More information about the perl-devel mailing list