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/src/modules/perl perl_util.c
Date Tue, 16 Apr 2002 02:32:22 GMT
dougm       02/04/15 19:32:22

  Modified:    src/modules/perl perl_util.c
  Log:
  fix taint issue with bleedperl
  
  Revision  Changes    Path
  1.48      +1 -0      modperl/src/modules/perl/perl_util.c
  
  Index: perl_util.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/perl_util.c,v
  retrieving revision 1.47
  retrieving revision 1.48
  diff -u -r1.47 -r1.48
  --- perl_util.c	24 Mar 2002 23:01:33 -0000	1.47
  +++ perl_util.c	16 Apr 2002 02:32:22 -0000	1.48
  @@ -503,6 +503,7 @@
   	    SvREFCNT_dec(HeVAL(entry));
   	    HeVAL(entry) = &sv_undef;
   	    MP_TRACE_g(fprintf(stderr, "reloading %s\n", HeKEY(entry)));
  +	    TAINT_NOT;
   	    perl_require_pv(HeKEY(entry));
   	}
   	SvREFCNT_dec(keysv);
  
  
  

Mime
View raw message