diff options
Diffstat (limited to 'bin/pod2x')
-rwxr-xr-x | bin/pod2x | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -33,7 +33,7 @@ foreach my $file ( glob("./fs_signup/FS-SignupClient/*.pm"), glob("./fs_selfadmin/FS-MailAdminServer/*.pm"), ) { - next if $file =~ /^blib\//; + next if $file =~ /(^|\/)blib\//; #$file =~ /\/([\w\-]+)\.pm$/ or die "oops file $file"; my $name; if ( $file =~ /fs_\w+\/FS\-\w+\/(.*)\.pm$/ ) { |