diff options
author | fvogel <fvogelnew1@free.fr> | 2018-04-28 07:21:15 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2018-04-28 07:21:15 (GMT) |
commit | 5b1dbe6e63b1e596db45c65b91940298e55dd973 (patch) | |
tree | 481daefb2fd5da37d1e581b0f6be39ee841c0532 /library | |
parent | 62c05cfac502ae7f00a33eb7f95d14458897a915 (diff) | |
parent | bfb50ad11e3a58591619b861e38537e29980d8c0 (diff) | |
download | tk-5b1dbe6e63b1e596db45c65b91940298e55dd973.zip tk-5b1dbe6e63b1e596db45c65b91940298e55dd973.tar.gz tk-5b1dbe6e63b1e596db45c65b91940298e55dd973.tar.bz2 |
Fix [7423f90fbf]: missing option priorities prevent users from styling some widgets
Diffstat (limited to 'library')
-rw-r--r-- | library/ttk/combobox.tcl | 10 | ||||
-rw-r--r-- | library/ttk/entry.tcl | 2 | ||||
-rw-r--r-- | library/ttk/sizegrip.tcl | 2 |
3 files changed, 7 insertions, 7 deletions
diff --git a/library/ttk/combobox.tcl b/library/ttk/combobox.tcl index 6ceccef..c1b6da6 100644 --- a/library/ttk/combobox.tcl +++ b/library/ttk/combobox.tcl @@ -88,18 +88,18 @@ bind ComboboxPopdown <ButtonPress> \ ### Option database settings. # -option add *TCombobox*Listbox.font TkTextFont -option add *TCombobox*Listbox.relief flat -option add *TCombobox*Listbox.highlightThickness 0 +option add *TCombobox*Listbox.font TkTextFont widgetDefault +option add *TCombobox*Listbox.relief flat widgetDefault +option add *TCombobox*Listbox.highlightThickness 0 widgetDefault ## Platform-specific settings. # switch -- [tk windowingsystem] { x11 { - option add *TCombobox*Listbox.background white + option add *TCombobox*Listbox.background white widgetDefault } aqua { - option add *TCombobox*Listbox.borderWidth 0 + option add *TCombobox*Listbox.borderWidth 0 widgetDefault } } diff --git a/library/ttk/entry.tcl b/library/ttk/entry.tcl index 647d16e..c123bc9 100644 --- a/library/ttk/entry.tcl +++ b/library/ttk/entry.tcl @@ -34,7 +34,7 @@ namespace eval ttk { ### Option database settings. # -option add *TEntry.cursor [ttk::cursor text] +option add *TEntry.cursor [ttk::cursor text] widgetDefault ### Bindings. # diff --git a/library/ttk/sizegrip.tcl b/library/ttk/sizegrip.tcl index 153e310..24a67c6 100644 --- a/library/ttk/sizegrip.tcl +++ b/library/ttk/sizegrip.tcl @@ -9,7 +9,7 @@ switch -- [tk windowingsystem] { x11 - win32 { - option add *TSizegrip.cursor [ttk::cursor seresize] + option add *TSizegrip.cursor [ttk::cursor seresize] widgetDefault } aqua { # Aqua sizegrips use default Arrow cursor. |