[Emacs-diffs] master 8123f8c: Restrict indirect lookups in Fdocumentation_property

[Lars Ingebrigtsen]

branch: master
commit 8123f8cf9f38610d32b799cb1dd8893b56fc8a47
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    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.
---
 src/doc.c | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/doc.c b/src/doc.c
index bc05d09..8875360 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -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))