(map-y-or-n-p): Set help-mode in *Help* buffer.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/map-ynp.el b/lisp/map-ynp.el
index a96f72f61be..99e081bc9e9 100644
--- a/lisp/map-ynp.el
+++ b/lisp/map-ynp.el
@@ -202,7 +202,10 @@ ESC or `q' to exit;\n"
                                (if action-alist ";\n")
                                (format "or . (period) to %s \
 the current %s and exit."
-                                       action object)))))
+                                       action object))))
+                           (save-excursion
+                             (set-buffer standard-output)
+                             (help-mode)))
 
                          (setq next (` (lambda ()
                                          (setq next '(, next))