More of the #18600.

p4raw-id: //depot/perl@18601

1 files changed, 4 insertions, 4 deletions

diff --git a/pad.c b/pad.c
index 09dd568cd2..2d716be601 100644
--- a/pad.c
+++ b/pad.c
@@ -1168,21 +1168,21 @@ Perl_do_dump_pad(pTHX_ I32 level, PerlIO *file, PADLIST *padlist, int full)
 	if (namesv) {
 	    if (SvFAKE(namesv))
 		Perl_dump_indent(aTHX_ level+1, file,
-		    "%2d. 0x%"UVxf"<%lu> FAKE \"%"SVf"\"\n",
+		    "%2d. 0x%"UVxf"<%lu> FAKE \"%s\"\n",
 		    (int) ix,
 		    PTR2UV(ppad[ix]),
 		    (unsigned long) (ppad[ix] ? SvREFCNT(ppad[ix]) : 0),
-		    namesv
+		    SvPVX(namesv)
 		);
 	    else
 		Perl_dump_indent(aTHX_ level+1, file,
-		    "%2d. 0x%"UVxf"<%lu> (%lu,%lu) \"%"SVf"\"\n",
+		    "%2d. 0x%"UVxf"<%lu> (%lu,%lu) \"%s\"\n",
 		    (int) ix,
 		    PTR2UV(ppad[ix]),
 		    (unsigned long) (ppad[ix] ? SvREFCNT(ppad[ix]) : 0),
 		    (unsigned long)I_32(SvNVX(namesv)),
 		    (unsigned long)SvIVX(namesv),
-		    namesv
+		    SvPVX(namesv)
 		);
 	}
 	else if (full) {