diff options
| -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 40b6c01bd04..322aa515abb 100644 --- a/lisp/replace.el +++ b/lisp/replace.el | |||
| @@ -360,7 +360,8 @@ It serves as a menu to find any of the occurrences in this buffer. | |||
| 360 | (set-buffer standard-output) | 360 | (set-buffer standard-output) |
| 361 | ;; We will insert the number of lines, and "lines", later. | 361 | ;; We will insert the number of lines, and "lines", later. |
| 362 | (insert " matching ") | 362 | (insert " matching ") |
| 363 | (prin1 regexp) | 363 | (let ((print-escape-newlines t)) |
| 364 | (prin1 regexp)) | ||
| 364 | (insert " in buffer " (buffer-name buffer) ?. ?\n) | 365 | (insert " in buffer " (buffer-name buffer) ?. ?\n) |
| 365 | (occur-mode) | 366 | (occur-mode) |
| 366 | (setq occur-buffer buffer) | 367 | (setq occur-buffer buffer) |