Small startup fix for current-load-list
* lisp/startup.el (command-line): Avoid current-load-list being non-nil after startup ends.
This commit is contained in:
parent
5b776bfd64
commit
f4e6b6e077
1 changed files with 6 additions and 5 deletions
|
@ -1090,11 +1090,12 @@ please check its value")
|
||||||
|
|
||||||
;; Re-evaluate predefined variables whose initial value depends on
|
;; Re-evaluate predefined variables whose initial value depends on
|
||||||
;; the runtime context.
|
;; the runtime context.
|
||||||
(mapc 'custom-reevaluate-setting
|
(let (current-load-list) ; c-r-s may call defvar, and hence LOADHIST_ATTACH
|
||||||
;; Initialize them in the same order they were loaded, in case there
|
(mapc 'custom-reevaluate-setting
|
||||||
;; are dependencies between them.
|
;; Initialize them in the same order they were loaded, in case there
|
||||||
(prog1 (nreverse custom-delayed-init-variables)
|
;; are dependencies between them.
|
||||||
(setq custom-delayed-init-variables nil)))
|
(prog1 (nreverse custom-delayed-init-variables)
|
||||||
|
(setq custom-delayed-init-variables nil))))
|
||||||
|
|
||||||
(normal-erase-is-backspace-setup-frame)
|
(normal-erase-is-backspace-setup-frame)
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue