Restrict indirect lookups in Fdocumentation_property

* src/doc.c (Fdocumentation_property): Only look up indirect
variables if we've been asked for the variable documentation.
This commit is contained in:
Lars Ingebrigtsen 2019-06-26 16:41:07 +02:00
parent 01b5eb3e73
commit 8123f8cf9f

View file

@ -437,9 +437,11 @@ aren't strings. */)
tem = Fget (symbol, prop);
/* If we don't have any documentation for this symbol, try to see whether
it's an indirect variable and get the documentation from there instead. */
if (NILP (tem))
/* If we don't have any documentation for this symbol (and we're asking for
the variable documentation), try to see whether it's an indirect variable
and get the documentation from there instead. */
if (EQ (prop, Qvariable_documentation)
&& NILP (tem))
{
Lisp_Object indirect = Findirect_variable (symbol);
if (!NILP (indirect))