Mercurial > emacs

changeset 44853:ca887baefc80

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(multi-occur-by-filename-regexp): Doc fix. (occur-engine): Go to `point-min'.
author Colin Walters <walters@gnu.org>
date Thu, 25 Apr 2002 19:02:46 +0000
parents da382d6ab565
children 6cd35f994b33
files lisp/replace.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/replace.el	Thu Apr 25 18:00:37 2002 +0000
+++ b/lisp/replace.el	Thu Apr 25 19:02:46 2002 +0000
@@ -655,7 +655,7 @@
   (occur-1 regexp nlines bufs))
 
 (defun multi-occur-by-filename-regexp (bufregexp regexp &optional nlines)
-  "Show all lines in buffers containing REGEXP, named by BUFREGEXP.
+  "Show all lines matching REGEXP in buffers named by BUFREGEXP.
 See also `multi-occur'."
   (interactive
    (cons
@@ -701,7 +701,6 @@
 	(if (> count 0)
 	    (display-buffer occur-buf)
 	  (kill-buffer occur-buf)))
-      (goto-char (point-min))
       (setq occur-revert-properties (list regexp nlines bufs)
 	    buffer-read-only t))))
 
@@ -818,7 +817,7 @@
 					  (when title-face
 					    `(face ,title-face))
 					  `(occur-title ,buf))))
-		  (goto-char (point-max)))))))
+		  (goto-char (point-min)))))))
 	;; Return the number of matches
 	globalcount))))