Clear misleading message in help-quit-or-quick

* lisp/help.el (help-quit-or-quick): Clear misleading message
(bug#58542).

diff --git a/lisp/help.el b/lisp/help.el
index 3f5e57d7d5f1975529568348762999cffafb4e3b..1cfd044db8c6a39218177e286e2d1fbdcbd6819d 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -259,7 +259,10 @@ buffer.")
     ;;        help command loop.
     (help-quit))
    ((and-let* ((window (get-buffer-window "*Quick Help*")))
-      (quit-window t window)))
+      (quit-window t window)
+      ;; Clear the message we may have gotten from `C-h' and then
+      ;; waiting before hitting `q'.
+      (message "")))
    ((help-quick))))
 
 (defvar help-return-method nil