From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 22 Nov 2001 05:06:09 +0000 (+0000)
Subject: procselfexe tweak: for some reason I had a ls in
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=51660ed528352b424b5c5027cd895ae303606971;p=p5sagit%2Fp5-mst-13.2.git

procselfexe tweak: for some reason I had a ls in
/proc/self/exe, not the ls Configure thought it
would found.

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

diff --git a/Configure b/Configure
index 65edddc..0b1b043 100755
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Thu Nov 22 07:43:52 EET 2001 [metaconfig 3.0 PL70]
+# Generated on Thu Nov 22 08:04:01 EET 2001 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
 cat >c1$$ <<EOF
@@ -11460,7 +11460,7 @@ case "$d_readlink" in
 "$define")
 	if $issymlink /proc/self/exe ; then
 		$ls -l /proc/self/exe > reflect
-		if $contains $ls reflect >/dev/null 2>&1; then
+		if $contains /`basename $ls` reflect >/dev/null 2>&1; then
 			val="$define"
 			echo "You have Linux-like /proc/self/exe."
 		fi