This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
02d43d4
)
locale.c: Use mnemonic
author
Karl Williamson
<khw@cpan.org>
Mon, 13 Nov 2017 05:29:58 +0000
(22:29 -0700)
committer
Karl Williamson
<khw@cpan.org>
Wed, 15 Nov 2017 04:52:07 +0000
(21:52 -0700)
Replace this number by an already existing mnemonic
locale.c
patch
|
blob
|
blame
|
history
diff --git
a/locale.c
b/locale.c
index
5bc5fc5
..
bc507d9
100644
(file)
--- a/
locale.c
+++ b/
locale.c
@@
-2963,7
+2963,7
@@
Perl__is_cur_LC_category_utf8(pTHX_ int category)
if ( len != STRLENs(REPLACEMENT_CHARACTER_UTF8)
- || wc != (wchar_t)
0xFFFD
)
+ || wc != (wchar_t)
UNICODE_REPLACEMENT
)
{
is_utf8 = FALSE;
DEBUG_L(PerlIO_printf(Perl_debug_log, "\replacement=U+%x\n",