summaryrefslogtreecommitdiff
path: root/lisp/replace.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1994-11-09 05:48:05 +0000
committerKarl Heuer <kwzh@gnu.org>1994-11-09 05:48:05 +0000
commit479867e7cb9472cc0d5d3ef1638af7fbce6ec82d (patch)
tree10460b1b8abebb6f554bc331f9e929664e4df81f /lisp/replace.el
parentca6e7b1358dd54dbc6ba0c349341482054b93a14 (diff)
downloademacs-479867e7cb9472cc0d5d3ef1638af7fbce6ec82d.tar.gz
(perform-replace): Set help-mode in *Help* buffer.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 01bf44155e3..8d49ea4012e 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -569,7 +569,10 @@ which will run faster and probably do exactly what you want."
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))