1 files changed, 1 insertions, 1 deletions
diff --git a/util.c b/util.c
index 74b374c2c5..ef9387d5fb 100644
--- a/util.c
+++ b/util.c
@@ -3666,7 +3666,7 @@ Perl_get_ppaddr(pTHX)
 
 #ifndef HAS_GETENV_LEN
 char *
-Perl_getenv_len(pTHX_ char *env_elem, unsigned long *len)
+Perl_getenv_len(pTHX_ const char *env_elem, unsigned long *len)
 {
     char *env_trans = PerlEnv_getenv(env_elem);
     if (env_trans)