Nuke some more n_a, and convert S_gv_ename from char * to const char *

p4raw-id: //depot/perl@24760

1 files changed, 1 insertions, 2 deletions

diff --git a/mg.c b/mg.c
index 5a224e2942..c0b2762e93 100644
--- a/mg.c
+++ b/mg.c
@@ -556,8 +556,7 @@ Perl_magic_len(pTHX_ SV *sv, MAGIC *mg)
     }
     magic_get(sv,mg);
     if (!SvPOK(sv) && SvNIOK(sv)) {
-	STRLEN n_a;
-	sv_2pv(sv, &n_a);
+	sv_2pv(sv, 0);
     }
     if (SvPOK(sv))
 	return SvCUR(sv);