diff options
| -rw-r--r-- | find-lang.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/find-lang.pl b/find-lang.pl index 9eec2a3..4bcb0eb 100644 --- a/find-lang.pl +++ b/find-lang.pl @@ -21,9 +21,9 @@ my ($buildroot, @searchname) = @ARGV; my ($pkgname) = @searchname or die "Main name to find missing\n"; $buildroot or die "No buildroot given\n"; -my %finallist = (); # filename => attr, easy way to perform uniq +my %finallist; # filename => attr, easy way to perform uniq -find( +File::Find::find( sub { my $file = substr($File::Find::name, length($buildroot)); my ($pkg, $lang, $parent); |