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);
  
  
  


Reply via email to