diff options
author | fvogel <fvogelnew1@free.fr> | 2016-09-24 18:27:11 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-09-24 18:27:11 (GMT) |
commit | daea4e2ae99a82f91e3b19d8798b07263623b74f (patch) | |
tree | 53f612a372302789d4447b2d6824bb3b709111a1 | |
parent | 86e95cea7354485132002aeb8674a218a3cb675f (diff) | |
download | tk-daea4e2ae99a82f91e3b19d8798b07263623b74f.zip tk-daea4e2ae99a82f91e3b19d8798b07263623b74f.tar.gz tk-daea4e2ae99a82f91e3b19d8798b07263623b74f.tar.bz2 |
Fixed clam theme for all states
-rw-r--r-- | library/ttk/clamTheme.tcl | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/library/ttk/clamTheme.tcl b/library/ttk/clamTheme.tcl index eddacdd..f465922 100644 --- a/library/ttk/clamTheme.tcl +++ b/library/ttk/clamTheme.tcl @@ -82,11 +82,13 @@ namespace eval ttk::theme::clam { -indicatormargin {1 1 4 1} \ -padding 2 ; ttk::style map TCheckbutton -indicatorbackground \ - [list disabled $colors(-frame) pressed $colors(-frame) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)] + [list pressed $colors(-frame) \ + {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator) \ + disabled $colors(-frame)] ttk::style map TRadiobutton -indicatorbackground \ - [list disabled $colors(-frame) pressed $colors(-frame) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)] + [list pressed $colors(-frame) \ + {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator) \ + disabled $colors(-frame)] ttk::style configure TMenubutton \ -width -11 -padding 5 -relief raised |