diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-01-09 15:28:29 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-01-09 19:29:02 -0700 |
commit | 6247ead0fba38099d381dcb4317ef3b243f1296a (patch) | |
tree | ef6660d02e6dccd84b802b898a3ec8544d8ac505 | |
parent | 949cf4983af707fbd15e422845f4f3df20505f97 (diff) | |
download | perl-6247ead0fba38099d381dcb4317ef3b243f1296a.tar.gz |
op.c: Remove unnecessary flag
This flag no longer does anything
-rw-r--r-- | op.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -3527,8 +3527,7 @@ S_pmtrans(pTHX_ OP *o, OP *expr, OP *repl) U8 range_mark = UTF_TO_NATIVE(0xff); sv_catpvn(transv, (char *)&range_mark, 1); } - t = uvuni_to_utf8_flags(tmpbuf, 0x7fffffff, - UNICODE_ALLOW_SUPER); + t = uvuni_to_utf8(tmpbuf, 0x7fffffff); sv_catpvn(transv, (char*)tmpbuf, t - tmpbuf); t = (const U8*)SvPVX_const(transv); tlen = SvCUR(transv); |