summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2012-03-05 10:34:05 -0700
committerKarl Williamson <public@khwilliamson.com>2012-04-17 14:06:53 -0600
commita099aed4f4cbb1c9ea2766707caa76d250e3b25a (patch)
treec9979874e40e2ee6c172dc3e85b98bb61d097921 /utf8.c
parent65c512c3519b68852f64f5e1293cebadee892115 (diff)
downloadperl-a099aed4f4cbb1c9ea2766707caa76d250e3b25a.tar.gz
PATCH: [perl #111338] Warnings in utf8 subcategories do nothing in isolation
This was the result of assuming that these would not be on unless the main category was also on.
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index 613f10a292..1a69dd314c 100644
--- a/utf8.c
+++ b/utf8.c
@@ -137,7 +137,7 @@ Perl_uvuni_to_utf8_flags(pTHX_ U8 *d, UV uv, UV flags)
{
PERL_ARGS_ASSERT_UVUNI_TO_UTF8_FLAGS;
- if (ckWARN_d(WARN_UTF8)) {
+ if (ckWARN4_d(WARN_UTF8, WARN_SURROGATE, WARN_NON_UNICODE, WARN_NONCHAR)) {
if (UNICODE_IS_SURROGATE(uv)) {
if (flags & UNICODE_WARN_SURROGATE) {
Perl_ck_warner_d(aTHX_ packWARN(WARN_SURROGATE),