* winsup.api/winsup.exp (ws_spawn): Tweak slightly to work with tcl 8.4.1.

2003-02-08 16:46:32 +00:00
parent 994d26a476
commit 9c88207cf3
2 changed files with 6 additions and 1 deletions
--- a/winsup/testsuite/winsup.api/winsup.exp
+++ b/winsup/testsuite/winsup.api/winsup.exp
@@ -23,7 +23,7 @@ if { [info exists env(CYGWIN_TESTSUITE_TESTS)] } {
 proc ws_spawn {cmd args} {
    global rv
    verbose "running $cmd\n"
-    catch [eval "exec $cmd"] rv
+    catch "exec $cmd" rv
    verbose send "catchCode = $rv\n"
 }