>>55
applyとwidget-createの組み合わせだとうまく行きませんでした。
(apply 'widget-create 'radio-button-choice '(item1 item2 item3)) ;;NG
(widget-create 'radio-button-choice item1 item2 item3) ;;OK

以下だとうまく行ったのですが。
(defun seki3 (x y z) (interactive ”r”) (eval (* x y z)))
(apply 'seki3 '(2 3 4)) ;;OK
(apply 'seki3 2 '(3 4)) ;;OK

widget-create関数の使い方として以下を参考にしています。
なんとかリストで渡して選択画面を作りたいのですが。
http://www.dina.kvl.dk/~abraham/custom/widget.html#SEC16