; 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)

diff --git a/lisp/info-look.el b/lisp/info-look.el
index 70b04fe72a3c628dd50a3f81625774bd909631b0..4e6498aa100093a9d5df05115c677f849c08ecf5 100644 (file)
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -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)