summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-03-07 22:48:55 -0700
committerKarl Williamson <khw@cpan.org>2018-03-12 10:17:14 -0600
commit472be41b7bb1dab634c9b2b1655a206eea17f7d6 (patch)
tree7e43a322e9acb791facc32c9cc457683c28be1c6 /embed.fnc
parent13a5f6feb6a027d1f26e17b55ba95120cacaf024 (diff)
downloadperl-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.fnc3
1 files changed, 2 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index 6c4f859583..5adc705e4a 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -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