diff options
| author | fvogel <fvogelnew1@free.fr> | 2016-09-24 18:28:40 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2016-09-24 18:28:40 (GMT) |
| commit | 3e694f4b61010dbd0214355d77014613d5aa0611 (patch) | |
| tree | 73b31cdb19c84ec7e419a18b6f6cf85a41db1c19 | |
| parent | daea4e2ae99a82f91e3b19d8798b07263623b74f (diff) | |
| download | tk-3e694f4b61010dbd0214355d77014613d5aa0611.zip tk-3e694f4b61010dbd0214355d77014613d5aa0611.tar.gz tk-3e694f4b61010dbd0214355d77014613d5aa0611.tar.bz2 | |
Long lines are ugly
| -rw-r--r-- | library/ttk/clamTheme.tcl | 6 | ||||
| -rw-r--r-- | library/ttk/defaults.tcl | 12 |
2 files changed, 12 insertions, 6 deletions
diff --git a/library/ttk/clamTheme.tcl b/library/ttk/clamTheme.tcl index f465922..e6cabb7 100644 --- a/library/ttk/clamTheme.tcl +++ b/library/ttk/clamTheme.tcl @@ -83,11 +83,13 @@ namespace eval ttk::theme::clam { -padding 2 ; ttk::style map TCheckbutton -indicatorbackground \ [list pressed $colors(-frame) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator) \ + {!disabled alternate} $colors(-altindicator) \ + {disabled alternate} $colors(-disabledaltindicator) \ disabled $colors(-frame)] ttk::style map TRadiobutton -indicatorbackground \ [list pressed $colors(-frame) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator) \ + {!disabled alternate} $colors(-altindicator) \ + {disabled alternate} $colors(-disabledaltindicator) \ disabled $colors(-frame)] ttk::style configure TMenubutton \ diff --git a/library/ttk/defaults.tcl b/library/ttk/defaults.tcl index 548d5fe..f07cbf7 100644 --- a/library/ttk/defaults.tcl +++ b/library/ttk/defaults.tcl @@ -49,8 +49,10 @@ namespace eval ttk::theme::default { -indicatorcolor "#ffffff" -indicatorrelief sunken -padding 1 ttk::style map TCheckbutton -indicatorcolor \ [list pressed $colors(-activebg) \ - {!disabled selected} $colors(-indicator) {disabled selected} $colors(-disabledindicator) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)] + {!disabled selected} $colors(-indicator) \ + {disabled selected} $colors(-disabledindicator) \ + {!disabled alternate} $colors(-altindicator) \ + {disabled alternate} $colors(-disabledaltindicator)] ttk::style map TCheckbutton -indicatorrelief \ [list alternate raised] @@ -58,8 +60,10 @@ namespace eval ttk::theme::default { -indicatorcolor "#ffffff" -indicatorrelief sunken -padding 1 ttk::style map TRadiobutton -indicatorcolor \ [list pressed $colors(-activebg) \ - {!disabled selected} $colors(-indicator) {disabled selected} $colors(-disabledindicator) \ - {!disabled alternate} $colors(-altindicator) {disabled alternate} $colors(-disabledaltindicator)] + {!disabled selected} $colors(-indicator) \ + {disabled selected} $colors(-disabledindicator) \ + {!disabled alternate} $colors(-altindicator) \ + {disabled alternate} $colors(-disabledaltindicator)] ttk::style map TRadiobutton -indicatorrelief \ [list alternate raised] |