[xyzzy:03057] Re: 定義関数の説明？

[Tetsuya Kamei <kamei@xxxxxxxxxxxx>]

花井さん、こんにちは。

    Thu, 22 Jul 1999 10:28:24 +0900 の
   “[xyzzy:03056] Re: 定義関数の説明？”
    への返事です.

| > あの、一つ改善要望があるんですけど、[キーワードが見つからんけど]
| > ダイアログを、ESC キーで閉じれるようにできませんでしょうか？
| 
| info-modoki.lの49行目を
| 
|   ((yes-no-or-cancel-p "~A\n\nキーワードが...
| 
| にすれば、とりあえずESCで閉じれるようになると思います。

これでもできます。

(defun yes-or-no-p (fmt &rest args)
  (eq (message-box (apply #'format nil fmt args) nil
		   '(:ok-cancel :question :button1)
		   :button1 "はい(&Y)" :button2 "いいえ(&N)")
      :ok))

--
亀井哲弥(Tetsuya Kamei)
kamei@xxxxxxxxxxxx/JCA00343@xxxxxxxxxxx