(test_program): Bugfix: Test the exit

status of the right process.

Rev: src/testsuite/run-tests:1.3

src/testsuite/run-tests

@@ -27,8 +27,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