aboutsummaryrefslogtreecommitdiffstats
path: root/find-lang.pl
diff options
context:
space:
mode:
Diffstat (limited to 'find-lang.pl')
-rw-r--r--find-lang.pl9
1 files changed, 7 insertions, 2 deletions
diff --git a/find-lang.pl b/find-lang.pl
index 9b9c7a4..249125d 100644
--- a/find-lang.pl
+++ b/find-lang.pl
@@ -43,7 +43,7 @@ File::Find::find(
}
my ($pkg, $lang, $parent, $langfile) = ($4, $3, $2, $1);
if (pkg_match($pkg)) {
- parent_to_own($langfile, $file, $lang);
+ own_file($file, $lang);
}
} elsif ($file =~ m:^((.*/gnome/help)/([^/]+)/([^/]+)).*:) {
if (!$withgnome) {
@@ -115,6 +115,11 @@ sub pkg_match {
return;
}
+sub own_file {
+ my ($file, $lang) = @_;
+ $finallist{$file}{'lang'}{$lang} = 1;
+}
+
sub parent_to_own {
my ($parent, $file, $lang) = @_;
debug("parent_to_own: $parent, $file, $lang");
@@ -135,7 +140,7 @@ sub parent_to_own {
$finallist{$parent}{'lang'}{$lang} = 1;
debug("Parent %s will be %s", $parent, $lang);
}
- $finallist{$file}{'lang'}{$lang} = 1;
+ own_file($file, $lang);
debug("Parent %s will be %s", $file, $lang);
}