diff options
Diffstat (limited to 'lisp/replace.el')
| -rw-r--r-- | lisp/replace.el | 3 |
1 files changed, 2 insertions, 1 deletions
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." | |||
| 493 | ;; Loop reading commands until one of them sets done, | 493 | ;; Loop reading commands until one of them sets done, |
| 494 | ;; which means it has finished handling this occurrence. | 494 | ;; which means it has finished handling this occurrence. |
| 495 | (while (not done) | 495 | (while (not done) |
| 496 | (message "Query replacing %s with %s: " | 496 | (message (substitute-command-keys |
| 497 | "Query replacing %s with %s: (\\<query-replace-map>\\[help] for help) ") | ||
| 497 | from-string next-replacement) | 498 | from-string next-replacement) |
| 498 | (setq key (read-event)) | 499 | (setq key (read-event)) |
| 499 | (setq key (vector key)) | 500 | (setq key (vector key)) |