diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-12-07 15:53:29 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-12-07 15:53:29 (GMT) |
commit | ef331c2b06dede42238295f9b0fbaedb83f668b2 (patch) | |
tree | 3cd7579bae48023197934cd88e0c440f02508d7c | |
parent | fa2a03a1bf7c810f5d6fb14da98de6d4526339af (diff) | |
download | tcl-ef331c2b06dede42238295f9b0fbaedb83f668b2.zip tcl-ef331c2b06dede42238295f9b0fbaedb83f668b2.tar.gz tcl-ef331c2b06dede42238295f9b0fbaedb83f668b2.tar.bz2 |
fix failing test
-rw-r--r-- | tests/load.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/load.test b/tests/load.test index eef677f..cded85d 100644 --- a/tests/load.test +++ b/tests/load.test @@ -188,7 +188,7 @@ test load-8.3 {TclGetLoadedPackages procedure} [list teststaticpkg $dll $loaded] test load-8.4 {TclGetLoadedPackages procedure} [list $dll $loaded teststaticpkg] { load [file join $testDir pkgb$ext] pkgb list [info loaded {}] [lsort [info commands pkgb_*]] -} [list [concat [list [list [file join $testDir pkgb$ext] Pkgb] {{} Double} {{} More} {{} Another} {{} Test} [list [file join $testDir pkga$ext] Pkga]] $alreadyLoaded] {pkgb_sub pkgb_unsafe}] +} [list [concat [list [list [file join $testDir pkgb$ext] Pkgb] {{} Double} {{} More} {{} Another} {{} Test} [list [file join $testDir pkga$ext] Pkga]] $alreadyLoaded] {pkgb_demo pkgb_sub pkgb_unsafe}] interp delete child test load-9.1 {Tcl_StaticPackage, load already-loaded package into another interp} \ |