1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 06:01:22 -08:00

Stop rendering HTML before specdlr exhaustion

Fixes: 22117

* shr.el (shr-descend): Stop rendering before we run out of
specpdl room (bug#22117).

Backport:

(cherry picked from commit 248da292fe)
This commit is contained in:
Lars Ingebrigtsen 2015-12-25 06:19:34 +01:00
parent ec2a509cfb
commit 5b2401d38f

View file

@ -425,8 +425,8 @@ size, and full-buffer size."
(shr-stylesheet shr-stylesheet)
(shr-depth (1+ shr-depth))
(start (point)))
;; shr uses about 12 frames per nested node.
(if (> shr-depth (/ max-specpdl-size 12))
;; shr uses many frames per nested node.
(if (> shr-depth (/ max-specpdl-size 15))
(setq shr-warning "Too deeply nested to render properly; consider increasing `max-specpdl-size'")
(when style
(if (string-match "color\\|display\\|border-collapse" style)