You are viewing a plain text version of this content. The canonical link for it is here.
Posted to websh-cvs@tcl.apache.org by ro...@apache.org on 2003/11/14 19:59:57 UTC
cvs commit: tcl-websh/src/tests filelock.test
ronnie 2003/11/14 10:59:57
Modified: src/tests filelock.test
Log:
- call of current shell version (w/o getting the binary from the path)
Revision Changes Path
1.3 +2 -2 tcl-websh/src/tests/filelock.test
Index: filelock.test
===================================================================
RCS file: /home/cvs/tcl-websh/src/tests/filelock.test,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- filelock.test 25 Oct 2001 11:04:29 -0000 1.2
+++ filelock.test 14 Nov 2003 18:59:57 -0000 1.3
@@ -69,7 +69,7 @@
# temporary test script
set fh [open $script "w"]
global argv0
- puts $fh "#!$argv0"
+ puts $fh "#![info nameofexecutable]"
puts $fh {set c [lindex $argv 0]}
puts $fh {puts "starting [pid] for $c"}
puts $fh "if {\$c < $processes} {exec \$argv0 \[incr c\] &}"
---------------------------------------------------------------------
To unsubscribe, e-mail: websh-cvs-unsubscribe@tcl.apache.org
For additional commands, e-mail: websh-cvs-help@tcl.apache.org