diff options
| author | Glenn Morris | 2017-10-20 19:18:23 -0400 |
|---|---|---|
| committer | Glenn Morris | 2017-10-20 19:18:23 -0400 |
| commit | 6a00914d6d4e4eaac4d4beea19570838a72a1e39 (patch) | |
| tree | 06f128732d30f24522eb6891588930fa89b9a398 /src/doc.c | |
| parent | 7c63655e39dacf7263495aa3fb8429a1e2f894a6 (diff) | |
| download | emacs-6a00914d6d4e4eaac4d4beea19570838a72a1e39.tar.gz emacs-6a00914d6d4e4eaac4d4beea19570838a72a1e39.zip | |
Tweak Fdocumentation's error for an undefined function
* src/doc.c (Fdocumentation): Restore the pre-25 behavior
of signalling a void-function error for an undefined function.
This seems cleaner than Emacs 25's "invalid-function: nil" error,
which was (probably) an unintended consequence of changes to
Findirect_function.
Diffstat (limited to 'src/doc.c')
| -rw-r--r-- | src/doc.c | 2 |
1 files changed, 2 insertions, 0 deletions
| @@ -336,6 +336,8 @@ string is passed through `substitute-command-keys'. */) | |||
| 336 | } | 336 | } |
| 337 | 337 | ||
| 338 | fun = Findirect_function (function, Qnil); | 338 | fun = Findirect_function (function, Qnil); |
| 339 | if (NILP (fun)) | ||
| 340 | xsignal1 (Qvoid_function, function); | ||
| 339 | if (CONSP (fun) && EQ (XCAR (fun), Qmacro)) | 341 | if (CONSP (fun) && EQ (XCAR (fun), Qmacro)) |
| 340 | fun = XCDR (fun); | 342 | fun = XCDR (fun); |
| 341 | if (SUBRP (fun)) | 343 | if (SUBRP (fun)) |