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/Apache-Test/lib/Apache TestConfigPerl.pm
Date Sat, 05 May 2001 01:46:30 GMT
dougm       01/05/04 18:46:30

  Modified:    Apache-Test/lib/Apache TestConfigPerl.pm
  Log:
  allow api test files to have the same names as hooks
  
  Revision  Changes    Path
  1.11      +2 -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.10
  retrieving revision 1.11
  diff -u -r1.10 -r1.11
  --- TestConfigPerl.pm	2001/04/25 02:02:19	1.10
  +++ TestConfigPerl.pm	2001/05/05 01:46:29	1.11
  @@ -246,7 +246,8 @@
               my($base, $sub) =
                 map { s/^test//i; $_ } split '::', $module;
   
  -            my $hook = $hooks{$sub} || $hooks{$subdir} || $subdir;
  +            my $hook = ($subdir eq 'Hooks' ? $hooks{$sub} : '')
  +              || $hooks{$subdir} || $subdir;
   
               if ($hook eq 'OutputFilter' and $pm =~ /^i/) {
                   #XXX: tmp hack
  
  
  

Mime
View raw message