Don't bug out on certain empty elements with ids

* lisp/net/shr.el (shr-descend): Fix empty-element #id targetting
(bug#52391).
This commit is contained in:
Lars Ingebrigtsen 2021-12-10 12:46:55 +01:00
parent 7a25ba0fde
commit c8e19b3a84

View file

@ -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