From d10d0394a04280b86f37f61a76da662feaf0f9dd Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 9 Nov 1994 05:44:20 +0000
Subject: [PATCH] (yow): Set help-mode in *Help* buffer.

---
 lisp/play/yow.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/play/yow.el b/lisp/play/yow.el
index b0c8475333f..cbaef0a2680 100644
--- 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.