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 /*)