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

diff --git a/lisp/play/yow.el b/lisp/play/yow.el
index b0c8475333fcb4d3ca381c4fc718b1c3295f3b21..cbaef0a268068a2edd624bbcee62a87a0144e729 100644 (file)
--- a/lisp/play/yow.el
+++ b/lisp/play/yow.el
@@ -53,7 +53,10 @@
          (t
           (message "Yow!")
           (with-output-to-temp-buffer "*Help*"
-            (princ yow))))))
+            (princ yow)
+            (save-excursion
+              (set-buffer standard-output)
+              (help-mode)))))))
 
 (defsubst read-zippyism (prompt &optional require-match)
   "Read a Zippyism from the minibuffer with completion, prompting with PROMPT.