1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 09be2f7bdb..3fa094832b 100644
--- a/mg.c
+++ b/mg.c
@@ -1126,7 +1126,7 @@ int
 Perl_magic_nextpack(pTHX_ SV *sv, MAGIC *mg, SV *key)
 {
     dSP;
-    char *meth = SvOK(key) ? "NEXTKEY" : "FIRSTKEY";
+    const char *meth = SvOK(key) ? "NEXTKEY" : "FIRSTKEY";
 
     ENTER;
     SAVETMPS;