diff --git a/testsuite/run-tests b/testsuite/run-tests
index 498e98a75957688c80d01935da10b19e9225e68d..c3552cb85f0e9dd29564b6a9d32f615ae175c99b 100755
--- a/testsuite/run-tests
+++ b/testsuite/run-tests
@@ -13,8 +13,8 @@ env_program () {
 }
 
 test_program () {
+  testname=`echo "$1" | sed -e 's,-test$,,' -e 's,^\./,,`
   "./$1"
-  testname=`echo "$1" | sed -e 's/-test//'`
   case "$?" in
       0)
     	echo PASS: $testname