summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2016-09-24 18:28:40 (GMT)
committerfvogel <fvogelnew1@free.fr>2016-09-24 18:28:40 (GMT)
commit3e694f4b61010dbd0214355d77014613d5aa0611 (patch)
tree73b31cdb19c84ec7e419a18b6f6cf85a41db1c19
parentdaea4e2ae99a82f91e3b19d8798b07263623b74f (diff)
downloadtk-3e694f4b61010dbd0214355d77014613d5aa0611.zip
tk-3e694f4b61010dbd0214355d77014613d5aa0611.tar.gz
tk-3e694f4b61010dbd0214355d77014613d5aa0611.tar.bz2
Long lines are ugly
-rw-r--r--library/ttk/clamTheme.tcl6
-rw-r--r--library/ttk/defaults.tcl12
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]