(custom-dont-initialize): New variable.

(custom-declare-variable): Don't init the variable
if custom-dont-initialize is non-nil.

diff --git a/lisp/custom.el b/lisp/custom.el
index 9f68eb59e39f49f440d87b403877a80bfbcb7be7..608aac402c82eab5de5aa8e704613937759443da 100644 (file)
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -39,6 +39,11 @@
   ;; Customize information for this option is in `cus-edit.el'.
   "Hook called after defining each customize option.")
 
+(defvar custom-dont-initialize nil
+  "Non-nil means `defcustom' should not initialize the variable.
+That is used for the sake of `custom-make-dependencies'.
+Users should not set it.")
+
 (defvar custom-current-group-alist nil
   "Alist of (FILE . GROUP) indicating the current group to use for FILE.")
 
@@ -152,7 +157,8 @@ not the default value itself."
                                        'custom-variable))))))
     (put symbol 'custom-requests requests)
     ;; Do the actual initialization.
-    (funcall initialize symbol default))
+    (unless custom-dont-initialize
+      (funcall initialize symbol default)))
   (setq current-load-list (cons symbol current-load-list))
   (run-hooks 'custom-define-hook)
   symbol)