summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2013-01-16 15:05:04 -0700
committerKarl Williamson <public@khwilliamson.com>2013-01-16 15:35:56 -0700
commit9816f1212fba0148b8edf3072e3d0b121e313665 (patch)
tree2c72496ea062897e8760d600b6875f9ab843d04d /utf8.c
parent78181aa97421459079a91bb4f9e8939c1d56b6f4 (diff)
downloadperl-9816f1212fba0148b8edf3072e3d0b121e313665.tar.gz
utf8.c: Reword a warning message
This follows the suggestion by Aristotle Pagaltzis.
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 dfb303f311..1bf3f5238b 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2043,7 +2043,7 @@ S_is_utf8_common(pTHX_ const U8 *const p, SV **swash,
if (! is_utf8_char_buf(p, p + UTF8SKIP(p))) {
if (ckWARN_d(WARN_UTF8)) {
Perl_warner(aTHX_ packWARN2(WARN_DEPRECATED,WARN_UTF8),
- "It is deprecated to pass malformed UTF-8 to character classification macros, for \"%s\"", swashname);
+ "Passing malformed UTF-8 to \"%s\" is deprecated", swashname);
if (ckWARN(WARN_UTF8)) { /* This will output details as to the
what the malformation is */
utf8_to_uvchr_buf(p, p + UTF8SKIP(p), NULL);