undocumented: Drop extension from helper scripts.

[sfrench/samba-autobuild/.git] / docs-xml / scripts / find_missing_manpages.pl

diff --git a/docs-xml/scripts/find_missing_manpages.pl b/docs-xml/scripts/find_missing_manpages.pl
deleted file mode 100755 (executable)
index cd8ed87..0000000
--- a/docs-xml/scripts/find_missing_manpages.pl
+++ /dev/null
@@ -1,39 +0,0 @@
-#!/usr/bin/perl
-
-my %doc;
-
-$invar = 0;
-
-$topdir = (shift @ARGV) or $topdir = ".";
-
-$progs = "";
-
-open(IN, "$topdir/Makefile.in");
-while(<IN>) {
-       if($invar && /^([ \t]*)(.*?)([\\])$/) {
-               $progs.=" " . $2;
-               if($4) { $invar = 1; } else { $invar = 0; }
-       } elsif(/^([^ ]*)_PROGS([0-9]*) = (.*?)([\\])$/) {
-               $progs.=" " . $3;
-               if($4) { $invar = 1; }
-       } else { $invar = 0; }
-}
-
-$progs =~ s/@([^@]+)@//g;
-
-foreach(split(/bin\//, $progs)) {
-       next if($_ eq " ");
-       s/ //g;
-
-       $f = $_;
-       
-       $found = 0;
-
-       for($i = 0; $i < 9; $i++) {
-               if(-e "manpages/$f.$i.xml") { $found = 1; }
-       }
-
-       if(!$found) {
-               print "'$f' does not have a manpage\n";
-       }
-}