oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

merge of Snippet fix

Browse source
This commit is contained in:
Colin Kuskie 2006-02-05 02:51:47 +00:00
parent 175622c23e
commit 67511cd89f
5 changed files with 49 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
t/i18n/label.t
View file

@ -148,6 +148,12 @@ sub label_finder_pm {
sub obj_finder_pm {
next unless /\.pm$/;
warn "filename: $File::Find::name\n";
if ($File::Find::name =~ m#(?:Help|i18n)/?$#) {
warn "Pruned $File::Find::name\n";
$File::Find::prune=1;
return;
}
open my $pmf, $_
or die "unable to open file $File::Find::name: $!\n";
my $libFile = '';