perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: modperl-2.0/src/modules/perl modperl_util.c
Date Sat, 13 Oct 2001 03:32:31 GMT
dougm       01/10/12 20:32:31

  Modified:    src/modules/perl modperl_util.c
  Log:
  calculate hash if not given in modperl_perl_hv_fetch_he()
  
  Revision  Changes    Path
  1.27      +4 -0      modperl-2.0/src/modules/perl/modperl_util.c
  
  Index: modperl_util.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_util.c,v
  retrieving revision 1.26
  retrieving revision 1.27
  diff -u -r1.26 -r1.27
  --- modperl_util.c	2001/10/13 03:22:15	1.26
  +++ modperl_util.c	2001/10/13 03:32:31	1.27
  @@ -416,6 +416,10 @@
           return 0;
       }
   
  +    if (!hash) {
  +	PERL_HASH(hash, key, klen);
  +    }
  +
       entry = ((HE**)xhv->xhv_array)[hash & (I32)xhv->xhv_max];
   
       for (; entry; entry = HeNEXT(entry)) {
  
  
  

Mime
View raw message