summaryrefslogtreecommitdiff
path: root/installperl
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-10-17 09:19:24 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-10-17 09:19:24 +0000
commite87397262fea23fa89ba85aa7fe9c848306450ab (patch)
tree36f49903458f2078d915b45c04f1661e06a6ed1a /installperl
parent0253cb4104ff1121338d661bd3f918b6225bd25b (diff)
downloadperl-e87397262fea23fa89ba85aa7fe9c848306450ab.tar.gz
make installperl ignore RCS files (from Michael G Schwern
<schwern@pobox.com>) p4raw-id: //depot/perl@4398
Diffstat (limited to 'installperl')
-rwxr-xr-xinstallperl8
1 files changed, 5 insertions, 3 deletions
diff --git a/installperl b/installperl
index d0d5eebac5..b576d8b847 100755
--- a/installperl
+++ b/installperl
@@ -573,13 +573,15 @@ sub installlib {
my $name = $_;
- if ($name eq 'CVS' && -d $name) {
+ # Ignore RCS and CVS directories.
+ if (($name eq 'CVS' or $name eq 'RCS') and -d $name) {
$File::Find::prune = 1;
return;
}
- # ignore patch backups and the .exists files.
- return if $name =~ m{\.orig$|~$|^\.exists};
+ # ignore patch backups, RCS files, emacs backup & temp files and the
+ # .exists files.
+ return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists};
$name = "$dir/$name" if $dir ne '';