summaryrefslogtreecommitdiffstats
path: root/mod_perl-short-name.patch
diff options
context:
space:
mode:
Diffstat (limited to 'mod_perl-short-name.patch')
-rw-r--r--mod_perl-short-name.patch13
1 files changed, 13 insertions, 0 deletions
diff --git a/mod_perl-short-name.patch b/mod_perl-short-name.patch
new file mode 100644
index 0000000..9abef96
--- /dev/null
+++ b/mod_perl-short-name.patch
@@ -0,0 +1,13 @@
+diff --git a/src/modules/perl/modperl_config.c b/src/modules/perl/modperl_config.c
+index c4ef81f..4ec135c 100644
+--- a/src/modules/perl/modperl_config.c
++++ b/src/modules/perl/modperl_config.c
+@@ -186,7 +186,7 @@ modperl_config_srv_t *modperl_config_srv_new(apr_pool_t *p, server_rec *s)
+
+ /* make sure httpd's argv[0] is the first argument so $0 is
+ * correctly connected to the real thing */
+- modperl_config_srv_argv_push(s->process->argv[0]);
++ modperl_config_srv_argv_push(s->process->short_name);
+
+ MP_TRACE_d(MP_FUNC, "new scfg: 0x%lx", (unsigned long)scfg);
+