16 Oct
2013
16 Oct
'13
12:41 a.m.
Adds an accessor for the ttk-states.
example usage: (ttk-state widget :active) ; => nil retrieves the active state (setf (ttk-state widget :active) t) ;sets the active sets