diff options
Diffstat (limited to 'tests/ttk')
| -rw-r--r-- | tests/ttk/combobox.test | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/ttk/combobox.test b/tests/ttk/combobox.test index 7ea0c5c..45fe0fc 100644 --- a/tests/ttk/combobox.test +++ b/tests/ttk/combobox.test @@ -43,6 +43,17 @@ test combobox-2.4 "current -- value not in list" -body { .cb current } -result -1 +test combobox-2.5 "current -- set to end index" -body { + .cb configure -values [list a b c d e thelastone] + .cb current end + .cb get +} -result thelastone + +test combobox-2.6 "current -- set to unknown index" -body { + .cb configure -values [list a b c d e] + .cb current notanindex +} -returnCodes error -result {Incorrect index notanindex} + test combobox-2.end "Cleanup" -body { destroy .cb } test combobox-3 "Read postoffset value dynamically from current style" -body { |