((eq cval 'uxul-world::key)
(config-button-image cbtn key))
((eq cval 'uxul-world::anchor)
((eq cval 'uxul-world::key)
(config-button-image cbtn key))
((eq cval 'uxul-world::anchor)
(config-button-image cbtn (gethash (cadr cval2) anchors)))
((eq cval 'uxul-world::uxul)
(config-button-image cbtn uxul)))))
(config-button-image cbtn (gethash (cadr cval2) anchors)))
((eq cval 'uxul-world::uxul)
(config-button-image cbtn uxul)))))