summaryrefslogtreecommitdiffstats
path: root/tests/init.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-07-16 08:03:17 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-07-16 08:03:17 (GMT)
commit5cb86aa574bf8ab539797a9b908bb87db6e5b91e (patch)
tree4c2fc1e9e2b3f313a731834caac9faf04803d383 /tests/init.test
parent9792a27404caba808e5e0e5a15a6d86312613e4f (diff)
downloadtcl-5cb86aa574bf8ab539797a9b908bb87db6e5b91e.zip
tcl-5cb86aa574bf8ab539797a9b908bb87db6e5b91e.tar.gz
tcl-5cb86aa574bf8ab539797a9b908bb87db6e5b91e.tar.bz2
Make registry 1.3 package (and possibly others) dynamically loadable in Tcl 8.4
Reverted. No good reason to partially hack 8.5 features into (only one patch release of) 8.4. If you need to support Tcl 8.4, just don't use [tcl::pkgconfig]. If you're set on moving to [tcl::pkgconfig], then that's an 8.5 features and you're choosing to drop 8.4 support.
Diffstat (limited to 'tests/init.test')
-rw-r--r--tests/init.test9
1 files changed, 6 insertions, 3 deletions
diff --git a/tests/init.test b/tests/init.test
index 79142c4..c46ba48 100644
--- a/tests/init.test
+++ b/tests/init.test
@@ -117,13 +117,11 @@ test init-2.6 {load setLogCmd from safe:: - stage 1} {
rename ::safe::setLogCmd {} ; # should not fail
} {}
-test init-2.7 {oad setLogCmd from safe:: - stage 2} {
+test init-2.7 {load setLogCmd from safe:: - stage 2} {
namespace eval safe setLogCmd
rename ::safe::setLogCmd {} ; # should not fail
} {}
-
-
test init-2.8 {load tcl::HistAdd} -setup {
auto_reset
catch {rename ::tcl::HistAdd {}}
@@ -134,6 +132,11 @@ test init-2.8 {load tcl::HistAdd} -setup {
rename ::tcl::HistAdd {} ;
} -result {1 {wrong # args: should be "tcl:::HistAdd command ?exec?"}}
+test init-2.9 {undocumented tcl::pkgconfig} -setup {
+} -body {
+ list [catch {::tcl::pkgconfig} error] $error
+ } -cleanup {
+} -result {1 {invalid command name "::tcl::pkgconfig"}}
test init-3.0 {random stuff in the auto_index, should still work} {
set auto_index(foo:::bar::blah) {