summaryrefslogtreecommitdiff
path: root/itcl/iwidgets3.0.0/tests/entryfield.test
diff options
context:
space:
mode:
Diffstat (limited to 'itcl/iwidgets3.0.0/tests/entryfield.test')
-rw-r--r--itcl/iwidgets3.0.0/tests/entryfield.test9
1 files changed, 8 insertions, 1 deletions
diff --git a/itcl/iwidgets3.0.0/tests/entryfield.test b/itcl/iwidgets3.0.0/tests/entryfield.test
index 89c995f078b..4d051f6243f 100644
--- a/itcl/iwidgets3.0.0/tests/entryfield.test
+++ b/itcl/iwidgets3.0.0/tests/entryfield.test
@@ -13,6 +13,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 Entryfield-2.$o {configuration option} {
llength [.ef configure]
-} {38}
+} {39}
incr o
@@ -85,6 +88,7 @@ foreach test {
{-labelpos s s}
{-labelpos sw sw}
{-labeltext Label Label}
+ {-pasting 1 1}
{-relief raised raised}
{-relief sunken sunken}
{-state disabled disabled}
@@ -170,3 +174,6 @@ test Entryfield-1.$c {Entryfield destruction} {
destroy .ef
update
} {}
+
+::tcltest::cleanupTests
+exit