From a4842ffa6e0c4ad1a86e149f990be1e744045d0c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 3 Jul 2005 16:09:07 +0000 Subject: [PATCH] (custom-add-option): Doc fix. --- lisp/custom.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) 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))))) -- 2.39.2