]> git.donarmstrong.com Git - debhelper.git/blobdiff - dh_undocumented
cmake: Pass CPPFLAGS in CFLAGS. Closes: #668813 Thanks, Simon Ruderich for the patch...
[debhelper.git] / dh_undocumented
index 7de53445422d9fad13b1ef20b6ef97ebae7b8eb0..03a4ea7ed7039a19f9d2d07eebac01590d792e7c 100755 (executable)
@@ -1,55 +1,38 @@
 #!/usr/bin/perl -w
-#
-# Passed a list of undocumented man pages, generates symlinks to
-# undocumented.7.gz for those man pages.
-#
-# Also, it looks for debian/undocumented files for more lists of
-# undocumented man pages.
+
+=head1 NAME
+
+dh_undocumented - undocumented.7 symlink program (deprecated no-op)
+
+=cut
 
 use strict;
 use Debian::Debhelper::Dh_Lib;
+
+=head1 SYNOPSIS
+
+Do not run!
+
+=head1 DESCRIPTION
+
+This program used to make symlinks to the F<undocumented.7> man page for man
+pages not present in a package. Debian policy now frowns on use of the
+F<undocumented.7> man page, and so this program does nothing, and should not
+be used.
+
+=cut
+
 init();
+warning("This program does nothing and should no longer be used.");
+
+=head1 SEE ALSO
+
+L<debhelper(7)>
+
+This program is a part of debhelper.
+
+=head1 AUTHOR
+
+Joey Hess <joeyh@debian.org>
 
-foreach my $package (@{$dh{DOPACKAGES}}) {
-       my $tmp=tmpdir($package);
-       my $undocumented=pkgfile($package,"undocumented");
-
-       my @undoc;
-       if ($undocumented) {
-               @undoc=filearray($undocumented);
-       }
-
-       if (($package eq $dh{FIRSTPACKAGE} || $dh{PARAMS_ALL}) && @ARGV) {
-               push @undoc, @ARGV;
-       }       
-
-       foreach my $file (@undoc) {
-               $file=~s/.gz$//; # .gz extension is optional in input.
-
-               # Determine what directory the file belongs in,
-               # /usr/share/man, or /usr/X11R6/man, and how the link to
-               # the undocuemtned.7 man page will look.
-               my ($dir, $reldir);
-               my ($section)=$file=~m/^.*\.(\d)/;
-               if (!$section) {
-                       error("\"$file\" does not have an extension.");
-               }       
-               if ($file=~/.*\.\dx/) {
-                       $dir="usr/X11R6/man/man$section";
-                       $reldir="../../../share/man/man7/";
-               }
-               elsif ($section != 7) {
-                       $dir="usr/share/man/man$section";
-                       $reldir="../man7/";
-               }
-               else {
-                       $dir="usr/share/man/man$section";
-                       $reldir="";
-               }
-
-               if (! -d "$tmp/$dir") {
-                       doit("install","-d","$tmp/$dir");
-               }
-               doit("ln","-sf","${reldir}undocumented.7.gz","$tmp/$dir/$file.gz");
-       }
-}
+=cut