mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Merge changes made in Gnus trunk.

Browse source 
mm-decode.el (mm-save-part): Put the entire path in the `M-n' slot.
nnimap.el (nnimap-find-article-by-message-id): Don't EXAMINE a group if it's already selected.
gnus.texi (Customizing the IMAP Connection): Document `nnimap-expunge' and remove `nnimap-expunge-inbox' from example.
gnus.texi (Customizing the IMAP Connection): Remove nnir mention, since that works by default.
gnus-sum.el (gnus-summary-show-article): Take `t' as the arg to mean "raw".
gnus-html.el (gnus-html-browse-url): Implement mailto: URLs.
shr.el (shr-browse-url): Implement mailto: URLs.
nnir.el, gnus-sum.el: Improve thread-referral.
message.el (message-send-mail): Use the value of message-courtesy-message from the message buffer.
This commit is contained in:
Gnus developers 2010-11-04 22:18:09 +00:00 • committed by Katsumi Yamaoka
parent 0a61b059c6
commit 181cb5fb65
10 changed files with 96 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/gnus/gnus-html.el
View file

@ -350,9 +350,13 @@ Use ALT-TEXT for the image string."
"Browse the image under point."
(interactive)
(let ((url (get-text-property (point) 'gnus-string)))
(if (not url)
(message "No URL at point")
(browse-url url))))
(cond
((not url)
(message "No link under point"))
((string-match "^mailto:" url)
(gnus-url-mailto url))
(t
(browse-url url)))))
(defun gnus-html-schedule-image-fetching (buffer image)
"Retrieve IMAGE, and place it into BUFFER on arrival."