summaryrefslogtreecommitdiffstats
path: root/tests/textImage.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/textImage.test')
-rw-r--r--tests/textImage.test12
1 files changed, 9 insertions, 3 deletions
diff --git a/tests/textImage.test b/tests/textImage.test
index f3f9c19..b2befd9 100644
--- a/tests/textImage.test
+++ b/tests/textImage.test
@@ -11,6 +11,10 @@ package require tcltest 2.2
namespace import ::tcltest::*
eval tcltest::configure $argv
tcltest::loadTestedCommands
+
+# Import utility procs for specific functional areas
+testutils import image
+
imageInit
# One time setup. Create a font to insure the tests are font metric invariant.
@@ -461,12 +465,14 @@ test textImage-5.1 {peer widget images} -setup {
image delete small large
} -result {}
-# cleanup
+#
+# CLEANUP
+#
+
destroy .t
font delete test_font
imageFinish
-
-# cleanup
+testutils forget image
cleanupTests
return