diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-03 20:22:48 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-03 20:22:48 +0000 |
commit | 750913d74ca972890859435bebc9adbb734b3bab (patch) | |
tree | 3fa0a6ccfd0d4392c08d8ae04dc6b4afa79e8dde /regcomp.c | |
parent | 3fe0ae6b5a7de1d5e4316ab3ec080288ef0c3974 (diff) | |
download | perl-750913d74ca972890859435bebc9adbb734b3bab.tar.gz |
Allow emitting the foldcased version of "\x{df}", "ss"
(among others, another example would be \x{fb00} -> "ff")
p4raw-id: //depot/perl@14046
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3137,7 +3137,7 @@ tryagain: if (ISMULT2(p)) { /* Back off on ?+*. */ if (len) p = oldp; - else if (!UNI_IS_INVARIANT(NATIVE_TO_UNI(ender)) && UTF) { + else if (UTF) { if (FOLD) { /* Emit all the Unicode characters. */ for (foldbuf = tmpbuf; @@ -3162,7 +3162,7 @@ tryagain: } break; } - if (!UNI_IS_INVARIANT(NATIVE_TO_UNI(ender)) && UTF) { + if (UTF) { if (FOLD) { /* Emit all the Unicode characters. */ for (foldbuf = tmpbuf; |