summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorredman <redman>1999-06-28 18:23:21 (GMT)
committerredman <redman>1999-06-28 18:23:21 (GMT)
commitd5e40f3d0b99fdef406aecf190d1570e285aea22 (patch)
tree9af6c91a13d064debc08ea8dcbf0268994cd27ee
parent9973c32cda17bbbaf0f01c5bf59e2de6d9d57e8d (diff)
downloadtcl-d5e40f3d0b99fdef406aecf190d1570e285aea22.zip
tcl-d5e40f3d0b99fdef406aecf190d1570e285aea22.tar.gz
tcl-d5e40f3d0b99fdef406aecf190d1570e285aea22.tar.bz2
Fixed test suite to call $tcltest::tcltest instead of $::tcltest
(for the name of the executable).
-rw-r--r--tests/winDde.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/winDde.test b/tests/winDde.test
index 9b21bdf..b734f82 100644
--- a/tests/winDde.test
+++ b/tests/winDde.test
@@ -9,7 +9,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: winDde.test,v 1.4 1999/06/26 20:55:18 rjohnson Exp $
+# RCS: @(#) $Id: winDde.test,v 1.5 1999/06/28 18:23:21 redman Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -56,7 +56,7 @@ proc createChildProcess { ddeServerName } {
}
close $f
- set f [open "|$::tcltest $::scriptName" r]
+ set f [open "|$tcltest::tcltest $::scriptName" r]
gets $f
return $f
}