summaryrefslogtreecommitdiff
path: root/installperl
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-03-28 01:46:21 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-28 01:46:21 +0000
commit9e39c21b3d8e97a193f162a4c767eb81f41c91da (patch)
tree08d2f32d60f683881b002fa65ebf203f35a3ef23 /installperl
parent7b89fb7c72364d7463347df7574856cfc24b94f9 (diff)
downloadperl-9e39c21b3d8e97a193f162a4c767eb81f41c91da.tar.gz
Don't install anything beneath 't' directories.
p4raw-id: //depot/perl@15569
Diffstat (limited to 'installperl')
-rwxr-xr-xinstallperl3
1 files changed, 2 insertions, 1 deletions
diff --git a/installperl b/installperl
index f36b4c0d05..3379369ccd 100755
--- a/installperl
+++ b/installperl
@@ -744,7 +744,8 @@ sub installlib {
# ignore patch backups, RCS files, emacs backup & temp files and the
# .exists files, .PL files, and .t files.
- return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.t$};
+ return if $name =~ m{\.orig$|~$|^#.+#$|,v$|^\.exists|\.PL$|\.t$} ||
+ $dir =~ m{/t(?:/|$)};
$name = "$dir/$name" if $dir ne '';