mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-02 11:21:42 +00:00
(occur-engine): buffer-undo-list binding moved...
(occur-1): ...to here.
This commit is contained in:
parent
a06494d047
commit
8121414a6a
@ -1049,7 +1049,9 @@ See also `multi-occur'."
|
||||
|
||||
(with-current-buffer occur-buf
|
||||
(occur-mode)
|
||||
(let ((inhibit-read-only t))
|
||||
(let ((inhibit-read-only t)
|
||||
;; Don't generate undo entries for creation of the initial contents.
|
||||
(buffer-undo-list t))
|
||||
(erase-buffer)
|
||||
(let ((count (occur-engine
|
||||
regexp active-bufs occur-buf
|
||||
@ -1086,8 +1088,6 @@ See also `multi-occur'."
|
||||
title-face prefix-face match-face keep-props)
|
||||
(with-current-buffer out-buf
|
||||
(let ((globalcount 0)
|
||||
;; Don't generate undo entries for creation of the initial contents.
|
||||
(buffer-undo-list t)
|
||||
(coding nil))
|
||||
;; Map over all the buffers
|
||||
(dolist (buf buffers)
|
||||
|
Loading…
Reference in New Issue
Block a user