diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2021-05-05 16:58:35 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-05-05 16:58:35 +0200 |
| commit | a9f4ee3d3d69a91fde905684e5e9838a18ab855c (patch) | |
| tree | 00bd00fcbc8170f20eb3aaa205ec8db357e3eed0 /lisp/info.el | |
| parent | 0b437dd75ce530c5daa76add915711bceb31acb8 (diff) | |
| download | emacs-a9f4ee3d3d69a91fde905684e5e9838a18ab855c.tar.gz emacs-a9f4ee3d3d69a91fde905684e5e9838a18ab855c.tar.bz2 emacs-a9f4ee3d3d69a91fde905684e5e9838a18ab855c.zip | |
Don't bug out in `Info-goto-node' completion
* lisp/info.el (Info-read-node-name-1): Don't bug out in the
middle of completion, but return nil instead (and issue a message)
(bug#47771).
Diffstat (limited to 'lisp/info.el')
| -rw-r--r-- | lisp/info.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/info.el b/lisp/info.el index 82f0eb37ae9..67d27c78988 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -1855,7 +1855,8 @@ See `completing-read' for a description of arguments and usage." (lambda (string pred action) (complete-with-action action - (Info-build-node-completions (Info-find-file file1 nil t)) + (when-let ((file2 (Info-find-file file1 'noerror t))) + (Info-build-node-completions file2)) string pred)) nodename predicate code)))) ;; Otherwise use Info-read-node-completion-table. |