From 5b2401d38f52ca03c8b43cdfdf5a32ca73f10178 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 25 Dec 2015 06:19:34 +0100 Subject: [PATCH] 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 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/net/shr.el b/lisp/net/shr.el index 8b51fc83f44..9e86ca9e0f9 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) -- 2.39.2