From a3a277541924c1e0955248831d8188d9947fd5e3 Mon Sep 17 00:00:00 2001
From: "Ronald J. Kimball" <rjk@linguist.dartmouth.edu>
Date: Mon, 14 May 2001 05:38:59 -0400
Subject: [PATCH] Re: [ID 20010514.022] Makemaker a bit too prefix-happy
 Message-ID: <20010514093859.A1479715@linguist.thayer.dartmouth.edu>

p4raw-id: //depot/perl@10101
---
 lib/ExtUtils/MM_Unix.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 83f34b3..6837131 100644
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -3110,7 +3110,7 @@ sub prefixify {
     my($self,$var,$sprefix,$rprefix) = @_;
     $self->{uc $var} ||= $Config{lc $var};
     $self->{uc $var} = VMS::Filespec::unixpath($self->{uc $var}) if $Is_VMS;
-    $self->{uc $var} =~ s/\w\Q$sprefix\E\w/$rprefix/s;
+    $self->{uc $var} =~ s,^\Q$sprefix\E(?=/|\z),$rprefix,s;
 }
 
 =item processPL (o)
-- 
2.7.4