From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 23 Dec 1993 04:40:13 +0000 (+0000)
Subject: (perform-replace): Prompt now says how to get help.
X-Git-Tag: emacs-19.34~10553
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1c7dec409a9627a93cb6e27c7bb22353ef75c5f;p=emacs.git

(perform-replace): Prompt now says how to get help.
---

diff --git a/lisp/replace.el b/lisp/replace.el
index b8bf0648c24..2678e20c26d 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -493,7 +493,8 @@ which will run faster and do exactly what you probably want."
 	  ;; Loop reading commands until one of them sets done,
 	  ;; which means it has finished handling this occurrence.
 	  (while (not done)
-	    (message "Query replacing %s with %s: "
+	    (message (substitute-command-keys
+		      "Query replacing %s with %s: (\\<query-replace-map>\\[help] for help) ")
 		     from-string next-replacement)
 	    (setq key (read-event))
 	    (setq key (vector key))