1 files changed, 1 insertions, 1 deletions
diff --git a/pp.c b/pp.c
index 51287e18e2..16e47b600d 100644
--- a/pp.c
+++ b/pp.c
@@ -270,7 +270,7 @@ PP(pp_anoncode)
     EXTEND(SP,1);
 
     if (SvFLAGS(cv) & SVpcv_CLONE) {
-	cv = cv_clone(cv);
+	cv = (CV*)sv_2mortal((SV*)cv_clone(cv));
     }
 
     PUSHs((SV*)cv);