diff --git a/test/run-tests.sh b/test/run-tests.sh
index 837f55a6fb11fe23be658dbab5ff699b9257154a..b9f4cf0a4789c551a3d8e5932dc0d0abf46b42be 100755
--- a/test/run-tests.sh
+++ b/test/run-tests.sh
@@ -111,8 +111,7 @@ case "$lisp" in
   clisp)
     if type clisp ; then
 	fasl_ext="fas"
-	command=`which clisp`
-	command="$command -norc -ansi -I "
+	command="clisp -norc -ansi -I "
         nodebug="-on-error exit"
         eval="-x"
     fi ;;
@@ -155,15 +154,13 @@ case "$lisp" in
   ecl)
     if type ecl ; then
 	fasl_ext="fas"
-	command=`which ecl`
-	command="$command -norc"
+	command="ecl -norc"
         eval="-eval"
     fi ;;
   lispworks)
     if type lispworks ; then
 	fasl_ext="ofasl"
-	command=`which lispworks`
-	command="$command -siteinit - -init -"
+	command="lispworks -siteinit - -init -"
         eval="-eval"
     fi ;;
   *)