summaryrefslogtreecommitdiff
path: root/lisp/loadup.el
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2020-01-01 17:35:01 +0100
committerMattias EngdegÄrd <mattiase@acm.org>2020-01-01 17:38:42 +0100
commit43203d5068eee68138007cac9d12a04d40d4ffb6 (patch)
tree8607e9774d355288a945d1a849a50f2d2fd16892 /lisp/loadup.el
parentfab3674b363143299b6bdfae1f6f1e6f6ee1daa6 (diff)
downloademacs-43203d5068eee68138007cac9d12a04d40d4ffb6.tar.gz
* lisp/loadup.el: Set max-specpdl-size to 1800 when loading cl-generic.el.
Diffstat (limited to 'lisp/loadup.el')
-rw-r--r--lisp/loadup.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el
index 04ec5ca4754..97525b27086 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -245,7 +245,9 @@
(load "language/cham")
(load "indent")
-(load "emacs-lisp/cl-generic")
+(let ((max-specpdl-size (max max-specpdl-size 1800)))
+ ;; A particularly demanding file to load; 1600 does not seem to be enough.
+ (load "emacs-lisp/cl-generic"))
(load "minibuffer") ;Needs cl-generic (and define-minor-mode).
(load "frame")
(load "startup")