[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Firefox style menu
From: Katsumi Yamaoka <yamaoka@xxxxxxx> さん曰く
Subject: [emacs-w3m:08674] Re: Firefox style menu
Message-ID: <b4mves5ujow.fsf@xxxxxxx>
Date: Wed, 17 May 2006 17:41:51 +0900
> > (define-key w3m-mode-map [mouse-3] 'mouse-major-mode-menu)
>
> > としています。
>
> なるほど。これはもしかしたらこのまんまでも良いかも。:)
XEmacs のことはなにも考えていないけど、
(defun w3m-mouse-major-mode-menu (event prefix)
"Pop up a W3M mode-specific menu of mouse commands."
(interactive "@e\nP")
(let ((prewin (selected-window))
(prepos (point))
(posn (event-start event)))
(select-window (posn-window posn))
(if (numberp (posn-point posn))
(goto-char (posn-point posn)))
(mouse-major-mode-menu event prefix)
(when (window-live-p prewin)
(set-buffer (window-buffer prewin))
(goto-char prepos))))
ぐらいはしておいた方が menu bar なのか右クリックなのか考えないで
よいので楽みたいです。
> > ## 日本語化!!
>
> ;; 日本語の TrueType が使えるようになったら考えるけど、今はきちゃ
> ;; ないので、どうでもいいや。;-p
やっちゃいました。^^;;;
w3m-use-japanese-menu => nil で(みんな)英語になります。
# 変な日本語があったら指摘してください。
--
白井秀行 (mailto:shirai@xxxxxxxxxxx)