mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Small cus-start fix for custom-delayed-init-variables
* lisp/cus-start.el (custom-delayed-init-variables): Only modify it during startup.
This commit is contained in:
parent
f121b5d7f3
commit
6e9f20b3ff
1 changed files with 9 additions and 7 deletions
|
|
@ -705,13 +705,15 @@ since it could result in memory overflow and make Emacs crash."
|
|||
(put symbol 'risky-local-variable (cadr prop)))
|
||||
(if (setq prop (memq :set rest))
|
||||
(put symbol 'custom-set (cadr prop)))
|
||||
;; Note this is the _only_ initialize property we handle.
|
||||
(if (eq (cadr (memq :initialize rest)) 'custom-initialize-delay)
|
||||
;; These vars are defined early and should hence be initialized
|
||||
;; early, even if this file happens to be loaded late. so add them
|
||||
;; to the end of custom-delayed-init-variables. Otherwise,
|
||||
;; auto-save-file-name-transforms will appear in M-x customize-rogue.
|
||||
(add-to-list 'custom-delayed-init-variables symbol 'append))
|
||||
;; Don't re-add to custom-delayed-init-variables post-startup.
|
||||
(unless after-init-time
|
||||
;; Note this is the _only_ initialize property we handle.
|
||||
(if (eq (cadr (memq :initialize rest)) 'custom-initialize-delay)
|
||||
;; These vars are defined early and should hence be initialized
|
||||
;; early, even if this file happens to be loaded late. so add them
|
||||
;; to the end of custom-delayed-init-variables. Otherwise,
|
||||
;; auto-save-file-name-transforms will appear in customize-rogue.
|
||||
(add-to-list 'custom-delayed-init-variables symbol 'append)))
|
||||
;; If this is NOT while dumping Emacs, set up the rest of the
|
||||
;; customization info. This is the stuff that is not needed
|
||||
;; until someone does M-x customize etc.
|
||||
|
|
|
|||
Loading…
Reference in a new issue