(describe-calendar-mode): Set help-mode in *Help* buffer.

1 files changed, 3 insertions, 0 deletions

diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index a457d12e3c6..045d8b02927 100644
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -1490,6 +1490,9 @@ the inserted text.  Value is always t."
       (substitute-command-keys
        "\\<calendar-mode-map>\\[describe-mode] from within the calendar")
       (substitute-command-keys "\\{calendar-mode-map}")))
+    (save-excursion
+      (set-buffer standard-output)
+      (help-mode))
     (print-help-return-message)))
 
 ;; Calendar mode is suitable only for specially formatted data.