use HVhek_KEYCANONICAL in hv_delete

diff --git a/hv.c b/hv.c
index c5e1206..0375a94 100644 (file)
--- a/hv.c
+++ b/hv.c
@@ -959,7 +959,7 @@ S_hv_delete_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen,
     if (!HvARRAY(hv))
        return NULL;
 
-    if (is_utf8) {
+    if (is_utf8 && !(k_flags & HVhek_KEYCANONICAL)) {
        const char * const keysave = key;
        key = (char*)bytes_from_utf8((U8*)key, &klen, &is_utf8);