summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTodd C. Miller <millert@cvs.openbsd.org>2010-01-05 00:46:37 +0000
committerTodd C. Miller <millert@cvs.openbsd.org>2010-01-05 00:46:37 +0000
commit11d04065a0c291c30e476145b8520d74710c4b7f (patch)
treed4ad01d40e3b3609a6f61d947fe40ee70d72237d
parent4a7de402aa6c7593a4e2d82aef0f07297aa0200f (diff)
Ignore CVS dir in private copy of libscan like real one does.
-rw-r--r--gnu/usr.bin/perl/ext/IO-Compress/private/MakeUtil.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/usr.bin/perl/ext/IO-Compress/private/MakeUtil.pm b/gnu/usr.bin/perl/ext/IO-Compress/private/MakeUtil.pm
index e5959106542..598bfe7f92f 100644
--- a/gnu/usr.bin/perl/ext/IO-Compress/private/MakeUtil.pm
+++ b/gnu/usr.bin/perl/ext/IO-Compress/private/MakeUtil.pm
@@ -35,7 +35,8 @@ sub MY::libscan
my $path = shift;
return undef
- if $path =~ /(~|\.bak|_bak)$/ ||
+ if $path =~ /^(?:RCS|CVS|SCCS|\.svn|_darcs)$/ ||
+ $path =~ /(~|\.bak|_bak)$/ ||
$path =~ /\..*\.sw(o|p)$/ ||
$path =~ /\B\.svn\b/;