diff options
Diffstat (limited to 'tests/button.test')
| -rw-r--r-- | tests/button.test | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/tests/button.test b/tests/button.test index c60750a..96847c1 100644 --- a/tests/button.test +++ b/tests/button.test @@ -11,11 +11,11 @@ package require tcltest 2.2 namespace import ::tcltest::* eval tcltest::configure $argv tcltest::loadTestedCommands -imageInit -proc bogusTrace args { - error "trace aborted" -} +# Import utility procs for specific functional areas +testutils import button image + +imageInit test button-1.1 {configuration option: "activebackground" for label} -setup { label .l -borderwidth 2 -highlightthickness 2 -font {Helvetica -12 bold} @@ -4007,8 +4007,12 @@ test button-15.3 {Bug [5d991b822e]} { destroy .b } {} +# +# CLEANUP +# imageFinish +testutils forget button image cleanupTests return |