Mercurial > emacs
changeset 47570:b65cc673fb00
(custom-dont-initialize): New variable.
(custom-declare-variable): Don't init the variable
if custom-dont-initialize is non-nil.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 21 Sep 2002 19:59:42 +0000 |
| parents | 451b8289e283 |
| children | c26abde8fcad |
| files | lisp/custom.el |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- 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)