diff options
| author | patthoyts <patthoyts@noemail.net> | 2008-11-22 22:07:34 (GMT) |
|---|---|---|
| committer | patthoyts <patthoyts@noemail.net> | 2008-11-22 22:07:34 (GMT) |
| commit | b4f7f50776b4e315559e171870376befe8a58239 (patch) | |
| tree | af12853977bd307d763112af35a4eec9243dabf3 /library/ttk | |
| parent | 4d9b09db83b2067d73657c106a69446d5e22f733 (diff) | |
| download | tk-b4f7f50776b4e315559e171870376befe8a58239.zip tk-b4f7f50776b4e315559e171870376befe8a58239.tar.gz tk-b4f7f50776b4e315559e171870376befe8a58239.tar.bz2 | |
[Bug 1991930] combobox dropdown needs to be topmost
FossilOrigin-Name: 459d13566e6f39413d30b6dc360b72c2794a4439
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 5f50ca0..5094300 100644 --- a/library/ttk/combobox.tcl +++ b/library/ttk/combobox.tcl @@ -1,5 +1,5 @@ # -# $Id: combobox.tcl,v 1.14 2008/11/22 20:26:11 patthoyts Exp $ +# $Id: combobox.tcl,v 1.15 2008/11/22 22:07:34 patthoyts Exp $ # # Combobox bindings. # @@ -405,8 +405,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 } |