set-color: make function! [
	"Set and show a widget's color attribute."
	face [object!]
	color [tuple! none!]
	/no-show "Don't show"
][
	face/color: color
	unless no-show [show face]
]