(shr-urlify): Highlight under mouse.

This commit is contained in:
Lars Magne Ingebrigtsen 2013-07-30 16:27:04 +02:00
parent d50fceab31
commit 5a2a77359a
2 changed files with 2 additions and 0 deletions

View file

@ -1,6 +1,7 @@
2013-07-30 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/shr.el (shr-urlify): Put `follow-link' on URLs (bug#14815).
(shr-urlify): Highlight under mouse.
2013-07-30 Xue Fuqiao <xfq.free@gmail.com>

View file

@ -833,6 +833,7 @@ START, and END. Note that START and END should be markers."
(list 'shr-url url
'help-echo (if title (format "%s (%s)" url title) url)
'follow-link t
'mouse-face 'highlight
'keymap shr-map)))
(defun shr-encode-url (url)