pad.c: Don’t mk temp SVs for unavailable warnings

We already have the name SVs available, not just the string and length.

1 files changed, 2 insertions, 4 deletions

diff --git a/pad.c b/pad.c
index b25b37e046..eee83b16ae 100644
--- a/pad.c
+++ b/pad.c
@@ -1221,8 +1221,7 @@ S_pad_findlex(pTHX_ const char *namepv, STRLEN namelen, U32 flags, const CV* cv,
 		{
 		    if (warn)
 			S_unavailable(aTHX_
-                                       newSVpvn_flags(namepv, namelen,
-                                                      SVs_TEMP|SVf_UTF8));
+				      *out_name);
 
 		    *out_capture = NULL;
 		}
@@ -1269,8 +1268,7 @@ S_pad_findlex(pTHX_ const char *namepv, STRLEN namelen, U32 flags, const CV* cv,
 			&& !PadnameIsSTATE(name_p[offset]))
 		    {
 			S_unavailable(aTHX_
-                                       newSVpvn_flags(namepv, namelen,
-                                                      SVs_TEMP|SVf_UTF8));
+				      name_p[offset]);
 			*out_capture = NULL;
 		    }
 		}