[perl-ldap-checkins] CVS: ldap mkmanf,1.2,1.3

[Graham B. <gb...@us...>]

Update of /cvsroot/perl-ldap/ldap
In directory usw-pr-cvs1:/tmp/cvs-serv2467

Modified Files:
	mkmanf 
Log Message:
Dont scan htdocs for files


Index: mkmanf
===================================================================
RCS file: /cvsroot/perl-ldap/ldap/mkmanf,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- mkmanf	12 Feb 2001 14:29:32 -0000	1.2
+++ mkmanf	3 Jun 2002 15:42:50 -0000	1.3
@@ -1,10 +1,13 @@
 #!/bin/sh
 
 (
-  for x in $(find . -name Entries | egrep CVS/Entries$ | sed 's,CVS/Entries$,,')
+  for x in $(find . -type d)
   do
-    grep ^/ $x/CVS/Entries | cut -d/ -f2 | sed s,^,$x, | sed s,^\./,,
+    if [ -f $x/CVS/Entries ]; then
+      grep ^/ $x/CVS/Entries | cut -d/ -f2 | sed s,^,$x/, | sed s,^\./,,
+    fi
   done
-  find htdocs -name CVS -prune -o -type f -print
+  find lib -name \*.pm
+  find lib -name \*.pod
 ) | sort -u > MANIFEST.new
 diff -u MANIFEST MANIFEST.new && rm MANIFEST.new