diff -r 000000000000 -r ae805ac0140d python-2.5.2/win32/tcl/tix8.4/pref/WmDefault.cs --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/python-2.5.2/win32/tcl/tix8.4/pref/WmDefault.cs Fri Apr 03 17:19:34 2009 +0100 @@ -0,0 +1,45 @@ +# -*-mode: tcl; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*- +# +# $Id: WmDefault.cs,v 1.2 2001/12/09 05:03:09 idiscovery Exp $ +# + +proc tixSetScheme-Color {} { + global tixOption + + package require wm_default + if {![info exists ::wm_default::wm]} { + wm_default::setup + wm_default::addoptions + } + + set tixOption(bg) $::wm_default::background + set tixOption(fg) $::wm_default::foreground + + set tixOption(dark1_bg) #808080 + + set tixOption(inactive_bg) $::wm_default::disabledbackground + set tixOption(inactive_fg) black; # unused + + # light1 was used for listbox widgets and trough colors + set tixOption(light1_bg) $::wm_default::scrollbars + set tixOption(light1_fg) white; # unused + + # text is now used for listbox widgets + set tixOption(list_bg) $::wm_default::textbackground + + set tixOption(active_bg) $::wm_default::activebackground + set tixOption(active_fg) $::wm_default::activeforeground + + set tixOption(disabled_fg) $::wm_default::disabledforeground + # new + set tixOption(disabled_bg) $::wm_default::disabledtextbackground + + set tixOption(input1_bg) $::wm_default::textbackground + set tixOption(input1_fg) $::wm_default::textforeground + + set tixOption(select_fg) $::wm_default::selectforeground + set tixOption(select_bg) $::wm_default::selectbackground + + set tixOption(selector) $::wm_default::selectcolor + +}