Small cus-start fix for custom-delayed-init-variables

* lisp/cus-start.el (custom-delayed-init-variables):
Only modify it during startup.

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index dace6f79549a147ba4ce49c3203e4601a0f9731f..4529fa1ac92a50afd18c9b59386ed6bd0f3df2ca 100644 (file)
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -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.