File fix_table_magic_copy_namelen.diff of Package apache2-mod_perl

--- a/src/modules/perl/modperl_common_util.c	2024-10-04 12:46:08.582712409 +0000
+++ b/src/modules/perl/modperl_common_util.c	2024-10-04 12:46:27.458682558 +0000
@@ -41,7 +41,7 @@
 
 MP_INLINE static
 int modperl_table_magic_copy(pTHX_ SV *sv, MAGIC *mg, SV *nsv,
-                             const char *name, int namelen)
+                             const char *name, I32 namelen)
 {
     /* prefetch the value whenever we're iterating over the keys */
     MAGIC *tie_magic = mg_find(nsv, PERL_MAGIC_tiedelem);