aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/replace.el5
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.
659See also `multi-occur'." 659See 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