mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-27 07:37:33 +00:00
(multi-occur-in-matching-buffers): Fix prev change.
This commit is contained in:
parent
39d58fc034
commit
689f439402
@ -1004,7 +1004,7 @@ See also `multi-occur'."
|
||||
(let* ((default (car regexp-history))
|
||||
(input
|
||||
(read-from-minibuffer
|
||||
(if allbufs
|
||||
(if current-prefix-arg
|
||||
"List lines in buffers whose names match regexp: "
|
||||
"List lines in buffers whose filenames match regexp: ")
|
||||
nil
|
||||
@ -1016,7 +1016,7 @@ See also `multi-occur'."
|
||||
input))
|
||||
(occur-read-primary-args)))
|
||||
(when bufregexp
|
||||
(occur-1 regexp nlines
|
||||
(occur-1 regexp nil
|
||||
(delq nil
|
||||
(mapcar (lambda (buf)
|
||||
(when (if allbufs
|
||||
|
Loading…
Reference in New Issue
Block a user