diff options
| author | Stefan Monnier | 2019-06-26 10:27:36 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2019-06-26 10:27:36 -0400 |
| commit | 01b5eb3e735ab33dd2d5f1bf279e44d699c92c4f (patch) | |
| tree | bfc9ea46030bcbb89d39887585ffb11998f2582d | |
| parent | baee135c31fd4c498c38bbc2d1c1f61562e12b07 (diff) | |
| parent | 4b83e7d016ba8e9983c6fd0e154bfa9e22481958 (diff) | |
| download | emacs-01b5eb3e735ab33dd2d5f1bf279e44d699c92c4f.tar.gz emacs-01b5eb3e735ab33dd2d5f1bf279e44d699c92c4f.zip | |
Merge branch 'master' of git+ssh://git.sv.gnu.org/srv/git/emacs into trunk
| -rw-r--r-- | src/doc.c | 12 |
1 files changed, 12 insertions, 0 deletions
| @@ -436,8 +436,20 @@ aren't strings. */) | |||
| 436 | documentation_property: | 436 | documentation_property: |
| 437 | 437 | ||
| 438 | tem = Fget (symbol, prop); | 438 | tem = Fget (symbol, prop); |
| 439 | |||
| 440 | /* If we don't have any documentation for this symbol, try to see whether | ||
| 441 | it's an indirect variable and get the documentation from there instead. */ | ||
| 442 | if (NILP (tem)) | ||
| 443 | { | ||
| 444 | Lisp_Object indirect = Findirect_variable (symbol); | ||
| 445 | if (!NILP (indirect)) | ||
| 446 | tem = Fget (indirect, prop); | ||
| 447 | } | ||
| 448 | |||
| 439 | if (EQ (tem, make_fixnum (0))) | 449 | if (EQ (tem, make_fixnum (0))) |
| 440 | tem = Qnil; | 450 | tem = Qnil; |
| 451 | |||
| 452 | /* See if we want to look for the string in the DOC file. */ | ||
| 441 | if (FIXNUMP (tem) || (CONSP (tem) && FIXNUMP (XCDR (tem)))) | 453 | if (FIXNUMP (tem) || (CONSP (tem) && FIXNUMP (XCDR (tem)))) |
| 442 | { | 454 | { |
| 443 | Lisp_Object doc = tem; | 455 | Lisp_Object doc = tem; |