X-Git-Url: https://perl5.git.perl.org/metaconfig.git/blobdiff_plain/26470d78a48e14380769f2ffd2e34100aa455d3d..89b0533fba6d4d87301c0967fb15672f2e8b3cda:/U/modified/Loc.U

diff --git a/U/modified/Loc.U b/U/modified/Loc.U
index 3a6d9e7..c399bd7 100644
--- a/U/modified/Loc.U
+++ b/U/modified/Loc.U
@@ -80,6 +80,9 @@
 ?T:thisthing thing xxx dir file say _test DJGPP
 ?LINT:change PATH
 ?LINT:extern _exe
+?LINT:change _egrep
+?LINT:change _ln
+?LINT:change _make
 : find out where common programs are
 echo " "
 echo "Locating common programs..." >&4
@@ -123,9 +126,10 @@ for dir in \$*; do
 	elif test -f \$dir/\$thing.exe; then
 		if test -n "$DJGPP"; then
 			echo \$dir/\$thing.exe
-		else
+		elif test "$eunicefix" != ":"; then
 			: on Eunice apparently
 			echo \$dir/\$thing
+			exit 0
 		fi
 		exit 0
 	fi
@@ -275,7 +279,7 @@ for file in $trylist; do
 	'') xxx=`./loc $file $file $pth`;;
 	*) xxx=`./loc $xxx $xxx $pth`;;
 	esac
-	eval $file=$xxx
+	eval $file=$xxx$_exe
 	eval _$file=$xxx
 	case "$xxx" in
 	/*)