summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2004-10-28 04:54:06 (GMT)
committerdgp <dgp@users.sourceforge.net>2004-10-28 04:54:06 (GMT)
commitd2a75636f32b091238c993c7a9f579866c3cb28d (patch)
treeee862d8a791068de3b967169ed7209028716f87e
parent5e37a9c86cca817c60268a18063c326520f24480 (diff)
downloadtcl-d2a75636f32b091238c993c7a9f579866c3cb28d.zip
tcl-d2a75636f32b091238c993c7a9f579866c3cb28d.tar.gz
tcl-d2a75636f32b091238c993c7a9f579866c3cb28d.tar.bz2
D'oh!
-rw-r--r--tests/socket.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/socket.test b/tests/socket.test
index 5a7388e..0d6af1d 100644
--- a/tests/socket.test
+++ b/tests/socket.test
@@ -10,7 +10,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: socket.test,v 1.33 2004/10/28 04:17:39 dgp Exp $
+# RCS: @(#) $Id: socket.test,v 1.34 2004/10/28 04:54:06 dgp Exp $
# Running socket tests with a remote server:
# ------------------------------------------
@@ -1654,7 +1654,7 @@ test socket-13.1 {Testing use of shared socket between two threads} \
} -body {
# create a thread
- set serverthread [testthread create { source $path(script) } ]
+ set serverthread [testthread create [list source $path(script) ] ]
update
set port [testthread send $serverthread {set listen}]
update