summaryrefslogtreecommitdiffstats
path: root/tests/cmdInfo.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2013-01-30 20:42:10 (GMT)
committerdgp <dgp@users.sourceforge.net>2013-01-30 20:42:10 (GMT)
commit4445787a0a5228ad9d533415e563d6ae0ec517bf (patch)
treefe7cda3c3a7c230ce8087e0d21f017d6aa73dd97 /tests/cmdInfo.test
parent6a27aae72c76f68c63aa85b9bc8f159385534102 (diff)
downloadtcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.zip
tcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.tar.gz
tcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.tar.bz2
For Parse/eval, select modernizations from Patrick Fradin.
Diffstat (limited to 'tests/cmdInfo.test')
-rw-r--r--tests/cmdInfo.test8
1 files changed, 3 insertions, 5 deletions
diff --git a/tests/cmdInfo.test b/tests/cmdInfo.test
index 86aa6e1..112318f 100644
--- a/tests/cmdInfo.test
+++ b/tests/cmdInfo.test
@@ -13,10 +13,8 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
-if {[lsearch [namespace children] ::tcltest] == -1} {
- package require tcltest 2
- namespace import -force ::tcltest::*
-}
+package require tcltest 2
+namespace import ::tcltest::*
testConstraint testcmdinfo [llength [info commands testcmdinfo]]
testConstraint testcmdtoken [llength [info commands testcmdtoken]]
@@ -98,7 +96,7 @@ test cmdinfo-6.1 {Names for commands created when outside namespaces} \
# cleanup
catch {namespace delete cmdInfoNs1::cmdInfoNs2 cmdInfoNs1}
catch {rename x1 ""}
-::tcltest::cleanupTests
+cleanupTests
return
# Local Variables: