From 30127843273fda7abd4ccab9bcf0a305f847547a Mon Sep 17 00:00:00 2001
From: Sreeji K Das <sreeji_k@yahoo.com>
Date: Tue, 12 Aug 2003 14:19:00 +0100
Subject: [PATCH] Re: maint @ 20617 [PATCH] Message-ID:
 <20030812121900.26127.qmail@web10501.mail.yahoo.com>

p4raw-id: //depot/perl@20666
---
 lib/ExtUtils/Installed.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lib/ExtUtils/Installed.pm b/lib/ExtUtils/Installed.pm
index 72bbb53..619b141 100644
--- a/lib/ExtUtils/Installed.pm
+++ b/lib/ExtUtils/Installed.pm
@@ -26,6 +26,9 @@ sub _is_prefix {
         $prefix = VMS::Filespec::unixify($prefix);
         $path   = VMS::Filespec::unixify($path);
     }
+    $prefix =~ m!/+! && $prefix =~ s!/+!/!g;
+    $path   =~ m!/+! && $path   =~ s!/+!/!g;
+
     return 1 if substr($path, 0, length($prefix)) eq $prefix;
 
     if ($DOSISH) {
-- 
2.7.4