dougm 01/10/13 12:12:17
Modified: src/modules/perl modperl_env.c
Log:
s/modperl_env_const_vars/MP_env_const_vars/g
Revision Changes Path
1.14 +4 -4 modperl-2.0/src/modules/perl/modperl_env.c
Index: modperl_env.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_env.c,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- modperl_env.c 2001/10/13 19:11:32 1.13
+++ modperl_env.c 2001/10/13 19:12:17 1.14
@@ -31,7 +31,7 @@
#define MP_ENV_ENT(k,v) \
{ k, sizeof(k)-1, v, sizeof(v)-1, 0 }
-static modperl_env_ent_t modperl_env_const_vars[] = {
+static modperl_env_ent_t MP_env_const_vars[] = {
#ifdef MP_COMPAT_1X
MP_ENV_ENT("GATEWAY_INTERFACE", "CGI-Perl/1.1"),
#endif
@@ -41,7 +41,7 @@
void modperl_env_hash_keys(void)
{
- modperl_env_ent_t *ent = modperl_env_const_vars;
+ modperl_env_ent_t *ent = MP_env_const_vars;
while (ent->key) {
PERL_HASH(ent->hash, ent->key, ent->klen);
@@ -69,8 +69,8 @@
modperl_env_untie(mg_flags);
- for (i = 0; modperl_env_const_vars[i].key; i++) {
- const modperl_env_ent_t *ent = &modperl_env_const_vars[i];
+ for (i = 0; MP_env_const_vars[i].key; i++) {
+ const modperl_env_ent_t *ent = &MP_env_const_vars[i];
hv_store(hv, ent->key, ent->klen,
newSVpvn(ent->val, ent->vlen), ent->hash);