From 11e7ed3342a412dba2546230e367d8deee3bcb24 Mon Sep 17 00:00:00 2001
From: Richard Leach <richardleach@users.noreply.github.com>
Date: Fri, 28 May 2021 02:00:17 +0100
Subject: pp_system: safe to switch in sv_setpvn_fresh here

---
 pp_sys.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'pp_sys.c')

diff --git a/pp_sys.c b/pp_sys.c
index db20152c18..25eda27424 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -4364,7 +4364,7 @@ PP(pp_system)
             sv_2mortal(copysv);
             if (SvPOK(origsv) || SvPOKp(origsv)) {
                 pv = SvPV_nomg(origsv, len);
-                sv_setpvn(copysv, pv, len);
+                sv_setpvn_fresh(copysv, pv, len);
                 SvPOK_off(copysv);
             }
             if (SvIOK(origsv) || SvIOKp(origsv))
-- 
cgit v1.2.1