X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=bin%2Fpod2x;h=1e11c5699d1ac2211b9419654f6a5f4a25421bad;hb=27df14819d223d4f4e357754261b7493656d4b39;hp=cbe14238905b2598adbd272ae41465cefb37f9c5;hpb=6991d4986df7fb3a6c7c49b5ae1b3713e87a16c4;p=freeside.git diff --git a/bin/pod2x b/bin/pod2x index cbe142389..1e11c5699 100755 --- a/bin/pod2x +++ b/bin/pod2x @@ -30,9 +30,11 @@ foreach my $file ( glob("$site_perl/*/*/*.pm"), glob("$site_perl/bin/*.pod"), glob("./fs_sesmon/FS-SessionClient/*.pm"), - glob("./fs_signup/FS-SignupClient/*.pm"), + #glob("./fs_signup/FS-SignupClient/*.pm"), + glob("./fs_selfservice/FS-SelfService/*.pm"), glob("./fs_selfadmin/FS-MailAdminServer/*.pm"), ) { + next if $file =~ /(^|\/)blib\//; #$file =~ /\/([\w\-]+)\.pm$/ or die "oops file $file"; my $name; if ( $file =~ /fs_\w+\/FS\-\w+\/(.*)\.pm$/ ) {