From f3bd3e5ff1888a4cef074c2ad0a3fa3de4c4e437 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 9 Jan 2002 00:31:58 +0000 Subject: [PATCH] (regexp-opt): Bind max-specpdl-size. --- lisp/ChangeLog | 2 ++ lisp/emacs-lisp/regexp-opt.el | 1 + 2 files changed, 3 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d7666677abc..01dd7bff8c9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2002-01-08 Richard M. Stallman + * emacs-lisp/regexp-opt.el (regexp-opt): Bind max-specpdl-size. + * emacs-lisp/eldoc.el (eldoc-minor-mode-string): Fix custom type. * textmodes/flyspell.el (flyspell-mode-line-string): Fix custom type. diff --git a/lisp/emacs-lisp/regexp-opt.el b/lisp/emacs-lisp/regexp-opt.el index 9e95eeb8fc9..e46ad2ca3e5 100644 --- a/lisp/emacs-lisp/regexp-opt.el +++ b/lisp/emacs-lisp/regexp-opt.el @@ -101,6 +101,7 @@ by \\=\\< and \\>." (save-match-data ;; Recurse on the sorted list. (let* ((max-lisp-eval-depth (* 1024 1024)) + (max-specpdl-size (* 1024 1024)) (completion-ignore-case nil) (completion-regexp-list nil) (words (eq paren 'words)) -- 2.39.2