diff options
Diffstat (limited to 'tests/iogt.test')
| -rw-r--r-- | tests/iogt.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/iogt.test b/tests/iogt.test index ac52f5b..969e43c 100644 --- a/tests/iogt.test +++ b/tests/iogt.test @@ -10,7 +10,7 @@ # Copyright (c) 2000 Andreas Kupries. # All rights reserved. # -# RCS: @(#) $Id: iogt.test,v 1.14 2006/03/21 11:12:29 dkf Exp $ +# RCS: @(#) $Id: iogt.test,v 1.15 2006/11/03 00:34:53 hobbs Exp $ if {[catch {package require tcltest 2.1}]} { puts stderr "Skipping tests in [info script]. tcltest 2.1 required." @@ -143,7 +143,7 @@ proc fevent {fdelay idelay blocks script data} { set port 4000 exec tclsh __echo_srv__.tcl \ - $port $fdelay $idelay {expand}$blocks >@stdout & + $port $fdelay $idelay {*}$blocks >@stdout & after 500 |