; Improve prompts and error messages in 'info-look'

* lisp/info-look.el (info-lookup-change-mode): Improve text of
prompt and error messages.  (Bug#75634)
This commit is contained in:
Eli Zaretskii 2025-01-25 12:10:32 +02:00
parent 52dc01f1c8
commit 062da7003f

View file

@ -377,12 +377,13 @@ If optional argument QUERY is non-nil, query for the help mode."
(cons (symbol-name mode-spec) mode-spec)))
(info-lookup->topic-value topic)))
(mode (completing-read
(format "Use %s help mode: " topic)
(format "Major mode whose manuals to search for this %s: "
topic)
completions nil t nil 'info-lookup-history)))
(or (setq mode (cdr (assoc mode completions)))
(error "No %s help available" topic))
(error "No manuals available for %s" topic))
(or (info-lookup->mode-value topic mode)
(error "No %s help available for `%s'" topic mode))
(error "The manuals of `%s' have no %s help" mode topic))
(setq info-lookup-mode mode)))
(defun info-lookup--item-to-mode (item mode)