summaryrefslogtreecommitdiffstats
path: root/library/ttk/aquaTheme.tcl
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2020-11-28 21:28:10 (GMT)
committerfvogel <fvogelnew1@free.fr>2020-11-28 21:28:10 (GMT)
commit012d5d39ac2a53f9534f7d590dd6624a307e07bc (patch)
tree7909c9868fafa6234b72d14f31df6933db798062 /library/ttk/aquaTheme.tcl
parent1ecb527a4773316038c61a7f37ad521bd298c58c (diff)
parentef6e63204993096434565946936c7ca53f8249fa (diff)
downloadtk-012d5d39ac2a53f9534f7d590dd6624a307e07bc.zip
tk-012d5d39ac2a53f9534f7d590dd6624a307e07bc.tar.gz
tk-012d5d39ac2a53f9534f7d590dd6624a307e07bc.tar.bz2
Merge trunk (and fix conflicts in generic/ttk/ttkTreeview.c and tests/ttk/treeview.test).
Diffstat (limited to 'library/ttk/aquaTheme.tcl')
-rw-r--r--library/ttk/aquaTheme.tcl63
1 files changed, 23 insertions, 40 deletions
diff --git a/library/ttk/aquaTheme.tcl b/library/ttk/aquaTheme.tcl
index 51062ff..ef10796 100644
--- a/library/ttk/aquaTheme.tcl
+++ b/library/ttk/aquaTheme.tcl
@@ -35,21 +35,38 @@ namespace eval ttk::theme::aqua {
ttk::style configure TMenubutton -anchor center -padding {2 0 0 2}
ttk::style configure Toolbutton -anchor center
+ # For Entry, Combobox and Spinbox widgets the selected text background
+ # is the "Highlight color" selected in preferences when the widget
+ # has focus. It is a gray color when the widget does not have focus or
+ # the window does not have focus. (The background state implies !focus
+ # so we only need to specify !focus.)
+
# Entry
- ttk::style configure TEntry \
- -foreground systemTextColor \
- -background systemTextBackgroundColor
ttk::style map TEntry \
-foreground {
disabled systemDisabledControlTextColor
} \
- -selectforeground {
- background systemTextColor
+ -selectbackground {
+ !focus systemUnemphasizedSelectedTextBackgroundColor
+ }
+
+ # Combobox:
+ ttk::style map TCombobox \
+ -foreground {
+ disabled systemDisabledControlTextColor
} \
-selectbackground {
- background systemTextBackgroundColor
+ !focus systemUnemphasizedSelectedTextBackgroundColor
}
+ # Spinbox
+ ttk::style map TSpinbox \
+ -foreground {
+ disabled systemDisabledControlTextColor
+ } \
+ -selectbackground {
+ !focus systemUnemphasizedSelectedTextBackgroundColor
+ }
# Workaround for #1100117:
# Actually, on Aqua we probably shouldn't stipple images in
@@ -67,40 +84,6 @@ namespace eval ttk::theme::aqua {
disabled systemDisabledControlTextColor
selected systemSelectedTabTextColor}
- # Combobox:
- ttk::style configure TCombobox \
- -foreground systemTextColor \
- -background systemTransparent
- ttk::style map TCombobox \
- -foreground {
- disabled systemDisabledControlTextColor
- } \
- -selectforeground {
- background systemTextColor
- } \
- -selectbackground {
- background systemTransparent
- }
-
- # Spinbox
- ttk::style configure TSpinbox \
- -foreground systemTextColor \
- -background systemTextBackgroundColor \
- -selectforeground systemSelectedTextColor \
- -selectbackground systemSelectedTextBackgroundColor
- ttk::style map TSpinbox \
- -foreground {
- disabled systemDisabledControlTextColor
- } \
- -selectforeground {
- !active systemTextColor
- } \
- -selectbackground {
- !active systemTextBackgroundColor
- !focus systemTextBackgroundColor
- focus systemSelectedTextBackgroundColor
- }
-
# Treeview:
ttk::style configure Heading \
-font TkHeadingFont \