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/altTheme.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/altTheme.tcl')
-rw-r--r-- | library/ttk/altTheme.tcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/library/ttk/altTheme.tcl b/library/ttk/altTheme.tcl index 62a0607..bee578c 100644 --- a/library/ttk/altTheme.tcl +++ b/library/ttk/altTheme.tcl @@ -1,5 +1,5 @@ # -# $Id: altTheme.tcl,v 1.3 2006/12/18 19:33:14 jenglish Exp $ +# $Id: altTheme.tcl,v 1.4 2007/11/18 19:20:26 jenglish Exp $ # # Ttk widget set: Alternate theme # @@ -35,7 +35,8 @@ namespace eval ttk::theme::alt { style map "." -embossed [list disabled 1] ; style configure TButton \ - -width -11 -padding "1 1" -relief raised -shiftrelief 1 \ + -anchor center -width -11 -padding "1 1" \ + -relief raised -shiftrelief 1 \ -highlightthickness 1 -highlightcolor $colors(-frame) style map TButton -relief { @@ -51,7 +52,7 @@ namespace eval ttk::theme::alt { [list disabled $colors(-frame) pressed $colors(-frame)] style configure TMenubutton \ - -width -11 -padding "3 3" -relief raised -anchor w + -width -11 -padding "3 3" -relief raised style configure TEntry -padding 1 style map TEntry -fieldbackground \ |