This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
installperl patchlet
authorAndreas J. Koenig <andreas.koenig.7os6VVqR@franz.ak.mind.de>
Tue, 28 Oct 2008 05:11:20 +0000 (06:11 +0100)
committerNicholas Clark <nick@ccl4.org>
Tue, 28 Oct 2008 18:33:35 +0000 (18:33 +0000)
Message-ID: <87k5btpdef.fsf@k75.linux.bogus>
Date: Tue, 28 Oct 2008 05:11:20 +0100

p4raw-id: //depot/perl@34620

installperl

index aede39a..da8f45e 100755 (executable)
@@ -617,6 +617,7 @@ if (!$versiononly && $otherperls) {
        next unless m,^/,;
        # Use &samepath here because some systems have other dirs linked
        # to $mainperldir (like SunOS)
+       next unless -d;
        next if samepath($_, $binexp);
        next if samepath($_, cwd());
        next if ($mainperl_is_instperl && samepath($_, $mainperldir));