diff options
Diffstat (limited to 'itcl/iwidgets3.0.0/tests/messagedialog.test')
| -rw-r--r-- | itcl/iwidgets3.0.0/tests/messagedialog.test | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/itcl/iwidgets3.0.0/tests/messagedialog.test b/itcl/iwidgets3.0.0/tests/messagedialog.test index 3f99bea684e..5a76c0b72c0 100644 --- a/itcl/iwidgets3.0.0/tests/messagedialog.test +++ b/itcl/iwidgets3.0.0/tests/messagedialog.test @@ -14,6 +14,9 @@ # # @(#) $Id$ +package require tcltest +namespace import -force ::tcltest::* + package require Iwidgets 3.0 if {[string compare test [info procs test]] == 1} { @@ -43,7 +46,7 @@ incr c # test Messagedialog-2.$o {configuration option} { llength [.md configure] -} {24} +} {26} incr o @@ -145,3 +148,6 @@ test Messagedialog-1.$c {Messagedialog construction} { destroy .md update } {} + +::tcltest::cleanupTests +exit |