diff options
Diffstat (limited to 'itcl/itk/tests/public.test')
-rw-r--r-- | itcl/itk/tests/public.test | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/itcl/itk/tests/public.test b/itcl/itk/tests/public.test index 03f54ac5737..d83006d6953 100644 --- a/itcl/itk/tests/public.test +++ b/itcl/itk/tests/public.test @@ -13,8 +13,13 @@ # See the file "license.terms" for information on usage and # redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES. +package require tcltest +namespace import -force ::tcltest::* + if {[string compare test [info procs test]] == 1} then {source defs} +package require Itk + # ---------------------------------------------------------------------- # Define a base class with public variables and a simple mega-widget # ---------------------------------------------------------------------- @@ -73,3 +78,6 @@ test public-1.4 {config code gets fired off} { # Clean up # ---------------------------------------------------------------------- itcl::delete class TestPublic test_public_base + +::tcltest::cleanupTests +exit |