perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From a..@hyperreal.org
Subject cvs commit: modperl/lib/Apache StatINC.pm
Date Thu, 05 Nov 1998 21:20:08 GMT
ask         98/11/05 13:20:08

  Modified:    lib/Apache StatINC.pm
  Log:
  More undefined stuff.
  Message-ID: <13890.1638.454589.485467@rtfm.ofc.tekinteractive.com>
  
  Revision  Changes    Path
  1.8       +2 -2      modperl/lib/Apache/StatINC.pm
  
  Index: StatINC.pm
  ===================================================================
  RCS file: /home/cvs/modperl/lib/Apache/StatINC.pm,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- StatINC.pm	1998/10/06 08:53:42	1.7
  +++ StatINC.pm	1998/11/05 21:20:07	1.8
  @@ -8,8 +8,8 @@
   
   sub handler {
       my $r = shift;
  -    my $do_undef = ref($r) && (lc($r->dir_config("UndefOnReload")) eq "on");
  -    my $DEBUG = ref($r) && (lc($r->dir_config("StatINCDebug")) eq "on");
  +    my $do_undef = ref($r) && (lc($r->dir_config("UndefOnReload") || '') eq
"on");
  +    my $DEBUG = ref($r) && (lc($r->dir_config("StatINCDebug") || '') eq "on");
   
       while(my($key,$file) = each %INC) {
   	local $^W = 0;
  
  
  

Mime
View raw message