diff options
| author | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-22 22:07:34 (GMT) |
|---|---|---|
| committer | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-22 22:07:34 (GMT) |
| commit | 35e63c6193fc1f4a7f4c98a9484c47f95fdfeaf1 (patch) | |
| tree | af12853977bd307d763112af35a4eec9243dabf3 /library/ttk | |
| parent | a1b406abde47d849f33623e86dbae8d3e462f50a (diff) | |
| download | tk-35e63c6193fc1f4a7f4c98a9484c47f95fdfeaf1.zip tk-35e63c6193fc1f4a7f4c98a9484c47f95fdfeaf1.tar.gz tk-35e63c6193fc1f4a7f4c98a9484c47f95fdfeaf1.tar.bz2 | |
[Bug 1991930] combobox dropdown needs to be topmost
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 } |