diff options
| author | Lars Ingebrigtsen | 2021-12-10 12:46:55 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-12-10 12:47:10 +0100 |
| commit | c8e19b3a8446b37faba44b04dce37b2c3b44e199 (patch) | |
| tree | a84b46ad9e4358a81dc86d4e87b436b91b05927a | |
| parent | 7a25ba0fdebf5e94fa5a3a3d992424f86b1547cc (diff) | |
| download | emacs-c8e19b3a8446b37faba44b04dce37b2c3b44e199.tar.gz emacs-c8e19b3a8446b37faba44b04dce37b2c3b44e199.zip | |
Don't bug out on certain empty elements with ids
* lisp/net/shr.el (shr-descend): Fix empty-element #id targetting
(bug#52391).
| -rw-r--r-- | lisp/net/shr.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 605 | (insert ? ) | 605 | (insert ? ) |
| 606 | (shr-mark-fill start)) | 606 | (shr-mark-fill start)) |
| 607 | (put-text-property (1- (point)) (point) 'display "")) | 607 | (put-text-property (1- (point)) (point) 'display "")) |
| 608 | (put-text-property start (1+ start) 'shr-target-id id)) | 608 | (put-text-property (1- (point)) (point) 'shr-target-id id)) |
| 609 | ;; If style is set, then this node has set the color. | 609 | ;; If style is set, then this node has set the color. |
| 610 | (when style | 610 | (when style |
| 611 | (shr-colorize-region | 611 | (shr-colorize-region |