diff options
author | jenglish <jenglish@flightlab.com> | 2007-11-18 19:20:24 (GMT) |
---|---|---|
committer | jenglish <jenglish@flightlab.com> | 2007-11-18 19:20:24 (GMT) |
commit | aa5ebe3414405d7b4ad1a8271f395866e8a65f79 (patch) | |
tree | aadad427b46a83b0e4b696481aba274e50fec32d /library/ttk/defaults.tcl | |
parent | d9b51f4b71e2318378ed9a818970213c3b381894 (diff) | |
download | tk-aa5ebe3414405d7b4ad1a8271f395866e8a65f79.zip tk-aa5ebe3414405d7b4ad1a8271f395866e8a65f79.tar.gz tk-aa5ebe3414405d7b4ad1a8271f395866e8a65f79.tar.bz2 |
* generic/ttk/ttkFrame.c: Use sublayout for ttk::labelframe labels
instead of single element.
* generic/ttk/ttkLabel.c: Default -anchor for text and label elements
is now "w" instead of "center". Fixes [Bug 1614540].
* library/ttk/defaults.tcl, library/ttk/*Theme.tcl: Button styles
now need explicit "-anchor center".
Diffstat (limited to 'library/ttk/defaults.tcl')
-rw-r--r-- | library/ttk/defaults.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/library/ttk/defaults.tcl b/library/ttk/defaults.tcl index d076d8e..be106b1 100644 --- a/library/ttk/defaults.tcl +++ b/library/ttk/defaults.tcl @@ -1,5 +1,5 @@ # -# $Id: defaults.tcl,v 1.4 2006/12/18 19:33:14 jenglish Exp $ +# $Id: defaults.tcl,v 1.5 2007/11/18 19:20:26 jenglish Exp $ # # Settings for default theme. # @@ -38,7 +38,8 @@ namespace eval ttk::theme::default { [list disabled $colors(-disabledfg)] ttk::style configure TButton \ - -padding "3 3" -width -9 -relief raised -shiftrelief 1 + -anchor center -padding "3 3" -width -9 \ + -relief raised -shiftrelief 1 ttk::style map TButton -relief [list {!disabled pressed} sunken] ttk::style configure TCheckbutton \ @@ -52,7 +53,7 @@ namespace eval ttk::theme::default { [list pressed $colors(-activebg) selected $colors(-indicator)] ttk::style configure TMenubutton \ - -relief raised -padding "10 3" -anchor w + -relief raised -padding "10 3" ttk::style configure TEntry \ -relief sunken -fieldbackground white -padding 1 |