diff options
| author | jenglish <jenglish@noemail.net> | 2008-02-23 18:41:02 (GMT) |
|---|---|---|
| committer | jenglish <jenglish@noemail.net> | 2008-02-23 18:41:02 (GMT) |
| commit | d55650f5650a0d3ef372a59e6d4dacfeefd56301 (patch) | |
| tree | 44fd63fc0f348539a846a76e241e28776afe8f62 /library/ttk | |
| parent | ad346bfdd2e093d742c41ed3abb21b9495cf4b88 (diff) | |
| download | tk-d55650f5650a0d3ef372a59e6d4dacfeefd56301.zip tk-d55650f5650a0d3ef372a59e6d4dacfeefd56301.tar.gz tk-d55650f5650a0d3ef372a59e6d4dacfeefd56301.tar.bz2 | |
Arrange to deliver <<ComboboxSelected>> event after listbox is unposted,
as intended [Bug 1890211]. Clarified documentation.
FossilOrigin-Name: 448844d29f1256fc5bdf5e2063436d2da7e4dade
Diffstat (limited to 'library/ttk')
| -rw-r--r-- | library/ttk/combobox.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl index 401548c..2f4838f 100644 --- a/library/ttk/combobox.tcl +++ b/library/ttk/combobox.tcl @@ -1,5 +1,5 @@ # -# $Id: combobox.tcl,v 1.11 2007/12/13 15:27:08 dgp Exp $ +# $Id: combobox.tcl,v 1.12 2008/02/23 18:41:07 jenglish Exp $ # # Combobox bindings. # @@ -169,7 +169,7 @@ proc ttk::combobox::SelectEntry {cb index} { $cb current $index $cb selection range 0 end $cb icursor end - event generate $cb <<ComboboxSelected>> + event generate $cb <<ComboboxSelected>> -when mark } ## Scroll -- Mousewheel binding |