summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--library/ttk/combobox.tcl4
2 files changed, 8 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 5b25111..6920857 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-11-22 Pat Thoyts <patthoyts@users.sourceforge.net>
+
+ * library/ttk/combobox.tcl: [Bug 1939129] combobox dropdown was
+ drawn behind topmost toplevels.
+
2008-11-19 Jan Nijtmans <nijtmans@users.sf.net>
* generic/tkImage.c Relax the constraint that every Tk_ImageType
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl
index 2f4838f..6dad7e0 100644
--- a/library/ttk/combobox.tcl
+++ b/library/ttk/combobox.tcl
@@ -1,5 +1,5 @@
#
-# $Id: combobox.tcl,v 1.12 2008/02/23 18:41:07 jenglish Exp $
+# $Id: combobox.tcl,v 1.12.2.1 2008/11/22 20:34:37 patthoyts Exp $
#
# Combobox bindings.
#
@@ -391,6 +391,8 @@ proc ttk::combobox::Post {cb} {
# Post the listbox:
#
+ wm attribute $popdown \
+ -topmost [wm attribute [winfo toplevel $cb] -topmost]
wm deiconify $popdown
raise $popdown
}