diff options
Diffstat (limited to 'find-lang.pl')
-rwxr-xr-x | find-lang.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/find-lang.pl b/find-lang.pl index 3b622da..ba35ff9 100755 --- a/find-lang.pl +++ b/find-lang.pl @@ -57,11 +57,11 @@ File::Find::find( return if !$withhtml; my ($pkg, $lang, $langfile) = ($4, $3, $1); parent_to_own($langfile, $file, $lang) if pkg_match($pkg); - } elsif ($file =~ m!^((/+usr/share/man)/([^/@.]+)[^/]*)/man[^/]+/([^/.]+)\.\d[^/]*!) { + } elsif ($file =~ m!^((/+usr/share/man)/([^/@.]+)[^/]*)/man[^/]+/([^/]+)\.\d[^/]*!) { return if !$withman; my ($pkg, $lang, $langfile) = ($4, $3, $1); $file =~ s/\.[^\.]+$/.*/; - parent_to_own($langfile, $file, $lang) if pkg_match($pkg); + own_file($file, $lang) if pkg_match($pkg); } else { return; } |