changeset 9847:dc6c0b5fa4f0

(perform-replace): Set help-mode in *Help* buffer.
author Karl Heuer <kwzh@gnu.org>
date Wed, 09 Nov 1994 05:48:05 +0000
parents 6a9a8abb0b6e
children 1365bc291f4c
files lisp/replace.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/replace.el	Wed Nov 09 05:47:20 1994 +0000
+++ b/lisp/replace.el	Wed Nov 09 05:48:05 1994 +0000
@@ -569,7 +569,10 @@
 				  from-string " with "
 				  next-replacement ".\n\n"
 				  (substitute-command-keys
-				   query-replace-help)))))
+				   query-replace-help)))
+			 (save-excursion
+			   (set-buffer standard-output)
+			   (help-mode))))
 		      ((eq def 'exit)
 		       (setq keep-going nil)
 		       (setq done t))