[mew-int 00387] Re: Korean on Mew

[Tak Ota]

Hi,

On Tue, 10 Jul 2001 22:54:41 +0900 (KST), CHOI Junho <cjh at example.com> wrote:

> Oh, one question. When HTML is displayed inline, I can't click with
> button 2 on the link. Status line says "Buffer is read-only". How can
> I move into this link with emacs-w3m?

I had the same need and came up with the following solution in my
.emacs.

Cheers,

-Tak


    (defun my-w3m-at-mouse (event)
      (interactive "e")
      (save-excursion
	(mouse-set-point event)
	(let ((url (thing-at-point 'url)))
	  (if (and url
		   (or (not (string-match "^http://" url))
		       (string-match "^http://.*\\." url)))
	      (w3m-goto-url url)
	    (error "No URL found")))))
    (add-hook 'mew-message-mode-hook
	      (lambda ()
		(define-key mew-message-mode-map [mouse-2] 'my-w3m-at-mouse)))