summaryrefslogtreecommitdiff
path: root/extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch
diff options
context:
space:
mode:
Diffstat (limited to 'extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch')
-rw-r--r--extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch17
1 files changed, 17 insertions, 0 deletions
diff --git a/extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch b/extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch
new file mode 100644
index 000000000..4e26fd87d
--- /dev/null
+++ b/extra/mod_perl/mod_perl-2.0.6-perl-5.16-fixes.patch
@@ -0,0 +1,17 @@
+diff -upr mod_perl-2.0.6.orig/src/modules/perl/modperl_perl.c mod_perl-2.0.6/src/modules/perl/modperl_perl.c
+--- mod_perl-2.0.6.orig/src/modules/perl/modperl_perl.c 2012-05-26 21:49:27.000000000 +0300
++++ mod_perl-2.0.6/src/modules/perl/modperl_perl.c 2012-05-26 21:55:39.000000000 +0300
+@@ -102,13 +102,4 @@ static void modperl_perl_init_ids(pTHX_
+ sv_setiv(GvSV(gv_fetchpv("$", TRUE, SVt_PV)), ids->pid);
+
+-#ifndef WIN32
+- PL_uid = ids->uid;
+- PL_euid = ids->euid;
+- PL_gid = ids->gid;
+- PL_egid = ids->egid;
+-#endif
+-#ifdef MP_MAINTAIN_PPID
+- PL_ppid = ids->ppid;
+-#endif
+ }
+