diff options
author | Karl Williamson <khw@cpan.org> | 2018-03-07 22:48:55 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-03-12 10:17:14 -0600 |
commit | 472be41b7bb1dab634c9b2b1655a206eea17f7d6 (patch) | |
tree | 7e43a322e9acb791facc32c9cc457683c28be1c6 /embed.fnc | |
parent | 13a5f6feb6a027d1f26e17b55ba95120cacaf024 (diff) | |
download | perl-472be41b7bb1dab634c9b2b1655a206eea17f7d6.tar.gz |
PATCH: [perl #127288] I18N::Langinfo sets UTF-8 bit
This commit will turn UTF-8 on in the returned SV if its string is legal
UTF-8 containing something besides ASCII, and the locale is a UTF-8 one.
It is based on the patch included in the ticket, but is generalized to
handle edge cases.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -2831,7 +2831,8 @@ snR |char * |setlocale_debug_string |const int category \ #if defined(USE_LOCALE) \ && ( defined(PERL_IN_LOCALE_C) \ || defined(PERL_IN_MG_C) \ - || defined (PERL_EXT_POSIX)) + || defined (PERL_EXT_POSIX) \ + || defined (PERL_EXT_LANGINFO)) ApM |bool |_is_cur_LC_category_utf8|int category #endif |