summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-01-21 12:12:12 +0000
committerNicholas Clark <nick@ccl4.org>2009-01-21 17:09:11 +0000
commit6673a63c63e2a65dbfcc835d6499cc97c449c67b (patch)
treeec84eaad20d1a2dae1ca297ecf1d19de05feff1f /utf8.c
parent2b393bf410d9f1bf0b80132c4e8b5d6707a139f8 (diff)
downloadperl-6673a63c63e2a65dbfcc835d6499cc97c449c67b.tar.gz
Update the documentation of get_hv() to note that it calls Perl_gv_fetchpv(),
and hence the 'create' argument is actually 'flags'. Fix code and documentation that used TRUE or FALSE to use 0 or GV_ADD.
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 8243793959..4f4c3eaffe 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1498,7 +1498,7 @@ Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp,
if (special && (uv1 == 0xDF || uv1 > 0xFF)) {
/* It might be "special" (sometimes, but not always,
* a multicharacter mapping) */
- HV * const hv = get_hv(special, FALSE);
+ HV * const hv = get_hv(special, 0);
SV **svp;
if (hv &&