diff options
author | fvogel <fvogelnew1@free.fr> | 2017-03-06 18:24:38 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2017-03-06 18:24:38 (GMT) |
commit | e98430e7e070536bd9d5ccb44afa4976b735ff65 (patch) | |
tree | 15779675471fdc625c17330f72e4c676f065d928 /library/ttk/combobox.tcl | |
parent | ee16a52044d53a25664ecc7f02b042e3fb638baf (diff) | |
parent | 05fb5c3c424e8c68a0cf14a68d2f32570b2d5d69 (diff) | |
download | tk-e98430e7e070536bd9d5ccb44afa4976b735ff65.zip tk-e98430e7e070536bd9d5ccb44afa4976b735ff65.tar.gz tk-e98430e7e070536bd9d5ccb44afa4976b735ff65.tar.bz2 |
merge trunk
Diffstat (limited to 'library/ttk/combobox.tcl')
-rw-r--r-- | library/ttk/combobox.tcl | 3 |
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 } |