(apropos-print-matches): Set help-mode in *Help* buffer.

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 2681a8b88b9a63f20644926f262addb7bf1c81dc..170a1defb81bd7140dfefb2a97f9f836cf06c84c 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -232,7 +232,8 @@ Returns list of symbols and documentation found."
                   (if (> (length substed) 67)
                       (princ "\n  ")))
                 (princ substed))))
-       (or (bolp) (terpri)))))
+       (or (bolp) (terpri)))
+      (help-mode)))
   t)
 
 ;; Find key bindings for symbols that are cars in ALIST.  Optionally, first