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

(cherry picked from commit 062da7003f98cb8352e9cc91e0a8fd7de11b2bd1)

diff --git a/lisp/info-look.el b/lisp/info-look.el
index e1e9e0708c3df04ee18419f00d8818eadfcd12da..c625894054e6ec98437bb2549def027e8715300e 100644 (file)
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -380,12 +380,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)