From c8e19b3a8446b37faba44b04dce37b2c3b44e199 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 10 Dec 2021 12:46:55 +0100 Subject: [PATCH] Don't bug out on certain empty elements with ids * lisp/net/shr.el (shr-descend): Fix empty-element #id targetting (bug#52391). --- lisp/net/shr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/net/shr.el b/lisp/net/shr.el index f33272fad85..48590fd675a 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -605,7 +605,7 @@ size, and full-buffer size." (insert ? ) (shr-mark-fill start)) (put-text-property (1- (point)) (point) 'display "")) - (put-text-property start (1+ start) 'shr-target-id id)) + (put-text-property (1- (point)) (point) 'shr-target-id id)) ;; If style is set, then this node has set the color. (when style (shr-colorize-region -- 2.39.5