pop-up menu

[Yoichi NAKAYAMA]

なかやまです。

x-popup-menu が使いにくくて(マウスに手をのばしたくなくて)、

(require 'semi-def)
(defun select-menu-alist (title menu-alist)
  (cdr
   (assoc (completing-read (concat title " : ") menu-alist)
	  menu-alist)
   ))

というのを自分の .emacs に持っていたのですが、それとは別に、
x-popup-menu が上手く動かない環境があったりして、いずれにせよ
pop-up menu を使うかどうかは選択できてもいいんじゃないかと
思いました。変数の名前とか適当ですが、添付のパッチようにすると
いうのはいかがでしょうか。

Regards,
-- 
Yoichi Nakayama
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: semi-def.el.diff
型:         application/octet-stream
サイズ:     1457 バイト
説明:       mime-ui-use-popup-menu
URL:        <http://lists.chise.org/pipermail/emacs-mime-ja/attachments/20030122/884e1f55/attachment.obj>