projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e49298e
)
Oops.
author
Jarkko Hietaniemi
<jhi@iki.fi>
Tue, 19 Feb 2002 04:03:46 +0000
(
04:03
+0000)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Tue, 19 Feb 2002 04:03:46 +0000
(
04:03
+0000)
p4raw-id: //depot/perl@14762
utf8.c
patch
|
blob
|
history
diff --git
a/utf8.c
b/utf8.c
index
6414e2b
..
8f04b89
100644
(file)
--- a/
utf8.c
+++ b/
utf8.c
@@
-1360,7
+1360,7
@@
Perl_to_utf8_case(pTHX_ U8 *p, U8* ustrp, STRLEN *lenp, SV **swashp, char *norma
/* It was "normal" (a single character mapping). */
UV uv3 = UNI_TO_NATIVE(uv2);
- len = uv
uni
_to_utf8(ustrp, uv3) - ustrp;
+ len = uv
chr
_to_utf8(ustrp, uv3) - ustrp;
}
}