(retracted by #16114)

Subject: [PATCH] Nuke obsolete way to build debugging (etc) perls
From: "Green, Paul" <Paul.Green@stratus.com>
Message-ID: <A2A34F15EE916148BC4C4748223E67A4014E24ED@EXNA4.stratus.com>

p4raw-id: //depot/perl@16109

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index 4604d39..dd38d32 100644 (file)
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -3190,6 +3190,8 @@ sub prefixify {
 
     $path = VMS::Filespec::unixpath($path) if $Is_VMS;
 
+    return if $path eq '';
+
     unless( $path =~ s,^\Q$sprefix\E(?=/|\z),$rprefix,s ) {
 
         print STDERR "    cannot prefix, using default.\n" if $Verbose >= 2;