diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-17 09:19:24 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-10-17 09:19:24 +0000 |
commit | e87397262fea23fa89ba85aa7fe9c848306450ab (patch) | |
tree | 36f49903458f2078d915b45c04f1661e06a6ed1a /installperl | |
parent | 0253cb4104ff1121338d661bd3f918b6225bd25b (diff) | |
download | perl-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-x | installperl | 8 |
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 ''; |