From: Richard M. Stallman Date: Sun, 3 Jul 2005 16:09:07 +0000 (+0000) Subject: (custom-add-option): Doc fix. X-Git-Tag: emacs-pretest-22.0.90~8505 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a4842ffa6e0c4ad1a86e149f990be1e744045d0c;p=emacs.git (custom-add-option): Doc fix. --- diff --git a/lisp/custom.el b/lisp/custom.el index a438ee7d5fe..cb4e76dd65a 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -486,8 +486,10 @@ both appear in constructs like `custom-set-variables'." (defun custom-add-option (symbol option) "To the variable SYMBOL add OPTION. -If SYMBOL is a hook variable, OPTION should be a hook member. -For other types variables, the effect is undefined." +If SYMBOL's custom type is a hook, OPTION should be a hook member. +If SYMBOL's custom type is an alist, OPTION specifies a symbol +to offer to the user as a possible key in the alist. +For other custom types, this has no effect." (let ((options (get symbol 'custom-options))) (unless (member option options) (put symbol 'custom-options (cons option options)))))