From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 28 Mar 2002 01:46:21 +0000 (+0000)
Subject: Don't install anything beneath 't' directories.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9e39c21b3d8e97a193f162a4c767eb81f41c91da;p=p5sagit%2Fp5-mst-13.2.git

Don't install anything beneath 't' directories.

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

diff --git a/installperl b/installperl
index f36b4c0..3379369 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 '';