# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1032638382 0
# Node ID b65cc673fb00e05e64ab27c4382fb60957c061dc
# Parent  451b8289e2837328635a015d04be9a3b26a8b7f0
(custom-dont-initialize): New variable.
(custom-declare-variable): Don't init the variable
if custom-dont-initialize is non-nil.

diff -r 451b8289e283 -r b65cc673fb00 lisp/custom.el
--- a/lisp/custom.el	Sat Sep 21 19:57:11 2002 +0000
+++ b/lisp/custom.el	Sat Sep 21 19:59:42 2002 +0000
@@ -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 @@
 					'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)