diff options
| -rw-r--r-- | tests/ttk/combobox.test | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/ttk/combobox.test b/tests/ttk/combobox.test index 43f3cf1..c134bfc 100644 --- a/tests/ttk/combobox.test +++ b/tests/ttk/combobox.test @@ -45,6 +45,15 @@ test combobox-2.4 "current -- value not in list" -body { test combobox-2.end "Cleanup" -body { destroy .cb } +test combobox-3 "Read postoffset value dynamically from current style" -body { + ttk::combobox .cb -values [list a b c] -style "DerivedStyle.TCombobox" + pack .cb -expand true -fill both + ttk::style configure DerivedStyle.TCombobox -postoffset [list 25 0 0 0] + ttk::combobox::Post .cb + winfo x .cb.popdown +} -result 25 -cleanup { + destroy .cb +} test combobox-1890211 "ComboboxSelected event after listbox unposted" -body { # whitebox test... |