dougm       01/07/09 09:04:48

  Modified:    Apache-Test/lib/Apache TestConfigPerl.pm
  Log:
  better check for existance of modperl_{inc,extra}.pl
  
  Revision  Changes    Path
  1.14      +1 -1      modperl-2.0/Apache-Test/lib/Apache/TestConfigPerl.pm
  
  Index: TestConfigPerl.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Apache-Test/lib/Apache/TestConfigPerl.pm,v
  retrieving revision 1.13
  retrieving revision 1.14
  diff -u -r1.13 -r1.14
  --- TestConfigPerl.pm 2001/06/26 17:09:46     1.13
  +++ TestConfigPerl.pm 2001/07/09 16:04:44     1.14
  @@ -83,7 +83,7 @@
       use lib '$serverroot';
       for my \$file (qw(modperl_inc.pl modperl_extra.pl)) {
           eval { require "conf/\$file" } or
  -            die if \$@ !~ /^Can.t locate/;
  +            die if grep { -e "\$_/conf/\$file" } \@INC;
       }
   }
   
  
  
  

Reply via email to