[mew-dist 26321] Re: URL のクリックとマウスの動作

TAKANO Yuji ( たかのゆ〜じ ) takachan at example.com
2005年 5月 20日 (金) 10:07:50 JST


たかのです。お早うございます。

From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>さん
> >   mew でメールを読んでいると、メッセージの中に URL があり、それ
> > をマウスでクリックすると mozilla ウェブブラウザが起動します。そ
> > の時、サマリバッファにあったカーソルは、メッセージバッファに来て
> > しまいます。
> なんだか、Emacs21.x で挙動が変わったみたいですね。たしか、なんだ
> よこれ、と思った記憶があります。

  20.7 の頃 URL をクリックしていたかなぁ? と思ったのですが、そ
の頃僕は XEmacs を使って mew を動かしていました(^^;;。
 
> >   できるか、できそうか、できなさそうかおしえて頂ければ幸いです。
> 
> (or (featurep 'browse-url)
>     (require 'browse-url))
> 
> (defun browse-url-at-mouse-fake (event)
>   (interactive "e")
>   (save-excursion
>     (set-buffer (window-buffer (posn-window (event-start event))))
>     (goto-char (posn-point (event-start event)))
>     (browse-url-at-point)))
> 
> (defalias 'browse-url-at-mouse 'browse-url-at-mouse-fake))


From: Kazu Yamamoto (山本和彦) <kazu at example.com>さん
> > などというのが、~/.emacs に書いてありました。
> 僕のはこうなってます。
> 
> (defun my-browse-url-at-mouse (event)
>   (interactive "e")
>   (let ((buf (current-buffer)))
>     (browse-url-at-mouse event)
>     (pop-to-buffer buf)))
> 
> (define-key mew-message-mode-map [mouse-2] 'my-browse-url-at-mouse)

  どちらも試してみました。どちらも僕の思う様な動作をしました。や
はり、誰でも思うことは一緒なんですねぇ。

  と、言うことで、行数の少ない かずさん の設定を頂きます;-)。ま
た、Wiki の方にも FAQ として先程書き込んでおきました。

たかの@有り難うございました。
---
                               Mail : Web
IPv4 Only  takachan at example.com : http://www.running-dog.net/
IPv6 Ready      takachan at example.com : http://www.icmpv6.org/
JKUG             takachan at example.com : http://www.kde.gr.jp/




Mew-dist メーリングリストの案内