From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Fri, 14 Nov 2003 07:43:17 +0000 (+0000)
Subject: Include "SCCS" in the list of directory names that should
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=559940b257e4566f57a9f46ee38ad0afc55af911;p=p5sagit%2Fp5-mst-13.2.git

Include "SCCS" in the list of directory names that should
be ignored by installperl.

p4raw-id: //depot/perl@21723
---

diff --git a/installperl b/installperl
index cdc8fc8..a12ec62 100755
--- a/installperl
+++ b/installperl
@@ -792,7 +792,7 @@ sub installlib {
     my $name = $_;
 
     # Ignore version control directories.
-    if (($name eq 'CVS' or $name eq 'RCS' or $name eq '.svn') and -d $name) {
+    if ($name =~ /^(?:CVS|RCS|SCCS|\.svn)\z/ and -d $name) {
 	$File::Find::prune = 1;
 	return;
     }