Katsumi Yamaoka <[EMAIL PROTECTED]> writes:

>>>>>> Katsumi Yamaoka wrote:
>
>> For such a link expressed with a plain text, you can bind the
>> same key to just the function `browse-url-firefox'.  For example:
>
> I forgot to write the way to map the `vv' key to `browse-url-firefox'
> also in emacs-w3m buffers.  Here it is:
>
> (define-key w3m-mode-map "v" (make-sparse-keymap))
> (define-key w3m-mode-map "vb" 'w3m-bookmark-view)
> (define-key w3m-mode-map "vv"
>   (lambda nil
>     (interactive)
>     (let* ((w3m-content-type-alist (copy-sequence w3m-content-type-alist))
>          (html (cdr (assoc "text/html" w3m-content-type-alist))))
>       (setq w3m-content-type-alist (delq html w3m-content-type-alist))
>       (setq html (copy-sequence html))
>       ;; Make sure to use Firefox.
>       (setcar (nthcdr 2 html) 'browse-url-firefox)
>       (push html w3m-content-type-alist)
>       (w3m-external-view-this-url))))
>
> This should be added to your ~/.emacs-w3m.el file, not anywhere else.
> Note that it remaps the key for the `w3m-bookmark-view' command into
> `vb'.  I think customizing too much the keymap is not a good idea,
> though.  In emacs-w3m buffers, you can use the `M' command instead.

I got what I wanted with this:

,----
| (defun my-w3m-view-this-url()
|   (interactive)
|   (let ((w3m-goto-article-function 'browse-url))
|     (w3m-safe-view-this-url)))
| 
| (global-set-key (quote [f4]) 'browse-url)
| (define-key w3m-mode-map [f4] 'my-w3m-view-this-url)
`----

_______________________________________________
info-gnus-english mailing list
info-gnus-english@gnu.org
http://lists.gnu.org/mailman/listinfo/info-gnus-english

Reply via email to