summaryrefslogtreecommitdiffstats
path: root/library/ttk/combobox.tcl
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2016-11-13 15:15:46 (GMT)
committerfvogel <fvogelnew1@free.fr>2016-11-13 15:15:46 (GMT)
commitc3149fa0b5bd697ccb9d9afafc37b3aa55739af1 (patch)
tree964f3b410f22def2f93d24d94929593baf1847b3 /library/ttk/combobox.tcl
parent014b4675af8c2a789caf37365b6ff284c3981006 (diff)
downloadtk-c3149fa0b5bd697ccb9d9afafc37b3aa55739af1.zip
tk-c3149fa0b5bd697ccb9d9afafc37b3aa55739af1.tar.gz
tk-c3149fa0b5bd697ccb9d9afafc37b3aa55739af1.tar.bz2
Fix for [f60c54bec6] Combobox does not retrieve -postoffset value from correct style. Thanks to Daniele Panza.
Diffstat (limited to 'library/ttk/combobox.tcl')
-rw-r--r--library/ttk/combobox.tcl3
1 files changed, 2 insertions, 1 deletions
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl
index 03821a2..6ceccef 100644
--- a/library/ttk/combobox.tcl
+++ b/library/ttk/combobox.tcl
@@ -368,7 +368,8 @@ proc ttk::combobox::PlacePopdown {cb popdown} {
set y [winfo rooty $cb]
set w [winfo width $cb]
set h [winfo height $cb]
- set postoffset [ttk::style lookup TCombobox -postoffset {} {0 0 0 0}]
+ set style [$cb cget -style]
+ set postoffset [ttk::style lookup $style -postoffset {} {0 0 0 0}]
foreach var {x y w h} delta $postoffset {
incr $var $delta
}