diff options
Diffstat (limited to 'tests/unixEmbed.test')
| -rw-r--r-- | tests/unixEmbed.test | 22 |
1 files changed, 3 insertions, 19 deletions
diff --git a/tests/unixEmbed.test b/tests/unixEmbed.test index 46191a7..1e8f03b 100644 --- a/tests/unixEmbed.test +++ b/tests/unixEmbed.test @@ -7,10 +7,7 @@ # All rights reserved. package require tcltest 2.1 -namespace import -force tcltest::configure -namespace import -force tcltest::testsDirectory -configure -testdir [file join [pwd] [file dirname [info script]]] -configure -loadfile [file join [testsDirectory] constraints.tcl] +eval tcltest::configure $argv tcltest::loadTestedCommands setupbg @@ -200,7 +197,7 @@ test unixEmbed-3.2 {ContainerEventProc procedure, set size on creation} unix { update wm geometry .t2 } {200x200+0+0} -test unixEmbed-3.2 {ContainerEventProc procedure, disallow position changes} unix { +test unixEmbed-3.2a {ContainerEventProc procedure, disallow position changes} unix { deleteWindows frame .f1 -container 1 -width 200 -height 50 pack .f1 @@ -558,18 +555,5 @@ test unixEmbed-10.2 {geometry propagation in tkUnixWm.c/UpdateGeometryInfo} unix # cleanup deleteWindows cleanupbg -::tcltest::cleanupTests +cleanupTests return - - - - - - - - - - - - - |