X-Git-Url: https://git.draconx.ca/gitweb/dxcommon.git/blobdiff_plain/c01bc8e8ea99252f4249434e432896c8f2ae1199..485ec08e224f3ffed90259f445839572096187a0:/tests/programs.at

diff --git a/tests/programs.at b/tests/programs.at
index 1346ede..5460b5c 100644
--- a/tests/programs.at
+++ b/tests/programs.at
@@ -37,14 +37,17 @@ TEST_AUTORECONF
 
 # Check the search via path lookup
 save_PATH=$PATH
-PATH=$PWD/bin${PATH:+":$PATH"}
+PATH=`pwd`/bin${PATH:+":$PATH"}
 
-# Sanity test on PATH lookup
-AT_CHECK([test x"`command -v $1`" = x"$PWD/bin/$1" || exit 99 #''])
+# Sanity test on PATH lookup; configure will substitute absolute path if
+# "command" does not work (e.g., heirloom-sh).
+expected=$1
+val=`$TEST_SHELL -c 'command -v $1'`
+test x"$val" = x"`pwd`/bin/$1" || expected=`pwd`/bin/$1
 
 TEST_CONFIGURE
 AT_CHECK_UNQUOTED([cat test], [0], [yes
-$1
+$expected
 ])
 PATH=$save_PATH