diff options
author | Funda Wang <fwang@mageia.org> | 2011-09-19 03:17:11 +0000 |
---|---|---|
committer | Funda Wang <fwang@mageia.org> | 2011-09-19 03:17:11 +0000 |
commit | 39ea19e0cc7ba6b1603ad133112caa20ae35b3d6 (patch) | |
tree | 1cd6c03c342e06df7a36914914edf053ec40f41e /find-lang.pl | |
parent | 0a244adfe96aa6e7530f582a7d25073857bf4505 (diff) | |
download | rpm-setup-39ea19e0cc7ba6b1603ad133112caa20ae35b3d6.tar rpm-setup-39ea19e0cc7ba6b1603ad133112caa20ae35b3d6.tar.gz rpm-setup-39ea19e0cc7ba6b1603ad133112caa20ae35b3d6.tar.bz2 rpm-setup-39ea19e0cc7ba6b1603ad133112caa20ae35b3d6.tar.xz rpm-setup-39ea19e0cc7ba6b1603ad133112caa20ae35b3d6.zip |
1.144: Add support for fdo /usr/share/help when find_lang1.144
Diffstat (limited to 'find-lang.pl')
-rwxr-xr-x | find-lang.pl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/find-lang.pl b/find-lang.pl index 66f507c..f14f2e0 100755 --- a/find-lang.pl +++ b/find-lang.pl @@ -11,6 +11,7 @@ use Pod::Usage; GetOptions( 'all-name' => \my $allname, 'with-gnome' => \my $withgnome, + 'with-help' => \my $withhelp, 'with-kde' => \my $withkde, 'with-html' => \my $withhtml, 'without-mo' => \my $withoutmo, @@ -53,6 +54,14 @@ File::Find::find( if (pkg_match($pkg)) { parent_to_own($langfile, $file, $lang); } + } elsif ($file =~ m:^((.*/share/help)/([^/]+)/([^/]+))/([^/]+).*:) { + if (!$withhelp) { + return; + } + my ($pkg, $lang, $parent, $langfile) = ($4, $3, $2, $1); + if (pkg_match($pkg)) { + parent_to_own($langfile, $file, $lang); + } } elsif ($file =~ m:^((.*/doc/kde)/HTML/([^/@]+)[^/]*)/([^/]+)/.*:) { if (!$withkde) { return; |