Changing font color in dark.tcl doesn't change anything #44
Description
I was trying to change the foreground colour of disabled labels in the dark theme (dark.tcl), but changing it didn't have any effect.
Changing it at azure.tcl did bring the expected results.
Am I missing something?
dark.tcl:
namespace eval ttk::theme::azure-dark {
variable version 2.0
package provide ttk::theme::azure-dark $version
ttk::style theme create azure-dark -parent clam -settings {
proc load_images {imgdir} {
variable I
foreach file [glob -directory $imgdir *.gif] {
set img [file tail [file rootname $file]]
set I($img) [image create photo -file $file -format gif]
}
}
load_images [file join [file dirname [info script]] dark]
array set colors {
-fg "#ffffff"
-bg "#333333"
-disabledfg "#aaaaaa"
-disabledbg "#737373"
-selectfg "#ffffff"
-selectbg "#007fff"
}
azure.tcl:
source [file join [file dirname [info script]] theme light.tcl]
source [file join [file dirname [info script]] theme dark.tcl]
option add *tearOff 0
proc set_theme {mode} {
if {$mode == "dark"} {
ttk::style theme use "azure-dark"
array set colors {
-fg "#ffffff"
-bg "#333333"
-disabledfg "#ffffff"
-disabledbg "#737373"
-selectfg "#ffffff"
-selectbg "#007fff"
}