From bb01ed16298d0c20e7987e70e77759c787607f8d Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Tue, 9 Oct 2001 19:26:10 +0000
Subject: r493:    * dh_installman: documented translated man page support, and
 made it work      properly. It was not stripping the language part from the
 installed      filenames.

---
 dh_installman | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

(limited to 'dh_installman')

diff --git a/dh_installman b/dh_installman
index d8585aa2..c5efe70c 100755
--- a/dh_installman
+++ b/dh_installman
@@ -16,11 +16,12 @@ use Debian::Debhelper::Dh_Lib;
 
 =head1 DESCRIPTION
 
-dh_installman is a debhelper program that handles for installing
+dh_installman is a debhelper program that handles installing
 man pages into the correct locations in package build directories. You tell
 it what man pages go in your packages, and it figures out where to
 install them based on the section field in their .TH line and their filename
-extention.
+extention. It also supports translated man pages, by looking for extentions
+like .ll.8 and .ll_LL.8
 
 Any man page filenames specified as parameters will be installed into the
 first package dh_installman is told to act on. By default, this is the
@@ -115,19 +116,21 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 			error("Could not determine section for $page");
 		}
 		
+		# Get the man page's name -- everything up to the last dot.
+		my ($instname)=$basename=~m/^(.*)\./;
+	
 		my $destdir="$tmp/usr/share/man/man$realsection/";
 		# Translated man pages are typically specified by adding the
 		# language code to the filename, so detect that and
-		# redirect to appropriate directory.
+		# redirect to appropriate directory, stripping the code.
 		my ($langcode)=$basename=~m/.*\.([a-z][a-z](?:_[A-Z][A-Z])?)\.(?:[1-9]|man)/;
 		if (defined $langcode && $langcode ne '') {
 			$destdir="$tmp/usr/share/man/$langcode/man$section/";
+			# Strip the language code from the instname.
+			$instname=~s/\.$langcode$//;
 		}
 		$destdir=~tr:/:/:s; # just for looks
 
-		# Get the man page's name -- everything up to the last dot.
-		my ($instname)=$basename=~m/^(.*)\./;
-	
 		if (! -e "$destdir/$instname.$section" && 
 		    ! -l "$destdir/$instname.$section") {
 			if (! -d $destdir) {
-- 
cgit v1.2.3