save_delete(), err, SAVEDELETE() fixes from Charles Lane.

[p5sagit/p5-mst-13.2.git] / pp_hot.c

diff --git a/pp_hot.c b/pp_hot.c
index 30cc61d..df66647 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1577,7 +1577,7 @@ PP(pp_helem)
                if (!preeminent) {
                    STRLEN keylen;
                    char *key = SvPV(keysv, keylen);
-                   save_delete(hv, key, keylen);
+                   SAVEDELETE(hv, savepvn(key,keylen), keylen);
                } else
                    save_helem(hv, keysv, svp);
             }