forked from pool/perl-SGML-Parser-OpenSP
23 lines
925 B
Diff
23 lines
925 B
Diff
|
Index: SGML-Parser-OpenSP-0.994/OpenSP.xs
|
||
|
|
===================================================================
|
||
|
|
--- SGML-Parser-OpenSP-0.994.orig/OpenSP.xs
|
||
|
|
+++ SGML-Parser-OpenSP-0.994/OpenSP.xs
|
||
|
|
@@ -162,7 +162,7 @@ SV* SgmlParserOpenSP::cs2sv(const SGMLAp
|
||
|
|
{
|
||
|
|
d = m_temp;
|
||
|
|
for (i = 0; i < s.len; ++i)
|
||
|
|
- d = uvuni_to_utf8_flags(d, s.ptr[i], 0);
|
||
|
|
+ d = uvoffuni_to_utf8_flags(d, s.ptr[i], 0);
|
||
|
|
result = newSVpvn((const char*)m_temp, d - m_temp);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
@@ -171,7 +171,7 @@ SV* SgmlParserOpenSP::cs2sv(const SGMLAp
|
||
|
|
for (i = 0; i < s.len; ++i)
|
||
|
|
{
|
||
|
|
d = (U8 *)SvGROW(result, SvCUR(result) + UTF8_MAXLEN + 1);
|
||
|
|
- d = uvuni_to_utf8_flags(d + SvCUR(result), s.ptr[i], 0);
|
||
|
|
+ d = uvoffuni_to_utf8_flags(d + SvCUR(result), s.ptr[i], 0);
|
||
|
|
SvCUR_set(result, d - (U8 *)SvPVX(result));
|
||
|
|
}
|
||
|
|
}
|