Fix build for perl >= 5.33.7

Patch by Leon Timmermans <fawaka@gmail.com> from Perl/perl5#18617 git-svn-id: https://svn.apache.org/repos/asf/perl/modperl/trunk@1889014 13f79535-47bb-0310-9956-ffa450edef68
apache · Apr 20, 2021 · 916376b · 916376b
1 parent 0537fc9
commit 916376b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/modules/perl/modperl_perl.c b/src/modules/perl/modperl_perl.c
@@ -268,7 +268,7 @@ void modperl_hash_seed_set(pTHX)
 #ifdef MP_NEED_HASH_SEED_FIXUP
     if (MP_init_hash_seed_set) {
 #if MP_PERL_VERSION_AT_LEAST(5, 17, 6)
-        memcpy(&PL_hash_seed, &MP_init_hash_seed,
+        memcpy(PL_hash_seed, &MP_init_hash_seed,
                 sizeof(PL_hash_seed) > sizeof(MP_init_hash_seed) ?
                     sizeof(MP_init_hash_seed) : sizeof(PL_hash_seed));
         PL_hash_seed_set   = MP_init_hash_seed_set;