diff options
| author | patthoyts <patthoyts@noemail.net> | 2008-11-22 22:14:49 (GMT) |
|---|---|---|
| committer | patthoyts <patthoyts@noemail.net> | 2008-11-22 22:14:49 (GMT) |
| commit | 69a95e45993543359247611bdf926a90e61a1c95 (patch) | |
| tree | 7a8f7cfc6f00a05d0097ef656ae566daad647ebe /library/ttk | |
| parent | 3124b8eaed53adf3506ec45d3a16ad1937fba94c (diff) | |
| download | tk-69a95e45993543359247611bdf926a90e61a1c95.zip tk-69a95e45993543359247611bdf926a90e61a1c95.tar.gz tk-69a95e45993543359247611bdf926a90e61a1c95.tar.bz2 | |
[Bug 1991930] combobox dropdown needs to be topmost
FossilOrigin-Name: 40744d578ea698dd4488b88d5b304a195f6872c1
Diffstat (limited to 'library/ttk')
| -rw-r--r-- | library/ttk/combobox.tcl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl index 6dad7e0..c52f70c 100644 --- a/library/ttk/combobox.tcl +++ b/library/ttk/combobox.tcl @@ -1,5 +1,5 @@ # -# $Id: combobox.tcl,v 1.12.2.1 2008/11/22 20:34:37 patthoyts Exp $ +# $Id: combobox.tcl,v 1.12.2.2 2008/11/22 22:14:50 patthoyts Exp $ # # Combobox bindings. # @@ -391,8 +391,7 @@ proc ttk::combobox::Post {cb} { # Post the listbox: # - wm attribute $popdown \ - -topmost [wm attribute [winfo toplevel $cb] -topmost] + wm attribute $popdown -topmost 1 wm deiconify $popdown raise $popdown } |