aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaniel Mendler2021-05-05 16:58:35 +0200
committerLars Ingebrigtsen2021-05-05 16:58:35 +0200
commita9f4ee3d3d69a91fde905684e5e9838a18ab855c (patch)
tree00bd00fcbc8170f20eb3aaa205ec8db357e3eed0
parent0b437dd75ce530c5daa76add915711bceb31acb8 (diff)
downloademacs-a9f4ee3d3d69a91fde905684e5e9838a18ab855c.tar.gz
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).
-rw-r--r--lisp/info.el3
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."
1855 (lambda (string pred action) 1855 (lambda (string pred action)
1856 (complete-with-action 1856 (complete-with-action
1857 action 1857 action
1858 (Info-build-node-completions (Info-find-file file1 nil t)) 1858 (when-let ((file2 (Info-find-file file1 'noerror t)))
1859 (Info-build-node-completions file2))
1859 string pred)) 1860 string pred))
1860 nodename predicate code)))) 1861 nodename predicate code))))
1861 ;; Otherwise use Info-read-node-completion-table. 1862 ;; Otherwise use Info-read-node-completion-table.