The branch, v3-3-test has been updated
       via  b6b7aa023b62ab8994d13cb91d5185204c1500b2 (commit)
      from  7cd40b7e0ec77f70d79b19abb8bc9623a9efae31 (commit)

http://gitweb.samba.org/?p=samba.git;a=shortlog;h=v3-3-test


- Log -----------------------------------------------------------------
commit b6b7aa023b62ab8994d13cb91d5185204c1500b2
Author: Karolin Seeger <[EMAIL PROTECTED]>
Date:   Wed Sep 17 08:48:19 2008 +0200

    find_missing_manpages.pl: Adapt script to changed directory structure.
    
    Karolin

-----------------------------------------------------------------------

Summary of changes:
 docs-xml/scripts/find_missing_manpages.pl |   27 ++++++++++++++++++++-------
 1 files changed, 20 insertions(+), 7 deletions(-)


Changeset truncated at 500 lines:

diff --git a/docs-xml/scripts/find_missing_manpages.pl 
b/docs-xml/scripts/find_missing_manpages.pl
index c468d7d..aa5751b 100755
--- a/docs-xml/scripts/find_missing_manpages.pl
+++ b/docs-xml/scripts/find_missing_manpages.pl
@@ -1,14 +1,25 @@
 #!/usr/bin/perl
 
-my %doc;
-
 $invar = 0;
-
 $topdir = (shift @ARGV) or $topdir = ".";
-
+$makefile = "$topdir/source/Makefile.in";
+$mandir = "$topdir/docs-xml/manpages-3";
 $progs = "";
 
-open(IN, "$topdir/Makefile.in");
+chdir($topdir);
+
+if(! -e "$makefile") {
+       print "$makefile does not exist!\n";
+       print "Wrong directory?\n";
+       exit(1);
+}
+
+if(! -d "$mandir") {
+        print "$mandir does not exist!\n";
+        exit(1);
+}
+
+open(IN, "$makefile");
 while(<IN>) {
        if($invar && /^([ \t]*)(.*?)([\\])$/) {
                $progs.=" " . $2;
@@ -22,15 +33,17 @@ while(<IN>) {
 foreach(split(/bin\//, $progs)) {
        next if($_ eq " ");
        s/[EMAIL PROTECTED]@//g;
+       s/[EMAIL PROTECTED]@//g;
        s/ //g;
 
 
        $f = $_;
-       
+
        $found = 0;
 
+
        for($i = 0; $i < 9; $i++) {
-               if(-e "manpages/$f.$i.xml") { $found = 1; }
+               if(-e "$mandir/$f.$i.xml") { $found = 1; }
        }
 
        if(!$found) {


-- 
Samba Shared Repository

Reply via email to