From 4e05ddfac64e441d4693f72a7e3f0254d02016c6 Mon Sep 17 00:00:00 2001
From: Ben Elliston <bje@gnu.org>
Date: Sun, 8 Feb 2004 03:06:26 +0000
Subject: 	* runtest: Terminate with an error if expect cannot be found. 
 * TODO: Update.

---
 runtest | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'runtest')

diff --git a/runtest b/runtest
index 5ce6abb..417e4f9 100755
--- a/runtest
+++ b/runtest
@@ -116,7 +116,12 @@ if [ x"$DEJAGNULIBS" != x ] ; then
     fi
 fi
 if [ x"$runpath" = x ] ; then
-    echo "ERROR: runtest.exp does not exist."
+    echo "ERROR: runtest.exp does not exist"
+    exit 1
+fi
+
+if ! type $expectbin >/dev/null 2>/dev/null ; then
+    echo "ERROR: unable to find expect on the PATH"
     exit 1
 fi
 
-- 
cgit v1.1