summaryrefslogtreecommitdiffstats
path: root/library
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)
commita165cf576da88eb660133435a0a744bc2725c26e (patch)
tree73b31cdb19c84ec7e419a18b6f6cf85a41db1c19 /library
parent91ff363079da056fd0745ba935b3f9b9b47eca20 (diff)
downloadtk-a165cf576da88eb660133435a0a744bc2725c26e.zip
tk-a165cf576da88eb660133435a0a744bc2725c26e.tar.gz
tk-a165cf576da88eb660133435a0a744bc2725c26e.tar.bz2
Long lines are ugly
Diffstat (limited to 'library')
-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]