diff options
Diffstat (limited to 'library/ttk/clamTheme.tcl')
| -rw-r--r-- | library/ttk/clamTheme.tcl | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/library/ttk/clamTheme.tcl b/library/ttk/clamTheme.tcl index 9061006..930ec97 100644 --- a/library/ttk/clamTheme.tcl +++ b/library/ttk/clamTheme.tcl @@ -1,5 +1,5 @@ # -# $Id: clamTheme.tcl,v 1.3 2006/12/13 17:06:32 jenglish Exp $ +# $Id: clamTheme.tcl,v 1.4 2006/12/18 19:33:14 jenglish Exp $ # # "Clam" theme. # @@ -10,8 +10,8 @@ namespace eval ttk::theme::clam { variable colors array set colors { -disabledfg "#999999" - -frame "#dcdad5" + -window "#ffffff" -dark "#cfcdc8" -darker "#bab5ab" -darkest "#9e9a91" @@ -111,6 +111,21 @@ namespace eval ttk::theme::clam { -lightcolor [list selected $colors(-lighter) {} $colors(-dark)] \ ; + # Treeview: + ttk::style configure Heading \ + -font TkHeadingFont -relief raised -padding {3} + ttk::style configure Row -background $colors(-window) + ttk::style configure Cell -background $colors(-window) + ttk::style map Row \ + -background [list selected $colors(-selectbg)] \ + -foreground [list selected $colors(-selectfg)] ; + ttk::style map Cell \ + -background [list selected $colors(-selectbg)] \ + -foreground [list selected $colors(-selectfg)] ; + ttk::style map Item \ + -background [list selected $colors(-selectbg)] \ + -foreground [list selected $colors(-selectfg)] ; + ttk::style configure TLabelframe \ -labeloutside true -labelmargins {0 0 0 4} \ -borderwidth 2 -relief raised |