[ID 20010514.022] Makemaker a bit too prefix-happy

Message-Id: <200105071535.f47FZvf27235@xerxes.courtesan.com>

p4raw-id: //depot/perl@10095

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 0f441d0..83f34b3 100644 (file)
--- 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/\Q$sprefix\E/$rprefix/s;
+    $self->{uc $var} =~ s/\w\Q$sprefix\E\w/$rprefix/s;
 }
 
 =item processPL (o)