dougm 01/04/19 10:23:27 Modified: lib/ModPerl ParseSource.pm Log: re fixup Revision Changes Path 1.2 +2 -2 modperl-2.0/lib/ModPerl/ParseSource.pm Index: ParseSource.pm =================================================================== RCS file: /home/cvs/modperl-2.0/lib/ModPerl/ParseSource.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- ParseSource.pm 2001/03/04 23:26:53 1.1 +++ ParseSource.pm 2001/04/19 17:23:23 1.2 @@ -29,8 +29,8 @@ \@wanted; } -my $prefixes = join '|', qw(modperl_|mpxs_|mp_xs); -my $prefix_re = qr{^($prefixes)}; +my $prefixes = join '|', qw(modperl mpxs mp_xs); +my $prefix_re = qr{^($prefixes)_}; sub wanted_functions { $prefix_re } sub write_functions_pm {