From: Jerry D. Hedden <jdhedden@cpan.org>
Date: Mon, 23 Feb 2009 17:37:16 +0000 (-0500)
Subject: Fix to installing non-xs ext's in priv lib
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b925ea3bf397b0f1251c08d6e6991be69033baef;p=p5sagit%2Fp5-mst-13.2.git

Fix to installing non-xs ext's in priv lib
---

diff --git a/installperl b/installperl
index 8d5573d..a3657ef 100755
--- a/installperl
+++ b/installperl
@@ -158,7 +158,8 @@ my @nonxs = grep(!/^Errno$/, split(' ', $Config{'nonxs_ext'}));
 
 find(sub {
     if (($File::Find::name =~ m{^ext\b(.*)/([^/]+)\.pm$}) &&
-        ! grep { $File::Find::name =~ /^ext\/$_/ } @nonxs)
+        ! grep { (my $dir = $_) =~ s/\//-/g;
+                 $File::Find::name =~ /^ext\/$dir/ } @nonxs)
     {
 	my($path, $modname) = ($1,$2);