Fix build system auto-selection breakage.

[debhelper.git] / dh_installmanpages

diff --git a/dh_installmanpages b/dh_installmanpages
index 39946f6a4f734396d5e5347b1e41c55da84c0863..4a5f4735e29fcb82ad88d26768f5b63e26a2bdd3 100755 (executable)
--- a/dh_installmanpages
+++ b/dh_installmanpages
@@ -2,7 +2,7 @@
 
 =head1 NAME
 
-dh_installmanpages - old-style man page installer
+dh_installmanpages - old-style man page installer (deprecated)
 
 =cut
 
@@ -21,7 +21,8 @@ automatically installing man pages into usr/share/man/ and usr/X11R6/man/
 in package build directories.
 
 This is a DWIM-style program, with an interface unlike the rest of
-debhelper. You are encouraged to use L<dh_installman(1)> instead.
+debhelper. It is deprecated, and you are encouraged to use
+L<dh_installman(1)> instead.
 
 dh_installmanpages scans the current directory and all subdirectories for
 filenames that look like man pages. (Note that only real files are looked
@@ -61,6 +62,8 @@ not be processed properly.
 
 =cut
 
+warning("This program is deprecated, switch to dh_installman.");
+
 init();
 
 # Check if a file is a man page, for use by File::Find.
@@ -126,11 +129,13 @@ sub find_so_man {
 }
 
 foreach my $package (@{$dh{DOPACKAGES}}) {
+       next if is_udeb($package);
+
        my $tmp=tmpdir($package);
 
        # Find all filenames that look like man pages.
        @manpages=();
-       @allpackages=GetPackages('');
+       @allpackages=getpackages('');
        find(\&find_man,'.'); # populates @manpages
        
        foreach my $page (@manpages) {
@@ -151,10 +156,6 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
                
                if ($install) {
                        my $extdir="share";
-                       # Handle X man pages specially.
-                       if ($basename=~/x$/) {
-                               $extdir="X11R6";
-                       }
                        
                        my ($section)=$basename=~m/.*\.([1-9])/;