]> git.eshelyaron.com Git - emacs.git/commitdiff
Stop rendering HTML before specdlr exhaustion
authorLars Ingebrigtsen <larsi@gnus.org>
Fri, 25 Dec 2015 05:19:34 +0000 (06:19 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Fri, 25 Dec 2015 16:03:34 +0000 (17:03 +0100)
Fixes: 22117
* shr.el (shr-descend): Stop rendering before we run out of
specpdl room (bug#22117).

Backport:

(cherry picked from commit 248da292fe46224b0b5a79b632c89cf4de2c2081)

lisp/net/shr.el

index 8b51fc83f443aadd45f350d8f929aedf0e47b61e..9e86ca9e0f990271a78608cf0b53eb3b0b1a8e55 100644 (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)