From: Tony Sanders <sanders@bsdi.com>
Date: Wed, 27 Aug 1997 11:05:24 +0000 (+1200)
Subject: update to installperl for perl5.004_02 to skip CVS dir
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4b66953f587b2138e003f8c94d1fd938314f4325;p=p5sagit%2Fp5-mst-13.2.git

update to installperl for perl5.004_02 to skip CVS dir

Without this patch, it installs the CVS directories along with the
other lib files.  You could probably merge this test with the one
below it (just always set prune or something) -- I'll leave that
decision upto the perl wizards.

p5p-msgid: 199708272307.RAA13451@austin.bsdi.com
---

diff --git a/installperl b/installperl
index 9686bfb..a96c89a 100755
--- a/installperl
+++ b/installperl
@@ -401,6 +401,11 @@ sub installlib {
     local($depth) = $dir ? "lib/$dir" : "lib";
 
     my $name = $_;
+
+    if ($name eq 'CVS' && -d $name) {
+	$File::Find::prune = 1;
+	return;
+    }
     
     # ignore patch backups and the .exists files.
     return if $name =~ m{\.orig$|~$|^\.exists};