aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2007-06-25 17:32:28 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2007-06-25 17:32:28 +0000
commit0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7 (patch)
treec0f74542019d8744ab5b55bf17baec39495ea568
parentfa8372226916ed9ad74c5680a1ba52eec8ce8ca7 (diff)
downloadrpm-setup-0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7.tar
rpm-setup-0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7.tar.gz
rpm-setup-0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7.tar.bz2
rpm-setup-0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7.tar.xz
rpm-setup-0cdc8c93ae1e44a2db2d2250eb6d56429af39dd7.zip
- man page are compress after install step, taking care to filename to handle all case
-rw-r--r--find-lang.pl8
1 files changed, 4 insertions, 4 deletions
diff --git a/find-lang.pl b/find-lang.pl
index ded540b..4a53cdf 100644
--- a/find-lang.pl
+++ b/find-lang.pl
@@ -47,16 +47,16 @@ File::Find::find(
return;
}
($pkg, $lang, $parent) = ($3, $2, $1);
- } elsif ($file =~ m:^(/usr/share/man)/([^/_@\.]+)[^/]*/man[^/]+/([^/.]+)\.\d\.[^/]+$:) {
+ } elsif ($file =~ m:^(/+usr/share/man)/([^/_@\.]+)[^/]*/man[^/]+/([^/.]+)\.\d[^/]*$:) {
if (!$withman) {
return;
}
-
($pkg, $lang, $parent) = ($3, $2, $1);
+ $file .= '*';
} else {
return;
}
- if (!((grep { $_ eq $pkg } @searchname) || $allname)) {
+ if (! ((grep { $_ eq $pkg } @searchname) || $allname)) {
return;
}
my $rpmlang = $lang eq 'C' ? "" : "%lang($lang)";
@@ -68,7 +68,7 @@ File::Find::find(
$buildroot || '/'
);
-open(my $hlang, ">", "$pkgname.lang") or die "canno't open $pkgname.lang\n";
+open(my $hlang, '>', "$pkgname.lang") or die "canno't open $pkgname.lang\n";
foreach (sort keys %finallist) {
print $hlang "$finallist{$_}$_\n";