From: Edward Moy <emoy@apple.com>
Date: Sun, 13 Jul 2003 14:12:57 +0000 (-0700)
Subject: Re: problem with rc1 and rc2 on Mac OS X
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=64222d737f7f4bf669dcd822491f13de376b9ee5;p=p5sagit%2Fp5-mst-13.2.git

Re: problem with rc1 and rc2 on Mac OS X
Message-Id: <C66FBFAC-B576-11D7-89B5-0030657B317C@apple.com>

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

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 455121f..a25c9f9 100644
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -3399,6 +3399,7 @@ sub prefixify {
     print STDERR "  prefixify $var => $path\n" if $Verbose >= 2;
     print STDERR "    from $sprefix to $rprefix\n" if $Verbose >= 2;
 
+    $rprefix .= '/' if $sprefix eq '/'; # Compensate for the slash.
     if( $path !~ s{^\Q$sprefix\E\b}{$rprefix}s && $self->{ARGS}{PREFIX} ) {
 
         print STDERR "    cannot prefix, using default.\n" if $Verbose >= 2;