The value of `max-specpdl-size'

[Ikumi Keita]

Hi all,

Current AUCTeX master branch warns that
In toplevel form:
font-latex.el:857:43: Warning: ‘max-specpdl-size’ is an obsolete variable (as 
of 29.1).
at build time. The code in question is
----------------------------------------------------------------------
                    (concat "\\\\" (let ((max-specpdl-size 1000))
                                     (regexp-opt keywords t))
----------------------------------------------------------------------
. I think this let-binding is no longer necessary because the default
value of `max-specpdl-size' is greater than 1000 in supported emacsen;
emacs 26.1 has value of 1300 while emacs 29.1 does 2500. So let's apply
this patch:

diff --git a/font-latex.el b/font-latex.el
index 95b88815..1f5b2988 100644
--- a/font-latex.el
+++ b/font-latex.el
@@ -854,8 +854,7 @@ Generated by `font-latex-user-keyword-classes'"))))
                      (throw 'single-char nil))))
                (set (intern (concat prefix (car elt)))
                     (when (> (safe-length keywords) 0)
-                    (concat "\\\\" (let ((max-specpdl-size 1000))
-                                     (regexp-opt keywords t))
+                    (concat "\\\\" (regexp-opt keywords t)
                             (unless single-char-macro-flag "\\>")))))))))
 
 (defun font-latex-make-user-keywords ()

Binding it to 1000 still has positive effect for users who personally
customize it to value less than 1000, but I'd say there're no such real
users.

Regards,
Ikumi Keita
#StandWithUkraine #StopWarInUkraine