summaryrefslogtreecommitdiffstats
path: root/library/ttk/clamTheme.tcl
diff options
context:
space:
mode:
authoroehhar <harald.oehlmann@elmicron.de>2016-09-21 08:31:16 (GMT)
committeroehhar <harald.oehlmann@elmicron.de>2016-09-21 08:31:16 (GMT)
commit3da9b75d3711e0538834813e7246990dff8e8c3a (patch)
tree6024c2306c386957e3cb2896914aaa3da4eb1af8 /library/ttk/clamTheme.tcl
parentb5deacd1f7c7553a45b73fffe25053df18895a8c (diff)
downloadtk-3da9b75d3711e0538834813e7246990dff8e8c3a.zip
tk-3da9b75d3711e0538834813e7246990dff8e8c3a.tar.gz
tk-3da9b75d3711e0538834813e7246990dff8e8c3a.tar.bz2
Tri-state buttons not working for non-native themes. Bug [3217462]
Diffstat (limited to 'library/ttk/clamTheme.tcl')
-rw-r--r--library/ttk/clamTheme.tcl8
1 files changed, 6 insertions, 2 deletions
diff --git a/library/ttk/clamTheme.tcl b/library/ttk/clamTheme.tcl
index f184ea0..398a524 100644
--- a/library/ttk/clamTheme.tcl
+++ b/library/ttk/clamTheme.tcl
@@ -17,6 +17,8 @@ namespace eval ttk::theme::clam {
-lightest "#ffffff"
-selectbg "#4a6984"
-selectfg "#ffffff"
+ -altindicator "#9fbdd8"
+ -disabledaltindicator "#c0c0c0"
}
ttk::style theme settings clam {
@@ -80,9 +82,11 @@ namespace eval ttk::theme::clam {
-indicatormargin {1 1 4 1} \
-padding 2 ;
ttk::style map TCheckbutton -indicatorbackground \
- [list disabled $colors(-frame) pressed $colors(-frame)]
+ [list disabled $colors(-frame) pressed $colors(-frame) \
+ {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)]
ttk::style map TRadiobutton -indicatorbackground \
- [list disabled $colors(-frame) pressed $colors(-frame)]
+ [list disabled $colors(-frame) pressed $colors(-frame) \
+ {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)]
ttk::style configure TMenubutton \
-width -11 -padding 5 -relief raised