Correct Perl_refcounted_he_chain_2hv() and its caller - it doesn't

store a reference to the value, so don't pass it in a new SV.

p4raw-id: //depot/perl@28245

1 files changed, 1 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index 7e7372d7f4..c8c935af90 100644
--- a/mg.c
+++ b/mg.c
@@ -2877,7 +2877,7 @@ Perl_magic_sethint(pTHX_ SV *sv, MAGIC *mg)
     PL_hints |= HINT_LOCALIZE_HH;
     PL_compiling.cop_hints
 	= Perl_refcounted_he_new(aTHX_ PL_compiling.cop_hints,
-				 (SV *)mg->mg_ptr, newSVsv(sv));
+				 (SV *)mg->mg_ptr, sv);
     return 0;
 }