dougm       01/03/04 16:04:55

  Modified:    lib/Apache ParseSource.pm
  Log:
  skip version.h (e.g. automake generated and not public)
  
  Revision  Changes    Path
  1.12      +2 -2      modperl-2.0/lib/Apache/ParseSource.pm
  
  Index: ParseSource.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/Apache/ParseSource.pm,v
  retrieving revision 1.11
  retrieving revision 1.12
  diff -u -r1.11 -r1.12
  --- ParseSource.pm    2001/03/04 23:22:49     1.11
  +++ ParseSource.pm    2001/03/05 00:04:55     1.12
  @@ -87,13 +87,13 @@
       }
   
       my @includes;
  -    my $unwanted = join '|', qw(ap_listen internal);
  +    my $unwanted = join '|', qw(ap_listen internal version);
   
       for my $dir (@dirs) {
           File::Find::finddepth({
                                  wanted => sub {
                                      return unless /\.h$/;
  -                                   return if /($unwanted)/o;
  +                                   return if /^($unwanted)/o;
                                      my $dir = $File::Find::dir;
                                      push @includes, "$dir/$_";
                                  },
  
  
  

Reply via email to