% lmap o [. configure] {if {[llength $o] == 2} continue else {lindex $o 0}}
-borderwidth -class -menu -relief -screen -use -background -colormap -container -cursor -height
 -highlightbackground -highlightcolor -highlightthickness -padx -pady -takefocus -visual -width