mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-11 16:08:13 +00:00
Code Issues Releases Activity

Avoid jumbled order in HTML rendered by shr.el

Browse Source 
* lisp/net/shr.el (shr-render-td): Preserve point, as
shr-render-td-1 might move it as a side effect of
save-window-excursion.  (Bug#29348)
This commit is contained in:
Eli Zaretskii 2017-11-25 13:31:51 +02:00
parent 23bfc2d2db
commit 3198a1646e
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/net/shr.el
View File

@ -2289,8 +2289,10 @@ flags that control whether to collect or render objects."
(<= (car (cdr attr)) width))
(setq result (cdr attr)))))))
result))
(let ((result (shr-render-td-1 dom width fill)))
(let* ((pt (point))
(result (shr-render-td-1 dom width fill)))
(dom-set-attribute dom cache result)
(goto-char pt)
result))))
(defun shr-render-td-1 (dom width fill)