diff options
Diffstat (limited to 'tests/ttk/vsapi.test')
| -rw-r--r-- | tests/ttk/vsapi.test | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/ttk/vsapi.test b/tests/ttk/vsapi.test index bb88fef..ec4e9e7 100644 --- a/tests/ttk/vsapi.test +++ b/tests/ttk/vsapi.test @@ -1,12 +1,13 @@ # -*- tcl -*- # -package require Tk 8.5 -package require tcltest ; namespace import -force tcltest::* +package require Tk +package require tcltest 2.2 +namespace import -force tcltest::* loadTestedCommands testConstraint xpnative \ - [expr {[lsearch -exact [ttk::style theme names] xpnative] != -1}] + [expr {"xpnative" in [ttk::style theme names]}] test vsapi-1.1 "WINDOW WP_SMALLCLOSEBUTTON" -constraints {xpnative} -body { ttk::style element create smallclose vsapi \ |