diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-27 15:44:12 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-08-27 15:44:12 +0200 |
| commit | f427b985a1857523412a846fcaa9082c87c0bbd1 (patch) | |
| tree | 19f54ddd0d3b39d4d6b7c7a979b537c79a6ff1a3 | |
| parent | 716441a069541ad4efe5eca773e2a41f04f540d1 (diff) | |
| download | emacs-f427b985a1857523412a846fcaa9082c87c0bbd1.tar.gz | |
Make dynamic info-lookup more backwards-compatible
* lisp/info-look.el (info-lookup--expand-info): Don't try to
expand elements that aren't functions (bug#57446).
| -rw-r--r-- | lisp/info-look.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/info-look.el b/lisp/info-look.el index 7f45f976a24..ce0a08dcbe6 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el @@ -130,7 +130,8 @@ OTHER-MODES is a list of cross references to other help modes.") (defun info-lookup--expand-info (info) ;; We have a dynamic doc-spec function. (when (and (null (nth 3 info)) - (nth 6 info)) + (nth 6 info) + (functionp (nth 6 info))) (setf (nth 3 info) (funcall (nth 6 info)) (nth 6 info) nil)) info) |