aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/src/data.c b/src/data.c
index 3e278e8bac3..d0ef5734abc 100644
--- a/src/data.c
+++ b/src/data.c
@@ -808,10 +808,12 @@ indirect_variable (struct Lisp_Symbol *symbol)
808 808
809DEFUN ("indirect-variable", Findirect_variable, Sindirect_variable, 1, 1, 0, 809DEFUN ("indirect-variable", Findirect_variable, Sindirect_variable, 1, 1, 0,
810 doc: /* Return the variable at the end of OBJECT's variable chain. 810 doc: /* Return the variable at the end of OBJECT's variable chain.
811If OBJECT is a symbol, follow all variable indirections and return the final 811If OBJECT is a symbol, follow its variable indirections (if any), and
812variable. If OBJECT is not a symbol, just return it. 812return the variable at the end of the chain of aliases. See Info node
813Signal a cyclic-variable-indirection error if there is a loop in the 813`(elisp)Variable Aliases'.
814variable chain of symbols. */) 814
815If OBJECT is not a symbol, just return it. If there is a loop in the
816chain of aliases, signal a `cyclic-variable-indirection' error. */)
815 (Lisp_Object object) 817 (Lisp_Object object)
816{ 818{
817 if (SYMBOLP (object)) 819 if (SYMBOLP (object))