aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDavid Walser <luigiwalser@mageia.org>2013-04-06 16:17:52 +0000
committerDavid Walser <luigiwalser@mageia.org>2013-04-06 16:17:52 +0000
commit833b45b2de74d6bea30f822668d07f89759581d0 (patch)
tree85e023a16706f7d2589248312db4d4c7e20a19eb
parent631d4295cbaf1e48ebd2c06fa68f9068cbc9ad80 (diff)
downloadrpm-setup-833b45b2de74d6bea30f822668d07f89759581d0.tar
rpm-setup-833b45b2de74d6bea30f822668d07f89759581d0.tar.gz
rpm-setup-833b45b2de74d6bea30f822668d07f89759581d0.tar.bz2
rpm-setup-833b45b2de74d6bea30f822668d07f89759581d0.tar.xz
rpm-setup-833b45b2de74d6bea30f822668d07f89759581d0.zip
- properly fix mga #3697 in find-lang.pl (only exclude man directories)1.171
- own man pages that have a dot in their name (find-lang.pl regexp bug)
-rw-r--r--NEWS4
-rw-r--r--configure.ac2
-rwxr-xr-xfind-lang.pl4
3 files changed, 7 insertions, 3 deletions
diff --git a/NEWS b/NEWS
index d110572..c7be022 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,7 @@
+Version 1.171 - 6 April 2013, by David Walser
+- properly fix mga #3697 in find-lang.pl (only exclude man directories)
+- own man pages that have a dot in their name (find-lang.pl regexp bug)
+
Version 1.170 - 4 April 2013, by Luc Menut
- revert change 1.168 because it introduces a regression when --with-man
is used in combination with another --with-xxxx: all the directories
diff --git a/configure.ac b/configure.ac
index b40b637..861c323 100644
--- a/configure.ac
+++ b/configure.ac
@@ -4,7 +4,7 @@
# $Id: configure.ac 271266 2010-11-04 10:43:28Z fwang $
AC_PREREQ(2.59)
-AC_INIT(rpm-mageia-setup, 1.170, rtp@mageia.org)
+AC_INIT(rpm-mageia-setup, 1.171, rtp@mageia.org)
AC_CANONICAL_TARGET
AM_INIT_AUTOMAKE(1.9 -Wno-portability no-dist-gzip dist-xz)
AC_CONFIG_SRCDIR
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;
}