mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00
Code Issues Releases Activity

(custom-variable-p): Make it recursively follow aliases. Mention that

Browse Source 
in the docstring.
This commit is contained in:
Luc Teirlinck 2005-07-07 23:12:43 +00:00
parent c778ed4955
commit 289e1999ce
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/custom.el
View File

@ -518,7 +518,9 @@ LOAD should be either a library file name, or a feature name."
;; This test is also in the C code of `user-variable-p'.
(defun custom-variable-p (variable)
"Return non-nil if VARIABLE is a custom variable."
"Return non-nil if VARIABLE is a custom variable.
This recursively follows aliases."
(setq variable (indirect-variable variable))
(or (get variable 'standard-value)
(get variable 'custom-autoload)))