diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/replace.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index d34916b0b28..1288a4591f5 100644 --- a/lisp/replace.el +++ b/lisp/replace.el | |||
| @@ -655,7 +655,7 @@ This function acts on multiple buffers; otherwise, it is exactly like | |||
| 655 | (occur-1 regexp nlines bufs)) | 655 | (occur-1 regexp nlines bufs)) |
| 656 | 656 | ||
| 657 | (defun multi-occur-by-filename-regexp (bufregexp regexp &optional nlines) | 657 | (defun multi-occur-by-filename-regexp (bufregexp regexp &optional nlines) |
| 658 | "Show all lines in buffers containing REGEXP, named by BUFREGEXP. | 658 | "Show all lines matching REGEXP in buffers named by BUFREGEXP. |
| 659 | See also `multi-occur'." | 659 | See also `multi-occur'." |
| 660 | (interactive | 660 | (interactive |
| 661 | (cons | 661 | (cons |
| @@ -701,7 +701,6 @@ See also `multi-occur'." | |||
| 701 | (if (> count 0) | 701 | (if (> count 0) |
| 702 | (display-buffer occur-buf) | 702 | (display-buffer occur-buf) |
| 703 | (kill-buffer occur-buf))) | 703 | (kill-buffer occur-buf))) |
| 704 | (goto-char (point-min)) | ||
| 705 | (setq occur-revert-properties (list regexp nlines bufs) | 704 | (setq occur-revert-properties (list regexp nlines bufs) |
| 706 | buffer-read-only t)))) | 705 | buffer-read-only t)))) |
| 707 | 706 | ||
| @@ -818,7 +817,7 @@ See also `multi-occur'." | |||
| 818 | (when title-face | 817 | (when title-face |
| 819 | `(face ,title-face)) | 818 | `(face ,title-face)) |
| 820 | `(occur-title ,buf)))) | 819 | `(occur-title ,buf)))) |
| 821 | (goto-char (point-max))))))) | 820 | (goto-char (point-min))))))) |
| 822 | ;; Return the number of matches | 821 | ;; Return the number of matches |
| 823 | globalcount)))) | 822 | globalcount)))) |
| 824 | 823 | ||