Posted to tcl by petasis at Fri Aug 17 18:29:40 GMT 2012view raw
- ttk::style map . \
- -foreground [list active $foreground(prelight) \
- disabled $foreground(insensitive) \
- focus $foreground(focused) \
- pressed $foreground(active) \
- background $foreground(backdrop) \
- alternate $foreground(inconsistent) \
- invalid $foreground(inconsistent) \
- readonly $foreground(insensitive) \
- hover $foreground(prelight) \
- ] \
- ;