Skip to content

Commit d9385ac

Browse files
committed
Make links in shr use separate mouse highlight regions
* lisp/net/shr.el (shr-urlify): Make adjacent links have separate mouse hightlights (bug#39115).
1 parent ff630b5 commit d9385ac

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

lisp/net/shr.el

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1265,7 +1265,9 @@ START, and END. Note that START and END should be markers."
12651265
(format "%s (%s)" iri title)
12661266
iri))
12671267
'follow-link t
1268-
'mouse-face 'highlight))
1268+
;; Make separate regions not `eq' so that they'll get
1269+
;; separate mouse highlights.
1270+
'mouse-face (list 'highlight)))
12691271
;; Don't overwrite any keymaps that are already in the buffer (i.e.,
12701272
;; image keymaps).
12711273
(while (and start

0 commit comments

Comments
 (0)