PATCH: user defined special casing for non utf8

Users can define their own case changing mappings to replace the
standard ones.  Prior to this patch, any mappings on characters whose
ordinals are 0-222, 224-255 that resulted in multiple characters were
ignored.

Note that there still is a deficiency in that the mappings will be
applied only to strings in utf8 format.

1 files changed, 1 insertions, 2 deletions

diff --git a/utf8.c b/utf8.c
index 1a6077c8d2..eeea1582b8 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1653,8 +1653,7 @@ Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp,
 	}
     }*/
 
-    /* The 0xDF is the only special casing Unicode code point below 0x100. */
-    if (special && (uv1 == 0xDF || uv1 > 0xFF)) {
+    if (special) {
          /* It might be "special" (sometimes, but not always,
 	  * a multicharacter mapping) */
 	 HV * const hv = get_hv(special, 0);