[Emacs-diffs] emacs-25 5b2401d 07/12: Stop rendering HTML before specdlr exhaustion

[Lars Ingebrigtsen]

branch: emacs-25
commit 5b2401d38f52ca03c8b43cdfdf5a32ca73f10178
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    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 248da292fe46224b0b5a79b632c89cf4de2c2081)
---
 lisp/net/shr.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 8b51fc8..9e86ca9 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -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)