diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-07-28 22:54:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-07-28 22:54:19 (GMT) |
| commit | a8b104c3b5ef5cf3721b20a37d48360b90f77a10 (patch) | |
| tree | 1db30d24ce737688e181c057e5a12951fd2ce441 /tests/registry.test | |
| parent | fac7c80aed10356b5116daca1d8b8a160aa1d18d (diff) | |
| download | tcl-a8b104c3b5ef5cf3721b20a37d48360b90f77a10.zip tcl-a8b104c3b5ef5cf3721b20a37d48360b90f77a10.tar.gz tcl-a8b104c3b5ef5cf3721b20a37d48360b90f77a10.tar.bz2 | |
Bug [3549770]: Multiple test failures running tcltest outside build tree
Diffstat (limited to 'tests/registry.test')
| -rw-r--r-- | tests/registry.test | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/tests/registry.test b/tests/registry.test index cda914f..cbca4fd 100644 --- a/tests/registry.test +++ b/tests/registry.test @@ -17,11 +17,9 @@ if {[lsearch [namespace children] ::tcltest] == -1} { testConstraint reg 0 if {[testConstraint win]} { - if {![catch {load {} Registry}] - || ![catch {package require registry}] - || ![catch { + if {![catch { ::tcltest::loadTestedCommands - load $::reglib Registry + package require registry }]} { testConstraint reg 1 } |